Module:User:Trilletrollet/Biota

Module documentationcreatepurge

You might want to create a documentation page for this Scribunto module.
Editors can experiment in this module's sandbox (create | mirror) and testcases (create) pages.
Add categories to the /doc subpage. Subpages of this module.

local a = {}

a.aliases = function(frame)
    local  raw_taxon =  frame.args[1]

	if     raw_taxon == "biota"
	then return "biota"

-- Basal Chordata ↓

	elseif raw_taxon == "chordata"
	or     raw_taxon == "vertebrata"
	then return "chordata"

	elseif raw_taxon == "banffozoa"
	or     raw_taxon == "banffiata"
	or     raw_taxon == "banffiidae"
	then return "banffozoa"

	elseif raw_taxon == "vetulicolia"
	or     raw_taxon == "vetulicolida"
	or     raw_taxon == "vetulicolidae"
	then return "vetulicolia"

	elseif raw_taxon == "myllokunmingiida"
	or     raw_taxon == "myllokunmingiidae"
	then return "myllokunmingiida"

	elseif raw_taxon == "conodonta"
	or     raw_taxon == "conodontophora"
	or     raw_taxon == "conodontophorida"
	or     raw_taxon == "euconodonta"
	then return "conodonta"

	elseif raw_taxon == "doliolida"
	or     raw_taxon == "doliolidae"
	then return "doliolida"

	elseif raw_taxon == "anaspida"
	or     raw_taxon == "anaspidomorphi"
	then return "anaspida"

	elseif raw_taxon == "myxini"
	or     raw_taxon == "myxiniformes"
	or     raw_taxon == "myxinidae"
	then return "myxini"

	elseif raw_taxon == "petromyzonti"
	or     raw_taxon == "petromyzontiformes"
	then return "petromyzonti"

	elseif raw_taxon == "ptyctodontidae"
	or     raw_taxon == "ptyctodontida"
	then return "ptyctodontidae"

-- Basal Chordata ↑

-- Chondrichthyes ↓

	elseif raw_taxon == "ischnacanthiformes"
	or     raw_taxon == "ischnacanthida"
	then return "ischnacanthiformes"

	elseif raw_taxon == "diplacanthiformes"
	or     raw_taxon == "diplacanthida"
	then return "diplacanthiformes"

	elseif raw_taxon == "climatiiformes"
	or     raw_taxon == "climatiida"
	then return "climatiiformes"

	elseif raw_taxon == "acanthodiformes"
	or     raw_taxon == "acanthodida"
	then return "acanthodiformes"

	elseif raw_taxon == "omalodontiformes"
	or     raw_taxon == "omalodontida"
	then return "omalodontiformes"

	elseif raw_taxon == "ctenacanthiformes"
	or     raw_taxon == "ctenacanthida"
	then return "ctenacanthiformes"

	elseif raw_taxon == "phoebodontiformes"
	or     raw_taxon == "phoebodontida"
	or     raw_taxon == "phoebodontidae"
	then return "phoebodontiformes"

	elseif raw_taxon == "symmoriiformes"
	or     raw_taxon == "symmoriida"
	then return "symmoriiformes"

	elseif raw_taxon == "iniopterygidae"
	or raw_taxon     == "iniopterygiformes"
	or raw_taxon     == "iniopterygia"
	then return "iniopterygidae"

	elseif raw_taxon == "xenacanthiformes"
	or     raw_taxon == "xenacanthida"
	then return "xenacanthiformes"

	elseif raw_taxon == "eugeneodontiformes"
	or     raw_taxon == "eugeneodontida"
	then return "eugeneodontiformes"

	elseif raw_taxon == "hybodontiformes"
	or     raw_taxon == "hybodontida"
	then return "hybodontiformes"

	elseif raw_taxon == "petalodontiformes"
	or     raw_taxon == "petalodontida"
	then return "petalodontiformes"

	elseif raw_taxon == "chimaeriformes"
	or     raw_taxon == "chimaeroidei"
	then return "chimaeriformes"

	elseif raw_taxon == "sclerorhynchoidei"
	or     raw_taxon == "ganopristidae"
	then return "sclerorhynchoidei"

	elseif raw_taxon == "heterodontiformes"
	or     raw_taxon == "heterodontidae"
	or     raw_taxon == "heterodontus"
	then return "heterodontiformes"

	elseif raw_taxon == "mitsukurinidae"
	or     raw_taxon == "mitsukurina"
	then return "mitsukurinidae"

	elseif raw_taxon == "alopiidae"
	or     raw_taxon == "alopias"
	then return "alopiidae"

	elseif raw_taxon == "chlamydoselachidae"
	or     raw_taxon == "chlamydoselachiformes"
	or     raw_taxon == "chlamydoselachus"
	then return "chlamydoselachidae"

	elseif raw_taxon == "pristiophoriformes"
	or     raw_taxon == "pristiophoridae"
	then return "pristiophoriformes"

	elseif raw_taxon == "squatiniformes"
	or     raw_taxon == "squatinidae"
	or     raw_taxon == "squatina"
	then return "squatiniformes"

-- Chondrichthyes ↑

-- Basal Osteichthyes ↓

	elseif raw_taxon == "onychodontiformes"
	or     raw_taxon == "onychodontida"
	or     raw_taxon == "onychodontidae"
	then return "onychodontiformes"

	elseif raw_taxon == "porolepiformes"
	or     raw_taxon == "porolepidiformes"
	then return "porolepiformes"

	elseif raw_taxon == "coelacanthi"
	or     raw_taxon == "coelacanthimorpha"
	or     raw_taxon == "coelacanthiformes"
	or     raw_taxon == "actinistia"
	then return "coelacanthi"

	elseif raw_taxon == "dipnoi"
	or     raw_taxon == "dipneusti"
	then return "dipnoi"

-- Basal Osteichthyes ↑

-- Actinopterygii ↓

	elseif raw_taxon == "palaeonisciformes"
	or     raw_taxon == "palaeoniscoidea"
	then return "palaeonisciformes"

	elseif raw_taxon == "polypteriformes"
	or     raw_taxon == "polypteridae"
	then return "polypteriformes"

	elseif raw_taxon == "subholostei"
	or     raw_taxon == "perleidiformes"
	then return "subholostei"

	elseif raw_taxon == "dapediiformes"
	or     raw_taxon == "dapediidae"
	then return "dapediiformes"

	elseif raw_taxon == "macrosemiiformes"
	or     raw_taxon == "macrosemiidae"
	then return "macrosemiiformes"

	elseif raw_taxon == "lepisosteiformes"
	or     raw_taxon == "lepisosteidae"
	then return "lepisosteiformes"

	elseif raw_taxon == "aspidorhynchiformes"
	or     raw_taxon == "aspidorhynchidae"
	then return "aspidorhynchiformes"

	elseif raw_taxon == "caturiformes"
	or     raw_taxon == "caturoidea"
	or     raw_taxon == "caturidae"
	then return "caturiformes"

	elseif raw_taxon == "ionoscopiformes"
	or     raw_taxon == "ionoscopidae"
	then return "ionoscopiformes"

	elseif raw_taxon == "pachycormiformes"
	or     raw_taxon == "pachycormidae"
	then return "pachycormiformes"

	elseif raw_taxon == "pycnodontiformes"
	or     raw_taxon == "pycnodontomorpha"
	then return "pycnodontiformes"

	elseif raw_taxon == "amiiformes"
	or     raw_taxon == "amiidae"
	then return "amiiformes"

	elseif raw_taxon == "megalopidae"
	or     raw_taxon == "megalops"
	then return "megalopidae"

	elseif raw_taxon == "gymnotoidei"
	or     raw_taxon == "gymnotiformes"
	then return "gymnotoidei"

	elseif raw_taxon == "siluroidei"
	or     raw_taxon == "siluriformes"
	then return "siluroidei"

	elseif raw_taxon == "carangiformes"
	or     raw_taxon == "carangaria"
	then return "carangiformes"

	elseif raw_taxon == "sphyraenidae"
	or     raw_taxon == "sphyraena"
	then return "sphyraenidae"

	elseif raw_taxon == "pleuronectoidei"
	or     raw_taxon == "pleuronectiformes"
	then return "pleuronectoidei"

	elseif raw_taxon == "nematistiidae"
	or     raw_taxon == "nematistioidei"
	or     raw_taxon == "nematistioidea"
	or     raw_taxon == "nematistius"
	then return "nematistiidae"

	elseif raw_taxon == "menidae"
	or     raw_taxon == "menoidei"
	or     raw_taxon == "menoidea"
	or     raw_taxon == "mene"
	then return "menidae"

	elseif raw_taxon == "xiphioidea"
	or     raw_taxon == "xiphioidei"
	or     raw_taxon == "istiophoriformes"
	then return "xiphioidea"

	elseif raw_taxon == "trachinotus"
	or     raw_taxon == "trachinotinae"
	then return "trachinotus"

	elseif raw_taxon == "coryphaena"
	or     raw_taxon == "coryphaenidae"
	then return "coryphaena"

	elseif raw_taxon == "echeneinae"
	or     raw_taxon == "echeneidae"
	then return "echeneinae"

	elseif raw_taxon == "epinephelidae"
	or     raw_taxon == "epinephelinae"
	then return "epinephelidae"

	elseif raw_taxon == "luciopercini"
	or     raw_taxon == "sander"
	then return "luciopercini"

-- Actinopterygii ↑

-- Basal Tetrapoda ↓

	elseif raw_taxon == "osteolepiformes"
	or     raw_taxon == "osteolepidida"
	then return "osteolepiformes"

	elseif raw_taxon == "elpistostegalia"
	or     raw_taxon == "elpistostegidae"
	then return "elpistostegalia"

	elseif raw_taxon == "aistopoda"
	or     raw_taxon == "aïstopoda"
	then return "aistopoda"

	elseif raw_taxon == "zatracheidae"
	or     raw_taxon == "zatrachydidae"
	then return "zatracheidae"

	elseif raw_taxon == "archegosauroidea"
	or     raw_taxon == "archegosauridae"
	then return "archegosauroidea"

    elseif raw_taxon == "bolosauridae"
    or     raw_taxon == "bolosauria"
    then return "bolosauridae"

	elseif raw_taxon == "captorhinidae"
	or     raw_taxon == "captorhinida"
	or     raw_taxon == "captorhinomorpha"
	then return "captorhinidae"

-- Basal Tetrapoda ↑

-- Amphibia ↓

	elseif raw_taxon == "microsauria"
	or     raw_taxon == "recumbirostra"
	then return "microsauria"

	elseif raw_taxon == "molgophidae"
	or     raw_taxon == "lysorophidae"
	or     raw_taxon == "lysorophia"
	then return "molgophidae"

	elseif raw_taxon == "albanerpetidae"
	or     raw_taxon == "albanerpetontidae"
	or     raw_taxon == "allocaudata"
	then return "albanerpetidae"

-- Amphibia ↑

-- Basal Amniota ↓


-- Basal Amniota ↑

-- Synapsida ↓

	elseif raw_taxon == "synapsida"
	or     raw_taxon == "theropsida"
	or     raw_taxon == "pan-mammalia"
	then return "synapsida"

	elseif raw_taxon == "anteosauria"
	or     raw_taxon == "anteosauridae"
	then return "anteosauria"

	elseif raw_taxon == "morganucodontidae"
	or     raw_taxon == "morganucodonta"
	then return "morganucodontidae"

	elseif raw_taxon == "docodontidae"
	or     raw_taxon == "docodonta"
	then return "docodontidae"

	elseif raw_taxon == "gobiconodontidae"
	or     raw_taxon == "gobiconodonta"
	then return "gobiconodontidae"

	elseif raw_taxon == "amphilestidae"
	or     raw_taxon == "amphidontidae"
	or     raw_taxon == "jeholodentidae"
	then return "amphilestidae"

	elseif raw_taxon == "volaticotheriidae"
	or     raw_taxon == "volaticotheria"
	or     raw_taxon == "volaticotherini"
	then return "volaticotheriidae"

	elseif raw_taxon == "tachyglossidae"
	or     raw_taxon == "tachyglossa"
	then return "tachyglossidae"

	elseif raw_taxon == "deltatheroida"
	or     raw_taxon == "deltatheridiidae"
	then return "deltatheroida"

	elseif raw_taxon == "diprotodontidae"
	or     raw_taxon == "diprotodontoidea"
	then return "diprotodontidae"

	elseif raw_taxon == "oxyaenodonta"
	or     raw_taxon == "oxyaenidae"
	then return "oxyaenodonta"

	elseif raw_taxon == "brontotheriidae"
	or     raw_taxon == "brontotherioidea"
	then return "brontotheriidae"

	elseif raw_taxon == "chalicotheriidae"
	or     raw_taxon == "chalicotherioidea"
	then return "chalicotheriidae"

	elseif raw_taxon == "adapiformes"
	or     raw_taxon == "adapoidea"
	then return "adapiformes"

	elseif raw_taxon == "omomyiformes"
	or     raw_taxon == "omomyoidea"
	or     raw_taxon == "omomyidae"
	then return "omomyiformes"

-- Synapsida ↑

-- Misc. Sauropsida ↓

	elseif raw_taxon == "sauropsida"
	or     raw_taxon == "reptilia"
	then return "sauropsida"

	elseif raw_taxon == "pareiasauridae"
	or     raw_taxon == "pareiasauria"
	then return "pareiasauridae"

	elseif raw_taxon == "millerettidae"
	or     raw_taxon == "millerosauria"
	then return "millerettidae"

	elseif raw_taxon == "rhynchocephalia"
	or     raw_taxon == "sphenodontia"
	then return "rhynchocephalia"

-- Misc. Sauropsida ↑

