mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-14 07:19:31 -06:00
40 lines
710 B
Plaintext
40 lines
710 B
Plaintext
abstract Time = Numerals ** {
|
|
|
|
-- Time grammar Abstract syntax. Modified by AR from Karin Cavallin.
|
|
|
|
cat
|
|
|
|
Date ;
|
|
Time ;
|
|
Hour ;
|
|
Minute ;
|
|
Weekday ;
|
|
|
|
fun
|
|
|
|
-- The variants: "two twenty", "twenty past two", "twenty to two"
|
|
|
|
DayDate : Weekday -> Date ;
|
|
DayTimeDate : Weekday -> Time -> Date ;
|
|
|
|
FormalTime : Hour -> Minute -> Time ;
|
|
PastTime : Hour -> Minute -> Time ;
|
|
ToTime : Hour -> Minute -> Time ;
|
|
ExactTime : Hour -> Time ;
|
|
|
|
-- These range from 1 to 99 and are thus overgenerating.
|
|
|
|
NumHour : Sub100 -> Hour ;
|
|
NumMinute : Sub100 -> Minute ;
|
|
|
|
fun
|
|
monday : Weekday ;
|
|
tuesday : Weekday ;
|
|
wednesday : Weekday ;
|
|
thursday : Weekday ;
|
|
friday : Weekday ;
|
|
saturday : Weekday ;
|
|
sunday : Weekday ;
|
|
|
|
} ;
|