Modulo:Giochi olimpici/test

-- Unit tests per il [[Modulo:Olimpiade]]. Cliccare sulla pagina di discussione per eseguire i test.
local p = require('Modulo:UnitTests')

function p:test_EdizOlimp()
	self:preprocess_equals_many('{{EdizOlimp|', '}}', {
		-- chiave inesistente
		{ 'x|1896|E', '' },

		-- estive
		{ 'a|1896|E', '1896' },
		{ 'c|1896|E', 'Atene' },
		{ 'd|1896|E', 'Atene' },
		{ 'e|1896|E', 'I' },
		{ 'p|1896|E', 'Grecia' },
		{ 'b|1896|E', 'GRC 1822-1969' },
		-- da numero edizione
		{ 'a|II|E', '1900' },
		-- estive default
		{ 'a|1896', '1896' },
		{ 'a|1896|X', '1896' },

		-- invernali
		{ 'a|1924|I', '1924' },
		{ 'c|1924|I', 'Chamonix-Mont-Blanc' },
		{ 'd|1924|I', 'Chamonix-Mont-Blanc' },
		{ 'e|1924|I', 'I' },
		{ 'p|1924|I', 'Francia' },
		{ 'b|1924|I', 'FRA 1870-1940' },
		-- da numero edizione
		{ 'a|II|I', '1928' }
	})
end

function p:test_EdizOlimp_P()
	self:preprocess_equals_many('{{EdizOlimp|', '}}', {
		-- chiave inesistente
		{ 'x|1960|E|P', '' },

		-- estive
		{ 'a|1960|E|P', '1960' },
		{ 'c|1960|E|P', 'Roma' },
		{ 'd|1960|E|P', 'Roma' },
		{ 'e|1960|E|P', 'I' },
		{ 'p|1960|E|P', 'Italia' },
		{ 'b|1960|E|P', 'ITA' },
		-- da numero edizione
		{ 'a|II|E|P', '1964' },
		-- estive default
		{ 'a|1960||P', '1960' },
		{ 'a|1960|X|P', '1960' },

		-- invernali
		{ 'a|1976|I|P', '1976' },
		{ 'c|1976|I|P', 'Örnsköldsvik' },
		{ 'd|1976|I|P', 'Örnsköldsvik' },
		{ 'e|1976|I|P', 'I' },
		{ 'p|1976|I|P', 'Svezia' },
		{ 'b|1976|I|P', 'SWE' },
		-- da numero edizione
		{ 'a|II|I|P', '1980' }
	})
end

function p:test_EdizOlimp_G()
	self:preprocess_equals_many('{{EdizOlimp|', '}}', {
		-- chiave inesistente
		{ 'x|2010|E|G', '' },

		-- estive
		{ 'a|2010|E|G', '2010' },
		{ 'c|2010|E|G', 'Singapore' },
		{ 'd|2010|E|G', 'Singapore' },
		{ 'e|2010|E|G', 'I' },
		{ 'p|2010|E|G', 'Singapore' },
		{ 'b|2010|E|G', 'SGP' },
		-- da numero edizione
		{ 'a|II|E|G', '2014' },
		-- estive default
		{ 'a|2010||G', '2010' },
		{ 'a|2010|X|G', '2010' },

		-- invernali
		{ 'a|2012|I|G', '2012' },
		{ 'c|2012|I|G', 'Innsbruck' },
		{ 'd|2012|I|G', 'Innsbruck' },
		{ 'e|2012|I|G', 'I' },
		{ 'p|2012|I|G', 'Austria' },
		{ 'b|2012|I|G', 'AUT' },
		-- da numero edizione
		{ 'a|II|I|G', '2016' },
	})
end

