Theorem eqsbc3rVD 38097

Description: Virtual deduction proof of eqsbc3r 3459. (Contributed by Alan Sare, 24-Oct-2011.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
eqsbc3rVD	⊢ (𝐴 ∈ 𝐵 → ([𝐴 / 𝑥]𝐶 = 𝑥 ↔ 𝐶 = 𝐴))

Distinct variable group:   𝑥,𝐶

Allowed substitution hints:   𝐴(𝑥)   𝐵(𝑥)

Proof of Theorem eqsbc3rVD

Step	Hyp	Ref	Expression
1		idn1 37811	. . . . . . 7 ⊢ (   𝐴 ∈ 𝐵   ▶   𝐴 ∈ 𝐵   )
2		eqsbc3 3442	. . . . . . 7 ⊢ (𝐴 ∈ 𝐵 → ([𝐴 / 𝑥]𝑥 = 𝐶 ↔ 𝐴 = 𝐶))
3	1, 2	e1a 37873	. . . . . 6 ⊢ (   𝐴 ∈ 𝐵   ▶   ([𝐴 / 𝑥]𝑥 = 𝐶 ↔ 𝐴 = 𝐶)   )
4		eqcom 2617	. . . . . . . . 9 ⊢ (𝐶 = 𝑥 ↔ 𝑥 = 𝐶)
5	4	sbcbiiOLD 37762	. . . . . . . 8 ⊢ (𝐴 ∈ 𝐵 → ([𝐴 / 𝑥]𝐶 = 𝑥 ↔ [𝐴 / 𝑥]𝑥 = 𝐶))
6	1, 5	e1a 37873	. . . . . . 7 ⊢ (   𝐴 ∈ 𝐵   ▶   ([𝐴 / 𝑥]𝐶 = 𝑥 ↔ [𝐴 / 𝑥]𝑥 = 𝐶)   )
7		idn2 37859	. . . . . . 7 ⊢ (   𝐴 ∈ 𝐵   ,   [𝐴 / 𝑥]𝐶 = 𝑥   ▶   [𝐴 / 𝑥]𝐶 = 𝑥   )
8		biimp 204	. . . . . . 7 ⊢ (([𝐴 / 𝑥]𝐶 = 𝑥 ↔ [𝐴 / 𝑥]𝑥 = 𝐶) → ([𝐴 / 𝑥]𝐶 = 𝑥 → [𝐴 / 𝑥]𝑥 = 𝐶))
9	6, 7, 8	e12 37972	. . . . . 6 ⊢ (   𝐴 ∈ 𝐵   ,   [𝐴 / 𝑥]𝐶 = 𝑥   ▶   [𝐴 / 𝑥]𝑥 = 𝐶   )
10		biimp 204	. . . . . 6 ⊢ (([𝐴 / 𝑥]𝑥 = 𝐶 ↔ 𝐴 = 𝐶) → ([𝐴 / 𝑥]𝑥 = 𝐶 → 𝐴 = 𝐶))
11	3, 9, 10	e12 37972	. . . . 5 ⊢ (   𝐴 ∈ 𝐵   ,   [𝐴 / 𝑥]𝐶 = 𝑥   ▶   𝐴 = 𝐶   )
12		eqcom 2617	. . . . 5 ⊢ (𝐴 = 𝐶 ↔ 𝐶 = 𝐴)
13	11, 12	e2bi 37878	. . . 4 ⊢ (   𝐴 ∈ 𝐵   ,   [𝐴 / 𝑥]𝐶 = 𝑥   ▶   𝐶 = 𝐴   )
14	13	in2 37851	. . 3 ⊢ (   𝐴 ∈ 𝐵   ▶   ([𝐴 / 𝑥]𝐶 = 𝑥 → 𝐶 = 𝐴)   )
15		idn2 37859	. . . . . . 7 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 = 𝐴   ▶   𝐶 = 𝐴   )
16	15, 12	e2bir 37879	. . . . . 6 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 = 𝐴   ▶   𝐴 = 𝐶   )
17		biimpr 209	. . . . . 6 ⊢ (([𝐴 / 𝑥]𝑥 = 𝐶 ↔ 𝐴 = 𝐶) → (𝐴 = 𝐶 → [𝐴 / 𝑥]𝑥 = 𝐶))
18	3, 16, 17	e12 37972	. . . . 5 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 = 𝐴   ▶   [𝐴 / 𝑥]𝑥 = 𝐶   )
19		biimpr 209	. . . . 5 ⊢ (([𝐴 / 𝑥]𝐶 = 𝑥 ↔ [𝐴 / 𝑥]𝑥 = 𝐶) → ([𝐴 / 𝑥]𝑥 = 𝐶 → [𝐴 / 𝑥]𝐶 = 𝑥))
20	6, 18, 19	e12 37972	. . . 4 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 = 𝐴   ▶   [𝐴 / 𝑥]𝐶 = 𝑥   )
21	20	in2 37851	. . 3 ⊢ (   𝐴 ∈ 𝐵   ▶   (𝐶 = 𝐴 → [𝐴 / 𝑥]𝐶 = 𝑥)   )
22		impbi 197	. . 3 ⊢ (([𝐴 / 𝑥]𝐶 = 𝑥 → 𝐶 = 𝐴) → ((𝐶 = 𝐴 → [𝐴 / 𝑥]𝐶 = 𝑥) → ([𝐴 / 𝑥]𝐶 = 𝑥 ↔ 𝐶 = 𝐴)))
23	14, 21, 22	e11 37934	. 2 ⊢ (   𝐴 ∈ 𝐵   ▶   ([𝐴 / 𝑥]𝐶 = 𝑥 ↔ 𝐶 = 𝐴)   )
24	23	in1 37808	1 ⊢ (𝐴 ∈ 𝐵 → ([𝐴 / 𝑥]𝐶 = 𝑥 ↔ 𝐶 = 𝐴))

Syntax hints:   → wi 4   ↔ wb 195   = wceq 1475   ∈ wcel 1977  [wsbc 3402

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-clab 2597  df-cleq 2603  df-clel 2606  df-v 3175  df-sbc 3403  df-vd1 37807  df-vd2 37815

This theorem is referenced by: (None)