forked from GitHub/gf-core
378 lines
12 KiB
Plaintext
378 lines
12 KiB
Plaintext
--# -path=.:prelude
|
|
|
|
concrete LexiconLat of Lexicon = CatLat ** open
|
|
ParadigmsLat,
|
|
-- IrregLat,
|
|
Prelude in {
|
|
|
|
flags
|
|
optimize=values ;
|
|
|
|
lin
|
|
-- airplane_N = mkN "airplane" ;
|
|
-- answer_V2S = mkV2S (regV "answer") toP ;
|
|
-- apartment_N = mkN "apartment" ;
|
|
-- apple_N = mkN "apple" ;
|
|
art_N = mkN "ars" ;
|
|
-- ask_V2Q = mkV2Q (regV "ask") noPrep ;
|
|
baby_N = mkN "infans" ;
|
|
bad_A = mkA "malus" ;
|
|
-- bank_N = mkN "bank" ;
|
|
beautiful_A = mkA "pulcher" ;
|
|
-- become_VA = mkVA (irregV "become" "became" "become") ;
|
|
beer_N = mkN "cerevisia" ;
|
|
-- beg_V2V = mkV2V (regDuplV "beg") noPrep toP ;
|
|
big_A = mkA "magnus" ;
|
|
-- bike_N = mkN "bike" ;
|
|
bird_N = mkN "avis" "avis" masculine ;
|
|
black_A = mkA "niger" ;
|
|
-- blue_A = regADeg "blue" ;
|
|
-- boat_N = mkN "boat" ;
|
|
book_N = mkN "liber" ;
|
|
-- boot_N = mkN "boot" ;
|
|
-- boss_N = mkN human (mkN "boss") ;
|
|
boy_N = mkN "liber" ;
|
|
bread_N = mkN "panis" "panis" masculine ;
|
|
break_V2 = mkV2 (mkV "rumpo" "rupi" "ruptum" "rumpere") ;
|
|
-- broad_A = regADeg "broad" ;
|
|
-- brother_N2 = mkN2 (mkN masculine (mkN "brother")) (mkPrep "of") ;
|
|
-- brown_A = regADeg "brown" ;
|
|
-- butter_N = mkN "butter" ;
|
|
-- buy_V2 = dirV2 (irregV "buy" "bought" "bought") ;
|
|
-- camera_N = mkN "camera" ;
|
|
-- cap_N = mkN "cap" ;
|
|
-- car_N = mkN "car" ;
|
|
-- carpet_N = mkN "carpet" ;
|
|
cat_N = mkN "felis" ;
|
|
-- ceiling_N = mkN "ceiling" ;
|
|
-- chair_N = mkN "chair" ;
|
|
-- cheese_N = mkN "cheese" ;
|
|
-- child_N = mk2N "child" "children" ;
|
|
-- church_N = mkN "church" ;
|
|
city_N = mkN "urbs" "urbis" feminine ;
|
|
-- clean_A = regADeg "clean" ;
|
|
-- clever_A = regADeg "clever" ;
|
|
-- close_V2 = dirV2 (regV "close") ;
|
|
-- coat_N = mkN "coat" ;
|
|
-- cold_A = regADeg "cold" ;
|
|
-- come_V = (irregV "come" "came" "come") ;
|
|
-- computer_N = mkN "computer" ;
|
|
-- country_N = mkN "country" ;
|
|
-- cousin_N = mkN human (mkN "cousin") ;
|
|
-- cow_N = mkN "cow" ;
|
|
-- die_V = (regV "die") ;
|
|
-- dirty_A = regADeg "dirty" ;
|
|
-- distance_N3 = mkN3 (mkN "distance") fromP toP ;
|
|
-- doctor_N = mkN human (mkN "doctor") ;
|
|
-- dog_N = mkN "dog" ;
|
|
-- door_N = mkN "door" ;
|
|
-- drink_V2 = dirV2 (irregV "drink" "drank" "drunk") ;
|
|
-- easy_A2V = mkA2V (regA "easy") forP ;
|
|
-- eat_V2 = dirV2 (irregV "eat" "ate" "eaten") ;
|
|
-- empty_A = regADeg "empty" ;
|
|
-- enemy_N = mkN "enemy" ;
|
|
-- factory_N = mkN "factory" ;
|
|
-- father_N2 = mkN2 (mkN masculine (mkN "father")) (mkPrep "of") ;
|
|
-- fear_VS = mkVS (regV "fear") ;
|
|
-- find_V2 = dirV2 (irregV "find" "found" "found") ;
|
|
-- fish_N = mk2N "fish" "fish" ;
|
|
-- floor_N = mkN "floor" ;
|
|
-- forget_V2 = dirV2 (irregDuplV "forget" "forgot" "forgotten") ;
|
|
-- fridge_N = mkN "fridge" ;
|
|
-- friend_N = mkN human (mkN "friend") ;
|
|
-- fruit_N = mkN "fruit" ;
|
|
-- fun_AV = mkAV (regA "fun") ;
|
|
-- garden_N = mkN "garden" ;
|
|
-- girl_N = mkN feminine (mkN "girl") ;
|
|
-- glove_N = mkN "glove" ;
|
|
gold_N = mkN "aurum" ;
|
|
good_A = mkA "bonus" ;
|
|
-- go_V = mk5V "go" "goes" "went" "gone" "going" ;
|
|
-- green_A = regADeg "green" ;
|
|
-- harbour_N = mkN "harbour" ;
|
|
-- hate_V2 = dirV2 (regV "hate") ;
|
|
-- hat_N = mkN "hat" ;
|
|
-- have_V2 = dirV2 (mk5V "have" "has" "had" "had" "having") ;
|
|
-- hear_V2 = dirV2 (irregV "hear" "heard" "heard") ;
|
|
-- hill_N = mkN "hill" ;
|
|
-- hope_VS = mkVS (regV "hope") ;
|
|
-- horse_N = mkN "horse" ;
|
|
-- hot_A = duplADeg "hot" ;
|
|
-- house_N = mkN "house" ;
|
|
-- important_A = compoundADeg (regA "important") ;
|
|
-- industry_N = mkN "industry" ;
|
|
-- iron_N = mkN "iron" ;
|
|
-- king_N = mkN masculine (mkN "king") ;
|
|
-- know_V2 = dirV2 (irregV "know" "knew" "known") ;
|
|
-- lake_N = mkN "lake" ;
|
|
-- lamp_N = mkN "lamp" ;
|
|
-- learn_V2 = dirV2 (regV "learn") ;
|
|
-- leather_N = mkN "leather" ;
|
|
-- leave_V2 = dirV2 (irregV "leave" "left" "left") ;
|
|
-- like_V2 = dirV2 (regV "like") ;
|
|
-- listen_V2 = prepV2 (regV "listen") toP ;
|
|
-- live_V = (regV "live") ;
|
|
-- long_A = regADeg "long" ;
|
|
-- lose_V2 = dirV2 (irregV "lose" "lost" "lost") ;
|
|
love_N = mkN "amor" ;
|
|
love_V2 = mkV2 "amare" ;
|
|
-- man_N = mkN masculine (mk2N "man" "men") ;
|
|
-- married_A2 = mkA2 (regA "married") toP ;
|
|
-- meat_N = mkN "meat" ;
|
|
-- milk_N = mkN "milk" ;
|
|
-- moon_N = mkN "moon" ;
|
|
-- mother_N2 = mkN2 (mkN feminine (mkN "mother")) (mkPrep "of") ;
|
|
-- mountain_N = mkN "mountain" ;
|
|
-- music_N = mkN "music" ;
|
|
-- narrow_A = regADeg "narrow" ;
|
|
-- new_A = regADeg "new" ;
|
|
-- newspaper_N = mkN "newspaper" ;
|
|
-- oil_N = mkN "oil" ;
|
|
-- old_A = regADeg "old" ;
|
|
-- open_V2 = dirV2 (regV "open") ;
|
|
-- paint_V2A = mkV2A (regV "paint") noPrep ;
|
|
-- paper_N = mkN "paper" ;
|
|
-- paris_PN = mkPN (mkN nonhuman (mkN "Paris")) ;
|
|
-- peace_N = mkN "peace" ;
|
|
-- pen_N = mkN "pen" ;
|
|
-- planet_N = mkN "planet" ;
|
|
-- plastic_N = mkN "plastic" ;
|
|
-- play_V2 = dirV2 (regV "play") ;
|
|
-- policeman_N = mkN masculine (mkN "policeman" "policemen") ;
|
|
-- priest_N = mkN human (mkN "priest") ;
|
|
-- probable_AS = mkAS (regA "probable") ;
|
|
-- queen_N = mkN feminine (mkN "queen") ;
|
|
-- radio_N = mkN "radio" ;
|
|
-- rain_V0 = mkV0 (regV "rain") ;
|
|
-- read_V2 = dirV2 (irregV "read" "read" "read") ;
|
|
-- red_A = duplADeg "red" ;
|
|
-- religion_N = mkN "religion" ;
|
|
-- restaurant_N = mkN "restaurant" ;
|
|
-- river_N = mkN "river" ;
|
|
-- rock_N = mkN "rock" ;
|
|
-- roof_N = mkN "roof" ;
|
|
-- rubber_N = mkN "rubber" ;
|
|
-- run_V = (irregDuplV "run" "ran" "run") ;
|
|
-- say_VS = mkVS (irregV "say" "said" "said") ;
|
|
-- school_N = mkN "school" ;
|
|
-- science_N = mkN "science" ;
|
|
-- sea_N = mkN "sea" ;
|
|
-- seek_V2 = dirV2 (irregV "seek" "sought" "sought") ;
|
|
-- see_V2 = dirV2 (irregV "see" "saw" "seen") ;
|
|
-- sell_V3 = dirV3 (irregV "sell" "sold" "sold") toP ;
|
|
-- send_V3 = dirV3 (irregV "send" "sent" "sent") toP ;
|
|
-- sheep_N = mk2N "sheep" "sheep" ;
|
|
-- ship_N = mkN "ship" ;
|
|
-- shirt_N = mkN "shirt" ;
|
|
-- shoe_N = mkN "shoe" ;
|
|
-- shop_N = mkN "shop" ;
|
|
-- short_A = regADeg "short" ;
|
|
-- silver_N = mkN "silver" ;
|
|
-- sister_N = mkN2 (mkN feminine (mkN "sister")) (mkPrep "of") ;
|
|
sleep_V = mkV "dormio" "dormivi" "dormitus" "dormire" ;
|
|
-- small_A = regADeg "small" ;
|
|
-- snake_N = mkN "snake" ;
|
|
-- sock_N = mkN "sock" ;
|
|
-- speak_V2 = dirV2 (irregV "speak" "spoke" "spoken") ;
|
|
-- star_N = mkN "star" ;
|
|
-- steel_N = mkN "steel" ;
|
|
-- stone_N = mkN "stone" ;
|
|
-- stove_N = mkN "stove" ;
|
|
-- student_N = mkN human (mkN "student") ;
|
|
-- stupid_A = regADeg "stupid" ;
|
|
-- sun_N = mkN "sun" ;
|
|
-- switch8off_V2 = dirV2 (partV (regV "switch") "off") ;
|
|
-- switch8on_V2 = dirV2 (partV (regV "switch") "on") ;
|
|
-- table_N = mkN "table" ;
|
|
-- talk_V3 = mkV3 (regV "talk") toP aboutP ;
|
|
-- teacher_N = mkN human (mkN "teacher") ;
|
|
-- teach_V2 = dirV2 (irregV "teach" "taught" "taught") ;
|
|
-- television_N = mkN "television" ;
|
|
-- thick_A = regADeg "thick" ;
|
|
-- thin_A = duplADeg "thin" ;
|
|
-- train_N = mkN "train" ;
|
|
-- travel_V = (regDuplV "travel") ;
|
|
-- tree_N = mkN "tree" ;
|
|
-- ---- trousers_N = mkN "trousers" ;
|
|
-- ugly_A = regADeg "ugly" ;
|
|
-- understand_V2 = dirV2 (irregV "understand" "understood" "understood") ;
|
|
-- university_N = mkN "university" ;
|
|
-- village_N = mkN "village" ;
|
|
-- wait_V2 = prepV2 (regV "wait") forP ;
|
|
-- walk_V = (regV "walk") ;
|
|
-- warm_A = regADeg "warm" ;
|
|
-- war_N = mkN "war" ;
|
|
-- watch_V2 = dirV2 (regV "watch") ;
|
|
-- water_N = mkN "water" ;
|
|
-- white_A = regADeg "white" ;
|
|
-- window_N = mkN "window" ;
|
|
-- wine_N = mkN "wine" ;
|
|
-- win_V2 = dirV2 (irregDuplV "win" "won" "won") ;
|
|
-- woman_N = mkN feminine (mk2N "woman" "women") ;
|
|
-- wonder_VQ = mkVQ (regV "wonder") ;
|
|
-- wood_N = mkN "wood" ;
|
|
-- write_V2 = dirV2 (irregV "write" "wrote" "written") ;
|
|
-- yellow_A = regADeg "yellow" ;
|
|
-- young_A = regADeg "young" ;
|
|
--
|
|
-- do_V2 = dirV2 (mk5V "do" "does" "did" "done" "doing") ;
|
|
-- now_Adv = mkAdv "now" ;
|
|
-- already_Adv = mkAdv "already" ;
|
|
-- song_N = mkN "song" ;
|
|
-- add_V3 = dirV3 (regV "add") toP ;
|
|
-- number_N = mkN "number" ;
|
|
-- put_V2 = prepV2 (irregDuplV "put" "put" "put") noPrep ;
|
|
-- stop_V = regDuplV "stop" ;
|
|
-- jump_V = regV "jump" ;
|
|
--
|
|
-- left_Ord = ss "left" ;
|
|
-- right_Ord = ss "right" ;
|
|
-- far_Adv = mkAdv "far" ;
|
|
-- correct_A = (regA "correct") ;
|
|
-- dry_A = regA "dry" ;
|
|
-- dull_A = regA "dull" ;
|
|
-- full_A = regA "full" ;
|
|
-- heavy_A = regA "heavy" ;
|
|
-- near_A = regA "near" ;
|
|
-- rotten_A = (regA "rotten") ;
|
|
-- round_A = regA "round" ;
|
|
-- sharp_A = regA "sharp" ;
|
|
-- smooth_A = regA "smooth" ;
|
|
-- straight_A = regA "straight" ;
|
|
-- wet_A = regA "wet" ; ----
|
|
-- wide_A = regA "wide" ;
|
|
-- animal_N = mkN "animal" ;
|
|
-- ashes_N = mkN "ash" ; -- FIXME: plural only?
|
|
-- back_N = mkN "back" ;
|
|
-- bark_N = mkN "bark" ;
|
|
-- belly_N = mkN "belly" ;
|
|
-- blood_N = mkN "blood" ;
|
|
-- bone_N = mkN "bone" ;
|
|
-- breast_N = mkN "breast" ;
|
|
-- cloud_N = mkN "cloud" ;
|
|
-- day_N = mkN "day" ;
|
|
-- dust_N = mkN "dust" ;
|
|
-- ear_N = mkN "ear" ;
|
|
-- earth_N = mkN "earth" ;
|
|
-- egg_N = mkN "egg" ;
|
|
-- eye_N = mkN "eye" ;
|
|
-- fat_N = mkN "fat" ;
|
|
-- feather_N = mkN "feather" ;
|
|
-- fingernail_N = mkN "fingernail" ;
|
|
-- fire_N = mkN "fire" ;
|
|
-- flower_N = mkN "flower" ;
|
|
-- fog_N = mkN "fog" ;
|
|
-- foot_N = mk2N "foot" "feet" ;
|
|
-- forest_N = mkN "forest" ;
|
|
-- grass_N = mkN "grass" ;
|
|
-- guts_N = mkN "gut" ; -- FIXME: no singular
|
|
-- hair_N = mkN "hair" ;
|
|
-- hand_N = mkN "hand" ;
|
|
-- head_N = mkN "head" ;
|
|
-- heart_N = mkN "heart" ;
|
|
-- horn_N = mkN "horn" ;
|
|
-- husband_N = mkN masculine (mkN "husband") ;
|
|
-- ice_N = mkN "ice" ;
|
|
-- knee_N = mkN "knee" ;
|
|
-- leaf_N = mk2N "leaf" "leaves" ;
|
|
-- leg_N = mkN "leg" ;
|
|
-- liver_N = mkN "liver" ;
|
|
-- louse_N = mk2N "louse" "lice" ;
|
|
-- mouth_N = mkN "mouth" ;
|
|
-- name_N = mkN "name" ;
|
|
-- neck_N = mkN "neck" ;
|
|
-- night_N = mkN "night" ;
|
|
-- nose_N = mkN "nose" ;
|
|
-- person_N = mkN human (mkN "person") ;
|
|
-- rain_N = mkN "rain" ;
|
|
-- road_N = mkN "road" ;
|
|
-- root_N = mkN "root" ;
|
|
-- rope_N = mkN "rope" ;
|
|
-- salt_N = mkN "salt" ;
|
|
-- sand_N = mkN "sand" ;
|
|
-- seed_N = mkN "seed" ;
|
|
-- skin_N = mkN "skin" ;
|
|
-- sky_N = mkN "sky" ;
|
|
-- smoke_N = mkN "smoke" ;
|
|
-- snow_N = mkN "snow" ;
|
|
-- stick_N = mkN "stick" ;
|
|
-- tail_N = mkN "tail" ;
|
|
-- tongue_N = mkN "tongue" ;
|
|
-- tooth_N = mk2N "tooth" "teeth" ;
|
|
-- wife_N = mkN feminine (mk2N "wife" "wives") ;
|
|
-- wind_N = mkN "wind" ;
|
|
-- wing_N = mkN "wing" ;
|
|
-- worm_N = mkN "worm" ;
|
|
-- year_N = mkN "year" ;
|
|
-- blow_V = IrregLat.blow_V ;
|
|
-- breathe_V = dirV2 (regV "breathe") ;
|
|
-- burn_V = IrregLat.burn_V ;
|
|
-- dig_V = IrregLat.dig_V ;
|
|
-- fall_V = IrregLat.fall_V ;
|
|
-- float_V = regV "float" ;
|
|
-- flow_V = regV "flow" ;
|
|
-- fly_V = IrregLat.fly_V ;
|
|
-- freeze_V = IrregLat.freeze_V ;
|
|
-- give_V3 = dirV3 give_V toP ;
|
|
-- laugh_V = regV "laugh" ;
|
|
-- lie_V = IrregLat.lie_V ;
|
|
-- play_V = regV "play" ;
|
|
-- sew_V = IrregLat.sew_V ;
|
|
-- sing_V = IrregLat.sing_V ;
|
|
-- sit_V = IrregLat.sit_V ;
|
|
-- smell_V = regV "smell" ;
|
|
-- spit_V = IrregLat.spit_V ;
|
|
-- stand_V = IrregLat.stand_V ;
|
|
-- swell_V = IrregLat.swell_V ;
|
|
-- swim_V = IrregLat.swim_V ;
|
|
-- think_V = IrregLat.think_V ;
|
|
-- turn_V = regV "turn" ;
|
|
-- vomit_V = regV "vomit" ;
|
|
--
|
|
-- bite_V2 = dirV2 IrregLat.bite_V ;
|
|
-- count_V2 = dirV2 (regV "count") ;
|
|
-- cut_V2 = dirV2 IrregLat.cut_V ;
|
|
-- fear_V2 = dirV2 (regV "fear") ;
|
|
-- fight_V2 = dirV2 fight_V ;
|
|
-- hit_V2 = dirV2 hit_V ;
|
|
-- hold_V2 = dirV2 hold_V ;
|
|
-- hunt_V2 = dirV2 (regV "hunt") ;
|
|
-- kill_V2 = dirV2 (regV "kill") ;
|
|
-- pull_V2 = dirV2 (regV "pull") ;
|
|
-- push_V2 = dirV2 (regV "push") ;
|
|
-- rub_V2 = dirV2 (regDuplV "rub") ;
|
|
-- scratch_V2 = dirV2 (regV "scratch") ;
|
|
-- split_V2 = dirV2 split_V ;
|
|
-- squeeze_V2 = dirV2 (regV "squeeze") ;
|
|
-- stab_V2 = dirV2 (regDuplV "stab") ;
|
|
-- suck_V2 = dirV2 (regV "suck") ;
|
|
-- throw_V2 = dirV2 throw_V ;
|
|
-- tie_V2 = dirV2 (regV "tie") ;
|
|
-- wash_V2 = dirV2 (regV "wash") ;
|
|
-- wipe_V2 = dirV2 (regV "wipe") ;
|
|
--
|
|
---- other_A = regA "other" ;
|
|
--
|
|
-- grammar_N = mkN "grammar" ;
|
|
-- language_N = mkN "language" ;
|
|
-- rule_N = mkN "rule" ;
|
|
--
|
|
---- added 4/6/2007
|
|
-- john_PN = mkPN (mkN masculine (mkN "John")) ;
|
|
-- question_N = mkN "question" ;
|
|
-- ready_A = regA "ready" ;
|
|
-- reason_N = mkN "reason" ;
|
|
-- today_Adv = mkAdv "today" ;
|
|
-- uncertain_A = regA "uncertain" ;
|
|
--
|
|
--oper
|
|
-- aboutP = mkPrep "about" ;
|
|
-- atP = mkPrep "at" ;
|
|
-- forP = mkPrep "for" ;
|
|
-- fromP = mkPrep "from" ;
|
|
-- inP = mkPrep "in" ;
|
|
-- onP = mkPrep "on" ;
|
|
-- toP = mkPrep "to" ;
|
|
--
|
|
}
|