-- Archosauria ↓

	elseif raw_taxon == "protorosauria"
	or     raw_taxon == "prolacertiformes"
	then return "protorosauria"

	elseif raw_taxon == "tanysauria"
	or     raw_taxon == "tanystropheidae"
	then return "tanysauria"

	elseif raw_taxon == "drepanosauridae"
	or     raw_taxon == "drepanosauria"
	or     raw_taxon == "drepanosauromorpha"
	then return "drepanosauridae"

	elseif raw_taxon == "trachelosauridae"
	or     raw_taxon == "dinocephalosauridae"
	then return "trachelosauridae"

	elseif raw_taxon == "trilophosauridae"
	or     raw_taxon == "trilophosauria"
	then return "trilophosauridae"

	elseif raw_taxon == "azendohsauria"
	or     raw_taxon == "azendohsauridae"
	then return "azendohsauria"

	elseif raw_taxon == "erythrosuchia"
	or     raw_taxon == "erythrosuchidae"
	then return "erythrosuchia"

	elseif raw_taxon == "poposauroidea"
	or     raw_taxon == "poposauria"
	then return "poposauroidea"

	elseif raw_taxon == "proterochampsidae"
	or     raw_taxon == "proterochampsia"
	then return "proterochampsidae"

	elseif raw_taxon == "eudimorphodontidae"
	or     raw_taxon == "eudimorphodontoidea"
	then return "eudimorphodontidae"

	elseif raw_taxon == "darwinoptera"
	or     raw_taxon == "wukongopteridae"
	then return "darwinoptera"

	elseif raw_taxon == "archaeopterodactyloidea"
	or     raw_taxon == "euctenochasmatia"
	or     raw_taxon == "ctenochasmatoidea"
	then return "archaeopterodactyloidea"

	elseif raw_taxon == "heterodontosauridae"
	or     raw_taxon == "heterodontosauria"
	then return "heterodontosauridae"

	elseif raw_taxon == "ceratopsia"
	or     raw_taxon == "ceratopia"
	then return "ceratopsia"

	elseif raw_taxon == "hypsilophodontia"
	or     raw_taxon == "hypsilophodontidae"
	then return "hypsilophodontia"

	elseif raw_taxon == "rhabdodontidae"
	or     raw_taxon == "rhabdodontoidea"
	then return "rhabdodontidae"

	elseif raw_taxon == "iguanodontia"
	or     raw_taxon == "ornithopoda"
	or     raw_taxon == "dryomorpha"
	then return "iguanodontia"

	elseif raw_taxon == "thescelosauria"
	or     raw_taxon == "thescelosauridae"
	or     raw_taxon == "parksosauridae"
	then return "thescelosauria"

	elseif raw_taxon == "pachycephalosauridae"
	or     raw_taxon == "pachycephalosauria"
	then return "pachycephalosauridae"

	elseif raw_taxon == "protosuchia"
	or     raw_taxon == "protosuchidae"
	then return "protosuchia"

	elseif raw_taxon == "shartegosuchia"
	or     raw_taxon == "shartegosuchoidea"
	then return "shartegosuchia"

	elseif raw_taxon == "notosuchia"
	or     raw_taxon == "eunotosuchia"
	or     raw_taxon == "ziphosuchia"
	then return "notosuchia"

	elseif raw_taxon == "baurusuchidae"
	or     raw_taxon == "baurusuchia"
	then return "baurusuchidae"

	elseif raw_taxon == "peirosauria"
	or     raw_taxon == "peirosauridae"
	or     raw_taxon == "sebecia"
	then return "peirosauria"

	elseif raw_taxon == "sebecidae"
	or     raw_taxon == "sebecoidea"
	then return "sebecidae"

	elseif raw_taxon == "uruguaysuchidae"
	or     raw_taxon == "uruguaysuchia"
	then return "uruguaysuchidae"

	elseif raw_taxon == "thoracosauridae"
	or     raw_taxon == "thoracosaurs"
	then return "thoracosauridae"

	elseif raw_taxon == "alligatoridae"
	or     raw_taxon == "alligatorinae"
	then return "alligatoridae"

	elseif raw_taxon == "caimanidae"
	or     raw_taxon == "caimaninae"
	then return "caimanidae"

	elseif raw_taxon == "crocodylidae"
	or     raw_taxon == "crocodyloidea"
	or     raw_taxon == "crocodylinae"
	then return "crocodylidae"

	elseif raw_taxon == "gavialidae"
	or     raw_taxon == "gavialoidea"
	or     raw_taxon == "tomistominae"
	then return "gavialidae"

	elseif raw_taxon == "herrerasauria"
	or     raw_taxon == "herrerasauridae"
	then return "herrerasauria"

	elseif raw_taxon == "coelophysoidea"
	or     raw_taxon == "coelophysidae"
	then return "coelophysoidea"

    elseif raw_taxon == "elaphrosauridae"
	or     raw_taxon == "elaphrosaurinae"
    then return "elaphrosauridae"

	elseif raw_taxon == "carcharodontosauridae"
	or     raw_taxon == "carcharodontosauria"
	then return "carcharodontosauridae"

	elseif raw_taxon == "alvarezsauria"
	or     raw_taxon == "alvarezsauroidea"
	then return "alvarezsauria"

	elseif raw_taxon == "ornithomimosauria"
	then return "ornithomimosauria"

	elseif raw_taxon == "tyrannosauria"
	or     raw_taxon == "tyrannosauroidea"
	then return "tyrannosauria"

	elseif raw_taxon == "eutyrannosauria"
	or     raw_taxon == "tyrannosauridae"
	then return "eutyrannosauria"

	elseif raw_taxon == "megaraptora"
	or     raw_taxon == "megaraptoridae"
	then return "megaraptora"

	elseif raw_taxon == "archaeornithes"
	or     raw_taxon == "archaeopterygiformes"
	or     raw_taxon == "archaeopterygidae"
	or     raw_taxon == "anchiornithidae"
	or     raw_taxon == "deinonychosauria"
	then return "archaeornithes"

	elseif raw_taxon == "confuciusornithidae"
	or     raw_taxon == "confuciusornithiformes"
	then return "confuciusornithidae"

	elseif raw_taxon == "dromaeosauridae"
	or     raw_taxon == "dromaeosauria"
	or     raw_taxon == "dromaeosauriformes"
	then return "dromaeosauridae"

	elseif raw_taxon == "oviraptorosauria"
	or     raw_taxon == "oviraptoria"
	or     raw_taxon == "oviraptoriformes"
	then return "oviraptorosauria"

	elseif raw_taxon == "troodontidae"
	or     raw_taxon == "troodontia"
	or     raw_taxon == "troodontiformes"
	then return "troodontidae"

	elseif raw_taxon == "halszkaraptorinae"
	or     raw_taxon == "halszkaraptoridae"
	then return "halszkaraptorinae"

	elseif raw_taxon == "unenlagiidae"
	or     raw_taxon == "unenlagiinae"
	then return "unenlagiidae"

	elseif raw_taxon == "songlingornithidae"
	or     raw_taxon == "yanornithidae"
	then return "songlingornithidae"

	elseif raw_taxon == "ichthyornithidae"
	or     raw_taxon == "ichthyornithes"
	or     raw_taxon == "ichthyornithiformes"
	then return "ichthyornithidae"

	elseif raw_taxon == "hesperornithes"
	or     raw_taxon == "hesperornithiformes"
	then return "hesperornithes"

	elseif raw_taxon == "gastornithidae"
	or     raw_taxon == "gastornithiformes"
	then return "gastornithidae"

	elseif raw_taxon == "pelagornithidae"
	or     raw_taxon == "pelagornithiformes"
	or     raw_taxon == "odontopterygiformes"
	then return "pelagornithidae"

-- Archosauria ↑

	else return raw_taxon
	end
end

a.image = function(frame)
	local  taxon =  a.aliases(frame)

	if     taxon == "biota" then return "Geothelphusa dehaani.IMG 6491.jpg"

-- Basal Chordata ↓

	elseif taxon == "chordata"         then return "Flussneunauge.jpg"
	elseif taxon == "banffozoa"        then return "Banffia constricta.jpg"
	elseif taxon == "vetulicolia"      then return "Vetilicola cuneata reconstruction.png"
	elseif taxon == "myllokunmingiida" then return "Haikouichthys (Transparent).png"

	elseif taxon == "conodonta" then return "Panderodus.jpg"

	elseif taxon == "doliolida" then return "Doliolum denticulatum 001.png"

	elseif taxon == "ostracodermi" then return "Cyathaspididae - MUSE.jpg"
	elseif taxon == "thelodonti"   then return "Furcacauda fredholmae.png"

	elseif taxon == "anaspida"     then return "Anaspida (detail).png"
	elseif taxon == "myxini"       then return "Myxine glutinosa Gervais.jpg"
	elseif taxon == "petromyzonti" then return "Flussneunauge.jpg"

	elseif taxon == "galeaspida"     then return "Basal galeaspid reconstructions yang.png"
	elseif taxon == "osteostraci"    then return "Wladysagitta recon.png"
	elseif taxon == "placodermi"     then return "Brindabellaspis.png"
	elseif taxon == "antiarchi"      then return "Wufengshania.png"
	elseif taxon == "arthrodira"     then return "Amazichthys reconstruction.png"
	elseif taxon == "petalichthyida" then return "Lunaspis.png"
	elseif taxon == "ptyctodontidae" then return "Materpiscis.png"

-- Basal Chordata ↑

-- Chondrichthyes ↓

	elseif taxon == "chondrichthyes"     then return "Squalus acanthias Gervais.jpg"
	elseif taxon == "ischnacanthiformes" then return "Ischnacanthus gracilis.png"
	elseif taxon == "diplacanthiformes"  then return "Diplacanthus reconstructed.jpg"
	elseif taxon == "climatiiformes"     then return "Parexus sp.png"
	elseif taxon == "acanthodiformes"    then return "Acanthodes lopatini.png"
	elseif taxon == "omalodontiformes"   then return "Doliodus22DB.jpg"
	elseif taxon == "ctenacanthiformes"  then return "Dracopristis hoffmanorum.png"
	elseif taxon == "phoebodontiformes"  then return "Thrinacoselache gracia (cropped).jpg"
	elseif taxon == "symmoriiformes"     then return "Cobelodus SW.png"
	elseif taxon == "iniopterygidae"     then return "Iniopteryx sp.png"
	elseif taxon == "xenacanthiformes"   then return "Xenacanth.png"
	elseif taxon == "eugeneodontiformes" then return "Helicoprion reccon.png"
	elseif taxon == "hybodontiformes"    then return "Asteracanthus ornatissimus life restoration.jpg"
	elseif taxon == "petalodontiformes"  then return "Belantsea montana.png"

	elseif taxon == "chimaeriformes"     then return "Chimaera monstrosa1.jpg"

	elseif taxon == "rajiformes"         then return "Amblyraja radiata Gervais.jpg"
	elseif taxon == "sclerorhynchoidei"  then return "Onchopristis numida.png"
	elseif taxon == "pristidae"          then return "Pristis zysron Day Achilles 191.jpg"
	elseif taxon == "heterodontiformes"  then return "Heterodontus zebra.jpg"
	elseif taxon == "mitsukurinidae"     then return "Mitsukurina owstoni Fishes of Australia.jpg"
	elseif taxon == "alopiidae"          then return "Thresher shark (Duane Raver).png"
	elseif taxon == "isurus"             then return "Shortfin mako shark (Duane Raver).png"
	elseif taxon == "chlamydoselachidae" then return "Chlamydoselachus anguineus 3.jpg"
	elseif taxon == "pristiophoriformes" then return "Pristiophorus cirratus (cropped).jpg"
	elseif taxon == "squatiniformes"     then return "Squatina angelus - Gervais.jpg"
	elseif taxon == "dalatiidae"         then return "Dalatias licha1.jpg"
	elseif taxon == "squalidae"          then return "Squalus acanthias Gervais.jpg"

-- Chondrichthyes ↑

-- Basal Osteichthyes ↓

	elseif taxon == "maxillate placoderms" then return "Reconstruction of Entelognathus primordialis in lateral view.png"
	elseif taxon == "psarolepids"          then return "Guiyu oneiros.png"
	elseif taxon == "onychodontiformes"    then return "Strunius rolandi (cropped).jpg"
	elseif taxon == "porolepiformes"       then return "Durialepis edentatus DB.jpg"
	elseif taxon == "coelacanthi"          then return "Coelacanthus granulatus.png"
	elseif taxon == "dipnoi"               then return "Chinle fish Arganodus cropped cropped.png"

-- Basal Osteichthyes ↑

-- Actinopterygii ↓

	elseif taxon == "palaeonisciformes" then return "Gogosardina coatesi.png"
	elseif taxon == "polypteriformes"   then return "Cuvier-105-Polyptère.jpg"
	elseif taxon == "acipenseridae"     then return "Acipenser oxyrhynchus (edit).png"
	elseif taxon == "polyodontidae"     then return "Psephurus gladius.jpg"
	elseif taxon == "subholostei"       then return "Italopterus magnificus.png"

	elseif taxon == "ginglymodi"       then return "Seminotus elegans.png"
	elseif taxon == "dapediiformes"    then return "Dapedium pholidotumJW.png"
	elseif taxon == "macrosemiiformes" then return "Notagogus denticulatus.png"
	elseif taxon == "lepisosteiformes" then return "Alligator gar fish (white background).jpg"

	elseif taxon == "halecomorphi"        then return "Robustichthys 1.jpg"
	elseif taxon == "aspidorhynchiformes" then return "Aspidorhynchus 1904.png"
	elseif taxon == "caturiformes"        then return "Caturus furcatus.png"
	elseif taxon == "ionoscopiformes"     then return "Ionoscopus cyprinoides.png"
	elseif taxon == "pachycormiformes"    then return "Protosphyraena perniciosa.png"
	elseif taxon == "pycnodontiformes"    then return "Gyrodus hexagonus.png"
	elseif taxon == "amiiformes"          then return "Amia calva (white background).jpg"

	elseif taxon == "crossognathiformes" then return "Pachyrhizodus.png"
	elseif taxon == "ichthyodectiformes" then return "Xiphactinus audax.png"

	elseif taxon == "megalopidae"    then return "Tarpon.jpg"
	elseif taxon == "anguilliformes" then return "Conger conger Gervais.jpg"

	elseif taxon == "engraulidae"   then return "Engraulis encrasicolus Gervais.jpg"
	elseif taxon == "cobitoidei"    then return "Syncrossus hymenophysa Bleeker.jpg"
	elseif taxon == "gymnotoidei"   then return "Rhamphichthys marmoratus.jpg"
	elseif taxon == "serrasalminae" then return "F de Castelnau-poissonsPl37 (Serrasalmus humeralis).jpg"
	elseif taxon == "siluroidei"    then return "Black bullhead fish (white background).jpg"

	elseif taxon == "esox"             then return "Esox lucius1.jpg"
	elseif taxon == "opisthoproctidae" then return "Winteria telescopa.png"
	elseif taxon == "aulopiformes"     then return "Cimolichthys nepaholica.png"
	elseif taxon == "syngnathidae"     then return "Syngnathus typhle Gervais.jpg"
	elseif taxon == "gempylidae"       then return "Southern Pacific fishes illustrations by F.E. Clarke 115 2.jpg"
	elseif taxon == "thunnini"         then return "Blackfin tuna, Duane Raver Jr.jpg"
	elseif taxon == "carangiformes"    then return "Caranx latus 1.png"
	elseif taxon == "sphyraenidae"     then return "Great barracuda (Duane Raver).png"
	elseif taxon == "polynemidae"      then return "Eleutheronema tetradactylum Thomas (cropped).jpg"
	elseif taxon == "pleuronectoidei"  then return "Annual report (1903) (14751641692) 2.jpg"
	elseif taxon == "toxotidae"        then return "Archerfish (PSF).png"
	elseif taxon == "nematistiidae"    then return "Nematistius pectoralis.jpg"
	elseif taxon == "menidae"          then return "Mene maculata Ford 53.jpg"
	elseif taxon == "xiphioidea"       then return "Sailfish (Duane Raver).png"
	elseif taxon == "selene"           then return "Selene vomer.jpg"
	elseif taxon == "trachinotus"      then return "Trachinotus carolinus1.jpg"
	elseif taxon == "coryphaena"       then return "Coryphaena hippurus.png"
	elseif taxon == "echeneinae"       then return "Spearfish remora.jpg"
	elseif taxon == "mugilidae"        then return "Mugil cephalus.jpg"
	elseif taxon == "blennioidei"      then return "Clinus.jpg"
	elseif taxon == "epinephelidae"    then return "Snowy grouper (Duane Raver).png"
	elseif taxon == "luciopercini"     then return "Blue walleye.jpg"
	elseif taxon == "gasterosteinae"   then return "Brook stickleback.jpg"
	elseif taxon == "labridae"         then return "Bodianus sanguineus.jpg"
	elseif taxon == "sciaenidae"       then return "Freshwaterdrum (white background).png"
	elseif taxon == "diodontidae"      then return "Cyclichthys orbicularis.jpg"
	elseif taxon == "tetraodontidae"   then return "Tetraodon-hispidus.jpg"

