λ x0 . and (struct_r x0) (unpack_r_o x0 (λ x1 . λ x2 : ι → ι → ο . and (and (and (∀ x3 . x3 ∈ x1 ⟶ not (x2 x3 x3)) (∀ x3 . x3 ∈ x1 ⟶ ∀ x4 . x4 ∈ x1 ⟶ or (x2 x3 x4) (x2 x4 x3))) (∀ x3 . x3 ∈ x1 ⟶ ∀ x4 . x4 ∈ x1 ⟶ ∀ x5 . x5 ∈ x1 ⟶ x2 x3 x4 ⟶ x2 x4 x5 ⟶ x2 x3 x5)) (∀ x3 : ι → ο . (∀ x4 . x4 ∈ x1 ⟶ (∀ x5 . x5 ∈ x1 ⟶ x2 x5 x4 ⟶ x3 x5) ⟶ x3 x4) ⟶ ∀ x4 . x4 ∈ x1 ⟶ x3 x4))) |
|
|
|
|
|
|
|
|
|
|