mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-20 10:19:32 -06:00
15 lines
186 B
Plaintext
15 lines
186 B
Plaintext
concrete NatAscii of Nat = {
|
|
|
|
lincat Nat = Str ;
|
|
|
|
lin zero = "" ;
|
|
succ n = "_" ++ n ;
|
|
|
|
lincat LT = Str ;
|
|
NE = {} ;
|
|
Plus = {} ;
|
|
|
|
lin zLT n = n ;
|
|
sLT _ _ l = l ;
|
|
|
|
} |