Module:Sandbox/trappist the monk/taxonomy
From Wikipedia, the free encyclopedia
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.
Editors can experiment in this module's sandbox (create | mirror) and testcases (create) pages.
Add categories to the /doc subpage. Subpages of this module.
require('strict'); --[[--------------------------< T A X O M A P >---------------------------------------------------------------- this is a table of sequence tables that each list the first and last taxon name in a particular module. module_select() uses these tables to determine which data module 'should' have the data for the taxon name. [1] first taxon name in the data module [3] suffix appended to the base module name to create: 'Module:Sandbox/trappist the monk/taxonomy <suffix>' These tables are created by an awb script when it splits much larger raw data file before the splits are uploaded to en.wiki. ]] localtaxomap_t={-- created/updated: 2021年10月24日 A={ {'ADA clade','Acratus','A1'}, {'Acrecebus','Africotriton','A2'}, {'Afrida','Alicia (plant)','A3'}, {'Aliciella','Ammosperma','A4'}, {'Ammospermophilus','Anenthemonae','A5'}, {'Anentome','Aorangia','A6'}, {'Aoranthe','Archarius','A7'}, {'Archasia','Asemonea','A8'}, {'Asemoneinae','Aurana','A9'}, {'Auranticarpa','Azygopus','A10'}, }, B={ {'BOP clade','Bauruoolithus','B1'}, {'Baurusuchia','Bloomeria','B2'}, {'Blosnavirus','Brasilentulus','B3'}, {'Brasileodactylus','Byturus','B4'}, }, C={ {'CRuMs','Camillina','C1'}, {'Caminus','Cassianellidae','C2'}, {'Cassianopsinae','Cereus','C3'}, {'Cereus (anemone)','Chernes','C4'}, {'Chernetidae','Chrysopida','C5'}, {'Chrysopidae','Cnemidophorus','C6'}, {'Cnemidopyge','Conopias','C7'}, {'Conopidae','Crataegus ser. Intricata','C8'}, {'Crataegus ser. Intricatae','Cunninghamella','C9'}, {'Cunninghamellaceae','Czekanowskiales','C10'}, }, D={ {'Daanosaurus','Dentatherinidae','D1'}, {'Dentectus','Digalodon','D2'}, {'Digama','Dodecadenia','D3'}, {'Dodecahema','Dystrophaeus','D4'}, {'Dytaster','Dzungariotherium','D5'}, }, E={ {'Eacles','Empidadelpha','E1'}, {'Empididae','Epipogiinae','E2'}, {'Epipogium','Eucosmodon','E3'}, {'Eucosmodontidae','Eutreptiidae','E4'}, {'Eutreptiiida','Ezosciadium','E5'}, }, G={ {'Gabara','Giardia','G1'}, {'Giardiavirus','Gonostomatidae','G2'}, {'Gonostomatoidei','Gyroweisia','G3'}, }, H={ {'HTVC010P','Hecalini','H1'}, {'Hecamede','Hesperonychus','H2'}, {'Hesperoperla','Homalattus','H3'}, {'Homalia','Hymenasplenium','H4'}, {'Hymenelia','Hytrosaviridae','H5'}, }, L={ {'La','Lechia','L1'}, {'Lechriaspis','Lethiscidae','L2'}, {'Lethiscus','Lithophaga','L3'}, {'Lithophane','Lycopteridae','L4'}, {'Lycopteriformes','Lyttoniidina','L5'}, }, M={ {'Maaqwi','Manis (Manis)','M1'}, {'Manis (Paramanis)','Megamastax','M2'}, {'Megamelanus','Mesotitanina','M3'}, {'Mesovagus','Microzercon','M4'}, {'Microzoanthidae','Montfortia','M5'}, {'Montfortista','Mytilaria','M6'}, {'Mytilarioideae','minke whale species complex','M7'}, }, N={ {'Naashoibitosaurus','Neocoelidia','N1'}, {'Neocoelidiinae','Nichollsemys','N2'}, {'Nichollssaura','Nypa','N3'}, {'Nypoideae','Nyungwea','N4'}, }, O={ {'OSLEUM','Ondigus','O1'}, {'Ondina','Orthomorpha','O2'}, {'Orthomorphini','Ozyptila','O3'}, }, P={ {'P2virus','Papaipema','P1'}, {'Papakula','Parasynema','P2'}, {'Parasynthemis','Peltandreae','P3'}, {'Peltaria','Phaethornithinae','P4'}, {'Phaetusa','Phyllocnistinae','P5'}, {'Phyllocnistis','Planiliza','P6'}, {'Planipapillus','Podothecus','P7'}, {'Podothrombidiidae','Praezygaena','P8'}, {'Pragmatodes','Protoazin','P9'}, {'Protobalanus','Pseudomicrargus','P10'}, {'Pseudomicrocentria','Ptychatractidae','P11'}, {'Ptycheulimella','Pyxis','P12'}, }, S={ {'SAR','Scaptia','S1'}, {'Scaptius','Seegeriella','S2'}, {'Seeleyosaurus','Sinaivirus','S3'}, {'Sinamma','Sphaeriida','S4'}, {'Sphaeriidae','Stenogomphurus','S5'}, {'Stenogonum','Stylonuroidea','S6'}, {'Stylonuroides','Szovitsia','S7'}, }, T={ {'TG3','Tenthredo','T1'}, {'Tentoriceps','Therizinosaurus','T2'}, {'Therlinya','Torovirus','T3'}, {'Torpedinidae','Trigonosaurus','T4'}, {'Trigonoscuta','Typhlogarra','T5'}, {'Typhlogastrura','Tzvelevopyrethrum','T6'}, }, } localis_not_italic_virus_taxon_t={ ['unranked domain']=true,-- taxon names assigned these ranks are *not* to be italicized ['unranked']=true, ['virus group']=true, ['virus']=true, ['strain']=true, ['serotype']=true, } localis_italic_taxon_t={-- taxon names assigned these ranks are to be italicized ['genus']=true, ['ichnogenus']=true, ['oogenus']=true, ['subgenus']=true, ['ichnosubgenus']=true, ['oosubgenus']=true, ['supersectio']=true, ['sectio']=true, ['subsectio']=true, ['series']=true, ['subseries']=true, ['species complex']=true, ['species group']=true, ['species subgroup']=true, ['species']=true, ['ichnospecies']=true, ['oospecies']=true, ['subspecies']=true, ['ichnosubspecies']=true, ['oosubspecies']=true, } localanglicize_rank_t={-- this table adapted from {{anglicise rank}} ['alliance']='\'\'Alliance\'\'',-- Special cases, alphabetic order ['basic shell type']='\'\'Basic shell type\'\'', ['branch']='\'\'Branch\'\'', ['clade']='\'\'Clade\'\'', ['cladus']='\'\'Clade\'\'', ['form taxon']='\'\'Form taxon\'\'', ['grade']='\'\'Grade\'\'', ['gradus']='\'\'Grade\'\'', ['informal']='\'\'Informal group\'\'', ['informal group']='\'\'Informal group\'\'', ['morphotype']='\'\'Morphotype\'\'', ['node']='\'\'Node\'\'', ['plesion']='\'\'Plesion\'\'', ['plesion-group']='\'\'Plesion-group\'\'', ['possible clade']='\'\'Clade?\'\'', ['realm']='\'\'Realm\'\'', ['species complex']='\'\'Species complex\'\'', ['species group']='\'\'Species group\'\'', ['species subgroup']='\'\'Species subgroup\'\'', ['stem group']='\'\'Stem group\'\'', ['total group']='\'\'Total group\'\'', ['unranked']='(unranked)',-- not a special case in {{anglicise rank}} but included here for convenience ['serotype']='Serotype',-- Virus ranks below species ['strain']='Strain', ['virus']='Virus', ['virus group']='Group', ['classis']='Class',-- Linnaean taxonomy, alphabetic order ['cohort']='Cohort', ['divisio']='Division', ['domain']='Domain', ['epifamilia']='Epifamily', ['familia']='Family', ['forma']='Form', ['genus']='Genus', ['grandordo']='Grandorder', ['grandordo-mb']='Grandorder',-- McKenna & Bell version ['hyperfamilia']='Hyperfamily', ['infraclassis']='Infraclass', ['infralegio']='Infralegion', ['infralegion']='Infralegion', ['infraordo']='Infraorder', ['infraphylum']='Infraphylum', ['infraregnum']='Infrakingdom', ['infratribus']='Infratribe', ['legio']='Legion', ['legion']='Legion', ['magnordo']='Magnorder', ['micrordo']='Microrder', ['microphylum']='Microphylum', ['mirordo-Mirorder']='Mirorder', ['mirordo-mb']='Mirorder',-- McKenna & Bell version ['nanordo']='Nanorder', ['nanophylum']='Nanophylum', ['ordo']='Order', ['parafamilia']='Parafamily', ['parvclassis']='Parvclass', ['parvordo']='Parvorder', ['phylum']='Phylum', ['regnum']='Kingdom', ['sectio']='Section', ['series']='Series', ['species']='Species', ['subclassis']='Subclass', ['subcohort']='Subcohort', ['subdivisio']='Subdivision', ['subfamilia']='Subfamily', ['subgenus']='Subgenus', ['sublegio']='Sublegion', ['sublegion']='Sublegion', ['subordo']='Suborder', ['subphylum']='Subphylum', ['subregnum']='Subkingdom', ['subsectio']='Subsection', ['subseries']='Subseries', ['subspecies']='Subspecies', ['subterclassis']='Subterclass',-- used in WoRMS ['subtribus']='Subtribe', ['superclassis']='Superclass', ['supercohort']='Supercohort', ['superdivisio']='Superdivision', ['superdomain']='Superdomain', ['superfamilia']='Superfamily', ['superlegio']='Superlegion', ['superlegion']='Superlegion', ['superordo']='Superorder', ['superphylum']='Superphylum', ['superregnum']='Superkingdom', ['supersectio']='Supersection', ['supertribus']='Supertribe', ['tribus']='Tribe', ['varietas']='Variety', ['zoodivisio']='Division', ['zoosectio']='Section', ['zoosubdivisio']='Subdivision', ['zoosubsectio']='Subsection', ['ichnoclassis']='Ichnoclass',--trace fossil taxonomy, alphabetic order ['ichnocohort']='Ichnocohort', ['ichnodivisio']='Ichnodivision', ['ichnofamilia']='Ichnofamily', ['ichnogenus']='Ichnogenus', ['ichnograndordo']='Ichnograndorder', ['ichnograndordo-mb']='Ichnograndorder',--McKenna & Bell version--> ['ichnoinfraclassis']='Ichnoinfraclass', ['ichnoinfradivisio']='Ichnoinfradivision', ['ichnoinfraordo']='Ichnoinfraorder', ['ichnolegio']='Ichnolegion', ['ichnolegion']='Ichnolegion', ['ichnomagnordo']='Ichnomagnorder', ['ichnomicrordo']='Ichnomicrorder', ['ichnoordo']='Ichnoorder', ['ichnoparvordo']='Ichnoparvorder', ['ichnospecies']='Ichnospecies', ['ichnostem-group']='Ichnostem-Group', ['ichnosubclassis']='Ichnosubclass', ['ichnosubdivisio']='Ichnosubdivision', ['ichnosubfamilia']='Ichnosubfamily', ['ichnosublegio']='Ichnosublegion', ['ichnosublegion']='Ichnosublegion', ['ichnosubordo']='Ichnosuborder', ['ichnosuperclassis']='Ichnosuperclass', ['ichnosupercohort']='Ichnosupercohort', ['ichnosuperfamilia']='Ichnosuperfamily', ['ichnosuperordo']='Ichnosuperorder', ['ooclassis']='Ooclass',--fossilized egg taxonomy, alphabetic order ['oocohort']='Oocohort', ['oofamilia']='Oofamily', ['oogenus']='Oogenus', ['oomagnordo']='Oomagnorder', ['oordo']='Oorder', ['oospecies']='Oospecies', ['oosubclassis']='Oosubclass', ['oosubgenus']='Oosubgenus', ['oosubspecies']='Oosubspecies', ['oosupercohort']='Oosupercohort', ['oosuperordo']='Oosuperorder', } localis_always_displayed_t={ ['virus_group']=true, ['regnum']=true, ['kingdom']=true, ['phylum']=true, ['divisio']=true, ['division']=true, ['class']=true, ['classis']=true, ['order']=true, ['ordo']=true, ['familia']=true, ['family']=true, ['genus']=true, ['species']=true, } localbase_data_table_name='Module:Sandbox/trappist the monk/taxonomy ';-- includes space between base name and suffix localmodules_loaded={};-- DEBUG: a list of the modules loaded while crawling the tree; viewable in the lua log --[[--------------------------< M O D U L E _ S E L E C T >---------------------------------------------------- Select one data module to load that 'should' hold data for <taxon>. Returns an enumerated letter suffix that will be appended to the base module name to make: Module:Sandbox/trappist the monk/taxonomy <suffix> ]] localfunctionmodule_select(taxon) localletter=taxon:match('^%a');-- get the first character of the taxon name letter=(letterandletter:upper())or'symbols';-- if a letter force uppercase; 'symbols' else ifnottaxomap_t[letter]then-- if no table in <taxomap_t> for <letter> returnletter; end for_,map_tinipairs(taxomap_t[letter])do-- loop through the <letter> map table looking for the table that should hold <taxon> if(map_t[1]<=taxon)and(taxon<=map_t[2])then-- compare <taxon> against table's first and last entries returnmap_t[3];-- should be here, return the enumerated letter end end end --[[--------------------------< T E M P L A T E _ D A T A _ G E T >-------------------------------------------- read taxon data from an existing template template data are read from the template using the embedded {{Do not edit this line all}} template. That template returns '$' delimited string of parameter values: parent$rank$link_target$unnamed parameter$always_display$extinct$same_as$refs This function builds a taxon_t table combining <link_target> and <unnamed parameter> into <taxon_t.link>; the 'boolean' parameter values for <always_display> and <extinct> are converted from case-insensitive 'yes' or 'true' (as strings) to 'true' (a lua boolean); all other values for these parameters are converted to lua nil. ]] localfunctiontemplate_data_get(taxon) localtemplate_name='Template:Taxonomy/'..taxon..'/sandbox';-- DEBUG: make a template name from <taxon> -- local template_name = 'Template:Taxonomy/' .. taxon; -- make a template name from <taxon> localframe=mw.getCurrentFrame();-- so that we can expand the taxonomy template localtemplate_string; -- using #ifexist bumps the expensive parser function counter but keeps nonexistent templates out of [[Wikipedia:Database reports/Transclusions of non-existent templates]] -- executing a nonexistent template inside a pcall transcludes the nonexistent template -- creating a title object with mw.title.new() or mw.title.makeTitle() transcludes the nonexistent title -- creating a title object and testing with .exists transcludes the nonexistent title and bumps the expensive parser function counter if'true'==frame:callParserFunction({name='#ifexist',args={template_name,'true'}})then--, 'false'}}) then template_string=frame:expandTemplate({title=template_name,args={['machine code']='all'}});-- get $ delimited string of template parameter values else return;-- no template_name end localraw_taxon_t=mw.text.split(template_string,'$',true);-- split the string into a sequence table localtaxon_t={}; localparam_names={'parent','rank','link','1','always_display','extinct','same_as','refs'};-- list of taxonomy template parameter name fori,vinipairs(raw_taxon_t)do-- for each template parameter value if('always_display'==param_names[i])or('extinct'==param_names[i])then-- these take 'boolean' 'yes' and 'true' v=({['yes']=true,['true']=true})[v:lower()];-- convert case-insensitive 'yes' and 'true' (as strings) to boolean 'true'; nil else end ifvand(''~=v)then-- skip nil and empty string values if'1'==param_names[i]then-- the link label positional parameter taxon_t.link=taxon_t.link..'|'..v;-- gets appended to the link target else taxon_t[param_names[i]]=v;-- add key and value end end end mw.log(template_name);-- DEBUG returntaxon_t; end --[[--------------------------< M O D U L E _ D A T A _ G E T >------------------------------------------------ read taxon data from a data module data-module data are loaded into package.loaded{} with a pcall() wrapped call to require(). taxon and same_as data are extracted from that table. Successive calls to a data module do not unload and then reload that module. Because Felis, Felinae, Felidae, and Feliformia are sequential in the taxonimic hierarchy, the 'F' data module is loaded only once for those four taxa. The 'new' data table is consulted before all other data tables, so it is loaded once and not unloaded until _crawl_tree() terminates. ]] locallast_loaded_module;-- module scope variable holds name of that last successfully loaded data module localfunctionmodule_data_get(taxon,module_name) if'Life'==taxonor'Veterovata'==taxonor'Ichnos'==taxonthen-- these are the taxonomy end taxons return{};-- nowhere to go so return empty table end if(base_data_table_name..'new')~=module_namethen-- 'new' loads once instead of every time so ignore it iflast_loaded_moduleand(last_loaded_module~=module_name)then-- if different from currently loaded module package.loaded[last_loaded_module]=nil;-- unload current module to conserve memory last_loaded_module=nil;-- unset end end ifpackage.loaded[module_name]then-- has already been loaded returnpackage.loaded[module_name][taxon];-- return taxon data if present; nil else else ifnotpcall(require,module_name)then-- attempt to load; data will be fetched from package.loaded[module_name] returnnil;-- failed to load else localsuffix=module_name:match('taxonomy (.+)$');-- DEBUG: was loaded; save module name for log modules_loaded['taxonomy '..suffix]=(modules_loaded['taxonomy '..suffix]and(modules_loaded['taxonomy '..suffix]+1))or1;-- DEBUG if'new'~=suffixthen-- not debug last_loaded_module=module_name;-- remember this module name; 'taxonomy new' does not get 'remembered' end end returnpackage.loaded[module_name][taxon];-- return taxon data if present; nil else end end --[[--------------------------< S O U R C E _ D A T A _ G E T >------------------------------------------------ chooses which of module_data_get() or template_data_get() to call based on the state of <taxon_module_name> ]] localfunctionsource_data_get(taxon,taxon_module_name) iftaxon_module_namethen returnmodule_data_get(taxon,taxon_module_name);-- get raw taxon data from a data module else returntemplate_data_get(taxon);-- get raw taxon data from a taxonomy template end end --[[--------------------------< _ T A X O N _ G E T >---------------------------------------------------------- fetch a taxon table from the appropriate taxonomy Template:Taxonomy/<taxon> template where <taxon> is the taxon name we are looking for or from '~/taxonomy <suffix>' data module where <suffix> is: the uppercase first letter of <taxon> name (may have enumerator digits) 'symbols' when the first character of <taxon> name is not a letter 'new' for the temporary data holding module between new template creation and integration into the whole data set fills <taxon_t>; follows one 'same_as' if that parameter is present and <no_follow> is omitted, false, or nil <taxon> is taxon name we are looking for <no_follow> is boolean; true don't follow <same_as> taxon if present; false or missing or nil, follow <same_as> taxon if present <taxon_module_name> is module name; used to unload module once we are done with it <taxon_t> is the table to be filled from the taxon data and from the same_as taxon data returns nothing; <taxon_t> has data on success or is empty table on failure TODO: better error handling? ]] localfunction_taxon_get(taxon,no_follow,taxon_module_name,taxon_t) localsame_as; localraw_taxon_t={};-- holds the data read from the template or from the data module for <taxon> raw_taxon_t=source_data_get(taxon,taxon_module_name);-- get raw taxon data from a taxonomy template or a data module; for templates taxon_module_name is nil ifraw_taxon_tthen fork,vinpairs(raw_taxon_t)do-- copy content from <raw_taxon_t> into return table (<taxon_t>) ifno_followor('same_as'~=k)then-- but don't copy same_as data if present taxon_t[k]=v; else-- here when same_as is present and following is allowed (no_follow is false) same_as=v;-- so save same_as value for use later end end raw_taxon_t=nil;-- unset else return;-- failure abandon; <taxon_t> has not been modified end ifsame_asthen-- if there is a same_as value in the taxonomy table iftaxon_module_namethen-- nil when looking for template data localsuffix=module_select(same_as);-- make a <suffix> from the <same_as> taxon name taxon_module_name=base_data_table_name..suffix;-- make a data module name end raw_taxon_t=source_data_get(same_as,taxon_module_name);-- get raw same_as taxon data end ifsame_asandraw_taxon_tthen-- if there is a <same_as> value and we have raw same_as data fork,vinpairs(raw_taxon_t)do-- copy the same_as taxon data into <taxon_t> ifnottaxon_t[k]then-- but do not overwrite parameter values already in <taxon_t> taxon_t[k]=v; end end end end --[[--------------------------< T A X O N _ G E T >------------------------------------------------------------ fetch a taxon table from the appropriate taxonomy template or '~/taxonomy <suffix>' data module where <suffix> is: the uppercase first letter of <taxon> name (may have enumerator digits) 'symbols' when the first character of <taxon> name is not a letter 'new' for the temporary data holding module between new template creation and integration into the whole data set follow one 'same_as' if that parameter is present ]] localfunctiontaxon_get(taxon,no_follow) localtaxon_t={};-- the return table ifnottaxonthen return{}; end _taxon_get(taxon,no_follow,nil,taxon_t);-- attempts to fill <taxon_t> from Template:Taxonomy/<taxon> ifnext(taxon_t)then-- if <taxon_t> not empty returntaxon_t;-- return it without suffix end localtaxon_module_name=base_data_table_name..'new';-- first look in the '~/Taxonomy new' data module _taxon_get(taxon,no_follow,taxon_module_name,taxon_t);-- attempts to fill <taxon_t> from '~/Taxonomy new' data module ifnext(taxon_t)then-- if <taxon_t> not empty returntaxon_t,'new';-- return it with 'new' suffix end localsuffix=module_select(taxon);-- get the suffix to append to the base data module name taxon_module_name=base_data_table_name..suffix;-- not in '~/Taxonomy new' data module _taxon_get(taxon,no_follow,taxon_module_name,taxon_t);-- attempts to fill <taxon_t> from '~/Taxonomy <suffix>' data module returntaxon_t,suffix; end --[[--------------------------< I S _ S E T >------------------------------------------------------------------ Returns true if argument is set; false otherwise. Argument is 'set' when it exists (not nil) or when it is not an empty string. ]] localfunctionis_set(var) returnnot(var==nilorvar==''); end --[=[-------------------------< M A K E _ W I K I L I N K >---------------------------------------------------- Makes a wikilink; when both link and display text is provided, returns a wikilink in the form [[L|D]]; if only link is provided, returns a wikilink in the form [[L]]; if neither are provided or link is omitted, returns an empty string. ]=] localfunctionmake_wikilink(link,display) ifis_set(link)then ifis_set(display)then returntable.concat({'[[',link,'|',display,']]'}); else returntable.concat({'[[',link,']]'}); end else return''; end end --[[--------------------------< L I N K _ M A K E >------------------------------------------------------------ makes a wikilink from the value assigned to 'link' in <taxon_t> ]] localfunctionlink_make(taxon_t,taxon) locallink; iftaxon_t.linkthen locallink_label; locallink_target; iftaxon_t.link:find('Incertae sedis',1,true)then link_label='\'\'incertae sedis\'\''; link_target='Incertae sedis'; elseiftaxon_t.link:match('([^|]+)|(.*)')then-- is link a piped link? link_target,link_label=taxon_t.link:match('([^|]+)|(.*)'); else link_label=taxon:match('([^/]+)/(.*)')ortaxon;-- variant of Module:Autotaxobox l.stripExtra(taxon) end link_target=(link_targetandlink_target)orlink_label;-- when no <link_target> make it same as <link_label> ifis_italic_taxon_t[taxon_t.rank]then link_label=require('Module:TaxonItalics').italicizeTaxonName(link_label,false); end link=make_wikilink(link_target,link_label); iftaxon_t.extinctand(notlink:find('†',1,true))then link='<span style="font-style:normal;font-weight:normal;">†</span>'..link; end iftaxon:match('/%?$')andnotlink:find('?',1,true)then link=link..'<span style="font-style:normal;font-weight:normal;"> (?)</span>' end end returnlink; end --[[--------------------------< _ C R A W L _ T R E E >-------------------------------------------------------- experimental function to see if it is possible / makes sense to replace 87k+ taxonomy templates with lua data modules for use in Module:Autotaxobox/sandbox call this function with make_tables() from taxonomyList() fills tree_t: inverted sequence table of taxa and their ranks ]] localfunction_crawl_tree(taxon,tree_t) localstarting_taxon=taxon;-- save a copy for error messaging localtaxon_t=taxon_get(taxon);-- initialize whiletaxon_tandtaxondo iftaxon_t.rankthen-- nil for Taxonomy/Life localstyled_rank=anglicize_rank_t[taxon_t.rank]; styled_rank=((taxon_t.always_displayoris_always_displayed_t[taxon_t.rank:lower()])and'\'\'\''..styled_rank..'\'\'\'')orstyled_rank; locallinked_taxon=link_make(taxon_t,taxon) localsuffix=taxon:match('%/[%w]+$')or""-- get suffix (e.g. /skip, /plantae) ifsuffix~=""then linked_taxon=linked_taxon.." <small>"..suffix.."</small>"; end table.insert(tree_t,1,styled_rank..': '..linked_taxon); iftaxon:find('/skip',1,true)then table.insert(tree_t,1,string.rep('·',5)..': '..string.rep('·',5)); end iftaxon_t.parentthen taxon=taxon_t.parent;-- get the next taxon taxon_t=taxon_get(taxon);-- and get its taxon table ifnil==taxon_tthen table.insert(tree_t,1,'<span style="color:#d33">no path to \'Life\' at '..taxon..' from '..starting_taxon..'</span>'); end else table.insert(tree_t,1,'<span style="color:#d33">no parent for taxon '..taxon..' from '..starting_taxon..'</span>'); node=nil;-- no next taxon end else ifnot(('Life'==taxon)or('Veterovata'==taxon)or('Ichnos'==taxon))then table.insert(tree_t,1,'<span style="color:#d33">no rank or same_as for taxon '..taxon..' from '..starting_taxon..'</span>'); end taxon=nil;-- no next taxon end end iflast_loaded_modulethen package.loaded[last_loaded_module]=nil;-- unload to conserve memory end package.loaded[base_data_table_name..'new']=nil; returntree_t end --[[--------------------------< W I K I D A T A _ G E T >------------------------------------------------------ ]] localTAXON_NAME_P='P225';-- mainsnak.datavalue["type"] = "string", mainsnak.datavalue.value = Felis, mainsnak["property"] = "P225", mainsnak["snaktype"] = "value", localTAXON_RANK_P='P105';-- mainsnak.datavalue.value["entity-type"] = "item", mainsnak.datavalue.value.id = qid, mainsnak["property"] = "P105", mainsnak["snaktype"] = "value", localTAXON_PARENT_P='P171';-- mainsnak.datavalue.value["entity-type"] = "item", mainsnak.datavalue.value.id = qid, mainsnak["property"] = "P171", mainsnak["snaktype"] = "value", localfunctionwikidata_get(qid,prop) locals_qid; localwd_table_t=mw.wikibase.getBestStatements(qid,prop)[1];-- attempt to get the taxon name ifnotwd_table_tthen error('no data for '..qid..' '..prop);-- some sort of better error handling needed end ifwd_table_t.mainsnak.datavaluethen if'string'==type(wd_table_t.mainsnak.datavalue.value)then returnwd_table_t.mainsnak.datavalue.value;-- return a string value; here for taxon name end if'table'==type(wd_table_t.mainsnak.datavalue.value)then s_qid=wd_table_t.mainsnak.datavalue.value.id;-- extract the qid for taxon rank or parent taxon returnmw.wikibase.getLabelByLang(s_qid,'en'),s_qid;-- return a string label and s_qid (used for parent); here for taxon rank and parent taxon end else return'<span style="color:#d33">no value</span>'; end end --[[--------------------------< _ C R A W L _ W I K I D A T A _ T R E E >-------------------------------------- this is an experimental function to see if I can figure out how to walk a taxonomy tree in wikidata Wikidata:Project_chat#is_this_possible%3F Apparently not: Wikidata:Project_chat/Archive/2021/10#is_this_possible? ]] localfunction_crawl_wikidata_tree(taxon_qid) localout_t={}; localtaxon; localrank; local_; whiletaxon_qiddo taxon=wikidata_get(taxon_qid,TAXON_NAME_P); rank=wikidata_get(taxon_qid,TAXON_RANK_P); _,taxon_qid=wikidata_get(taxon_qid,TAXON_PARENT_P);-- parent taxon name discarded, reset taxon_qid to the parent taxon's qid taxon=(is_italic_taxon_t[rank]and'\'\''..taxon..'\'\'')ortaxon;-- italicize when appropriate rank=anglicize_rank_t[rank]orrank:gsub('(%a)',string.upper,1);-- anglicize accepted ranks; uppercase first letter for all others rank=(is_always_displayed_t[rank:lower()]and'\'\'\''..rank..'\'\'\'')orrank;-- and italicize those that should be table.insert(out_t,1,rank..': '..taxon);-- save at the top of the list end returntable.concat(out_t,'<br />');-- make a big string and done end --[[--------------------------< C R A W L _ W I K I D A T A _ T R E E >---------------------------------------- entry point from {{#invoke:Sandbox/trappist_the_monk/taxonomy|crawl_wikidata_tree|Q...}} ]] localfunctioncrawl_wikidata_tree(frame) return_crawl_wikidata_tree(frame.args[1]); end --[[--------------------------< C R A W L _ T R E E >---------------------------------------------------------- ]] localfunctioncrawl_tree(frame) localtree_t={}; localloaded={}; localtaxon=frame.args[1]or'Felis'; localwikidata_id=mw.wikibase.getEntityIdForTitle(taxon);-- only works when no disambiguation tree_t=_crawl_tree(taxon,tree_t)-- crawl the tree to get the debug taxon list of taxa and their ranks localcount=0;-- DEBUG: tally of total modules loaded formodule,vinpairs(modules_loaded)do-- DEBUG: make a sortable list of module names for log count=count+v; table.insert(loaded,module); end localfunctioncomp(a,b)-- DEBUG: sort module names for log localletter_a,enum_a=a:match('(%a)(%d*)$');-- get letter and enumerator from 'taxonomy <letter><enum>' localletter_b,enum_b=b:match('(%a)(%d*)$'); enum_a=tonumber(enum_a);-- convert enumerators to number type if present; nil else enum_b=tonumber(enum_b); if(letter_a==letter_b)then-- when letters the same compare enumerators ifenum_aandenum_bthen-- both must be enumerated (we don't do 'taxonomy 'P' and 'taxonomy P1') returnenum_a<enum_b; end end returnletter_a<letter_b;-- default compare letters end table.sort(loaded,comp);-- DEBUG: sort module names for log for_,moduleinipairs(loaded)do-- DEBOG: log module names mw.log(module..': '..modules_loaded[module]); end mw.log('total modules loaded: '..count);-- DEBUG: add tally of loaded modules to log localout_t={};-- render crude tree from data modules, from wikidata, and taxonomy list from Module:Autotaxobox for comparison table.insert(out_t,'{| class="wikitable"\n! lua data module experiment !! wikidata experiment !! autotaobox reference\n|-\n|'); table.insert(out_t,table.concat(tree_t,'<br />')); table.insert(out_t,'\n| '); table.insert(out_t,_crawl_wikidata_tree(wikidata_id)); table.insert(out_t,'\n| '); table.insert(out_t,frame:callParserFunction('#invoke',{'Autotaxobox/sandbox','taxonomyList',taxon})); table.insert(out_t,'\n|-\n|}'); returntable.concat(out_t); end --[[--------------------------< _ M A K E _ T A B L E S >------------------------------------------------------ experimental function to see if it is possible / makes sense to replace 87k+ taxonomy templates with lua data modules for use in Module:Autotaxobox/sandbox fills two tables: taxon_tree_t: equivalent to Module:Autotaxobox taxonTable{} – a sequence table where [1] is <starting node> but also has ['n']=number of taxa listed rank_tree_t: equivalent to Module:Autotaxobox taxonRankTable{} – a sequence table that matches the taxa in taxonTable{}; for 'Life', Veterovata, and Ichnos, empty string ]] localfunction_make_tables(taxon,taxon_tree_t,rank_tree_t) localtaxon_t=taxon_get(taxon);-- initialize whiletaxon_tandtaxondo iftaxon_t.rankthen-- nil for Taxonomy/Life table.insert(taxon_tree_t,taxon);-- add taxon name table.insert(rank_tree_t,taxon_t.rank);-- add taxon rank iftaxon_t.parentthen taxon=taxon_t.parent;-- get the next taxon taxon_t=taxon_get(taxon);-- and get its taxon table end else if('Life'==taxon)or('Veterovata'==taxon)or('Ichnos'==taxon)then table.insert(taxon_tree_t,taxon);-- add last taxon name table.insert(rank_tree_t,'');-- last taxon name has no rank so add empty string end taxon=nil;-- no next taxon end end taxon_tree_t.n=#taxon_tree_t;-- add the number of taxa in this table returntaxon_tree_t,rank_tree_t end --[[--------------------------< M A K E _ T A B L E S >-------------------------------------------------------- interface function between Module:Autotaxobox taxonomyList() and _crawl_tree() ]] localfunctionmake_tables(taxon) localtaxon_t={}; localrank_t={}; local_; taxon_t,rank_t=_make_tables(taxon,taxon_t,rank_t);-- crawl the tree to get the taxon list and the rank list; empty table not used here returntaxon_t,rank_t; end --[[--------------------------< D A T A _ T A B L E _ W I K I L I N K _ M A K E >------------------------------ <suffix> is the lua data module suffix A1, A2, Q, etc; nil when creating template wikilinks <taxon> is the taxon name associated with Template:Taxonomy/<taxon> <caption> is boolean true when creating wikilink for wikitable caption ]] localfunctiondata_table_wikilink_make(suffix,taxon,caption) localwikilink_t={}; table.insert(wikilink_t,' <span style="font-weight: normal; float:right; margin-right:');-- open styling span tag ifcaptionthen-- if this wikilink is for the table caption table.insert(wikilink_t,'.5em">'); ifsuffixthen return'';-- do not display wikilink/edit link at right of caption for data modules else-- here when caption and template so show template edit link only table.insert(wikilink_t,'[<span class="plainlinks">');-- open plainlinks span table.insert(wikilink_t,'[https://en.wikipedia.org/w/index.php?action=edit&title=Template:taxonomy/');-- begin edit link table.insert(wikilink_t,taxon);-- add the taxon name table.insert(wikilink_t,'&preload=Template:Taxonomy/preload edit]');-- close the edit link table.insert(wikilink_t,'</span>]</span>');-- close the plainlinks span and the styling span returntable.concat(wikilink_t);-- make a big string and done end else table.insert(wikilink_t,'.04em">') end table.insert(wikilink_t,'[[[');-- enclosing brackets; open and open wikilink ifsuffixthen-- if creating module wikilink table.insert(wikilink_t,base_data_table_name);-- add base data table name of wikilink target name table.insert(wikilink_t,suffix);-- add <suffix> as last part of the wikilink target name table.insert(wikilink_t,'|taxonomy ');-- first part of the wikilink label table.insert(wikilink_t,suffix);-- add <suffix> as last part of the wikilink label else-- here when creating template wikilink table.insert(wikilink_t,'Template:Taxonomy/'); table.insert(wikilink_t,taxon); table.insert(wikilink_t,'|Taxonomy');-- the wikilink label for template end table.insert(wikilink_t,']]');-- close wikilink ifnotsuffixthen-- don't add 'edit' link for data modules table.insert(wikilink_t,'; <span class="plainlinks">');-- open plainlinks span table.insert(wikilink_t,'[https://en.wikipedia.org/w/index.php?action=edit&title=Template:taxonomy/');-- begin edit link table.insert(wikilink_t,taxon);-- add the taxon name table.insert(wikilink_t,'&preload=Template:Taxonomy/preload edit]');-- close the edit link table.insert(wikilink_t,'</span>');-- close the plainlinks span end table.insert(wikilink_t,']');-- close enclosing brackets -- table.insert (wikilink_t, ']]]'); -- close wikilink; close enclosing brackets ifcaptionthen-- if this wikilink is for the table caption -- table.insert (wikilink_t, '</span>'); -- close styling span tag end table.insert(wikilink_t,'</span>'); returntable.concat(wikilink_t);-- make a big string and done end --[[--------------------------< _ T E M P L A T E _ S K E L E T O N >------------------------------------------ creates a Template:Taxonomy/<taxon> skeleton for <taxon> prefilled with data from the appropriate module (when data are available); creates blank skeleton else. ]] localfunction_template_skeleton(frame,taxon) if({['life']=true,['veterovata']=true,['ichnos']=true})[taxon:lower()]then-- these are the taxonomy end taxons return'<span style="color:#d33">error: taxon: '..taxon..'</span>';-- error return for these; TODO: is this necessary? end localtaxon_t={}; localout_t={} localtaxon_module_name=base_data_table_name..'new';-- first look in the '~/Taxonomy new' data module _taxon_get(taxon,true,taxon_module_name,taxon_t);-- attempts to fill <taxon_t> from '~/Taxonomy new' data module ifnotnext(taxon_t)then-- if <taxon_t> empty then taxon not in 'new' localsuffix=module_select(taxon);-- get the suffix to append to the base data module name taxon_module_name=base_data_table_name..suffix;-- not in '~/Taxonomy new' data module _taxon_get(taxon,true,taxon_module_name,taxon_t);-- attempts to fill <taxon_t> from '~/Taxonomy <suffix>' data module end table.insert(out_t,"{{Don't edit this line {{{machine code|}}}");-- first the embedded template for_,paraminipairs({'same_as','parent','rank','link','extinct','always_display','refs'})do iftaxon_t[param]then table.insert(out_t,table.concat({'|',param,'=',(true==taxon_t[param]and'true')ortaxon_t[param]})); else table.insert(out_t,table.concat({'|',param,'='})); end end table.insert(out_t,'}}'); returntable.concat({'<pre style="border:none; background:inherit; margin-top:-0.6em; margin-left:-1em">',table.concat(out_t,'\n'),'</pre>'}); -- return frame:callParserFunction ({name='#tag:syntaxhighlight', args={table.concat (out_t, '\n'), lang='moin'}}); end --[[--------------------------< T E M P L A T E _ S K E L E T O N >-------------------------------------------- creates a Template:Taxonomy/<taxon> skeleton for <taxon> prefilled with data from the appropriate module (when data are available); creates blank skeleton else. ]] localfunctiontemplate_skeleton(frame) return_template_skeleton(frame,frame.args[1]); end --[[--------------------------< S H O W _ T A X O N _ D A T A >------------------------------------------------ similar to the table produced by Template:Taxonomy key ]] localfunctionshow_taxon_data(frame) localthis_page=mw.title.getCurrentTitle().prefixedText; localcode_open_tag='<code style="border:none; background:inherit">'; localtaxon=frame.args[1]; localout_t={}; localtaxon_t,suffix=taxon_get(taxon,true);-- get taxon data; do not follow same_as table.insert(out_t,'{| class="wikitable"');-- open wikitable table.insert(out_t,'\n|+ ');-- table caption wikimarkup table.insert(out_t,'<span style="float:left; margin-left:.5em>'); table.insert(out_t,'Taxonomy/'); table.insert(out_t,taxon);-- the taxon's name table.insert(out_t,'</span>'); --table.insert (out_t, ' <span style="font-weight: normal">'); -- open span tag table.insert(out_t,data_table_wikilink_make(suffix,taxon,true));-- add bracketed wikilink to lua data table for this <suffix> to wikitable caption localsame_as=taxon_t.same_as; localssuffix; ifsame_asthen taxon_t,ssuffix=taxon_get(same_as,true);-- get same_as taxon's data; do not follow same_as end localparent_t,psuffix=taxon_get(taxon_t.parent,true);-- get parent taxon's data; do not follow same_as table.insert(out_t,'\n|-\n|Parent:\n|'); if'Life'==taxonor'Veterovata'==taxonor'Ichnos'==taxonthen table.insert(out_t,'none'); else table.insert(out_t,code_open_tag);-- open code tag table.insert(out_t,taxon_t.parent);-- add parent taxon name table.insert(out_t,'</code> ');-- close code tag; include space before lua data table wikilink table.insert(out_t,data_table_wikilink_make(psuffix,taxon_t.parent));-- add bracketed wikilink to lua data table for this <suffix> end table.insert(out_t,'\n|-\n|Rank:\n|'); localrank; iftaxon_t.rankthen rank=anglicize_rank_t[taxon_t.rank]; localrank_t={}; table.insert(rank_t,code_open_tag);-- open code tag table.insert(rank_t,taxon_t.rank);-- insert raw rank from taxon data table.insert(rank_t,'</code> [displays as: ');-- start the message localalways_display=taxon_t.always_displayoris_always_displayed_t[taxon_t.rank]; ifis_italic_taxon_t[taxon_t.rank]then-- for italicized taxon ranks table.insert(rank_t,(always_displayand'\'\'\'\'\'')or'\'\'');-- open italic markup; bold if always displayed table.insert(rank_t,rank);-- add anglicized rank table.insert(rank_t,(always_displayand'\'\'\'\'\'')or'\'\'');-- close italic/bold markup else table.insert(rank_t,(always_displayand'\'\'\'')or'');-- bold if always displayed table.insert(rank_t,rank);-- add anglicized rank table.insert(rank_t,(always_displayand'\'\'\'')or'');-- close italic/bold markup end table.insert(rank_t,']');-- finish the message rank=table.concat(rank_t);-- and make a big string elseif'Life'==taxonor'Veterovata'==taxonor'Ichnos'==taxonthen rank='none'; else rank='<span style="color:#d33">– a rank must be supplied</span>'; end table.insert(out_t,rank); locallink=link_make(taxon_t,taxon); iflinkthen link=table.concat({code_open_tag,mw.text.nowiki(taxon_t.link),'</code> [displays as: ',link,']'}); end table.insert(out_t,'\n|-\n|Link:\n|'); table.insert(out_t,(linkandlink)or'–'); localextinct=(taxon_t.extinctand(code_open_tag..'true</code>'))or'no'; ifnottaxon.extinctandparent_t.extinctthen extinct='<span style="background-color:#FCC">parent is marked as extinct</span>'; end table.insert(out_t,'\n|-\n|Extinct:\n|'); table.insert(out_t,extinct); table.insert(out_t,'\n|-\n|Always displayed:\n|'); table.insert(out_t,(taxon_t.always_displayand(code_open_tag..'true</code>'))or((is_always_displayed_t[taxon_t.rank]and'yes (major rank)')or'no')) table.insert(out_t,'\n|-\n|Taxonomic references:\n|'); table.insert(out_t,taxon_t.refsor'–'); table.insert(out_t,'\n|-\n|Parent\'s taxonomic references:\n|'); table.insert(out_t,parent_t.refsor'–'); ifsame_asthen table.insert(out_t,'\n|-\n|Same as taxon:\n|'); table.insert(out_t,code_open_tag);-- open code tag table.insert(out_t,same_as);-- add same_as taxon name table.insert(out_t,'</code> ');-- close code tag; include space before lua data table wikilink table.insert(out_t,data_table_wikilink_make(ssuffix,same_as));-- add bracketed wikilink to lua data table for this <suffix> end iftaxon:find('/skip$')then localskipped_taxon=taxon:match('([^/]+)/skip$'); table.insert(out_t,'\n|-\n| colspan="2" | For the suffix "/skip", see [[Wikipedia:Automated_taxobox_system/advanced_taxonomy#Skip_taxonomy_templates|Skip taxonomy templates]].<br />'); table.insert(out_t,'For the skipped taxa, see [[');-- start the message and open wikilink markup table.insert(out_t,skipped_taxon);-- add skipped taxon name without '/skip' suffix table.insert(out_t,']]');-- close wikimarkup -- table.insert (out_t, 'For the skipped taxa, see <code>'); -- start the message and open code tag -- table.insert (out_t, skipped_taxon); -- add skipped taxon name without '/skip' suffix -- table.insert (out_t, '</code> '); -- close code tag; include space before lua data table wikilink -- table.insert (out_t, data_table_wikilink_make (suffix, skipped_taxon)); -- add bracketed wikilink to lua data table for this <suffix> or to taxonomy template end iftaxon:find('/%?$')then table.insert(out_t,'\n|-\n| colspan="2" | For the suffix "/?", see [[Wikipedia:Automated_taxobox_system/advanced_taxonomy#Questionable_assignments|Questionable assignments]].'); end iftaxon:find('Incertae sedis')then table.insert(out_t,'\n|-\n| colspan="2" |'); table.insert(out_t,'For taxon names with "Incertae sedis", see [[Wikipedia:Automated_taxobox_system/advanced_taxonomy#Incertae_sedis_taxonomy_templates|\'\'Incertae sedis\'\' taxonomy templates]].'); end ifsuffixthen table.insert(out_t,'\n|- style="vertical-align: top;"\n|Template skeleton:<br />data loaded from '); table.insert(out_t,'[[[');-- enclosing brackets; open and open wikilink table.insert(out_t,base_data_table_name);-- add base data table name of wikilink target name table.insert(out_t,suffix);-- add <suffix> as last part of the wikilink target name table.insert(out_t,'|taxonomy ');-- first part of the wikilink label table.insert(out_t,suffix); table.insert(out_t,']]]');-- close enclosing brackets; close wikilink table.insert(out_t,'<br />to change these data:\n#copy the template skeleton\n#click ['); table.insert(out_t,'<span class="plainlinks">[https://en.wikipedia.org/w/index.php?action=edit&title=Template:taxonomy/');-- begin edit link table.insert(out_t,taxon);-- add the taxon name table.insert(out_t,'&preload=Template:Taxonomy/preload create]</span>]\n#paste, and edit');-- close the edit link table.insert(out_t,'\n|'); table.insert(out_t,_template_skeleton(frame,taxon)); end table.insert(out_t,'\n|}');-- close the wikitable returnframe:preprocess(table.concat(out_t)); end --[[--------------------------< D E L E T E _ T A X O N >------------------------------------------------------ deletes a taxon entry from a taxonomy data module. Calling this function finds the correct data module, reads it and removes the specified taxon entry. The output a copy of the data module that can be copy/pasted into the data module. Yeah, I know, crude but lua can't write wikitext. TODO: error checking? What if the taxon isn't found? ]] localfunctiondelete_taxon(frame) localtaxon=frame.args[1]; localtaxonomy_t={}; localsuffix=module_select(taxon); localcontent=mw.title.new(base_data_table_name..suffix):getContent() localfound=false; localout_t={}; forentryincontent:gmatch('\t*%[\'[^\r\n]+},[\r\n]+')do localentry_taxon=entry:match('^\t*%[\'([^=]+)\'%]%s*='); ifentry_taxon==taxonthen found=true; else table.insert(out_t,entry); end end ifnotfoundthen return'<span style="color:#d33">Taxon: '..taxon..' not found in [[Module:Sandbox/trappist the monk/taxonomy '..suffix..']]'; end table.sort(out_t) table.insert(out_t,1,'return {\n') table.insert(out_t,'\t}') return'deleted: '..taxon..'\n\n'..frame:callParserFunction({name='#tag:syntaxhighlight',args={table.concat(out_t),lang='lua'}}); end --[[--------------------------< Q I D S _ G E T >-------------------------------------------------------------- {{#invoke:Sandbox/trappist_the_monk/taxonomy|qids_get|<select>}} where <select> can be no qids – returns a list of links that do not have qids and associated taxon name no links – returns a list of taxons that do not have links <anything else> - returns a list of links, the associated qid, and associated taxon name ]] localfunctionqids_get(frame) localselect=frame.args[1]; localmodule_name='Module:Sandbox/trappist_the_monk/taxonomy_'..frame.args[2]; ifnotpcall(require,module_name)then-- attempt to load; data will be fetched from package.loaded[module_name] return'<span style="color:#d33">failed to load: Module:Sandbox/trappist_the_monk/taxonomy_'..frame.args[2]..'</span>';-- failed to load end localqids={}-- sequence table of links and their qids localno_qids={};-- sequence table of links that do not have a qid localno_links={};-- sequence table of taxons that do not have links fortaxon,taxon_tinpairs(package.loaded[module_name])do locallink=taxon_t.link;-- because taxon_t.link (from ms.loadData()) is read only iflinkthen link=link:gsub('(.+)|.*','%1');-- remove any link label localqid=mw.wikibase.getEntityIdForTitle(link,'enwiki');-- qid referred to by link in module data ifqidthen table.insert(qids,'*[['..link..']]'..': '..qid..' from '..taxon); else table.insert(no_qids,'*[['..link..']]'..' from '..taxon); end else table.insert(no_links,taxon); end end package.loaded[module_name]=nil; if'no qids'==selectthen table.sort(no_qids); returntable.concat(no_qids,'\n'); elseif'no links'==selectthen table.sort(no_links); returntable.concat(no_links,'\n'); else table.sort(qids); returntable.concat(qids,'\n'); end end --[[--------------------------< E X P O R T E D F U N C T I O N S >------------------------------------------ ]] return{ crawl_tree=crawl_tree, _crawl_tree=_crawl_tree, crawl_wikidata_tree=crawl_wikidata_tree, make_tables=make_tables,-- interface function between Module:Autotaxobox taxonomyList() and _crawl_tree() show_taxon_data=show_taxon_data,-- similar to the table produced by Template:Taxonomy key taxon_get=taxon_get, -- taxomap_t = taxomap_t, delete_taxon=delete_taxon, template_skeleton=template_skeleton, qids_get=qids_get, }