[t,dat_800,T1,T2,wl]=rd_wetview_acs('800ml_acs_020305.dat');
[t,dat_FSW,T1,T2,wl]=rd_wetview_acs('FSW_acs_020305.dat');
a=mean(dat_800(:,83:164))-mean(dat_FSW(:,83:164));
c=mean(dat_800(:,1:82))-mean(dat_FSW(:,1:82));
b=c-a;
a_cor=a-b*a(82)/b(82);
a_cor_2=a-a(82);
plot(wl,a_cor/14.82)
hold on
plot(wl,a_cor_2/14.82)
hold off
