Theorem dprdw 20052

Description: The property of being a finitely supported function in the family 𝑆. (Contributed by Mario Carneiro, 25-Apr-2016.) (Revised by AV, 11-Jul-2019.)

Hypotheses

Ref	Expression
dprdff.w	⊢ 𝑊 = {ℎ ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ∣ ℎ finSupp 0 }
dprdff.1	⊢ (𝜑 → 𝐺dom DProd 𝑆)
dprdff.2	⊢ (𝜑 → dom 𝑆 = 𝐼)

Assertion

Ref	Expression
dprdw	⊢ (𝜑 → (𝐹 ∈ 𝑊 ↔ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥) ∧ 𝐹 finSupp 0 )))

Distinct variable groups:   𝑥,ℎ,𝐹   𝑥,𝐺   ℎ,𝑖,𝐼,𝑥   0 ,ℎ   𝜑,𝑥   𝑆,ℎ,𝑖,𝑥

Allowed substitution hints:   𝜑(ℎ,𝑖)   𝐹(𝑖)   𝐺(ℎ,𝑖)   𝑊(𝑥,ℎ,𝑖)   0 (𝑥,𝑖)

Proof of Theorem dprdw

Step	Hyp	Ref	Expression
1		elex 3475	. . . . 5 ⊢ (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) → 𝐹 ∈ V)
2	1	a1i 11	. . . 4 ⊢ (𝜑 → (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) → 𝐹 ∈ V))
3		dprdff.1	. . . . . . 7 ⊢ (𝜑 → 𝐺dom DProd 𝑆)
4		dprdff.2	. . . . . . 7 ⊢ (𝜑 → dom 𝑆 = 𝐼)
5	3, 4	dprddomcld 20043	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ V)
6		fnex 7201	. . . . . . 7 ⊢ ((𝐹 Fn 𝐼 ∧ 𝐼 ∈ V) → 𝐹 ∈ V)
7	6	expcom 417	. . . . . 6 ⊢ (𝐼 ∈ V → (𝐹 Fn 𝐼 → 𝐹 ∈ V))
8	5, 7	syl 17	. . . . 5 ⊢ (𝜑 → (𝐹 Fn 𝐼 → 𝐹 ∈ V))
9	8	adantrd 495	. . . 4 ⊢ (𝜑 → ((𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥)) → 𝐹 ∈ V))
10		fveq2 6867	. . . . . . . . 9 ⊢ (𝑖 = 𝑥 → (𝑆‘𝑖) = (𝑆‘𝑥))
11	10	cbvixpv 8897	. . . . . . . 8 ⊢ X𝑖 ∈ 𝐼 (𝑆‘𝑖) = X𝑥 ∈ 𝐼 (𝑆‘𝑥)
12	11	eleq2i 2854	. . . . . . 7 ⊢ (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ↔ 𝐹 ∈ X𝑥 ∈ 𝐼 (𝑆‘𝑥))
13		elixp2 8883	. . . . . . 7 ⊢ (𝐹 ∈ X𝑥 ∈ 𝐼 (𝑆‘𝑥) ↔ (𝐹 ∈ V ∧ 𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥)))
14		3anass 1106	. . . . . . 7 ⊢ ((𝐹 ∈ V ∧ 𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥)) ↔ (𝐹 ∈ V ∧ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥))))
15	12, 13, 14	3bitri 299	. . . . . 6 ⊢ (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ↔ (𝐹 ∈ V ∧ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥))))
16	15	baib 543	. . . . 5 ⊢ (𝐹 ∈ V → (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ↔ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥))))
17	16	a1i 11	. . . 4 ⊢ (𝜑 → (𝐹 ∈ V → (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ↔ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥)))))
18	2, 9, 17	pm5.21ndd 381	. . 3 ⊢ (𝜑 → (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ↔ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥))))
19	18	anbi1d 640	. 2 ⊢ (𝜑 → ((𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ∧ 𝐹 finSupp 0 ) ↔ ((𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥)) ∧ 𝐹 finSupp 0 )))
20		breq1 5103	. . 3 ⊢ (ℎ = 𝐹 → (ℎ finSupp 0 ↔ 𝐹 finSupp 0 ))
21		dprdff.w	. . 3 ⊢ 𝑊 = {ℎ ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ∣ ℎ finSupp 0 }
22	20, 21	elrab2 3654	. 2 ⊢ (𝐹 ∈ 𝑊 ↔ (𝐹 ∈ X𝑖 ∈ 𝐼 (𝑆‘𝑖) ∧ 𝐹 finSupp 0 ))
23		df-3an 1100	. 2 ⊢ ((𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥) ∧ 𝐹 finSupp 0 ) ↔ ((𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥)) ∧ 𝐹 finSupp 0 ))
24	19, 22, 23	3bitr4g 316	1 ⊢ (𝜑 → (𝐹 ∈ 𝑊 ↔ (𝐹 Fn 𝐼 ∧ ∀𝑥 ∈ 𝐼 (𝐹‘𝑥) ∈ (𝑆‘𝑥) ∧ 𝐹 finSupp 0 )))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399   ∧ w3a 1098   = wceq 1560   ∈ wcel 2142  ∀wral 3076  {crab 3414  Vcvv 3454   class class class wbr 5100  dom cdm 5647   Fn wfn 6516  ‘cfv 6521  Xcixp 8879   finSupp cfsupp 9307   DProd cdprd 20035

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pr 5390  ax-un 7718

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3062  df-ral 3077  df-rex 3087  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-oprab 7400  df-mpo 7401  df-ixp 8880  df-dprd 20037

This theorem is referenced by:  dprdff  20054  dprdfcl  20055  dprdffsupp  20056  dprdsubg  20066