Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Assume H0: x0SNoS_ (ordsucc omega).
Assume H1: SNoLt (minus_SNo omega) x0.
Assume H2: SNoLt x0 omega.
Apply SNoS_E2 with ordsucc omega, x0, ∃ x1 . and (x1omega) (SNoLt (abs_SNo (mul_SNo (eps_ x1) x0)) 1) leaving 3 subgoals.
The subproof is completed by applying ordsucc_omega_ordinal.
The subproof is completed by applying H0.
Assume H3: SNoLev x0ordsucc omega.
Assume H4: ordinal (SNoLev x0).
Assume H5: SNo x0.
Assume H6: SNo_ (SNoLev x0) x0.
Apply SNoLt_trichotomy_or_impred with 0, x0, ∃ x1 . and (x1omega) (SNoLt (abs_SNo (mul_SNo (eps_ x1) x0)) 1) leaving 5 subgoals.
The subproof is completed by applying SNo_0.
The subproof is completed by applying H5.
Assume H7: SNoLt 0 x0.
Apply SNoS_ordsucc_omega_bdd_eps_pos with x0, ∃ x1 . and (x1omega) (SNoLt (abs_SNo (mul_SNo (eps_ x1) x0)) 1) leaving 4 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying H7.
The subproof is completed by applying H2.
Let x1 of type ι be given.
Assume H8: (λ x2 . and (x2omega) (SNoLt (mul_SNo (eps_ x2) x0) 1)) x1.
Apply H8 with ∃ x2 . and (x2omega) (SNoLt (abs_SNo (mul_SNo (eps_ x2) x0)) 1).
Assume H9: x1omega.
Assume H10: SNoLt (mul_SNo (eps_ x1) x0) 1.
Claim L11: SNoLt 0 (mul_SNo (eps_ x1) x0)
Apply mul_SNo_pos_pos with eps_ x1, x0 leaving 4 subgoals.
Apply SNo_eps_ with x1.
The subproof is completed by applying H9.
The subproof is completed by applying H5.
Apply SNo_eps_pos with x1.
The subproof is completed by applying H9.
The subproof is completed by applying H7.
Let x2 of type ο be given.
Assume H12: ∀ x3 . and (x3omega) (SNoLt (abs_SNo (mul_SNo (eps_ x3) x0)) 1)x2.
Apply H12 with x1.
Apply andI with x1omega, SNoLt (abs_SNo (mul_SNo (eps_ x1) x0)) 1 leaving 2 subgoals.
The subproof is completed by applying H9.
Apply pos_abs_SNo with mul_SNo (eps_ x1) x0, λ x3 x4 . SNoLt x4 1 leaving 2 subgoals.
The subproof is completed by applying L11.
The subproof is completed by applying H10.
Assume H7: 0 = x0.
Let x1 of type ο be given.
Assume H8: ∀ x2 . and (x2omega) (SNoLt (abs_SNo (mul_SNo (eps_ x2) x0)) 1)x1.
Apply H8 with 0.
Apply andI with 0omega, SNoLt (abs_SNo (mul_SNo (eps_ 0) x0)) 1 leaving 2 subgoals.
Apply nat_p_omega with 0.
The subproof is completed by applying nat_0.
Apply H7 with λ x2 x3 . SNoLt (abs_SNo (mul_SNo (eps_ 0) x2)) 1.
Apply mul_SNo_zeroR with eps_ 0, λ x2 x3 . SNoLt (abs_SNo x3) 1 leaving 2 subgoals.
Apply SNo_eps_ with 0.
Apply nat_p_omega with 0.
The subproof is completed by applying nat_0.
Apply abs_SNo_0 with λ x2 x3 . SNoLt x3 1.
The subproof is completed by applying SNoLt_0_1.
Assume H7: SNoLt x0 0.
Claim L8: ...
...
Claim L9: ...
...
Claim L10: ...
...
Apply SNoS_ordsucc_omega_bdd_eps_pos with minus_SNo x0, ∃ x1 . and (x1omega) (SNoLt (abs_SNo (mul_SNo (eps_ x1) x0)) 1) leaving 4 subgoals.
The subproof is completed by applying L8.
The subproof is completed by applying L9.
The subproof is completed by applying L10.
Let x1 of type ι be given.
Assume H11: (λ x2 . and (x2omega) (SNoLt (mul_SNo (eps_ x2) (minus_SNo x0)) 1)) x1.
Apply H11 with ∃ x2 . and (x2omega) (SNoLt (abs_SNo (mul_SNo (eps_ x2) x0)) 1).
...