;------------------------------------------------------------------------
;------------------------------------------------------------------------
;Title:		loadsnow_f.pro
;Purpose:	To read netCDF files created by snowout_f.pro.
;			These are snow cloud retrievals from the MMCR package.
;
;I/O format:	.r loadsnow_f
;
;Author:	Matthew Shupe
;Date:		1/7/00
;Modified:	1/7/00
;------------------------------------------------------------------------
;------------------------------------------------------------------------
filename=file[0]

print,'Loading ',filename
fid=ncdf_open(filename)
ncdf_varget,fid,0,time		;time [decimal hour]
ncdf_varget,fid,1,height	;height [km]
ncdf_varget,fid,2,sf		;water equivalent snowfall rate [mm/hr]
ncdf_close,fid

end ;prog