Theorem iuneqfzuzlem 45616

Description: Lemma for iuneqfzuz 45617: here, inclusion is proven; aiuneqfzuz uses this lemma twice, to prove equality. (Contributed by Glauco Siliprandi, 17-Aug-2020.)

Hypothesis

Ref	Expression
iuneqfzuzlem.z	⊢ 𝑍 = (ℤ≥‘𝑁)

Assertion

Ref	Expression
iuneqfzuzlem	⊢ (∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → ∪ 𝑛 ∈ 𝑍 𝐴 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵)

Distinct variable groups:   𝐴,𝑚   𝐵,𝑚   𝑛,𝑁   𝑚,𝑍,𝑛

Allowed substitution hints:   𝐴(𝑛)   𝐵(𝑛)   𝑁(𝑚)

Proof of Theorem iuneqfzuzlem

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfcv 2897	. . . . . . . . 9 ⊢ Ⅎ𝑚𝐴
2		nfcsb1v 3872	. . . . . . . . 9 ⊢ Ⅎ𝑛⦋𝑚 / 𝑛⦌𝐴
3		csbeq1a 3862	. . . . . . . . 9 ⊢ (𝑛 = 𝑚 → 𝐴 = ⦋𝑚 / 𝑛⦌𝐴)
4	1, 2, 3	cbviun 4989	. . . . . . . 8 ⊢ ∪ 𝑛 ∈ 𝑍 𝐴 = ∪ 𝑚 ∈ 𝑍 ⦋𝑚 / 𝑛⦌𝐴
5	4	eleq2i 2827	. . . . . . 7 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴 ↔ 𝑥 ∈ ∪ 𝑚 ∈ 𝑍 ⦋𝑚 / 𝑛⦌𝐴)
6		eliun 4949	. . . . . . 7 ⊢ (𝑥 ∈ ∪ 𝑚 ∈ 𝑍 ⦋𝑚 / 𝑛⦌𝐴 ↔ ∃𝑚 ∈ 𝑍 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴)
7	5, 6	bitri 275	. . . . . 6 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴 ↔ ∃𝑚 ∈ 𝑍 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴)
8	7	biimpi 216	. . . . 5 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴 → ∃𝑚 ∈ 𝑍 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴)
9	8	adantl 481	. . . 4 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴) → ∃𝑚 ∈ 𝑍 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴)
10		nfra1 3259	. . . . . 6 ⊢ Ⅎ𝑚∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵
11		nfv 1916	. . . . . 6 ⊢ Ⅎ𝑚 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵
12		simp2 1138	. . . . . . . 8 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑚 ∈ 𝑍 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → 𝑚 ∈ 𝑍)
13		rspa 3224	. . . . . . . . 9 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑚 ∈ 𝑍) → ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵)
14	13	3adant3 1133	. . . . . . . 8 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑚 ∈ 𝑍 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵)
15		simp3 1139	. . . . . . . 8 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑚 ∈ 𝑍 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴)
16		id 22	. . . . . . . . . . 11 ⊢ (∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵)
17		fzssuz 13483	. . . . . . . . . . . . 13 ⊢ (𝑁...𝑚) ⊆ (ℤ≥‘𝑁)
18		iuneqfzuzlem.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤ≥‘𝑁)
19	18	eqcomi 2744	. . . . . . . . . . . . 13 ⊢ (ℤ≥‘𝑁) = 𝑍
20	17, 19	sseqtri 3981	. . . . . . . . . . . 12 ⊢ (𝑁...𝑚) ⊆ 𝑍
21		iunss1 4960	. . . . . . . . . . . 12 ⊢ ((𝑁...𝑚) ⊆ 𝑍 → ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵)
22	20, 21	mp1i 13	. . . . . . . . . . 11 ⊢ (∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵)
23	16, 22	eqsstrd 3967	. . . . . . . . . 10 ⊢ (∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵)
24	23	3ad2ant2 1135	. . . . . . . . 9 ⊢ ((𝑚 ∈ 𝑍 ∧ ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵)
25	18	eleq2i 2827	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ 𝑍 ↔ 𝑚 ∈ (ℤ≥‘𝑁))
26	25	biimpi 216	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ 𝑍 → 𝑚 ∈ (ℤ≥‘𝑁))
27		eluzel2 12758	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ (ℤ≥‘𝑁) → 𝑁 ∈ ℤ)
28	26, 27	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ 𝑍 → 𝑁 ∈ ℤ)
29		eluzelz 12763	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ (ℤ≥‘𝑁) → 𝑚 ∈ ℤ)
30	26, 29	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ 𝑍 → 𝑚 ∈ ℤ)
31		eluzle 12766	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ (ℤ≥‘𝑁) → 𝑁 ≤ 𝑚)
32	26, 31	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ 𝑍 → 𝑁 ≤ 𝑚)
33	30	zred 12598	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ 𝑍 → 𝑚 ∈ ℝ)
34		leid 11231	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ ℝ → 𝑚 ≤ 𝑚)
35	33, 34	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ 𝑍 → 𝑚 ≤ 𝑚)
36	28, 30, 30, 32, 35	elfzd 13433	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ 𝑍 → 𝑚 ∈ (𝑁...𝑚))
37		nfcv 2897	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑛𝑥
38	37, 2	nfel 2912	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴
39	3	eleq2d 2821	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑚 → (𝑥 ∈ 𝐴 ↔ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴))
40	38, 39	rspce 3564	. . . . . . . . . . . 12 ⊢ ((𝑚 ∈ (𝑁...𝑚) ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → ∃𝑛 ∈ (𝑁...𝑚)𝑥 ∈ 𝐴)
41	36, 40	sylan 581	. . . . . . . . . . 11 ⊢ ((𝑚 ∈ 𝑍 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → ∃𝑛 ∈ (𝑁...𝑚)𝑥 ∈ 𝐴)
42		eliun 4949	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 ↔ ∃𝑛 ∈ (𝑁...𝑚)𝑥 ∈ 𝐴)
43	41, 42	sylibr 234	. . . . . . . . . 10 ⊢ ((𝑚 ∈ 𝑍 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → 𝑥 ∈ ∪ 𝑛 ∈ (𝑁...𝑚)𝐴)
44	43	3adant2 1132	. . . . . . . . 9 ⊢ ((𝑚 ∈ 𝑍 ∧ ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → 𝑥 ∈ ∪ 𝑛 ∈ (𝑁...𝑚)𝐴)
45	24, 44	sseldd 3933	. . . . . . . 8 ⊢ ((𝑚 ∈ 𝑍 ∧ ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵)
46	12, 14, 15, 45	syl3anc 1374	. . . . . . 7 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑚 ∈ 𝑍 ∧ 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴) → 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵)
47	46	3exp 1120	. . . . . 6 ⊢ (∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → (𝑚 ∈ 𝑍 → (𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴 → 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵)))
48	10, 11, 47	rexlimd 3242	. . . . 5 ⊢ (∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → (∃𝑚 ∈ 𝑍 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴 → 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵))
49	48	adantr 480	. . . 4 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴) → (∃𝑚 ∈ 𝑍 𝑥 ∈ ⦋𝑚 / 𝑛⦌𝐴 → 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵))
50	9, 49	mpd 15	. . 3 ⊢ ((∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 ∧ 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴) → 𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵)
51	50	ralrimiva 3127	. 2 ⊢ (∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → ∀𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵)
52		dfss3 3921	. 2 ⊢ (∪ 𝑛 ∈ 𝑍 𝐴 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵 ↔ ∀𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐴𝑥 ∈ ∪ 𝑛 ∈ 𝑍 𝐵)
53	51, 52	sylibr 234	1 ⊢ (∀𝑚 ∈ 𝑍 ∪ 𝑛 ∈ (𝑁...𝑚)𝐴 = ∪ 𝑛 ∈ (𝑁...𝑚)𝐵 → ∪ 𝑛 ∈ 𝑍 𝐴 ⊆ ∪ 𝑛 ∈ 𝑍 𝐵)

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114  ∀wral 3050  ∃wrex 3059  ⦋csb 3848   ⊆ wss 3900  ∪ ciun 4945   class class class wbr 5097  ‘cfv 6491  (class class class)co 7358  ℝcr 11027   ≤ cle 11169  ℤcz 12490  ℤ_≥cuz 12753  ...cfz 13425

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 2183  ax-ext 2707  ax-sep 5240  ax-nul 5250  ax-pow 5309  ax-pr 5376  ax-un 7680  ax-cnex 11084  ax-resscn 11085  ax-pre-lttri 11102

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 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2932  df-nel 3036  df-ral 3051  df-rex 3060  df-rab 3399  df-v 3441  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-nul 4285  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4947  df-br 5098  df-opab 5160  df-mpt 5179  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6447  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-ov 7361  df-oprab 7362  df-mpo 7363  df-1st 7933  df-2nd 7934  df-er 8635  df-en 8886  df-dom 8887  df-sdom 8888  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-neg 11369  df-z 12491  df-uz 12754  df-fz 13426

This theorem is referenced by:  iuneqfzuz  45617