Theorem blres 13601

Description: A ball in a restricted metric space. (Contributed by Mario Carneiro, 5-Jan-2014.)

Hypothesis

Ref	Expression
blres.2	⊢ 𝐶 = (𝐷 ↾ (𝑌 × 𝑌))

Assertion

Ref	Expression
blres	⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑃(ball‘𝐶)𝑅) = ((𝑃(ball‘𝐷)𝑅) ∩ 𝑌))

Proof of Theorem blres

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		elinel2 3322	. . . . . . . . 9 ⊢ (𝑃 ∈ (𝑋 ∩ 𝑌) → 𝑃 ∈ 𝑌)
2		blres.2	. . . . . . . . . . 11 ⊢ 𝐶 = (𝐷 ↾ (𝑌 × 𝑌))
3	2	oveqi 5882	. . . . . . . . . 10 ⊢ (𝑃𝐶𝑥) = (𝑃(𝐷 ↾ (𝑌 × 𝑌))𝑥)
4		ovres 6008	. . . . . . . . . 10 ⊢ ((𝑃 ∈ 𝑌 ∧ 𝑥 ∈ 𝑌) → (𝑃(𝐷 ↾ (𝑌 × 𝑌))𝑥) = (𝑃𝐷𝑥))
5	3, 4	eqtrid 2222	. . . . . . . . 9 ⊢ ((𝑃 ∈ 𝑌 ∧ 𝑥 ∈ 𝑌) → (𝑃𝐶𝑥) = (𝑃𝐷𝑥))
6	1, 5	sylan 283	. . . . . . . 8 ⊢ ((𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑥 ∈ 𝑌) → (𝑃𝐶𝑥) = (𝑃𝐷𝑥))
7	6	breq1d 4010	. . . . . . 7 ⊢ ((𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑥 ∈ 𝑌) → ((𝑃𝐶𝑥) < 𝑅 ↔ (𝑃𝐷𝑥) < 𝑅))
8	7	anbi2d 464	. . . . . 6 ⊢ ((𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑥 ∈ 𝑌) → ((𝑥 ∈ 𝑋 ∧ (𝑃𝐶𝑥) < 𝑅) ↔ (𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅)))
9	8	pm5.32da 452	. . . . 5 ⊢ (𝑃 ∈ (𝑋 ∩ 𝑌) → ((𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐶𝑥) < 𝑅)) ↔ (𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅))))
10	9	3ad2ant2 1019	. . . 4 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → ((𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐶𝑥) < 𝑅)) ↔ (𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅))))
11		elin 3318	. . . . . . 7 ⊢ (𝑥 ∈ (𝑋 ∩ 𝑌) ↔ (𝑥 ∈ 𝑋 ∧ 𝑥 ∈ 𝑌))
12		ancom 266	. . . . . . 7 ⊢ ((𝑥 ∈ 𝑋 ∧ 𝑥 ∈ 𝑌) ↔ (𝑥 ∈ 𝑌 ∧ 𝑥 ∈ 𝑋))
13	11, 12	bitri 184	. . . . . 6 ⊢ (𝑥 ∈ (𝑋 ∩ 𝑌) ↔ (𝑥 ∈ 𝑌 ∧ 𝑥 ∈ 𝑋))
14	13	anbi1i 458	. . . . 5 ⊢ ((𝑥 ∈ (𝑋 ∩ 𝑌) ∧ (𝑃𝐶𝑥) < 𝑅) ↔ ((𝑥 ∈ 𝑌 ∧ 𝑥 ∈ 𝑋) ∧ (𝑃𝐶𝑥) < 𝑅))
15		anass 401	. . . . 5 ⊢ (((𝑥 ∈ 𝑌 ∧ 𝑥 ∈ 𝑋) ∧ (𝑃𝐶𝑥) < 𝑅) ↔ (𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐶𝑥) < 𝑅)))
16	14, 15	bitri 184	. . . 4 ⊢ ((𝑥 ∈ (𝑋 ∩ 𝑌) ∧ (𝑃𝐶𝑥) < 𝑅) ↔ (𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐶𝑥) < 𝑅)))
17		ancom 266	. . . 4 ⊢ (((𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅) ∧ 𝑥 ∈ 𝑌) ↔ (𝑥 ∈ 𝑌 ∧ (𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅)))
18	10, 16, 17	3bitr4g 223	. . 3 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → ((𝑥 ∈ (𝑋 ∩ 𝑌) ∧ (𝑃𝐶𝑥) < 𝑅) ↔ ((𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅) ∧ 𝑥 ∈ 𝑌)))
19		xmetres 13549	. . . . 5 ⊢ (𝐷 ∈ (∞Met‘𝑋) → (𝐷 ↾ (𝑌 × 𝑌)) ∈ (∞Met‘(𝑋 ∩ 𝑌)))
20	2, 19	eqeltrid 2264	. . . 4 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝐶 ∈ (∞Met‘(𝑋 ∩ 𝑌)))
21		elbl 13558	. . . 4 ⊢ ((𝐶 ∈ (∞Met‘(𝑋 ∩ 𝑌)) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑥 ∈ (𝑃(ball‘𝐶)𝑅) ↔ (𝑥 ∈ (𝑋 ∩ 𝑌) ∧ (𝑃𝐶𝑥) < 𝑅)))
22	20, 21	syl3an1 1271	. . 3 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑥 ∈ (𝑃(ball‘𝐶)𝑅) ↔ (𝑥 ∈ (𝑋 ∩ 𝑌) ∧ (𝑃𝐶𝑥) < 𝑅)))
23		elin 3318	. . . 4 ⊢ (𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ 𝑌) ↔ (𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ∧ 𝑥 ∈ 𝑌))
24		elinel1 3321	. . . . . 6 ⊢ (𝑃 ∈ (𝑋 ∩ 𝑌) → 𝑃 ∈ 𝑋)
25		elbl 13558	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ 𝑋 ∧ 𝑅 ∈ ℝ*) → (𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ↔ (𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅)))
26	24, 25	syl3an2 1272	. . . . 5 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ↔ (𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅)))
27	26	anbi1d 465	. . . 4 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → ((𝑥 ∈ (𝑃(ball‘𝐷)𝑅) ∧ 𝑥 ∈ 𝑌) ↔ ((𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅) ∧ 𝑥 ∈ 𝑌)))
28	23, 27	bitrid 192	. . 3 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ 𝑌) ↔ ((𝑥 ∈ 𝑋 ∧ (𝑃𝐷𝑥) < 𝑅) ∧ 𝑥 ∈ 𝑌)))
29	18, 22, 28	3bitr4d 220	. 2 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑥 ∈ (𝑃(ball‘𝐶)𝑅) ↔ 𝑥 ∈ ((𝑃(ball‘𝐷)𝑅) ∩ 𝑌)))
30	29	eqrdv 2175	1 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑃 ∈ (𝑋 ∩ 𝑌) ∧ 𝑅 ∈ ℝ*) → (𝑃(ball‘𝐶)𝑅) = ((𝑃(ball‘𝐷)𝑅) ∩ 𝑌))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 978   = wceq 1353   ∈ wcel 2148   ∩ cin 3128   class class class wbr 4000   × cxp 4621   ↾ cres 4625  ‘cfv 5212  (class class class)co 5869  ℝ^*cxr 7981   < clt 7982  ∞Metcxmet 13147  ballcbl 13149

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-sep 4118  ax-pow 4171  ax-pr 4206  ax-un 4430  ax-setind 4533  ax-cnex 7893  ax-resscn 7894

This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-ral 2460  df-rex 2461  df-rab 2464  df-v 2739  df-sbc 2963  df-csb 3058  df-dif 3131  df-un 3133  df-in 3135  df-ss 3142  df-pw 3576  df-sn 3597  df-pr 3598  df-op 3600  df-uni 3808  df-iun 3886  df-br 4001  df-opab 4062  df-mpt 4063  df-id 4290  df-xp 4629  df-rel 4630  df-cnv 4631  df-co 4632  df-dm 4633  df-rn 4634  df-res 4635  df-ima 4636  df-iota 5174  df-fun 5214  df-fn 5215  df-f 5216  df-fv 5220  df-ov 5872  df-oprab 5873  df-mpo 5874  df-1st 6135  df-2nd 6136  df-map 6644  df-pnf 7984  df-mnf 7985  df-xr 7986  df-psmet 13154  df-xmet 13155  df-bl 13157

This theorem is referenced by:  metrest  13673