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

11 lines
264 B
Plaintext

--# -path=.:present
concrete ClothesEng of Clothes = CommentsEng **
open SyntaxEng, ParadigmsEng in {
lin
Shirt = mkCN (mkN "shirt") ;
Jacket = mkCN (mkN "jacket") ;
Comfortable = mkAP (mkA "comfortable") ;
Elegant = mkAP (mkA "elega") ;
}