Search for blocks/addresses/...
Proofgold Proof
pf
Let x0 of type
ι
be given.
Let x1 of type
ι
be given.
Assume H0:
nat_p
x1
.
Assume H1:
nIn
(
ordsucc
(
96eca..
x0
x1
)
)
x0
.
Apply nat_primrec_S with
0
,
λ x2 x3 .
If_i
(
ordsucc
x3
∈
x0
)
(
ordsucc
x3
)
0
,
x1
,
λ x2 x3 .
x3
=
0
leaving 2 subgoals.
The subproof is completed by applying H0.
Apply If_i_0 with
ordsucc
(
96eca..
x0
x1
)
∈
x0
,
ordsucc
(
96eca..
x0
x1
)
,
0
.
The subproof is completed by applying H1.
■