forked from GitHub/gf-rgl
import Construction in AllEng
This commit is contained in:
@@ -1,7 +1,7 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete AllEng of AllEngAbs =
|
concrete AllEng of AllEngAbs =
|
||||||
LangEng,
|
LangEng, ConstructionEng,
|
||||||
IrregEng-[
|
IrregEng-[
|
||||||
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
||||||
sew_V,sing_V,sit_V,sleep_V,spit_V,stand_V,swell_V,swim_V,think_V],
|
sew_V,sing_V,sit_V,sleep_V,spit_V,stand_V,swell_V,swim_V,think_V],
|
||||||
|
|||||||
@@ -1,7 +1,7 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
abstract AllEngAbs =
|
abstract AllEngAbs =
|
||||||
Lang,
|
Lang, Construction,
|
||||||
IrregEngAbs-[
|
IrregEngAbs-[
|
||||||
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
||||||
sew_V,sing_V,sit_V,sleep_V,spit_V,stand_V,swell_V,swim_V,think_V],
|
sew_V,sing_V,sit_V,sleep_V,spit_V,stand_V,swell_V,swim_V,think_V],
|
||||||
|
|||||||
@@ -85,7 +85,7 @@ concrete NounFin of Noun = CatFin ** open ResFin, MorphoFin, StemFin, Prelude in
|
|||||||
} ;
|
} ;
|
||||||
|
|
||||||
ExtAdvNP np adv = {
|
ExtAdvNP np adv = {
|
||||||
s = \\c => np.s ! c ++ adv.s ;
|
s = \\c => np.s ! c ++ embedInCommas adv.s ;
|
||||||
a = np.a ;
|
a = np.a ;
|
||||||
isPron = np.isPron ; -- minun täällä - ni
|
isPron = np.isPron ; -- minun täällä - ni
|
||||||
isNeg = np.isNeg
|
isNeg = np.isNeg
|
||||||
|
|||||||
Reference in New Issue
Block a user