diff options
Diffstat (limited to 'macros/latex/contrib/profcollege/latex/PfCSimplifierFraction.tex')
-rw-r--r-- | macros/latex/contrib/profcollege/latex/PfCSimplifierFraction.tex | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/macros/latex/contrib/profcollege/latex/PfCSimplifierFraction.tex b/macros/latex/contrib/profcollege/latex/PfCSimplifierFraction.tex index 3e2aa47db9..bea6d2d688 100644 --- a/macros/latex/contrib/profcollege/latex/PfCSimplifierFraction.tex +++ b/macros/latex/contrib/profcollege/latex/PfCSimplifierFraction.tex @@ -316,4 +316,17 @@ \tofrac{#1/#2} \fi }% +}% + +\NewDocumentCommand\LesDiviseursCommuns{mm}{% + \xdef\PfCListeDivComAvant{1}% + \xintFor* ##2 in {\xintSeq{2}{#1}}\do{% + \modulo{#1}{##2}\relax + \ifnum\remainder=0\relax% + \modulo{#2}{##2}\relax + \ifnum\remainder=0\relax% + \xdef\PfCListeDivComAvant{\PfCListeDivComAvant,##2}% + \fi% + \fi% + }% }%
\ No newline at end of file |