Let x0 of type ι be given.
Apply Sing_nat_fresh_extension with
2,
x0 leaving 3 subgoals.
The subproof is completed by applying nat_2.
The subproof is completed by applying In_1_2.
Apply SNo_ExtendedSNoElt_2 with
x0.
The subproof is completed by applying H0.