blob: 9337b2f6ecec914e9ecc460d55b05b545d7f49e6 (
plain)
1
2
3
4
5
6
7
8
|
-- Functor Instantiation
--# -path=.:/home/john/.cabal/share/gf-3.2.9/lib/present
concrete FoodsEng of Foods = FoodsI - [Pizza] with
(Syntax = SyntaxEng),
(LexFoods = LexFoodsEng) **
open SyntaxEng, ParadigmsEng in {
lin Pizza = mkCN (mkA "Italian") (mkN "pie") ;
}
|