| odd(lead(m + 2^ #fz(m))), odd(lead(m)), (m + 2^ #fz(m)) + 1 = 2^ #fz(m + 2^ #fz(m)) * lead(m + 2^ #fz(m)), m + 1 = 2^ #fz(m) * lead(m), ∃ n0. #fz(m + 2^ #fz(m)) + n0 = #fz(m) ⊦ |
#fz(m + 2^ #fz(m)) + n = #fz(m), m + 1 = 2^ #fz(m) * lead(m), (m + 2^ #fz(m)) + 1 = 2^ #fz(m + 2^ #fz(m)) * lead(m + 2^ #fz(m)), odd(lead(m)), odd(lead(m + 2^ #fz(m))) ⊦
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1])]]