Idris-dev/test/totality001/test010a.idr
2014-01-30 17:24:08 +00:00

10 lines
120 B
Idris

module main
%default total
data Bad = MkBad (Bad -> Int) Int
| MkBad' Int
bar : Bad
bar = MkBad (\x => 3) 3