blob: 31d145f19c351e1b2c7b298b44e80f3224179bb1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
instance LexAttemptoSwe of LexAttempto =
open ExtraSwe, SyntaxSwe, ParadigmsSwe, ConstructX,
MakeStructuralSwe, IrregSwe in {
oper
possible_A = mkA "möjlig" ;
necessary_A = mkA "nödvändig" ;
own_A = mkA "egen" "eget" "egna" "egnare" "egnast" ;
have_VV = must_VV ;
provably_Adv = mkAdv "bevisbart" ;
provable_A = mkA "bevisbar" ;
false_A = mkA "falsk" ;
such_A = mkA "sådan" ;
genitiveNP np = mkNP (GenNP np) ;
each_Det = every_Det ; ----
that_Subj = mkSubj "att" ;
comma_and_Conj = mkConj [] ", och" plural ;
comma_or_Conj = mkConj [] ", eller" singular ;
slash_Conj = mkConj [] "/" singular ;
}
|
