--# -path=.:present:prelude

concrete PeaceLexExt_Fin of PeaceLexExt = 
  PeaceCat_Fin ** open ParadigmsFin in {

  lin

    -- Adjectives
    dangerous_A = regA "vaarallinen" ;
    dead_A = mkA (nRae "kuollut" "kuolleena") ;
    hungry_A = regA "nälkäinen" ;
    large_A = regA "iso" ;
    sick_A = regA "sairas" ;

    -- Nouns
    air_N = regN "ilma" ;
    arm_N = reg3N "käsi" "käden" "käsiä" ;
    building_N = regN "rakennus" ;
    car_N = regN "auto" ;
    corpse_N = regN "ruumis" ;
    doctor_N = regN "lääkäri";
    enemy_N = regN "vihollinen";
    food_N = regN "ruoka";
    friend_N = regN "ystävä";
    landmine_N = regN "maamiina" ;
    medicine_N = regN "lääke" ;
    skin_N = regN "iho" ;
    soldier_N = regN "sotilas" ;
    weapon_N = regN "ase";

    -- Verbs
    cough_V = regV "yskiä" ;
    need_V2 = dirV2 (regV "tarvita");
    own_V2 = dirV2 (regV "omistaa") ;
    show_V3 = dirdirV3 (regV "näyttää") ;

}