sound.frag

// ShaderTracker: Ridiculous shader summation sound engine
// Engine / Function Builder by Michael Moffitt (https://github.com/mikejmoffitt)
// Sound Generation Functions by Gerard Geer (https://github.com/gerard-geer)
// Waveform definitions

float saw(float t, float f, float a)
{
	return ((mod(t*0.5*f*0.31830989, 1.0)*2.0)-1.0)*a;
}

float sqr(float t, float f, float duty, float a)
{
	return step(duty, abs(saw(t,f * 0.5,1.0)))*a;
}

float tri(float t, float f, float a)
{
	return (((floor(abs(saw(t,f * 0.5,a))*16.0)*0.0625)*2.0)-1.0)*a;
}

float sine(float t, float f, float a)
{
	return sin(t*f)*a;
}

float noise(float t, float f, float a)
{
	return ((fract(sin(dot(vec2(t,f),vec2(12.9898,78.233)))*43758.5453)*2.0)-1.0)*a;
}

float l_decay(float t, float s, float l)
{
	return clamp(1.0-((t-s)/l), 0.0, 1.0);
}

float glissando_r(float t0)
{
	if (t0 >= 38.400002 && t0 < 38.411003) 
	{ 
		return  l_decay(t0, 38.400002, 0.080000) * sqr(t0, 9851.914062, 0.500000, 0.200000);
	}
	if (t0 >= 38.450001 && t0 < 38.461002) 
	{ 
		return  l_decay(t0, 38.450001, 0.080000) * sqr(t0, 8777.056641, 0.500000, 0.033000);
	}
	if (t0 >= 38.500000 && t0 < 38.511002) 
	{ 
		return  l_decay(t0, 38.500000, 0.080000) * sqr(t0, 8284.435547, 0.500000, 0.055000);
	}
	if (t0 >= 38.549999 && t0 < 38.561001) 
	{ 
		return  l_decay(t0, 38.549999, 0.080000) * sqr(t0, 7380.601562, 0.500000, 0.077000);
	}
	if (t0 >= 38.599998 && t0 < 38.611000) 
	{ 
		return  l_decay(t0, 38.599998, 0.080000) * sqr(t0, 6575.368652, 0.500000, 0.092000);
	}
	if (t0 >= 38.649998 && t0 < 38.660999) 
	{ 
		return  l_decay(t0, 38.649998, 0.080000) * sqr(t0, 6206.319336, 0.500000, 0.108000);
	}
	if (t0 >= 38.699997 && t0 < 38.710999) 
	{ 
		return  l_decay(t0, 38.699997, 0.080000) * sqr(t0, 5529.203125, 0.500000, 0.123000);
	}
	if (t0 >= 38.749996 && t0 < 38.760998) 
	{ 
		return  l_decay(t0, 38.749996, 0.080000) * sqr(t0, 4925.957031, 0.500000, 0.139000);
	}
	if (t0 >= 38.799995 && t0 < 38.810997) 
	{ 
		return  l_decay(t0, 38.799995, 0.080000) * sqr(t0, 4388.528320, 0.500000, 0.154000);
	}
	if (t0 >= 38.849995 && t0 < 38.860996) 
	{ 
		return  l_decay(t0, 38.849995, 0.080000) * sqr(t0, 4142.217773, 0.500000, 0.160000);
	}
	if (t0 >= 38.899994 && t0 < 38.910995) 
	{ 
		return l_decay(t0, 38.899994, 0.080000) * sqr(t0, 3690.300781, 0.500000, 0.180000);
	}
	if (t0 >= 38.949993 && t0 < 38.960995) 
	{ 
		return l_decay(t0, 38.949993, 0.080000) * sqr(t0, 3287.684326, 0.500000, 0.200000);
	}
    return 0.0;
}

float glissando_l(float t0)
{
	if (t0 >= 38.400002 && t0 < 38.500000) 
	{ 
		return l_decay(t0, 38.400002, 0.080000) * sqr(t0, 9851.914062, 0.500000, 0.200000);
	}
	if (t0 >= 38.450001 && t0 < 38.549999) 
	{ 
		return l_decay(t0, 38.450001, 0.080000) * sqr(t0, 8777.056641, 0.500000, 0.180000);
	}
	if (t0 >= 38.500000 && t0 < 38.599998) 
	{ 
		return l_decay(t0, 38.500000, 0.080000) * sqr(t0, 8284.435547, 0.500000, 0.160000);
	}
	if (t0 >= 38.549999 && t0 < 38.649998) 
	{ 
		return l_decay(t0, 38.549999, 0.080000) * sqr(t0, 7380.601562, 0.500000, 0.154000);
	}
	if (t0 >= 38.599998 && t0 < 38.699997) 
	{ 
		return l_decay(t0, 38.599998, 0.080000) * sqr(t0, 6575.368652, 0.500000, 0.139000);
	}
	if (t0 >= 38.649998 && t0 < 38.749996) 
	{ 
		return l_decay(t0, 38.649998, 0.080000) * sqr(t0, 6206.319336, 0.500000, 0.123000);
	}
	if (t0 >= 38.699997 && t0 < 38.799995) 
	{ 
		return l_decay(t0, 38.699997, 0.080000) * sqr(t0, 5529.203125, 0.500000, 0.108000);
	}
	if (t0 >= 38.749996 && t0 < 38.849995) 
	{ 
		return l_decay(t0, 38.749996, 0.080000) * sqr(t0, 4925.957031, 0.500000, 0.092000);
	}
	if (t0 >= 38.799995 && t0 < 38.899994) 
	{ 
		return l_decay(t0, 38.799995, 0.080000) * sqr(t0, 4388.528320, 0.500000, 0.077000);
	}
	if (t0 >= 38.849995 && t0 < 38.949993) 
	{ 
		return l_decay(t0, 38.849995, 0.080000) * sqr(t0, 4142.217773, 0.500000, 0.055000);
	}
	if (t0 >= 38.899994 && t0 < 38.999992) 
	{ 
		return l_decay(t0, 38.899994, 0.080000) * sqr(t0, 3690.300781, 0.500000, 0.033000);
	}
	if (t0 >= 38.949993 && t0 < 39.049992) 
	{ 
		return l_decay(t0, 38.949993, 0.080000) * sqr(t0, 3287.684326, 0.500000, 0.011000);
	}
}

