% function release1_el_comp(runid)

clear all

tallfigure

runid = 'FCAST_1.1B1/EN324_FC.05';

tstr = str2mat('Model drifter #1 (ID 200) z=33m',...
               'Model drifter #2 (ID 395) z=13m',...
               'Model drifter #3 (ID 234) z=33m',...
               'Model drifter #4 (ID 393) z=8m');

id = [200 395 234 393]';
idepth = [33 13 33 8]';

for idrog = 1:4
  subplot(2,2,idrog)
  drifter_iter_composite(runid,idrog)
  axis([-68.0 -67.25 40.8 41.3])
  axis('square')
% legend('Iter 1','Iter 3');
  title(['Model drifter #',num2str(idrog),' (ID ',num2str(id(idrog)),...
         ') z=',num2str(idepth(idrog)),'m']);
  xlabel('Longitude');
  ylabel('Latitude');
  labcont
end

gtext(runid);

% axis([-67.8 -67.4 41.0 41.3])
% axis('square')
% legend('Iter 1','Iter 3');

% labcont


