Module:Tennis performance timeline/calendar

local calendar = {}

calendar["2017"] = { men = { {"250 Brisbane", "250 Doha", "250 Chennai"}, {"250 Sydney", "250 Auckland"}, {"GS Australian Open"}, {"Davis Cup 1R"}, {"250 Quito", "250 Sofia", "250 Montpellier"}, {"500 Rotterdam", "250 Memphis", "250 Buenos Aires"}, {"500 Rio de Janeiro", "250 Marseille", "250 Delray Beach"}, {"500 Dubai", "500 Acapulco", "250 Sao Paulo"}, {"1000 Indian Wells"}, {"1000 Miami"}, {"Davis Cup QF"}, {"250 Houston", "250 Marrakech"}, {"1000 Monte Carlo"}, {"500 Barcelona", "250 Budapest"}, {"250 Munich", "250 Estoril", "250 Istanbul"}, {"1000 Madrid"}, {"1000 Rome"}, {"250 Geneva", "250 Lyon"}, {"GS Roland Garros"}, {"250 Stuttgart", "250 s-Hertogenbosch"}, {"500 Queen's Club", "500 Halle"}, {"250 Eastbourne", "250 Antalya"}, {"GS Wimbledon"}, {"250 Newport", "250 Umag", "250 Bastad"}, {"500 Hamburg", "250 Atlanta", "250 Gstaad"}, {"500 Washington", "250 Los Cabos", "250 Kitzbuhel"}, {"1000 Canada"}, {"1000 Cincinnati"}, {"250 Winston-Salem"}, {"GS US Open"}, {"Davis Cup SF"}, {"250 St. Petersburg", "250 Metz"}, {"250 Chengdu", "250 Shenzhen"}, {"500 Beijing", "500 Tokyo"}, {"1000 Shanghai"}, {"250 Moscow", "250 Antwerp", "250 Stockholm"}, {"500 Vienna", "500 Basel"}, {"1000 Paris"}, {"Next Gen Finals"}, {"World Tour Finals"}, {"Davis Cup F"} },	women = { {"P Brisbane", "Intl Shenzhen", "Intl Auckland"}, {"Intl Hobart", "P Sydney"}, {"GS Australian Open"}, {"Intl Taipei City", "P St. Petersburg"}, {"Fed Cup QF"}, {"P Doha"}, {"P5 Dubai", "Intl Budapest"}, {"Intl Kuala Lumpur", "Intl Acapulco"}, {"PM Indian Wells"}, {"PM Miami"}, {"Intl Monterrey", "P Charleston"}, {"Intl Biel", "Intl Bogota"}, {"125K Zhengzhou", "Fed Cup SF"}, {"P Stuttgart", "Intl Istanbul"}, {"Intl Prague", "Intl Rabat"}, {"PM Madrid"}, {"P5 Rome"}, {"Intl Nurnberg", "Intl Strasbourg"}, {"GS Roland Garros", "125K Bol"}, {"Intl Nottingham", "Intl s-Hertogenbosch"}, {"P Birmingham", "Intl Mallorca"}, {"P Eastbourne"	}, {"GS Wimbledon"}, {"Intl Gstaad", "Intl Bucharest"}, {"Intl Bastad", "Intl Nanchang"}, {"P Stanford", "Intl Washington"}, {"P5 Canada"}, {"P5 Cincinnati"}, {"P New Haven"}, {"GS US Open", "125K Dalian"}, {"Intl Quebec City", "Intl Tokyo"}, {"Intl Seoul", "P Tokyo", "Intl Guangzhou"}, {"P5 Wuhan", "Intl Tashkent"}, {"PM Beijing"}, {"Intl Linz", "Intl Tianjin", "Intl Hong Kong"}, {"Intl Luxembourg", "P Moscow"}, {"WTA Finals"}, {"WTA Elite Trophy"}, {"125K Hua Hin", "125K Limoges", "Fed Cup F"}, {"125K Taipei"}, {"125K Honolulu"} } }

for year,cal in pairs(calendar) do	for gender,entry in pairs(cal) do		entry.week = {} for week,tournaments in ipairs(entry) do			for _,tournament in ipairs(tournaments) do				entry.week[tournament] = week end end end end

return calendar