Theorem wfrlem3a 7753

Description: Lemma for well-founded recursion. Show membership in the class of acceptable functions. (Contributed by Scott Fenton, 31-Jul-2020.)

Hypotheses

Ref	Expression
wfrlem1.1	⊢ 𝐵 = {𝑓 ∣ ∃𝑥(𝑓 Fn 𝑥 ∧ (𝑥 ⊆ 𝐴 ∧ ∀𝑦 ∈ 𝑥 Pred(𝑅, 𝐴, 𝑦) ⊆ 𝑥) ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐹‘(𝑓 ↾ Pred(𝑅, 𝐴, 𝑦))))}
wfrlem3a.2	⊢ 𝐺 ∈ V

Assertion

Ref	Expression
wfrlem3a	⊢ (𝐺 ∈ 𝐵 ↔ ∃𝑧(𝐺 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝐺‘𝑤) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤)))))

Distinct variable groups:   𝐴,𝑓,𝑤,𝑥,𝑦,𝑧   𝑓,𝐹,𝑤,𝑥,𝑦,𝑧   𝑅,𝑓,𝑤,𝑥,𝑦,𝑧   𝑓,𝐺,𝑥,𝑦,𝑧,𝑤

Allowed substitution hints:   𝐵(𝑥,𝑦,𝑧,𝑤,𝑓)

Proof of Theorem wfrlem3a

Dummy variable 𝑔 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		wfrlem3a.2	. 2 ⊢ 𝐺 ∈ V
2		fneq1 6271	. . . 4 ⊢ (𝑔 = 𝐺 → (𝑔 Fn 𝑧 ↔ 𝐺 Fn 𝑧))
3		fveq1 6492	. . . . . 6 ⊢ (𝑔 = 𝐺 → (𝑔‘𝑤) = (𝐺‘𝑤))
4		reseq1 5682	. . . . . . 7 ⊢ (𝑔 = 𝐺 → (𝑔 ↾ Pred(𝑅, 𝐴, 𝑤)) = (𝐺 ↾ Pred(𝑅, 𝐴, 𝑤)))
5	4	fveq2d 6497	. . . . . 6 ⊢ (𝑔 = 𝐺 → (𝐹‘(𝑔 ↾ Pred(𝑅, 𝐴, 𝑤))) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤))))
6	3, 5	eqeq12d 2787	. . . . 5 ⊢ (𝑔 = 𝐺 → ((𝑔‘𝑤) = (𝐹‘(𝑔 ↾ Pred(𝑅, 𝐴, 𝑤))) ↔ (𝐺‘𝑤) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤)))))
7	6	ralbidv 3141	. . . 4 ⊢ (𝑔 = 𝐺 → (∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐹‘(𝑔 ↾ Pred(𝑅, 𝐴, 𝑤))) ↔ ∀𝑤 ∈ 𝑧 (𝐺‘𝑤) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤)))))
8	2, 7	3anbi13d 1417	. . 3 ⊢ (𝑔 = 𝐺 → ((𝑔 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐹‘(𝑔 ↾ Pred(𝑅, 𝐴, 𝑤)))) ↔ (𝐺 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝐺‘𝑤) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤))))))
9	8	exbidv 1880	. 2 ⊢ (𝑔 = 𝐺 → (∃𝑧(𝑔 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐹‘(𝑔 ↾ Pred(𝑅, 𝐴, 𝑤)))) ↔ ∃𝑧(𝐺 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝐺‘𝑤) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤))))))
10		wfrlem1.1	. . 3 ⊢ 𝐵 = {𝑓 ∣ ∃𝑥(𝑓 Fn 𝑥 ∧ (𝑥 ⊆ 𝐴 ∧ ∀𝑦 ∈ 𝑥 Pred(𝑅, 𝐴, 𝑦) ⊆ 𝑥) ∧ ∀𝑦 ∈ 𝑥 (𝑓‘𝑦) = (𝐹‘(𝑓 ↾ Pred(𝑅, 𝐴, 𝑦))))}
11	10	wfrlem1 7750	. 2 ⊢ 𝐵 = {𝑔 ∣ ∃𝑧(𝑔 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝑔‘𝑤) = (𝐹‘(𝑔 ↾ Pred(𝑅, 𝐴, 𝑤))))}
12	1, 9, 11	elab2 3579	1 ⊢ (𝐺 ∈ 𝐵 ↔ ∃𝑧(𝐺 Fn 𝑧 ∧ (𝑧 ⊆ 𝐴 ∧ ∀𝑤 ∈ 𝑧 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑧) ∧ ∀𝑤 ∈ 𝑧 (𝐺‘𝑤) = (𝐹‘(𝐺 ↾ Pred(𝑅, 𝐴, 𝑤)))))

Syntax hints:   ↔ wb 198   ∧ wa 387   ∧ w3a 1068   = wceq 1507  ∃wex 1742   ∈ wcel 2048  {cab 2753  ∀wral 3082  Vcvv 3409   ⊆ wss 3825   ↾ cres 5402  Predcpred 5979   Fn wfn 6177  ‘cfv 6182

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1964  ax-8 2050  ax-9 2057  ax-10 2077  ax-11 2091  ax-12 2104  ax-13 2299  ax-ext 2745

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3an 1070  df-tru 1510  df-ex 1743  df-nf 1747  df-sb 2014  df-clab 2754  df-cleq 2765  df-clel 2840  df-nfc 2912  df-ral 3087  df-rex 3088  df-rab 3091  df-v 3411  df-dif 3828  df-un 3830  df-in 3832  df-ss 3839  df-nul 4174  df-if 4345  df-sn 4436  df-pr 4438  df-op 4442  df-uni 4707  df-br 4924  df-opab 4986  df-xp 5406  df-rel 5407  df-cnv 5408  df-co 5409  df-dm 5410  df-rn 5411  df-res 5412  df-ima 5413  df-pred 5980  df-iota 6146  df-fun 6184  df-fn 6185  df-fv 6190

This theorem is referenced by:  wfrlem17  7768