Idris2/tests/idris2/record009/record.idr

14 lines
189 B
Idris

parameters (X : Nat)
Foo : Type
Foo = Nat
record Bar (xs : List a) where
constructor MkBar
Gnu : Foo
Baz : Foo -> Nat
Baz x = x
Quux : Bar xs -> Foo
Quux x = Gnu x