| n < i, m < i, i ≤ # A ⊦ (mkbag(A, i) -- A[m] -- A[n]) ++ A[m] ++ A[n] = mkbag(A, i), n = m |
m < i, n < i, m < # A, n < # A, i ≤ # A ⊦ (mkbag(A, i) -- A[m] -- A[n]) ++ A[m] ++ A[n] = mkbag(A, i), n = m
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%fle: ⊦ m < n ∧ n ≤ n0 → m < n0; (forward) from specification nat%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic