Proof of Theorem cnvadj
| Step | Hyp | Ref
| Expression |
| 1 | | cnvopab 3537 |
. . 3
⊢ ◡{ u, t ∣(u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y))} = { t, u ∣(u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y))} |
| 2 | | 3ancoma 788 |
. . . . 5
⊢ ((u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y)) ↔ (t:
ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x
·ih (u
‘y)) = ((t ‘x)
·ih y))) |
| 3 | | ax-his1 9225 |
. . . . . . . . . . . . . . . . . 18
⊢ (((u ‘y)
∈ ℋ ⋀ x ∈ ℋ ) →
((u ‘y) ·ih x) = (∗
‘(x
·ih (u
‘y)))) |
| 4 | | ffvelrn 3928 |
. . . . . . . . . . . . . . . . . 18
⊢ ((u: ℋ
–→ ℋ ⋀ y ∈ ℋ ) →
(u ‘y) ∈ ℋ ) |
| 5 | 3, 4 | sylan 450 |
. . . . . . . . . . . . . . . . 17
⊢ (((u: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ x ∈ ℋ ) →
((u ‘y) ·ih x) = (∗
‘(x
·ih (u
‘y)))) |
| 6 | 5 | adantrl 394 |
. . . . . . . . . . . . . . . 16
⊢ (((u: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ (t: ℋ –→ ℋ ⋀ x ∈ ℋ )) → ((u ‘y)
·ih x) =
(∗ ‘(x ·ih (u ‘y)))) |
| 7 | | ax-his1 9225 |
. . . . . . . . . . . . . . . . . 18
⊢ ((y ∈ ℋ ⋀ (t ‘x)
∈ ℋ )
→ (y
·ih (t
‘x)) = (∗ ‘((t
‘x)
·ih y))) |
| 8 | | ffvelrn 3928 |
. . . . . . . . . . . . . . . . . 18
⊢ ((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) →
(t ‘x) ∈ ℋ ) |
| 9 | 7, 8 | sylan2 453 |
. . . . . . . . . . . . . . . . 17
⊢ ((y ∈ ℋ ⋀ (t: ℋ
–→ ℋ ⋀ x ∈ ℋ )) →
(y ·ih
(t ‘x)) = (∗
‘((t ‘x) ·ih y))) |
| 10 | 9 | adantll 392 |
. . . . . . . . . . . . . . . 16
⊢ (((u: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ (t: ℋ –→ ℋ ⋀ x ∈ ℋ )) → (y
·ih (t
‘x)) = (∗ ‘((t
‘x)
·ih y))) |
| 11 | 6, 10 | eqeq12d 1532 |
. . . . . . . . . . . . . . 15
⊢ (((u: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ (t: ℋ –→ ℋ ⋀ x ∈ ℋ )) → (((u ‘y)
·ih x) =
(y ·ih
(t ‘x)) ↔ (∗
‘(x
·ih (u
‘y))) = (∗ ‘((t
‘x)
·ih y)))) |
| 12 | 11 | ancoms 438 |
. . . . . . . . . . . . . 14
⊢ (((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (u: ℋ –→ ℋ ⋀ y ∈ ℋ )) → (((u ‘y)
·ih x) =
(y ·ih
(t ‘x)) ↔ (∗
‘(x
·ih (u
‘y))) = (∗ ‘((t
‘x)
·ih y)))) |
| 13 | | cj11 7031 |
. . . . . . . . . . . . . . 15
⊢ (((x ·ih (u ‘y))
∈ ℂ ⋀ ((t
‘x)
·ih y)
∈ ℂ)
→ ((∗ ‘(x ·ih (u ‘y))) =
(∗ ‘((t ‘x)
·ih y))
↔ (x
·ih (u
‘y)) = ((t ‘x)
·ih y))) |
| 14 | | hicl 9223 |
. . . . . . . . . . . . . . . . 17
⊢ ((x ∈ ℋ ⋀ (u ‘y)
∈ ℋ )
→ (x
·ih (u
‘y)) ∈ ℂ) |
| 15 | 14, 4 | sylan2 453 |
. . . . . . . . . . . . . . . 16
⊢ ((x ∈ ℋ ⋀ (u: ℋ
–→ ℋ ⋀ y ∈ ℋ )) →
(x ·ih
(u ‘y)) ∈ ℂ) |
| 16 | 15 | adantll 392 |
. . . . . . . . . . . . . . 15
⊢ (((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (u: ℋ –→ ℋ ⋀ y ∈ ℋ )) → (x
·ih (u
‘y)) ∈ ℂ) |
| 17 | | hicl 9223 |
. . . . . . . . . . . . . . . . 17
⊢ (((t ‘x)
∈ ℋ ⋀ y ∈ ℋ ) →
((t ‘x) ·ih y) ∈ ℂ) |
| 18 | 17, 8 | sylan 450 |
. . . . . . . . . . . . . . . 16
⊢ (((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ y ∈ ℋ ) →
((t ‘x) ·ih y) ∈ ℂ) |
| 19 | 18 | adantrl 394 |
. . . . . . . . . . . . . . 15
⊢ (((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (u: ℋ –→ ℋ ⋀ y ∈ ℋ )) → ((t ‘x)
·ih y)
∈ ℂ) |
| 20 | 13, 16, 19 | sylanc 473 |
. . . . . . . . . . . . . 14
⊢ (((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (u: ℋ –→ ℋ ⋀ y ∈ ℋ )) → ((∗ ‘(x
·ih (u
‘y))) = (∗ ‘((t
‘x)
·ih y))
↔ (x
·ih (u
‘y)) = ((t ‘x)
·ih y))) |
| 21 | 12, 20 | bitr2d 532 |
. . . . . . . . . . . . 13
⊢ (((t: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (u: ℋ –→ ℋ ⋀ y ∈ ℋ )) → ((x ·ih (u ‘y)) =
((t ‘x) ·ih y) ↔ ((u
‘y)
·ih x) =
(y ·ih
(t ‘x)))) |
| 22 | 21 | an4s 511 |
. . . . . . . . . . . 12
⊢ (((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) ⋀ (x ∈ ℋ ⋀ y ∈ ℋ )) → ((x ·ih (u ‘y)) =
((t ‘x) ·ih y) ↔ ((u
‘y)
·ih x) =
(y ·ih
(t ‘x)))) |
| 23 | 22 | anassrs 443 |
. . . . . . . . . . 11
⊢ ((((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) ⋀ x ∈ ℋ ) ⋀ y ∈ ℋ ) → ((x
·ih (u
‘y)) = ((t ‘x)
·ih y)
↔ ((u ‘y) ·ih x) = (y
·ih (t
‘x)))) |
| 24 | | eqcom 1520 |
. . . . . . . . . . 11
⊢ (((u ‘y)
·ih x) =
(y ·ih
(t ‘x)) ↔ (y
·ih (t
‘x)) = ((u ‘y)
·ih x)) |
| 25 | 23, 24 | syl6bb 539 |
. . . . . . . . . 10
⊢ ((((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) ⋀ x ∈ ℋ ) ⋀ y ∈ ℋ ) → ((x
·ih (u
‘y)) = ((t ‘x)
·ih y)
↔ (y
·ih (t
‘x)) = ((u ‘y)
·ih x))) |
| 26 | 25 | ralbidva 1705 |
. . . . . . . . 9
⊢ (((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) ⋀ x ∈ ℋ ) → (∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y) ↔ ∀y ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x))) |
| 27 | 26 | ralbidva 1705 |
. . . . . . . 8
⊢ ((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) → (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y) ↔ ∀x ∈ ℋ ∀y ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x))) |
| 28 | | ralcom 1820 |
. . . . . . . 8
⊢ (∀x ∈ ℋ ∀y ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x) ↔ ∀y ∈ ℋ ∀x ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x)) |
| 29 | 27, 28 | syl6bb 539 |
. . . . . . 7
⊢ ((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) → (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y) ↔ ∀y ∈ ℋ ∀x ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x))) |
| 30 | 29 | pm5.32i 648 |
. . . . . 6
⊢ (((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ) ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y)) ↔ ((t:
ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ) ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y
·ih (t
‘x)) = ((u ‘y)
·ih x))) |
| 31 | | df-3an 783 |
. . . . . 6
⊢ ((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y)) ↔ ((t:
ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ) ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x
·ih (u
‘y)) = ((t ‘x)
·ih y))) |
| 32 | | df-3an 783 |
. . . . . 6
⊢ ((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x)) ↔ ((t:
ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ) ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y
·ih (t
‘x)) = ((u ‘y)
·ih x))) |
| 33 | 30, 31, 32 | 3bitr4i 181 |
. . . . 5
⊢ ((t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y)) ↔ (t:
ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y
·ih (t
‘x)) = ((u ‘y)
·ih x))) |
| 34 | 2, 33 | bitri 171 |
. . . 4
⊢ ((u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y)) ↔ (t:
ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y
·ih (t
‘x)) = ((u ‘y)
·ih x))) |
| 35 | 34 | opabbii 2745 |
. . 3
⊢ { t,
u ∣(u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y))} = { t, u ∣(t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x))} |
| 36 | 1, 35 | eqtri 1538 |
. 2
⊢ ◡{ u, t ∣(u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y))} = { t, u ∣(t: ℋ
–→ ℋ ⋀ u: ℋ –→ ℋ ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y ·ih (t ‘x)) =
((u ‘y) ·ih x))} |
| 37 | | dfadj2 10092 |
. . 3
⊢ adjh = { u, t ∣(u: ℋ –→ ℋ ⋀ t: ℋ
–→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x
·ih (u
‘y)) = ((t ‘x)
·ih y))} |
| 38 | 37 | cnveqi 3383 |
. 2
⊢ ◡adjh = ◡{ u, t ∣(u: ℋ
–→ ℋ ⋀ t: ℋ –→ ℋ ⋀ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (u ‘y)) =
((t ‘x) ·ih y))} |
| 39 | | dfadj2 10092 |
. 2
⊢ adjh = { t, u ∣(t: ℋ –→ ℋ ⋀ u: ℋ
–→ ℋ ⋀ ∀y ∈ ℋ ∀x ∈ ℋ (y
·ih (t
‘x)) = ((u ‘y)
·ih x))} |
| 40 | 36, 38, 39 | 3eqtr4i 1548 |
1
⊢ ◡adjh = adjh |