This is logist.c in view mode; [Download] [Up]
#include <math.h>
double logist(rfun, alpha, beta)
double (*rfun)();
double alpha, beta;
{
register double rtn, x;
rtn = (-beta - log(1.0/(*rfun)(0.0,1.0) - 1.0)) / alpha;
return(rtn);
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.