Metamath Proof Explorer


Theorem crosspaltd

Description: Antisymmetry of the cross product: swapping the two vectors negates the result. (Contributed by Jiamin Zhao, 12-Aug-2026)

Ref Expression
Hypotheses crosspaltd.1 φ A 1 3
crosspaltd.2 φ B 1 3
Assertion crosspaltd Could not format assertion : No typesetting found for |- ( ph -> ( A crossp B ) = ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ) with typecode |-

Proof

Step Hyp Ref Expression
1 crosspaltd.1 φ A 1 3
2 crosspaltd.2 φ B 1 3
3 1 2 crosspcld Could not format ( ph -> ( A crossp B ) e. ( RR ^m ( 1 ... 3 ) ) ) : No typesetting found for |- ( ph -> ( A crossp B ) e. ( RR ^m ( 1 ... 3 ) ) ) with typecode |-
4 elmapfn Could not format ( ( A crossp B ) e. ( RR ^m ( 1 ... 3 ) ) -> ( A crossp B ) Fn ( 1 ... 3 ) ) : No typesetting found for |- ( ( A crossp B ) e. ( RR ^m ( 1 ... 3 ) ) -> ( A crossp B ) Fn ( 1 ... 3 ) ) with typecode |-
5 3 4 syl Could not format ( ph -> ( A crossp B ) Fn ( 1 ... 3 ) ) : No typesetting found for |- ( ph -> ( A crossp B ) Fn ( 1 ... 3 ) ) with typecode |-
6 negex Could not format -u ( ( B crossp A ) ` k ) e. _V : No typesetting found for |- -u ( ( B crossp A ) ` k ) e. _V with typecode |-
7 eqid Could not format ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) = ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) : No typesetting found for |- ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) = ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) with typecode |-
8 6 7 fnmpti Could not format ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) Fn ( 1 ... 3 ) : No typesetting found for |- ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) Fn ( 1 ... 3 ) with typecode |-
9 8 a1i Could not format ( ph -> ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) Fn ( 1 ... 3 ) ) : No typesetting found for |- ( ph -> ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) Fn ( 1 ... 3 ) ) with typecode |-
10 simpr φ t 1 3 t = 1 t = 1
11 10 fveq2d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( A crossp B ) ` t ) = ( ( A crossp B ) ` 1 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( A crossp B ) ` t ) = ( ( A crossp B ) ` 1 ) ) with typecode |-
12 1 2 crosspv1d Could not format ( ph -> ( ( A crossp B ) ` 1 ) = ( ( ( A ` 2 ) x. ( B ` 3 ) ) - ( ( A ` 3 ) x. ( B ` 2 ) ) ) ) : No typesetting found for |- ( ph -> ( ( A crossp B ) ` 1 ) = ( ( ( A ` 2 ) x. ( B ` 3 ) ) - ( ( A ` 3 ) x. ( B ` 2 ) ) ) ) with typecode |-
13 12 ad2antrr Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( A crossp B ) ` 1 ) = ( ( ( A ` 2 ) x. ( B ` 3 ) ) - ( ( A ` 3 ) x. ( B ` 2 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( A crossp B ) ` 1 ) = ( ( ( A ` 2 ) x. ( B ` 3 ) ) - ( ( A ` 3 ) x. ( B ` 2 ) ) ) ) with typecode |-
14 2 rr3fv2cld φ B 2
15 1 rr3fv3cld φ A 3
16 14 15 remulcld φ B 2 A 3
17 16 recnd φ B 2 A 3
18 2 rr3fv3cld φ B 3
19 1 rr3fv2cld φ A 2
20 18 19 remulcld φ B 3 A 2
21 20 recnd φ B 3 A 2
22 17 21 negsubdi2d φ B 2 A 3 B 3 A 2 = B 3 A 2 B 2 A 3
23 22 ad2antrr φ t 1 3 t = 1 B 2 A 3 B 3 A 2 = B 3 A 2 B 2 A 3
24 10 fveq2d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( B crossp A ) ` t ) = ( ( B crossp A ) ` 1 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( B crossp A ) ` t ) = ( ( B crossp A ) ` 1 ) ) with typecode |-
25 2 1 crosspv1d Could not format ( ph -> ( ( B crossp A ) ` 1 ) = ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) : No typesetting found for |- ( ph -> ( ( B crossp A ) ` 1 ) = ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) with typecode |-
26 25 ad2antrr Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( B crossp A ) ` 1 ) = ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( B crossp A ) ` 1 ) = ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) with typecode |-
27 24 26 eqtrd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( B crossp A ) ` t ) = ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( B crossp A ) ` t ) = ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) with typecode |-
28 27 negeqd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> -u ( ( B crossp A ) ` t ) = -u ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> -u ( ( B crossp A ) ` t ) = -u ( ( ( B ` 2 ) x. ( A ` 3 ) ) - ( ( B ` 3 ) x. ( A ` 2 ) ) ) ) with typecode |-
29 19 recnd φ A 2
30 18 recnd φ B 3
31 29 30 mulcomd φ A 2 B 3 = B 3 A 2
32 31 ad2antrr φ t 1 3 t = 1 A 2 B 3 = B 3 A 2
33 15 recnd φ A 3
34 14 recnd φ B 2
35 33 34 mulcomd φ A 3 B 2 = B 2 A 3
36 35 ad2antrr φ t 1 3 t = 1 A 3 B 2 = B 2 A 3
37 32 36 oveq12d φ t 1 3 t = 1 A 2 B 3 A 3 B 2 = B 3 A 2 B 2 A 3
38 23 28 37 3eqtr4rd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( ( A ` 2 ) x. ( B ` 3 ) ) - ( ( A ` 3 ) x. ( B ` 2 ) ) ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( ( A ` 2 ) x. ( B ` 3 ) ) - ( ( A ` 3 ) x. ( B ` 2 ) ) ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
39 11 13 38 3eqtrd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = 1 ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
40 2 1 crosspv2d Could not format ( ph -> ( ( B crossp A ) ` 2 ) = ( ( ( B ` 3 ) x. ( A ` 1 ) ) - ( ( B ` 1 ) x. ( A ` 3 ) ) ) ) : No typesetting found for |- ( ph -> ( ( B crossp A ) ` 2 ) = ( ( ( B ` 3 ) x. ( A ` 1 ) ) - ( ( B ` 1 ) x. ( A ` 3 ) ) ) ) with typecode |-
41 40 ad2antrr Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( B crossp A ) ` 2 ) = ( ( ( B ` 3 ) x. ( A ` 1 ) ) - ( ( B ` 1 ) x. ( A ` 3 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( B crossp A ) ` 2 ) = ( ( ( B ` 3 ) x. ( A ` 1 ) ) - ( ( B ` 1 ) x. ( A ` 3 ) ) ) ) with typecode |-
42 41 negeqd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` 2 ) = -u ( ( ( B ` 3 ) x. ( A ` 1 ) ) - ( ( B ` 1 ) x. ( A ` 3 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` 2 ) = -u ( ( ( B ` 3 ) x. ( A ` 1 ) ) - ( ( B ` 1 ) x. ( A ` 3 ) ) ) ) with typecode |-
43 1 rr3fv1cld φ A 1
44 18 43 remulcld φ B 3 A 1
45 44 recnd φ B 3 A 1
46 2 rr3fv1cld φ B 1
47 remulcl B 1 A 3 B 1 A 3
48 47 recnd B 1 A 3 B 1 A 3
49 46 15 48 syl2anc φ B 1 A 3
50 45 49 negsubdi2d φ B 3 A 1 B 1 A 3 = B 1 A 3 B 3 A 1
51 50 ad2antrr φ t 1 3 t = 1 + 1 B 3 A 1 B 1 A 3 = B 1 A 3 B 3 A 1
52 46 recnd φ B 1
53 52 33 mulcomd φ B 1 A 3 = A 3 B 1
54 53 ad2antrr φ t 1 3 t = 1 + 1 B 1 A 3 = A 3 B 1
55 43 recnd φ A 1
56 30 55 mulcomd φ B 3 A 1 = A 1 B 3
57 56 ad2antrr φ t 1 3 t = 1 + 1 B 3 A 1 = A 1 B 3
58 54 57 oveq12d φ t 1 3 t = 1 + 1 B 1 A 3 B 3 A 1 = A 3 B 1 A 1 B 3
59 42 51 58 3eqtrd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` 2 ) = ( ( ( A ` 3 ) x. ( B ` 1 ) ) - ( ( A ` 1 ) x. ( B ` 3 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` 2 ) = ( ( ( A ` 3 ) x. ( B ` 1 ) ) - ( ( A ` 1 ) x. ( B ` 3 ) ) ) ) with typecode |-
60 1 2 crosspv2d Could not format ( ph -> ( ( A crossp B ) ` 2 ) = ( ( ( A ` 3 ) x. ( B ` 1 ) ) - ( ( A ` 1 ) x. ( B ` 3 ) ) ) ) : No typesetting found for |- ( ph -> ( ( A crossp B ) ` 2 ) = ( ( ( A ` 3 ) x. ( B ` 1 ) ) - ( ( A ` 1 ) x. ( B ` 3 ) ) ) ) with typecode |-
61 60 ad2antrr Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( A crossp B ) ` 2 ) = ( ( ( A ` 3 ) x. ( B ` 1 ) ) - ( ( A ` 1 ) x. ( B ` 3 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( A crossp B ) ` 2 ) = ( ( ( A ` 3 ) x. ( B ` 1 ) ) - ( ( A ` 1 ) x. ( B ` 3 ) ) ) ) with typecode |-
62 59 61 eqtr4d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` 2 ) = ( ( A crossp B ) ` 2 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` 2 ) = ( ( A crossp B ) ` 2 ) ) with typecode |-
63 simpr φ t 1 3 t = 1 + 1 t = 1 + 1
64 1p1e2 1 + 1 = 2
65 63 64 eqtrdi φ t 1 3 t = 1 + 1 t = 2
66 65 fveq2d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( B crossp A ) ` t ) = ( ( B crossp A ) ` 2 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( B crossp A ) ` t ) = ( ( B crossp A ) ` 2 ) ) with typecode |-
67 66 negeqd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` t ) = -u ( ( B crossp A ) ` 2 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> -u ( ( B crossp A ) ` t ) = -u ( ( B crossp A ) ` 2 ) ) with typecode |-
68 65 fveq2d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( A crossp B ) ` t ) = ( ( A crossp B ) ` 2 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( A crossp B ) ` t ) = ( ( A crossp B ) ` 2 ) ) with typecode |-
69 62 67 68 3eqtr4rd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 1 ) ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
70 2 1 crosspv3d Could not format ( ph -> ( ( B crossp A ) ` 3 ) = ( ( ( B ` 1 ) x. ( A ` 2 ) ) - ( ( B ` 2 ) x. ( A ` 1 ) ) ) ) : No typesetting found for |- ( ph -> ( ( B crossp A ) ` 3 ) = ( ( ( B ` 1 ) x. ( A ` 2 ) ) - ( ( B ` 2 ) x. ( A ` 1 ) ) ) ) with typecode |-
71 70 ad2antrr Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( B crossp A ) ` 3 ) = ( ( ( B ` 1 ) x. ( A ` 2 ) ) - ( ( B ` 2 ) x. ( A ` 1 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( B crossp A ) ` 3 ) = ( ( ( B ` 1 ) x. ( A ` 2 ) ) - ( ( B ` 2 ) x. ( A ` 1 ) ) ) ) with typecode |-
72 71 negeqd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` 3 ) = -u ( ( ( B ` 1 ) x. ( A ` 2 ) ) - ( ( B ` 2 ) x. ( A ` 1 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` 3 ) = -u ( ( ( B ` 1 ) x. ( A ` 2 ) ) - ( ( B ` 2 ) x. ( A ` 1 ) ) ) ) with typecode |-
73 46 19 remulcld φ B 1 A 2
74 73 recnd φ B 1 A 2
75 remulcl B 2 A 1 B 2 A 1
76 75 recnd B 2 A 1 B 2 A 1
77 14 43 76 syl2anc φ B 2 A 1
78 74 77 negsubdi2d φ B 1 A 2 B 2 A 1 = B 2 A 1 B 1 A 2
79 78 ad2antrr φ t 1 3 t = 1 + 2 B 1 A 2 B 2 A 1 = B 2 A 1 B 1 A 2
80 34 55 mulcomd φ B 2 A 1 = A 1 B 2
81 80 ad2antrr φ t 1 3 t = 1 + 2 B 2 A 1 = A 1 B 2
82 52 29 mulcomd φ B 1 A 2 = A 2 B 1
83 82 ad2antrr φ t 1 3 t = 1 + 2 B 1 A 2 = A 2 B 1
84 81 83 oveq12d φ t 1 3 t = 1 + 2 B 2 A 1 B 1 A 2 = A 1 B 2 A 2 B 1
85 72 79 84 3eqtrd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` 3 ) = ( ( ( A ` 1 ) x. ( B ` 2 ) ) - ( ( A ` 2 ) x. ( B ` 1 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` 3 ) = ( ( ( A ` 1 ) x. ( B ` 2 ) ) - ( ( A ` 2 ) x. ( B ` 1 ) ) ) ) with typecode |-
86 1 2 crosspv3d Could not format ( ph -> ( ( A crossp B ) ` 3 ) = ( ( ( A ` 1 ) x. ( B ` 2 ) ) - ( ( A ` 2 ) x. ( B ` 1 ) ) ) ) : No typesetting found for |- ( ph -> ( ( A crossp B ) ` 3 ) = ( ( ( A ` 1 ) x. ( B ` 2 ) ) - ( ( A ` 2 ) x. ( B ` 1 ) ) ) ) with typecode |-
87 86 ad2antrr Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( A crossp B ) ` 3 ) = ( ( ( A ` 1 ) x. ( B ` 2 ) ) - ( ( A ` 2 ) x. ( B ` 1 ) ) ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( A crossp B ) ` 3 ) = ( ( ( A ` 1 ) x. ( B ` 2 ) ) - ( ( A ` 2 ) x. ( B ` 1 ) ) ) ) with typecode |-
88 85 87 eqtr4d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` 3 ) = ( ( A crossp B ) ` 3 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` 3 ) = ( ( A crossp B ) ` 3 ) ) with typecode |-
89 simpr φ t 1 3 t = 1 + 2 t = 1 + 2
90 1p2e3 1 + 2 = 3
91 89 90 eqtrdi φ t 1 3 t = 1 + 2 t = 3
92 91 fveq2d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( B crossp A ) ` t ) = ( ( B crossp A ) ` 3 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( B crossp A ) ` t ) = ( ( B crossp A ) ` 3 ) ) with typecode |-
93 92 negeqd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` t ) = -u ( ( B crossp A ) ` 3 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> -u ( ( B crossp A ) ` t ) = -u ( ( B crossp A ) ` 3 ) ) with typecode |-
94 91 fveq2d Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( A crossp B ) ` t ) = ( ( A crossp B ) ` 3 ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( A crossp B ) ` t ) = ( ( A crossp B ) ` 3 ) ) with typecode |-
95 88 93 94 3eqtr4rd Could not format ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( ( ( ph /\ t e. ( 1 ... 3 ) ) /\ t = ( 1 + 2 ) ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
96 simpr φ t 1 3 t 1 3
97 90 eqcomi 3 = 1 + 2
98 97 oveq2i 1 3 = 1 1 + 2
99 1z 1
100 fztp 1 1 1 + 2 = 1 1 + 1 1 + 2
101 99 100 ax-mp 1 1 + 2 = 1 1 + 1 1 + 2
102 98 101 eqtri 1 3 = 1 1 + 1 1 + 2
103 96 102 eleqtrdi φ t 1 3 t 1 1 + 1 1 + 2
104 eltpi t 1 1 + 1 1 + 2 t = 1 t = 1 + 1 t = 1 + 2
105 103 104 syl φ t 1 3 t = 1 t = 1 + 1 t = 1 + 2
106 39 69 95 105 mpjao3dan Could not format ( ( ph /\ t e. ( 1 ... 3 ) ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( ( ph /\ t e. ( 1 ... 3 ) ) -> ( ( A crossp B ) ` t ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
107 fveq2 Could not format ( k = t -> ( ( B crossp A ) ` k ) = ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( k = t -> ( ( B crossp A ) ` k ) = ( ( B crossp A ) ` t ) ) with typecode |-
108 107 negeqd Could not format ( k = t -> -u ( ( B crossp A ) ` k ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( k = t -> -u ( ( B crossp A ) ` k ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
109 negex Could not format -u ( ( B crossp A ) ` t ) e. _V : No typesetting found for |- -u ( ( B crossp A ) ` t ) e. _V with typecode |-
110 109 a1i Could not format ( ( ph /\ t e. ( 1 ... 3 ) ) -> -u ( ( B crossp A ) ` t ) e. _V ) : No typesetting found for |- ( ( ph /\ t e. ( 1 ... 3 ) ) -> -u ( ( B crossp A ) ` t ) e. _V ) with typecode |-
111 7 108 96 110 fvmptd3 Could not format ( ( ph /\ t e. ( 1 ... 3 ) ) -> ( ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ` t ) = -u ( ( B crossp A ) ` t ) ) : No typesetting found for |- ( ( ph /\ t e. ( 1 ... 3 ) ) -> ( ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ` t ) = -u ( ( B crossp A ) ` t ) ) with typecode |-
112 106 111 eqtr4d Could not format ( ( ph /\ t e. ( 1 ... 3 ) ) -> ( ( A crossp B ) ` t ) = ( ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ` t ) ) : No typesetting found for |- ( ( ph /\ t e. ( 1 ... 3 ) ) -> ( ( A crossp B ) ` t ) = ( ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ` t ) ) with typecode |-
113 5 9 112 eqfnfvd Could not format ( ph -> ( A crossp B ) = ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ) : No typesetting found for |- ( ph -> ( A crossp B ) = ( k e. ( 1 ... 3 ) |-> -u ( ( B crossp A ) ` k ) ) ) with typecode |-