function p:test_giochi_olimpici_estivi()
	self:preprocess_equals_many('{{Link Giochi olimpici|', '}}', {
		-- senza disciplina
		{ '|1896', '[[Giochi della I Olimpiade|Atene 1896]]' },
		{ '|1900', '[[Giochi della II Olimpiade|Parigi 1900]]' },
		{ '|1904', '[[Giochi della III Olimpiade|Saint Louis 1904]]' },
		{ '|1906', '[[Giochi olimpici intermedi|Atene 1906]]' },
		{ '|1908', '[[Giochi della IV Olimpiade|Londra 1908]]' },
		{ '|1912', '[[Giochi della V Olimpiade|Stoccolma 1912]]' },
		{ '|1920', '[[Giochi della VII Olimpiade|Anversa 1920]]' },
		{ '|1924', '[[Giochi della VIII Olimpiade|Parigi 1924]]' },
		{ '|1928', '[[Giochi della IX Olimpiade|Amsterdam 1928]]' },
		{ '|1932', '[[Giochi della X Olimpiade|Los Angeles 1932]]' },
		{ '|1936', '[[Giochi della XI Olimpiade|Berlino 1936]]' },
		{ '|1948', '[[Giochi della XIV Olimpiade|Londra 1948]]' },
		{ '|1952', '[[Giochi della XV Olimpiade|Helsinki 1952]]' },
		{ '|1956', '[[Giochi della XVI Olimpiade|Melbourne 1956]]' },
		{ '|1960', '[[Giochi della XVII Olimpiade|Roma 1960]]' },
		{ '|1964', '[[Giochi della XVIII Olimpiade|Tokyo 1964]]' },
		{ '|1968', '[[Giochi della XIX Olimpiade|Città del Messico 1968]]' },
		{ '|1972', '[[Giochi della XX Olimpiade|Monaco di Baviera 1972]]' },
		{ '|1976', '[[Giochi della XXI Olimpiade|Montréal 1976]]' },
		{ '|1980', '[[Giochi della XXII Olimpiade|Mosca 1980]]' },
		{ '|1984', '[[Giochi della XXIII Olimpiade|Los Angeles 1984]]' },
		{ '|1988', '[[Giochi della XXIV Olimpiade|Seul 1988]]' },
		{ '|1992', '[[Giochi della XXV Olimpiade|Barcellona 1992]]' },
		{ '|1996', '[[Giochi della XXVI Olimpiade|Atlanta 1996]]' },
		{ '|2000', '[[Giochi della XXVII Olimpiade|Sydney 2000]]' },
		{ '|2004', '[[Giochi della XXVIII Olimpiade|Atene 2004]]' },
		{ '|2008', '[[Giochi della XXIX Olimpiade|Pechino 2008]]' },
		{ '|2012', '[[Giochi della XXX Olimpiade|Londra 2012]]' },
		{ '|2016', '[[Giochi della XXXI Olimpiade|Rio de Janeiro 2016]]' },
		{ '|2020', '[[Giochi della XXXII Olimpiade|Tokyo 2020]]' },
		{ '|2024', '[[Giochi della XXXIII Olimpiade|Parigi 2024]]' },
		-- con disciplina
		{ 'lotta|1896', '[[lotta ai Giochi della I Olimpiade|Atene 1896]]' },		
		{ 'pentathlon moderno|2004', '[[pentathlon moderno ai Giochi della XXVIII Olimpiade|Atene 2004]]' },
		-- specialità
		{ 'atletica leggera|1988|specialità=decathlon', '[[atletica leggera ai Giochi della XXIV Olimpiade - Decathlon|Seul 1988]]' },
		-- 1906
		{ '|1906', '[[Giochi olimpici intermedi|Atene 1906]]' },
		{ 'calcio|1906', '[[calcio ai Giochi olimpici intermedi|Atene 1906]]' },
		-- anno non trovato
		{ '|1000', '\'\'1000 - Nessuna Olimpiade estiva\'\'' },
		-- formatting
		{ '|1896|formatting=label', 'Atene 1896' },
		{ '|1896|formatting=target', 'Giochi della I Olimpiade' },
		{ '|1896|formatting=città_paese', '[[Atene|Atene]], [[Grecia]]' }
	})
end

