| j1 * j ≠ 0 ∧ j0 * j ≠ 0, 0 < j1, 0 < j0, 0 < j ⊦ j = 0, j0 = 0, j1 = 0, rational(i * (i0 * j1 + j0 * i1), j * j0 * j1) = rational((i1 * i) * j0 * j + (j1 * j) * i0 * i, (j1 * j) * j0 * j) |
0 < j1, 0 < j0, 0 < j ⊦ j = 0, j0 = 0, j1 = 0, rational(i * (i0 * j1 + j0 * i1), j * j0 * j1) = rational(i * j * (j1 * i0 + i1 * j0), (j1 * j) * j0 * j)
Used simplifier rules: ⊦ 0 < i → (i * j = 0 ↔ j = 0);% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ i * j + i * j0 = i * (j + j0);