Metamath Proof Explorer


Theorem nfcprod1

Description: Bound-variable hypothesis builder for product. (Contributed by Scott Fenton, 4-Dec-2017)

Ref Expression
Hypothesis nfcprod1.1 ⊢ Ⅎ _ k A
Assertion nfcprod1 ⊢ Ⅎ _ k ∏ k ∈ A B

Proof

Step Hyp Ref Expression
1 nfcprod1.1 ⊢ Ⅎ _ k A
2 df-prod ⊢ ∏ k ∈ A B = ι x | ∃ m ∈ ℤ A ⊆ ℤ ≥ m ∧ ∃ n ∈ ℤ ≥ m ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y ∧ seq m × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ x ∨ ∃ m ∈ ℕ ∃ f f : 1 … m ⟶ 1-1 onto A ∧ x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
3 nfcv ⊢ Ⅎ _ k ℤ
4 nfcv ⊢ Ⅎ _ k ℤ ≥ m
5 1 4 nfss ⊢ Ⅎ k A ⊆ ℤ ≥ m
6 nfv ⊢ Ⅎ k y ≠ 0
7 nfcv ⊢ Ⅎ _ k n
8 nfcv ⊢ Ⅎ _ k ×
9 nfmpt1 ⊢ Ⅎ _ k k ∈ ℤ ⟼ if k ∈ A B 1
10 7 8 9 nfseq ⊢ Ⅎ _ k seq n × k ∈ ℤ ⟼ if k ∈ A B 1
11 nfcv ⊢ Ⅎ _ k ⇝
12 nfcv ⊢ Ⅎ _ k y
13 10 11 12 nfbr ⊢ Ⅎ k seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y
14 6 13 nfan ⊢ Ⅎ k y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y
15 14 nfex ⊢ Ⅎ k ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y
16 4 15 nfrexw ⊢ Ⅎ k ∃ n ∈ ℤ ≥ m ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y
17 nfcv ⊢ Ⅎ _ k m
18 17 8 9 nfseq ⊢ Ⅎ _ k seq m × k ∈ ℤ ⟼ if k ∈ A B 1
19 nfcv ⊢ Ⅎ _ k x
20 18 11 19 nfbr ⊢ Ⅎ k seq m × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ x
21 5 16 20 nf3an ⊢ Ⅎ k A ⊆ ℤ ≥ m ∧ ∃ n ∈ ℤ ≥ m ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y ∧ seq m × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ x
22 3 21 nfrexw ⊢ Ⅎ k ∃ m ∈ ℤ A ⊆ ℤ ≥ m ∧ ∃ n ∈ ℤ ≥ m ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y ∧ seq m × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ x
23 nfcv ⊢ Ⅎ _ k ℕ
24 nfcv ⊢ Ⅎ _ k f
25 nfcv ⊢ Ⅎ _ k 1 … m
26 24 25 1 nff1o ⊢ Ⅎ k f : 1 … m ⟶ 1-1 onto A
27 nfcv ⊢ Ⅎ _ k 1
28 nfcsb1v ⊢ Ⅎ _ k ⦋ f ⁡ n / k⦌ B
29 23 28 nfmpt ⊢ Ⅎ _ k n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B
30 27 8 29 nfseq ⊢ Ⅎ _ k seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B
31 30 17 nffv ⊢ Ⅎ _ k seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
32 31 nfeq2 ⊢ Ⅎ k x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
33 26 32 nfan ⊢ Ⅎ k f : 1 … m ⟶ 1-1 onto A ∧ x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
34 33 nfex ⊢ Ⅎ k ∃ f f : 1 … m ⟶ 1-1 onto A ∧ x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
35 23 34 nfrexw ⊢ Ⅎ k ∃ m ∈ ℕ ∃ f f : 1 … m ⟶ 1-1 onto A ∧ x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
36 22 35 nfor ⊢ Ⅎ k ∃ m ∈ ℤ A ⊆ ℤ ≥ m ∧ ∃ n ∈ ℤ ≥ m ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y ∧ seq m × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ x ∨ ∃ m ∈ ℕ ∃ f f : 1 … m ⟶ 1-1 onto A ∧ x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
37 36 nfiotaw ⊢ Ⅎ _ k ι x | ∃ m ∈ ℤ A ⊆ ℤ ≥ m ∧ ∃ n ∈ ℤ ≥ m ∃ y y ≠ 0 ∧ seq n × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ y ∧ seq m × k ∈ ℤ ⟼ if k ∈ A B 1 ⇝ x ∨ ∃ m ∈ ℕ ∃ f f : 1 … m ⟶ 1-1 onto A ∧ x = seq 1 × n ∈ ℕ ⟼ ⦋ f ⁡ n / k⦌ B ⁡ m
38 2 37 nfcxfr ⊢ Ⅎ _ k ∏ k ∈ A B