%Spaghetti code to check to plot CIMT data
%KLM, 05/19/2004
%need to change the netcdf file to reflect the data that you want to plot
disp('Check data file name before proceeding')


x=netcdf('../200406/netcdf/Ed10_mean.nc');
names = ncnames(var(x));
time=utc2sdn(x{1}(:));
data=x{5}(:);
squeezed_data=squeeze(data);
wavel=x{4}(:);
surf(wavel, time, squeezed_data, 'EdgeColor', 'Flat');
datetick('y');