#k820309 919.0Y[®e  module_ra_effective_radius.f90MODULE_RA_EFFECTIVE_RADIUSN0SN0GN0SMAXNC0DENGALPHAPI DENRRHOWATERDENSRHOSNOW    zD1000.    ÈB100.ATAN%@  #X #@#T#QC #NC #QI #QS#QG#RHO#QMIN#T0C#QCCPS#F_QNC#RE_QC#RE_QI#RE_QS#KTS #KTE   5“pr &5“pr 5“pr 5“pr 5“pr p   5“pr &5“pr 5“pr 5“pr 5“pr p   5“pr &5“pr 5“pr 5“pr 5“pr p   5“pr &5“pr 5“pr 5“pr 5“pr p  5“pr &5“pr 5“pr 5“pr 5“pr p  5“pr &5“pr 5“pr 5“pr 5“pr p  5“pr &5“pr 5“pr 5“pr 5“pr p @     5“pr &5“pr 5“pr 5“pr 5“pr p  D 5“pr &5“pr 5“pr 5“pr 5“pr p D 5“pr &5“pr 5“pr 5“pr 5“pr p D 5“pr &5“pr 5“pr 5“pr 5“pr p     Bfn#fn0â1buapp(MODULE_RA_EFFECTIVE_RADIUS'[JMODULE_MODEL_CONSTANTS5nuDENR+MODULE_MODEL_CONSTANTS=RHOWATER4ãtDENS+MODULE_MODEL_CONSTANTS=RHOSNOWW=ATAN”WRGMMAë@aRGMMA%X+ÜEFFECTRADaEFFECTRAD%TaEFFECTRAD%QC/aEFFECTRAD%NCCaEFFECTRAD%QIWaEFFECTRAD%QSk aEFFECTRAD%QG aEFFECTRAD%RHO“ @aEFFECTRAD%QMINÓ @aEFFECTRAD%T0C  aEFFECTRAD%QCCPS ' @aEFFECTRAD%F_QNC g aEFFECTRAD%RE_QC {aEFFECTRAD%RE_QI aEFFECTRAD%RE_QS£@aEFFECTRAD%KTSã@aEFFECTRAD%KTE