# Module:Citation/CS1/testcases/dates

--[=[  

Unit tests for Module:Citation/CS1/Date validation.  

Click talk page to run tests.  

]=]  

local p = require('Module:UnitTests')  
----------------------------< Y M X _ D A T E S >------------------------------------------------------------  

function p:test_ymx_dates -- EDTF dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=1500-10-XX'}, -- invalid year  
{'date=5500-10-XX'}, -- invalid year  
{'date=1980-00-XX'}, -- invalid month  
{'date=1980-13-XX'}, -- invalid month  
{'date=2000-02-XX'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< Y M D _ D A T E S >------------------------------------------------------------  

function p:test_ymd_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=1500-10-23'}, -- invalid year  
{'date=5500-10-23'}, -- invalid year  
{'date=1980-00-23'}, -- invalid month  
{'date=1980-13-23'}, -- invalid month  
{'date=1980-10-00'}, -- invalid day  
{'date=1980-10-55'}, -- invalid day  
{'date=1700-02-29'}, -- invalid date  
{'date=2000-02-29'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M D Y _ D A T E S >------------------------------------------------------------  

function p:test_mdy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October 23, 96'}, -- invalid year  
{'date=October 23, 5500'}, -- invalid year  
{'date=Oktober 23, 1980'}, -- invalid month  
{'date=october 23, 1980'}, -- invalid month  
{'date=Sept 23, 1980'}, -- invalid month  
{'date=sep 23, 1980'}, -- invalid month  
{'date=October 00, 1980'}, -- invalid day  
{'date=October 55, 1980'}, -- invalid day  
{'date=February 29, 1700'}, -- invalid date  
{'date=October 23 1980'}, -- missing comma  
{'date=October, 23 1980'}, -- misplaced comma  
{'date=October 23,1980'}, -- missing space  
{'date=October23, 1980'}, -- missing space  
{'date=February 29, 2000'},  
{'date=பிப்ரவரி 29, 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M D D Y _ D A T E S >----------------------------------------------------------  

function p:test_mddy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October 23–25, 96'}, -- invalid year  
{'date=October 23–25, 5500'}, -- invalid year  
{'date=Oktober 23–25, 1980'}, -- invalid month  
{'date=october 23–25, 1980'}, -- invalid month  
{'date=Sept 23–25, 1980'}, -- invalid month  
{'date=sep 23–25, 1980'}, -- invalid month  
{'date=October 00–25, 1980'}, -- invalid day  
{'date=October 23–55, 1980'}, -- invalid day  
{'date=October 25–23, 1980'}, -- invalid day order  
{'date=October 23–23, 1980'}, -- invalid 2nd day  
{'date=February 25–29, 1700'}, -- invalid 2nd day  
{'date=October 23–25 1980'}, -- missing comma  
{'date=October, 23–25 1980'}, -- misplaced comma  
{'date=October 23–25,1980'}, -- missing space  
{'date=October23–25, 1980'}, -- missing space  
{'date=October 23 –25, 1980'}, -- extraneous space  
{'date=October 23– 25, 1980'}, -- extraneous space  
{'date=October 23-25, 1980'}, -- hyphen  
{'date=February 25–29, 2000'},  
{'date=பிப்ரவரி 25–29, 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< D M Y _ D A T E S >------------------------------------------------------------  

function p:test_dmy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=23 October 96'}, -- invalid year  
{'date=23 October 5500'}, -- invalid year  
{'date=23 Oktober 1980'}, -- invalid month  
{'date=23 october 1980'}, -- invalid month  
{'date=23 Sept 1980'}, -- invalid month  
{'date=23 sep 1980'}, -- invalid month  
{'date=00 October 1980'}, -- invalid day  
{'date=55 October 1980'}, -- invalid day  
{'date=29 February 1700'}, -- invalid date  
{'date=23, October 1980'}, -- extraneous comma  
{'date=23 October, 1980'}, -- extraneous comma  
{'date=23October 1980'}, -- missing space  
{'date=23 October1980'}, -- missing space  
{'date=29 February 2000'},  
{'date=29 பிப்ரவரி 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< D D M Y _ D A T E S >----------------------------------------------------------  

function p:test_ddmy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=23–25 October 96'}, -- invalid year  
{'date=23–25 October 5500'}, -- invalid year  
{'date=23–25 Oktober 1980'}, -- invalid month  
{'date=23–25 october 1980'}, -- invalid month  
{'date=23–25 Sept 1980'}, -- invalid month  
{'date=23–25 sep 1980'}, -- invalid month  
{'date=00–25 October 1980'}, -- invalid day  
{'date=23–55 October 1980'}, -- invalid day  
{'date=25–23 October 1980'}, -- invalid day order  
{'date=23–23 February 1700'}, -- invalid 2nd day  
{'date=23–29 February 1700'}, -- invalid 2nd day  
{'date=23–25, October 1980'}, -- extraneous comma  
{'date=23–25 October, 1980'}, -- extraneous comma  
{'date=23–25 October1980'}, -- missing space  
{'date=23–25October 1980'}, -- missing space  
{'date=23 –25 October 1980'}, -- extraneous space  
{'date=23– 25 October 1980'}, -- extraneous space  
{'date=23-25 October 1980'}, -- hyphen  
{'date=23–25 February 2000'},  
{'date=23–25 பிப்ரவரி 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M D M D Y _ D A T E S >--------------------------------------------------------  

function p:test_mdmdy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October 23 – November 25, 96'}, -- invalid year  
{'date=October 23 – November 25, 5500'}, -- invalid year  
{'date=Oktober 23 – November 25, 1980'}, -- invalid 1st month  
{'date=October 23 – Novembre 25, 1980'}, -- invalid 2nd month  
{'date=october 23 – November 25, 1980'}, -- invalid 1st month  
{'date=October 23 – november 25, 1980'}, -- invalid 2nd month  
{'date=Sept 23 – Oct 25, 1980'}, -- invalid 1st month  
{'date=Sep 23 – Okt 25, 1980'}, -- invalid 2nd month  
{'date=sep 23 – Oct 25, 1980'}, -- invalid 1st month  
{'date=Sep 23 – oct 25, 1980'}, -- invalid 2nd month  
{'date=October 25 – October 29, 1980'}, -- invalid 2nd month  
{'date=October 00 – November 25, 1980'}, -- invalid 1st day  
{'date=October 23 – November 55, 1980'}, -- invalid 2nd day  
{'date=October 23 – November 25 1980'}, -- missing comma  
{'date=October, 23 – November 25 1980'}, -- misplaced comma  
{'date=October 23, – November 25 1980'}, -- misplaced comma  
{'date=October 23 – November, 25 1980'}, -- misplaced comma  
{'date=October23 – November 25, 1980'}, -- missing space  
{'date=October 23– November 25, 1980'}, -- missing space  
{'date=October 23 –November 25, 1980'}, -- missing space  
{'date=October 23 – November25, 1980'}, -- missing space  
{'date=October 23 – November 25,1980'}, -- missing space  
{'date=Oct 23 – November 25, 1980'}, -- mixed style  
{'date=October 23 – Nov 25, 1980'}, -- mixed style  
{'date=October 23 – September 25, 1980'}, -- invalid month order  
{'date=Oct 23 – Sep 25, 1980'}, -- invalid month order  
{'date=October 23 – October 23, 1980'}, -- same dates  
{'date=October 23 - November 25, 1980'}, -- hyphen  
{'date=January 25 – February 29, 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< D M D M Y _ D A T E S >--------------------------------------------------------  

function p:test_dmdmy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=23 October – 25 November 96'}, -- invalid year  
{'date=23 October – 25 November 5500'}, -- invalid year  
{'date=23 Oktober – 25 November 1980'}, -- invalid 1st month  
{'date=23 October – 25 Novembre 1980'}, -- invalid 2nd month  
{'date=23 october – 25 November 1980'}, -- invalid 1st month  
{'date=23 October – 25 november 1980'}, -- invalid 2nd month  
{'date=23 Sept – 25 Oct 1980'}, -- invalid 1st month  
{'date=23 Sep – 25 Okt 1980'}, -- invalid 2nd month  
{'date=23 sep – 25 Oct 1980'}, -- invalid 1st month  
{'date=23 Sep – 25 oct 1980'}, -- invalid 2nd month  
{'date=23 October – 29 October 1980'}, -- invalid 2nd month  
{'date=00 October – 25 November 1980'}, -- invalid 1st day  
{'date=23 October – 55 November 1980'}, -- invalid 2nd day  
{'date=23, October – 25 November 1980'}, -- extraneous comma  
{'date=23 October, – 25 November 1980'}, -- extraneous comma  
{'date=23 October – 25, November 1980'}, -- extraneous comma  
{'date=23 October – 25 November, 1980'}, -- extraneous comma  
{'date=23October – 25 November 1980'}, -- missing space  
{'date=23 October– 25 November 1980'}, -- missing space  
{'date=23 October –25 November 1980'}, -- missing space  
{'date=23 October – 25November 1980'}, -- missing space  
{'date=23 October – 25 November1980'}, -- missing space  
{'date=23 Oct – 25 November 1980'}, -- mixed style  
{'date=23 October – 25 Nov 1980'}, -- mixed style  
{'date=23 October – 25 September 1980'}, -- invalid month order  
{'date=23 October – 23 October 1980'}, -- same dates  
{'date=23 October - 25 November 1980'}, -- hyphen  
{'date=25 January – 29 February 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M D Y M D Y _ D A T E S >------------------------------------------------------  

function p:test_mdymdy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October 23, 95 – November 25, 1996'}, -- invalid 1st year  
{'date=October 23, 1995 – November 25, 96'}, -- invalid 2nd year  
{'date=October 23, 5500 – November 25, 1996'}, -- invalid 1st year  
{'date=October 23, 1995 – November 25, 5500'}, -- invalid 1st year  
{'date=Oktober 23, 1979 – November 25, 1980'}, -- invalid 1st month  
{'date=October 23, 1979 – Novembre 25, 1980'}, -- invalid 2nd month  
{'date=october 23, 1979 – November 25, 1980'}, -- invalid 1st month  
{'date=October 23, 1979 – november 25, 1980'}, -- invalid 2nd month  
{'date=Sept 23, 1979 – Oct 25, 1980'}, -- invalid 1st month  
{'date=Sep 23, 1979 – Okt 25, 1980'}, -- invalid 2nd month  
{'date=sep 23, 1979 – Oct 25, 1980'}, -- invalid 1st month  
{'date=October 00, 1979 – November 25, 1980'}, -- invalid 1st day  
{'date=October 23, 1979 – November 55, 1980'}, -- invalid 2nd day  
{'date=October 23 1979 – November 25, 1980'}, -- missing comma  
{'date=October 23, 1979 – November 25 1980'}, -- missing comma  
{'date=October, 23 1979 – November 25, 1980'}, -- misplaced comma  
{'date=October 23 1979, – November 25, 1980'}, -- misplaced comma  
{'date=October 23, 1979 – November, 25 1980'}, -- misplaced comma  
{'date=October23, 1979 – November 25, 1980'}, -- missing space  
{'date=October 23,1979 – November 25, 1980'}, -- missing space  
{'date=October 23, 1979– November 25, 1980'}, -- missing space  
{'date=October 23, 1979 –November25, 1980'}, -- missing space  
{'date=October 23, 1979 – November25, 1980'}, -- missing space  
{'date=October 23, 1979 – November 25,1980'}, -- missing space  
{'date=Oct 23, 1979 – November 25, 1980'}, -- mixed style  
{'date=October 23, 1979 – Nov 25, 1980'}, -- mixed style  
{'date=September 25, 1980 – October 23, 1979'}, -- invalid year order  
{'date=October 23, 1979 – October 23, 1979'}, -- same dates  
{'date=October 23, 1979 - November 25, 1980'}, -- hyphen  
{'date=January 25, 1979 – February 29, 2000'},  
{'date=சனவரி 25, 1979 – மார்ச் 29, 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< D M Y D M Y _ D A T E S >------------------------------------------------------  

function p:test_dmydmy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=23 October 95 – 25 November 1996'}, -- invalid 1st year  
{'date=23 October 1995 – 25 November 96'}, -- invalid 2nd year  
{'date=23 October 5500 – 25 November 1996'}, -- invalid 1st year  
{'date=23 October 1995 – 25 November 5500'}, -- invalid 2nd year  
{'date=23 Oktober 1979 – 25 November 1980'}, -- invalid 1st month  
{'date=23 October 1979 – 25 Novembre 1980'}, -- invalid 2nd month  
{'date=23 october 1979 – 25 November 1980'}, -- invalid 1st month  
{'date=23 October 1979 – 25 november 1980'}, -- invalid 2nd month  
{'date=23 Sept 1979 – 25 Oct 1980'}, -- invalid 1st month  
{'date=23 Sep 1979 – 25 Okt 1980'}, -- invalid 2nd month  
{'date=23 sep 1979 – 25 Oct 1980'}, -- invalid 1st month  
{'date=00 October 1979 – 25 November 1980'}, -- invalid 1st day  
{'date=23 October 1979 – 55 November 1980'}, -- invalid 2nd day  
{'date=23, October 1979 – 25 November 1980'}, -- extraneous comma  
{'date=23 October, 1979 – 25 November 1980'}, -- extraneous comma  
{'date=23 October 1979, – 25 November 1980'}, -- extraneous comma  
{'date=23 October 1979 – 25, November 1980'}, -- extraneous comma  
{'date=23 October 1979 – 25 November, 1980'}, -- extraneous comma  
{'date=23October 1979 – 25 November 1980'}, -- missing space  
{'date=23 October1979 – 25 November 1980'}, -- missing space  
{'date=23 October 1979– 25 November 1980'}, -- missing space  
{'date=23 October 1979 –25 November 1980'}, -- missing space  
{'date=23 October 1979 – 25November 1980'}, -- missing space  
{'date=23 October 1979 – 25 November1980'}, -- missing space  
{'date=23 Oct 1979 – 25 November 1980'}, -- mixed month style  
{'date=23 October 1979 – 25 Nov 1980'}, -- mixed month style  
{'date=23 October 1979 – November 25, 1980'}, -- mixed date style  
{'date=25 September 1980 – 23 October 1979'}, -- invalid year order  
{'date=23 October 1979 – 23 October 1979'}, -- same dates  
{'date=23 October 1979 - 25 November 1980'}, -- hyphen  
{'date=25 January 1979 – 29 February 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M Y _ D A T E S >--------------------------------------------------------------  

function p:test_my_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October 96'}, -- invalid year  
{'date=October 5500'}, -- invalid year  
{'date=Oktober 1980'}, -- invalid month  
{'date=october 1980'}, -- invalid month  
{'date=Sept 1980'}, -- invalid month  
{'date=sep 1980'}, -- invalid month  
{'date=October, 1980'}, -- extraneous comma  
{'date=October1980'}, -- missing space  
{'date=February 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< S Y _ D A T E S >--------------------------------------------------------------  

function p:test_sy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=Spring 96'}, -- invalid year  
{'date=Summer 5500'}, -- invalid year  
{'date=spring 1980'}, -- invalid season  
{'date=summer 1980'}, -- invalid season  
{'date=autumn 1980'}, -- invalid season  
{'date=fall 1980'}, -- invalid season  
{'date=Winter, 1980'}, -- extraneous comma  
{'date=Spring1980'}, -- missing space  
{'date=Spring 2000'},  
{'date=Summer 2000'},  
{'date=Autumn 2000'},  
{'date=Fall 2000'},  
{'date=Winter 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< Q Y _ D A T E S >--------------------------------------------------------------  

function p:test_qy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=First Quarter 96'}, -- invalid year  
{'date=First Quarter 5500'}, -- invalid year  
{'date=1st Quarter 1980'}, -- invalid quarter  
{'date=first Quarter 1980'}, -- invalid quarter  
{'date=First quarter 1980'}, -- invalid quarter  
{'date=First Quarter, 1980'}, -- extraneous comma  
{'date=First Quarter1980'}, -- missing space  
{'date=FirstQuarter 1980'}, -- missing space  
{'date=First Quarter 2000'},  
{'date=Second Quarter 2000'},  
{'date=Third Quarter 2000'},  
{'date=Fourth Quarter 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< P R O P E R _ N A M E _ Y E A R _ D A T E S >----------------------------------  

function p:test_proper_name_year_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=Christmas 96'}, -- invalid year  
{'date=Christmas 5500'}, -- invalid year  
{'date=Xmas 1980'}, -- invalid proper name  
{'date=christmas 1980'}, -- invalid proper name  
{'date=easter 1980'}, -- invalid proper name  
{'date=Christmas, 1980'}, -- extraneous comma  
{'date=Cristmas1980'}, -- missing space  
{'date=Christmas 2000'},  
{'date=Easter 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M M Y _ D A T E S >------------------------------------------------------------  

function p:test_mmy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October–November 96'}, -- invalid year  
{'date=October–November 5500'}, -- invalid year  
{'date=Oktober–November 1980'}, -- invalid 1st month  
{'date=Oktober–Novembre 1980'}, -- invalid 2nd month  
{'date=october–November 1980'}, -- invalid 1st month  
{'date=Sept–Nov 1980'}, -- invalid 2nd month  
{'date=sep–Nov 1980'}, -- invalid 1st month  
{'date=Sep–nov 1980'}, -- invalid 2nd month  
{'date=Oct–November 1980'}, -- mixed style  
{'date=October–Nov 1980'}, -- mixed style  
{'date=Summer–November 1980'}, -- mixed types  
{'date=October–Winter 1980'}, -- mixed types  
{'date=October–November, 1980'}, -- extraneous comma  
{'date=October –November 1980'}, -- extraneous space  
{'date=October– November 1980'}, -- extraneous space  
{'date=October–November1980'}, -- missing space  
{'date=October-October 1980'}, -- same months  
{'date=October-November 1980'}, -- hyphen  
{'date=January–February 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< S S Y _ D A T E S >------------------------------------------------------------  

function p:test_ssy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=Spring–Summer 96'}, -- invalid year  
{'date=Spring–Summer 5500'}, -- invalid year  
{'date=spring–Summer 1980'}, -- invalid 1st season  
{'date=Spring–summer 1980'}, -- invalid 2nd season  
{'date=Spring–Spring 1980'}, -- same season  
{'date=Autumn–Fall 1980'}, -- same season  
{'date=Fall–Autumn 1980'}, -- same season  
{'date=Spring–Summer, 1980'}, -- extraneous comma  
{'date=Spring –Summer 1980'}, -- extraneous space  
{'date=Spring– Summer 1980'}, -- extraneous space  
{'date=Spring–Summer1980'}, -- missing space  
{'date=Spring-Summer 1980'}, -- hyphen  
{'date=Spring–Summer 2000'},  
{'date=Spring–Autumn 2000'},  
{'date=Spring–Fall 2000'},  
{'date=Spring–Winter 2000'},  

{'date=Summer–Autumn 2000'},  
{'date=Summer–Fall 2000'},  
{'date=Summer–Winter 2000'},  
{'date=Summer–Spring 2000'},  

{'date=Autumn–Winter 2000'},  
{'date=Autumn–Spring 2000'},  
{'date=Autumn–Summer 2000'},  

{'date=Fall–Winter 2000'},  
{'date=Fall–Spring 2000'},  
{'date=Fall–Summer 2000'},  

{'date=Winter–Spring 2000'},  
{'date=Winter–Summer 2000'},  
{'date=Winter–Autumn 2000'},  
{'date=Winter–Fall 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< M Y M Y _ D A T E S >----------------------------------------------------------  

function p:test_mymy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=October 95 – November 1996'}, -- invalid 1st year  
{'date=October 1995 – November 96'}, -- invalid 2nd year  
{'date=October 5500 – November 1996'}, -- invalid 1st year  
{'date=October 1995 – November 5500'}, -- invalid 2nd year  
{'date=Oktober 1979 – November 1980'}, -- invalid 1st month  
{'date=October 1979 – Novembre 1980'}, -- invalid 2nd month  
{'date=october 1979 – November 1980'}, -- invalid 1st month  
{'date=October 1979 – november 1980'}, -- invalid 2nd month  
{'date=Sept 1979 – Oct 1980'}, -- invalid 1st month  
{'date=Sep 1979 – Okt 1980'}, -- invalid 2nd month  
{'date=sep 1979 – Oct 1980'}, -- invalid 1st month  
{'date=October, 1979 – November 1980'}, -- extraneous comma  
{'date=October 1979, – November 1980'}, -- extraneous comma  
{'date=October 1979 – November, 1980'}, -- extraneous comma  
{'date=October1979 – November 1980'}, -- missing space  
{'date=October 1979– November 1980'}, -- missing space  
{'date=October 1979 –November 1980'}, -- missing space  
{'date=October 1979 – November1980'}, -- missing space  
{'date=Oct 1979 – November 1980'}, -- mixed month style  
{'date=October 1979 – Nov 1980'}, -- mixed month style  
{'date=September 1980 – October 1979'}, -- invalid year order  
{'date=October 1979 – October 1979'}, -- missing space  
{'date=October 1979 - November 1980'}, -- hyphen  
{'date=January 1979 – February 2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< S Y Y _ D A T E S >------------------------------------------------------------  

function p:test_syy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=Summer 95–96'}, -- invalid 1st year  
{'date=Summer 5500–01'}, -- invalid 1st year  
{'date=Summer 1995–97'}, -- invalid 2nd year  
{'date=Summer 1995–1997'}, -- invalid 2nd year  
{'date=Summer 1995–95'}, -- same year  
{'date=Summer 1995–1995'}, -- same year  
{'date=Spring 1995–96'}, -- invalid season  
{'date=Spring 1995–1996'}, -- invalid season  
{'date=Autumn 1995–96'}, -- invalid season  
{'date=Autumn 1995–1996'}, -- invalid season  
{'date=Fall 1995–96'}, -- invalid season  
{'date=Fall 1995–1996'}, -- invalid season  
{'date=Summer 1995–96'},  
{'date=Summer 1995–1996'},  
{'date=Winter 1995–96'},  
{'date=Winter 1995–1996'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< Y Y _ D A T E S >--------------------------------------------------------------  

function p:test_yy_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=99–100'}, -- invalid 1st year  
{'date=5500–100'}, -- invalid 1st year  
{'date=1995–5500'}, -- invalid 2nd year  
{'date=1995–997'}, -- invalid 2nd year  
{'date=1995–1995'}, -- same year  
{'date=100–99'}, -- invalid 2nd year  
{'date=995–997'},  
{'date=995–1997'},  
{'date=1995–1997'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< Y 4 Y 2 _ D A T E S >----------------------------------------------------------  

function p:test_y4y2_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=999–00'}, -- invalid 1st year  
{'date=5500–100'}, -- invalid 1st year  
{'date=1995–5500'}, -- invalid 2nd year  
{'date=2000–05'}, -- invalid range  
{'date=1999–05'}, -- invalid range  
{'date=1995–95'}, -- same year  
{'date=1995–94'}, -- invalid 2nd year  
{'date=1995–96'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< Y _ D A T E S >----------------------------------------------------------------  

function p:test_y_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=99'}, -- invalid year  
{'date=5500'}, -- invalid year  
{'date=995'},  
{'date=2000'},  
},  
{nowiki=false, templatestyles=true}  
end  

----------------------------< Y E A R _ D A T E _ M I S M A T C H >------------------------------------------  

function p:test_year_date_mismatch  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'date=2020-06-13 |year=2020a'}, -- valid: year has disambiguator  
{'date=2020-06-13 |year=2002a'}, -- mismatch  
{'date=2020-06-13 |year=2020'}, -- redundant year match  
{'date=2020-06-13 |year=2002'}, -- mismatch  
{'date=13 June 2020 |year=2020'}, -- redundant year match  
{'date=13 June 2020 |year=2002'}, -- mismatch  
{'date=June 13, 2020 |year=2020'}, -- redundant year match  
{'date=June 13, 2020 |year=2002'}, -- mismatch  
{'date=13 June 2020 – 30 January 2021 |year=2020'}, -- redundant year match  
{'date=13 June 2020 – 30 January 2021 |year=2021'}, -- redundant year match  
{'date=13 June 2020 – 30 January 2021 |year=2002'}, -- mismatch  
{'date=June 13, 2020 – January 30, 2021 |year=2020'}, -- redundant year match  
{'date=June 13, 2020 – January 30, 2021 |year=2021'}, -- redundant year match  
{'date=June 13, 2020 – January 30, 2021 |year=2002'}, -- mismatch  
{'date=2020–2021 |year=2020'}, -- redundant year match  
{'date=2020–2021 |year=2021'}, -- redundant year match  
{'date=2020–2021 |year=2002'}, -- mismatch  
{'date=2020–21 |year=2020'}, -- redundant year match  
{'date=2020–21 |year=2021'}, -- redundant year match  
{'date=2020–21 |year=2002'}, -- mismatch  
{'date=2020 |year=2020'}, -- redundant year match  
{'date=2020 |year=2002'}, -- mismatch  
},  
{nowiki=false, templatestyles=true}  
end  

---
=============================<< S P E C I A L C A S E T E S T I N G >>=====================================  

----------------------------< T O D A Y _ P L U S _ O F F S E T _ G E T >------------------------------------  

returns date offset from today by <offset> in <format> (#time parser function formatting)  
Y - four digit year  
m - two digit month  
M - abbreviated month name  
F - full month name  
d - zero-padded day  
j - day without zero-padding  

<offset> must include units: days, months, years  

local function today_plus_offset_get (format, offset)  
return mw.getContentLanguage:formatDate(format, 'today ' .. offset and ('+ ' .. offset) or '');  
end  

----------------------------< A C C E S S - D A T E >--------------------------------------------------------  

function p:test_access_dates  
self:preprocess_equals_preprocess_many(  
*, *,  
{  
{'access-date=2001-01-14'}, -- invalid date (before Wikipedia)  
{'access-date=January 14, 2001'},  
{'access-date=14 January 2001'},  
{'access-date=2001-01-15'}, -- valid date (Wikipedia birthday)  
{'access-date=January 15, 2001'},  
{'access-date=15 January 2001'},  
{'access-date=' .. today_plus_offset_get('Y-m-d', '0 days')}, -- valid date (today)  
{'access-date=' .. today_plus_offset_get('Y-m-d', '1 days')}, -- valid date (tomorrow)  
{'access-date=' .. today_plus_offset_get('Y-m-d', '2 days')}, -- invalid date (day after tomorrow)  
},  
{nowiki=false, templatestyles=true}  
end  

return p