mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-14 05:32:51 -06:00
Spanish lexica
This commit is contained in:
32
lib/resource/spanish/TimeSpa.gf
Normal file
32
lib/resource/spanish/TimeSpa.gf
Normal file
@@ -0,0 +1,32 @@
|
||||
concrete TimeSpa of Time = NumeralsSpa **
|
||||
open Prelude, MorphoSpa, CategoriesSpa, ParadigmsSpa in {
|
||||
|
||||
lincat
|
||||
Date = SS ;
|
||||
Weekday = N ;
|
||||
Hour = SS ;
|
||||
Minute = SS ;
|
||||
Time = SS ;
|
||||
|
||||
lin
|
||||
DayDate day = ss (day.s ! singular) ;
|
||||
DayTimeDate day time = ss (day.s ! singular ++ ["a las"] ++ time.s) ; --- a la una
|
||||
|
||||
FormalTime h m = ss (["a las"] ++ h.s ++ "y" ++ m.s) ;
|
||||
PastTime h m = ss (["a las"] ++ h.s ++ "y" ++ h.s) ;
|
||||
ToTime h m = ss (["a las"] ++ h.s ++ "menos" ++ m.s) ;
|
||||
ExactTime h = ss (h.s ++ "exactamente") ;
|
||||
|
||||
NumHour n = ss (n.s ! feminine) ;
|
||||
NumMinute n = ss (n.s ! feminine) ;
|
||||
|
||||
monday = regN "lunes" ;
|
||||
tuesday = regN "martes" ;
|
||||
wednesday = regN "miércoles" ;
|
||||
thursday = regN "jueves" ;
|
||||
friday = regN "viernes" ;
|
||||
saturday = regN "sábado" ;
|
||||
sunday = regN "domingo" ;
|
||||
|
||||
|
||||
} ;
|
||||
Reference in New Issue
Block a user