-- Actinopterygii ↑

-- Basal Tetrapoda ↓

	elseif taxon == "osteolepiformes"   then return "Gogonasus BW.jpg"
	elseif taxon == "megalichthyidae"   then return "Megalichthys hibberti (cropped).jpg"
	elseif taxon == "rhizodontida"      then return "Barameda20DB.jpg"
	elseif taxon == "tristichopteridae" then return "Eusthenopteron BW.jpg"

	elseif taxon == "elpistostegalia" then return "Parmastega.png"
	elseif taxon == "aistopoda"       then return "Phlegethontia.jpg"
	elseif taxon == "ichthyostegalia" then return "Acanthostega gunnari.png"
	elseif taxon == "baphetoidea"     then return "Loxomma1DB.jpg"
	elseif taxon == "diplocaulidae"   then return "Diplocaulus recon.png"
	elseif taxon == "urocordylidae"   then return "Urocordylus.jpg"

	elseif taxon == "temnospondyli"    then return "Dendrerpeton DB.jpg"
	elseif taxon == "dvinosauria"      then return "Kourerpeton bradyi.png"
	elseif taxon == "dissorophoidea"   then return "DissorophusDB22.jpg"
	elseif taxon == "zatracheidae"     then return "Acanthostomatops vorax.jpg"
	elseif taxon == "eryopidae"        then return "Eryops1DB.jpg"
	elseif taxon == "archegosauroidea" then return "Bageherpeton longignathus.png"

	elseif taxon == "embolomeri"      then return "Diplovertebron BW.jpg"
	elseif taxon == "chroniosuchia"   then return "Chroniosuchus BW.jpg"
	elseif taxon == "seymouriamorpha" then return "Seymouria BW.jpg"

	elseif taxon == "protorothyrididae" then return "Hylonomus lyelli - MUSE.jpg"
	elseif taxon == "araeoscelidia"     then return "Petrolacosaurus BW.jpg"
	elseif taxon == "bolosauridae"      then return "Eudibamus BW.jpg"
	elseif taxon == "captorhinidae"     then return "Indosauriscus kuttyi.png"
	elseif taxon == "diadectomorpha"    then return "Limnoscelis BW.jpg"

-- Basal Tetrapoda ↑

-- Amphibia ↓

	elseif taxon == "microsauria"    then return "Nannaroter mckinziei.png"
	elseif taxon == "molgophidae"    then return "Lysorophus.jpg"
	elseif taxon == "albanerpetidae" then return "Albanerpeton.jpg"

-- Amphibia ↑

-- Basal Amniota ↓

	elseif taxon == "caseasauria" then return "Ennatosaurus BW.jpg"
	elseif taxon == "varanopidae" then return "VaranodonDB23.jpg"

-- Basal Amniota ↑

-- Synapsida ↓

	elseif taxon == "synapsida" then return "Dimetrodon grandis.png"

	elseif taxon == "ophiacodontidae"  then return "Clepsydrops colleti22DB.jpg"
	elseif taxon == "edaphosauridae"   then return "Gordodon kraineri.png"
	elseif taxon == "sphenacodontidae" then return "Dimetrodon grandis.png"

	elseif taxon == "biarmosuchia"   then return "Biarmosuchus BW.jpg"
	elseif taxon == "dinocephalia"   then return "Estemmenosuchus BW.jpg"
	elseif taxon == "anteosauria"    then return "Anteosaurus magnificus BW lateral.png"
	elseif taxon == "tapinocephalia" then return "Riebeeckosaurus longirostris.png"
	elseif taxon == "gorgonopsia"    then return "Inostrancevia africana.jpg"

	elseif taxon == "anomodontia"  then return "Galepus.jpg"
	elseif taxon == "dicynodontia" then return "Lisowicia bojani J..png"

	elseif taxon == "therocephalia"   then return "Scylacosaurus.jpg"
	elseif taxon == "scylacosauridae" then return "Scylacosaurus.jpg"
	elseif taxon == "akidnognathidae" then return "Euchambersia mirabilis.jpg"
	elseif taxon == "baurioidea"      then return "Bauria BW.jpg"
	elseif taxon == "whaitsiidae"     then return "Viatkosuchus sumini.jpg"

	elseif taxon == "cynodontia"        then return "Trucidocynodon riograndensis.jpg"
	elseif taxon == "trirachodontidae"  then return "Impidens.jpg"
	elseif taxon == "traversodontidae"  then return "Exaeretodon BW.jpg"
	elseif taxon == "chiniquodontidae"  then return "Probelesodon.jpg"
	elseif taxon == "ecteniniidae"      then return "Trucidocynodon riograndensis.jpg"
	elseif taxon == "tritheledontidae"  then return "Pachygenelus.jpg"
	elseif taxon == "tritylodontidae"   then return "Oligokyphus BW.jpg"
	elseif taxon == "morganucodontidae" then return "Morganucodon.jpg"
	elseif taxon == "docodontidae"      then return "Docofossor NT flipped.jpg"
	elseif taxon == "multituberculata"  then return "Taeniolabis NT small.jpg"
	elseif taxon == "amphilestidae"     then return "Jeholodens BW.jpg"
	elseif taxon == "gobiconodontidae"  then return "Repenomamus BW.jpg"
	elseif taxon == "volaticotheriidae" then return "Volaticotherium Life Reconstruction.png"
	elseif taxon == "meridiolestida"    then return "Cronopio NT.jpg"

	elseif taxon == "tachyglossidae" then return "Tachyglossus aculeatus-Cayley.jpg"

	elseif taxon == "deltatheroida" then return "Sulestes reconstruction.jpg"

	elseif taxon == "sparassodonta" then return "Thylacosmilus NT small.jpg"

	elseif taxon == "thylacinidae"    then return "Thylacinus cynocephalus white background.jpg"
	elseif taxon == "diprotodontidae" then return "Zygomaturus BW.jpg"
	elseif taxon == "thylacoleonidae" then return "Marsupial lion (Thylacoleo carnifex).png"
	elseif taxon == "sthenurinae"     then return "Sthenurus stirlingi.png"

	elseif taxon == "hyaenodonta"  then return "Hyaenodon NT small.jpg"
	elseif taxon == "leptictida"   then return "Leptictidium.png"
	elseif taxon == "mesonychia"   then return "Synoplotherium112DB.jpg"
	elseif taxon == "oxyaenodonta" then return "Patriofelis22DB.jpg"
	elseif taxon == "pantodonta"   then return "Barylambda-faberi.jpg"

	elseif taxon == "miacidae"         then return "Vulpavus (Phlaodectes) ovatus (coloured).jpg"
	elseif taxon == "amphicyonidae"    then return "Ysengrinia americana1.jpg"
	elseif taxon == "nimravidae"       then return "Hoplophoneus primaevus by R. B. Horsfall (coloured).jpg"
	elseif taxon == "machairodontinae" then return "Smilodon pop2 15.jpg"
	elseif taxon == "hesperocyoninae"  then return "Hesperocyon (white background).png"
	elseif taxon == "borophaginae"     then return "Epicyon haydeni 3.jpg"

	elseif taxon == "anagalidae" then return "Anagale gobiensis NT.jpg"

	elseif taxon == "embrithopoda" then return "Arsinoitherium by Antón.jpg"

	elseif taxon == "phenacodontidae"  then return "Tetraclaenodon puercensis.png"
	elseif taxon == "anthracobunia"    then return "Cambaytherium thewissi.png"
	elseif taxon == "brontotheriidae"  then return "Protitanops NT small.jpg"
	elseif taxon == "chalicotheriidae" then return "HesperotheriumJF.png"
	elseif taxon == "desmostylia"      then return "Behemotops proteus.png"
	elseif taxon == "lophiodontidae"   then return "Lophiodon leptorhyncum Life Reconstruction.png"
	elseif taxon == "palaeotheriidae"  then return "Palaeotherium medium Life Reconstruction.png"

	elseif taxon == "plesiadapiformes" then return "Plesiadapis NT.jpg"
	elseif taxon == "adapiformes"      then return "Darwinius NT.jpg"
	elseif taxon == "omomyiformes"     then return "TeilhardinaDB15.jpg"

-- Synapsida ↑

-- Misc. Sauropsida ↓

	elseif taxon == "sauropsida"       then return "Carbonodraco lundi.png"
	elseif taxon == "acleistorhinidae" then return "Carbonodraco lundi.png"
	elseif taxon == "pareiasauridae"   then return "Elginia BW.jpg"
	elseif taxon == "procolophonidae"  then return "Sclerosaurus1DB.jpg"
	elseif taxon == "millerettidae"    then return "Milleretta Gabriel Ugueto.png"
	elseif taxon == "younginidae"      then return "Youngina capensis.png"
	elseif taxon == "tangasauridae"    then return "Hovasaurus BW.jpg"
	elseif taxon == "weigeltisauridae" then return "Weigeltisaurus reconstruction.png"

	elseif taxon == "rhynchocephalia" then return "Hatteria white background.jpg"

	elseif taxon == "meiolaniidae"  then return "Meiolania turtle (Meiolania brevicollis).png"
	elseif taxon == "protostegidae" then return "Archelon1DB.jpg"

-- Misc. Sauropsida ↑

