!STARTOFREGISTRYGENERATEDINCLUDE 'inc/in_use_for_config_h.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.'hgt_urb2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_urban_physics(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_urban_physics(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hi_urb2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_urban_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_urban_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'hgt_urb2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_urban_physics(id).EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_urban_physics(id).EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'hi_urb2d')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.'hgt_urb2d')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.'h2osno')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.'h2ocan')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.'h2ocan_col')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.'h2osoi_liq_s1')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.'h2osoi_liq_s2')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.'h2osoi_liq_s3')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.'h2osoi_liq_s4')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.'h2osoi_liq_s5')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.'h2osoi_liq1')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.'h2osoi_liq2')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.'h2osoi_liq3')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.'h2osoi_liq4')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.'h2osoi_liq5')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.'h2osoi_liq6')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.'h2osoi_liq7')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.'h2osoi_liq8')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.'h2osoi_liq9')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.'h2osoi_liq10')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.'h2osoi_ice_s1')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.'h2osoi_ice_s2')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.'h2osoi_ice_s3')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.'h2osoi_ice_s4')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.'h2osoi_ice_s5')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.'h2osoi_ice1')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.'h2osoi_ice2')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.'h2osoi_ice3')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.'h2osoi_ice4')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.'h2osoi_ice5')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.'h2osoi_ice6')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.'h2osoi_ice7')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.'h2osoi_ice8')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.'h2osoi_ice9')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.'h2osoi_ice10')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.'h2osoi_vol1')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.'h2osoi_vol2')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.'h2osoi_vol3')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.'h2osoi_vol4')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.'h2osoi_vol5')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.'h2osoi_vol6')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.'h2osoi_vol7')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.'h2osoi_vol8')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.'h2osoi_vol9')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.'h2osoi_vol10')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.'hfxsubgrid')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.'harvest')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.'ho1')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.8 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.8 ENDIF ENDIF IF(TRIM(vname).EQ.'ho2')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.8 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.8 ENDIF ENDIF IF(TRIM(vname).EQ.'ho3')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.8 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.8 ENDIF ENDIF IF(TRIM(vname).EQ.'ho4')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_surface_physics(id).EQ.8 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_surface_physics(id).EQ.8 ENDIF ENDIF IF(TRIM(vname).EQ.'hfx_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.'hd_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.'hct_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.'hfx_fdda')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%grid_fdda(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%grid_fdda(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hfx_fdda')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.'hfx_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.'hfx_fdda')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.'hml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'h0ml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'huml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hvml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'h0ml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'huml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'hvml')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_ocean_physics.EQ.2 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_ocean_physics.EQ.2 ENDIF ENDIF IF(TRIM(vname).EQ.'hail_maxk1')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%nwp_diagnostics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%nwp_diagnostics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hail_max2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%nwp_diagnostics.EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%nwp_diagnostics.EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_diam_max')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_diam_mean')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_diam_std')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_dhail1')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_dhail2')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_dhail3')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_dhail4')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'hailcast_dhail5')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%hailcast_opt(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%hailcast_opt(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'h2osno2d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_lake_physics(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_lake_physics(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'h2osoi_ice3d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_lake_physics(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_lake_physics(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'h2osoi_liq3d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_lake_physics(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_lake_physics(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'h2osoi_vol3d')THEN IF(uses.EQ.0)THEN in_use = model_config_rec%sf_lake_physics(id).EQ.1 uses = 1 ELSE in_use = in_use.OR.model_config_rec%sf_lake_physics(id).EQ.1 ENDIF ENDIF IF(TRIM(vname).EQ.'height')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.'height')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.'hfx_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.'hfx_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.'ht_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.'hgtmaxw')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.'hgttrop')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.'ht_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