*k820309 919.0าคบe  flocmod_.f90FLOCMOD F_WSF_DIAMF_VOLF_RHOF_MASSFLOCMOD_ALLOCFLOCMOD_INITFLOCMOD_MAINFLOCMOD_COMP_G@  &@  &@  &@  &@  &#@ #N #@ #L_ADS_IN #L_ASH_IN #L_COLLFRAG_IN #F_DP0_IN #F_NF_IN #F_NB_FRAG_IN#F_ALPHA_IN#F_BETA_IN#F_ATER_IN#F_ERO_FRAC_IN#F_ERO_NBFRAG_IN#F_ERO_IV_IN#F_MNEG_PARAM_IN#F_COLLFRAGPARAM_IN#F_DMIN_FRAG_IN#F_CFCST_IN#F_FP_IN#F_FY_IN#F_CLIM_IN#F_DIAM_IN#ROS_IN#RHOREF_IN#L_0DCASE_IN #IERRORLOG_IN!                                         p5r5r  p5r5r     !#@ "#DT##CWATER$#GRADVIT% #  D$ p5r5r % #@ &#GVAL'#TIME(D'  (  @@ fn#fnฝfbuapp(FLOCMOD#ŒF_WSฏŒF_DIAM;ŒF_VOLวŒF_RHOSŒF_MASS฿OFLOCMOD_ALLOC .@aFLOCMOD_ALLOC%NnาFLOCMOD_INIT&@@aFLOCMOD_INIT%L_ADS_IN&€@aFLOCMOD_INIT%L_ASH_IN+ภ@aFLOCMOD_INIT%L_COLLFRAG_IN&@aFLOCMOD_INIT%F_DP0_IN%@@aFLOCMOD_INIT%F_NF_IN*€@aFLOCMOD_INIT%F_NB_FRAG_IN(ภ@aFLOCMOD_INIT%F_ALPHA_IN'@aFLOCMOD_INIT%F_BETA_IN'@@aFLOCMOD_INIT%F_ATER_IN+€@aFLOCMOD_INIT%F_ERO_FRAC_IN-ภ@aFLOCMOD_INIT%F_ERO_NBFRAG_IN) @aFLOCMOD_INIT%F_ERO_IV_IN-@ @aFLOCMOD_INIT%F_MNEG_PARAM_IN0€ @aFLOCMOD_INIT%F_COLLFRAGPARAM_IN,ภ @aFLOCMOD_INIT%F_DMIN_FRAG_IN( @aFLOCMOD_INIT%F_CFCST_IN%@ @aFLOCMOD_INIT%F_FP_IN%€ @aFLOCMOD_INIT%F_FY_IN'ภ @aFLOCMOD_INIT%F_CLIM_IN' ”aFLOCMOD_INIT%F_DIAM_IN$” ”aFLOCMOD_INIT%ROS_IN'( @aFLOCMOD_INIT%RHOREF_IN)h @aFLOCMOD_INIT%L_0DCASE_IN*จ @aFLOCMOD_INIT%IERRORLOG_IN่ iFLOCMOD_MAIN Q @aFLOCMOD_MAIN%DT$‘ ”aFLOCMOD_MAIN%CWATER%%@aFLOCMOD_MAIN%GRADVITe\FLOCMOD_COMP_G$ม@aFLOCMOD_COMP_G%GVAL$@aFLOCMOD_COMP_G%TIMEA@NV_MUD