Metamath Proof Explorer


Theorem mapdpglem24

Description: Lemma for mapdpg . Existence part - consolidate hypotheses in mapdpglem23 . (Contributed by NM, 21-Mar-2015)

Ref Expression
Hypotheses mapdpg.h ⊢ H = LHyp ⁡ K
mapdpg.m ⊢ M = mapd ⁡ K ⁡ W
mapdpg.u ⊢ U = DVecH ⁡ K ⁡ W
mapdpg.v ⊢ V = Base U
mapdpg.s ⊢ - ˙ = - U
mapdpg.z ⊢ 0 ˙ = 0 U
mapdpg.n ⊢ N = LSpan ⁡ U
mapdpg.c ⊢ C = LCDual ⁡ K ⁡ W
mapdpg.f ⊢ F = Base C
mapdpg.r ⊢ R = - C
mapdpg.j ⊢ J = LSpan ⁡ C
mapdpg.k ⊢ φ → K ∈ HL ∧ W ∈ H
mapdpg.x ⊢ φ → X ∈ V ∖ 0 ˙
mapdpg.y ⊢ φ → Y ∈ V ∖ 0 ˙
mapdpg.g ⊢ φ → G ∈ F
mapdpg.ne ⊢ φ → N ⁡ X ≠ N ⁡ Y
mapdpg.e ⊢ φ → M ⁡ N ⁡ X = J ⁡ G
Assertion mapdpglem24 ⊢ φ → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h

Proof

Step Hyp Ref Expression
1 mapdpg.h ⊢ H = LHyp ⁡ K
2 mapdpg.m ⊢ M = mapd ⁡ K ⁡ W
3 mapdpg.u ⊢ U = DVecH ⁡ K ⁡ W
4 mapdpg.v ⊢ V = Base U
5 mapdpg.s ⊢ - ˙ = - U
6 mapdpg.z ⊢ 0 ˙ = 0 U
7 mapdpg.n ⊢ N = LSpan ⁡ U
8 mapdpg.c ⊢ C = LCDual ⁡ K ⁡ W
9 mapdpg.f ⊢ F = Base C
10 mapdpg.r ⊢ R = - C
11 mapdpg.j ⊢ J = LSpan ⁡ C
12 mapdpg.k ⊢ φ → K ∈ HL ∧ W ∈ H
13 mapdpg.x ⊢ φ → X ∈ V ∖ 0 ˙
14 mapdpg.y ⊢ φ → Y ∈ V ∖ 0 ˙
15 mapdpg.g ⊢ φ → G ∈ F
16 mapdpg.ne ⊢ φ → N ⁡ X ≠ N ⁡ Y
17 mapdpg.e ⊢ φ → M ⁡ N ⁡ X = J ⁡ G
18 13 eldifad ⊢ φ → X ∈ V
19 14 eldifad ⊢ φ → Y ∈ V
20 eqid ⊢ LSSum ⁡ C = LSSum ⁡ C
21 1 2 3 4 5 7 8 12 18 19 20 11 mapdpglem2 ⊢ φ → ∃ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y M ⁡ N ⁡ X - ˙ Y = J ⁡ t
22 12 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → K ∈ HL ∧ W ∈ H
23 18 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → X ∈ V
24 19 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → Y ∈ V
25 simp2 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y
26 eqid ⊢ Scalar ⁡ U = Scalar ⁡ U
27 eqid ⊢ Base Scalar ⁡ U = Base Scalar ⁡ U
28 eqid ⊢ ⋅ C = ⋅ C
29 15 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → G ∈ F
30 17 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → M ⁡ N ⁡ X = J ⁡ G
31 1 2 3 4 5 7 8 22 23 24 20 11 9 25 26 27 28 10 29 30 mapdpglem3 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → ∃ g ∈ Base Scalar ⁡ U ∃ z ∈ M ⁡ N ⁡ Y t = g ⋅ C G R z
32 22 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → K ∈ HL ∧ W ∈ H
33 23 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → X ∈ V
34 24 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → Y ∈ V
35 simp12 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y
36 29 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → G ∈ F
37 30 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → M ⁡ N ⁡ X = J ⁡ G
38 16 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → N ⁡ X ≠ N ⁡ Y
39 38 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → N ⁡ X ≠ N ⁡ Y
40 simp13 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → M ⁡ N ⁡ X - ˙ Y = J ⁡ t
41 eqid ⊢ 0 Scalar ⁡ U = 0 Scalar ⁡ U
42 simp2l ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → g ∈ Base Scalar ⁡ U
43 simp2r ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → z ∈ M ⁡ N ⁡ Y
44 simp3 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → t = g ⋅ C G R z
45 eldifsni ⊢ X ∈ V ∖ 0 ˙ → X ≠ 0 ˙
46 13 45 syl ⊢ φ → X ≠ 0 ˙
47 46 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → X ≠ 0 ˙
48 47 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → X ≠ 0 ˙
49 eldifsni ⊢ Y ∈ V ∖ 0 ˙ → Y ≠ 0 ˙
50 14 49 syl ⊢ φ → Y ≠ 0 ˙
51 50 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → Y ≠ 0 ˙
52 51 3ad2ant1 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → Y ≠ 0 ˙
53 eqid ⊢ inv r ⁡ Scalar ⁡ U ⁡ g ⋅ C z = inv r ⁡ Scalar ⁡ U ⁡ g ⋅ C z
54 1 2 3 4 5 7 8 32 33 34 20 11 9 35 26 27 28 10 36 37 6 39 40 41 42 43 44 48 52 53 mapdpglem23 ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t ∧ g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y ∧ t = g ⋅ C G R z → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h
55 54 3exp ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → g ∈ Base Scalar ⁡ U ∧ z ∈ M ⁡ N ⁡ Y → t = g ⋅ C G R z → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h
56 55 rexlimdvv ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → ∃ g ∈ Base Scalar ⁡ U ∃ z ∈ M ⁡ N ⁡ Y t = g ⋅ C G R z → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h
57 31 56 mpd ⊢ φ ∧ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ t → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h
58 57 rexlimdv3a ⊢ φ → ∃ t ∈ M ⁡ N ⁡ X LSSum ⁡ C M ⁡ N ⁡ Y M ⁡ N ⁡ X - ˙ Y = J ⁡ t → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h
59 21 58 mpd ⊢ φ → ∃ h ∈ F M ⁡ N ⁡ Y = J ⁡ h ∧ M ⁡ N ⁡ X - ˙ Y = J ⁡ G R h