Theorem fincygsubgodd 20185

Description: Calculate the order of a subgroup of a finite cyclic group. (Contributed by Rohan Ridenour, 3-Aug-2023.)

Hypotheses

Ref	Expression
fincygsubgodd.1	⊢ 𝐵 = (Base‘𝐺)
fincygsubgodd.2	⊢ · = (.g‘𝐺)
fincygsubgodd.3	⊢ 𝐷 = ((♯‘𝐵) / 𝐶)
fincygsubgodd.4	⊢ 𝐹 = (𝑛 ∈ ℤ ↦ (𝑛 · 𝐴))
fincygsubgodd.5	⊢ 𝐻 = (𝑛 ∈ ℤ ↦ (𝑛 · (𝐶 · 𝐴)))
fincygsubgodd.6	⊢ (𝜑 → 𝐺 ∈ Grp)
fincygsubgodd.7	⊢ (𝜑 → 𝐴 ∈ 𝐵)
fincygsubgodd.8	⊢ (𝜑 → ran 𝐹 = 𝐵)
fincygsubgodd.9	⊢ (𝜑 → 𝐶 ∥ (♯‘𝐵))
fincygsubgodd.10	⊢ (𝜑 → 𝐵 ∈ Fin)
fincygsubgodd.11	⊢ (𝜑 → 𝐶 ∈ ℕ)

Assertion

Ref	Expression
fincygsubgodd	⊢ (𝜑 → (♯‘ran 𝐻) = 𝐷)

Distinct variable groups:   · ,𝑛   𝐴,𝑛   𝐵,𝑛   𝐶,𝑛   𝑛,𝐺

Allowed substitution hints:   𝜑(𝑛)   𝐷(𝑛)   𝐹(𝑛)   𝐻(𝑛)

Proof of Theorem fincygsubgodd

