summaryrefslogtreecommitdiff
path: root/examples/phrasebook/SentencesSwe.gf
blob: 9e3ae577fd888f9175dbe224af32bc6736f885e1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
concrete SentencesSwe of Sentences = NumeralSwe ** SentencesI - [
    PYesToNo, NameNN,
    DrinkNumber  -- should be utrum gender when countable
 ] with 
  (Syntax = SyntaxSwe),
  (Symbolic = SymbolicSwe),
  (Lexicon = LexiconSwe) ** open Prelude, SyntaxSwe, (P = ParadigmsSwe) in {

  lin 
    PYesToNo = mkPhrase (lin Utt (ss "jo")) ;
    NameNN = mkNP (P.mkPN "NN") ;
    DrinkNumber n d = mkNP n (mkCN (P.mkN [] [] [] [] P.utrum) (lin Adv (mkUtt d))) ; --- empty classifier - quite a hack...
  
}