Theorem frege70 44392

Description: Lemma for frege72 44394. Proposition 70 of [Frege1879] p. 58. (Contributed by RP, 28-Mar-2020.) (Revised by RP, 3-Jul-2020.) (Proof modification is discouraged.)

Hypothesis

Ref	Expression
frege70.x	⊢ 𝑋 ∈ 𝑉

Assertion

Ref	Expression
frege70	⊢ (𝑅 hereditary 𝐴 → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴)))

Distinct variable groups:   𝑦,𝐴   𝑦,𝑅   𝑦,𝑋

Allowed substitution hint:   𝑉(𝑦)

Proof of Theorem frege70

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		dffrege69 44391	. 2 ⊢ (∀𝑥(𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) ↔ 𝑅 hereditary 𝐴)
2		frege70.x	. . . 4 ⊢ 𝑋 ∈ 𝑉
3	2	frege68c 44390	. . 3 ⊢ ((∀𝑥(𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) ↔ 𝑅 hereditary 𝐴) → (𝑅 hereditary 𝐴 → [𝑋 / 𝑥](𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴))))
4		sbcel1v 3790	. . . . 5 ⊢ ([𝑋 / 𝑥]𝑥 ∈ 𝐴 ↔ 𝑋 ∈ 𝐴)
5	4	biimpri 230	. . . 4 ⊢ (𝑋 ∈ 𝐴 → [𝑋 / 𝑥]𝑥 ∈ 𝐴)
6		sbcim1 3778	. . . 4 ⊢ ([𝑋 / 𝑥](𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) → ([𝑋 / 𝑥]𝑥 ∈ 𝐴 → [𝑋 / 𝑥]∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)))
7		sbcal 3784	. . . . 5 ⊢ ([𝑋 / 𝑥]∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) ↔ ∀𝑦[𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴))
8		sbcim1 3778	. . . . . . 7 ⊢ ([𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → ([𝑋 / 𝑥]𝑥𝑅𝑦 → [𝑋 / 𝑥]𝑦 ∈ 𝐴))
9		sbcbr1g 5132	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝑉 → ([𝑋 / 𝑥]𝑥𝑅𝑦 ↔ ⦋𝑋 / 𝑥⦌𝑥𝑅𝑦))
10	2, 9	ax-mp 5	. . . . . . . 8 ⊢ ([𝑋 / 𝑥]𝑥𝑅𝑦 ↔ ⦋𝑋 / 𝑥⦌𝑥𝑅𝑦)
11		csbvarg 4365	. . . . . . . . . 10 ⊢ (𝑋 ∈ 𝑉 → ⦋𝑋 / 𝑥⦌𝑥 = 𝑋)
12	2, 11	ax-mp 5	. . . . . . . . 9 ⊢ ⦋𝑋 / 𝑥⦌𝑥 = 𝑋
13	12	breq1i 5082	. . . . . . . 8 ⊢ (⦋𝑋 / 𝑥⦌𝑥𝑅𝑦 ↔ 𝑋𝑅𝑦)
14	10, 13	bitri 277	. . . . . . 7 ⊢ ([𝑋 / 𝑥]𝑥𝑅𝑦 ↔ 𝑋𝑅𝑦)
15		sbcg 3797	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑉 → ([𝑋 / 𝑥]𝑦 ∈ 𝐴 ↔ 𝑦 ∈ 𝐴))
16	2, 15	ax-mp 5	. . . . . . 7 ⊢ ([𝑋 / 𝑥]𝑦 ∈ 𝐴 ↔ 𝑦 ∈ 𝐴)
17	8, 14, 16	3imtr3g 297	. . . . . 6 ⊢ ([𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → (𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))
18	17	alimi 1819	. . . . 5 ⊢ (∀𝑦[𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))
19	7, 18	sylbi 219	. . . 4 ⊢ ([𝑋 / 𝑥]∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))
20	5, 6, 19	syl56 36	. . 3 ⊢ ([𝑋 / 𝑥](𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴)))
21	3, 20	syl6 35	. 2 ⊢ ((∀𝑥(𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) ↔ 𝑅 hereditary 𝐴) → (𝑅 hereditary 𝐴 → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))))
22	1, 21	ax-mp 5	1 ⊢ (𝑅 hereditary 𝐴 → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴)))

Syntax hints:   → wi 4   ↔ wb 208  ∀wal 1546   = wceq 1548   ∈ wcel 2121  [wsbc 3725  ⦋csb 3833   class class class wbr 5075   hereditary whe 44231

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1975  ax-7 2016  ax-8 2123  ax-9 2131  ax-10 2154  ax-11 2170  ax-12 2191  ax-ext 2713  ax-sep 5221  ax-pr 5365  ax-frege1 44249  ax-frege2 44250  ax-frege8 44268  ax-frege52a 44316  ax-frege58b 44360

This theorem depends on definitions:  df-bi 209  df-an 398  df-or 855  df-ifp 1070  df-3an 1095  df-tru 1551  df-fal 1561  df-ex 1788  df-nf 1792  df-sb 2075  df-clab 2720  df-cleq 2733  df-clel 2816  df-nfc 2890  df-ral 3056  df-rex 3066  df-rab 3394  df-v 3435  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-nul 4265  df-if 4458  df-sn 4559  df-pr 4561  df-op 4565  df-br 5076  df-opab 5138  df-xp 5627  df-cnv 5629  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-he 44232

This theorem is referenced by:  frege71  44393