function plot_lmg_met10mA(t1,t2)
% plot_lmg_met10mA(t1,t2) plots the basic
% 10-min met data in lmg_met1m or cruise_met
% for the time between t1 and t2 (in yds). t2 is 
% optional, default value is t1+1. modified for 
% LMG02-1A -- plot SW, SWNF, PAR
% 3/1/02

if nargin==1,
   t2=t1+1;
end

% get data
load cruise_met

% find section to plot
% modified to read cruise_met data
k=find(t>=t1 & t<=t2);
t=t(k);sw=sw(k);par=par(k);swnf=swnf(k);

% create 10-min data
A=[t sw swnf par]; 
B=boxave(A,3,10);
ta=B(:,1);swa=B(:,2);swnfa=B(:,3);para=B(:,4);

% setup plot
clf
% orient tall
t0=floor(min(t));t1=ceil(max(t));

LW=1.5;

subplot(3,1,1)
h=plot(t,sw,'b',t,0*sw,'k');set(h,'linew',LW);
ylabel('SW','fontw','bold')
grid
axis([t0 t1 -100 700]);
% title('LMG02-1A 10-min Meteorological Data','fontw','bold')

subplot(3,1,2)
h=plot(ta,swnfa,'b',ta,0*ta,'k');set(h,'linew',LW);
ylabel('SWN','fontw','bold')
grid
axis([t0 t1 -100 700]);

subplot(3,1,3)
h=plot(ta,para,'b');set(h,'linew',LW);
ylabel('PAR','fontw','bold')
grid
axis([t0 t1 -100 2500]);

xlabel('2002 Yearday   (February 19 = 50)','fontw','bold')
hold off