Step	Hyp	Ref	Expression
1		fincygsubgodd.3	. . 3 ⊢ 𝐷 = ((♯‘𝐵) / 𝐶)
2		fincygsubgodd.1	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐺)
3		fincygsubgodd.2	. . . . . . 7 ⊢ · = (.g‘𝐺)
4		eqid 2763	. . . . . . 7 ⊢ (od‘𝐺) = (od‘𝐺)
5		fincygsubgodd.6	. . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ Grp)
6		fincygsubgodd.7	. . . . . . 7 ⊢ (𝜑 → 𝐴 ∈ 𝐵)
7		fincygsubgodd.8	. . . . . . . 8 ⊢ (𝜑 → ran 𝐹 = 𝐵)
8		fincygsubgodd.4	. . . . . . . . 9 ⊢ 𝐹 = (𝑛 ∈ ℤ ↦ (𝑛 · 𝐴))
9	8	rneqi 5929	. . . . . . . 8 ⊢ ran 𝐹 = ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝐴))
10	7, 9	eqtr3di 2813	. . . . . . 7 ⊢ (𝜑 → 𝐵 = ran (𝑛 ∈ ℤ ↦ (𝑛 · 𝐴)))
11	2, 3, 4, 5, 6, 10	cycsubggenodd 20182	. . . . . 6 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) = if(𝐵 ∈ Fin, (♯‘𝐵), 0))
12		fincygsubgodd.10	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ Fin)
13	12	iftrued 4496	. . . . . 6 ⊢ (𝜑 → if(𝐵 ∈ Fin, (♯‘𝐵), 0) = (♯‘𝐵))
14	11, 13	eqtrd 2798	. . . . 5 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) = (♯‘𝐵))
15	14	oveq1d 7427	. . . 4 ⊢ (𝜑 → (((od‘𝐺)‘𝐴) / 𝐶) = ((♯‘𝐵) / 𝐶))
16		fincygsubgodd.11	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ∈ ℕ)
17	16	nnzd 12618	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ℤ)
18	2, 4, 3	odmulg 19627	. . . . . . 7 ⊢ ((𝐺 ∈ Grp ∧ 𝐴 ∈ 𝐵 ∧ 𝐶 ∈ ℤ) → ((od‘𝐺)‘𝐴) = ((𝐶 gcd ((od‘𝐺)‘𝐴)) · ((od‘𝐺)‘(𝐶 · 𝐴))))
19	5, 6, 17, 18	syl3anc 1398	. . . . . 6 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) = ((𝐶 gcd ((od‘𝐺)‘𝐴)) · ((od‘𝐺)‘(𝐶 · 𝐴))))
20	2, 4	odcl 19607	. . . . . . . . 9 ⊢ (𝐴 ∈ 𝐵 → ((od‘𝐺)‘𝐴) ∈ ℕ0)
21		nn0z 12616	. . . . . . . . 9 ⊢ (((od‘𝐺)‘𝐴) ∈ ℕ0 → ((od‘𝐺)‘𝐴) ∈ ℤ)
22	6, 20, 21	3syl 19	. . . . . . . 8 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) ∈ ℤ)
23		fincygsubgodd.9	. . . . . . . . 9 ⊢ (𝜑 → 𝐶 ∥ (♯‘𝐵))
24	23, 14	breqtrrd 5140	. . . . . . . 8 ⊢ (𝜑 → 𝐶 ∥ ((od‘𝐺)‘𝐴))
25	16, 22, 24	dvdsgcdidd 16596	. . . . . . 7 ⊢ (𝜑 → (𝐶 gcd ((od‘𝐺)‘𝐴)) = 𝐶)
26	25	oveq1d 7427	. . . . . 6 ⊢ (𝜑 → ((𝐶 gcd ((od‘𝐺)‘𝐴)) · ((od‘𝐺)‘(𝐶 · 𝐴))) = (𝐶 · ((od‘𝐺)‘(𝐶 · 𝐴))))
27	19, 26	eqtrd 2798	. . . . 5 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) = (𝐶 · ((od‘𝐺)‘(𝐶 · 𝐴))))
28	2, 4, 6	odcld 19623	. . . . . . 7 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) ∈ ℕ0)
29	28	nn0cnd 12568	. . . . . 6 ⊢ (𝜑 → ((od‘𝐺)‘𝐴) ∈ ℂ)
30	2, 3, 5, 17, 6	mulgcld 19163	. . . . . . . 8 ⊢ (𝜑 → (𝐶 · 𝐴) ∈ 𝐵)
31	2, 4, 30	odcld 19623	. . . . . . 7 ⊢ (𝜑 → ((od‘𝐺)‘(𝐶 · 𝐴)) ∈ ℕ0)
32	31	nn0cnd 12568	. . . . . 6 ⊢ (𝜑 → ((od‘𝐺)‘(𝐶 · 𝐴)) ∈ ℂ)
33	17	zcnd 12702	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℂ)
34	16	nnne0d 12287	. . . . . 6 ⊢ (𝜑 → 𝐶 ≠ 0)
35	29, 32, 33, 34	divmul2d 12025	. . . . 5 ⊢ (𝜑 → ((((od‘𝐺)‘𝐴) / 𝐶) = ((od‘𝐺)‘(𝐶 · 𝐴)) ↔ ((od‘𝐺)‘𝐴) = (𝐶 · ((od‘𝐺)‘(𝐶 · 𝐴)))))
36	27, 35	mpbird 260	. . . 4 ⊢ (𝜑 → (((od‘𝐺)‘𝐴) / 𝐶) = ((od‘𝐺)‘(𝐶 · 𝐴)))
37	15, 36	eqtr3d 2800	. . 3 ⊢ (𝜑 → ((♯‘𝐵) / 𝐶) = ((od‘𝐺)‘(𝐶 · 𝐴)))
38	1, 37	eqtrid 2810	. 2 ⊢ (𝜑 → 𝐷 = ((od‘𝐺)‘(𝐶 · 𝐴)))
39		fincygsubgodd.5	. . . . 5 ⊢ 𝐻 = (𝑛 ∈ ℤ ↦ (𝑛 · (𝐶 · 𝐴)))
40	39	rneqi 5929	. . . 4 ⊢ ran 𝐻 = ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝐶 · 𝐴)))
41	40	a1i 11	. . 3 ⊢ (𝜑 → ran 𝐻 = ran (𝑛 ∈ ℤ ↦ (𝑛 · (𝐶 · 𝐴))))
42	2, 3, 4, 5, 30, 41	cycsubggenodd 20182	. 2 ⊢ (𝜑 → ((od‘𝐺)‘(𝐶 · 𝐴)) = if(ran 𝐻 ∈ Fin, (♯‘ran 𝐻), 0))
43	38, 42	eqtrd 2798	. . . . 5 ⊢ (𝜑 → 𝐷 = if(ran 𝐻 ∈ Fin, (♯‘ran 𝐻), 0))
44		iffalse 4497	. . . . 5 ⊢ (¬ ran 𝐻 ∈ Fin → if(ran 𝐻 ∈ Fin, (♯‘ran 𝐻), 0) = 0)
45	43, 44	sylan9eq 2818	. . . 4 ⊢ ((𝜑 ∧ ¬ ran 𝐻 ∈ Fin) → 𝐷 = 0)
46	1	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐷 = ((♯‘𝐵) / 𝐶))
47		hashcl 14394	. . . . . . . . 9 ⊢ (𝐵 ∈ Fin → (♯‘𝐵) ∈ ℕ0)
48		nn0cn 12515	. . . . . . . . 9 ⊢ ((♯‘𝐵) ∈ ℕ0 → (♯‘𝐵) ∈ ℂ)
49	12, 47, 48	3syl 19	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝐵) ∈ ℂ)
50	6, 12	hashelne0d 14406	. . . . . . . . 9 ⊢ (𝜑 → ¬ (♯‘𝐵) = 0)
51	50	neqned 2965	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝐵) ≠ 0)
52	49, 33, 51, 34	divne0d 12008	. . . . . . 7 ⊢ (𝜑 → ((♯‘𝐵) / 𝐶) ≠ 0)
53	46, 52	eqnetrd 3025	. . . . . 6 ⊢ (𝜑 → 𝐷 ≠ 0)
54	53	neneqd 2963	. . . . 5 ⊢ (𝜑 → ¬ 𝐷 = 0)
55	54	adantr 485	. . . 4 ⊢ ((𝜑 ∧ ¬ ran 𝐻 ∈ Fin) → ¬ 𝐷 = 0)
56	45, 55	condan 829	. . 3 ⊢ (𝜑 → ran 𝐻 ∈ Fin)
57	56	iftrued 4496	. 2 ⊢ (𝜑 → if(ran 𝐻 ∈ Fin, (♯‘ran 𝐻), 0) = (♯‘ran 𝐻))
58	38, 42, 57	3eqtrrd 2803	1 ⊢ (𝜑 → (♯‘ran 𝐻) = 𝐷)

