src/Core/Context.idr


1
2
3
4
5
6
7
8
9
10
11
12

module Core.Context

import public Core.Name

-- Definition ------------------------------------------------------------------

public export
data Context : Type where
  Lin : Context
  (:<) : Context -> Name -> Context

%name Context sx, sy, sz