function at_gernot
% at_gernot

LineWidth = 1.2;
for ids = {'m1','m2'}
   
   id = char(ids);
   
   % Read the calibration data and data
   cal = load(fullfile(getOasisPath, id, 'data', 'pco2.cal'));
   data = load(fullfile(getOasisPath, id, 'data', 'pco2.data'));
   
   % Convert millisec utc to matlab serial days
   dataTime = utc2sdn(data(:,1)./1000); 
   calTime  = utc2sdn(cal(:,1)./1000);  
   
   % Free up memorey
   data = data(:,2);
   cal  = cal(:,2);
   
   % Interpolate cals to the same times as the data
   calI = interp1(calTime, cal, dataTime);
   
   % get corrected data
   calData = data - calI;
   
   % find the last 7 days
   good = find(dataTime >= (now - 7));
   dataTime = dataTime(good);
   data = data(good);
   calData = calData(good);
   
   % Plot it
   fh = figure;
   plot(dataTime, data, '-', 'Color', [.8 .23 .12], 'LineWidth', LineWidth)
   hold on
   plot(dataTime, calData, '-', 'Color', [.12 .23 .8], 'LineWidth', LineWidth)
   hold off
   set(gca, 'XLim', [now-7 now])
   daytick('x')
   legend('pCO_2 [raw]', 'pCO_2 [calibrated]', 0)
   xlabel('\bf{Date}')
   ylabel('\bf{\Delta pCO_2 [\muatm]}');
   title(['\bf{pCO_2 Data from ' upper(id) '- Last 7 Days}']);
   setfontsize(7)
   set(fh, 'PaperPosition', [0 0 4 3])
   grid on
   writegif(fullfile(getWebPath, 'bog', 'images',  [id  'pco2.gif']), fh)
   close(fh);
   
   
   
   

   
   
end