function p:test_giochi_olimpici_invernali()
	self:preprocess_equals_many('{{Link Giochi olimpici|', '}}', {
		-- senza disciplina
		{ '|1924|I', '[[I Giochi olimpici invernali|Chamonix-Mont-Blanc 1924]]' },
		{ '|1928|I', '[[II Giochi olimpici invernali|Sankt Moritz 1928]]' },
		{ '|1932|I', '[[III Giochi olimpici invernali|Lake Placid 1932]]' },
		{ '|1936|I', '[[IV Giochi olimpici invernali|Garmisch-Partenkirchen 1936]]' },
		{ '|1948|I', '[[V Giochi olimpici invernali|Sankt Moritz 1948]]' },
		{ '|1952|I', '[[VI Giochi olimpici invernali|Oslo 1952]]' },
		{ '|1956|I', '[[VII Giochi olimpici invernali|Cortina d\'Ampezzo 1956]]' },
		{ '|1960|I', '[[VIII Giochi olimpici invernali|Squaw Valley 1960]]' },
		{ '|1964|I', '[[IX Giochi olimpici invernali|Innsbruck 1964]]' },
		{ '|1968|I', '[[X Giochi olimpici invernali|Grenoble 1968]]' },
		{ '|1972|I', '[[XI Giochi olimpici invernali|Sapporo 1972]]' },
		{ '|1976|I', '[[XII Giochi olimpici invernali|Innsbruck 1976]]' },
		{ '|1980|I', '[[XIII Giochi olimpici invernali|Lake Placid 1980]]' },
		{ '|1984|I', '[[XIV Giochi olimpici invernali|Sarajevo 1984]]' },
		{ '|1988|I', '[[XV Giochi olimpici invernali|Calgary 1988]]' },
		{ '|1992|I', '[[XVI Giochi olimpici invernali|Albertville 1992]]' },
		{ '|1994|I', '[[XVII Giochi olimpici invernali|Lillehammer 1994]]' },
		{ '|1998|I', '[[XVIII Giochi olimpici invernali|Nagano 1998]]' },
		{ '|2002|I', '[[XIX Giochi olimpici invernali|Salt Lake City 2002]]' },
		{ '|2006|I', '[[XX Giochi olimpici invernali|Torino 2006]]' },
		{ '|2010|I', '[[XXI Giochi olimpici invernali|Vancouver 2010]]' },
		{ '|2014|I', '[[XXII Giochi olimpici invernali|Soči 2014]]' },
		{ '|2018|I', '[[XXIII Giochi olimpici invernali|Pyeongchang 2018]]' },
		{ '|2022|I', '[[XXIV Giochi olimpici invernali|Pechino 2022]]' },
		-- con disciplina
		{ 'sci di fondo|1924|I', '[[sci di fondo ai I Giochi olimpici invernali|Chamonix-Mont-Blanc 1924]]' },
		{ 'sci di fondo|2014|I', '[[sci di fondo ai XXII Giochi olimpici invernali|Soči 2014]]' },
		-- VIII (1960) e XI (1972) edizione iniziano con vocale
		{ 'sci alpino|1960|I', '[[sci alpino agli VIII Giochi olimpici invernali|Squaw Valley 1960]]' },
		{ 'sci alpino|1972|I', '[[sci alpino agli XI Giochi olimpici invernali|Sapporo 1972]]' },
		-- anno non trovato
		{ '|1000|I', '\'\'1000 - Nessuna Olimpiade invernale\'\'' },
		-- formatting
		{ '|1924|I|formatting=label', 'Chamonix-Mont-Blanc 1924' },
		{ '|1924|I|formatting=target', 'I Giochi olimpici invernali' },
		{ '|1924|I|formatting=città_paese', '[[Chamonix-Mont-Blanc|Chamonix-Mont-Blanc]], [[Francia]]' }
	})
end

