gf-book/examples/chapter4/ClothesIta.gf


1
2
3
4
5
6
7
8

concrete ClothesIta of Clothes = CommentsIta ** 
    open SyntaxIta, ParadigmsIta in {
  lin
    Shirt = mkCN (mkN "camicia") ;
    Jacket = mkCN (mkN "giacca") ;
    Comfortable = mkAP (mkA "comodo") ;
    Elegant = mkAP (mkA "elegante") ;
}