Theorem axdc3lem3 10372

Description: Simple substitution lemma for axdc3 10374. (Contributed by Mario Carneiro, 27-Jan-2013.)

Hypotheses

Ref	Expression
axdc3lem3.1	⊢ 𝐴 ∈ V
axdc3lem3.2	⊢ 𝑆 = {𝑠 ∣ ∃𝑛 ∈ ω (𝑠:suc 𝑛⟶𝐴 ∧ (𝑠‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘)))}
axdc3lem3.3	⊢ 𝐵 ∈ V

Assertion

Ref	Expression
axdc3lem3	⊢ (𝐵 ∈ 𝑆 ↔ ∃𝑚 ∈ ω (𝐵:suc 𝑚⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑚 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))

Distinct variable groups:   𝐴,𝑚,𝑛   𝐴,𝑠,𝑛   𝐵,𝑘,𝑚,𝑛   𝐵,𝑠,𝑘   𝐶,𝑚,𝑛   𝐶,𝑠   𝑚,𝐹,𝑛   𝐹,𝑠

Allowed substitution hints:   𝐴(𝑘)   𝐶(𝑘)   𝑆(𝑘,𝑚,𝑛,𝑠)   𝐹(𝑘)

Proof of Theorem axdc3lem3

Step	Hyp	Ref	Expression
1		axdc3lem3.2	. . 3 ⊢ 𝑆 = {𝑠 ∣ ∃𝑛 ∈ ω (𝑠:suc 𝑛⟶𝐴 ∧ (𝑠‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘)))}
2	1	eleq2i 2832	. 2 ⊢ (𝐵 ∈ 𝑆 ↔ 𝐵 ∈ {𝑠 ∣ ∃𝑛 ∈ ω (𝑠:suc 𝑛⟶𝐴 ∧ (𝑠‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘)))})
3		axdc3lem3.3	. . 3 ⊢ 𝐵 ∈ V
4		feq1 6640	. . . . 5 ⊢ (𝑠 = 𝐵 → (𝑠:suc 𝑛⟶𝐴 ↔ 𝐵:suc 𝑛⟶𝐴))
5		fveq1 6833	. . . . . 6 ⊢ (𝑠 = 𝐵 → (𝑠‘∅) = (𝐵‘∅))
6	5	eqeq1d 2742	. . . . 5 ⊢ (𝑠 = 𝐵 → ((𝑠‘∅) = 𝐶 ↔ (𝐵‘∅) = 𝐶))
7		fveq1 6833	. . . . . . 7 ⊢ (𝑠 = 𝐵 → (𝑠‘suc 𝑘) = (𝐵‘suc 𝑘))
8		fveq1 6833	. . . . . . . 8 ⊢ (𝑠 = 𝐵 → (𝑠‘𝑘) = (𝐵‘𝑘))
9	8	fveq2d 6838	. . . . . . 7 ⊢ (𝑠 = 𝐵 → (𝐹‘(𝑠‘𝑘)) = (𝐹‘(𝐵‘𝑘)))
10	7, 9	eleq12d 2834	. . . . . 6 ⊢ (𝑠 = 𝐵 → ((𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘)) ↔ (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))
11	10	ralbidv 3163	. . . . 5 ⊢ (𝑠 = 𝐵 → (∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘)) ↔ ∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))
12	4, 6, 11	3anbi123d 1444	. . . 4 ⊢ (𝑠 = 𝐵 → ((𝑠:suc 𝑛⟶𝐴 ∧ (𝑠‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘))) ↔ (𝐵:suc 𝑛⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘)))))
13	12	rexbidv 3164	. . 3 ⊢ (𝑠 = 𝐵 → (∃𝑛 ∈ ω (𝑠:suc 𝑛⟶𝐴 ∧ (𝑠‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘))) ↔ ∃𝑛 ∈ ω (𝐵:suc 𝑛⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘)))))
14	3, 13	elab 3624	. 2 ⊢ (𝐵 ∈ {𝑠 ∣ ∃𝑛 ∈ ω (𝑠:suc 𝑛⟶𝐴 ∧ (𝑠‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝑠‘suc 𝑘) ∈ (𝐹‘(𝑠‘𝑘)))} ↔ ∃𝑛 ∈ ω (𝐵:suc 𝑛⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))
15		suceq 6385	. . . . 5 ⊢ (𝑛 = 𝑚 → suc 𝑛 = suc 𝑚)
16	15	feq2d 6646	. . . 4 ⊢ (𝑛 = 𝑚 → (𝐵:suc 𝑛⟶𝐴 ↔ 𝐵:suc 𝑚⟶𝐴))
17		raleq 3295	. . . 4 ⊢ (𝑛 = 𝑚 → (∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘)) ↔ ∀𝑘 ∈ 𝑚 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))
18	16, 17	3anbi13d 1446	. . 3 ⊢ (𝑛 = 𝑚 → ((𝐵:suc 𝑛⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))) ↔ (𝐵:suc 𝑚⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑚 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘)))))
19	18	cbvrexvw 3219	. 2 ⊢ (∃𝑛 ∈ ω (𝐵:suc 𝑛⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑛 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))) ↔ ∃𝑚 ∈ ω (𝐵:suc 𝑚⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑚 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))
20	2, 14, 19	3bitri 298	1 ⊢ (𝐵 ∈ 𝑆 ↔ ∃𝑚 ∈ ω (𝐵:suc 𝑚⟶𝐴 ∧ (𝐵‘∅) = 𝐶 ∧ ∀𝑘 ∈ 𝑚 (𝐵‘suc 𝑘) ∈ (𝐹‘(𝐵‘𝑘))))

Syntax hints:   ↔ wb 207   ∧ w3a 1092   = wceq 1547   ∈ wcel 2119  {cab 2718  ∀wral 3054  ∃wrex 3064  Vcvv 3432  ∅c0 4268  suc csuc 6319  ⟶wf 6488  ‘cfv 6492  ωcom 7813

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-ext 2712

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-sb 2074  df-clab 2719  df-cleq 2732  df-clel 2815  df-ral 3055  df-rex 3065  df-rab 3393  df-v 3434  df-dif 3893  df-un 3895  df-ss 3907  df-nul 4269  df-if 4462  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-br 5080  df-opab 5142  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-fv 6500

This theorem is referenced by:  axdc3lem4  10373