Let x0 of type ι be given.
Let x1 of type ι be given.
Apply real_E with
x1,
∃ x2 . and (x2 ∈ SNoS_ omega) (and (SNoLt x0 x2) (SNoLt x2 x1)) leaving 2 subgoals.
The subproof is completed by applying H1.
Apply real_pos_eps_ with
add_SNo x1 (minus_SNo x0),
∃ x2 . and (x2 ∈ SNoS_ omega) (and (SNoLt x0 x2) (SNoLt x2 x1)) leaving 3 subgoals.
Apply real_add_SNo with
x1,
minus_SNo x0 leaving 2 subgoals.
The subproof is completed by applying H1.
Apply real_minus_SNo with
x0.
The subproof is completed by applying H0.
Apply add_SNo_minus_Lt2b with
x1,
x0,
0 leaving 4 subgoals.
The subproof is completed by applying H3.
The subproof is completed by applying L10.
The subproof is completed by applying SNo_0.
Apply add_SNo_0L with
x0,
λ x2 x3 . SNoLt x3 x1 leaving 2 subgoals.
The subproof is completed by applying L10.
The subproof is completed by applying H2.
Let x2 of type ι be given.