Theorem nosupbnd1lem6 27698

Description: Lemma for nosupbnd1 27699. Establish a hard upper bound when there is no maximum. (Contributed by Scott Fenton, 6-Dec-2021.)

Hypothesis

Ref	Expression
nosupbnd1.1	⊢ 𝑆 = if(∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦, ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥))))

Assertion

Ref	Expression
nosupbnd1lem6	⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → (𝑈 ↾ dom 𝑆) <s 𝑆)

Distinct variable groups:   𝐴,𝑔,𝑢,𝑣,𝑥,𝑦   𝑢,𝑈,𝑣   𝑥,𝑢,𝑦,𝑣

Allowed substitution hints:   𝑆(𝑥,𝑦,𝑣,𝑢,𝑔)   𝑈(𝑥,𝑦,𝑔)

Proof of Theorem nosupbnd1lem6

Step	Hyp	Ref	Expression
1		simp2l 1201	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → 𝐴 ⊆ No )
2		simp3 1139	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → 𝑈 ∈ 𝐴)
3	1, 2	sseldd 3936	. . . . 5 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → 𝑈 ∈ No )
4		nofv 27642	. . . . 5 ⊢ (𝑈 ∈ No → ((𝑈‘dom 𝑆) = ∅ ∨ (𝑈‘dom 𝑆) = 1o ∨ (𝑈‘dom 𝑆) = 2o))
5	3, 4	syl 17	. . . 4 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → ((𝑈‘dom 𝑆) = ∅ ∨ (𝑈‘dom 𝑆) = 1o ∨ (𝑈‘dom 𝑆) = 2o))
6		3oran 1109	. . . 4 ⊢ (((𝑈‘dom 𝑆) = ∅ ∨ (𝑈‘dom 𝑆) = 1o ∨ (𝑈‘dom 𝑆) = 2o) ↔ ¬ (¬ (𝑈‘dom 𝑆) = ∅ ∧ ¬ (𝑈‘dom 𝑆) = 1o ∧ ¬ (𝑈‘dom 𝑆) = 2o))
7	5, 6	sylib 218	. . 3 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → ¬ (¬ (𝑈‘dom 𝑆) = ∅ ∧ ¬ (𝑈‘dom 𝑆) = 1o ∧ ¬ (𝑈‘dom 𝑆) = 2o))
8		simpl1 1193	. . . . . 6 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → ¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦)
9		simpl2 1194	. . . . . 6 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → (𝐴 ⊆ No ∧ 𝐴 ∈ V))
10		simpl3 1195	. . . . . 6 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → 𝑈 ∈ 𝐴)
11		simpr 484	. . . . . 6 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → (𝑈 ↾ dom 𝑆) = 𝑆)
12		nosupbnd1.1	. . . . . . 7 ⊢ 𝑆 = if(∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦, ((℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (℩𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢 ∈ 𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥∃𝑢 ∈ 𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣 ∈ 𝐴 (¬ 𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢‘𝑔) = 𝑥))))
13	12	nosupbnd1lem4 27696	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ (𝑈 ∈ 𝐴 ∧ (𝑈 ↾ dom 𝑆) = 𝑆)) → (𝑈‘dom 𝑆) ≠ ∅)
14	8, 9, 10, 11, 13	syl112anc 1377	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → (𝑈‘dom 𝑆) ≠ ∅)
15	14	neneqd 2938	. . . 4 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → ¬ (𝑈‘dom 𝑆) = ∅)
16	12	nosupbnd1lem5 27697	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ (𝑈 ∈ 𝐴 ∧ (𝑈 ↾ dom 𝑆) = 𝑆)) → (𝑈‘dom 𝑆) ≠ 1o)
17	8, 9, 10, 11, 16	syl112anc 1377	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → (𝑈‘dom 𝑆) ≠ 1o)
18	17	neneqd 2938	. . . 4 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → ¬ (𝑈‘dom 𝑆) = 1o)
19	12	nosupbnd1lem3 27695	. . . . . 6 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ (𝑈 ∈ 𝐴 ∧ (𝑈 ↾ dom 𝑆) = 𝑆)) → (𝑈‘dom 𝑆) ≠ 2o)
20	8, 9, 10, 11, 19	syl112anc 1377	. . . . 5 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → (𝑈‘dom 𝑆) ≠ 2o)
21	20	neneqd 2938	. . . 4 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → ¬ (𝑈‘dom 𝑆) = 2o)
22	15, 18, 21	3jca 1129	. . 3 ⊢ (((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) ∧ (𝑈 ↾ dom 𝑆) = 𝑆) → (¬ (𝑈‘dom 𝑆) = ∅ ∧ ¬ (𝑈‘dom 𝑆) = 1o ∧ ¬ (𝑈‘dom 𝑆) = 2o))
23	7, 22	mtand 816	. 2 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → ¬ (𝑈 ↾ dom 𝑆) = 𝑆)
24	12	nosupbnd1lem1 27693	. 2 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → ¬ 𝑆 <s (𝑈 ↾ dom 𝑆))
25	12	nosupno 27688	. . . . . 6 ⊢ ((𝐴 ⊆ No ∧ 𝐴 ∈ V) → 𝑆 ∈ No )
26	25	3ad2ant2 1135	. . . . 5 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → 𝑆 ∈ No )
27		nodmon 27635	. . . . 5 ⊢ (𝑆 ∈ No → dom 𝑆 ∈ On)
28	26, 27	syl 17	. . . 4 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → dom 𝑆 ∈ On)
29		noreson 27645	. . . 4 ⊢ ((𝑈 ∈ No ∧ dom 𝑆 ∈ On) → (𝑈 ↾ dom 𝑆) ∈ No )
30	3, 28, 29	syl2anc 585	. . 3 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → (𝑈 ↾ dom 𝑆) ∈ No )
31		ltsso 27661	. . . 4 ⊢ <s Or No
32		solin 5569	. . . 4 ⊢ (( <s Or No ∧ ((𝑈 ↾ dom 𝑆) ∈ No ∧ 𝑆 ∈ No )) → ((𝑈 ↾ dom 𝑆) <s 𝑆 ∨ (𝑈 ↾ dom 𝑆) = 𝑆 ∨ 𝑆 <s (𝑈 ↾ dom 𝑆)))
33	31, 32	mpan 691	. . 3 ⊢ (((𝑈 ↾ dom 𝑆) ∈ No ∧ 𝑆 ∈ No ) → ((𝑈 ↾ dom 𝑆) <s 𝑆 ∨ (𝑈 ↾ dom 𝑆) = 𝑆 ∨ 𝑆 <s (𝑈 ↾ dom 𝑆)))
34	30, 26, 33	syl2anc 585	. 2 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → ((𝑈 ↾ dom 𝑆) <s 𝑆 ∨ (𝑈 ↾ dom 𝑆) = 𝑆 ∨ 𝑆 <s (𝑈 ↾ dom 𝑆)))
35	23, 24, 34	ecase23d 1476	1 ⊢ ((¬ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 ⊆ No ∧ 𝐴 ∈ V) ∧ 𝑈 ∈ 𝐴) → (𝑈 ↾ dom 𝑆) <s 𝑆)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ w3o 1086   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114  {cab 2715   ≠ wne 2933  ∀wral 3052  ∃wrex 3062  Vcvv 3442   ∪ cun 3901   ⊆ wss 3903  ∅c0 4287  ifcif 4481  {csn 4582  ⟨cop 4588   class class class wbr 5100   ↦ cmpt 5181   Or wor 5541  dom cdm 5634   ↾ cres 5636  Oncon0 6327  suc csuc 6329  ℩cio 6456  ‘cfv 6502  ℩crio 7326  1_oc1o 8402  2_oc2o 8403   No csur 27624   <s clts 27625

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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5314  ax-pr 5381  ax-un 7692

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4905  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5529  df-eprel 5534  df-po 5542  df-so 5543  df-fr 5587  df-we 5589  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-ord 6330  df-on 6331  df-suc 6333  df-iota 6458  df-fun 6504  df-fn 6505  df-f 6506  df-fo 6508  df-fv 6510  df-riota 7327  df-1o 8409  df-2o 8410  df-no 27627  df-lts 27628  df-bday 27629

This theorem is referenced by:  nosupbnd1  27699