diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/profcollege/PfCMulArt.tex')
-rw-r--r-- | Master/texmf-dist/tex/latex/profcollege/PfCMulArt.tex | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/Master/texmf-dist/tex/latex/profcollege/PfCMulArt.tex b/Master/texmf-dist/tex/latex/profcollege/PfCMulArt.tex index 601d6e52f1b..27156c00b7f 100644 --- a/Master/texmf-dist/tex/latex/profcollege/PfCMulArt.tex +++ b/Master/texmf-dist/tex/latex/profcollege/PfCMulArt.tex @@ -44,9 +44,9 @@ \xdef\PfCFooRetiensCible{\useKV[TabMul]{Cible}}% \readlist*\PfCListeDesNombresCibles{\PfCFooRetiensCible}% \xintFor* ##2 in{\xintSeq{1}{\PfCListeDesNombresCibleslen}}\do{% - \PfCListeDiviseurs{\PfCListeDesNombresCibles[##2]}% + \PfCListeDiviseursInfDix{\PfCListeDesNombresCibles[##2]}% \setsepchar{,}\ignoreemptyitems% - \readlist*\PfCTabMulDiviseursCible{\PfCListeDiviseursRetour}% + \readlist*\PfCTabMulDiviseursCible{\PfCListeDiviseursInfDixRetour}% \xdef\PfCFooListePdtCible{$1\times\num{\PfCListeDesNombresCibles[##2]}$,$\num{\PfCListeDesNombresCibles[##2]}\times1$}% \xintFor* ##1 in {\xintSeq{1}{\PfCNbDiviseurs}}\do{% \xdef\PfCFooListePdtCible{\PfCFooListePdtCible,$\num{\PfCTabMulDiviseursCible[##1]}\times\num{\fpeval{\PfCListeDesNombresCibles[##2]/\PfCTabMulDiviseursCible[##1]}}$,$\num{\fpeval{\PfCListeDesNombresCibles[##2]/\PfCTabMulDiviseursCible[##1]}}\times\num{\PfCTabMulDiviseursCible[##1]}$}% @@ -92,11 +92,11 @@ \ifboolKV[TabMul]{Enonce}{% \begin{enumerate} \xintFor* ##1 in {\xintSeq{1}{\PfCCompteurX}}\do{% - \PfCListeDiviseurs{\PfCListeProduits[##1]}% + \PfCListeDiviseursInfDix{\PfCListeProduits[##1]}% \ifnum\PfCNbDiviseurs>1\relax - \MelangeListe{\PfCListeDiviseursRetour}{1}% + \MelangeListe{\PfCListeDiviseursInfDixRetour}{1}% \else - \xdef\faa{\PfCListeDiviseursRetour} + \xdef\faa{\PfCListeDiviseursInfDixRetour} \fi \ignoreemptyitems \readlist*\PfCListeDiviseurChoisi{\faa}% @@ -126,18 +126,18 @@ \reademptyitems% }% -\NewDocumentCommand\PfCListeDiviseurs{m}{% +\NewDocumentCommand\PfCListeDiviseursInfDix{m}{% \ifnum#1<10\relax \xdef\PfCLimiteDiv{#1} \else \xdef\PfCLimiteDiv{10} \fi - \xdef\PfCListeDiviseursRetour{} + \xdef\PfCListeDiviseursInfDixRetour{} \xdef\PfCNbDiviseurs{} \xintFor* ##2 in {\xintSeq{2}{\PfCLimiteDiv}}\do{% \modulo{#1}{##2}\relax \ifnum\remainder=0\relax - \xdef\PfCListeDiviseursRetour{\PfCListeDiviseursRetour ##2,}% + \xdef\PfCListeDiviseursInfDixRetour{\PfCListeDiviseursInfDixRetour ##2,}% \xdef\PfCNbDiviseurs{\fpeval{\PfCNbDiviseurs+1}}% \fi }% |