diff options
Diffstat (limited to 'tex/context/base/syst-new.tex')
-rw-r--r-- | tex/context/base/syst-new.tex | 16 |
1 files changed, 13 insertions, 3 deletions
diff --git a/tex/context/base/syst-new.tex b/tex/context/base/syst-new.tex index eb92a95b0..5fd8eaaa9 100644 --- a/tex/context/base/syst-new.tex +++ b/tex/context/base/syst-new.tex @@ -272,12 +272,22 @@ \newcount\modcounter -\def\DoMod #1by#2to#3% +%\def\DoMod #1by#2to#3% +% {\modcounter#1\divide\modcounter#2\multiply\modcounter#2% +% #3#1\advance#3 -\modcounter} +% +%\def\DoDiv #1by#2to#3% +% {#3#1\divide#3 #2\relax} + +\def\dosetmodulo#1#2#3% {\modcounter#1\divide\modcounter#2\multiply\modcounter#2% - #3#1\advance#3 -\modcounter} + #3#1\advance#3-\modcounter} -\def\DoDiv #1by#2to#3% +\def\dosetdivision#1#2#3% {#3#1\divide#3 #2\relax} + +\def\DoMod#1by#2to#3{\dosetmodulo {#1}{#2}{#3}} +\def\DoDiv#1by#2to#3{\dosetdivision{#1}{#2}{#3}} \def\dounprotected#1\par% {#1\protect} |