mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-17 00:39:32 -06:00
13 lines
198 B
Plaintext
13 lines
198 B
Plaintext
concrete Symb of Nat = open Prelude in {
|
|
lincat Nat, Bin = SS ;
|
|
|
|
lin
|
|
One = ss "1" ;
|
|
Succ = postfixSS "'" ;
|
|
|
|
BOne = ss "1" ;
|
|
BX = postfixSS "0" ;
|
|
BXPlus = postfixSS "1" ;
|
|
}
|
|
|