-- grammar extracted from MTEvalImpl.mesa by PGS, April 2, 1987 5:42:11 pm PST ||CHAIN ||LISTS ||TABLE1 1 name-dummy 2 atom 3 quoted-string 4 domain-lit 5 . 6 , 7 : 8 ; 9 @ 10 < 11 > 12 eol 13 error 14 date-dummy 15 ampm 16 day 17 month 18 zone 19 eof ||TABLE2 20 goal 21 addr-list 22 date-time 23 address 24 mailbox 25 group 26 addr-spec 27 dot-words 28 domain 29 sub-domain 30 word 31 phrase 32 mailbox-list 33 route-addr 34 route 35 date 36 time 37 hour ||TABLE3 name-dummy nameDummy atom atomTok quoted-string qStringTok domain-lit dLitTok . dotTok , commaTok : colonTok ; semiTok @ atSignTok < lBracketTok > rBracketTok error errorTok eol EOLTok date-dummy dateDummy ampm ampmTok day dayTok month monthTok zone zoneTok ||TABLE4 1 0 goal ::= name-dummy addr-list eol 2 1 | date-dummy date-time eol 3 2 address ::= 4 3 | mailbox 5 4 | group 6 5 addr-list ::= address 7 6 | addr-list , address 8 7 addr-spec ::= dot-words 9 8 | addr-spec @ domain 10 9 domain ::= sub-domain 11 10 | domain . sub-domain 12 11 dot-words ::= word 13 12 | dot-words . word 14 13 group ::= phrase : mailbox-list ; 15 14 | phrase : mailbox-list 16 15 mailbox ::= addr-spec 17 16 | route-addr 18 17 | phrase route-addr 19 18 | @ dot-words 20 19 mailbox-list ::= 21 20 | mailbox 22 21 | mailbox-list , 23 22 | mailbox-list , mailbox 24 23 phrase ::= dot-words 25 24 | phrase dot-words 26 25 route ::= @ domain 27 26 | route , @ domain 28 27 route-addr ::= < addr-spec > 29 28 | < route : addr-spec > 30 29 sub-domain ::= atom 31 30 | domain-lit 32 31 word ::= atom 33 32 | quoted-string 34 33 date-time ::= date time 35 34 | day date time 36 35 | day , date time 37 36 | day , date , time 38 37 | day month atom hour atom 39 38 | day month atom hour zone atom 40 39 date ::= atom month atom 41 40 | atom month . atom 42 41 | atom 43 42 time ::= hour zone 44 43 | hour ampm zone 45 44 | hour 46 45 hour ::= atom : atom 47 46 | atom : atom : atom 48 47 | atom