Files
gf-core/book/examples/chapter4/ComputersEng.gf
2010-11-22 12:55:37 +00:00

11 lines
279 B
Plaintext

--# -path=.:present
concrete ComputersEng of Computers = CommentsEng **
open SyntaxEng, ParadigmsEng in {
lin
Computer = mkCN (mkN "computer") ;
HardDisk = mkCN (mkA "hard") (mkN "disk") ;
Efficient = mkAP (mkA "efficient") ;
Slow = mkAP (mkA "slow") ;
}