Idris2/tests/idris2/record009/record.idr

14 lines
189 B
Idris
Raw Normal View History

parameters (X : Nat)
Foo : Type
Foo = Nat
record Bar (xs : List a) where
constructor MkBar
2021-07-10 21:18:49 +03:00
Gnu : Foo
Baz : Foo -> Nat
Baz x = x
Quux : Bar xs -> Foo
Quux x = Gnu x