matthiasm@8: function schedule = mk_schedule(init_temp, final_temp, anneal_rate)
matthiasm@8: 
matthiasm@8: init_temp = 10; final_temp = 1e-2; anneal_rate = 0.8;
matthiasm@8: schedule = [];
matthiasm@8: temp=init_temp;
matthiasm@8: schedule = [schedule temp];
matthiasm@8: while temp > final_temp
matthiasm@8:   temp = temp * anneal_rate;
matthiasm@8:   schedule = [schedule temp];
matthiasm@8: end