2610 KM=INT(LOG(N)*(1!/.69314728#)+.00001)