| pf |
|---|
Apply add_nat_SR with u3, 2, λ x0 x1 . x1 = u6 leaving 2 subgoals.
The subproof is completed by applying nat_2.
Apply add_nat_SR with u3, 1, λ x0 x1 . ordsucc x1 = u6 leaving 2 subgoals.
The subproof is completed by applying nat_1.
Apply add_nat_SR with u3, 0, λ x0 x1 . ordsucc (ordsucc x1) = u6 leaving 2 subgoals.
The subproof is completed by applying nat_0.
Apply add_nat_0R with u3, λ x0 x1 . ordsucc (ordsucc (ordsucc x1)) = u6.
Let x0 of type ι → ι → ο be given.
The subproof is completed by applying H0.
■ |
|