ftp.nice.ch/pub/next/unix/audio/cmix.s.tar.gz#/cmix/lpc/adjust.c

This is adjust.c in view mode; [Download] [Up]

adjust(actdev,desdev,actweight,pchval,framefirst,framelast)
float actdev,desdev,actweight,*pchval,framefirst,framelast;
{
	int i,j;
	float x,devfact;
/* two heuristics here: only shrinking range, and no pitches < 50 hz */
	devfact = (desdev > actdev) ? actdev : desdev/actdev;
	for(j=0,i=(int)framefirst; i<=(int)framelast; i++,j++) {
		x = (pchval[j]-actweight) * devfact + actweight;
		pchval[j] = (x >50) ? x : pchval[j];
	}
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.