This is wshape.c in view mode; [Download] [Up]
float wshape(x,f,len)
float x,*f;
int len;
{
/* use function f as static transfer function from x to returned value*/
int i1;
float x1, diff;
x1=(x+1)*(float)((len-1)/2.);
i1=x1;
diff=(float)(x1-i1);
return(*(f+i1)+(*(f+i1+1)-*(f+i1))*diff);
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.