scale_cpl_sfc_index Module Reference

module coupler / surface-atmospehre More...

Variables
integer, parameter, public	n_rad_rgn = 3
integer, parameter, public	i_r_ir = 1
integer, parameter, public	i_r_nir = 2
integer, parameter, public	i_r_vis = 3
real(rp), parameter, public	rad_rgn_boundary_vis = 0.7_RP
real(rp), parameter, public	rad_rgn_boundary_ir = 4.0_RP
integer, parameter, public	n_rad_dir = 2
integer, parameter, public	i_r_direct = 1
integer, parameter, public	i_r_diffuse = 2

Detailed Description

module coupler / surface-atmospehre

Description

Common index among surface submodels and atmosphere

Author

Team SCALE

Variable Documentation

n_rad_rgn

integer, parameter, public scale_cpl_sfc_index::n_rad_rgn = 3

Definition at line 28 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: N_RAD_RGN   = 3 ! number of the radiation band region

Referenced by scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), mod_atmos_phy_rd_vars::atmos_phy_rd_vars_setup(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), mod_cpl_vars::cpl_vars_setup(), mod_land_vars::land_vars_setup(), mod_ocean_vars::ocean_vars_setup(), mod_realinput::realinput_surface(), and mod_urban_vars::urban_vars_setup().

i_r_ir

integer, parameter, public scale_cpl_sfc_index::i_r_ir = 1

Definition at line 29 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: I_R_IR      = 1 ! infrared         lamda > 4.0um

