#include "../H/ugens.h"
#include "../H/combs.h"
#include <math.h>

float loopt[6] = {.0297,.0371,.0411,.0437,.005,.0017};
float alprvt[2] = {.096835,.032924};

/* storage reqs for above are .1583*SR+18 */

rvbset(rvt,init,a)
float rvt,*a;
{
	float rvbtime,*apoint;
	int i;

	for(apoint=a, i=0; i<NCOMBS; i++) {
		rvbtime = (i<(NCOMBS-2)) ? rvt : alprvt[i-(NCOMBS-2)];
		combset(loopt[i],rvbtime,init,apoint);
		apoint += (int)*apoint;
	}
}