Proof of Theorem adjsym
| Step | Hyp | Ref
| Expression |
| 1 | | ax-his1 9225 |
. . . . . . . . . . . 12
⊢ (((T ‘y)
∈ ℋ ⋀ x ∈ ℋ ) →
((T ‘y) ·ih x) = (∗
‘(x
·ih (T
‘y)))) |
| 2 | | ffvelrn 3928 |
. . . . . . . . . . . 12
⊢ ((T: ℋ
–→ ℋ ⋀ y ∈ ℋ ) →
(T ‘y) ∈ ℋ ) |
| 3 | 1, 2 | sylan 450 |
. . . . . . . . . . 11
⊢ (((T: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ x ∈ ℋ ) →
((T ‘y) ·ih x) = (∗
‘(x
·ih (T
‘y)))) |
| 4 | 3 | adantrl 394 |
. . . . . . . . . 10
⊢ (((T: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ (S: ℋ –→ ℋ ⋀ x ∈ ℋ )) → ((T ‘y)
·ih x) =
(∗ ‘(x ·ih (T ‘y)))) |
| 5 | | ax-his1 9225 |
. . . . . . . . . . . 12
⊢ ((y ∈ ℋ ⋀ (S ‘x)
∈ ℋ )
→ (y
·ih (S
‘x)) = (∗ ‘((S
‘x)
·ih y))) |
| 6 | | ffvelrn 3928 |
. . . . . . . . . . . 12
⊢ ((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) →
(S ‘x) ∈ ℋ ) |
| 7 | 5, 6 | sylan2 453 |
. . . . . . . . . . 11
⊢ ((y ∈ ℋ ⋀ (S: ℋ
–→ ℋ ⋀ x ∈ ℋ )) →
(y ·ih
(S ‘x)) = (∗
‘((S ‘x) ·ih y))) |
| 8 | 7 | adantll 392 |
. . . . . . . . . 10
⊢ (((T: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ (S: ℋ –→ ℋ ⋀ x ∈ ℋ )) → (y
·ih (S
‘x)) = (∗ ‘((S
‘x)
·ih y))) |
| 9 | 4, 8 | eqeq12d 1532 |
. . . . . . . . 9
⊢ (((T: ℋ
–→ ℋ ⋀ y ∈ ℋ ) ⋀ (S: ℋ –→ ℋ ⋀ x ∈ ℋ )) → (((T ‘y)
·ih x) =
(y ·ih
(S ‘x)) ↔ (∗
‘(x
·ih (T
‘y))) = (∗ ‘((S
‘x)
·ih y)))) |
| 10 | 9 | ancoms 438 |
. . . . . . . 8
⊢ (((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (T: ℋ –→ ℋ ⋀ y ∈ ℋ )) → (((T ‘y)
·ih x) =
(y ·ih
(S ‘x)) ↔ (∗
‘(x
·ih (T
‘y))) = (∗ ‘((S
‘x)
·ih y)))) |
| 11 | | cj11 7031 |
. . . . . . . . 9
⊢ (((x ·ih (T ‘y))
∈ ℂ ⋀ ((S
‘x)
·ih y)
∈ ℂ)
→ ((∗ ‘(x ·ih (T ‘y))) =
(∗ ‘((S ‘x)
·ih y))
↔ (x
·ih (T
‘y)) = ((S ‘x)
·ih y))) |
| 12 | | hicl 9223 |
. . . . . . . . . . 11
⊢ ((x ∈ ℋ ⋀ (T ‘y)
∈ ℋ )
→ (x
·ih (T
‘y)) ∈ ℂ) |
| 13 | 12, 2 | sylan2 453 |
. . . . . . . . . 10
⊢ ((x ∈ ℋ ⋀ (T: ℋ
–→ ℋ ⋀ y ∈ ℋ )) →
(x ·ih
(T ‘y)) ∈ ℂ) |
| 14 | 13 | adantll 392 |
. . . . . . . . 9
⊢ (((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (T: ℋ –→ ℋ ⋀ y ∈ ℋ )) → (x
·ih (T
‘y)) ∈ ℂ) |
| 15 | | hicl 9223 |
. . . . . . . . . . 11
⊢ (((S ‘x)
∈ ℋ ⋀ y ∈ ℋ ) →
((S ‘x) ·ih y) ∈ ℂ) |
| 16 | 15, 6 | sylan 450 |
. . . . . . . . . 10
⊢ (((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ y ∈ ℋ ) →
((S ‘x) ·ih y) ∈ ℂ) |
| 17 | 16 | adantrl 394 |
. . . . . . . . 9
⊢ (((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (T: ℋ –→ ℋ ⋀ y ∈ ℋ )) → ((S ‘x)
·ih y)
∈ ℂ) |
| 18 | 11, 14, 17 | sylanc 473 |
. . . . . . . 8
⊢ (((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (T: ℋ –→ ℋ ⋀ y ∈ ℋ )) → ((∗ ‘(x
·ih (T
‘y))) = (∗ ‘((S
‘x)
·ih y))
↔ (x
·ih (T
‘y)) = ((S ‘x)
·ih y))) |
| 19 | 10, 18 | bitr2d 532 |
. . . . . . 7
⊢ (((S: ℋ
–→ ℋ ⋀ x ∈ ℋ ) ⋀ (T: ℋ –→ ℋ ⋀ y ∈ ℋ )) → ((x ·ih (T ‘y)) =
((S ‘x) ·ih y) ↔ ((T
‘y)
·ih x) =
(y ·ih
(S ‘x)))) |
| 20 | 19 | an4s 511 |
. . . . . 6
⊢ (((S: ℋ
–→ ℋ ⋀ T: ℋ –→ ℋ ) ⋀ (x ∈ ℋ ⋀ y ∈ ℋ )) → ((x ·ih (T ‘y)) =
((S ‘x) ·ih y) ↔ ((T
‘y)
·ih x) =
(y ·ih
(S ‘x)))) |
| 21 | 20 | anassrs 443 |
. . . . 5
⊢ ((((S: ℋ
–→ ℋ ⋀ T: ℋ –→ ℋ ) ⋀ x ∈ ℋ ) ⋀ y ∈ ℋ ) → ((x
·ih (T
‘y)) = ((S ‘x)
·ih y)
↔ ((T ‘y) ·ih x) = (y
·ih (S
‘x)))) |
| 22 | | eqcom 1520 |
. . . . 5
⊢ (((T ‘y)
·ih x) =
(y ·ih
(S ‘x)) ↔ (y
·ih (S
‘x)) = ((T ‘y)
·ih x)) |
| 23 | 21, 22 | syl6bb 539 |
. . . 4
⊢ ((((S: ℋ
–→ ℋ ⋀ T: ℋ –→ ℋ ) ⋀ x ∈ ℋ ) ⋀ y ∈ ℋ ) → ((x
·ih (T
‘y)) = ((S ‘x)
·ih y)
↔ (y
·ih (S
‘x)) = ((T ‘y)
·ih x))) |
| 24 | 23 | ralbidva 1705 |
. . 3
⊢ (((S: ℋ
–→ ℋ ⋀ T: ℋ –→ ℋ ) ⋀ x ∈ ℋ ) → (∀y ∈ ℋ (x ·ih (T ‘y)) =
((S ‘x) ·ih y) ↔ ∀y ∈ ℋ (y ·ih (S ‘x)) =
((T ‘y) ·ih x))) |
| 25 | 24 | ralbidva 1705 |
. 2
⊢ ((S: ℋ
–→ ℋ ⋀ T: ℋ –→ ℋ ) → (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (T ‘y)) =
((S ‘x) ·ih y) ↔ ∀x ∈ ℋ ∀y ∈ ℋ (y ·ih (S ‘x)) =
((T ‘y) ·ih x))) |
| 26 | | ralcom 1820 |
. . . 4
⊢ (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (S ‘y)) =
((T ‘x) ·ih y) ↔ ∀y ∈ ℋ ∀x ∈ ℋ (x ·ih (S ‘y)) =
((T ‘x) ·ih y)) |
| 27 | | fveq2 3835 |
. . . . . . . 8
⊢ (z = y →
(S ‘z) = (S
‘y)) |
| 28 | 27 | opreq2d 4034 |
. . . . . . 7
⊢ (z = y →
(x ·ih
(S ‘z)) = (x
·ih (S
‘y))) |
| 29 | | opreq2 4027 |
. . . . . . 7
⊢ (z = y →
((T ‘x) ·ih z) = ((T
‘x)
·ih y)) |
| 30 | 28, 29 | eqeq12d 1532 |
. . . . . 6
⊢ (z = y →
((x ·ih
(S ‘z)) = ((T
‘x)
·ih z)
↔ (x
·ih (S
‘y)) = ((T ‘x)
·ih y))) |
| 31 | 30 | ralbidv 1709 |
. . . . 5
⊢ (z = y →
(∀x
∈ ℋ
(x ·ih
(S ‘z)) = ((T
‘x)
·ih z)
↔ ∀x ∈ ℋ (x
·ih (S
‘y)) = ((T ‘x)
·ih y))) |
| 32 | 31 | cbvralv 1846 |
. . . 4
⊢ (∀z ∈ ℋ ∀x ∈ ℋ (x ·ih (S ‘z)) =
((T ‘x) ·ih z) ↔ ∀y ∈ ℋ ∀x ∈ ℋ (x ·ih (S ‘y)) =
((T ‘x) ·ih y)) |
| 33 | 26, 32 | bitr4i 174 |
. . 3
⊢ (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (S ‘y)) =
((T ‘x) ·ih y) ↔ ∀z ∈ ℋ ∀x ∈ ℋ (x ·ih (S ‘z)) =
((T ‘x) ·ih z)) |
| 34 | | opreq1 4026 |
. . . . . 6
⊢ (x = y →
(x ·ih
(S ‘z)) = (y
·ih (S
‘z))) |
| 35 | | fveq2 3835 |
. . . . . . 7
⊢ (x = y →
(T ‘x) = (T
‘y)) |
| 36 | 35 | opreq1d 4033 |
. . . . . 6
⊢ (x = y →
((T ‘x) ·ih z) = ((T
‘y)
·ih z)) |
| 37 | 34, 36 | eqeq12d 1532 |
. . . . 5
⊢ (x = y →
((x ·ih
(S ‘z)) = ((T
‘x)
·ih z)
↔ (y
·ih (S
‘z)) = ((T ‘y)
·ih z))) |
| 38 | 37 | cbvralv 1846 |
. . . 4
⊢ (∀x ∈ ℋ (x ·ih (S ‘z)) =
((T ‘x) ·ih z) ↔ ∀y ∈ ℋ (y ·ih (S ‘z)) =
((T ‘y) ·ih z)) |
| 39 | 38 | ralbii 1713 |
. . 3
⊢ (∀z ∈ ℋ ∀x ∈ ℋ (x ·ih (S ‘z)) =
((T ‘x) ·ih z) ↔ ∀z ∈ ℋ ∀y ∈ ℋ (y ·ih (S ‘z)) =
((T ‘y) ·ih z)) |
| 40 | | fveq2 3835 |
. . . . . . 7
⊢ (z = x →
(S ‘z) = (S
‘x)) |
| 41 | 40 | opreq2d 4034 |
. . . . . 6
⊢ (z = x →
(y ·ih
(S ‘z)) = (y
·ih (S
‘x))) |
| 42 | | opreq2 4027 |
. . . . . 6
⊢ (z = x →
((T ‘y) ·ih z) = ((T
‘y)
·ih x)) |
| 43 | 41, 42 | eqeq12d 1532 |
. . . . 5
⊢ (z = x →
((y ·ih
(S ‘z)) = ((T
‘y)
·ih z)
↔ (y
·ih (S
‘x)) = ((T ‘y)
·ih x))) |
| 44 | 43 | ralbidv 1709 |
. . . 4
⊢ (z = x →
(∀y
∈ ℋ
(y ·ih
(S ‘z)) = ((T
‘y)
·ih z)
↔ ∀y ∈ ℋ (y
·ih (S
‘x)) = ((T ‘y)
·ih x))) |
| 45 | 44 | cbvralv 1846 |
. . 3
⊢ (∀z ∈ ℋ ∀y ∈ ℋ (y ·ih (S ‘z)) =
((T ‘y) ·ih z) ↔ ∀x ∈ ℋ ∀y ∈ ℋ (y ·ih (S ‘x)) =
((T ‘y) ·ih x)) |
| 46 | 33, 39, 45 | 3bitri 175 |
. 2
⊢ (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (S ‘y)) =
((T ‘x) ·ih y) ↔ ∀x ∈ ℋ ∀y ∈ ℋ (y ·ih (S ‘x)) =
((T ‘y) ·ih x)) |
| 47 | 25, 46 | syl6rbbr 542 |
1
⊢ ((S: ℋ
–→ ℋ ⋀ T: ℋ –→ ℋ ) → (∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (S ‘y)) =
((T ‘x) ·ih y) ↔ ∀x ∈ ℋ ∀y ∈ ℋ (x ·ih (T ‘y)) =
((S ‘x) ·ih y))) |