1
0
forked from GitHub/gf-core

more shallow grs

This commit is contained in:
aarne
2004-04-14 08:52:11 +00:00
parent 7c6b0cbff6
commit 695dcf7cbc
12 changed files with 1458 additions and 5 deletions

View File

@@ -0,0 +1,244 @@
abstract LexAbs = Shallow ** {
fun journey1 : Verb ;
fun judge1 : Verb ;
fun Dinah1 : PN ;
fun On1 : Adj ;
fun Rachel1 : PN ;
fun Rebekah1 : PN ;
fun Laban1 : PN ;
fun Leah1 : PN ;
fun Lot1 : PN ;
fun Lotan1 : PN ;
fun Pharaoh1 : PN ;
fun Hamor1 : PN ;
fun right1 : Adj ;
fun roll1 : Verb ;
fun rule1 : Verb ;
fun rain1 : Verb ;
fun reign1 : Verb ;
fun receive1 : Verb ;
fun reward1 : Verb ;
fun reach1 : Verb ;
fun remember1 : Verb ;
fun remove1 : Verb ;
fun refrain1 : Verb ;
fun rest1 : Verb ;
fun restore1 : Verb ;
fun return1 : Verb ;
fun require1 : Verb ;
fun Bless1 : Verb ;
fun Benjamin1 : PN ;
fun number1 : Verb ;
fun name1 : Verb ;
fun nourish1 : Verb ;
fun guard1 : PN ;
fun gather1 : Verb ;
fun gracious1 : Adj ;
fun great1 : Adj ;
fun go1 : Adj ;
fun good1 : Adj ;
fun Manasseh1 : PN ;
fun kill1 : Verb ;
fun kiss1 : Verb ;
fun king1 : N ;
fun kind1 : Adj ;
fun know1 : Adj ;
fun lodge1 : Verb ;
fun love1 : Verb ;
fun lord1 : N ;
fun look1 : Verb ;
fun leap1 : Verb ;
fun light1 : Verb ;
fun light2 : Adj ;
fun lift1 : Verb ;
fun lion1 : PN ;
fun live1 : Verb ;
fun laugh1 : Verb ;
fun lad1 : N ;
fun lad2 : Verb ;
fun lade1 : Verb ;
fun Abimelech1 : PN ;
fun Abram1 : PN ;
fun Abraham1 : PN ;
fun Ishmael1 : PN ;
fun Isaac1 : PN ;
fun Israel1 : PN ;
fun God1 : PN ;
fun vow1 : Verb ;
fun very1 : Adj ;
fun visit1 : Verb ;
fun smell1 : Verb ;
fun scatter1 : Verb ;
fun stand1 : Adj ;
fun stay1 : Verb ;
fun sister1 : PN ;
fun see1 : Verb ;
fun seem1 : Verb ;
fun seek1 : Adj ;
fun secret1 : Adj ;
fun separate1 : Verb ;
fun serve1 : Verb ;
fun servant1 : N ;
fun spoil1 : Verb ;
fun sojourn1 : Verb ;
fun sow1 : Verb ;
fun sore1 : Adj ;
fun son1 : N ;
fun sad1 : Adj ;
fun sack1 : N ;
fun save1 : Verb ;
fun saw1 : Adj ;
fun sure1 : Adj ;
fun should1 : Adj ;
fun she1 : Verb ;
fun shew1 : Verb ;
fun master1 : PN ;
fun marry1 : Verb ;
fun may1 : Adj ;
fun man1 : PN ;
fun mock1 : Verb ;
fun mother1 : PN ;
fun mourn1 : Verb ;
fun men1 : PN ;
fun mean1 : Adj ;
fun multiply1 : Verb ;
fun fill1 : Verb ;
fun finish1 : Verb ;
fun find1 : Adj ;
fun follow1 : Verb ;
fun form1 : Verb ;
fun forty1 : PN ;
fun fetch1 : Verb ;
fun fear1 : Verb ;
fun fear2 : Adj ;
fun favour1 : Verb ;
fun faint1 : Verb ;
fun fail1 : Verb ;
fun father1 : N ;
fun She1 : Verb ;
fun Shechem1 : PN ;
fun Sarai1 : PN ;
fun Sarah1 : PN ;
fun Judah1 : PN ;
fun Jacob1 : PN ;
fun Joseph1 : PN ;
fun dry1 : Verb ;
fun dress1 : Verb ;
fun dream1 : Verb ;
fun deliver1 : Verb ;
fun desire1 : Verb ;
fun destroy1 : Verb ;
fun depart1 : Verb ;
fun devour1 : Verb ;
fun do1 : Adj ;
fun double1 : Verb ;
fun day1 : N ;
fun dwell1 : Verb ;
fun discern1 : Verb ;
fun distress1 : Verb ;
fun displease1 : Verb ;
fun divide1 : Verb ;
fun die1 : Verb ;
fun bad1 : Adj ;
fun bless1 : Verb ;
fun build1 : Verb ;
fun bury1 : Verb ;
fun brother1 : PN ;
fun breath1 : Verb ;
fun bow1 : Verb ;
fun be1 : Verb ;
fun bed1 : PN ;
fun yield1 : Verb ;
fun young1 : Adj ;
fun your1 : PN ;
fun obey1 : Verb ;
fun open1 : Verb ;
fun open2 : Adj ;
fun on1 : Adj ;
fun our1 : N ;
fun offer1 : Verb ;
fun turn1 : Verb ;
fun tarry1 : Verb ;
fun till1 : Adj ;
fun twenty1 : PN ;
fun travail1 : Verb ;
fun touch1 : Verb ;
fun ten1 : PN ;
fun their1 : PN ;
fun escape1 : Verb ;
fun establish1 : Verb ;
fun exceeding1 : Adj ;
fun enter1 : Verb ;
fun end1 : Verb ;
fun eat1 : Adj ;
fun empty1 : Verb ;
fun embalm1 : Verb ;
fun hard1 : Adj ;
fun hast1 : Verb ;
fun haste1 : Verb ;
fun hang1 : Verb ;
fun hate1 : Verb ;
fun hire1 : Verb ;
fun he1 : Verb ;
fun hearken1 : Verb ;
fun would1 : Adj ;
fun worship1 : Verb ;
fun woman1 : PN ;
fun weary1 : Verb ;
fun well1 : N ;
fun went1 : Adj ;
fun widow1 : PN ;
fun wicked1 : Adj ;
fun wife1 : PN ;
fun wander1 : Verb ;
fun water1 : Verb ;
fun walk1 : Verb ;
fun wash1 : Verb ;
fun pitch1 : Verb ;
fun prosper1 : Verb ;
fun preserve1 : Verb ;
fun present1 : Verb ;
fun prevail1 : Verb ;
fun pray1 : Verb ;
fun plant1 : Verb ;
fun place1 : Verb ;
fun part1 : Verb ;
fun pass1 : Verb ;
fun pursue1 : Verb ;
fun purchase1 : Verb ;
fun appoint1 : Verb ;
fun appear1 : Verb ;
fun accept1 : Verb ;
fun ask1 : Verb ;
fun ass1 : N ;
fun ass2 : PN ;
fun another1 : PN ;
fun answer1 : Verb ;
fun curse1 : Verb ;
fun circumcise1 : Verb ;
fun cry1 : Verb ;
fun cease1 : Verb ;
fun certain1 : Adj ;
fun change1 : Verb ;
fun charge1 : Verb ;
fun children1 : PN ;
fun cause1 : Verb ;
fun camel1 : N ;
fun call1 : Verb ;
fun carry1 : Verb ;
fun consume1 : Verb ;
fun conceive1 : Verb ;
fun corrupt1 : Verb ;
fun couch1 : Verb ;
fun commune1 : Verb ;
fun command1 : Verb ;
fun comfort1 : Verb ;
fun increase1 : Verb ;
fun intreat1 : Verb ;
fun interpret1 : Verb ;
fun Nahor1 : PN ;
fun Noah1 : PN ;
fun Esau1 : PN ;
fun Ephraim1 : PN ;
fun Egyptian1 : N ;
}

