Used simplifier rules: le-same: ⊦ 0 < i → (i * j ≤ i ↔ j ≤ 1);%associativity: ⊦ i * j * j0 = (i * j) * j0;%commutativity: ⊦ i * j = j * i;% ⊦ i < j → (j ≤ i ↔ false); (as)% ⊦ i < j ↔ ¬ j ≤ i; (ss)