Theorem dprddomcld 19972

Description: If a family of subgroups is a family of subgroups for an internal direct product, then it is indexed by a set. (Contributed by AV, 13-Jul-2019.)

Hypotheses

Ref	Expression
dprddomcld.1	⊢ (𝜑 → 𝐺dom DProd 𝑆)
dprddomcld.2	⊢ (𝜑 → dom 𝑆 = 𝐼)

Assertion

Ref	Expression
dprddomcld	⊢ (𝜑 → 𝐼 ∈ V)

Proof of Theorem dprddomcld

Step	Hyp	Ref	Expression
1		dprddomcld.2	. 2 ⊢ (𝜑 → dom 𝑆 = 𝐼)
2		dprddomcld.1	. 2 ⊢ (𝜑 → 𝐺dom DProd 𝑆)
3		df-nel 3038	. . . . 5 ⊢ (dom 𝑆 ∉ V ↔ ¬ dom 𝑆 ∈ V)
4		dprddomprc 19971	. . . . 5 ⊢ (dom 𝑆 ∉ V → ¬ 𝐺dom DProd 𝑆)
5	3, 4	sylbir 235	. . . 4 ⊢ (¬ dom 𝑆 ∈ V → ¬ 𝐺dom DProd 𝑆)
6	5	con4i 114	. . 3 ⊢ (𝐺dom DProd 𝑆 → dom 𝑆 ∈ V)
7		eleq1 2825	. . 3 ⊢ (dom 𝑆 = 𝐼 → (dom 𝑆 ∈ V ↔ 𝐼 ∈ V))
8	6, 7	imbitrid 244	. 2 ⊢ (dom 𝑆 = 𝐼 → (𝐺dom DProd 𝑆 → 𝐼 ∈ V))
9	1, 2, 8	sylc 65	1 ⊢ (𝜑 → 𝐼 ∈ V)

Syntax hints:  ¬ wn 3   → wi 4   = wceq 1542   ∈ wcel 2114   ∉ wnel 3037  Vcvv 3430   class class class wbr 5086  dom cdm 5625   DProd cdprd 19964

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5232  ax-pr 5371  ax-un 7683

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-nel 3038  df-ral 3053  df-rex 3063  df-rab 3391  df-v 3432  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-br 5087  df-opab 5149  df-xp 5631  df-rel 5632  df-cnv 5633  df-dm 5635  df-rn 5636  df-oprab 7365  df-mpo 7366  df-dprd 19966

This theorem is referenced by:  dprdcntz  19979  dprddisj  19980  dprdw  19981  dprdwd  19982  dprdfid  19988  dprdfinv  19990  dprdfadd  19991  dprdfsub  19992  dprdfeq0  19993  dprdf11  19994  dprdlub  19997  dprdres  19999  dprdss  20000  dprdf1o  20003  dmdprdsplitlem  20008  dprddisj2  20010  dmdprdsplit2  20017  dpjfval  20026  dpjidcl  20029