forked from GitHub/gf-core
11 lines
113 B
Plaintext
11 lines
113 B
Plaintext
concrete NatAscii of Nat = {
|
|
|
|
lincat Nat = Str ;
|
|
|
|
lin zero = "" ;
|
|
succ n = "-" ++ n ;
|
|
|
|
lincat NE = {} ;
|
|
|
|
}
|