1
0
forked from GitHub/gf-rgl

copy files over from GF-latin

This commit is contained in:
Herbert Lange
2019-01-14 16:40:07 +01:00
parent 579bdfcca5
commit 58c8cf70ea
492 changed files with 6213807 additions and 809 deletions
+42 -40
View File
@@ -19,19 +19,21 @@ concrete LexiconLat of Lexicon = CatLat ** open
NounLat,
AdjectiveLat,
VerbLat,
Prelude in {
Prelude,
ExtraLat
in {
flags
optimize=values ;
coding = utf8;
lin
airplane_N = mkN "aeroplanum" ; -- -i n. (http://la.wikipedia.org/wiki/A%C3%ABroplanum / Pons)
answer_V2S = mkV2S ( mkV "respondere" ) R.Dat_Prep ; -- -spondeo, -spondi, -sponsum 2 (Langenscheidts) alicui; ad, contra, adversus aliquid (Stowasser)
answer_V2S = mkV2S ( mkV "respondere" ) Dat_Prep ; -- -spondeo, -spondi, -sponsum 2 (Langenscheidts) alicui; ad, contra, adversus aliquid (Stowasser)
apartment_N = mkN "domicilium" ; -- -i n. (Langenscheidts)
apple_N = mkN "malum" ; -- -i n. (Langenscheidts)
art_N = mkN "ars" "artis" feminine ; -- Ranta; artis f. (Langenscheidts)
ask_V2Q = mkV2Q ( mkV "rogare" ) R.Acc_Prep ; -- rogo 1 (Langenscheidts) aliquem aliquid (Stowasser)
baby_N = mkN "infans" "infantis" ( variants { feminine ; masculine } ); -- Ranta; -antis m./f. (Langenscheidts)
ask_V2Q = mkV2Q ( mkV "rogare" ) Acc_Prep ; -- rogo 1 (Langenscheidts) aliquem aliquid (Stowasser)
baby_N = mkN "infans" "infantis" masculine ; -- Ranta; -antis m./f. (Langenscheidts)
bad_A = mkA "malus" ; -- Ranta; peior, pessimus 3 (Langenscheidts)
bank_N = mkN "argentaria" ; -- -ae f. (http://la.wikipedia.org/wiki/Argentaria / Pons)
beautiful_A = mkA "pulcher" ; -- -chra, -chrum (Langenscheidts)
@@ -42,16 +44,16 @@ lin
bike_N = mkN "birota" ; -- -ae f. (http://la.wikipedia.org/wiki/Birota / Pons)
bird_N = mkN "avis" "avis" feminine ; -- Ranta; -is f. (Langenscheidts)
black_A = mkA "niger" ; -- Ranta; -gra, -grum (Langenscheidts)
blue_A = mkA ( variants { "caeruleus" ; "caerulus" } ) ; -- 3 (Langenscheidts)
blue_A = mkA "caerulus" ; -- 3 (Langenscheidts)
boat_N = mkN "navicula" ; -- -ae f. (Langenscheidts)
book_N = mkN "liber"; -- Ranta; -bri m. (Langenscheidts)
boot_N = mkN "calceus" ; -- -i m. (Langenscheidts)
boss_N = mkN "dux" "ducis" ( variants { feminine ; masculine } ) ; -- ducis m./f. (Langenscheidts)
boss_N = mkN "dux" "ducis" masculine ; -- ducis m./f. (Langenscheidts)
boy_N = mkN "puer" "pueri" masculine ; -- -eri m. (Langenscheidts)
bread_N = variants { (mkN "panis" "panis" masculine ) ; (mkN "pane" "panis" neuter ) } ; -- -is m./n. (Langenscheidts)
bread_N = mkN "panis" "panis" masculine ; -- -is m./n. (Langenscheidts)
break_V2 = mkV2 ( mkV "rumpere" "rumpo" "rupi" "ruptum" ) ; -- Ranta; 3 (Langenscheidts) aliquem (Bayer-Lindauer 110)
broad_A = mkA "latus" ; -- 3 (Langenscheidts)
brother_N2 = mkN2 ( mkN "frater" "fratris" masculine ) R.Gen_Prep; -- -tris m. (Langenscheidts) alicuius (Bayer-Lindauer 125.2)
brother_N2 = mkN2 ( mkN "frater" "fratris" masculine ) Gen_Prep; -- -tris m. (Langenscheidts) alicuius (Bayer-Lindauer 125.2)
brown_A = mkA "fulvus" ; -- 3 (Langenscheidts)
butter_N = mkN "butyrum" ; -- -i n. (http://la.wikipedia.org/wiki/Butyrum / Pons)
buy_V2 = mkV2 (mkV "emere") ; -- emo, emi, emptum 3 (Langenscheidts) (Stowasser) ab, de aliquo (Stowasser)
@@ -60,7 +62,7 @@ lin
cap_N = mkN "galerus" ; -- -i m. (Langenscheidts)
car_N = mkN "autoreada" ; -- -ae f. (Pons / http://la.wikipedia.org/wiki/Autocinetum)
carpet_N = mkN "stragulum" ; -- -i n. (Pons / http://la.wikipedia.org/wiki/Teges_pavimenti)
cat_N = mkN ( variants {"feles" ; "felis" } ) "felis" feminine ; -- -is f. (Langenscheidts)
cat_N = mkN "feles" "felis" feminine ; -- -is f. (Langenscheidts)
ceiling_N = mkN "tegimentum" ; -- -i n. (Langenscheidts)
chair_N = mkN "sedes" "sedis" feminine; -- -is f. (Langenscheidts)
cheese_N = mkN "caseus" ; -- -i m. (Langenscheidts)
@@ -75,29 +77,29 @@ lin
come_V = mkV "venire" ; -- veno, veni, ventum 4 (Langenscheidts)
computer_N = mkN "computatrum" ; -- -i n. (http://la.wikipedia.org/wiki/Computatrum / Pons)
country_N = mkN "terra" ; -- -ae f. (Langenscheidts)
cousin_N = mkN ( variants {"consobrinus" ; "consobrina" } ) ; -- -i/-ae m./f. (Langenscheidts)
cow_N = mkN "bos" "bovis" ( variants { feminine ; masculine } ) ; -- bovis (gen. pl. boum, dat./abl. pl. bobus/bubus) m./f. (Langenscheidts)
cousin_N = mkN "consobrinus" ; -- -i/-ae m./f. (Langenscheidts)
cow_N = mkN "bos" "bovis" masculine ; -- bovis (gen. pl. boum, dat./abl. pl. bobus/bubus) m./f. (Langenscheidts)
die_V = mkV "mori" "mortuus" "morturus"; -- morior, mortuus sum, morturus (Langenscheidts)
dirty_A = mkA "sordidus" ; -- 3 (Langenscheidts)
distance_N3 = mkN3 (mkN "distantia") from_Prep to_Prep ; -- -ae f. (Langenscheidts) ab, ad aliquem; alicuius; aliquem (???)
doctor_N = mkN "medicus" ; -- -i m. (Langenscheidts)
dog_N = mkN "canis" "canis" ( variants { masculine ; feminine } ) ; -- -is m./f. (Langenscheidts)
dog_N = mkN "canis" "canis" masculine ; -- -is m./f. (Langenscheidts)
door_N = mkN "porta" ; -- -ae f. (Langenscheidts)
drink_V2 = mkV2 (mkV "bibere") ; -- bibo, potum 3 (Langenscheidts) aliquem (Bayer-Lindauer 110)
easy_A2V = mkA2V (mkA "facilis" "facile" ) for_Prep ; -- -e sup -illimus (Langenscheidts)
eat_V2 = mkV2 (mkV "cenare") ; -- ceno 1 (Langenscheidts) aliquem (Bayer-Lindauer 110)
empty_A = mkA "vacuus" ; -- 3 (Langenscheidts)
enemy_N = mkN "hostis" "hostis" ( variants { masculine ; feminine } ) ; -- -is m./f. (Langenscheidts)
enemy_N = mkN "hostis" "hostis" masculine ; -- -is m./f. (Langenscheidts)
factory_N = mkN "officina" ; -- -ae f. (Langenscheidts)
father_N2 = mkN2 (mkN "pater" "patris" masculine ) R.Gen_Prep ; -- -tris m. gen pl -um (Langenscheidts) alicuius (Bayer-Lindauer 125.2)
father_N2 = mkN2 (mkN "pater" "patris" masculine ) Gen_Prep ; -- -tris m. gen pl -um (Langenscheidts) alicuius (Bayer-Lindauer 125.2)
fear_VS = mkVS (mkV "timere") ; -- timeo, timui, --- 2 (Langenscheidts)
find_V2 = mkV2 (mkV "reperire") ; -- reperio, repperi, repertum 4 (Langenscheidts) aliquem
fish_N = mkN "piscis" "piscis" masculine ; -- -is m. (Langenscheidts)
floor_N = mkN "pavimentum" ; -- -i n. (Langenscheidts)
forget_V2 = mkV2 (mkV "oblivisci" "obliviscor" "oblitus" ) ; -- obliscor, oblitus sum 3 (Langenscheidts)
fridge_N = mkN "frigidarium" ; -- --i n. (Pons / http://la.wikipedia.org/wiki/Armarium_frigidarium)
friend_N = mkN ( variants { "amicus" ; "amica" } ) ; -- -i/-ae m./f. (Langenscheidts)
friend_N = mkN "amicus" ; -- -i/-ae m./f. (Langenscheidts)
fruit_N = mkN "fructus" "fructus" masculine; -- -us m. (Langenscheidts)
fun_AV = mkAV (mkA "iocosus") ; -- 3 (Langenscheidts)
garden_N = mkN "hortus" ; -- -i m. (Langenscheidts)
@@ -108,7 +110,7 @@ lin
go_V = IrregLat.go_V ; -- eo, i(v)i, itum (Langenscheidts)
green_A = mkA "viridis" "viride"; -- -e (Langenscheidts)
harbour_N = mkN "portus" "portus" masculine ; -- -us m. (Langenscheidts)
hate_V2 = mkV2 IrregLat.hate_V R.Acc_Prep ; -- odi, osurus/odivi (Langenscheidts)
hate_V2 = mkV2 IrregLat.hate_V Acc_Prep ; -- odi, osurus/odivi (Langenscheidts)
hat_N = mkN "petasus" ; -- -i m. (Langenscheidts)
hear_V2 = mkV2 (mkV "audire") ; -- 4 (Langenscheidts)
hill_N = mkN "collis" "collis" masculine ; -- -is m. (Langenscheidts)
@@ -141,7 +143,7 @@ lin
meat_N = mkN "carnis" "carnis" feminine ; -- -is f. (Langenscheidts)
milk_N = mkN "lac" "lactis" neuter ; -- -- lactis n. (Langenscheidts)
moon_N = mkN "luna" ; -- -ae f. (Langenscheidts)
mother_N2 = mkN2 ( mkN "mater" "matris" feminine ) R.Gen_Prep ; -- matris f. (Langenscheidts)
mother_N2 = mkN2 ( mkN "mater" "matris" feminine ) Gen_Prep ; -- matris f. (Langenscheidts)
mountain_N = mkN "mons" "montis" masculine ; -- montis m. (Langenscheidts)
music_N = mkN "musica" ; -- -ae f. L..
narrow_A = mkA "angustus" ; -- 3 (Langenscheidts)
@@ -150,7 +152,7 @@ lin
oil_N = mkN "oleum" ; -- -i n. (Langenscheidts)
old_A = mkA "vetus" "veteris"; -- (Langenscheidts)
open_V2 = mkV2 (mkV "aperire") ; -- aperio, aperui, apertum 4 (Langenscheidts)
paint_V2A = mkV2A (mkV "pingere" "pingo" "pinxi" "pictum" ) R.Acc_Prep ; -- pingo, pinxi, pictum 3 (Langenscheidts)
paint_V2A = mkV2A (mkV "pingere" "pingo" "pinxi" "pictum" ) Acc_Prep ; -- pingo, pinxi, pictum 3 (Langenscheidts)
paper_N = mkN "charta" ; -- -ae f. (http://la.wikipedia.org/wiki/Charta / Pons)
paris_PN = mkPN (mkN "Lutetia") ; -- -ae f. (http://la.wikipedia.org/wiki/Lutetia)
peace_N = mkN "pax" "pacis" feminine ; -- pacis f. (Langenscheidts)
@@ -158,8 +160,8 @@ lin
planet_N = mkN "planeta" ; -- -ae m. (http://la.wikipedia.org/wiki/Planeta)
plastic_N = mkN "plastica" "plasticae" feminine ; -- -ae f. (http://la.wikipedia.org/wiki/Plasticum)
play_V2 = mkV2 (mkV "ludere") ; -- ludo, lusi, lusum 3 (Langenscheidts)
policeman_N = mkN "custos" "custodis" ( variants { masculine ; feminine } ) ; -- -odis m./f. (Langenscheidts)
priest_N = mkN "sacerdos" "sacerdotis" ( variants { masculine ; feminine } ) ; -- -dotis m./f. (Langenscheidts)
policeman_N = mkN "custos" "custodis" masculine ; -- -odis m./f. (Langenscheidts)
priest_N = mkN "sacerdos" "sacerdotis" masculine ; -- -dotis m./f. (Langenscheidts)
probable_AS = mkAS (mkA "verisimilis" "verisimile") ; -- -e (Langenscheidts)
queen_N = mkN "regina" ; -- -ae f. (Langenscheidts)
radio_N = mkN "radiophonum" ; -- -i n. (Pons / http://la.wikipedia.org/wiki/Radiophonia)
@@ -180,8 +182,8 @@ lin
sea_N = mkN "mare" "maris" neuter ; -- -is n. (Langenscheidts)
seek_V2 = mkV2 (mkV "quaerere" "quaero" "quaesivi" "quaesitum" ) ; -- quaero, quaesivi, quaesitum 3 (Langenscheidts)
see_V2 = mkV2 (mkV "videre") ; -- video, vidi, visum 2 (Langenscheidts)
sell_V3 = mkV3 ( mkV "vendere" "vendo" "vendidi" "venditum" ) R.Acc_Prep R.Dat_Prep ; -- vendo, vendidi, venditum 3 (Langenscheidts)
send_V3 = mkV3 ( mkV "mittere" "mitto" "misi" "missum" ) R.Acc_Prep R.Dat_Prep ; -- mitto, misi, missum 3 (Langenscheidts)
sell_V3 = mkV3 ( mkV "vendere" "vendo" "vendidi" "venditum" ) Acc_Prep Dat_Prep ; -- vendo, vendidi, venditum 3 (Langenscheidts)
send_V3 = mkV3 ( mkV "mittere" "mitto" "misi" "missum" ) Acc_Prep Dat_Prep ; -- mitto, misi, missum 3 (Langenscheidts)
sheep_N = mkN "ovis" "ovis" feminine ; -- -is f. (Langenscheidts)
ship_N = mkN "navis" "navis" feminine ; -- -is f. acc. -em (-im) abl meist -i (Langenscheidts)
shirt_N = mkN "tunica" ; -- -ae f. (Langenscheidts)
@@ -193,20 +195,20 @@ lin
-- sleep_V = mkV "dormio" "dormivi" "dormitus" "dormire" ; -- Ranta;
sleep_V = mkV "dormire" ; -- 4 (Langenscheidts)
small_A = mkA "parvus" ; -- 3 (Langenscheidts)
snake_N = mkN "serpens" "serpentis" ( variants { masculine ; feminine } ) ; -- -entis m./f. (Langenscheidts)
snake_N = mkN "serpens" "serpentis" masculine ; -- -entis m./f. (Langenscheidts)
sock_N = mkN "impile" "impilis" masculine ; -- -is n. (Pons)
speak_V2 = mkV2 (mkV "loqui" "loquor" "locutus" ) ; -- loquor, locutus sum 3 (Langenscheidts)
star_N = mkN "stella" ; -- -ae f. (Langenscheidts)
steel_N = mkN "chalybs" "chalybis" masculine ; -- chalybis m. (Langenscheidts)
stone_N = mkN "lapis" "lapidis" masculine ; -- -idis m. (Langenscheidts)
stove_N = mkN "fornax" "formacis" feminine ; -- -acis f. (Langenscheidts)
student_N = mkN ( variants { "discipulus"; "discipula" } ) ; -- -i/-ae m./f. (Langenscheidts)
student_N = mkN "discipulus"; -- -i/-ae m./f. (Langenscheidts)
stupid_A = mkA "stultus" ; -- 3 (Langenscheidts)
sun_N = mkN "sol" "solis" masculine ; -- solis m. (Langenscheidts)
switch8off_V2 = mkV2 (mkV "accendere") ; -- -cendo, -cendi, -censum 3 (Langenscheidts)
switch8on_V2 = mkV2 (mkV ( variants { "exstinguere" ; "extinguere" } ) ); -- -ingo, -inxi, -inctum 3 (Langenscheidts)
switch8on_V2 = mkV2 (mkV "extinguere" ); -- -ingo, -inxi, -inctum 3 (Langenscheidts)
table_N = mkN "mensa" ; -- -ae f. (Langenscheidts)
talk_V3 = mkV3 ( lin V speak_V2 ) R.Dat_Prep R.Acc_Prep ;
talk_V3 = mkV3 ( lin V speak_V2 ) Dat_Prep Acc_Prep ;
teacher_N = mkN "magister" "magistri" masculine ; -- -tri m. (Langenscheidts)
teach_V2 = mkV2 (mkV "docere") ; -- doceo, docui, doctum 2 (Langenscheidts)
television_N = mkN "televisio" "televisionis" feminine ; -- -onis f. (Pons)
@@ -230,7 +232,7 @@ lin
white_A = mkA "albus" ; -- 3 (Langenscheidts)
window_N = mkN "fenestra" ; -- -ae f. (Langenscheidts)
wine_N = mkN "vinum" ; -- -i n. (Langenscheidts)
win_V2 = mkV2 (mkV "vincere") ; -- vinco, vici, victum 3 (Langenscheidts)
win_V2 = mkV2 (mkV "vincere" "vinco" "vinxi" "victum") ; -- vinco, vici, victum 3 (Langenscheidts)
woman_N = mkN "femina" ; -- -ae f. (Langenscheidts)
wonder_VQ = mkVQ (mkV "mirari") ; -- 1 (Langenscheidts)
wood_N = mkN "lignum" ; -- -i n. (Langenscheidts)
@@ -242,14 +244,14 @@ lin
now_Adv = mkAdv "nunc" ; -- (Langenscheidts)
already_Adv = mkAdv "iam" ; -- (Langenscheidts)
song_N = mkN "carmen" "carminis" neuter ; -- -inis n. (Langenscheidts)
add_V3 = mkV3 ( mkV "addere" "addo" "addidi" "additum" ) R.Acc_Prep R.to_P ; -- addo, addidi, additum 3 (Langenscheidts)
add_V3 = mkV3 ( mkV "addere" "addo" "addidi" "additum" ) Acc_Prep to_Prep ; -- addo, addidi, additum 3 (Langenscheidts)
number_N = mkN "numerus" ; -- -i m.
put_V2 = mkV2 (mkV "ponere" "pono" "posui" "positum" ) ; -- pono, posui, positum 3 (Langenscheidts)
stop_V = mkV "sistere" "sisto" "steti" "statum" ; -- sisto, stiti/steti, statum 3 (Langenscheidts)
jump_V = mkV "saltare" ; -- 1 (Langenscheidts)
left_Ord = ss "sinister" ; -- -tra, -trum (Langenscheidts)
right_Ord = ss "dexter" ; -- -t(e)ra, -t(e)rum (Langenscheidts)
left_Ord = lin Ord { s = \\g,n,c => (mkA "sinister").s ! R.Posit ! R.Ag g n c } ; -- -tra, -trum (Langenscheidts)
right_Ord = lin Ord { s = \\g,n,c => (mkA "dexter").s ! R.Posit ! R.Ag g n c } ; -- -t(e)ra, -t(e)rum (Langenscheidts)
far_Adv = mkAdv "longe" ; -- (Langenscheidts)
correct_A = mkA "rectus" ; -- 3 (Langenscheidts)
dry_A = mkA "aridus" ; -- 3 (Langenscheidts)
@@ -267,13 +269,13 @@ lin
animal_N = mkN "animal" "animalis" neuter ; -- -alis n. (Langenscheidts)
ashes_N = mkN "cinis" "cineris" masculine ; -- -eris m. (Langenscheidts) & Bayer-Lindauer 33 1.2
back_N = mkN "tergum" ; -- -i n. (Langenscheidts)
bark_N = mkN "cortex" "corticis" ( variants { masculine ; feminine } ) ; -- -icis m./(f.) (Langenscheidts)
bark_N = mkN "cortex" "corticis" masculine ; -- -icis m./(f.) (Langenscheidts)
belly_N = mkN "venter" "ventris" masculine ; -- -tris m. (Langenscheidts)
blood_N = variants { mkN "sanguis" "sanguinis" masculine ; mkN "sangis" "sanginis" masculine} ; -- -inis m. (Langenscheidts)
blood_N = mkN "sanguis" "sanguinis" masculine ; -- -inis m. (Langenscheidts)
bone_N = mkN "os" "ossis" neuter ; -- ossis n. (Langenscheidts)
breast_N = mkN "pectus""pectoris" neuter ; -- pectoris n. (Langenscheidts)
cloud_N = mkN "nubes" "nubis" feminine ; -- -is f. (Langenscheidts)
day_N = mkN "dies" "diei" ( variants { masculine ; feminine } ) ; -- -ei m./f. (Langenscheidts)
day_N = mkN "dies" "diei" masculine ; -- -ei m./f. (Langenscheidts)
dust_N = mkN "pulvis" "pulveris" masculine; -- -veris m. (Langenscheidts)
ear_N = mkN "auris" "auris" feminine; -- -is f. (Langenscheidts)
earth_N = mkN "terra" ; -- -ae f. (Langenscheidts)
@@ -293,32 +295,32 @@ lin
hand_N = mkN "manus" "manus" feminine ; -- -us f. (Langenscheidts)
head_N = mkN "caput" "capitis" neuter ; -- -itis n. (Langenscheidts)
heart_N = mkN "cor" "cordis" neuter; -- cordis n. (Langenscheidts)
horn_N = mkN ( variants { "cornu" ; "cornus" } ) "cornus" neuter ; -- -us n. (Langenscheidts)
horn_N = mkN "cornus" "cornus" neuter ; -- -us n. (Langenscheidts)
husband_N = mkN "maritus" ; -- -i m. (Langenscheidts)
ice_N = mkN "glacies" "glaciei" feminine ; -- -ei f. (Langenscheidts)
knee_N = mkN "genu" "genus" neuter ; -- -us n. (Langenscheidts)
leaf_N = mkN "folium" ; -- -i n. (Langenscheidts)
leg_N = bone_N ;
liver_N = variants { ( mkN "iecur" "iecoris" neuter ) ; ( mkN "iocur" "iocineris" neuter ) } ; -- iecoris/iocineris n. (Langenscheidts)
louse_N = mkN "pedis" "pedis" ( variants { masculine ; feminine } ) ; -- -is m./f. (Langenscheidts)
liver_N = mkN "iecur" "iecoris" neuter ; -- iecoris/iocineris n. (Langenscheidts)
louse_N = mkN "pedis" "pedis" masculine ; -- -is m./f. (Langenscheidts)
mouth_N = mkN "os" "oris" neuter ; -- oris n. (Langenscheidts)
name_N = mkN "nomen" "nominis" neuter ; -- -inis n. (Langenscheidts)
neck_N = mkN "cervix" "cervicis" feminine ; -- -icis f. (meist pl.) (Langenscheidts)
night_N = mkN "nox" "noctis" feminine ; -- noctis f. (Langenscheidts)
nose_N = mkN ( variants { "nasus" ; "nasum" } ) ; -- -i m./n. (Langenscheidts)
nose_N = mkN "nasus" ; -- -i m./n. (Langenscheidts)
person_N = mkN "persona" ; -- -ae f. (Langenscheidts)
rain_N = mkN "pluvia" ; -- -ae f. (Langenscheidts)
road_N = mkN "via" ; -- -ae f. (Langenscheidts)
root_N = mkN "radix" "radicis" feminine ; -- -icis f. (Langenscheidts)
rope_N = mkN "funis" "funis" ( variants { masculine ; feminine } ) ; -- -is m.(/f.) (Langenscheidts)
salt_N = mkN "sal" "salis" ( variants { masculine ; neuter } ) ; -- salis m./n. (Langenscheidts)
rope_N = mkN "funis" "funis" masculine ; -- -is m.(/f.) (Langenscheidts)
salt_N = mkN "sal" "salis" masculine ; -- salis m./n. (Langenscheidts)
sand_N = mkN "arena" ; -- -ae f. (Langenscheidts)
seed_N = mkN "semen" "seminis" neuter ; -- -inis n. (Langenscheidts)
skin_N = mkN "cutis" "cutis" feminine ; -- -is f. (Langenscheidts)
sky_N = mkN "caelum" ; -- -i n. (Langenscheidts)
smoke_N = mkN "fumus" ; -- -i m. (Langenscheidts)
snow_N = mkN "nix" "nivis" feminine ; -- nivis (gen. pl. -ium) f. (Langenscheidts)
stick_N = mkN ( variants { "baculum" ; "baculus" } ) ; -- -i n./m.
stick_N = mkN "baculus" ; -- -i n./m.
tail_N = mkN "cauda" ; -- -ae f. (Langenscheidts)
tongue_N = mkN "lingua" ; -- -ae f. (Langenscheidts)
tooth_N = mkN "dens" "dentis" masculine; -- dentis m. (Langenscheidts)