-- Archosauria ↓

	elseif taxon == "protorosauria"     then return "Protorosaurus speneri.png"
	elseif taxon == "tanysauria"        then return "Langobardisaurus pandolfii.png"
	elseif taxon == "drepanosauridae"   then return "Megalancosaurus BW.jpg"
	elseif taxon == "sharovipterygidae" then return "Sharovipteryx BW.jpg"
	elseif taxon == "trachelosauridae"  then return "Dinocephalosaurus skeletal reconstruction (cropped).png"
	elseif taxon == "trilophosauridae"  then return "Trilophosaurus buettneri (flipped).jpg"
	elseif taxon == "kuehneosauridae"   then return "Icarosaurus white background.jpg"
	elseif taxon == "azendohsauria"     then return "Shringasaurus indicus reconstruction.png"
	elseif taxon == "choristodera"      then return "Lazarussuchus .sp.png"
	elseif taxon == "rhynchosauria"     then return "Hyperodapedon sanjuanensis.png"

	elseif taxon == "proterosuchidae"   then return "Proterosuchus BW.jpg"
	elseif taxon == "erythrosuchia"     then return "Erythrosuchus.png"
	elseif taxon == "poposauroidea"     then return "Lotosaurus BW.jpg"
	elseif taxon == "euparkeriidae"     then return "Euparkeria white background.png"
	elseif taxon == "doswelliidae"      then return "Doswellia kaltenbachi life restoration.png"
	elseif taxon == "proterochampsidae" then return "Proterochampsa.jpg"

	elseif taxon == "lagerpetidae"            then return "Venetoraptor gassenae.png"
	elseif taxon == "pterosauria"             then return "Pterodactylus BMMS7 life.png"
	elseif taxon == "eudimorphodontidae"      then return "Eudimorphodon BW.jpg"
	elseif taxon == "dimorphodontidae"        then return "Dimorphodon-macronyx jconway.jpg"
	elseif taxon == "rhamphorhynchidae"       then return "Rhamphorhynchus DB.jpg"
	elseif taxon == "anurognathidae"          then return "Jeholopterus reconstruction.png"
	elseif taxon == "darwinoptera"            then return "Melkamter (life restoration).jpg"
	elseif taxon == "archaeopterodactyloidea" then return "Pterodactylus BMMS7 life.png"
	elseif taxon == "ctenochasmatidae"        then return "Pterodaustro guinazui.png"
	elseif taxon == "dsungaripteridae"        then return "Dsungaripterus weii.png"
	elseif taxon == "azhdarchoidea"           then return "Europejara restoration.png"
	elseif taxon == "pteranodontoidea"        then return "Ludodactylus.jpg"

	elseif taxon == "gracilisuchidae" then return "Turfanosuchus dabanensis.png"
	elseif taxon == "aetosauria"      then return "Restorations of Stagonolepis robertsoni, after skeletal by Hartman, 2016.jpg"
	elseif taxon == "erpetosuchidae"  then return "Erpetosuchus granti.png"
	elseif taxon == "ornithosuchidae" then return "Riojasuchus Skeletal.png"
	elseif taxon == "phytosauria"     then return "Smilosuchus adamanensis flipped.jpg"

	elseif taxon == "ornithischia"        then return "Archaeocursor asiaticus.png"
	elseif taxon == "silesauridae"        then return "Diodorus restoration.jpg"
	elseif taxon == "fabrosauridae"       then return "Archaeocursor asiaticus.png"
	elseif taxon == "heterodontosauridae" then return "Heterodontosaurus restoration.jpg"

	elseif taxon == "ankylosauria" then return "Ankylosaurus magniventris by sphenaphinae.png"
	elseif taxon == "stegosauria"  then return "Stegosaurus ungulatus.png"

	elseif taxon == "ceratopsia"           then return "Centrosaurus.png"
	elseif taxon == "elasmaria"            then return "Macrogryphosaurus life reconstruction.png"
	elseif taxon == "hypsilophodontia"     then return "Vectidromeus insularis 2.png"
	elseif taxon == "rhabdodontidae"       then return "Zalmoxes TD.png"
	elseif taxon == "iguanodontia"         then return "Edmontosaurus sp. reconstruction.PNG"
	elseif taxon == "thescelosauria"       then return "Thescelosaurus filamented.jpg"
	elseif taxon == "pachycephalosauridae" then return "Stegoceras validum.jpg"
	elseif taxon == "tenontosauridae"      then return "Tenontosaurus BW.jpg"

	elseif taxon == "saturnaliidae"   then return "Buriolestes schultzi restoration.png"
	elseif taxon == "prosauropoda"    then return "Jingshanosaurus xinwaensis.png"
	elseif taxon == "sauropoda"       then return "Shunosaurus life restoration.jpg"

	elseif taxon == "rauisuchia"   then return "Rauisuchus tiradentes.jpg"
	elseif taxon == "aphanosauria" then return "Teleocrater v1.png"

	elseif taxon == "sphenosuchia"    then return "Hesperosuchus flipped.jpg"
	elseif taxon == "protosuchia"     then return "Hoplosuchus.jpg"
	elseif taxon == "shartegosuchia"  then return "Sichuanosuchus BW.jpg"
	elseif taxon == "thalattosuchia"  then return "Suchodus durobrivense.jpg"
	elseif taxon == "notosuchia"      then return "Notosuchus BW.jpg"
	elseif taxon == "baurusuchidae"   then return "Campinasuchus.png"
	elseif taxon == "peirosauria"     then return "Kostensuchus Simple Restoration.png"
	elseif taxon == "sebecidae"       then return "Sebecus.jpg"
	elseif taxon == "uruguaysuchidae" then return "Araripesuchus wegeneri.jpg"

	elseif taxon == "atoposauridae"    then return "Knoetschkesuchus2.jpg"
	elseif taxon == "goniopholididae"  then return "Eutretauranosuchus delfsi.png"
	elseif taxon == "pholidosauridae"  then return "Oceanosuchus.jpg"
	elseif taxon == "paralligatoridae" then return "Paralligator major.jpg"
	elseif taxon == "dyrosauridae"     then return "Dyrosaurus BW.jpg"
	elseif taxon == "hylaeochampsidae" then return "Iharkutosuchus.png"
	elseif taxon == "allodaposuchidae" then return "Allodaposuchus BW.jpg"
	elseif taxon == "thoracosauridae"  then return "Argochampsa krebsi.png"
	elseif taxon == "alligatoridae"    then return "Alligator white background.jpg"
	elseif taxon == "caimanidae"       then return "Caiman crocodilus llanos white background.JPG"
	elseif taxon == "crocodylidae"     then return "Nile crocodile white background.jpg"
	elseif taxon == "gavialidae"       then return "Gavialis gangeticus (Gharial, Gavial) white background.jpg"

	elseif taxon == "herrerasauria"   then return "Herresaurus.png"
	elseif taxon == "coelophysoidea"  then return "Life reconstruction of Dilophosaurus wetherilli.png"
	elseif taxon == "ceratosauria"    then return "Life reconstruction of Ceratosaurus nasicornis.png"
	elseif taxon == "abelisauridae"   then return "Carnotaurus Reconstruction (2022).png"
	elseif taxon == "elaphrosauridae" then return "Limusaurus runner.jpg"
	elseif taxon == "noasauridae"     then return "Velocisaurus.jpg"

	elseif taxon == "megalosauridae"        then return "Torvosaurus tanneri Reconstruction.png"
	elseif taxon == "spinosauridae"         then return "Spinosaurus mirabilis.png"
	elseif taxon == "metriacanthosauridae"  then return "Alpkarakush kyrgyzicus.png"
	elseif taxon == "carcharodontosauridae" then return "Tameryraptor markgrafi.png"
	elseif taxon == "alvarezsauria"         then return "Patagonykuspuertai.jpg"
	elseif taxon == "ornithomimosauria"     then return "Deinocheirus Restoration.png"
	elseif taxon == "therizinosauria"       then return "Segnosaurus Restoration (plantigrade).png"
	elseif taxon == "tyrannosauria"         then return "Sinotyrannus kazuoensis.png"
	elseif taxon == "eutyrannosauria"       then return "Life reconstruction of Tyrannosaurus rex specimen TMP 1981.006.0001 (\"Black Beauty\").png"
	elseif taxon == "megaraptora"           then return "Joaquinraptor casali.png"

	elseif taxon == "archaeornithes"      then return "Archaeopteryx lithographica - Pedro José Salas Fontelles (flipped).jpg"
	elseif taxon == "scansoriopterygidae" then return "Ambopteryx restoration.png"
	elseif taxon == "confuciusornithidae" then return "Confuciusornis sanctus mmartyniuk.png"
	elseif taxon == "dromaeosauridae"     then return "M zhaoianus.png"
	elseif taxon == "eudromaeosauria"     then return "Dromaeosaurus Restoration.png"
	elseif taxon == "oviraptorosauria"    then return "Corythoraptor Restoration.png"
	elseif taxon == "troodontidae"        then return "Zanabazar.jpg"
	elseif taxon == "halszkaraptorinae"   then return "Mahakala omnogovae no background.png"
	elseif taxon == "unenlagiidae"        then return "Austroraptor Reconstruction.jpg"

	elseif taxon == "enantiornithes"  then return "Cruralispennia reconstruction.tif"
	elseif taxon == "avisauridae"     then return "Reconstruction of an avisaurid (e.g., A. darwini).png"
	elseif taxon == "bohaiornithidae" then return "Neobohaiornis TD.png"
	elseif taxon == "longipterygidae" then return "Life reconstruction of Longipteryx.png"
	elseif taxon == "pengornithidae"  then return "Chiappeavis magnapremaxillo.png"

	elseif taxon == "hongshanornithidae" then return "Hongshanornis.jpg"
	elseif taxon == "songlingornithidae" then return "Yanornis recon.png"
	elseif taxon == "ichthyornithidae"   then return "Ichthyornis restoration.jpeg"
	elseif taxon == "hesperornithes"     then return "Hesperornis TD.png"
	elseif taxon == "gastornithidae"     then return "Gastornis giganteus restoration.jpeg"
	elseif taxon == "pelagornithidae"    then return "Pelagornis chilensis EF.jpg"

	elseif taxon == "presbyornithidae" then return "Presbyornis Enhancement.jpg"
	elseif taxon == "dromornithidae"   then return "Genyornis BW.jpg"

	elseif taxon == "teratornithidae" then return "Argentavis magnificens.png"

	elseif taxon == "phorusrhacidae" then return "Phorusrhacos longissimusDB24.jpg"

	elseif taxon == "plotopteridae" then return "Klallamornis.jpg"

-- Archosauria ↑

	else return "Geothelphusa dehaani.IMG 6491.jpg"

	end
end

a.image_size = function(frame)
	local  taxon =  a.aliases(frame)

	if     taxon == "petalichthyida"     then return "60px"
	elseif taxon == "diplacanthiformes"  then return "50px"
	elseif taxon == "urocordylidae"      then return "50px"
	elseif taxon == "temnospondyli"      then return "50px"
	elseif taxon == "anomodontia"        then return "50px"
	elseif taxon == "volaticotheriidae"  then return "60px"
	elseif taxon == "thylacoleonidae"    then return "60px"
	elseif taxon == "omomyiformes"       then return "50px"
	elseif taxon == "meiolaniidae"       then return "60px"
	elseif taxon == "ctenochasmatidae"   then return "60px"
	elseif taxon == "dsungaripteridae"   then return "50px"
	elseif taxon == "hongshanornithidae" then return "50px"
	elseif taxon == "gastornithidae"     then return "50px"
	elseif taxon == "presbyornithidae"   then return "50px"
	elseif taxon == "dromornithidae"     then return "50px"
	elseif taxon == "plotopteridae"      then return "50px"

	else return "75px"
	end
end

a.image_style = function(frame)
	local  taxon =  a.aliases(frame)

	if     taxon == "myllokunmingiida"
	or     taxon == "conodonta"
	or     taxon == "doliolida"
	or     taxon == "ostracodermi"
	or     taxon == "thelodonti"
	or     taxon == "anaspida"
	or     taxon == "osteostraci"
	or     taxon == "placodermi"
	or     taxon == "antiarchi"
	or     taxon == "arthrodira"
	or     taxon == "petalichthyida"

	or     taxon == "diplacanthiformes"
	or     taxon == "climatiiformes"
	or     taxon == "omalodontiformes"
	or     taxon == "ctenacanthiformes"
	or     taxon == "phoebodontiformes"
	or     taxon == "symmoriiformes"
	or     taxon == "iniopterygidae"
	or     taxon == "xenacanthiformes"
	or     taxon == "hybodontiformes"
	or     taxon == "petalodontiformes"
	or     taxon == "sclerorhynchoidei"
	or     taxon == "pristidae"
	or     taxon == "heterodontiformes"
	or     taxon == "mitsukurinidae"
	or     taxon == "alopiidae"
	or     taxon == "isurus"
	or     taxon == "chlamydoselachidae"
	or     taxon == "dalatiidae"

	or     taxon == "maxillate placoderms"
	or     taxon == "psarolepids"
	or     taxon == "onychodontiformes"
	or     taxon == "porolepiformes"
	or     taxon == "dipnoi"

	or     taxon == "acipenseridae"
	or     taxon == "subholostei"
	or     taxon == "ginglymodi"
	or     taxon == "macrosemiiformes"
	or     taxon == "ionoscopiformes"
	or     taxon == "pycnodontiformes"
	or     taxon == "megalopidae"
	or     taxon == "anguilliformes"
	or     taxon == "cobitoidei"
	or     taxon == "gymnotoidei"
	or     taxon == "esox"
	or     taxon == "opisthoproctidae"
	or     taxon == "gempylidae"
	or     taxon == "thunnini"
	or     taxon == "carangiformes"
	or     taxon == "sphyraenidae"
	or     taxon == "polynemidae"
	or     taxon == "toxotidae"
	or     taxon == "nematistiidae"
	or     taxon == "menidae"
	or     taxon == "xiphioidea"
	or     taxon == "selene"
	or     taxon == "trachinotus"
	or     taxon == "coryphaena"
	or     taxon == "echeneinae"
	or     taxon == "mugilidae"
	or     taxon == "blennioidei"
	or     taxon == "epinephelidae"
	or     taxon == "luciopercini"
	or     taxon == "gasterosteinae"
	or     taxon == "labridae"
	or     taxon == "tetraodontidae"

	or     taxon == "tristichopteridae"
	or     taxon == "aistopoda"
	or     taxon == "baphetoidea"
	or     taxon == "temnospondyli"
	or     taxon == "seymouriamorpha"
	or     taxon == "protorothyrididae"
	or     taxon == "araeoscelidia"
	or     taxon == "captorhinidae"
	or     taxon == "albanerpetidae"
	or     taxon == "caseasauria"
	or     taxon == "varanopidae"

	or     taxon == "synapsida"
	or     taxon == "ophiacodontidae"
	or     taxon == "edaphosauridae"
	or     taxon == "sphenacodontidae"
	or     taxon == "tapinocephalia"
	or     taxon == "gorgonopsia"
	or     taxon == "anomodontia"
	or     taxon == "dicynodontia"
	or     taxon == "therocephalia"
	or     taxon == "scylacosauridae"
	or     taxon == "akidnognathidae"
	or     taxon == "cynodontia"
	or     taxon == "trirachodontidae"
	or     taxon == "traversodontidae"
	or     taxon == "chiniquodontidae"
	or     taxon == "ecteniniidae"
	or     taxon == "tritheledontidae"
	or     taxon == "tritylodontidae"
	or     taxon == "morganucodontidae"
	or     taxon == "docodontidae"
	or     taxon == "multituberculata"
	or     taxon == "amphilestidae"
	or     taxon == "volaticotheriidae"
	or     taxon == "deltatheroida"
	or     taxon == "sparassodonta"
	or     taxon == "diprotodontidae"
	or     taxon == "thylacoleonidae"
	or     taxon == "sthenurinae"
	or     taxon == "pantodonta"
	or     taxon == "amphicyonidae"
	or     taxon == "borophaginae"
	or     taxon == "embrithopoda"
	or     taxon == "anagalidae"
	or     taxon == "phenacodontidae"
	or     taxon == "anthracobunia"
	or     taxon == "brontotheriidae"
	or     taxon == "chalicotheriidae"
	or     taxon == "desmostylia"
	or     taxon == "plesiadapiformes"
	or     taxon == "adapiformes"

	or     taxon == "pareiasauridae"
	or     taxon == "millerettidae"
	or     taxon == "younginidae"
	or     taxon == "tangasauridae"
	or     taxon == "weigeltisauridae"

	or     taxon == "protorosauria"
	or     taxon == "tanysauria"
	or     taxon == "sharovipterygidae"
	or     taxon == "trachelosauridae"
	or     taxon == "azendohsauria"
	or     taxon == "rhynchosauria"
	or     taxon == "erythrosuchia"
	or     taxon == "euparkeriidae"
	or     taxon == "doswelliidae"
	or     taxon == "proterochampsidae"
	or     taxon == "dimorphodontidae"
	or     taxon == "anurognathidae"
	or     taxon == "darwinoptera"
	or     taxon == "ctenochasmatidae"
	or     taxon == "dsungaripteridae"
	or     taxon == "pteranodontoidea"
	or     taxon == "aetosauria"
	or     taxon == "ornithischia"
	or     taxon == "silesauridae"
	or     taxon == "fabrosauridae"
	or     taxon == "heterodontosauridae"
	or     taxon == "ankylosauria"
	or     taxon == "stegosauria"
	or     taxon == "elasmaria"
	or     taxon == "hypsilophodontia"
	or     taxon == "thescelosauria"
	or     taxon == "pachycephalosauridae"
	or     taxon == "tenontosauridae"
	or     taxon == "saturnaliidae"
	or     taxon == "aphanosauria"
	or     taxon == "protosuchia"
	or     taxon == "shartegosuchia"
	or     taxon == "peirosauria"
	or     taxon == "sebecidae"
	or     taxon == "atoposauridae"
	or     taxon == "goniopholididae"
	or     taxon == "paralligatoridae"
	or     taxon == "dyrosauridae"
	or     taxon == "allodaposuchidae"
	or     taxon == "thoracosauridae"
	or     taxon == "herrerasauria"
	or     taxon == "coelophysoidea"
	or     taxon == "ceratosauria"
	or     taxon == "elaphrosauridae"
	or     taxon == "noasauridae"
	or     taxon == "megalosauridae"
	or     taxon == "spinosauridae"
	or     taxon == "metriacanthosauridae"
	or     taxon == "carcharodontosauridae"
	or     taxon == "alvarezsauria"
	or     taxon == "ornithomimosauria"
	or     taxon == "therizinosauria"
	or     taxon == "tyrannosauria"
	or     taxon == "eutyrannosauria"
	or     taxon == "megaraptora"
	or     taxon == "scansoriopterygidae"
	or     taxon == "dromaeosauridae"
	or     taxon == "eudromaeosauria"
	or     taxon == "oviraptorosauria"
	or     taxon == "troodontidae"
	or     taxon == "halszkaraptorinae"
	or     taxon == "enantiornithes"
	or     taxon == "pengornithidae"
	or     taxon == "hongshanornithidae"
	or     taxon == "ichthyornithidae"
	or     taxon == "gastornithidae"
	or     taxon == "pelagornithidae"
	or     taxon == "plotopteridae"

	then return "display:inline-block; transform: scaleX(-1);"

	end
end

a.info_colour = function(frame)
	local  taxon =  a.aliases(frame)

	if     taxon == "biota" then return "navajowhite"

