
% SCS and PSD radiometer comparisons
%DEW May 12 2007
clear
close all
load d:/RHB_AMMA07_process_progs/scs/scstmp
load d:/RHB_AMMA07_process_progs/scs/psdtmp


if 1
    % DEW Oct 15, 2006 IR comparison
    figure;
    subplot(2,1,1)
    plot(gpstim./24+ddd,imrain,'r')
        title('SCS and ETL Rain')
            ylabel('SCS')

    subplot(2,1,2)
    plot(jad,org)
    %axis([jad(1),jad(1)+1,300,max(pir1)+50])

    xlabel('Julian Day')
    %ylabel('W/m**2')
    ylabel('PSD')
    %print_buffer=['-djpeg90 F:/AMMA_2007/RHB/flux/Raw_Images/rain' jd '.jpg']
    %eval(['print ' print_buffer]);
end %%


