blob: e43e26bf83d9c7c64b914f6460464d9369a17744 (
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
27
28
29
30
|
resource icm100ResSwe = {
param RefPol = Pos | Neg | Inter ;
param RefLev = Per | Sem | Und | Acc ;
oper ex1 : RefPol => RefLev => Str = table {
Pos => table {
Per => ["jag hörde"];
Sem => [""];
Und => [""];
Acc => ["okej"]
};
Neg => table {
Per => ["ursäkta jag hörde inte alls vad du sa"];
Sem => ["jag förstår inte vad du menar"];
Und => ["jag förstår inte riktigt vad du menar"];
Acc => ["tyvärr kan inte hantera"]
};
Inter => table {
Per => (variants{});
Sem => (variants{});
-- Und => ["stämmer det"]; --hack!
Und => (variants{});
Acc => (variants{})
}
};
}
|
