mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-10 13:29:32 -06:00
11 lines
179 B
Plaintext
11 lines
179 B
Plaintext
concrete BinaryDigits of Binary = {
|
|
|
|
flags startcat=Bin ;
|
|
|
|
lincat Bin = { s : Str } ;
|
|
|
|
lin End = { s = "" } ;
|
|
lin Zero b = { s = "0" ++ b.s } ;
|
|
lin One b = { s = "1" ++ b.s } ;
|
|
|
|
} |