-- Basal Chordata ↓

	elseif taxon == "chordata"         then return "wheat"
	elseif taxon == "banffozoa"        then return "mistyrose"
	elseif taxon == "vetulicolia"      then return "linen"
	elseif taxon == "myllokunmingiida" then return "mistyrose"

	elseif taxon == "conodonta" then return "lightsalmon"

	elseif taxon == "doliolida" then return "linen"

	elseif taxon == "ostracodermi" then return "cornsilk"
	elseif taxon == "thelodonti"   then return "honeydew"

	elseif taxon == "anaspida"     then return "mistyrose"
	elseif taxon == "myxini"       then return "burlywood"
	elseif taxon == "petromyzonti" then return "wheat"

	elseif taxon == "galeaspida"     then return "lemonchiffon"
	elseif taxon == "osteostraci"    then return "navajowhite"
	elseif taxon == "placodermi"     then return "honeydew"
	elseif taxon == "antiarchi"      then return "aliceblue"
	elseif taxon == "arthrodira"     then return "paleturquoise"
	elseif taxon == "petalichthyida" then return "tan"
	elseif taxon == "ptyctodontidae" then return "lightblue"

-- Basal Chordata ↑

-- Chondrichthyes ↓

	elseif taxon == "chondrichthyes"     then return "navajowhite"
	elseif taxon == "ischnacanthiformes" then return "palegoldenrod"
	elseif taxon == "diplacanthiformes"  then return "honeydew"
	elseif taxon == "climatiiformes"     then return "aliceblue"
	elseif taxon == "acanthodiformes"    then return "beige"
	elseif taxon == "omalodontiformes"   then return "lemonchiffon"
	elseif taxon == "ctenacanthiformes"  then return "mistyrose"
	elseif taxon == "phoebodontiformes"  then return "thistle"
	elseif taxon == "symmoriiformes"     then return "cornsilk"
	elseif taxon == "iniopterygidae"     then return "linen"
	elseif taxon == "xenacanthiformes"   then return "honeydew"
	elseif taxon == "eugeneodontiformes" then return "lightblue"
	elseif taxon == "hybodontiformes"    then return "lightcyan"
	elseif taxon == "petalodontiformes"  then return "seashell"

	elseif taxon == "chimaeriformes"     then return "rosybrown"

	elseif taxon == "rajiformes"         then return "linen"
	elseif taxon == "sclerorhynchoidei"  then return "lightblue"
	elseif taxon == "pristidae"          then return "lightsteelblue"
	elseif taxon == "heterodontiformes"  then return "seashell"
	elseif taxon == "mitsukurinidae"     then return "tan"
	elseif taxon == "alopiidae"          then return "lightblue"
	elseif taxon == "isurus"             then return "lightskyblue"
	elseif taxon == "chlamydoselachidae" then return "wheat"
	elseif taxon == "pristiophoriformes" then return "beige"
	elseif taxon == "squatiniformes"     then return "lemonchiffon"
	elseif taxon == "dalatiidae"         then return "lightsteelblue"
	elseif taxon == "squalidae"          then return "navajowhite"

-- Chondrichthyes ↑

-- Basal Osteichthyes ↓

	elseif taxon == "maxillate placoderms" then return "lightsteelblue"
	elseif taxon == "psarolepids"          then return "linen"
	elseif taxon == "onychodontiformes"    then return "lightcoral"
	elseif taxon == "porolepiformes"       then return "thistle"
	elseif taxon == "coelacanthi"          then return "lightblue"
	elseif taxon == "dipnoi"               then return "beige"

-- Basal Osteichthyes ↑

-- Actinopterygii ↓

	elseif taxon == "palaeonisciformes" then return "palegoldenrod"
	elseif taxon == "polypteriformes"   then return "wheat"
	elseif taxon == "acipenseridae"     then return "seashell"
	elseif taxon == "polyodontidae"     then return "beige"
	elseif taxon == "subholostei"       then return "lightblue"

	elseif taxon == "ginglymodi"       then return "lemonchiffon"
	elseif taxon == "dapediiformes"    then return "aliceblue"
	elseif taxon == "macrosemiiformes" then return "wheat"
	elseif taxon == "lepisosteiformes" then return "darkseagreen"

	elseif taxon == "halecomorphi"        then return "lightsteelblue"
	elseif taxon == "aspidorhynchiformes" then return "linen"
	elseif taxon == "caturiformes"        then return "ivory"
	elseif taxon == "ionoscopiformes"     then return "lightcyan"
	elseif taxon == "pachycormiformes"    then return "thistle"
	elseif taxon == "pycnodontiformes"    then return "cornsilk"
	elseif taxon == "amiiformes"          then return "wheat"

	elseif taxon == "crossognathiformes" then return "lightyellow"
	elseif taxon == "ichthyodectiformes" then return "lightblue"

	elseif taxon == "megalopidae"    then return "linen"
	elseif taxon == "anguilliformes" then return "tan"

	elseif taxon == "engraulidae"   then return "lemonchiffon"
	elseif taxon == "cobitoidei"    then return "palegoldenrod"
	elseif taxon == "gymnotoidei"   then return "tan"
	elseif taxon == "serrasalminae" then return "lightcoral"
	elseif taxon == "siluroidei"    then return "thistle"

	elseif taxon == "esox"             then return "wheat"
	elseif taxon == "opisthoproctidae" then return "beige"
	elseif taxon == "aulopiformes"     then return "darkseagreen"
	elseif taxon == "syngnathidae"     then return "burlywood"
	elseif taxon == "gempylidae"       then return "honeydew"
	elseif taxon == "thunnini"         then return "lightblue"
	elseif taxon == "carangiformes"    then return "cornsilk"
	elseif taxon == "sphyraenidae"     then return "lemonchiffon"
	elseif taxon == "polynemidae"      then return "beige"
	elseif taxon == "pleuronectoidei"  then return "burlywood"
	elseif taxon == "toxotidae"        then return "linen"
	elseif taxon == "nematistiidae"    then return "lightskyblue"
	elseif taxon == "menidae"          then return "lightsteelblue"
	elseif taxon == "xiphioidea"       then return "wheat"
	elseif taxon == "selene"           then return "linen"
	elseif taxon == "trachinotus"      then return "lightsalmon"
	elseif taxon == "coryphaena"       then return "darkseagreen"
	elseif taxon == "echeneinae"       then return "aliceblue"
	elseif taxon == "mugilidae"        then return "lightgray"
	elseif taxon == "blennioidei"      then return "darksalmon"
	elseif taxon == "epinephelidae"    then return "rosybrown"
	elseif taxon == "luciopercini"     then return "bisque"
	elseif taxon == "gasterosteinae"   then return "beige"
	elseif taxon == "labridae"         then return "lightcoral"
	elseif taxon == "sciaenidae"       then return "beige"
	elseif taxon == "diodontidae"      then return "wheat"
	elseif taxon == "tetraodontidae"   then return "lemonchiffon"

-- Actinopterygii ↑

-- Basal Tetrapoda ↓

	elseif taxon == "osteolepiformes"   then return "darkseagreen"
	elseif taxon == "megalichthyidae"   then return "lemonchiffon"
	elseif taxon == "rhizodontida"      then return "lightgreen"
	elseif taxon == "tristichopteridae" then return "lightblue"

	elseif taxon == "elpistostegalia" then return "lightyellow"
	elseif taxon == "aistopoda"       then return "darksalmon"
	elseif taxon == "ichthyostegalia" then return "tan"
	elseif taxon == "baphetoidea"     then return "rosybrown"
	elseif taxon == "diplocaulidae"   then return "lightcoral"
	elseif taxon == "urocordylidae"   then return "palegoldenrod"

	elseif taxon == "temnospondyli"    then return "darkseagreen"
	elseif taxon == "dvinosauria"      then return "antiquewhite"
	elseif taxon == "dissorophoidea"   then return "navajowhite"
	elseif taxon == "zatracheidae"     then return "tan"
	elseif taxon == "eryopidae"        then return "bisque"
	elseif taxon == "archegosauroidea" then return "burlywood"

	elseif taxon == "embolomeri"      then return "thistle"
	elseif taxon == "chroniosuchia"   then return "darkseagreen"
	elseif taxon == "seymouriamorpha" then return "lightsalmon"

	elseif taxon == "protorothyrididae" then return "lightcoral"
	elseif taxon == "araeoscelidia"     then return "darkseagreen"
	elseif taxon == "bolosauridae"      then return "lemonchiffon"
	elseif taxon == "captorhinidae"     then return "mistyrose"
	elseif taxon == "diadectomorpha"    then return "mediumaquamarine"

-- Basal Tetrapoda ↑

-- Amphibia ↓

	elseif taxon == "microsauria"    then return "burlywood"
	elseif taxon == "molgophidae"    then return "lightsteelblue"
	elseif taxon == "albanerpetidae" then return "linen"

-- Amphibia ↑

-- Basal Amniota ↓

	elseif taxon == "caseasauria" then return "beige"
	elseif taxon == "varanopidae" then return "darksalmon"

-- Basal Amniota ↑

-- Synapsida ↓

	elseif taxon == "synapsida" then return "darkseagreen"

	elseif taxon == "ophiacodontidae"  then return "navajowhite"
	elseif taxon == "edaphosauridae"   then return "darkturquoise"
	elseif taxon == "sphenacodontidae" then return "darkseagreen"

	elseif taxon == "biarmosuchia"   then return "beige"
	elseif taxon == "dinocephalia"   then return "wheat"
	elseif taxon == "anteosauria"    then return "ghostwhite"
	elseif taxon == "tapinocephalia" then return "blanchedalmond"
	elseif taxon == "gorgonopsia"    then return "lemonchiffon"

	elseif taxon == "anomodontia"  then return "honeydew"
	elseif taxon == "dicynodontia" then return "tan"

	elseif taxon == "therocephalia"   then return "darksalmon"
	elseif taxon == "scylacosauridae" then return "darksalmon"
	elseif taxon == "akidnognathidae" then return "navajowhite"
	elseif taxon == "baurioidea"      then return "palevioletred"
	elseif taxon == "whaitsiidae"     then return "thistle"

	elseif taxon == "cynodontia"        then return "cornsilk"
	elseif taxon == "trirachodontidae"  then return "linen"
	elseif taxon == "traversodontidae"  then return "beige"
	elseif taxon == "chiniquodontidae"  then return "wheat"
	elseif taxon == "ecteniniidae"      then return "cornsilk"
	elseif taxon == "tritheledontidae"  then return "mistyrose"
	elseif taxon == "tritylodontidae"   then return "linen"
	elseif taxon == "morganucodontidae" then return "rosybrown"
	elseif taxon == "docodontidae"      then return "thistle"
	elseif taxon == "multituberculata"  then return "navajowhite"
	elseif taxon == "amphilestidae"     then return "seashell"
	elseif taxon == "gobiconodontidae"  then return "blanchedalmond"
	elseif taxon == "volaticotheriidae" then return "darkseagreen"
	elseif taxon == "meridiolestida"    then return "aliceblue"

	elseif taxon == "tachyglossidae" then return "navajowhite"

	elseif taxon == "deltatheroida" then return "cornsilk"

	elseif taxon == "sparassodonta" then return "mistyrose"

	elseif taxon == "thylacinidae"    then return "wheat"
	elseif taxon == "diprotodontidae" then return "beige"
	elseif taxon == "thylacoleonidae" then return "honeydew"
	elseif taxon == "sthenurinae"     then return "ghostwhite"

	elseif taxon == "hyaenodonta"  then return "linen"
	elseif taxon == "leptictida"   then return "aliceblue"
	elseif taxon == "mesonychia"   then return "thistle"
	elseif taxon == "oxyaenodonta" then return "lightyellow"
	elseif taxon == "pantodonta"   then return "darksalmon"

	elseif taxon == "miacidae"         then return "bisque"
	elseif taxon == "amphicyonidae"    then return "beige"
	elseif taxon == "nimravidae"       then return "wheat"
	elseif taxon == "machairodontinae" then return "honeydew"
	elseif taxon == "hesperocyoninae"  then return "lightyellow"
	elseif taxon == "borophaginae"     then return "cornsilk"

	elseif taxon == "anagalidae" then return "navajowhite"

	elseif taxon == "embrithopoda" then return "ghostwhite"

	elseif taxon == "phenacodontidae"  then return "navajowhite"
	elseif taxon == "anthracobunia"    then return "wheat"
	elseif taxon == "brontotheriidae"  then return "bisque"
	elseif taxon == "chalicotheriidae" then return "rosybrown"
	elseif taxon == "desmostylia"      then return "darkseagreen"
	elseif taxon == "lophiodontidae"   then return "thistle"
	elseif taxon == "palaeotheriidae"  then return "burlywood"

	elseif taxon == "plesiadapiformes" then return "wheat"
	elseif taxon == "adapiformes"      then return "lemonchiffon"
	elseif taxon == "omomyiformes"     then return "lavenderblush"

-- Synapsida ↑

-- Misc. Sauropsida ↓

	elseif taxon == "sauropsida"       then return "blanchedalmond"
	elseif taxon == "acleistorhinidae" then return "blanchedalmond"
	elseif taxon == "pareiasauridae"   then return "lemonchiffon"
	elseif taxon == "procolophonidae"  then return "thistle"
	elseif taxon == "millerettidae"    then return "navajowhite"
	elseif taxon == "younginidae"      then return "lightblue"
	elseif taxon == "tangasauridae"    then return "wheat"
	elseif taxon == "weigeltisauridae" then return "darkseagreen"

	elseif taxon == "rhynchocephalia" then return "honeydew"

	elseif taxon == "meiolaniidae"  then return "wheat"
	elseif taxon == "protostegidae" then return "lightsteelblue"

-- Misc. Sauropsida ↑

