HSE Home Hilbert Space Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HSE Home  >  Th. List  >  occllem Structured version   Visualization version   GIF version

Theorem occllem 30074
Description: Lemma for occl 30075. (Contributed by NM, 7-Aug-2000.) (Revised by Mario Carneiro, 14-May-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
occl.1 (𝜑𝐴 ⊆ ℋ)
occl.2 (𝜑𝐹 ∈ Cauchy)
occl.3 (𝜑𝐹:ℕ⟶(⊥‘𝐴))
occl.4 (𝜑𝐵𝐴)
Assertion
Ref Expression
occllem (𝜑 → (( ⇝𝑣𝐹) ·ih 𝐵) = 0)

Proof of Theorem occllem
Dummy variables 𝑥 𝑘 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2737 . . . 4 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
21cnfldhaus 24100 . . 3 (TopOpen‘ℂfld) ∈ Haus
32a1i 11 . 2 (𝜑 → (TopOpen‘ℂfld) ∈ Haus)
4 occl.2 . . . . . . 7 (𝜑𝐹 ∈ Cauchy)
5 ax-hcompl 29973 . . . . . . 7 (𝐹 ∈ Cauchy → ∃𝑥 ∈ ℋ 𝐹𝑣 𝑥)
6 hlimf 30008 . . . . . . . . . 10 𝑣 :dom ⇝𝑣 ⟶ ℋ
7 ffn 6665 . . . . . . . . . 10 ( ⇝𝑣 :dom ⇝𝑣 ⟶ ℋ → ⇝𝑣 Fn dom ⇝𝑣 )
86, 7ax-mp 5 . . . . . . . . 9 𝑣 Fn dom ⇝𝑣
9 fnbr 6607 . . . . . . . . 9 (( ⇝𝑣 Fn dom ⇝𝑣𝐹𝑣 𝑥) → 𝐹 ∈ dom ⇝𝑣 )
108, 9mpan 688 . . . . . . . 8 (𝐹𝑣 𝑥𝐹 ∈ dom ⇝𝑣 )
1110rexlimivw 3146 . . . . . . 7 (∃𝑥 ∈ ℋ 𝐹𝑣 𝑥𝐹 ∈ dom ⇝𝑣 )
124, 5, 113syl 18 . . . . . 6 (𝜑𝐹 ∈ dom ⇝𝑣 )
13 ffun 6668 . . . . . . 7 ( ⇝𝑣 :dom ⇝𝑣 ⟶ ℋ → Fun ⇝𝑣 )
14 funfvbrb 6998 . . . . . . 7 (Fun ⇝𝑣 → (𝐹 ∈ dom ⇝𝑣𝐹𝑣 ( ⇝𝑣𝐹)))
156, 13, 14mp2b 10 . . . . . 6 (𝐹 ∈ dom ⇝𝑣𝐹𝑣 ( ⇝𝑣𝐹))
1612, 15sylib 217 . . . . 5 (𝜑𝐹𝑣 ( ⇝𝑣𝐹))
17 eqid 2737 . . . . . . . 8 ⟨⟨ + , · ⟩, norm⟩ = ⟨⟨ + , · ⟩, norm
18 eqid 2737 . . . . . . . . 9 (norm ∘ − ) = (norm ∘ − )
1917, 18hhims 29943 . . . . . . . 8 (norm ∘ − ) = (IndMet‘⟨⟨ + , · ⟩, norm⟩)
20 eqid 2737 . . . . . . . 8 (MetOpen‘(norm ∘ − )) = (MetOpen‘(norm ∘ − ))
2117, 19, 20hhlm 29970 . . . . . . 7 𝑣 = ((⇝𝑡‘(MetOpen‘(norm ∘ − ))) ↾ ( ℋ ↑m ℕ))
22 resss 5960 . . . . . . 7 ((⇝𝑡‘(MetOpen‘(norm ∘ − ))) ↾ ( ℋ ↑m ℕ)) ⊆ (⇝𝑡‘(MetOpen‘(norm ∘ − )))
2321, 22eqsstri 3976 . . . . . 6 𝑣 ⊆ (⇝𝑡‘(MetOpen‘(norm ∘ − )))
2423ssbri 5148 . . . . 5 (𝐹𝑣 ( ⇝𝑣𝐹) → 𝐹(⇝𝑡‘(MetOpen‘(norm ∘ − )))( ⇝𝑣𝐹))
2516, 24syl 17 . . . 4 (𝜑𝐹(⇝𝑡‘(MetOpen‘(norm ∘ − )))( ⇝𝑣𝐹))
2618hilxmet 29966 . . . . . 6 (norm ∘ − ) ∈ (∞Met‘ ℋ)
2720mopntopon 23744 . . . . . 6 ((norm ∘ − ) ∈ (∞Met‘ ℋ) → (MetOpen‘(norm ∘ − )) ∈ (TopOn‘ ℋ))
2826, 27mp1i 13 . . . . 5 (𝜑 → (MetOpen‘(norm ∘ − )) ∈ (TopOn‘ ℋ))
2928cnmptid 22964 . . . . 5 (𝜑 → (𝑥 ∈ ℋ ↦ 𝑥) ∈ ((MetOpen‘(norm ∘ − )) Cn (MetOpen‘(norm ∘ − ))))
30 occl.1 . . . . . . 7 (𝜑𝐴 ⊆ ℋ)
31 occl.4 . . . . . . 7 (𝜑𝐵𝐴)
3230, 31sseldd 3943 . . . . . 6 (𝜑𝐵 ∈ ℋ)
3328, 28, 32cnmptc 22965 . . . . 5 (𝜑 → (𝑥 ∈ ℋ ↦ 𝐵) ∈ ((MetOpen‘(norm ∘ − )) Cn (MetOpen‘(norm ∘ − ))))
3417hhnv 29936 . . . . . 6 ⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec
3517hhip 29948 . . . . . . 7 ·ih = (·𝑖OLD‘⟨⟨ + , · ⟩, norm⟩)
3635, 19, 20, 1dipcn 29491 . . . . . 6 (⟨⟨ + , · ⟩, norm⟩ ∈ NrmCVec → ·ih ∈ (((MetOpen‘(norm ∘ − )) ×t (MetOpen‘(norm ∘ − ))) Cn (TopOpen‘ℂfld)))
3734, 36mp1i 13 . . . . 5 (𝜑·ih ∈ (((MetOpen‘(norm ∘ − )) ×t (MetOpen‘(norm ∘ − ))) Cn (TopOpen‘ℂfld)))
3828, 29, 33, 37cnmpt12f 22969 . . . 4 (𝜑 → (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∈ ((MetOpen‘(norm ∘ − )) Cn (TopOpen‘ℂfld)))
3925, 38lmcn 22608 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)(⇝𝑡‘(TopOpen‘ℂfld))((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)))
40 occl.3 . . . . . . . . . . 11 (𝜑𝐹:ℕ⟶(⊥‘𝐴))
4140ffvelcdmda 7031 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ (⊥‘𝐴))
42 ocel 30052 . . . . . . . . . . . 12 (𝐴 ⊆ ℋ → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4330, 42syl 17 . . . . . . . . . . 11 (𝜑 → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4443adantr 481 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ∈ (⊥‘𝐴) ↔ ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)))
4541, 44mpbid 231 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ∈ ℋ ∧ ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0))
4645simpld 495 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℋ)
47 oveq1 7358 . . . . . . . . 9 (𝑥 = (𝐹𝑘) → (𝑥 ·ih 𝐵) = ((𝐹𝑘) ·ih 𝐵))
48 eqid 2737 . . . . . . . . 9 (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) = (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))
49 ovex 7384 . . . . . . . . 9 ((𝐹𝑘) ·ih 𝐵) ∈ V
5047, 48, 49fvmpt 6945 . . . . . . . 8 ((𝐹𝑘) ∈ ℋ → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = ((𝐹𝑘) ·ih 𝐵))
5146, 50syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = ((𝐹𝑘) ·ih 𝐵))
52 oveq2 7359 . . . . . . . . 9 (𝑥 = 𝐵 → ((𝐹𝑘) ·ih 𝑥) = ((𝐹𝑘) ·ih 𝐵))
5352eqeq1d 2739 . . . . . . . 8 (𝑥 = 𝐵 → (((𝐹𝑘) ·ih 𝑥) = 0 ↔ ((𝐹𝑘) ·ih 𝐵) = 0))
5445simprd 496 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → ∀𝑥𝐴 ((𝐹𝑘) ·ih 𝑥) = 0)
5531adantr 481 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ) → 𝐵𝐴)
5653, 54, 55rspcdva 3580 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ((𝐹𝑘) ·ih 𝐵) = 0)
5751, 56eqtrd 2777 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)) = 0)
58 ocss 30056 . . . . . . . . 9 (𝐴 ⊆ ℋ → (⊥‘𝐴) ⊆ ℋ)
5930, 58syl 17 . . . . . . . 8 (𝜑 → (⊥‘𝐴) ⊆ ℋ)
6040, 59fssd 6683 . . . . . . 7 (𝜑𝐹:ℕ⟶ ℋ)
61 fvco3 6937 . . . . . . 7 ((𝐹:ℕ⟶ ℋ ∧ 𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)))
6260, 61sylan 580 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘(𝐹𝑘)))
63 c0ex 11107 . . . . . . . 8 0 ∈ V
6463fvconst2 7149 . . . . . . 7 (𝑘 ∈ ℕ → ((ℕ × {0})‘𝑘) = 0)
6564adantl 482 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((ℕ × {0})‘𝑘) = 0)
6657, 62, 653eqtr4d 2787 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘))
6766ralrimiva 3141 . . . 4 (𝜑 → ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘))
68 ovex 7384 . . . . . . 7 (𝑥 ·ih 𝐵) ∈ V
6968, 48fnmpti 6641 . . . . . 6 (𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) Fn ℋ
70 fnfco 6704 . . . . . 6 (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) Fn ℋ ∧ 𝐹:ℕ⟶ ℋ) → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ)
7169, 60, 70sylancr 587 . . . . 5 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ)
7263fconst 6725 . . . . . 6 (ℕ × {0}):ℕ⟶{0}
73 ffn 6665 . . . . . 6 ((ℕ × {0}):ℕ⟶{0} → (ℕ × {0}) Fn ℕ)
7472, 73ax-mp 5 . . . . 5 (ℕ × {0}) Fn ℕ
75 eqfnfv 6979 . . . . 5 ((((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) Fn ℕ ∧ (ℕ × {0}) Fn ℕ) → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}) ↔ ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘)))
7671, 74, 75sylancl 586 . . . 4 (𝜑 → (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}) ↔ ∀𝑘 ∈ ℕ (((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹)‘𝑘) = ((ℕ × {0})‘𝑘)))
7767, 76mpbird 256 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵)) ∘ 𝐹) = (ℕ × {0}))
78 fvex 6852 . . . . 5 ( ⇝𝑣𝐹) ∈ V
7978hlimveci 29961 . . . 4 (𝐹𝑣 ( ⇝𝑣𝐹) → ( ⇝𝑣𝐹) ∈ ℋ)
80 oveq1 7358 . . . . 5 (𝑥 = ( ⇝𝑣𝐹) → (𝑥 ·ih 𝐵) = (( ⇝𝑣𝐹) ·ih 𝐵))
81 ovex 7384 . . . . 5 (( ⇝𝑣𝐹) ·ih 𝐵) ∈ V
8280, 48, 81fvmpt 6945 . . . 4 (( ⇝𝑣𝐹) ∈ ℋ → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)) = (( ⇝𝑣𝐹) ·ih 𝐵))
8316, 79, 823syl 18 . . 3 (𝜑 → ((𝑥 ∈ ℋ ↦ (𝑥 ·ih 𝐵))‘( ⇝𝑣𝐹)) = (( ⇝𝑣𝐹) ·ih 𝐵))
8439, 77, 833brtr3d 5134 . 2 (𝜑 → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))(( ⇝𝑣𝐹) ·ih 𝐵))
851cnfldtopon 24098 . . . 4 (TopOpen‘ℂfld) ∈ (TopOn‘ℂ)
8685a1i 11 . . 3 (𝜑 → (TopOpen‘ℂfld) ∈ (TopOn‘ℂ))
87 0cnd 11106 . . 3 (𝜑 → 0 ∈ ℂ)
88 1zzd 12492 . . 3 (𝜑 → 1 ∈ ℤ)
89 nnuz 12760 . . . 4 ℕ = (ℤ‘1)
9089lmconst 22564 . . 3 (((TopOpen‘ℂfld) ∈ (TopOn‘ℂ) ∧ 0 ∈ ℂ ∧ 1 ∈ ℤ) → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))0)
9186, 87, 88, 90syl3anc 1371 . 2 (𝜑 → (ℕ × {0})(⇝𝑡‘(TopOpen‘ℂfld))0)
923, 84, 91lmmo 22683 1 (𝜑 → (( ⇝𝑣𝐹) ·ih 𝐵) = 0)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396   = wceq 1541  wcel 2106  wral 3062  wrex 3071  wss 3908  {csn 4584  cop 4590   class class class wbr 5103  cmpt 5186   × cxp 5629  dom cdm 5631  cres 5633  ccom 5635  Fun wfun 6487   Fn wfn 6488  wf 6489  cfv 6493  (class class class)co 7351  m cmap 8723  cc 11007  0cc0 11009  1c1 11010  cn 12111  cz 12457  TopOpenctopn 17263  ∞Metcxmet 20734  MetOpencmopn 20739  fldccnfld 20749  TopOnctopon 22211   Cn ccn 22527  𝑡clm 22529  Hauscha 22611   ×t ctx 22863  NrmCVeccnv 29355  chba 29690   + cva 29691   · csm 29692   ·ih csp 29693  normcno 29694   cmv 29696  Cauchyccauold 29697  𝑣 chli 29698  cort 29701
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2708  ax-rep 5240  ax-sep 5254  ax-nul 5261  ax-pow 5318  ax-pr 5382  ax-un 7664  ax-inf2 9535  ax-cnex 11065  ax-resscn 11066  ax-1cn 11067  ax-icn 11068  ax-addcl 11069  ax-addrcl 11070  ax-mulcl 11071  ax-mulrcl 11072  ax-mulcom 11073  ax-addass 11074  ax-mulass 11075  ax-distr 11076  ax-i2m1 11077  ax-1ne0 11078  ax-1rid 11079  ax-rnegex 11080  ax-rrecex 11081  ax-cnre 11082  ax-pre-lttri 11083  ax-pre-lttrn 11084  ax-pre-ltadd 11085  ax-pre-mulgt0 11086  ax-pre-sup 11087  ax-addf 11088  ax-mulf 11089  ax-hilex 29770  ax-hfvadd 29771  ax-hvcom 29772  ax-hvass 29773  ax-hv0cl 29774  ax-hvaddid 29775  ax-hfvmul 29776  ax-hvmulid 29777  ax-hvmulass 29778  ax-hvdistr1 29779  ax-hvdistr2 29780  ax-hvmul0 29781  ax-hfi 29850  ax-his1 29853  ax-his2 29854  ax-his3 29855  ax-his4 29856  ax-hcompl 29973
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3351  df-reu 3352  df-rab 3406  df-v 3445  df-sbc 3738  df-csb 3854  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4281  df-if 4485  df-pw 4560  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4864  df-int 4906  df-iun 4954  df-iin 4955  df-br 5104  df-opab 5166  df-mpt 5187  df-tr 5221  df-id 5529  df-eprel 5535  df-po 5543  df-so 5544  df-fr 5586  df-se 5587  df-we 5588  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6251  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6445  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-isom 6502  df-riota 7307  df-ov 7354  df-oprab 7355  df-mpo 7356  df-of 7609  df-om 7795  df-1st 7913  df-2nd 7914  df-supp 8085  df-frecs 8204  df-wrecs 8235  df-recs 8309  df-rdg 8348  df-1o 8404  df-2o 8405  df-er 8606  df-map 8725  df-pm 8726  df-ixp 8794  df-en 8842  df-dom 8843  df-sdom 8844  df-fin 8845  df-fsupp 9264  df-fi 9305  df-sup 9336  df-inf 9337  df-oi 9404  df-card 9833  df-pnf 11149  df-mnf 11150  df-xr 11151  df-ltxr 11152  df-le 11153  df-sub 11345  df-neg 11346  df-div 11771  df-nn 12112  df-2 12174  df-3 12175  df-4 12176  df-5 12177  df-6 12178  df-7 12179  df-8 12180  df-9 12181  df-n0 12372  df-z 12458  df-dec 12577  df-uz 12722  df-q 12828  df-rp 12870  df-xneg 12987  df-xadd 12988  df-xmul 12989  df-ioo 13222  df-icc 13225  df-fz 13379  df-fzo 13522  df-seq 13861  df-exp 13922  df-hash 14185  df-cj 14944  df-re 14945  df-im 14946  df-sqrt 15080  df-abs 15081  df-clim 15330  df-sum 15531  df-struct 16979  df-sets 16996  df-slot 17014  df-ndx 17026  df-base 17044  df-ress 17073  df-plusg 17106  df-mulr 17107  df-starv 17108  df-sca 17109  df-vsca 17110  df-ip 17111  df-tset 17112  df-ple 17113  df-ds 17115  df-unif 17116  df-hom 17117  df-cco 17118  df-rest 17264  df-topn 17265  df-0g 17283  df-gsum 17284  df-topgen 17285  df-pt 17286  df-prds 17289  df-xrs 17344  df-qtop 17349  df-imas 17350  df-xps 17352  df-mre 17426  df-mrc 17427  df-acs 17429  df-mgm 18457  df-sgrp 18506  df-mnd 18517  df-submnd 18562  df-mulg 18832  df-cntz 19056  df-cmn 19523  df-psmet 20741  df-xmet 20742  df-met 20743  df-bl 20744  df-mopn 20745  df-cnfld 20750  df-top 22195  df-topon 22212  df-topsp 22234  df-bases 22248  df-cn 22530  df-cnp 22531  df-lm 22532  df-haus 22618  df-tx 22865  df-hmeo 23058  df-xms 23625  df-ms 23626  df-tms 23627  df-grpo 29264  df-gid 29265  df-ginv 29266  df-gdiv 29267  df-ablo 29316  df-vc 29330  df-nv 29363  df-va 29366  df-ba 29367  df-sm 29368  df-0v 29369  df-vs 29370  df-nmcv 29371  df-ims 29372  df-dip 29472  df-hnorm 29739  df-hvsub 29742  df-hlim 29743  df-sh 29978  df-oc 30023
This theorem is referenced by:  occl  30075
  Copyright terms: Public domain W3C validator