Let x0 of type ο be given.
Apply H0 with
pack_r 0 (λ x1 x2 . False).
Let x1 of type ο be given.
Apply H1 with
λ x2 . 0.
Apply andI with
8b17e.. (pack_r 0 (λ x2 x3 . False)),
∀ x2 . 8b17e.. x2 ⟶ and (BinRelnHom (pack_r 0 (λ x3 x4 . False)) x2 0) (∀ x3 . BinRelnHom (pack_r 0 (λ x4 x5 . False)) x2 x3 ⟶ x3 = 0) leaving 2 subgoals.
The subproof is completed by applying unknownprop_4ed7a81e7da08b24cbf091182aaff18f08045d39edd0aa7cc41b5f7440278cb1.
Let x2 of type ι be given.
Apply unknownprop_0f872579da7879e9b32e4dbae6096b7cb722a0eb30e05326e317c49ae84fb9cd with
pack_r 0 (λ x3 x4 . False),
x2,
0,
λ x3 x4 : ο . and x4 (∀ x5 . BinRelnHom (pack_r 0 (λ x6 x7 . False)) x2 x5 ⟶ x5 = 0) leaving 3 subgoals.
The subproof is completed by applying unknownprop_4ed7a81e7da08b24cbf091182aaff18f08045d39edd0aa7cc41b5f7440278cb1.
The subproof is completed by applying H2.
Apply andI with
0 = 0,
∀ x3 . BinRelnHom (pack_r 0 (λ x4 x5 . False)) x2 x3 ⟶ x3 = 0 leaving 2 subgoals.
Let x3 of type ι → ι → ο be given.
Assume H3: x3 0 0.
The subproof is completed by applying H3.
Let x3 of type ι be given.
Apply unknownprop_0f872579da7879e9b32e4dbae6096b7cb722a0eb30e05326e317c49ae84fb9cd with
pack_r 0 (λ x4 x5 . False),
x2,
x3,
λ x4 x5 : ο . x5 ⟶ x3 = 0 leaving 3 subgoals.
The subproof is completed by applying unknownprop_4ed7a81e7da08b24cbf091182aaff18f08045d39edd0aa7cc41b5f7440278cb1.
The subproof is completed by applying H2.
Assume H3: x3 = 0.
The subproof is completed by applying H3.