Module:ControlArgs

Documentation[voir] [modifier] [historique] [purger]

Module copié de wikisource s:Module:ControlArgs, pour test sur un autre wiki, par User:Rical

This module manage arguments for any module, which allows :

Assist the user settings, and even the developers of the module.
Read and display settings and messages in several languages.

ATTENTION, LES DONNÉES DE CETTE PAGE DE TEST SONT FAUSSES ET FANTAISISTES ! ! !

Les pages de wikisource s:Auteur:Nelson_Mandela s:Auteur:Johnny Hallyday et s:Auteur:Gustave Eiffel permettent divers tests.

Cette page sert à tester les s:Modèle:Auteur3, s:Module:Author3, s:Module:ControlArgs et s:Module:MathRoman.
Ce modèle/module utilise des données de wikidata, permet une aide multilingue aux utilisateurs et administrateurs.
Selon le mode et les options, ce modèle/module affiche des aides, erreurs, catégories et tests.

#invoke:ControlArgs : mode normal

ControlArgs 1.02

Charles Maumené

L'auteur nil nil est mort en ècle , firstname = nil , lastname = nil , title = Charles Maumené , language_cat = nil , occupation_cat = nil , description = officier français - géographe

#invoke:ControlArgs : mode tests

ControlArgs 1.02:tests:fr Begin:

p.tests :

Vous devez supprimer cette documentation avant d'enregistrer. Supprimez tous les modes pour revenir en mode normal.

ControlArgs 1.02 Versions effectives

Versions warning report for ControlArgs 1.02 2015-09-09 :
Main module selector: main_selector
Main module all versions: main_all_versions
* Used modules:
* ControlArgs : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-09-09
* CA : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-10-29 12:26

* Received options :
, CA.args_final.mode = tests
, CA.mode_options = : docdata docdef docview docline docsrc tests
, CA.invoke_options =
, CA.args_final.c = nil
warning_versions_details:

require():

CA.package_loaded_read: string mw.text mw.ext.ParserFunctions package _G mw.hash mw.wikibase.entity os table math mw.wikibase.lexeme mw debug mw.language mw.html mw.wikibase mw.ustring mw.ext.TitleBlacklist mw.uri libraryUtil mw.title mw.site mw.ext.data mw.message

package.loaded: , string = table , mw.text = table , mw.ext.ParserFunctions = table , package = table , _G = table , mw.hash = table , mw.wikibase.entity = table , os = table , table = table , math = table , mw.wikibase.lexeme = table , mw = table , debug = table , mw.language = table , mw.html = table , mw.wikibase = table , mw.ustring = table , mw.ext.TitleBlacklist = table , mw.uri = table , libraryUtil = table , mw.title = table , mw.site = table , mw.ext.data = table , mw.message = table

* Used modules : , check_versions_tab = nil , _G = table
* ControlArgs : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-09-09
* CA : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-10-29 12:26

Global _G: , CA = table , string = table , package = table , CA_i18n_memory = table , os = table , math = table , _G = table , table = table , CA_memory = table , debug = table , mw = table

Descriptors:

Tracks:

{{Wikidata | anneeDeces = ècle | anneeNaissance = 1857 | description = officier français - géographe | entityid = Q21157618 | id = Q21157618 | label = Charles Maumené | pays = France}}

{{Arguments | anneeDeces = ècle
| anneeNaissance = 1857
| description = officier français - géographe
| id = Q21157618
| initiale = M
| label = Charles Maumené
| mode = tests
| pays = France
| titre = Charles Maumené
}}

Assistance sur les paramètres de ce modèle :
Module avec erreur interne Auteurs-ècle

ControlArgs 1.02

Charles Maumené

L'auteur nil nil est mort en ècle , firstname = nil , lastname = nil , title = Charles Maumené , language_cat = nil , occupation_cat = nil , description = officier français - géographe

Module avec erreur interne Auteurs-ècle

Tests de cette page

Tests et informations liées à cette page :

Langues : utilisateur : fr, wiki : fr.

ControlArgs 1.02 Versions effectives

Versions warning report for ControlArgs 1.02 2015-09-09 :
Main module selector: main_selector
Main module all versions: main_all_versions
* Used modules:
* ControlArgs : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-09-09
* CA : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-10-29 12:26

* Received options :
, CA.args_final.mode = tests
, CA.mode_options = : docdata docdef docview docline docsrc tests
, CA.invoke_options =
, CA.args_final.c = nil
warning_versions_details:

require():

CA.package_loaded_read: string mw.text mw.ext.ParserFunctions package _G mw.hash mw.wikibase.entity os table math mw.wikibase.lexeme mw debug mw.language mw.html mw.wikibase mw.ustring mw.ext.TitleBlacklist mw.uri libraryUtil mw.title mw.site mw.ext.data mw.message

package.loaded: , string = table , mw.text = table , mw.ext.ParserFunctions = table , package = table , _G = table , mw.hash = table , mw.wikibase.entity = table , os = table , table = table , math = table , mw.wikibase.lexeme = table , mw = table , debug = table , mw.language = table , mw.html = table , mw.wikibase = table , mw.ustring = table , mw.ext.TitleBlacklist = table , mw.uri = table , libraryUtil = table , mw.title = table , mw.site = table , mw.ext.data = table , mw.message = table

* Used modules : , check_versions_tab = nil , _G = table
* ControlArgs : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-09-09
* CA : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-10-29 12:26

Global _G: , CA = table , string = table , package = table , CA_i18n_memory = table , os = table , math = table , _G = table , table = table , CA_memory = table , debug = table , mw = table

Descriptors:

Tracks:

Options et leurs utilisations :

List of modes:
- , normal = noerr
- , doc1 = nobox noerr nocat
- , tests = : catview docview docdef docline docsrc docdata tests
- , edit = : catview docview docdef docline docsrc docdata

Langues : utilisateur : fr, wiki : fr.

Actual mode used: tests

Options read the last time in these tests, ones activated are in bold:

Options lues pour la dernière fois pendant ces tests, celles activées sont en gras :
, docdata , nobox , docline , catview , docmin , docmax , docdef , : , tests , noerr , docview , debug

Comptages des contenus de tables

- Counts of contents of tables:
Table i18n : counts tabs=3, vars=414, funcs=0.
Table wiki_translations : counts tabs=0, vars=148, funcs=0.
Table user_translations : counts tabs=0, vars=148, funcs=0.
Table args_known : counts tabs=24, vars=175, funcs=0.
Table args_wikidata : counts tabs=0, vars=7, funcs=0.
La table args_invoke n'existe pas.
La table args_template n'existe pas.
Table args_source : counts tabs=0, vars=7, funcs=0.
Table args_import : counts tabs=0, vars=10, funcs=0.
Table args_final : counts tabs=0, vars=10, funcs=0.
Table args_unknown : counts tabs=0, vars=0, funcs=0.
La table args_selected n'existe pas.
Table errors_list : counts tabs=0, vars=0, funcs=0.
Table categories_list : counts tabs=2, vars=5, funcs=0.
Table requires : counts tabs=0, vars=0, funcs=0.
Table inits : counts tabs=0, vars=0, funcs=0.

Liste de tous les arguments

* List_all_args :

* Liste des arguments nécessaires :
* entityid => id : (obligatoire, à vérifier) Identifiant des données de wikidata, comme Q535 pour Victor Hugo. , lev = entityid:0:debug
* id => id : (obligatoire, à vérifier) Identifiant des données de wikidata, comme Q535 pour Victor Hugo. , lev = id:0:debug
* initiale : (obligatoire, à vérifier) Initiale pour corriger les catégories d'ateurs. , lev = initiale:0:debug
* titre : (obligatoire, à vérifier) Titre de la page, automatique. , lev = titre:0:debug

* Liste de tous les autres arguments :
* **missing translation** => nom : **missing translation** , lev = nil:nil:debug
* 1 => mode : **missing translation** , lev = 1:0:debug
* Catégorie : **missing translation** , lev = Catégorie:0:debug
* allversions : **missing translation** , lev = allversions:0:debug
* anneeDeces : Année de décès , lev = anneeDeces:0:debug
* anneeNaissance : Année de naissance , lev = anneeNaissance:0:debug
* c : **missing translation** , lev = c:0:debug
* debug : **missing translation** , lev = debug:0:debug
* description : Description de l'auteur, à préciser si la description automatique ne convient pas , lev = description:0:debug
* label : Argument automatique de Wikidata. , lev = label:0:debug
* mode => mode : **missing translation** , lev = mode:0:debug
* nom => nom : Nom. A préciser pour corriger la clé de tri. , lev = nom:0:debug
* options : **missing translation** , lev = options:0:debug
* pays : **missing translation** , lev = pays:0:debug
* prenom => prénom : Prénom. A préciser pour corriger la clé de tri. , lev = prenom:0:debug
* prénom => prénom : Prénom. A préciser pour corriger la clé de tri. , lev = prénom:0:debug
* selectversions : **missing translation** , lev = selectversions:0:debug
* sitelink : Argument automatique de Wikidata. , lev = sitelink:0:debug
* userlang : **missing translation** , lev = userlang:0:debug
* wikilang : **missing translation** , lev = wikilang:0:debug

Tests et données importées de wikidata

wikidata_details_test :

Asked properties: , wd_error = wd_entity

Properties number maxn:

Properties list:

Wikidata pour une autre page :

Wikidata pour une autre page: Q535, Victor Hugo ( 1802 - 1885 ) ⦁ Données de Wikidata., 484 properties.

Asked properties: , sitelink = Victor Hugo , sitelink = nil , label = Victor Hugo , label = nil , entityid2 = Q535 , entityid2 = nil , deathyear = 1885 , deathyear = nil , country = France , country = nil , description = romancier, poète, dramaturge, dessinateur et politicien français , description = nil , birthyear = 1802 , birthyear = nil , entityid = Q535 , entityid = nil

Module, namespaces, et noms de pages :

spaces_page_names_test : , mwtitle = Module:ControlArgs , nsText = Module , baseText = ControlArgs , url = https://fr.wikipedia.org/wiki/Module:ControlArgs

Module namespace : , id828 = 828 , canonicalName828 = Module , name828 = Module , displayName828 = nil

All namespaces : , = 0 , Talk = 1 , User = 2 , User talk = 3 , Project = 4 , Project talk = 5 , File = 6 , File talk = 7 , MediaWiki = 8 , MediaWiki talk = 9 , Template = 10 , Template talk = 11 , Help = 12 , Help talk = 13 , Category = 14 , Category talk = 15 , Portail = 100 , Discussion Portail = 101 , Projet = 102 , Discussion Projet = 103 , Référence = 104 , Discussion Référence = 105 , TimedText = 710 , TimedText talk = 711 , Module = 828 , Module talk = 829 , Event = 1728 , Event talk = 1729

Table des arguments reçus, args_source :

Content of the CA.args_source table, begin: ( , levelmaxi = 99 , max_n = 9999 , exclude1 = , exclude2 = , exclude3 = )

Table .CA.args_source, 7 vars: string - région = chine , string - name = Jack Smith , string - region = india , string - occupation = Académiciens,Personnalités politiques , string - nom = Victor Hugo , string - langue = français,japonais , string - description = Victor Hugo est très connu. ,

Table .CA.args_source, 0 functions:

Table .CA.args_source, 0 tables:

Content of the CA.args_source table, end: 7 variables, 0 functions, 0 sub-tables.

Table des arguments inconnus, args_unknown :

Content of the CA.args_unknown table, begin: ( , levelmaxi = 99 , max_n = 9999 , exclude1 = , exclude2 = , exclude3 = )
Table .CA.args_unknown, 5 vars: string - région = chine , string - name = Jack Smith , string - region = india , string - langue = français,japonais , string - occupation = Académiciens,Personnalités politiques ,
Table .CA.args_unknown, 0 functions:
Table .CA.args_unknown, 0 tables:
Content of the CA.args_unknown table, end: 5 variables, 0 functions, 0 sub-tables.

Table des arguments connus, args_known :

Content of the CA.args_known table, begin: ( , levelmaxi = 99 , max_n = 9999 , exclude1 = , exclude2 = , exclude3 = )
Table .CA.args_known, 0 vars:
Table .CA.args_known, 0 functions:
Table .CA.args_known, 24 tables: 1, sitelink, c, label, lastname2, selectversions, entityid2, allversions, mode, deathyear, options, country, description, birthyear, userlang, firstname, initiale, firstname2, title, category, entityid, wikilang, lastname, debug,
- Table .CA.args_known.1, 7 vars: number - found = 0 , number - syn = 2 , number - list = 1 , string - trk = n , number - levenshtein = 8 , number - need = 0 , string - keyword = mode ,
- Table .CA.args_known.1, 0 functions:
- Table .CA.args_known.1, 0 tables:
- Table .CA.args_known.sitelink, 10 vars: string - trk = n=w , string - typ = dat , number - need = 0 , string - prop = sitelink , number - found = 1 , number - list = 2 , string - keyword = sitelink , string - src = wd , number - levenshtein = 7 , string - val = Victor Hugo ,
- Table .CA.args_known.sitelink, 0 functions:
- Table .CA.args_known.sitelink, 0 tables:
- Table .CA.args_known.c, 7 vars: number - found = 0 , number - levenshtein = 8 , number - list = 1 , string - trk = n= , string - typ = dat , string - keyword = c , number - need = 0 ,
- Table .CA.args_known.c, 0 functions:
- Table .CA.args_known.c, 0 tables:
- Table .CA.args_known.label, 10 vars: string - trk = n=w , string - typ = dat , number - need = 0 , string - prop = label , string - src = wd , number - list = 2 , number - levenshtein = 7 , string - keyword = label , number - found = 1 , string - val = Victor Hugo ,
- Table .CA.args_known.label, 0 functions:
- Table .CA.args_known.label, 0 tables:
- Table .CA.args_known.lastname2, 8 vars: number - syn = 2 , string - trk = n , string - typ = dat , number - need = 0 , number - found = 0 , number - list = 2 , number - levenshtein = 999 , string - keyword = lastname ,
- Table .CA.args_known.lastname2, 0 functions:
- Table .CA.args_known.lastname2, 0 tables:
- Table .CA.args_known.selectversions, 7 vars: number - found = 0 , number - levenshtein = 12 , number - list = 1 , string - trk = n= , string - typ = dat , string - keyword = selectversions , number - need = 0 ,
- Table .CA.args_known.selectversions, 0 functions:
- Table .CA.args_known.selectversions, 0 tables:
- Table .CA.args_known.entityid2, 9 vars: number - syn = 2 , string - trk = n , string - typ = dat , number - need = 2 , string - prop = entityid , number - found = 0 , number - list = 2 , number - levenshtein = 6 , string - keyword = entityid ,
- Table .CA.args_known.entityid2, 0 functions:
- Table .CA.args_known.entityid2, 0 tables:
- Table .CA.args_known.allversions, 7 vars: number - found = 0 , number - levenshtein = 10 , number - list = 1 , string - trk = n= , string - typ = dat , string - keyword = allversions , number - need = 0 ,
- Table .CA.args_known.allversions, 0 functions:
- Table .CA.args_known.allversions, 0 tables:
- Table .CA.args_known.mode, 8 vars: number - syn = 1 , string - trk = n= , string - typ = prg , number - need = 0 , number - found = 0 , number - list = 1 , number - levenshtein = 7 , string - keyword = mode ,
- Table .CA.args_known.mode, 0 functions:
- Table .CA.args_known.mode, 0 tables:
- Table .CA.args_known.deathyear, 11 vars: string - trk = n=w , string - typ = dat , number - need = 0 , string - prop = P570 , number - found = 1 , number - levenshtein = 8 , number - list = 2 , string - keyword = deathyear , string - format = year , string - src = wd , string - val = 1885 ,
- Table .CA.args_known.deathyear, 0 functions:
- Table .CA.args_known.deathyear, 0 tables:
- Table .CA.args_known.options, 7 vars: number - found = 0 , number - levenshtein = 6 , number - list = 1 , string - trk = n= , string - typ = dat , string - keyword = options , number - need = 0 ,
- Table .CA.args_known.options, 0 functions:
- Table .CA.args_known.options, 0 tables:
- Table .CA.args_known.country, 10 vars: string - trk = n=w , string - typ = dat , number - need = 0 , string - prop = P27 , string - src = wd , number - list = 3 , number - levenshtein = 7 , string - keyword = country , number - found = 1 , string - val = France ,
- Table .CA.args_known.country, 0 functions:
- Table .CA.args_known.country, 0 tables:
- Table .CA.args_known.description, 10 vars: string - trk = n=w ac , string - typ = dat , number - need = 0 , string - prop = description , string - src = args , number - list = 2 , number - levenshtein = 9 , string - keyword = description , number - found = 1 , string - val = Victor Hugo est très connu. ,
- Table .CA.args_known.description, 0 functions:
- Table .CA.args_known.description, 0 tables:
- Table .CA.args_known.birthyear, 11 vars: string - trk = n=w , string - typ = dat , number - need = 0 , string - prop = P569 , number - found = 1 , number - levenshtein = 10 , number - list = 2 , string - keyword = birthyear , string - format = year , string - src = wd , string - val = 1802 ,
- Table .CA.args_known.birthyear, 0 functions:
- Table .CA.args_known.birthyear, 0 tables:
- Table .CA.args_known.userlang, 7 vars: number - found = 0 , number - levenshtein = 7 , number - list = 1 , string - trk = n= , string - typ = dat , string - keyword = userlang , number - need = 0 ,
- Table .CA.args_known.userlang, 0 functions:
- Table .CA.args_known.userlang, 0 tables:
- Table .CA.args_known.firstname, 8 vars: number - syn = 1 , string - trk = s= , string - typ = dat , number - need = 0 , number - found = 0 , number - list = 2 , number - levenshtein = 8 , string - keyword = firstname ,
- Table .CA.args_known.firstname, 0 functions:
- Table .CA.args_known.firstname, 0 tables:
- Table .CA.args_known.initiale, 7 vars: number - levenshtein = 0 , number - found = 0 , string - trk = n= , number - list = 2 , string - typ = dat , number - need = 2 , string - keyword = initiale ,
- Table .CA.args_known.initiale, 0 functions:
- Table .CA.args_known.initiale, 0 tables:
- Table .CA.args_known.firstname2, 8 vars: number - syn = 2 , string - trk = n , string - typ = dat , number - need = 0 , number - found = 0 , number - list = 2 , number - levenshtein = 8 , string - keyword = firstname ,
- Table .CA.args_known.firstname2, 0 functions:
- Table .CA.args_known.firstname2, 0 tables:
- Table .CA.args_known.title, 7 vars: number - levenshtein = 5 , number - found = 0 , string - trk = n= , number - list = 2 , string - typ = dat , number - need = 2 , string - keyword = title ,
- Table .CA.args_known.title, 0 functions:
- Table .CA.args_known.title, 0 tables:
- Table .CA.args_known.category, 7 vars: number - found = 0 , number - levenshtein = 9 , number - list = 3 , string - trk = n= , string - typ = ctr , string - keyword = category , number - need = 0 ,
- Table .CA.args_known.category, 0 functions:
- Table .CA.args_known.category, 0 tables:
- Table .CA.args_known.entityid, 11 vars: number - syn = 1 , string - trk = n=w , string - typ = dat , number - need = 2 , string - prop = entityid , number - found = 2 , number - list = 2 , number - levenshtein = 7 , string - keyword = entityid , string - src = wd , string - val = Q535 ,
- Table .CA.args_known.entityid, 0 functions:
- Table .CA.args_known.entityid, 0 tables:
- Table .CA.args_known.wikilang, 7 vars: number - found = 0 , number - levenshtein = 6 , number - list = 1 , string - trk = n= , string - typ = dat , string - keyword = wikilang , number - need = 0 ,
- Table .CA.args_known.wikilang, 0 functions:
- Table .CA.args_known.wikilang, 0 tables:
- Table .CA.args_known.lastname, 10 vars: number - syn = 1 , string - trk = n= ac , string - typ = dat , string - keyword = lastname , number - found = 2 , number - list = 2 , number - need = 0 , string - src = args , number - levenshtein = 7 , string - val = Victor Hugo ,
- Table .CA.args_known.lastname, 0 functions:
- Table .CA.args_known.lastname, 0 tables:
- Table .CA.args_known.debug, 7 vars: number - found = 0 , number - levenshtein = 8 , number - list = 1 , string - trk = n= , string - typ = opt , string - keyword = debug , number - need = 0 ,
- Table .CA.args_known.debug, 0 functions:
- Table .CA.args_known.debug, 0 tables:
Content of the CA.args_known table, end: 201 variables, 0 functions, 24 sub-tables.

Test de Wikidata pour une autre page

Wikidata pour une autre page: Q535, ( 1802 - 1885 ) ⦁ Données de Wikidata.
Wikidata pour une autre page: Q899264, ( 1892 - 2012 ) ⦁ Données de Wikidata.

*Tests internes

* Tests internes de non régression :

Test des options de modes

options_from_mode_test:
- , normal = noerr
- , doc1 = nobox noerr nocat
- , tests = : catview docview docdef docline docsrc docdata tests
- , edit = : catview docview docdef docline docsrc docdata

Mode	List of options	noerr value	docview value	tests value options_from_mode_test:
normal	noerr	true
edit	: catview docview docdef docline docsrc docdata		true
tests	: catview docview docdef docline docsrc docdata tests		true	true

Test des options des arguments

options_from_args_test:

mode_options	invoke_options	opt can replace mode_options	available options	option result
nobox nocat	en docview		nobox nocat en docview	, nobox = true
nobox nocat	en docview		nobox nocat en docview	, nocat = true
nobox nocat	en docview		nobox nocat en docview	, en = true
nobox nocat	en docview		nobox nocat en docview	, docview = true
nobox nocat	: docview		nobox nocat : docview	, : = true
nobox nocat	en docview	docline fr	docline fr en docview	, docline = true
nobox nocat	en docview	docline fr	docline fr en docview	, docline = true
		docline fr	docline fr	, docline = true
		docline fr	docline fr	, fr = true
	en docview	docline fr	docline fr en docview	, en = true
nobox nocat		docline fr	docline fr	, docline = true
nobox nocat	en docview	docline fr	docline fr en docview	, nil = nil
nobox nocat	en docview		nobox nocat en docview	, docline = nil

List of modes:
- , normal = noerr
- , doc1 = nobox noerr nocat
- , tests = : catview docview docdef docline docsrc docdata tests
- , edit = : catview docview docdef docline docsrc docdata

Langues : utilisateur : fr, wiki : fr.
Actual mode used: tests
Options read the last time in these tests, ones activated are in bold:
Options lues pour la dernière fois pendant ces tests, celles activées sont en gras :
, false , nobox , nocat , : , en , fr , docview , docline
After these tests, anterior options are restored. Après ces tests, les options antérieures sont restaurés.

Versions détaillées

warning_versions_details:

require():

CA.package_loaded_read: string mw.text mw.ext.ParserFunctions package _G mw.hash mw.wikibase.entity os table math mw.wikibase.lexeme mw debug mw.language mw.html mw.wikibase mw.ustring mw.ext.TitleBlacklist mw.uri libraryUtil mw.title mw.site mw.ext.data mw.message

package.loaded: , string = table , mw.text = table , mw.ext.ParserFunctions = table , package = table , _G = table , mw.hash = table , mw.wikibase.entity = table , os = table , table = table , math = table , mw.wikibase.lexeme = table , mw = table , debug = table , mw.language = table , mw.html = table , mw.wikibase = table , mw.ustring = table , mw.ext.TitleBlacklist = table , mw.uri = table , libraryUtil = table , mw.title = table , mw.site = table , mw.ext.data = table , mw.message = table

* Used modules : , check_versions_tab = nil , _G = table
* ControlArgs : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-09-09
* CA : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-10-29 12:26

Global _G: , CA = table , string = table , package = table , os = table , table = table , mw = table , debug = table , CA_i18n_memory = table , _G = table , math = table , CA_memory = table

Descriptors:

Tracks:

Test de la gestion des versions

check_versions_test :
Selector: The main module selects which modules to use and in which versions.

The ControlArgs module tries to require modules when init, and later in test checks them and displays warnings.

Errors can happens anywhere in this process and the versions management helps users to maintain the coherence.

Arguments selectversions and allversions can replace and try them in only one page.

Selector: submodules can add their own submodules versions to the main selector.

Loaded modules : ControlArgs lists all really loaded modules and their /I18N submodules.

All versions are defined in the MainModule. For each module:

An alias, used in the code, like CA for ControlArgs.
A normal module name.
One or more available versions.

Example of allversions: AT,Author,Author3 * MathRoman * CA,ControlArgs.

Management indicators for each module:

Missing = selected but not loaded.
Unknown = selected but not in all versions of one module.
Normal = selected and normal and loaded.
Excess = loaded but in none version. Out of versions management.
SelectAll = all really loaded modules, even selected by submodules.

Really Loaded modules:

all_versions from ControlArgs 1.02	extended selector	loaded modules	management indicators
			1.02 Versions: manquantes: ControlArgs1, inconnues: , normales: , en excès: 4, toutes selectionées : .
all_versions tests of ControlArgs 1.02	extended selector	loaded modules	management indicators
AT,Author3 * MathRoman * CA,ControlArgs	Author MathRoman ControlArgs		3.00 Versions: manquantes: Author3 MathRoman ControlArgs, inconnues: , normales: , en excès: 4, toutes selectionées : Author MathRoman ControlArgs.
AT,Author3 * MathRoman2 * CA,ControlArgs	Author MathRoman2 ControlArgs -		3.00 - Versions: manquantes: Author3 MathRoman2 ControlArgs, inconnues: , normales: , en excès: 4, toutes selectionées : Author MathRoman2 ControlArgs - .
AT,Author3 * MathRoman2 * CA,ControlArgs	Author MathRoman2 ControlArgs +		3.00 Versions: manquantes: Author3 MathRoman2 ControlArgs, inconnues: , normales: , en excès: 4, toutes selectionées : Author MathRoman2 ControlArgs + .
AT,Author3 * MathRoman2 * CA,ControlArgs	Author MathRoman2 ControlArgs +		3.00 + Versions: manquantes: Author3 MathRoman2 ControlArgs, inconnues: , normales: , en excès: 4, toutes selectionées : Author MathRoman2 ControlArgs + .
AT,Author3 * MathRoman * CA,ControlArgs	Author3 MathRoman2 ControlArgs		3.00 Versions: manquantes: Author3 MathRoman ControlArgs, inconnues: , normales: , en excès: 4, toutes selectionées : Author3 MathRoman2 ControlArgs.
AT,Author,Author3 * MathRoman,MathRoman2 * CA,ControlArgs	Author3 MathRoman2 ControlArgs		3.00 Versions: manquantes: Author3 MathRoman2 ControlArgs, inconnues: , normales: , en excès: 4, toutes selectionées : Author3 MathRoman2 ControlArgs.
AT,Author,Author,Author3 * MathRoman,MathRoman,MathRoman2 * CA,ControlArgs,ControlArgs1	Author3 MathRoman2 ControlArgs		3.00 Versions: manquantes: Author Author3 MathRoman2 ControlArgs1, inconnues: , normales: , en excès: 4, toutes selectionées : Author3 MathRoman2 ControlArgs.
AT,Author4,Author3 * MathRoman,MathRoman4,MathRoman2 * CA,ControlArgs,ControlArgs4	Author3 MathRoman2 ControlArgs1 -		3.00 - Versions: manquantes: Author3 MathRoman2 ControlArgs4, inconnues: , normales: , en excès: 4, toutes selectionées : Author3 MathRoman2 ControlArgs1 - .
AT,Author4,Author3 * MathRoman,MathRoman4,MathRoman2 * CA,ControlArgs,ControlArgs4	Author3 MathRoman2 ControlArgs1		3.00+ Versions: manquantes: Author3 MathRoman2 ControlArgs4, inconnues: , normales: , en excès: 4, toutes selectionées : Author3 MathRoman2 ControlArgs1 .
AT,Author4,Author3 * MathRoman,MathRoman4,MathRoman2 * CA,ControlArgs,ControlArgs4	Author3 MathRoman2 ControlArgs1 +		3.00 + Versions: manquantes: Author3 MathRoman2 ControlArgs4, inconnues: , normales: , en excès: 4, toutes selectionées : Author3 MathRoman2 ControlArgs1 + .

Tests de date vers jour, mois, année ou ère

date_to_part :
Verify each value of part of date: Vérifier chaque valeur de partie de date :

Exemple	date	partie	valeur
Socrate nais.	470 BCE	era	BCE
Tite-Live nais.	59 BCE	yyyy	-59
Tite-Live mort.	17	yyyy	17
vide		yyyy
Révolution	14 juillet 1789	mmmm	juillet
Marche sur la Lune	20 juillet 1969
English date	July 20 1969	yyyy	1969
English date	July 20 1969	mmmm	July
Nelson Mandela nais.	juillet 1918	yyyy	1918
Nelson Mandela décès	5 décembre 2013	dd	5

Test des mots proches similar_args :

Formula to compute the near words limit: Formule de calcul de limite des mots proches : diffmaxi = 0.3 * length + 0.82
List of diffmaxi / lengths : , 1 / 1 , 1 / 2 , 1 / 3 , 2 / 4 , 2 / 5 , 2 / 6 , 2 / 7 , 3 / 8 , 3 / 9 , 3 / 10 , 4 / 11 , 4 / 12 , 4 / 13 , 5 / 14 , 5 / 15 , 5 / 16
List of known arguments and synonyms : , 1/1 , sitelink/sitelink , c/c , label/label , lastname2/- , selectversions/selectversions , entityid2/entityid , allversions/allversions , mode>mode/mode , deathyear/anneeDeces , options/options , country/pays , description/description , birthyear/anneeNaissance , userlang/userlang , firstname>firstname/prénom , initiale/initiale , firstname2/prenom , title/titre , category/Catégorie , entityid>entityid/id , wikilang/wikilang , lastname>lastname/nom , debug/debug
Test similar arguments 1.
similar_args_test1 : , search = anneedece , trouve1 = anneeDeces , min1 = 2 , trouve2 = mode , min2 = 7
Test similar arguments 2.
similar_args_test1 : , search = porte , trouve1 = mode , min1 = 3 , trouve2 = nil , min2 = 5

Test des distances entre mots de Levenshtein:

Un nom d'argument plus long accepte plus d'erreurs de lettres.
levenshtein : , diff = 0 , nom = nom
levenshtein : , diffmaxi = 1 >= , lev = 1 nom ==> Nom
levenshtein : , diffmaxi = 1 >= , lev = 2 top / pot
levenshtein : , diffmaxi = 1 >= , lev = 1 ami ==> amis
levenshtein : , diffmaxi = 1 >= , lev = 2 nom / name
levenshtein : , diffmaxi = 1 >= , lev = 1 m ==> mu
levenshtein : , diffmaxi = 1 >= , lev = 2 m / mur
levenshtein : , diffmaxi = 1 >= , lev = 2 mur / m
levenshtein : , diffmaxi = 1 >= , lev = 1 c ==> C
levenshtein : , diffmaxi = 1 >= , lev = 1 c ==> cf
levenshtein : , diffmaxi = 1 >= , lev = 4 c / long
levenshtein : , diffmaxi = 1 >= , lev = 3 xxx /
levenshtein : , diffmaxi = 0 >= , lev = 3 / xyz
levenshtein : , diffmaxi = 1 >= , lev = 2 xxx / xyz
levenshtein : , diffmaxi = 2 >= , lev = 3 prénom / Prenom
levenshtein : , diffmaxi = 3 >= , lev = 5 catégorie / Category
levenshtein : , diffmaxi = 4 >= , lev = 1 description ==> Description
levenshtein : , diffmaxi = 3 >= , lev = 8 anneeDeces / anneeNaissance
levenshtein : , diffmaxi = 4 >= , lev = 9 anoNacimiento / anneeNaissance
levenshtein : , diffmaxi = 4 >= , lev = 10 avant-après / après-avant

Lister une table, test sans limites :

Content of the CA.tablim table, begin: ( , levelmaxi = 99 , max_n = 9999 , exclude1 = , exclude2 = , exclude3 = )

Table .CA.tablim, 5 vars: string - 1 = one , string - 2 = two , string - max1 = MAX1 , string - max2 = MAX2 , string - max3 = MAX3 ,

Table .CA.tablim, 0 functions:

Table .CA.tablim, 3 tables: life, comfort, house,

Table .CA.tablim.life, 2 vars: string - vegetal = carot , string - animal = dog ,
Table .CA.tablim.life, 0 functions:
Table .CA.tablim.life, 1 tables: animals,
- Table .CA.tablim.life.animals, 1 vars: string - 1 = turtle ,
- Table .CA.tablim.life.animals, 0 functions:
- Table .CA.tablim.life.animals, 0 tables:
Table .CA.tablim.comfort, 2 vars: string - 1 = tv , string - mobile = car ,
Table .CA.tablim.comfort, 0 functions:
Table .CA.tablim.comfort, 0 tables:
Table .CA.tablim.house, 2 vars: string - 1 = kitcheen , string - 2 = bedroom ,
Table .CA.tablim.house, 0 functions:
Table .CA.tablim.house, 1 tables: garden,
- Table .CA.tablim.house.garden, 2 vars: string - flower = rose , string - nature = river ,
- Table .CA.tablim.house.garden, 0 functions:
- Table .CA.tablim.house.garden, 0 tables:

Content of the CA.tablim table, end: 14 variables, 0 functions, 5 sub-tables.

Lister une table, test avec limites :

Content of the CA.tablim table, begin: ( , levelmaxi = 2 , max_n = 2 , exclude1 = hou , exclude2 = , exclude3 = )
Table .CA.tablim Limite de longueur max_n = 2
Table .CA.tablim, 4 vars: string - 1 = one , string - 2 = two , string - max1 = MAX1 , string - max2 = MAX2 ,
Table .CA.tablim, 0 functions:
Table .CA.tablim, 2 tables: life, comfort, Limite de niveau levelmaxi = 2
- Table .CA.tablim.life, 0 vars:
- Table .CA.tablim.life, 0 functions:
- Table .CA.tablim.life, 1 tables: animals,
- Table .CA.tablim.comfort, 2 vars: string - 1 = tv , string - mobile = car ,
- Table .CA.tablim.comfort, 0 functions:
- Table .CA.tablim.comfort, 0 tables:
Content of the CA.tablim table, end: 6 variables, 0 functions, 2 sub-tables.

Manques de traductions en tables i18n :

Comparer les langues : es/fr,
⦁ Erreur interne : Le texte error_i18n_deseada_para_probar_traduccion_faltan manque de traduction en langue fr, et/ou d'autres.
Comparer les langues : fr/en,
⦁ Erreur interne : Le texte error_i18n_voulue_pour_test_de_traduction_manquante manque de traduction en langue en, et/ou d'autres.
⦁ Erreur interne : Le texte firstname2 manque de traduction en langue en, et/ou d'autres.
⦁ Erreur interne : Le texte error_i18n_deseada_para_probar_traduccion_faltan manque de traduction en langue en, et/ou d'autres.

⦁ Erreur interne : Il y a 4 manques parmi 150 traductions.
Translated languages: Langues traduites : , Langue : es , Langue : fr , Langue : en
Il y a 3 tables de traductions dans ces langues : es, fr, en,

Tables de traductions i18n combinées :

i18n_lister :

This list show all the texts, but cannot replace the original declarations.

Cette liste montre tous les textes, mais ne peut remplacer les déclarations originales.

p.i18n.es = {

1 = "1",

list_all_args_title = "Lista de todos los argumentos",

c = "c",

list_needed_arguments = "Lista de argumentos necesarios:",

missing_translations_title = "Traducciones que faltan en las tablas:",

date_to_part_call_cat = "Módulo con error interno",

rights = "derechos",

dummy_languages_title = "Definiciones de idiomas:",

firstname_descr = "Primero. Proponer para corregir la autómata.",

deathyear = "muerte",

deathyear_descr = "Año de la muerte.",

lastname_descr = "Nombre. Por favor, especifique para corregir la clave de ordenación.",

debug = "debug",

internal_tests_title = "Pruebas de no regresión internas:",

wikidata_details_test_title = "Pruebas y datos importados de wikidata",

flag_of_image = "Flag_of_Spain.svg",

cat_test_OK = "Prueba generación categoría en OK",

title = "titulo",

allversions = "allversions",

err_nearest_argument = "Error : ¿Es usted conocido argumento 1 ?",

title_descr = "Título de la página, automático.",

entityid = "id",

all_versions_tests = "Versiones aviso: 1, normal: 2, lista: 3.",

firstname2_descr = "Primero. Proponer para corregir la autómata.",

err_too_unnamed_arguments = "Error: Demasiado argumento sin nombre: 1 = 2.",

DropBox_option_label_Unwrap = "Desenvolver/Envolver",

dropdown_missing_title = "Falta el título para este dropbox",

err_wikidata_getEntityObject = "Error: Elemento 1 de Wikidata no se encuentra.",

authors_deathyear_cat = "Autores- 1",

date_months_names = "Enero, Febrero, Marzo, Abril, Mayo, Junio, Julio, Agosto, Septiembre, Octubre, Noviembre, Diciembre",

description_descr = "Descripción del autor, para aclarar si la descripción automática no encaja.",

needed_to_verify = "(obligatorio, se debe comprobar)",

birthyear_descr = "Año de nacimiento.",

description = "descripcion",

rights_descr = "Tipo de derechos de autor necesario: 70,50,mpf,non.",

err_module_miss_i18n = "Error interno: falta de traducción para el argumento 1 ",

mode = "modo",

table_args_known_title = "Tabla de argumentos conocidos, args_known:",

args_values_err = "Valor anormal del argumento 1 = 2 a partir de: ( 3) ",

initiale = "inicial",

versions_manage_test_title = "Prueba de la gestión de versiones",

rights_values = "70,50,mpf,no",

country = "país",

user_wiki_lang = "Idiomas: usuario: 1, wiki: 2.",

table_args_source_title = "Tabla de argumentos recibido, args_source:",

date_to_part_format = "dd mmmm yyyy",

language_cat = "Habla 1",

testable_limit_title = "Enumerar una tabla, prueba con límites:",

sources_of_datas = "Informacións de: /Wikidata, /modelo o módulo, /otros, /mensaje, /error",

wikidata_arbitrary_access_title = "Prueba de acceso independiente Wikidata",

versions_details_title = "Versiones detalladas",

all_versions_check = "Versiones: falta: 1, incógnitas: 2, normales: 3, en exceso: 4, selecciona todo: 5.",

birthyear = "nacimiento",

lastname = "nombre",

page_tests_title = "Pruebas y información relacionada con esta página:",

options_from_mode_title = "Prueba de opciones de modos",

sitelink = "sitelink",

sitelink_descr = "Wikidata automática argumento.",

cat_usage_error = "Módulo con error del uso",

date_to_part_call_err = "Error interno: argumentos de llamadas anómala en fecha 1.",

region_values = "otro,china,india,siglo",

category = "Categoría",

list_all_other_arguments = "Lista de todos los otros argumentos:",

entityid2 = "entityid",

wikidata_any_page_title = "Wikidata para cualquier página:",

err_no_source_arguments = "Error interno: Módulo sin tabla de argumentos fuentes.",

err_assist_user_param = "Soporte al usuario para comprobar la configuración:",

occupation_cat = " 1",

err_module_with_error = "Módulo con error",

language = "lenguaje",

msg_auto_val_warning = "Verifique el argumento automático: 1 = 2.",

wikidata_arbitrary_access_text = "Wikidata por otro título: ",

languages_nbr_and_list = "

Hay 1 mesas de traducciones en estas idiomas: 2
",

options = "opciones",

region = "región",

err_delete_docbox = "Debe quitar esta documentación antes de grabar.

Retire todos los modos para volver al modo normal.",

selectversions = "selectversions",

used_options_title = "Opciones y sus usos:",

err_no_known_arguments = "Error interno: Módulo sin tabla de argumentos conocidos.",

cat_no_source_arguments = "Módulo con error interno",

i18n_list_all_texts = "Esta lista muestra todos los textos, pero no puede sustituir a las declaraciones originales.",

err_value_re_defined = "Error: El valor del argumento 1 ya está definido. Elija sólo un valor de un solo sinónimo",

similar_args_test_title = "Prueba de palabras cercanos similar_args:",

structured_data_txt = "Datos de Wikidata",

wikilang = "wikilang",

err_module_miss_i18n_none = "OK, ninguno traducciones faltan.",

table_dont_exists = "La tabla 1 no existe.",

firstname = "apellido",

err_module_miss_i18n_cat = "Módulo con error interno",

error_i18n_deseada_para_probar_traduccion_faltan = "Espagnol error i18n deseada para probar traducción faltan",

label = "label",

initiale_descr = "Inicial para corregir la categoría de los autores.",

msg_auto_val_unknown = "Error interno: Argumento desconocido automático: 1 = 2.",

combined_translations_title = "Tablas traducciones i18n combinadas:",

testable_lister_title = "Enumerar una tabla, prueba sin límites:",

entityid_descr = "Nombre de los datos Wikidata, como Q535 para Victor Hugo.",

userlang = "userlang",

cat_name_number = "Año 1",

spaces_page_names_title = "Módulo, namespaces, y nombres de páginas:",

page_tests_h3_title = "Pruebas de esta página",

1 = "1",

table_counts = "Tabla 1 : cuentas tabs= 2, vars= 3, funcs= 4.",

date_to_part_test_title = "Pruebas de fecha a día, mes, año o época",

cat_no_known_arguments = "Módulo con error interno",

date_to_part_err_not_found = "Error interno: No se encuentra en fecha 1.",

entityid2_descr = "Nombre de los datos Wikidata, como Q535 para Victor Hugo.",

label_descr = "Wikidata automática argumento.",

options_from_args_title = "Prueba de opciones de argumentos",

cat_internal_error = "Módulo con error interno",

time_format_test_title = "Pruebas de codificación y conversión fechas",

internal_tests_h3_title = "Pruebas internas",

table_args_unknown_title = "Tabla de argumentos desconocidos, args_unknown:",

cat_add_test_title = "Pruebe la creación de categorías en algunos idiomas",

list_a_translated_language = "

1 traducciones en idioma 2 : 3 : 4",

levenshtein_test_title = "Prueba de las distancias entre las palabras Levenshtein:",

max_nearest_argument_msg = "Un argumento nombre más largo acepta más letras errores.",

err_unknown_argument = "Error: El parámetro 1 es desconocido en este modelo. Compruebe el nombre o marca esta brecha.",

tables_count_title = "Condes des contenidos en tablas",

actual_versions_title = "Versiones efectivas",

}

p.i18n.fr = {

1 = "1",

languages_nbr_and_list = "

Il y a 1 tables de traductions dans ces langues : 2
",

error_i18n_voulue_pour_test_de_traduction_manquante = "Français erreur i18n voulue pour tests de traduction manquante",

entityid2_descr = "Identifiant des données de wikidata, comme Q535 pour Victor Hugo.",

date_to_part_call_cat = "Module avec erreur interne",

rights = "droits",

err_no_known_arguments = "Erreur interne : Module sans table d'arguments connus.",

deathyear = "anneeDeces",

internal_tests_h3_title = "Tests internes",

date_months_names = "Janvier, Février, Mars, Avril, Mai, Juin, Juillet, Août, Septembre, Octobre, Novembre, Décembre",

wikidata_details_test_title = "Tests et données importées de wikidata",

cat_test_OK = "Test de génération de catégorie OK",

description_descr = "Description de l'auteur, à préciser si la description automatique ne convient pas",

err_nearest_argument = "Erreur : Voulez vous l'argument connu 1 ?",

firstname2_descr = "Prénom. A préciser pour corriger la clé de tri.",

err_too_unnamed_arguments = "Erreur : Ce paramètre non nommé est en trop : 1 = 2.",

err_wikidata_getEntityObject = "Erreur : L'élément 1 de Wikidata n'est pas trouvé.",

firstname2 = "prenom",

err_lang_not_exist = "Erreur : La langue 1 n'est pas une des langues des wikipedias.",

mode = "mode",

versions_manage_test_title = "Test de la gestion des versions",

rights_values = "70,50,mpf,non",

dropdown_missing_title = "Titre manquant pour cette boite déroulante",

all_versions_check = "Versions: manquantes: 1, inconnues: 2, normales: 3, en excès: 4, toutes selectionées : 5.",

lastname = "nom",

options_from_mode_title = "Test des options de modes",

sitelink_descr = "Argument automatique de Wikidata.",

err_value_re_defined = "Erreur : La valeur de l'argument 1 est déjà définie. XXX Choisir une seule valeur d'un seul synonyme.",

err_no_args_wikidata = "Erreur interne : Module sans table d'arguments wikidata.",

err_assist_user_param = "Support aux utilisateurs pour vérifier les paramètres :",

occupation_cat = " 1",

language = "langue",

1 = "1",

used_options_title = "Options et leurs utilisations :",

err_is_defined = "L'argument 1: 2 est défini.",

similar_args_test_title = "Test des mots proches similar_args :",

structured_data_txt = "Données de Wikidata.",

wikilang = "wikilang",

flag_of_image = "Flag_of_France.svg",

firstname = "prénom",

initiale_descr = "Initiale pour corriger les catégories d'ateurs.",

err_none_value = "Erreur : Aucun argument n'a été défini.",

initiale = "initiale",

entityid2 = "entityid",

category = "Catégorie",

table_listlimit_levelmaxi = "Limite de niveau levelmaxi = 1 ",

date_to_part_test_title = "Tests de date vers jour, mois, année ou ère",

date_to_part_err_not_found = "Erreur interne : partie non définie de date 1.",

err_wikidata_getEntity = "Erreur : getEntity Wikidata n'est pas disponible.",

birthyear_descr = "Année de naissance",

err_module_miss_i18n_count = "Erreur interne : Il y a 1 manques parmi 2 traductions.",

list_a_translated_language = "

1 traductions en langage 2 : 3 : 4",

err_without_translation = "Argument connu, mais non traduit : 1.",

max_nearest_argument_msg = "Un nom d'argument plus long accepte plus d'erreurs de lettres.",

tables_count_title = "Comptages des contenus de tables",

list_all_args_title = "Liste de tous les arguments",

c = "c",

list_needed_arguments = "Liste des arguments nécessaires :",

err_error_list_header = "Assistance sur les paramètres de ce modèle :",

missing_translations_title = "Manques de traductions en tables i18n :",

err_lang_table = "Erreur interne : La langue 1 ou sa table est erronée.",

firstname_descr = "Prénom. A préciser pour corriger la clé de tri.",

options_from_args_title = "Test des options des arguments",

deathyear_descr = "Année de décès",

err_unknown_argument = "Erreur : Le paramètre 1 est inconnu dans ce modèle. Vérifier ce nom ou signaler ce manque.",

msg_auto_val_unknown = "Erreur interne: Argument automatique inconnu : 1 = 2.",

internal_tests_title = "Tests internes de non régression :",

cat_add_test_title = "Tester la création des catégories dans quelques langues",

title = "titre",

err_module_miss_i18n_mini = "Erreur interne : La table i18n n'a que 1 traductions.",

err_generDoc1_paramName = "Erreur interne : en generDoc1, mauvais argument 1.",

err_lang_not_translated = "Erreur : La langue 1 n'est pas traduite.",

needed_to_verify = "(obligatoire, à vérifier)",

err_module_miss_i18n = "Erreur interne : manque de traduction pour l'argument 1 ",

err_lang_table_cat = "Module avec erreur interne",

table_args_known_title = "Table des arguments connus, args_known :",

country = "pays",

user_wiki_lang = "Langues : utilisateur : 1, wiki : 2.",

err_without_translation_N = "Il y a 1 arguments non traduits.",

testable_limit_title = "Lister une table, test avec limites :",

sources_of_datas = "Informations de : /Wikidata, /modèle ou module, /autres, /message, /erreur",

wikidata_arbitrary_access_title = "Test de Wikidata pour une autre page",

versions_details_title = "Versions détaillées",

err_internal_notice_wsid = "Erreur interne : Signaler au développeur que l'argument interne 1 est inconnu dans les notices.",

birthyear = "anneeNaissance",

sitelink = "sitelink",

description = "description",

DropBox_option_label_Unwrap = "Dérouler/Enrouler",

err_need_value = "Erreur : Vous devez définir cet argument nécessaire mais absent : 1.",

entityid = "id",

levenshtein_test_title = "Test des distances entre mots de Levenshtein:",

list_all_other_arguments = "Liste de tous les autres arguments :",

region_values = "autre,chine,inde,siècle",

wikidata_any_page_title = "Wikidata pour une autre page :",

args_values_err = "Valeur anormale de l'argument 1 = 2 parmi : ( 3) ",

authors_deathyear_cat = "Auteurs- 1",

spaces_page_names_title = "Module, namespaces, et noms de pages :",

cat_usage_error = "Module avec erreur d'utilisation",

page_tests_title = "Tests et informations liées à cette page :",

msg_auto_val_warning = "Vérifiez l'argument automatique : 1 = 2.",

wikidata_arbitrary_access_text = "Wikidata pour une autre page: ",

page_tests_h3_title = "Tests de cette page",

options = "options",

region = "région",

err_delete_docbox = "Vous devez supprimer cette documentation avant d'enregistrer.

Supprimez tous les modes pour revenir en mode normal.",

err_module_with_error = "Module avec erreur",

userlang = "userlang",

err_argv_args_src = "Erreur interne : en p.argv, table d'arguments absente.",

err_wikidata_wikibase = "Erreur : Wikibase n'est pas disponible.",

err_wikidata_error = "Erreur Wikidata : 1 ",

err_wikidata_cat = "Erreur Wikidata",

language_cat = "Parle 1",

table_listlimit_max_n = "Limite de longueur max_n = 1 ",

dummy_languages_title = "Définitions de langues :",

err_module_miss_i18n_none = "OK, aucune traduction manquante.",

entityid_descr = "Identifiant des données de wikidata, comme Q535 pour Victor Hugo.",

err_module_miss_i18n_cat = "Module avec erreur interne",

err_argv_args_name = "Erreur interne : en p.argv, argument anormal 1.",

debug = "debug",

label = "label",

rights_descr = "Type de droits d'auteur nécessaire parmi : 70,50,mpf,non.",

err_wikidata_property = "Erreur : La propriété 1 de Wikidata n'est pas trouvée.",

label_descr = "Argument automatique de Wikidata.",

selectversions = "selectversions",

lastname_descr = "Nom. A préciser pour corriger la clé de tri.",

err_no_wiki_translations = "Erreur interne : Module sans table d'arguments traduits.",

cat_name_number = "Année 1",

allversions = "allversions",

err_argv_args_miss = "Erreur interne : en p.argv, argument absent 1.",

err_is_undefined = "L'argument 1: 2 n'est pas défini.",

table_counts = "Table 1 : comptes tabs= 2, vars= 3, funcs= 4.",

combined_translations_title = "Tables de traductions i18n combinées :",

cat_no_known_arguments = "Module avec erreur interne",

err_module_miss_i18n_txt = "Erreur interne : Le texte 1 manque de traduction en langue 2, et/ou d'autres.",

table_dont_exists = "La table 1 n'existe pas.",

err_no_source_arguments = "Erreur interne : Module sans table d'arguments sources.",

cat_no_source_arguments = "Module avec erreur interne",

cat_internal_error = "Module avec erreur interne",

time_format_test_title = "Tests de codage et conversions de dates",

date_to_part_format = "dd yyyy mmmm",

table_args_unknown_title = "Table des arguments inconnus, args_unknown :",

date_to_part_call_err = "Erreur interne : Argument anormal de définition de date 1.",

actual_versions_title = "Versions effectives",

i18n_list_all_texts = "Cette liste montre tous les textes, mais ne peut remplacer les déclarations originales.",

all_versions_tests = "Versions avertissements : 1, normaux : 2, liste : 3.",

table_args_source_title = "Table des arguments reçus, args_source :",

title_descr = "Titre de la page, automatique.",

testable_lister_title = "Lister une table, test sans limites :",

}

p.i18n.en = {

1 = "1",

languages_nbr_and_list = "

There are 1 tables of translations in these languages : 2
",

entityid2_descr = "Identifier of Wikidata data, such as Q535 for Victor Hugo.",

date_to_part_call_cat = "Module with internal error",

rights = "rights",

err_no_known_arguments = "Internal Error: Module without known arguments table.",

deathyear = "deathyear",

internal_tests_h3_title = "Internal tests",

date_months_names = "January, February, March, April, May, June, July, August, September, October, November, December",

wikidata_details_test_title = "Tests and imported datas from wikidata",

cat_test_OK = "Test category generation OK",

description_descr = "Author's description, to clarify whether the automatic description does not fit.",

err_nearest_argument = "Error: Do you need the known argument 1 ?",

firstname2_descr = "First name. Please specify to correct the sort key.",

err_too_unnamed_arguments = "Error: This unnamed argument is too many: 1 = 2.",

err_wikidata_getEntityObject = "Error: Element Wikidata 1 is not found.",

err_lang_not_exist = "Error: The language 1 is not one of wikipedias.",

mode = "mode",

versions_manage_test_title = "Versions management test",

rights_values = "70,50,mpf,none",

dropdown_missing_title = "Missing title for this dropbox",

all_versions_check = "Versions: missings: 1, unknowns: 2, normals: 3, excess: 4, all selected: 5.",

lastname = "name",

options_from_mode_title = "Test options from modes",

sitelink_descr = "Automatic Wikidata argument.",

err_value_re_defined = "Error: The value of the argument 1 is already defined. Choose only one value of a single synonymous.",

err_no_args_wikidata = "Error: Module without wikidata arguments table.",

err_assist_user_param = "User support for checking the settings:",

occupation_cat = " 1",

language = "language",

1 = "1",

used_options_title = "Options and their uses:",

err_is_defined = "The argument 1: 2 is defined.",

similar_args_test_title = "Test close words similar_args:",

structured_data_txt = "Datas from Wikidata",

wikilang = "wikilang",

flag_of_image = "Flag_of_England.svg",

firstname = "firstname",

initiale_descr = "Initial to correct the category of authors.",

err_none_value = "Error: No argument has been defined.",

initiale = "initial",

entityid2 = "entityid",

category = "Category",

table_listlimit_levelmaxi = "Level limit levelmaxi = 1 ",

date_to_part_test_title = "Tests of date to day, month, year or era",

date_to_part_err_not_found = "Internal Error: No part found in date 1.",

err_wikidata_getEntity = "Error: getEntity Wikidata is not available.",

birthyear_descr = "Year of birth.",

err_module_miss_i18n_count = "Internal Error: There are 1 missings in 2 translations.",

list_a_translated_language = "

1 translations in language 2 : 3 : 4",

err_without_translation = "Known argument, but not translated: 1.",

max_nearest_argument_msg = "A longer name argument accepts more letter errors.",

tables_count_title = "Counts of contents in tables",

list_all_args_title = "List of all arguments",

c = "c",

list_needed_arguments = "List of needed arguments:",

err_error_list_header = "User support about parameters:",

missing_translations_title = "Translations missing in i18n tables:",

err_lang_table = "Error: The 1 language or its table is incorrect.",

firstname_descr = "First name. Please specify to correct the sort key.",

options_from_args_title = "Test options from arguments",

deathyear_descr = "Year of death.",

lastname_descr = "Family name. Please specify to correct the sort key.",

msg_auto_val_unknown = "Internal Error: Unknown automatic argument: 1 = 2.",

internal_tests_title = "Internal regression tests:",

cat_add_test_title = "Test the creation of categories in some languages",

title = "title",

err_module_miss_i18n_mini = "Error: I18n table has only 1% translations.",

err_generDoc1_paramName = "Internal Error: in generDoc1, bad argument 1.",

err_lang_not_translated = "Error: The language 1 is not translated.",

needed_to_verify = "(required, to be checked)",

err_module_miss_i18n = "Internal Error: Module missing i18n translation for the argument 1 ",

err_lang_table_cat = "Module with internal error",

table_args_known_title = "Table of known arguments, args_known:",

country = "country",

user_wiki_lang = "Languages: user: 1, wiki: 2.",

err_without_translation_N = "There are 1 arguments untranslated.",

testable_limit_title = "List a table, test with limits:",

sources_of_datas = "Informations from: /Wikidata, /template or module, /other, /message, /error",

wikidata_arbitrary_access_title = "Test of Wikidata arbitrary access",

versions_details_title = "Detailed versions",

dummy_languages_title = "Language Definitions:",

err_internal_notice_wsid = "Internal Error: Notify the developer that the internal argument 1 is unknown in the records.",

birthyear = "birthyear",

sitelink = "sitelink",

description = "description",

DropBox_option_label_Unwrap = "Unwrap/Wrap",

testable_lister_title = "List a table, test without limits:",

entityid = "id",

table_args_source_title = "Table of received arguments, args_source:",

list_all_other_arguments = "List of all other arguments:",

region_values = "other,china,india,century",

wikidata_any_page_title = "Wikidata for any page:",

args_values_err = "Abnormal value of the argument 1 = 2 including ( 3) ",

authors_deathyear_cat = "Authors- 1",

date_to_part_call_err = "Internal Error: Abnormal calling arguments in date 1.",

cat_usage_error = "Module with usage error",

date_to_part_format = "dd yyyy mmmm",

msg_auto_val_warning = "Verify the automatic argument: 1 = 2.",

wikidata_arbitrary_access_text = "Wikidata for another Title: ",

page_tests_title = "Testing and information related to this page:",

options = "options",

region = "region",

err_delete_docbox = "You must remove this documentation before recording.

Remove all modes to return to normal mode.",

err_unknown_argument = "Error: parameter 1 is unknown in this template. Check the name or flag this gap.",

userlang = "userlang",

err_argv_args_src = "Internal Error: in p.argv, arguments table is missing.",

err_wikidata_wikibase = "Error: Wikibase is not available.",

err_wikidata_error = "Error Wikidata: 1 ",

err_wikidata_cat = "Module with internal error",

language_cat = "Speaking 1",

table_listlimit_max_n = "Length limit max_n = 1 ",

combined_translations_title = "Combined i18n translations tables:",

entityid_descr = "Identifier of Wikidata data, such as Q535 for Victor Hugo.",

err_module_miss_i18n_none = "OK, none missing translations.",

err_module_miss_i18n_cat = "Module with internal error",

err_is_undefined = "The argument 1: 2 is not defined.",

label_descr = "Automatic Wikidata argument.",

label = "label",

rights_descr = "Necessary copyrights type: 70,50,mpf,non.",

err_wikidata_property = "Error: Wikidata property 1 is not found.",

err_argv_args_name = "Internal Error: in p.argv, abnormal argument 1.",

selectversions = "selectversions",

debug = "debug",

err_no_wiki_translations = "Error: Module without translated arguments table.",

cat_name_number = "Year 1",

allversions = "allversions",

err_argv_args_miss = "Internal Error: in p.argv, missing argument 1.",

error_i18n_wanted_to_test_missing_translation = "English error i18n wanted for tests missing translation",

table_counts = "Table 1 : counts tabs= 2, vars= 3, funcs= 4.",

err_module_miss_i18n_txt = "Internal Error: The text 1 lack of translation in 2 language, and/or others.",

cat_no_known_arguments = "Module with internal error",

table_dont_exists = "The table 1 does not exist.",

err_no_source_arguments = "Internal Error: Module without source arguments table.",

cat_no_source_arguments = "Module with internal error",

page_tests_h3_title = "Tests of this page",

cat_internal_error = "Module with internal error",

time_format_test_title = "Tests of coding and conversion of dates",

spaces_page_names_title = "Module, namespaces, and page names:",

table_args_unknown_title = "Table of unknown arguments, args_unknown:",

actual_versions_title = "Actual versions",

i18n_list_all_texts = "This list show all the texts, but cannot replace the original declarations.",

levenshtein_test_title = "Test the distances between words Levenshtein:",

all_versions_tests = "Versions warning: 1, normal: 2, listall: 3.",

err_need_value = "Error: This argument is required but absent : 1. Should define it.",

title_descr = "Page title, automatic.",

err_module_with_error = "Module with error",

}

Définitions de langues :

dummy_languages : , isTag = isKnownLanguageTag(xx) , isLang = isSupportedLanguage(xx) , isBuilt = isValidBuiltInCode(xx)

lang	isTag	isLang	isBuilt	langname	native
es	true	true	true	Spanish	español
sgs	true	true	true	Samogitian	žemaitėška
fr	true	true	true	French	français
gsw	true	true	true	Alemannic	Alemannisch
en	true	true	true	English	English
als	true		true	Alemannic	Alemannisch
bat-smg	true		true	Samogitian	žemaitėška
Fr				French	français

Tests de codage et conversions de dates

time_format_test : Coding and conversion of dates by the parser function language_obj:formatDate(format, timestamp, loc). , CA.language_code = fr
Verify some date formats: Vérifier quelques formats de dates :

Test dates from seconds	format	timestamp	lang	Formated date
now	U	now	nil	1744107901
seconds to full UTC	r	@1421117374	nil	Tue, 13 Jan 2015 03:49:34 +0100
seconds to full UTC	r	@1424087374	nil	Mon, 16 Feb 2015 12:49:34 +0100
2015-02-16T11:49:34+00:00	c	@1424107003	nil	2015-02-16T18:16:43+01:00
14/7/1789 to english	F j Y	@-5692450006	en	August 12 1789
seconds to french format	j F Y	@1499997003	nil	14 July 2017
french 14/7/1789	j F Y	@-5692450006	fr	12 août 1789
french 14/7/234	j F Y	@-54763469936	fr	13 août 0234
Test from UTC	format	timestamp	lang	Formated date
french date	j F Y	1915-02-16T17:16:43+00:00	fr	16 février 1915
french date	j F Y	1515-02-22T17:16:43+00:00	fr	22 février 1515
Test dates only	format	timestamp	lang	Formated date
french 2015-02-16	j F Y	2015-02-16	fr	16 février 2015
french 32-12-25	j F Y	32-12-25	fr	25 décembre 2032
french 0032-12-25	j F Y	0032-12-25	fr	25 décembre 0032
french 3/4/5	j F Y	0005-04-03	fr	3 avril 0005
french 24/11/31	j F Y	0031-11-24	fr	24 novembre 0031
french 24/11/32	j F Y	0032-11-24	nil	24 novembre 0032
french 24/12/32	j F Y	0032-12-24	nil	24 décembre 0032
french 25/12/32	j F Y	0032-12-25	nil	25 décembre 0032
french 25/12/32 roman year	j F xrY	0032-12-25	nil	25 décembre XXXII
Test partial formats & missing datas	format	timestamp	lang	Formated date
partial format 3/4/5	F Y	0005-04-03	nil	avril 0005
partial format 3/4/5	Y	0005-04-03	nil	0005
missing day -/4/5	j F Y	0005-04-2	nil	2 avril 0005
missing month 3/-/5	j F Y	0005-2-03	nil	3 février 0005
missing year 3/4/-	j F Y	2000-04-03	nil	3 avril 2000
missing day -/4/5	F Y	0005-04-2	nil	avril 0005
missing month 3/-/5	j Y	0005-2-03	nil	3 0005
missing year 3/4/-	j F	2000-04-03	nil	3 avril

Tester la création des catégories dans quelques langues

Test the function cat_add : , user_lang = fr , wiki_lang = fr

Test type	user language	wiki language	Categories
cat_add	-	-	Module avec erreur interne
cat_add	-	-	Module avec erreur d'utilisation
cat_add	en	-	Module with internal error
cat_add	en	es	Module with internal error
catGroup	en	fr	Speaking french Speaking italian Speaking chinese
catGroup	en	en	Académiciens Personnalités politiques
cat_add	fr	en	Module avec erreur interne
cat_add	es	en	Módulo con error interno
cat_add	en	x-y-z	Module with internal error
cat_add	x-y-z	en	Module with internal error

Test the function categories_lister : Module avec erreur interne Module avec erreur d'utilisation Parle french Parle italian Parle chinese Académiciens Personnalités politiques
This test reset categories before the test.

multiple_values_tests_title

Test multiple_values :

argm	argvalue	args_final	keyword	keyval	argval	rank
region	inde
region	inconnue
rights	mpf
rights	non
rights	aucun
sex	femme
sex	homme
sex	enfant
		args_final = {	region = "india"	rights = "non"	sex = "femme"	}
argm	argvalue	args_final	keyword	keyval	argval	rank
region	inde	table
region		table
rights	mpf	table
rights	non	table
rights		table
sex		table
sex		table
sex	enfant	table

multiple_selection_test_title

multiple_selection options: , = = equal only , t = not trim before and after , U = not lowercase and uppercase

selector = nobel,+1,président,3,député,prix signifie : sélectionner le premier, puis 1 de plus parmi les suivants, puis 3 en tout au maximum.

multiple_selection_test_header
,	2, nobel, président, député, prix	président de Pologne,député à l'Assemblée, Prix Nehru, Nobel de la paix	, nobel = Nobel de la paix , président = président de Pologne , selected_txt = Nobel de la paix, président de Pologne,
,U	2, nobel, président, député, prix	président de Pologne,député à l'Assemblée, Prix Nehru, Nobel de la paix	, président = président de Pologne , député = député à l'Assemblée , selected_txt = président de Pologne, député à l'Assemblée,
,	3, député, prix, nobel, président	président de Pologne,député à l'Assemblée, Prix Nehru, Nobel de la paix	, député = député à l'Assemblée , prix = Prix Nehru , nobel = Nobel de la paix , selected_txt = député à l'Assemblée, Prix Nehru, Nobel de la paix,
,=	3,député, prix,nobel,président	président de Pologne,député, Prix Nehru,Nobel	, député = député , selected_txt = député,
,t	3,député, prix,nobel,président	président de Pologne,député, Prix Nehru,Nobel	, député = député , prix = Prix Nehru , nobel = Nobel , selected_txt = député, Prix Nehru, Nobel,
;	3; prix; nobel;+1; président; député	président de Pologne;député à l'Assemblée; Prix Nehru; Nobel de la paix	, prix = Prix Nehru , nobel = Nobel de la paix , président = président de Pologne , selected_txt = Prix Nehru, Nobel de la paix, président de Pologne,
;	3; président; nobel; député; prix	président de Pologne;député à l'Assemblée; Prix Nehru; Nobel de la paix	, président = président de Pologne , nobel = Nobel de la paix , député = député à l'Assemblée , selected_txt = président de Pologne, Nobel de la paix, député à l'Assemblée,
;t	3;député; prix;nobel;président	président de Pologne;député; Prix Nehru;Nobel	, député = député , prix = Prix Nehru , nobel = Nobel , selected_txt = député, Prix Nehru, Nobel,
;U	2; nobel; président; député; prix	président de Pologne;député à l'Assemblée; Prix Nehru; Nobel de la paix	, président = président de Pologne , député = député à l'Assemblée , selected_txt = président de Pologne, député à l'Assemblée,

Time test table from wikidata time properties

Content of the CA.TimeTest.claims.P570.1.mainsnak table, begin: ( , levelmaxi = 99 , max_n = 9999 , exclude1 = , exclude2 = , exclude3 = )
Table .CA.TimeTest.claims.P570.1.mainsnak, 3 vars: string - snaktype = value , string - property = P570 , string - datatype = time ,
Table .CA.TimeTest.claims.P570.1.mainsnak, 0 functions:
Table .CA.TimeTest.claims.P570.1.mainsnak, 1 tables: datavalue,
- Table .CA.TimeTest.claims.P570.1.mainsnak.datavalue, 1 vars: string - type = time ,
- Table .CA.TimeTest.claims.P570.1.mainsnak.datavalue, 0 functions:
- Table .CA.TimeTest.claims.P570.1.mainsnak.datavalue, 1 tables: value,
  - Table .CA.TimeTest.claims.P570.1.mainsnak.datavalue.value, 6 vars: number - before = 0 , string - time = +2012-08-03T00:00:00Z , number - timezone = 0 , number - precision = 11 , number - after = 0 , string - calendarmodel = http://www.wikidata.org/entity/Q1985727 ,
  - Table .CA.TimeTest.claims.P570.1.mainsnak.datavalue.value, 0 functions:
  - Table .CA.TimeTest.claims.P570.1.mainsnak.datavalue.value, 0 tables:
Content of the CA.TimeTest.claims.P570.1.mainsnak table, end: 10 variables, 0 functions, 2 sub-tables.

Execution and test time : 2025-04-08 10:25:01 UTC , url = https://fr.wikipedia.org/wiki/Module:ControlArgs ,
start in page = 41 mS , import + 11 mS , form result + 3 mS , tests + 570 mS , duration = 585 mS
, host = fr.wikipedia.org , authority = fr.wikipedia.org , user = nil , user_language = nil , text = ControlArgs , baseText = ControlArgs , rootText = ControlArgs , subpageText = ControlArgs
In this wiki: , modules ns(828) = 42363 , 42 patrollers(patroller) = 0 , 18 administrators (Rical ?) (sysop) = 142 , 12 bots (bot) = 66 , checkuser = 6 , bureaucrats (bureaucrat) = 0 , 0 (accountcreator) = 56

ControlArgs 1.02:tests:fr End.

* funct = doc1, [1] = missing_translations_title
<nowiki>{{#invoke:ControlArgs|doc1|missing_translations_title}}</nowiki>

Manques de traductions en tables i18n :

Comparer les langues : es/fr,
Comparer les langues : fr/en,
⦁ Erreur interne : Le texte firstname2 manque de traduction en langue en, et/ou d'autres.

⦁ Erreur interne : Il y a 1 manques parmi 147 traductions.
Translated languages: Langues traduites : , Langue : es , Langue : fr , Langue : en
Il y a 3 tables de traductions dans ces langues : es, fr, en,

* funct = doc1, [1] = options_from_mode_title
<nowiki>{{#invoke:ControlArgs|doc1|options_from_mode_title}}</nowiki>

Test des options de modes

options_from_mode_test:
- , normal = noerr
- , doc1 = nobox noerr nocat
- , tests = : catview docview docdef docline docsrc docdata tests
- , edit = : catview docview docdef docline docsrc docdata

Mode	List of options	noerr value	docview value	tests value options_from_mode_test:
normal	noerr	true
edit	: catview docview docdef docline docsrc docdata		true
tests	: catview docview docdef docline docsrc docdata tests		true	true

* funct = doc1, [1] = used_options_title
<nowiki>{{#invoke:ControlArgs|doc1|used_options_title}}</nowiki>

Options et leurs utilisations :

List of modes:
- , normal = noerr
- , doc1 = nobox noerr nocat
- , tests = : catview docview docdef docline docsrc docdata tests
- , edit = : catview docview docdef docline docsrc docdata

Langues : utilisateur : fr, wiki : fr.
Actual mode used: normal
Options read the last time in these tests, ones activated are in bold:
Options lues pour la dernière fois pendant ces tests, celles activées sont en gras :

* funct = doc1, [1] = wikidata_any_page_title, [2] = wikidata ID
<nowiki>{{#invoke:ControlArgs|doc1|wikidata_any_page_title|Q535}}</nowiki>

Wikidata pour une autre page :

Wikidata pour une autre page: Q21157618, Charles Maumené ( 1857 - ècle ) ⦁ Données de Wikidata., 23 properties.

Asked properties: , sitelink = nil , sitelink = nil , label = Charles Maumené , label = nil , entityid2 = Q21157618 , entityid2 = nil , deathyear = ècle , deathyear = nil , country = France , country = nil , description = officier français - géographe , description = nil , birthyear = 1857 , birthyear = nil , entityid = Q21157618 , entityid = nil

* funct = doc1, [1] = versions_details_title
<nowiki>{{#invoke:ControlArgs|doc1|versions_details_title}}</nowiki>

Versions détaillées

warning_versions_details:

require():

CA.package_loaded_read: string mw.text mw.ext.ParserFunctions package _G mw.hash mw.wikibase.entity os table math mw.wikibase.lexeme mw debug mw.language mw.html mw.wikibase mw.ustring mw.ext.TitleBlacklist mw.uri libraryUtil mw.title mw.site mw.ext.data mw.message

package.loaded: , string = table , mw.text = table , mw.ext.ParserFunctions = table , package = table , _G = table , mw.hash = table , mw.wikibase.entity = table , os = table , table = table , math = table , mw.wikibase.lexeme = table , mw = table , debug = table , mw.language = table , mw.html = table , mw.wikibase = table , mw.ustring = table , mw.ext.TitleBlacklist = table , mw.uri = table , libraryUtil = table , mw.title = table , mw.site = table , mw.ext.data = table , mw.message = table

* Used modules : , check_versions_tab = nil , _G = table
* ControlArgs : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-09-09
* CA : , versionName = ControlArgs , versionNumber = 1.02 , versionDate = 2015-10-29 12:26

Global _G: , CA = table , string = table , package = table , CA_i18n_memory = table , os = table , math = table , _G = table , table = table , CA_memory = table , debug = table , mw = table

Descriptors:

Tracks:

Projet Scribunto

La documentation de ce module est générée par le modèle {{Documentation module}}.
Elle est incluse depuis sa sous-page de documentation. Veuillez placer les catégories sur cette page-là.
Les éditeurs peuvent travailler dans le bac à sable (créer).
Voir les statistiques d'appel depuis le wikicode sur l'outil wstat et les appels depuis d'autres modules.

-- Module:ControlArgs

local p = {}
local CA = p
_G["CA"] = p

--	Module dependencies. Dependencias del módulo. Dépendances du module.
p.versions = { -- versions space, created here
	vn = { -- initial version descriptor
		versionName = "ControlArgs", versionNumber = "1.02", versionDate = "2015-10-29 12:26",
		selector = " ControlArgs ", -- Asked module and submodules versions
--		versionName = "ControlArgs1", versionNumber = "1.02", versionDate = "2015-10-29 17:39",
--		selector = " ControlArgs1 ", -- Asked module and submodules versions
		-- All existing versions for one module and all its submodules:
		all_versions = " CA,ControlArgs,ControlArgs1 ",
		alternates = "CA,ControlArgs,ControlArgs1", -- alias,normal,version of this module. -- automatic updated by version management
	},
	-- Along the init process, the ControlArgs module manages these submodules and their descriptors:
	alias = "CA", normal = "ControlArgs", version = "ControlArgs1", I18N = "ControlArgs/I18N", -- automatic updated by version management
	inits = {}, -- inits table to collect all init steps descriptors p.inits[i].
	requires = {}, -- requires table to collect all requires[version] descriptors.
	global_modules = {}, -- = _G global_modules table to collect all p.global_modules[alias] modules
	loaded_modules = "", warning = "", after_builder = "", -- some intermediate variables
	d = {}, -- last used module or submodule descriptor
}

local versions = CA.versions
CA.i18n_trc = "-"
CA.ModuleNS = mw.site.namespaces.Module.name .. ":"
CA.module_nil = "xx_yy_zz_tt"

--[[
Along the init process, the software in ControlArgs manage the submodules and the descriptors are saved in the MainModule.
* First, the MainModule require() the MainControlArgs sub-module.
* In all steps of init i, each module m or sub-module s can run a new require() r. m, s, i and r are ordinal numbers and finaly total numbers.
* Each init i is registered in the versions.inits[] table. Each version is registered in the requires[] table.
* Each definition of a module or sub-module contain the normal Module:title, the global variable alias and some or none alternate versions.
* The selector of versions limits the versions to use. The "+" character authorize submodules to extend the versions to use.
--]]

--[[ ControlArgs

-- Todo : debug versions test
-- Todo : versions test for any modules, not only Author3 MathRoman2

-- https://gerrit.wikimedia.org/r/#/c/188503/
-- T85419 User groups should be exposed to Scribunto
-- T85419 gerrit : Expose user information to Lua : Add mw.user, which allows viewing groups, blocks, and some other user info.

-- DEBUG :	versions.warning_report - Table wiki_translations : counts tabs=0, vars=87
-- DEBUG :	versions.warning_report t=start - Table wiki_translations : counts tabs=0, vars=87
-- DEBUG :	arbitrary_access_test	t=start - Table wiki_translations : counts tabs=0, vars=117

------ Todo later:
	-- Todo later: task T00000 Help to convert any module as centralisable
	-- Todo later: migration in Module:Versions and adapt other modules
	-- Todo later: task T00000 Get the name of the module itself from mw.GetModuleName or frame:GetModuleName to require /I18N and manage versions without errors
		-- in Author3
		-- local Versions = require "Module:Versions" -- in Author3
		-- Versions.add_modules( p, MathRoman2, ControlArgs, Versions ) -- in Author3
		-- in MathRoman2
		-- local Versions = require "Module:Versions" -- in MathRoman2
		-- Versions.add_modules( p, ControlArgs1, Versions ) -- in MathRoman2
		-- in ControlArgs
		-- local Versions = require "Module:Versions" -- in ControlArgs
		-- Versions.add_modules( p, Versions ) -- in ControlArgs
		-- in Versions
		-- Versions.build_tree( ) -- in Versions
		-- Versions.all_versions_text( ) -- in Versions
		-- Versions.warning_short( ) -- in Versions
		-- see package.loaded and _G for help

------ Todo later:
local V = require("Module:Versions")
local CA = V.require_version("ControlArgs") -- explicitly manage and require one version, off availables, in versions process.
local CA = V.require_version("MathRoman") -- explicitly manage and require one version, off availables, in versions process.
p.versions = { -- typical versions management
	main, vers, last = { -- typical version descriptor
		name = "ControlArgs", nbr = "1.01", date = "2015-10-13 wikidata date-time ISO 8601",
		selector = " ControlArgs ", -- Asked module and submodules versions
		all_versions = " CA,ControlArgs,ControlArgs1 ", -- All existing versions for one module and all its submodules:
		alternates = "CA,ControlArgs,ControlArgs1", -- alias,normal,version of this module. -- automatic updated by version management
	},
	inits, requires, loaded, global = { like vers and more }
	requires{} collects all the couples{calling, called, execution_time}.
	after the require times, any calling module can ask the build of the tree, and any report.
	The dependency is : ControlArgs, Versions, ... , Main
}

--	T00000 Todo task : Help to convert any module as centralisable
--	T00000 Todo task : Try and help to adapt any module to become central.
-- This module can adapt any other module for international use with I18N tables for argument names, wikitext, categories and errors.
-- see https://fr.wikisource.org/wiki/Module:ControlArgs
-- which adapts https://fr.wikisource.org/wiki/Module:Auteur
-- Ce module ControlArgs permet d'adapter n'importe quel autre à un usage international avec tables I18N pour les noms d'arguments, le wikitexte, les catégories et les messages.

-- == Explore aspects of central modules implementation: arguments translation, user support, submodules, versions ...

-- where to discuss these aspects ?
-- blocking tasks, why : not really blocking but help, automatize and avoids human errors : T53660 edit-sate, TTTTTT module title, T68051 user langage, T85419 users groups
-- block the task : not really blocking :
-- could offer new services to users and admins
-- module title for submodules automatic names and for alternate versions management
-- a local module can replace a local one, or this is forbiden, or this is choose by the central module
-- is a central module shown like a local one, with a special marker
-- local submodules without local main module
-- a central module title is it translated in other languages wiki ?
-- some service or aspects could become a scribunto library or a complement in scribunto extension
-- other aspect : central modules introduces Scribunto and Lua as a fringe part of the mediawiki development.
-- where to discuss ? there ?

Linked bugs :
	T85419 User groups should be exposed to Scribunto
	T49930 Allow accessing data from a Wikidata item not connected to the current page - arbitrary access (tracking)
	T52329 We need a common repository for Scribunto modules and templates
	T85412 The formatPropertyValues needs an option to format data from date-time, angle or geographic coordinates
	T48160 Lua: Allow using labels in mw.wikibase.entity.formatPropertyValues
--	T41610 Scribunto should support global module invocations, blocked by: T85419 T53660 T68051 T22222
	T53660 Detect the edit state to adapt help messages to user errors
	T67507 It should be possible to get entity id from page title
	T59656 Special:ItemDisambiguation ranking
	T68051 Get the user language to help admins to maintain a module or a template (userInfo: String user and password)
	T4085 Add a {{USERLANGUAGE}}/{{USERLANG}} magic word
		*	https://phabricator.wikimedia.org/T4085
		*	Pro arguments in short: {{CONTENTLANGUAGE}} & {{CONTENTLANG}} thus call it {{USERLANGUAGE}} & {{USERLANG}} (as {{USERIFCODE}} is too weird)
		*	Note: On Betawiki (translatewiki.net) there is such a magic word; but they call it {{UILANGCODE}}
		*	Workarounds available:
		*	*	For system administrators, installing a small {{UILANGCODE}} extension.
		*	*	For wiki administrators, using {{int:lang}} after creating all MediaWiki:Lang subpages.
		T4085 Bug duplicate of this bug: 14633, 1136, 16608, 8059, 14098, 46372
	T22222: Get title of module itself, Get the module_name itself, in case of rename, alternative version, or sub-modules names without error.
		-- need 1 : automatize the call of sub modules in sub title, like main_module/i18n for translations
		-- need 2 : help to manage alternate versions of a group of submodules in any titles
	T49137 : Add ability to generate a list of pages based on prefix to Scribunto/Lua. To easy find /I18N sub modules.
	T101280 Render labels in the user language on the client (via Lua or parser function), split parser cache - duplicate of T75460
	T75460 Sane Lua label access in non-content languages
-- It's currently unclear how to get the "correct" target language. Conceptually, it seems like Parser::getTargetLanguage() should return the user's language on multi-lingual wikis. It already does this if $this->mOptions->getInterfaceMessage() is not null.
https://phabricator.wikimedia.org/T101280

Comment Rical on 20150606 11:26 :
In a multilingual module, I put translations of arguments names, categories and error messages in the submodule "module_name/I18N". Then the main_module can change without change translations in any language in any wiki. But without the module_name itself I cannot automatize that for any modules.
The present change could resolve that, giving at the same time "module_name/I18N" and "module_name". The change could be helped with a parameter to select a part of sub titles, which contain "I18N" in my case.

I could also ask a change "Get the module_name itself". But the present change is more general and can be used for a group of sub modules and their datas.

Lua is not granteed to be installed on all third party wikis.

-- Todo debug : "\n* any texte" is forbiden before dropbox. Is it a bug ? To tests with native Dropbox.
	res = res .. CA.dropdown_func(1, "Time test table from wikidata time properties", CA.testable_lister, CA.TimeTest, "CA.TimeTest.claims." .. (CA.TimeName or "Pxxx") )

------------------------------------------------------------------------------
-- Todo pending debug														--
------------------------------------------------------------------------------

-- Todo? test view testable of wikidata time properties, CA.testable_lister CA.TimeTest birth P569 require "Datum"

-- Todo : french for test "Language Definitions:"

-- Todo : versions test for any modules, not only Author3 MathRoman2

-- Todo docum : I18N translations permit to choose at wiki level how errors are grouped in categories (in "usage error" or "internal error" or other groups).

-- Todo debug pour docum : un mode test1 avec le param t = key_test_to_view qui produit seulement un lot de tests pour les documentations utilisateur.

-- Todo debug : Dropbox plus souple a traduire et parametrer par une table de parametres nommés pour le "style".
-- Dropbox : droptions = { 1 = title = "title", 2 = content = "content", function, functargs, alignT, image, alignB, margin_bottom, width, border_radius, border_color, background_color }
-- Dropbox : ControlArgs.drop(frame) = Dropbox with multilingual translations for any template.

-- A faire : pour supprimer CA.get_editstate() attendre le Bug T53660 Detect the edit state.

-- relire ControlArgs/Author : module code in english
-- A faire : Module code must be in english, documentation in the wiki language.

-- A faire : comment eviter qu'un argument de wikidata "perde sans raison" son origine ( src = "wd" ) ?
-- masquer les couleurs en attendant, voir message_color ...

-- a faire ? dans gener_doc, trier les arguments dans l'ordre alphabetique de la langue du wiki.

-- A faire plus tard : testframework : tests groupés avec mediawiki pour des modules centralisés
-- local testframework = require 'Module:TestFramework' return testframework.getTestProvider( {-- Tests go here} )

-- Fait et a faire : séparer clairement les tests a la fin :

---------------------------------------------------------------------------------
-- Documentation ----------------------------------------------------------------
---------------------------------------------------------------------------------
-- A faire docum : base minimale : "CA traduit et verifie les agruments".
-- A faire docum : sub-modules selectors option "-" and option "+".
-- The option "-" transmits the upper selector at any lower level. The option "-" have the priority on others.
-- The option "+" mixes and extends the upper selector with the lower selector.
-- docum : suite a debat dans fr:wikipedia, comment choisir d'utiliser ou non une info de wikidata
-- par "-" pour « donnée dans l'article sinon rien » ou "+" pour « utiliser la valeur WD »
-- The URI object has the following fields, some or all of which may be nil:
-- user: String user, query: A table, as from mw.uri.parseQueryString
-- voir Module:Author3 CA.args_selected, p.selected_autorities, p.authorities_from_args = p.authorities_select()
-- sélecteur = "+" Sélectionner toutes les autorités de wikidata
-- sélecteur = "-" Supprimer toutes les autorités de wikidata. Pioritaire sur '''+'''.
-- sélecteur = "BNF, Worldcat, +4, VIAF, 3, GKD, LCCN" Sélectionner les premières, puis parmi les suivantes 4 de plus en tout, puis au maximum 3 en tout.
--		https://fr.wikipedia.org/wiki/Discussion_Projet:Infobox/Lua#Priorit.C3.A9_des_sources_de_donn.C3.A9es
--		Discussion_Projet:Infobox/Lua#Priorité des sources de données
-- docum : Ce module doit porter le même nom dans les wiki de toutes les langues, le code étant identique.
-- docum : Les sous-modules ../I18N doivent contenir au moins les traductions dans la langue du wiki.
-- docum : ControlArgs example : arguments names, errors and categories

--	Reference et pages tests :
-- https://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Test_cases
-- voir aussi https://www.mediawiki.org/wiki/Module:Auteur
-- voir aussi https://www.mediawiki.org/wiki/Module:Unitest_Scribunto
-- voir aussi https://www.mediawiki.org/wiki/Module:Documentation/config
-- voir aussi https://en.wikipedia.org/wiki/Module:ScribuntoUnit
-- voir aussi https://en.wikipedia.org/wiki/Module:UnitTests


---------------------------------------------------------------------------------
							relecture
---------------------------------------------------------------------------------


-- Fait : Si formDocBox est hors de Module ou Modèle alors : erreur et categorie "erreur d'utilisation"

-- Fait : display category without the word "Category".

-- En developement : Bug 66539 - asked - Keep getEntity in cache for all modules and wikidata-templates in a page
-- getEntityObject est très long a executer, 2 à 2.5 seconde, alors que cette entité a probablement déjà été liée pour les liens interwikis ou par interprojet. Peut-on éviter cette double requete ?

-- A faire : obtenir le Bug 51660 - asked - Detect the edit state to adapt help messages to user errors.
-- En attendant le Bug 51660 , on peut le remplacer par l'option manuelle "edit", et l'enlever avant de valider la page.
-- A faire : obtenir le Bug 66051 - asked - Get and use the user language to help to maintain a module or a template
-- La plupart des erreurs sont utiles pendant l'édition de la page, mais génantes ensuite.

-- docum : need="0" not necessary argument
-- need="1" necessary from argument
-- need="2" necessary from argument or module interaction

local testframework = require 'Module:TestFramework'
return testframework.getTestProvider( {
	-- Tests go here
} )

--]]

function CA.versions.loaded_modules() -- List all loaded modules
	local loaded = " "
	local loaded_tab = {}
	local elem = {}
	for title, m in pairs(package.loaded) do -- List package.loaded modules
		local md = string.find(title, CA.ModuleNS)
		local v18 = string.gsub(title, CA.ModuleNS, "") -- v18 = version without Module: and perhaps /I18N
		if md then loaded = loaded .. " " .. v18 .. " " end
		local I18N = string.find(title, "/I18N")
		local vrs = string.gsub(v18, "/I18N", "") -- vrs = version without /I18N
		if md then
			elem = loaded_tab[v18] or {}
			elem.pack = true
			elem.modl = true
			elem.version = vrs
			if I18N then elem.I18N = v18 end -- version with /I18N
			loaded_tab[v18] = elem
		end
	end
	for title, m in pairs(_G) do -- List global _G modules
		local md = string.find(title, CA.ModuleNS)
		local v18 = string.gsub(title, CA.ModuleNS, "") -- v18 = version without Module: and perhaps /I18N
		if md then loaded = loaded .. " " .. v18 .. " " end
		local I18N = string.find(title, "/I18N")
		local vrs = string.gsub(v18, "/I18N", "") -- vrs = version without /I18N
		if md then
			elem = loaded_tab[v18] or {}
			elem.glob = true
			elem.modl = true
			elem.version = vrs
			if I18N then elem.I18N = v18 end -- version with /I18N
			loaded_tab[v18] = elem
		end
	end
	return loaded, loaded_tab
end -- function CA.versions.loaded_modules()

function CA.versions.check_versions(t, calling_module, all_versions, selector, versionNumber, versionName, missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab)
	-- Check all submodules versions.
	local loaded_modules, loaded_tab, modu = CA.versions.loaded_modules()
--	local t = t or "<br><br><b>versions.check_versions</b>: "
	local t = t or "<br>versions.check_versions recieved this ask : "
	t = t .. CA.ta(" selector ", selector) .. CA.ta(" all_versions ", all_versions) .. CA.ta(" selectall ", selectall)
	t = t .. "<br>loaded modules = " .. loaded_modules
	local warn_vrs = ""
	--
	calling_module = calling_module or CA.versions.MainModule -- for modules in the versions system
	local versionNumber = p.versions.vn.versionNumber or "0.0"
	local versionName = p.versions.vn.versionName or "VersName"
	local calling_module_selector, calling_module_all_versions
	if CA.is_version(sub_module) and sub_module.versions.vn.selector then
		calling_module_selector = sub_module.versions.vn.selector
		calling_module_all_versions = sub_module.versions.vn.all_versions
	end
	local selector = selector or calling_module_selector or CA.versions.main_selector or " " -- p.versions.vn.selector or "XXX YYY"
--	local selector = selector or calling_module.versions.vn.selector or CA.versions.main_selector or " " -- p.versions.vn.selector or "XXX YYY"
	local all_versions = all_versions or calling_module_all_versions or p.versions.vn.all_versions or " ,	, "
	local selectall = selectall or selector
	local check_versions_tab = check_versions_tab or {}
	local inits = p.versions.inits
	missings = missings or " " ; unknowns = unknowns or " " ; normals = normals or " " ; listall = listall or " "
	selectall = selectall or " " ; warnings = warnings or " " ; loaded_list = loaded_list or " " ; aliases = aliases or " "
	--
	-- Check coherence and conformities.
	local all_versions_split, max
	if type(all_versions) == "string" then all_versions_split = mw.text.split(all_versions, "*", true) end
	for a, alternates in ipairs(all_versions_split) do
		alternates = mw.text.trim( tostring(alternates) )
		t = t .. CA.ta("\n* a="..a, alternates)
		local alternates_split = mw.text.split(tostring(alternates), ",", true)
		local maxn = table.maxn(alternates_split)
		for v, altern in ipairs(alternates_split) do
			local elem, select, version, alias, normal = {}
			altern = mw.text.trim(altern)
			select = CA.is_in(" " .. altern .. " ", " " .. (selector or "") .. " ")
		--	select = CA.is_in_sp(altern, (selector or "") )
			if v == 1 and select then alias = altern ; normal = altern ; version = altern end
			if v == 2 and select then normal = altern ; version = altern end
			if v > 2 and select then version = altern end
			t = t .. CA.ta("<br>v="..v, altern) .. CA.ta("select", select)
			if (v > 2) or (v == maxn) then
				-- Check coherence and conformities
				if maxn == 1 then alias = altern ; normal = altern ; version = altern end
				if maxn == 2 then normal = altern ; version = altern end
				if maxn > 1	 then version = altern end
				elem = loaded_tab[altern] or {}
				loaded = elem["modl"] and elem["vrs"] and not elem["I18N"]
				aliases = aliases .. " " .. (alias or "")
				if version and not loaded then missings = missings .. " " .. version end
				if select and not version then unknowns = unknowns .. " " .. version end
				if normal and loaded and (version == normal) then normals = normals .. " " .. normal end
				if version and loaded then listall = listall .. " " .. version end
				all_versions_sp = string.gsub(all_versions, ",", " ") -- version without Module:
				if loaded and not CA.is_in_sp(version, all_versions_sp) then excess = excess .. " " .. version .. " " end
				warnings = missings .. unknowns
				t = t .. CA.ta("missings", missings) .. CA.ta("unknowns", unknowns) .. CA.ta("warnings", warnings)
			end
			-- if there is only one word in alternates, stop the loop. See gmatch in Extension:Scribunto/Lua reference manual
			if select and not CA.is_in_sp(altern, selectall) then selectall = selectall .. " " .. altern .. " " end
			-- extend selector with modu.versions
			if elem.version and not elem.I18N then
				loaded_list = elem.version .. " " .. loaded_list
				local modu_vrs = CA.ModuleNS .. elem.version
				if package.loaded and package.loaded[modu_vrs] then sub_module = package.loaded[modu_vrs] else sub_module = nil end
				-- Extend extensible selector in versions management sub-modules
				if CA.is_version(sub_module) and sub_module.versions.vn.selector and CA.is_in_sp("+", selector) and not CA.is_in_sp(altern, selectall)
				then selectall = selectall .. " " .. elem.version .. " " end
			--	and not CA.is_in("/I18N", sub_module.versions.vn.selector)
			--	then selectall = selectall .. " (" .. elem.version .. " > " .. sub_module.versions.vn.selector .. ") " end
			--	then selectall = selectall .. " <b>+" .. elem.version .. "</b> " end
				--
				-- Selector options "+" and "-" permit to select or mix the calling selector and/or the sub selector.
				local calling_selector = " " .. (calling_module.versions.vn.selector or " ") .. " "
			--	local selectall = selector .. " " .. calling_selector
				-- The option "-" transmits the upper selector at any lower level. The option "-" have the priority on others.
				if CA.is_in("-", calling_selector) then selector = calling_selector
				-- The option "+" mixes and extends the upper selector with the lower selector.
				elseif CA.is_in_sp("+", calling_selector) then selector = calling_selector .. " :: " .. selector
				-- If no option, uses the lower selector. It can select unpreviewed versions. Lowest priority case.
				else selector = selector end
				--
				-- Cycle inside each of submodules
				if CA.is_version(sub_module) and sub_module.versions.vn.selector and CA.is_in_sp("+", selector) and not CA.is_in_sp(altern, selectall)
				then
					warn_vrs, xx, missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab =
					CA.versions.check_versions("", sub_module, nil, nil, versionNumber, versionName,
								  missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab)
				end
			end -- and not CA.is_in(elem.version, selectall)
			--
			if altern == alternates then break end
		end
	end
	warn_vrs = CA.str_vars("all_versions_tests", warnings, normals, listall) or "*"
	t = t .. "<br>" .. warn_vrs -- .. ", " .. check["missings"] .. ", " .. check["unknowns"] .. ", " .. check["excess"]
	CA.check = t
--	selectall = (selectall or "")
	local v, d = CA.versions, d or CA.versions.vn or CA.versions.d or {} -- descriptor of submodule
	d.missings = missings ; d.unknowns = unknowns ; d.normals = normals ; d.listall = listall ; d.selectall = selectall ;
	d.warnings = warnings ; d.loaded_list = loaded_list ; d.excess = excess ; d.aliases = aliases ;
	check_versions_tab = table.insert( check_versions_tab, d )
	return warn_vrs, t, missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab
end -- function CA.versions.check_versions(t, calling_module, all_versions, selector, versionNumber, versionName,
--						missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab)

function CA.versions.require_versions(calling_module, all_versions, selector, versionNumber, versionName) -- Require all submodules versions
	local v, d = CA.versions, d or CA.versions.vn or CA.versions.d or {} -- descriptor of submodule
	local calling_module = calling_module or CA.versions.MainModule -- for modules in the versions system
	local selector = selector or CA.versions.main_selector
	--
	if CA.is_in("MathRoman", selector) then selector = selector .. " + MathRoman333 " end -- DEBUG
	--
	-- Selector options "+" and "-" permit to select or mix the calling selector and/or the sub selector.
	local calling_selector = " " .. (calling_module.versions.vn.selector or " ") .. " "
	local selectall = (selector or " s ") .. " " .. calling_selector
	-- The option "-" transmits the upper selector at any lower level. The option "-" have the priority on others.
	if CA.is_in(" - ", calling_selector) then selector = calling_selector
	-- The option "+" mixes and extends the upper selector with the lower selector.
	elseif CA.is_in(" + ", calling_selector) then selector = calling_selector .. " :: " .. selector
	-- If no option, uses the lower selector. It can select unpreviewed versions. Lowest priority case.
	else selector = selector end
	--
	local all_versions = all_versions or CA.versions.main_all_versions
	local versionNumber = all_versions or CA.versions.vn.versionNumber or "0.0"
	local versionName = all_versions or CA.versions.vn.versionName or "MainModule"
--	local all_versions_reverse = v.reverse_all_versions(d.main_all_versions) -- Reverse all the sort of submodules
	-- First, list all missing modules versions to require them.
	local warn_vrs, xx, missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab =
	CA.versions.check_versions("- ", calling_module, all_versions, selector, versionNumber, versionName)
	local missings_split = mw.text.split(tostring(missings), " ", true)
	local maxn = table.maxn(missings_split) -- DEBUG : + 9 -- add some more search in case some submodules add more subversions
	for i, miss in ipairs(missings_split) do
		local miss_title = CA.ModuleNS .. miss
		local submodule = CA.require_xpcall( miss ) -- require() must not fail and block the page.
		if submodule then -- require() is OK, use the submodule
			local dd = CA.record_module(submodule, nil, nil, miss)
--			warn_vrs, xx, missings, unknowns, normals, listall, selectall, warnings, loaded_list
--			= CA.versions.require_versions(calling_module, all_versions, selector, versionNumber, versionName) -- Require all submodules versions
		end
	end
	local t = "<br>" .. warn_vrs -- .. ", " .. check["missings"] .. ", " .. check["unknowns"] .. ", " .. check["excess"]
	CA.check = t
	selectall = (selectall or " _ ")
	CA.check_versions_tab = check_versions_tab
	return warn_vrs, t, missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess
end -- function CA.versions.require_versions(calling_module, all_versions, selector)

function CA.versions.check_versions_test(t) -- Check all submodules versions   Versions warning report
	-- Guide to understand the versions management:
	local t = t or "\n* <b>check_versions_test</b> :"
	t = t .. "<br><b>Selector</b>: The main module selects which modules to use and in which versions."
	t = t .. "\n* The <b>ControlArgs</b> module tries to require modules when init, and later in test checks them and displays warnings."
	t = t .. "\n* Errors can happens anywhere in this process and the versions management helps users to maintain the coherence."
	t = t .. '\n* Arguments <b>selectversions</b> and <b>allversions</b> can replace and try them in only one page.'
	t = t .. "\n* <b>Selector</b>: submodules can add their own submodules versions to the main selector."
	t = t .. "\n* <b>Loaded</b> modules : ControlArgs lists all really loaded modules and their /I18N submodules."
	t = t .. "\n* All versions are defined in the MainModule. For each module: "
	t = t .. "\n** An <b>alias</b>, used in the code, like CA for ControlArgs."
	t = t .. "\n** A <b>normal</b> module name."
	t = t .. "\n** One or more available <b>versions</b>."
	t = t .. '\n* Example of <b>allversions</b>: AT,Author,Author3 * MathRoman * CA,ControlArgs.'
	t = t .. "\n* Management indicators for each module: "
	t = t .. "\n** <b>Missing</b> = selected but not loaded."
	t = t .. "\n** <b>Unknown</b> = selected but not in all versions of one module."
	t = t .. "\n** <b>Normal</b> = selected and normal and loaded."
	t = t .. "\n** <b>Excess</b> = loaded but in none version. Out of versions management."
	t = t .. "\n** <b>SelectAll</b> = all really loaded modules, even selected by submodules."
	local loaded, loaded_tab = CA.versions.loaded_modules()
	t = t .. "\n* <b>Really Loaded modules</b>: " .. loaded
	local function check_versions_test1(t, all_versions, selector, versionNumber, versionName)
		-- Test for (Author3 * MathRoman * ControlArgs) is not enough.
		-- DEBUG todo : Implement test fo any versions names, inside the all_versions, select with a parameter which choose : (nil:all normal, 0:odd-in-all normal, 1:even-in-all normal, 2:unknow=normal_Tijk)
		local warn_vrs, xx, missings, unknowns, normals, listall, selectall, warnings, loaded_list, excess, aliases, check_versions_tab =
		CA.versions.check_versions("- ", nil, all_versions, selector, versionNumber, versionName)
		local indicators = CA.str_vars( "all_versions_check", missings, unknowns, normals, excess, selectall)
		return t .. CA.Tr() .. CA.Td(all_versions) .. CA.Td(selectall) .. CA.Td(loaded_list) .. CA.Td("<b>" .. versionNumber .. "</b> " .. indicators)
	end
	-- Main module all_versions
	local main_version = (CA.versions.main_versionName or "MainModule-T") .. " " .. (CA.versions.main_versionNumber or "0.0-T")
	t = t .. CA.Th() .. CA.Tc(" all_versions from " .. main_version) .. CA.Tc("extended selector") .. CA.Tc("loaded modules") .. CA.Tc("management indicators")
	t = check_versions_test1(t, CA.versions.main_all_versions, CA.versions.main_selector, CA.versions.main_versionNumber or "0.0-T", CA.versions.main_versionName or "MainModule-T")
	-- several selector and all_versions tests
	t = t .. CA.Tr() .. CA.Tc("all_versions tests of " .. main_version) .. CA.Tc("extended selector") .. CA.Tc("loaded modules") .. CA.Tc("management indicators")
	t = check_versions_test1(t, " AT,Author3 * MathRoman * CA,ControlArgs ", "Author MathRoman ControlArgs", "3.00", "Author")
	t = check_versions_test1(t, " AT,Author3 * MathRoman2 * CA,ControlArgs ", "Author MathRoman2 ControlArgs - ", "3.00 -", "Author")
	t = check_versions_test1(t, " AT,Author3 * MathRoman2 * CA,ControlArgs ", "Author MathRoman2 ControlArgs + ", "3.00", "Author")
	t = check_versions_test1(t, " AT,Author3 * MathRoman2 * CA,ControlArgs ", "Author MathRoman2 ControlArgs + ", "3.00 +", "Author")
	t = check_versions_test1(t, " AT,Author3 * MathRoman * CA,ControlArgs ", "Author3 MathRoman2 ControlArgs", "3.00", "Author")
	t = check_versions_test1(t, " AT,Author,Author3 * MathRoman,MathRoman2 * CA,ControlArgs ", "Author3 MathRoman2 ControlArgs", "3.00", "Author")
	t = check_versions_test1(t, " AT,Author,Author,Author3 * MathRoman,MathRoman,MathRoman2 * CA,ControlArgs,ControlArgs1 ", "Author3 MathRoman2 ControlArgs", "3.00", "Author")
	t = check_versions_test1(t, " AT,Author4,Author3 * MathRoman,MathRoman4,MathRoman2 * CA,ControlArgs,ControlArgs4 ", "Author3 MathRoman2 ControlArgs1 - ", "3.00 -", "Author")
	t = check_versions_test1(t, " AT,Author4,Author3 * MathRoman,MathRoman4,MathRoman2 * CA,ControlArgs,ControlArgs4 ", "Author3 MathRoman2 ControlArgs1 ", "3.00+", "Author")
	t = check_versions_test1(t, " AT,Author4,Author3 * MathRoman,MathRoman4,MathRoman2 * CA,ControlArgs,ControlArgs4 ", "Author3 MathRoman2 ControlArgs1 + ", "3.00 +", "Author")
	t = t .. CA.Te()
	return t
end -- function CA.versions.check_versions_test(d)

function CA.i18n_trac(id, t, count) -- track for i18n DEBUG
--	CA.i18n_trac("base_func", "end", 1) -- example of use
	CA.i18n_trc = CA.i18n_trc .. "<br><b>" .. (id or "") .. "</b> t=" .. (t or "")
	if count then
		CA.i18n_trc = CA.i18n_trc .. " - " .. CA.table_count("i18n")
		CA.i18n_trc = CA.i18n_trc .. " - " .. CA.table_count("wiki_translations")
		CA.i18n_trc = CA.i18n_trc .. " - " .. CA.table_count("user_translations")
	end
	return
end

function CA.is_in(word, text) -- The word is it in the text, even inside another word?
	local f = string.find(text, word, 1, true)
	if f then return true else return false end
end

function CA.is_in_sp(word, text) -- The word is it in the text, beetwen spaces, not inside another word?
	local f = string.find(" " .. text .. " ", " " .. word .. " ", 1, true)
--	local f = string.find(text, "%s" .. word .. "%s")
	if f then return true else return false end
end

function CA.is_version(module) -- A module is it in version management system?
	return type(module) == "table" and module.versions and module.versions.vn
end

function CA.versions.msri(m,s,r,i)
	local v, d = CA.versions, d or CA.versions.d or {} -- descriptor of submodule
	m = m or d.n_modul or 0 ; s = s or d.n_submod or 0 ; r = r or d.n_require or 0 ; i = i or d.n_init or 0
	return " :m"..m.."s"..s.."r"..r.."i"..i..": "
end -- CA.versions.msri(m,s,r,i)

--	local already_required = package.loaded[d.version] or v.global_modules.MainModule.module_version
--	if d.version and not CA.module_loaded(d.version) then -- restore submodule from global_modules in _G or require
function CA.module_loaded(version)
	local loaded = false
	version = string.gsub(version, CA.ModuleNS, "") -- version without Module:
	version = CA.ModuleNS .. version -- if not CA.is_in(CA.ModuleNS, version) then version = CA.ModuleNS .. version end
	for title, vers in pairs(package.loaded) do -- all
	--	if type(vers) == "table" and vers.module_version and vers.module_version == version then loaded = true end
--		title = string.gsub(title, ": ", ":") -- DEBUG loaded "Module: MathRoman"
		if type(vers) == "table" and CA.is_in(version, title) then loaded = true end
	end
	return loaded
--	return CA.is_in(version, CA.versions.package_loaded) -- verify if a module was already_required, see package.loaded
end

function CA.package_loaded_read() -- Read and register the state of package.loaded to keep scribunto packages
-- Read the updated package.loaded, and add the MainModule which contains it
	local v, d = CA.versions, d or CA.versions.d or {} -- descriptor of submodule
	v.package_loaded = " "
	for version, modu in pairs(package.loaded) do
		v.package_loaded = v.package_loaded .. version .. " "
	end
	return v.package_loaded
end

function CA.versions.MainModuleInitState(when)
	local v, d, t = CA.versions, d or CA.versions.d or {}, "" -- descriptor of submodule
	local inits_maxn = table.maxn(v.inits)
	t = t .. "<br><b>Track " .. when .. "</b> : "  .. CA.ta("inits", inits_maxn) .. CA.versions.msri(m,s,r,i)
	if v.inits and v.inits[inits_maxn] then
		t = t  .. CA.ta("version", v.inits[inits_maxn].version)
		t = t  .. CA.ta("time", v.inits[inits_maxn].time)
	end
	v.MainModuleInitStateSteps = (v.MainModuleInitStateSteps or "") .. t
	return t
end

function versions.version_warning_normal_list(d) -- From alternatives forms version, title, alias, warning, normal
	local v, d = CA.versions, d or v.d or {} -- descriptor of submodule
	--	example of d.alternatives = "ControlArgs,CA,ControlArgs1,ControlArgs3"
	if type(d.alternates) == "string" then d.alternates = mw.text.trim(d.alternates) end
	if not d.alternates then d.alternates = "" ; return d	end
	local altern_tab = mw.text.split(d.alternates, ",", true)
	local version, alias, normal
	for v, altern in ipairs(altern_tab) do
		altern = mw.text.trim(altern)
		if v == 1 and CA.is_in(altern, d.selector) then alias = altern ; normal = altern ; version = altern end
		if v == 2 and CA.is_in(altern, d.selector) then normal = altern ; version = altern end
		if v > 2 and CA.is_in(altern, d.selector) then version = altern end
	end
	if version then
		d.version = string.gsub(version, CA.ModuleNS, "") -- version without Module:
		d.title = CA.ModuleNS .. d.version
		d.normal = normal
		d.normal_I18N = CA.ModuleNS .. normal .. "/I18N"
		d.normal_I18N = string.gsub(d.normal_I18N, "/I18N/I18N", "/I18N")
		d.version_I18N = CA.ModuleNS .. version .. "/I18N"
		d.version_I18N = string.gsub(d.version_I18N, "/I18N/I18N", "/I18N")
		d.alias = alias
		if d.normal and not CA.is_in(d.normal, d.norm or " ") then d.norm = (d.norm or " ") .. " " .. d.normal .. " " end
		if d.version and not CA.is_in(d.version, d.list or " ") then d.list = (d.list or " ") .. " " .. d.version .. " " end
		if d.normal_I18N and package.loaded[d.normal_I18N] and not CA.is_in(d.normal_I18N, d.list or " ") then d.list = (d.list or " ") .. " " .. d.normal_I18N .. " " end
		if d.version_I18N and package.loaded[d.version_I18N] and not CA.is_in(d.version_I18N, d.list or " ") then d.list = (d.list or " ") .. " " .. d.version_I18N .. " " end
	--	d.missing = d.missing .. " " .. d.version .. " " -- managed elsewhere
	--	d.excess = d.excess .. " " .. d.version .. " " -- managed elsewhere
	end
	return d
end -- function versions.version_warning_normal_list(d)

-- Search also init of submodules in recursive submodules. examples :
-- ControlArgs : step 1 MainControlArgs
-- Author > ControlArgs step 2 direct
-- MathRoman > ControlArgs : step 2 direct
-- Author > MathRoman > ControlArgs : step 2 recursive
-- http://www.lua.org/manual/5.1/manual.html#pdf-require
-- looking into the package.loaded table to determine whether modname is already loaded.
-- To find a loader, require is guided by the package.loaders array.
-- If the loader returns no value and has not assigned any value to package.loaded[modname], then require assigns true to this entry.
-- https://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#Error_handling
--	function CA.versions.warning_report(t, warning, all_versions_text, tree_text)

function CA.require_xpcall( version ) -- require() must not fail and block the page.
	if type(version) == "string" then
		version = string.gsub( version, CA.ModuleNS, "" )
		version = CA.ModuleNS .. version -- example Module:ControlArgs/I18N
	end
	local success, module = pcall( require, version ) -- pcall or xpcall can run any function without blocking page.
	if success then return module else return nil end
end

function versions.reverse_all_versions(all_versions) -- Reverse all the sort of submodules
	local modules_reverse = {}
	local all_versions_split, max
	if type(all_versions) == "string"
		then all_versions_split = mw.text.split(all_versions, "*", true)
		else all_versions_split = all_versions end
	if type(all_versions_split) == "table"
		then max = table.maxn(all_versions_split)
		else return "" end
	if type(all_versions_split) == "table" then
		for i, alternatives in ipairs(all_versions_split) do
			modules_reverse[i] = mw.text.trim(all_versions_split[max+1-i])
		end
	end
	all_versions = table.concat(modules_reverse, " * ")
	return all_versions
end -- function versions.reverse_all_versions(all_versions)

-- Modifier ou ajouter des langues et champs de traductions d'une table ou d'un module
function CA.add_i18n_mix(t, module_name, module_tab)
--function CA.add_i18n(i18n, t)
	-- p.add_i18n(p.i18n) -- fusionner les traductions d'une table i18n
	-- p.add_i18n("ControlArgs/I18N") -- fusionner les traductions d'un module I18N
	t = t or ""
	local an, ln, i18n = 0, 0
	if type(module_tab) == "table" then -- and type(module_tab.i18n) == "table" then
		i18n = module_tab -- .i18n
		an, ln = 0, 0 -- module_tab.
		for lng, trans in pairs(i18n) do -- Pour toutes les langues à importer
			if CA.i18n[lng] then -- la langue existe déja, y ajouter ou y remplacer les champs importés
				t = t .. CA.str_vars(", '''Langue : %1''' ", lng)
				ln = ln + 1
				if type(trans) == "table" then --if th language to add is really in a table
					for argn, val in pairs(trans) do -- Pour tous les champs importés
						CA.i18n[lng][argn] = val -- ajouter ou remplacer un champs et sa traduction
						t = t .. CA.str_vars(", %1 ", argn)
						an = an + 1
					end
				end
			else -- add the table and all is fileds if it is not already in CA.i18n
				if mw.language.isKnownLanguageTag(lng) then
					CA.i18n[lng] = i18n[lng]
				end
			end
		end
	end
	return t, CA.i18n, ln, an
end -- function CA.add_i18n_mix(t, module_name, module_tab)

function CA.add_i18n_track(id, module_name, module_tab)
	if type(module_name) ~= "string" then return "" end
	-- Erreur Lua dans Module:Author3 à la ligne 3725 : stack overflow. dans la fonction « add_i18n_track » in loop
--	if type(module_name) ~= "string" then module_name = "missing module_name error" end
	module_name = module_name or ""
	module_name = string.gsub(module_name, CA.ModuleNS, "")
	local t = "" -- .. "add " .. id .. ": "
	local st, vr, fn, tb, mix, v_t
	if type(module_tab) == "table" then
		st, vr, fn, tb = CA.testable_lister(module_tab, module_name)
		if tb < 1 then tb = 1 end
		v_t = math.floor( vr / tb )
		t = t .. CA.ta(module_name, tostring(vr) .. "/" .. tostring(tb) .. "=" .. tostring(v_t) ) .. " v/t "
		st, vr, fn, tb = CA.testable_lister(p.i18n, "i18n")
		if tb < 1 then tb = 1 end
		v_t = math.floor( vr / tb )
		t = t .. CA.ta("i18n", tostring(vr) .. "/" .. tostring(tb) .. "=" .. tostring(v_t) ) .. "v/t "
		st, vr, fn, tb = CA.testable_lister(CA.wiki_translations, "wiki_translations")
		if tb < 1 then tb = 1 end
		v_t = math.floor( vr / tb )
		t = t .. CA.ta("wiki_translations", tostring(vr) .. "/" .. tostring(tb) .. "=" .. tostring(v_t) ) .. ". "
	else
		t = t .. " table is nil."
	end
	return t
end -- function CA.add_i18n_track(t, module_name, module_tab)

-- Modifier ou ajouter des langues et champs de traductions d'une table i18n ou d'un module module/I18N
-- Mix or add languages and translation values from one i18n table or one module/I18N
function CA.add_i18n(id, module_name, module_tab)
--	CA.add_i18n(t, sub_i18n) -- normal usage
--	t, X18n, ln, an = CA.add_i18n(t, normal .. "/I18N")
	if CA.is_in(CA.module_nil, module_name) then return " * - " end
	local i18n, X_18n, I18N_mod, t_i18n
	local I18N_title = CA.ModuleNS .. module_name -- .. "/I18N"
--	CA.track_i18n_t("add_i18n(" .. tostring(i18n) .. ")")
	t = id or "add_i18n : "
	if type(module_name) == "string" and type(module_tab) == "table" then -- if we already have the module itself.
		module_name = module_name
		i18n = module_tab
	elseif type(module_name) == "string" and module_name ~= CA.module_nil then -- if we have only the module name, we must require it.
		-- Verify that translations are available. Verifier que les traductions sont disponibles.
		I18N_mod = CA.require_xpcall(I18N_title) -- integrer le module I18N
		if type(I18N_mod) == "table" and type(I18N_mod.i18n) == "table" then
			-- If the require() module really contains an i18n table
			i18n = I18N_mod.i18n
		end
	end
	if type(i18n) == "table" then
		tx, X_18n, ln, an = CA.add_i18n_mix(id, module_name, i18n)
		t = CA.add_i18n_track(id, module_name, i18n)
		if type(t) ~= "string" then return " add_i18n/add_i18n_track " end
	--	if type(tx) == "string" then t = t .. tx else
	--	t = t .. " (alias " .. tostring( tx ) .. " ? " .. alias .. ") " end
	else
		t = "add_i18n without i18n table."
	end
	if type(t) ~= "string" then return " add_i18n/module_name " end
	if id == "alias" then t_i18n = "" else t_i18n = "/I18N" end
	t = "<br>+ " .. id .. ": <b>" .. module_name .. t_i18n .. "</b> " .. t
	if type(t) ~= "string" then return " add_i18n/return " end
	return t, CA.i18n, ln or 0, an or 0, i18n
--	t, X18n, ln, an = CA.add_i18n(t, normal .. "/I18N")
end -- function CA.add_i18n(t, module_name, module_tab)

CA.track_i18n_vers = "\n* CA.versions.init_i18n: "
function CA.versions.init_i18n(d, t) -- Cumulate all translations in CA.i18n, from i18n tables and modules.
	local v, d = CA.versions, d or CA.versions.vn or CA.versions.d or {} -- descriptor of submodule
	local submodule = nil
	t = t or "CA.versions.init_i18n, count of translations"
	local tx = "<br><b>" .. t .. "</b>: "
	--
	local selector = v.main_selector -- or " Author3 MathRoman2 ConstrolArgs " -- DEBUG
	CA.init_wiki_user_lang()
	d.all_versions_reverse = v.reverse_all_versions(v.main_all_versions) -- Reverse all the sort of submodules
	CA.i18n_trc = CA.i18n_trc .. CA.ta("init_i18n", d.version) .. CA.table_count("i18n") .. CA.ta("main_all_versions", v.main_all_versions) .. CA.ta("reverse", d.all_versions_reverse) -- CA.i18n_trc ..
	local sub_i18n = CA.i18n -- CA.require_i18n(alias, CA)
	local vars_ante, vars_post, vars_diff, X18n = 0, 0, 0, nil
	--
	-- Save first CA.i18n in case of remake init_i18n after a remake init_i18n from an argument selectversions or allversions:
	if not CA_i18n_memory then _G["CA_i18n_memory"] = mw.clone(CA.i18n) end
	-- Restore first CA.i18n in case of remake init_i18n after remake init_i18n from an argument selectversions or allversions:
	if CA_i18n_memory then CA.i18n = CA_i18n_memory end
	--
	-- Add, mix and track all other translations of other modules and /I18N submodules
	local all_versions_split = mw.text.split(d.all_versions_reverse, "*", true)
	local t1, x, ln, an, i18n
	local st, vr, fn, tb
	local alias, normal, version
	for i, alternatives in ipairs(all_versions_split) do
		CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("Module:", alternatives)
		t = t .. "<br><br>* <b>versions.init_i18n " .. i .. " </b>: " .. CA.ta("alternatives", alternatives)
		local altern_tab = mw.text.split(alternatives, ",", true)
		alias = nil ; normal = nil ; version = nil
		for v, altern in ipairs(altern_tab) do
			altern = mw.text.trim(altern)
			if v == 1 then alias = altern end
			if v == 2 and CA.is_in(altern, selector) then normal = altern end
			if v >= 2 and CA.is_in(altern, selector) then version = altern end
		end
		t = t .. " v/t=variables/tables."
		--
		if alias and _G[alias] and _G[alias].i18n then -- alias p.i18n
	--	--	table.insert(sub_i18n, alias) -- register the MainControlArgs descriptor, cloning it to distinct each step
			t1, x, ln, an, i18n = CA.add_i18n("alias", alias, _G[alias].i18n)
			t = t .. t1
			CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("alias", alias)
		end
		--
		if normal and normal ~= CA.module_nil then -- Module:Normal/I18N
			normal = string.gsub(normal, CA.ModuleNS, "")
			normal = string.gsub(normal, "/I18N", "")
			t1, x, ln, an, i18n = CA.add_i18n("normal", normal)
			t = t .. t1
			CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("normal", normal)
			t1, x, ln, an, i18n = CA.add_i18n("normal/I18N", normal .. "/I18N")
			t = t .. t1
			CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("normal/I18N", normal .. "/I18N")
		end
		--
		if version and version ~= CA.module_nil then -- Module:Version/I18N
			version = string.gsub(version, CA.ModuleNS, "")
			version = string.gsub(version, "/I18N", "")
			t1, x, ln, an, i18n = CA.add_i18n("version", version) -- return t, CA.i18n, ln or 0, an or 0
			t = t .. t1
			CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("version", version)
			t1, x, ln, an, i18n = CA.add_i18n("version/I18N", version .. "/I18N")
			t = t .. t1
			CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("version/I18N", version .. "/I18N")
		end
		st, vr, fn, tb = CA.testable_lister(CA.wiki_translations, "wiki_translations")
		tx = tx .. " * " .. alternatives .. ", <b>N = " .. vr .. "</b> "
		CA.track_i18n_vers = CA.track_i18n_vers .. CA.ta("Module:", (alias or "-") .. ", / " .. (normal or "-") .. " / " .. (version or "-") )
	end
	--	If ConstrolArgs is running alone, display it's name and version.
	local st, vr, fn, tb = CA.table_count(CA.requires)
	if tb ~= 0 then
--		versionName = "ControlArgs1", versionNumber = "1.01", versionDate = "2015-09-09",
		CA.versions.main_versionName = CA.versions.main_versionName or CA.versions.vn.versionName or "ConstrolArgs_i"
		CA.versions.main_versionNumber = CA.versions.main_versionNumber or CA.versions.vn.versionNumber or "0.1_i"
		CA.versions.main_versionDate = CA.versions.main_versionDate or CA.versions.vn.main_versionDate or "2015-09-09"
	end
	-- Save first CA in case of another version of ControlArgs after a remake init_i18n from an argument selectversions or allversions:
	if CA_memory and CA_memory ~= CA then _G["CA_memory"] = CA end
	-- For further cases after remake init_i18n from an argument selectversions or allversions:
	_G["CA_memory"] = CA
	_G["CA_i18n_memory"] = CA.i18n
	--
--	CA.init_user_lang()
	t = "<br><br>AT=" .. CA.str_vars("entityid_txt") .. ", MR=" .. CA.str_vars("err_roman_error") .. ", CA=" .. CA.str_vars("cat_usage_error") .. t
	return tx, sub_i18n
--- return t, sub_i18n
end -- function CA.versions.init_i18n(d, t)

--[[	Module dependencies. Dependencias del módulo. Dépendances du module.
	versions.selector = " Author3 MathRoman ControlArgs1 " -- List of versions of submodules to require from one module.
	versions.all_versions = "Author,AT,Author3 * MathRoman,MathRoman,MathRoman2 * ControlArgs,CA,ControlArgs1" -- List of all existing versions of one module and all its submodules
	modules_builder() requires submodules following versions.selector and versions.all_versions.
	modules_builder() lists also the branches of the tree of submodules.
--]]

function CA.record_module(module, d, alias, glob_1, glob_2, glob_3)
	-- Record a module and its descriptor in reference tables.
	local v, d = CA.versions, d or CA.versions.d or {} -- descriptor of the module
	if type(module) ~= "table" then return end -- other global record
	d = {} -- descriptor of a module.
	-- Record the key datas of the module.
	if CA.is_version(module) and module.versions.vn.version then
		d.version = module.versions.vn.version
		d.I18N = module.versions.vn.I18N
		d.selector = module.versions.vn.selector
		d.all_versions = module.versions.vn.all_versions
		alias = alias or module.versions.vn.alias
	else
		return d
	end
	d.version = string.gsub(d.version, CA.ModuleNS, "") -- version without Module:
	d.title = CA.ModuleNS .. d.version
	alias = alias or d.module_version
--	alias = module.module_alias or alias or d.module_version
	if type(alias) == "string" then d.alias = mw.text.trim(alias) end
	--
	-- Record the module in reference tables for later management uses.
	v.requires[d.title] = mw.clone(d) -- register the version module descriptor
	table.insert(v.inits, mw.clone(d) ) -- register the MainControlArgs descriptor, cloning it to distinct each step
	if d.alias then v.global_modules[d.alias] = module end -- register the module descriptor by its variable name
	--
	-- Record the module for direct acces like: alias = require(version).
	if d.alias then _G[d.alias] = module end -- register the module descriptor by its variable name
	if d.version then _G[d.version] = module end -- Insert the submodule in the _G global space.
	if d.title then _G[d.title] = module end -- Insert the submodule in the _G global space.
	--
	-- other global records, examples: MainModule, MainControlArgs, Module:ControlArgs/I18N, or ControlArgs/I18N.
	if type(glob_1) == "string" and module then _G[glob_1] = module end -- other global record
	if type(glob_2) == "string" and module then _G[glob_2] = module end -- other global record
	if type(glob_3) == "string" and module then _G[glob_3] = module end -- other global record
	v.d = d
	return d
end -- function CA.record_module(module, d, alias, glob_1, glob_2, glob_3)

function CA.versions.modules_builder_raz(calling_module) -- raz excess _G
--	local v, d = CA.versions, CA.versions.d or {} -- descriptor of submodule
	local v, d = CA.versions, d or CA.versions.d or CA.versions.vn or {} -- descriptor of submodule
	local all_versions
	-- Along the init process : First step, the MainModule execute : local CA = require (CA.ModuleNS .. p.CA_version)
	-- Report and warning lists : d.missing, d.warning, d.excess, d.norm, d.list.
	d.N_submodules = 0
	if type(d.all_versions) == "string" then -- Cut and trim
		d.all_versions_split = mw.text.split(d.all_versions, "*", true)
		d.N_submodules = table.maxn(d.all_versions_split)
	end
--	local all_versions = table.concat(d.all_versions, " ** ")
	for i = 1, d.N_submodules do
		d.alternates = d.all_versions[i]
		d.alternates = mw.text.trim(d.alternates)
		d = v.version_warning_normal_list(d) -- From alternatives forms version, title, alias, warning, normal
		if d.title then -- if submodule realy required
			_G[d.alias] = nil
			_G[d.title] = nil
			_G[d.version] = nil
		end
	end
	d.missings = "" ; d.unknowns = "" ; d.normals = "" ; d.listall = "" ; d.selectall = "" ;
	d.warnings = "" ; d.loaded_list = "" ; d.excess = "" ;	d.aliases = "" ;
	v.d = d
	return d
end -- function CA.versions.modules_builder_raz(calling_module)

--	modules_builder() requires submodules following selector and all_versions.
--	modules_builder() lists also the branches of the tree of submodules if modules_builder() present in all ones.
function CA.modules_builder(calling_module, d)
--	local v, d = CA.versions, CA.versions.d or CA.versions.vn or {} -- descriptor of submodule
	local v, d = CA.versions , d -- or CA.versions.d or CA.versions.vn or {} -- descriptor of submodule
	local t = ""
	-- Along the init process : First step, the MainModule execute : local CA = require (CA.ModuleNS .. p.CA_version)
	-- Then MainControlArgs execute versions.require_builder(Main_init, calling_module) ... and register the MainControlArgs.
	-- The MainControlArgs only builds and manages sub modules, but the managing tables must stay in the MainModule.
	--
	-- Along the init process : Second step, the MainModule execute : CA.modules_builder(p, versions.used, versions.all_versions)
	-- Then MainControlArgs execute versions.modules_builder(calling_module, selector, all)
	-- Then MainControlArgs execute versions.require_builder(Main_init, calling_module) ... and register the MainModule.
	--
	if not calling_module then calling_module = CA.versions.MainModule end -- for modules in the versions system
	if type(calling_module) == "table" and calling_module.versions then -- for modules in the versions system
	--	v, d = CA.versions, CA.versions.vn or {} -- descriptor of submodule
	--	v, d = CA.versions --, d or CA.versions.d or CA.versions.vn or {} -- descriptor of submodule
		if not GlobalVersions then -- Only for the first and main module MainModule.
			GlobalVersions = {} -- create the versions space in the _G global space.
			GlobalVersions = CA.versions -- The ControlArgs.versions memory begins to share the same versions table with others modules in the versions system.
			CA.versions.MainModule = calling_module
		--	CA.versions.main_versionName = calling_module.versions.vn.versionName or "MainModule"
		--	CA.versions.main_versionNumber = calling_module.versions.vn.versionNumber or "0.0"
		--	CA.versions.main_selector = calling_module.versions.vn.selector .. " + " -- DEBUG
		--	CA.versions.main_all_versions = calling_module.versions.vn.all_versions
			if calling_module and calling_module.versions and type(calling_module.versions.vn) == "table" then
				local vn = calling_module.versions.vn
				if type(vn.versionName) == "string" then CA.versions.main_versionName = vn.versionName or "MainModule_b" end
				if type(vn.versionNumber) == "string" then CA.versions.main_versionNumber = vn.versionNumber or "0.0_b" end
				if type(vn.versionDate) == "string" then CA.versions.main_versionDate = vn.versionDate or "2015-09-09" end
				if type(vn.selector) == "string" then CA.versions.main_selector = vn.selector or " + " end
				if type(vn.all_versions) == "string" then CA.versions.main_all_versions = vn.all_versions or " " end
			end -- for modules in the versions system
		--	CA.versions.main_versionName = CA.versions.vn.versionName or "ConstrolArgs"
		--	CA.versions.main_versionNumber = CA.versions.vn.versionNumber or "0.0"
			if calling_module.versions and not d then -- for modules in the versions system
				local dd = calling_module.versions.vn
				dd = CA.record_module(calling_module, dd, nil, "MainModule")
			--	return dd
			end
			-- Require all submodules versions
			local warn_vrs, t, missings, unknowns, normals, listall, selectall, warnings, loaded_list
			= CA.versions.require_versions(calling_module, CA.versions.main_selector, CA.versions.main_all_versions)
			CA.versions.main_warnings = warnings
		--	t, x = CA.versions.init_i18n(d, "modules_builder ") -- Cumulate all translations in CA.i18n, from i18n tables and modules.
		--	CA.add_i18n_track_txt = t
		else
			-- Other intermediate module could try to init here because they could also be main modules.
			-- Do nothing. Other intermediate modules are built following the Main module selector and all_versions.
		end
	end
	--	What to do when the user or the template ask a allversions or a selectversions ?
	--	1 : Build the submodules before import all arguments and do nothing.
	--	2 : Build the submodules only after import all arguments.
	--	CA.versions.selector = args_final.selectversions
	--	CA.versions.all_versions = args_final.allversions
	--	The versions mecanism can also use this argument
	--	If the arguments exist they have the priority.
	return
end -- function CA.modules_builder(calling_module)

function CA.ta(txt, val, sep) -- Formats an argument and its value in a documentation. The text is "nil" if the value is nil.
	if not val then val = "nil" end
	if not sep then sep = "=" end
	return " , " .. tostring(txt) .. " " .. sep .. " <b> " .. tostring(val) .. " </b> "
end

function CA.tam(txt, val, sep) -- Met en forme un argument, ou le masque s'il est nul.
	if not val then return "" end
	return p.ta(txt, val, sep)
end

--	The MainModule uses the CA.modules_builder(p) to select and build all submodules.
--	CA.modules_builder(1) -- is also called by intermediate submodules able to be main modules.

if not CA then
--	versions.warning = versions.warning .. " no_CA_in_ControlArgs"
--	CA = require (CA.ModuleNS .. p.CA_version)
end

function CA.all_versions_text(all_versions) -- DEBUG
	all_versions = all_versions or CA.versions.all_versions
	if type(all_versions) == "string" then return all_versions end
--	if type(all_versions) == "string" then all_versions = { all_versions } end
	if type(all_versions) == "table" then return table.concat(all_versions, " >> ")
	else return "" end
end

function CA.track_i18n_t(t)
	CA.track_i18n_tt = (CA.track_i18n_tt or "track_i18n_tt ") .. (t or "track_i18n_tt") .. ":" .. CA.str_vars("err_J_before_end") .. " - "
	return CA.track_i18n_tt -- .. " " .. CA.i18n_trc, see also track_i18n_vers
end

--	function CA.guide_text(d)	return CA.versions.warning_short(d) end
--	function CA.warning_text(d) return CA.versions.warning_short(d) end
function CA.versions.warning_short(d, missing, warning, excess)
	local v, d, t = CA.versions, d or CA.versions.d, ""
	missing = missing or d.missing or v.missing or ""
	warning = warning or d.warning or v.warning or ""
	excess = excess or d.excess or v.excess or ""
	if mw.text.trim(missing .. warning .. excess) ~= "" then
		t = CA.str_vars("Modules missing: %1 warning: %2 excess: %3", missing, warning, excess)
		t = CA.error_color(t)
	elseif v.vn then -- v.vn.versionNumber = "2.00", v.vn.versionName = "MR", -- example
		t = CA.discreet_color(CA.versions.main_versionName .. " " .. CA.versions.main_versionNumber .. " ")
	else
		t = CA.discreet_color(v.version .. " ")
	end
--	t = t .. CA.track_i18n_vers
	return t
end
--	t = t .. CA.str_vars("modules versions missing: %1 warning: %2", missing, warning)
--	t = t .. "Modules missing: " .. (missing or "") .. " warning: " .. (warning or "") .. " warning: " .. (warning or "")
--	t = t .. CA.str_vars("Modules missing: %1 warning: %2 excess: %3", missing, warning, excess)
--	t = t .. CA.track_i18n_t("warning_short")

--	function CA.warning_versions_text() return CA.versions.warning_small() end
--	function CA.warning_text() return CA.versions.warning_small() end
function CA.versions.warning_small(d)
	local v, d, t = CA.versions, d or CA.versions.d, ""
	t = t .. CA.versions.warning_short(d)
	t = CA.str_vars("<small><small>" .. t .. "</small></small>")
	return t
end

function CA.versions.warning_report(t)
	local v, d = CA.versions, CA.versions.d
	local t = "<br>Versions warning report for <b>" .. v.main_versionName .. " " .. v.main_versionNumber .. " " .. v.main_versionDate .. "</b> : "
	t = t .. "<br>Main module selector: <b>" .. (v.main_selector or "main_selector") .. "</b>"
	t = t .. "<br>Main module all versions: <b>" .. (v.main_all_versions or "main_all_versions") .. "</b>"
	CA.i18n_trac("versions.warning_report", "start", 1)
	local loaded_modules, loaded_tab, modu = v.loaded_modules()
	CA.loaded_modules_track = "v.warning_report : " .. loaded_modules
	t = t .. "<br>* Used modules: "
	t = t .. "<br>* " .. v.main_versionName .. " : "
	t = t .. CA.ta("versionName", v.main_versionName )
	t = t .. CA.ta("versionNumber", v.main_versionNumber )
	t = t .. CA.ta("versionDate", v.main_versionDate )
	for title, modu in pairs(CA.check_versions_tab or _G) do -- check_versions_tab
		if type(modu) == "table" and title ~= "CA_memory" and modu.versions and modu.versions.vn then --
			local vn = modu.versions.vn
		--	versionName = "ControlArgs1", versionNumber = "1.01", versionDate = "2015-09-09",
			t = t .. "<br>* " .. title .. " : "
			t = t .. CA.ta("versionName", vn.versionName )
			t = t .. CA.ta("versionNumber", vn.versionNumber )
			t = t .. CA.ta("versionDate", vn.versionDate )
		end
	end
	t = t .. "<br>"
	t = t .. "<br>* Received options : "
	t = t .. "<br>" .. CA.ta("CA.args_final.mode", CA.args_final.mode)
	t = t .. "<br>" .. CA.ta("CA.mode_options", CA.mode_options)
	t = t .. "<br>" .. CA.ta("CA.invoke_options", CA.invoke_options)
	t = t .. "<br>" .. CA.ta("CA.args_final.c", CA.args_final.c)
	t = t .. "<br>" .. CA.versions.warning_versions_details()
	return t
end -- function CA.versions.warning_report(t)

function CA.versions.warning_versions_details(t) -- List all required descriptors of submodules
	local v, d = CA.versions, d or CA.versions.d or {} -- descriptor of submodule
--	local t = "<br>verify_modules_builder</b>:"
	local t = t or "warning_versions_details:"
	--
	t = t .. "<br><br><b>require()</b>: "
	for vers, desc in pairs(CA.versions.requires) do t = t .. CA.ta(desc.alias, vers) end
	--
	t = t .. "<br><br><b>CA.package_loaded_read</b>: " .. CA.package_loaded_read()
	--
	t = t .. "<br><br><b>package.loaded</b>: "
	for pack, modu in pairs(package.loaded) do t = t .. CA.ta(pack, type(modu) ) end -- modu.module_version
	--
	t = t .. "<br><br>* Used modules : " .. CA.ta("check_versions_tab", CA.check_versions_tab ) .. CA.ta("_G", _G )
	t = t .. "<br>* " .. CA.versions.main_versionName .. " : "
	t = t .. CA.ta("versionName", CA.versions.main_versionName )
	t = t .. CA.ta("versionNumber", CA.versions.main_versionNumber )
	t = t .. CA.ta("versionDate", CA.versions.main_versionDate )
--	for title, modu in pairs(_G) do -- check_versions_tab
	for title, modu in pairs(CA.check_versions_tab or _G) do -- check_versions_tab
		if type(modu) == "table" and title ~= "CA_memory" and modu.versions and modu.versions.vn then --
			local vn = modu.versions.vn
		--	versionName = "ControlArgs1", versionNumber = "1.01", versionDate = "2015-09-09",
			t = t .. "<br>* " .. title .. " : "
			t = t .. CA.ta("versionName", vn.versionName )
			t = t .. CA.ta("versionNumber", vn.versionNumber )
			t = t .. CA.ta("versionDate", vn.versionDate )
		end
	end
	--
	t = t .. "<br><br><b>Global _G</b>: "
--	for pack, modu in pairs(_G) do t = t .. CA.ta(pack, type(modu) ) end -- modu.module_version
	for title, modu in pairs(_G) do if type(modu) == "table" then t = t .. CA.ta(title, type(modu) ) end end -- modu.module_version
	--
	t = t .. "<br><br><b>Descriptors</b>: "
	for vers, desc in pairs(v.requires) do -- all
		t = t .. CA.str_vars("<br><b>* desc</b>", desc)
		if desc then
		--	t = t .. CA.ta("vers", vers)
			t = t .. CA.ta("title", desc.title)
			t = t .. CA.ta("version", desc.version)
			t = t .. CA.ta("name", desc.name)
			t = t .. CA.ta("alias", desc.alias)
			t = t .. CA.ta("selector", desc.vn or desc.selector)
			t = t .. CA.ta("missings", desc.missings)
			t = t .. CA.ta("unknowns", desc.unknowns)
			t = t .. CA.ta("normals", desc.normals)
			t = t .. CA.ta("listall", desc.listall)
			t = t .. CA.ta("selectall", desc.selectall)
			t = t .. CA.ta("warnings", desc.warnings)
			t = t .. CA.ta("loaded_list", desc.loaded_list)
			t = t .. CA.ta("excess", desc.excess)
			t = t .. CA.ta("aliases", desc.aliases)
		end
	end
	t = t .. "<br><br><b>Tracks</b>: "
	t = t .. (v.MainModuleInitStateSteps or "")
	return t
end -- function CA.versions.warning_versions_details(t)
--[[
-- List all used submodules versions
function p.all_versions_tests() -- DEBUG ?
	local warn_vrs = ""
	warn_vrs = warn_vrs .. "<br><b><b>Résumé</b></b>"
	warn_vrs = warn_vrs .. "<br>modules_builder recieved this ask : " .. CA.ta(" selector ", versions.vn.selector or versions.selector) .. CA.ta(" all_versions ",	table.concat(versions.all_versions, " >> ") ) .. CA.ta(" selectall ", versions.selectall) .. "."
	warn_vrs = warn_vrs .. "<br>" .. CA.str_vars("all_versions_tests", versions.warning, versions.list, versions.normal) --, versions.unused_versions)
	warn_vrs = warn_vrs .. "<br>" .. versions.tree
	warn_vrs = warn_vrs .. CA.dropdown_func(1, "all_versions table", CA.testable_lister, versions.all_versions, "all_versions", { levelmaxi = 3, } )
	warn_vrs = warn_vrs .. CA.dropdown_func(1, "global_modules table", CA.testable_lister, versions.global_modules, "global_modules", { levelmaxi = 2, } )
	warn_vrs = warn_vrs .. CA.dropdown_func(1, "requires table", CA.testable_lister, versions.requires, "requires", { levelmaxi = 3, } )
	warn_vrs = warn_vrs .. CA.dropdown_func(1, "inits table", CA.testable_lister, versions.inits, "inits", { levelmaxi = 3, exclude1 = "module", } )
	-- { levelmaxi = 2, max_n = 2, exclude1 = "hou" }
	return warn_vrs
end -- function p.all_versions_tests()
--]]
-- p.treeVersions_debug = versions.warning .. "<br><small><small>" .. p.all_versions_text() .. "</small></small><br>" .. versions.tree

-- CA.nowyear = tonumber(os.date("%Y") ) -- local now_date = os.date("%Y-%m-%d %H:%M:%S")
-- CA.nowyear = tonumber(os.date("%Y-%m-%d") ) -- local now_date = os.date("%Y-%m-%d %H:%M:%S")
-- p.nowyear = nowyear

CA.constants = CA.constants or {}
-- Similar words search : diff on length
-- Cerrar de palabras puscadas: diff en longitud
-- Recherche de mots proches: diff sur longueur
CA.constants.near_word_search_diff_coef = 0.30
CA.constants.near_word_search_diff_const = 0.82

------------------------------------------------------------
-- Tables des traductions des paramètres et messages dans les langues : en, es, fr.
-- Tables of translations of settings and messages in the languages : en, es, fr.
-- Mesas traducciones parámetros y mensajes en los idiomas : en, es, fr.
--
-- i18n translations tables to extend and update in calling modules
------------------------------------------------------------

CA.i18n = {} -- translations tables known in the module

CA.i18n.en = {
	-- ControlArgs main texts, errors and categories
	[1]							= "1",
	["1"]						= "1",
	mode						= "mode",
	c							= 'c',
	debug						= 'debug',
	options						= 'options',
	category					= 'Category',
	date_months_names			= "January, February, March, April, May, June, July, August, September, October, November, December",
	userlang					= 'userlang',
	wikilang					= 'wikilang',
	user_wiki_lang				= "Languages: user: %1, wiki: %2.",
	allversions					= "allversions",
	selectversions				= "selectversions",
	DropBox_option_label_Unwrap = "Unwrap/Wrap",

	-- Names and descriptions of arguments
	needed_to_verify			= "(required, to be checked)",
	list_needed_arguments		= "List of needed arguments:",
	list_all_other_arguments	= "List of all other arguments:",
	label						= 'label',
	label_descr					= "Automatic Wikidata argument.",
	entityid					= 'id',
	entityid_descr				= "Identifier of Wikidata data, such as <code>Q535</code> for Victor Hugo.",
	entityid2					= 'entityid',
	entityid2_descr				= "Identifier of Wikidata data, such as <code>Q535</code> for Victor Hugo.",
	sitelink					= 'sitelink',
	sitelink_descr				= "Automatic Wikidata argument.",
	lastname					= 'name',
	lastname_descr				= "Family name. Please specify to correct the sort key.",
	firstname					= 'firstname',
	firstname_descr				= "First name. Please specify to correct the sort key.",
	firstname2_descr			= "First name. Please specify to correct the sort key.",
	initiale					= 'initial',
	initiale_descr				= "Initial to correct the category of authors.",
	title						= 'title',
	title_descr					= "Page title, automatic.",
	birthyear					= 'birthyear',
	birthyear_descr				= "Year of birth.",
	deathyear					= 'deathyear',
	deathyear_descr				= "Year of death.",
	cat_name_number				= "Year %1",
	debug						= "debug",
	language					= 'language',
	country						= 'country',
	language_cat				= 'Speaking %1',
	occupation_cat				= '%1',
	authors_deathyear_cat		= "Authors-%1",
	description					= 'description',
	description_descr			= "Author's description, to clarify whether the automatic description does not fit.",
	flag_of_image				= 'Flag_of_England.svg',

	-- Alegaciones de varios valores verificados
	region						= 'region',
	region_values				= 'other,china,india,century',
	rights						= 'rights',
	rights_descr				= "Necessary copyrights type: 70,50,mpf,non.",
	rights_values				= '70,50,mpf,none',
	args_values_err				= "Abnormal value of the argument '''%1 = %2''' including (%3) ",

	date_to_part_format			= "dd yyyy mmmm",
	date_to_part_call_err		= "Internal Error: Abnormal calling arguments in date '''%1'''.",
	date_to_part_call_cat		= "Module with internal error",
	date_to_part_err_not_found	= "Internal Error: No part found in date '''%1'''.",

	-- Miscellaneous messages and errors
	all_versions_tests			= "Versions warning: <b>%1</b>, normal: <b>%2</b>, listall: <b>%3</b>.",
	all_versions_check			= "Versions: missings: <b>%1</b>, unknowns: <b>%2</b>, normals: <b>%3</b>, excess: <b>%4</b>, all selected: <b>%5</b>.",
	err_nearest_argument		= "Error: Do you need the known argument '''%1''' ?",
--	max_nearest_argument		= 3,
	max_nearest_argument_msg	= "A longer name argument accepts more letter errors.",
	err_value_re_defined		= "Error: The value of the argument '''%1''' is already defined. Choose only one value of a single synonymous.",

	cat_test_OK					= "Test category generation OK",
	cat_usage_error				= "Module with usage error",
	cat_internal_error			= "Module with internal error",
	err_module_with_error		= "Module with error",
	err_error_list_header		= "User support about parameters:",
	err_unknown_argument		= "Error: parameter '''%1''' is unknown in this template. Check the name or flag this gap.",
	err_need_value				= "Error: This argument is required but absent : '''%1'''. Should define it.",
	err_none_value				= "Error: No argument has been defined.",
	err_too_unnamed_arguments	= "Error: This unnamed argument is too many: '''%1''' = '''%2'''.",
	err_internal_notice_wsid	= "Internal Error: Notify the developer that the internal argument '''%1''' is unknown in the records.",
	err_without_translation		= "Known argument, but not translated: '''%1'''.",
	err_without_translation_N	= "There are %1 arguments untranslated.",
	err_is_defined				= "The argument %1:'''%2''' is defined.",
	err_is_undefined			= "The argument %1:'''%2''' is not defined.",
	err_module_with_error		= "Module with error",
	err_wikidata_wikibase		= "Error: Wikibase is not available.",
	err_wikidata_getEntity		= "Error: getEntity Wikidata is not available.",
	err_wikidata_getEntityObject= "Error: Element Wikidata '''%1''' is not found.",
	err_wikidata_property		= "Error: Wikidata property '''%1''' is not found.",
	err_wikidata_error			= "Error Wikidata: '''%1''' ",
--	err_wikidata_cat			= "Error Wikidata",
	err_wikidata_cat			= "Module with internal error",	 -- cat_internal_error
	structured_data_txt			= 'Datas from Wikidata',
	table_listlimit_levelmaxi	= "Level limit levelmaxi = '''%1''' ",
	table_listlimit_max_n		= "Length limit max_n = '''%1''' ",
	err_module_miss_i18n_txt	= "Internal Error: The text '''%1''' lack of translation in '''%2''' language, and/or others.",
	err_module_miss_i18n_count	= "Internal Error: There are '''%1''' missings in '''%2''' translations.",
	err_module_miss_i18n_none	= "OK, none missing translations.",
	err_module_miss_i18n		= "Internal Error: Module missing i18n translation for the argument '''%1''' ",
--	err_module_miss_i18n_cat	= "Module missing i18n translation",
	err_module_miss_i18n_cat	= "Module with internal error",	 -- cat_internal_error
	err_module_miss_i18n_mini	= "Error: I18n table has only '''1%''' translations.",
	i18n_list_all_texts			= "This list show all the texts, but cannot replace the original declarations.",
--	err_no_args_known			= "Error: Module without known arguments table.",
--	err_no_args_source			= "Error: Module without source arguments table.",
	languages_nbr_and_list		= "\n* There are %1 tables of translations in these languages : %2 <br>",
	err_no_wiki_translations	= "Error: Module without translated arguments table.",
	err_no_args_wikidata		= "Error: Module without wikidata arguments table.",
	err_lang_table				= "Error: The '''%1''' language or its table is incorrect.",
--	err_lang_table_cat			= "Module with erroneous language arguments",
	err_lang_table_cat			= "Module with internal error",	 -- cat_internal_error
	err_lang_not_exist			= "Error: The language '''%1''' is not one of wikipedias.",
	err_lang_not_translated		= "Error: The language '''%1''' is not translated.",
	err_argv_args_src			= "Internal Error: in p.argv, arguments table is missing.",
	err_argv_args_name			= "Internal Error: in p.argv, abnormal argument '''%1'''.",
	err_argv_args_miss			= "Internal Error: in p.argv, missing argument '''%1'''.",
	err_generDoc1_paramName		= "Internal Error: in generDoc1, bad argument '''%1'''.",
	sources_of_datas			= "Informations from: /Wikidata, /template or module, /other, /message, /error",
	list_a_translated_language	= "\n* %1 translations in language %2 : %3 : %4",
	table_counts				= "Table '''%1''' : counts tabs='''%2''', vars='''%3''', funcs='''%4'''.",
	table_dont_exists			= "The table '''%1''' does not exist.",

	err_delete_docbox			= "You must remove this documentation before recording.\nRemove all modes to return to normal mode.",
	err_assist_user_param		= "User support for checking the settings:",
--	err_module_error			= "Module with error",
	err_module_with_error		= "Module with error",
	msg_auto_val_warning		= "Verify the automatic argument: %1 = '''%2'''.",
	msg_auto_val_unknown		= "Internal Error: Unknown automatic argument: %1 = '''%2'''.",
	--
	err_no_known_arguments		= "Internal Error: Module without known arguments table.",
--	cat_no_known_arguments		= "Module without known arguments table.",
	cat_no_known_arguments		= "Module with internal error",	 -- cat_internal_error
	err_no_source_arguments		= "Internal Error: Module without source arguments table.",
--	cat_no_source_arguments		= "Module without source arguments table.",
	cat_no_source_arguments		= "Module with internal error",	 -- cat_internal_error

	-- Titles of tests
	page_tests_h3_title			= "Tests of this page",
	page_tests_title			= "Testing and information related to this page:",
	internal_tests_h3_title		= "Internal tests",
	internal_tests_title		= "Internal regression tests:",
	dropdown_missing_title		= "Missing title for this dropbox",
	used_options_title			= "Options and their uses:",
	options_from_mode_title		= "Test options from modes",
	options_from_args_title		= "Test options from arguments",
	spaces_page_names_title		= "Module, namespaces, and page names:",
	tables_count_title			= "Counts of contents in tables",
	list_all_args_title			= "List of all arguments",
	wikidata_any_page_title		= "Wikidata for any page:",
	wikidata_details_test_title = "Tests and imported datas from wikidata",
	wikidata_arbitrary_access_title = "Test of Wikidata arbitrary access",
	wikidata_arbitrary_access_text	= "Wikidata for another Title: ",
	actual_versions_title		= "Actual versions",
	versions_details_title		= "Detailed versions",
	versions_manage_test_title	= "Versions management test",
	date_to_part_test_title		= "Tests of date to day, month, year or era",
	cat_add_test_title			= "Test the creation of categories in some languages",
	levenshtein_test_title		= "Test the distances between words '''[https://en.wikipedia.org/wiki/Levenshtein_distance Levenshtein]''':",
	table_args_source_title		= "Table of received arguments, args_source:",
	table_args_unknown_title	= "Table of unknown arguments, args_unknown:",
	table_args_known_title		= "Table of known arguments, args_known:",
	missing_translations_title	= "Translations missing in i18n tables:",
	similar_args_test_title		= "Test close words similar_args:",
	testable_lister_title		= "List a table, test without limits:",
	testable_limit_title		= "List a table, test with limits:",
	combined_translations_title = "Combined i18n translations tables:",
	dummy_languages_title		= "Language Definitions:",
	time_format_test_title		= "Tests of coding and conversion of dates",

} -- p.i18n.en

p.i18n.es = {
	[1]							= "1",
	["1"]						= "1",
	mode						= "modo",
	c							= 'c',
	debug						= 'debug',
	options						= 'opciones',
	category					= 'Categoría',
	date_months_names			= "Enero, Febrero, Marzo, Abril, Mayo, Junio, Julio, Agosto, Septiembre, Octubre, Noviembre, Diciembre",
	userlang					= 'userlang',
	wikilang					= 'wikilang',
	user_wiki_lang				= "Idiomas: usuario: %1, wiki: %2.",
	allversions					= "allversions",
	selectversions				= "selectversions",
	DropBox_option_label_Unwrap = "Desenvolver/Envolver",

	-- Nombres y descripciones de los argumentos
	needed_to_verify			= "(obligatorio, se debe comprobar)",
	list_needed_arguments		= "Lista de argumentos necesarios:",
	list_all_other_arguments	= "Lista de todos los otros argumentos:",
	label						= 'label',
	label_descr					= "Wikidata automática argumento.",
	entityid					= 'id',
	entityid_descr				= "Nombre de los datos Wikidata, como <code>Q535</code> para Victor Hugo.",
	entityid2					= 'entityid',
	entityid2_descr				= "Nombre de los datos Wikidata, como <code>Q535</code> para Victor Hugo.",
	sitelink					= 'sitelink',
	sitelink_descr				= "Wikidata automática argumento.",
	lastname					= 'nombre',
	lastname_descr				= "Nombre. Por favor, especifique para corregir la clave de ordenación.",
	firstname					= 'apellido',
	firstname_descr				= "Primero. Proponer para corregir la autómata.",
	firstname2_descr			= "Primero. Proponer para corregir la autómata.",
	initiale					= 'inicial',
	initiale_descr				= "Inicial para corregir la categoría de los autores.",
	title						= 'titulo',
	title_descr					= "Título de la página, automático.",
	birthyear					= 'nacimiento',
	birthyear_descr				= "Año de nacimiento.",
	deathyear					= 'muerte',
	deathyear_descr				= "Año de la muerte.",
	cat_name_number				= "Año %1",
	debug						= "debug",
	language					= 'lenguaje',
	country						= 'país',
	language_cat				= 'Hablando %1',
	occupation_cat				= '%1',
	authors_deathyear_cat		= "Autores-%1",
	description					= 'descripcion',
	description_descr			= "Descripción del autor, para aclarar si la descripción automática no encaja.",
	flag_of_image				= 'Flag_of_Spain.svg',

	-- Alegaciones de varios valores verificados
	region						= 'región',
	region_values				= "otro,china,india,siglo",
	rights						= 'derechos',
	rights_descr				= "Tipo de derechos de autor necesario: 70,50,mpf,non.",
	rights_values				= '70,50,mpf,no',
	args_values_err				= "Valor anormal del argumento '''%1 = %2''' a partir de: (%3) ",

	date_to_part_format			= "dd mmmm yyyy",
	date_to_part_call_err		= "Error interno: argumentos de llamadas anómala en fecha '''%1'''.",
	date_to_part_call_cat		= "Módulo con error interno",
	date_to_part_err_not_found	= "Error interno: No se encuentra en fecha '''%1'''.",

	-- Diversos mensajes y errores
	all_versions_tests			= "Versiones aviso: <b>%1</b>, normal: <b>%2</b>, lista: <b>%3</b>.",
	all_versions_check			= "Versiones: falta: <b>%1</b>, incógnitas: <b>%2</b>, normales: <b>%3</b>, en exceso: <b>%4</b>, selecciona todo: <b>%5</b>.",
	err_nearest_argument		= "Error : ¿Es usted conocido argumento '''%1''' ?",
--	max_nearest_argument		= 3,
	max_nearest_argument_msg	= "Un argumento nombre más largo acepta más letras errores.",
	err_value_re_defined		= "Error: El valor del argumento '''%1''' ya está definido. Elija sólo un valor de un solo sinónimo",

	cat_test_OK					= "Prueba generación categoría en OK",
	cat_usage_error				= "Módulo con error del uso",
	cat_internal_error			= "Módulo con error interno",
	err_module_with_error		= "Módulo con error",
	err_too_unnamed_arguments	= "Error: Demasiado argumento sin nombre: '''%1''' = '''%2'''.",
	languages_nbr_and_list		= "\n* Hay %1 mesas de traducciones en estas idiomas: %2 <br>",
	structured_data_txt			= 'Datos de Wikidata',
	err_unknown_argument		= "Error: El parámetro '''%1''' es desconocido en este modelo. Compruebe el nombre o marca esta brecha.",
	err_wikidata_getEntityObject= "Error: Elemento <b>%1</b> de Wikidata no se encuentra.",

	args_values_err				= "Valor anormal del argumento '''%1 = %2''' a partir de: (%3) ",
	language_cat				= 'Habla %1',
	occupation_cat				= '%1',
	sources_of_datas			= "Informacións de: /Wikidata, /modelo o módulo, /otros, /mensaje, /error",
	list_a_translated_language	= "\n* %1 traducciones en idioma %2 : %3 : %4",
	err_module_miss_i18n_none	= "OK, ninguno traducciones faltan.",
	err_module_miss_i18n		= "Error interno: falta de traducción para el argumento '''%1''' ",
--	err_module_miss_i18n_cat	= "Módulo falta de traducción i18n",
	err_module_miss_i18n_cat	= "Módulo con error interno", -- cat_internal_error
	table_counts				= "Tabla <b>%1</b> : cuentas tabs=<b>%2</b>, vars=<b>%3</b>, funcs=<b>%4</b>.",
	table_dont_exists			= "La tabla '''%1''' no existe.",

	err_delete_docbox			= "Debe quitar esta documentación antes de grabar.\nRetire todos los modos para volver al modo normal.",
	err_assist_user_param		= "Soporte al usuario para comprobar la configuración:",
	i18n_list_all_texts			= "Esta lista muestra todos los textos, pero no puede sustituir a las declaraciones originales.",
--	err_module_error			= "Módulo con error.",
	msg_auto_val_warning		= "Verifique el argumento automático: %1 = <b>%2</b>.",
	msg_auto_val_unknown		= "Error interno: Argumento desconocido automático: %1 = <b>%2</b>.",
	--
	err_no_known_arguments		= "Error interno: Módulo sin tabla de argumentos conocidos.",
	cat_no_known_arguments		= "Módulo con error interno", -- cat_internal_error
	err_no_source_arguments		= "Error interno: Módulo sin tabla de argumentos fuentes.",
	cat_no_source_arguments		= "Módulo con error interno", -- cat_internal_error

	-- Titres des pruebas
	page_tests_h3_title			= "Pruebas de esta página",
	page_tests_title			= "Pruebas y información relacionada con esta página:",
	internal_tests_h3_title		= "Pruebas internas",
	internal_tests_title		= "Pruebas de no regresión internas:",
	dropdown_missing_title		= "Falta el título para este dropbox",
	used_options_title			= "Opciones y sus usos:",
	options_from_mode_title		= "Prueba de opciones de modos",
	options_from_args_title		= "Prueba de opciones de argumentos",
	spaces_page_names_title		= "Módulo, namespaces, y nombres de páginas:",
	tables_count_title			= "Condes des contenidos en tablas",
	list_all_args_title			= "Lista de todos los argumentos",
	wikidata_any_page_title		= "Wikidata para cualquier página:",
	wikidata_details_test_title = "Pruebas y datos importados de wikidata",
	wikidata_arbitrary_access_title = "Prueba de acceso independiente Wikidata",
	wikidata_arbitrary_access_text	= "Wikidata por otro título: ",
	actual_versions_title		= "Versiones efectivas",
	versions_details_title		= "Versiones detalladas",
	versions_manage_test_title	= "Prueba de la gestión de versiones",
	date_to_part_test_title		= "Pruebas de fecha a día, mes, año o época",
	cat_add_test_title			= "Pruebe la creación de categorías en algunos idiomas",
	levenshtein_test_title		= "Prueba de las distancias entre las palabras '''[https://es.wikipedia.org/wiki/Distancia_de_Levenshtein Levenshtein]''':",
	table_args_source_title		= "Tabla de argumentos recibido, args_source:",
	table_args_unknown_title	= "Tabla de argumentos desconocidos, args_unknown:",
	table_args_known_title		= "Tabla de argumentos conocidos, args_known:",
	missing_translations_title	= "Traducciones que faltan en las tablas:",
	similar_args_test_title		= "Prueba de palabras cercanos similar_args:",
	testable_lister_title		= "Enumerar una tabla, prueba sin límites:",
	testable_limit_title		= "Enumerar una tabla, prueba con límites:",
	combined_translations_title = "Tablas traducciones i18n combinadas:",
	dummy_languages_title		= "Definiciones de idiomas:",
	time_format_test_title		= "Pruebas de codificación y conversión fechas",

} -- p.i18n.es

p.i18n.fr = {
	-- Principaux textes, erreurs et catégories de ControlArgs
	[1]							= "1",
	["1"]						= "1",
	mode						= "mode",
	c							= 'c',
	debug						= 'debug',
	options						= 'options',
	category					= 'Catégorie',
	date_months_names			= "Janvier, Février, Mars, Avril, Mai, Juin, Juillet, Août, Septembre, Octobre, Novembre, Décembre",
	userlang					= 'userlang',
	wikilang					= 'wikilang',
	user_wiki_lang				= "Langues : utilisateur : %1, wiki : %2.",
	allversions					= "allversions",
	selectversions				= "selectversions",
	DropBox_option_label_Unwrap = "Dérouler/Enrouler",

	-- Noms et descriptions des arguments
	needed_to_verify			= "(obligatoire, à vérifier)",
	list_needed_arguments		= "Liste des arguments nécessaires :",
	list_all_other_arguments	= "Liste de tous les autres arguments :",
	label						= 'label',
	label_descr					= "Argument automatique de Wikidata.",
	entityid					= 'id',
	entityid_descr				= "Identifiant des données de wikidata, comme <code>Q535</code> pour Victor Hugo.",
	entityid2					= 'entityid',
	entityid2_descr				= "Identifiant des données de wikidata, comme <code>Q535</code> pour Victor Hugo.",
	sitelink					= 'sitelink',
	sitelink_descr				= "Argument automatique de Wikidata.",
	lastname					= 'nom',
	lastname_descr				= "Nom. A préciser pour corriger la clé de tri.",
	firstname					= 'prénom',
	firstname_descr				= "Prénom. A préciser pour corriger la clé de tri.",
	firstname2					= 'prenom',
	firstname2_descr			= "Prénom. A préciser pour corriger la clé de tri.",
	initiale					= 'initiale',
	initiale_descr				= "Initiale pour corriger les catégories d'ateurs.",
	title						= 'titre',
	title_descr					= "Titre de la page, automatique.",
	birthyear					= 'anneeNaissance',
	birthyear_descr				= "Année de naissance",
	deathyear					= 'anneeDeces',
	deathyear_descr				= "Année de décès",
	rights						= 'droits',
	rights_descr				= "Type de droits d'auteur nécessaire parmi : 70,50,mpf,non.",
	language					= 'langue',
	language_cat				= 'Parle %1',
	occupation_cat				= '%1',
	authors_deathyear_cat		= "Auteurs-%1",
	cat_name_number				= "Année %1",
	debug						= "debug",
	country						= 'pays',
	description					= 'description',
	description_descr			= "Description de l'auteur, à préciser si la description automatique ne convient pas",
	flag_of_image				= 'Flag_of_France.svg',

	-- Arguments à valeurs multiples vérifiées
	region						= 'région',
	region_values				= "autre,chine,inde,siècle",
	rights						= 'droits',
	rights_values				= '70,50,mpf,non',
	args_values_err				= "Valeur anormale de l'argument '''%1 = %2''' parmi : (%3) ",

	date_to_part_format			= "dd yyyy mmmm",
	date_to_part_call_err		= "Erreur interne : Argument anormal de définition de date '''%1'''.",
	date_to_part_call_cat		= "Module avec erreur interne",
	date_to_part_err_not_found	= "Erreur interne : partie non définie de date '''%1'''.",

	-- Messages et erreurs divers
	all_versions_tests			= "Versions avertissements : <b>%1</b>, normaux : <b>%2</b>, liste : <b>%3</b>.",
	all_versions_check			= "Versions: manquantes: <b>%1</b>, inconnues: <b>%2</b>, normales: <b>%3</b>, en excès: <b>%4</b>, toutes selectionées : <b>%5</b>.",
	err_nearest_argument		= "Erreur : Voulez vous l'argument connu <b>%1</b> ?",
--	max_nearest_argument		= 3,
	max_nearest_argument_msg	= "Un nom d'argument plus long accepte plus d'erreurs de lettres.",
	err_value_re_defined		= "Erreur : La valeur de l'argument '''%1''' est déjà définie. XXX Choisir une seule valeur d'un seul synonyme.",
	cat_test_OK					= "Test de génération de catégorie OK",
	cat_usage_error				= "Module avec erreur d'utilisation",
	cat_internal_error			= "Module avec erreur interne",
	err_error_list_header		= "Assistance sur les paramètres de ce modèle :",
	err_unknown_argument		= "Erreur : Le paramètre '''%1''' est inconnu dans ce modèle. Vérifier ce nom ou signaler ce manque.",
	err_need_value				= "Erreur : Vous devez définir cet argument nécessaire mais absent : '''%1'''.",
	err_none_value				= "Erreur : Aucun argument n'a été défini.",
	err_too_unnamed_arguments	= "Erreur : Ce paramètre non nommé est en trop : '''%1''' = '''%2'''.",
	err_internal_notice_wsid	= "Erreur interne : Signaler au développeur que l'argument interne '''%1''' est inconnu dans les notices.",
	err_without_translation		= "Argument connu, mais non traduit : '''%1'''.",
	err_without_translation_N	= "Il y a %1 arguments non traduits.",
	err_is_defined				= "L'argument %1:'''%2''' est défini.",
	err_is_undefined			= "L'argument %1:'''%2''' n'est pas défini.",
	err_module_with_error		= "Module avec erreur",
	err_wikidata_wikibase		= "Erreur : Wikibase n'est pas disponible.",
	err_wikidata_getEntity		= "Erreur : getEntity Wikidata n'est pas disponible.",
	err_wikidata_getEntityObject= "Erreur : L'élément '''%1''' de Wikidata n'est pas trouvé.",
	err_wikidata_property		= "Erreur : La propriété '''%1''' de Wikidata n'est pas trouvée.",
	err_wikidata_error			= "Erreur Wikidata : '''%1''' ",
	err_wikidata_cat			= "Erreur Wikidata",
	structured_data_txt			= 'Données de Wikidata.',
	table_listlimit_levelmaxi	= "Limite de niveau levelmaxi = '''%1''' ",
	table_listlimit_max_n		= "Limite de longueur max_n = '''%1''' ",
	err_module_miss_i18n_txt	= "Erreur interne : Le texte '''%1''' manque de traduction en langue '''%2''', et/ou d'autres.",
	err_module_miss_i18n_count	= "Erreur interne : Il y a '''%1''' manques parmi '''%2''' traductions.",
	err_module_miss_i18n_none	= "OK, aucune traduction manquante.",
	err_module_miss_i18n		= "Erreur interne : manque de traduction pour l'argument '''%1''' ",
--	err_module_miss_i18n_cat	= "Module manquant de traduction i18n",
	err_module_miss_i18n_cat	= "Module avec erreur interne", -- cat_internal_error
	err_module_miss_i18n_mini	= "Erreur interne : La table i18n n'a que '''%1''' traductions.",
--	err_no_args_known			= "Erreur interne : Module sans table d'arguments connus.",
--	err_no_args_source			= "Erreur interne : Module sans table d'arguments sources.",
	languages_nbr_and_list		= "\n* Il y a %1 tables de traductions dans ces langues : %2 <br>",
	err_no_wiki_translations	= "Erreur interne : Module sans table d'arguments traduits.",
	err_no_args_wikidata		= "Erreur interne : Module sans table d'arguments wikidata.",
	err_lang_table				= "Erreur interne : La langue '''%1''' ou sa table est erronée.",
--	err_lang_table_cat			= "Module avec langue d'arguments erronée",
	err_lang_table_cat			= "Module avec erreur interne", -- cat_internal_error
	err_lang_not_exist			= "Erreur : La langue '''%1''' n'est pas une des langues des wikipedias.",
	err_lang_not_translated		= "Erreur : La langue '''%1''' n'est pas traduite.",
	err_argv_args_src			= "Erreur interne : en p.argv, table d'arguments absente.",
	err_argv_args_name			= "Erreur interne : en p.argv, argument anormal '''%1'''.",
	err_argv_args_miss			= "Erreur interne : en p.argv, argument absent '''%1'''.",
	err_generDoc1_paramName		= "Erreur interne : en generDoc1, mauvais argument '''%1'''.",
	sources_of_datas			= "Informations de : /Wikidata, /modèle ou module, /autres, /message, /erreur",
	list_a_translated_language	= "\n* %1 traductions en langage %2 : %3 : %4",
	table_counts				= "Table '''%1''' : comptes tabs='''%2''', vars='''%3''', funcs='''%4'''.",
	table_dont_exists			= "La table '''%1''' n'existe pas.",

	err_delete_docbox			= "Vous devez supprimer cette documentation avant d'enregistrer.\nSupprimez tous les modes pour revenir en mode normal.",
	err_assist_user_param		= "Support aux utilisateurs pour vérifier les paramètres :",
	i18n_list_all_texts			= "Cette liste montre tous les textes, mais ne peut remplacer les déclarations originales.",
--	err_module_error			= "Module avec erreur.",
	msg_auto_val_warning		= "Vérifiez l'argument automatique : %1 = <b>%2</b>.",
	msg_auto_val_unknown		= "Erreur interne: Argument automatique inconnu : %1 = <b>%2</b>.",
	--
	err_no_known_arguments		= "Erreur interne : Module sans table d'arguments connus.",
--	cat_no_known_arguments		= "Module sans table d'arguments connus.",
	cat_no_known_arguments		= "Module avec erreur interne", -- cat_internal_error
	err_no_source_arguments		= "Erreur interne : Module sans table d'arguments sources.",
--	cat_no_source_arguments		= "Module sans table d'arguments sources.",
	cat_no_source_arguments		= "Module avec erreur interne", -- cat_internal_error

	-- Titres des tests
	page_tests_h3_title			= "Tests de cette page",
	page_tests_title			= "Tests et informations liées à cette page :",
	internal_tests_h3_title		= "Tests internes",
	internal_tests_title		= "Tests internes de non régression :",
	dropdown_missing_title		= "Titre manquant pour cette boite déroulante",
	used_options_title			= "Options et leurs utilisations :",
	options_from_mode_title		= "Test des options de modes",
	options_from_args_title		= "Test des options des arguments",
	spaces_page_names_title		= "Module, namespaces, et noms de pages :",
	tables_count_title			= "Comptages des contenus de tables",
	list_all_args_title			= "Liste de tous les arguments",
	wikidata_any_page_title		= "Wikidata pour une autre page :",
	wikidata_details_test_title = "Tests et données importées de wikidata",
	wikidata_arbitrary_access_title = "Test de Wikidata pour une autre page",
	wikidata_arbitrary_access_text	= "Wikidata pour une autre page: ",
	actual_versions_title		= "Versions effectives",
	versions_details_title		= "Versions détaillées",
	versions_manage_test_title	= "Test de la gestion des versions",
	date_to_part_test_title		= "Tests de date vers jour, mois, année ou ère",
	cat_add_test_title			= "Tester la création des catégories dans quelques langues",
	levenshtein_test_title		= "Test des distances entre mots de '''[https://fr.wikipedia.org/wiki/Distance_de_Levenshtein Levenshtein]''':",
	table_args_source_title		= "Table des arguments reçus, args_source :",
	table_args_unknown_title	= "Table des arguments inconnus, args_unknown :",
	table_args_known_title		= "Table des arguments connus, args_known :",
	missing_translations_title	= "Manques de traductions en tables i18n :",
	similar_args_test_title		= "Test des mots proches similar_args :",
	testable_lister_title		= "Lister une table, test sans limites :",
	testable_limit_title		= "Lister une table, test avec limites :",
	combined_translations_title = "Tables de traductions i18n combinées :",
	dummy_languages_title		= "Définitions de langues :",
	time_format_test_title		= "Tests de codage et conversions de dates",

} -- p.i18n.fr

------------------------------------------------------------
-- p.i18n tables end
------------------------------------------------------------

------------------------------------------------------------
-- Arguments table, to change in calling modules
------------------------------------------------------------

p.args_known_default = {

	-- Arguments in order without names, with their keyword for use as other arguments.
	-- Arguments dans l'ordre, non nommés, avec leur keyword pour traitement comme les autres arguments.

	[1] =			{need = 0, list = 1, syn = 2,
		keyword = "mode"},

	-- Special arguments to modify the fonctions and outputs of this module.
	-- Arguments speciaux pour modifier le fonctionnement et les sorties de ce module.

	mode =			{typ = "prg", need = 0, list = 1,
		keyword = "mode"},

	c =				{typ = "dat", need = 0, list = 1,
		keyword = "c"},

	options =		{typ = "dat", need = 0, list = 1,
		keyword = "options"},

	-- The userlang argument permits at an administrator in his own langage (errors, messages, catégories, tests) to help a wiki in any language.
	-- El userlang argumento permisos en administrador en su propia langage (errores, mensajes, categorías, pruebas) para ayudar a un wiki en cualquier idioma.
	-- L'argument userlang permet à un administrateur dans son propre langage (erreurs, messages, catégories, tests) d'aider un wiki dans ne importe quelle langue.
	userlang =		{typ = "dat", need = 0, list = 1,
		keyword = "userlang"},

	-- The wikilang argument permits to verify in one unique wiki that a module can well adapt itself to any wiki language.
	-- Los argumento wikilang permisos para verificar en una wiki único que un módulo puede así adaptarse a cualquier idioma de wiki.
	-- L'argument wikilang permet de vérifier dans un wiki unique qu'un module peut s'adapter à n'importe quelle langue de wiki.
	wikilang =		{typ = "dat", need = 0, list = 1,
		keyword = "wikilang"},

	allversions =	{typ = "dat", need = 0, list = 1,
		keyword = "allversions"},

	selectversions = {typ = "dat", need = 0, list = 1,
		keyword = "selectversions"},

	debug =			{typ = "opt", need = 0, list = 1,
		keyword = "debug"},

	category =		{typ = "ctr", need = 0, list = 3,
		keyword = "category"},

	-- All arguments have a keyword identical to the registration name, except synonyms.
	-- Tous les arguments ont un keyword identique au nom d'enregistrement, sauf les synonymes.

	label =			{typ = "dat", need = 0, list = 2,
		keyword = "label" , prop = "label"},

	country =		{typ = "dat", need = 0, list = 3,
		keyword = "country", prop = "P27", },

	sitelink =		{typ = "dat", need = 0, list = 2,
		keyword = "sitelink" , prop = "sitelink"},

	entityid =		{typ = "dat", need = 2, list = 2,
		keyword = "entityid" , prop = "entityid"},

	entityid2 =		{typ = "dat", need = 2, list = 2, syn = 2,
		keyword = "entityid" , prop = "entityid"},

	lastname =		{typ = "dat", need = 0, list = 2,
		keyword = "lastname"},

	lastname2 =		{typ = "dat", need = 0, list = 2, syn = 2,
		keyword = "lastname"},

	firstname =		{typ = "dat", need = 0, list = 2,
		keyword = "firstname"},

	firstname2 =	{typ = "dat", need = 0, list = 2, syn = 2,
		keyword = "firstname"},

	initiale =		{typ = "dat", need = 2, list = 2,
		keyword = "initiale"},

	title =			{typ = "dat", need = 2, list = 2,
		keyword = "title"},

	birthyear =		{typ = "dat", need = 0, list = 2,
		keyword = "birthyear", prop = "P569", format = "year"},

	deathyear =		{typ = "dat", need = 0, list = 2,
		keyword = "deathyear", prop = "P570", format = "year"},

	description =	{typ = "dat", need = 0, list = 2,
		keyword = "description", prop = "description"},

} -- p.args_known_default

function CA.list_all_args(t, args_known) -- list_all_args_title = List of all arguments
	local t = t or "<br>* <b>List_all_args :</b> "
	if type(args_known) ~= "table" then args_known = CA.args_known end
	local descr, description = "", ""
	local args = mw.clone(args_known)
	local arglst = {}
	for key, elem in pairs(args) do
		elem.key = tostring(key)
		descr = key .. "_descr" -- key for description of an argument
		elem.description = CA.user_translations[descr] or "**missing translation**"
		elem.user_lang_key = CA.user_translations[elem.key] or "**missing translation**"
		elem.user_lang_keyword = CA.user_translations[elem.keyword] or "**missing translation**"
		elem.lev_arg_txt = ""
		local lst_lev = {}
		local lev_min = 99
		for arg_lev, elem_lev in pairs(args_known) do
			elem_lev.levenshtein = CA.levenshtein( CA.wiki_translations[arg_lev], CA.wiki_translations[key] ) or 99
			if elem_lev.levenshtein < lev_min then
				lev_min = elem_lev.levenshtein
				elem.levenshtein = elem_lev.levenshtein
				elem.lev_min = lev_min
				elem.arg_lev = arg_lev
				elem.lev_lang = CA.wiki_translations[arg_lev] or arg_lev
			end
			elem.arg_lev = arg_lev
			elem.lev_arg_txt = CA.ta("lev", tostring(elem.lev_lang) .. ":" .. tostring(elem.lev_min) .. ":" .. elem.arg_lev )
		--	CA.err_add("err_too_unnamed_arguments", key_N, val_src .. " LLL lev=" .. tostring(arglst[1].levenshtein) )
		--	p.cat_add("cat_usage_error")
		end
		table.insert(arglst, elem)
	end -- insert in the arguments their own key
	table.sort(arglst, function (a, b) return (a.user_lang_key < b.user_lang_key) end )
	local gr_syn, gr_need, gr_other = {}, {}, {}
	for i, elem in ipairs(arglst) do -- group arguments in some groups
		if elem.need == 1 or elem.need == 2 then table.insert(gr_need, elem)
		else table.insert(gr_other, elem) end
	end
	local needed = CA.small_caps_style(CA.str_vars("needed_to_verify"))
	local function list_group( group, needed )
		needed = needed or ""
		local t = ""
		for key, elem in pairs(group) do
			if elem.syn
			then t = t .. "<br>* <b>" .. tostring(elem.user_lang_key) .. "</b> => <b>" .. elem.user_lang_keyword .. "</b> : " .. needed .. " " .. tostring(elem.description) .. elem.lev_arg_txt
			else t = t .. "<br>* <b>" .. tostring(elem.user_lang_key) .. "</b> : " .. needed .. " " .. tostring(elem.description) .. elem.lev_arg_txt end
		end
		return t
	end
	t = t .. "<br><br>* <b>" .. CA.str_vars("list_needed_arguments") .. "</b> " .. list_group( gr_need, needed )
	t = t .. "<br><br>* <b>" .. CA.str_vars("list_all_other_arguments") .. "</b> " .. list_group( gr_other )
	return t
end -- function CA.list_all_args(t, args_known) -- list_all_args_title

-- relire ControlArgs/Auteur : module code in english

------------------------------------------------------------
-- Main tables of arguments. Principales tablas de argumentos. Principales tables d'arguments.
------------------------------------------------------------

p.args_source_example = { "Hugo", "Victor", "arg3", c = ' docdef docview docsrc erron ', nom = 'Voltaire', nomm = 'Voltaire', anneenaissance = '1987', BNF = '123456789' }

CA.wiki_lang = tostring(mw.language.getContentLanguage().code) -- "fr" -- mw.language.getContentLanguage().code -- language of usual wiki for args and categories
CA.wiki_translations = {} -- = p.i18n[p.wiki_lang] -- translations in the wiki language of identifiers, errors and messages
CA.user_lang = tostring(mw.language.getContentLanguage().code) -- "fr" -- user language for errors and messages
CA.user_translations = {} -- translations in the user language of identifiers, errors and messages
p.msgs_list = CA.user_translations -- = p.i18n[p.user_lang] -- translations in the user language of identifiers, errors and messages
--	https://www.mediawiki.org/wiki/Extension:UniversalLanguageSelector
--	Flexible and easy way to select a language from a large set of languages.

p.args_known = nil -- Table of the definitions of all known arguments at module level.
p.args_wikidata = nil -- Table of present arguments values from wikidata
p.args_source = nil -- Table of source arguments from calling template, based on argument names in wiki language
p.args_unknown = nil -- unknown arguments are source arguments without known arguments.
p.args_import = nil -- Table of values of all imported arguments, including wikidata, based on international english keys
p.args_final = nil -- Table of values of arguments after interactions between them
-- p.max_nearest_argument = 3 -- Limit of differences of arguments proposed to the user
CA.args_wikidata_import = nil -- Table of the first complete import from wikidata
CA.args_wikidata_selected = nil -- Table of imported arguments from wikidata after any selection

p.categories_list = {} -- Table to collect all categories to generate in wikitext
CA.catView = "" -- = ":" to document a category rather than truly categorize it
p.category_space = mw.site.namespaces.Category.name -- translated Category namespace

function p.gener_categories(args_final) -- Produire les catégories sans les activer
	if type(args_final) ~= "table" then args_final = CA.args_final end
	if args_final.deathyear then
		CA.cat_add("authors_deathyear_cat", args_final.deathyear)
	end
	return
end -- function p.gener_categories(args_final)

------------------------------------------------------------
-- Miscelanous functions. Fonctions utilitaires.
------------------------------------------------------------

-- A faire ? to detect create mode : mw.title.getContent(): Returns the (unparsed) content of the page, or nil if there is no page. The page will be recorded as a transclusion.
-- mw.title.getCurrentTitle() Returns the title object for the current page.
function p.get_edit_state(t) -- iterator to use all elements of a table, one by one
	-- for noticeN in p.table_iterator(notices_properties) do
	-- modele : function list_iter (t)
	if type(t) ~= "table" then return {}, 0 ,0 end
	local i = 0
	local n = table.getn(t)
	return function ()
		i = i + 1
		n = table.getn(t)
		if t[i] ~= nil then return t[i], i ,n end
	end
end -- function p.get_edit_state(t)

function p.table_iterator(t) -- iterator to use all elements of a table, one by one
	-- for noticeN in p.table_iterator(notices_properties) do
	-- modele : function list_iter (t)
	if type(t) ~= "table" then return {}, 0 ,0 end
	local i = 0
	local n = table.getn(t)
	return function ()
		i = i + 1
		n = table.getn(t)
		if t[i] ~= nil then return t[i], i ,n end
	end
end -- function p.table_iterator(t)

function p.spaces_page_names_test(t)
	if type(t) ~= "string" then t = nil end
	local t = t or "\n* '''spaces_page_names_test''' :"
	local mwtitle = mw.title.getCurrentTitle()
	t = t .. p.ta("mwtitle", mwtitle)
	local nsText = mwtitle.nsText
	t = t .. p.ta("nsText", nsText)
	local baseText = mwtitle.baseText -- namespace for the page
	t = t .. p.ta("baseText", baseText)
	local url = tostring(mwtitle:canonicalUrl( ))
	t = t .. p.ta("url", url)
	--
	t = t .. "\n* Module namespace : "
	local ns = mw.site.namespaces
	if ns and ns[828] then
		t = t .. p.ta("id828", ns[828].id)
		t = t .. p.ta("canonicalName828", ns[828].canonicalName)
		t = t .. p.ta("name828", ns[828].name)
		t = t .. p.ta("displayName828", ns[828].displayName)
	end
	t = t .. "\n* All namespaces : "
	local ns = ""
	for ins = 0, 2000 do
	--	if mw.site.contentNamespaces[ins] then
		if mw.site.namespaces[ins] then
			ns = mw.site.namespaces[ins].canonicalName
			t = t .. CA.ta(ns, ins)
		end
	end
	return t
end -- function p.spaces_page_names_test()

-- Some usual fonctional styles for this module and those using it.
-- Quelques styles fonctionnels banals dans ce module et ses modules appelants.
function p.error_color(t)
	return '<span style="color:red;" >' .. tostring(t) .. '</span>'
end

function p.message_color(t)
	return '<span style="color:blue;" >' .. tostring(t) .. '</span>'
end

function p.wikidata_color(t)
	return '<span style="color:green;" >' .. tostring(t) .. '</span>'
end

function p.invoke_color(t)
	return '<span style="color:#804020;" >' .. tostring(t) .. '</span>'
end

function p.other_color(t)
	return '<span style="color:black;" >' .. tostring(t) .. '</span>'
end

function p.discreet_color(t)
	return '<span style="color:#B0B0B0;" >' .. tostring(t) .. '</span>'
end

function CA.small_caps_style(t) -- Display a text in small-caps style.
	return '<span style="font-variant: small-caps">' .. t .. '</span>'
end

function p.isDef(x) -- x is defined or no. x est défini ou non
	return (type(x) == "string") and (x ~= "") and (x ~= " ") and (x ~= "nil")
end

function CA.tab_fields(tab) -- List the fields of a table
	if type(tab) ~= "table" then return tostring(tab) end
	local t = ""
	for key, val in pairs(tab) do
		t = t .. key .. ", "
	end
	t = string.sub( t, 1, -3 )
	return t
end -- function CA.tab_fields(tab)

function CA.tab_pairs(tab) -- List a pairs table: Lister une table de pairs :"
	local t = ""
	for key, val in pairs(tab) do -- Pour tous les mots
		t = t .. tostring(key) .. " = '''" .. tostring(val) .. "''', "
	end
	t = string.sub( t, 1, -3 )
	return t
end -- function CA.tab_pairs(tab)

-- Build a table, with headers for columns. Example:
-- ! style="text-align:left;"| Item
-- {| class="wikitable" style="text-align: center; color: green;"
-- {| border="1" style="border-collapse:collapse"
-- {| class="wikitable sortable" border="1" mw-collapsible mw-collapsed"
-- |} end of table
function CA.Th(t) return '\n{| class="wikitable alternative center" | ' .. tostring(t or " ") end -- Table header
function CA.Tc(t) return '\n! scope="col" | ' .. tostring(t or " ") end -- Table row
function CA.Tr(t) return "\n|- " .. tostring(t or " ") end -- Table row
function CA.Td(t) return "\n| " .. tostring(t or " ") end -- Table data
function CA.Te(t) return "\n|}" end -- Table end

function p.string_vars(translations, ref, v1, v2, v3, v4, v5)
	-- replace %1 to %5 by v1 to v5 in the user translation of ref, else in ref
	ref = tostring(ref)
	local wt = " stv "
	if translations and translations[ref] then
		wt = tostring(translations[ref]) -- Utiliser ref comme reference du texte
	elseif ref then
		wt = tostring(ref) -- Sinon utiliser ref comme le texte lui-même.
	else
		wt = tostring("noref") -- Sinon utiliser ref comme le texte lui-même.
	end
	v1 = v1 or " 1"
	v2 = v2 or " 2"
	v3 = v3 or " 3"
	v4 = v4 or " 4"
	v5 = v5 or " 5"
	if v1 then wt = string.gsub(wt, "%%1", tostring(v1) ) end
	if v2 then wt = string.gsub(wt, "%%2", tostring(v2) ) end
	if v3 then wt = string.gsub(wt, "%%3", tostring(v3) ) end
	if v4 then wt = string.gsub(wt, "%%4", tostring(v4) ) end
	if v5 then wt = string.gsub(wt, "%%5", tostring(v5) ) end
	return tostring(wt)
end -- function p.string_vars(translations, ref, v1, v2, v3, v4, v5)

function CA.str_vars(ref, v1, v2, v3, v4, v5)
	-- replace %1 to %5 by v1 to v5 in the user translation of ref, else in ref
	return p.string_vars(CA.user_translations, ref, v1, v2, v3, v4, v5)
end -- function CA.str_vars(ref, v1, v2, v3, v4, v5)

function CA.wiki_vars(ref, v1, v2, v3, v4, v5)
	-- replace %1 to %5 by v1 to v5 in the wiki translation of ref, else in ref
	return p.string_vars(CA.wiki_translations, ref, v1, v2, v3, v4, v5)
end -- function CA.wiki_vars(ref, v1, v2, v3, v4, v5)

function p.str_STR_N(wt_ref, v1, v2, v3)
	-- replace STR_1 to STR_3 by v1 to v3 in the translation of wt_ref, else in wt_ref
	wt_ref = tostring(wt_ref)
	local wt = ""
	if CA.wiki_translations and CA.wiki_translations[wt_ref]
		then wt = tostring(CA.wiki_translations[wt_ref]) -- Utiliser wt_ref comme la reference de texte traduit.
		else wt = tostring(wt_ref) end -- Sinon utiliser wt_ref comme le texte lui-même.
	if v1 then wt = string.gsub(wt, "STR_1", tostring(v1) ) end -- REF_1
	if v2 then wt = string.gsub(wt, "STR_2", tostring(v2) ) end
	if v3 then wt = string.gsub(wt, "STR_3", tostring(v3) ) end
	return wt
end -- function p.str_STR_N(wt_ref, v1, v2, v3)

-- To do debug : Dropbox plus souple a traduire et parametrer par "style" une table de parametres nommés.

function CA.DropBox(title, content, boxstyle) -- alignT, image, alignB, margin_bottom, width, border_radius, border_color, background_color)
	-- Form a drop box. Formar un cuadro desplegable. Former une boite déroulante.
	local s = { -- options for style and other
		title = CA.str_vars(title or "dropdown_missing_title"),
		content = content,
		image = nil,
		alignT = alignT or "left", -- align
		alignB = alignB or "left", -- align
		margin_all = margin_all or "0px", -- margin
		margin_bottom = margin_bottom or "1em", -- margin-bottom
		width = width or "99%", -- width
		border_radius = border_radius or "0", -- border-radius
		text_color = text_color or "black", -- color
		background_color = background_color or "#FFFFFF", -- background-color
		border_color = border_color or "#AAAAAA", -- border-color
		height = height or "1.6em", -- height
		label = label or CA.str_vars("DropBox_option_label_Unwrap"),
	}
	if type(boxstyle) == "table" then
		for key, val in pairs(boxstyle) do
			if type(val) == "string" then s[key] = val end
		end
	end
	if type(title) ~= "string" then title = "dropdown_missing_title" end
	s.title = CA.str_vars(title or "dropdown_missing_title")
	if type(content) ~= "string" then content = "" end
	s.content = CA.str_vars(content)
--	local txt = "{{Boîte déroulante/début|titre=" .. title .. "|alignT=" .. alignT .. "}}" .. content .. "{{Boîte déroulante/fin}}"
--	image = image or "Nuvola_apps_bookcase_2.svg" -- image
	if type(s.image) == "string" then
		s.image = ''
		.. '<div class="NavPic" style=" background-color:' .. s.background_color .. '; " >'
			.. '[[File:' .. s.image .. '|22px]]'
		.. '</div>'
	else
		s.image = ''
	end
	local res = ''
	.. '<div align="'.. s.alignB ..'" >'
		.. '<div class="NavFrame" style="clear:both; margin-bottom:'.. s.margin_bottom ..'; width:'.. s.width ..'; border-style:solid; border-radius:'.. s.border_radius ..'; border-color:'.. s.border_color ..'; background-color:'.. s.background_color ..'; " title="'.. s.label ..'" >'
				.. s.image
			.. '<div class="NavHead" align="'.. s.alignT ..'" style=" height:'.. s.height ..'; background-color:'.. s.background_color ..'; color:'.. s.text_color ..'; " >'
				.. s.title
			.. '</div>'
			.. '<div class="NavContent" align="'.. s.alignB ..'" style="margin:'.. s.margin_all ..'; background-color:'.. s.background_color ..'; display:block; " >'
				.. s.content
			.. '</div>'
		.. '</div>'
	.. '</div>'
	return res
end -- function CA.DropBox(title, content, boxstyle)

function CA.dropdown_func(if_view, title, content, ...) -- alignT, image, alignB, margin_bottom, width, border_radius, border_color, background_color)
	-- CA.dropdown_func(1, "Comptages des contenus de tables", CA.tables_counts)
	-- CA.dropdown_func(1, "Détails des arguments", CA.testable_lister, CA.args_source, "CA.args_source")
	if (if_view == false) or (if_view == 0) or (not if_view) then return "" end
	local t = ""
	local func = content
	local args = { ... } -- optional arguments
	local boxstyle = { }
	if type(content) == "string" then
		t = t .. content
	elseif type(func) == "function" then
		-- Get the style options for the box, then mask this style for functions giving the content.
		for i, tab in ipairs(args) do --
			if type(tab) == "table" and tab.boxstyle == "boxstyle" then
				boxstyle = mw.clone( args[i] )
				args[i] = nil
			end
		end
		t = t .. ( func( ... ) or "" ) -- doc1_doc
	else
		t = ""
	end
	-- Search if the last arg is a table of args, then return it for DropBox style options.
--	local maxn = table.maxn(args)
--	if type(args[maxn]) == "table" then args = args[maxn] end
	--
	return CA.DropBox(title, t, boxstyle)
end -- function CA.dropdown_func(if_view, title, content, ...)

-- Extract a part of date following a pre-defined format which starts with separator
function p.date_split(date, format)
	-- local dd, mmmm, yyyy, era = p.date_split(a.birthdate, " dd mmmm yyyy")
	local dd, mmmm, yyyy, era
	local format_split = mw.text.split(format, "%s")
	local split = mw.text.split(date, "%s")
	for i, date_part in ipairs(split) do
		if format_split[i] == "dd" then dd = tonumber(date_part) end
		if format_split[i] == "mmmm" then mmmm = date_part end
		if format_split[i] == "yyyy" then yyyy = tonumber(date_part) end
		if format_split[i] == "era" then era = date_part end
	end
	return dd, mmmm, yyyy, era
end -- function p.date_split(date, format)

-- Extract a part of date following a pre-defined format which starts with separator
function CA.date_to_part(date, part)
	-- local t, err = p.date_to_part(a.birthyear, " dd mmmm yyyy", "yyyy")
	part = part or "yyyy"
	local dd, mmmm, yyyy, era
	local found = false
	--	local err = "date_to_part_err_not_found"
	if not found then
		dd, mmmm, yyyy, era = p.date_split(date, "dd mmmm yyyy")
		if dd and mmmm and yyyy and not era then
			found = true
		end
	end
	if not found then
		dd, mmmm, yyyy, era = p.date_split(date, "mmmm dd yyyy")
		if dd and mmmm and yyyy and not era then
			found = true
		end
	end
	if not found then
		dd, mmmm, yyyy, era = p.date_split(date, "yyyy era")
		if not dd and not mmmm and yyyy then
			if era == "BCE" then yyyy = - yyyy end
			found = true
		end
	end
	if not found then
		dd, mmmm, yyyy, era = p.date_split(date, "mmmm yyyy")
		if not dd and mmmm and yyyy and not era then
			--	date_months_names				= "January, February, March, April, May, June, July, August, September, October, November, December",
			--	date_months_names				= "Enero, Febrero, Marzo, Abril, Mayo, Junio, Julio, Agosto, Septiembre, Octubre, Noviembre, Diciembre",
			--	date_months_names				= "Janvier, Février, Mars, Avril, Mai, Juin, Juillet, Août, Septembre, Octobre, Novembre, Décembre",
			found = true
		end
	end
	if not found then
		dd, mmmm, yyyy, era = p.date_split(date, "yyyy")
		if not dd and not mmmm and yyyy and not era then
			found = true
		end
	end
	-- + cccc = roman number ?
	if found then
		if part == "yyyy" then return yyyy or "" end
		if part == "mmmm" then return mmmm or "" end
		if part == "dd" then return dd or "" end
		if part == "era" then return era or "" end
	end
	return "" -- tostring(dd)..tostring(mmmm)..tostring(yyyy)..tostring(era)
--	A faire : Titus Livius (Q2039), format de dates : P569 = date of birth = 59 BCE, P570 = date of death = 17
--	Socrate (470-399 av. J.-C.).
end -- function CA.date_to_part(date, part)

-- relire ControlArgs/Auteur : module code in english

------------------------------------------------------------
-- Manage translations of arguments and messages
-- Gestione traducciones de argumentos y mensajes
-- Gérer les traductions des arguments et messages
------------------------------------------------------------

function p.trans(key) -- give the wiki translation of indentified texts, or arguments indentifier, or errors messages
	local t = CA.wiki_translations[key]
	if t == nil then t="" end
	return t
end

function p.get_IETF_fr()
	-- Chargement de la base de donnée des langues avec gestion d'erreur.
	-- voir, see : https://fr.wikipedia.org/wiki/Module:Langue
	local dataLangue
	local success, resultat = pcall (mw.loadData, 'Module:Langue/Data' )
	if success then
		dataLangue = resultat
	else
		-- Base de donnée à minima en cas de bug sur le Module:Langue/Data
		dataLangue = {
			en = { code = 'en', nom = 'anglais' },
			fr = { code = 'fr', nom = 'français' },
			de = { code = 'de', nom = 'allemand' },
			es = { code = 'es', nom = 'espagnol' },
			it = { code = 'it', nom = 'italien'	 },
			la = { code = 'la', nom = 'latin'	 },
--			['rtl script'] = { Arab = true }, -- debug : risque d'anomalie, anomaly risc
		}
		dataLangue.anglais = dataLangue.en
		dataLangue['français'] = dataLangue.fr
		dataLangue.francais = dataLangue.fr
		dataLangue.allemand = dataLangue.de
		dataLangue.espagnol = dataLangue.es
		dataLangue.italien = dataLangue.it
	end
	return dataLangue
end -- function p.get_IETF_fr()

function p.dummy_languages() -- Test dummy languages
	-- https://fr.wikipedia.org/wiki/%C3%89tiquette_d%27identification_de_langues_IETF
	-- https://fr.wikipedia.org/wiki/Module:Langue/Data
	--	pour convertir en code de langue IETF les noms français de langues
	-- https://www.mediawiki.org/wiki/Manual:$wgDummyLanguageCodes
	--	List of language codes that have been renamed to new (correct) codes, or don't correspond to an actual interface language.
	--	array( 'als' => 'gsw', 'bat-smg' => 'sgs', 'be-x-old' => 'be-tarask', 'bh' => 'bho'...
	local dummy_i18n = {
		en = "Module:ControlArgs/I18N", -- english
		es = "Modul:ControlArgs/I18N", -- spanish
		fr = "Module:ControlArgs/I18N", -- french
		Fr = "Module:ControlArgs/I18N", -- error test
		als = "Modulen:ControlArgs/I18N", -- alemanish
		gsw = "Mod-gsw:ControlArgs/I18N", -- unknown
		["bat-smg"] = "Mod-bat-smg:ControlArgs/I18N", -- alemanish
		sgs = "Mod-sgs:ControlArgs/I18N", -- unknown
	}
	local t = '\n* dummy_languages : ' ..  p.ta("isTag", "isKnownLanguageTag(xx)") .. p.ta("isLang", "isSupportedLanguage(xx)") .. p.ta("isBuilt", "isValidBuiltInCode(xx)")
	t = t .. CA.Th() .. CA.Tc("lang") .. CA.Tc("isTag") .. CA.Tc("isLang") .. CA.Tc("isBuilt")
	t = t .. CA.Tc("langname") .. CA.Tc("native")
	for lang, modname in pairs(dummy_i18n) do -- Pour tous les parametres connus
		local isTag = mw.language.isKnownLanguageTag(lang)
		local isLang = mw.language.isSupportedLanguage(lang)
		local isBuilt = mw.language.isValidBuiltInCode(lang)
		local langname = mw.language.fetchLanguageName(lang, "en")
		local native = mw.language.fetchLanguageName(lang)
		local space_name = tostring(mw.site.namespaces.Module.name)
		t = t .. CA.Tr() .. CA.Td(lang) .. CA.Td(isTag) .. CA.Td(isLang) .. CA.Td(isBuilt)
		t = t .. CA.Td(langname) .. CA.Td(native)
	end
	t = t .. CA.Te()
	return t
end -- function p.dummy_languages()

-- Verifier la cohérence des tables de traductions
function p.verif_i18n(i18n)
	if type(i18n) ~= "table" then i18n = p.i18n end
	if type(i18n) ~= "table" then return " verif_i18n MISSING. " end
	local nerr, trad, t, err = 0, "", "", ""
	local nbr, list = 0, ""
	--
	CA.i18n_trac("verif_i18n", "begin", 1)
	-- List any gaps of translations in i18n tables.
	-- Liste cualquier las lagunas traducciones en tablas i18n.
	-- Lister tous les manques de traductions dans les tables i18n.
	local prec_tab, suiv_tab, max, nk = nil, nil, 0, 0
	local lang, prec_lang, suiv_lang, cats = "", "", "", ""
	local all_txts = {}
	for lang, texts in pairs(i18n) do -- Pour toutes les langues et tous les textes à traduire
		suiv_lang = lang -- table suivante de traduction d'une langue
		suiv_tab = texts -- table suivante de traduction d'une langue
		list = list .. lang .. ", "
		nbr = nbr + 1
		if type(texts) == "table" then -- pour chaque couple de langues à comparer
			for k, v in pairs(texts) do -- Lister tous les textes traduits au moins dans une langue
				all_txts[k] = "x"
			end
			if prec_tab ~= nil and suiv_tab ~= nil then -- pour chaque couple de langues à comparer
				t = t .. "\n* Comparer les langues : '''" .. prec_lang .. "/" .. suiv_lang .. "''', "
				nk = 0
				for k, x in pairs(all_txts) do -- Pour tous les textes à traduire
					trad = suiv_tab[k]
					nk = nk + 1
					if trad == nil then -- and k ~= nil then -- args vers un argument nommé
						err = CA.err_add("err_module_miss_i18n_txt", k, suiv_lang)
						t = t .. err .. " " -- .. "<br>"
						nerr = nerr + 1
					end
				end
				if nk > max then max = nk end
			end
		end
		prec_lang = suiv_lang
		prec_tab = suiv_tab
	end
	if nerr > 0 then
		err = CA.err_add("err_module_miss_i18n_count", nerr, max)
		t = t .. "<br>" .. err .. " "
		cats = cats .. p.cat_add("err_module_miss_i18n_cat")
--		cats = cats .. p.cat_add("cat_internal_error")
	else
		err = CA.msg_add("err_module_miss_i18n_none")
		t = t .. "<br>" .. err .. " "
	end
	-- tester vr le nombre total de variables de traductions
	local st, vr, fn, tb = p.testable_lister(i18n, "i18n")
	if vr < 33 then
		err = CA.err_add("err_module_miss_i18n_mini", vr)
		t = t .. "<br>" .. err .. " "
		cats = cats .. p.cat_add("err_module_miss_i18n_cat")
--		cats = cats .. p.cat_add("cat_internal_error")
	end
	--
	-- List all translated languages
	t = t .. "\n* Translated languages: Langues traduites : "
	local an, ln, Nadd, Nchange, Ntotal = 0, 0, 0, 0, 0
	for lng, argmts in pairs(i18n) do -- Pour toutes les langues à importer
	--	if p.i18n[lng] then -- la langue existe déja, y ajouter ou y remplacer les champs importés
		if i18n[lng] then -- la langue existe déja, y ajouter ou y remplacer les champs importés
			t = t .. CA.str_vars(", '''Langue : %1''' ", lng)
			ln = ln + 1
			if type(texts) == "table" then -- pour chaque couple de langues à comparer
				for argn, val in pairs(argmts) do -- For all imported fields
					if p.i18n[lng][argn] then Nchange = Nchange + 1
					else Nadd = Nadd + 1 end
					-- Add or replace a field and its translation. Ajouter ou remplacer un champs et sa traduction
					p.i18n[lng][argn] = val --	t = t .. CA.str_vars(", %1 ", argn)
					an = an + 1
				end
			end
		else -- ajouter la table et tous ses champs si elle n'est pas encore dans p.i18n
			if mw.language.isKnownLanguageTag(lng) then
				p.i18n[lng] = i18n[lng]
			end
		end
	end
	local lst_lng = ""
	for lang, argmts in pairs(i18n) do -- Pour toutes les langues à importer
		Ntotal = 0
		if type(texts) == "table" then -- pour chaque couple de langues à comparer
			for argn, val in pairs(p.i18n[lang]) do -- For all existing fields
				Ntotal = Ntotal + 1
			end
			local langname = mw.language.fetchLanguageName(lang, "en")
			local native = mw.language.fetchLanguageName(lang)
			lst_lng = lst_lng .. CA.str_vars("list_a_translated_language", Ntotal, lang, langname, native)
			-- list_a_translated_language	= "\n* %1 translations in language %2 : %3 : %4",
		end
	end
	CA.Lang_list = lst_lng
	CA.i18n_trac("verif_i18n", "end", 1)
	--
	t = t .. CA.str_vars("languages_nbr_and_list", nbr, list) .. lst_lng
	return t, cats, lst_lng
end -- function p.verif_i18n(i18n)

CA.trac_lang_t = "" -- "track_lang: "
function CA.trac_lang(where, args_tab) -- res = res .. CA.trac_lang("CA.init_args:", args_source) -- DEBUG
	CA.trac_lang_t = CA.trac_lang_t .. " <b>" .. where .. "</b>"
	CA.trac_lang_t = CA.trac_lang_t .. CA.ta(".c", args_tab.c)
	CA.trac_lang_t = CA.trac_lang_t .. CA.ta(".userlang", args_tab.userlang) .. CA.ta(".wikilang", args_tab.wikilang)
	.. ":u." .. CA.user_lang .. "=" .. (CA.user_translations["title"] or "x")
	.. ":w." .. CA.wiki_lang .. "=" .. (CA.wiki_translations["title"] or "x") .. " "
--	.. ": u:" .. CA.user_lang .. ".title=" .. CA.user_translations["title"]
--	.. ": w:" .. CA.wiki_lang .. ".title=" .. CA.wiki_translations["title"]
end

-- en : initialize or change the user and the wiki languages and their tables
-- es : inicializar o cambiar el idiomas del usuario y del wiki y su tablas
-- fr : initialiser ou modifier la langue de l'utilisateur et du wiki et leurs tables
function CA.init_wiki_user_lang(wiki_lang, user_lang)
	-- en : initialize or change the user and the wiki languages and their tables
	CA.init_wiki_lang(wiki_lang or CA.wiki_lang)
	CA.init_user_lang(user_lang or CA.user_lang)
	if CA.user_lang == nil then
		CA.user_lang = CA.wiki_lang
		CA.user_translations = CA.i18n[CA.user_lang]
	end
end -- function CA.init_wiki_user_lang()

function CA.init_wiki_lang(wiki_lang)
--	t = "\n* init_wiki_lang : asked wiki_lang = " .. tostring(wiki_lang)
	-- wiki_lang ok if i18n ok, else wiki language
	if type(wiki_lang) ~= "string" then wiki_lang = nil end
	if not p.i18n[wiki_lang] then wiki_lang = nil end
	wiki_lang = wiki_lang or tostring(mw.language.getContentLanguage().code)
	if mw.language.isSupportedLanguage(wiki_lang) then
		-- Activate the wiki language for categories.
		-- Activer la langue du wiki pour les pages réelles de catégories.
		CA.wiki_lang = wiki_lang
		CA.wiki_translations = p.i18n[CA.wiki_lang]
	end
	CA.user_wiki_lang = CA.str_vars("user_wiki_lang", CA.user_lang, CA.wiki_lang)
	return -- t .. "<br>"
end -- function p.init_wiki_lang(wiki_lang)

function CA.init_user_lang(user_lang)
--	t = "\n* init_user_lang : asked user_lang = " .. tostring(user_lang)
	-- user_lang ok if i18n ok, else wiki language
	if type(user_lang) ~= "string" then user_lang = nil end
	if not p.i18n[user_lang] then user_lang = nil end
	user_lang = user_lang or CA.wiki_lang or tostring(mw.language.getContentLanguage().code)
	if user_lang then
		-- Activate the user language for errors and messages.
		-- Activer la langue de l'utilisateur pour les erreurs et messages l'affichage des catégories.
		CA.user_lang = user_lang
		CA.user_translations = p.i18n[CA.user_lang]
	else
		-- Error if the language is not a wikipedia language
		-- Erreur si la langue n'est pas une des langues de wikipedia
		CA.err_add("err_lang_not_exist", " ", user_lang)
--		t = t .. CA.err_add("err_lang_not_exist", " ", user_lang)
--		t = t .. p.cat_add("err_module_with_error")
	end
	-- DEBUG wait for : T68051 Get the user language to help admins to maintain a module or a template (userInfo: String user and password)
	local mwtitle = mw.title.getCurrentTitle()
--	local url = tostring(mwtitle:canonicalUrl( ))
	local mwuri = mw.uri.canonicalUrl(mwtitle.prefixedText, { host, authority, user, password, } )
--	CA.trac_lang_t = CA.trac_lang_t .. CA.ta("host", tostring(mwuri.host)) .. CA.ta("authority", tostring(mwuri.authority))
--	.. CA.ta("user", tostring(mwuri.user)) .. CA.ta("language", tostring(mwuri.language))
	CA.user_wiki_lang = CA.str_vars("user_wiki_lang", CA.user_lang, CA.wiki_lang)
	return -- t .. "<br>"
end -- function p.init_user_lang(user_lang)

function p.init_spaces()
--	local frame = mw.getCurrentFrame()
--	local title = mw.title.getCurrentTitle()
--	p.current_space = frame:preprocess("{{ns:0}}") -- Module namespace from system
--	p.current_space = title.nsText -- Module namespace from system
	p.current_space = mw.site.namespaces.name -- present namespace from system
--	p.module_space = frame:preprocess("{{ns:Module}}") -- Module namespace from system
	p.module_space = tostring(mw.site.namespaces.Module.name)
--	p.template_space = frame:preprocess("{{ns:Template}}") -- Template namespace from system
	p.template_space = tostring(mw.site.namespaces.Template.name)
--	p.author_space = frame:preprocess("{{ns:Author}}") -- Category namespace from system
--	p.author_space = tostring(mw.site.namespaces.Author.name)
--	p.category_space = frame:preprocess("{{ns:Category}}") -- Category namespace from system
	p.category_space = tostring(mw.site.namespaces.Category.name)
end -- function p.init_spaces(frame)

------------------------------------------------------------
-- Manage errors and messages. Administrar errores y mensages. Gérer les erreurs et messages.
------------------------------------------------------------

CA.errors_list = {} -- Table to collect errors and messages
CA.erron = true -- Activated or not errors. Errores activado o no. Erreurs activées ou non.

-- Add a message, error or category to le lists.
function CA.error_add(typ, ref, v1, v2, v3, v4, v5)
	--	CA.err_add("err_value_re_defined", k, key, xyz)
	if not p.erron then return "" end
	local msg = { ["typ"] = typ, ["ref"] = ref, ["v1"] = v1, ["v2"] = v2, ["v3"] = v3, ["v4"] = v4, ["v5"] = v5 }
	local str = CA.str_vars(msg.ref, msg.v1, msg.v2, msg.v3, msg.v4, msg.v5)
	local do_it = true
	for k, reg in ipairs(p.errors_list) do -- If the new error was previously registered, do not add it.
		local reg_txt = CA.str_vars(reg.ref, reg.v1, reg.v2, reg.v3, reg.v4, reg.v5)
		if str == reg_txt then do_it = false end
	end
	if do_it then table.insert(p.errors_list, msg) end
	local res = ""
	if msg.typ == "msg" then
		res = '<br>⦁ ' .. p.message_color(str)
	end
	if msg.typ == "err" then
		res = '<br>⦁ ' .. p.error_color(str)
	end
	return res
end -- function CA.error_add(typ, ref, v1, v2, v3, v4, v5)

function CA.err_add(ref, v1, v2, v3, v4, v5)
	return CA.error_add("err", ref, v1, v2, v3, v4, v5)
end

function CA.msg_add(ref, v1, v2, v3, v4, v5)
	return CA.error_add("msg", ref, v1, v2, v3, v4, v5)
end

function p.errors_lister(title, v1, v2, v3)
	local res, msgref = "", ""
--	res = res .. p.testable_lister(p.errors_list, "p.errors_list")
	local mwtitle = mw.title.getCurrentTitle()
	local page = tostring(mwtitle.nsText) .. ":" .. tostring(mwtitle.text)
	if type(title) ~= "string" then title = "err_error_list_header" end
	res = res .. '\n*' .. CA.str_vars(title, page, v1, v2, v3) -- .. ' - ' .. page
	local n = 0
	for k, msg in ipairs(p.errors_list) do
		msgref = CA.str_vars(msg.ref, msg.v1, msg.v2, msg.v3, msg.v4, msg.v5) -- texte traduit ou direct
		if msg.typ == "msg" then
			res = res .. '<br>⦁ ' .. p.message_color(msgref)
		end
	end
	for k, msg in ipairs(p.errors_list) do
		msgref = CA.str_vars(msg.ref, msg.v1, msg.v2, msg.v3, msg.v4, msg.v5) -- texte traduit ou direct
		if msg.typ == "err" then
			res = res .. '<br>⦁ ' .. p.error_color(msgref)
			n = n + 1
		end
	end
	if n > 0 then
		p.cat_add("err_module_with_error")
	end
	return res
end -- function p.errors_lister(title, v1, v2, v3)

------------------------------------------------------------
-- Manage categories. Administrar categorías. Gérer les catégories.
------------------------------------------------------------

function p.catGen(ref, v1, v2, v3, v4, v5)
	-- add a category to the categories_list
	table.insert(p.categories_list, { ["typ"] = "cat", ["ref"] = ref, ["v1"] = v1, ["v2"] = v2, ["v3"] = v3, ["v4"] = v4, ["v5"] = v5 })
end

-- Record in categories_list and genrate the wikitext of a category
function p.cat_add(ref, v1, v2, v3, v4, v5)
	-- add a category to the categories_list
	local cat = { ["typ"] = "cat", ["ref"] = ref, ["v1"] = v1, ["v2"] = v2, ["v3"] = v3, ["v4"] = v4, ["v5"] = v5 }
	local str = CA.str_vars(cat.ref, cat.v1, cat.v2, cat.v3, cat.v4, cat.v5)
	local do_it = true
	for k, reg in ipairs(p.categories_list) do -- If the new category was previously registered, do not add it.
		local reg_txt = CA.str_vars(reg.ref, reg.v1, reg.v2, reg.v3, reg.v4, reg.v5)
		if str == reg_txt then do_it = false end
	end
	if do_it then table.insert(p.categories_list, cat) end
	--
	local c = CA.catView or ""
--	if CA.catView == true then c = ":" else c = "" end
	local wiki_catspace = CA.wiki_translations.category or mw.site.namespaces.Category.name
	local user_catspace = CA.user_translations.category or mw.site.namespaces.Category.name
	local user_cat = p.string_vars(CA.user_translations, cat.ref, cat.v1, cat.v2, cat.v3, cat.v4, cat.v5)
	local wiki_cat = p.string_vars(CA.wiki_translations, cat.ref, cat.v1, cat.v2, cat.v3, cat.v4, cat.v5)
	--
	user_cat = (user_cat or "")
	local user_verif = string.match( user_cat, "([%w_])") -- verif content with all alphanumeric characters.
	if not user_verif then user_verif = ":" .. user_cat .. ":" end
--	user_cat = user_verif or ("<" .. user_cat .. ">")
	--
	user_catspace = "" -- without "Category" word
	local res = " [[" .. c .. wiki_catspace .. ":" .. wiki_cat ..  "|" .. user_catspace .. " " .. user_cat .. "]] "
	return res
end -- function p.cat_add(ref, v1, v2, v3, v4, v5)

-- Generate categories from plural values in only one argument
function p.catGroup(groupCat, groupList) -- generate some categories
	-- catGroup("Country %1", "France,Italie") -> [[Category:Country France]] [[Category:Country Italie]]
	if type(groupCat) ~= "string" then groupCat = "%1" end
	if type(groupList) ~= "string" then return "" end
	local cats = ""
	local t = ""
	t = t .. CA.ta("groupList", groupList)
	local splitxt = mw.text.split(groupList, ",", true)
--	t = t .. " splitxt = " .. table.concat(splitxt, "+")
	for str in mw.text.gsplit(groupList, ",", true) do
	--	t = t .. " , s=" .. p.cat_add(groupCat, str)
		cats = cats .. p.cat_add(groupCat, str)
	end
	return cats, t
end -- function p.catGroup(groupCat, groupList)

function CA.options_to_catView() -- Init or restaure CA.catView from options
	if CA.option(":") or CA.option("catview") then CA.catView = ":" else CA.catView = "" end
	return CA.catView
end -- function CA.options_to_catView()

-- generate the wikitext of the list of categories to only display them
function p.categories_lister(c)
	local res = "" -- "\n* Catégories : "
	local wiki_cat = ""
	local user_cat = ""
	CA.options_to_catView()
	-- c can replace catView to enforce the documentation or the categorisation
	-- c peut remplacer catView pour forcer la documentation ou la catégorisation
	c = c or CA.catView or ""
--	local wiki_catspace = mw.site.namespaces.Category.name
	local user_catspace = CA.user_translations.category
	local wiki_catspace = CA.wiki_translations.category
	for k, cat in ipairs(p.categories_list) do
		user_cat = p.string_vars(CA.user_translations, cat.ref, cat.v1, cat.v2, cat.v3, cat.v4, cat.v5)
		wiki_cat = p.string_vars(CA.wiki_translations, cat.ref, cat.v1, cat.v2, cat.v3, cat.v4, cat.v5)
		user_catspace = "" -- without "Category" word

		user_cat = (user_cat or "") -- prize
		if user_cat == " " then user_cat = "" end
		if user_cat == "  " then user_cat = "" end
		if user_cat == "	" then user_cat = "" end
	--	local user_verif = string.match( user_cat, "([%w_])") -- verif content with all alphanumeric characters.
	--	user_verif = mw.ustring.gsub( user_cat, "(%s)", "") -- verif content with all alphanumeric characters.
		local user_verif = mw.ustring.gsub( user_cat, "%s", "") -- verif content with all alphanumeric characters.
		if not user_verif then user_verif = "1" .. user_cat .. "2" end
	--	user_cat = user_verif or ("<" .. user_cat .. ">")

		res = res .. " [[" .. c .. wiki_catspace .. ":" .. wiki_cat ..	"|" .. user_catspace .. user_cat .. "]] "
	end
	-- Category namespaces = 14 Category
	-- https://en.wikipedia.org/wiki/IETF_language_tag
	-- https://en.wikipedia.org/wiki/List_of_ISO_639-1_codes
	return res
end -- function p.categories_lister(c)

-- Initialize the categories list. Initialise la liste des categories.
function p.categories_init(catName, catText) -- initialize the category list
	local frame = mw.getCurrentFrame()
	-- p.category_space = frame:preprocess("{{ns:Category}}") -- Category namespace from system, translated
	-- "Category" namespace translated to local language :
	p.category_space = tostring(mw.site.namespaces.Category.name)
	p.categories_list = {} -- init the collect of categories
	return
end

------------------------------------------------------------
-- Manage options. Administrar opciones. Gérer les options.
------------------------------------------------------------

--	Options de maitrise du fonctionnement de ce module

p.invoke_options = "" -- Options normales venant du modèle. Aucune par defaut. Normal options from the template.
	--	In the template : options = "params docview docmin docmax docdef docnotice docafter docline docsrc"

p.mode_options = "" -- Options de debug du module par edit. Aucune par defaut.
	-- p.mode_options = "unitest debug noerr erron params docview nobox nocat docin docmax docnotice docdef docline docsrc notices "
	-- p.mode_options change only by editing this module code or the calling module. Empty default value.
	-- p.mode_options change n'est modifié que par ce module ou celui qui l'appele. Valeur par defaut vide.

p.used_options = {} -- table to collect tested options then list them at end of tests

function CA.option(key, opt)
	-- if option("nocat") then cat = "" end -- utilisation exemple simple
	-- Si le mot key est parmi les mots options, repondre true
	-- Chercher dans invoke_options, mode_options ou opt, voir ci-dessous
	-- p.options = " : docdata docmin docdef docmax docline docview docsrc docafter docnotice " -- for documentation
	-- p.options = " erron noerr nobox nocat " -- without normal result
	-- p.options = " debug tests en es fr " -- for debug or enforce language
	-- Veiller à toujours séparer les mots par des espaces
	-- Les identifiants de langues permettent de forcer certaines langues.
	-- Les erreurs n'apparaissent que dans les espaces de noms Modèle ou Module, en attendant la réalisation du Bug 51660.
	if type(key) ~= "string" then key = false end
	if type(opt) ~= "string" then opt = false end
	local available_options = " " .. (p.invoke_options or "") .. " "
	if opt -- opt param can replace p.mode_options
		then available_options = " " .. opt .. " " .. available_options .. " "
		else available_options = " " .. p.mode_options .. " " .. available_options .. " "
	end -- options du modèle et de debug sinon
	-- Chercher le mot clef exact, non inclus dans un autre.
	-- Search the exact key, not included in another.
	local key2 = " " .. (key or "				  ") .. " "
	-- Le mot cle est-il parmi les options definies ?
	-- The searched keyword is it among the options words?
	local n = string.find(available_options, key2)
	local ifyes = n and (n > 0)
	if not ifyes then ifyes = false else ifyes = true end
	-- collect options tested along the execution of the module
	if ifyes then p.used_options[key] = "a" else p.used_options[key] = "x" end
	return ifyes, available_options -- ( yes ~= nil )
end -- function p.option(key, opt)

function p.init_options(opt)
	-- p.invoke_options = init_options(args.options)
	-- p.invoke_options = init_options("fr params docview docmin docmax docdef docnotice docafter docline docsrc")
	--
	if (type(opt) == "string") then p.invoke_options = opt end --  and (new ~= "")
	--
	-- Early effects on options which modify other ones.
	-- Effets précosses pour des options qui agissent sur d'autres options.
	-- p.options = " : docdata docmin docdef docmax docline docview docafter docnotice docsrc" -- for documentation
	-- p.options = " erron noerr nobox nocat " -- without normal result
	-- p.options = " debug tests en es fr " -- for debug or enforce language
	CA.options_to_catView()
	if p.option("noerr") then CA.erron = false end
	if p.option("erron") then CA.erron = true end
	if p.option("docolor") then CA.docolor = true end
	-- If an option is a language, enable this language for the user.
	-- Si una opción es un lenguaje, activar esta lengua para usuario.
	-- Si une option est une langue, activer cette langue pour l'utilisateur.
	local _lang
	for lang, tab in pairs(p.i18n) do
		if p.option(lang) then
	--		CA.init_user_lang(lang, CA.wiki_lang) -- CA.user_lang, CA.wiki_lang
	--		_lang = lang
		end
	end
--	if _lang then p.option(_lang) end
--	CA.init_user_lang(nil) -- , CA.args_final.wikilang)
	return opt
end -- function p.init_options(opt)

function p.used_options_list(t, used_options)
	local t = "List of modes:" or t
	for md, opt in pairs(CA.options_for_modes) do t = t .. "<br>- " .. CA.ta(md, opt) end
	-- List of used options after collect them
	used_options = used_options or CA.used_options
	t = t or ""
	t = t .. "\n* " .. CA.user_wiki_lang
	t = t .. "\n* Actual mode used: <b>" .. CA.mode_name .. "</b>"
	t = t .. "\n* Options read the last time in these tests, ones <b>activated</b> are in bold: "
	t = t .. "\n* Options lues pour la dernière fois pendant ces tests, celles <b>activées</b> sont en gras : "
	t = t .. "<br>"
	local opt = ""
	for key, x in pairs(p.used_options) do
		if x == "a" then opt = opt .. ", <b>" .. tostring(key) .. "</b> "
		else opt = opt .. ", " .. tostring(key) .. " " end
	end
	t = t .. opt
--	t = t .. "<br>* " .. CA.get_editstate()
--	t = t .. "\n* import_arguments_track : " .. CA.import_arguments_track
	return t, opt
end -- function p.used_options_list(t, used_options)

function p.options_from_args_test(t)
	local mode_options_memo = p.mode_options -- save
	local invoke_options_memo = p.invoke_options -- save
	local used_options_memo = mw.clone(p.used_options) -- save
	p.used_options = {}
	local t = "options_from_args_test:" or t
	t = t .. CA.Th() .. CA.Tc("mode_options") .. CA.Tc("invoke_options") .. CA.Tc("opt can replace mode_options") .. CA.Tc("available options") .. CA.Tc("option result")
	local function options_from_args(mode_options, invoke_options, opt, key)
		p.mode_options = mode_options
		p.invoke_options = invoke_options
		local ifyes, available_options = p.option(key, opt)
		return CA.Tr() .. CA.Td(mode_options or "") .. CA.Td(invoke_options or "") .. CA.Td(opt or "")
		.. CA.Td( tostring(available_options) ) .. CA.Td(CA.ta(key, ifyes) )
	end
	t = t .. options_from_args("nobox nocat", "en docview", nil,			"nobox")
	t = t .. options_from_args("nobox nocat", "en docview", nil,			"nocat")
	t = t .. options_from_args("nobox nocat", "en docview", nil,			"en")
	t = t .. options_from_args("nobox nocat", "en docview", nil,			"docview")
	t = t .. options_from_args("nobox nocat", ": docview",	nil,			":")
	t = t .. options_from_args("nobox nocat", "en docview", "docline fr",	"docline")
	t = t .. options_from_args("nobox nocat", "en docview", "docline fr",	"docline")
	t = t .. options_from_args("		   ", nil,			"docline fr",	"docline")
	t = t .. options_from_args("		   ", nil,			"docline fr",	"fr")
	t = t .. options_from_args("		   ", "en docview", "docline fr",	"en")
	t = t .. options_from_args("nobox nocat", nil,			"docline fr",	"docline")
	t = t .. options_from_args("nobox nocat", "en docview", "docline fr",	nil)
	t = t .. options_from_args("nobox nocat", "en docview", nil,			"docline")
	t = t .. CA.Te()
	t = t .. p.used_options_list(nil, CA.used_options)
	t = t .. "\n* After these tests, anterior options are restored. Après ces tests, les options antérieures sont restaurés."
	p.mode_options = mode_options_memo -- restore
	p.invoke_options = invoke_options_memo -- restore
	p.used_options = used_options_memo -- restore
	return t
end -- function p.options_from_args_test(t)

function p.wordstotable(txt, opt) -- convertit un texte en table de mots
	local t = ""
	local tab = {}
	local function inserer(ti)
		if ti ~= "" then table.insert(tab, ti.."") end
	end
	local xyz = string.gsub( txt, "(%S*%-*%S*)", inserer ) -- "(%w*%-*%'*%w*)", "(%S*%-*%S*)"
	for key, val in pairs(tab) do -- Pour tous les mots
		t = t .. " ( " .. tostring(key) .. " = " .. tostring(val) .. " ) "
	end
	t = "\n* wordstotable txt = " .. tostring(xyz) .. " " .. t
	return tab, t, opt
end -- function p.wordstotable(txt, opt)

------------------------------------------------------------
-- Argts : Manage arguments. Gestione argumentos. Gérer les arguments.
------------------------------------------------------------

-- Compute the Levenshtein distance between 2 ASCII words.
function CA.levenshtein(word1, word2)
	-- prevent exceptions
	local cout = 0
	if (word1 == nil) or (word2 == nil) then
		return 999, "<br>lev: " .. CA.ta("word1", word1) .. CA.ta("word2", word2)
	end
	local len1 = string.len(word1)
	local len2 = string.len(word2)
	local lev = 0
	local t = "<br>lev: " .. CA.ta("word1", word1) .. CA.ta("word2", word2)
	if (type(word1) ~= "string") or (type(word2) ~= "string") or (word1 == "") or (word2 == "") then
		lev = len1 + len2
		return lev, t .. CA.ta("lev", lev)
	end
	-- simple case
	if (word1 == word2) then
		lev = 0
		return lev, t .. CA.ta("lev", lev)
	end
	local d = {}
	for i = 1, len1+2 do -- for i = 1, len1-1+1 do
		d[i] = {}
		--	d[i][1] = 0 -- d[i][1] = i
		for j = 1, len2+2 do
			--	d[i][j] = {}
			d[i][j] = 0 -- d[1][j] = j
		end
	end
	-- simulate double dimensions tables
	for i = 2, len1+1 do -- for i = 1, len1-1+1 do
		--	d[i] = {}
		d[i][1] = i-1 -- d[i][1] = i
	end
	for j = 2, len2+1 do
		d[1][j] = j-1 -- d[1][j] = j
	end
	for i = 2, len1+1 do -- for i = 2, len1+1 do
		for j = 2, len2+1 do -- for j = 2, len2+1 do
			-- on récupère les deux caractères
			local c1 = string.byte(word1, i-1)
			local c2 = string.byte(word2, j-1)
			if (c1 == c2) then
				cout = 0
				d[i][j] = d[i-1][j-1]
			else
				cout = 1
				d[i][j] = math.min(d[i-1][j], d[i][j-1], d[i-1][j-1]) + 1
			end
			--	d[i][j] = math.min(d[i-1][j]+1, d[i][j-1]+1, d[i-1][j-1]+cout)
		end
	end
	local lev = d[len1+1][len2+1] -- return d[len1-1][len2] - 1
	return lev, t .. CA.ta("lev", lev)
end -- function CA.levenshtein(word1, word2)

function p.levenshtein_test_1(search, word, max)
	-- search = mot cherché dans la liste
	-- word = un des mot de la liste
	-- p.max_nearest_argument = 3 -- Limite de differences des arguments proposables à l'utilisateur
--	if not max then max = p.max_nearest_argument end
--	if not max then max = 3 end
	local diffmaxi = p.similar_args_diffmaxi( string.len(search) )
	local len1, len2, lev, tlev, t, diff
--	t = t .. "<br>- diff: " .. p.ta("mot1", mot1) .. p.ta("mot2", mot2) .. p.ta("diff", diff)
	t = "<br>levenshtein : "
	if (not search ) or (not word) then
		diff = 99
		t = t .. p.ta("diff", diff) .. " no word. "
	elseif search == word then
		diff = 0
		t = t .. p.ta("diff", diff) .. " , " .. search .. " = " .. word .. " "
	else
	--	len1 = string.len(search)
	--	len2 = string.len(word)
		lev, tlev = p.levenshtein(search, word)
		if (lev <= diffmaxi) then
			t = t .. p.ta("diffmaxi", diffmaxi) .. " >= " .. p.ta("lev", lev) .. " '''" .. search .. " ==> " .. word .. "''' "
		else
			t = t .. p.ta("diffmaxi", diffmaxi) .. " >= " .. p.ta("lev", lev) .. " " .. search .. " / " .. word .. " "
		end
		diff = lev
	end
	return diff, t, search, word
end -- function p.levenshtein_test_1(search, word, max)

function p.levenshtein_test(res, c)
	if type(res) ~= "string" then res = nil end
	local res = res or ("\n* " .. CA.str_vars("max_nearest_argument_msg") )
	local errors = ""
	local n, t = p.levenshtein_test_1( "nom", "nom")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "nom", "Nom")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "top", "pot")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "ami", "amis")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "nom", "name")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "m", "mu")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "m", "mur")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "mur", "m")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "c", "C")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "c", "cf")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "c", "long")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "xxx", "")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "", "xyz")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "xxx", "xyz")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "prénom", "Prenom")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "catégorie", "Category")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "description", "Description")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "anneeDeces", "anneeNaissance")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "anoNacimiento", "anneeNaissance")
	res = res .. tostring(t)
	local n, t = p.levenshtein_test_1( "avant-après", "après-avant")
	res = res .. tostring(t)
	if errors ~= "" then res = res .. "\n* '''levenshtein_test''' errors = " .. p.error_color(errors) end
	return res
end -- function p.levenshtein_test( res, c)

-- Maximum number of different letters between 2 argument names
-- Número máximo de letras diferentes entre 2 nombres de argumento
-- Nombre maximum de lettres différentes entre deux noms d'arguments
function p.similar_args_diffmaxi(length, t) -- diffmaxi from length of arg arglingual name
	local coef = CA.constants.near_word_search_diff_coef or 0.30
	local constant = CA.constants.near_word_search_diff_const or 0.32
	local diffmaxi = math.floor( coef * length + constant )
	if t then t = t .. tostring(coef) .. " * length + " .. tostring(constant) end
	return diffmaxi, t
end -- function p.similar_args_diffmaxi(length, t)

-- Pour un argument inconnu, cherche le nom d'argument le plus proche, parmi les arguments connus traduits
function p.similar_args_list(args_known)
	local list, arglingual = {}, "xxx"
	if type(args_known) ~= "table" then args_known = CA.args_known end
	if type(args_known) ~= "table" then return "similar_args_list", 1 end
	-- faire la liste des arguments possibles, c'est a dire connus
	for key, argm in pairs(args_known) do
		if not tonumber(key) then -- Pour les arguments nommés seulement
			key = tostring(key)
			arglingual = tostring(CA.wiki_translations[key])
			list[key] = arglingual
		end
	end
	return list
end -- function p.similar_args_list(args_known)

-- For an unknown argument, seeking the name of the nearest argument among the known arguments
-- Para un argumento desconocido, buscando el nombre del argumento más cercana entre los argumentos conocidos
-- Pour un argument inconnu, cherche le nom d'argument le plus proche, parmi les arguments connus
function p.similar_args_search(search, list)
	local dist, lengths, tlev = 9, 0
	local trouve1, trouve2, trouve3 = nil, nil, nil
	local min1, min2, min3 = 99, 99, 99
	local diffmaxi = p.similar_args_diffmaxi( string.len(search) )
	local t = ", " .. tostring(diffmaxi) .. " / " .. tostring(length) .. " "
	for key, arglingual in pairs(list) do
		-- Search the most similar and same length. Buscar las más similares y la misma longitud. Chercher le plus ressemblant et la même longueur.
	--	dist = p.levenshtein_test_1(tostring(cherche), tostring(mot)) -- obsolete
		dist, tlev = p.levenshtein(search, arglingual)
	--	if type(dist) ~= "number" then dist = 9 end
		if (dist <= min1) then
			trouve3 = trouve2
			min3 = min2
			trouve2 = trouve1
			min2 = min1
			min1 = dist
			trouve1 = tostring(arglingual)
		end
	end
	t = t .. "<br>" .. p.ta("cherche", cherche) .. p.ta("trouve1", trouve1) .. p.ta("min1", min1) .. p.ta("trouve2", trouve2) .. p.ta("min2", min2) .. " " .. t
	if trouve1 and min1 == 0 then t = t .. CA.wikidata_color(p.ta("connu", trouve1)) end
	if trouve1 and min1 <= diffmaxi then t = t .. CA.wikidata_color(p.ta("min1 "..min1.."<="..diffmaxi, trouve1)) end
	if trouve2 and min2 <= diffmaxi then t = t .. CA.wikidata_color(p.ta("min2 "..min2.."<="..diffmaxi, trouve2)) end
	if trouve3 and min3 <= diffmaxi then t = t .. CA.wikidata_color(p.ta("min3 "..min3.."<="..diffmaxi, trouve3)) end
	return trouve1, min1, trouve2, min2, t
end -- function p.similar_args_search(search, list)

--	t = p.similar_args_test1( t, "nomm", "digit")
function p.similar_args_test1( t, search, liste)
	local args_list = p.similar_args_list(CA.args_known)
	local trouve1, min1, trouve2, min2 = p.similar_args_search(search, args_list)
--	local trouve1, min1, trouve2, min2 = "aaa", 1, "bbb", 22
	t = t .. "\n* similar_args_test1 : " .. CA.ta("search", search) .. CA.ta("trouve1", trouve1) .. CA.ta("min1", min1) .. CA.tam("trouve2", trouve2) .. CA.tam("min2", min2)
	return t or " similar_args_test1 "
end -- function p.similar_args_test1( t, search, liste)

function p.similar_args_test( t, args_known)
	if type(args_known) ~= "table" then args_known = CA.args_known end
	local err = CA.verify_args_tables(args_known, CA.args_source)
	if err then return err end
	--
	local key, argsyn, arglingual, txt
--	local coef = CA.constants.near_word_search_diff_coef
--	local constant = CA.constants.near_word_search_diff_const
	t = "\n* " .. (t or "Formula to compute the near words limit: Formule de calcul de limite des mots proches : ")
	local diffmaxi
	diffmaxi, t = p.similar_args_diffmaxi(10, t .. "diffmaxi = ")
	t = t ..  "\n* List of diffmaxi / lengths : "
	for length = 1, 16 do -- For all lengths
	--	local diffmaxi = math.floor( coef * length + constant )
		diffmaxi = p.similar_args_diffmaxi(length)
		t = t .. ", " .. tostring(diffmaxi) .. " / " .. tostring(length) .. " "
	end
	t = t .. "\n* List of known arguments and '''synonyms''' : "
	local txt, lingual = "", ""
	local ref_words = {}
	for key_known, argm in pairs(args_known) do -- Pour tous les paramètres connus
		if argm.syn == 1 then
			key = argm.keyword
			argsyn = key_known .. ">" -- synonym argument
		else
			key = key_known
			argsyn = "" -- synonym argument
		end
	--	CA.user_translations = p.i18n[lang] or CA.user_translations
	--	CA.wiki_translations = mw.language.getContentLanguage().code
		lingual = CA.wiki_translations[key] or "-" -- importer un argument source
		txt = argsyn .. key .. "/" .. lingual
		if argm.syn == 1 then
			t = t .. ", '''" .. txt .. "''' " -- '''synonyms'''
		else
			t = t .. ", " .. txt .. " "
		end
		ref_words[key] = {}
		ref_words[key].argmt = key
		ref_words[key].lingual = lingual
	end
	t = t .. "\n* Test similar arguments 1."
	t = p.similar_args_test1( t, "anneedece", {["a"]="but", ["b"]="porter", ["c"]="anneedeces"})
	t = t .. "\n* Test similar arguments 2."
	t = p.similar_args_test1( t, "porte", {["a"]="but", ["b"]="porter", ["c"]="pot"})
	return t
end -- function p.similar_args_test( t, args_known)

-- Check if the value of an argument is among the possible values.
-- Vérifier si la valeur d'un argument est parmi les valeurs possibles.
function CA.multiple_values(argmt, argvalue, args_final, args_known)
	local args_final = args_final or CA.args_final
	local args_known = args_known or CA.args_known
	local argvalue = argvalue or args_final[argmt]
	local arg_values, key_values, keyword, keyval, argval, rank
	local argm = args_known[argmt]
	if argm then
		arg_values = CA.wiki_translations[argm.arg_values]	or "" -- example "no,nada,cn,50,us,70,mpf" in local language
		key_values = argm.key_values						or "" -- example "no,none,cn,50,us,70,mpf" in referal english
	end
	if type(arg_values) == "string" and type(key_values) == "string" then
		local arg_tab = mw.text.split(arg_values, ',') -- table of arg
		local key_tab = mw.text.split(key_values, ',') -- table of key
		-- Default values
		keyword = nil
		rank = 0 -- rank of local value and key value
		keyval = nil -- key value
		argval = nil
		if argm and arg_values and argvalue then
			for i, key in ipairs(arg_tab) do
				if key == argvalue then -- Search argvalue in arg_tab
					rank = i
					keyval = key_tab[i] -- Return correponding keyval in key_tab
					argval = argvalue
					keyword = argm.keyword
				end
			end
		end
	end
	return keyword, keyval, argval, rank
end -- function CA.multiple_values(argmt, argvalue, args_final, args_known)

function CA.multiple_values_tests(t)
	t = t or "\n* Test '''multiple_values''' :"
	t = t .. CA.Th() .. CA.Tc("argm") .. CA.Tc("argvalue") .. CA.Tc("args_final") .. CA.Tc("keyword") .. CA.Tc("keyval") .. CA.Tc("argval") .. CA.Tc("rank")
	local function multiple_values_tests1(t, argm, argvalue, args_final)
		local keyword, keyval, argval, rank = CA.multiple_values(argm, argvalue, args_final)
		t = (t or "") .. CA.Tr() .. CA.Td(argm) .. CA.Td(argvalue) .. CA.Td(args_final) .. CA.Td(keyword) .. CA.Td(keyval) .. CA.Td(argval) .. CA.Td(rank)
		return t
	end -- function multiple_values_tests1(t, argm, argval)
	t = multiple_values_tests1(t, "region", "inde")
	t = multiple_values_tests1(t, "region", "inconnue")
	t = multiple_values_tests1(t, "rights", "mpf")
	t = multiple_values_tests1(t, "rights", "non")
	t = multiple_values_tests1(t, "rights", "aucun")
	t = multiple_values_tests1(t, "sex", "femme")
	t = multiple_values_tests1(t, "sex", "homme")
	t = multiple_values_tests1(t, "sex", "enfant")
	args_final = { region = "india", rights = "non", sex = "femme", }
	t = (t or "") .. CA.Tr() .. CA.Tc() .. CA.Tc() .. CA.Tc('args_final = {') .. CA.Tc('region = "india"') .. CA.Tc('rights = "non"') .. CA.Tc('sex = "femme"') .. CA.Tc('}')
	t = t .. CA.Tr() .. CA.Tc("argm") .. CA.Tc("argvalue") .. CA.Tc("args_final") .. CA.Tc("keyword") .. CA.Tc("keyval") .. CA.Tc("argval") .. CA.Tc("rank")
	t = multiple_values_tests1(t, "region", "inde", args_final)
	t = multiple_values_tests1(t, "region", nil, args_final)
	t = multiple_values_tests1(t, "rights", "mpf", args_final)
	t = multiple_values_tests1(t, "rights", "non", args_final)
	t = multiple_values_tests1(t, "rights", nil, args_final)
	t = multiple_values_tests1(t, "sex", nil, args_final)
	t = multiple_values_tests1(t, "sex", nil, args_final)
	t = multiple_values_tests1(t, "sex", "enfant", args_final)
	t = t .. CA.Te()
	return t
end -- function CA.multiple_values_tests(t)

function CA.multiple_selection(opt, selector, to_select)
	-- Select items to select containing selecting items
	local t, selected_txt, selector_txt, selector_tab, to_select_txt, to_select_tab, selected_tab = "", ""
	local cut = string.sub( opt, 1, 1 ) or ","
	if type(selector) == "table" then selector_tab = selector end
	if type(selector) == "string" then selector_tab = mw.text.split(selector, cut, true) end
	if type(to_select) == "table" then to_select_tab = clone(to_select) end
	if type(to_select) == "string" then to_select_tab = mw.text.split(to_select, cut, true) end
	selected_tab = {}
	--
	local k, Nsel, N, maxi, pos = 0, 0, 1, 999, nil
	local reject_select = false
	local equal = true
	for i, select in ipairs(selector_tab) do -- select authorities only following selectors
		if Nsel >= maxi then break end
		select = mw.text.trim(select)
		N = tonumber(select)
		if select == "+" then -- select all items
			for key, val in pairs(to_select_tab) do
				Nsel = Nsel + 1
				selected_tab[key] = val
			end
		elseif select == "-" then -- minus sign rejects all
			reject_select = true
		elseif N and N < 1 then -- minus sign rejects all
			reject_select = true
		elseif N and (string.sub(select, 1, 1) == "+") then -- select +N more items
			maxi = Nsel + N
		elseif N then -- select N maximum total items
			maxi = N
		else -- select ONE item from to_select_tab if it matches select ( not - or + or +N or N )
			for key, val in pairs(to_select_tab) do
				local select_t, val_t = select, val
				if not CA.is_in("U", opt) then select_t = string.lower(select_t) end -- recognize lowercase and uppercase
				if not CA.is_in("t", opt) then select_t = mw.text.trim(select_t) end -- recognize after trim
				if not CA.is_in("U", opt) then val_t = string.lower(val_t) end -- recognize lowercase and uppercase
				if not CA.is_in("t", opt) then val_t = mw.text.trim(val_t) end -- recognize after trim
				equal = CA.is_in("=", opt) -- recognize only equal string
				if equal then equal = (select == val) else equal = CA.is_in(select_t, val_t) end
			--	if CA.is_in(select, val) then
				if equal then -- recognize if select is equal or is inside an item from to_select_tab
					t = t .. CA.ta(select, val)
					selected_tab[select] = val
					Nsel = Nsel + 1
					to_select_tab[key] = " " -- Delete the selected item to use it only once
					selected_txt = selected_txt .. val .. ', '
				end
			end
		end
	end
--	selected_txt = table.concat(selected_tab)
	return selected_txt, selected_tab, t
end -- function CA.multiple_selection(opt, selector, to_select)

function CA.multiple_selection_test(t)
	t = (t or "") .. "\n* '''multiple_selection''' options: " .. CA.ta("=", "equal only") .. CA.ta("t", "not trim before and after") .. CA.ta("U", "not lowercase and uppercase")
	local function multiple_selection_test1(t, opt, selector, to_select)
		local selected_txt, selected_tab, txt = CA.multiple_selection(opt, selector, to_select)
		t = t .. CA.Tr() .. CA.Td(opt) .. CA.Td(selector) .. CA.Td(to_select) .. CA.Td( txt .. CA.ta("selected_txt", selected_txt) )
		return t, opt, selector, to_select -- , selected_txt, selected_tab
	end
	local opt = ", "
	t = t .. "\n: selector = <b>nobel,+1,président,3,député,prix</b> signifie : sélectionner le premier, puis 1 de plus parmi les suivants, puis 3 en tout au maximum."
	local head = mw.text.split( CA.str_vars("multiple_selection_test_header") , ',')
	t = t .. CA.Th() .. CA.Tc(head[1]) .. CA.Tc(head[2]) .. CA.Tc(head[3]) .. CA.Tc(head[4])
	-- Todo ? P39 = fonction = "président de Pologne, député à l'Assemblée, Prix Nehru, Nobel de la paix"
	-- multiple_selection_test_select	= "2, nobel, president, deputy, price",
	t = multiple_selection_test1( t, opt, "2, nobel, président, député, prix", "président de Pologne,député à l'Assemblée, Prix Nehru, Nobel de la paix" )
	t = multiple_selection_test1( t, ",U", "2, nobel, président, député, prix", "président de Pologne,député à l'Assemblée, Prix Nehru, Nobel de la paix" )
	t = multiple_selection_test1( t, opt, "3, député, prix, nobel, président", "président de Pologne,député à l'Assemblée, Prix Nehru, Nobel de la paix" )
	t = multiple_selection_test1( t, ",=", "3,député, prix,nobel,président", "président de Pologne,député, Prix Nehru,Nobel" )
	t = multiple_selection_test1( t, ",t", "3,député, prix,nobel,président", "président de Pologne,député, Prix Nehru,Nobel" )
	t = multiple_selection_test1( t, ";", "3; prix; nobel;+1; président; député", "président de Pologne;député à l'Assemblée; Prix Nehru; Nobel de la paix" )
	t = multiple_selection_test1( t, ";", "3; président; nobel; député; prix", "président de Pologne;député à l'Assemblée; Prix Nehru; Nobel de la paix" )
	t = multiple_selection_test1( t, ";t", "3;député; prix;nobel;président", "président de Pologne;député; Prix Nehru;Nobel" )
	t = multiple_selection_test1( t, ";U", "2; nobel; président; député; prix", "président de Pologne;député à l'Assemblée; Prix Nehru; Nobel de la paix" )
	t = t .. CA.Te()
	return t
end -- function CA.multiple_selection_test(t)

------------------------------------------------------------
-- Datas wikidata from mw.wikibase
------------------------------------------------------------

function p.import_wikidata(args_known, id)
-- wikidata structure p.father = mw.wikibase.label( "Q" .. entity.claims.p107[0].mainsnak.datavalue.value["numeric-id"])
	if type(args_known) ~= "table" then args_known = CA.args_known end
	local t, adr, val, proplabel = "", nil, nil, nil
	local wd = {}
	local wd_mng = {} -- wikidata manager
	if type(id) == "string" then -- Le 2013-06-19 acces restreint par Lua pour un autre élément
		-- https://bugzilla.wikimedia.org/show_bug.cgi?id=49805
		-- T49930 Allow accessing data from a Wikidata item not connected to the current page - arbitrary access (tracking)
		-- Reported: 2013-06-19 10:52 UTC by Rical
		wd_mng.wd_id = id
	--	t = t .. CA.ta("wd_error", wd.wd_error)
	--	t = t .. "\n* " .. CA.ta("wd_id", wd_mng.wd_id)
	--	t = t .. " see [https://phabricator.wikimedia.org/T49930 bug T49930]" -- DEBUG
		wd_mng.t = t or ""
	--	wd_mng.wd_error = "wd_id"
--		wd_mng.wd_id = nil -- anti-bug 47930
--		p.args_wikidata = wd
--		return wd, t, wd_mng
	end
	wd_mng.wd_base = mw.wikibase
	if not wd_mng.wd_base then -- Wikidata disponible ?
		wd_mng.wd_error = "wd_base"
		t = t .. CA.ta("wd_error", wd_mng.wd_error)
		wd_mng.t = t
		p.args_wikidata = wd
		return wd, t, wd_mng
	end
	--
	local function getEntityObject_xpcall( wd_id ) -- wikidata arbitrary access must not fail and block the page.
	--	local entity = mw.wikibase.getEntityObject( wd_id )
	--	if type(wd_id) ~= "string" then wd_id = nil end
		local success, entity = pcall( mw.wikibase.getEntity, wd_id ) -- pcall or xpcall can run any function without blocking page.
		if success then return entity else return nil end
		-- T49930 Allow accessing data from a Wikidata item not connected to the current page - arbitrary access (tracking)
	end
--	wd_mng.wd_entity = getEntityObject_xpcall( wd_mng.wd_id )
	if getEntityObject_xpcall( wd_mng.wd_id ) then -- Page Wikidata disponible ?
		wd_mng.wd_entity = mw.wikibase.getEntity( wd_mng.wd_id ) -- ex getEntityObject
	end
	--
--	wd_mng.wd_entity = mw.wikibase.getEntityObject( ) -- anti-bug 47930
	if wd_mng.wd_entity then -- Page Wikidata disponible ?
		if wd_mng.wd_entity.claimRanks then
			wd_mng.wd_claimRanks = wd_mng.wd_entity.claimRanks
			wd_mng.wd_RANK_TRUTH = wd_mng.wd_entity.claimRanks.RANK_TRUTH
			wd_mng.wd_RANK_PREFERRED = wd_mng.wd_entity.claimRanks.RANK_PREFERRED
			wd_mng.wd_RANK_NORMAL = wd_mng.wd_entity.claimRanks.RANK_NORMAL
			wd_mng.wd_RANK_DEPRECATED = wd_mng.wd_entity.claimRanks.RANK_DEPRECATED
			-- https://www.mediawiki.org/wiki/Extension:WikibaseClient/Lua#mw.wikibase.entity.claimRanks
			-- Return the normal ranked claims with the property id P5
			-- entity:formatPropertyValues( 'P5', { mw.wikibase.entity.claimRanks.RANK_NORMAL } )
			-- Return all claims with id P123 (as the table passed contains all possible claim ranks)
			-- entity:formatPropertyValues( 'P123', mw.wikibase.entity.claimRanks )
			-- mw.wikibase.entity.claimRanks = RANK_TRUTH, RANK_PREFERRED, RANK_NORMAL, RANK_DEPRECATED
		end
		wd_mng.sitelink = wd_mng.wd_entity:getSitelink( )
		wd_mng.label = wd_mng.wd_entity:getLabel( ) -- Returns a string, like "Berlin" with 'de'
		wd_mng.props = wd_mng.wd_entity:getProperties() -- or {} Returns a table like: { "P123", "P1337" }
		wd_mng.props_maxn = tostring(table.maxn( wd_mng.props ) )
		wd_mng.props_txt = "T " .. mw.text.listToText( wd_mng.props )
		--
		wd_mng.props_list = " "
		for i, pp in ipairs(wd_mng.props) do -- Properties list
			wd_mng.formatPropertyValues = wd_mng.wd_entity:formatPropertyValues(  pp )
			if wd_mng.wd_claimRanks then
				wd_mng.formatPropertyValues_claimRanks = wd_mng.wd_entity:formatPropertyValues(	 pp, { wd_mng.wd_claimRanks } )
			end
			if wd_mng.wd_RANK_TRUTH then
				wd_mng.formatPropertyValues_RANK_TRUTH = wd_mng.wd_entity:formatPropertyValues(	 pp, { wd_mng.wd_RANK_TRUTH } )
			end
			if wd_mng.wd_RANK_PREFERRED then
				wd_mng.formatPropertyValues_RANK_PREFERRED = wd_mng.wd_entity:formatPropertyValues(	 pp, { wd_mng.wd_RANK_PREFERRED } )
			end
			if wd_mng.wd_RANK_TRUTH then
				wd_mng.formatPropertyValues_wd_RANK_NORMAL = wd_mng.wd_entity:formatPropertyValues(	 pp, { wd_mng.wd_RANK_NORMAL } )
			end
			if wd_mng.wd_RANK_TRUTH then
				wd_mng.formatPropertyValues_RANK_DEPRECATED = wd_mng.wd_entity:formatPropertyValues(  pp, { wd_mng.wd_RANK_DEPRECATED } )
			end
			val = wd_mng.formatPropertyValues.value
			proplabel = wd_mng.formatPropertyValues.label
			wd_mng.props_list = wd_mng.props_list .. " , " .. i .. "=" .. pp .. "=" .. CA.ta(proplabel, val)
			-- .. "/" .. CA.ta(proplabel, wd_mng.formatPropertyNORMAL)
			if pp == "P569" then CA.TimeName = pp .. ".1.mainsnak" ; CA.TimeTest = wd_mng.wd_entity.claims[pp][1].mainsnak end -- birthyear P569 for test DEBUG
			if pp == "P570" then CA.TimeName = pp .. ".1.mainsnak" ; CA.TimeTest = wd_mng.wd_entity.claims[pp][1].mainsnak end -- deathyear P570 for test DEBUG
		end
	else -- entity unknown for the page. entity introuvable pour la page.
		wd_mng.wd_error = "wd_entity"
		t = t .. CA.ta("wd_error", wd_mng.wd_error)
		wd_mng.t = t
		p.args_wikidata = wd
		return wd, t, wd_mng
	end
	if wd_mng.wd_error then -- Show an error, Signaler une erreur
		if wd_mng.wd_error == "wikidata_props" then err = CA.str_vars("err_wikidata_error", "wikidata_props") end
		if wd_mng.wd_error == "wd_base" then err = CA.str_vars("err_wikidata_wikibase") end
		if wd_mng.wd_error == "wd_entity" then err = CA.str_vars("err_wikidata_getEntity", wd_mng.wd_entity) end
		if wd_mng.wd_error == "wd_property" then err = CA.str_vars("err_wikidata_property", wd_mng.wd_property) end
		-- elem -> id
		if wd_mng.wd_error == "wd_id" then err = CA.str_vars("err_wikidata_getEntityObject", wd_mng.wd_id) end
		err = CA.err_add(err)
		t = t .. err
		local err_wikidata_cat = p.cat_add("err_wikidata_cat")
	else
		for key, pp in pairs(args_known) do -- Pour tous les paramètres connus
			if pp.prop then
				if pp.prop == "label" then val = wd_mng.label
				elseif pp.prop == "sitelink" then val = wd_mng.sitelink
				elseif pp.prop == "entityid" then val = wd_mng.wd_entity.id
				elseif pp.prop == "description" then val = wd_mng.wd_base.description( wd_mng.wd_id ) -- wikibase.description( id )
				elseif pp.prop == "claims" then val = wd_mng.wd_base.renderSnak( wd_mng.wd_entity['claims'] ) -- Returns the given Snaks formatted as wiki text.
			--	local entity = mw.wikibase.getEntityObject()
			--	local snaks = entity['claims']['P342'][1]['qualifiers']
			--	mw.wikibase.renderSnaks( snaks ) -- Returns the given Snaks formatted as wiki text.
				else
					wd_mng.formatPropertyValues = wd_mng.wd_entity:formatPropertyValues( pp.prop ) -- "P" .. pp.prop
					-- Returns a table like: { value = "Formatted claim value", label = "Label of the Property" }
					if wd_mng.wd_RANK_TRUTH then
						wd_mng.formatPropertyValues = wd_mng.wd_entity:formatPropertyValues(  pp, { wd_mng.wd_RANK_TRUTH } )
					end
					if wd_mng.wd_claimRanks then
						wd_mng.formatPropertyValues = wd_mng.wd_entity:formatPropertyValues(  pp, { wd_mng.wd_claimRanks } )
					end
					val = wd_mng.formatPropertyValues.value
					proplabel = wd_mng.formatPropertyValues.label
				end
				if pp.format == "year" then
					val = mw.ustring.sub( val, -4, -1 )
				end
				wd[key] = val
				t = t .. CA.ta(key, val) .. CA.ta(key, wd_mng.formatPropertyNORMAL)
			end
		end
	end
--	wd.lastname = wd.label
	wd_mng.t = t
	CA.args_wikidata = wd
	return wd, t, wd_mng
end -- function p.import_wikidata(args_known, id)

function CA.wikidata_details_test(t)
	local t = t or "\n* '''wikidata_details_test''' :"
	local wd, tw, wd_mng
	--	t = t .. CA.arbitrary_access_test()
	wd, tw, wd_mng = p.import_wikidata( p.args_known )
	if wd_mng and wd_mng.wd_entity and wd_mng.wd_entity.id then
		t = t .. "\n* Entity.id: " .. (wd_mng.wd_entity.id or "") -- entityid
		local structured_data_txt = CA.str_vars("structured_data_txt")
		t = t .. ' <span style="color:#232388; font-size:140%; line-height:120%; ">⦁&nbsp;&nbsp;</span>[[d:' .. wd_mng.wd_entity.id .. '|' .. structured_data_txt .. ']]<br>'
	end
	t = t .. "\n* Asked properties: " .. tw
	t = t .. "\n* Properties number maxn: " .. (wd_mng.props_maxn or "")
--	t = t .. "\n* Properties txt: " .. (wd_mng.props_txt or "")
	t = t .. "\n* Properties list: " .. (wd_mng.props_list or "")
	return t
end -- function CA.wikidata_details_test(t)

function CA.arbitrary_access_test(t)
-- T49930 Allow accessing data from a Wikidata item not connected to the current page - arbitrary access (tracking)
	t = t or ""
	local function one_arbitrary_access(id)
		local wd, tw, wd_mng = p.import_wikidata(CA.args_known, id) -- p.args_known, id) -- example Q535 = Victor Hugo = Victor Marie Hugo
		local args_import, tx = CA.import_arguments() -- p.args_known_default, CA.args_source )
		if wd_mng and wd_mng.wd_entity and wd_mng.wd_entity.id then
			t = "\n* " .. CA.str_vars("wikidata_arbitrary_access_text")
			.. (wd_mng.wd_id or "") .. ", " .. (wd_mng.title or "") .. " ( " .. (wd.birthyear or "") .. " - " .. (wd.deathyear or "") .. " ) "
			local structured_data_txt = CA.str_vars("structured_data_txt")
			t = t .. ' <span style="color:#232388; font-size:140%; line-height:120%; ">⦁&nbsp;&nbsp;</span>[[d:' .. wd_mng.wd_entity.id .. '|' .. structured_data_txt .. ']]'
		else
			t = "<br>* No arbitrary access for: " .. tostring(id)
		end
		return t
	end
	t = t .. one_arbitrary_access("Q535") -- Q535 = Victor Hugo = Victor Marie Hugo
	t = t .. one_arbitrary_access("Q899264") -- Q899264 = Martin Fleischmann
--	t = t .. one_arbitrary_access("Martin Fleischmann") -- Martin Fleischmann(Q899264)
--	t = t .. one_arbitrary_access("x y z t") -- Q899264 = Martin Fleischmann
	-- Restore normal arguments after test
	CA.import_wikidata()
	CA.import_arguments()
	CA.interact_args_final() -- Interactions between argumensts
	return t
end -- function CA.arbitrary_access_test(t)

function p.verify_args_tables(_known, _source)
	-- initialize all the values to "" in arg table
	-- p.init_args(args_known, p.args_source, "fr")
	if type(_known) == "table" then
		CA.args_known = _known
	end
	if type(CA.args_known) ~= "table" then
		CA.err_add("err_no_known_arguments")
		p.cat_add("cat_no_known_arguments")
		return CA.error_color(" Internal error : no source or no known arguments ! ")
	end
	if type(_source) == "table" then
		CA.args_source = _source
	end
	if type(p.args_source) ~= "table" then
		CA.err_add("err_no_source_arguments")
		CA.cat_add("cat_no_source_arguments")
		return CA.error_color(" Internal error : no source or no known arguments ! ")
	end
	return
end -- function p.verify_args_tables(_known, _source)

function p.init_args(args_known, args_source, _user_lang, _msgs_list, _wiki_lang, _wiki_translations)
	-- p.init_args(args_known, p.args_source, "fr")
	p.init_spaces()
	--
	if type(args_known) ~= "table" then args_known = p.args_known end
	if type(args_known) ~= "table" then args_known = p.args_known_default end
	if type(args_known) == "table" then p.args_known = args_known end
	--
	if type(args_source) ~= "table" then args_source = p.args_source end
	if type(args_source) ~= "table" then args_source = p.args_source_example end
	if type(args_source) == "table" then p.args_source = args_source end
	--
	local err = CA.verify_args_tables(args_known, args_source)
	if err then return err end
	--
	local _args = args_source
--	CA.trac_lang("CA.init_args:") -- DEBUG
--	CA.trac_lang_t = CA.trac_lang_t .. CA.ta("_args.c", _args.c) .. CA.ta("_args.wikilang", _args.wikilang)
--	CA.trac_lang("CA.init_args end:", args_source)
	--
	-- Limite de differences des arguments proposables à l'utilisateur
--	p.max_nearest_argument = tonumber( p.i18n[p.wiki_lang]["max_nearest_argument"] ) or 3
	--
--	CA.erron = true -- Errors actived or no. Errores activo o no. Erreurs activées ou non.
--	p.errors_list = {} -- initialise la collecte des erreurs
	return p.args_known, p.args_source, p.user_lang, p.i18n[p.wiki_lang], p.i18n
end -- function p.init_args(args_known, args_source, _user_lang, _msgs_list, _wiki_lang, _wiki_translations)

-- Global arguments process. Processus global des arguments :
-- args = frame...
-- args_known = p.args_known
-- CA.wiki_translations = i18n.wiki_lang
-- wd = wikidata
-- import_args en 2 boucles : 1 Importer des args normaux
-- import_args en 2 boucles : 2 Traiter les anomalies apres wikidata et import
-- interact args
-- utilisation normale
-- tests unitaires

function CA.import_arguments(args_known, args_source, wiki_translations, args_wikidata)
	--	import all arguments from template, or wikidata
	local args_import = {} -- table d'arguments internationale simple
	local err = nil
	local cats = ""
	-- entrees all_versions et erreurs
	if type(args_known) ~= "table" then args_known = CA.args_known end
	if type(args_known) ~= "table" then args_known = CA.args_known_default end
	if type(args_source) ~= "table" then args_source = CA.args_source end
	if type(wiki_translations) ~= "table" then wiki_translations = CA.wiki_translations end
	if type(args_wikidata) ~= "table" then args_wikidata = CA.args_wikidata end
	CA.import_arguments_err = ""
	CA.import_arguments_track = ""
	local err = CA.verify_args_tables(args_known, args_source)
	if err then return args_import, err end
	--
	local err, er1, t2 = "", "", ""
	local key, argval, argid = "kkk", "xxx", ""
	local argknw, arglingual, argreceived = nil, "", ""
--	local trouve1, min1, trouve2, min2 = nil, 999, nil, 999
	local argm = {} -- argument usuel
--	CA.erron = true -- Errors actived or no. Errores activo o no. Erreurs activées ou non.
--	CA.errors_list = {} -- collecte de toutes les erreurs
	local key_N, key_NN = 0, 0
	local arg_found, rec_found, already_found = false, false, false
	--
	for key_known, argm in pairs(args_known) do
		argm.found = 0 -- Initialiser d'abord tous les arguments connus
	end
	--
	CA.args_unknown = mw.clone(CA.args_source) -- unknown arguments to detect are source arguments without known arguments.
	local key_known_init = nil
--	local argm_orig = nil
	local argm_syn = nil
	-- Try to read all known arguments. Intentar leer todos los argumentos conocidos. Essayer de lire tous les arguments connus.
	for key_known, argm in pairs(args_known) do
		argm.src = nil
		argm.trk = " n"
		key_known_init = key_known
		-- Initialiser d'abord chaque argument connu
		CA.import_arguments_track = tostring(CA.import_arguments_track) .. " - " .. tostring(key_known)
		--
--		argm_orig = nil -- DEBUG
		argm_syn = args_known[argm.keyword]
		if argm.syn == 2 then
			-- Name an unnamed argument, positional, by its synonym. Nommer un argument non nommé, positionné, par son synonyme.
			-- Rename a named argument, by its synonym. Renommer un argument nommé, par son synonyme.
--			argm_orig = key_known -- DEBUG
			key_known = argm.keyword
			--	synonyms are defined with the stamp "syn = 2", then here stamp the basic argument with "syn = 1".
			args_known[key_known].syn = 1
			argm = args_known[key_known] -- new variable argm
			argm.src = nil
			argm.trk = "s"
			CA.import_arguments_track = tostring(CA.import_arguments_track) .. ">" .. tostring(key_known)
		end
		-- initialiser un argument
		arg_found = false
		argval = nil
		argm.trk = argm.trk.."="
		-- importer un argument wikidata
		if args_wikidata[key_known] then
			argval = args_wikidata[key_known]
			argm.src = "wd"
			argm.trk = argm.trk.."w"
			if argm_orig then
			--	args_known[argm_orig].src = "wd"
			--	args_known[argm_orig].trk = (args_known[argm_orig].trk or "").."w"
			end
--			if argm_orig then argm_orig = key_known end -- DEBUG
			arg_found = true
			CA.import_arguments_track = CA.import_arguments_track .. "='''" .. tostring(argval) .. "''' "
		end
		-- import a source argument. importer un argument source.
		arglingual = wiki_translations[key_known]
		CA.import_arguments_track = CA.import_arguments_track .. "/" .. tostring(arglingual)
		if arglingual then -- The argument name has a translation in wiki language
		--	if CA.frame[arglingual] then
		--		argval = CA.frame[arglingual]
		--		argm.src = "inv" -- arg comes from invoke
		--	end
			if CA.frame.args[arglingual] then
	--			argval = CA.frame.args[arglingual]
	--			argm.src = "inv" -- arg comes from invoke
	--			arg_found = true
			end
			if CA.frame:getParent().args then
	--			argval = CA.frame:getParent().args[arglingual]
	--			argm.src = "tpl" -- arg comes from template
	--			arg_found = true
			end

			if args_source[arglingual] then -- the argument come from template else from invoke else from wikidata
	--		if argval then -- the argument value exist and come from template else from invoke else from wikidata

				argval = args_source[arglingual]
				argm.src = "args"
				argm.trk = argm.trk.." a"
				arg_found = true
				local arg_values = wiki_translations[argm.arg_values]
				if argm.keys_values and arg_values then
					-- The argument is limited to multiple values with arg_values and keys_values, and the values are defined.
					local pos = string.find(arg_values, argval)
					if pos then
						-- The value of the argument is in the multiple values of the arguments.
				--		argm.src = "args"
						argm.trk = argm.trk.."m"
				--		arg_found = true
						if argm_orig then
						--	args_known[argm_orig].src = "args"
						--	args_known[argm_orig].trk = (args_known[argm_orig].trk or "").."d"
						end
					else
						CA.err_add("args_values_err", argm.keyword, argval, arg_values)
				--		argval = nil
					end
				else
				--	argm.src = "args"
					argm.trk = argm.trk.."c"
				--	arg_found = true
					if argm_orig then
					--	args_known[argm_orig].src = "args"
					--	args_known[argm_orig].trk = (args_known[argm_orig].trk or "").."c"
					end
				end
				CA.import_arguments_track = CA.import_arguments_track .. "='''" .. tostring(argval) .. "''' "
			end -- not args_source[arglingual] is normal
		else -- internal error and category
			CA.err_add("err_module_miss_i18n", key_known)
			-- Generate a category to list all modules with missing translation
			cats = cats .. CA.cat_add( "err_module_miss_i18n_cat" )
		end
		--
		key_N = tonumber(key_known_init)
		if key_N and not args_known[key_N] then
--			CA.err_add("err_too_unnamed_arguments", key_N, argval)
		end
		-- Record the argument. Guarde el argumento. Enregistrer l'argument.
		if arg_found == true then
			argm.found = argm.found + 1 -- compter les arguments redéfinis
			argm.val = argval
			args_import[key_known] = argval -- table d'arguments internationale simple
			if CA.args_unknown[arglingual] then
				CA.args_unknown[arglingual] = nil -- unknown arguments are source arguments without known arguments.
			end
		end
	end
	-- CA.import_arguments: after import itself, some surrounding checks.
	for key_known, argm in pairs(args_known) do -- For all known arguments
		-- Redefined arguments. Argumentos redefinieron. Arguments redéfinis.
	--	if argm.found and (argm.found > 1) then
	--		CA.err_add("err_value_re_defined", argm["keyword"])
	--		cats = cats .. CA.cat_add("cat_usage_error")
	--	end
	--	synonyms are defined with the stamp "syn = 2", then here stamp the basic argument with "syn = 1".
	--	if argm.keyword and args_known[argm.keyword] and args_known[argm.keyword].syn then -- if the argument is a synonym, increase the found level
		if argm.keyword and args_known[argm.keyword] and args_known[argm.keyword].syn then -- if the argument is a synonym, increase the found level
			if argm.found and (argm.found > 2) then
				CA.err_add("err_value_re_defined", (argm["keyword"] or "**") ) --.. ">2")
				cats = cats .. CA.cat_add("cat_usage_error")
			end
		else
			if argm.found and (argm.found > 1) then
				CA.err_add("err_value_re_defined", (argm["keyword"] or "**") ) --.. ">1")
				cats = cats .. CA.cat_add("cat_usage_error")
			end
		end
		-- need = 0 not necessary argument
		-- need = 1 necessary from argument
		-- need = 2 necessary from argument or module interaction
		-- Missing Arguments. Argumentos que faltan. Arguments manquants.
		if argm.need and (argm.need == 1) and (not argm.val) then
			arglingual = wiki_translations[key_known]
			if arglingual then
				CA.err_add("err_need_value", arglingual)
				cats = cats .. CA.cat_add("cat_usage_error")
			end
		end
	end
	--
	-- Tous les arguments sources ont-ils été utilisés ?
	--	CA.args_unknown -- unknown arguments are source arguments without known arguments.
	local args_list = p.similar_args_list(CA.args_known)
	for key_src, val_src in pairs(CA.args_unknown) do -- For all unknown source arguments.
		arglingual = tostring(key_src) -- chercher l'argument traduit
		key_N = tonumber(arglingual)
		-- No error for unmamed arguments
		-- Pas d'erreur pour les arguments non nommés
		if not key_N then
			CA.err_add("err_unknown_argument", arglingual, val_src)
			cats = cats .. p.cat_add("cat_usage_error")
			-- "Erreur : Le paramètre '''%1''' est inconnu dans ce modèle. Vérifier ce nom ou signaler ce manque.",
			-- Cherche un argument connu et de nom ressemblant
			local diffmaxi = p.similar_args_diffmaxi( string.len(arglingual) )
			local trouve1, min1, trouve2, min2 = p.similar_args_search(arglingual, args_list)
			if min1 and (min1 <= diffmaxi) then
				CA.err_add("err_nearest_argument", trouve1)
			end
			if min2 and (min2 <= diffmaxi) then
				CA.err_add("err_nearest_argument", trouve2)
			end
		end
		key_N = tonumber(arglingual)
		if key_N and not args_known[key_N] then
			CA.err_add("err_too_unnamed_arguments", key_N, val_src)
			p.cat_add("cat_usage_error")
		end
	end -- For all unknown source arguments.
	CA.nowyear = tonumber(os.date("%Y") ) -- local now_date = os.date("%Y-%m-%d %H:%M:%S")
	args_import.nowyear = CA.nowyear
	CA.args_import = args_import
--	CA.trac_lang("CA.import_arguments:", args_import) -- DEBUG
	return CA.args_import
end -- function CA.import_arguments(args_known, args_source, wiki_translations, args_wikidata)

------------------------------------------------------------
-- Argts : Generate documentation. Generar documentación. Générer la documentation.
------------------------------------------------------------

function p.generDoc1(paramName, n, paramData, opt)
	-- t = t .. generDoc1("nom", "ws-name", "docline docdef")
	-- Normaliser les parametres et signaler les erreurs
	-- Toujours afficher quelque chose dans la documentation du module ou du modèle.
	if type(paramName) ~= "string" or type(paramData) ~= "string" then -- signaler l'erreur
		CA.err_add("err_generDoc1_paramName", tostring(paramName) )
		return " "
	end
	opt = " "..tostring(opt).." " -- transparent, sinon peut donner nil, non génant
	--
	-- former le texte à afficher
	local newline = "<br>"
	-- Chaque parametre non nommé est traité par son synonyme.
	if n then return "" end
	if p.option("docline", opt) then newline = "" end
	local argm = p.args_known[paramName]
	if argm then
		--[ [
		if CA.docolor then --	Document the data sources by colors
			if argm.src == "wd" then
				paramData = p.wikidata_color(paramData)
			elseif argm.src == "args" then
				paramData = p.invoke_color(paramData)
		--	elseif argm.src == "inter" then
		--		paramData = p.inter_color(paramData)
			else
				paramData = p.other_color(paramData)
			end
		end
		--] ]
		paramData = paramData -- .. (argm.trk or "")
	end
	return " | " .. paramName .. " = <b>" .. paramData .. "</b>" .. newline
end -- function p.generDoc1(paramName, paramId, opt)

function p.generDoc(opt, args_final, module_name)
	-- List of paramètres for the module documentation
	-- Lister des paramètres pour la documentation du module
	-- "docview" ajouter le panneau de documentation
	-- "docmin" quelques paramètres de base
	-- "docdef" seulement les paramètres définis, ayant une valeur non nulle
	-- "docmax" tous les paramètres connus
	-- "docnotice" generer les documentations des notices
	-- "docline" mettre tous les paramètres sur une seule ligne
	-- "docsrc" mettre les paramètres en couleurs selon les sources
	-- p.options = " : docdata docmin docdef docmax docline docview docafter docnotice docsrc" -- for documentation
	-- p.options = " erron noerr nobox nocat " -- without normal result
	-- p.options = " debug tests en es fr " -- for debug or enforce language
	local args_known = CA.args_known
	local err = CA.verify_args_tables(args_known, CA.args_source)
	if err then return args_import, err end
	if type(module_name) ~= "string" then module_name = p.module_name end
	if type(module_name) ~= "string" then module_name = p.frame:getTitle() end -- main module, example "Auteur"
	if type(module_name) ~= "string" then module_name = "ControlArgs" end
	local n, t, val = 0, "", ""
	if type(args_final) ~= "table" then t = t.."err_args_final="..type(args_final).."<br>" end -- optional arguments
	if type(args_final) ~= "table" then args_final = p.args_final end -- optional arguments
	local key, argknw, argval, arglingual = "", "", ""
	local lst = true
	local lst_doc, lst_1, lst_t = {}, {}, ""
	for key, parm in pairs(args_final) do -- for all known arguments
		val = ""
		n = tonumber(key)
		if n then key = tostring(parm["keyword"]) end -- key for unnamed arguments, in numeric sort
		argknw = args_known[key]
		arglingual = tostring(CA.user_translations[key]) -- multilingual name of the arg in the template
		if arglingual == "nil" then arglingual = key end -- if argument is translatable
		val = parm -- tostring(args_import[key])
		if not p.isDef(val) then val = "" end
		lst = false
		opt = opt .. " docdef " -- optional display
		if p.option("docmin", opt) and (argknw["list"] == 1) then lst = true end
		if p.option("docdef", opt) and (val ~= "") then lst = true end
		if p.option("docmax", opt) then lst = true end
		if not args_known[key] then lst = false end
		if key and args_known[key] and args_known[key].typ == "sys" then lst = false end
		if lst then -- list if found and selected
			lst_t = p.generDoc1(arglingual, n, val, opt)
			table.insert(lst_doc, {lst_t = lst_t, key = key, user_lang_key = CA.user_translations[key] or "trans"} )
		end
	end
	table.sort(lst_doc, function (a, b) return (a.user_lang_key < b.user_lang_key) end ) -- alphabetic sort of translated arguments
	for i, parm in ipairs(lst_doc) do -- List all found arguments
		t = t .. parm.lst_t or "lst_t"
	end
	t = "\n{{" .. module_name .. " " .. t .. "}}" -- <br>
	return t
end -- function p.generDoc(opt, args_final, module_name)

-- Interact parameters in international args_final
function CA.interact_args_final(args_final)
	-- args_final = CA.interact_args_final(args_import)
	if type(args_final) ~= "table" then args_final = CA.args_final end
	if type(args_final) ~= "table" then args_final = CA.args_import end
	local a = args_final
	local i = {} -- interact
--	t = "\n* begin :" .. CA.ta("initiale", a.initiale) .. CA.ta("firstname", a.firstname) .. CA.ta("lastname", a.lastname) .. CA.ta("title", a.title)
	--
	local tit = nil
	if not a.title then -- If title is undefined, enforce it.
		if a.lastname and a.firstname then
			tit = a.firstname .. " " .. a.lastname
		end
		i.title = a.label or tit or a.sitelink or a.lastname or CA.module_name
	end
	--
	if not a.initiale then -- If initiale is undefined, enforce it.
		-- if absent, default initiale come from the last word of title
		local title = a.title or i.title
		if title then
			local tab = mw.text.split(title, '%s') -- table of words
			local max = table.maxn( tab )
			i.initiale = tab[max] -- select the last word
			i.initiale = string.sub( i.initiale, 1, 1 ) -- select the first letter
			i.initiale = string.upper( i.initiale or "" )
		end
	end
	--
	-- if absent, synonym of basic arguments, syn = 2
	if not a.firstname then i.firstname = (i.firstname2 or a.firstname2) end
	if not a.lastname then i.lastname = (i.lastname2 or a.lastname2) end
	if not a.firstname2 then i.firstname2 = (i.firstname or a.firstname) end
	if not a.lastname2 then i.lastname2 = (i.lastname or a.lastname) end
	--
	if a.birth and not a.birthyear then
		local tt, err = p.date_to_part(a.birth, CA.str_vars("date_to_part_format"), "yyyy")
		if tt then i.birthyear = tt else
			CA.err_add(err, CA.str_vars("birthyear"), "yyyy")
			CA.cat_add("date_to_part_call_cat")
		end
	end
	if a.selectversions then
		i.selectversions = a.selectversions
	end
	if a.allversions then
		i.allversions = a.allversions
	--	What to do when the user or the template ask a versionall or a selectversions ?
	--	1 : Build the submodules before import all arguments and do nothing.
	--	2 : Build the submodules only after import all arguments.
	--	CA.versions.selector = args_final.selectversions
	--	CA.versions.all_versions = args_final.allversions
	--	The versions mecanism can also use this argument
	end
	--
	-- memorize interactions in CA.args_final and show errors or messages
	local n = 0
	for key, val in pairs(i) do
		local args_kwn = CA.args_known[key]
		if args_kwn then
			args_final[key] = val -- = i[key]
			args_kwn.src = "inter"
			args_kwn.trk = args_kwn.trk.." i"
			n = n + 1
			if (args_kwn.need == 2) and not a[key] then --
				-- need=2 necessary from argument or module interaction
				CA.msg_add("msg_auto_val_warning", CA.user_translations[key], val)
			end
		else
			CA.err_add("msg_auto_val_unknown", CA.wiki_translations[key], val)
		--	CA.err_add("msg_unknown_auto_arg", CA.wiki_translations[key], val)
		end
	end
	if CA.args_known.title then CA.args_known.title.trk = (CA.args_known.title.trk or "").."i="..n end
--	t = t .. "\n*: end :" .. CA.ta("initiale", a.initiale) .. CA.ta("firstname", a.firstname) .. CA.ta("lastname", a.lastname) .. CA.ta("title", a.title)
	CA.args_final = args_final
--	CA.invoke_options =
--	CA.trac_lang("interact_args_final end:", CA.args_final)
	return args_final, t
end -- function CA.interact_args_final(args_final)

function CA.sources_of_datas_colors()
	local res = ""
	if CA.docolor then --	Document the data sources by colors
		local sources_of_datas = CA.str_vars("sources_of_datas")
		--	sources_of_datas = "Informations from: /Wikidata, /template or module, /other, /message, /error",
		local splitxt = mw.text.split(sources_of_datas, "/", true)
		res = res .. splitxt[1]	 .. " ''' " .. CA.wikidata_color(splitxt[2]) .. CA.invoke_color(splitxt[3]) .. CA.other_color(splitxt[4]) .. CA.message_color(splitxt[5]) .. CA.error_color(splitxt[6]) .. ".''' <br>"
	else -- Document the data sources in black on white
--		local sources_of_datas = CA.str_vars("sources_of_datas")
--		res = res .. string.gsub(sources_of_datas, "/", "") .. ".''' <br>"
	end
	return res
end -- function CA.sources_of_datas_colors()

function p.docbox_namespace_error_and_cat()
	-- If DocBox is displayed out of Module or Template namespace, generate an error and a category "Module with usage error"
	-- Si DocBox est affiché hors de l'espace de nom Module ou Modèle, générer une erreur et une catégorie "erreur d'utilisation"
	local namespace = mw.title.getCurrentTitle().namespace
	local nsText = mw.title.getCurrentTitle().nsText
	if namespace ~= 10 and namespace ~= 828 then -- ns:Template and ns:Module
		CA.err_add("docbox_namespace_error_err", nsText)
		CA.cat_add("docbox_namespace_error_cat")
	end
	return
end -- function p.docbox_namespace_error_and_cat()

function p.normal_box(args_final, title)
	local res = ""
	local warning_versions = CA.versions.warning_short()
	if type(args_final) ~= "table" then args_final = p.args_final end
	if not title then title = args_final.title end
	if not title then title = "TITLE" end
	res = res .. "<center><b><big>" .. title .. "</big></b><br></center>"
	local flag_of_image = CA.str_vars("flag_of_image")
	if type(flag_of_image) == "string" then -- and image ~= ""
		flag_of_image = '[[File:' .. flag_of_image .. '|frameless|40x40px||class=photo]] '
	else
		flag_of_image = "&nbsp;"
	end
	res = res .. flag_of_image
	res = res .. "L'auteur	'''" .. tostring(args_final.firstname) .. " " .. tostring(args_final.lastname) .. "''' "
	res = res .. " est mort en '''" .. tostring(args_final.deathyear) .. "'''"
	res = res .. CA.ta("firstname", args_final.firstname)
	res = res .. CA.ta("lastname", args_final.lastname)
	res = res .. CA.ta("title", args_final.title)
	res = res .. CA.ta("language_cat", args_final.language) -- |language=french,italian,chinese
	res = res .. CA.ta("occupation_cat", args_final.occupation) -- |occupation=Académiciens,Personnalités politiques
	res = res .. CA.ta("description", args_final.description)
	res = warning_versions .. '<div style="margin-right:5px; box-shadow:0.2em 0.3em 0.2em #B7B7B7; background-color:#F1F1DE; padding:0.3em; width=90%; overflow-x:hidden; ">' .. res .. '</div>'
	return res
end -- function p.normal_box(args_final, title)

function CA.get_editstate()
	local t = ""
	local mwtitle = mw.title.getCurrentTitle()
	local url = tostring(mwtitle:canonicalUrl() )
	local n = string.find(url, "/w/")
	CA.EditState = false
	if tonumber( n ) then CA.EditState = true end
	return CA.ta("EditState", CA.EditState) .. " - " .. url
end -- function CA.get_editstate()

function CA.module_init(frame)
	CA.frame = frame or CA.frame
--	Mix arguments from {{#invoke:}}, then arguments from the prioritary template which replace ones from {{#invoke:}}.
	local v2, nn, ni = 0, 0, 0
	local args_tab, mode = {}
	local templat = frame:getParent().args -- arguments from template
	local invoked = frame.args -- arguments from #invoke module
	 -- Mix invoked modified arguments from prioritary template arguments.
	 -- Argument 1 from template become the mode in #invoke. Other i arguments must be shifted.
	args_tab = mw.clone(invoked)
	for key, val in pairs(templat) do
		local key = mw.text.trim(key)
		local val = mw.text.trim(val)
		local i = tonumber(key)
		if i then
			if i == 1 then mode = val -- mode = template[1]
			else args_tab[i-1] = val end -- transmit other unnamed arguments template[i], but shifted because the mode in template[1]
		else args_tab[key] = val end -- transmit any named template arguments template
	end
	CA.args_source = args_tab
	-- Default values of main module version.
	CA.versions.main_versionName = CA.versions.main_versionName or "ControlArgs0"
	CA.versions.main_versionNumber = CA.versions.main_versionNumber or "0.00"
	CA.versions.main_versionDate = CA.versions.main_versionDate or "2013-03-24"
	CA.categories_init()
--	CA.init_user_lang()
	CA.init_args()
--	CA.verif_i18n()
	return
end

------------------------------------------------------------
-- Main interface to templates
-- Interfaz principales de modelos
-- Interface principal avec les modèles
------------------------------------------------------------

------------------------------------------------------------
------------------------------------------------------------
-- TEST part, with use of options, modes and resulting text
-- TEST parte, con el uso de opciones, modos y texto resultante
-- TEST partie, avec l'utilisation d'options, modes et texte résultant
------------------------------------------------------------
------------------------------------------------------------

------------------------------------------------------------
-- Document the tables and their structures. List a table content, with formating.
-- Documentar las tablas y sus estructuras. Lista de un contenido de la tabla, con el formateo.
-- Documenter les tables et leurs structures. Lister un contenu de la table, avec le formatage.
------------------------------------------------------------

-- Dump and format the content of a table and its sub-tables ; with limits in length, deep and exceptions.
-- Listar y formatar le contento de una tabla y su sub-tablas.
-- Lister et formater le contenu d'une table et ses sous-tables ; avec des limites en longueur, profondeur et exceptions.
-- For each (sub)table, list : in first vars, then functions, then sub-tables list, then sub-tables contents

function p.testable_recursive(tbl, uppername, name, level_i, levelmaxi, max_n, exclude1, exclude2, exclude3)
	if type(name) ~= "string" then name = "table" end
	local res, newname, part, shift = "", "", "", ""
	local sep, N = ", ", 0
	local isempty = true
	local levelname = uppername .. "." .. name
	local tot_vars, tot_func, tot_tabs = 0, 0, 0
	local nbr_vars, lst_vars = 0, ""
	local nbr_func, lst_func = 0, ""
	local nbr_tabs, lst_tabs = 0, ""
	local max, lst_subtabs = 0, ""
	local st, vr, fn, tb = "", 0, 0, 0
	local tobreak = nil
	-- limit the number of the level of sub-tables
	level_i = tonumber(level_i)
	if type(level_i) ~= "number" then level_i = 1 end
	levelmaxi = tonumber(levelmaxi)
	if type(levelmaxi) ~= "number" then levelmaxi = 99 end
	if level_i > levelmaxi then
		return p.message_color( " display list levelmaxi=" .. tostring(levelmaxi) ), tot_vars, tot_func, tot_tabs
	end
	max_n = tonumber(max_n) or 999
	shift = string.rep("*", level_i)
	--
	-- Do not list if exclude1, exclude2 or exclude3 are in the table name.
	if type(exclude1) == "string" and exclude1 ~= "" then
		if string.find(name, exclude1) ~= nil then
			return "", tot_vars, tot_func, tot_tabs
		end
	end
	if type(exclude2) == "string" and exclude2 ~= "" then
		if string.find(name, exclude2) ~= nil then
			return "", tot_vars, tot_func, tot_tabs
		end
	end
	if type(exclude3) == "string" and exclude3 ~= "" then
		if string.find(name, exclude3) ~= nil then
			return "", tot_vars, tot_func, tot_tabs
		end
	end
	-- display table error
	if type(tbl) ~= "table" then
		return '<br>The variable "' .. tostring(name) .. '" is not a table.<br>', tot_vars, tot_func, tot_tabs
	end
	--
	-- List and count vars, functions and sub tables
	-- All named elements, including [1] and ["1"].
	-- Tous les élements, y compris [1] et ["1"].
	for k, v in pairs(tbl) do
		k = tostring(k)
		if type(v) == "table" then
			lst_tabs = lst_tabs .. k .. sep
			nbr_tabs = nbr_tabs + 1
			isempty = false
			newname = tostring(k)
			max = max + 1
			-- List recursively (or no) each sub-table
			if level_i < levelmaxi then
				st, vr, fn, tb = p.testable_recursive(v, levelname, newname, level_i+1, levelmaxi, max_n, exclude1, exclude2, exclude3)
				lst_subtabs = lst_subtabs .. st
				tot_vars = tot_vars + vr
				tot_func = tot_func + fn
				tot_tabs = tot_tabs + tb + 1
			end
			if level_i >= levelmaxi then
				local table_listlimit_levelmaxi = CA.str_vars("table_listlimit_levelmaxi", levelmaxi)
				res = res .. " " .. p.message_color( table_listlimit_levelmaxi )
				break
			end
			local sep = ""
			if max == max_n then
				local table_listlimit_max_n = CA.str_vars("table_listlimit_max_n", max_n)
				res = res .. "\n" .. shift .. " Table '''" .. levelname .. "''' " .. p.message_color(table_listlimit_max_n)
				break
			end
--			end
		elseif type(v) == "function" then
			lst_func = lst_func .. k .. sep
			nbr_func = nbr_func + 1
			tot_func = tot_func + 1
			isempty = false
		else -- type(v) == other
			lst_vars = lst_vars .. type(v) .. " - " .. tostring(k) .. " =''' " .. tostring(v) .. "''' " .. sep
			nbr_vars = nbr_vars + 1
			tot_vars = tot_vars + 1
			isempty = false
		end
	end
	res = res .. "\n" .. shift .. " Table '''" .. levelname .. "''', " .. tostring(nbr_vars) .. " vars: " .. lst_vars
	res = res .. "\n" .. shift .. " Table '''" .. levelname .. "''', " .. tostring(nbr_func) .. " functions: " .. lst_func
	res = res .. "\n" .. shift .. " Table '''" .. levelname .. "''', " .. tostring(nbr_tabs) .. " tables: " .. lst_tabs .. lst_subtabs
	return res, tot_vars, tot_func, tot_tabs
end -- function p.testable_recursive(tbl, uppername, name, level_i, levelmaxi, max_n, exclude1, exclude2, exclude3)

-- Auto test of limits of the table list.
-- Auto test des limites de liste de table.
p.tablim = { "one", "two", max1 = "MAX1", max2 = "MAX2", max3 = "MAX3"}
p.tablim.life = { animal = "dog", vegetal = "carot"}
p.tablim.life.animals = { "turtle"}
p.tablim.comfort = { "tv", mobile = "car"}
p.tablim.house = { "kitcheen", "bedroom"}
p.tablim.house.garden = { flower = "rose", nature = "river"}

function p.testable_lister(table, tablename, opt)
	local res = "\n* Content of the '''" .. tostring(tablename) .. "''' table, begin:"
	-- test : check mw content
	if not opt then opt = { levelmaxi = 99 } end
	local levelmaxi = opt.levelmaxi or 99
	local max_n = opt.max_n or 9999
	local exclude1 = opt.exclude1 or ""
	local exclude2 = opt.exclude2 or ""
	local exclude3 = opt.exclude3 or ""
	local tot_vars, tot_func, tot_tabs = 0, 0, 0
	-- limit the number of the level of sub-tables
	level_i = tonumber(level_i)
	if type(level_i) ~= "number" then level_i = 1 end
	levelmaxi = tonumber(levelmaxi)
	if type(levelmaxi) ~= "number" then levelmaxi = 99 end
	if level_i > levelmaxi then
		return "", tot_vars, tot_func, tot_tabs
	end
	res = res .. " ( " .. CA.ta("levelmaxi", levelmaxi) .. CA.ta("max_n", max_n) .. CA.ta("exclude1", exclude1) .. CA.ta("exclude2", exclude2) .. CA.ta("exclude3", exclude3) .. " ) "
	local st, vr, fn, tb = p.testable_recursive(table, "", tablename, 1, levelmaxi, max_n, exclude1, exclude2, exclude3)
	res = res .. st
	tot_vars = tot_vars + vr
	tot_func = tot_func + fn
	tot_tabs = tot_tabs + tb
	res = res .. "\n* Content of the '''" .. tostring(tablename) .. "''' table, end: "
	res = res .. CA.str_vars(" %1 variables, %2 functions, %3 sub-tables.\n", vr, fn, tb)
	return res, tot_vars, tot_func, tot_tabs
end -- function p.testable_lister(table, tablename, opt)

function CA.cat_add_test_1(t, test, user_lang, wiki_lang, key,vals )
	CA.catView = ":"
	CA.init_wiki_lang(wiki_lang) -- res = res ..
	CA.init_user_lang(user_lang) -- res = res ..
	if test == "cat_add" then catext = p.cat_add(key, vals)
	elseif test == "catGroup" then catext = p.catGroup(key, vals) end
	CA.options_to_catView()
	return t .. CA.Tr() .. CA.Td(test or "-") .. CA.Td(user_lang or "-") .. CA.Td(wiki_lang or "-") .. CA.Td(catext or "-")
end

function CA.cat_add_test(t) -- tester les categories
	t = t or "\n* Test the function '''cat_add''' : " .. CA.ta("user_lang", CA.user_lang) .. CA.ta("wiki_lang", CA.wiki_lang)
	local cat_memo, catView, user_lang, wiki_lang = p.categories_list, CA.catView, CA.user_lang_memo, CA.wiki_lang_memo
	local wiki_memo, user_memo = CA.wiki_lang, CA.user_lang
	p.categories_init()
	CA.catView = ":"
	t = t .. CA.Th() .. CA.Tc("Test type") .. CA.Tc("user language") .. CA.Tc("wiki language") .. CA.Tc("Categories")
	t = CA.cat_add_test_1(t, "cat_add", nil, nil, "err_module_miss_i18n_cat")
	t = CA.cat_add_test_1(t, "cat_add", nil, nil, "cat_usage_error")
	t = CA.cat_add_test_1(t, "cat_add", "en", nil, "cat_internal_error")
	t = CA.cat_add_test_1(t, "cat_add", "en", "es", "err_module_miss_i18n_cat")
	t = CA.cat_add_test_1(t, "catGroup", "en", "fr", "language_cat", "french,italian,chinese")
	t = CA.cat_add_test_1(t, "catGroup", "en", "en", "occupation_cat", "Académiciens,Personnalités politiques")
	t = CA.cat_add_test_1(t, "cat_add", "fr", "en", "cat_internal_error")
	t = CA.cat_add_test_1(t, "cat_add", "es", "en", "cat_internal_error")
	t = CA.cat_add_test_1(t, "cat_add", "en", "x-y-z", "cat_internal_error")
	t = CA.cat_add_test_1(t, "cat_add", "x-y-z", "en", "cat_internal_error")
	t = t .. CA.Te()
	CA.init_wiki_user_lang(wiki_memo, user_memo)
	t = t .. "\n* Test the function <b>categories_lister</b> : " .. p.categories_lister(":") -- generate the categories wikitext
	t = t .. "\n* This test reset categories before the test."
	CA.options_to_catView()
	return t
end -- function p.cat_add_test(tst)

function p.i18n_lister(t, i18n_tables)
	if type(i18n_tables) ~= "table" then i18n_tables = CA.i18n end
	t = t or "\n* <b>i18n_lister</b> :"
	t = t .. CA.error_color("\n* <b>This list show all the texts, but cannot replace the original declarations.</b> ")
	t = t .. CA.error_color("\n* <b>" .. CA.str_vars("i18n_list_all_texts") .. " </b> " )
	for lang, lang_table in pairs(i18n_tables) do
		t = t .. "\np.i18n." .. lang .. ' = { '
		if type(lang_table) == "table" then
			for key, text in pairs(lang_table) do
				if key and text then
					t = t .. "\n:" .. key .. ' = "' .. text .. '",'
				end
			end
		end
		t = t .. "\n}\n"
	end
	return t
end -- function p.i18n_lister(t, i18n_tables)

-- mw.language:formatDate lang:formatDate( format, timestamp, local )
-- Formats a date according to the given format string. timestamp else current time. The value for local must be a boolean or nil; if true, the time is formatted in the wiki's local time rather else in UTC.
-- The format string and supported values for timestamp are identical to those for the #time parser function from Extension:ParserFunctions. Note that backslashes may need to be doubled in the Lua string where they wouldn't in wikitext:
-- {{#time:d F Y|1988-02-28|nl}} → 28 februari 1988
-- {{#time: U | now }} → 1424087375
-- {{#time: r|@1424087374}} → Mon, 16 Feb 2015 11:49:34 +0000

function CA.day_to_UTC(jj, mm, aaaa)
	local t = "@" .. tostring( jj*86400 + mm*30*86400 + (aaaa-1970)*31556926 )
	return t
end

function CA.day_to_stamp(jj, mm, aaaa)
	jj = tonumber(jj)
	if not jj then jj = "2" else jj = string.sub("0000" .. tostring(jj), -2, -1 ) end
	mm = tonumber(mm)
	if not mm then mm = "2" else mm = string.sub("0000" .. tostring(mm), -2, -1 ) end
	aaaa = tonumber(aaaa)
	if not aaaa then aaaa = "2000" else aaaa = string.sub("0000" .. tostring(aaaa), -4, -1 ) end
	return aaaa .. "-" .. mm .. "-" .. jj
--	mm = tostring( mm or "1" )
--	aaaa = tostring( aaaa or "1" )
--	if jj == 1 and CA.language_obj:getCode() == "fr" then t = string.gsub(t, "1 ", "1<sup>er</sup> " ) end
--	if jj == 1 and CA.language_obj:getCode() == "en" then t = string.gsub(t, "1 ", "1<sup>st</sup> " ) end
end

function CA.format_date(format, timestamp, lang, loc)
	if not CA.language_obj then CA.language_obj = mw.language.new( "fr" ) end
	if lang then CA.language_obj = mw.language.new( lang ) end
	if CA.language_obj then CA.language_code = CA.language_obj:getCode() end
	if type(loc) ~= "boolean" then loc = true end
	return tostring(CA.language_obj:formatDate(format, timestamp, loc))
end -- function CA.format_date(format, timestamp, loc)

function CA.time_format_test_1(t, test, format, timestamp, lang, loc)
	if lang then CA.language_obj = mw.language.new( lang ) end
	t = t .. CA.Tr() .. CA.Td(test or "-") .. CA.Td(format or "-") .. CA.Td(timestamp or "-") .. CA.Td(tostring(lang)) .. CA.Td( CA.format_date(format, timestamp, loc) )
	return t
end

function p.time_format_test(t)
	if not CA.language_obj then CA.language_obj = mw.language.new( "fr" ) end
	if CA.language_obj then CA.language_code = CA.language_obj:getCode() end
	t = t or "\n'''time_format_test''' :"
	t = t .. "\nCoding and conversion of dates by the parser function language_obj:formatDate(format, timestamp, loc)."
	t = t .. CA.ta("CA.language_code", CA.language_code)
	t = t .. "<br>Verify some date formats: Vérifier quelques formats de dates :"
	t = t .. CA.Th() .. CA.Tc("Test dates from seconds") .. CA.Tc("format") .. CA.Tc("timestamp") .. CA.Tc("lang") .. CA.Tc("Formated date")
	t = CA.time_format_test_1(t, " now", "U", "now")
	t = CA.time_format_test_1(t, " seconds to full UTC ", "r", "@1421117374")
	t = CA.time_format_test_1(t, " seconds to full UTC ", "r", "@1424087374")
	t = CA.time_format_test_1(t, " 2015-02-16T11:49:34+00:00 ", "c", "@1424107003")
	t = CA.time_format_test_1(t, " 14/7/1789 to english ", "F j Y", CA.day_to_UTC(14, 7, 1789), "en")
	t = CA.time_format_test_1(t, " seconds to french format ", "j F Y", "@1499997003")
	t = CA.time_format_test_1(t, " french 14/7/1789 ", "j F Y", CA.day_to_UTC(14, 7, 1789), "fr")
	t = CA.time_format_test_1(t, " french 14/7/234 ", "j F Y", CA.day_to_UTC(14, 7, 234), "fr")
	t = t .. CA.Tr() .. CA.Tc("Test from UTC") .. CA.Tc("format") .. CA.Tc("timestamp") .. CA.Tc("lang") .. CA.Tc("Formated date")
	t = CA.time_format_test_1(t, " french date ", "j F Y", "1915-02-16T17:16:43+00:00", "fr")
	t = CA.time_format_test_1(t, " french date ", "j F Y", "1515-02-22T17:16:43+00:00", "fr")
	t = t .. CA.Tr() .. CA.Tc("Test dates only") .. CA.Tc("format") .. CA.Tc("timestamp") .. CA.Tc("lang") .. CA.Tc("Formated date")
	t = CA.time_format_test_1(t, " french 2015-02-16 ", "j F Y", "2015-02-16", "fr")
	t = CA.time_format_test_1(t, " french 32-12-25 ", "j F Y", "32-12-25", "fr")
	t = CA.time_format_test_1(t, " french 0032-12-25 ", "j F Y", "0032-12-25", "fr")
	t = CA.time_format_test_1(t, " french 3/4/5 ", "j F Y", CA.day_to_stamp(3, 4, 5), "fr")
	t = CA.time_format_test_1(t, " french 24/11/31 ", "j F Y", CA.day_to_stamp(24, 11, 31), "fr")
	t = CA.time_format_test_1(t, " french 24/11/32 ", "j F Y", CA.day_to_stamp(24, 11, 32) )
	t = CA.time_format_test_1(t, " french 24/12/32 ", "j F Y", CA.day_to_stamp(24, 12, 32) )
	t = CA.time_format_test_1(t, " french 25/12/32 ", "j F Y", CA.day_to_stamp(25, 12, 32) )
	t = CA.time_format_test_1(t, " french 25/12/32 roman year ", "j F xrY", CA.day_to_stamp(25, 12, 32) )
	t = t .. CA.Tr() .. CA.Tc("Test partial formats & missing datas") .. CA.Tc("format") .. CA.Tc("timestamp") .. CA.Tc("lang") .. CA.Tc("Formated date")
	t = CA.time_format_test_1(t, " partial format 3/4/5 ", "F Y", CA.day_to_stamp(3, 4, 5) )
	t = CA.time_format_test_1(t, " partial format 3/4/5 ", "Y", CA.day_to_stamp(3, 4, 5) )
	t = CA.time_format_test_1(t, " missing day -/4/5 ", "j F Y", CA.day_to_stamp(nil, 4, 5) )
	t = CA.time_format_test_1(t, " missing month 3/-/5 ", "j F Y", CA.day_to_stamp(3, nil, 5) )
	t = CA.time_format_test_1(t, " missing year 3/4/- ", "j F Y", CA.day_to_stamp(3, 4, nil) )
	t = CA.time_format_test_1(t, " missing day -/4/5 ", "F Y", CA.day_to_stamp(nil, 4, 5) )
	t = CA.time_format_test_1(t, " missing month 3/-/5 ", "j Y", CA.day_to_stamp(3, nil, 5) )
	t = CA.time_format_test_1(t, " missing year 3/4/- ", "j F", CA.day_to_stamp(3, 4, nil) )
	t = t .. CA.Te()
	return t
end -- function p.time_format_test(t)

function p.date_to_part_test_1(t, nom, date, part)
	t = t .. CA.Tr() .. CA.Td(nom) .. CA.Td(date) .. CA.Td(part) .. CA.Td(tostring(CA.date_to_part(date, part)))
	return t
end

function p.date_to_part_test(t)
	t = t or "\n* '''date_to_part''' :"
	t = t .. "\n* Verify each value of part of date: Vérifier chaque valeur de partie de date :"
	t = t .. CA.Th() .. CA.Tc("Exemple") .. CA.Tc("date") .. CA.Tc("partie") .. CA.Tc("valeur")
	t = CA.date_to_part_test_1(t, "Socrate nais.", "470 BCE", "era")
	t = CA.date_to_part_test_1(t, "Tite-Live nais.", "59 BCE", "yyyy")
	t = CA.date_to_part_test_1(t, "Tite-Live mort.", "17", "yyyy")
	t = CA.date_to_part_test_1(t, "vide", "", "yyyy")
	t = CA.date_to_part_test_1(t, "Révolution", "14 juillet 1789", "mmmm")
	t = CA.date_to_part_test_1(t, "Marche sur la Lune", "20 juillet 1969", " ")
	t = CA.date_to_part_test_1(t, "English date", "July 20 1969", "yyyy")
	t = CA.date_to_part_test_1(t, "English date", "July 20 1969", "mmmm")
	t = CA.date_to_part_test_1(t, "Nelson Mandela nais.", "juillet 1918", "yyyy")
	t = CA.date_to_part_test_1(t, "Nelson Mandela décès", "5 décembre 2013", "dd")
	t = t .. CA.Te()
	return t
end -- function p.date_to_part_test(t)

function CA.table_count(tab, tab_name)
	local tab_name, tbl, t
	if type(tab) == "string" then
		tab_name = tab
		tbl = p[tab_name]
	elseif type(tab) == "table" then
		tab_name = tab_name or "table?"
		tbl = tab
	end
	if type(tbl) == "table" then
		local st, vr, fn, tb = p.testable_lister(tbl, "p."..tab_name)
	--	local t = CA.str_vars("Table '''%1''' : comptes tabs='''%2''', vars='''%3''', funcs='''%4''' ", tab_name, tb, vr, fn)
		t = CA.str_vars("table_counts", tab_name, tb, vr, fn)
		t = CA.str_vars("Table '''%1''' : counts tabs='''%2''', vars='''%3''', funcs='''%4'''.", tab_name, tb, vr, fn) -- DEBUG
	else
		t = CA.str_vars("table_dont_exists", tab_name or tbl)
	end
	return t or "", vr, fn, tb
end -- function CA.table_count(tab, tab_name)

function CA.table_n_vars(tab, tab_name)
	local st, vr, fn, tb = CA.table_count(tab, tab_name)
	return vr
end

function CA.tables_counts(t, ...)
	local t = t
	if not ( type(t) == "string" ) then t = nil end
	t = t or "- Counts of contents of tables: "
	t = t .. "<br>" .. CA.table_count("i18n")
	t = t .. "<br>" .. CA.table_count("wiki_translations")
	t = t .. "<br>" .. CA.table_count("user_translations")
	t = t .. "<br>" .. CA.table_count("args_known")
	t = t .. "<br>" .. CA.table_count("args_wikidata")
	t = t .. "<br>" .. CA.table_count("args_invoke")
	t = t .. "<br>" .. CA.table_count("args_template")
	t = t .. "<br>" .. CA.table_count("args_source")
	t = t .. "<br>" .. CA.table_count("args_import")
	t = t .. "<br>" .. CA.table_count("args_final")
	t = t .. "<br>" .. CA.table_count("args_unknown")
	t = t .. "<br>" .. CA.table_count("args_selected")
	t = t .. "<br>" .. CA.table_count("errors_list")
	t = t .. "<br>" .. CA.table_count("categories_list")
	p.requires = CA.versions.requires
	t = t .. "<br>" .. CA.table_count("requires")
	p.inits = CA.versions.inits
	t = t .. "<br>" .. CA.table_count("inits")
	local func = "" -- ipairs
	for n, tab_name in ipairs( {...} ) do
		if type(tab_name) == "string" then
			t = t .. "<br>" .. CA.table_count(tab_name) -- CA.table_count(tab, tab_name)
		end
	end
	CA.i18n_trac("tables_counts", "end", 1)
	return t
end -- function CA.tables_counts(t)

function p.debug_traceback(t)
	if type(t) ~= "string" then t = "\n* '''debug.traceback()''' : " end
	t = t .. debug.traceback()
	t = string.gsub(t, "Module", "\n* Module" )
	return t
end

function p.form_tests_init(res, args_source)
-- Special init for the test mode
	if type(res) ~= "string" then res = "\n* Mode test : " end
	if type(args_source) ~= "table" then args_source = {} end
	if p.i18n and p.i18n.en then p.i18n.en.error_i18n_wanted_to_test_missing_translation = 'English error i18n wanted for tests missing translation' end
	if p.i18n and p.i18n.es then p.i18n.es.error_i18n_deseada_para_probar_traduccion_faltan = 'Espagnol error i18n deseada para probar traducción faltan' end
	if p.i18n and p.i18n.fr then p.i18n.fr.error_i18n_voulue_pour_test_de_traduction_manquante = 'Français erreur i18n voulue pour tests de traduction manquante' end
--	if not args_source.userlang then args_source.userlang = "en" end
--	if not args_source.wikilang then args_source.wikilang = "es" end
	if not args_source.name then args_source.name = "Jack Smith" end
	if not args_source.nom then args_source.nom = "Victor Hugo" end
	if not args_source.region then args_source.region = "india" end
	if not args_source["région"] then args_source["région"] = "chine" end
	if not args_source.description then args_source.description = "Victor Hugo est très connu." end
	if not args_source.langue then args_source.langue = "français,japonais" end
	if not args_source.occupation then args_source.occupation = "Académiciens,Personnalités politiques" end
	p.args_source = args_source
	return res
end -- function p.form_tests_init(res, args_source)

--	Documentations et tests détaillés supplémentaires
function p.form_tests(args_final)
	if type(args_final) ~= "table" then args_final = CA.args_final end -- optional arguments
	local res = "" -- "\n:.\n"
	local content = ""
	-- CA.options = " : docdata docmin docdef docmax docline docsrc docview docafter docnotice docsrc" -- for documentation
	-- CA.options = " erron noerr nobox " -- without normal result
	-- CA.options = " debug tests en es fr " -- for debug or enforce language
--	CA.form_tests_init(res, CA.args_source)
	--
	---------------------------------------------------------------
	-- "\n* any texte" is forbiden before dropbox. Is it a bug ? --
	---------------------------------------------------------------
	--
--	CA.init_wiki_user_lang(CA.wiki_lang, CA.user_lang)
--[[	res = res .. "<h3>" .. CA.str_vars("page_tests_h3_title") .. "</h3>"
	res = res .. "<br> " .. CA.str_vars("page_tests_title")
	res = res .. "<br> " .. CA.user_wiki_lang
	res = res .. "<small><br> " .. p.all_versions_text() .. "</small>"
	res = res .. CA.track_i18n_t("form_tests page")
	--]]
	--
	res = res .. "<h3>" .. CA.str_vars("page_tests_h3_title") .. "</h3>"
	res = res .. "<small><small>" .. CA.all_versions_text() .. "</small></small>"
	res = res .. "<br/> " .. CA.str_vars("page_tests_title") .. "<br/>"
	res = res .. "<br> " .. CA.user_wiki_lang
	res = res .. CA.dropdown_func(1, CA.versions.warning_short() .. CA.str_vars("actual_versions_title"), CA.versions.warning_report )
	res = res .. CA.dropdown_func(1, "used_options_title", CA.used_options_list, CA.used_options)
	res = res .. CA.dropdown_func(1, "tables_count_title", CA.tables_counts)
	res = res .. CA.dropdown_func(1, "list_all_args_title", CA.list_all_args)
	res = res .. CA.dropdown_func(1, "wikidata_details_test_title", CA.wikidata_details_test)
	res = res .. CA.dropdown_func(1, "wikidata_any_page_title", CA.wikidata_any_page_test, "Q535", "Q535")
	res = res .. CA.dropdown_func(1, "spaces_page_names_title", CA.spaces_page_names_test)
	res = res .. CA.dropdown_func(1, "table_args_source_title", CA.testable_lister, CA.args_source, "CA.args_source")
	res = res .. CA.dropdown_func(1, "table_args_unknown_title", CA.testable_lister, CA.args_unknown, "CA.args_unknown")
	res = res .. CA.dropdown_func(1, "table_args_known_title", CA.testable_lister, CA.args_known, "CA.args_known")
	res = res .. CA.dropdown_func(1, "wikidata_arbitrary_access_title", CA.arbitrary_access_test)
	--
	res = res .. "<h3>*" .. CA.str_vars("internal_tests_h3_title") .. "</h3>"
	res = res .. "<br>* " .. CA.str_vars("internal_tests_title") .. "<br>"
	--
	res = res .. CA.dropdown_func(1, "options_from_mode_title", p.options_from_mode_test,
	{ boxstyle = "boxstyle", width = "80%", text_color="green", alignT="left", alignB="center", margin_all="3em", background_color="yellow", border_color="red", height="2em"} )
	res = res .. CA.dropdown_func(1, "options_from_args_title", p.options_from_args_test)
	res = res .. CA.dropdown_func(1, "versions_details_title", CA.versions.warning_versions_details )
	res = res .. CA.dropdown_func(1, "versions_manage_test_title", CA.versions.check_versions_test)
	res = res .. CA.dropdown_func(1, "date_to_part_test_title", CA.date_to_part_test)
	res = res .. CA.dropdown_func(1, "similar_args_test_title", CA.similar_args_test)
	res = res .. CA.dropdown_func(1, "levenshtein_test_title", CA.levenshtein_test)
	res = res .. CA.dropdown_func(1, "testable_lister_title", CA.testable_lister, CA.tablim, "CA.tablim", {} )
	res = res .. CA.dropdown_func(1, "testable_limit_title", CA.testable_lister, CA.tablim, "CA.tablim",
	{ boxstyle = "boxstyle", levelmaxi = 2, max_n = 2, exclude1 = "hou" }, {width = "88%", text_color = "blue"} )
	res = res .. CA.dropdown_func(1, "missing_translations_title", CA.verif_i18n, CA.i18n)
	res = res .. CA.dropdown_func(1, "combined_translations_title", CA.i18n_lister)
	res = res .. CA.dropdown_func(1, "dummy_languages_title", CA.dummy_languages)
	res = res .. CA.dropdown_func(1, "time_format_test_title", CA.time_format_test)
	res = res .. CA.dropdown_func(1, "cat_add_test_title", CA.cat_add_test)
	res = res .. CA.dropdown_func(1, "multiple_values_tests_title", CA.multiple_values_tests)
	res = res .. CA.dropdown_func(1, "multiple_selection_test_title", CA.multiple_selection_test)
	res = res .. CA.dropdown_func(1, "Time test table from wikidata time properties", CA.testable_lister, CA.TimeTest, "CA.TimeTest.claims." .. (CA.TimeName or "Pxxx") )
	return res
end -- function p.form_tests(args_final)

function CA.tests_time( if_view, res, time1, time2, time3, time4)
	-- Display example :
	-- Execution and test time : 2014-02-22 18:09:15 UTC , url = http://fr.wikisource.org/wiki/Module:ControlArgs/Documentation ,
	-- start = 84 mS , import + 8 mS , generate page + 0 mS , tests + 127 mS , total = 221 mS ControlArgs:tests:fr
	CA.time4 = os.clock()
	if not if_view then return "" end
	time1 = time1 or p.time1 or os.clock()
	time2 = time2 or p.time2 or time1
	time3 = time3 or p.time3 or time1
	time4 = time4 or p.time4 or time1
	if time2 < time1 then time2 = time1 end
	if time3 < time2 then time3 = time2 end
	if time4 < time3 then time4 = time3 end
	local nowtime = os.date("%Y-%m-%d %H:%M:%S")
	local mwtitle = mw.title.getCurrentTitle()
	local url = tostring(mwtitle:canonicalUrl( ))
	local time2d = time2 - time1
	local time3d = time3 - time2
	local time4d = time4 - time3
	local duration = time2d + time3d + time4d
	time1  = tostring(math.floor( time1	 * 1000 )) .. " mS"
	time2d = tostring(math.floor( time2d * 1000 )) .. " mS"
	time3d = tostring(math.floor( time3d * 1000 )) .. " mS"
	time4d = tostring(math.floor( time4d * 1000 )) .. " mS"
	duration = tostring(math.floor( duration * 1000 )) .. " mS"
	res = res or ""
	res = res .."\n* Execution and test time : " .. nowtime .. " UTC" .. p.ta("url", url) -- prefixedText
	res = res .. p.ta("<br>start in page", time1) .. p.ta("import", time2d, "+")
	res = res .. p.ta("form result", time3d, "+") .. p.ta("tests", time4d, "+") .. p.ta("duration", duration) .. "<br>"
	-- DEBUG wait for : T68051 Get the user language to help admins to maintain a module or a template (userInfo: String user and password)
	local mwuri = mw.uri.canonicalUrl(mwtitle.prefixedText, { host, authority, user, password, } )
--	res = res .. CA.ta("mwtitle.prefixedText", mwtitle.prefixedText) .. CA.ta("mwuri", mwuri)
	res = res .. CA.ta("host", tostring(mwuri.host)) .. CA.ta("authority", tostring(mwuri.authority))
	res = res .. CA.ta("user", tostring(mwuri.user)) .. CA.ta("user_language", tostring(mwuri.language))
	--	spaces_page_names_test : , mwtitle = Auteur:Nelson Mandela , nsText = Auteur , baseText = Nelson Mandela , url =
	-- subpageText: If this is a subpage, just the subpage name. Otherwise, the same as title.text.
	res = res .. CA.ta("text", tostring(mwtitle.text)) .. CA.ta("baseText", tostring(mwtitle.baseText))
	res = res .. CA.ta("rootText", tostring(mwtitle.rootText)) .. CA.ta("subpageText", tostring(mwtitle.subpageText))
	res = res .. "<br/>In this wiki: "
	res = res .. CA.ta("modules ns(828)", tostring(mw.site.stats.pagesInNamespace( 828 ) ) )
	res = res .. CA.ta("42 patrollers(patroller)", tostring(mw.site.stats.usersInGroup( "patroller" ) ) )
	res = res .. CA.ta("18 administrators (Rical ?) (sysop)", tostring(mw.site.stats.usersInGroup( "sysop" ) ) )
	res = res .. CA.ta("12 bots (bot)", tostring(mw.site.stats.usersInGroup( "bot" ) ) )
	res = res .. CA.ta("checkuser", tostring(mw.site.stats.usersInGroup( "checkuser" ) ) )
	res = res .. CA.ta("bureaucrats (bureaucrat)", tostring(mw.site.stats.usersInGroup( "autoconfirmed" ) ) )
	res = res .. CA.ta("0 (accountcreator)", tostring(mw.site.stats.usersInGroup( "accountcreator" ) ) )
	return res
end -- function p.tests_time( if_view, res, time1, time2, time3, time4)

------------------------------------------------------------
-- Running internal tests and their documentations.
-- Ejecución de las pruebas internas y su documentación.
-- Exécution des tests internes et de leurs documentations.
--
-- Errors are needed to test their detection. Do not correct them.
-- Errores se necesitan para probar su detección. No corregirlos se.
-- Les erreurs sont nécessaires pour tester leur détection. Ne pas les corriger.
------------------------------------------------------------

local args_test_errors = { "aaa", "bbb", "ccc", "ddd", ["prénom"] = "Arthur",
	options = ' docdef docview docsrc ', lastXXname = 'Voltaire', birthyear = '1999', birthyear = '2000',
} -- Arguments pour auto-test

------------------------------------------------------------
-- Arguments sources examples
--
-- Errors are needed to test their detection. Do not correct them.
-- Errores se necesitan para probar su detección. No corregirlos se.
-- Les erreurs sont nécessaires pour tester leur détection. Ne pas les corriger.
------------------------------------------------------------

p.WikidataEN = { label = "John Smith", deathyear = "1789",	country = "France" }

p.ArgtestEN = { "mode One", "Rimbaud 2", name = "Rimbaud", firstname = "Arnaud", rights = "70", deathyear = "MDCCCJL",	langue = "allemand,français,espagnol" }

p.ArgtestES = { nombre = "Rimbaud", apellido = "Arthur", optionsES = " ", derechoss = "70", anoMuerte = "MDCCCJL"}

p.ArgtestFR = { "mode Un", "Rimbaud 2", "Jonh", nom = "Smith", ["prénom"] = "Arnaud", anneeDeces = "1234", }

function p.trc(fn_mode, t)
	local res = ""
	-- to put in comment to desactivate
--	res = res .. "<br>* " .. t .. CA.ta("fn_mode", fn_mode) .. CA.ta("CA.mode_name", CA.mode_name) .. CA.ta("CA.mode_options", CA.mode_options) .. CA.ta("CA.invoke_options", CA.invoke_options)
	res = res .. CA.ta("trc CA", CA.str_vars("internal_tests_title")) .. CA.ta("MR", CA.str_vars("err_J_before_end")) .. CA.ta("AT", CA.str_vars("deathyear"))
	return res
end

function CA.options_from_mode(mode_name)
	-- mode_name = mode_name or (CA.args_final and CA.args_final.mode) or (CA.args_import and CA.args_import.mode) or p.mode_name or CA.mode_name or "normal"
	mode_name = mode_name or "normal"
	local mode_options = ""
	if CA.options_for_modes and CA.options_for_modes[mode_name] then mode_options = CA.options_for_modes[mode_name] end
--	CA.mode_options = mode_options
	return mode_options, mode_name
end

function p.options_from_mode_test(t)
	local t = "options_from_mode_test:" or t
	for md, opt in pairs(CA.options_for_modes) do t = t .. "<br>- " .. CA.ta(md, opt) end
	t = t .. CA.Th() .. CA.Tc("Mode") .. CA.Tc("List of options") .. CA.Tc("noerr value") .. CA.Tc("docview value") .. CA.Tc("tests value")
	local function test_options_from_mode(md, op1, op2, op3)
		local opstest = p.options_from_mode(md) or ""
		return CA.Tr() .. CA.Td(md) .. CA.Td(opstest) .. CA.Td(CA.option(op1, opstest)) .. CA.Td(CA.option(op2, opstest)) .. CA.Td(CA.option(op3, opstest))
	end
	t = t .. "<br>options_from_mode_test:"
	t = t .. test_options_from_mode("normal", "noerr", "docview", "tests")
	t = t .. test_options_from_mode("edit", "noerr", "docview", "tests")
	t = t .. test_options_from_mode("tests", "noerr", "docview", "tests")
	t = t .. CA.Te()
	return t
end

function CA.get_arg_mode(mode_name, source_key, try_lang, args_source)
	local mode_key = "mode"
	args_source = args_source or CA.args_source
	try_lang = try_lang or tostring(mw.language.getContentLanguage().code) or "en"
	local i18n_lang = CA.i18n[try_lang] or CA.i18n[tostring(mw.language.getContentLanguage().code)] or CA.i18n["en"]
	source_key = source_key or i18n_lang[mode_key] or mode_key -- translation of the mode_key "mode" in wiki language
	mode_name = mode_name or args_source[source_key] or "normal"
	CA.mode_name = mode_name or CA.mode_name or "normal"
	return mode_name, source_key, try_lang
end

-- Display the documentation in an infobox, similar to edit-boxs
-- Affichage de documentation dans un cadre (box), semblable aux boites d'edition
function p.formDocBox(args_final)
	-- p.options = " : docdata docmin docdef docmax docline docsrc docview docafter docnotice docsrc" -- for documentation
	-- p.options = " erron noerr nobox " -- without normal result
	-- p.options = " debug tests en es fr " -- for debug or enforce language
	if type(args_final) ~= "table" then args_final = CA.args_final end -- optional arguments
	local err = CA.verify_args_tables(CA.args_known, CA.args_source)
	if err then return err end
	res = ""
	res = res .. CA.error_color("<center><b>" .. CA.str_vars("err_delete_docbox") .. "</b><br/></center>")
	res = res .. CA.dropdown_func(1, CA.versions.warning_short() .. CA.str_vars("actual_versions_title"), CA.versions.warning_report )
--	res = res .. CA.dropdown_func(1, "Module Author: warning_versions_details", CA.versions.warning_versions_details )
--	p.docbox_namespace_error_and_cat()
--	res = res .. "<br/> " .. CA.user_wiki_lang
--	res = res .. "<small><br/>" .. CA.all_versions_text("formDocBox", versions.all_versions) .. "</small>"
	if CA.docolor then res = res .. "\n:.\n: " .. CA.sources_of_datas_colors() end
	if CA.option("debug")		then res = res .. "\n*" .. CA.ta("CA.catView", CA.catView) .. CA.ta("p.invoke_options", p.invoke_options) .. CA.ta("p.mode_options", p.mode_options) end
	if CA.option("docdata")		then res = res .. "\n*" .. CA.generDoc(" docdef docline ", CA.args_wikidata, "Wikidata") end
	if CA.option("docview")		then res = res .. "\n*" .. CA.generDoc("", args_final, "Arguments") end
	if not CA.option("noerr")	then res = res .. "\n*" .. CA.errors_lister() end
	res = res .. "\n* " .. CA.categories_lister(":")
	res = '<div style=" width=90%; border: 1px solid #AAAAAA; margin:1em; background-color:#F1F1F1; padding:0.3em; ">' .. res .. '</div>'
	return res
end -- function p.formDocBox(args_final)

-- Normal result of the module
-- Resultado normal del módulo
-- Résultat normal du module
function p.form_result(args_final)
	if type(args_final) ~= "table" then args_final = CA.args_final end -- optional arguments
	local res = ""
--	res = res .. CA.dropdown_func(1, "cat_add_test_title", CA.cat_add_test)
	p.gener_categories(args_final) -- Produire les catégories sans les activer
	if CA.option("docview") then res = res .. p.formDocBox(args_final) end
	if not CA.option("nobox") then res = res .. p.normal_box(args_final) end
	-- Display categories. Afficher les catégories.
	if ( not CA.option("nobox") ) and ( CA.option("catview") or CA.option(":") ) then res = res .. CA.categories_lister(":") end
	CA.time3 = os.clock()
	if CA.option("tests") or CA.args_final.mode == "tests" then res = res .. p.form_tests() end
	CA.time4 = os.clock()
	if CA.option("tests") or CA.args_final.mode == "tests" then res = res .. CA.tests_time(true, "") end
	return res
end -- function p.form_result(args_final)

------------------------------------------------------------
------------------------------------------------------------
-- Interfaces, alias and functions to templates
-- Interfaces, alias y funciones para modelos
-- Interfaces, allias et fonctions pour les modèles
------------------------------------------------------------
------------------------------------------------------------

CA.options_for_modes = { -- default init
	normal	= " noerr ",
	edit	= " : catview docview docdef docline docsrc docdata ",
	doc1	= " nobox noerr nocat ",
	tests	= " : catview docview docdef docline docsrc docdata tests ",
	-- Option nocat means "Do not categorize and do not show categories."
}

-- Basic use, only translate and verify arguments, without use of options, modes and resulting text
-- Uso básico, sólo traducir y verificar argumentos, sin el uso de opciones, modos y texto resultante
-- Utilisation de base, seulement traduire et vérifier les arguments, sans utilisation d'options, modes et texte résultant
function p.base(frame, mode_name, args_known_default, doc1_id)
	-- The base function only imports, translates and verifies arguments.
	-- It imports arguments from wikidata, module and template with increasing priorities.
	local res = ""
	CA.time1 = os.clock()
	CA.frame = frame
	args_known_default = args_known_default or CA.args_known_default
	CA.add_i18n_track_txt = " "
	local t, tbl = CA.get_arg_mode(mode_name, source_key, try_lang, args_source)
	--
--	CA.trac_lang("base1", CA.args_source) --
	local t, tbl = CA.versions.init_i18n()
	CA.add_i18n_track_txt = CA.add_i18n_track_txt .. (t or "")
--	res = res .. CA.add_i18n_track_txt
	CA.module_init(frame)
	local args_source = CA.args_source
--	CA.categories_init() -- initialize the category list
	CA.verif_i18n()
	p.errors_list = {} -- Table to collect errors and messages
	local source_mode_name = CA.get_arg_mode()
	--
	CA.args_source.id = "Q21157618" -- Charles Maumené
--	args_source.id = "Q131671" -- Xénophane
	--
	CA.init_args(args_known_default, CA.args_source, lang, msgs_list)
	local doc1_doc = CA.args_source.dockey or CA.args_source[1]
	local doc1_id = CA.args_source.entityid or CA.args_source.id or CA.args_source[2]
	CA.args_wikidata, t = CA.import_wikidata(CA.args_known, doc1_id)
--	res = res .. p.trc(mode_name, "after import_wikidata")
	CA.args_import, t = CA.import_arguments(args_known_default, CA.args_source )
--	CA.trac_lang("CA.import_arguments:", CA.args_import) -- DEBUG
	--
	CA.time2 = os.clock()
	if type(CA.args_import.c) == "string" then
		CA.invoke_options = CA.args_import.c
	end
	if type(CA.args_import.mode) == "string" then
		mode_name = CA.args_import.mode
	end
--	res = res .. p.trc(mode_name, "after args_import")
	if CA.args_import then
		-- en : initialize or change the user and the wiki languages and their tables
		CA.init_wiki_user_lang(CA.args_import.wikilang, CA.args_import.userlang) -- CA.wiki_lang)
	end
--	CA.trac_lang("base CA.init_user_lang", CA.args_import) --
	CA.invoke_options = CA.args_import.c or ""
	CA.mode_options = p.options_from_mode(source_mode_name or mode_name)
--	res = res .. p.trc(mode_name, "base options_from_mode")
--	CA.trac_lang("base CA.options_from_mode end", CA.args_import) --
--	res = res .. CA.track_i18n_vers
--	res = res .. "<br>" .. CA.versions.warning_versions_details()
	return res
end -- function p.base(frame, mode_name, args_known_default)

function p.normal(frame)
	-- The normal function imports, translates and verifies arguments.
	-- It generates normal text and uses options to include edit or tests
	local res, t = "", ""
	res = res .. p.base(frame, "normal", p.args_known_default)
	CA.args_final = CA.interact_args_final(CA.args_import) -- Interactions between argumensts
--	CA.init_user_lang() -- ("en", "es")
	CA.time3 = os.clock()
--	res = res .. CA.trac_lang_t
	res = res .. p.form_result()
--	CA.trac_lang("normal args_final", CA.args_final) --
	res = res .. CA.trac_lang_t
	if CA.args_final and (CA.args_final.selectversions or CA.args_final.allversions) then -- version select from arguments
		res = res .. CA.versions.warning_report("Track if args_final selectversions or allversions. ")
	end
	res = res .. CA.trac_lang_t
	t = t .. "<br>" .. CA.table_count("args_source")
	return res
end -- function p.normal(frame)

function p.doc(frame) return p.edit(frame) end -- alias function
function p.edit(frame)
	-- The edit function imports, translates and verifies arguments.
	-- It generates edit panel and normal text.
	local res, t = "", ""
	res = res .. p.base(frame, "edit", p.args_known_default)
	CA.args_final = CA.interact_args_final(CA.args_import) -- Interactions between argumensts
--	CA.trac_lang("edit args_final", CA.args_final) --
--	CA.init_user_lang() -- ("en", "es")
--	CA.trac_lang("edit init_user_lang", CA.args_final) --
	res = res .. p.formDocBox()
	CA.time3 = os.clock()
	res = res .. p.form_result(CA.args_final)
--	CA.trac_lang("form_result args_final", CA.args_final) --
	res = res .. CA.trac_lang_t
	res = res .. CA.tests_time(true, "")
	return res
end -- function p.edit(frame)

function CA.wikidata_any_page_test(doc1_doc, doc1_id) -- Import datas for any page
	local wd, tw, wd_mng = p.import_wikidata(CA.args_known, doc1_id) -- p.args_known, id) -- example Q535 = Victor Hugo = Victor Marie Hugo
	local args_import, tx = CA.import_arguments() -- p.args_known_default, CA.args_source )
	if wd_mng and wd_mng.wd_entity and wd_mng.wd_entity.id then
		t = "\n* " .. CA.str_vars("wikidata_arbitrary_access_text")
		.. (wd_mng.wd_id or "") .. ", " .. (wd_mng.label or "") .. " ( " .. (wd.birthyear or "") .. " - " .. (wd.deathyear or "") .. " ) "
		local structured_data_txt = CA.str_vars("structured_data_txt")
		t = t .. ' <span style="color:#232388; font-size:140%; line-height:120%; ">⦁&nbsp;&nbsp;</span>[[d:' .. wd_mng.wd_entity.id .. '|' .. structured_data_txt .. ']]'
		t = t .. ", " .. (wd_mng.props_maxn or "") .. " properties."
		t = t .. "\n* Asked properties: " .. tw
	--	t = t .. "\n* Properties number maxn: " .. (wd_mng.props_maxn or "")
	else
		t = "<br>* No arbitrary access for: " .. tostring(id)
	end
	return t
end -- function CA.wikidata_any_page_test(doc1_doc, doc1_id)

function p.doc1(frame)
	-- Form as documentation, a test in a dropbox.
	local res, t = "", ""
	res = res .. p.base(frame, "doc1", p.args_known_default)
--	CA.args_selected, p.selected_autorities, p.authorities_from_args = p.authorities_select()
	CA.args_final = p.interact_args_final(CA.args_import) -- Interactions between argumensts
	local doc1_doc = CA.args_source.dockey or CA.args_source[1]
	local doc1_id = CA.args_source.entityid or CA.args_source.id or CA.args_source[2]
	--[[
	local function is_id(x) -- Verify the wikidata item format "Q12345".
		if type(x) == "string" then
			local Q = string.upper( string.sub(x, 1, 1) )
			local N = tonumber(string.sub(x, 2, -1) )
		end
		return x and (Q == "Q") and (type(N) == "number")
	end -- wikidata_details_test_title
	local templat = frame:getParent().args -- arguments from template
	local invoked = frame.args -- arguments from #invoked module
	if not is_id( doc1_id ) then
		res = res .. "<br>** missing_entityid ** " .. t .. CA.ta("doc1_doc" ,doc1_doc) .. CA.ta("doc1_id" ,doc1_id) 
		.. CA.ta("Template 1", (templat[1] or "-") .. ", 2=" .. (templat[2] or "-") .. ", 3=" .. (templat[3] or "-") ) .. ") , ("
		.. CA.ta("#invoke  1", (invoked[1] or "-") .. ", 2=" .. (invoked[2] or "-") .. ", 3=" .. (invoked[3] or "-") ) .. ") "
	--	doc1_doc = "tables_count_title"
	end
	--]]
	CA.time3 = os.clock()
	local doc1_list = {
		actual_versions_title			= CA.dropdown_func(1, CA.versions.warning_short() .. CA.str_vars("actual_versions_title"), CA.versions.warning_report ),
		versions_details_title			= CA.dropdown_func(1, "versions_details_title", CA.versions.warning_versions_details ),
		used_options_title				= CA.dropdown_func(1, "used_options_title", CA.used_options_list),
		tables_count_title				= CA.dropdown_func(1, "tables_count_title", CA.tables_counts),
		list_all_args_title				= CA.dropdown_func(1, "list_all_args_title", CA.list_all_args),
		wikidata_details_test_title		= CA.dropdown_func(1, "wikidata_details_test_title", CA.wikidata_details_test),
		wikidata_any_page_title			= CA.dropdown_func(1, "wikidata_any_page_title", CA.wikidata_any_page_test, doc1_doc, doc1_id), -- lng
		spaces_page_names_title			= CA.dropdown_func(1, "spaces_page_names_title", CA.spaces_page_names_test),
		table_args_source_title			= CA.dropdown_func(1, "table_args_source_title", CA.testable_lister, CA.args_source, "CA.args_source"),
		table_args_unknown_title		= CA.dropdown_func(1, "table_args_unknown_title", CA.testable_lister, CA.args_unknown, "CA.args_unknown"),
		table_args_known_title			= CA.dropdown_func(1, "table_args_known_title", CA.testable_lister, CA.args_known, "CA.args_known"),
		options_from_mode_title			= CA.dropdown_func(1, "options_from_mode_title", p.options_from_mode_test,
		{ boxstyle = "boxstyle", width = "77%", text_color="green", alignT="center", alignB="left", margin_all="3em", background_color="yellow", border_color="red", height="2em"} ),
		options_from_args_title			= CA.dropdown_func(1, "options_from_args_title", p.options_from_args_test),
		versions_manage_test_title		= CA.dropdown_func(1, "versions_manage_test_title", CA.versions.check_versions_test),
		date_to_part_test_title			= CA.dropdown_func(1, "date_to_part_test_title", CA.date_to_part_test),
		similar_args_test_title			= CA.dropdown_func(1, "similar_args_test_title", CA.similar_args_test),
		levenshtein_test_title			= CA.dropdown_func(1, "levenshtein_test_title", CA.levenshtein_test,
		{ boxstyle = "boxstyle", width = "88%", text_color = "#4488CC", margin_bottom="55px"} ),
		testable_lister_title			= CA.dropdown_func(1, "testable_lister_title", CA.testable_lister, CA.tablim, "CA.tablim", {} ),
		testable_limit_title			= CA.dropdown_func(1, "testable_limit_title", CA.testable_lister, CA.tablim, "CA.tablim",
		{ boxstyle = "boxstyle", levelmaxi = 2, max_n = 2, exclude1 = "hou" } ),
		missing_translations_title		= CA.dropdown_func(1, "missing_translations_title", CA.verif_i18n, CA.i18n),
		combined_translations_title		= CA.dropdown_func(1, "combined_translations_title", CA.i18n_lister),
		dummy_languages_title			= CA.dropdown_func(1, "dummy_languages_title", CA.dummy_languages),
		time_format_test_title			= CA.dropdown_func(1, "time_format_test_title", CA.time_format_test),
		cat_add_test_title				= CA.dropdown_func(1, "cat_add_test_title", CA.cat_add_test),
		wikidata_arbitrary_access_title = CA.dropdown_func(1, "wikidata_arbitrary_access_title", CA.arbitrary_access_test),
	}
	local doc1_txt = doc1_list[doc1_doc]
	res = res .. (doc1_txt or "doc1_txt missing ")
	return res
end -- function p.doc1(frame)

function p.tests(frame)
	local res, t = "", ""
	res = res .. p.base(frame, "tests", p.args_known_default)
	CA.args_final = CA.interact_args_final(CA.args_final) -- Interactions between argumensts
	p.form_tests_init()
	CA.args_final.mode = "tests"
	CA.mode_name = "tests"
	CA.mode_options = " : docdata docdef docview docline docsrc tests"
	local res_function = "<br>* " .. CA.versions.version .. ":" .. CA.mode_name .. ":" .. CA.wiki_lang .. " "
	local res_function = "<br/>\n" .. (CA.versions.main_versionName or "MainModule_t") .. " " .. (CA.versions.main_versionNumber or "0.0_t") .. ":" .. CA.mode_name .. ":" .. CA.wiki_lang .. " "
--	CA.init_user_lang("en", "es")
--	CA.trac_lang("init_user_lang en/es", CA.args_final) --
	res = res .. res_function .. " Begin:" .. "<br>"
	local loaded_modules, loaded_tab, modu = CA.versions.loaded_modules()
	CA.loaded_modules_track = "p.tests : " .. loaded_modules
	res = res .. "<br>" .. CA.loaded_modules_track -- DEBUG
--	versions.warning = versions.warning or " -warning- "
--	versions.tree = versions.tree or " -tree- "
--	res = res .. "<b><b>Résumé</b></b><small><small>" .. versions.warning .. "<br>p.tests" .. CA.all_versions_text() .. "</small></small><br>" .. versions.tree
	CA.time3 = os.clock()
	res = res .. p.form_result() -- Generate normal wikitext, categories, and others
--	CA.trac_lang("form_result", CA.args_final) --
	res = res .. res_function .. " End." .. "<br>"
	res = res .. CA.trac_lang_t
--[ [
--	if 1 < 2 then return res end
	res = res .. "<br>* <b>funct = doc1, [1] = missing_translations_title</b>"
						.. "<br><nowiki>{{#invoke:ControlArgs|doc1|missing_translations_title}}</nowiki> "
	res = res .. frame:preprocess(	   "{{#invoke:ControlArgs|doc1|missing_translations_title}}")
	--
	res = res .. "<br>* <b>funct = doc1, [1] = options_from_mode_title</b>"
						.. "<br><nowiki>{{#invoke:ControlArgs|doc1|options_from_mode_title}}</nowiki> "
	res = res .. frame:preprocess(	   "{{#invoke:ControlArgs|doc1|options_from_mode_title}}")
	--
	res = res .. "<br>* <b>funct = doc1, [1] = used_options_title</b>"
						.. "<br><nowiki>{{#invoke:ControlArgs|doc1|used_options_title}}</nowiki> "
	res = res .. frame:preprocess(	   "{{#invoke:ControlArgs|doc1|used_options_title}}")
	--
	res = res .. "<br>* <b>funct = doc1, [1] = wikidata_any_page_title, [2] = wikidata ID</b>"
						.. "<br><nowiki>{{#invoke:ControlArgs|doc1|wikidata_any_page_title|Q535}}</nowiki> "
	res = res .. frame:preprocess(	   "{{#invoke:ControlArgs|doc1|wikidata_any_page_title|Q535}}")
	--
	res = res .. "<br>* <b>funct = doc1, [1] = versions_details_title</b>"
						.. "<br><nowiki>{{#invoke:ControlArgs|doc1|versions_details_title}}</nowiki> "
	res = res .. frame:preprocess(	   "{{#invoke:ControlArgs|doc1|versions_details_title}}")
	--] ]
	return res
end -- function p.tests(frame)

return p