ò+k820309 919.0[®e  module_mp_fast_sbm.f90MODULE_MP_SBM_NUCLEATIONJERNUCL01_KSLOGNORMAL_MODES_AEROSOL@ POLYSVP#@ #PSI1_R#PSI2_R#FCCNR_R#XL_R#XI_R#TT#QQ #ROR_R #PP_R #SUP1 #SUP2 #COL_R#SUP2_OLD_R#DSUPICE_XYZ_R#RCCN_R#DROPRADII_R#NKR#NKR_AEROSOL#ICEMAX#ICEPROCS#WIN_R#IS_THIS_CLOUDBASE#RO_SOLUTE#IONS#MWAERO#IIN#JIN#KIN D & D && D &  &  && D@  D@         D@   D@          &  & @ @ @    @ @  @ @    #@  #FCCNR_CON #FCCNR_MAR!#NKR_LOCAL"#COL##XL$#XCCN%#RCCN&#RO_SOLUTE'#SCALE_FA(#ITYPE) D  !& D! "& " #  $ & D% #& D& $& '  (  ) 8fn#fn.Ø5buapp(MODULE_MP_SBM_NUCLEATION( HJMODULE_MP_SBM_AUXILIARYU›JERNUCL01_KS$ðŒaJERNUCL01_KS%PSI1_R$|¤aJERNUCL01_KS%PSI2_R% ŒaJERNUCL01_KS%FCCNR_R"¬ŒaJERNUCL01_KS%XL_R"8¤aJERNUCL01_KS%XI_R Ü@aJERNUCL01_KS%TT @aJERNUCL01_KS%QQ#\@aJERNUCL01_KS%ROR_R"œ@aJERNUCL01_KS%PP_R"Ü@aJERNUCL01_KS%SUP1"@aJERNUCL01_KS%SUP2#\@aJERNUCL01_KS%COL_R(œ@aJERNUCL01_KS%SUP2_OLD_R+Ü@aJERNUCL01_KS%DSUPICE_XYZ_R$ŒaJERNUCL01_KS%RCCN_R)¨ŒaJERNUCL01_KS%DROPRADII_R!4 @aJERNUCL01_KS%NKR)t @aJERNUCL01_KS%NKR_AEROSOL$´ @aJERNUCL01_KS%ICEMAX&ô @aJERNUCL01_KS%ICEPROCS#4 @aJERNUCL01_KS%WIN_R/t @aJERNUCL01_KS%IS_THIS_CLOUDBASE'´ @aJERNUCL01_KS%RO_SOLUTE"ô @aJERNUCL01_KS%IONS$4 @aJERNUCL01_KS%MWAERO!t @aJERNUCL01_KS%IIN!´ @aJERNUCL01_KS%JIN!ô @aJERNUCL01_KS%KIN(4 ÂLOGNORMAL_MODES_AEROSOL2ö ŒaLOGNORMAL_MODES_AEROSOL%FCCNR_CON2‚ ŒaLOGNORMAL_MODES_AEROSOL%FCCNR_MAR2@aLOGNORMAL_MODES_AEROSOL%NKR_LOCAL,N@aLOGNORMAL_MODES_AEROSOL%COL+ŽŒaLOGNORMAL_MODES_AEROSOL%XL-ŒaLOGNORMAL_MODES_AEROSOL%XCCN-¦ŒaLOGNORMAL_MODES_AEROSOL%RCCN22@aLOGNORMAL_MODES_AEROSOL%RO_SOLUTE1r@aLOGNORMAL_MODES_AEROSOL%SCALE_FA.²@aLOGNORMAL_MODES_AEROSOL%ITYPE