-- Archosauria ↓

	elseif taxon == "protorosauria"     then return "navajowhite"
	elseif taxon == "tanysauria"        then return "lightsteelblue"
	elseif taxon == "drepanosauridae"   then return "wheat"
	elseif taxon == "sharovipterygidae" then return "burlywood"
	elseif taxon == "trachelosauridae"  then return "aliceblue"
	elseif taxon == "trilophosauridae"  then return "lightyellow"
	elseif taxon == "kuehneosauridae"   then return "darkseagreen"
	elseif taxon == "azendohsauria"     then return "lemonchiffon"
	elseif taxon == "choristodera"      then return "rosybrown"
	elseif taxon == "rhynchosauria"     then return "navajowhite"

	elseif taxon == "proterosuchidae"   then return "darkseagreen"
	elseif taxon == "erythrosuchia"     then return "lightcoral"
	elseif taxon == "poposauroidea"     then return "lightcoral"
	elseif taxon == "euparkeriidae"     then return "bisque"
	elseif taxon == "doswelliidae"      then return "darkseagreen"
	elseif taxon == "proterochampsidae" then return "ghostwhite"

	elseif taxon == "lagerpetidae"            then return "lemonchiffon"
	elseif taxon == "pterosauria"             then return "lightsteelblue"
	elseif taxon == "eudimorphodontidae"      then return "bisque"
	elseif taxon == "dimorphodontidae"        then return "linen"
	elseif taxon == "rhamphorhynchidae"       then return "mistyrose"
	elseif taxon == "anurognathidae"          then return "lightcoral"
	elseif taxon == "darwinoptera"            then return "navajowhite"
	elseif taxon == "archaeopterodactyloidea" then return "lightsteelblue"
	elseif taxon == "ctenochasmatidae"        then return "lightblue"
	elseif taxon == "dsungaripteridae"        then return "palegoldenrod"
	elseif taxon == "azhdarchoidea"           then return "darksalmon"
	elseif taxon == "pteranodontoidea"        then return "honeydew"

	elseif taxon == "gracilisuchidae" then return "darksalmon"
	elseif taxon == "aetosauria"      then return "tan"
	elseif taxon == "erpetosuchidae"  then return "honeydew"
	elseif taxon == "ornithosuchidae" then return "aliceblue"
	elseif taxon == "phytosauria"     then return "darkseagreen"

	elseif taxon == "ornithischia"        then return "rosybrown"
	elseif taxon == "silesauridae"        then return "wheat"
	elseif taxon == "fabrosauridae"       then return "rosybrown"
	elseif taxon == "heterodontosauridae" then return "navajowhite"

	elseif taxon == "ankylosauria" then return "burlywood"
	elseif taxon == "stegosauria"  then return "palegoldenrod"

	elseif taxon == "ceratopsia"           then return "bisque"
	elseif taxon == "elasmaria"            then return "ghostwhite"
	elseif taxon == "hypsilophodontia"     then return "mistyrose"
	elseif taxon == "rhabdodontidae"       then return "navajowhite"
	elseif taxon == "iguanodontia"         then return "beige"
	elseif taxon == "thescelosauria"       then return "tan"
	elseif taxon == "pachycephalosauridae" then return "rosybrown"
	elseif taxon == "tenontosauridae"      then return "wheat"

	elseif taxon == "saturnaliidae"   then return "honeydew"
	elseif taxon == "prosauropoda"    then return "darkseagreen"
	elseif taxon == "sauropoda"       then return "tan"

	elseif taxon == "rauisuchia"   then return "rosybrown"
	elseif taxon == "aphanosauria" then return "wheat"

	elseif taxon == "sphenosuchia"    then return "lemonchiffon"
	elseif taxon == "protosuchia"     then return "beige"
	elseif taxon == "shartegosuchia"  then return "darksalmon"
	elseif taxon == "thalattosuchia"  then return "lightblue"
	elseif taxon == "notosuchia"      then return "darkseagreen"
	elseif taxon == "baurusuchidae"   then return "tan"
	elseif taxon == "peirosauria"     then return "lightyellow"
	elseif taxon == "sebecidae"       then return "navajowhite"
	elseif taxon == "uruguaysuchidae" then return "ghostwhite"

	elseif taxon == "atoposauridae"    then return "linen"
	elseif taxon == "goniopholididae"  then return "darksalmon"
	elseif taxon == "pholidosauridae"  then return "rosybrown"
	elseif taxon == "paralligatoridae" then return "navajowhite"
	elseif taxon == "dyrosauridae"     then return "beige"
	elseif taxon == "hylaeochampsidae" then return "mistyrose"
	elseif taxon == "allodaposuchidae" then return "darkseagreen"
	elseif taxon == "thoracosauridae"  then return "lightblue"
	elseif taxon == "alligatoridae"    then return "lightsteelblue"
	elseif taxon == "caimanidae"       then return "blanchedalmond"
	elseif taxon == "crocodylidae"     then return "bisque"
	elseif taxon == "gavialidae"       then return "beige"

	elseif taxon == "herrerasauria"   then return "rosybrown"
	elseif taxon == "coelophysoidea"  then return "lightblue"
	elseif taxon == "ceratosauria"    then return "darksalmon"
	elseif taxon == "abelisauridae"   then return "burlywood"
	elseif taxon == "elaphrosauridae" then return "mistyrose"
	elseif taxon == "noasauridae"     then return "palegoldenrod"

	elseif taxon == "megalosauridae"        then return "cornsilk"
	elseif taxon == "spinosauridae"         then return "tan"
	elseif taxon == "metriacanthosauridae"  then return "wheat"
	elseif taxon == "carcharodontosauridae" then return "linen"
	elseif taxon == "alvarezsauria"         then return "navajowhite"
	elseif taxon == "ornithomimosauria"     then return "rosybrown"
	elseif taxon == "therizinosauria"       then return "beige"
	elseif taxon == "tyrannosauria"         then return "lightsteelblue"
	elseif taxon == "eutyrannosauria"       then return "darksalmon"
	elseif taxon == "megaraptora"           then return "rosybrown"

	elseif taxon == "archaeornithes"      then return "beige"
	elseif taxon == "scansoriopterygidae" then return "lightcoral"
	elseif taxon == "confuciusornithidae" then return "ghostwhite"
	elseif taxon == "dromaeosauridae"     then return "lightblue"
	elseif taxon == "eudromaeosauria"     then return "lightyellow"
	elseif taxon == "oviraptorosauria"    then return "darksalmon"
	elseif taxon == "troodontidae"        then return "honeydew"
	elseif taxon == "halszkaraptorinae"   then return "lightsteelblue"
	elseif taxon == "unenlagiidae"        then return "wheat"

	elseif taxon == "enantiornithes"  then return "darkseagreen"
	elseif taxon == "avisauridae"     then return "lemonchiffon"
	elseif taxon == "bohaiornithidae" then return "navajowhite"
	elseif taxon == "longipterygidae" then return "paleturquoise"
	elseif taxon == "pengornithidae"  then return "wheat"

	elseif taxon == "hongshanornithidae" then return "honeydew"
	elseif taxon == "songlingornithidae" then return "tan"
	elseif taxon == "ichthyornithidae"   then return "lemonchiffon"
	elseif taxon == "hesperornithes"     then return "lightsteelblue"
	elseif taxon == "gastornithidae"     then return "bisque"
	elseif taxon == "pelagornithidae"    then return "lightyellow"

	elseif taxon == "presbyornithidae" then return "ghostwhite"
	elseif taxon == "dromornithidae"   then return "lightsteelblue"

	elseif taxon == "teratornithidae" then return "wheat"

	elseif taxon == "phorusrhacidae" then return "mistyrose"

	elseif taxon == "plotopteridae" then return "lightblue"

-- Archosauria ↑

	else return "navajowhite"

	end
end

a.font_colour = function()
	return "black"
end

a.link = function(frame)
	local  taxon =  a.aliases(frame)

	if     taxon == "biota"            then return "organism"
	elseif taxon == "chordata"         then return "chordate"
	elseif taxon == "myllokunmingiida" then return "myllokunmingiidae"
	elseif taxon == "conodonta"        then return "conodont"
	elseif taxon == "ostracodermi"     then return "ostracoderm"
	elseif taxon == "myxini"           then return "hagfish"
	elseif taxon == "petromyzonti"     then return "lamprey"
	elseif taxon == "placodermi"       then return "placoderm"
	elseif taxon == "ptyctodontidae"   then return "ptyctodontida"

	elseif taxon == "iniopterygidae"     then return "iniopterygiformes"
	elseif taxon == "chimaeriformes"     then return "chimaera"
	elseif taxon == "pristidae"          then return "sawfish"
	elseif taxon == "isurus"             then return "mako shark"
	elseif taxon == "pristiophoriformes" then return "sawshark"

	elseif taxon == "coelacanthi" then return "coelacanth"
	elseif taxon == "dipnoi"      then return "lungfish"

	elseif taxon == "palaeonisciformes"   then return "palaeoniscoid"
	elseif taxon == "polypteriformes"     then return "bichir"
	elseif taxon == "acipenseridae"       then return "sturgeon"
	elseif taxon == "polyodontidae"       then return "paddlefish"
	elseif taxon == "dapediiformes"       then return "dapediidae"
	elseif taxon == "macrosemiiformes"    then return "macrosemiidae"
	elseif taxon == "lepisosteiformes"    then return "gar"
	elseif taxon == "aspidorhynchiformes" then return "aspidorhynchidae"
	elseif taxon == "caturiformes"        then return "caturoidea"
	elseif taxon == "ionoscopiformes"     then return "ionoscopidae"
	elseif taxon == "amiiformes"          then return "amiidae"
	elseif taxon == "anguilliformes"      then return "eel"
	elseif taxon == "engraulidae"         then return "anchovy"
	elseif taxon == "cobitoidei"          then return "loach"
	elseif taxon == "gymnotoidei"         then return "gymnotiformes"
	elseif taxon == "serrasalminae"       then return "piranha"
	elseif taxon == "siluroidei"          then return "catfish"
	elseif taxon == "opisthoproctidae"    then return "barreleye"
	elseif taxon == "thunnini"            then return "tuna"
	elseif taxon == "sphyraenidae"        then return "barracuda"
	elseif taxon == "polynemidae"         then return "threadfin"
	elseif taxon == "pleuronectoidei"     then return "flatfish"
	elseif taxon == "toxotidae"           then return "archerfish"
	elseif taxon == "nematistiidae"       then return "roosterfish"
	elseif taxon == "menidae"             then return "mene"
	elseif taxon == "xiphioidea"          then return "billfish"
	elseif taxon == "selene"              then return "selene (fish)"
	elseif taxon == "trachinotus"         then return "pompano"
	elseif taxon == "echeneinae"          then return "remora"
	elseif taxon == "mugilidae"           then return "mullet (fish)"
	elseif taxon == "epinephelidae"       then return "grouper"
	elseif taxon == "gasterosteinae"      then return "stickleback"
	elseif taxon == "labridae"            then return "wrasse"
	elseif taxon == "diodontidae"         then return "porcupinefish"

	elseif taxon == "molgophidae" then return "lysorophia"

	elseif taxon == "morganucodontidae" then return "morganucodonta"
	elseif taxon == "docodontidae"      then return "docodonta"
	elseif taxon == "volaticotheriidae" then return "volaticotherini"
	elseif taxon == "tachyglossidae"    then return "echidna"
	elseif taxon == "oxyaenodonta"      then return "oxyaenidae"
	elseif taxon == "omomyiformes"      then return "omomyidae"

	elseif taxon == "pareiasauridae" then return "pareiasauria"

	elseif taxon == "tanysauria"           then return "tanystropheidae"
	elseif taxon == "drepanosauridae"      then return "drepanosauromorpha"
	elseif taxon == "azendohsauria"        then return "azendohsauridae"
	elseif taxon == "erythrosuchia"        then return "erythrosuchidae"
	elseif taxon == "hypsilophodontia"     then return "hypsilophodontidae"
	elseif taxon == "iguanodontia"         then return "ornithopoda"
	elseif taxon == "thescelosauria"       then return "thescelosauridae"
	elseif taxon == "pachycephalosauridae" then return "pachycephalosauria"
	elseif taxon == "shartegosuchia"       then return "shartegosuchoidea"
	elseif taxon == "alligatoridae"        then return "alligatorinae"
	elseif taxon == "caimanidae"           then return "caiman"
	elseif taxon == "crocodylidae"         then return "crocodile"
	elseif taxon == "elaphrosauridae"      then return "elaphrosaurinae"
	elseif taxon == "alvarezsauria"        then return "alvarezsauroidea"
	elseif taxon == "tyrannosauria"        then return "tyrannosauroidea"
	elseif taxon == "ichthyornithidae"     then return "ichthyornithes"

	else return taxon
	end
end

a.link_text = function(frame)
	local  taxon =  a.aliases(frame)

	if     taxon == "biota" then return "organisms"

-- Basal Chordata ↓

	elseif taxon == "chordata"         then return "chordates"
	elseif taxon == "banffozoa"        then return "banffozoans"
	elseif taxon == "vetulicolia"      then return "vetulicolians"
	elseif taxon == "myllokunmingiida" then return "myllokunmingiids"

	elseif taxon == "conodonta" then return "conodonts"

	elseif taxon == "doliolida" then return "doliolids"

	elseif taxon == "ostracodermi" then return "ostracoderms"
	elseif taxon == "thelodonti"   then return "thelodonts"

	elseif taxon == "anaspida"     then return "anaspids"
	elseif taxon == "myxini"       then return "hagfish"
	elseif taxon == "petromyzonti" then return "lampreys"

	elseif taxon == "galeaspida"     then return "galeaspids"
	elseif taxon == "osteostraci"    then return "osteostracans"
	elseif taxon == "placodermi"     then return "placoderms"
	elseif taxon == "antiarchi"      then return "antiarchs"
	elseif taxon == "arthrodira"     then return "arthrodires"
	elseif taxon == "petalichthyida" then return "petalichthyids"
	elseif taxon == "ptyctodontidae" then return "ptyctodonts"

-- Basal Chordata ↑

-- Chondrichthyes ↓

	elseif taxon == "chondrichthyes"     then return "cartilaginous fish"
	elseif taxon == "ischnacanthiformes" then return "ischnacanths"
	elseif taxon == "diplacanthiformes"  then return "diplacanths"
	elseif taxon == "climatiiformes"     then return "climatiiforms"
	elseif taxon == "acanthodiformes"    then return "acanthodiforms"
	elseif taxon == "omalodontiformes"   then return "omalodonts"
	elseif taxon == "ctenacanthiformes"  then return "ctenacanths"
	elseif taxon == "phoebodontiformes"  then return "phoebodonts"
	elseif taxon == "symmoriiformes"     then return "symmoriiforms"
	elseif taxon == "iniopterygidae"     then return "iniopterygians"
	elseif taxon == "xenacanthiformes"   then return "xenacanths"
	elseif taxon == "eugeneodontiformes" then return "eugeneodonts"
	elseif taxon == "hybodontiformes"    then return "hybodonts"
	elseif taxon == "petalodontiformes"  then return "petalodonts"

	elseif taxon == "chimaeriformes"     then return "chimaeras"

	elseif taxon == "rajiformes"         then return "skates"
	elseif taxon == "sclerorhynchoidei"  then return "sawskates"
	elseif taxon == "pristidae"          then return "sawfish"
	elseif taxon == "heterodontiformes"  then return "bullhead sharks"
	elseif taxon == "mitsukurinidae"     then return "goblin sharks"
	elseif taxon == "alopiidae"          then return "thresher sharks"
	elseif taxon == "isurus"             then return "mako sharks"
	elseif taxon == "chlamydoselachidae" then return "frilled sharks"
	elseif taxon == "pristiophoriformes" then return "sawsharks"
	elseif taxon == "squatiniformes"     then return "angelsharks"
	elseif taxon == "dalatiidae"         then return "kitefin sharks"
	elseif taxon == "squalidae"          then return "dogfish"

-- Chondrichthyes ↑

-- Basal Osteichthyes ↓

	elseif taxon == "maxillate placoderms" then return "maxillate placoderms"
	elseif taxon == "psarolepids"          then return "psarolepids"
	elseif taxon == "onychodontiformes"    then return "onychodonts"
	elseif taxon == "porolepiformes"       then return "porolepiforms"
	elseif taxon == "coelacanthi"          then return "coelacanths"
	elseif taxon == "dipnoi"               then return "lungfish"

-- Basal Osteichthyes ↑

