function [p]=idma_float_plot(nameFloat);
%
%four Argo floats in subtropical Pacific:
% nameFloat='2900828';
% nameFloat='2900829';
% nameFloat='2900830';
% nameFloat='2900831';

addpath gcmfaces;
addpath MITprof;
MITprof_global

%load Argo data set:
dirIn='release1/MITprof/';
nameFile='argo_feb2013_2008_to_2010_model.nc';
prof=MITprof_load([dirIn nameFile]);

%isolate one instrument time series:
p=MITprof_subset(prof,'descr',nameFloat);

%find increasing time order, for plotting:
[tmp1,tt]=sort(p.prof_date);

%plot location of profiles:
figureL;
subplot(2,2,1); set(gca,'FontSize',12); 
plot(p.prof_lon(tt),p.prof_lat(tt),'.-'); grid on; 
t0=num2str(min(p.prof_YYYYMMDD));
t1=num2str(max(p.prof_YYYYMMDD));
title(['float ' nameFloat ' from ' t0 ' to ' t1]);
% axis([-180 -120 10 40]); 

%plot T time series at select depths:
subplot(2,2,2); set(gca,'FontSize',12); 
kk=2; d=num2str(round(p.prof_depth(kk)));
o=p.prof_T(tt,kk); m=p.prof_Testim(tt,kk);
plot(o,'b.-'); hold on; plot(m,'r.-'); grid on; 
title(['T at ' d 'm, argo (blue) and ecco v4 (red)']);

subplot(2,2,4); set(gca,'FontSize',12); 
kk=10; d=num2str(round(p.prof_depth(kk)));
o=p.prof_T(tt,kk); m=p.prof_Testim(tt,kk);
plot(o,'b.-'); hold on; plot(m,'r.-'); grid on; 
title(['T at ' d 'm, argo (blue) and ecco v4 (red)']);

%plot S-T diagram:
subplot(2,2,3); set(gca,'FontSize',12); 
plot(p.prof_S(:),p.prof_T(:),'b.'); hold on;
plot(p.prof_Sestim(:),p.prof_Testim(:),'r.'); hold on;
xlabel('salinity'); ylabel('temperature');
grid on; title('argo (blue) and ecco v4 (red)');