FUNCTION : ETA[vp] - p-adic order of integer CALLING SEQUENCE : vp(n,p) PARAMETERS : n - integer p - prime GLOBAL VARIABLES : SYNOPSIS : p-adic order of integer n EXAMPLES : DISCUSSION : SEE ALSO :