// This moves "program changes" to the beginning
// of their respective tracks.
// At least the Mac MIDI performer (Quicktime)
// Performs as if it were first.

#include "h.h"
BP bp; note * mus = 0;
int main(){note* music = Read("", &bp);
void fed(note n){
  if(n.dur == ProgramChange) n.start=0; aug(n, &mus);}
scan(fed, music, 1);
Write("", mus, &bp); return 0;}