Mercurial > urweb
view tests/stuff.lac @ 2:64f09f7822c3
Start of elaboration
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 26 Jan 2008 14:27:33 -0500 |
parents | 4202f6eda946 |
children | 258261a53842 |
line wrap: on
line source
con c1 = t :: Type -> t con c2 :: Type = t :: Type -> t con c3 = fn t :: Type => c1 con c4 = c3 c1 con c5 = (fn t :: Type => c1) c1 con name = #MyName con c6 = {A : c1, name : c2} con c7 = [A = c1, name = c2]