Function RSqrt

externalpackages/PVODE/source/llnlmath.cpp:62–67

real RSqrt(real x)
{
  if (x <= ZERO) return(ZERO);

  return((real) sqrt((double) x));
}

}