modis_column Subroutine

public subroutine modis_column(nPoints, nSubCols, phase, cloud_top_pressure, optical_thickness, particle_size, Cloud_Fraction_Total_Mean, Cloud_Fraction_Water_Mean, Cloud_Fraction_Ice_Mean, Cloud_Fraction_High_Mean, Cloud_Fraction_Mid_Mean, Cloud_Fraction_Low_Mean, Optical_Thickness_Total_Mean, Optical_Thickness_Water_Mean, Optical_Thickness_Ice_Mean, Optical_Thickness_Total_MeanLog10, Optical_Thickness_Water_MeanLog10, Optical_Thickness_Ice_MeanLog10, Cloud_Particle_Size_Water_Mean, Cloud_Particle_Size_Ice_Mean, Cloud_Top_Pressure_Total_Mean, Liquid_Water_Path_Mean, Ice_Water_Path_Mean, Optical_Thickness_vs_Cloud_Top_Pressure, Optical_Thickness_vs_ReffIce, Optical_Thickness_vs_ReffLiq)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nPoints
integer,	intent(in)			::	nSubCols
integer,	intent(in),		dimension(:,:)	::	phase
real,	intent(in),		dimension(:,:)	::	cloud_top_pressure
real,	intent(in),		dimension(:,:)	::	optical_thickness
real,	intent(in),		dimension(:,:)	::	particle_size
real,	intent(inout),		dimension(:)	::	Cloud_Fraction_Total_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Fraction_Water_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Fraction_Ice_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Fraction_High_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Fraction_Mid_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Fraction_Low_Mean
real,	intent(inout),		dimension(:)	::	Optical_Thickness_Total_Mean
real,	intent(inout),		dimension(:)	::	Optical_Thickness_Water_Mean
real,	intent(inout),		dimension(:)	::	Optical_Thickness_Ice_Mean
real,	intent(inout),		dimension(:)	::	Optical_Thickness_Total_MeanLog10
real,	intent(inout),		dimension(:)	::	Optical_Thickness_Water_MeanLog10
real,	intent(inout),		dimension(:)	::	Optical_Thickness_Ice_MeanLog10
real,	intent(inout),		dimension(:)	::	Cloud_Particle_Size_Water_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Particle_Size_Ice_Mean
real,	intent(inout),		dimension(:)	::	Cloud_Top_Pressure_Total_Mean
real,	intent(inout),		dimension(:)	::	Liquid_Water_Path_Mean
real,	intent(inout),		dimension(:)	::	Ice_Water_Path_Mean
real,	intent(inout),		dimension(:,:,:)	::	Optical_Thickness_vs_Cloud_Top_Pressure
real,	intent(inout),		dimension(:,:,:)	::	Optical_Thickness_vs_ReffIce
real,	intent(inout),		dimension(:,:,:)	::	Optical_Thickness_vs_ReffLiq

Contents