Public Member Functions | |
subroutine | tartes (PSNOWSSA, PSNOWRHO, PSNOWDZ, PSNOWG0, PSNOWY0, PSNOWW0, PSNOWB0, PSNOWIMP_DENSITY, PSNOWIMP_CONTENT, PALB, PSW_RAD_DIF, PSW_RAD_DIR, PCOSZEN, KNLVLS_USE, PSNOWALB, PSNOWENERGY, PSOILENERGY) |
subroutine | init_tartes () |
subroutine | refice () |
subroutine | refsoot_imag () |
subroutine | shape_parameter_variations (PSNOWG0, PSNOWY0, PSNOWW0, PSNOWB0, PSNOWG00, PSNOWY, PSNOWW, PSNOWB) |
subroutine | impurities_co_single_scattering_albedo (PSNOWSSA, PSNOWIMP_DENSITY, PSNOWIMP_CONTENT, KNLVLS_USE, KMAX_USE, PCOSSALB) |
subroutine | single_scattering_optical_parameters (PSNOWSSA, PSNOWRHO, PSNOWG0, PSNOWY0, PSNOWW0, PSNOWB0, PSNOWIMP_DENSITY, PSNOWIMP_CONTENT, KNLVLS_USE, KMAX_USE, PSNOWSSALB, PSNOWG) |
subroutine | infinite_medium_optical_parameters (PSNOWSSALB, PSNOWG, KNLVLS_USE, KMAX_USE, PSNOWALBEDO, PKESTAR, PG_STAR, PSSALB_STAR, PGAMMA1, PGAMMA2) |
subroutine | taustar_vector (PSNOWSSA, PSNOWRHO, PSNOWDZ, PSNOWSSALB, PSNOWG, PKESTAR, KNLVLS_USE, KMAX_USE, PDTAUSTAR, PTAUSTAR) |
subroutine | estimate_effective_layer_number (PKESTAR, PDTAUSTAR, KNLVLS_USE, KMAX_USE, KNLVLS_EFF, KMAX_EFF) |
subroutine | gp_gm_vectors (PSNOWSSALB, PKESTAR, PG_STAR, PSSALB_STAR, PGAMMA1, PGAMMA2, PCOSZEN, PSW_RAD, KNLVLS_EFF, KMAX_EFF, PGP, PGM) |
subroutine | two_stream_matrix (PSNOWALBEDO, PSOILALBEDO, PKESTAR, PDTAUSTAR, KNLVLS_EFF, KMAX_EFF, PDM, PD, PDP) |
subroutine | two_stream_vector (PSNOWALBEDO, PSOILALBEDO, PDTAUSTAR, PTAUSTAR, PGM, PGP, PCOSZEN, KNLVLS_EFF, KMAX_EFF, PVECTOR) |
subroutine | solves_two_stream2 (PDM, PD, PDP, PVECT_DIR, PVECT_DIF, PSNOWALBEDO, PSW_RAD_DIR, PSW_RAD_DIF, KNLVLS_EFF, KMAX_EFF, PXA_DIR, PXA_DIF, PXB_DIR, PXB_DIF, PXC_DIR, PXC_DIF, PXD_DIR, PXD_DIF) |
subroutine | snowpack_albedo (PXC_DIR, PXC_DIF, PXD_DIR, PXD_DIF, PGP_DIR, PGP_DIF, PCOSZEN_DIR, PCOSZEN_DIF, PSW_RAD_DIR, PSW_RAD_DIF, PSNOWALB) |
subroutine | energy_profile (PXA, PXB, PXC, PXD, PKESTAR, PDTAUSTAR, PTAUSTAR, PGM, PGP, PCOSZEN, KNLVLS_EFF, KMAX_EFF, PEPROFILE) |
subroutine | soil_absorption (PXA, PXB, PKESTAR, PDTAUSTAR, PTAUSTAR, PGM, PCOSZEN, PALB, KNLVLS_EFF, PSOILENERGY) |
subroutine | spectral_repartition (PSW_RAD, PCOSZEN, PSW_RAD_DIF, PSW_RAD_DIR, PNIR_ABS) |
subroutine | snowcro_tartes (PSNOWGRAN1, PSNOWGRAN2, PSNOWRHO, PSNOWDZ, PSNOWG0, PSNOWY0, PSNOWW0, PSNOWB0, PSNOWIMP_DENSITY, PSNOWIMP_CONTENT, PALB, PSW_RAD, PZENITH, KNLVLS_USE, PSNOWALB, PRADSINK, PRADXS, ODEBUG, HSNOWMETAMO) |
subroutine | snowcro_call_tartes (PSNOWGRAN1, PSNOWGRAN2, PSNOWRHO, PSNOWDZ, PSNOWG0, PSNOWY0, PSNOWW0, PSNOWB0, PSNOWIMP_DENSITY, PSNOWIMP_CONTENT, PALB, PSW_RAD, PZENITH, KNLVLS_USE, PSNOWALB, PRADSINK, PRADXS, ODEBUG, HSNOWMETAMO) |
Definition at line 5 of file mode_tartes.F90.
subroutine mode_tartes::energy_profile | ( | real, dimension(:,:,:), intent(in) | PXA, |
real, dimension(:,:,:), intent(in) | PXB, | ||
real, dimension(:,:,:), intent(in) | PXC, | ||
real, dimension(:,:,:), intent(in) | PXD, | ||
real, dimension(:,:,:), intent(in) | PKESTAR, | ||
real, dimension(:,:,:), intent(in) | PDTAUSTAR, | ||
real, dimension(:,:,:), intent(in) | PTAUSTAR, | ||
real, dimension(:,:,:), intent(in) | PGM, | ||
real, dimension(:,:,:), intent(in) | PGP, | ||
real, dimension(:), intent(in) | PCOSZEN, | ||
integer, dimension(:,:), intent(in) | KNLVLS_EFF, | ||
integer, dimension(:), intent(in) | KMAX_EFF, | ||
real, dimension(:,:,:), intent(out) | PEPROFILE | ||
) |
subroutine mode_tartes::estimate_effective_layer_number | ( | real, dimension(:,:,:), intent(in) | PKESTAR, |
real, dimension(:,:,:), intent(in) | PDTAUSTAR, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
integer, intent(in) | KMAX_USE, | ||
integer, dimension(:,:), intent(out) | KNLVLS_EFF, | ||
integer, dimension(:), intent(out) | KMAX_EFF | ||
) |
subroutine mode_tartes::gp_gm_vectors | ( | real, dimension(:,:,:), intent(in) | PSNOWSSALB, |
real, dimension(:,:,:), intent(in) | PKESTAR, | ||
real, dimension(:,:,:), intent(in) | PG_STAR, | ||
real, dimension(:,:,:), intent(in) | PSSALB_STAR, | ||
real, dimension(:,:,:), intent(in) | PGAMMA1, | ||
real, dimension(:,:,:), intent(in) | PGAMMA2, | ||
real, dimension(:), intent(in) | PCOSZEN, | ||
real, dimension(:,:), intent(in) | PSW_RAD, | ||
integer, dimension(:,:), intent(in) | KNLVLS_EFF, | ||
integer, dimension(:), intent(in) | KMAX_EFF, | ||
real, dimension(:,:,:), intent(out) | PGP, | ||
real, dimension(:,:,:), intent(out) | PGM | ||
) |
subroutine mode_tartes::impurities_co_single_scattering_albedo | ( | real, dimension(:,:), intent(in) | PSNOWSSA, |
real, dimension(:,:,:), intent(in) | PSNOWIMP_DENSITY, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_CONTENT, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
integer, intent(in) | KMAX_USE, | ||
real, dimension(:,:,:), intent(out) | PCOSSALB | ||
) |
subroutine mode_tartes::infinite_medium_optical_parameters | ( | real, dimension(:,:,:), intent(in) | PSNOWSSALB, |
real, dimension(:,:,:), intent(in) | PSNOWG, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
integer, intent(in) | KMAX_USE, | ||
real, dimension(:,:,:), intent(out) | PSNOWALBEDO, | ||
real, dimension(:,:,:), intent(out) | PKESTAR, | ||
real, dimension(:,:,:), intent(out) | PG_STAR, | ||
real, dimension(:,:,:), intent(out) | PSSALB_STAR, | ||
real, dimension(:,:,:), intent(out) | PGAMMA1, | ||
real, dimension(:,:,:), intent(out) | PGAMMA2 | ||
) |
subroutine mode_tartes::init_tartes | ( | ) |
Definition at line 226 of file mode_tartes.F90.
subroutine mode_tartes::refice | ( | ) |
Definition at line 244 of file mode_tartes.F90.
subroutine mode_tartes::refsoot_imag | ( | ) |
subroutine mode_tartes::shape_parameter_variations | ( | real, dimension(:,:), intent(in) | PSNOWG0, |
real, dimension(:,:), intent(in) | PSNOWY0, | ||
real, dimension(:,:), intent(in) | PSNOWW0, | ||
real, dimension(:,:), intent(in) | PSNOWB0, | ||
real, dimension(:,:,:), intent(out) | PSNOWG00, | ||
real, dimension(:,:,:), intent(out) | PSNOWY, | ||
real, dimension(:,:,:), intent(out) | PSNOWW, | ||
real, dimension(:,:,:), intent(out) | PSNOWB | ||
) |
subroutine mode_tartes::single_scattering_optical_parameters | ( | real, dimension(:,:), intent(in) | PSNOWSSA, |
real, dimension(:,:), intent(in) | PSNOWRHO, | ||
real, dimension(:,:), intent(in) | PSNOWG0, | ||
real, dimension(:,:), intent(in) | PSNOWY0, | ||
real, dimension(:,:), intent(in) | PSNOWW0, | ||
real, dimension(:,:), intent(in) | PSNOWB0, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_DENSITY, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_CONTENT, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
integer, intent(in) | KMAX_USE, | ||
real, dimension(:,:,:), intent(out) | PSNOWSSALB, | ||
real, dimension(:,:,:), intent(out) | PSNOWG | ||
) |
Definition at line 439 of file mode_tartes.F90.
subroutine mode_tartes::snowcro_call_tartes | ( | real, dimension(:,:), intent(in) | PSNOWGRAN1, |
real, dimension(:,:), intent(in) | PSNOWGRAN2, | ||
real, dimension(:,:), intent(in) | PSNOWRHO, | ||
real, dimension(:,:), intent(in) | PSNOWDZ, | ||
real, dimension(:,:), intent(in) | PSNOWG0, | ||
real, dimension(:,:), intent(in) | PSNOWY0, | ||
real, dimension(:,:), intent(in) | PSNOWW0, | ||
real, dimension(:,:), intent(in) | PSNOWB0, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_DENSITY, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_CONTENT, | ||
real, dimension(:), intent(in) | PALB, | ||
real, dimension(:), intent(in) | PSW_RAD, | ||
real, dimension(:), intent(in) | PZENITH, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
real, dimension(:), intent(out) | PSNOWALB, | ||
real, dimension(:,:), intent(out) | PRADSINK, | ||
real, dimension(:), intent(out) | PRADXS, | ||
logical, intent(in) | ODEBUG, | ||
character(3), intent(in) | HSNOWMETAMO | ||
) |
Definition at line 1371 of file mode_tartes.F90.
subroutine mode_tartes::snowcro_tartes | ( | real, dimension(:,:), intent(in) | PSNOWGRAN1, |
real, dimension(:,:), intent(in) | PSNOWGRAN2, | ||
real, dimension(:,:), intent(in) | PSNOWRHO, | ||
real, dimension(:,:), intent(in) | PSNOWDZ, | ||
real, dimension(:,:), intent(in) | PSNOWG0, | ||
real, dimension(:,:), intent(in) | PSNOWY0, | ||
real, dimension(:,:), intent(in) | PSNOWW0, | ||
real, dimension(:,:), intent(in) | PSNOWB0, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_DENSITY, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_CONTENT, | ||
real, dimension(:), intent(in) | PALB, | ||
real, dimension(:), intent(in) | PSW_RAD, | ||
real, dimension(:), intent(in) | PZENITH, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
real, dimension(:), intent(out) | PSNOWALB, | ||
real, dimension(:,:), intent(out) | PRADSINK, | ||
real, dimension(:), intent(out) | PRADXS, | ||
logical, intent(in) | ODEBUG, | ||
character(3), intent(in) | HSNOWMETAMO | ||
) |
Definition at line 1174 of file mode_tartes.F90.
subroutine mode_tartes::snowpack_albedo | ( | real, dimension(:,:), intent(in) | PXC_DIR, |
real, dimension(:,:), intent(in) | PXC_DIF, | ||
real, dimension(:,:), intent(in) | PXD_DIR, | ||
real, dimension(:,:), intent(in) | PXD_DIF, | ||
real, dimension(:,:), intent(in) | PGP_DIR, | ||
real, dimension(:,:), intent(in) | PGP_DIF, | ||
real, dimension(:), intent(in) | PCOSZEN_DIR, | ||
real, dimension(:), intent(in) | PCOSZEN_DIF, | ||
real, dimension(:,:), intent(in) | PSW_RAD_DIR, | ||
real, dimension(:,:), intent(in) | PSW_RAD_DIF, | ||
real, dimension(:,:), intent(out) | PSNOWALB | ||
) |
subroutine mode_tartes::soil_absorption | ( | real, dimension(:,:,:), intent(in) | PXA, |
real, dimension(:,:,:), intent(in) | PXB, | ||
real, dimension(:,:,:), intent(in) | PKESTAR, | ||
real, dimension(:,:,:), intent(in) | PDTAUSTAR, | ||
real, dimension(:,:,:), intent(in) | PTAUSTAR, | ||
real, dimension(:,:,:), intent(in) | PGM, | ||
real, dimension(:), intent(in) | PCOSZEN, | ||
real, dimension(:,:), intent(in) | PALB, | ||
integer, dimension(:,:), intent(in) | KNLVLS_EFF, | ||
real, dimension(:,:), intent(out) | PSOILENERGY | ||
) |
subroutine mode_tartes::solves_two_stream2 | ( | real, dimension(:,:,:), intent(in) | PDM, |
real, dimension(:,:,:), intent(in) | PD, | ||
real, dimension(:,:,:), intent(in) | PDP, | ||
real, dimension(:,:,:), intent(in) | PVECT_DIR, | ||
real, dimension(:,:,:), intent(in) | PVECT_DIF, | ||
real, dimension(:,:,:), intent(in) | PSNOWALBEDO, | ||
real, dimension(:,:), intent(in) | PSW_RAD_DIR, | ||
real, dimension(:,:), intent(in) | PSW_RAD_DIF, | ||
integer, dimension(:,:), intent(in) | KNLVLS_EFF, | ||
integer, dimension(:), intent(in) | KMAX_EFF, | ||
real, dimension(:,:,:), intent(out) | PXA_DIR, | ||
real, dimension(:,:,:), intent(out) | PXA_DIF, | ||
real, dimension(:,:,:), intent(out) | PXB_DIR, | ||
real, dimension(:,:,:), intent(out) | PXB_DIF, | ||
real, dimension(:,:,:), intent(out) | PXC_DIR, | ||
real, dimension(:,:,:), intent(out) | PXC_DIF, | ||
real, dimension(:,:,:), intent(out) | PXD_DIR, | ||
real, dimension(:,:,:), intent(out) | PXD_DIF | ||
) |
subroutine mode_tartes::spectral_repartition | ( | real, dimension(:), intent(in) | PSW_RAD, |
real, dimension(:), intent(in) | PCOSZEN, | ||
real, dimension(:,:), intent(out) | PSW_RAD_DIF, | ||
real, dimension(:,:), intent(out) | PSW_RAD_DIR, | ||
real, dimension(:), intent(out) | PNIR_ABS | ||
) |
subroutine mode_tartes::tartes | ( | real, dimension(:,:), intent(in) | PSNOWSSA, |
real, dimension(:,:), intent(in) | PSNOWRHO, | ||
real, dimension(:,:), intent(in) | PSNOWDZ, | ||
real, dimension(:,:), intent(in) | PSNOWG0, | ||
real, dimension(:,:), intent(in) | PSNOWY0, | ||
real, dimension(:,:), intent(in) | PSNOWW0, | ||
real, dimension(:,:), intent(in) | PSNOWB0, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_DENSITY, | ||
real, dimension(:,:,:), intent(in) | PSNOWIMP_CONTENT, | ||
real, dimension(:,:), intent(in) | PALB, | ||
real, dimension(:,:), intent(in) | PSW_RAD_DIF, | ||
real, dimension(:,:), intent(in) | PSW_RAD_DIR, | ||
real, dimension(:), intent(in) | PCOSZEN, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
real, dimension(:,:), intent(out) | PSNOWALB, | ||
real, dimension(:,:,:), intent(out) | PSNOWENERGY, | ||
real, dimension(:,:), intent(out) | PSOILENERGY | ||
) |
Definition at line 62 of file mode_tartes.F90.
subroutine mode_tartes::taustar_vector | ( | real, dimension(:,:), intent(in) | PSNOWSSA, |
real, dimension(:,:), intent(in) | PSNOWRHO, | ||
real, dimension(:,:), intent(in) | PSNOWDZ, | ||
real, dimension(:,:,:), intent(in) | PSNOWSSALB, | ||
real, dimension(:,:,:), intent(in) | PSNOWG, | ||
real, dimension(:,:,:), intent(in) | PKESTAR, | ||
integer, dimension(:), intent(in) | KNLVLS_USE, | ||
integer, intent(in) | KMAX_USE, | ||
real, dimension(:,:,:), intent(out) | PDTAUSTAR, | ||
real, dimension(:,:,:), intent(out) | PTAUSTAR | ||
) |
subroutine mode_tartes::two_stream_matrix | ( | real, dimension(:,:,:), intent(in) | PSNOWALBEDO, |
real, dimension(:,:), intent(in) | PSOILALBEDO, | ||
real, dimension(:,:,:), intent(in) | PKESTAR, | ||
real, dimension(:,:,:), intent(in) | PDTAUSTAR, | ||
integer, dimension(:,:), intent(in) | KNLVLS_EFF, | ||
integer, dimension(:), intent(in) | KMAX_EFF, | ||
real, dimension(:,:,:), intent(out) | PDM, | ||
real, dimension(:,:,:), intent(out) | PD, | ||
real, dimension(:,:,:), intent(out) | PDP | ||
) |
subroutine mode_tartes::two_stream_vector | ( | real, dimension(:,:,:), intent(in) | PSNOWALBEDO, |
real, dimension(:,:), intent(in) | PSOILALBEDO, | ||
real, dimension(:,:,:), intent(in) | PDTAUSTAR, | ||
real, dimension(:,:,:), intent(in) | PTAUSTAR, | ||
real, dimension(:,:,:), intent(in) | PGM, | ||
real, dimension(:,:,:), intent(in) | PGP, | ||
real, dimension(:), intent(in) | PCOSZEN, | ||
integer, dimension(:,:), intent(in) | KNLVLS_EFF, | ||
integer, dimension(:), intent(in) | KMAX_EFF, | ||
real, dimension(:,:,:), intent(out) | PVECTOR | ||
) |