Go to the source code of this file.
Functions/Subroutines | |
subroutine | update_rad_flake (HALB, PTS, PZENITH, PH_ICE, PH_SNOW, PICE_ALB, PSNOW_ALB, PDIR_ALB, PSCA_ALB, PEMIS, PDIR_ALB_ATMOS, PSCA_ALB_ATMOS, PEMIS_ATMOS, PTRAD) |
subroutine update_rad_flake | ( | character(len=4), intent(in) | HALB, |
real, dimension(:), intent(in) | PTS, | ||
real, dimension(:), intent(in) | PZENITH, | ||
real, dimension(:), intent(in) | PH_ICE, | ||
real, dimension(:), intent(in) | PH_SNOW, | ||
real, dimension(:), intent(in) | PICE_ALB, | ||
real, dimension(:), intent(in) | PSNOW_ALB, | ||
real, dimension(:), intent(inout) | PDIR_ALB, | ||
real, dimension(:), intent(inout) | PSCA_ALB, | ||
real, dimension(:), intent(out) | PEMIS, | ||
real, dimension(:,:), intent(out) | PDIR_ALB_ATMOS, | ||
real, dimension(:,:), intent(out) | PSCA_ALB_ATMOS, | ||
real, dimension(:), intent(out) | PEMIS_ATMOS, | ||
real, dimension(:), intent(out) | PTRAD | ||
) |
Definition at line 6 of file update_rad_flake.F90.