|
D.12.2.37 is_primitive_root
Procedure from library crypto.lib (see crypto_lib).
- Usage:
- is_primitive_root(primitive, mod1)
- Return:
- 1 if primitive is a primitive root modulo mod1, 0 otherwise
Example:
| LIB "crypto.lib";
is_primitive_root(3,7);
==> 1
is_primitive_root(2,7);
==> 0
|
|