-- Actinopterygii ↓

	elseif taxon == "palaeonisciformes" then return "palaeoniscoids"
	elseif taxon == "polypteriformes"   then return "bichirs"
	elseif taxon == "acipenseridae"     then return "sturgeons"
	elseif taxon == "polyodontidae"     then return "paddlefish"
	elseif taxon == "subholostei"       then return "subholosteans"

	elseif taxon == "ginglymodi"       then return "ginglymodians"
	elseif taxon == "dapediiformes"    then return "dapediids"
	elseif taxon == "macrosemiiformes" then return "macrosemiids"
	elseif taxon == "lepisosteiformes" then return "gars"

	elseif taxon == "halecomorphi"        then return "halecomorphs"
	elseif taxon == "aspidorhynchiformes" then return "aspidorhynchids"
	elseif taxon == "caturiformes"        then return "caturoids"
	elseif taxon == "ionoscopiformes"     then return "ionoscopids"
	elseif taxon == "pachycormiformes"    then return "pachycormiforms"
	elseif taxon == "pycnodontiformes"    then return "pycnodonts"
	elseif taxon == "amiiformes"          then return "bowfin"

	elseif taxon == "crossognathiformes" then return "crossognathiforms"
	elseif taxon == "ichthyodectiformes" then return "ichthyodectiforms"

	elseif taxon == "megalopidae"    then return "tarpon"
	elseif taxon == "anguilliformes" then return "eels"

	elseif taxon == "engraulidae"   then return "anchovies"
	elseif taxon == "cobitoidei"    then return "loaches"
	elseif taxon == "gymnotoidei"   then return "Neotropical knifefish"
	elseif taxon == "serrasalminae" then return "piranhas"
	elseif taxon == "siluroidei"    then return "catfish"

	elseif taxon == "esox"             then return "pike"
	elseif taxon == "opisthoproctidae" then return "barreleyes"
	elseif taxon == "aulopiformes"     then return "aulopiforms"
	elseif taxon == "syngnathidae"     then return "pipefish"
	elseif taxon == "gempylidae"       then return "snake mackerels"
	elseif taxon == "thunnini"         then return "tuna"
	elseif taxon == "carangiformes"    then return "carangiforms"
	elseif taxon == "sphyraenidae"     then return "barracudas"
	elseif taxon == "polynemidae"      then return "threadfins"
	elseif taxon == "pleuronectoidei"  then return "flatfish"
	elseif taxon == "toxotidae"        then return "archerfish"
	elseif taxon == "nematistiidae"    then return "roosterfish"
	elseif taxon == "menidae"          then return "moonfish"
	elseif taxon == "xiphioidea"       then return "billfish"
	elseif taxon == "selene"           then return "lookdowns"
	elseif taxon == "trachinotus"      then return "pompanos"
	elseif taxon == "coryphaena"       then return "dolphinfish"
	elseif taxon == "echeneinae"       then return "remoras"
	elseif taxon == "mugilidae"        then return "grey mullets"
	elseif taxon == "blennioidei"      then return "blennies"
	elseif taxon == "epinephelidae"    then return "groupers"
	elseif taxon == "luciopercini"     then return "pikeperches"
	elseif taxon == "gasterosteinae"   then return "sticklebacks"
	elseif taxon == "labridae"         then return "wrasses"
	elseif taxon == "sciaenidae"       then return "drums"
	elseif taxon == "diodontidae"      then return "porcupinefish"
	elseif taxon == "tetraodontidae"   then return "pufferfish"

-- Actinopterygii ↑

-- Basal Tetrapoda ↓

	elseif taxon == "osteolepiformes"   then return "osteolepiforms"
	elseif taxon == "megalichthyidae"   then return "megalichthyids"
	elseif taxon == "rhizodontida"      then return "rhizodonts"
	elseif taxon == "tristichopteridae" then return "tristichopterids"

	elseif taxon == "elpistostegalia" then return "elpistostegalians"
	elseif taxon == "aistopoda"       then return "aistopods"
	elseif taxon == "ichthyostegalia" then return "ichthyostegalians"
	elseif taxon == "baphetoidea"     then return "baphetoids"
	elseif taxon == "diplocaulidae"   then return "diplocaulids"
	elseif taxon == "urocordylidae"   then return "urocordylids"

	elseif taxon == "temnospondyli"    then return "temnospondyls"
	elseif taxon == "dvinosauria"      then return "dvinosaurs"
	elseif taxon == "dissorophoidea"   then return "dissorophoids"
	elseif taxon == "zatracheidae"     then return "zatracheids"
	elseif taxon == "eryopidae"        then return "eryopids"
	elseif taxon == "archegosauroidea" then return "archegosaurs"

	elseif taxon == "embolomeri"      then return "embolomeres"
	elseif taxon == "chroniosuchia"   then return "chroniosuchians"
	elseif taxon == "seymouriamorpha" then return "seymouriamorphs"

	elseif taxon == "protorothyrididae" then return "protorothyridids"
	elseif taxon == "araeoscelidia"     then return "araeoscelidians"
	elseif taxon == "bolosauridae"      then return "bolosaurs"
	elseif taxon == "captorhinidae"     then return "captorhinids"
	elseif taxon == "diadectomorpha"    then return "diadectomorphs"

-- Basal Tetrapoda ↑

-- Amphibia ↓

	elseif taxon == "microsauria"    then return "microsaurs"
	elseif taxon == "molgophidae"    then return "molgophids"
	elseif taxon == "albanerpetidae" then return "albanerpetids"

-- Amphibia ↑

-- Basal Amniota ↓

	elseif taxon == "caseasauria" then return "caseasaurs"
	elseif taxon == "varanopidae" then return "varanopids"

-- Basal Amniota ↑

-- Synapsida ↓

	elseif taxon == "synapsida" then return "synapsids"

	elseif taxon == "ophiacodontidae"  then return "ophiacodonts"
	elseif taxon == "edaphosauridae"   then return "edaphosaurs"
	elseif taxon == "sphenacodontidae" then return "sphenacodonts"

	elseif taxon == "biarmosuchia"   then return "biarmosuchians"
	elseif taxon == "dinocephalia"   then return "dinocephalians"
	elseif taxon == "anteosauria"    then return "anteosaurs"
	elseif taxon == "tapinocephalia" then return "tapinocephalians"
	elseif taxon == "gorgonopsia"    then return "gorgonopsians"

	elseif taxon == "anomodontia"  then return "anomodonts"
	elseif taxon == "dicynodontia" then return "dicynodonts"

	elseif taxon == "therocephalia"   then return "therocephalians"
	elseif taxon == "scylacosauridae" then return "scylacosaurs"
	elseif taxon == "akidnognathidae" then return "akidnognaths"
	elseif taxon == "baurioidea"      then return "baurioids"
	elseif taxon == "whaitsiidae"     then return "whaitsiids"

	elseif taxon == "cynodontia"        then return "cynodonts"
	elseif taxon == "trirachodontidae"  then return "trirachodonts"
	elseif taxon == "traversodontidae"  then return "traversodonts"
	elseif taxon == "chiniquodontidae"  then return "chiniquodonts"
	elseif taxon == "ecteniniidae"      then return "ecteniniids"
	elseif taxon == "tritheledontidae"  then return "tritheledonts"
	elseif taxon == "tritylodontidae"   then return "tritylodonts"
	elseif taxon == "morganucodontidae" then return "morganucodonts"
	elseif taxon == "docodontidae"      then return "docodonts"
	elseif taxon == "multituberculata"  then return "multituberculates"
	elseif taxon == "amphilestidae"     then return "amphilestids"
	elseif taxon == "gobiconodontidae"  then return "gobiconodonts"
	elseif taxon == "volaticotheriidae" then return "volaticotheres"
	elseif taxon == "meridiolestida"    then return "meridiolestidans"

	elseif taxon == "tachyglossidae" then return "echidnas"

	elseif taxon == "deltatheroida" then return "deltatheroids"

	elseif taxon == "sparassodonta" then return "sparassodonts"

	elseif taxon == "thylacinidae"    then return "thylacines"
	elseif taxon == "diprotodontidae" then return "diprotodontids"
	elseif taxon == "thylacoleonidae" then return "thylacoleonids"
	elseif taxon == "sthenurinae"     then return "sthenurines"

	elseif taxon == "hyaenodonta"  then return "hyaenodonts"
	elseif taxon == "leptictida"   then return "leptictidans"
	elseif taxon == "mesonychia"   then return "mesonychians"
	elseif taxon == "oxyaenodonta" then return "oxyaenids"
	elseif taxon == "pantodonta"   then return "pantodonts"

	elseif taxon == "miacidae"         then return "miacids"
	elseif taxon == "amphicyonidae"    then return "amphicyonids"
	elseif taxon == "nimravidae"       then return "nimravids"
	elseif taxon == "machairodontinae" then return "machairodonts"
	elseif taxon == "hesperocyoninae"  then return "hesperocyonines"
	elseif taxon == "borophaginae"     then return "borophagines"

	elseif taxon == "anagalidae" then return "anagalids"

	elseif taxon == "embrithopoda" then return "embrithopods"

	elseif taxon == "phenacodontidae"  then return "phenacodonts"
	elseif taxon == "anthracobunia"    then return "anthracobunians"
	elseif taxon == "brontotheriidae"  then return "brontotheres"
	elseif taxon == "chalicotheriidae" then return "chalicotheres"
	elseif taxon == "desmostylia"      then return "desmostylians"
	elseif taxon == "lophiodontidae"   then return "lophiodonts"
	elseif taxon == "palaeotheriidae"  then return "palaeotheres"

	elseif taxon == "plesiadapiformes" then return "plesiadapiforms"
	elseif taxon == "adapiformes"      then return "adapiforms"
	elseif taxon == "omomyiformes"     then return "omomyiforms"

-- Synapsida ↑

-- Misc. Sauropsida ↓

	elseif taxon == "sauropsida"       then return "sauropsids"
	elseif taxon == "acleistorhinidae" then return "acleistorhinids"
	elseif taxon == "pareiasauridae"   then return "pareiasaurs"
	elseif taxon == "procolophonidae"  then return "procolophonids"
	elseif taxon == "millerettidae"    then return "millerettids"
	elseif taxon == "younginidae"      then return "younginids"
	elseif taxon == "tangasauridae"    then return "tangasaurs"
	elseif taxon == "weigeltisauridae" then return "weigeltisaurs"

	elseif taxon == "rhynchocephalia" then return "rhynchocephalians"

	elseif taxon == "meiolaniidae"  then return "meiolaniids"
	elseif taxon == "protostegidae" then return "protostegids"

-- Misc. Sauropsida ↑

-- Archosauria ↓

	elseif taxon == "protorosauria"     then return "protorosaurs"
	elseif taxon == "tanysauria"        then return "tanystropheids"
	elseif taxon == "drepanosauridae"   then return "drepanosaurs"
	elseif taxon == "sharovipterygidae" then return "sharovipterygids"
	elseif taxon == "trachelosauridae"  then return "trachelosaurs"
	elseif taxon == "trilophosauridae"  then return "trilophosaurs"
	elseif taxon == "kuehneosauridae"   then return "kuehneosaurs"
	elseif taxon == "azendohsauria"     then return "azendohsaurs"
	elseif taxon == "choristodera"      then return "choristoderes"
	elseif taxon == "rhynchosauria"     then return "rhynchosaurs"

	elseif taxon == "proterosuchidae"   then return "proterosuchids"
	elseif taxon == "erythrosuchia"     then return "erythrosuchids"
	elseif taxon == "poposauroidea"     then return "poposaurs"
	elseif taxon == "euparkeriidae"     then return "euparkeriids"
	elseif taxon == "doswelliidae"      then return "doswelliids"
	elseif taxon == "proterochampsidae" then return "proterochampsids"

	elseif taxon == "lagerpetidae"            then return "lagerpetids"
	elseif taxon == "pterosauria"             then return "pterosaurs"
	elseif taxon == "eudimorphodontidae"      then return "eudimorphodonts"
	elseif taxon == "dimorphodontidae"        then return "dimorphodonts"
	elseif taxon == "rhamphorhynchidae"       then return "rhamphorhynchids"
	elseif taxon == "anurognathidae"          then return "anurognathids"
	elseif taxon == "darwinoptera"            then return "darwinopterans"
	elseif taxon == "archaeopterodactyloidea" then return "archaeopterodactyls"
	elseif taxon == "ctenochasmatidae"        then return "ctenochasmatids"
	elseif taxon == "dsungaripteridae"        then return "dsungaripterids"
	elseif taxon == "azhdarchoidea"           then return "azhdarchoids"
	elseif taxon == "pteranodontoidea"        then return "pteranodonts"

	elseif taxon == "gracilisuchidae" then return "gracilisuchids"
	elseif taxon == "aetosauria"      then return "aetosaurs"
	elseif taxon == "erpetosuchidae"  then return "erpetosuchids"
	elseif taxon == "ornithosuchidae" then return "ornithosuchids"
	elseif taxon == "phytosauria"     then return "phytosaurs"

	elseif taxon == "ornithischia"        then return "ornithischians"
	elseif taxon == "silesauridae"        then return "silesaurs"
	elseif taxon == "fabrosauridae"       then return "fabrosaurs"
	elseif taxon == "heterodontosauridae" then return "heterodontosaurs"

	elseif taxon == "ankylosauria" then return "ankylosaurs"
	elseif taxon == "stegosauria"  then return "stegosaurs"

	elseif taxon == "ceratopsia"           then return "ceratopsians"
	elseif taxon == "elasmaria"            then return "elasmarians"
	elseif taxon == "hypsilophodontia"     then return "hypsilophodonts"
	elseif taxon == "rhabdodontidae"       then return "rhabdodonts"
	elseif taxon == "iguanodontia"         then return "iguanodonts"
	elseif taxon == "thescelosauria"       then return "thescelosaurs"
	elseif taxon == "pachycephalosauridae" then return "pachycephalosaurs"
	elseif taxon == "tenontosauridae"      then return "tenontosaurs"

	elseif taxon == "saturnaliidae"   then return "saturnaliids"
	elseif taxon == "prosauropoda"    then return "prosauropods"
	elseif taxon == "sauropoda"       then return "sauropods"

	elseif taxon == "rauisuchia"   then return "rauisuchians"
	elseif taxon == "aphanosauria" then return "aphanosaurs"

	elseif taxon == "sphenosuchia"    then return "sphenosuchians"
	elseif taxon == "protosuchia"     then return "protosuchians"
	elseif taxon == "shartegosuchia"  then return "shartegosuchoids"
	elseif taxon == "thalattosuchia"  then return "thalattosuchians"
	elseif taxon == "notosuchia"      then return "notosuchians"
	elseif taxon == "baurusuchidae"   then return "baurusuchids"
	elseif taxon == "peirosauria"     then return "peirosaurs"
	elseif taxon == "sebecidae"       then return "sebecids"
	elseif taxon == "uruguaysuchidae" then return "uruguaysuchids"

	elseif taxon == "atoposauridae"    then return "atoposaurs"
	elseif taxon == "goniopholididae"  then return "goniopholidids"
	elseif taxon == "pholidosauridae"  then return "pholidosaurs"
	elseif taxon == "paralligatoridae" then return "paralligatorids"
	elseif taxon == "dyrosauridae"     then return "dyrosaurs"
	elseif taxon == "hylaeochampsidae" then return "hylaeochampsids"
	elseif taxon == "allodaposuchidae" then return "allodaposuchids"
	elseif taxon == "thoracosauridae"  then return "thoracosaurs"
	elseif taxon == "alligatoridae"    then return "alligators"
	elseif taxon == "caimanidae"       then return "caimans"
	elseif taxon == "crocodylidae"     then return "crocodiles"
	elseif taxon == "gavialidae"       then return "gharials"

	elseif taxon == "herrerasauria"   then return "herrerasaurs"
	elseif taxon == "coelophysoidea"  then return "coelophysoids"
	elseif taxon == "ceratosauria"    then return "ceratosaurs"
	elseif taxon == "abelisauridae"   then return "abelisaurs"
	elseif taxon == "elaphrosauridae" then return "elaphrosaurs"
	elseif taxon == "noasauridae"     then return "noasaurs"

	elseif taxon == "megalosauridae"        then return "megalosaurs"
	elseif taxon == "spinosauridae"         then return "spinosaurs"
	elseif taxon == "metriacanthosauridae"  then return "metriacanthosaurs"
	elseif taxon == "carcharodontosauridae" then return "carcharodontosaurs"
	elseif taxon == "alvarezsauria"         then return "alvarezsaurs"
	elseif taxon == "ornithomimosauria"     then return "ornithomimosaurs"
	elseif taxon == "therizinosauria"       then return "therizinosaurs"
	elseif taxon == "tyrannosauria"         then return "tyrannosaurs"
	elseif taxon == "eutyrannosauria"       then return "eutyrannosaurs"
	elseif taxon == "megaraptora"           then return "megaraptorans"

	elseif taxon == "archaeornithes"      then return "archaeornitheans"
	elseif taxon == "scansoriopterygidae" then return "scansoriopterygids"
	elseif taxon == "confuciusornithidae" then return "confuciusornithids"
	elseif taxon == "dromaeosauridae"     then return "dromaeosaurs"
	elseif taxon == "eudromaeosauria"     then return "eudromaeosaurs"
	elseif taxon == "oviraptorosauria"    then return "oviraptorosaurs"
	elseif taxon == "troodontidae"        then return "troodonts"
	elseif taxon == "halszkaraptorinae"   then return "halszkaraptorines"
	elseif taxon == "unenlagiidae"        then return "unenlagiids"

	elseif taxon == "enantiornithes"  then return "enantiornitheans"
	elseif taxon == "avisauridae"     then return "avisaurs"
	elseif taxon == "bohaiornithidae" then return "bohaiornithids"
	elseif taxon == "longipterygidae" then return "longipterygids"
	elseif taxon == "pengornithidae"  then return "pengornithids"

	elseif taxon == "hongshanornithidae" then return "hongshanornithids"
	elseif taxon == "songlingornithidae" then return "songlingornithids"
	elseif taxon == "ichthyornithidae"   then return "ichthyornitheans"
	elseif taxon == "hesperornithes"     then return "hesperornitheans"
	elseif taxon == "gastornithidae"     then return "gastornithids"
	elseif taxon == "pelagornithidae"    then return "pelagornithids"

	elseif taxon == "presbyornithidae" then return "presbyornithids"
	elseif taxon == "dromornithidae"   then return "dromornithids"

	elseif taxon == "teratornithidae" then return "teratorns"

	elseif taxon == "phorusrhacidae" then return "phorusrhacids"

	elseif taxon == "plotopteridae" then return "plotopterids"

