Theorem bnj540 35250

Description: Technical lemma for bnj852 35279. This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
bnj540.1	⊢ (𝜓 ↔ ∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
bnj540.2	⊢ (𝜓″ ↔ [𝐺 / 𝑓]𝜓)
bnj540.3	⊢ 𝐺 ∈ V

Assertion

Ref	Expression
bnj540	⊢ (𝜓″ ↔ ∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝐺‘suc 𝑖) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅)))

Distinct variable groups:   𝐴,𝑓   𝑓,𝐺,𝑖,𝑦   𝑓,𝑁   𝑅,𝑓

Allowed substitution hints:   𝜓(𝑦,𝑓,𝑖)   𝐴(𝑦,𝑖)   𝑅(𝑦,𝑖)   𝑁(𝑦,𝑖)   𝜓″(𝑦,𝑓,𝑖)

Proof of Theorem bnj540

Step	Hyp	Ref	Expression
1		bnj540.2	. 2 ⊢ (𝜓″ ↔ [𝐺 / 𝑓]𝜓)
2		bnj540.1	. . . 4 ⊢ (𝜓 ↔ ∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
3	2	sbcbii 3808	. . 3 ⊢ ([𝐺 / 𝑓]𝜓 ↔ [𝐺 / 𝑓]∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
4		bnj540.3	. . . 4 ⊢ 𝐺 ∈ V
5	4	bnj538 35099	. . 3 ⊢ ([𝐺 / 𝑓]∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)) ↔ ∀𝑖 ∈ ω [𝐺 / 𝑓](suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
6		sbcimg 3800	. . . . 5 ⊢ (𝐺 ∈ V → ([𝐺 / 𝑓](suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)) ↔ ([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 → [𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅))))
7	4, 6	ax-mp 5	. . . 4 ⊢ ([𝐺 / 𝑓](suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)) ↔ ([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 → [𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
8	7	ralbii 3118	. . 3 ⊢ (∀𝑖 ∈ ω [𝐺 / 𝑓](suc 𝑖 ∈ 𝑁 → (𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)) ↔ ∀𝑖 ∈ ω ([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 → [𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
9	3, 5, 8	3bitri 300	. 2 ⊢ ([𝐺 / 𝑓]𝜓 ↔ ∀𝑖 ∈ ω ([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 → [𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)))
10	4	bnj525 35097	. . . 4 ⊢ ([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 ↔ suc 𝑖 ∈ 𝑁)
11		fveq1 6884	. . . . . 6 ⊢ (𝑓 = 𝐺 → (𝑓‘suc 𝑖) = (𝐺‘suc 𝑖))
12		fveq1 6884	. . . . . . 7 ⊢ (𝑓 = 𝐺 → (𝑓‘𝑖) = (𝐺‘𝑖))
13	12	bnj1113 35144	. . . . . 6 ⊢ (𝑓 = 𝐺 → ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅))
14	11, 13	eqeq12d 2786	. . . . 5 ⊢ (𝑓 = 𝐺 → ((𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅) ↔ (𝐺‘suc 𝑖) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅)))
15	4, 14	sbcie 3793	. . . 4 ⊢ ([𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅) ↔ (𝐺‘suc 𝑖) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅))
16	10, 15	imbi12i 353	. . 3 ⊢ (([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 → [𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)) ↔ (suc 𝑖 ∈ 𝑁 → (𝐺‘suc 𝑖) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅)))
17	16	ralbii 3118	. 2 ⊢ (∀𝑖 ∈ ω ([𝐺 / 𝑓]suc 𝑖 ∈ 𝑁 → [𝐺 / 𝑓](𝑓‘suc 𝑖) = ∪ 𝑦 ∈ (𝑓‘𝑖) pred(𝑦, 𝐴, 𝑅)) ↔ ∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝐺‘suc 𝑖) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅)))
18	1, 9, 17	3bitri 300	1 ⊢ (𝜓″ ↔ ∀𝑖 ∈ ω (suc 𝑖 ∈ 𝑁 → (𝐺‘suc 𝑖) = ∪ 𝑦 ∈ (𝐺‘𝑖) pred(𝑦, 𝐴, 𝑅)))

Syntax hints:   → wi 4   ↔ wb 209   = wceq 1568   ∈ wcel 2150  ∀wral 3086  Vcvv 3462  [wsbc 3752  ∪ ciun 4961  suc csuc 6366  ‘cfv 6540  ωcom 7865   predc-bnj14 35047

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1823  ax-4 1837  ax-5 1938  ax-6 1995  ax-7 2036  ax-8 2152  ax-9 2160  ax-10 2183  ax-11 2199  ax-12 2220  ax-ext 2742

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-tru 1571  df-ex 1808  df-nf 1812  df-sb 2099  df-clab 2749  df-cleq 2762  df-clel 2845  df-nfc 2919  df-ral 3087  df-rex 3097  df-v 3464  df-sbc 3753  df-ss 3930  df-uni 4878  df-iun 4963  df-br 5115  df-iota 6496  df-fv 6548

This theorem is referenced by:  bnj580  35271  bnj607  35274