Step |
Hyp |
Ref |
Expression |
1 |
|
elhmop |
โข ( ๐ โ HrmOp โ ( ๐ : โ โถ โ โง โ ๐ฅ โ โ โ ๐ฆ โ โ ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) ) ) |
2 |
1
|
simprbi |
โข ( ๐ โ HrmOp โ โ ๐ฅ โ โ โ ๐ฆ โ โ ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) ) |
3 |
2
|
3ad2ant1 |
โข ( ( ๐ โ HrmOp โง ๐ด โ โ โง ๐ต โ โ ) โ โ ๐ฅ โ โ โ ๐ฆ โ โ ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) ) |
4 |
|
oveq1 |
โข ( ๐ฅ = ๐ด โ ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ๐ด ยทih ( ๐ โ ๐ฆ ) ) ) |
5 |
|
fveq2 |
โข ( ๐ฅ = ๐ด โ ( ๐ โ ๐ฅ ) = ( ๐ โ ๐ด ) ) |
6 |
5
|
oveq1d |
โข ( ๐ฅ = ๐ด โ ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) = ( ( ๐ โ ๐ด ) ยทih ๐ฆ ) ) |
7 |
4 6
|
eqeq12d |
โข ( ๐ฅ = ๐ด โ ( ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) โ ( ๐ด ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ด ) ยทih ๐ฆ ) ) ) |
8 |
|
fveq2 |
โข ( ๐ฆ = ๐ต โ ( ๐ โ ๐ฆ ) = ( ๐ โ ๐ต ) ) |
9 |
8
|
oveq2d |
โข ( ๐ฆ = ๐ต โ ( ๐ด ยทih ( ๐ โ ๐ฆ ) ) = ( ๐ด ยทih ( ๐ โ ๐ต ) ) ) |
10 |
|
oveq2 |
โข ( ๐ฆ = ๐ต โ ( ( ๐ โ ๐ด ) ยทih ๐ฆ ) = ( ( ๐ โ ๐ด ) ยทih ๐ต ) ) |
11 |
9 10
|
eqeq12d |
โข ( ๐ฆ = ๐ต โ ( ( ๐ด ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ด ) ยทih ๐ฆ ) โ ( ๐ด ยทih ( ๐ โ ๐ต ) ) = ( ( ๐ โ ๐ด ) ยทih ๐ต ) ) ) |
12 |
7 11
|
rspc2v |
โข ( ( ๐ด โ โ โง ๐ต โ โ ) โ ( โ ๐ฅ โ โ โ ๐ฆ โ โ ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) โ ( ๐ด ยทih ( ๐ โ ๐ต ) ) = ( ( ๐ โ ๐ด ) ยทih ๐ต ) ) ) |
13 |
12
|
3adant1 |
โข ( ( ๐ โ HrmOp โง ๐ด โ โ โง ๐ต โ โ ) โ ( โ ๐ฅ โ โ โ ๐ฆ โ โ ( ๐ฅ ยทih ( ๐ โ ๐ฆ ) ) = ( ( ๐ โ ๐ฅ ) ยทih ๐ฆ ) โ ( ๐ด ยทih ( ๐ โ ๐ต ) ) = ( ( ๐ โ ๐ด ) ยทih ๐ต ) ) ) |
14 |
3 13
|
mpd |
โข ( ( ๐ โ HrmOp โง ๐ด โ โ โง ๐ต โ โ ) โ ( ๐ด ยทih ( ๐ โ ๐ต ) ) = ( ( ๐ โ ๐ด ) ยทih ๐ต ) ) |