Theorem sbcssg 3504

Description: Distribute proper substitution through a subclass relation. (Contributed by Alan Sare, 22-Jul-2012.) (Proof shortened by Alexander van der Vekens, 23-Jul-2017.)

Assertion

Ref	Expression
sbcssg	⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥]𝐵 ⊆ 𝐶 ↔ ⦋𝐴 / 𝑥⦌𝐵 ⊆ ⦋𝐴 / 𝑥⦌𝐶))

Proof of Theorem sbcssg

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		sbcalg 2989	. . 3 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥]∀𝑦(𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶) ↔ ∀𝑦[𝐴 / 𝑥](𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶)))
2		sbcimg 2978	. . . . 5 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥](𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶) ↔ ([𝐴 / 𝑥]𝑦 ∈ 𝐵 → [𝐴 / 𝑥]𝑦 ∈ 𝐶)))
3		sbcel2g 3052	. . . . . 6 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥]𝑦 ∈ 𝐵 ↔ 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐵))
4		sbcel2g 3052	. . . . . 6 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥]𝑦 ∈ 𝐶 ↔ 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐶))
5	3, 4	imbi12d 233	. . . . 5 ⊢ (𝐴 ∈ 𝑉 → (([𝐴 / 𝑥]𝑦 ∈ 𝐵 → [𝐴 / 𝑥]𝑦 ∈ 𝐶) ↔ (𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐵 → 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐶)))
6	2, 5	bitrd 187	. . . 4 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥](𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶) ↔ (𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐵 → 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐶)))
7	6	albidv 1804	. . 3 ⊢ (𝐴 ∈ 𝑉 → (∀𝑦[𝐴 / 𝑥](𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶) ↔ ∀𝑦(𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐵 → 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐶)))
8	1, 7	bitrd 187	. 2 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥]∀𝑦(𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶) ↔ ∀𝑦(𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐵 → 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐶)))
9		dfss2 3117	. . 3 ⊢ (𝐵 ⊆ 𝐶 ↔ ∀𝑦(𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶))
10	9	sbcbii 2996	. 2 ⊢ ([𝐴 / 𝑥]𝐵 ⊆ 𝐶 ↔ [𝐴 / 𝑥]∀𝑦(𝑦 ∈ 𝐵 → 𝑦 ∈ 𝐶))
11		dfss2 3117	. 2 ⊢ (⦋𝐴 / 𝑥⦌𝐵 ⊆ ⦋𝐴 / 𝑥⦌𝐶 ↔ ∀𝑦(𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐵 → 𝑦 ∈ ⦋𝐴 / 𝑥⦌𝐶))
12	8, 10, 11	3bitr4g 222	1 ⊢ (𝐴 ∈ 𝑉 → ([𝐴 / 𝑥]𝐵 ⊆ 𝐶 ↔ ⦋𝐴 / 𝑥⦌𝐵 ⊆ ⦋𝐴 / 𝑥⦌𝐶))

Syntax hints:   → wi 4   ↔ wb 104  ∀wal 1333   ∈ wcel 2128  [wsbc 2937  ⦋csb 3031   ⊆ wss 3102

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-io 699  ax-5 1427  ax-7 1428  ax-gen 1429  ax-ie1 1473  ax-ie2 1474  ax-8 1484  ax-10 1485  ax-11 1486  ax-i12 1487  ax-bndl 1489  ax-4 1490  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2139

This theorem depends on definitions:  df-bi 116  df-tru 1338  df-nf 1441  df-sb 1743  df-clab 2144  df-cleq 2150  df-clel 2153  df-nfc 2288  df-v 2714  df-sbc 2938  df-csb 3032  df-in 3108  df-ss 3115

This theorem is referenced by:  sbcrel  4675  sbcfg  5321