facebook/duckling
1
1
Fork 0
mirror of https://github.com/facebook/duckling.git synced 2024-11-28 00:31:28 +03:00
Code Issues Packages Projects Releases Wiki Activity

Extend support for Mawlid from 1950 to 1998

Browse Source 
Summary:
Dates based on the Umm al-Qura Calendar of Saudi Arabia.
http://www.staff.science.uu.nl/~gent0113/islam/ummalqura.htm
http://www.staff.science.uu.nl/~gent0113/islam/ummalqura_principal.htm

Reviewed By: chinmay87

Differential Revision: D13862563

fbshipit-source-id: 6085d4ede1553e7757e8d3cae67da4d0723400cd
This commit is contained in:
Nate Mueller 2019-02-05 12:47:37 -08:00 committed by Facebook Github Bot
parent c30607851f
commit d31bf25bf4
1 changed files with 52 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
Duckling/Time/Computed.hs
View File

@ -1236,7 +1236,58 @@ mawlid = computedDays mawlid'
mawlid' :: [TimeObject]
mawlid' = mapMaybe toTimeObjectM
[ (1999, 6, 26)
[ (1950, 1, 1)
, (1950, 12, 22)
, (1951, 12, 11)
, (1952, 11, 30)
, (1953, 11, 19)
, (1954, 11, 8)
, (1955, 10, 29)
, (1956, 10, 17)
, (1957, 10, 6)
, (1958, 9, 26)
, (1959, 9, 15)
, (1960, 9, 3)
, (1961, 8, 23)
, (1962, 8, 12)
, (1963, 8, 2)
, (1964, 7, 21)
, (1965, 7, 10)
, (1966, 7, 1)
, (1967, 6, 19)
, (1968, 6, 8)
, (1969, 5, 28)
, (1970, 5, 18)
, (1971, 5, 7)
, (1972, 4, 25)
, (1973, 4, 15)
, (1974, 4, 4)
, (1975, 3, 24)
, (1976, 3, 12)
, (1977, 3, 2)
, (1978, 2, 19)
, (1979, 2, 9)
, (1980, 1, 30)
, (1981, 1, 18)
, (1982, 1, 7)
, (1982, 12, 27)
, (1983, 12, 16)
, (1984, 12, 4)
, (1985, 11, 24)
, (1986, 11, 14)
, (1987, 11, 3)
, (1988, 10, 22)
, (1989, 10, 11)
, (1990, 10, 1)
, (1991, 9, 20)
, (1992, 9, 9)
, (1993, 8, 29)
, (1994, 8, 19)
, (1995, 8, 8)
, (1996, 7, 27)
, (1997, 7, 16)
, (1998, 7, 6)
, (1999, 6, 26)
, (2000, 6, 14)
, (2001, 6, 4)
, (2002, 5, 24)