MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  metustid Structured version   Visualization version   GIF version

Theorem metustid 22264
Description: The identity diagonal is included in all elements of the filter base generated by the metric 𝐷. (Contributed by Thierry Arnoux, 22-Nov-2017.) (Revised by Thierry Arnoux, 11-Feb-2018.)
Hypothesis
Ref Expression
metust.1 𝐹 = ran (𝑎 ∈ ℝ+ ↦ (𝐷 “ (0[,)𝑎)))
Assertion
Ref Expression
metustid ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) → ( I ↾ 𝑋) ⊆ 𝐴)
Distinct variable groups:   𝐷,𝑎   𝑋,𝑎   𝐴,𝑎   𝐹,𝑎

Proof of Theorem metustid
Dummy variables 𝑝 𝑞 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 relres 5389 . . 3 Rel ( I ↾ 𝑋)
21a1i 11 . 2 ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) → Rel ( I ↾ 𝑋))
3 vex 3194 . . . . . . . . . . . . . . 15 𝑞 ∈ V
43brres 5366 . . . . . . . . . . . . . 14 (𝑝( I ↾ 𝑋)𝑞 ↔ (𝑝 I 𝑞𝑝𝑋))
5 df-br 4619 . . . . . . . . . . . . . 14 (𝑝( I ↾ 𝑋)𝑞 ↔ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋))
63ideq 5239 . . . . . . . . . . . . . . 15 (𝑝 I 𝑞𝑝 = 𝑞)
76anbi1i 730 . . . . . . . . . . . . . 14 ((𝑝 I 𝑞𝑝𝑋) ↔ (𝑝 = 𝑞𝑝𝑋))
84, 5, 73bitr3i 290 . . . . . . . . . . . . 13 (⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋) ↔ (𝑝 = 𝑞𝑝𝑋))
98biimpi 206 . . . . . . . . . . . 12 (⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋) → (𝑝 = 𝑞𝑝𝑋))
109ad2antlr 762 . . . . . . . . . . 11 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → (𝑝 = 𝑞𝑝𝑋))
1110simpld 475 . . . . . . . . . 10 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → 𝑝 = 𝑞)
12 df-ov 6608 . . . . . . . . . . 11 (𝑝𝐷𝑝) = (𝐷‘⟨𝑝, 𝑝⟩)
13 opeq2 4376 . . . . . . . . . . . 12 (𝑝 = 𝑞 → ⟨𝑝, 𝑝⟩ = ⟨𝑝, 𝑞⟩)
1413fveq2d 6154 . . . . . . . . . . 11 (𝑝 = 𝑞 → (𝐷‘⟨𝑝, 𝑝⟩) = (𝐷‘⟨𝑝, 𝑞⟩))
1512, 14syl5eq 2672 . . . . . . . . . 10 (𝑝 = 𝑞 → (𝑝𝐷𝑝) = (𝐷‘⟨𝑝, 𝑞⟩))
1611, 15syl 17 . . . . . . . . 9 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → (𝑝𝐷𝑝) = (𝐷‘⟨𝑝, 𝑞⟩))
17 simplll 797 . . . . . . . . . 10 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → 𝐷 ∈ (PsMet‘𝑋))
1810simprd 479 . . . . . . . . . 10 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → 𝑝𝑋)
19 psmet0 22018 . . . . . . . . . 10 ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝑝𝑋) → (𝑝𝐷𝑝) = 0)
2017, 18, 19syl2anc 692 . . . . . . . . 9 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → (𝑝𝐷𝑝) = 0)
2116, 20eqtr3d 2662 . . . . . . . 8 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → (𝐷‘⟨𝑝, 𝑞⟩) = 0)
22 0xr 10031 . . . . . . . . . . 11 0 ∈ ℝ*
2322a1i 11 . . . . . . . . . 10 (𝑎 ∈ ℝ+ → 0 ∈ ℝ*)
24 rpxr 11784 . . . . . . . . . 10 (𝑎 ∈ ℝ+𝑎 ∈ ℝ*)
25 rpgt0 11788 . . . . . . . . . 10 (𝑎 ∈ ℝ+ → 0 < 𝑎)
26 lbico1 12167 . . . . . . . . . 10 ((0 ∈ ℝ*𝑎 ∈ ℝ* ∧ 0 < 𝑎) → 0 ∈ (0[,)𝑎))
2723, 24, 25, 26syl3anc 1323 . . . . . . . . 9 (𝑎 ∈ ℝ+ → 0 ∈ (0[,)𝑎))
2827adantl 482 . . . . . . . 8 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → 0 ∈ (0[,)𝑎))
2921, 28eqeltrd 2704 . . . . . . 7 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → (𝐷‘⟨𝑝, 𝑞⟩) ∈ (0[,)𝑎))
30 psmetf 22016 . . . . . . . . . 10 (𝐷 ∈ (PsMet‘𝑋) → 𝐷:(𝑋 × 𝑋)⟶ℝ*)
31 ffun 6007 . . . . . . . . . 10 (𝐷:(𝑋 × 𝑋)⟶ℝ* → Fun 𝐷)
3230, 31syl 17 . . . . . . . . 9 (𝐷 ∈ (PsMet‘𝑋) → Fun 𝐷)
3332ad3antrrr 765 . . . . . . . 8 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → Fun 𝐷)
3411, 18eqeltrrd 2705 . . . . . . . . . 10 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → 𝑞𝑋)
35 opelxpi 5113 . . . . . . . . . 10 ((𝑝𝑋𝑞𝑋) → ⟨𝑝, 𝑞⟩ ∈ (𝑋 × 𝑋))
3618, 34, 35syl2anc 692 . . . . . . . . 9 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → ⟨𝑝, 𝑞⟩ ∈ (𝑋 × 𝑋))
37 fdm 6010 . . . . . . . . . . 11 (𝐷:(𝑋 × 𝑋)⟶ℝ* → dom 𝐷 = (𝑋 × 𝑋))
3830, 37syl 17 . . . . . . . . . 10 (𝐷 ∈ (PsMet‘𝑋) → dom 𝐷 = (𝑋 × 𝑋))
3938ad3antrrr 765 . . . . . . . . 9 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → dom 𝐷 = (𝑋 × 𝑋))
4036, 39eleqtrrd 2707 . . . . . . . 8 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → ⟨𝑝, 𝑞⟩ ∈ dom 𝐷)
41 fvimacnv 6289 . . . . . . . 8 ((Fun 𝐷 ∧ ⟨𝑝, 𝑞⟩ ∈ dom 𝐷) → ((𝐷‘⟨𝑝, 𝑞⟩) ∈ (0[,)𝑎) ↔ ⟨𝑝, 𝑞⟩ ∈ (𝐷 “ (0[,)𝑎))))
4233, 40, 41syl2anc 692 . . . . . . 7 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → ((𝐷‘⟨𝑝, 𝑞⟩) ∈ (0[,)𝑎) ↔ ⟨𝑝, 𝑞⟩ ∈ (𝐷 “ (0[,)𝑎))))
4329, 42mpbid 222 . . . . . 6 ((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) → ⟨𝑝, 𝑞⟩ ∈ (𝐷 “ (0[,)𝑎)))
4443adantr 481 . . . . 5 (((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) ∧ 𝐴 = (𝐷 “ (0[,)𝑎))) → ⟨𝑝, 𝑞⟩ ∈ (𝐷 “ (0[,)𝑎)))
45 simpr 477 . . . . 5 (((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) ∧ 𝐴 = (𝐷 “ (0[,)𝑎))) → 𝐴 = (𝐷 “ (0[,)𝑎)))
4644, 45eleqtrrd 2707 . . . 4 (((((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) ∧ 𝑎 ∈ ℝ+) ∧ 𝐴 = (𝐷 “ (0[,)𝑎))) → ⟨𝑝, 𝑞⟩ ∈ 𝐴)
47 simplr 791 . . . . 5 (((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) → 𝐴𝐹)
48 metust.1 . . . . . . 7 𝐹 = ran (𝑎 ∈ ℝ+ ↦ (𝐷 “ (0[,)𝑎)))
4948metustel 22260 . . . . . 6 (𝐷 ∈ (PsMet‘𝑋) → (𝐴𝐹 ↔ ∃𝑎 ∈ ℝ+ 𝐴 = (𝐷 “ (0[,)𝑎))))
5049ad2antrr 761 . . . . 5 (((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) → (𝐴𝐹 ↔ ∃𝑎 ∈ ℝ+ 𝐴 = (𝐷 “ (0[,)𝑎))))
5147, 50mpbid 222 . . . 4 (((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) → ∃𝑎 ∈ ℝ+ 𝐴 = (𝐷 “ (0[,)𝑎)))
5246, 51r19.29a 3076 . . 3 (((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) ∧ ⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋)) → ⟨𝑝, 𝑞⟩ ∈ 𝐴)
5352ex 450 . 2 ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) → (⟨𝑝, 𝑞⟩ ∈ ( I ↾ 𝑋) → ⟨𝑝, 𝑞⟩ ∈ 𝐴))
542, 53relssdv 5178 1 ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴𝐹) → ( I ↾ 𝑋) ⊆ 𝐴)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 384   = wceq 1480  wcel 1992  wrex 2913  wss 3560  cop 4159   class class class wbr 4618  cmpt 4678   I cid 4989   × cxp 5077  ccnv 5078  dom cdm 5079  ran crn 5080  cres 5081  cima 5082  Rel wrel 5084  Fun wfun 5844  wf 5846  cfv 5850  (class class class)co 6605  0cc0 9881  *cxr 10018   < clt 10019  +crp 11776  [,)cico 12116  PsMetcpsmet 19644
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1841  ax-6 1890  ax-7 1937  ax-8 1994  ax-9 2001  ax-10 2021  ax-11 2036  ax-12 2049  ax-13 2250  ax-ext 2606  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6903  ax-cnex 9937  ax-resscn 9938  ax-1cn 9939  ax-icn 9940  ax-addcl 9941  ax-addrcl 9942  ax-mulcl 9943  ax-mulrcl 9944  ax-i2m1 9949  ax-1ne0 9950  ax-rnegex 9952  ax-rrecex 9953  ax-cnre 9954  ax-pre-lttri 9955  ax-pre-lttrn 9956
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1883  df-eu 2478  df-mo 2479  df-clab 2613  df-cleq 2619  df-clel 2622  df-nfc 2756  df-ne 2797  df-nel 2900  df-ral 2917  df-rex 2918  df-rab 2921  df-v 3193  df-sbc 3423  df-csb 3520  df-dif 3563  df-un 3565  df-in 3567  df-ss 3574  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-op 4160  df-uni 4408  df-br 4619  df-opab 4679  df-mpt 4680  df-id 4994  df-po 5000  df-so 5001  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-iota 5813  df-fun 5852  df-fn 5853  df-f 5854  df-f1 5855  df-fo 5856  df-f1o 5857  df-fv 5858  df-ov 6608  df-oprab 6609  df-mpt2 6610  df-er 7688  df-map 7805  df-en 7901  df-dom 7902  df-sdom 7903  df-pnf 10021  df-mnf 10022  df-xr 10023  df-ltxr 10024  df-le 10025  df-rp 11777  df-ico 12120  df-psmet 19652
This theorem is referenced by:  metustfbas  22267  metust  22268
  Copyright terms: Public domain W3C validator