Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  dihintcl Structured version   Visualization version   GIF version

Theorem dihintcl 38920
Description: The intersection of closed subspaces (the range of isomorphism H) is a closed subspace. (Contributed by NM, 14-Apr-2014.)
Hypotheses
Ref Expression
dihintcl.h 𝐻 = (LHyp‘𝐾)
dihintcl.i 𝐼 = ((DIsoH‘𝐾)‘𝑊)
Assertion
Ref Expression
dihintcl (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑆 ∈ ran 𝐼)

Proof of Theorem dihintcl
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2758 . . . . . . . 8 (Base‘𝐾) = (Base‘𝐾)
2 dihintcl.h . . . . . . . 8 𝐻 = (LHyp‘𝐾)
3 dihintcl.i . . . . . . . 8 𝐼 = ((DIsoH‘𝐾)‘𝑊)
41, 2, 3dihfn 38844 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑊𝐻) → 𝐼 Fn (Base‘𝐾))
51, 2, 3dihdm 38845 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑊𝐻) → dom 𝐼 = (Base‘𝐾))
65fneq2d 6428 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝐼 Fn dom 𝐼𝐼 Fn (Base‘𝐾)))
74, 6mpbird 260 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑊𝐻) → 𝐼 Fn dom 𝐼)
87adantr 484 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝐼 Fn dom 𝐼)
9 cnvimass 5921 . . . . 5 (𝐼𝑆) ⊆ dom 𝐼
10 fnssres 6453 . . . . 5 ((𝐼 Fn dom 𝐼 ∧ (𝐼𝑆) ⊆ dom 𝐼) → (𝐼 ↾ (𝐼𝑆)) Fn (𝐼𝑆))
118, 9, 10sylancl 589 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼 ↾ (𝐼𝑆)) Fn (𝐼𝑆))
12 fniinfv 6730 . . . 4 ((𝐼 ↾ (𝐼𝑆)) Fn (𝐼𝑆) → 𝑦 ∈ (𝐼𝑆)((𝐼 ↾ (𝐼𝑆))‘𝑦) = ran (𝐼 ↾ (𝐼𝑆)))
1311, 12syl 17 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑦 ∈ (𝐼𝑆)((𝐼 ↾ (𝐼𝑆))‘𝑦) = ran (𝐼 ↾ (𝐼𝑆)))
14 df-ima 5537 . . . . 5 (𝐼 “ (𝐼𝑆)) = ran (𝐼 ↾ (𝐼𝑆))
154adantr 484 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝐼 Fn (Base‘𝐾))
16 dffn4 6582 . . . . . . 7 (𝐼 Fn (Base‘𝐾) ↔ 𝐼:(Base‘𝐾)–onto→ran 𝐼)
1715, 16sylib 221 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝐼:(Base‘𝐾)–onto→ran 𝐼)
18 simprl 770 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑆 ⊆ ran 𝐼)
19 foimacnv 6619 . . . . . 6 ((𝐼:(Base‘𝐾)–onto→ran 𝐼𝑆 ⊆ ran 𝐼) → (𝐼 “ (𝐼𝑆)) = 𝑆)
2017, 18, 19syl2anc 587 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼 “ (𝐼𝑆)) = 𝑆)
2114, 20syl5eqr 2807 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → ran (𝐼 ↾ (𝐼𝑆)) = 𝑆)
2221inteqd 4843 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → ran (𝐼 ↾ (𝐼𝑆)) = 𝑆)
2313, 22eqtrd 2793 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑦 ∈ (𝐼𝑆)((𝐼 ↾ (𝐼𝑆))‘𝑦) = 𝑆)
24 simpl 486 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
255adantr 484 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → dom 𝐼 = (Base‘𝐾))
269, 25sseqtrid 3944 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼𝑆) ⊆ (Base‘𝐾))
27 simprr 772 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑆 ≠ ∅)
28 n0 4245 . . . . . . 7 (𝑆 ≠ ∅ ↔ ∃𝑦 𝑦𝑆)
2927, 28sylib 221 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → ∃𝑦 𝑦𝑆)
3018sselda 3892 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → 𝑦 ∈ ran 𝐼)
3125fneq2d 6428 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼 Fn dom 𝐼𝐼 Fn (Base‘𝐾)))
3215, 31mpbird 260 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝐼 Fn dom 𝐼)
3332adantr 484 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → 𝐼 Fn dom 𝐼)
34 fvelrnb 6714 . . . . . . . . 9 (𝐼 Fn dom 𝐼 → (𝑦 ∈ ran 𝐼 ↔ ∃𝑥 ∈ dom 𝐼(𝐼𝑥) = 𝑦))
3533, 34syl 17 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → (𝑦 ∈ ran 𝐼 ↔ ∃𝑥 ∈ dom 𝐼(𝐼𝑥) = 𝑦))
3630, 35mpbid 235 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → ∃𝑥 ∈ dom 𝐼(𝐼𝑥) = 𝑦)
37 fnfun 6434 . . . . . . . . . . . . . . 15 (𝐼 Fn (Base‘𝐾) → Fun 𝐼)
3815, 37syl 17 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → Fun 𝐼)
39 fvimacnv 6814 . . . . . . . . . . . . . 14 ((Fun 𝐼𝑥 ∈ dom 𝐼) → ((𝐼𝑥) ∈ 𝑆𝑥 ∈ (𝐼𝑆)))
4038, 39sylan 583 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑥 ∈ dom 𝐼) → ((𝐼𝑥) ∈ 𝑆𝑥 ∈ (𝐼𝑆)))
41 ne0i 4233 . . . . . . . . . . . . 13 (𝑥 ∈ (𝐼𝑆) → (𝐼𝑆) ≠ ∅)
4240, 41syl6bi 256 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑥 ∈ dom 𝐼) → ((𝐼𝑥) ∈ 𝑆 → (𝐼𝑆) ≠ ∅))
4342ex 416 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝑥 ∈ dom 𝐼 → ((𝐼𝑥) ∈ 𝑆 → (𝐼𝑆) ≠ ∅)))
44 eleq1 2839 . . . . . . . . . . . . 13 ((𝐼𝑥) = 𝑦 → ((𝐼𝑥) ∈ 𝑆𝑦𝑆))
4544biimprd 251 . . . . . . . . . . . 12 ((𝐼𝑥) = 𝑦 → (𝑦𝑆 → (𝐼𝑥) ∈ 𝑆))
4645imim1d 82 . . . . . . . . . . 11 ((𝐼𝑥) = 𝑦 → (((𝐼𝑥) ∈ 𝑆 → (𝐼𝑆) ≠ ∅) → (𝑦𝑆 → (𝐼𝑆) ≠ ∅)))
4743, 46syl9 77 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → ((𝐼𝑥) = 𝑦 → (𝑥 ∈ dom 𝐼 → (𝑦𝑆 → (𝐼𝑆) ≠ ∅))))
4847com24 95 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝑦𝑆 → (𝑥 ∈ dom 𝐼 → ((𝐼𝑥) = 𝑦 → (𝐼𝑆) ≠ ∅))))
4948imp 410 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → (𝑥 ∈ dom 𝐼 → ((𝐼𝑥) = 𝑦 → (𝐼𝑆) ≠ ∅)))
5049rexlimdv 3207 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → (∃𝑥 ∈ dom 𝐼(𝐼𝑥) = 𝑦 → (𝐼𝑆) ≠ ∅))
5136, 50mpd 15 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) ∧ 𝑦𝑆) → (𝐼𝑆) ≠ ∅)
5229, 51exlimddv 1936 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼𝑆) ≠ ∅)
53 eqid 2758 . . . . . 6 (glb‘𝐾) = (glb‘𝐾)
541, 53, 2, 3dihglb 38917 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐼𝑆) ⊆ (Base‘𝐾) ∧ (𝐼𝑆) ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(𝐼𝑆))) = 𝑦 ∈ (𝐼𝑆)(𝐼𝑦))
5524, 26, 52, 54syl12anc 835 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(𝐼𝑆))) = 𝑦 ∈ (𝐼𝑆)(𝐼𝑦))
56 fvres 6677 . . . . 5 (𝑦 ∈ (𝐼𝑆) → ((𝐼 ↾ (𝐼𝑆))‘𝑦) = (𝐼𝑦))
5756iineq2i 4905 . . . 4 𝑦 ∈ (𝐼𝑆)((𝐼 ↾ (𝐼𝑆))‘𝑦) = 𝑦 ∈ (𝐼𝑆)(𝐼𝑦)
5855, 57eqtr4di 2811 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(𝐼𝑆))) = 𝑦 ∈ (𝐼𝑆)((𝐼 ↾ (𝐼𝑆))‘𝑦))
59 hlclat 36934 . . . . . 6 (𝐾 ∈ HL → 𝐾 ∈ CLat)
6059ad2antrr 725 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝐾 ∈ CLat)
611, 53clatglbcl 17790 . . . . 5 ((𝐾 ∈ CLat ∧ (𝐼𝑆) ⊆ (Base‘𝐾)) → ((glb‘𝐾)‘(𝐼𝑆)) ∈ (Base‘𝐾))
6260, 26, 61syl2anc 587 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → ((glb‘𝐾)‘(𝐼𝑆)) ∈ (Base‘𝐾))
631, 2, 3dihcl 38846 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((glb‘𝐾)‘(𝐼𝑆)) ∈ (Base‘𝐾)) → (𝐼‘((glb‘𝐾)‘(𝐼𝑆))) ∈ ran 𝐼)
6462, 63syldan 594 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → (𝐼‘((glb‘𝐾)‘(𝐼𝑆))) ∈ ran 𝐼)
6558, 64eqeltrrd 2853 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑦 ∈ (𝐼𝑆)((𝐼 ↾ (𝐼𝑆))‘𝑦) ∈ ran 𝐼)
6623, 65eqeltrrd 2853 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑆 ⊆ ran 𝐼𝑆 ≠ ∅)) → 𝑆 ∈ ran 𝐼)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399   = wceq 1538  wex 1781  wcel 2111  wne 2951  wrex 3071  wss 3858  c0 4225   cint 4838   ciin 4884  ccnv 5523  dom cdm 5524  ran crn 5525  cres 5526  cima 5527  Fun wfun 6329   Fn wfn 6330  ontowfo 6333  cfv 6335  Basecbs 16541  glbcglb 17619  CLatccla 17783  HLchlt 36926  LHypclh 37560  DIsoHcdih 38804
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2729  ax-rep 5156  ax-sep 5169  ax-nul 5176  ax-pow 5234  ax-pr 5298  ax-un 7459  ax-cnex 10631  ax-resscn 10632  ax-1cn 10633  ax-icn 10634  ax-addcl 10635  ax-addrcl 10636  ax-mulcl 10637  ax-mulrcl 10638  ax-mulcom 10639  ax-addass 10640  ax-mulass 10641  ax-distr 10642  ax-i2m1 10643  ax-1ne0 10644  ax-1rid 10645  ax-rnegex 10646  ax-rrecex 10647  ax-cnre 10648  ax-pre-lttri 10649  ax-pre-lttrn 10650  ax-pre-ltadd 10651  ax-pre-mulgt0 10652  ax-riotaBAD 36529
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-fal 1551  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2557  df-eu 2588  df-clab 2736  df-cleq 2750  df-clel 2830  df-nfc 2901  df-ne 2952  df-nel 3056  df-ral 3075  df-rex 3076  df-reu 3077  df-rmo 3078  df-rab 3079  df-v 3411  df-sbc 3697  df-csb 3806  df-dif 3861  df-un 3863  df-in 3865  df-ss 3875  df-pss 3877  df-nul 4226  df-if 4421  df-pw 4496  df-sn 4523  df-pr 4525  df-tp 4527  df-op 4529  df-uni 4799  df-int 4839  df-iun 4885  df-iin 4886  df-br 5033  df-opab 5095  df-mpt 5113  df-tr 5139  df-id 5430  df-eprel 5435  df-po 5443  df-so 5444  df-fr 5483  df-we 5485  df-xp 5530  df-rel 5531  df-cnv 5532  df-co 5533  df-dm 5534  df-rn 5535  df-res 5536  df-ima 5537  df-pred 6126  df-ord 6172  df-on 6173  df-lim 6174  df-suc 6175  df-iota 6294  df-fun 6337  df-fn 6338  df-f 6339  df-f1 6340  df-fo 6341  df-f1o 6342  df-fv 6343  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7580  df-1st 7693  df-2nd 7694  df-tpos 7902  df-undef 7949  df-wrecs 7957  df-recs 8018  df-rdg 8056  df-1o 8112  df-er 8299  df-map 8418  df-en 8528  df-dom 8529  df-sdom 8530  df-fin 8531  df-pnf 10715  df-mnf 10716  df-xr 10717  df-ltxr 10718  df-le 10719  df-sub 10910  df-neg 10911  df-nn 11675  df-2 11737  df-3 11738  df-4 11739  df-5 11740  df-6 11741  df-n0 11935  df-z 12021  df-uz 12283  df-fz 12940  df-struct 16543  df-ndx 16544  df-slot 16545  df-base 16547  df-sets 16548  df-ress 16549  df-plusg 16636  df-mulr 16637  df-sca 16639  df-vsca 16640  df-0g 16773  df-proset 17604  df-poset 17622  df-plt 17634  df-lub 17650  df-glb 17651  df-join 17652  df-meet 17653  df-p0 17715  df-p1 17716  df-lat 17722  df-clat 17784  df-mgm 17918  df-sgrp 17967  df-mnd 17978  df-submnd 18023  df-grp 18172  df-minusg 18173  df-sbg 18174  df-subg 18343  df-cntz 18514  df-lsm 18828  df-cmn 18975  df-abl 18976  df-mgp 19308  df-ur 19320  df-ring 19367  df-oppr 19444  df-dvdsr 19462  df-unit 19463  df-invr 19493  df-dvr 19504  df-drng 19572  df-lmod 19704  df-lss 19772  df-lsp 19812  df-lvec 19943  df-lsatoms 36552  df-oposet 36752  df-ol 36754  df-oml 36755  df-covers 36842  df-ats 36843  df-atl 36874  df-cvlat 36898  df-hlat 36927  df-llines 37074  df-lplanes 37075  df-lvols 37076  df-lines 37077  df-psubsp 37079  df-pmap 37080  df-padd 37372  df-lhyp 37564  df-laut 37565  df-ldil 37680  df-ltrn 37681  df-trl 37735  df-tendo 38331  df-edring 38333  df-disoa 38605  df-dvech 38655  df-dib 38715  df-dic 38749  df-dih 38805
This theorem is referenced by:  doch2val2  38940  dochocss  38942
  Copyright terms: Public domain W3C validator