-- Archosauria ↑

	else return "organisms"

	end
end

a.user_category = function(frame)
	local  taxon =  a.aliases(frame)

	if taxon     == "biota"
	then return "Wikipedians interested in biology"

	elseif taxon == "chondrichthyes"
	or     taxon == "ischnacanthiformes"
	or     taxon == "diplacanthiformes"
	or     taxon == "climatiiformes"
	or     taxon == "acanthodiformes"
	or     taxon == "omalodontiformes"
	or     taxon == "ctenacanthiformes"
	or     taxon == "phoebodontiformes"
	or     taxon == "symmoriiformes"
	or     taxon == "iniopterygidae"
	or     taxon == "xenacanthiformes"
	or     taxon == "eugeneodontiformes"
	or     taxon == "hybodontiformes"
	or     taxon == "petalodontiformes"
	or     taxon == "chimaeriformes"
	or     taxon == "rajiformes"
	or     taxon == "sclerorhynchoidei"
	or     taxon == "pristidae"
	then return "Wikipedians interested in cartilaginous fish"

	elseif taxon == "heterodontiformes"
	or     taxon == "mitsukurinidae"
	or     taxon == "alopiidae"
	or     taxon == "isurus"
	or     taxon == "chlamydoselachidae"
	or     taxon == "pristiophoriformes"
	or     taxon == "squatiniformes"
	or     taxon == "dalatiidae"
	or     taxon == "squalidae"
	then return "Wikipedians interested in sharks"

	elseif taxon == "palaeonisciformes"
	or     taxon == "polypteriformes"
	or     taxon == "acipenseridae"
	or     taxon == "polyodontidae"
	or     taxon == "subholostei"
	or     taxon == "ginglymodi"
	or     taxon == "dapediiformes"
	or     taxon == "macrosemiiformes"
	or     taxon == "lepisosteiformes"
	or     taxon == "halecomorphi"
	or     taxon == "aspidorhynchiformes"
	or     taxon == "caturiformes"
	or     taxon == "ionoscopiformes"
	or     taxon == "pachycormiformes"
	or     taxon == "pycnodontiformes"
	or     taxon == "amiidae"
	or     taxon == "crossognathiformes"
	or     taxon == "ichthyodectiformes"
	or     taxon == "megalopidae"
	or     taxon == "anguilliformes"
	or     taxon == "engraulidae"
	or     taxon == "cobitoidei"
	or     taxon == "gymnotoidei"
	or     taxon == "serrasalminae"
	or     taxon == "siluroidei"
	or     taxon == "esox"
	or     taxon == "opisthoproctidae"
	or     taxon == "aulopiformes"
	or     taxon == "syngnathidae"
	or     taxon == "gempylidae"
	or     taxon == "thunnini"
	or     taxon == "carangiformes"
	or     taxon == "sphyraenidae"
	or     taxon == "polynemidae"
	or     taxon == "pleuronectoidei"
	or     taxon == "toxotidae"
	or     taxon == "nematistiidae"
	or     taxon == "menidae"
	or     taxon == "xiphioidea"
	or     taxon == "selene"
	or     taxon == "trachinotus"
	or     taxon == "coryphaena"
	or     taxon == "echeneinae"
	or     taxon == "mugilidae"
	or     taxon == "blennioidei"
	or     taxon == "epinephelidae"
	or     taxon == "luciopercini"
	or     taxon == "gasterosteinae"
	or     taxon == "labridae"
	or     taxon == "sciaenidae"
	or     taxon == "diodontidae"
	or     taxon == "tetraodontidae"
	then return "Wikipedians interested in ray-finned fish"

	elseif taxon == "microsauria"
	or     taxon == "molgophidae"
	or     taxon == "albanerpetidae"
	then return "Wikipedians interested in amphibians"

	elseif taxon == "synapsida"
	or     taxon == "ophiacodontidae"
	or     taxon == "edaphosauridae"
	or     taxon == "sphenacodontidae"
	or     taxon == "biarmosuchia"
	or     taxon == "dinocephalia"
	or     taxon == "anteosauria"
	or     taxon == "tapinocephalia"
	or     taxon == "gorgonopsia"
	or     taxon == "anomodontia"
	or     taxon == "dicynodontia"
	or     taxon == "therocephalia"
	or     taxon == "scylacosauridae"
	or     taxon == "akidnognathidae"
	or     taxon == "baurioidea"
	or     taxon == "whaitsiidae"
	or     taxon == "cynodontia"
	or     taxon == "trirachodontidae"
	or     taxon == "traversodontidae"
	or     taxon == "chiniquodontidae"
	or     taxon == "ecteniniidae"
	or     taxon == "tritheledontidae"
	or     taxon == "tritylodontidae"
	or     taxon == "morganucodontidae"
	or     taxon == "docodontidae"
	or     taxon == "multituberculata"
	or     taxon == "amphilestidae"
	or     taxon == "gobiconodontidae"
	or     taxon == "volaticotheriidae"
	or     taxon == "meridiolestida"
	then return "Wikipedians interested in synapsids"

	elseif taxon == "tachyglossidae"
	or     taxon == "deltatheroida"
	or     taxon == "sparassodonta"
	or     taxon == "thylacinidae"
	or     taxon == "diprotodontidae"
	or     taxon == "thylacoleonidae"
	or     taxon == "sthenurinae"
	or     taxon == "hyaenodonta"
	or     taxon == "leptictida"
	or     taxon == "mesonychia"
	or     taxon == "oxyaenodonta"
	or     taxon == "pantodonta"
	or     taxon == "miacidae"
	or     taxon == "amphicyonidae"
	or     taxon == "nimravidae"
	or     taxon == "machairodontinae"
	or     taxon == "hesperocyoninae"
	or     taxon == "borophaginae"
	or     taxon == "anagalidae"
	or     taxon == "embrithopoda"
	then return "Wikipedians interested in mammals"

	elseif taxon == "phenacodontidae"
	or     taxon == "anthracobunia"
	or     taxon == "brontotheriidae"
	or     taxon == "chalicotheriidae"
	or     taxon == "desmostylia"
	or     taxon == "lophiodontidae"
	or     taxon == "palaeotheriidae"
	then return "Wikipedians interested in perissodactyls"

	elseif taxon == "plesiadapiformes"
	or     taxon == "adapiformes"
	or     taxon == "omomyiformes"
	then return "Wikipedians interested in primates"

	elseif taxon == "sauropsida"
	or     taxon == "acleistorhinidae"
	or     taxon == "pareiasauridae"
	or     taxon == "procolophonidae"
	or     taxon == "millerettidae"
	or     taxon == "younginidae"
	or     taxon == "tangasauridae"
	or     taxon == "weigeltisauridae"
	or     taxon == "rhynchocephalia"
	or     taxon == "protorosauria"
	or     taxon == "tanysauria"
	or     taxon == "drepanosauridae"
	or     taxon == "sharovipterygidae"
	or     taxon == "trachelosauridae"
	or     taxon == "trilophosauridae"
	or     taxon == "kuehneosauridae"
	or     taxon == "azendohsauria"
	or     taxon == "choristodera"
	or     taxon == "rhynchosauria"
	or     taxon == "proterosuchidae"
	or     taxon == "erythrosuchia"
	or     taxon == "poposauroidea"
	or     taxon == "euparkeriidae"
	or     taxon == "doswelliidae"
	or     taxon == "proterochampsidae"
	or     taxon == "lagerpetidae"
	or     taxon == "pterosauria"
	or     taxon == "eudimorphodontidae"
	or     taxon == "dimorphodontidae"
	or     taxon == "rhamphorhynchidae"
	or     taxon == "anurognathidae"
	or     taxon == "darwinoptera"
	or     taxon == "archaeopterodactyloidea"
	or     taxon == "ctenochasmatidae"
	or     taxon == "dsungaripteridae"
	or     taxon == "azhdarchoidea"
	or     taxon == "pteranodontoidea"
	or     taxon == "gracilisuchidae"
	or     taxon == "aetosauria"
	or     taxon == "erpetosuchidae"
	or     taxon == "ornithosuchidae"
	or     taxon == "phytosauria"
	or     taxon == "ornithischia"
	or     taxon == "silesauridae"
	or     taxon == "fabrosauridae"
	or     taxon == "heterodontosauridae"
	or     taxon == "ankylosauria"
	or     taxon == "stegosauria"
	or     taxon == "ceratopsia"
	or     taxon == "elasmaria"
	or     taxon == "hypsilophodontia"
	or     taxon == "rhabdodontidae"
	or     taxon == "iguanodontia"
	or     taxon == "thescelosauria"
	or     taxon == "pachycephalosauridae"
	or     taxon == "tenontosauridae"
	or     taxon == "saturnaliidae"
	or     taxon == "prosauropoda"
	or     taxon == "sauropoda"
	or     taxon == "rauisuchia"
	or     taxon == "aphanosauria"
	or     taxon == "sphenosuchia"
	or     taxon == "protosuchia"
	or     taxon == "shartegosuchia"
	or     taxon == "thalattosuchia"
	or     taxon == "notosuchia"
	or     taxon == "baurusuchidae"
	or     taxon == "peirosauria"
	or     taxon == "sebecidae"
	or     taxon == "uruguaysuchidae"
	or     taxon == "atoposauridae"
	or     taxon == "goniopholididae"
	or     taxon == "pholidosauridae"
	or     taxon == "paralligatoridae"
	or     taxon == "dyrosauridae"
	or     taxon == "hylaeochampsidae"
	or     taxon == "allodaposuchidae"
	or     taxon == "thoracosauridae"
	or     taxon == "alligatoridae"
	or     taxon == "caimanidae"
	or     taxon == "crocodylidae"
	or     taxon == "gavialidae"
	or     taxon == "herrerasauria"
	or     taxon == "coelophysoidea"
	or     taxon == "ceratosauria"
	or     taxon == "abelisauridae"
	or     taxon == "elaphrosauridae"
	or     taxon == "noasauridae"
	or     taxon == "megalosauridae"
	or     taxon == "spinosauridae"
	or     taxon == "metriacanthosauridae"
	or     taxon == "carcharodontosauridae"
	or     taxon == "alvarezsauria"
	or     taxon == "ornithomimosauria"
	or     taxon == "therizinosauria"
	or     taxon == "tyrannosauria"
	or     taxon == "eutyrannosauria"
	or     taxon == "megaraptora"
	then return "Wikipedians interested in reptiles"

	elseif taxon == "meiolaniidae"
	or     taxon == "protostegidae"
	then return "Wikipedians interested in turtles"

	elseif taxon == "archaeornithes"
	or     taxon == "scansoriopterygidae"
	or     taxon == "confuciusornithidae"
	or     taxon == "dromaeosauridae"
	or     taxon == "eudromaeosauria"
	or     taxon == "oviraptorosauria"
	or     taxon == "troodontidae"
	or     taxon == "halszkaraptorinae"
	or     taxon == "unenlagiidae"
	or     taxon == "enantiornithes"
	or     taxon == "avisauridae"
	or     taxon == "bohaiornithidae"
	or     taxon == "longipterygidae"
	or     taxon == "pengornithidae"
	or     taxon == "hongshanornithidae"
	or     taxon == "songlingornithidae"
	or     taxon == "ichthyornithidae"
	or     taxon == "hesperornithes"
	or     taxon == "gastornithidae"
	or     taxon == "pelagornithidae"
	or     taxon == "presbyornithidae"
	or     taxon == "dromornithidae"
	or     taxon == "teratornithidae"
	or     taxon == "phorusrhacidae"
	or     taxon == "plotopteridae"
	then return "Wikipedians interested in birds"

	else return "Wikipedians interested in biology"

	end
end

return a