Go to the source code of this file.
Functions/Subroutines | |
subroutine | init_ideal_flux (DGL, OREAD_BUDGETC, HPROGRAM, HINIT, KI, KSV, KSW, HSV, PCO2, PRHOA, PZENITH, PAZIM, PSW_BANDS, PDIR_ALB, PSCA_ALB, PEMIS, PTSRAD, PTSURF, HTEST) |
subroutine init_ideal_flux | ( | type(diag_ideal_t), intent(inout) | DGL, |
logical, intent(in) | OREAD_BUDGETC, | ||
character(len=6), intent(in) | HPROGRAM, | ||
character(len=3), intent(in) | HINIT, | ||
integer, intent(in) | KI, | ||
integer, intent(in) | KSV, | ||
integer, intent(in) | KSW, | ||
character(len=6), dimension(ksv), intent(in) | HSV, | ||
real, dimension(ki), intent(in) | PCO2, | ||
real, dimension(ki), intent(in) | PRHOA, | ||
real, dimension(ki), intent(in) | PZENITH, | ||
real, dimension(ki), intent(in) | PAZIM, | ||
real, dimension(ksw), intent(in) | PSW_BANDS, | ||
real, dimension(ki,ksw), intent(out) | PDIR_ALB, | ||
real, dimension(ki,ksw), intent(out) | PSCA_ALB, | ||
real, dimension(ki), intent(out) | PEMIS, | ||
real, dimension(ki), intent(out) | PTSRAD, | ||
real, dimension(ki), intent(out) | PTSURF, | ||
character(len=2), intent(in) | HTEST | ||
) |
Definition at line 6 of file init_ideal_flux.F90.