gausslemma2dlem1 - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > gausslemma2dlem1		GIF version

Theorem gausslemma2dlem1 15388

Description: Lemma 1 for gausslemma2d 15396. (Contributed by AV, 5-Jul-2021.)

**Hypotheses**
Ref	Expression
gausslemma2d.p	⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
gausslemma2d.h	⊢ 𝐻 = ((𝑃 − 1) / 2)
gausslemma2d.r	⊢ 𝑅 = (𝑥 ∈ (1...𝐻) ↦ if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))

**Assertion**
Ref	Expression
gausslemma2dlem1	⊢ (𝜑 → (!‘𝐻) = ∏𝑘 ∈ (1...𝐻)(𝑅‘𝑘))

Distinct variable groups: 𝑥,𝐻 𝑥,𝑃 𝜑,𝑥 𝑘,𝐻 𝑅,𝑘 𝜑,𝑘 Allowed substitution hints: 𝑃(𝑘) 𝑅(𝑥)

Proof of Theorem gausslemma2dlem1 Dummy variable 𝑙 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		gausslemma2d.p	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
2		gausslemma2d.h	. . . . 5 ⊢ 𝐻 = ((𝑃 − 1) / 2)
3	1, 2	gausslemma2dlem0b 15377	. . . 4 ⊢ (𝜑 → 𝐻 ∈ ℕ)
4	3	nnnn0d 9321	. . 3 ⊢ (𝜑 → 𝐻 ∈ ℕ₀)
5		fprodfac 11799	. . 3 ⊢ (𝐻 ∈ ℕ₀ → (!‘𝐻) = ∏𝑙 ∈ (1...𝐻)𝑙)
6	4, 5	syl 14	. 2 ⊢ (𝜑 → (!‘𝐻) = ∏𝑙 ∈ (1...𝐻)𝑙)
7		id 19	. . 3 ⊢ (𝑙 = (𝑅‘𝑘) → 𝑙 = (𝑅‘𝑘))
8		1zzd 9372	. . . 4 ⊢ (𝜑 → 1 ∈ ℤ)
9	3	nnzd 9466	. . . 4 ⊢ (𝜑 → 𝐻 ∈ ℤ)
10	8, 9	fzfigd 10542	. . 3 ⊢ (𝜑 → (1...𝐻) ∈ Fin)
11		gausslemma2d.r	. . . 4 ⊢ 𝑅 = (𝑥 ∈ (1...𝐻) ↦ if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))
12	1, 2, 11	gausslemma2dlem1f1o 15387	. . 3 ⊢ (𝜑 → 𝑅:(1...𝐻)–1-1-onto→(1...𝐻))
13		eqidd 2197	. . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...𝐻)) → (𝑅‘𝑘) = (𝑅‘𝑘))
14		elfzelz 10119	. . . . 5 ⊢ (𝑙 ∈ (1...𝐻) → 𝑙 ∈ ℤ)
15	14	zcnd 9468	. . . 4 ⊢ (𝑙 ∈ (1...𝐻) → 𝑙 ∈ ℂ)
16	15	adantl 277	. . 3 ⊢ ((𝜑 ∧ 𝑙 ∈ (1...𝐻)) → 𝑙 ∈ ℂ)
17	7, 10, 12, 13, 16	fprodf1o 11772	. 2 ⊢ (𝜑 → ∏𝑙 ∈ (1...𝐻)𝑙 = ∏𝑘 ∈ (1...𝐻)(𝑅‘𝑘))
18	6, 17	eqtrd 2229	1 ⊢ (𝜑 → (!‘𝐻) = ∏𝑘 ∈ (1...𝐻)(𝑅‘𝑘))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 104 = wceq 1364 ∈ wcel 2167 ∖ cdif 3154 ifcif 3562 {csn 3623 class class class wbr 4034 ↦ cmpt 4095 ‘cfv 5259 (class class class)co 5925 ℂcc 7896 1c1 7899 · cmul 7903 < clt 8080 − cmin 8216 / cdiv 8718 2c2 9060 ℕ₀cn0 9268 ...cfz 10102 !cfa 10836 ∏cprod 11734 ℙcprime 12302

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 615 ax-in2 616 ax-io 710 ax-5 1461 ax-7 1462 ax-gen 1463 ax-ie1 1507 ax-ie2 1508 ax-8 1518 ax-10 1519 ax-11 1520 ax-i12 1521 ax-bndl 1523 ax-4 1524 ax-17 1540 ax-i9 1544 ax-ial 1548 ax-i5r 1549 ax-13 2169 ax-14 2170 ax-ext 2178 ax-coll 4149 ax-sep 4152 ax-nul 4160 ax-pow 4208 ax-pr 4243 ax-un 4469 ax-setind 4574 ax-iinf 4625 ax-cnex 7989 ax-resscn 7990 ax-1cn 7991 ax-1re 7992 ax-icn 7993 ax-addcl 7994 ax-addrcl 7995 ax-mulcl 7996 ax-mulrcl 7997 ax-addcom 7998 ax-mulcom 7999 ax-addass 8000 ax-mulass 8001 ax-distr 8002 ax-i2m1 8003 ax-0lt1 8004 ax-1rid 8005 ax-0id 8006 ax-rnegex 8007 ax-precex 8008 ax-cnre 8009 ax-pre-ltirr 8010 ax-pre-ltwlin 8011 ax-pre-lttrn 8012 ax-pre-apti 8013 ax-pre-ltadd 8014 ax-pre-mulgt0 8015 ax-pre-mulext 8016 ax-arch 8017 ax-caucvg 8018

This theorem depends on definitions: df-bi 117 df-dc 836 df-3or 981 df-3an 982 df-tru 1367 df-fal 1370 df-xor 1387 df-nf 1475 df-sb 1777 df-eu 2048 df-mo 2049 df-clab 2183 df-cleq 2189 df-clel 2192 df-nfc 2328 df-ne 2368 df-nel 2463 df-ral 2480 df-rex 2481 df-reu 2482 df-rmo 2483 df-rab 2484 df-v 2765 df-sbc 2990 df-csb 3085 df-dif 3159 df-un 3161 df-in 3163 df-ss 3170 df-nul 3452 df-if 3563 df-pw 3608 df-sn 3629 df-pr 3630 df-op 3632 df-uni 3841 df-int 3876 df-iun 3919 df-br 4035 df-opab 4096 df-mpt 4097 df-tr 4133 df-id 4329 df-po 4332 df-iso 4333 df-iord 4402 df-on 4404 df-ilim 4405 df-suc 4407 df-iom 4628 df-xp 4670 df-rel 4671 df-cnv 4672 df-co 4673 df-dm 4674 df-rn 4675 df-res 4676 df-ima 4677 df-iota 5220 df-fun 5261 df-fn 5262 df-f 5263 df-f1 5264 df-fo 5265 df-f1o 5266 df-fv 5267 df-isom 5268 df-riota 5880 df-ov 5928 df-oprab 5929 df-mpo 5930 df-1st 6207 df-2nd 6208 df-recs 6372 df-irdg 6437 df-frec 6458 df-1o 6483 df-2o 6484 df-oadd 6487 df-er 6601 df-en 6809 df-dom 6810 df-fin 6811 df-pnf 8082 df-mnf 8083 df-xr 8084 df-ltxr 8085 df-le 8086 df-sub 8218 df-neg 8219 df-reap 8621 df-ap 8628 df-div 8719 df-inn 9010 df-2 9068 df-3 9069 df-4 9070 df-n0 9269 df-z 9346 df-uz 9621 df-q 9713 df-rp 9748 df-ioo 9986 df-fz 10103 df-fzo 10237 df-fl 10379 df-mod 10434 df-seqfrec 10559 df-exp 10650 df-fac 10837 df-ihash 10887 df-cj 11026 df-re 11027 df-im 11028 df-rsqrt 11182 df-abs 11183 df-clim 11463 df-proddc 11735 df-dvds 11972 df-prm 12303

This theorem is referenced by: gausslemma2dlem4 15391

W3C validator