D.12.1.5 euler

Usage:

euler(r);

Return:

bigint phi(r), where phi is Eulers phi-function

Note:

first r is factorized with proc PollardRho, then phi(r) is calculated with the help of phi(p) of every factor p;

LIB "aksaka.lib";
euler(99991);
==> 99990