-- comment with double hyphen, takes precedence over operators
module Ex
-- imports not implemented yet
import Foo
-- inductive data type declaration (not supported in language yet)
data Bool : Type where
  True : Bool
  False : Bool

-- claim
id : a -> a
-- declaration
id = \ a => a * a + 2 * (3 + x)

blah : Either a a -> a
blah = \ x => let x = 1 in x * x

bar = foo {x} 1
blah = \ _ => 1


next : (A : Type) -> (x : A) -> A

next : {A : Type} -> (x : A) -> A