An additional test of sequencing music inside a mathematical expression which is synchronised with the master BPM.

Play one long trigger at 125 BPM C2 for the bassline (the synth pitch is controlled by MIDI note number. However, drums are the same frequency regardless of MIDI note number) . For Alpha version parsing.

The O1 formula is:

clamp(-1, ((0.9 * ((floor(mod(t*(tempo/15),16))==0) + (floor(mod(t*(tempo/15),16))==4) + (floor(mod(t*(tempo/15),16))==8) + (floor(mod(t*(tempo/15),16))==12)) * exp(-mod(t,15/tempo)*15) * sinew(integrate(40 + 150*exp(-mod(t,15/tempo)*50)))) + (0.2 * ((floor(mod(t*(tempo/15),16))==2) + (floor(mod(t*(tempo/15),16))==6) + (floor(mod(t*(tempo/15),16))==10) + (floor(mod(t*(tempo/15),16))==14)) * exp(-mod(t,15/tempo)*40) * randv(t*srate)) + (0.6 * exp(-mod(t,15/tempo)*(25+15*sinew(integrate(tempo/2640)))) * (((floor(mod(t*(tempo/15),16))==0) + (floor(mod(t*(tempo/15),16))==3) + (floor(mod(t*(tempo/15),16))==6) + (floor(mod(t*(tempo/15),16))==8) + (floor(mod(t*(tempo/15),16))==11) + (floor(mod(t*(tempo/15),16))==14)) + (floor(mod(t*(tempo/15)/16,3))==2) * ((floor(mod(t*(tempo/15),16))==4) + (floor(mod(t*(tempo/15),16))==12))) * sinew(integrate(f * ((floor(mod(t*(tempo/15),16))==0) + (floor(mod(t*(tempo/15),16))==3)*2.0 + (floor(mod(t*(tempo/15),16))==4) + (floor(mod(t*(tempo/15),16))==6) + (floor(mod(t*(tempo/15),16))==8)*1.189 + (floor(mod(t*(tempo/15),16))==11)*1.498 + (floor(mod(t*(tempo/15),16))==12) + (floor(mod(t*(tempo/15),16))==14)*0.749)))) + (0.015 * randv(t*srate*1.5))) / (1 + abs((0.9 * ((floor(mod(t*(tempo/15),16))==0) + (floor(mod(t*(tempo/15),16))==4) + (floor(mod(t*(tempo/15),16))==8) + (floor(mod(t*(tempo/15),16))==12)) * exp(-mod(t,15/tempo)*15) * sinew(integrate(40 + 150*exp(-mod(t,15/tempo)*50)))) + (0.2 * ((floor(mod(t*(tempo/15),16))==2) + (floor(mod(t*(tempo/15),16))==6) + (floor(mod(t*(tempo/15),16))==10) + (floor(mod(t*(tempo/15),16))==14)) * exp(-mod(t,15/tempo)*40) * randv(t*srate)) + (0.6 * exp(-mod(t,15/tempo)*(25+15*sinew(integrate(tempo/2640)))) * (((floor(mod(t*(tempo/15),16))==0) + (floor(mod(t*(tempo/15),16))==3) + (floor(mod(t*(tempo/15),16))==6) + (floor(mod(t*(tempo/15),16))==8) + (floor(mod(t*(tempo/15),16))==11) + (floor(mod(t*(tempo/15),16))==14)) + (floor(mod(t*(tempo/15)/16,3))==2) * ((floor(mod(t*(tempo/15),16))==4) + (floor(mod(t*(tempo/15),16))==12))) * sinew(integrate(f * ((floor(mod(t*(tempo/15),16))==0) + (floor(mod(t*(tempo/15),16))==3)*2.0 + (floor(mod(t*(tempo/15),16))==4) + (floor(mod(t*(tempo/15),16))==6) + (floor(mod(t*(tempo/15),16))==8)*1.189 + (floor(mod(t*(tempo/15),16))==11)*1.498 + (floor(mod(t*(tempo/15),16))==12) + (floor(mod(t*(tempo/15),16))==14)*0.749)))) + (0.015 * randv(t*srate*1.5)))), 1)