Multiplicative order: Difference between revisions
Content added Content deleted
(→{{header|jq}}: typos) |
|||
| Line 1,396: | Line 1,396: | ||
def idivide($i; $j): |
def idivide($i; $j): |
||
$i | idivide($j) |
$i | idivide($j); |
||
# Emit [dividend, mod] |
# Emit [dividend, mod] |
||
| Line 1,472: | Line 1,472: | ||
newT: 1 } |
newT: 1 } |
||
| until (.newR != 0.; |
| until (.newR != 0.; |
||
idivide(.r; |
idivide(.r; .newR) as $q |
||
| .lastT = .t |
| .lastT = .t |
||
| .lastR = .r |
| .lastR = .r |
||