%% GliderFET009
g = Spray2Data('25B68601');
g.getpHCal
% g.getCurrentT();
% T2 = g.T(1263,:); % deepest profile available
% k2 = 5.234860E-04;
% k0_GLIDERFET014_rob = calc_k0_ext(T2.vrse,T2.tc,T2.psal,T2.phin_canb,k2);
%%
load("\\thalassa\ProjectLibrary\901805_Coastal_Biogeochemical_Sensing\Spray_Data\25B68601\real_time_binned\25B68601sat.mat");
row = 47;
col = 220;
% k2 = 5.234860E-04;
k2 = g.pHcal.k2_fp_c0;
Pcoefs = [g.pHcal.fp_k1, g.pHcal.fp_k2, g.pHcal.fp_k3, ...
          g.pHcal.fp_k4, g.pHcal.fp_k5, g.pHcal.fp_k6]';
k0_GLIDERFET009 = k0frompH_claude(s.vrse(row,col),s.pres(row,col),s.tc(row,col),s.psal(row,col),s.pHin_esper(row,col),k2,Pcoefs)