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