Theorem bj-findes 14016

Description: Principle of induction, using explicit substitutions. Constructive proof (from CZF). See the comment of bj-findis 14014 for explanations. From this version, it is easy to prove findes 4587. (Contributed by BJ, 21-Nov-2019.) (Proof modification is discouraged.)

Assertion

Ref	Expression
bj-findes	⊢ (([∅ / 𝑥]𝜑 ∧ ∀𝑥 ∈ ω (𝜑 → [suc 𝑥 / 𝑥]𝜑)) → ∀𝑥 ∈ ω 𝜑)

Proof of Theorem bj-findes

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfv 1521	. . . 4 ⊢ Ⅎ𝑦𝜑
2		nfv 1521	. . . 4 ⊢ Ⅎ𝑦[suc 𝑥 / 𝑥]𝜑
3	1, 2	nfim 1565	. . 3 ⊢ Ⅎ𝑦(𝜑 → [suc 𝑥 / 𝑥]𝜑)
4		nfs1v 1932	. . . 4 ⊢ Ⅎ𝑥[𝑦 / 𝑥]𝜑
5		nfsbc1v 2973	. . . 4 ⊢ Ⅎ𝑥[suc 𝑦 / 𝑥]𝜑
6	4, 5	nfim 1565	. . 3 ⊢ Ⅎ𝑥([𝑦 / 𝑥]𝜑 → [suc 𝑦 / 𝑥]𝜑)
7		sbequ12 1764	. . . 4 ⊢ (𝑥 = 𝑦 → (𝜑 ↔ [𝑦 / 𝑥]𝜑))
8		suceq 4387	. . . . 5 ⊢ (𝑥 = 𝑦 → suc 𝑥 = suc 𝑦)
9	8	sbceq1d 2960	. . . 4 ⊢ (𝑥 = 𝑦 → ([suc 𝑥 / 𝑥]𝜑 ↔ [suc 𝑦 / 𝑥]𝜑))
10	7, 9	imbi12d 233	. . 3 ⊢ (𝑥 = 𝑦 → ((𝜑 → [suc 𝑥 / 𝑥]𝜑) ↔ ([𝑦 / 𝑥]𝜑 → [suc 𝑦 / 𝑥]𝜑)))
11	3, 6, 10	cbvral 2692	. 2 ⊢ (∀𝑥 ∈ ω (𝜑 → [suc 𝑥 / 𝑥]𝜑) ↔ ∀𝑦 ∈ ω ([𝑦 / 𝑥]𝜑 → [suc 𝑦 / 𝑥]𝜑))
12		nfsbc1v 2973	. . 3 ⊢ Ⅎ𝑥[∅ / 𝑥]𝜑
13		sbceq1a 2964	. . . 4 ⊢ (𝑥 = ∅ → (𝜑 ↔ [∅ / 𝑥]𝜑))
14	13	biimprd 157	. . 3 ⊢ (𝑥 = ∅ → ([∅ / 𝑥]𝜑 → 𝜑))
15		sbequ1 1761	. . 3 ⊢ (𝑥 = 𝑦 → (𝜑 → [𝑦 / 𝑥]𝜑))
16		sbceq1a 2964	. . . 4 ⊢ (𝑥 = suc 𝑦 → (𝜑 ↔ [suc 𝑦 / 𝑥]𝜑))
17	16	biimprd 157	. . 3 ⊢ (𝑥 = suc 𝑦 → ([suc 𝑦 / 𝑥]𝜑 → 𝜑))
18	12, 4, 5, 14, 15, 17	bj-findis 14014	. 2 ⊢ (([∅ / 𝑥]𝜑 ∧ ∀𝑦 ∈ ω ([𝑦 / 𝑥]𝜑 → [suc 𝑦 / 𝑥]𝜑)) → ∀𝑥 ∈ ω 𝜑)
19	11, 18	sylan2b 285	1 ⊢ (([∅ / 𝑥]𝜑 ∧ ∀𝑥 ∈ ω (𝜑 → [suc 𝑥 / 𝑥]𝜑)) → ∀𝑥 ∈ ω 𝜑)

Syntax hints:   → wi 4   ∧ wa 103   = wceq 1348  [wsb 1755  ∀wral 2448  [wsbc 2955  ∅c0 3414  suc csuc 4350  ωcom 4574

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 609  ax-in2 610  ax-io 704  ax-5 1440  ax-7 1441  ax-gen 1442  ax-ie1 1486  ax-ie2 1487  ax-8 1497  ax-10 1498  ax-11 1499  ax-i12 1500  ax-bndl 1502  ax-4 1503  ax-17 1519  ax-i9 1523  ax-ial 1527  ax-i5r 1528  ax-13 2143  ax-14 2144  ax-ext 2152  ax-nul 4115  ax-pr 4194  ax-un 4418  ax-setind 4521  ax-bd0 13848  ax-bdim 13849  ax-bdan 13850  ax-bdor 13851  ax-bdn 13852  ax-bdal 13853  ax-bdex 13854  ax-bdeq 13855  ax-bdel 13856  ax-bdsb 13857  ax-bdsep 13919  ax-infvn 13976

This theorem depends on definitions:  df-bi 116  df-tru 1351  df-fal 1354  df-nf 1454  df-sb 1756  df-clab 2157  df-cleq 2163  df-clel 2166  df-nfc 2301  df-ral 2453  df-rex 2454  df-rab 2457  df-v 2732  df-sbc 2956  df-dif 3123  df-un 3125  df-in 3127  df-ss 3134  df-nul 3415  df-sn 3589  df-pr 3590  df-uni 3797  df-int 3832  df-suc 4356  df-iom 4575  df-bdc 13876  df-bj-ind 13962

This theorem is referenced by: (None)