forked from GitHub/gf-core
16 lines
378 B
Plaintext
16 lines
378 B
Plaintext
--# -path=.:present:prelude
|
|
|
|
concrete AnimalsSwe of Animals = QuestionsSwe **
|
|
open LangSwe, ParadigmsSwe, IrregSwe in {
|
|
|
|
lin
|
|
Dog = regN "hund" ;
|
|
Cat = mk2N "katt" "katter" ;
|
|
Mouse = mkN "mus" "musen" "möss" "mössen" ;
|
|
Lion = mk2N "lejon" "lejon" ;
|
|
Zebra = regN "zebra" ;
|
|
Chase = dirV2 (regV "jaga") ;
|
|
Eat = dirV2 äta_V ;
|
|
See = dirV2 se_V ;
|
|
}
|