fixed error in bessel_k.c : if fabs(val_new)<eps