|  |  D.12.3.36 find_first_primitive_root Procedure from librarycrypto.lib(see  crypto_lib).
 
Example:Usage:
find_first_primitive_root(mod1)
Return:
First primitive root modulo mod1, 0 if no root can be found.
 |  | LIB "crypto.lib";
ring r = 0,x,lp;
find_first_primitive_root(7);
==> 3
find_first_primitive_root(557);
==> 2
 | 
 
 |