Syntax hints:  ¬ wn 3   → wi 4   = wceq 1570   ∈ wcel 2143  ifcif 4488   class class class wbr 5110   ↦ cmpt 5193  ran crn 5664  ‘cfv 6538  (class class class)co 7412  Fincfn 8944  ℂcc 11099  0cc0 11101   · cmul 11106   / cdiv 11872  ℕcn 12234  ℕ₀cn0 12505  ℤcz 12592  ♯chash 14368   ∥ cdvds 16311   gcd cgcd 16553  Basecbs 17270  Grpcgrp 19001  ._gcmg 19134  odcod 19595

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-inf2 9611  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178  ax-pre-sup 11179

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-oadd 8458  df-omul 8459  df-er 8695  df-map 8827  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-sup 9403  df-inf 9404  df-oi 9473  df-card 9926  df-acn 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-div 11873  df-nn 12235  df-2 12304  df-3 12305  df-n0 12506  df-z 12593  df-uz 12864  df-rp 13018  df-fz 13537  df-fl 13827  df-mod 13905  df-seq 14040  df-exp 14100  df-hash 14369  df-cj 15152  df-re 15153  df-im 15154  df-sqrt 15288  df-abs 15289  df-dvds 16312  df-gcd 16554  df-0g 17495  df-mgm 18699  df-sgrp 18778  df-mnd 18794  df-grp 19004  df-minusg 19005  df-sbg 19006  df-mulg 19135  df-od 19599

This theorem is referenced by:  fincygsubgodexd  20186