Theorem frege70 44687

Description: Lemma for frege72 44689. 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 44686	. 2 ⊢ (∀𝑥(𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) ↔ 𝑅 hereditary 𝐴)
2		frege70.x	. . . 4 ⊢ 𝑋 ∈ 𝑉
3	2	frege68c 44685	. . 3 ⊢ ((∀𝑥(𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) ↔ 𝑅 hereditary 𝐴) → (𝑅 hereditary 𝐴 → [𝑋 / 𝑥](𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴))))
4		sbcel1v 3809	. . . . 5 ⊢ ([𝑋 / 𝑥]𝑥 ∈ 𝐴 ↔ 𝑋 ∈ 𝐴)
5	4	biimpri 231	. . . 4 ⊢ (𝑋 ∈ 𝐴 → [𝑋 / 𝑥]𝑥 ∈ 𝐴)
6		sbcim1 3797	. . . 4 ⊢ ([𝑋 / 𝑥](𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) → ([𝑋 / 𝑥]𝑥 ∈ 𝐴 → [𝑋 / 𝑥]∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)))
7		sbcal 3803	. . . . 5 ⊢ ([𝑋 / 𝑥]∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) ↔ ∀𝑦[𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴))
8		sbcim1 3797	. . . . . . 7 ⊢ ([𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → ([𝑋 / 𝑥]𝑥𝑅𝑦 → [𝑋 / 𝑥]𝑦 ∈ 𝐴))
9		sbcbr1g 5168	. . . . . . . . 9 ⊢ (𝑋 ∈ 𝑉 → ([𝑋 / 𝑥]𝑥𝑅𝑦 ↔ ⦋𝑋 / 𝑥⦌𝑥𝑅𝑦))
10	2, 9	ax-mp 5	. . . . . . . 8 ⊢ ([𝑋 / 𝑥]𝑥𝑅𝑦 ↔ ⦋𝑋 / 𝑥⦌𝑥𝑅𝑦)
11		csbvarg 4399	. . . . . . . . . 10 ⊢ (𝑋 ∈ 𝑉 → ⦋𝑋 / 𝑥⦌𝑥 = 𝑋)
12	2, 11	ax-mp 5	. . . . . . . . 9 ⊢ ⦋𝑋 / 𝑥⦌𝑥 = 𝑋
13	12	breq1i 5116	. . . . . . . 8 ⊢ (⦋𝑋 / 𝑥⦌𝑥𝑅𝑦 ↔ 𝑋𝑅𝑦)
14	10, 13	bitri 278	. . . . . . 7 ⊢ ([𝑋 / 𝑥]𝑥𝑅𝑦 ↔ 𝑋𝑅𝑦)
15		sbcg 3816	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑉 → ([𝑋 / 𝑥]𝑦 ∈ 𝐴 ↔ 𝑦 ∈ 𝐴))
16	2, 15	ax-mp 5	. . . . . . 7 ⊢ ([𝑋 / 𝑥]𝑦 ∈ 𝐴 ↔ 𝑦 ∈ 𝐴)
17	8, 14, 16	3imtr3g 298	. . . . . 6 ⊢ ([𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → (𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))
18	17	alimi 1841	. . . . 5 ⊢ (∀𝑦[𝑋 / 𝑥](𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))
19	7, 18	sylbi 220	. . . 4 ⊢ ([𝑋 / 𝑥]∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴) → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))
20	5, 6, 19	syl56 37	. . 3 ⊢ ([𝑋 / 𝑥](𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴)))
21	3, 20	syl6 36	. 2 ⊢ ((∀𝑥(𝑥 ∈ 𝐴 → ∀𝑦(𝑥𝑅𝑦 → 𝑦 ∈ 𝐴)) ↔ 𝑅 hereditary 𝐴) → (𝑅 hereditary 𝐴 → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴))))
22	1, 21	ax-mp 5	1 ⊢ (𝑅 hereditary 𝐴 → (𝑋 ∈ 𝐴 → ∀𝑦(𝑋𝑅𝑦 → 𝑦 ∈ 𝐴)))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209  ∀wal 1568   = wceq 1570   ∈ wcel 2143  [wsbc 3744  ⦋csb 3853   class class class wbr 5109   hereditary whe 44526

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-sep 5257  ax-pr 5404  ax-frege1 44544  ax-frege2 44545  ax-frege8 44563  ax-frege52a 44611  ax-frege58b 44655

This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-ifp 1079  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ral 3080  df-rex 3090  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-sn 4590  df-pr 4592  df-op 4596  df-br 5110  df-opab 5174  df-xp 5667  df-cnv 5669  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-he 44527

This theorem is used by:  frege71  44688