mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-07 10:12:51 -06:00
14 lines
167 B
Plaintext
14 lines
167 B
Plaintext
concrete NatAscii of Nat = {
|
|
|
|
lincat Nat = Str ;
|
|
|
|
lin zero = "" ;
|
|
succ n = "_" ++ n ;
|
|
|
|
lincat LT = Str ;
|
|
NE = {} ;
|
|
|
|
lin zLT n = n ;
|
|
sLT _ _ l = l ;
|
|
|
|
} |