Commands.hs

module Commands where

import Build
import Frontend

commands = 
 [
  paradigm "nn_m_biti"   ["biti"] nn_masc_biti,
  paradigm "nn_m_bryti"   ["bryti"] nn_masc_bryti,
  paradigm "nn_m_landbo"  ["landbo"] nn_masc_landbo,
  paradigm "nn_f_gata"    ["gata"]   nn_fem_gata,
  paradigm "nn_f_kyrkia"  ["kyrkia"] nn_fem_kyrkia,
  paradigm "nn_f_fru"     ["fru"]    nn_fem_fru,
  paradigm "nn_n_ogha"   ["ögha"]   nn_neut_ogha,
  paradigm "nn_f_glaethi" ["glæþi"] nn_fem_glaethi,
  -- Starka substantiv
  paradigm "nn_m_fisker" ["fisker"] nn_masc_fisker,
  paradigm "nn_m_aengil" ["ængil"] nn_masc_aengil,
  paradigm "nn_m_sko" ["sko"] nn_masc_sko,
  paradigm "nn_m_aptan" ["aptan"] nn_masc_aptan,
  paradigm "nn_m_vaever" ["væver"] nn_masc_vaever,
  paradigm "nn_m_laegger" ["lægger"] nn_masc_laegger,
  paradigm "nn_m_oeri" ["øri"] nn_masc_oeri,
  paradigm "nn_m_raetter" ["rætter"] nn_masc_raetter,
  paradigm "nn_m_bondi" ["bondi"] nn_masc_bondi,
  paradigm "nn_m_son" ["son"] nn_masc_son,
  paradigm "nn_m_mather" ["maþir"] nn_masc_mather,
  paradigm "nn_m_foter" ["foter"] nn_masc_foter,
  paradigm "nn_m_fathir" ["faþir"] nn_masc_fathir,
  paradigm "nn_m_eghandi" ["eghandi"] nn_masc_eghandi,
  paradigm "nn_f_agn" ["agn"] nn_fem_agn,
  paradigm "nn_f_bro" ["bro"] nn_fem_bro,
  paradigm "nn_f_gas" ["gas"] nn_fem_gas,
  paradigm "nn_f_bok" ["bok"] nn_fem_bok,
  paradigm "nn_f_ko" ["ko"] nn_fem_ko,
  paradigm "nn_f_mothir" ["moþir"] nn_fem_mothir,
  paradigm "nn_f_faerth" ["færþ"] nn_fem_faerth,
  paradigm "nn_f_heth" ["heþ"] nn_fem_heth,
  paradigm "nn_f_aeg" ["æg"] nn_fem_aeg,
  paradigm "nn_n_skip" ["skip"] nn_neu_skip,
  paradigm "nn_n_bo" ["bo"] nn_neu_bo,
  paradigm "nn_n_hovuth" ["hovuþ"] nn_neu_hovuth,
  paradigm "nn_n_trae" ["træ"] nn_neu_trae,
  paradigm "nn_n_skaer" ["skær"] nn_neu_skaer,
  paradigm "nn_n_minne" ["minne"] nn_neu_minne,
  paradigm "nn_n_aepli"  ["æpli"] nn_neu_aepli,

  -- Adjektiv
  paradigm "av_blar"     ["blar"]     av_blar,
  paradigm "av_langer"   ["langer"]   av_langer,
  paradigm "av_helagher" ["helagher"] av_helagher,
  -- Adverb
  paradigm "ab_opta" ["opta"] ab_opta,
  paradigm "ab_laenger" ["længer"] ab_laenger,
  paradigm "ab_yter" ["yter"] ab_yter,

  -- Verb
  paradigm "vb_aelska" ["ælska"] vb_aelska,
  paradigm "vb_kraevia" ["krævia"] vb_kraevia,
  paradigm "vb_foera" ["føra"] vb_foera,
  paradigm "vb_liva" ["liva"] vb_liva,
  paradigm "vb_vika" ["vika"] vb_vika,
  paradigm "vb_laesa" ["læsa"] vb_laesa,
  -- ordinal
  paradigm "ord_fyrsti" ["fyrsti"] ord_fyrsti
  ]