msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

added ExtraSpa.UseComp_estar for uses of estar instead of copula

Browse Source
This commit is contained in:
aarne
2015-02-05 07:55:20 +00:00
parent 9a4970fd7a
commit 292cada649
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/src/spanish/ExtraSpa.gf
View File

@@ -1,5 +1,5 @@
concrete ExtraSpa of ExtraSpaAbs = ExtraRomanceSpa **
open CommonRomance, PhonoSpa, MorphoSpa, ParadigmsSpa, ParamX, ResSpa, BeschSpa,
open CommonRomance, PhonoSpa, MorphoSpa, ParadigmsSpa, ParamX, ResSpa, BeschSpa, (I = IrregSpa),
Prelude in {
flags coding=utf8 ;
@@ -78,4 +78,6 @@ concrete ExtraSpa of ExtraSpaAbs = ExtraRomanceSpa **
ExistsNP np =
mkClause [] True False np.a (insertComplement (\\_ => (np.s ! Nom).ton) (predV (mkV "existir"))) ;
UseComp_estar comp = insertComplement comp.s (predV I.estar_V) ;
}

2
lib/src/spanish/ExtraSpaAbs.gf
View File

@@ -32,4 +32,6 @@ abstract ExtraSpaAbs = ExtraRomanceAbs ** {
PassVPSlash_ser : VPSlash -> VP ;
UseComp_estar : Comp -> VP ; -- esta lleno, as opposed to es lleno
}