Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Assume H0: nat_p x0.
Assume H1: 1x0.
Assume H2: Sing x0Sing (Sing 1).
Claim L3: 1Sing x0
Apply SingE with Sing 1, Sing x0, λ x1 x2 . 1x2 leaving 2 subgoals.
The subproof is completed by applying H2.
The subproof is completed by applying SingI with 1.
Apply In_irref with 1.
Apply SingE with x0, 1, λ x1 x2 . 1x2 leaving 2 subgoals.
The subproof is completed by applying L3.
The subproof is completed by applying H1.