define f(x) {
auto n
n= sqrt(x)
while( n > 1 ) {
if(x % n == 0) return( n )
n = n - 1
}
return(1)
}
/* f(x) returns the largest divisor of x less than sqrt(x) */