float abacking(float t0)
{
    float result = 0.0;
	if (t0 >= 0.000000 && t0 < 0.150000) 
	{ 
		result += l_decay(t0, 0.000000, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 0.450000 && t0 < 0.600000) 
	{ 
		result += l_decay(t0, 0.450000, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 0.750000 && t0 < 0.900000) 
	{ 
		result += l_decay(t0, 0.750000, 0.100000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 0.900000 && t0 < 1.050000) 
	{ 
		result += l_decay(t0, 0.900000, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 1.050000 && t0 < 1.200000) 
	{ 
		result += l_decay(t0, 1.050000, 0.100000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 1.200000 && t0 < 1.350000) 
	{ 
		result += l_decay(t0, 1.200000, 0.100000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 1.500000 && t0 < 1.650000) 
	{ 
		result += l_decay(t0, 1.500000, 0.100000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 1.800000 && t0 < 1.950000) 
	{ 
		result += l_decay(t0, 1.800000, 0.100000) * sqr(t0, 9298.973633, 0.500000, 0.250000);
	}
	if (t0 >= 2.100000 && t0 < 2.250000) 
	{ 
		result += l_decay(t0, 2.100000, 0.100000) * sqr(t0, 9298.973633, 0.500000, 0.250000);
	}
	if (t0 >= 2.400000 && t0 < 2.550000) 
	{ 
		result += l_decay(t0, 2.400000, 0.100000) * sqr(t0, 9851.914062, 0.500000, 0.250000);
	}
	if (t0 >= 2.850000 && t0 < 3.000000) 
	{ 
		result += l_decay(t0, 2.850000, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 3.150001 && t0 < 3.300001) 
	{ 
		result += l_decay(t0, 3.150001, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 3.300001 && t0 < 3.450001) 
	{ 
		result += l_decay(t0, 3.300001, 0.100000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 3.450001 && t0 < 3.600001) 
	{ 
		result += l_decay(t0, 3.450001, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 3.600001 && t0 < 3.750001) 
	{ 
		result += l_decay(t0, 3.600001, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 3.900001 && t0 < 4.050001) 
	{ 
		result += l_decay(t0, 3.900001, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 4.200001 && t0 < 4.350001) 
	{ 
		result += l_decay(t0, 4.200001, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 4.500001 && t0 < 4.650002) 
	{ 
		result += l_decay(t0, 4.500001, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 4.800002 && t0 < 4.950002) 
	{ 
		result += l_decay(t0, 4.800002, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 5.250002 && t0 < 5.400002) 
	{ 
		result += l_decay(t0, 5.250002, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 5.550002 && t0 < 5.700002) 
	{ 
		result += l_decay(t0, 5.550002, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 5.700002 && t0 < 5.850002) 
	{ 
		result += l_decay(t0, 5.700002, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 5.850002 && t0 < 6.000002) 
	{ 
		result += l_decay(t0, 5.850002, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 6.000002 && t0 < 6.150002) 
	{ 
		result += l_decay(t0, 6.000002, 0.100000) * sqr(t0, 4649.486816, 0.500000, 0.250000);
	}
	if (t0 >= 6.300003 && t0 < 6.450003) 
	{ 
		result += l_decay(t0, 6.300003, 0.100000) * sqr(t0, 4649.486816, 0.500000, 0.250000);
	}
	if (t0 >= 6.600003 && t0 < 6.750003) 
	{ 
		result += l_decay(t0, 6.600003, 0.100000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 6.900003 && t0 < 7.050003) 
	{ 
		result += l_decay(t0, 6.900003, 0.100000) * sqr(t0, 4649.486816, 0.500000, 0.250000);
	}
	if (t0 >= 7.200003 && t0 < 7.750003) 
	{ 
		result += l_decay(t0, 7.200003, 0.600000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 7.800004 && t0 < 8.350003) 
	{ 
		result += l_decay(t0, 7.800004, 0.600000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 8.400002 && t0 < 8.950003) 
	{ 
		result += l_decay(t0, 8.400002, 0.600000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 9.000001 && t0 < 9.550001) 
	{ 
		result += l_decay(t0, 9.000001, 0.600000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}
	if (t0 >= 9.599999 && t0 < 9.749999) 
	{ 
		result += l_decay(t0, 9.599999, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 10.049998 && t0 < 10.199998) 
	{ 
		result += l_decay(t0, 10.049998, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 10.349998 && t0 < 10.499997) 
	{ 
		result += l_decay(t0, 10.349998, 0.100000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 10.499997 && t0 < 10.649997) 
	{ 
		result += l_decay(t0, 10.499997, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 10.649997 && t0 < 10.799996) 
	{ 
		result += l_decay(t0, 10.649997, 0.100000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 10.799996 && t0 < 10.949996) 
	{ 
		result += l_decay(t0, 10.799996, 0.100000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 11.099996 && t0 < 11.249995) 
	{ 
		result += l_decay(t0, 11.099996, 0.100000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 11.399995 && t0 < 11.549994) 
	{ 
		result += l_decay(t0, 11.399995, 0.100000) * sqr(t0, 9298.973633, 0.500000, 0.250000);
	}
	if (t0 >= 11.699994 && t0 < 11.849994) 
	{ 
		result += l_decay(t0, 11.699994, 0.100000) * sqr(t0, 9298.973633, 0.500000, 0.250000);
	}
	if (t0 >= 11.999993 && t0 < 12.149993) 
	{ 
		result += l_decay(t0, 11.999993, 0.100000) * sqr(t0, 9851.914062, 0.500000, 0.250000);
	}
	if (t0 >= 12.449992 && t0 < 12.599992) 
	{ 
		result += l_decay(t0, 12.449992, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 12.749991 && t0 < 12.899991) 
	{ 
		result += l_decay(t0, 12.749991, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 12.899991 && t0 < 13.049991) 
	{ 
		result += l_decay(t0, 12.899991, 0.100000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 13.049991 && t0 < 13.199990) 
	{ 
		result += l_decay(t0, 13.049991, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 13.199990 && t0 < 13.349990) 
	{ 
		result += l_decay(t0, 13.199990, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 13.499990 && t0 < 13.649989) 
	{ 
		result += l_decay(t0, 13.499990, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 13.799989 && t0 < 13.949988) 
	{ 
		result += l_decay(t0, 13.799989, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 14.099988 && t0 < 14.249988) 
	{ 
		result += l_decay(t0, 14.099988, 0.100000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 14.399987 && t0 < 14.549987) 
	{ 
		result += l_decay(t0, 14.399987, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 14.849986 && t0 < 14.999986) 
	{ 
		result += l_decay(t0, 14.849986, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 15.149985 && t0 < 15.299985) 
	{ 
		result += l_decay(t0, 15.149985, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 15.299985 && t0 < 15.449985) 
	{ 
		result += l_decay(t0, 15.299985, 0.100000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 15.449985 && t0 < 15.599984) 
	{ 
		result += l_decay(t0, 15.449985, 0.100000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 15.599984 && t0 < 15.749984) 
	{ 
		result += l_decay(t0, 15.599984, 0.100000) * sqr(t0, 4649.486816, 0.500000, 0.250000);
	}
	if (t0 >= 15.899983 && t0 < 16.049984) 
	{ 
		result += l_decay(t0, 15.899983, 0.100000) * sqr(t0, 4649.486816, 0.500000, 0.250000);
	}
	if (t0 >= 16.199984 && t0 < 16.349983) 
	{ 
		result += l_decay(t0, 16.199984, 0.100000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 16.499983 && t0 < 16.649982) 
	{ 
		result += l_decay(t0, 16.499983, 0.100000) * sqr(t0, 4649.486816, 0.500000, 0.250000);
	}
	if (t0 >= 16.799982 && t0 < 17.349981) 
	{ 
		result += l_decay(t0, 16.799982, 0.600000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 17.399981 && t0 < 17.949980) 
	{ 
		result += l_decay(t0, 17.399981, 0.600000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 17.999979 && t0 < 18.549978) 
	{ 
		result += l_decay(t0, 17.999979, 0.600000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 18.599977 && t0 < 19.149977) 
	{ 
		result += l_decay(t0, 18.599977, 0.600000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}

	return result;
}


float echo1b(float t0)
{
	float result = 0.0;
	if (t0 >= 19.799999 && t0 < 19.949999) 
	{ 
		result += l_decay(t0, 19.799999, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 19.949999 && t0 < 20.099998) 
	{ 
		result += l_decay(t0, 19.949999, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 20.099998 && t0 < 20.249998) 
	{ 
		result += l_decay(t0, 20.099998, 0.400000) * sqr(t0, 6206.319336, 0.500000, 0.100000);
	}
	if (t0 >= 20.249998 && t0 < 20.399998) 
	{ 
		result += l_decay(t0, 20.249998, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 20.399998 && t0 < 20.549997) 
	{ 
		result += l_decay(t0, 20.399998, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 20.699997 && t0 < 20.849997) 
	{ 
		result += l_decay(t0, 20.699997, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 20.849997 && t0 < 20.999996) 
	{ 
		result += l_decay(t0, 20.849997, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 21.049997 && t0 < 21.199997) 
	{ 
		result += l_decay(t0, 21.049997, 0.400000) * sqr(t0, 6206.319336, 0.500000, 0.100000);
	}
	if (t0 >= 21.249998 && t0 < 21.399998) 
	{ 
		result += l_decay(t0, 21.249998, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 21.449999 && t0 < 21.599998) 
	{ 
		result += l_decay(t0, 21.449999, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 21.899998 && t0 < 22.049997) 
	{ 
		result += l_decay(t0, 21.899998, 0.400000) * sqr(t0, 3287.684326, 0.500000, 0.100000);
	}
	if (t0 >= 22.049997 && t0 < 22.199997) 
	{ 
		result += l_decay(t0, 22.049997, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 22.349997 && t0 < 22.499996) 
	{ 
		result += l_decay(t0, 22.349997, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 22.499996 && t0 < 22.649996) 
	{ 
		result += l_decay(t0, 22.499996, 0.400000) * sqr(t0, 4388.528320, 0.500000, 0.100000);
	}
	if (t0 >= 22.799995 && t0 < 22.949995) 
	{ 
		result += l_decay(t0, 22.799995, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 23.099995 && t0 < 23.249994) 
	{ 
		result += l_decay(t0, 23.099995, 0.400000) * sqr(t0, 4388.528320, 0.500000, 0.100000);
	}
	if (t0 >= 23.399994 && t0 < 23.549994) 
	{ 
		result += l_decay(t0, 23.399994, 0.400000) * sqr(t0, 4388.528320, 0.500000, 0.100000);
	}
	if (t0 >= 23.549994 && t0 < 23.699993) 
	{ 
		result += l_decay(t0, 23.549994, 0.400000) * sqr(t0, 3690.300781, 0.500000, 0.100000);
	}
	if (t0 >= 23.699993 && t0 < 23.849993) 
	{ 
		result += l_decay(t0, 23.699993, 0.400000) * sqr(t0, 4142.217773, 0.500000, 0.100000);
	}
	if (t0 >= 23.849993 && t0 < 23.999992) 
	{ 
		result += l_decay(t0, 23.849993, 0.400000) * sqr(t0, 4388.528320, 0.500000, 0.100000);
	}
	if (t0 >= 23.999992 && t0 < 24.149992) 
	{ 
		result += l_decay(t0, 23.999992, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 24.149992 && t0 < 24.299992) 
	{ 
		result += l_decay(t0, 24.149992, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 24.299992 && t0 < 24.449991) 
	{ 
		result += l_decay(t0, 24.299992, 0.400000) * sqr(t0, 6206.319336, 0.500000, 0.100000);
	}
	if (t0 >= 24.449991 && t0 < 24.599991) 
	{ 
		result += l_decay(t0, 24.449991, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 25.199989 && t0 < 25.349989) 
	{ 
		result += l_decay(t0, 25.199989, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 25.349989 && t0 < 25.499989) 
	{ 
		result += l_decay(t0, 25.349989, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 25.499989 && t0 < 25.649988) 
	{ 
		result += l_decay(t0, 25.499989, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 25.649988 && t0 < 25.799988) 
	{ 
		result += l_decay(t0, 25.649988, 0.400000) * sqr(t0, 8284.435547, 0.500000, 0.100000);
	}
	if (t0 >= 25.799988 && t0 < 25.949987) 
	{ 
		result += l_decay(t0, 25.799988, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 25.949987 && t0 < 26.099987) 
	{ 
		result += l_decay(t0, 25.949987, 0.400000) * sqr(t0, 8777.056641, 0.500000, 0.100000);
	}
	if (t0 >= 26.099987 && t0 < 26.249987) 
	{ 
		result += l_decay(t0, 26.099987, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 26.249987 && t0 < 26.399986) 
	{ 
		result += l_decay(t0, 26.249987, 0.400000) * sqr(t0, 9851.914062, 0.500000, 0.100000);
	}
	if (t0 >= 26.399986 && t0 < 26.549986) 
	{ 
		result += l_decay(t0, 26.399986, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 26.699986 && t0 < 26.849985) 
	{ 
		result += l_decay(t0, 26.699986, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 26.849985 && t0 < 26.999985) 
	{ 
		result += l_decay(t0, 26.849985, 0.400000) * sqr(t0, 11058.406250, 0.500000, 0.100000);
	}
	if (t0 >= 27.149984 && t0 < 27.299984) 
	{ 
		result += l_decay(t0, 27.149984, 0.400000) * sqr(t0, 11058.406250, 0.500000, 0.100000);
	}
	if (t0 >= 27.299984 && t0 < 27.449984) 
	{ 
		result += l_decay(t0, 27.299984, 0.400000) * sqr(t0, 11058.406250, 0.500000, 0.100000);
	}
	if (t0 >= 27.449984 && t0 < 27.599983) 
	{ 
		result += l_decay(t0, 27.449984, 0.400000) * sqr(t0, 9851.914062, 0.500000, 0.100000);
	}
	if (t0 >= 27.749983 && t0 < 27.899982) 
	{ 
		result += l_decay(t0, 27.749983, 0.400000) * sqr(t0, 8777.056641, 0.500000, 0.100000);
	}
	if (t0 >= 27.899982 && t0 < 28.049982) 
	{ 
		result += l_decay(t0, 27.899982, 0.400000) * sqr(t0, 8284.435547, 0.500000, 0.100000);
	}
	if (t0 >= 28.199982 && t0 < 28.349981) 
	{ 
		result += l_decay(t0, 28.199982, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 28.349981 && t0 < 28.499981) 
	{ 
		result += l_decay(t0, 28.349981, 0.400000) * sqr(t0, 7380.601562, 0.500000, 0.100000);
	}
	if (t0 >= 28.499981 && t0 < 28.649981) 
	{ 
		result += l_decay(t0, 28.499981, 0.400000) * sqr(t0, 6206.319336, 0.500000, 0.100000);
	}
	if (t0 >= 28.649981 && t0 < 28.799980) 
	{ 
		result += l_decay(t0, 28.649981, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 29.849977 && t0 < 29.999977) 
	{ 
		result += l_decay(t0, 29.849977, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 29.999977 && t0 < 30.149977) 
	{ 
		result += l_decay(t0, 29.999977, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 30.299976 && t0 < 30.449976) 
	{ 
		result += l_decay(t0, 30.299976, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 30.599976 && t0 < 30.749975) 
	{ 
		result += l_decay(t0, 30.599976, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 30.899975 && t0 < 31.049974) 
	{ 
		result += l_decay(t0, 30.899975, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 31.049974 && t0 < 31.199974) 
	{ 
		result += l_decay(t0, 31.049974, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 31.199974 && t0 < 31.349974) 
	{ 
		result += l_decay(t0, 31.199974, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 31.349974 && t0 < 31.499973) 
	{ 
		result += l_decay(t0, 31.349974, 0.400000) * sqr(t0, 7380.601562, 0.500000, 0.100000);
	}
	if (t0 >= 31.499973 && t0 < 31.649973) 
	{ 
		result += l_decay(t0, 31.499973, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 31.649973 && t0 < 31.799973) 
	{ 
		result += l_decay(t0, 31.649973, 0.400000) * sqr(t0, 8284.435547, 0.500000, 0.100000);
	}
	if (t0 >= 31.799973 && t0 < 31.949972) 
	{ 
		result += l_decay(t0, 31.799973, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 32.099972 && t0 < 32.249973) 
	{ 
		result += l_decay(t0, 32.099972, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 32.399975 && t0 < 32.549976) 
	{ 
		result += l_decay(t0, 32.399975, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 32.699978 && t0 < 32.849979) 
	{ 
		result += l_decay(t0, 32.699978, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 32.849979 && t0 < 32.999981) 
	{ 
		result += l_decay(t0, 32.849979, 0.400000) * sqr(t0, 4388.528320, 0.500000, 0.100000);
	}
	if (t0 >= 32.999981 && t0 < 33.149982) 
	{ 
		result += l_decay(t0, 32.999981, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 33.149982 && t0 < 33.299984) 
	{ 
		result += l_decay(t0, 33.149982, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 33.299984 && t0 < 33.449986) 
	{ 
		result += l_decay(t0, 33.299984, 0.400000) * sqr(t0, 5529.203125, 0.500000, 0.100000);
	}
	if (t0 >= 33.599987 && t0 < 33.749989) 
	{ 
		result += l_decay(t0, 33.599987, 0.400000) * sqr(t0, 6206.319336, 0.500000, 0.100000);
	}
	if (t0 >= 33.899990 && t0 < 34.049992) 
	{ 
		result += l_decay(t0, 33.899990, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.100000);
	}
	if (t0 >= 35.250004 && t0 < 35.400005) 
	{ 
		result += l_decay(t0, 35.250004, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.100000);
	}
	if (t0 >= 35.400005 && t0 < 35.550007) 
	{ 
		result += l_decay(t0, 35.400005, 0.400000) * sqr(t0, 7380.601562, 0.500000, 0.100000);
	}
	if (t0 >= 35.550007 && t0 < 35.700008) 
	{ 
		result += l_decay(t0, 35.550007, 0.400000) * sqr(t0, 8284.435547, 0.500000, 0.100000);
	}
	if (t0 >= 35.700008 && t0 < 35.850010) 
	{ 
		result += l_decay(t0, 35.700008, 0.400000) * sqr(t0, 8284.435547, 0.500000, 0.100000);
	}
	if (t0 >= 36.000011 && t0 < 36.450012) 
	{ 
		result += l_decay(t0, 36.000011, 0.700000) * sqr(t0, 2764.601562, 0.400000, 0.250000);
	}
	if (t0 >= 36.600018 && t0 < 37.050018) 
	{ 
		result += l_decay(t0, 36.600018, 0.700000) * sqr(t0, 2462.978516, 0.400000, 0.250000);
	}
	if (t0 >= 37.200024 && t0 < 37.650024) 
	{ 
		result += l_decay(t0, 37.200024, 0.700000) * sqr(t0, 2764.601562, 0.400000, 0.250000);
	}
	if (t0 >= 37.800030 && t0 < 38.250031) 
	{ 
		result += l_decay(t0, 37.800030, 0.700000) * sqr(t0, 3103.159668, 0.400000, 0.250000);
	}

	return result;
}

float subdrums(float t0)
{
	float result = 0.0;
	float t1 = mod(t0,0.600000);
	if (t1 >= 0.000000 && t1 < 0.040000) 
	{ 
		result += l_decay(t1, 0.000000, 2.000000) * noise(t1, 258.888611, 0.080000);
	}
	if (t1 >= 0.150000 && t1 < 0.190000) 
	{ 
		result += l_decay(t1, 0.150000, 2.000000) * noise(t1, 274.283020, 0.080000);
	}
	if (t1 >= 0.300000 && t1 < 0.600000) 
	{ 
		result += l_decay(t1, 0.300000, 0.300000) * noise(t1, 205.480270, 0.080000);
	}

	return result;
}

float drums(float t0)
{
	float result = 0.0;
	float t1 = mod(t0,4.800000);
	if (t1 >= 0.000000 && t1 < 0.100000) 
	{ 
		result += l_decay(t1, 0.000000, 0.100000) * noise(t1, 1643.842163, 0.250000);
	}
	if (t1 >= 0.300000 && t1 < 0.400000) 
	{ 
		result += l_decay(t1, 0.300000, 0.100000) * noise(t1, 205.480270, 0.100000);
	}
	if (t1 >= 0.450000 && t1 < 0.550000) 
	{ 
		result += l_decay(t1, 0.450000, 0.100000) * noise(t1, 230.643799, 0.150000);
	}
	if (t1 >= 0.600000 && t1 < 0.700000) 
	{ 
		result += l_decay(t1, 0.600000, 0.100000) * noise(t1, 821.921082, 0.250000);
	}
	if (t1 >= 0.900000 && t1 < 1.000000) 
	{ 
		result += l_decay(t1, 0.900000, 0.100000) * noise(t1, 205.480270, 0.150000);
	}
	if (t1 >= 1.200000 && t1 < 1.300000) 
	{ 
		result += l_decay(t1, 1.200000, 0.100000) * noise(t1, 1643.842163, 0.250000);
	}
	if (t1 >= 1.500000 && t1 < 1.600000) 
	{ 
		result += l_decay(t1, 1.500000, 0.100000) * noise(t1, 205.480270, 0.100000);
	}
	if (t1 >= 1.650000 && t1 < 1.750000) 
	{ 
		result += l_decay(t1, 1.650000, 0.100000) * noise(t1, 230.643799, 0.150000);
	}
	if (t1 >= 1.800000 && t1 < 1.900000) 
	{ 
		result += l_decay(t1, 1.800000, 0.100000) * noise(t1, 821.921082, 0.250000);
	}
	if (t1 >= 2.100000 && t1 < 2.200000) 
	{ 
		result += l_decay(t1, 2.100000, 0.100000) * noise(t1, 205.480270, 0.150000);
	}
	if (t1 >= 2.400000 && t1 < 2.500000) 
	{ 
		result += l_decay(t1, 2.400000, 0.100000) * noise(t1, 1643.842163, 0.250000);
	}
	if (t1 >= 2.700000 && t1 < 2.800000) 
	{ 
		result += l_decay(t1, 2.700000, 0.100000) * noise(t1, 205.480270, 0.100000);
	}
	if (t1 >= 2.850000 && t1 < 2.950000) 
	{ 
		result += l_decay(t1, 2.850000, 0.100000) * noise(t1, 230.643799, 0.150000);
	}
	if (t1 >= 3.000000 && t1 < 3.100000) 
	{ 
		result += l_decay(t1, 3.000000, 0.100000) * noise(t1, 821.921082, 0.250000);
	}
	if (t1 >= 3.300001 && t1 < 3.400001) 
	{ 
		result += l_decay(t1, 3.300001, 0.100000) * noise(t1, 205.480270, 0.150000);
	}
	if (t1 >= 3.600001 && t1 < 3.700001) 
	{ 
		result += l_decay(t1, 3.600001, 0.100000) * noise(t1, 1643.842163, 0.150000);
	}
	if (t1 >= 3.900001 && t1 < 4.000001) 
	{ 
		result += l_decay(t1, 3.900001, 0.100000) * noise(t1, 205.480270, 0.100000);
	}
	if (t1 >= 4.050001 && t1 < 4.150001) 
	{ 
		result += l_decay(t1, 4.050001, 0.100000) * noise(t1, 230.643799, 0.150000);
	}
	if (t1 >= 4.200001 && t1 < 4.300001) 
	{ 
		result += l_decay(t1, 4.200001, 0.100000) * noise(t1, 410.960541, 0.250000);
	}
	if (t1 >= 4.350001 && t1 < 4.450001) 
	{ 
		result += l_decay(t1, 4.350001, 0.100000) * noise(t1, 461.287598, 0.250000);
	}
	if (t1 >= 4.500001 && t1 < 4.600001) 
	{ 
		result += l_decay(t1, 4.500001, 0.100000) * noise(t1, 821.921082, 0.250000);
	}

	return result;
}

float bass_a(float t0)
{
	float result = 0.0;
	if (t0 >= 0.000000 && t0 < 0.200000) 
	{ 
		result += l_decay(t0, 0.000000, 0.300000) * saw(t0, 410.960541, 0.250000);
        return result;
	}
	if (t0 >= 0.450000 && t0 < 0.650000) 
	{ 
        result += l_decay(t0, 0.450000, 0.300000) * saw(t0, 307.872314, 0.250000);
        return result;
	}
	if (t0 >= 0.750000 && t0 < 0.950000) 
	{ 
		result += l_decay(t0, 0.750000, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 0.900000 && t0 < 1.100000) 
	{ 
		result += l_decay(t0, 0.900000, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 1.050000 && t0 < 1.250000) 
	{ 
		result += l_decay(t0, 1.050000, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 1.200000 && t0 < 1.400000) 
	{ 
		result += l_decay(t0, 1.200000, 0.300000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 1.500000 && t0 < 1.700000) 
	{ 
		result += l_decay(t0, 1.500000, 0.300000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 1.800000 && t0 < 2.000000) 
	{ 
		result += l_decay(t0, 1.800000, 0.300000) * saw(t0, 581.185852, 0.250000);
	}
	if (t0 >= 2.100000 && t0 < 2.300000) 
	{ 
		result += l_decay(t0, 2.100000, 0.300000) * saw(t0, 581.185852, 0.250000);
	}
	if (t0 >= 2.400000 && t0 < 2.600000) 
	{ 
		result += l_decay(t0, 2.400000, 0.300000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 2.850000 && t0 < 3.050000) 
	{ 
		result += l_decay(t0, 2.850000, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 3.150001 && t0 < 3.350001) 
	{ 
		result += l_decay(t0, 3.150001, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 3.300001 && t0 < 3.500001) 
	{ 
		result += l_decay(t0, 3.300001, 0.300000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 3.450001 && t0 < 3.650001) 
	{ 
		result += l_decay(t0, 3.450001, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 3.600001 && t0 < 3.800001) 
	{ 
		result += l_decay(t0, 3.600001, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 3.900001 && t0 < 4.100001) 
	{ 
		result += l_decay(t0, 3.900001, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 4.200001 && t0 < 4.400001) 
	{ 
		result += l_decay(t0, 4.200001, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 4.500001 && t0 < 4.700001) 
	{ 
		result += l_decay(t0, 4.500001, 0.300000) * saw(t0, 387.894958, 0.250000);
	}
	if (t0 >= 4.800002 && t0 < 5.000001) 
	{ 
		result += l_decay(t0, 4.800002, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 5.250002 && t0 < 5.450002) 
	{ 
		result += l_decay(t0, 5.250002, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 5.550002 && t0 < 5.750002) 
	{ 
		result += l_decay(t0, 5.550002, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 5.700002 && t0 < 5.900002) 
	{ 
		result += l_decay(t0, 5.700002, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 5.850002 && t0 < 6.050002) 
	{ 
		result += l_decay(t0, 5.850002, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 6.000002 && t0 < 6.200002) 
	{ 
		result += l_decay(t0, 6.000002, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 6.300003 && t0 < 6.500002) 
	{ 
		result += l_decay(t0, 6.300003, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 6.600003 && t0 < 6.800003) 
	{ 
		result += l_decay(t0, 6.600003, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 6.900003 && t0 < 7.100003) 
	{ 
		result += l_decay(t0, 6.900003, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 7.200003 && t0 < 7.700003) 
	{ 
		result += l_decay(t0, 7.200003, 0.500000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 7.800004 && t0 < 8.300003) 
	{ 
		result += l_decay(t0, 7.800004, 0.500000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 8.400002 && t0 < 8.900002) 
	{ 
		result += l_decay(t0, 8.400002, 0.500000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 9.000001 && t0 < 9.500001) 
	{ 
		result += l_decay(t0, 9.000001, 0.500000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 9.599999 && t0 < 9.799999) 
	{ 
		result += l_decay(t0, 9.599999, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 10.049998 && t0 < 10.249998) 
	{ 
		result += l_decay(t0, 10.049998, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 10.349998 && t0 < 10.549997) 
	{ 
		result += l_decay(t0, 10.349998, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 10.499997 && t0 < 10.699997) 
	{ 
		result += l_decay(t0, 10.499997, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 10.649997 && t0 < 10.849997) 
	{ 
		result += l_decay(t0, 10.649997, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 10.799996 && t0 < 10.999996) 
	{ 
		result += l_decay(t0, 10.799996, 0.300000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 11.099996 && t0 < 11.299995) 
	{ 
		result += l_decay(t0, 11.099996, 0.300000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 11.399995 && t0 < 11.599995) 
	{ 
		result += l_decay(t0, 11.399995, 0.300000) * saw(t0, 581.185852, 0.250000);
	}
	if (t0 >= 11.699994 && t0 < 11.899994) 
	{ 
		result += l_decay(t0, 11.699994, 0.300000) * saw(t0, 581.185852, 0.250000);
	}
	if (t0 >= 11.999993 && t0 < 12.199993) 
	{ 
		result += l_decay(t0, 11.999993, 0.300000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 12.449992 && t0 < 12.649992) 
	{ 
		result += l_decay(t0, 12.449992, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 12.749991 && t0 < 12.949991) 
	{ 
		result += l_decay(t0, 12.749991, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 12.899991 && t0 < 13.099991) 
	{ 
		result += l_decay(t0, 12.899991, 0.300000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 13.049991 && t0 < 13.249990) 
	{ 
		result += l_decay(t0, 13.049991, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 13.199990 && t0 < 13.399990) 
	{ 
		result += l_decay(t0, 13.199990, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 13.499990 && t0 < 13.699989) 
	{ 
		result += l_decay(t0, 13.499990, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 13.799989 && t0 < 13.999989) 
	{ 
		result += l_decay(t0, 13.799989, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 14.099988 && t0 < 14.299988) 
	{ 
		result += l_decay(t0, 14.099988, 0.300000) * saw(t0, 387.894958, 0.250000);
	}
	if (t0 >= 14.399987 && t0 < 14.599987) 
	{ 
		result += l_decay(t0, 14.399987, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 14.849986 && t0 < 15.049986) 
	{ 
		result += l_decay(t0, 14.849986, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 15.149985 && t0 < 15.349985) 
	{ 
		result += l_decay(t0, 15.149985, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 15.299985 && t0 < 15.499985) 
	{ 
		result += l_decay(t0, 15.299985, 0.300000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 15.449985 && t0 < 15.649984) 
	{ 
		result += l_decay(t0, 15.449985, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 15.599984 && t0 < 15.799984) 
	{ 
		result += l_decay(t0, 15.599984, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 15.899983 && t0 < 16.099983) 
	{ 
		result += l_decay(t0, 15.899983, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 16.199984 && t0 < 16.399984) 
	{ 
		result += l_decay(t0, 16.199984, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 16.499983 && t0 < 16.699984) 
	{ 
		result += l_decay(t0, 16.499983, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 16.799982 && t0 < 17.299982) 
	{ 
		result += l_decay(t0, 16.799982, 0.500000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 17.399981 && t0 < 17.899981) 
	{ 
		result += l_decay(t0, 17.399981, 0.500000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 17.999979 && t0 < 18.499979) 
	{ 
		result += l_decay(t0, 17.999979, 0.500000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 18.599977 && t0 < 19.099977) 
	{ 
		result += l_decay(t0, 18.599977, 0.500000) * saw(t0, 615.744629, 0.250000);
	}

	return result;
}

float bass_b(float t0)
{
	float result = 0.0;
	if (t0 >= 19.200001 && t0 < 19.600000) 
	{ 
		result += l_decay(t0, 19.200001, 0.400000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 19.799999 && t0 < 20.199999) 
	{ 
		result += l_decay(t0, 19.799999, 0.400000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 20.249998 && t0 < 20.649998) 
	{ 
		result += l_decay(t0, 20.249998, 0.400000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 21.299995 && t0 < 21.449995) 
	{ 
		result += l_decay(t0, 21.299995, 0.150000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 21.449995 && t0 < 21.599995) 
	{ 
		result += l_decay(t0, 21.449995, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 21.599995 && t0 < 21.749994) 
	{ 
		result += l_decay(t0, 21.599995, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 22.049994 && t0 < 22.199993) 
	{ 
		result += l_decay(t0, 22.049994, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 22.499992 && t0 < 22.649992) 
	{ 
		result += l_decay(t0, 22.499992, 0.150000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 22.649992 && t0 < 22.799992) 
	{ 
		result += l_decay(t0, 22.649992, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 22.799992 && t0 < 22.949991) 
	{ 
		result += l_decay(t0, 22.799992, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 23.249990 && t0 < 23.399990) 
	{ 
		result += l_decay(t0, 23.249990, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 23.699989 && t0 < 23.849989) 
	{ 
		result += l_decay(t0, 23.699989, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 23.999989 && t0 < 24.399988) 
	{ 
		result += l_decay(t0, 23.999989, 0.400000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 24.599987 && t0 < 24.999987) 
	{ 
		result += l_decay(t0, 24.599987, 0.400000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 25.049986 && t0 < 25.449986) 
	{ 
		result += l_decay(t0, 25.049986, 0.400000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 26.099983 && t0 < 26.249983) 
	{ 
		result += l_decay(t0, 26.099983, 0.150000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 26.249983 && t0 < 26.399982) 
	{ 
		result += l_decay(t0, 26.249983, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 26.399982 && t0 < 26.549982) 
	{ 
		result += l_decay(t0, 26.399982, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 26.849981 && t0 < 26.999981) 
	{ 
		result += l_decay(t0, 26.849981, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 27.299980 && t0 < 27.449980) 
	{ 
		result += l_decay(t0, 27.299980, 0.150000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 27.449980 && t0 < 27.599979) 
	{ 
		result += l_decay(t0, 27.449980, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 27.599979 && t0 < 27.749979) 
	{ 
		result += l_decay(t0, 27.599979, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 28.049978 && t0 < 28.199978) 
	{ 
		result += l_decay(t0, 28.049978, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 28.499977 && t0 < 28.649977) 
	{ 
		result += l_decay(t0, 28.499977, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 28.799976 && t0 < 29.199976) 
	{ 
		result += l_decay(t0, 28.799976, 0.400000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 29.399975 && t0 < 29.799974) 
	{ 
		result += l_decay(t0, 29.399975, 0.400000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 29.849974 && t0 < 30.249973) 
	{ 
		result += l_decay(t0, 29.849974, 0.400000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 30.899971 && t0 < 31.299971) 
	{ 
		result += l_decay(t0, 30.899971, 0.400000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 31.049971 && t0 < 31.449970) 
	{ 
		result += l_decay(t0, 31.049971, 0.400000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 31.199970 && t0 < 31.349970) 
	{ 
		result += l_decay(t0, 31.199970, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 31.649969 && t0 < 31.799969) 
	{ 
		result += l_decay(t0, 31.649969, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 32.099968 && t0 < 32.249969) 
	{ 
		result += l_decay(t0, 32.099968, 0.150000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 32.249969 && t0 < 32.399971) 
	{ 
		result += l_decay(t0, 32.249969, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 32.399971 && t0 < 32.549973) 
	{ 
		result += l_decay(t0, 32.399971, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 32.849976 && t0 < 32.999977) 
	{ 
		result += l_decay(t0, 32.849976, 0.150000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 33.299980 && t0 < 33.449982) 
	{ 
		result += l_decay(t0, 33.299980, 0.150000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 33.599983 && t0 < 33.999985) 
	{ 
		result += l_decay(t0, 33.599983, 0.400000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 34.199989 && t0 < 34.599991) 
	{ 
		result += l_decay(t0, 34.199989, 0.400000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 34.649994 && t0 < 35.049995) 
	{ 
		result += l_decay(t0, 34.649994, 0.400000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 35.400002 && t0 < 35.800003) 
	{ 
		result += l_decay(t0, 35.400002, 0.400000) * saw(t0, 615.744629, 0.250000);
	}
	if (t0 >= 36.000008 && t0 < 36.400009) 
	{ 
		result += l_decay(t0, 36.000008, 0.400000) * saw(t0, 548.566040, 0.250000);
	}
	if (t0 >= 36.600014 && t0 < 37.000015) 
	{ 
		result += l_decay(t0, 36.600014, 0.400000) * saw(t0, 517.777222, 0.250000);
	}
	if (t0 >= 37.200020 && t0 < 37.600021) 
	{ 
		result += l_decay(t0, 37.200020, 0.400000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 37.800026 && t0 < 38.200027) 
	{ 
		result += l_decay(t0, 37.800026, 0.400000) * saw(t0, 461.287598, 0.250000);
	}

	return result;
}

float bass_c(float t0)
{
	float result = 0.0;
	if (t0 >= 38.400002 && t0 < 38.700001) 
	{ 
		result += l_decay(t0, 38.400002, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 38.850006 && t0 < 39.150005) 
	{ 
		result += l_decay(t0, 38.850006, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 39.300011 && t0 < 39.600010) 
	{ 
		result += l_decay(t0, 39.300011, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 39.600014 && t0 < 39.900013) 
	{ 
		result += l_decay(t0, 39.600014, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 40.050018 && t0 < 40.350018) 
	{ 
		result += l_decay(t0, 40.050018, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 40.500023 && t0 < 40.800022) 
	{ 
		result += l_decay(t0, 40.500023, 0.300000) * saw(t0, 732.248718, 0.250000);
	}
	if (t0 >= 40.800026 && t0 < 41.100025) 
	{ 
		result += l_decay(t0, 40.800026, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 41.250031 && t0 < 41.550030) 
	{ 
		result += l_decay(t0, 41.250031, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 41.700035 && t0 < 42.000034) 
	{ 
		result += l_decay(t0, 41.700035, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 41.850037 && t0 < 42.150036) 
	{ 
		result += l_decay(t0, 41.850037, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 42.000038 && t0 < 42.300037) 
	{ 
		result += l_decay(t0, 42.000038, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 42.150040 && t0 < 42.450039) 
	{ 
		result += l_decay(t0, 42.150040, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 42.300041 && t0 < 42.600040) 
	{ 
		result += l_decay(t0, 42.300041, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 42.450043 && t0 < 42.750042) 
	{ 
		result += l_decay(t0, 42.450043, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 42.750046 && t0 < 43.050045) 
	{ 
		result += l_decay(t0, 42.750046, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 42.900047 && t0 < 43.200047) 
	{ 
		result += l_decay(t0, 42.900047, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 43.200050 && t0 < 43.500050) 
	{ 
		result += l_decay(t0, 43.200050, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 43.650055 && t0 < 43.950054) 
	{ 
		result += l_decay(t0, 43.650055, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 44.100060 && t0 < 44.400059) 
	{ 
		result += l_decay(t0, 44.100060, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 44.400063 && t0 < 44.700062) 
	{ 
		result += l_decay(t0, 44.400063, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 44.850067 && t0 < 45.150066) 
	{ 
		result += l_decay(t0, 44.850067, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 45.300072 && t0 < 45.600071) 
	{ 
		result += l_decay(t0, 45.300072, 0.300000) * saw(t0, 732.248718, 0.250000);
	}
	if (t0 >= 45.600075 && t0 < 45.900074) 
	{ 
		result += l_decay(t0, 45.600075, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 46.050079 && t0 < 46.350079) 
	{ 
		result += l_decay(t0, 46.050079, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 46.500084 && t0 < 46.800083) 
	{ 
		result += l_decay(t0, 46.500084, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 46.650085 && t0 < 46.950085) 
	{ 
		result += l_decay(t0, 46.650085, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 46.800087 && t0 < 47.100086) 
	{ 
		result += l_decay(t0, 46.800087, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 46.950089 && t0 < 47.250088) 
	{ 
		result += l_decay(t0, 46.950089, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 47.100090 && t0 < 47.400089) 
	{ 
		result += l_decay(t0, 47.100090, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 47.250092 && t0 < 47.550091) 
	{ 
		result += l_decay(t0, 47.250092, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 47.550095 && t0 < 47.850094) 
	{ 
		result += l_decay(t0, 47.550095, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 47.850098 && t0 < 48.150097) 
	{ 
		result += l_decay(t0, 47.850098, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 48.000099 && t0 < 48.300098) 
	{ 
		result += l_decay(t0, 48.000099, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 48.450104 && t0 < 48.750103) 
	{ 
		result += l_decay(t0, 48.450104, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 48.900108 && t0 < 49.200108) 
	{ 
		result += l_decay(t0, 48.900108, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 49.200111 && t0 < 49.500111) 
	{ 
		result += l_decay(t0, 49.200111, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 49.650116 && t0 < 49.950115) 
	{ 
		result += l_decay(t0, 49.650116, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 50.100121 && t0 < 50.400120) 
	{ 
		result += l_decay(t0, 50.100121, 0.300000) * saw(t0, 732.248718, 0.250000);
	}
	if (t0 >= 50.400124 && t0 < 50.700123) 
	{ 
		result += l_decay(t0, 50.400124, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 50.850128 && t0 < 51.150127) 
	{ 
		result += l_decay(t0, 50.850128, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 51.300133 && t0 < 51.600132) 
	{ 
		result += l_decay(t0, 51.300133, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 51.450134 && t0 < 51.750134) 
	{ 
		result += l_decay(t0, 51.450134, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 51.600136 && t0 < 51.900135) 
	{ 
		result += l_decay(t0, 51.600136, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 51.750137 && t0 < 52.050137) 
	{ 
		result += l_decay(t0, 51.750137, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 51.900139 && t0 < 52.200138) 
	{ 
		result += l_decay(t0, 51.900139, 0.300000) * saw(t0, 345.575195, 0.250000);
	}
	if (t0 >= 52.050140 && t0 < 52.350140) 
	{ 
		result += l_decay(t0, 52.050140, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 52.350143 && t0 < 52.650143) 
	{ 
		result += l_decay(t0, 52.350143, 0.300000) * saw(t0, 461.287598, 0.250000);
	}
	if (t0 >= 52.650146 && t0 < 52.950146) 
	{ 
		result += l_decay(t0, 52.650146, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 52.800148 && t0 < 53.100147) 
	{ 
		result += l_decay(t0, 52.800148, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 53.250153 && t0 < 53.550152) 
	{ 
		result += l_decay(t0, 53.250153, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 53.700157 && t0 < 54.000156) 
	{ 
		result += l_decay(t0, 53.700157, 0.300000) * saw(t0, 821.921082, 0.250000);
	}
	if (t0 >= 54.000160 && t0 < 54.300159) 
	{ 
		result += l_decay(t0, 54.000160, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 54.450165 && t0 < 54.750164) 
	{ 
		result += l_decay(t0, 54.450165, 0.300000) * saw(t0, 366.124359, 0.250000);
	}
	if (t0 >= 54.900169 && t0 < 55.200169) 
	{ 
		result += l_decay(t0, 54.900169, 0.300000) * saw(t0, 732.248718, 0.250000);
	}
	if (t0 >= 55.200172 && t0 < 55.500172) 
	{ 
		result += l_decay(t0, 55.200172, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 55.350174 && t0 < 55.650173) 
	{ 
		result += l_decay(t0, 55.350174, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 55.650177 && t0 < 55.950176) 
	{ 
		result += l_decay(t0, 55.650177, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 55.800179 && t0 < 56.100178) 
	{ 
		result += l_decay(t0, 55.800179, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 55.950180 && t0 < 56.250179) 
	{ 
		result += l_decay(t0, 55.950180, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 56.250183 && t0 < 56.550182) 
	{ 
		result += l_decay(t0, 56.250183, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 56.400185 && t0 < 56.700184) 
	{ 
		result += l_decay(t0, 56.400185, 0.300000) * saw(t0, 410.960541, 0.250000);
	}
	if (t0 >= 56.700188 && t0 < 57.000187) 
	{ 
		result += l_decay(t0, 56.700188, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 56.850189 && t0 < 57.150188) 
	{ 
		result += l_decay(t0, 56.850189, 0.300000) * saw(t0, 307.872314, 0.250000);
	}
	if (t0 >= 57.000191 && t0 < 57.300190) 
	{ 
		result += l_decay(t0, 57.000191, 0.300000) * saw(t0, 326.179626, 0.250000);
	}
	if (t0 >= 57.300194 && t0 < 57.600193) 
	{ 
		result += l_decay(t0, 57.300194, 0.300000) * saw(t0, 307.872314, 0.250000);
	}

	return result;
}

float lead_2a(float t0)
{
    t0 = mod(t0,9.6);
	float result = 0.0;
	if (t0 >= 0.150000 && t0 < 0.300000) 
	{ 
		result += l_decay(t0, 0.150000, 0.250000) * sqr(t0, 2071.108887, 0.500000, 0.250000);
	}
	if (t0 >= 0.300000 && t0 < 0.450000) 
	{ 
		result += l_decay(t0, 0.300000, 0.250000) * sqr(t0, 2462.978516, 0.500000, 0.250000);
	}
	if (t0 >= 0.450000 && t0 < 0.600000) 
	{ 
		result += l_decay(t0, 0.450000, 0.250000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 0.600000 && t0 < 0.750000) 
	{ 
		result += l_decay(t0, 0.600000, 0.250000) * sqr(t0, 4142.217773, 0.500000, 0.250000);
	}
	if (t0 >= 0.750000 && t0 < 0.900000) 
	{ 
		result += l_decay(t0, 0.750000, 0.250000) * sqr(t0, 4142.217773, 0.500000, 0.250000);
	}
	if (t0 >= 1.050000 && t0 < 1.200000) 
	{ 
		result += l_decay(t0, 1.050000, 0.250000) * sqr(t0, 4142.217773, 0.500000, 0.250000);
	}
	if (t0 >= 1.200000 && t0 < 1.350000) 
	{ 
		result += l_decay(t0, 1.200000, 0.250000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 1.500000 && t0 < 1.650000) 
	{ 
		result += l_decay(t0, 1.500000, 0.250000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 1.800000 && t0 < 1.950000) 
	{ 
		result += l_decay(t0, 1.800000, 0.250000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 2.100000 && t0 < 2.250000) 
	{ 
		result += l_decay(t0, 2.100000, 0.250000) * sqr(t0, 3103.159668, 0.500000, 0.250000);
	}
	if (t0 >= 2.550000 && t0 < 2.700000) 
	{ 
		result += l_decay(t0, 2.550000, 0.250000) * sqr(t0, 1845.150391, 0.500000, 0.250000);
	}
	if (t0 >= 2.700000 && t0 < 2.850000) 
	{ 
		result += l_decay(t0, 2.700000, 0.250000) * sqr(t0, 2462.978516, 0.500000, 0.250000);
	}
	if (t0 >= 2.850000 && t0 < 3.000000) 
	{ 
		result += l_decay(t0, 2.850000, 0.250000) * sqr(t0, 3103.159668, 0.500000, 0.250000);
	}
	if (t0 >= 3.000000 && t0 < 3.150001) 
	{ 
		result += l_decay(t0, 3.000000, 0.250000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 3.150001 && t0 < 3.300001) 
	{ 
		result += l_decay(t0, 3.150001, 0.250000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 3.450001 && t0 < 3.600001) 
	{ 
		result += l_decay(t0, 3.450001, 0.250000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 3.600001 && t0 < 3.750001) 
	{ 
		result += l_decay(t0, 3.600001, 0.250000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 3.900001 && t0 < 4.050001) 
	{ 
		result += l_decay(t0, 3.900001, 0.250000) * sqr(t0, 4142.217773, 0.500000, 0.250000);
	}
	if (t0 >= 4.050001 && t0 < 4.200001) 
	{ 
		result += l_decay(t0, 4.050001, 0.250000) * sqr(t0, 3103.159668, 0.500000, 0.250000);
	}
	if (t0 >= 4.350001 && t0 < 4.500001) 
	{ 
		result += l_decay(t0, 4.350001, 0.250000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 4.650002 && t0 < 4.800002) 
	{ 
		result += l_decay(t0, 4.650002, 0.250000) * sqr(t0, 2764.601562, 0.500000, 0.250000);
	}
	if (t0 >= 5.250002 && t0 < 5.400002) 
	{ 
		result += l_decay(t0, 5.250002, 0.250000) * sqr(t0, 2071.108887, 0.500000, 0.250000);
	}
	if (t0 >= 5.400002 && t0 < 5.550002) 
	{ 
		result += l_decay(t0, 5.400002, 0.250000) * sqr(t0, 2764.601562, 0.500000, 0.250000);
	}
	if (t0 >= 5.550002 && t0 < 5.700002) 
	{ 
		result += l_decay(t0, 5.550002, 0.250000) * sqr(t0, 3103.159668, 0.500000, 0.250000);
	}
	if (t0 >= 5.700002 && t0 < 5.850002) 
	{ 
		result += l_decay(t0, 5.700002, 0.250000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 5.850002 && t0 < 6.000002) 
	{ 
		result += l_decay(t0, 5.850002, 0.250000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 6.300003 && t0 < 6.450003) 
	{ 
		result += l_decay(t0, 6.300003, 0.250000) * sqr(t0, 2764.601562, 0.500000, 0.250000);
	}
	if (t0 >= 6.600003 && t0 < 6.750003) 
	{ 
		result += l_decay(t0, 6.600003, 0.250000) * sqr(t0, 2071.108887, 0.500000, 0.250000);
	}
	if (t0 >= 6.900003 && t0 < 7.050003) 
	{ 
		result += l_decay(t0, 6.900003, 0.250000) * sqr(t0, 2764.601562, 0.500000, 0.250000);
	}
	if (t0 >= 7.200003 && t0 < 7.700003) 
	{ 
		result += l_decay(t0, 7.200003, 0.800000) * sqr(t0, 2764.601562, 0.500000, 0.250000);
	}
	if (t0 >= 7.800004 && t0 < 8.300003) 
	{ 
		result += l_decay(t0, 7.800004, 0.800000) * sqr(t0, 2462.978516, 0.500000, 0.250000);
	}
	if (t0 >= 8.400002 && t0 < 8.900002) 
	{ 
		result += l_decay(t0, 8.400002, 0.800000) * sqr(t0, 2764.601562, 0.500000, 0.250000);
	}
	if (t0 >= 9.000001 && t0 < 9.500001) 
	{ 
		result += l_decay(t0, 9.000001, 0.800000) * sqr(t0, 3103.159668, 0.500000, 0.250000);
	}
	return result;
}

float lead_2b(float t0)
{
	float result = 0.0;
    if (t0 > 19.2 && t0 < 38.4)
    {
        t0 = mod(t0, 4.8) + 19.2;
        
        if (t0 >= 19.200001 && t0 < 19.800001) 
        { 
            result += l_decay(t0, 19.200001, 0.800000) * sqr(t0, 2194.264160, 0.250000, 0.250000);
            result += l_decay(t0, 19.200001, 0.450000) * saw(t0, 1382.300781, 0.250000);
        }
        if (t0 >= 19.799999 && t0 < 20.400000) 
        { 
            result += l_decay(t0, 19.799999, 0.800000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
            result += l_decay(t0, 19.799999, 0.450000) * saw(t0, 1551.579834, 0.250000);
        }
        if (t0 >= 20.249998 && t0 < 20.399998) 
        { 
            result += l_decay(t0, 20.249998, 0.200000) * sqr(t0, 1643.842163, 0.250000, 0.250000);
            result += l_decay(t0, 20.249998, 0.450000) * saw(t0, 1643.842163, 0.250000);
        }
        /*
        if (t0 >= 23.999994 && t0 < 24.599995) 
        { 
            result += l_decay(t0, 23.999994, 0.800000) * sqr(t0, 2194.264160, 0.250000, 0.250000);
            result += l_decay(t0, 23.999998, 0.450000) * saw(t0, 1382.300781, 0.250000);
        }
        if (t0 >= 24.599993 && t0 < 25.199993) 
        { 
            result += l_decay(t0, 24.599993, 0.800000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
            result += l_decay(t0, 24.599997, 0.450000) * saw(t0, 1551.579834, 0.250000);
        }
        if (t0 >= 25.049992 && t0 < 25.199991) 
        { 
            result += l_decay(t0, 25.049992, 0.200000) * sqr(t0, 1643.842163, 0.250000, 0.250000);
            result += l_decay(t0, 25.049995, 0.450000) * saw(t0, 1643.842163, 0.250000);
        }
        if (t0 >= 28.799988 && t0 < 29.399988) 
        { 
            result += l_decay(t0, 28.799988, 0.800000) * sqr(t0, 2194.264160, 0.250000, 0.250000);
            result += l_decay(t0, 28.799995, 0.450000) * saw(t0, 1382.300781, 0.250000);
        }
        if (t0 >= 29.399986 && t0 < 29.999987) 
        { 
            result += l_decay(t0, 29.399986, 0.800000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
            result += l_decay(t0, 29.399994, 0.450000) * saw(t0, 1551.579834, 0.250000);
        }
        if (t0 >= 29.849985 && t0 < 30.149984) 
        { 
            result += l_decay(t0, 29.849985, 0.200000) * sqr(t0, 1643.842163, 0.250000, 0.250000);
            result += l_decay(t0, 29.849993, 0.450000) * saw(t0, 1643.842163, 0.250000);
        }
        if (t0 >= 33.599983 && t0 < 34.199982) 
        { 
            result += l_decay(t0, 33.599983, 0.800000) * sqr(t0, 2194.264160, 0.250000, 0.250000);
            result += l_decay(t0, 33.599991, 0.450000) * saw(t0, 1382.300781, 0.250000);
        }
        if (t0 >= 34.199989 && t0 < 34.799988) 
        { 
            result += l_decay(t0, 34.199989, 0.800000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
            result += l_decay(t0, 34.199997, 0.450000) * saw(t0, 1551.579834, 0.250000);
        }
        if (t0 >= 34.649994 && t0 < 34.949993) 
        { 
            result += l_decay(t0, 34.649994, 0.200000) * sqr(t0, 1643.842163, 0.250000, 0.250000);
            result += l_decay(t0, 34.650002, 0.450000) * saw(t0, 1643.842163, 0.250000);
        }*/
    }
	if (t0 >= 36.000008 && t0 < 36.600006)
	{ 
		result += l_decay(t0, 36.000008, 0.800000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 36.600014 && t0 < 37.200012) 
	{ 
		result += l_decay(t0, 36.600014, 0.800000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 37.200020 && t0 < 37.800018) 
	{ 
		result += l_decay(t0, 37.200020, 0.800000) * sqr(t0, 2194.264160, 0.250000, 0.250000);
	}
	if (t0 >= 37.800026 && t0 < 38.250027) 
	{ 
		result += l_decay(t0, 37.800026, 0.800000) * sqr(t0, 4925.957031, 0.250000, 0.250000);
	}
	if (t0 >= 38.250031 && t0 < 38.400032) 
	{ 
		result += l_decay(t0, 38.250031, 0.800000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
        

	return result;
}

float lead_2c(float t0)
{
	float result = 0.0;
	if (t0 >= 39.000008 && t0 < 39.150009) 
	{ 
        result += l_decay(t0, 39.000008, 0.250000) * sqr(t0, 4167.071289, 0.200000, 0.250000);
        result += l_decay(t0, 39.000008, 0.250000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 39.150009 && t0 < 39.300011) 
	{ 
        result += l_decay(t0, 39.150009, 0.250000) * sqr(t0, 3307.410645, 0.200000, 0.250000);
        result += l_decay(t0, 39.150009, 0.250000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 39.300011 && t0 < 39.450012) 
	{ 
        result += l_decay(t0, 39.300011, 0.250000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 39.300011, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 39.450012 && t0 < 39.600014) 
	{ 
        result += l_decay(t0, 39.450012, 0.250000) * sqr(t0, 1856.221313, 0.200000, 0.250000);
        result += l_decay(t0, 39.450012, 0.250000) * sqr(t0, 4925.957031, 0.125000, 0.250000);
	}
	if (t0 >= 39.600014 && t0 < 39.750015) 
	{ 
        result += l_decay(t0, 39.600014, 0.250000) * sqr(t0, 2207.429932, 0.200000, 0.250000);
        result += l_decay(t0, 39.600014, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 40.200020 && t0 < 40.350021) 
	{ 
        result += l_decay(t0, 40.200020, 0.250000) * sqr(t0, 2207.429932, 0.200000, 0.250000);
        result += l_decay(t0, 40.200020, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 40.350021 && t0 < 40.500023) 
	{ 
        result += l_decay(t0, 40.350021, 0.250000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 40.350021, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 40.500023 && t0 < 40.650024) 
	{ 
        result += l_decay(t0, 40.500023, 0.250000) * sqr(t0, 2781.189209, 0.200000, 0.250000);
        result += l_decay(t0, 40.500023, 0.250000) * sqr(t0, 7380.601562, 0.125000, 0.250000);
	}
	if (t0 >= 40.650024 && t0 < 40.800026) 
	{ 
        result += l_decay(t0, 40.650024, 0.250000) * sqr(t0, 4955.513184, 0.200000, 0.250000);
        result += l_decay(t0, 40.650024, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);

	}
	if (t0 >= 41.400032 && t0 < 41.550034) 
	{ 
        result += l_decay(t0, 41.400032, 0.250000) * sqr(t0, 4167.071289, 0.200000, 0.250000);
        result += l_decay(t0, 41.400032, 0.250000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 41.550034 && t0 < 41.700035) 
	{ 
        result += l_decay(t0, 41.550034, 0.250000) * sqr(t0, 3307.410645, 0.200000, 0.250000);
        result += l_decay(t0, 41.550034, 0.250000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 41.700035 && t0 < 41.850037) 
	{ 
        result += l_decay(t0, 41.700035, 0.250000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 41.700035, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 41.850037 && t0 < 42.000038) 
	{ 
        result += l_decay(t0, 41.850037, 0.250000) * sqr(t0, 2083.535645, 0.200000, 0.250000);
        result += l_decay(t0, 41.850037, 0.250000) * sqr(t0, 4925.957031, 0.125000, 0.250000);
	}
	if (t0 >= 42.000038 && t0 < 42.150040) 
	{ 
        result += l_decay(t0, 42.000038, 0.250000) * sqr(t0, 928.110657, 0.500000, 0.250000);
        result += l_decay(t0, 42.000038, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 42.150040 && t0 < 42.300041) 
	{ 
        result += l_decay(t0, 42.150040, 0.250000) * sqr(t0, 928.110657, 0.500000, 0.250000);
        result += l_decay(t0, 42.150040, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 42.300041 && t0 < 42.450043) 
	{ 
        result += l_decay(t0, 42.300041, 0.250000) * sqr(t0, 826.852661, 0.500000, 0.250000);
        result += l_decay(t0, 42.300041, 0.250000) * sqr(t0, 5529.203125, 0.125000, 0.250000);
	}
	if (t0 >= 42.450043 && t0 < 42.600044) 
	{ 
        result += l_decay(t0, 42.450043, 0.250000) * sqr(t0, 928.110657, 0.500000, 0.250000);
        result += l_decay(t0, 42.450043, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 42.750046 && t0 < 42.900047) 
	{ 
        result += l_decay(t0, 42.750046, 0.250000) * sqr(t0, 928.110657, 0.500000, 0.250000);
        result += l_decay(t0, 42.750046, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 43.050049 && t0 < 43.200050) 
	{ 
        result += l_decay(t0, 43.050049, 0.250000) * sqr(t0, 619.439148, 0.500000, 0.250000);
        result += l_decay(t0, 43.050049, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 43.350052 && t0 < 43.500053) 
	{ 
        result += l_decay(t0, 43.350052, 0.250000) * sqr(t0, 1653.705322, 0.500000, 0.250000);
        result += l_decay(t0, 43.350052, 0.250000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 43.800056 && t0 < 43.950058) 
	{ 
        result += l_decay(t0, 43.800056, 0.250000) * sqr(t0, 4167.071289, 0.200000, 0.250000);
        result += l_decay(t0, 43.800056, 0.250000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 43.950058 && t0 < 44.100060) 
	{ 
        result += l_decay(t0, 43.950058, 0.250000) * sqr(t0, 3307.410645, 0.200000, 0.250000);
        result += l_decay(t0, 43.950058, 0.250000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 44.100060 && t0 < 44.250061) 
	{ 
        result += l_decay(t0, 44.100060, 0.250000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 44.100060, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 44.250061 && t0 < 44.400063) 
	{ 
        result += l_decay(t0, 44.250061, 0.250000) * sqr(t0, 1856.221313, 0.200000, 0.250000);
        result += l_decay(t0, 44.250061, 0.250000) * sqr(t0, 4925.957031, 0.125000, 0.250000);
	}
	if (t0 >= 44.400063 && t0 < 44.550064) 
	{ 
        result += l_decay(t0, 44.400063, 0.250000) * sqr(t0, 2207.429932, 0.200000, 0.250000);
        result += l_decay(t0, 44.400063, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 45.000069 && t0 < 45.150070) 
	{ 
        result += l_decay(t0, 45.000069, 0.250000) * sqr(t0, 2207.429932, 0.200000, 0.250000);
        result += l_decay(t0, 45.000069, 0.250000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 45.150070 && t0 < 45.300072) 
	{ 
        result += l_decay(t0, 45.150070, 0.250000) * sqr(t0, 2781.189209, 0.200000, 0.250000);
        result += l_decay(t0, 45.150070, 0.250000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 45.300072 && t0 < 45.450073) 
	{ 
        result += l_decay(t0, 45.300072, 0.250000) * sqr(t0, 2946.568848, 0.200000, 0.250000);
        result += l_decay(t0, 45.300072, 0.250000) * sqr(t0, 7380.601562, 0.125000, 0.250000);
	}
	if (t0 >= 45.450073 && t0 < 45.600075) 
	{ 
        result += l_decay(t0, 45.450073, 0.250000) * sqr(t0, 3712.442627, 0.200000, 0.250000);
        result += l_decay(t0, 45.450073, 0.250000) * sqr(t0, 8777.056641, 0.125000, 0.250000);
	}
	if (t0 >= 45.600075 && t0 < 45.750076) 
	{ 
        result += l_decay(t0, 45.600075, 0.250000) * sqr(t0, 3307.410645, 0.500000, 0.250000);
        result += l_decay(t0, 45.600075, 0.250000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 45.750076 && t0 < 46.050076) 
	{ 
        result += l_decay(t0, 45.750076, 0.400000) * sqr(t0, 3712.442627, 0.500000, 0.250000);
        result += l_decay(t0, 45.750076, 0.400000) * sqr(t0, 8777.056641, 0.125000, 0.250000);
	}
	if (t0 >= 46.050079 && t0 < 46.350079) 
	{ 
        result += l_decay(t0, 46.050079, 0.400000) * sqr(t0, 4167.071289, 0.500000, 0.250000);
        result += l_decay(t0, 46.050079, 0.400000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 46.350082 && t0 < 46.650082) 
	{ 
        result += l_decay(t0, 46.350082, 0.400000) * sqr(t0, 4414.859863, 0.500000, 0.250000);
        result += l_decay(t0, 46.350082, 0.400000) * sqr(t0, 11058.406250, 0.125000, 0.250000);
	}
	if (t0 >= 46.650085 && t0 < 46.950085) 
	{ 
        result += l_decay(t0, 46.650085, 0.400000) * sqr(t0, 4955.513184, 0.500000, 0.250000);
        result += l_decay(t0, 46.650085, 0.400000) * sqr(t0, 11715.979492, 0.125000, 0.250000);
	}
	if (t0 >= 46.950089 && t0 < 47.250088) 
	{ 
        result += l_decay(t0, 46.950089, 0.400000) * sqr(t0, 11124.756836, 0.500000, 0.250000);
        result += l_decay(t0, 46.950089, 0.400000) * sqr(t0, 13150.737305, 0.125000, 0.250000);
	}
	if (t0 >= 47.100090 && t0 < 47.250092) 
	{ 
        result += l_decay(t0, 47.100090, 0.200000) * sqr(t0, 4414.859863, 0.500000, 0.250000);
        result += l_decay(t0, 47.100090, 0.200000) * sqr(t0, 11058.406250, 0.125000, 0.250000);
	}
	if (t0 >= 47.250092 && t0 < 47.400093) 
	{ 
        result += l_decay(t0, 47.250092, 0.200000) * sqr(t0, 4955.513184, 0.500000, 0.250000);
        result += l_decay(t0, 47.250092, 0.200000) * sqr(t0, 11715.979492, 0.125000, 0.250000);
	}
	if (t0 >= 47.400093 && t0 < 47.550095) 
	{ 
        result += l_decay(t0, 47.400093, 0.200000) * sqr(t0, 4167.071289, 0.500000, 0.250000);
        result += l_decay(t0, 47.400093, 0.200000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 47.550095 && t0 < 47.700096) 
	{ 
        result += l_decay(t0, 47.550095, 0.200000) * sqr(t0, 3712.442627, 0.500000, 0.250000);
        result += l_decay(t0, 47.550095, 0.200000) * sqr(t0, 8777.056641, 0.125000, 0.250000);
	}
	if (t0 >= 47.850098 && t0 < 48.000099) 
	{ 
        result += l_decay(t0, 47.850098, 0.200000) * sqr(t0, 4167.071289, 0.500000, 0.250000);
        result += l_decay(t0, 47.850098, 0.200000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 48.600105 && t0 < 48.750107) 
	{ 
        result += l_decay(t0, 48.600105, 0.200000) * sqr(t0, 4167.071289, 0.200000, 0.250000);
        result += l_decay(t0, 48.600105, 0.200000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 48.750107 && t0 < 48.900108) 
	{ 
        result += l_decay(t0, 48.750107, 0.200000) * sqr(t0, 3307.410645, 0.200000, 0.250000);
        result += l_decay(t0, 48.750107, 0.200000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 48.900108 && t0 < 49.050110) 
	{ 
        result += l_decay(t0, 48.900108, 0.200000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 48.900108, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 49.050110 && t0 < 49.200111) 
	{ 
        result += l_decay(t0, 49.050110, 0.200000) * sqr(t0, 1856.221313, 0.200000, 0.250000);
        result += l_decay(t0, 49.050110, 0.200000) * sqr(t0, 4925.957031, 0.125000, 0.250000);
	}
	if (t0 >= 49.200111 && t0 < 49.350113) 
	{ 
        result += l_decay(t0, 49.200111, 0.200000) * sqr(t0, 2207.429932, 0.200000, 0.250000);
        result += l_decay(t0, 49.200111, 0.200000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 49.800117 && t0 < 49.950119) 
	{ 
        result += l_decay(t0, 49.800117, 0.200000) * sqr(t0, 2207.429932, 0.200000, 0.250000);
        result += l_decay(t0, 49.800117, 0.200000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 49.950119 && t0 < 50.100121) 
	{ 
        result += l_decay(t0, 49.950119, 0.200000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 49.950119, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 50.100121 && t0 < 50.250122) 
	{ 
        result += l_decay(t0, 50.100121, 0.200000) * sqr(t0, 2781.189209, 0.200000, 0.250000);
        result += l_decay(t0, 50.100121, 0.200000) * sqr(t0, 7380.601562, 0.125000, 0.250000);
	}
	if (t0 >= 50.250122 && t0 < 50.400124) 
	{ 
        result += l_decay(t0, 50.250122, 0.200000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 50.250122, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 50.850128 && t0 < 51.000130) 
	{ 
        result += l_decay(t0, 50.850128, 0.200000) * sqr(t0, 4955.513184, 0.200000, 0.250000);
        result += l_decay(t0, 50.850128, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 51.000130 && t0 < 51.150131) 
	{ 
        result += l_decay(t0, 51.000130, 0.200000) * sqr(t0, 4167.071289, 0.200000, 0.250000);
        result += l_decay(t0, 51.000130, 0.200000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 51.150131 && t0 < 51.300133) 
	{ 
        result += l_decay(t0, 51.150131, 0.200000) * sqr(t0, 3307.410645, 0.200000, 0.250000);
        result += l_decay(t0, 51.150131, 0.200000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 51.300133 && t0 < 51.450134) 
	{ 
        result += l_decay(t0, 51.300133, 0.200000) * sqr(t0, 2477.756592, 0.200000, 0.250000);
        result += l_decay(t0, 51.300133, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 51.450134 && t0 < 51.600136) 
	{ 
        result += l_decay(t0, 51.450134, 0.200000) * sqr(t0, 2083.535645, 0.200000, 0.250000);
        result += l_decay(t0, 51.450134, 0.200000) * sqr(t0, 4925.957031, 0.125000, 0.250000);
	}
	if (t0 >= 51.600136 && t0 < 51.750137) 
	{ 
        result += l_decay(t0, 51.600136, 0.200000) * sqr(t0, 3712.442627, 0.750000, 0.250000);
        result += l_decay(t0, 51.600136, 0.200000) * sqr(t0, 8777.056641, 0.750000, 0.250000);
	}
	if (t0 >= 51.750137 && t0 < 51.900139) 
	{ 
        result += l_decay(t0, 51.750137, 0.200000) * sqr(t0, 3712.442627, 0.750000, 0.250000);
        result += l_decay(t0, 51.750137, 0.200000) * sqr(t0, 8777.056641, 0.750000, 0.250000);
	}
	if (t0 >= 51.900139 && t0 < 52.050140) 
	{ 
        result += l_decay(t0, 51.900139, 0.200000) * sqr(t0, 3307.410645, 0.750000, 0.250000);
        result += l_decay(t0, 51.900139, 0.200000) * sqr(t0, 8284.435547, 0.750000, 0.250000);
	}
	if (t0 >= 52.050140 && t0 < 52.200142) 
	{ 
        result += l_decay(t0, 52.050140, 0.200000) * sqr(t0, 3712.442627, 0.750000, 0.250000);
        result += l_decay(t0, 52.050140, 0.200000) * sqr(t0, 8777.056641, 0.750000, 0.250000);
	}
	if (t0 >= 52.350143 && t0 < 52.500145) 
	{ 
        result += l_decay(t0, 52.350143, 0.200000) * sqr(t0, 3712.442627, 0.750000, 0.250000);
        result += l_decay(t0, 52.350143, 0.200000) * sqr(t0, 8777.056641, 0.750000, 0.250000);
	}
	if (t0 >= 52.650146 && t0 < 52.800148) 
	{ 
        result += l_decay(t0, 52.650146, 0.200000) * sqr(t0, 3307.410645, 0.750000, 0.250000);
        result += l_decay(t0, 52.650146, 0.200000) * sqr(t0, 8284.435547, 0.750000, 0.250000);
	}
	if (t0 >= 52.950150 && t0 < 53.100151) 
	{ 
        result += l_decay(t0, 52.950150, 0.200000) * sqr(t0, 4167.071289, 0.750000, 0.250000);
        result += l_decay(t0, 52.950150, 0.200000) * sqr(t0, 9851.914062, 0.750000, 0.250000);
	}
	if (t0 >= 53.400154 && t0 < 53.550156) 
	{ 
        result += l_decay(t0, 53.400154, 0.200000) * sqr(t0, 4167.071289, 0.125000, 0.250000);
        result += l_decay(t0, 53.400154, 0.200000) * sqr(t0, 9851.914062, 0.125000, 0.250000);
	}
	if (t0 >= 53.550156 && t0 < 53.700157) 
	{ 
        result += l_decay(t0, 53.550156, 0.200000) * sqr(t0, 3307.410645, 0.125000, 0.250000);
        result += l_decay(t0, 53.550156, 0.200000) * sqr(t0, 8284.435547, 0.125000, 0.250000);
	}
	if (t0 >= 53.700157 && t0 < 53.850159) 
	{ 
        result += l_decay(t0, 53.700157, 0.200000) * sqr(t0, 2477.756592, 0.125000, 0.250000);
        result += l_decay(t0, 53.700157, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 53.850159 && t0 < 54.000160) 
	{ 
        result += l_decay(t0, 53.850159, 0.200000) * sqr(t0, 1856.221313, 0.125000, 0.250000);
        result += l_decay(t0, 53.850159, 0.200000) * sqr(t0, 4925.957031, 0.125000, 0.250000);
	}
	if (t0 >= 54.000160 && t0 < 54.150162) 
	{ 
        result += l_decay(t0, 54.000160, 0.200000) * sqr(t0, 2207.429932, 0.125000, 0.250000);
        result += l_decay(t0, 54.000160, 0.200000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 54.600166 && t0 < 54.750168) 
	{ 
        result += l_decay(t0, 54.600166, 0.200000) * sqr(t0, 2207.429932, 0.125000, 0.250000);
        result += l_decay(t0, 54.600166, 0.200000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 54.750168 && t0 < 54.900169) 
	{ 
        result += l_decay(t0, 54.750168, 0.200000) * sqr(t0, 2477.756592, 0.125000, 0.250000);
        result += l_decay(t0, 54.750168, 0.200000) * sqr(t0, 6575.368652, 0.125000, 0.250000);
	}
	if (t0 >= 54.900169 && t0 < 55.050171) 
	{ 
        result += l_decay(t0, 54.900169, 0.200000) * sqr(t0, 2781.189209, 0.125000, 0.250000);
        result += l_decay(t0, 54.900169, 0.200000) * sqr(t0, 7380.601562, 0.125000, 0.250000);
	}
	if (t0 >= 55.050171 && t0 < 55.200172) 
	{ 
        result += l_decay(t0, 55.050171, 0.200000) * sqr(t0, 2207.429932, 0.125000, 0.250000);
        result += l_decay(t0, 55.050171, 0.200000) * sqr(t0, 5857.989746, 0.125000, 0.250000);
	}
	if (t0 >= 55.200172 && t0 < 55.460171) 
	{ 
        result += l_decay(t0, 55.200172, 0.400000) * sqr(t0, 3307.410645, 0.060000, 0.250000);
        result += l_decay(t0, 55.200172, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 55.350174 && t0 < 55.610172) 
	{ 
        result += l_decay(t0, 55.350174, 0.400000) * sqr(t0, 3307.410645, 0.060000, 0.250000);
        result += l_decay(t0, 55.350174, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 55.650177 && t0 < 55.910175) 
	{ 
        result += l_decay(t0, 55.650177, 0.400000) * sqr(t0, 2477.756592, 0.060000, 0.250000);
        result += l_decay(t0, 55.650177, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 55.800179 && t0 < 56.060177) 
	{ 
        result += l_decay(t0, 55.800179, 0.400000) * sqr(t0, 3307.410645, 0.060000, 0.250000);
        result += l_decay(t0, 55.800179, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 55.950180 && t0 < 56.210178) 
	{ 
        result += l_decay(t0, 55.950180, 0.400000) * sqr(t0, 3307.410645, 0.060000, 0.250000);
        result += l_decay(t0, 55.950180, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 56.250183 && t0 < 56.510181) 
	{ 
        result += l_decay(t0, 56.250183, 0.400000) * sqr(t0, 2477.756592, 0.060000, 0.250000);
        result += l_decay(t0, 56.250183, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 56.400185 && t0 < 56.660183) 
	{ 
        result += l_decay(t0, 56.400185, 0.400000) * sqr(t0, 3307.410645, 0.060000, 0.250000);
        result += l_decay(t0, 56.400185, 0.400000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 56.700188 && t0 < 56.960186) 
	{ 
        result += l_decay(t0, 56.700188, 0.400000) * sqr(t0, 2477.756592, 0.060000, 0.250000);
        result += l_decay(t0, 56.700188, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 56.850189 && t0 < 57.110188) 
	{ 
        result += l_decay(t0, 56.850189, 0.400000) * sqr(t0, 2477.756592, 0.060000, 0.250000);
        result += l_decay(t0, 56.850189, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 57.000191 && t0 < 57.260189) 
	{ 
        result += l_decay(t0, 57.000191, 0.400000) * sqr(t0, 2625.093750, 0.060000, 0.250000);
        result += l_decay(t0, 57.000191, 0.400000) * sqr(t0, 5218.874023, 0.500000, 0.250000);
	}
	if (t0 >= 57.300194 && t0 < 57.560192) 
	{ 
        result += l_decay(t0, 57.300194, 0.400000) * sqr(t0, 2477.756592, 0.060000, 0.250000);
        result += l_decay(t0, 57.300194, 0.400000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}

	return result;
}

float lead_1a(float t0)
{
    t0 = mod(t0,9.6);
	float result = 0.0;
	if (t0 >= 0.150000 && t0 < 0.450000) 
	{ 
		result += l_decay(t0, 0.150000, 0.300000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
	}
	if (t0 >= 0.300000 && t0 < 0.600000) 
	{ 
		result += l_decay(t0, 0.300000, 0.300000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 0.450000 && t0 < 0.750000) 
	{ 
		result += l_decay(t0, 0.450000, 0.300000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 0.600000 && t0 < 0.900000) 
	{ 
		result += l_decay(t0, 0.600000, 0.300000) * sqr(t0, 4925.957031, 0.250000, 0.250000);
	}
	if (t0 >= 0.750000 && t0 < 1.050000) 
	{ 
		result += l_decay(t0, 0.750000, 0.300000) * sqr(t0, 4925.957031, 0.250000, 0.250000);
	}
	if (t0 >= 1.050000 && t0 < 1.350000) 
	{ 
		result += l_decay(t0, 1.050000, 0.300000) * sqr(t0, 4925.957031, 0.250000, 0.250000);
	}
	if (t0 >= 1.200000 && t0 < 1.500000) 
	{ 
		result += l_decay(t0, 1.200000, 0.300000) * sqr(t0, 4388.528320, 0.250000, 0.250000);
	}
	if (t0 >= 1.500000 && t0 < 1.800000) 
	{ 
		result += l_decay(t0, 1.500000, 0.300000) * sqr(t0, 4388.528320, 0.250000, 0.250000);
	}
	if (t0 >= 1.800000 && t0 < 2.100000) 
	{ 
		result += l_decay(t0, 1.800000, 0.300000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 2.100000 && t0 < 2.400000) 
	{ 
		result += l_decay(t0, 2.100000, 0.300000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 2.550000 && t0 < 2.850000) 
	{ 
		result += l_decay(t0, 2.550000, 0.300000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
	}
	if (t0 >= 2.700000 && t0 < 3.000000) 
	{ 
		result += l_decay(t0, 2.700000, 0.300000) * sqr(t0, 3103.159668, 0.250000, 0.250000);
	}
	if (t0 >= 2.850000 && t0 < 3.150000) 
	{ 
		result += l_decay(t0, 2.850000, 0.300000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 3.000000 && t0 < 3.300000) 
	{ 
		result += l_decay(t0, 3.000000, 0.300000) * sqr(t0, 4388.528320, 0.250000, 0.250000);
	}
	if (t0 >= 3.150001 && t0 < 3.450001) 
	{ 
		result += l_decay(t0, 3.150001, 0.300000) * sqr(t0, 4388.528320, 0.250000, 0.250000);
	}
	if (t0 >= 3.450001 && t0 < 3.750001) 
	{ 
		result += l_decay(t0, 3.450001, 0.300000) * sqr(t0, 4388.528320, 0.250000, 0.250000);
	}
	if (t0 >= 3.600001 && t0 < 3.900001) 
	{ 
		result += l_decay(t0, 3.600001, 0.300000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 3.900001 && t0 < 4.200001) 
	{ 
		result += l_decay(t0, 3.900001, 0.300000) * sqr(t0, 4925.957031, 0.250000, 0.250000);
	}
	if (t0 >= 4.050001 && t0 < 4.350001) 
	{ 
		result += l_decay(t0, 4.050001, 0.300000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 4.350001 && t0 < 4.650002) 
	{ 
		result += l_decay(t0, 4.350001, 0.300000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 4.650002 && t0 < 4.950002) 
	{ 
		result += l_decay(t0, 4.650002, 0.300000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 5.250002 && t0 < 5.550002) 
	{ 
		result += l_decay(t0, 5.250002, 0.300000) * sqr(t0, 2462.978516, 0.250000, 0.250000);
	}
	if (t0 >= 5.400002 && t0 < 5.700002) 
	{ 
		result += l_decay(t0, 5.400002, 0.300000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 5.550002 && t0 < 5.850002) 
	{ 
		result += l_decay(t0, 5.550002, 0.300000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 5.700002 && t0 < 6.000002) 
	{ 
		result += l_decay(t0, 5.700002, 0.300000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 5.850002 && t0 < 6.150002) 
	{ 
		result += l_decay(t0, 5.850002, 0.300000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 6.300003 && t0 < 6.600003) 
	{ 
		result += l_decay(t0, 6.300003, 0.300000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 6.600003 && t0 < 6.900003) 
	{ 
		result += l_decay(t0, 6.600003, 0.300000) * sqr(t0, 2764.601562, 0.250000, 0.250000);
	}
	if (t0 >= 6.900003 && t0 < 7.200003) 
	{ 
		result += l_decay(t0, 6.900003, 0.300000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 7.200003 && t0 < 7.800003) 
	{ 
		result += l_decay(t0, 7.200003, 0.800000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 7.800004 && t0 < 8.400003) 
	{ 
		result += l_decay(t0, 7.800004, 0.800000) * sqr(t0, 3103.159668, 0.250000, 0.250000);
	}
	if (t0 >= 8.400002 && t0 < 9.000003) 
	{ 
		result += l_decay(t0, 8.400002, 0.800000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 9.000001 && t0 < 9.600001) 
	{ 
		result += l_decay(t0, 9.000001, 0.800000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}

	return result;
}

float lead_1b(float t0)
{
	float result = 0.0;
	if (t0 >= 19.350000 && t0 < 19.500000) 
	{ 
		result += l_decay(t0, 19.350000, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 19.500000 && t0 < 19.650000) 
	{ 
		result += l_decay(t0, 19.500000, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 19.650000 && t0 < 19.799999) 
	{ 
		result += l_decay(t0, 19.650000, 0.200000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}
	if (t0 >= 19.799999 && t0 < 19.949999) 
	{ 
		result += l_decay(t0, 19.799999, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 19.949999 && t0 < 20.099998) 
	{ 
		result += l_decay(t0, 19.949999, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 20.249998 && t0 < 20.399998) 
	{ 
		result += l_decay(t0, 20.249998, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 20.399998 && t0 < 20.549997) 
	{ 
		result += l_decay(t0, 20.399998, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 20.599998 && t0 < 20.749998) 
	{ 
		result += l_decay(t0, 20.599998, 0.200000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}
	if (t0 >= 20.799999 && t0 < 20.949999) 
	{ 
		result += l_decay(t0, 20.799999, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 21.000000 && t0 < 21.150000) 
	{ 
		result += l_decay(t0, 21.000000, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 21.449999 && t0 < 21.599998) 
	{ 
		result += l_decay(t0, 21.449999, 0.200000) * sqr(t0, 3287.684326, 0.500000, 0.250000);
	}
	if (t0 >= 21.599998 && t0 < 21.749998) 
	{ 
		result += l_decay(t0, 21.599998, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 21.899998 && t0 < 22.049997) 
	{ 
		result += l_decay(t0, 21.899998, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 22.049997 && t0 < 22.199997) 
	{ 
		result += l_decay(t0, 22.049997, 0.200000) * sqr(t0, 4388.528320, 0.500000, 0.250000);
	}
	if (t0 >= 22.349997 && t0 < 22.499996) 
	{ 
		result += l_decay(t0, 22.349997, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 22.649996 && t0 < 22.799995) 
	{ 
		result += l_decay(t0, 22.649996, 0.200000) * sqr(t0, 4388.528320, 0.500000, 0.250000);
	}
	if (t0 >= 22.949995 && t0 < 23.099995) 
	{ 
		result += l_decay(t0, 22.949995, 0.200000) * sqr(t0, 4388.528320, 0.500000, 0.250000);
	}
	if (t0 >= 23.099995 && t0 < 23.249994) 
	{ 
		result += l_decay(t0, 23.099995, 0.200000) * sqr(t0, 3690.300781, 0.500000, 0.250000);
	}
	if (t0 >= 23.249994 && t0 < 23.399994) 
	{ 
		result += l_decay(t0, 23.249994, 0.200000) * sqr(t0, 4142.217773, 0.500000, 0.250000);
	}
	if (t0 >= 23.399994 && t0 < 23.549994) 
	{ 
		result += l_decay(t0, 23.399994, 0.200000) * sqr(t0, 4388.528320, 0.500000, 0.250000);
	}
	if (t0 >= 23.549994 && t0 < 23.699993) 
	{ 
		result += l_decay(t0, 23.549994, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 23.699993 && t0 < 23.849993) 
	{ 
		result += l_decay(t0, 23.699993, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 23.849993 && t0 < 23.999992) 
	{ 
		result += l_decay(t0, 23.849993, 0.200000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}
	if (t0 >= 23.999992 && t0 < 24.149992) 
	{ 
		result += l_decay(t0, 23.999992, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 24.749990 && t0 < 24.899990) 
	{ 
		result += l_decay(t0, 24.749990, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 24.899990 && t0 < 25.049990) 
	{ 
		result += l_decay(t0, 24.899990, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 25.049990 && t0 < 25.199989) 
	{ 
		result += l_decay(t0, 25.049990, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 25.199989 && t0 < 25.349989) 
	{ 
		result += l_decay(t0, 25.199989, 0.200000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 25.349989 && t0 < 25.499989) 
	{ 
		result += l_decay(t0, 25.349989, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 25.499989 && t0 < 25.649988) 
	{ 
		result += l_decay(t0, 25.499989, 0.200000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 25.649988 && t0 < 25.799988) 
	{ 
		result += l_decay(t0, 25.649988, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 25.799988 && t0 < 25.949987) 
	{ 
		result += l_decay(t0, 25.799988, 0.200000) * sqr(t0, 9851.914062, 0.500000, 0.250000);
	}
	if (t0 >= 25.949987 && t0 < 26.099987) 
	{ 
		result += l_decay(t0, 25.949987, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 26.249987 && t0 < 26.399986) 
	{ 
		result += l_decay(t0, 26.249987, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 26.399986 && t0 < 26.549986) 
	{ 
		result += l_decay(t0, 26.399986, 0.200000) * sqr(t0, 11058.406250, 0.500000, 0.250000);
	}
	if (t0 >= 26.699986 && t0 < 26.849985) 
	{ 
		result += l_decay(t0, 26.699986, 0.200000) * sqr(t0, 11058.406250, 0.500000, 0.250000);
	}
	if (t0 >= 26.849985 && t0 < 26.999985) 
	{ 
		result += l_decay(t0, 26.849985, 0.200000) * sqr(t0, 11058.406250, 0.500000, 0.250000);
	}
	if (t0 >= 26.999985 && t0 < 27.149984) 
	{ 
		result += l_decay(t0, 26.999985, 0.200000) * sqr(t0, 9851.914062, 0.500000, 0.250000);
	}
	if (t0 >= 27.299984 && t0 < 27.449984) 
	{ 
		result += l_decay(t0, 27.299984, 0.200000) * sqr(t0, 8777.056641, 0.500000, 0.250000);
	}
	if (t0 >= 27.449984 && t0 < 27.599983) 
	{ 
		result += l_decay(t0, 27.449984, 0.200000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 27.749983 && t0 < 27.899982) 
	{ 
		result += l_decay(t0, 27.749983, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 27.899982 && t0 < 28.049982) 
	{ 
		result += l_decay(t0, 27.899982, 0.200000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 28.049982 && t0 < 28.199982) 
	{ 
		result += l_decay(t0, 28.049982, 0.200000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}
	if (t0 >= 28.199982 && t0 < 28.349981) 
	{ 
		result += l_decay(t0, 28.199982, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 29.399979 && t0 < 29.549978) 
	{ 
		result += l_decay(t0, 29.399979, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 29.549978 && t0 < 29.699978) 
	{ 
		result += l_decay(t0, 29.549978, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 29.849977 && t0 < 29.999977) 
	{ 
		result += l_decay(t0, 29.849977, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 30.149977 && t0 < 30.299976) 
	{ 
		result += l_decay(t0, 30.149977, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 30.449976 && t0 < 30.599976) 
	{ 
		result += l_decay(t0, 30.449976, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 30.599976 && t0 < 30.749975) 
	{ 
		result += l_decay(t0, 30.599976, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 30.749975 && t0 < 30.899975) 
	{ 
		result += l_decay(t0, 30.749975, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 30.899975 && t0 < 31.049974) 
	{ 
		result += l_decay(t0, 30.899975, 0.200000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 31.049974 && t0 < 31.199974) 
	{ 
		result += l_decay(t0, 31.049974, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 31.199974 && t0 < 31.349974) 
	{ 
		result += l_decay(t0, 31.199974, 0.200000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 31.349974 && t0 < 31.499973) 
	{ 
		result += l_decay(t0, 31.349974, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 31.649973 && t0 < 31.799973) 
	{ 
		result += l_decay(t0, 31.649973, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 31.949972 && t0 < 32.099972) 
	{ 
		result += l_decay(t0, 31.949972, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 32.249973 && t0 < 32.399975) 
	{ 
		result += l_decay(t0, 32.249973, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 32.399975 && t0 < 32.549976) 
	{ 
		result += l_decay(t0, 32.399975, 0.200000) * sqr(t0, 4388.528320, 0.500000, 0.250000);
	}
	if (t0 >= 32.549976 && t0 < 32.699978) 
	{ 
		result += l_decay(t0, 32.549976, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 32.699978 && t0 < 32.849979) 
	{ 
		result += l_decay(t0, 32.699978, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 32.849979 && t0 < 32.999981) 
	{ 
		result += l_decay(t0, 32.849979, 0.200000) * sqr(t0, 5529.203125, 0.500000, 0.250000);
	}
	if (t0 >= 33.149982 && t0 < 33.299984) 
	{ 
		result += l_decay(t0, 33.149982, 0.200000) * sqr(t0, 6206.319336, 0.500000, 0.250000);
	}
	if (t0 >= 33.449986 && t0 < 33.599987) 
	{ 
		result += l_decay(t0, 33.449986, 0.200000) * sqr(t0, 4925.957031, 0.500000, 0.250000);
	}
	if (t0 >= 34.799999 && t0 < 34.950001) 
	{ 
		result += l_decay(t0, 34.799999, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 34.950001 && t0 < 35.100002) 
	{ 
		result += l_decay(t0, 34.950001, 0.200000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 35.100002 && t0 < 35.250004) 
	{ 
		result += l_decay(t0, 35.100002, 0.200000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 35.250004 && t0 < 35.400005) 
	{ 
		result += l_decay(t0, 35.250004, 0.200000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 35.550007 && t0 < 35.700008) 
	{ 
		result += l_decay(t0, 35.550007, 0.200000) * sqr(t0, 8284.435547, 0.500000, 0.250000);
	}
	if (t0 >= 35.700008 && t0 < 35.850010) 
	{ 
		result += l_decay(t0, 35.700008, 0.200000) * sqr(t0, 7380.601562, 0.500000, 0.250000);
	}
	if (t0 >= 35.850010 && t0 < 36.000011) 
	{ 
		result += l_decay(t0, 35.850010, 0.200000) * sqr(t0, 6575.368652, 0.500000, 0.250000);
	}
	if (t0 >= 36.000011 && t0 < 36.450012) 
	{ 
		result += l_decay(t0, 36.000011, 0.700000) * sqr(t0, 4388.528320, 0.250000, 0.250000);
	}
	if (t0 >= 36.600018 && t0 < 37.050018) 
	{ 
		result += l_decay(t0, 36.600018, 0.700000) * sqr(t0, 4142.217773, 0.250000, 0.250000);
	}
	if (t0 >= 37.200024 && t0 < 37.650024) 
	{ 
		result += l_decay(t0, 37.200024, 0.700000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}
	if (t0 >= 37.800030 && t0 < 38.250031) 
	{ 
		result += l_decay(t0, 37.800030, 0.700000) * sqr(t0, 3690.300781, 0.250000, 0.250000);
	}
	if (t0 >= 38.250034 && t0 < 38.400036) 
	{ 
		result += l_decay(t0, 38.250034, 0.150000) * sqr(t0, 3287.684326, 0.250000, 0.250000);
	}

	return result;
}

vec2 mainSound(float t0)
{
	vec2 result = vec2(0.0,0.0);
    // Make the song loop
	float t1 = mod(t0,57.599998);
	result += vec2(1.000000,0.600000) * (bass_a(t1));
	result += vec2(1.000000,0.600000) * (bass_b(t1));
    result += vec2(1.000000,0.600000) * (bass_c(t1));
    
    result += vec2(0.800000,1.000000) * (drums(t1));
    result += vec2(1.000000,0.800000) * (subdrums(t1));
    
    
	result += vec2(1.000000,0.000000) * (glissando_l(t1));
    result += vec2(0.000000,1.000000) * (glissando_r(t1));
    result += vec2(1.000000,0.600000) * (abacking(t1));
    
    if (t1 < 19.2)
    {
        result += vec2(0.700000,1.000000) * (lead_1a(t1));
        result += vec2(1.000000,0.700000) * (lead_2a(t1));
    }
    
    result += vec2(0.700000,1.000000) * (lead_1b(t1));
    result += vec2(1.000000,1.000000) * (echo1b(t1));
	result += vec2(1.000000,0.700000) * (lead_2b(t1));
    
	result += vec2(1.000000,0.700000) * (lead_2c(t1));

	return result;
}