!STARTOFREGISTRYGENERATEDINCLUDE 'inc/in_use_for_config_q.inc' ! ! 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. ! IF(TRIM(vname).EQ.'qnwfa2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.28 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.28 ENDIF ENDIF IF(TRIM(vname).EQ.'qnifa2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.28 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.28 ENDIF ENDIF IF(TRIM(vname).EQ.'qnwfa2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.38 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.38 ENDIF ENDIF IF(TRIM(vname).EQ.'qnifa2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.38 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.38 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.50 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.50 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.51 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.51 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.52 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.52 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.53 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.53 ENDIF ENDIF IF(TRIM(vname).EQ.'qnwfa2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.29 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.29 ENDIF ENDIF IF(TRIM(vname).EQ.'qnifa2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.29 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.29 ENDIF ENDIF IF(TRIM(vname).EQ.'qndropsource')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%progn(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%progn(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qndropsource')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%alloc_qndropsource.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%alloc_qndropsource.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qlev_urb3d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_urban_physics(id).EQ.3 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_urban_physics(id).EQ.3 ENDIF ENDIF IF(TRIM(vname).EQ.'qr_urb4d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_urban_physics(id).EQ.3 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_urban_physics(id).EQ.3 ENDIF ENDIF IF(TRIM(vname).EQ.'qgr_urb3d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_urban_physics(id).EQ.3 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_urban_physics(id).EQ.3 ENDIF ENDIF IF(TRIM(vname).EQ.'q_ref2m')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.5 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.5 ENDIF ENDIF IF(TRIM(vname).EQ.'q2subgrid')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.5 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.5 ENDIF ENDIF IF(TRIM(vname).EQ.'qsnowxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qrainxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'q2mvxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'q2mbxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qinxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qrfxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qrfsxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qspringxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qspringsxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qslatxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qtdrain')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qlatxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qintsxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qintrxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qdripsxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qdriprxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qthrosxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qthrorxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qsnsubxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qsnfroxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qsubcxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qfrocxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qevacxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qdewcxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qfrzcxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qmeltcxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qsnbotxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'qmeltxy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.4 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.4 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_ndg_new')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.7 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.7 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_ndg_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.7 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.7 ENDIF ENDIF IF(TRIM(vname).EQ.'q2obs')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.7 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.7 ENDIF ENDIF IF(TRIM(vname).EQ.'qsfc_mosaic')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_mosaic.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_mosaic.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qfx_mosaic')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_mosaic.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_mosaic.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qc_urb2d_mosaic')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_mosaic.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_mosaic.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qke')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%bl_pbl_physics(id).EQ.5 uses = 1 ELSE in_use = in_use.OR.model_config_rec%bl_pbl_physics(id).EQ.5 ENDIF ENDIF IF(TRIM(vname).EQ.'qsq')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%bl_pbl_physics(id).EQ.5 uses = 1 ELSE in_use = in_use.OR.model_config_rec%bl_pbl_physics(id).EQ.5 ENDIF ENDIF IF(TRIM(vname).EQ.'qpert2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%bl_pbl_physics(id).EQ.9 uses = 1 ELSE in_use = in_use.OR.model_config_rec%bl_pbl_physics(id).EQ.9 ENDIF ENDIF IF(TRIM(vname).EQ.'qf_temf')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%bl_pbl_physics(id).EQ.10 uses = 1 ELSE in_use = in_use.OR.model_config_rec%bl_pbl_physics(id).EQ.10 ENDIF ENDIF IF(TRIM(vname).EQ.'qlup_temf')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%bl_pbl_physics(id).EQ.10 uses = 1 ELSE in_use = in_use.OR.model_config_rec%bl_pbl_physics(id).EQ.10 ENDIF ENDIF IF(TRIM(vname).EQ.'qtup_temf')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%bl_pbl_physics(id).EQ.10 uses = 1 ELSE in_use = in_use.OR.model_config_rec%bl_pbl_physics(id).EQ.10 ENDIF ENDIF IF(TRIM(vname).EQ.'qshear')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%tke_budget(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%tke_budget(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qbuoy')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%tke_budget(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%tke_budget(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qdiss')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%tke_budget(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%tke_budget(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qwt')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%tke_budget(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%tke_budget(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qc_bl')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%icloud_bl.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%icloud_bl.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qi_bl')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%icloud_bl.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%icloud_bl.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qcconv')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%cu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%cu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qiconv')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%cu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%cu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qc_iu_cup')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%cu_physics(id).EQ.10 uses = 1 ELSE in_use = in_use.OR.model_config_rec%cu_physics(id).EQ.10 ENDIF ENDIF IF(TRIM(vname).EQ.'qc_ic_cup')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%cu_physics(id).EQ.10 uses = 1 ELSE in_use = in_use.OR.model_config_rec%cu_physics(id).EQ.10 ENDIF ENDIF IF(TRIM(vname).EQ.'qndrop_ic_cup')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%cu_physics(id).EQ.10 uses = 1 ELSE in_use = in_use.OR.model_config_rec%cu_physics(id).EQ.10 ENDIF ENDIF IF(TRIM(vname).EQ.'qtflx_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qtten_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qvten_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qlten_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qiten_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qtsrc_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qtu_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qtu_emf_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qcu_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qlu_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qiu_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qrten_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qsten_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%shcu_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%shcu_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_ndg_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_sfdda(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_sfdda(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_ndg_new')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_sfdda(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_sfdda(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_ndg_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_sfdda(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_sfdda(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_ndg_new')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_sfdda(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_sfdda(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnorm')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_sfdda(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_sfdda(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qfx_both')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_sfdda(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_sfdda(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qr_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%aercu_used.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%aercu_used.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qs_cu')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%aercu_used.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%aercu_used.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_upstream_x')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_upstream_x_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_upstream_y')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_upstream_y_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_largescale')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_largescale_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'ql_largescale')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'ql_largescale_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'ql_upstream_x')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'ql_upstream_x_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'ql_upstream_y')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'ql_upstream_y_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q_soil_forcing_val')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q_soil_forcing_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_t_tend')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%scm_force.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%scm_force.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2min')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%output_diagnostics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%output_diagnostics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2max')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%output_diagnostics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%output_diagnostics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2mean')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%output_diagnostics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%output_diagnostics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2std')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%output_diagnostics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%output_diagnostics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qtiledrain')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%wrf_hydro.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%wrf_hydro.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%ifire(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%ifire(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.30 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.30 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_old')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mp_physics(id).EQ.32 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mp_physics(id).EQ.32 ENDIF ENDIF IF(TRIM(vname).EQ.'qicing_lg')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%afwa_icing_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%afwa_icing_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qicing_sm')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%afwa_icing_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%afwa_icing_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qicing_lg_max')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%afwa_icing_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%afwa_icing_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qicing_sm_max')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%afwa_icing_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%afwa_icing_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_mean')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%mean_diag.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%mean_diag.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q2_diurn')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%diurnal_diag.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%diurnal_diag.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnwfa_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%wif_input_opt.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%wif_input_opt.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnifa_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%wif_input_opt.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%wif_input_opt.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnbca2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%wif_input_opt.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%wif_input_opt.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnwfa_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%wif_input_opt.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%wif_input_opt.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnifa_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%wif_input_opt.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%wif_input_opt.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnocbb2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%aer_fire_emit_opt.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%aer_fire_emit_opt.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnocbb2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%aer_fire_emit_opt.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%aer_fire_emit_opt.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnbcbb2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%aer_fire_emit_opt.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%aer_fire_emit_opt.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'q_pl')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%p_lev_diags.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%p_lev_diags.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'q_zl')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%z_lev_diags.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%z_lev_diags.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qr_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qc_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qs_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qi_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qg_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qh_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qni_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnc_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnr_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qns_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qng_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qnh_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qntemp')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qntemp2')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'qv_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qr_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qc_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qs_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qi_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qg_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qh_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qni_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnc_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnr_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qns_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qng_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'qnh_gc')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%use_wps_input.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%use_wps_input.EQ.2 ENDIF ENDIF !ENDOFREGISTRYGENERATEDINCLUDE