mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 19:22:50 -06:00
slight refactoring of Phrasebook, with less start words
This commit is contained in:
@@ -1,10 +1,12 @@
|
||||
concrete SentencesFin of Sentences = NumeralFin ** SentencesI -
|
||||
[Is, IsMass, NameNN, ObjMass,
|
||||
IFemale, YouFamFemale, YouPolFemale, IMale, YouFamMale, YouPolMale
|
||||
IFemale, YouFamFemale, YouPolFemale, IMale, YouFamMale, YouPolMale,
|
||||
GObjectPlease
|
||||
] with
|
||||
(Syntax = SyntaxFin),
|
||||
(Symbolic = SymbolicFin),
|
||||
(Lexicon = LexiconFin) ** open SyntaxFin, ExtraFin, (P = ParadigmsFin), (V = VerbFin) in {
|
||||
(Lexicon = LexiconFin) **
|
||||
open SyntaxFin, ExtraFin, (P = ParadigmsFin), (V = VerbFin), Prelude in {
|
||||
|
||||
lin
|
||||
Is item prop = mkCl item (V.UseComp (CompPartAP prop)) ; -- tämä pizza on herkullista
|
||||
@@ -20,4 +22,7 @@ concrete SentencesFin of Sentences = NumeralFin ** SentencesI -
|
||||
|
||||
ObjMass = PartCN ;
|
||||
|
||||
GObjectPlease o = lin Text (mkPhr noPConj (mkUtt o) (lin Voc (ss "kiitos"))) ;
|
||||
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user