Idris2/tests/idris2/basic/basic039/Main.idr
2023-09-07 14:57:22 +01:00

11 lines
208 B
Idris

module Main
-- Using :di we can see the internal structure. MkFoo should be a newtype,
-- MkBar not
data Foo : Type where
MkFoo : String -> Foo
data Bar : Type where
[noNewtype]
MkBar : String -> Bar