blob: e889ae5c6782245d5323031ec8487fbe853ed848 (
plain)
1
2
3
4
5
6
7
8
9
10
|
resource ResourceSwe = {
param RefHour = ThisFormal | ThisLex | NextLex ;
oper refs : Str -> Str -> Str -> RefHour => Str = \x,y,z -> table {ThisFormal => x ; ThisLex => y ; NextLex => z } ;
param MinMin = Form | Past | To ;
oper mins : Str -> Str -> Str -> MinMin => Str = \u,x,y -> table {Form => u ; Past => x ; To => y } ;
}
|