Macaulay2 Engine
Loading...
Searching...
No Matches

◆ findPrimitiveRoot()

int M2::ARingZZp::findPrimitiveRoot ( int P)
static

Definition at line 7 of file aring-zzp.cpp.

8{
9 int i, j, q;
10
11 int prim_root;
12 if (P == 2)
13 prim_root = 1;
14 else
15 {
16 j = 1;
17 for (i = 2; (i < P && j < P - 1); i++)
18 for (q = i, j = 1; (q != 1 && j < P); q = (q * i) % P, j++)
19 ;
20 prim_root = i - 1;
21 }
22 return prim_root;
23}

References prim_root.

Referenced by initialize_tables().