| i = i1 * j + j0 ∧ 0 ≤ j0 ∧ j0 < j, 0 ≤ i, 0 ≤ i0, 0 < j ⊦ (j0 * i0 % j) % j = (i * i0) % j |
0 ≤ i0, 0 < j, j0 < j, 0 ≤ j0, 0 ≤ i1 ⊦ (j0 * i0) % j = ((i1 * j + j0) * i0) % j
Used simplifier rules: mod-shift: ⊦ 0 ≤ i ∧ 0 ≤ i0 ∧ 0 < j → (i * i0 % j) % j = (i * i0) % j;%forward-le-01: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward) from specification int-abs%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%zero-ge-add: ⊦ 0 ≤ j1 ∧ j1 < j → (0 ≤ i0 * j + j1 ↔ 0 ≤ i0); from specification int-mult%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult