synth/mainloop.f