Let x0 of type ι be given.
Let x1 of type ι be given.
Assume H1: x1 ∈ x0.
Let x2 of type ι be given.
Assume H2: x2 ∈ x0.
Apply H0 with
divides_int x0 (add_SNo ((λ x3 . mul_SNo x3 x3) x1) (minus_SNo ((λ x3 . mul_SNo x3 x3) x2))) ⟶ or (x1 = x2) (x1 = add_SNo x0 (minus_SNo x2)).
Assume H3:
and (x0 ∈ omega) (1 ∈ x0).
Apply H3 with
(∀ x3 . x3 ∈ omega ⟶ divides_nat x3 x0 ⟶ or (x3 = 1) (x3 = x0)) ⟶ divides_int x0 (add_SNo ((λ x3 . mul_SNo x3 x3) x1) (minus_SNo ((λ x3 . mul_SNo x3 x3) x2))) ⟶ or (x1 = x2) (x1 = add_SNo x0 (minus_SNo x2)).
Assume H4:
x0 ∈ omega.
Assume H5: 1 ∈ x0.
Apply unknownprop_4a0a3eff54752556487021177bda70d187b173aa30e36acd65a7d5c9c0f8dfae with
x1,
x2,
λ x3 x4 . divides_int x0 x3 ⟶ or (x1 = x2) (x1 = add_SNo x0 (minus_SNo x2)) leaving 3 subgoals.
The subproof is completed by applying L13.
The subproof is completed by applying L14.
Apply Euclid_lemma with
x0,
add_SNo x1 x2,
add_SNo x1 (minus_SNo x2),
or (x1 = x2) (x1 = add_SNo x0 (minus_SNo x2)) leaving 6 subgoals.
The subproof is completed by applying H0.
Apply int_add_SNo with
x1,
x2 leaving 2 subgoals.
Apply nat_p_int with
x1.
The subproof is completed by applying L11.
Apply nat_p_int with
x2.
The subproof is completed by applying L12.
Apply int_add_SNo with
x1,
minus_SNo x2 leaving 2 subgoals.
Apply nat_p_int with
x1.
The subproof is completed by applying L11.
Apply int_minus_SNo with
x2.
Apply nat_p_int with
x2.
The subproof is completed by applying L12.
The subproof is completed by applying H15.