View File

@@ -0,0 +1,245 @@
--# -path=.:..:../../../prelude:../../abstract:../../english
concrete LexEng of LexAbs = ShallowEng ** open ParadigmsEng in {
lin journey1 = vGen "journey" ;
lin judge1 = vGen "judge" ;
lin Dinah1 = pnReg "Dinah" ;
lin On1 = mkAdj1 "On" ;
lin Rachel1 = pnReg "Rachel" ;
lin Rebekah1 = pnReg "Rebekah" ;
lin Laban1 = pnReg "Laban" ;
lin Leah1 = pnReg "Leah" ;
lin Lot1 = pnReg "Lot" ;
lin Lotan1 = pnReg "Lotan" ;
lin Pharaoh1 = pnReg "Pharaoh" ;
lin Hamor1 = pnReg "Hamor" ;
lin right1 = mkAdj1 "right" ;
lin roll1 = vGen "roll" ;
lin rule1 = vGen "rule" ;
lin rain1 = vGen "rain" ;
lin reign1 = vGen "reign" ;
lin receive1 = vGen "receive" ;
lin reward1 = vGen "reward" ;
lin reach1 = vGen "reach" ;
lin remember1 = vGen "remember" ;
lin remove1 = vGen "remove" ;
lin refrain1 = vGen "refrain" ;
lin rest1 = vGen "rest" ;
lin restore1 = vGen "restore" ;
lin return1 = vGen "return" ;
lin require1 = vGen "require" ;
lin Bless1 = vGen "Bless" ;
lin Benjamin1 = pnReg "Benjamin" ;
lin number1 = vGen "number" ;
lin name1 = vGen "name" ;
lin nourish1 = vGen "nourish" ;
lin guard1 = pnReg "guard" ;
lin gather1 = vGen "gather" ;
lin gracious1 = mkAdj1 "gracious" ;
lin great1 = mkAdj1 "great" ;
lin go1 = mkAdj1 "go" ;
lin good1 = mkAdj1 "good" ;
lin Manasseh1 = pnReg "Manasseh" ;
lin kill1 = vGen "kill" ;
lin kiss1 = vGen "kiss" ;
lin king1 = nNonhuman "king" ;
lin kind1 = mkAdj1 "kind" ;
lin know1 = mkAdj1 "know" ;
lin lodge1 = vGen "lodge" ;
lin love1 = vGen "love" ;
lin lord1 = nNonhuman "lord" ;
lin look1 = vGen "look" ;
lin leap1 = vGen "leap" ;
lin light1 = vGen "light" ;
lin light2 = mkAdj1 "light" ;
lin lift1 = vGen "lift" ;
lin lion1 = pnReg "lion" ;
lin live1 = vGen "live" ;
lin laugh1 = vGen "laugh" ;
lin lad1 = nNonhuman "lad" ;
lin lad2 = vGen "lad" ;
lin lade1 = vGen "lade" ;
lin Abimelech1 = pnReg "Abimelech" ;
lin Abram1 = pnReg "Abram" ;
lin Abraham1 = pnReg "Abraham" ;
lin Ishmael1 = pnReg "Ishmael" ;
lin Isaac1 = pnReg "Isaac" ;
lin Israel1 = pnReg "Israel" ;
lin God1 = pnReg "God" ;
lin vow1 = vGen "vow" ;
lin very1 = mkAdj1 "very" ;
lin visit1 = vGen "visit" ;
lin smell1 = vGen "smell" ;
lin scatter1 = vGen "scatter" ;
lin stand1 = mkAdj1 "stand" ;
lin stay1 = vGen "stay" ;
lin sister1 = pnReg "sister" ;
lin see1 = vGen "see" ;
lin seem1 = vGen "seem" ;
lin seek1 = mkAdj1 "seek" ;
lin secret1 = mkAdj1 "secret" ;
lin separate1 = vGen "separate" ;
lin serve1 = vGen "serve" ;
lin servant1 = nNonhuman "servant" ;
lin spoil1 = vGen "spoil" ;
lin sojourn1 = vGen "sojourn" ;
lin sow1 = vGen "sow" ;
lin sore1 = mkAdj1 "sore" ;
lin son1 = nNonhuman "son" ;
lin sad1 = mkAdj1 "sad" ;
lin sack1 = nNonhuman "sack" ;
lin save1 = vGen "save" ;
lin saw1 = mkAdj1 "saw" ;
lin sure1 = mkAdj1 "sure" ;
lin should1 = mkAdj1 "should" ;
lin she1 = vGen "she" ;
lin shew1 = vGen "shew" ;
lin master1 = pnReg "master" ;
lin marry1 = vGen "marry" ;
lin may1 = mkAdj1 "may" ;
lin man1 = pnReg "man" ;
lin mock1 = vGen "mock" ;
lin mother1 = pnReg "mother" ;
lin mourn1 = vGen "mourn" ;
lin men1 = pnReg "men" ;
lin mean1 = mkAdj1 "mean" ;
lin multiply1 = vGen "multiply" ;
lin fill1 = vGen "fill" ;
lin finish1 = vGen "finish" ;
lin find1 = mkAdj1 "find" ;
lin follow1 = vGen "follow" ;
lin form1 = vGen "form" ;
lin forty1 = pnReg "forty" ;
lin fetch1 = vGen "fetch" ;
lin fear1 = vGen "fear" ;
lin fear2 = mkAdj1 "fear" ;
lin favour1 = vGen "favour" ;
lin faint1 = vGen "faint" ;
lin fail1 = vGen "fail" ;
lin father1 = nNonhuman "father" ;
lin She1 = vGen "She" ;
lin Shechem1 = pnReg "Shechem" ;
lin Sarai1 = pnReg "Sarai" ;
lin Sarah1 = pnReg "Sarah" ;
lin Judah1 = pnReg "Judah" ;
lin Jacob1 = pnReg "Jacob" ;
lin Joseph1 = pnReg "Joseph" ;
lin dry1 = vGen "dry" ;
lin dress1 = vGen "dress" ;
lin dream1 = vGen "dream" ;
lin deliver1 = vGen "deliver" ;
lin desire1 = vGen "desire" ;
lin destroy1 = vGen "destroy" ;
lin depart1 = vGen "depart" ;
lin devour1 = vGen "devour" ;
lin do1 = mkAdj1 "do" ;
lin double1 = vGen "double" ;
lin day1 = nNonhuman "day" ;
lin dwell1 = vGen "dwell" ;
lin discern1 = vGen "discern" ;
lin distress1 = vGen "distress" ;
lin displease1 = vGen "displease" ;
lin divide1 = vGen "divide" ;
lin die1 = vGen "die" ;
lin bad1 = mkAdj1 "bad" ;
lin bless1 = vGen "bless" ;
lin build1 = vGen "build" ;
lin bury1 = vGen "bury" ;
lin brother1 = pnReg "brother" ;
lin breath1 = vGen "breath" ;
lin bow1 = vGen "bow" ;
lin be1 = vGen "be" ;
lin bed1 = pnReg "bed" ;
lin yield1 = vGen "yield" ;
lin young1 = mkAdj1 "young" ;
lin your1 = pnReg "your" ;
lin obey1 = vGen "obey" ;
lin open1 = vGen "open" ;
lin open2 = mkAdj1 "open" ;
lin on1 = mkAdj1 "on" ;
lin our1 = nNonhuman "our" ;
lin offer1 = vGen "offer" ;
lin turn1 = vGen "turn" ;
lin tarry1 = vGen "tarry" ;
lin till1 = mkAdj1 "till" ;
lin twenty1 = pnReg "twenty" ;
lin travail1 = vGen "travail" ;
lin touch1 = vGen "touch" ;
lin ten1 = pnReg "ten" ;
lin their1 = pnReg "their" ;
lin escape1 = vGen "escape" ;
lin establish1 = vGen "establish" ;
lin exceeding1 = mkAdj1 "exceeding" ;
lin enter1 = vGen "enter" ;
lin end1 = vGen "end" ;
lin eat1 = mkAdj1 "eat" ;
lin empty1 = vGen "empty" ;
lin embalm1 = vGen "embalm" ;
lin hard1 = mkAdj1 "hard" ;
lin hast1 = vGen "hast" ;
lin haste1 = vGen "haste" ;
lin hang1 = vGen "hang" ;
lin hate1 = vGen "hate" ;
lin hire1 = vGen "hire" ;
lin he1 = vGen "he" ;
lin hearken1 = vGen "hearken" ;
lin would1 = mkAdj1 "would" ;
lin worship1 = vGen "worship" ;
lin woman1 = pnReg "woman" ;
lin weary1 = vGen "weary" ;
lin well1 = nNonhuman "well" ;
lin went1 = mkAdj1 "went" ;
lin widow1 = pnReg "widow" ;
lin wicked1 = mkAdj1 "wicked" ;
lin wife1 = pnReg "wife" ;
lin wander1 = vGen "wander" ;
lin water1 = vGen "water" ;
lin walk1 = vGen "walk" ;
lin wash1 = vGen "wash" ;
lin pitch1 = vGen "pitch" ;
lin prosper1 = vGen "prosper" ;
lin preserve1 = vGen "preserve" ;
lin present1 = vGen "present" ;
lin prevail1 = vGen "prevail" ;
lin pray1 = vGen "pray" ;
lin plant1 = vGen "plant" ;
lin place1 = vGen "place" ;
lin part1 = vGen "part" ;
lin pass1 = vGen "pass" ;
lin pursue1 = vGen "pursue" ;
lin purchase1 = vGen "purchase" ;
lin appoint1 = vGen "appoint" ;
lin appear1 = vGen "appear" ;
lin accept1 = vGen "accept" ;
lin ask1 = vGen "ask" ;
lin ass1 = nNonhuman "ass" ;
lin ass2 = pnReg "ass" ;
lin another1 = pnReg "another" ;
lin answer1 = vGen "answer" ;
lin curse1 = vGen "curse" ;
lin circumcise1 = vGen "circumcise" ;
lin cry1 = vGen "cry" ;
lin cease1 = vGen "cease" ;
lin certain1 = mkAdj1 "certain" ;
lin change1 = vGen "change" ;
lin charge1 = vGen "charge" ;
lin children1 = pnReg "children" ;
lin cause1 = vGen "cause" ;
lin camel1 = nNonhuman "camel" ;
lin call1 = vGen "call" ;
lin carry1 = vGen "carry" ;
lin consume1 = vGen "consume" ;
lin conceive1 = vGen "conceive" ;
lin corrupt1 = vGen "corrupt" ;
lin couch1 = vGen "couch" ;
lin commune1 = vGen "commune" ;
lin command1 = vGen "command" ;
lin comfort1 = vGen "comfort" ;
lin increase1 = vGen "increase" ;
lin intreat1 = vGen "intreat" ;
lin interpret1 = vGen "interpret" ;
lin Nahor1 = pnReg "Nahor" ;
lin Noah1 = pnReg "Noah" ;
lin Esau1 = pnReg "Esau" ;
lin Ephraim1 = pnReg "Ephraim" ;
lin Egyptian1 = nNonhuman "Egyptian" ;
}

View File

@@ -0,0 +1,21 @@
N!nNonhuman: car cars |car's|cars'|
N!nNonhuman: bab/y babies |baby's|babies'|
N!nNonhuman: bos/s bosses |boss's|bosses'|
PN!pnReg: john john's *johns
Verb!vGen: walk walked
Verb!vGen: ja/m jammed
Verb!vGen: ra/p rapped
Verb!vGen: shar/e shared
Verb!vGen: sp/y spied
Verb!vGen: kis/s kissed
Adj!mkAdj1: slow |slowest|slowly|
Adj!mkAdj1: bi/g |biggest|bigly|
Adj!mkAdj1: happ/y |happiest|happily|
--
-- To do then:
-- grep fun koe >LexAbs.gf
-- grep lin koe >LexEng.gf
-- And prefix these files with
-- abstract LexAbs = Shallow ** {
-- --# -path=.:..:../../../prelude:../../abstract:../../english
-- concrete LexEng of LexAbs = ShallowEng ** open ParadigmsEng in {