Theorem iccsupr 9902

Description: A nonempty subset of a closed real interval satisfies the conditions for the existence of its supremum. To be useful without excluded middle, we'll probably need to change not equal to apart, and perhaps make other changes, but the theorem does hold as stated here. (Contributed by Paul Chapman, 21-Jan-2008.)

Assertion

Ref	Expression
iccsupr	⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵) ∧ 𝐶 ∈ 𝑆) → (𝑆 ⊆ ℝ ∧ 𝑆 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝑥))

Distinct variable groups:   𝑦,𝐴   𝑥,𝐵,𝑦   𝑥,𝑆,𝑦

Allowed substitution hints:   𝐴(𝑥)   𝐶(𝑥,𝑦)

Proof of Theorem iccsupr

Step	Hyp	Ref	Expression
1		iccssre 9891	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ)
2		sstr 3150	. . . . 5 ⊢ ((𝑆 ⊆ (𝐴[,]𝐵) ∧ (𝐴[,]𝐵) ⊆ ℝ) → 𝑆 ⊆ ℝ)
3	2	ancoms 266	. . . 4 ⊢ (((𝐴[,]𝐵) ⊆ ℝ ∧ 𝑆 ⊆ (𝐴[,]𝐵)) → 𝑆 ⊆ ℝ)
4	1, 3	sylan 281	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) → 𝑆 ⊆ ℝ)
5	4	3adant3 1007	. 2 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵) ∧ 𝐶 ∈ 𝑆) → 𝑆 ⊆ ℝ)
6		ne0i 3415	. . 3 ⊢ (𝐶 ∈ 𝑆 → 𝑆 ≠ ∅)
7	6	3ad2ant3 1010	. 2 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵) ∧ 𝐶 ∈ 𝑆) → 𝑆 ≠ ∅)
8		simplr 520	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) → 𝐵 ∈ ℝ)
9		ssel 3136	. . . . . . . 8 ⊢ (𝑆 ⊆ (𝐴[,]𝐵) → (𝑦 ∈ 𝑆 → 𝑦 ∈ (𝐴[,]𝐵)))
10		elicc2 9874	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑦 ∈ (𝐴[,]𝐵) ↔ (𝑦 ∈ ℝ ∧ 𝐴 ≤ 𝑦 ∧ 𝑦 ≤ 𝐵)))
11	10	biimpd 143	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑦 ∈ (𝐴[,]𝐵) → (𝑦 ∈ ℝ ∧ 𝐴 ≤ 𝑦 ∧ 𝑦 ≤ 𝐵)))
12	9, 11	sylan9r 408	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) → (𝑦 ∈ 𝑆 → (𝑦 ∈ ℝ ∧ 𝐴 ≤ 𝑦 ∧ 𝑦 ≤ 𝐵)))
13	12	imp 123	. . . . . 6 ⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) ∧ 𝑦 ∈ 𝑆) → (𝑦 ∈ ℝ ∧ 𝐴 ≤ 𝑦 ∧ 𝑦 ≤ 𝐵))
14	13	simp3d 1001	. . . . 5 ⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) ∧ 𝑦 ∈ 𝑆) → 𝑦 ≤ 𝐵)
15	14	ralrimiva 2539	. . . 4 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) → ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝐵)
16		breq2 3986	. . . . . 6 ⊢ (𝑥 = 𝐵 → (𝑦 ≤ 𝑥 ↔ 𝑦 ≤ 𝐵))
17	16	ralbidv 2466	. . . . 5 ⊢ (𝑥 = 𝐵 → (∀𝑦 ∈ 𝑆 𝑦 ≤ 𝑥 ↔ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝐵))
18	17	rspcev 2830	. . . 4 ⊢ ((𝐵 ∈ ℝ ∧ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝐵) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝑥)
19	8, 15, 18	syl2anc 409	. . 3 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵)) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝑥)
20	19	3adant3 1007	. 2 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵) ∧ 𝐶 ∈ 𝑆) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝑥)
21	5, 7, 20	3jca 1167	1 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑆 ⊆ (𝐴[,]𝐵) ∧ 𝐶 ∈ 𝑆) → (𝑆 ⊆ ℝ ∧ 𝑆 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑆 𝑦 ≤ 𝑥))

Syntax hints:   → wi 4   ∧ wa 103   ∧ w3a 968   = wceq 1343   ∈ wcel 2136   ≠ wne 2336  ∀wral 2444  ∃wrex 2445   ⊆ wss 3116  ∅c0 3409   class class class wbr 3982  (class class class)co 5842  ℝcr 7752   ≤ cle 7934  [,]cicc 9827

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-13 2138  ax-14 2139  ax-ext 2147  ax-sep 4100  ax-pow 4153  ax-pr 4187  ax-un 4411  ax-setind 4514  ax-cnex 7844  ax-resscn 7845  ax-pre-ltirr 7865  ax-pre-ltwlin 7866  ax-pre-lttrn 7867

This theorem depends on definitions:  df-bi 116  df-3or 969  df-3an 970  df-tru 1346  df-fal 1349  df-nf 1449  df-sb 1751  df-eu 2017  df-mo 2018  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ne 2337  df-nel 2432  df-ral 2449  df-rex 2450  df-rab 2453  df-v 2728  df-sbc 2952  df-dif 3118  df-un 3120  df-in 3122  df-ss 3129  df-nul 3410  df-pw 3561  df-sn 3582  df-pr 3583  df-op 3585  df-uni 3790  df-br 3983  df-opab 4044  df-id 4271  df-po 4274  df-iso 4275  df-xp 4610  df-rel 4611  df-cnv 4612  df-co 4613  df-dm 4614  df-iota 5153  df-fun 5190  df-fv 5196  df-ov 5845  df-oprab 5846  df-mpo 5847  df-pnf 7935  df-mnf 7936  df-xr 7937  df-ltxr 7938  df-le 7939  df-icc 9831

This theorem is referenced by: (None)