!STARTOFREGISTRYGENERATEDINCLUDE 'frame/module_state_description.F' ! ! WARNING This file is generated automatically by use_registry ! using the data base in the file named Registry. ! Do not edit. Your changes to this file will be lost. ! MODULE module_state_description ! package constants INTEGER, PARAMETER :: passiveqv = 0 INTEGER, PARAMETER :: kesslerscheme = 1 INTEGER, PARAMETER :: linscheme = 2 INTEGER, PARAMETER :: wsm3scheme = 3 INTEGER, PARAMETER :: wsm5scheme = 4 INTEGER, PARAMETER :: fer_mp_hires = 5 INTEGER, PARAMETER :: fer_mp_hires_advect = 15 INTEGER, PARAMETER :: wsm6scheme = 6 INTEGER, PARAMETER :: nuwrf4icescheme = 7 INTEGER, PARAMETER :: thompson = 8 INTEGER, PARAMETER :: milbrandt2mom = 9 INTEGER, PARAMETER :: morr_two_moment = 10 INTEGER, PARAMETER :: cammgmpscheme = 11 INTEGER, PARAMETER :: sbu_ylinscheme = 13 INTEGER, PARAMETER :: wdm5scheme = 14 INTEGER, PARAMETER :: wdm6scheme = 16 INTEGER, PARAMETER :: nssl_2mom = 17 INTEGER, PARAMETER :: nssl_2momccn = 18 INTEGER, PARAMETER :: nssl_1mom = 19 INTEGER, PARAMETER :: nssl_1momlfo = 21 INTEGER, PARAMETER :: nssl_2momg = 22 INTEGER, PARAMETER :: wsm7scheme = 24 INTEGER, PARAMETER :: wdm7scheme = 26 INTEGER, PARAMETER :: thompsonaero = 28 INTEGER, PARAMETER :: p3_1category = 50 INTEGER, PARAMETER :: p3_1category_nc = 51 INTEGER, PARAMETER :: p3_2category = 52 INTEGER, PARAMETER :: morr_tm_aero = 40 INTEGER, PARAMETER :: jensen_ishmael = 55 INTEGER, PARAMETER :: etampnew = 95 INTEGER, PARAMETER :: gsfcgcescheme = 97 INTEGER, PARAMETER :: radar_refl = 1 INTEGER, PARAMETER :: nodfimoist = -1 INTEGER, PARAMETER :: passiveqv_dfi = 0 INTEGER, PARAMETER :: kesslerscheme_dfi = 1 INTEGER, PARAMETER :: linscheme_dfi = 2 INTEGER, PARAMETER :: wsm3scheme_dfi = 3 INTEGER, PARAMETER :: wsm5scheme_dfi = 4 INTEGER, PARAMETER :: fer_mp_hires_dfi = 5 INTEGER, PARAMETER :: wsm6scheme_dfi = 6 INTEGER, PARAMETER :: nuwrf4icescheme_dfi = 7 INTEGER, PARAMETER :: thompson_dfi = 8 INTEGER, PARAMETER :: milbrandt2mom_dfi = 9 INTEGER, PARAMETER :: morr_two_moment_dfi = 10 INTEGER, PARAMETER :: wdm5scheme_dfi = 14 INTEGER, PARAMETER :: wdm6scheme_dfi = 16 INTEGER, PARAMETER :: nssl_2mom_dfi = 17 INTEGER, PARAMETER :: nssl_2mom_dficcn = 18 INTEGER, PARAMETER :: nssl_1mom_dfi = 19 INTEGER, PARAMETER :: nssl_1momlfo_dfi = 21 INTEGER, PARAMETER :: wsm7scheme_dfi = 24 INTEGER, PARAMETER :: wdm7scheme_dfi = 26 INTEGER, PARAMETER :: thompsonaero_dfi = 28 INTEGER, PARAMETER :: p3_1category_dfi = 50 INTEGER, PARAMETER :: p3_1category_nc_dfi = 51 INTEGER, PARAMETER :: p3_2category_dfi = 52 INTEGER, PARAMETER :: jensen_ishmael_dfi = 55 INTEGER, PARAMETER :: etampnew_dfi = 95 INTEGER, PARAMETER :: gsfcgcescheme_dfi = 97 INTEGER, PARAMETER :: noprogn = 0 INTEGER, PARAMETER :: progndrop = 1 INTEGER, PARAMETER :: noqndrop = 0 INTEGER, PARAMETER :: qndrop = 1 INTEGER, PARAMETER :: rrtmscheme = 1 INTEGER, PARAMETER :: camlwscheme = 3 INTEGER, PARAMETER :: rrtmg_lwscheme = 4 INTEGER, PARAMETER :: rrtmk_lwscheme = 14 INTEGER, PARAMETER :: rrtmg_lwscheme_fast = 24 INTEGER, PARAMETER :: goddardlwscheme = 5 INTEGER, PARAMETER :: flglwscheme = 7 INTEGER, PARAMETER :: heldsuarez = 31 INTEGER, PARAMETER :: gfdllwscheme = 99 INTEGER, PARAMETER :: swradscheme = 1 INTEGER, PARAMETER :: gsfcswscheme = 2 INTEGER, PARAMETER :: camswscheme = 3 INTEGER, PARAMETER :: rrtmg_swscheme = 4 INTEGER, PARAMETER :: rrtmk_swscheme = 14 INTEGER, PARAMETER :: rrtmg_swscheme_fast = 24 INTEGER, PARAMETER :: goddardswscheme = 5 INTEGER, PARAMETER :: flgswscheme = 7 INTEGER, PARAMETER :: gfdlswscheme = 99 INTEGER, PARAMETER :: nosfcscheme = 0 INTEGER, PARAMETER :: sfclayrevscheme = 1 INTEGER, PARAMETER :: myjsfcscheme = 2 INTEGER, PARAMETER :: gfssfcscheme = 3 INTEGER, PARAMETER :: qnsesfcscheme = 4 INTEGER, PARAMETER :: mynnsfcscheme = 5 INTEGER, PARAMETER :: pxsfcscheme = 7 INTEGER, PARAMETER :: temfsfcscheme = 10 INTEGER, PARAMETER :: idealscmsfcscheme = 89 INTEGER, PARAMETER :: sfclayscheme = 91 INTEGER, PARAMETER :: noahucmscheme = 1 INTEGER, PARAMETER :: bepscheme = 2 INTEGER, PARAMETER :: bep_bemscheme = 3 INTEGER, PARAMETER :: nolsmscheme = 0 INTEGER, PARAMETER :: slabscheme = 1 INTEGER, PARAMETER :: lsmscheme = 2 INTEGER, PARAMETER :: ruclsmscheme = 3 INTEGER, PARAMETER :: noahmpscheme = 4 INTEGER, PARAMETER :: clmscheme = 5 INTEGER, PARAMETER :: pxlsmscheme = 7 INTEGER, PARAMETER :: ssibscheme = 8 INTEGER, PARAMETER :: noahmpoptcrop2 = 2 INTEGER, PARAMETER :: noahmosaicscheme = 1 INTEGER, PARAMETER :: channel = 1 INTEGER, PARAMETER :: drip = 2 INTEGER, PARAMETER :: sprinkler = 3 INTEGER, PARAMETER :: ysuscheme = 1 INTEGER, PARAMETER :: myjpblscheme = 2 INTEGER, PARAMETER :: gfsscheme = 3 INTEGER, PARAMETER :: qnsepblscheme = 4 INTEGER, PARAMETER :: mynnpblscheme2 = 5 INTEGER, PARAMETER :: mynnpblscheme3 = 6 INTEGER, PARAMETER :: acmpblscheme = 7 INTEGER, PARAMETER :: boulacscheme = 8 INTEGER, PARAMETER :: camuwpblscheme = 9 INTEGER, PARAMETER :: temfpblscheme = 10 INTEGER, PARAMETER :: shinhongscheme = 11 INTEGER, PARAMETER :: gbmpblscheme = 12 INTEGER, PARAMETER :: mrfscheme = 99 INTEGER, PARAMETER :: mynn_tkebudget = 1 INTEGER, PARAMETER :: mynn_dmp_edmf = 1 INTEGER, PARAMETER :: mynn_3doutput = 1 INTEGER, PARAMETER :: pbl_cloud = 1 INTEGER, PARAMETER :: sms_3dtke = 5 INTEGER, PARAMETER :: mynnpblscheme2_dfi = 5 INTEGER, PARAMETER :: mynnpblscheme3_dfi = 6 INTEGER, PARAMETER :: nocuscheme = 0 INTEGER, PARAMETER :: kfetascheme = 1 INTEGER, PARAMETER :: bmjscheme = 2 INTEGER, PARAMETER :: gfscheme = 3 INTEGER, PARAMETER :: scalesasscheme = 4 INTEGER, PARAMETER :: g3scheme = 5 INTEGER, PARAMETER :: tiedtkescheme = 6 INTEGER, PARAMETER :: camzmscheme = 7 INTEGER, PARAMETER :: kfcupscheme = 10 INTEGER, PARAMETER :: mskfscheme = 11 INTEGER, PARAMETER :: ksasscheme = 14 INTEGER, PARAMETER :: nsasscheme = 96 INTEGER, PARAMETER :: ntiedtkescheme = 16 INTEGER, PARAMETER :: gdscheme = 93 INTEGER, PARAMETER :: sasscheme = 94 INTEGER, PARAMETER :: osasscheme = 95 INTEGER, PARAMETER :: kfscheme = 99 INTEGER, PARAMETER :: g3tave = 1 INTEGER, PARAMETER :: kfedrates = 1 INTEGER, PARAMETER :: no_cu_used = 0 INTEGER, PARAMETER :: any_cu_used = 1 INTEGER, PARAMETER :: no_cam_used = 0 INTEGER, PARAMETER :: any_cam_used = 1 INTEGER, PARAMETER :: noshcuscheme = 0 INTEGER, PARAMETER :: g3shcuscheme = 1 INTEGER, PARAMETER :: camuwshcuscheme = 2 INTEGER, PARAMETER :: grimsshcuscheme = 3 INTEGER, PARAMETER :: nscvshcuscheme = 4 INTEGER, PARAMETER :: dengshcuscheme = 5 INTEGER, PARAMETER :: no_shcu_used = 0 INTEGER, PARAMETER :: any_shcu_used = 1 INTEGER, PARAMETER :: fogsettling0 = 0 INTEGER, PARAMETER :: fogsettling1 = 1 INTEGER, PARAMETER :: fogsettling2 = 2 INTEGER, PARAMETER :: psufddagd = 1 INTEGER, PARAMETER :: spnudging = 2 INTEGER, PARAMETER :: psusfddagd = 1 INTEGER, PARAMETER :: obsnudging = 1 INTEGER, PARAMETER :: fasdas = 2 INTEGER, PARAMETER :: aeropt1 = 1 INTEGER, PARAMETER :: aeropt2 = 2 INTEGER, PARAMETER :: swintopt2 = 2 INTEGER, PARAMETER :: aercuopt = 1 INTEGER, PARAMETER :: slopeopt = 1 INTEGER, PARAMETER :: gwd_used = 1 INTEGER, PARAMETER :: nogwdopt = 0 INTEGER, PARAMETER :: gwdopt = 1 INTEGER, PARAMETER :: omlscheme = 1 INTEGER, PARAMETER :: pwp3dscheme = 2 INTEGER, PARAMETER :: scmopt = 1 INTEGER, PARAMETER :: prec_acc = 1 INTEGER, PARAMETER :: bucketropt = 1 INTEGER, PARAMETER :: bucketfopt = 1 INTEGER, PARAMETER :: original_mom = 1 INTEGER, PARAMETER :: weno_mom = 3 INTEGER, PARAMETER :: original = 0 INTEGER, PARAMETER :: positivedef = 1 INTEGER, PARAMETER :: monotonic = 2 INTEGER, PARAMETER :: weno_scalar = 3 INTEGER, PARAMETER :: wenopd_scalar = 4 INTEGER, PARAMETER :: maxmin_output = 1 INTEGER, PARAMETER :: nwp_output = 1 INTEGER, PARAMETER :: dfi_setup = 0 INTEGER, PARAMETER :: dfi_bck = 1 INTEGER, PARAMETER :: dfi_fwd = 2 INTEGER, PARAMETER :: dfi_fst = 3 INTEGER, PARAMETER :: dfi_startfwd = 4 INTEGER, PARAMETER :: dfi_startbck = 5 INTEGER, PARAMETER :: dfi_nodfi = 0 INTEGER, PARAMETER :: dfi_dfl = 1 INTEGER, PARAMETER :: dfi_ddfi = 2 INTEGER, PARAMETER :: dfi_tdfi = 3 INTEGER, PARAMETER :: reg_interp = 0 INTEGER, PARAMETER :: flat_p_interp = 1 INTEGER, PARAMETER :: notenddiag = 0 INTEGER, PARAMETER :: usetenddiag = 1 INTEGER, PARAMETER :: no_trajectory = 0 INTEGER, PARAMETER :: um_trajectory = 1 INTEGER, PARAMETER :: albsi_zero = 0 INTEGER, PARAMETER :: albsi_one = 1 INTEGER, PARAMETER :: albsi_two = 2 INTEGER, PARAMETER :: snowsi_zero = 0 INTEGER, PARAMETER :: snowsi_one = 1 INTEGER, PARAMETER :: icedepth_zero = 0 INTEGER, PARAMETER :: icedepth_one = 1 INTEGER, PARAMETER :: notseries = 0 INTEGER, PARAMETER :: tseries = 1 INTEGER, PARAMETER :: tseries_add_solar = 2 INTEGER, PARAMETER :: hailcast = 1 INTEGER, PARAMETER :: ltng_none = 0 INTEGER, PARAMETER :: ltng_crm_pr92w = 1 INTEGER, PARAMETER :: ltng_crm_pr92z = 2 INTEGER, PARAMETER :: ltng_cpm_pr92z = 11 INTEGER, PARAMETER :: ltng_lpi = 3 INTEGER, PARAMETER :: io_intio = 1 INTEGER, PARAMETER :: io_netcdf = 2 INTEGER, PARAMETER :: io_hdf = 3 INTEGER, PARAMETER :: io_phdf5 = 4 INTEGER, PARAMETER :: io_grib1 = 5 INTEGER, PARAMETER :: io_esmf = 7 INTEGER, PARAMETER :: io_yyy = 8 INTEGER, PARAMETER :: io_zzz = 9 INTEGER, PARAMETER :: io_grib2 = 10 INTEGER, PARAMETER :: io_pnetcdf = 11 INTEGER, PARAMETER :: io_pio = 12 INTEGER, PARAMETER :: no_wrfhydro = 0 INTEGER, PARAMETER :: wrfhydro = 1 INTEGER, PARAMETER :: no_windfarm = 0 INTEGER, PARAMETER :: fitchscheme = 1 INTEGER, PARAMETER :: realcase = 0 INTEGER, PARAMETER :: hill2d_x = 1 INTEGER, PARAMETER :: quarter_ss = 2 INTEGER, PARAMETER :: convrad = 3 INTEGER, PARAMETER :: squall2d_x = 4 INTEGER, PARAMETER :: squall2d_y = 5 INTEGER, PARAMETER :: grav2d_x = 6 INTEGER, PARAMETER :: b_wave = 7 INTEGER, PARAMETER :: seabreeze2d_x = 8 INTEGER, PARAMETER :: les = 9 INTEGER, PARAMETER :: clnatmdiag = 1 INTEGER, PARAMETER :: no_fft_used = 0 INTEGER, PARAMETER :: any_fft_used = 1 INTEGER, PARAMETER :: fire_sfire = 2 INTEGER, PARAMETER :: fire_fmoist_run = 1 INTEGER, PARAMETER :: fire_fmoist_interp = 1 INTEGER, PARAMETER :: tracer_fire = 3 INTEGER, PARAMETER :: noavgflxem = 0 INTEGER, PARAMETER :: avgflxem = 1 INTEGER, PARAMETER :: noavgflxcugd = 0 INTEGER, PARAMETER :: avgflxcugd = 1 INTEGER, PARAMETER :: sppt_perturb = 1 INTEGER, PARAMETER :: skebs_perturb = 1 INTEGER, PARAMETER :: random_perturb = 1 INTEGER, PARAMETER :: stoch_param_perturb = 1 INTEGER, PARAMETER :: nosfs = 0 INTEGER, PARAMETER :: nba1 = 1 INTEGER, PARAMETER :: nba2 = 2 INTEGER, PARAMETER :: mout = 1 INTEGER, PARAMETER :: nolake = 0 INTEGER, PARAMETER :: simple_lake = 1 INTEGER, PARAMETER :: fast_khain_lynn_shpund = 30 INTEGER, PARAMETER :: full_khain_lynn = 32 INTEGER, PARAMETER :: sbm_output = 1 INTEGER, PARAMETER :: afwa_diag = 1 INTEGER, PARAMETER :: afwa_ptype = 1 INTEGER, PARAMETER :: afwa_vil = 1 INTEGER, PARAMETER :: afwa_radar = 1 INTEGER, PARAMETER :: afwa_severe = 1 INTEGER, PARAMETER :: afwa_icing = 1 INTEGER, PARAMETER :: afwa_cloud = 1 INTEGER, PARAMETER :: afwa_vis = 1 INTEGER, PARAMETER :: afwa_therm = 1 INTEGER, PARAMETER :: afwa_turb = 1 INTEGER, PARAMETER :: afwa_buoy = 1 INTEGER, PARAMETER :: mean_diag_off = 0 INTEGER, PARAMETER :: mean_diag_on = 1 INTEGER, PARAMETER :: diurnal_diag_off = 0 INTEGER, PARAMETER :: diurnal_diag_on = 1 INTEGER, PARAMETER :: noelec = 0 INTEGER, PARAMETER :: eleclgt1d = 1 INTEGER, PARAMETER :: eleclgtmsz = 2 INTEGER, PARAMETER :: eleclgtmsznox = 3 INTEGER, PARAMETER :: no_perturb_bdy = 0 INTEGER, PARAMETER :: perturb_bdy_with_skebs = 1 INTEGER, PARAMETER :: perturb_bdy_user_patrn = 2 INTEGER, PARAMETER :: perturb_chem_bdy_with_rand = 1 INTEGER, PARAMETER :: use_wif_input = 1 INTEGER, PARAMETER :: skip_trad_fields = 0 INTEGER, PARAMETER :: do_trad_fields = 1 INTEGER, PARAMETER :: skip_solar_output = 0 INTEGER, PARAMETER :: do_solar_output = 1 INTEGER, PARAMETER :: skip_press_diags = 0 INTEGER, PARAMETER :: press_diags = 1 INTEGER, PARAMETER :: skip_z_diags = 0 INTEGER, PARAMETER :: z_diags = 1 INTEGER, PARAMETER :: tracer_test1 = 2 INTEGER, PARAMETER :: restofwrf = 0 INTEGER, PARAMETER :: realonly = 1 INTEGER, PARAMETER :: tconly = 2 ! 4D array constants INTEGER, PARAMETER :: PARAM_qv = 1 INTEGER :: P_qv = 1 LOGICAL :: F_qv = .FALSE. INTEGER, PARAMETER :: PARAM_qc = 2 INTEGER :: P_qc = 1 LOGICAL :: F_qc = .FALSE. INTEGER, PARAMETER :: PARAM_qr = 3 INTEGER :: P_qr = 1 LOGICAL :: F_qr = .FALSE. INTEGER, PARAMETER :: PARAM_qi = 4 INTEGER :: P_qi = 1 LOGICAL :: F_qi = .FALSE. INTEGER, PARAMETER :: PARAM_qi2 = 5 INTEGER :: P_qi2 = 1 LOGICAL :: F_qi2 = .FALSE. INTEGER, PARAMETER :: PARAM_qi3 = 6 INTEGER :: P_qi3 = 1 LOGICAL :: F_qi3 = .FALSE. INTEGER, PARAMETER :: PARAM_qs = 7 INTEGER :: P_qs = 1 LOGICAL :: F_qs = .FALSE. INTEGER, PARAMETER :: PARAM_qg = 8 INTEGER :: P_qg = 1 LOGICAL :: F_qg = .FALSE. INTEGER, PARAMETER :: PARAM_qh = 9 INTEGER :: P_qh = 1 LOGICAL :: F_qh = .FALSE. INTEGER, PARAMETER :: PARAM_qip = 10 INTEGER :: P_qip = 1 LOGICAL :: F_qip = .FALSE. INTEGER, PARAMETER :: PARAM_qic = 11 INTEGER :: P_qic = 1 LOGICAL :: F_qic = .FALSE. INTEGER, PARAMETER :: PARAM_qid = 12 INTEGER :: P_qid = 1 LOGICAL :: F_qid = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_moist = 13 INTEGER :: NUM_moist = 1 INTEGER, PARAMETER :: PARAM_dfi_qv = 1 INTEGER :: P_dfi_qv = 1 LOGICAL :: F_dfi_qv = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qc = 2 INTEGER :: P_dfi_qc = 1 LOGICAL :: F_dfi_qc = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qr = 3 INTEGER :: P_dfi_qr = 1 LOGICAL :: F_dfi_qr = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qi = 4 INTEGER :: P_dfi_qi = 1 LOGICAL :: F_dfi_qi = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qi2 = 5 INTEGER :: P_dfi_qi2 = 1 LOGICAL :: F_dfi_qi2 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qi3 = 6 INTEGER :: P_dfi_qi3 = 1 LOGICAL :: F_dfi_qi3 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qs = 7 INTEGER :: P_dfi_qs = 1 LOGICAL :: F_dfi_qs = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qg = 8 INTEGER :: P_dfi_qg = 1 LOGICAL :: F_dfi_qg = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qh = 9 INTEGER :: P_dfi_qh = 1 LOGICAL :: F_dfi_qh = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_dfi_moist = 10 INTEGER :: NUM_dfi_moist = 1 INTEGER, PARAMETER :: PARAM_qndrop = 1 INTEGER :: P_qndrop = 1 LOGICAL :: F_qndrop = .FALSE. INTEGER, PARAMETER :: PARAM_qni = 2 INTEGER :: P_qni = 1 LOGICAL :: F_qni = .FALSE. INTEGER, PARAMETER :: PARAM_qni2 = 3 INTEGER :: P_qni2 = 1 LOGICAL :: F_qni2 = .FALSE. INTEGER, PARAMETER :: PARAM_qni3 = 4 INTEGER :: P_qni3 = 1 LOGICAL :: F_qni3 = .FALSE. INTEGER, PARAMETER :: PARAM_qt = 5 INTEGER :: P_qt = 1 LOGICAL :: F_qt = .FALSE. INTEGER, PARAMETER :: PARAM_qns = 6 INTEGER :: P_qns = 1 LOGICAL :: F_qns = .FALSE. INTEGER, PARAMETER :: PARAM_qnr = 7 INTEGER :: P_qnr = 1 LOGICAL :: F_qnr = .FALSE. INTEGER, PARAMETER :: PARAM_qng = 8 INTEGER :: P_qng = 1 LOGICAL :: F_qng = .FALSE. INTEGER, PARAMETER :: PARAM_qnh = 9 INTEGER :: P_qnh = 1 LOGICAL :: F_qnh = .FALSE. INTEGER, PARAMETER :: PARAM_qnn = 10 INTEGER :: P_qnn = 1 LOGICAL :: F_qnn = .FALSE. INTEGER, PARAMETER :: PARAM_qnc = 11 INTEGER :: P_qnc = 1 LOGICAL :: F_qnc = .FALSE. INTEGER, PARAMETER :: PARAM_qvolg = 12 INTEGER :: P_qvolg = 1 LOGICAL :: F_qvolg = .FALSE. INTEGER, PARAMETER :: PARAM_qvolh = 13 INTEGER :: P_qvolh = 1 LOGICAL :: F_qvolh = .FALSE. INTEGER, PARAMETER :: PARAM_qrimef = 14 INTEGER :: P_qrimef = 1 LOGICAL :: F_qrimef = .FALSE. INTEGER, PARAMETER :: PARAM_qir = 15 INTEGER :: P_qir = 1 LOGICAL :: F_qir = .FALSE. INTEGER, PARAMETER :: PARAM_qib = 16 INTEGER :: P_qib = 1 LOGICAL :: F_qib = .FALSE. INTEGER, PARAMETER :: PARAM_qir2 = 17 INTEGER :: P_qir2 = 1 LOGICAL :: F_qir2 = .FALSE. INTEGER, PARAMETER :: PARAM_qib2 = 18 INTEGER :: P_qib2 = 1 LOGICAL :: F_qib2 = .FALSE. INTEGER, PARAMETER :: PARAM_qvoli = 19 INTEGER :: P_qvoli = 1 LOGICAL :: F_qvoli = .FALSE. INTEGER, PARAMETER :: PARAM_qaoli = 20 INTEGER :: P_qaoli = 1 LOGICAL :: F_qaoli = .FALSE. INTEGER, PARAMETER :: PARAM_qvoli2 = 21 INTEGER :: P_qvoli2 = 1 LOGICAL :: F_qvoli2 = .FALSE. INTEGER, PARAMETER :: PARAM_qaoli2 = 22 INTEGER :: P_qaoli2 = 1 LOGICAL :: F_qaoli2 = .FALSE. INTEGER, PARAMETER :: PARAM_qvoli3 = 23 INTEGER :: P_qvoli3 = 1 LOGICAL :: F_qvoli3 = .FALSE. INTEGER, PARAMETER :: PARAM_qaoli3 = 24 INTEGER :: P_qaoli3 = 1 LOGICAL :: F_qaoli3 = .FALSE. INTEGER, PARAMETER :: PARAM_qke_adv = 25 INTEGER :: P_qke_adv = 1 LOGICAL :: F_qke_adv = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i01 = 26 INTEGER :: P_ff1i01 = 1 LOGICAL :: F_ff1i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i02 = 27 INTEGER :: P_ff1i02 = 1 LOGICAL :: F_ff1i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i03 = 28 INTEGER :: P_ff1i03 = 1 LOGICAL :: F_ff1i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i04 = 29 INTEGER :: P_ff1i04 = 1 LOGICAL :: F_ff1i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i05 = 30 INTEGER :: P_ff1i05 = 1 LOGICAL :: F_ff1i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i06 = 31 INTEGER :: P_ff1i06 = 1 LOGICAL :: F_ff1i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i07 = 32 INTEGER :: P_ff1i07 = 1 LOGICAL :: F_ff1i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i08 = 33 INTEGER :: P_ff1i08 = 1 LOGICAL :: F_ff1i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i09 = 34 INTEGER :: P_ff1i09 = 1 LOGICAL :: F_ff1i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i10 = 35 INTEGER :: P_ff1i10 = 1 LOGICAL :: F_ff1i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i11 = 36 INTEGER :: P_ff1i11 = 1 LOGICAL :: F_ff1i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i12 = 37 INTEGER :: P_ff1i12 = 1 LOGICAL :: F_ff1i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i13 = 38 INTEGER :: P_ff1i13 = 1 LOGICAL :: F_ff1i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i14 = 39 INTEGER :: P_ff1i14 = 1 LOGICAL :: F_ff1i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i15 = 40 INTEGER :: P_ff1i15 = 1 LOGICAL :: F_ff1i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i16 = 41 INTEGER :: P_ff1i16 = 1 LOGICAL :: F_ff1i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i17 = 42 INTEGER :: P_ff1i17 = 1 LOGICAL :: F_ff1i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i18 = 43 INTEGER :: P_ff1i18 = 1 LOGICAL :: F_ff1i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i19 = 44 INTEGER :: P_ff1i19 = 1 LOGICAL :: F_ff1i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i20 = 45 INTEGER :: P_ff1i20 = 1 LOGICAL :: F_ff1i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i21 = 46 INTEGER :: P_ff1i21 = 1 LOGICAL :: F_ff1i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i22 = 47 INTEGER :: P_ff1i22 = 1 LOGICAL :: F_ff1i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i23 = 48 INTEGER :: P_ff1i23 = 1 LOGICAL :: F_ff1i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i24 = 49 INTEGER :: P_ff1i24 = 1 LOGICAL :: F_ff1i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i25 = 50 INTEGER :: P_ff1i25 = 1 LOGICAL :: F_ff1i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i26 = 51 INTEGER :: P_ff1i26 = 1 LOGICAL :: F_ff1i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i27 = 52 INTEGER :: P_ff1i27 = 1 LOGICAL :: F_ff1i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i28 = 53 INTEGER :: P_ff1i28 = 1 LOGICAL :: F_ff1i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i29 = 54 INTEGER :: P_ff1i29 = 1 LOGICAL :: F_ff1i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i30 = 55 INTEGER :: P_ff1i30 = 1 LOGICAL :: F_ff1i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i31 = 56 INTEGER :: P_ff1i31 = 1 LOGICAL :: F_ff1i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i32 = 57 INTEGER :: P_ff1i32 = 1 LOGICAL :: F_ff1i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff1i33 = 58 INTEGER :: P_ff1i33 = 1 LOGICAL :: F_ff1i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i01 = 59 INTEGER :: P_ff5i01 = 1 LOGICAL :: F_ff5i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i02 = 60 INTEGER :: P_ff5i02 = 1 LOGICAL :: F_ff5i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i03 = 61 INTEGER :: P_ff5i03 = 1 LOGICAL :: F_ff5i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i04 = 62 INTEGER :: P_ff5i04 = 1 LOGICAL :: F_ff5i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i05 = 63 INTEGER :: P_ff5i05 = 1 LOGICAL :: F_ff5i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i06 = 64 INTEGER :: P_ff5i06 = 1 LOGICAL :: F_ff5i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i07 = 65 INTEGER :: P_ff5i07 = 1 LOGICAL :: F_ff5i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i08 = 66 INTEGER :: P_ff5i08 = 1 LOGICAL :: F_ff5i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i09 = 67 INTEGER :: P_ff5i09 = 1 LOGICAL :: F_ff5i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i10 = 68 INTEGER :: P_ff5i10 = 1 LOGICAL :: F_ff5i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i11 = 69 INTEGER :: P_ff5i11 = 1 LOGICAL :: F_ff5i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i12 = 70 INTEGER :: P_ff5i12 = 1 LOGICAL :: F_ff5i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i13 = 71 INTEGER :: P_ff5i13 = 1 LOGICAL :: F_ff5i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i14 = 72 INTEGER :: P_ff5i14 = 1 LOGICAL :: F_ff5i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i15 = 73 INTEGER :: P_ff5i15 = 1 LOGICAL :: F_ff5i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i16 = 74 INTEGER :: P_ff5i16 = 1 LOGICAL :: F_ff5i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i17 = 75 INTEGER :: P_ff5i17 = 1 LOGICAL :: F_ff5i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i18 = 76 INTEGER :: P_ff5i18 = 1 LOGICAL :: F_ff5i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i19 = 77 INTEGER :: P_ff5i19 = 1 LOGICAL :: F_ff5i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i20 = 78 INTEGER :: P_ff5i20 = 1 LOGICAL :: F_ff5i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i21 = 79 INTEGER :: P_ff5i21 = 1 LOGICAL :: F_ff5i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i22 = 80 INTEGER :: P_ff5i22 = 1 LOGICAL :: F_ff5i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i23 = 81 INTEGER :: P_ff5i23 = 1 LOGICAL :: F_ff5i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i24 = 82 INTEGER :: P_ff5i24 = 1 LOGICAL :: F_ff5i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i25 = 83 INTEGER :: P_ff5i25 = 1 LOGICAL :: F_ff5i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i26 = 84 INTEGER :: P_ff5i26 = 1 LOGICAL :: F_ff5i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i27 = 85 INTEGER :: P_ff5i27 = 1 LOGICAL :: F_ff5i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i28 = 86 INTEGER :: P_ff5i28 = 1 LOGICAL :: F_ff5i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i29 = 87 INTEGER :: P_ff5i29 = 1 LOGICAL :: F_ff5i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i30 = 88 INTEGER :: P_ff5i30 = 1 LOGICAL :: F_ff5i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i31 = 89 INTEGER :: P_ff5i31 = 1 LOGICAL :: F_ff5i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i32 = 90 INTEGER :: P_ff5i32 = 1 LOGICAL :: F_ff5i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff5i33 = 91 INTEGER :: P_ff5i33 = 1 LOGICAL :: F_ff5i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i01 = 92 INTEGER :: P_ff6i01 = 1 LOGICAL :: F_ff6i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i02 = 93 INTEGER :: P_ff6i02 = 1 LOGICAL :: F_ff6i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i03 = 94 INTEGER :: P_ff6i03 = 1 LOGICAL :: F_ff6i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i04 = 95 INTEGER :: P_ff6i04 = 1 LOGICAL :: F_ff6i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i05 = 96 INTEGER :: P_ff6i05 = 1 LOGICAL :: F_ff6i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i06 = 97 INTEGER :: P_ff6i06 = 1 LOGICAL :: F_ff6i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i07 = 98 INTEGER :: P_ff6i07 = 1 LOGICAL :: F_ff6i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i08 = 99 INTEGER :: P_ff6i08 = 1 LOGICAL :: F_ff6i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i09 = 100 INTEGER :: P_ff6i09 = 1 LOGICAL :: F_ff6i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i10 = 101 INTEGER :: P_ff6i10 = 1 LOGICAL :: F_ff6i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i11 = 102 INTEGER :: P_ff6i11 = 1 LOGICAL :: F_ff6i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i12 = 103 INTEGER :: P_ff6i12 = 1 LOGICAL :: F_ff6i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i13 = 104 INTEGER :: P_ff6i13 = 1 LOGICAL :: F_ff6i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i14 = 105 INTEGER :: P_ff6i14 = 1 LOGICAL :: F_ff6i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i15 = 106 INTEGER :: P_ff6i15 = 1 LOGICAL :: F_ff6i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i16 = 107 INTEGER :: P_ff6i16 = 1 LOGICAL :: F_ff6i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i17 = 108 INTEGER :: P_ff6i17 = 1 LOGICAL :: F_ff6i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i18 = 109 INTEGER :: P_ff6i18 = 1 LOGICAL :: F_ff6i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i19 = 110 INTEGER :: P_ff6i19 = 1 LOGICAL :: F_ff6i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i20 = 111 INTEGER :: P_ff6i20 = 1 LOGICAL :: F_ff6i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i21 = 112 INTEGER :: P_ff6i21 = 1 LOGICAL :: F_ff6i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i22 = 113 INTEGER :: P_ff6i22 = 1 LOGICAL :: F_ff6i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i23 = 114 INTEGER :: P_ff6i23 = 1 LOGICAL :: F_ff6i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i24 = 115 INTEGER :: P_ff6i24 = 1 LOGICAL :: F_ff6i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i25 = 116 INTEGER :: P_ff6i25 = 1 LOGICAL :: F_ff6i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i26 = 117 INTEGER :: P_ff6i26 = 1 LOGICAL :: F_ff6i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i27 = 118 INTEGER :: P_ff6i27 = 1 LOGICAL :: F_ff6i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i28 = 119 INTEGER :: P_ff6i28 = 1 LOGICAL :: F_ff6i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i29 = 120 INTEGER :: P_ff6i29 = 1 LOGICAL :: F_ff6i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i30 = 121 INTEGER :: P_ff6i30 = 1 LOGICAL :: F_ff6i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i31 = 122 INTEGER :: P_ff6i31 = 1 LOGICAL :: F_ff6i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i32 = 123 INTEGER :: P_ff6i32 = 1 LOGICAL :: F_ff6i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff6i33 = 124 INTEGER :: P_ff6i33 = 1 LOGICAL :: F_ff6i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i01 = 125 INTEGER :: P_ff8i01 = 1 LOGICAL :: F_ff8i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i02 = 126 INTEGER :: P_ff8i02 = 1 LOGICAL :: F_ff8i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i03 = 127 INTEGER :: P_ff8i03 = 1 LOGICAL :: F_ff8i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i04 = 128 INTEGER :: P_ff8i04 = 1 LOGICAL :: F_ff8i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i05 = 129 INTEGER :: P_ff8i05 = 1 LOGICAL :: F_ff8i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i06 = 130 INTEGER :: P_ff8i06 = 1 LOGICAL :: F_ff8i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i07 = 131 INTEGER :: P_ff8i07 = 1 LOGICAL :: F_ff8i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i08 = 132 INTEGER :: P_ff8i08 = 1 LOGICAL :: F_ff8i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i09 = 133 INTEGER :: P_ff8i09 = 1 LOGICAL :: F_ff8i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i10 = 134 INTEGER :: P_ff8i10 = 1 LOGICAL :: F_ff8i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i11 = 135 INTEGER :: P_ff8i11 = 1 LOGICAL :: F_ff8i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i12 = 136 INTEGER :: P_ff8i12 = 1 LOGICAL :: F_ff8i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i13 = 137 INTEGER :: P_ff8i13 = 1 LOGICAL :: F_ff8i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i14 = 138 INTEGER :: P_ff8i14 = 1 LOGICAL :: F_ff8i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i15 = 139 INTEGER :: P_ff8i15 = 1 LOGICAL :: F_ff8i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i16 = 140 INTEGER :: P_ff8i16 = 1 LOGICAL :: F_ff8i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i17 = 141 INTEGER :: P_ff8i17 = 1 LOGICAL :: F_ff8i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i18 = 142 INTEGER :: P_ff8i18 = 1 LOGICAL :: F_ff8i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i19 = 143 INTEGER :: P_ff8i19 = 1 LOGICAL :: F_ff8i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i20 = 144 INTEGER :: P_ff8i20 = 1 LOGICAL :: F_ff8i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i21 = 145 INTEGER :: P_ff8i21 = 1 LOGICAL :: F_ff8i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i22 = 146 INTEGER :: P_ff8i22 = 1 LOGICAL :: F_ff8i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i23 = 147 INTEGER :: P_ff8i23 = 1 LOGICAL :: F_ff8i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i24 = 148 INTEGER :: P_ff8i24 = 1 LOGICAL :: F_ff8i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i25 = 149 INTEGER :: P_ff8i25 = 1 LOGICAL :: F_ff8i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i26 = 150 INTEGER :: P_ff8i26 = 1 LOGICAL :: F_ff8i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i27 = 151 INTEGER :: P_ff8i27 = 1 LOGICAL :: F_ff8i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i28 = 152 INTEGER :: P_ff8i28 = 1 LOGICAL :: F_ff8i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i29 = 153 INTEGER :: P_ff8i29 = 1 LOGICAL :: F_ff8i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i30 = 154 INTEGER :: P_ff8i30 = 1 LOGICAL :: F_ff8i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i31 = 155 INTEGER :: P_ff8i31 = 1 LOGICAL :: F_ff8i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i32 = 156 INTEGER :: P_ff8i32 = 1 LOGICAL :: F_ff8i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i33 = 157 INTEGER :: P_ff8i33 = 1 LOGICAL :: F_ff8i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i34 = 158 INTEGER :: P_ff8i34 = 1 LOGICAL :: F_ff8i34 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i35 = 159 INTEGER :: P_ff8i35 = 1 LOGICAL :: F_ff8i35 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i36 = 160 INTEGER :: P_ff8i36 = 1 LOGICAL :: F_ff8i36 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i37 = 161 INTEGER :: P_ff8i37 = 1 LOGICAL :: F_ff8i37 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i38 = 162 INTEGER :: P_ff8i38 = 1 LOGICAL :: F_ff8i38 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i39 = 163 INTEGER :: P_ff8i39 = 1 LOGICAL :: F_ff8i39 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i40 = 164 INTEGER :: P_ff8i40 = 1 LOGICAL :: F_ff8i40 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i41 = 165 INTEGER :: P_ff8i41 = 1 LOGICAL :: F_ff8i41 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i42 = 166 INTEGER :: P_ff8i42 = 1 LOGICAL :: F_ff8i42 = .FALSE. INTEGER, PARAMETER :: PARAM_ff8i43 = 167 INTEGER :: P_ff8i43 = 1 LOGICAL :: F_ff8i43 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i01 = 168 INTEGER :: P_ff2i01 = 1 LOGICAL :: F_ff2i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i02 = 169 INTEGER :: P_ff2i02 = 1 LOGICAL :: F_ff2i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i03 = 170 INTEGER :: P_ff2i03 = 1 LOGICAL :: F_ff2i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i04 = 171 INTEGER :: P_ff2i04 = 1 LOGICAL :: F_ff2i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i05 = 172 INTEGER :: P_ff2i05 = 1 LOGICAL :: F_ff2i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i06 = 173 INTEGER :: P_ff2i06 = 1 LOGICAL :: F_ff2i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i07 = 174 INTEGER :: P_ff2i07 = 1 LOGICAL :: F_ff2i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i08 = 175 INTEGER :: P_ff2i08 = 1 LOGICAL :: F_ff2i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i09 = 176 INTEGER :: P_ff2i09 = 1 LOGICAL :: F_ff2i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i10 = 177 INTEGER :: P_ff2i10 = 1 LOGICAL :: F_ff2i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i11 = 178 INTEGER :: P_ff2i11 = 1 LOGICAL :: F_ff2i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i12 = 179 INTEGER :: P_ff2i12 = 1 LOGICAL :: F_ff2i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i13 = 180 INTEGER :: P_ff2i13 = 1 LOGICAL :: F_ff2i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i14 = 181 INTEGER :: P_ff2i14 = 1 LOGICAL :: F_ff2i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i15 = 182 INTEGER :: P_ff2i15 = 1 LOGICAL :: F_ff2i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i16 = 183 INTEGER :: P_ff2i16 = 1 LOGICAL :: F_ff2i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i17 = 184 INTEGER :: P_ff2i17 = 1 LOGICAL :: F_ff2i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i18 = 185 INTEGER :: P_ff2i18 = 1 LOGICAL :: F_ff2i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i19 = 186 INTEGER :: P_ff2i19 = 1 LOGICAL :: F_ff2i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i20 = 187 INTEGER :: P_ff2i20 = 1 LOGICAL :: F_ff2i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i21 = 188 INTEGER :: P_ff2i21 = 1 LOGICAL :: F_ff2i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i22 = 189 INTEGER :: P_ff2i22 = 1 LOGICAL :: F_ff2i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i23 = 190 INTEGER :: P_ff2i23 = 1 LOGICAL :: F_ff2i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i24 = 191 INTEGER :: P_ff2i24 = 1 LOGICAL :: F_ff2i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i25 = 192 INTEGER :: P_ff2i25 = 1 LOGICAL :: F_ff2i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i26 = 193 INTEGER :: P_ff2i26 = 1 LOGICAL :: F_ff2i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i27 = 194 INTEGER :: P_ff2i27 = 1 LOGICAL :: F_ff2i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i28 = 195 INTEGER :: P_ff2i28 = 1 LOGICAL :: F_ff2i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i29 = 196 INTEGER :: P_ff2i29 = 1 LOGICAL :: F_ff2i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i30 = 197 INTEGER :: P_ff2i30 = 1 LOGICAL :: F_ff2i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i31 = 198 INTEGER :: P_ff2i31 = 1 LOGICAL :: F_ff2i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i32 = 199 INTEGER :: P_ff2i32 = 1 LOGICAL :: F_ff2i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff2i33 = 200 INTEGER :: P_ff2i33 = 1 LOGICAL :: F_ff2i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i01 = 201 INTEGER :: P_ff3i01 = 1 LOGICAL :: F_ff3i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i02 = 202 INTEGER :: P_ff3i02 = 1 LOGICAL :: F_ff3i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i03 = 203 INTEGER :: P_ff3i03 = 1 LOGICAL :: F_ff3i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i04 = 204 INTEGER :: P_ff3i04 = 1 LOGICAL :: F_ff3i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i05 = 205 INTEGER :: P_ff3i05 = 1 LOGICAL :: F_ff3i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i06 = 206 INTEGER :: P_ff3i06 = 1 LOGICAL :: F_ff3i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i07 = 207 INTEGER :: P_ff3i07 = 1 LOGICAL :: F_ff3i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i08 = 208 INTEGER :: P_ff3i08 = 1 LOGICAL :: F_ff3i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i09 = 209 INTEGER :: P_ff3i09 = 1 LOGICAL :: F_ff3i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i10 = 210 INTEGER :: P_ff3i10 = 1 LOGICAL :: F_ff3i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i11 = 211 INTEGER :: P_ff3i11 = 1 LOGICAL :: F_ff3i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i12 = 212 INTEGER :: P_ff3i12 = 1 LOGICAL :: F_ff3i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i13 = 213 INTEGER :: P_ff3i13 = 1 LOGICAL :: F_ff3i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i14 = 214 INTEGER :: P_ff3i14 = 1 LOGICAL :: F_ff3i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i15 = 215 INTEGER :: P_ff3i15 = 1 LOGICAL :: F_ff3i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i16 = 216 INTEGER :: P_ff3i16 = 1 LOGICAL :: F_ff3i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i17 = 217 INTEGER :: P_ff3i17 = 1 LOGICAL :: F_ff3i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i18 = 218 INTEGER :: P_ff3i18 = 1 LOGICAL :: F_ff3i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i19 = 219 INTEGER :: P_ff3i19 = 1 LOGICAL :: F_ff3i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i20 = 220 INTEGER :: P_ff3i20 = 1 LOGICAL :: F_ff3i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i21 = 221 INTEGER :: P_ff3i21 = 1 LOGICAL :: F_ff3i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i22 = 222 INTEGER :: P_ff3i22 = 1 LOGICAL :: F_ff3i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i23 = 223 INTEGER :: P_ff3i23 = 1 LOGICAL :: F_ff3i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i24 = 224 INTEGER :: P_ff3i24 = 1 LOGICAL :: F_ff3i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i25 = 225 INTEGER :: P_ff3i25 = 1 LOGICAL :: F_ff3i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i26 = 226 INTEGER :: P_ff3i26 = 1 LOGICAL :: F_ff3i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i27 = 227 INTEGER :: P_ff3i27 = 1 LOGICAL :: F_ff3i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i28 = 228 INTEGER :: P_ff3i28 = 1 LOGICAL :: F_ff3i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i29 = 229 INTEGER :: P_ff3i29 = 1 LOGICAL :: F_ff3i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i30 = 230 INTEGER :: P_ff3i30 = 1 LOGICAL :: F_ff3i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i31 = 231 INTEGER :: P_ff3i31 = 1 LOGICAL :: F_ff3i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i32 = 232 INTEGER :: P_ff3i32 = 1 LOGICAL :: F_ff3i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff3i33 = 233 INTEGER :: P_ff3i33 = 1 LOGICAL :: F_ff3i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i01 = 234 INTEGER :: P_ff4i01 = 1 LOGICAL :: F_ff4i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i02 = 235 INTEGER :: P_ff4i02 = 1 LOGICAL :: F_ff4i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i03 = 236 INTEGER :: P_ff4i03 = 1 LOGICAL :: F_ff4i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i04 = 237 INTEGER :: P_ff4i04 = 1 LOGICAL :: F_ff4i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i05 = 238 INTEGER :: P_ff4i05 = 1 LOGICAL :: F_ff4i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i06 = 239 INTEGER :: P_ff4i06 = 1 LOGICAL :: F_ff4i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i07 = 240 INTEGER :: P_ff4i07 = 1 LOGICAL :: F_ff4i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i08 = 241 INTEGER :: P_ff4i08 = 1 LOGICAL :: F_ff4i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i09 = 242 INTEGER :: P_ff4i09 = 1 LOGICAL :: F_ff4i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i10 = 243 INTEGER :: P_ff4i10 = 1 LOGICAL :: F_ff4i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i11 = 244 INTEGER :: P_ff4i11 = 1 LOGICAL :: F_ff4i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i12 = 245 INTEGER :: P_ff4i12 = 1 LOGICAL :: F_ff4i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i13 = 246 INTEGER :: P_ff4i13 = 1 LOGICAL :: F_ff4i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i14 = 247 INTEGER :: P_ff4i14 = 1 LOGICAL :: F_ff4i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i15 = 248 INTEGER :: P_ff4i15 = 1 LOGICAL :: F_ff4i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i16 = 249 INTEGER :: P_ff4i16 = 1 LOGICAL :: F_ff4i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i17 = 250 INTEGER :: P_ff4i17 = 1 LOGICAL :: F_ff4i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i18 = 251 INTEGER :: P_ff4i18 = 1 LOGICAL :: F_ff4i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i19 = 252 INTEGER :: P_ff4i19 = 1 LOGICAL :: F_ff4i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i20 = 253 INTEGER :: P_ff4i20 = 1 LOGICAL :: F_ff4i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i21 = 254 INTEGER :: P_ff4i21 = 1 LOGICAL :: F_ff4i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i22 = 255 INTEGER :: P_ff4i22 = 1 LOGICAL :: F_ff4i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i23 = 256 INTEGER :: P_ff4i23 = 1 LOGICAL :: F_ff4i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i24 = 257 INTEGER :: P_ff4i24 = 1 LOGICAL :: F_ff4i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i25 = 258 INTEGER :: P_ff4i25 = 1 LOGICAL :: F_ff4i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i26 = 259 INTEGER :: P_ff4i26 = 1 LOGICAL :: F_ff4i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i27 = 260 INTEGER :: P_ff4i27 = 1 LOGICAL :: F_ff4i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i28 = 261 INTEGER :: P_ff4i28 = 1 LOGICAL :: F_ff4i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i29 = 262 INTEGER :: P_ff4i29 = 1 LOGICAL :: F_ff4i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i30 = 263 INTEGER :: P_ff4i30 = 1 LOGICAL :: F_ff4i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i31 = 264 INTEGER :: P_ff4i31 = 1 LOGICAL :: F_ff4i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i32 = 265 INTEGER :: P_ff4i32 = 1 LOGICAL :: F_ff4i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff4i33 = 266 INTEGER :: P_ff4i33 = 1 LOGICAL :: F_ff4i33 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i01 = 267 INTEGER :: P_ff7i01 = 1 LOGICAL :: F_ff7i01 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i02 = 268 INTEGER :: P_ff7i02 = 1 LOGICAL :: F_ff7i02 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i03 = 269 INTEGER :: P_ff7i03 = 1 LOGICAL :: F_ff7i03 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i04 = 270 INTEGER :: P_ff7i04 = 1 LOGICAL :: F_ff7i04 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i05 = 271 INTEGER :: P_ff7i05 = 1 LOGICAL :: F_ff7i05 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i06 = 272 INTEGER :: P_ff7i06 = 1 LOGICAL :: F_ff7i06 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i07 = 273 INTEGER :: P_ff7i07 = 1 LOGICAL :: F_ff7i07 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i08 = 274 INTEGER :: P_ff7i08 = 1 LOGICAL :: F_ff7i08 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i09 = 275 INTEGER :: P_ff7i09 = 1 LOGICAL :: F_ff7i09 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i10 = 276 INTEGER :: P_ff7i10 = 1 LOGICAL :: F_ff7i10 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i11 = 277 INTEGER :: P_ff7i11 = 1 LOGICAL :: F_ff7i11 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i12 = 278 INTEGER :: P_ff7i12 = 1 LOGICAL :: F_ff7i12 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i13 = 279 INTEGER :: P_ff7i13 = 1 LOGICAL :: F_ff7i13 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i14 = 280 INTEGER :: P_ff7i14 = 1 LOGICAL :: F_ff7i14 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i15 = 281 INTEGER :: P_ff7i15 = 1 LOGICAL :: F_ff7i15 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i16 = 282 INTEGER :: P_ff7i16 = 1 LOGICAL :: F_ff7i16 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i17 = 283 INTEGER :: P_ff7i17 = 1 LOGICAL :: F_ff7i17 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i18 = 284 INTEGER :: P_ff7i18 = 1 LOGICAL :: F_ff7i18 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i19 = 285 INTEGER :: P_ff7i19 = 1 LOGICAL :: F_ff7i19 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i20 = 286 INTEGER :: P_ff7i20 = 1 LOGICAL :: F_ff7i20 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i21 = 287 INTEGER :: P_ff7i21 = 1 LOGICAL :: F_ff7i21 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i22 = 288 INTEGER :: P_ff7i22 = 1 LOGICAL :: F_ff7i22 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i23 = 289 INTEGER :: P_ff7i23 = 1 LOGICAL :: F_ff7i23 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i24 = 290 INTEGER :: P_ff7i24 = 1 LOGICAL :: F_ff7i24 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i25 = 291 INTEGER :: P_ff7i25 = 1 LOGICAL :: F_ff7i25 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i26 = 292 INTEGER :: P_ff7i26 = 1 LOGICAL :: F_ff7i26 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i27 = 293 INTEGER :: P_ff7i27 = 1 LOGICAL :: F_ff7i27 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i28 = 294 INTEGER :: P_ff7i28 = 1 LOGICAL :: F_ff7i28 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i29 = 295 INTEGER :: P_ff7i29 = 1 LOGICAL :: F_ff7i29 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i30 = 296 INTEGER :: P_ff7i30 = 1 LOGICAL :: F_ff7i30 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i31 = 297 INTEGER :: P_ff7i31 = 1 LOGICAL :: F_ff7i31 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i32 = 298 INTEGER :: P_ff7i32 = 1 LOGICAL :: F_ff7i32 = .FALSE. INTEGER, PARAMETER :: PARAM_ff7i33 = 299 INTEGER :: P_ff7i33 = 1 LOGICAL :: F_ff7i33 = .FALSE. INTEGER, PARAMETER :: PARAM_qnip = 300 INTEGER :: P_qnip = 1 LOGICAL :: F_qnip = .FALSE. INTEGER, PARAMETER :: PARAM_qnic = 301 INTEGER :: P_qnic = 1 LOGICAL :: F_qnic = .FALSE. INTEGER, PARAMETER :: PARAM_qnid = 302 INTEGER :: P_qnid = 1 LOGICAL :: F_qnid = .FALSE. INTEGER, PARAMETER :: PARAM_effr = 303 INTEGER :: P_effr = 1 LOGICAL :: F_effr = .FALSE. INTEGER, PARAMETER :: PARAM_ice_effr = 304 INTEGER :: P_ice_effr = 1 LOGICAL :: F_ice_effr = .FALSE. INTEGER, PARAMETER :: PARAM_tot_effr = 305 INTEGER :: P_tot_effr = 1 LOGICAL :: F_tot_effr = .FALSE. INTEGER, PARAMETER :: PARAM_qic_effr = 306 INTEGER :: P_qic_effr = 1 LOGICAL :: F_qic_effr = .FALSE. INTEGER, PARAMETER :: PARAM_qip_effr = 307 INTEGER :: P_qip_effr = 1 LOGICAL :: F_qip_effr = .FALSE. INTEGER, PARAMETER :: PARAM_qid_effr = 308 INTEGER :: P_qid_effr = 1 LOGICAL :: F_qid_effr = .FALSE. INTEGER, PARAMETER :: PARAM_scr = 309 INTEGER :: P_scr = 1 LOGICAL :: F_scr = .FALSE. INTEGER, PARAMETER :: PARAM_scw = 310 INTEGER :: P_scw = 1 LOGICAL :: F_scw = .FALSE. INTEGER, PARAMETER :: PARAM_sci = 311 INTEGER :: P_sci = 1 LOGICAL :: F_sci = .FALSE. INTEGER, PARAMETER :: PARAM_scs = 312 INTEGER :: P_scs = 1 LOGICAL :: F_scs = .FALSE. INTEGER, PARAMETER :: PARAM_sch = 313 INTEGER :: P_sch = 1 LOGICAL :: F_sch = .FALSE. INTEGER, PARAMETER :: PARAM_schl = 314 INTEGER :: P_schl = 1 LOGICAL :: F_schl = .FALSE. INTEGER, PARAMETER :: PARAM_sciona = 315 INTEGER :: P_sciona = 1 LOGICAL :: F_sciona = .FALSE. INTEGER, PARAMETER :: PARAM_clnox = 316 INTEGER :: P_clnox = 1 LOGICAL :: F_clnox = .FALSE. INTEGER, PARAMETER :: PARAM_qnwfa = 317 INTEGER :: P_qnwfa = 1 LOGICAL :: F_qnwfa = .FALSE. INTEGER, PARAMETER :: PARAM_qnifa = 318 INTEGER :: P_qnifa = 1 LOGICAL :: F_qnifa = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_scalar = 319 INTEGER :: NUM_scalar = 1 INTEGER, PARAMETER :: PARAM_dfi_qndrop = 1 INTEGER :: P_dfi_qndrop = 1 LOGICAL :: F_dfi_qndrop = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qni = 2 INTEGER :: P_dfi_qni = 1 LOGICAL :: F_dfi_qni = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qni2 = 3 INTEGER :: P_dfi_qni2 = 1 LOGICAL :: F_dfi_qni2 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qni3 = 4 INTEGER :: P_dfi_qni3 = 1 LOGICAL :: F_dfi_qni3 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qt = 5 INTEGER :: P_dfi_qt = 1 LOGICAL :: F_dfi_qt = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qns = 6 INTEGER :: P_dfi_qns = 1 LOGICAL :: F_dfi_qns = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qnr = 7 INTEGER :: P_dfi_qnr = 1 LOGICAL :: F_dfi_qnr = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qng = 8 INTEGER :: P_dfi_qng = 1 LOGICAL :: F_dfi_qng = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qnh = 9 INTEGER :: P_dfi_qnh = 1 LOGICAL :: F_dfi_qnh = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qnn = 10 INTEGER :: P_dfi_qnn = 1 LOGICAL :: F_dfi_qnn = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qnc = 11 INTEGER :: P_dfi_qnc = 1 LOGICAL :: F_dfi_qnc = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qvolg = 12 INTEGER :: P_dfi_qvolg = 1 LOGICAL :: F_dfi_qvolg = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qvolh = 13 INTEGER :: P_dfi_qvolh = 1 LOGICAL :: F_dfi_qvolh = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qir = 14 INTEGER :: P_dfi_qir = 1 LOGICAL :: F_dfi_qir = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qib = 15 INTEGER :: P_dfi_qib = 1 LOGICAL :: F_dfi_qib = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qir2 = 16 INTEGER :: P_dfi_qir2 = 1 LOGICAL :: F_dfi_qir2 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qib2 = 17 INTEGER :: P_dfi_qib2 = 1 LOGICAL :: F_dfi_qib2 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qvoli = 18 INTEGER :: P_dfi_qvoli = 1 LOGICAL :: F_dfi_qvoli = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qaoli = 19 INTEGER :: P_dfi_qaoli = 1 LOGICAL :: F_dfi_qaoli = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qvoli2 = 20 INTEGER :: P_dfi_qvoli2 = 1 LOGICAL :: F_dfi_qvoli2 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qaoli2 = 21 INTEGER :: P_dfi_qaoli2 = 1 LOGICAL :: F_dfi_qaoli2 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qvoli3 = 22 INTEGER :: P_dfi_qvoli3 = 1 LOGICAL :: F_dfi_qvoli3 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qaoli3 = 23 INTEGER :: P_dfi_qaoli3 = 1 LOGICAL :: F_dfi_qaoli3 = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qke_adv = 24 INTEGER :: P_dfi_qke_adv = 1 LOGICAL :: F_dfi_qke_adv = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qnwfa = 25 INTEGER :: P_dfi_qnwfa = 1 LOGICAL :: F_dfi_qnwfa = .FALSE. INTEGER, PARAMETER :: PARAM_dfi_qnifa = 26 INTEGER :: P_dfi_qnifa = 1 LOGICAL :: F_dfi_qnifa = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_dfi_scalar = 27 INTEGER :: NUM_dfi_scalar = 1 INTEGER, PARAMETER :: PARAM_ocarbon = 1 INTEGER :: P_ocarbon = 1 LOGICAL :: F_ocarbon = .FALSE. INTEGER, PARAMETER :: PARAM_seasalt = 2 INTEGER :: P_seasalt = 1 LOGICAL :: F_seasalt = .FALSE. INTEGER, PARAMETER :: PARAM_dust = 3 INTEGER :: P_dust = 1 LOGICAL :: F_dust = .FALSE. INTEGER, PARAMETER :: PARAM_bcarbon = 4 INTEGER :: P_bcarbon = 1 LOGICAL :: F_bcarbon = .FALSE. INTEGER, PARAMETER :: PARAM_sulfate = 5 INTEGER :: P_sulfate = 1 LOGICAL :: F_sulfate = .FALSE. INTEGER, PARAMETER :: PARAM_upperaer = 6 INTEGER :: P_upperaer = 1 LOGICAL :: F_upperaer = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_aerod = 7 INTEGER :: NUM_aerod = 1 INTEGER, PARAMETER :: PARAM_cu_dust1 = 1 INTEGER :: P_cu_dust1 = 1 LOGICAL :: F_cu_dust1 = .FALSE. INTEGER, PARAMETER :: PARAM_cu_dust2 = 2 INTEGER :: P_cu_dust2 = 1 LOGICAL :: F_cu_dust2 = .FALSE. INTEGER, PARAMETER :: PARAM_cu_dust3 = 3 INTEGER :: P_cu_dust3 = 1 LOGICAL :: F_cu_dust3 = .FALSE. INTEGER, PARAMETER :: PARAM_cu_dust4 = 4 INTEGER :: P_cu_dust4 = 1 LOGICAL :: F_cu_dust4 = .FALSE. INTEGER, PARAMETER :: PARAM_cu_seasalt = 5 INTEGER :: P_cu_seasalt = 1 LOGICAL :: F_cu_seasalt = .FALSE. INTEGER, PARAMETER :: PARAM_cu_sulfate = 6 INTEGER :: P_cu_sulfate = 1 LOGICAL :: F_cu_sulfate = .FALSE. INTEGER, PARAMETER :: PARAM_cu_phobcar = 7 INTEGER :: P_cu_phobcar = 1 LOGICAL :: F_cu_phobcar = .FALSE. INTEGER, PARAMETER :: PARAM_cu_phibcar = 8 INTEGER :: P_cu_phibcar = 1 LOGICAL :: F_cu_phibcar = .FALSE. INTEGER, PARAMETER :: PARAM_cu_phoocar = 9 INTEGER :: P_cu_phoocar = 1 LOGICAL :: F_cu_phoocar = .FALSE. INTEGER, PARAMETER :: PARAM_cu_phiocar = 10 INTEGER :: P_cu_phiocar = 1 LOGICAL :: F_cu_phiocar = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_aerocu = 11 INTEGER :: NUM_aerocu = 1 INTEGER, PARAMETER :: PARAM_mth01 = 1 INTEGER :: P_mth01 = 1 LOGICAL :: F_mth01 = .FALSE. INTEGER, PARAMETER :: PARAM_mth02 = 2 INTEGER :: P_mth02 = 1 LOGICAL :: F_mth02 = .FALSE. INTEGER, PARAMETER :: PARAM_mth03 = 3 INTEGER :: P_mth03 = 1 LOGICAL :: F_mth03 = .FALSE. INTEGER, PARAMETER :: PARAM_mth04 = 4 INTEGER :: P_mth04 = 1 LOGICAL :: F_mth04 = .FALSE. INTEGER, PARAMETER :: PARAM_mth05 = 5 INTEGER :: P_mth05 = 1 LOGICAL :: F_mth05 = .FALSE. INTEGER, PARAMETER :: PARAM_mth06 = 6 INTEGER :: P_mth06 = 1 LOGICAL :: F_mth06 = .FALSE. INTEGER, PARAMETER :: PARAM_mth07 = 7 INTEGER :: P_mth07 = 1 LOGICAL :: F_mth07 = .FALSE. INTEGER, PARAMETER :: PARAM_mth08 = 8 INTEGER :: P_mth08 = 1 LOGICAL :: F_mth08 = .FALSE. INTEGER, PARAMETER :: PARAM_mth09 = 9 INTEGER :: P_mth09 = 1 LOGICAL :: F_mth09 = .FALSE. INTEGER, PARAMETER :: PARAM_mth10 = 10 INTEGER :: P_mth10 = 1 LOGICAL :: F_mth10 = .FALSE. INTEGER, PARAMETER :: PARAM_mth11 = 11 INTEGER :: P_mth11 = 1 LOGICAL :: F_mth11 = .FALSE. INTEGER, PARAMETER :: PARAM_mth12 = 12 INTEGER :: P_mth12 = 1 LOGICAL :: F_mth12 = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_ozmixm = 13 INTEGER :: NUM_ozmixm = 1 INTEGER, PARAMETER :: PARAM_sul = 1 INTEGER :: P_sul = 1 LOGICAL :: F_sul = .FALSE. INTEGER, PARAMETER :: PARAM_sslt = 2 INTEGER :: P_sslt = 1 LOGICAL :: F_sslt = .FALSE. INTEGER, PARAMETER :: PARAM_dust1 = 3 INTEGER :: P_dust1 = 1 LOGICAL :: F_dust1 = .FALSE. INTEGER, PARAMETER :: PARAM_dust2 = 4 INTEGER :: P_dust2 = 1 LOGICAL :: F_dust2 = .FALSE. INTEGER, PARAMETER :: PARAM_dust3 = 5 INTEGER :: P_dust3 = 1 LOGICAL :: F_dust3 = .FALSE. INTEGER, PARAMETER :: PARAM_dust4 = 6 INTEGER :: P_dust4 = 1 LOGICAL :: F_dust4 = .FALSE. INTEGER, PARAMETER :: PARAM_ocpho = 7 INTEGER :: P_ocpho = 1 LOGICAL :: F_ocpho = .FALSE. INTEGER, PARAMETER :: PARAM_bcpho = 8 INTEGER :: P_bcpho = 1 LOGICAL :: F_bcpho = .FALSE. INTEGER, PARAMETER :: PARAM_ocphi = 9 INTEGER :: P_ocphi = 1 LOGICAL :: F_ocphi = .FALSE. INTEGER, PARAMETER :: PARAM_bcphi = 10 INTEGER :: P_bcphi = 1 LOGICAL :: F_bcphi = .FALSE. INTEGER, PARAMETER :: PARAM_bg = 11 INTEGER :: P_bg = 1 LOGICAL :: F_bg = .FALSE. INTEGER, PARAMETER :: PARAM_volc = 12 INTEGER :: P_volc = 1 LOGICAL :: F_volc = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_aerosolc = 13 INTEGER :: NUM_aerosolc = 1 INTEGER, PARAMETER :: PARAM_u_ndg_new = 1 INTEGER :: P_u_ndg_new = 1 LOGICAL :: F_u_ndg_new = .FALSE. INTEGER, PARAMETER :: PARAM_v_ndg_new = 2 INTEGER :: P_v_ndg_new = 1 LOGICAL :: F_v_ndg_new = .FALSE. INTEGER, PARAMETER :: PARAM_t_ndg_new = 3 INTEGER :: P_t_ndg_new = 1 LOGICAL :: F_t_ndg_new = .FALSE. INTEGER, PARAMETER :: PARAM_q_ndg_new = 4 INTEGER :: P_q_ndg_new = 1 LOGICAL :: F_q_ndg_new = .FALSE. INTEGER, PARAMETER :: PARAM_ph_ndg_new = 5 INTEGER :: P_ph_ndg_new = 1 LOGICAL :: F_ph_ndg_new = .FALSE. INTEGER, PARAMETER :: PARAM_u_ndg_old = 6 INTEGER :: P_u_ndg_old = 1 LOGICAL :: F_u_ndg_old = .FALSE. INTEGER, PARAMETER :: PARAM_v_ndg_old = 7 INTEGER :: P_v_ndg_old = 1 LOGICAL :: F_v_ndg_old = .FALSE. INTEGER, PARAMETER :: PARAM_t_ndg_old = 8 INTEGER :: P_t_ndg_old = 1 LOGICAL :: F_t_ndg_old = .FALSE. INTEGER, PARAMETER :: PARAM_q_ndg_old = 9 INTEGER :: P_q_ndg_old = 1 LOGICAL :: F_q_ndg_old = .FALSE. INTEGER, PARAMETER :: PARAM_ph_ndg_old = 10 INTEGER :: P_ph_ndg_old = 1 LOGICAL :: F_ph_ndg_old = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_fdda3d = 11 INTEGER :: NUM_fdda3d = 1 INTEGER, PARAMETER :: PARAM_mu_ndg_new = 1 INTEGER :: P_mu_ndg_new = 1 LOGICAL :: F_mu_ndg_new = .FALSE. INTEGER, PARAMETER :: PARAM_mu_ndg_old = 2 INTEGER :: P_mu_ndg_old = 1 LOGICAL :: F_mu_ndg_old = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_fdda2d = 3 INTEGER :: NUM_fdda2d = 1 INTEGER, PARAMETER :: PARAM_advh_qv = 1 INTEGER :: P_advh_qv = 1 LOGICAL :: F_advh_qv = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_advh_t = 2 INTEGER :: NUM_advh_t = 1 INTEGER, PARAMETER :: PARAM_advz_qv = 1 INTEGER :: P_advz_qv = 1 LOGICAL :: F_advz_qv = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_advz_t = 2 INTEGER :: NUM_advz_t = 1 INTEGER, PARAMETER :: PARAM_fire_smoke = 1 INTEGER :: P_fire_smoke = 1 LOGICAL :: F_fire_smoke = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_1 = 3 INTEGER :: P_tr17_1 = 1 LOGICAL :: F_tr17_1 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_2 = 4 INTEGER :: P_tr17_2 = 1 LOGICAL :: F_tr17_2 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_3 = 5 INTEGER :: P_tr17_3 = 1 LOGICAL :: F_tr17_3 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_4 = 6 INTEGER :: P_tr17_4 = 1 LOGICAL :: F_tr17_4 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_5 = 7 INTEGER :: P_tr17_5 = 1 LOGICAL :: F_tr17_5 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_6 = 8 INTEGER :: P_tr17_6 = 1 LOGICAL :: F_tr17_6 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_7 = 9 INTEGER :: P_tr17_7 = 1 LOGICAL :: F_tr17_7 = .FALSE. INTEGER, PARAMETER :: PARAM_tr17_8 = 10 INTEGER :: P_tr17_8 = 1 LOGICAL :: F_tr17_8 = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_tracer = 11 INTEGER :: NUM_tracer = 1 INTEGER, PARAMETER :: PARAM_m11 = 1 INTEGER :: P_m11 = 1 LOGICAL :: F_m11 = .FALSE. INTEGER, PARAMETER :: PARAM_m22 = 2 INTEGER :: P_m22 = 1 LOGICAL :: F_m22 = .FALSE. INTEGER, PARAMETER :: PARAM_m33 = 3 INTEGER :: P_m33 = 1 LOGICAL :: F_m33 = .FALSE. INTEGER, PARAMETER :: PARAM_m12 = 4 INTEGER :: P_m12 = 1 LOGICAL :: F_m12 = .FALSE. INTEGER, PARAMETER :: PARAM_m13 = 5 INTEGER :: P_m13 = 1 LOGICAL :: F_m13 = .FALSE. INTEGER, PARAMETER :: PARAM_m23 = 6 INTEGER :: P_m23 = 1 LOGICAL :: F_m23 = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_nba_mij = 7 INTEGER :: NUM_nba_mij = 1 INTEGER, PARAMETER :: PARAM_r12 = 1 INTEGER :: P_r12 = 1 LOGICAL :: F_r12 = .FALSE. INTEGER, PARAMETER :: PARAM_r13 = 2 INTEGER :: P_r13 = 1 LOGICAL :: F_r13 = .FALSE. INTEGER, PARAMETER :: PARAM_r23 = 3 INTEGER :: P_r23 = 1 LOGICAL :: F_r23 = .FALSE. INTEGER, PARAMETER :: PARAM_smnsmn = 4 INTEGER :: P_smnsmn = 1 LOGICAL :: F_smnsmn = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_nba_rij = 5 INTEGER :: NUM_nba_rij = 1 INTEGER, PARAMETER :: PARAM_drops_zh = 1 INTEGER :: P_drops_zh = 1 LOGICAL :: F_drops_zh = .FALSE. INTEGER, PARAMETER :: PARAM_drops_zv = 2 INTEGER :: P_drops_zv = 1 LOGICAL :: F_drops_zv = .FALSE. INTEGER, PARAMETER :: PARAM_drops_zdr = 3 INTEGER :: P_drops_zdr = 1 LOGICAL :: F_drops_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_drops_ldr = 4 INTEGER :: P_drops_ldr = 1 LOGICAL :: F_drops_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_drops_kdp = 5 INTEGER :: P_drops_kdp = 1 LOGICAL :: F_drops_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_drops_crs = 6 INTEGER :: P_drops_crs = 1 LOGICAL :: F_drops_crs = .FALSE. INTEGER, PARAMETER :: PARAM_hail_zh = 7 INTEGER :: P_hail_zh = 1 LOGICAL :: F_hail_zh = .FALSE. INTEGER, PARAMETER :: PARAM_hail_zv = 8 INTEGER :: P_hail_zv = 1 LOGICAL :: F_hail_zv = .FALSE. INTEGER, PARAMETER :: PARAM_hail_zdr = 9 INTEGER :: P_hail_zdr = 1 LOGICAL :: F_hail_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_hail_ldr = 10 INTEGER :: P_hail_ldr = 1 LOGICAL :: F_hail_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_hail_kdp = 11 INTEGER :: P_hail_kdp = 1 LOGICAL :: F_hail_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_hail_crs = 12 INTEGER :: P_hail_crs = 1 LOGICAL :: F_hail_crs = .FALSE. INTEGER, PARAMETER :: PARAM_freezing_d_zh = 13 INTEGER :: P_freezing_d_zh = 1 LOGICAL :: F_freezing_d_zh = .FALSE. INTEGER, PARAMETER :: PARAM_freezing_d_zv = 14 INTEGER :: P_freezing_d_zv = 1 LOGICAL :: F_freezing_d_zv = .FALSE. INTEGER, PARAMETER :: PARAM_freezing_d_zdr = 15 INTEGER :: P_freezing_d_zdr = 1 LOGICAL :: F_freezing_d_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_freezing_d_ldr = 16 INTEGER :: P_freezing_d_ldr = 1 LOGICAL :: F_freezing_d_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_freezing_d_kdp = 17 INTEGER :: P_freezing_d_kdp = 1 LOGICAL :: F_freezing_d_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_freezing_d_crs = 18 INTEGER :: P_freezing_d_crs = 1 LOGICAL :: F_freezing_d_crs = .FALSE. INTEGER, PARAMETER :: PARAM_graupel_zh = 19 INTEGER :: P_graupel_zh = 1 LOGICAL :: F_graupel_zh = .FALSE. INTEGER, PARAMETER :: PARAM_graupel_zv = 20 INTEGER :: P_graupel_zv = 1 LOGICAL :: F_graupel_zv = .FALSE. INTEGER, PARAMETER :: PARAM_graupel_zdr = 21 INTEGER :: P_graupel_zdr = 1 LOGICAL :: F_graupel_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_graupel_ldr = 22 INTEGER :: P_graupel_ldr = 1 LOGICAL :: F_graupel_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_graupel_kdp = 23 INTEGER :: P_graupel_kdp = 1 LOGICAL :: F_graupel_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_graupel_crs = 24 INTEGER :: P_graupel_crs = 1 LOGICAL :: F_graupel_crs = .FALSE. INTEGER, PARAMETER :: PARAM_plates_zh = 25 INTEGER :: P_plates_zh = 1 LOGICAL :: F_plates_zh = .FALSE. INTEGER, PARAMETER :: PARAM_plates_zv = 26 INTEGER :: P_plates_zv = 1 LOGICAL :: F_plates_zv = .FALSE. INTEGER, PARAMETER :: PARAM_plates_zdr = 27 INTEGER :: P_plates_zdr = 1 LOGICAL :: F_plates_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_plates_ldr = 28 INTEGER :: P_plates_ldr = 1 LOGICAL :: F_plates_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_plates_kdp = 29 INTEGER :: P_plates_kdp = 1 LOGICAL :: F_plates_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_plates_crs = 30 INTEGER :: P_plates_crs = 1 LOGICAL :: F_plates_crs = .FALSE. INTEGER, PARAMETER :: PARAM_dendrites_zh = 31 INTEGER :: P_dendrites_zh = 1 LOGICAL :: F_dendrites_zh = .FALSE. INTEGER, PARAMETER :: PARAM_dendrites_zv = 32 INTEGER :: P_dendrites_zv = 1 LOGICAL :: F_dendrites_zv = .FALSE. INTEGER, PARAMETER :: PARAM_dendrites_zdr = 33 INTEGER :: P_dendrites_zdr = 1 LOGICAL :: F_dendrites_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_dendrites_ldr = 34 INTEGER :: P_dendrites_ldr = 1 LOGICAL :: F_dendrites_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_dendrites_kdp = 35 INTEGER :: P_dendrites_kdp = 1 LOGICAL :: F_dendrites_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_dendrites_crs = 36 INTEGER :: P_dendrites_crs = 1 LOGICAL :: F_dendrites_crs = .FALSE. INTEGER, PARAMETER :: PARAM_snow_zh = 37 INTEGER :: P_snow_zh = 1 LOGICAL :: F_snow_zh = .FALSE. INTEGER, PARAMETER :: PARAM_snow_zv = 38 INTEGER :: P_snow_zv = 1 LOGICAL :: F_snow_zv = .FALSE. INTEGER, PARAMETER :: PARAM_snow_zdr = 39 INTEGER :: P_snow_zdr = 1 LOGICAL :: F_snow_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_snow_ldr = 40 INTEGER :: P_snow_ldr = 1 LOGICAL :: F_snow_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_snow_kdp = 41 INTEGER :: P_snow_kdp = 1 LOGICAL :: F_snow_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_snow_crs = 42 INTEGER :: P_snow_crs = 1 LOGICAL :: F_snow_crs = .FALSE. INTEGER, PARAMETER :: PARAM_columns_zh = 43 INTEGER :: P_columns_zh = 1 LOGICAL :: F_columns_zh = .FALSE. INTEGER, PARAMETER :: PARAM_columns_zv = 44 INTEGER :: P_columns_zv = 1 LOGICAL :: F_columns_zv = .FALSE. INTEGER, PARAMETER :: PARAM_columns_zdr = 45 INTEGER :: P_columns_zdr = 1 LOGICAL :: F_columns_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_columns_ldr = 46 INTEGER :: P_columns_ldr = 1 LOGICAL :: F_columns_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_columns_kdp = 47 INTEGER :: P_columns_kdp = 1 LOGICAL :: F_columns_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_columns_crs = 48 INTEGER :: P_columns_crs = 1 LOGICAL :: F_columns_crs = .FALSE. INTEGER, PARAMETER :: PARAM_total_zh = 49 INTEGER :: P_total_zh = 1 LOGICAL :: F_total_zh = .FALSE. INTEGER, PARAMETER :: PARAM_total_zv = 50 INTEGER :: P_total_zv = 1 LOGICAL :: F_total_zv = .FALSE. INTEGER, PARAMETER :: PARAM_total_zdr = 51 INTEGER :: P_total_zdr = 1 LOGICAL :: F_total_zdr = .FALSE. INTEGER, PARAMETER :: PARAM_total_ldr = 52 INTEGER :: P_total_ldr = 1 LOGICAL :: F_total_ldr = .FALSE. INTEGER, PARAMETER :: PARAM_total_kdp = 53 INTEGER :: P_total_kdp = 1 LOGICAL :: F_total_kdp = .FALSE. INTEGER, PARAMETER :: PARAM_total_crs = 54 INTEGER :: P_total_crs = 1 LOGICAL :: F_total_crs = .FALSE. INTEGER, PARAMETER :: PARAM_NUM_sbmradar = 55 INTEGER :: NUM_sbmradar = 1 INTEGER, PARAMETER :: PARAM_NUM_chem = 1 INTEGER :: NUM_chem = 1 INTEGER, PARAMETER :: P_XSB = 1 INTEGER, PARAMETER :: P_XEB = 2 INTEGER, PARAMETER :: P_YSB = 3 INTEGER, PARAMETER :: P_YEB = 4 INTEGER, PARAMETER :: NUM_TIME_LEVELS = 2 INTEGER , PARAMETER :: PARAM_FIRST_SCALAR = 2 CONTAINS SUBROUTINE init_module_state_description END SUBROUTINE init_module_state_description END MODULE module_state_description !ENDOFREGISTRYGENERATEDINCLUDE