Referenced by mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), scale_atmos_phy_rd_offline::atmos_phy_rd_offline_flux(), mod_atmos_phy_rd_vars::atmos_phy_rd_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_check(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_read(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_write(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), mod_cpl_vars::cpl_getatm_lnd(), mod_cpl_vars::cpl_getatm_ocn(), mod_cpl_vars::cpl_getatm_urb(), mod_cpl_vars::cpl_getsfc_atm(), scale_cpl_phy_sfc_fixed_temp::cpl_phy_sfc_fixed_temp(), scale_cpl_phy_sfc_skin::cpl_phy_sfc_skin(), mod_cpl_vars::cpl_putatm(), mod_cpl_vars::cpl_putlnd(), mod_cpl_vars::cpl_putocn(), mod_cpl_vars::cpl_puturb(), mod_atmos_phy_sf_driver::history_output(), mod_land_driver::land_driver_calc_tendency(), mod_realinput::land_interporation(), scale_land_phy_snow_ky90::land_phy_snow_ky90(), mod_mkinit::land_setup(), mod_land_vars::land_vars_check(), mod_land_vars::land_vars_history(), mod_land_vars::land_vars_restart_read(), mod_land_vars::land_vars_restart_write(), mod_ocean_driver::ocean_driver_calc_tendency(), mod_realinput::ocean_interporation(), scale_ocean_phy_albedo::ocean_phy_albedo_const(), scale_ocean_phy_albedo::ocean_phy_albedo_seaice(), mod_mkinit::ocean_setup(), mod_ocean_vars::ocean_vars_check(), mod_ocean_vars::ocean_vars_history(), mod_ocean_vars::ocean_vars_restart_read(), mod_ocean_vars::ocean_vars_restart_write(), mod_realinput_netcdf::parentlandinputnetcdf(), mod_realinput_netcdf::parentoceaninputnetcdf(), mod_realinput::realinput_surface(), scale_urban_dyn_kusaka01::urban_dyn_kusaka01(), mod_mkinit::urban_setup(), mod_urban_driver::urban_surface_get(), mod_urban_vars::urban_vars_check(), mod_urban_vars::urban_vars_history(), mod_urban_vars::urban_vars_restart_read(), and mod_urban_vars::urban_vars_restart_write().

i_r_nir

integer, parameter, public scale_cpl_sfc_index::i_r_nir = 2

Definition at line 30 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: I_R_NIR     = 2 ! near-IR  4.0um > lamda > 0.7um

Referenced by mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), scale_atmos_phy_rd_offline::atmos_phy_rd_offline_flux(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_check(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_read(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_write(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), scale_cpl_phy_sfc_fixed_temp::cpl_phy_sfc_fixed_temp(), scale_cpl_phy_sfc_skin::cpl_phy_sfc_skin(), mod_atmos_phy_sf_driver::history_output(), mod_land_driver::land_driver_calc_tendency(), mod_realinput::land_interporation(), scale_land_phy_snow_ky90::land_phy_snow_ky90(), mod_mkinit::land_setup(), mod_land_vars::land_vars_check(), mod_land_vars::land_vars_history(), mod_land_vars::land_vars_restart_read(), mod_land_vars::land_vars_restart_write(), mod_realinput::ocean_interporation(), scale_ocean_phy_albedo::ocean_phy_albedo_const(), scale_ocean_phy_albedo::ocean_phy_albedo_seaice(), mod_mkinit::ocean_setup(), mod_ocean_vars::ocean_vars_check(), mod_ocean_vars::ocean_vars_history(), mod_ocean_vars::ocean_vars_restart_read(), mod_ocean_vars::ocean_vars_restart_write(), mod_realinput_netcdf::parentlandinputnetcdf(), mod_realinput_netcdf::parentoceaninputnetcdf(), scale_urban_dyn_kusaka01::urban_dyn_kusaka01(), mod_mkinit::urban_setup(), mod_urban_driver::urban_surface_get(), mod_urban_vars::urban_vars_check(), mod_urban_vars::urban_vars_history(), mod_urban_vars::urban_vars_restart_read(), and mod_urban_vars::urban_vars_restart_write().

i_r_vis

integer, parameter, public scale_cpl_sfc_index::i_r_vis = 3

Definition at line 31 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: I_R_VIS     = 3 ! visible  0.7um > lamda

Referenced by mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), scale_atmos_phy_rd_offline::atmos_phy_rd_offline_flux(), mod_atmos_phy_rd_vars::atmos_phy_rd_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_check(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_read(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_write(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), mod_cpl_vars::cpl_getatm_lnd(), mod_cpl_vars::cpl_getatm_ocn(), mod_cpl_vars::cpl_getatm_urb(), mod_cpl_vars::cpl_getsfc_atm(), scale_cpl_phy_sfc_fixed_temp::cpl_phy_sfc_fixed_temp(), scale_cpl_phy_sfc_skin::cpl_phy_sfc_skin(), mod_cpl_vars::cpl_putatm(), mod_cpl_vars::cpl_putlnd(), mod_cpl_vars::cpl_putocn(), mod_cpl_vars::cpl_puturb(), mod_atmos_phy_sf_driver::history_output(), mod_land_driver::land_driver_calc_tendency(), mod_realinput::land_interporation(), scale_land_phy_snow_ky90::land_phy_snow_ky90(), mod_mkinit::land_setup(), mod_land_vars::land_vars_check(), mod_land_vars::land_vars_history(), mod_land_vars::land_vars_restart_read(), mod_land_vars::land_vars_restart_write(), mod_ocean_driver::ocean_driver_calc_tendency(), mod_realinput::ocean_interporation(), scale_ocean_phy_albedo::ocean_phy_albedo_const(), scale_ocean_phy_albedo::ocean_phy_albedo_seaice(), mod_mkinit::ocean_setup(), mod_ocean_vars::ocean_vars_check(), mod_ocean_vars::ocean_vars_history(), mod_ocean_vars::ocean_vars_restart_read(), mod_ocean_vars::ocean_vars_restart_write(), mod_realinput_netcdf::parentlandinputnetcdf(), mod_realinput_netcdf::parentoceaninputnetcdf(), mod_realinput::realinput_surface(), scale_urban_dyn_kusaka01::urban_dyn_kusaka01(), mod_mkinit::urban_setup(), mod_urban_driver::urban_surface_get(), mod_urban_vars::urban_vars_check(), mod_urban_vars::urban_vars_history(), mod_urban_vars::urban_vars_restart_read(), and mod_urban_vars::urban_vars_restart_write().

rad_rgn_boundary_vis

real(rp), parameter, public scale_cpl_sfc_index::rad_rgn_boundary_vis = 0.7_RP

Definition at line 33 of file scale_cpl_sfc_index.F90.

  real(RP), public, parameter :: RAD_RGN_boundary_VIS = 0.7_rp ! [um]

rad_rgn_boundary_ir

real(rp), parameter, public scale_cpl_sfc_index::rad_rgn_boundary_ir = 4.0_RP

Definition at line 34 of file scale_cpl_sfc_index.F90.

  real(RP), public, parameter :: RAD_RGN_boundary_IR  = 4.0_rp ! [um]

n_rad_dir

integer, parameter, public scale_cpl_sfc_index::n_rad_dir = 2

Definition at line 36 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: N_RAD_DIR   = 2 ! number of the radiation direction

Referenced by scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), mod_atmos_phy_rd_vars::atmos_phy_rd_vars_setup(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), mod_cpl_vars::cpl_vars_setup(), mod_land_vars::land_vars_setup(), mod_ocean_vars::ocean_vars_setup(), mod_realinput::realinput_surface(), and mod_urban_vars::urban_vars_setup().

i_r_direct

integer, parameter, public scale_cpl_sfc_index::i_r_direct = 1

Definition at line 37 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: I_R_direct  = 1

Referenced by mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), scale_atmos_phy_rd_offline::atmos_phy_rd_offline_flux(), mod_atmos_phy_rd_vars::atmos_phy_rd_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_check(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_read(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_write(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), mod_cpl_vars::cpl_getatm_lnd(), mod_cpl_vars::cpl_getatm_ocn(), mod_cpl_vars::cpl_getatm_urb(), mod_cpl_vars::cpl_getsfc_atm(), scale_cpl_phy_sfc_fixed_temp::cpl_phy_sfc_fixed_temp(), scale_cpl_phy_sfc_skin::cpl_phy_sfc_skin(), mod_cpl_vars::cpl_putatm(), mod_cpl_vars::cpl_putlnd(), mod_cpl_vars::cpl_putocn(), mod_cpl_vars::cpl_puturb(), mod_atmos_phy_sf_driver::history_output(), mod_land_driver::land_driver_calc_tendency(), scale_land_phy_snow_ky90::land_phy_snow_ky90(), mod_land_vars::land_vars_check(), mod_land_vars::land_vars_history(), mod_land_vars::land_vars_restart_read(), mod_land_vars::land_vars_restart_write(), mod_ocean_driver::ocean_driver_calc_tendency(), scale_ocean_phy_albedo::ocean_phy_albedo_const(), scale_ocean_phy_albedo_nakajima00::ocean_phy_albedo_nakajima00(), scale_ocean_phy_albedo::ocean_phy_albedo_seaice(), mod_ocean_vars::ocean_vars_check(), mod_ocean_vars::ocean_vars_history(), mod_ocean_vars::ocean_vars_restart_read(), mod_ocean_vars::ocean_vars_restart_write(), mod_realinput_netcdf::parentlandinputnetcdf(), mod_realinput_netcdf::parentoceaninputnetcdf(), mod_realinput::realinput_surface(), scale_urban_dyn_kusaka01::urban_dyn_kusaka01(), mod_urban_driver::urban_surface_get(), mod_urban_vars::urban_vars_check(), mod_urban_vars::urban_vars_history(), mod_urban_vars::urban_vars_restart_read(), and mod_urban_vars::urban_vars_restart_write().

i_r_diffuse

integer, parameter, public scale_cpl_sfc_index::i_r_diffuse = 2

Definition at line 38 of file scale_cpl_sfc_index.F90.

  integer,  public, parameter :: I_R_diffuse = 2

Referenced by mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), scale_atmos_phy_rd_offline::atmos_phy_rd_offline_flux(), mod_atmos_phy_rd_vars::atmos_phy_rd_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_check(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_fillhalo(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_read(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_restart_write(), mod_atmos_phy_sf_vars::atmos_phy_sf_vars_setup(), mod_cpl_vars::cpl_getatm_lnd(), mod_cpl_vars::cpl_getatm_ocn(), mod_cpl_vars::cpl_getatm_urb(), mod_cpl_vars::cpl_getsfc_atm(), scale_cpl_phy_sfc_fixed_temp::cpl_phy_sfc_fixed_temp(), scale_cpl_phy_sfc_skin::cpl_phy_sfc_skin(), mod_cpl_vars::cpl_putatm(), mod_cpl_vars::cpl_putlnd(), mod_cpl_vars::cpl_putocn(), mod_cpl_vars::cpl_puturb(), mod_atmos_phy_sf_driver::history_output(), mod_land_driver::land_driver_calc_tendency(), scale_land_phy_snow_ky90::land_phy_snow_ky90(), mod_land_vars::land_vars_check(), mod_land_vars::land_vars_history(), mod_land_vars::land_vars_restart_read(), mod_land_vars::land_vars_restart_write(), mod_ocean_driver::ocean_driver_calc_tendency(), scale_ocean_phy_albedo::ocean_phy_albedo_const(), scale_ocean_phy_albedo_nakajima00::ocean_phy_albedo_nakajima00(), scale_ocean_phy_albedo::ocean_phy_albedo_seaice(), mod_ocean_vars::ocean_vars_check(), mod_ocean_vars::ocean_vars_history(), mod_ocean_vars::ocean_vars_restart_read(), mod_ocean_vars::ocean_vars_restart_write(), mod_realinput_netcdf::parentlandinputnetcdf(), mod_realinput_netcdf::parentoceaninputnetcdf(), mod_realinput::realinput_surface(), scale_urban_dyn_kusaka01::urban_dyn_kusaka01(), mod_urban_driver::urban_surface_get(), mod_urban_vars::urban_vars_check(), mod_urban_vars::urban_vars_history(), mod_urban_vars::urban_vars_restart_read(), and mod_urban_vars::urban_vars_restart_write().