summaryrefslogtreecommitdiff
path: root/macros/generic/systeme
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/generic/systeme
Initial commit
Diffstat (limited to 'macros/generic/systeme')
-rw-r--r--macros/generic/systeme/README27
-rw-r--r--macros/generic/systeme/systeme.sty5
-rw-r--r--macros/generic/systeme/systeme.tex689
-rw-r--r--macros/generic/systeme/systeme_fr.pdfbin0 -> 454193 bytes
-rw-r--r--macros/generic/systeme/systeme_fr.tex421
5 files changed, 1142 insertions, 0 deletions
diff --git a/macros/generic/systeme/README b/macros/generic/systeme/README
new file mode 100644
index 0000000000..d7310e3496
--- /dev/null
+++ b/macros/generic/systeme/README
@@ -0,0 +1,27 @@
+ L'extension
+ systeme
+
+ v0.32
+
+ 13 janvier 2019
+
+Author : Christian Tellechea
+Email : unbonpetit@netc.fr (CT)
+ Commentaires, signalements de bugs et
+ suggestions bienvenus
+Licence : Released under the LaTeX Project Public License v1.3c or
+ later, see http://www.latex-project.org/lppl.txt
+
+----------------------------------------------------------------------
+ R\'esum\'é
+
+Cette extension permet d'entrer un syst\`eme d'\'equations ou
+d'in\'egalit\'es lin\'éaires sous forme intuitive et d'obtenir un
+rendu o\`u les termes et les signes sont align\'es verticalement
+
+----------------------------------------------------------------------
+ Abstract
+
+This package allows you to enter systems of linear equations or
+inequalities in a intuitive way, and produces output where the terms
+and signs are aligned vertically.
diff --git a/macros/generic/systeme/systeme.sty b/macros/generic/systeme/systeme.sty
new file mode 100644
index 0000000000..a86309a80f
--- /dev/null
+++ b/macros/generic/systeme/systeme.sty
@@ -0,0 +1,5 @@
+\def\SYSstyfile{0}
+\RequirePackage{xstring}
+\input systeme.tex
+\ProvidesPackage\SYSname[\SYSdate\space v\SYSver\space Mise en forme de systemes d'equations (CT)]
+\endinput \ No newline at end of file
diff --git a/macros/generic/systeme/systeme.tex b/macros/generic/systeme/systeme.tex
new file mode 100644
index 0000000000..9bda0ef046
--- /dev/null
+++ b/macros/generic/systeme/systeme.tex
@@ -0,0 +1,689 @@
+% !TeX encoding = ISO-8859-1
+% Ce fichier contient le code de l'extension "systeme"
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% %
+\def\SYSname {systeme} %
+\def\SYSver {0.32} %
+% %
+\def\SYSdate {2019/01/13} %
+% %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% %
+% Author : Christian Tellechea %
+% Status : Maintained %
+% Email : unbonpetit@netc.fr %
+% Package URL: https://www.ctan.org/pkg/systeme %
+% Bug tracker: https://framagit.org/unbonpetit/systeme/issues %
+% Repository : https://framagit.org/unbonpetit/systeme/tree/master %
+% Copyright : Christian Tellechea 2011-2019 %
+% Licence : Released under the LaTeX Project Public License v1.3c %
+% or later, see http://www.latex-project.org/lppl.txt %
+% Files : 1) systeme.tex %
+% 2) systeme.sty %
+% 3) systeme-fr.tex %
+% 4) systeme-fr.pdf %
+% 5) README %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\unless\ifdefined\SYSstyfile
+ \immediate\write-1 {Package: \SYSname\space\SYSdate\space\space v\SYSver\space\space Saisie naturelle de systemes d'equations}%
+\fi
+
+\expandafter\edef\csname SYS_restorecatcode\endcsname{\catcode\number`\_=\number\catcode`\_\relax}
+\catcode`\_11
+
+\begingroup
+ \catcode`\_8
+ \gdef\SYSunder{_}
+\endgroup
+
+\unless\ifdefined\xstringversion
+ \def\SYS_nextaction{\input xstring.tex\relax}%
+ \expandafter\SYS_nextaction
+\fi
+
+\newtoks\SYS_systemecode
+\newtoks\SYS_systempreamble
+
+\newif\ifSYS_firstterm
+\newif\ifSYS_sortvariable
+\newif\ifSYS_star
+\newif\ifSYS_extracol
+\newif\ifSYS_autonum
+\newif\ifSYS_followautonum
+\newif\ifSYS_constterm
+
+\newcount\SYSeqnum
+
+\long\def\SYS_execarg#1{#1}
+\long\def\SYS_gobtwoargs#1#2{}
+\def\SYS_addtotok#1#2{#1\expandafter{\the#1#2}}
+\def\SYS_expaddtotok#1#2{\xs_exparg{\SYS_addtotok#1}{#2}}
+\def\SYS_addtotab{\SYS_addtotok\SYS_systemecode}
+\def\SYS_cslet#1{\expandafter\let\csname#1\endcsname}
+\def\SYS_letcs#1#2{\expandafter\let\expandafter#1\csname#2\endcsname}
+\def\SYS_firstinlist#1,#2\_nil{#1}
+\def\SYS_removefirstinlist#1,{}
+\def\SYS_ifinstr#1#2{%
+ \def\SYS_ifinstr_i##1#2##2\_nil{\xs_ifempty{##2}\xs_execsecond\xs_execfirst}%
+ \SYS_ifinstr_i#1\__nil#2\_nil
+}
+
+\ifdefined\usepackage\else% on n'utilise pas LaTeX ?
+ \newskip\normalbaselineskip
+ \normalbaselineskip=12pt
+\fi
+
+% définit ce qu'est le séparateur des équations par défaut
+\def\syseqsep{\def\SYS_defaulteqsep}
+\syseqsep{,}
+
+% définit le coefficient pour l'espacement interligne
+\def\syslineskipcoeff{\def\SYS_lineskipcoeff}
+\syslineskipcoeff{1.25}
+
+% définit le signe qui marquera une colonne supplémentaire à droite du tableau
+\def\sysextracolsign{\def\SYS_extracolsign}
+\xs_exparg\sysextracolsign{\string @}% on définit l'arobas avec le bon catcode.
+
+% définit ce qui sera inséré au début et à la fin de la colonne supplémentaire
+\def\syscodeextracol#1#2{\def\SYS_extracolstart{#1}\def\SYS_extracolend{#2}}
+\syscodeextracol{\kern1.5em$}{$}
+
+\def\sysreseteqnum{\global\SYSeqnum0 }
+
+% définit l'autonumérotation
+\def\sysautonum{%
+ \xs_ifstar
+ {\SYS_followautonumtrue\SYS_autonum}
+ {\SYS_followautonumfalse\SYS_autonum}%
+}
+
+\def\SYS_autonum#1{%
+ \xs_ifempty{#1}
+ {\SYS_extracolfalse
+ \SYS_autonumfalse
+ }
+ {\SYS_extracoltrue
+ \SYS_autonumtrue
+ \def\SYS_autonumarg{#1}%
+ }%
+}
+
+% dimension qui sera ajoutée à la hauteur et à la profondeur du strutup ou strutdown
+% inséré à la première et la dernière équation
+\def\SYS_extrastrutdim{1.5pt}
+
+% liste des signes devant être compris comme signe d'égalité séparant les 2 membres de l'équation
+\def\SYS_equalsignlist{<=,>=,=,<,>,\leq,\geq,\leqslant,\geqslant}
+
+\def\sysaddeqsign#1{%
+ \saveexpandmode\expandarg
+ \IfSubStr{\expandafter,\SYS_equalsignlist,}{,#1,}
+ {}
+ {\xs_exparg{\def\SYS_equalsignlist}{\SYS_equalsignlist,#1}}%
+ \restoreexpandmode
+}
+
+% enlève l'item #2 de la sc #1 qui contient une liste
+\def\SYS_removeiteminlist#1#2{%
+ \saveexpandmode\expandarg
+ \IfSubStr{\expandafter,#1,}{,#2,}
+ {\StrSubstitute{\expandafter\_nil\expandafter,#1,\_nil}{,#2,},[#1]%
+ \StrDel#1{\noexpand\_nil,}[#1]%
+ \StrDel#1{,\_nil}[#1]%
+ }%
+ {}%
+ \restoreexpandmode
+}
+
+\def\sysremoveeqsign#1{%
+ \SYS_removeiteminlist\SYS_equalsignlist{#1}%
+ \SYS_removeiteminlist\SYS_equivsignlist{#1}%
+}
+
+% définit le signe d'égalité #1 comme devant être remplacé par #2 lors de l'affichage
+\def\sysequivsign#1#2{%
+ \IfSubStr\SYS_equivsignlist{\noexpand#1,}
+ {}
+ {\xs_exparg{\def\SYS_equivsignlist}{\SYS_equivsignlist#1,}}%
+ \expandafter\def\csname SYS_equivsign_\string#1\endcsname{#2}%
+}
+
+\def\SYS_equivsignlist{}
+
+\sysequivsign{<=}\leq
+\sysequivsign{>=}\geq
+
+% #1 est l'équation courante. La macro la sépare en 2 membres -> \SYS_leftmember et \SYS_rightmember
+% le signe de séparation entre les 2 membres se trouve dans \SYS_currenteqsign
+\def\SYS_splitinmembers#1{%
+ \def\SYS_leftmember{#1}%
+ \let\SYS_currenteqsign\empty
+ \let\SYS_rightmember\empty
+ \xs_exparg\SYS_splitinmembers_i{\SYS_equalsignlist,}% parcourt \SYS_equalsignlist pour séparer en 2 membres
+ \IfSubStr{\expandafter,\SYS_equivsignlist}{\expandafter,\SYS_currenteqsign,}% si le signe est dans la liste des substitutions
+ {\SYS_letcs\SYS_currenteqsign{SYS_equivsign_\detokenize\expandafter{\SYS_currenteqsign}}}% le remplacer
+ {}%
+}
+
+% #1 est la liste des signes d'égalité
+\def\SYS_splitinmembers_i#1{%
+ \xs_ifempty{#1}
+ {}
+ {\IfSubStr\SYS_leftmember{\SYS_firstinlist#1\_nil}% si l'équation contient un des signes
+ {\xs_exparg{\def\SYS_currenteqsign}{\SYS_firstinlist#1\_nil}% sauvagarde le signe
+ \StrBehind\SYS_leftmember\SYS_currenteqsign[\SYS_rightmember]% procède à la séparation
+ \StrBefore\SYS_leftmember\SYS_currenteqsign[\SYS_leftmember]% en deux membres
+ }%
+ {\xs_exparg\SYS_splitinmembers_i{\SYS_removefirstinlist#1}% sinon, recommencer en enlevant le 1er signe
+ }%
+ }%
+}
+
+% analyse une équation et la découpe en termes et signes
+\def\SYS_spliteqinterms#1{%
+ \IfSubStr{\noexpand#1}\SYS_extracolsign% y a t-il un signe de colonne supplémentaire ?
+ {\StrBefore{\noexpand#1}\SYS_extracolsign[\SYS_leftmember]%
+ \StrBehind{\noexpand#1}\SYS_extracolsign[\SYS_rightmember]%
+ \SYS_cslet{SYS_extracol_\SYS_eqnumber}\SYS_rightmember
+ \SYS_extracoltrue
+ }%
+ {\def\SYS_leftmember{#1}%
+ }%
+ \xs_exparg\SYS_splitinmembers{\SYS_leftmember}% trouver les membres de gauche et droite et le signe qui les sépare
+ \xs_ifx{\SYS_currenteqsign\empty}
+ {}%
+ {\SYS_cslet{SYS_eqsign_\SYS_eqnumber}\SYS_currenteqsign}% stocker ce signe s'il existe
+ \IfBeginWith\SYS_leftmember\space
+ {\StrGobbleLeft\SYS_leftmember1[\SYS_leftmember]}
+ {}% pas d'espace pour commencer le membre de gauche
+ \IfBeginWith\SYS_leftmember+% amputer le membre de gauche du premier signe et le stocker temporairement s'il existe et sinon...
+ {\StrSplit\SYS_leftmember1\SYS_currentsign\SYS_leftmember
+ }%
+ {\IfBeginWith\SYS_leftmember-%
+ {\StrSplit\SYS_leftmember1\SYS_currentsign\SYS_leftmember}%
+ {\def\SYS_currentsign{+}}% ce signe est "+"
+ }%
+ \SYS_spliteqinterms_i1%
+ \SYS_cslet{SYS_right_\SYS_eqnumber}\SYS_rightmember
+}
+
+\def\SYS_spliteqinterms_i#1{%
+ \StrPosition\SYS_leftmember+[\SYS_posplus]%
+ \StrPosition\SYS_leftmember-[\SYS_posminus]%
+ \xs_ifnum{\numexpr\SYS_posplus+\SYS_posminus=0 }% il n'y a ni "+" ni "-"
+ {\let\SYS_currentterm\SYS_leftmember% prendre tout ce qui reste
+ \SYS_assignterm% et assigner ce dernier terme avec le dernier signe trouvé
+ }
+ {\edef\SYS_nextsign{\ifnum\SYS_posplus=0 -\else\ifnum\SYS_posminus=0 +\else\ifnum\SYS_posplus<\SYS_posminus+\else-\fi\fi\fi}% décider de ce qu'est le prochain signe
+ \StrBefore\SYS_leftmember\SYS_nextsign[\SYS_currentterm]% prendre ce qu'il y a avant
+ \StrBehind\SYS_leftmember\SYS_nextsign[\SYS_leftmember]% et stocker ce qu'il y a ensuite pour après
+ \SYS_assignterm% assigner ce qu'il y a avant avec le dernier signe trouvé
+ \let\SYS_currentsign\SYS_nextsign% on continue, le prochain signe devient le signe courant
+ \xs_exparg\SYS_spliteqinterms_i{\number\numexpr#1+1}%
+ }%
+}
+
+\def\SYS_assignterm{%
+ \xs_exparg\SYS_findletter{\SYS_currentterm}% trouver le nom de la variable
+ \xs_ifx{\SYS_letterfound\empty}
+ {\SYS_consttermtrue
+ \ifcsname SYS_term_const_\SYS_eqnumber\endcsname% si terme constant déjà rencontré, l'ajouter à celui qui existe
+ \xs_eaddtomacro\SYS_currentsign\SYS_currentterm
+ \expandafter\xs_eaddtomacro\csname SYS_term_const_\SYS_eqnumber\endcsname{\SYS_currentsign}%
+ \else
+ \SYS_cslet{SYS_sign_const_\SYS_eqnumber}\SYS_currentsign% sinon procéder aux assignations
+ \SYS_cslet{SYS_term_const_\SYS_eqnumber}\SYS_currentterm
+ \fi
+ }
+ {\ifcsname SYS_term_\detokenize\expandafter{\SYS_letterfound}_\SYS_eqnumber\endcsname
+ \errmessage{Package systeme Error: l'inconnue "\detokenize\expandafter{\SYS_letterfound}" a deja ete trouvee dans l'équation !}%
+ \fi
+ \ifSYS_sortvariable
+ \SYS_insletter\SYS_letterfound% l'insérer si besoin dans la liste ordonnée des variables
+ \fi
+ \SYS_cslet{SYS_sign_\detokenize\expandafter{\SYS_letterfound}_\SYS_eqnumber}\SYS_currentsign% procéder aux assignations
+ \SYS_cslet{SYS_term_\detokenize\expandafter{\SYS_letterfound}_\SYS_eqnumber}\SYS_currentterm
+ }%
+}
+
+% cherche la première lettre minuscule dans #1
+\def\SYS_findletter#1{%
+ \saveexploremode\exploregroups
+ \StrRemoveBraces{#1}[\SYS_currentfindletter]%
+ \let\SYS_letterfound\empty
+ \SYS_findletter_i
+ \restoreexploremode
+}
+
+\def\SYS_findletter_i{%
+ \StrSplit\SYS_currentfindletter1\SYS_currentchar\SYS_currentfindletter
+ \ifSYS_sortvariable% si le tri auto est activé
+ \ifcat\relax\expandafter\noexpand\SYS_currentchar
+ \let\SYS_nextaction\xs_execsecond% faux si c'est une sc
+ \else
+ \xs_ifnum{\expandafter`\SYS_currentchar<`a }
+ {\let\SYS_nextaction\xs_execsecond% pas une lettre minuscule
+ }
+ {\xs_ifnum{\expandafter`\SYS_currentchar>`z }
+ {\let\SYS_nextaction\xs_execsecond% pas une lettre minuscule
+ }
+ {\SYS_testsubscript% tester s'il y a un indice
+ \let\SYS_nextaction\xs_execfirst
+ }%
+ }%
+ \fi
+ \else
+ \noexploregroups
+ \IfSubStr\SYS_letterlist\SYS_currentchar% ce qui est trouvé est dans la liste ?
+ {\SYS_testsubscript% tester s'il y a un indice après le caractère courant
+ \let\SYS_nextaction\xs_execfirst
+ }%
+ {\let\SYS_nextaction\xs_execsecond
+ }%
+ \exploregroups
+ \fi
+ \SYS_nextaction
+ {\let\SYS_letterfound\SYS_currentchar
+ \IfSubStr\SYS_letterfound\SYSunder\relax{\xs_eaddtomacro\SYS_letterfound{\SYSunder{-1}}}%
+ }%
+ {\xs_ifx{\SYS_currentfindletter\empty}{}{\SYS_findletter_i}%
+ }%
+}
+
+% teste si \SYS_currentfindletter commence par "_" et si oui, rajoute les 2 caractères à \SYS_currentchar et les enlève à \SYS_currentfindletter
+\def\SYS_testsubscript{%
+ \noexploregroups
+ \IfBeginWith\SYS_currentfindletter\SYSunder
+ {\StrGobbleLeft\SYS_currentfindletter1[\SYS_currentletterafter]%
+ \exploregroups
+ \StrRemoveBraces\SYS_currentletterafter[\SYS_currentletterafter]%
+ \IfInteger\SYS_currentletterafter
+ {\xs_ifnum{\SYS_currentletterafter=-1 }
+ {\errmessage{L'indice ne doit pas etre -1.}}
+ {}%
+ }%
+ {\errmessage{L'indice n'est pas un nombre entier !}%
+ }%
+ \xs_eeaddtomacro\SYS_currentchar{\expandafter\SYSunder\expandafter{\number\SYS_currentletterafter}}% Bug 0.31 -> corrigé 0.32: si espace après l'inbdice : supprimé
+ }
+ {}%
+ \exploregroups
+}
+
+% insère l'inconnue dans la sc #1 à sa place dans \SYS_letterlist
+\def\SYS_insletter#1{%
+ \IfSubStr\SYS_letterlist{#1}%
+ {}
+ {\let\SYS_insunknown#1%
+ \StrChar{#1}3[\SYS_insnum]%
+ \StrRemoveBraces\SYS_insnum[\SYS_insnum]%
+ \StrChar{#1}1[\SYS_currentinsletter]%
+ \let\SYS_letterlist_left\empty
+ \let\SYS_letterlist_right\SYS_letterlist
+ \SYS_insletter_i
+ }%
+}
+
+\def\SYS_insletter_i{%
+ \xs_ifx{\SYS_letterlist_right\empty}% l'inconnue viendra à la fin de \SYS_letterlist
+ {\xs_eaddtomacro\SYS_letterlist_left\SYS_insunknown
+ \let\SYS_letterlist\SYS_letterlist_left
+ }
+ {\StrChar\SYS_letterlist_right1[\SYS_currentletter]% la lettre suivante
+ \xs_ifnum{\expandafter`\SYS_currentinsletter>\expandafter`\SYS_currentletter\relax}% lettre pas bonne ?
+ {\StrSplit\SYS_letterlist_right3\SYS_currentletter\SYS_letterlist_right
+ \xs_eaddtomacro\SYS_letterlist_left\SYS_currentletter
+ \SYS_insletter_i
+ }% sinon
+ {\let\SYS_letterlist_right_right\SYS_letterlist_right
+ \let\SYS_letterlist_right_left\empty
+ \SYS_insletter_ii%
+ }%
+ }%
+}
+
+\def\SYS_insletter_ii{%
+ \xs_ifx{\SYS_letterlist_right_right\empty}
+ {\let\SYS_letterlist\SYS_letterlist_left
+ \xs_eaddtomacro\SYS_letterlist\SYS_letterlist_right_left
+ \xs_eaddtomacro\SYS_letterlist\SYS_insunknown
+ }
+ {\StrChar\SYS_letterlist_right_right1[\SYS_currentletter]% la lettre suivante
+ \xs_ifnum{\expandafter`\SYS_currentinsletter<\expandafter`\SYS_currentletter\relax}% est elle une autre ?
+ {\let\SYS_letterlist\SYS_letterlist_left
+ \xs_eaddtomacro\SYS_letterlist\SYS_letterlist_right_left
+ \xs_eaddtomacro\SYS_letterlist\SYS_insunknown
+ \xs_eaddtomacro\SYS_letterlist\SYS_letterlist_right_right
+ }
+ {\StrChar\SYS_letterlist_right_right3[\SYS_currentsubscript]% le prochain indice
+ \StrRemoveBraces\SYS_currentsubscript[\SYS_currentsubscript]%
+ \xs_ifnum{\SYS_insnum>\SYS_currentsubscript\relax}% est-il le bon, c'est-à-dire trop grand ?
+ {\StrSplit\SYS_letterlist_right_right3\SYS_currentletter\SYS_letterlist_right_right
+ \xs_eaddtomacro\SYS_letterlist_right_left\SYS_currentletter
+ \SYS_insletter_ii
+ }
+ {\let\SYS_letterlist\SYS_letterlist_left
+ \xs_eaddtomacro\SYS_letterlist\SYS_letterlist_right_left
+ \xs_eaddtomacro\SYS_letterlist\SYS_insunknown
+ \xs_eaddtomacro\SYS_letterlist\SYS_letterlist_right_right
+ }%
+ }%
+ }%
+}
+
+% reconstruit le code du tableau qui sera dans le \halign
+\def\SYS_buildsystem#1#2{% #1=no ligne, #2=no inconnue
+ \StrSplit\SYS_letterlist_tmp3\SYS_currentvariable\SYS_letterlist_tmp
+ \ifcsname SYS_sign_\detokenize\expandafter{\SYS_currentvariable}_#1\endcsname
+ \xs_eearg\xs_ifx{\csname SYS_sign_\detokenize\expandafter{\SYS_currentvariable}_#1\endcsname+}% signe + ?
+ {\xs_ifnum{#2=1 }% première variable ?
+ {\xs_gobarg
+ }
+ {\ifSYS_firstterm% premier terme de l'équation ?'
+ \expandafter\xs_gobarg
+ \else
+ \expandafter\SYS_execarg
+ \fi
+ }%
+ }
+ {\xs_ifnum{#2=1 }
+ {\expandafter\def\csname SYS_term_\detokenize\expandafter{\SYS_currentvariable}_#1\expandafter\expandafter\expandafter\endcsname
+ \expandafter\expandafter\expandafter{%
+ \csname SYS_sign_\detokenize\expandafter{\SYS_currentvariable}_#1\expandafter\expandafter\expandafter\endcsname
+ \csname SYS_term_\detokenize\expandafter{\SYS_currentvariable}_#1\endcsname}%
+ \xs_gobarg
+ }
+ {\SYS_execarg
+ }%
+ }%
+ {%
+ \SYS_addtotab{{}}%
+ \xs_eearg\SYS_addtotab{\csname SYS_sign_\detokenize\expandafter{\SYS_currentvariable}_#1\endcsname{}}%
+ }%
+ \SYS_firsttermfalse
+ \fi
+ \unless\ifSYS_star
+ \xs_ifnum{#2=1 }
+ {}
+ {\SYS_addtotab&}%
+ \fi
+ \ifcsname SYS_term_\detokenize\expandafter{\SYS_currentvariable}_#1\endcsname
+ \xs_eearg\SYS_addtotab{\csname SYS_term_\detokenize\expandafter{\SYS_currentvariable}_#1\endcsname}%
+ \fi
+ \unless\ifSYS_star
+ \SYS_addtotab&%
+ \fi
+ \xs_ifnum{#2<\SYS_numberofvariable\relax}
+ {\xs_exparg{\SYS_buildsystem{#1}}{\number\numexpr#2+1}%
+ }
+ {\ifSYS_constterm
+ \ifcsname SYS_sign_const_#1\endcsname% si le terme constant existe dans cette ligne
+ \SYS_addtotab{{}}%
+ \ifSYS_firstterm\else
+ \xs_eearg\SYS_addtotab{\csname SYS_sign_const_#1\endcsname}%
+ \fi
+ \SYS_addtotab{{}}%
+ \unless\ifSYS_star
+ \SYS_addtotab&% Bug 0.31 -> corrigé 0.32
+ \fi
+ \xs_eearg\SYS_addtotab{\csname SYS_term_const_#1\endcsname}%
+ \else
+ \unless\ifSYS_star
+ \SYS_addtotab&% Bug 0.31 -> corrigé 0.32
+ \fi
+ \fi
+ \SYS_addtotab&%
+ \fi
+ \ifcsname SYS_eqsign_#1\endcsname
+ \SYS_addtotab{{}}%
+ \xs_eearg\SYS_addtotab{\csname SYS_eqsign_#1\endcsname{}&}%
+ \xs_eearg\SYS_addtotab{\csname SYS_right_#1\endcsname}%
+ \else
+ \SYS_addtotab&%
+ \fi
+ \saveexploremode\exploregroups
+ \ifcsname SYS_extracol_#1\endcsname
+ \SYS_addtotab&%
+ \expandafter\IfSubStr\csname SYS_extracol_#1\endcsname{**}% le contenu de l'extra col contient-il "**" ?
+ {\SYS_letcs\SYS_autonumarg{SYS_extracol_#1}%
+ \StrSubstitute\SYS_autonumarg{**}{\number\numexpr\SYSeqnum+#1-\SYS_eqnumber}[\SYS_currentautonum]%
+ \SYS_cslet{SYS_extracol_#1}\SYS_currentautonum
+ \SYS_autonumtrue
+ }%
+ {\expandafter\IfSubStr\csname SYS_extracol_#1\endcsname*% le contenu de l'extra col contient-il "*" ?
+ {\SYS_letcs\SYS_autonumarg{SYS_extracol_#1}%
+ \StrSubstitute\SYS_autonumarg*{\noexpand#1}[\SYS_currentautonum]%
+ \SYS_cslet{SYS_extracol_#1}\SYS_currentautonum
+ \SYS_autonumtrue
+ }%
+ {\ifSYS_autonum
+ \IfSubStr\SYS_autonumarg{**}%
+ {\StrSubstitute\SYS_autonumarg{**}{\number\numexpr\SYSeqnum+#1-\SYS_eqnumber}[\SYS_currentautonum]}%
+ {\StrSubstitute\SYS_autonumarg*{\noexpand#1}[\SYS_currentautonum]}%
+ \xs_exparg\SYS_addtotab\SYS_currentautonum
+ \fi
+ }%
+ }%
+ \xs_eearg\SYS_addtotab{\csname SYS_extracol_#1\endcsname}%
+ \else% pas d'extra colonne pour cette ligne ?
+ \ifSYS_autonum% mais si il y un autonum
+ \SYS_addtotab&%
+ \IfSubStr\SYS_autonumarg{**}%
+ {\StrSubstitute\SYS_autonumarg{**}{\number\numexpr\SYSeqnum+#1-\SYS_eqnumber}[\SYS_currentautonum]}%
+ {\StrSubstitute\SYS_autonumarg*{\noexpand#1}[\SYS_currentautonum]}%
+ \xs_exparg\SYS_addtotab\SYS_currentautonum
+ \fi
+ \fi
+ \restoreexploremode
+ \xs_ifnum{#1<\SYS_eqnumber\relax}
+ {\SYS_addtotab\cr
+ \SYS_firsttermtrue
+ \let\SYS_letterlist_tmp\SYS_letterlist
+ \xs_exparg\SYS_buildsystem{\number\numexpr#1+1}{1}%
+ }% fin de l'alignement
+ {\SYS_addtotab{\SYS_strutdown\cr}%
+ }%
+ }%
+}
+
+% ajoute "_{-1}" à tous les tokens de #1 qui n'ont pas un indice
+\def\SYS_scanletterlist#1{%
+ \let\SYS_letterlist\empty
+ \def\SYS_lettersremaining{#1}%
+ \SYS_scanletterlist_i
+}
+
+\def\SYS_scanletterlist_i{%
+ \StrSplit\SYS_lettersremaining1\SYS_currentchar\SYS_lettersremaining
+ \xs_eaddtomacro\SYS_letterlist\SYS_currentchar
+ \IfBeginWith\SYS_lettersremaining\SYSunder
+ {\StrChar\SYS_lettersremaining2[\SYS_currentchar]%
+ \StrRemoveBraces\SYS_currentchar[\SYS_currentchar]%
+ \xs_eeaddtomacro\SYS_letterlist{\expandafter\SYSunder\expandafter{\SYS_currentchar}}%
+ \StrGobbleLeft\SYS_lettersremaining2[\SYS_lettersremaining]%
+ }%
+ {\xs_eaddtomacro\SYS_letterlist{\SYSunder{-1}}%
+ }%
+ \xs_ifx{\SYS_lettersremaining\empty}
+ {}
+ {\SYS_scanletterlist_i}%
+}
+
+\def\sysdelim#1#2{\def\SYS_delim_left{\left#1}\def\SYS_delim_right{\right#2}}
+\sysdelim\{.
+
+\def\systeme{\xs_ifstar{\SYS_startrue\SYS_systeme_i}{\SYS_starfalse\SYS_systeme_i}}
+
+\def\SYS_systeme_i{%
+ \relax\iffalse{\fi\ifnum0=`}\fi
+ \begingroup
+ \mathcode`\,="013B
+ \catcode`\^7
+ \catcode`\_8
+ \expandarg\noexploregroups
+ \setbox0 \hbox{$($}%
+ \edef\SYS_strutup {\vrule depth0pt width0pt height\dimexpr\ht0 +\SYS_extrastrutdim\relax}%
+ \edef\SYS_strutdown{\vrule height0pt width0pt depth\dimexpr\dp0 +\SYS_extrastrutdim\relax}%
+ \SYS_cslet++\SYS_cslet--%
+ \xs_testopt\SYS_systeme_ii{}%
+}
+
+\def\SYS_systeme_ii[#1]{%
+ \xs_ifempty{#1}
+ {\let\SYS_letterlist\empty
+ \SYS_sortvariabletrue
+ }
+ {\SYS_scanletterlist{#1}% ajoute des _{-1} si besoin
+ \SYS_sortvariablefalse
+ }%
+ \SYS_consttermfalse
+ \xs_exparg{\xs_testopt\SYS_systeme_iii}{\SYS_defaulteqsep}%
+}
+
+\def\SYS_systeme_iii[#1]#2{%
+ \def\SYS_systeme_iv##1#1##2\_nil{%
+ \xs_ifempty{##1}
+ {\SYS_addtotab\cr}% on a une ligne vide
+ {\SYS_spliteqinterms{##1}}% analyser l'éq courante
+ \xs_ifempty{##2}% tant qu'il reste des équations
+ {}
+ {\edef\SYS_eqnumber{\number\numexpr\SYS_eqnumber+1}% augmenter de 1 leur nombre
+ \global\advance\SYSeqnum1
+ \SYS_systeme_iv##2\_nil% recommencer avec ce qu'il reste
+ }%
+ }%
+ \global\advance\SYSeqnum1
+ \def\SYS_eqnumber{1}%
+ \ifdefined\SYS_autonumarg
+ \xs_ifx{\SYS_autonumarg\empty}% on initialise que si \SYS_autonumarg est vide
+ {\SYS_extracolfalse
+ \SYS_autonumfalse
+ }
+ {}%
+ \else
+ \SYS_extracolfalse
+ \SYS_autonumfalse
+ \fi
+ \SYS_systeme_iv#2#1\_nil% analyser toutes les équations et en faire des termes et des signes
+ \StrCount\SYS_letterlist\SYSunder[\SYS_numberofvariable]%
+ \SYS_systemecode{}\SYS_systempreamble{}%
+ \xs_exparg\SYS_makesyspreamble{\number\ifSYS_star1\else\SYS_numberofvariable\fi\space}% fabriquer le préambule du \halign
+ \SYS_firsttermtrue
+ \let\SYS_letterlist_tmp\SYS_letterlist
+ \SYS_buildsystem11% construire le système...
+ \ifdefined\SYS_substlist
+ \xs_ifx{\SYS_substlist\empty}
+ {}
+ {\edef\SYS_systemcs{\the\SYS_systemecode}%
+ \SYS_substlist
+ \SYS_systemecode\expandafter{\SYS_systemcs}%
+ }%
+ \fi
+ \csname SYS_\ifmmode execarg\else entermath\fi\endcsname
+ {\SYS_delim_left
+ \vcenter{%
+ \lineskiplimit=0pt
+ \lineskip=0pt
+ \baselineskip\SYS_lineskipcoeff\normalbaselineskip
+ \halign\expandafter\expandafter\expandafter{\expandafter\the\expandafter\SYS_systempreamble\the\SYS_systemecode}%
+ }%
+ \SYS_delim_right
+ }% ...l'afficher en mode math
+ \endgroup
+ \ifnum0=`{\fi\iffalse}\fi
+ \unless\ifSYS_followautonum
+ \ifdefined\SYS_autonumarg
+ \let\SYS_autonumarg\empty% annule la numérotation auto
+ \fi
+ \fi
+}
+
+% Construire le préambule du \halign
+\def\SYS_makesyspreamble#1{%
+ \def\SYS_preamblenum{#1}%
+ \SYS_makesyspreamble_i1%
+}
+
+\def\SYS_makesyspreamble_i#1{%
+ \xs_ifnum{#1<\SYS_preamblenum\relax}% tant qu'il reste des variables
+ {\SYS_addtotok\SYS_systempreamble{\hfil$##$&\hfil$##$&}% une colonne pour le terme et une pour le signe
+ \xs_exparg\SYS_makesyspreamble_i{\number\numexpr#1+1}%
+ }
+ {\ifSYS_constterm
+ \SYS_addtotok\SYS_systempreamble{\hfil$##$&\hfil$##$&}% une colonne pour le terme constant et son signe
+ \fi
+ \SYS_addtotok\SYS_systempreamble{\hfil$##$&$##$&$##$\hfil\null}% ajouter 1 colonne pour le signe = et une pour le terme de droite
+ \ifSYS_extracol
+ \SYS_addtotok\SYS_systempreamble{&\SYS_extracolstart##\SYS_extracolend\hfil\null}% la colonne supplémentaire (pas de mode math)
+ \fi
+ \SYS_addtotok\SYS_systempreamble{\cr\SYS_strutup}% ajouter la fin du préambule et le strut de première ligne
+ }%
+}
+
+\def\SYS_entermath#1{$\relax#1$}
+
+% définit les substitutions à faire dans le tableau avant l'affichage
+\def\syssubstitute{%
+ \unless\ifdefined\SYS_substlist\let\SYS_substlist\empty\fi
+ \SYS_substitute_i
+}
+
+\def\SYS_substitute_i#1{%
+ \xs_ifempty{#1}
+ {}
+ {\xs_addtomacro\SYS_substlist{\StrSubstitute\SYS_systemcs}%
+ \StrChar{\noexpand#1}1[\SYS_currentchar]\StrRemoveBraces\SYS_currentchar[\SYS_currentchar]%
+ \xs_eaddtomacro\SYS_substlist{\expandafter{\expandafter\noexpand\SYS_currentchar}}%
+ \StrChar{\noexpand#1}2[\SYS_currentchar]\StrRemoveBraces\SYS_currentchar[\SYS_currentchar]%
+ \xs_eaddtomacro\SYS_substlist{\expandafter{\expandafter\noexpand\SYS_currentchar}[\SYS_systemcs]}%
+ \xs_exparg\SYS_substitute_i{\SYS_gobtwoargs#1}%
+ }%
+}
+
+% annule les substitutions
+\def\sysnosubstitute{\let\SYS_substlist\empty}
+
+\SYS_restorecatcode
+
+\endinput
+
+######################################################################
+# Historique #
+######################################################################
+
+v0.1 27/02/2011
+ - Première version publique sur le CTAN.
+----------------------------------------------------------------------
+v0.2 08/03/2011
+ - Le premier argument optionnel met en place de nouvelles
+ fonctionnalités.
+ - Possibilité d'avoir des inconnues indicées.
+ - Mise en place d'une colonne supplémentaire et d'une
+ numérotation automatique.
+ - La commande étoilée \systeme* dégrade l'alignement pour ne
+ plus prendre en compte que les signes d'égalité.
+ - Une substitution est possible en fin de traitement, juste
+ avant d'afficher le système.
+----------------------------------------------------------------------
+v0.2a 15/05/2011
+ - Bug corrigé lorsque les termes comportent des accolades.
+----------------------------------------------------------------------
+v0.2b 23/06/2011
+ - La commande \setdelim permet de modifier les délimiteurs
+ extensibles placés de part et d'autre du système.
+----------------------------------------------------------------------
+v0.3 21/12/2013
+ - Un terme constant est permis dans le membre de gauche.
+----------------------------------------------------------------------
+v0.31 01/01/2018
+ - Il manquait un "&" après le terme constant, merci à Thomas Soll
+ de l'avoir signalé.
+----------------------------------------------------------------------
+v0.32 13/01/2019
+ - Correction d'un bug : les espaces étaient pris en compte dans
+ les noms des termes.
+ - Correction d'un bug : si version étoilée et terme constant dans
+ membre de gauche, défaut d'alignement.
+ - Nettoyage du code. \ No newline at end of file
diff --git a/macros/generic/systeme/systeme_fr.pdf b/macros/generic/systeme/systeme_fr.pdf
new file mode 100644
index 0000000000..7d81a5ae88
--- /dev/null
+++ b/macros/generic/systeme/systeme_fr.pdf
Binary files differ
diff --git a/macros/generic/systeme/systeme_fr.tex b/macros/generic/systeme/systeme_fr.tex
new file mode 100644
index 0000000000..657911336d
--- /dev/null
+++ b/macros/generic/systeme/systeme_fr.tex
@@ -0,0 +1,421 @@
+% Documentation de systeme
+\documentclass[10pt,french]{article}
+\usepackage[utf8]{inputenc}
+\usepackage[T1]{fontenc}
+\usepackage[a4paper,margin=3cm,head=12pt,headsep=7mm,footskip=7mm]{geometry}
+\usepackage[bottom]{footmisc}
+\usepackage{libertine,amsmath,fancybox,enumitem,systeme,xcolor,amssymb,array,longtable,fancyhdr}
+\renewcommand*\oldstylenums[1]{{\fontfamily{fxlj}\selectfont #1}}
+\usepackage[scaled=0.8]{luximono}
+\usepackage[libertine]{newtxmath}%
+\usepackage[protrusion=true,expansion,final,babel=true]{microtype}
+\fancypagestyle{plain}{%
+ \fancyhead[L]{\small L'extension \bfseries systeme}
+ \fancyhead[C]{}
+ \fancyhead[R]{\scriptsize\slshape\leftmark}
+ \fancyfoot[l]{\tiny Compilé par Christian \textsc{Tellechea}, le \today.}
+ \fancyfoot[c]{}
+ \fancyfoot[r]{\thepage}}
+\renewcommand\headrulewidth{0.4pt}
+
+\makeatletter
+
+\newcommand\make@car@active[2]{%
+ \catcode`#1\active
+ \begingroup
+ \lccode`\~`#1\relax
+ \lowercase{\endgroup\def~{#2}}%
+}
+
+\newcommand\exemple{%
+ \begingroup
+ \parindent\z@
+ \parskip\z@
+ \@makeother\;\@makeother\!\@makeother\?\@makeother\:% neutralise frenchb
+ \exemple@}
+
+\newcommand\exemple@[2][50]{%
+ \medbreak\noindent
+ \begingroup
+ \let\do\@makeother\dospecials
+ \make@car@active\ { {}}%
+ \make@car@active\^^M{\par\leavevmode}%
+ \make@car@active\,{\leavevmode\kern\z@\string,}%
+ \make@car@active\-{\leavevmode\kern\z@\string-}%
+ \exemple@@{#1}{#2}%
+}
+
+\newcommand\exemple@@[3]{%
+ \def\@tempa##1#3{\exemple@@@{#1}{#2}{##1}}%
+ \@tempa
+}
+
+\newcommand\exemple@@@[3]{%
+ \xdef\the@code{#3}%
+ \endgroup
+ \vskip0.5ex
+ \boxput*(0,1)
+ {\fboxsep\z@
+ \hbox{\colorbox{white}{\leavevmode\kern0.25em{\small\bfseries#2}\kern0.25em}}%
+ }%
+ {\fboxsep5pt
+ \fbox{%
+ $\vcenter{\hsize\dimexpr0.#1\linewidth-\fboxsep-\fboxrule\relax
+ \kern5pt\parskip0pt \ttfamily\small\the@code}%
+ \vcenter{\kern5pt\hsize\dimexpr\linewidth-0.#1\linewidth-\fboxsep-\fboxrule\relax
+ \small\newlinechar`\^^M\everyeof{\noexpand}\scantokens{#3}}$%
+ }%
+ }%
+ \medbreak
+ \endgroup
+}
+
+\newcommand\falseverb[1]{{\ttfamily\detokenize{#1}}}
+
+\long\def\centerverb#1{%
+ \def\centerverb@i##1#1{##1\hfill\null\par\egroup}
+ \bgroup
+ \ttfamily\@noligs
+ \parskip2pt\par\hfill
+ \let\do\@makeother\dospecials
+ \@vobeyspaces
+ \centerverb@i}
+
+\def\longfrdate@i#1/#2/#3\@nil{\number#3\relax\ifnum#3=1 \ier\fi\space\ifcase #2 \or janvier\or février\or mars\or avril\or mai\or juin\or juillet\or aout\or septembre\or octobre\or novembre\or décembre\fi\space#1}
+\def\longfrdate{\expandafter\longfrdate@i\SYSdate\@nil}
+\makeatother
+
+\usepackage{babel}
+\frenchbsetup{StandardLists=true}
+
+\usepackage[plainpages=false,pdfpagelabels,bookmarks=true,bookmarksopen=true,colorlinks=true,hyperfootnotes=false,filecolor=black,linkcolor=blue,urlcolor=magenta,pdfauthor={Christian TELLECHEA},pdftitle={systeme},pdfsubject={Saisie intuitive de systèmes d'équations},pdfkeywords={systeme},pdfcreator={LaTeX}]{hyperref}
+
+\setitemize{leftmargin=3em,topsep=0pt,parsep=0pt,itemsep=0pt,label=--}
+
+\begin{document}
+\begin{titlepage}
+ \null\par\vspace{1.5cm}
+ \begin{center}
+ \begin{minipage}{0.75\linewidth}
+ \begin{center}
+ \Huge L'extension pour \TeX{} et \LaTeX{}\normalsize\par
+ \fontsize{50pt}{50pt}\selectfont\bfseries\SYSname\par
+ \par\vspace{5pt}\normalsize
+ v\SYSver\par\vspace{5pt}
+ \longfrdate\par\vspace{35pt}
+ \normalsize Manuel de l'utilisateur
+ \end{center}
+ \end{minipage}
+ \end{center}
+ \vspace{1cm}
+ \begin{center}
+ Christian {\sc Tellechea}\par\small
+ \href{mailto:unbonpetit@netc.fr}{\texttt{\textbf{unbonpetit@netc.fr}}}
+ \end{center}
+ \vspace{2cm}
+ \begin{center}
+ \begin{minipage}{0.8\linewidth}
+ \noindent\hrulefill\par
+ \hfill\textbf{\textit{Résumé}}\hfill{}\medskip\par\small
+ Cette petite extension met en forme des systèmes d'équations ou d'inéquations où les termes et les signes sont alignés verticalement, tout en permettant une saisie quasi naturelle.\par
+ \hrulefill
+ \end{minipage}
+ \end{center}
+ \vspace{2cm}
+ \tableofcontents
+\end{titlepage}
+\pagestyle{plain}
+\parskip5pt minus 1pt
+\parindent0pt
+
+\subsection*{Avant propos}
+Tout a recommencé, comme chaque année lorsque j'enseigne les systèmes d'équations, par un (petit) énervement concernant la difficulté de la saisie pour avoir une mise en forme acceptable. C'est à chaque fois un casse tête et une perte de temps conséquente de se battre avec les tableaux \LaTeX{} pour obtenir \emph{in fine} des systèmes avec un alignement correct, d'où le petit énervement, surtout lorsque, insouciant, on commence à taper ses sujets vers 23h pour le lendemain.
+
+Fort de ce constat, je me suis dit qu'il allait falloir écrire des macros pour être débarrassé de la difficulté de la saisie. Et tant qu'à faire, autant écrire des macros en plain $\varepsilon$\TeX, que tout le monde puisse en profiter\footnote{Enfin, tout le monde, c'est vite dit ! Cette extension n'est pas compatible avec Con\TeX t car, pour une raison que je ne m'explique pas, \href{http://www.ctan.org/tex-archive/macros/latex/contrib/xstring/}{\texttt{\textbf{xstring}}} n'est pas utilisable avec Con\TeX t. Si quelqu'un a une explication (et éventuellement un remède), je lui serais très reconnaissant de me contacter par \href{mailto:unbonpetit@netc.fr}{\texttt{\textbf{email}}} !}. Ces macros sont réunies dans cette petite extension maintenant à peu près fonctionnelle.
+
+\section{Fonctionnalités de l'extension}
+\subsection{La commande \texttt{\textbackslash systeme}}
+Pour l'utiliser l'extension \og systeme\fg{} , il faut écrire :
+\begin{itemize}
+ \item {\color{blue}\verb-input systeme.tex-} lorsqu'on utilise \TeX{} ou pdf\TeX;
+ \item {\color{blue}\verb-\usepackage{systeme}-} dans le préambule lorsqu'on utilise \LaTeX.
+\end{itemize}
+L'extension \href{http://www.ctan.org/tex-archive/macros/latex/contrib/xstring/}{\texttt{\textbf{xstring}}} est requise et est chargée si cela n'a pas été le cas.
+
+La commande principale est \verb-\systeme- dont l'argument obligatoire contient les équations séparées par une virgule :
+
+\exemple{La commande \ttfamily\string\systeme}/Résoudre \systeme{2a-3b+4c=2,
+a+8b+5c=8,
+-a+2b+c=-5}/
+La virgule, qui est le séparateur par défaut, peut être changée en tout autre caractère. Il suffit de placer ce nouveau caractère dans l'argument de la commande \verb-\syseqsep-.
+
+La commande \verb-\systeme- fonctionnera en mode math ou non et donnera un résultat correct si toutes les inconnues se trouvent dans le membre de gauche, le membre de droite étant celui des constantes. Les équations doivent être \emph{développées}, c'est-à-dire que chaque terme est séparé de son voisin par un "+" ou un "-". De plus, les inconnues doivent être des lettres minuscules non accentuées, c'est-à-dire tout caractère de \og\verb-a-\fg{} à \og\verb-z-\fg. Les espaces sont ignorés dans l'argument de la macro \verb|\systeme|.
+
+L'alignement construit sera un tableau précédé d'une accolade et aura les spécificités suivantes :
+\begin{itemize}
+ \item les signes d'égalité ou d'inégalité séparant les deux membres sont alignés;
+ \item les signes "+" ou "-" séparant chaque terme du membre gauche sont alignés;
+ \item chaque terme du membre de gauche se trouve dans une colonne au fer à droite;
+ \item le membre de droite se trouve dans une colonne au fer à gauche;
+ \item les espacements mathématiques entre colonnes seront corrects.
+\end{itemize}
+
+Les inconnues peuvent avoir un indice, sous réserve que celui-ci soit un nombre entier \emph{positif ou nul}\footnote{L'indice $-1$ correspond en interne à une inconnue non indicée. Par conséquent, la présence simultanée dans une même équation d'une inconnue non indicée et de cette inconnue avec l'indice $-1$ provoquera une erreur.} :
+\exemple{Inconnues indicées}/\systeme{4x_1-x_2=3,
+-x_1+5x_2=-1}/
+
+Si une inconnue est manquante dans une équation, la colonne du tableau reste vide :
+\exemple{Inconnues manquantes}/\systeme{a-2b=3,
+b-3c=4,
+-a+4c=-1}/
+
+Le membre de gauche peut contenir un terme constant. Dans ce cas, quel que soit l'endroit où il a été écrit dans ce membre, il sera affiché en dernière position, c'est-à-dire juste avant le signe d'égalité. Si plusieurs termes constants sont dans le membre de gauche, seul le dernier est pris en compte :
+
+\exemple{Terme constant dans le membre de gauche}/\systeme{2x+3y=0,
+x-z+9=0,
+2+3x+5-y-7+z=0}/
+
+On peut également avoir une, plusieurs, ou toutes les équations sans second membre :
+\exemple{Équation sans second membre}/\systeme{2a+3b-c=4,
+b-2c,
+-a+2b+3c}/
+
+Dans l'argument de la commande \verb-\systeme-, lorsque deux virgules se suivent, une équation vide, c'est-à-dire une ligne vide est insérée. Malgré cette facilité, pour augmenter l'espacement vertical entre les équations, il vaut mieux utiliser la commande \verb-\syslineskipcoeff-, voir page~\pageref{espacement.vertical}.
+\exemple{Ligne vide}/\systeme{a-2b=3,,2a+5b=7}/
+
+La commande \verb-\systeme- permet d'utiliser les commandes \og\verb-\+-\fg{} et \og\verb+\-+\fg{} pour échapper \og\verb|+|\fg{} et \og\verb|-|\fg{}, au cas où les coefficients doivent contenir ces signes, pour éviter qu'ils ne soient compris comme la fin d'un terme :
+\exemple{Coefficient contenant une addition ou soustraction}/\systeme{(2\+\sqrt2)x-(1\-\sqrt2)y=1,
+x+(1\+\sqrt2)y=-1}/
+
+Lorsqu'elle est suivie d'une \og\verb-*-\fg{}, la commande \verb-\systeme- est dégradée et n'aligne que les signes d'égalité :
+\exemple{La commande \ttfamily\string\systeme*}/\systeme{3x-4y+z=5,
+5x-3z=1,
+y+z=0}
+
+\systeme*{3x-4y+z=5,
+5x-3z=1,
+y+z=0}/
+
+\subsection{Choix des délimiteurs}
+Par défaut, les délimiteurs extensibles qui se trouvent à gauche et à droite du système sont ``\verb-\{-'' et ``\verb-.-'' et sont placés après les primitives \verb-\left- et \verb-\right-.
+
+On peut modifier ces deux délimiteurs via la commande \verb-\sysdelim<delim gauche><delim droit>- :
+\exemple{Choix des délimiteurs extensibles}/\systeme{2a+3b=5,3a-b=8}
+
+\sysdelim[]\systeme{2a+3b=5,3a-b=8}
+
+\sysdelim.|\systeme{2a+3b=5,3a-b=8}
+
+\sysdelim{(}{\lfloor}\systeme{2a+3b=5,3a-b=8}/
+
+\subsection{Tri des inconnues}
+Quel que soit l'ordre dans lequel sont entrées les inconnues lors de la saisie, elles seront triées par ordre alphabétique à l'affichage, en tenant compte de leur éventuel indice. Un signe "+" ne sera pas affiché lorsqu'il précède le premier terme d'une équation :
+\exemple{Tri des inconnues}/\systeme{2y+x-3z=4,
+z-y+2x=-1,
+-2x+3z-4y=0}
+
+\systeme{y_2+5y_1-x_1=0,
+y_1-x_1+3y_2=4,
+2x_1-y_2-y_1=-1}/
+
+Lorsque les inconnues sont indicées, elles sont classés alphabétiquement puis dans l'ordre croissant de leur indice.
+
+Le tri alphabétique est une facilité mais il peut s'avérer gênant surtout dans les systèmes $4\times4$ où, bien souvent, la 4\ieme{} inconnue est \og$t$\fg{} :
+\exemple{Tri alphabétique indésirable}/\systeme{x+2y-3z+t=0,
+2x-y-z+3t=4,
+2y+3z+4t=-1,
+3x-2z-2t=3}/
+On aimerait bien que l'inconnue $t$ soit en 4\ieme{} position dans toutes les équations. Pour cela, il faut forcer un tri différent du tri alphabétique avec l'argument optionnel de la commande \verb-\systeme-. Cet argument optionnel doit contenir la liste des inconnues, éventuellement indicées, sans aucun espace entre elles, et dans l'ordre où l'on souhaite les voir affichées dans chaque équation.
+
+Ici, on affiche deux fois le même système avec deux ordres différents :
+\exemple{Tri forcé}/\systeme[xyzt]{x+2y-3z+t=0,
+2x-y-z+3t=4,
+2y+3z+4t=-1,
+3x-2z-2t=3}
+
+\systeme[ztyx]{x+2y-3z+t=0,
+2x-y-z+3t=4,
+2y+3z+4t=-1,
+3x-2z-2t=3}/
+
+Cet argument optionnel implique d'autres fonctionnalités, qui, avec le tri forcé vu juste au dessus, se cumulent toutes. Ainsi, lorsque cet argument optionnel existe et n'est pas vide :
+\begin{enumerate}
+ \item les inconnues qui sont contenues dans l'argument optionnel peuvent être autre chose que des lettres minuscules (par exemple \verb-A-, \verb-B-, \verb-\alpha-, etc.) éventuellement indicées :
+ \exemple{Autres inconnues}/\systeme[A\alpha\beta]{%
+ A-\alpha+3\beta=4,
+ 2A+\alpha-\beta=0,
+ -A+3\alpha-2\beta=5}/
+ \item seules les inconnues figurant dans l'argument optionnel sont reconnues dans les équations. Dans l'exemple ci dessous, la lettre $m$ n'est pas comprise comme étant une inconnue :
+ \exemple{Inconnues forcées}/\systeme[xy]{mx-y=3,
+ x-m^2y=-1}/
+\end{enumerate}
+
+\subsection{Inéquations}
+Dans chaque ligne, le signe susceptible de séparer les deux membres d'une équation est l'un de ceux-ci : \verb-=-, \verb-<-, \verb->-, \verb-<=-, \verb->=-, \verb-\leq-, \verb-\geq-, \verb-\leqslant- et \verb-\geqslant-. Les deux derniers ne sont utilisables que si l'extension \href{http://ctan.org/pkg/amssymb}{\texttt{\textbf{amssymb}}} a été chargée.
+
+Les signes \verb-<=- et \verb->=- sont remplacés à l'affichage par \verb-\leq-, \verb-\geq-, qui donnent $\leq$ ou $\geq$.
+\exemple{Inéquations}/\systeme{x+y-2z>4,
+2x-y+z\geq-1,
+3x-2y+z<=3}/
+
+Pour choisir une autre substitution à \og\verb->=-\fg{} ou \og\verb-<=-\fg{} ou pour en créer une pour tout autre signe d'égalité, on doit utiliser la commande :
+\centerverb/\sysequivsign{signe}{substitution}/
+
+Voici le même système où l'on définit la substitution de \og\verb-<=-\fg{} avec \og\verb-\leqslant-\fg{} comme on l'observe à la troisième équation :
+\exemple{Redéfinir une substitution}/\sysequivsign{<=}{\leqslant}
+\systeme{x+y-2z>4,
+2x-y+z\geq-1,
+3x-2y+z<=3}/
+
+\subsection{Nouveaux signes d'égalité}
+Avec la commande \verb-\sysaddeqsign-, on peut créer un nouveau signe susceptible de séparer les deux membres des équations. Il faut écrire :
+\centerverb/\sysaddeqsign{<nouveau signe>}/
+
+Mettons ici que l'on créé le nouveau signe\footnote{La création d'un nouveau signe est possible même si son code de catégorie est actif.} d'égalité \og\verb-~-\fg{} en écrivant :
+\centerverb/\sysaddeqsign{~}/
+
+Puis, mettons que l'on veuille ensuite remplacer ce nouveau signe par \og\verb-\approx-\fg{} dans l'affichage final. On devra écrire :
+\centerverb/\sysequivsign{~}{\approx}/
+
+En voici l'illustration dans cet exemple :
+\exemple{Nouveau signe}/\sysaddeqsign{~}
+\sysequivsign{~}{\approx}
+\systeme{2a+b-c~6,a-4b~4}/
+
+Par la suite, on peut supprimer ce signe ou n'importe quel autre déjà existant il faut utiliser la commande \verb-\sysremoveeqsign- et écrire :
+\centerverb/\sysremoveeqsign{~}/
+
+\subsection{Coefficients décimaux}
+À première vue, la virgule étant utilisée pour séparer les équations, il n'est pas possible d'écrire des coefficients décimaux. On peut spécifier un autre caractère pour séparer les différentes équations avec le second argument optionnel de la commande \verb-\système-. Ici, on prend \og\verb-:-\fg{}\footnote{Ici encore, il est possible de choisir un caractère de code de catégorie actif, comme c'est le cas de \og\string:\fg{} lorsque l'option \og\texttt{frenchb}\fg{} est spécifiée au package \texttt{babel}.} ce qui permet d'écrire des coefficients décimaux. Le comportement de la virgule est redéfini à l'intérieur de la commande \verb-\systeme- de telle sorte qu'elle ne soit pas suivie d'une espace, comme c'est le cas en mode mathématique.
+\exemple{Coefficients décimaux}/\systeme[][:]{1,5x-0,45y=0,7:x-0,8y=1,4}/
+Pour qui veut utiliser la virgule régulièrement dans les coefficients, on peut changer définitivement le séparateur par défaut pour n'importe quel autre caractère que l'on placera dans l'argument de la commande \verb-\syseqsep- et écrire par exemple \og\verb/\syseqsep{:}/\fg{} pour choisir \og\verb-:-\fg.
+
+
+\subsection{Espacement des lignes}\label{espacement.vertical}
+On peut faire varier l'espacement entre les lignes avec la commande \verb-\syslineskipcoeff- dont l'argument est un nombre qui viendra multiplier la valeur de \verb-\baselinskip-. Par défaut, l'argument vaut \verb-1.25-.
+\exemple{Espacement variable}/\systeme{x+2y-z=0,2x-y+z=1,x-3y+2z=1}
+\syslineskipcoeff{1.75}\quad
+\systeme{x+2y-z=0,2x-y+z=1,x-3y+2z=1}/
+
+\subsection{Colonne supplémentaire}
+Lorsqu'une équation comporte le signe \og\verb-@-\fg{}, tout ce qui se trouve à droite de ce caractère sera mis dans une colonne supplémentaire au fer à gauche qui se trouvera à droite du système, en dernière position.
+\exemple{Colonne supplémentaire}/\systeme{x+y=125@L_1,
+x-y=12@L_2}/
+
+Le signe \og\verb-@-\fg{} peut être changé en un autre avec la commande \verb-\sysextracolsign- et on peut écrire par exemple \og\verb/\sysextracolsign{|}/\fg.
+
+Cette colonne supplémentaire n'est \emph{pas} composée en mode mathématique, mais deux codes sont insérées au début et à la fin de cette colonne. Ils sont définis par :\centerverb/\syscodeextracol{<code début>}{<code fin>}/
+Par défaut, on a \verb-\syscodeextracol{\kern1.5em$}{$}- ce qui signifie qu'un espace horizontal d'1.5em est inséré et le \og\verb-$-\fg{} ouvre le mode mathématique au début de la colonne. Enfin, pour le second argument, \og\verb-$-\fg{} termine le mode math à la fin de la colonne.
+
+On va redéfinir ces deux codes pour ne pas se mettre en mode math et mettre un espace de 2.5em :
+\exemple{Personnalisation de la colonne supplémentaire}/\syscodeextracol{\kern2.5em }{}
+\sysextracolsign{|}
+\systeme{x+y=125|somme des deux nombres,
+x-y=12|différence des deux nombres}/
+
+\subsection{Numérotation automatique}
+La colonne supplémentaire peut être utilisée pour y mettre une numérotation automatique. La première façon de procéder est d'indiquer le schéma que doit prendre cette numérotation automatique à la première ligne, sachant que le caractère \og\verb-*-\fg{} déclenche la mise en place de la numérotation automatique et sera remplacé par le numéro de la ligne dans le système. Les autres lignes, même si elles n'ont pas de colonne supplémentaire, porteront un numéro :
+\exemple{Numérotation automatique}/\systeme{x+y-z=3@L_{*},
+2x+y+z=4,
+x-y+2z=0}/
+
+Si on souhaite spécifier explicitement des colonnes supplémentaires aux lignes qui n'en ont pas, la numérotation automatique vient \emph{avant} le contenu explicite des colonnes supplémentaires :
+\exemple{Numérotation automatique}/\systeme{x+y-z=3@L_{*}\quad,
+2x+y+z=4,
+x-y+2z=0}
+
+\systeme{x+y-z=3@L'_{*},
+3x+2y=7@=L_1+L_2,
+3x+y=6@=2L_1+L_3}/
+
+Il est ennuyeux que l'on ne puisse mettre \og\verb-L'_{*}=L_1-\fg{} à la première ligne car la totalité de ce schéma et notamment la partie indésirable \og\verb-L_1-\fg{} serait reproduite aux lignes suivantes. On peut donc spécifier le schéma de numérotation d'une deuxième façon, \emph{avant} d'écrire le système. On utilise la commande \verb-\sysautonum- dont l'argument contient ce schéma.
+\exemple{Numérotation automatique}/\sysautonum{L_{*}}
+\systeme{x+y-z=3,
+2x+y+z=4,
+x-y+2z=0}
+
+\sysautonum{L'_{*}\longleftarrow}
+\systeme{x+y-z=3@L_1,
+3x+2y=7@L_1+L_2,
+3x+y=6@2L_1+L_3}/
+
+Le schéma spécifié avec la commande \verb-\sysautonum- n'est valable \emph{que pour le prochain système} et sera effacé ensuite, sauf si on a écrit une étoile juste après la commande \verb-\sysautonum-, auquel cas le schéma de numérotation se poursuit pour tous les systèmes à venir :
+\exemple{Numérotation automatique persistante}/\sysautonum*{L_{*}}
+\systeme{a+b=4,2a-b=5}
+\quad
+\systeme{x-3y=0,2x+y=1}/
+
+On peut effacer (et donc annuler) le schéma de numérotation automatique en entrant un argument vide : \verb-\sysautonum{}-.
+
+Il existe un compteur global\footnote{Il s'agit d'un compteur \TeX{} portant le doux nom de {\ttfamily\string\SYSeqnum}, accessible via les commandes \TeX{} habituelles, c'est-à-dire qu'on peut le faire précéder de \texttt{\string\number}, \texttt{\string\romannumeral} pour l'afficher.} d'équations accessible de la même façon que le compteur local mais avec \og\verb-**-\fg{}. Voici un exemple de numérotation persistante :
+\exemple{Numérotation globale}/On met en évidence que \number\SYSeqnum{}
+équations ont été écrites jusqu'ici~:
+
+\sysautonum*{\hbox{eq (**)}}
+\systeme{x-y+z=3,
+2x+y+z=1,
+x-z=8}
+
+\systeme{u+w=9,
+v+2w=0,
+u-v=1}/
+
+Il est enfin possible d'utiliser la colonne supplémentaire pour retenir le numéro d'une équation et le rappeler plus tard :
+\exemple{Numérotation globale}/\syscodeextracol{\kern1em}{}
+\systeme{x-y+z=3@\gdef\foo{**}(\textbf{**}),
+ 2x+y+z=1@\gdef\bar{**}(\textbf{**}),
+ x-z=8@\gdef\baz{**}(\textbf{**})}
+
+L'équation \no\foo{} est la première du système,
+\bar{} et \baz{} sont les deux suivantes./
+
+On peut à tout moment réinitialiser le compteur global d'équations à l'aide de \og\verb-\sysreseteqnum-\fg.
+
+\subsection{Substitution post traitement}
+Juste avant l'affichage du système, il est encore possible de substituer dans le code du système tout caractère par un autre\footnote{Plus exactement, toute \emph{suite de tokens} par une autre.}. Pour cela, la commande \verb-\syssubstitute- agit pour tous les systèmes à venir et son argument est fait de caractères allant par paires; le premier étant le caractère à substituer et le second étant ce par quoi il le sera. Les substitutions définies par \verb-\syssubstitute- viennent \emph{s'ajouter} à celles déjà définies.
+
+Dans cet exemple, on entre des coefficients décimaux où le point est le séparateur décimal. On va demander à ce que tous les \og\verb-.-\fg{} soient remplacés par des \og\verb-,-\fg{}. On remplacera aussi l'inconnue $a_1$ par $x_n$, et $a_2$ par $x_{n+1}$, ces 3 substitutions étant faites avec \verb-\syssubstitute{.,{a_1}{x_n}{a_2}{x_{n+1}}}- :
+\exemple{Substitution post traitement}/\syssubstitute{.,{a_1}{x_n}{a_2}{x_{n+1}}}
+\systeme{1.5a_1-0.5a_2=2,1.6a_1-2a_2=0.4}/
+
+La commande \verb-\sysnosubstitute- annule toutes les substitutions précédemment définies.
+
+\section{Liste des commandes}
+Voici la liste de toutes les commandes définies par cette extension :
+\begin{longtable}{>\footnotesize l>\footnotesize p{9cm}}\\\hline
+\hfill\normalsize Commandes\hfill\null &\hfill\normalsize Description\hfill\null\\\hline
+\verb-\systeme{<code système>}-&compose un système d'équations ou d'inéquations\\
+\verb-\sysdelim<delim gauche><delim droit>-&modifie les délimiteurs extensibles placées à gauche et à droite du système\\
+\verb-\syseqsep{<caractère>}-&définit le séparateur par défaut des équations\\
+\verb-\syslineskipcoeff{<coeff>}-&définit le coefficient multiplicateur de \verb-\baselinskip- pour modifier l'espacement vertical des équations\\
+\verb-\+- et \verb|\-|&remplace "+" et "-" lorsqu'on veut éviter d'indiquer un nouveau terme\\
+\verb-\sysequivsign{<signe>}{<substitution>}-&définit ce par quoi un \verb-<signe>- d'égalité doit être remplacé à l'affichage\\
+\verb-\sysaddeqsign{<signe>}-&définit un nouveau signe d'égalité\\
+\verb-\sysremoveeqsign{<signe>}-&supprime un signe d'égalité\\
+\verb-\sysextracolsign{<signe>}-&définit le caractère délimitant la colonne supplémentaire\\
+\verb-\syscodeextracol{<code>}{<code>}-&définit les \verb-<code>- qui seront inséré au début et à la fin de la colonne supplémentaire\\
+\verb-*-&déclenche la numérotation automatique dans la colonne supplémentaire et est remplacé par le numéro de la ligne du système\\
+\verb-**-&dans la colonne supplémentaire, est remplacé par le numéro global de l'équation\\
+\verb-\sysautonum{<code>}-&définit le schéma de la numérotation automatique\\
+\verb-\syssubstitute{<paires de caractères>}-&ajoute des substitutions à faire dans le code du système avant que celui-ci ne soit affiché\\
+\verb-\sysnosubstitute-&supprime toutes les substitutions jusqu'à présent définies\\\hline
+\end{longtable}
+
+Pour finir et rendre les choses compréhensibles, voici un système où les frontières des 7 colonnes (3 inconnues et donc $2\times3+1=7$ colonnes) sont visibles :
+\begin{center}
+ \arraycolsep=0pt
+ \arrayrulewidth=0.1pt
+ $\left\{\begin{array}{|r|r|r|r|r|r|l|}
+ -10x&{}+{}&4y&{}-{}&5z&{}={}&-1\\
+ x&&&{}-{}&7z&{}={}&3\\
+ 2x&{}-{}&y&&&{}={}&0
+ \end{array}\right.$
+\end{center}
+\begin{center}
+\parskip0pt
+$\star$\par
+$\star\quad\star$
+\end{center}
+J'espère que cette extension vous sera utile et surtout que le code ne comporte pas trop de bugs\ldots\ Un \href{mailto:unbonpetit@netc.fr}{\texttt{\textbf{email}}} pour me signaler tout dysfonctionnement, toute proposition d'amélioration ou même tout commentaire sur cette extension sera le bienvenu.\par\medskip\nobreak
+Christian \textsc{Tellechea}
+\end{document} \ No newline at end of file