function p:test_giochi_paralimpici_estivi()
	self:preprocess_equals_many('{{Link Giochi olimpici|', '}}', {
		-- senza disciplina
		{ '|1960|E|P', '[[I Giochi paralimpici estivi|Roma 1960]]' },
		{ '|1964|E|P', '[[II Giochi paralimpici estivi|Tōkyō 1964]]' },
		{ '|1968|E|P', '[[III Giochi paralimpici estivi|Tel Aviv 1968]]' },
		{ '|1972|E|P', '[[IV Giochi paralimpici estivi|Heidelberg 1972]]' },
		{ '|1976|E|P', '[[V Giochi paralimpici estivi|Toronto 1976]]' },
		{ '|1980|E|P', '[[VI Giochi paralimpici estivi|Arnhem 1980]]' },
		{ '|1984|E|P', '[[VII Giochi paralimpici estivi|New York 1984]]' },
		{ '|1988|E|P', '[[VIII Giochi paralimpici estivi|Seul 1988]]' },
		{ '|1992|E|P', '[[IX Giochi paralimpici estivi|Barcellona 1992]]' },
		{ '|1996|E|P', '[[X Giochi paralimpici estivi|Atlanta 1996]]' },
		{ '|2000|E|P', '[[XI Giochi paralimpici estivi|Sydney 2000]]' },
		{ '|2004|E|P', '[[XII Giochi paralimpici estivi|Atene 2004]]' },
		{ '|2008|E|P', '[[XIII Giochi paralimpici estivi|Pechino 2008]]' },
		{ '|2012|E|P', '[[XIV Giochi paralimpici estivi|Londra 2012]]' },
		-- con disciplina
		{ 'atletica leggera|1960|E|P', '[[atletica leggera ai I Giochi paralimpici estivi|Roma 1960]]' },
		{ 'atletica leggera|2012|E|P', '[[atletica leggera ai XIV Giochi paralimpici estivi|Londra 2012]]' },
		-- VIII (1988) e XI (2000) edizione iniziano con vocale
		{ 'atletica leggera|1988|E|P', '[[atletica leggera agli VIII Giochi paralimpici estivi|Seul 1988]]' },
		{ 'atletica leggera|2000|E|P', '[[atletica leggera agli XI Giochi paralimpici estivi|Sydney 2000]]' },
		-- anno non trovato
		{ '|1000|E|P', '\'\'1000 - Nessuna Paralimpiade estiva\'\'' },
		-- formatting
		{ '|1960|E|P|formatting=label', 'Roma 1960' },
		{ '|1960|E|P|formatting=target', 'I Giochi paralimpici estivi' },
		{ '|1960|E|P|formatting=città_paese', '[[Roma|Roma]], [[Italia]]' }
	})
end

function p:test_giochi_paralimpici_invernali()
	self:preprocess_equals_many('{{Link Giochi olimpici|', '}}', {
		-- senza disciplina
		{ '|1976|I|P', '[[I Giochi paralimpici invernali|Örnsköldsvik 1976]]' },
		{ '|1980|I|P', '[[II Giochi paralimpici invernali|Geilo 1980]]' },
		{ '|1984|I|P', '[[III Giochi paralimpici invernali|Innsbruck 1984]]' },
		{ '|1988|I|P', '[[IV Giochi paralimpici invernali|Innsbruck 1988]]' },
		{ '|1992|I|P', '[[V Giochi paralimpici invernali|Tignes 1992]]' },
		{ '|1994|I|P', '[[VI Giochi paralimpici invernali|Lillehammer 1994]]' },
		{ '|1998|I|P', '[[VII Giochi paralimpici invernali|Nagano 1998]]' },
		{ '|2002|I|P', '[[VIII Giochi paralimpici invernali|Salt Lake City 2002]]' },
		{ '|2006|I|P', '[[IX Giochi paralimpici invernali|Torino 2006]]' },
		{ '|2010|I|P', '[[X Giochi paralimpici invernali|Vancouver 2010]]' },
		{ '|2014|I|P', '[[XI Giochi paralimpici invernali|Soči 2014]]' },
		{ '|2018|I|P', '[[XII Giochi paralimpici invernali|Pyeongchang 2018]]' },
		{ '|2022|I|P', '[[XIII Giochi paralimpici invernali|Pechino 2022]]' },
		-- con disciplina
		{ 'biathlon|1994|I|P', '[[biathlon ai VI Giochi paralimpici invernali|Lillehammer 1994]]' },
		{ 'biathlon|1998|I|P', '[[biathlon ai VII Giochi paralimpici invernali|Nagano 1998]]' },
		-- VIII (2002) e XI (2014) edizione iniziano con vocale
		{ 'biathlon|2002|I|P', '[[biathlon agli VIII Giochi paralimpici invernali|Salt Lake City 2002]]' },
		{ 'biathlon|2014|I|P', '[[biathlon agli XI Giochi paralimpici invernali|Soči 2014]]' },
		-- anno non trovato
		{ '|1000|I|P', '\'\'1000 - Nessuna Paralimpiade invernale\'\'' },
		-- formatting
		{ '|1976|I|P|formatting=label', 'Örnsköldsvik 1976' },
		{ '|1976|I|P|formatting=target', 'I Giochi paralimpici invernali' },
		{ '|1976|I|P|formatting=città_paese', '[[Örnsköldsvik|Örnsköldsvik]], [[Svezia]]' }
	})
