Let x0 of type ι be given.
Apply unknownprop_bfc870f6d786cc78805c5bf0f9864161d18f532f6daf7daf1d02f4a58dac06f9 with
x0,
1,
λ x1 x2 . x2 = ordsucc (ordsucc x0) leaving 2 subgoals.
The subproof is completed by applying unknownprop_8d353ccfb170ea018406af7266d499508cf5be2cebcac5c8a89ccd16a50d0251.
Apply unknownprop_ce01d651bc4abc1cf6da014334bca112f034c2cd4308319efcaaf58b4357c2b0 with
x0,
λ x1 x2 . ordsucc x2 = ordsucc (ordsucc x0).
Let x1 of type ι → ι → ο be given.
The subproof is completed by applying H0.