mirror of
https://github.com/idris-lang/Idris2.git
synced 2025-01-08 17:01:15 +03:00
16 lines
221 B
Plaintext
16 lines
221 B
Plaintext
|
data Nat : Type where
|
||
|
|
Z : Nat
|
||
|
|
S : Nat -> Nat
|
||
|
|
|
||
|
|
namespace A
|
||
|
|
public export
|
||
|
|
record Dup where
|
||
|
|
constructor MkDup
|
||
|
|
label : Nat
|
||
|
|
|
||
|
|
namespace B
|
||
|
|
public export
|
||
|
|
record Dup where
|
||
|
|
constructor MkDup
|
||
|
|
label : Nat
|