Go to the source code of this file.
Functions/Subroutines | |
| subroutine | INIT_IDEAL_FLUX (HPROGRAM, HINIT, KI, KSV, KSW, HSV, PCO2, PRHOA, PZENITH, PAZIM, PSW_BANDS, PDIR_ALB, PSCA_ALB, PEMIS, PTSRAD, HTEST) |
| subroutine INIT_IDEAL_FLUX | ( | 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, | ||
| CHARACTER(LEN=2), intent(in) | HTEST | ||
| ) |
Definition at line 2 of file init_ideal_flux.F90.


1.8.0