adding_ica_sw Subroutine

public subroutine adding_ica_sw(ncol, nlev, incoming_toa, albedo_surf_diffuse, albedo_surf_direct, cos_sza, reflectance, transmittance, ref_dir, trans_dir_diff, trans_dir_dir, flux_up, flux_dn_diffuse, flux_dn_direct)

Uses

  • proc~~adding_ica_sw~2~~UsesGraph proc~adding_ica_sw~2 adding_ica_sw module~parkind1~2 PARKIND1 proc~adding_ica_sw~2->module~parkind1~2 module~yomhook yomhook proc~adding_ica_sw~2->module~yomhook

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ncol
integer, intent(in) :: nlev
real(kind=jprb), intent(in), dimension(ncol) :: incoming_toa
real(kind=jprb), intent(in), dimension(ncol) :: albedo_surf_diffuse
real(kind=jprb), intent(in), dimension(ncol) :: albedo_surf_direct
real(kind=jprb), intent(in), dimension(ncol) :: cos_sza
real(kind=jprb), intent(in), dimension(ncol, nlev) :: reflectance
real(kind=jprb), intent(in), dimension(ncol, nlev) :: transmittance
real(kind=jprb), intent(in), dimension(ncol, nlev) :: ref_dir
real(kind=jprb), intent(in), dimension(ncol, nlev) :: trans_dir_diff
real(kind=jprb), intent(in), dimension(ncol, nlev) :: trans_dir_dir
real(kind=jprb), intent(out), dimension(ncol, nlev+1) :: flux_up
real(kind=jprb), intent(out), dimension(ncol, nlev+1) :: flux_dn_diffuse
real(kind=jprb), intent(out), dimension(ncol, nlev+1) :: flux_dn_direct

Calls

proc~~adding_ica_sw~2~~CallsGraph proc~adding_ica_sw~2 adding_ica_sw proc~dr_hook dr_hook proc~adding_ica_sw~2->proc~dr_hook

Contents