end

function p:test_giochi_olimpici_giovanili_estivi()
	self:preprocess_equals_many('{{Link Giochi olimpici|', '}}', {
		-- senza disciplina
		{ '|2010|E|G', '[[I Giochi olimpici giovanili estivi|Singapore 2010]]' },
		{ '|2014|E|G', '[[II Giochi olimpici giovanili estivi|Nanchino 2014]]' },
		{ '|2018|E|G', '[[III Giochi olimpici giovanili estivi|Buenos Aires 2018]]' },
		-- con disciplina
		{ 'atletica leggera|2010|E|G', '[[atletica leggera ai I Giochi olimpici giovanili estivi|Singapore 2010]]' },
		{ 'atletica leggera|2014|E|G', '[[atletica leggera ai II Giochi olimpici giovanili estivi|Nanchino 2014]]' },
		-- anno non trovato
		{ '|1000|E|G', '\'\'1000 - Nessuna Olimpiade giovanile estiva\'\'' },
		-- formatting
		{ '|2010|E|G|formatting=label', 'Singapore 2010' },
		{ '|2010|E|G|formatting=target', 'I Giochi olimpici giovanili estivi' },
		{ '|2010|E|G|formatting=città_paese', '[[Singapore|Singapore]], [[Singapore]]' }
	})
end

function p:test_giochi_olimpici_giovanili_invernali()
	self:preprocess_equals_many('{{Link Giochi olimpici|', '}}', {
		-- senza disciplina
		{ '|2012|I|G', '[[I Giochi olimpici giovanili invernali|Innsbruck 2012]]' },
		{ '|2016|I|G', '[[II Giochi olimpici giovanili invernali|Lillehammer 2016]]' },
		-- con disciplina
		{ 'sci alpino|2012|I|G', '[[sci alpino ai I Giochi olimpici giovanili invernali|Innsbruck 2012]]' },
		{ 'sci alpino|2016|I|G', '[[sci alpino ai II Giochi olimpici giovanili invernali|Lillehammer 2016]]' },
		-- anno non trovato
		{ '|1000|I|G', '\'\'1000 - Nessuna Olimpiade giovanile invernale\'\'' },
		-- formatting
		{ '|2012|I|G|formatting=label', 'Innsbruck 2012' },
		{ '|2012|I|G|formatting=target', 'I Giochi olimpici giovanili invernali' },
		{ '|2012|I|G|formatting=città_paese', '[[Innsbruck|Innsbruck]], [[Austria]]' }
	})
end

return p

Content Disclaimer

Informasi ini disarikan dari Wikipedia dan disajikan kembali untuk tujuan edukasi. Konten tersedia di bawah lisensi CC BY-SA 3.0. Kami tidak bertanggung jawab atas ketidakakuratan data yang bersumber dari kontribusi publik tersebut.

  1. The information displayed on this website is sourced in part or in whole from Wikipedia and has been adapted for the purpose of restating it. We strive to provide accurate and relevant information, however:
  2. There is no guarantee of absolute accuracy. Wikipedia is an open, collaborative project that can be edited by anyone, so information is subject to change.
  3. It is not intended to constitute professional advice. The content displayed is for informational and educational purposes only. For important decisions (e.g., medical, legal, or financial), please consult a professional.
  4. Content copyright. Wikipedia is licensed under the Creative Commons Attribution-ShareAlike License (CC BY-SA). This means that content may be reused with appropriate attribution and shared under a similar license.
  5. Responsible use. Any risk arising from the use of information from this website is entirely the responsibility of the user.