pro plot_synop_cr, cr

crstr = strtrim(string(cr),1)
dir = "/synoptic/carrot/M/" + crstr

plot_synop, in=dir + '/synop_Ml_0.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_15E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_15W.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_30E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_30W.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_45E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_45W.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_60E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Ml_60W.' + crstr + '.fits', /gif, /next, /carrot
 
plot_synop, in=dir + '/synop_Mr_0.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_15E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_15W.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_30E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_30W.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_45E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_45W.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_60E.' + crstr + '.fits', /gif, /next, /carrot
plot_synop, in=dir + '/synop_Mr_60W.' + crstr + '.fits', /gif, /next, /carrot

end