richard_stanton
05-21-2005, 08:00 PM
In QROMB.C is the code:
if (j >= K) {
polint(&h[j-K],&s[j-K],K,0.0,&ss,&dss);
if (fabs(dss) <= EPS*fabs(ss)) return ss;
}
If j equals K, the first argument of polint will point to h[0], which has not been set to anything.
if (j >= K) {
polint(&h[j-K],&s[j-K],K,0.0,&ss,&dss);
if (fabs(dss) <= EPS*fabs(ss)) return ss;
}
If j equals K, the first argument of polint will point to h[0], which has not been set to anything.