Metamath Proof Explorer


Theorem hdmaprnlem4tN

Description: Lemma for hdmaprnN . TODO: This lemma doesn't quite pay for itself even though used six times. Maybe prove this directly instead. (Contributed by NM, 27-May-2015) (New usage is discouraged.)

Ref Expression
Hypotheses hdmaprnlem1.h H=LHypK
hdmaprnlem1.u U=DVecHKW
hdmaprnlem1.v V=BaseU
hdmaprnlem1.n N=LSpanU
hdmaprnlem1.c C=LCDualKW
hdmaprnlem1.l L=LSpanC
hdmaprnlem1.m M=mapdKW
hdmaprnlem1.s S=HDMapKW
hdmaprnlem1.k φKHLWH
hdmaprnlem1.se φsDQ
hdmaprnlem1.ve φvV
hdmaprnlem1.e φMNv=Ls
hdmaprnlem1.ue φuV
hdmaprnlem1.un φ¬uNv
hdmaprnlem1.d D=BaseC
hdmaprnlem1.q Q=0C
hdmaprnlem1.o 0˙=0U
hdmaprnlem1.a ˙=+C
hdmaprnlem1.t2 φtNv0˙
Assertion hdmaprnlem4tN φtV

Proof

Step Hyp Ref Expression
1 hdmaprnlem1.h H=LHypK
2 hdmaprnlem1.u U=DVecHKW
3 hdmaprnlem1.v V=BaseU
4 hdmaprnlem1.n N=LSpanU
5 hdmaprnlem1.c C=LCDualKW
6 hdmaprnlem1.l L=LSpanC
7 hdmaprnlem1.m M=mapdKW
8 hdmaprnlem1.s S=HDMapKW
9 hdmaprnlem1.k φKHLWH
10 hdmaprnlem1.se φsDQ
11 hdmaprnlem1.ve φvV
12 hdmaprnlem1.e φMNv=Ls
13 hdmaprnlem1.ue φuV
14 hdmaprnlem1.un φ¬uNv
15 hdmaprnlem1.d D=BaseC
16 hdmaprnlem1.q Q=0C
17 hdmaprnlem1.o 0˙=0U
18 hdmaprnlem1.a ˙=+C
19 hdmaprnlem1.t2 φtNv0˙
20 1 2 9 dvhlmod φULMod
21 11 snssd φvV
22 3 4 lspssv ULModvVNvV
23 20 21 22 syl2anc φNvV
24 23 ssdifssd φNv0˙V
25 24 19 sseldd φtV