Theorem setrec1lem1 50524

Description: Lemma for setrec1 50528. This is a utility theorem showing the equivalence of the statement 𝑋 ∈ 𝑌 and its expanded form. The proof uses elabg 3637 and equivalence theorems.

Variable 𝑌 is the class of sets 𝑦 that are recursively generated by the function 𝐹. In other words, 𝑦 ∈ 𝑌 iff by starting with the empty set and repeatedly applying 𝐹 to subsets 𝑤 of our set, we will eventually generate all the elements of 𝑌. In this theorem, 𝑋 is any element of 𝑌, and 𝑉 is any class. (Contributed by Emmett Weisz, 16-Oct-2020.) (New usage is discouraged.)

Hypotheses

Ref	Expression
setrec1lem1.1	⊢ 𝑌 = {𝑦 ∣ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑦 ⊆ 𝑧)}
setrec1lem1.2	⊢ (𝜑 → 𝑋 ∈ 𝑉)

Assertion

Ref	Expression
setrec1lem1	⊢ (𝜑 → (𝑋 ∈ 𝑌 ↔ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑋 ⊆ 𝑧)))

Distinct variable groups:   𝑦,𝐹   𝑤,𝑋,𝑦   𝑧,𝑋,𝑦

Allowed substitution hints:   𝜑(𝑦, 𝑧, 𝑤)   𝐹(𝑧, 𝑤)   𝑉(𝑦, 𝑧, 𝑤)   𝑌(𝑦, 𝑧, 𝑤)

Proof of Theorem setrec1lem1

Step	Hyp	Ref	Expression
1		setrec1lem1.2	. 2 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
2		sseq2 3964	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (𝑤 ⊆ 𝑦 ↔ 𝑤 ⊆ 𝑋))
3	2	imbi1d 344	. . . . . 6 ⊢ (𝑦 = 𝑋 → ((𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) ↔ (𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧))))
4	3	albidv 1953	. . . . 5 ⊢ (𝑦 = 𝑋 → (∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) ↔ ∀𝑤(𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧))))
5		sseq1 3963	. . . . 5 ⊢ (𝑦 = 𝑋 → (𝑦 ⊆ 𝑧 ↔ 𝑋 ⊆ 𝑧))
6	4, 5	imbi12d 347	. . . 4 ⊢ (𝑦 = 𝑋 → ((∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑦 ⊆ 𝑧) ↔ (∀𝑤(𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑋 ⊆ 𝑧)))
7	6	albidv 1953	. . 3 ⊢ (𝑦 = 𝑋 → (∀𝑧(∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑦 ⊆ 𝑧) ↔ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑋 ⊆ 𝑧)))
8		setrec1lem1.1	. . 3 ⊢ 𝑌 = {𝑦 ∣ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑦 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑦 ⊆ 𝑧)}
9	7, 8	elab2g 3641	. 2 ⊢ (𝑋 ∈ 𝑉 → (𝑋 ∈ 𝑌 ↔ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑋 ⊆ 𝑧)))
10	1, 9	syl 18	1 ⊢ (𝜑 → (𝑋 ∈ 𝑌 ↔ ∀𝑧(∀𝑤(𝑤 ⊆ 𝑋 → (𝑤 ⊆ 𝑧 → (𝐹‘𝑤) ⊆ 𝑧)) → 𝑋 ⊆ 𝑧)))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209  ∀wal 1568   = wceq 1570   ∈ wcel 2146  {cab 2743   ⊆ wss 3906  ‘cfv 6540

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-ext 2737

This proof depends on definitions:  df-bi 210  df-an 402  df-tru 1573  df-ex 1813  df-sb 2100  df-clab 2744  df-cleq 2757  df-clel 2840  df-ss 3923

This theorem is used by:  setrec1lem2  50525  setrec1lem4  50527  setrec2fun  50529