pro plot_Ic_synop_cr, cr crstr = strtrim(string(cr),1) dir = "/synoptic/carrot/Ic/" + crstr plot_Ic_synop, in=dir + '/synop_Ic_N=3.' + crstr + '.fits', /gif, /next, /carrot plot_Ic_synop, in=dir + '/synop_Ic_N=5.' + crstr + '.fits', /gif, /next, /carrot end