Theorem rspsbc2VD 39090

Description: Virtual deduction proof of rspsbc2 38744. The following user's proof is completed by invoking mmj2's unify command and using mmj2's StepSelector to pick all remaining steps of the Metamath proof.

1::	⊢ (   𝐴 ∈ 𝐵   ▶   𝐴 ∈ 𝐵   )
2::	⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ▶   𝐶 ∈ 𝐷   )
3::	⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷𝜑   ▶   ∀𝑥 ∈ 𝐵∀𝑦 ∈ 𝐷𝜑   )
4:1,3,?: e13 38975	⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷𝜑   ▶   [𝐴 / 𝑥]∀𝑦 ∈ 𝐷𝜑   )
5:1,4,?: e13 38975	⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷𝜑   ▶   ∀𝑦 ∈ 𝐷[𝐴 / 𝑥]𝜑   )
6:2,5,?: e23 38982	⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷𝜑   ▶   [𝐶 / 𝑦][𝐴 / 𝑥]𝜑   )
7:6:	⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ▶   (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑)   )
8:7:	⊢ (   𝐴 ∈ 𝐵   ▶   (𝐶 ∈ 𝐷 → (∀𝑥 ∈ 𝐵∀𝑦 ∈ 𝐷𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑))   )
qed:8:	⊢ (𝐴 ∈ 𝐵 → (𝐶 ∈ 𝐷 → (∀𝑥 ∈ 𝐵∀𝑦 ∈ 𝐷𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑)))

(Contributed by Alan Sare, 31-Dec-2011.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
rspsbc2VD	⊢ (𝐴 ∈ 𝐵 → (𝐶 ∈ 𝐷 → (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑)))

Distinct variable groups:   𝑦,𝐴   𝑥,𝐵   𝑥,𝐷,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐴(𝑥)   𝐵(𝑦)   𝐶(𝑥,𝑦)

Proof of Theorem rspsbc2VD

Step	Hyp	Ref	Expression
1		idn2 38838	. . . . 5 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ▶   𝐶 ∈ 𝐷   )
2		idn1 38790	. . . . . 6 ⊢ (   𝐴 ∈ 𝐵   ▶   𝐴 ∈ 𝐵   )
3		idn3 38840	. . . . . . 7 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑   ▶   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑   )
4		rspsbc 3518	. . . . . . 7 ⊢ (𝐴 ∈ 𝐵 → (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑 → [𝐴 / 𝑥]∀𝑦 ∈ 𝐷 𝜑))
5	2, 3, 4	e13 38975	. . . . . 6 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑   ▶   [𝐴 / 𝑥]∀𝑦 ∈ 𝐷 𝜑   )
6		sbcralg 3513	. . . . . . 7 ⊢ (𝐴 ∈ 𝐵 → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐷 𝜑 ↔ ∀𝑦 ∈ 𝐷 [𝐴 / 𝑥]𝜑))
7	6	biimpd 219	. . . . . 6 ⊢ (𝐴 ∈ 𝐵 → ([𝐴 / 𝑥]∀𝑦 ∈ 𝐷 𝜑 → ∀𝑦 ∈ 𝐷 [𝐴 / 𝑥]𝜑))
8	2, 5, 7	e13 38975	. . . . 5 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑   ▶   ∀𝑦 ∈ 𝐷 [𝐴 / 𝑥]𝜑   )
9		rspsbc 3518	. . . . 5 ⊢ (𝐶 ∈ 𝐷 → (∀𝑦 ∈ 𝐷 [𝐴 / 𝑥]𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑))
10	1, 8, 9	e23 38982	. . . 4 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ,   ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑   ▶   [𝐶 / 𝑦][𝐴 / 𝑥]𝜑   )
11	10	in3 38834	. . 3 ⊢ (   𝐴 ∈ 𝐵   ,   𝐶 ∈ 𝐷   ▶   (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑)   )
12	11	in2 38830	. 2 ⊢ (   𝐴 ∈ 𝐵   ▶   (𝐶 ∈ 𝐷 → (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑))   )
13	12	in1 38787	1 ⊢ (𝐴 ∈ 𝐵 → (𝐶 ∈ 𝐷 → (∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐷 𝜑 → [𝐶 / 𝑦][𝐴 / 𝑥]𝜑)))

Syntax hints:   → wi 4   ∈ wcel 1990  ∀wral 2912  [wsbc 3435

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-v 3202  df-sbc 3436  df-vd1 38786  df-vd2 38794  df-vd3 38806

This theorem is referenced by: (None)