Go to the source code of this file.
Functions/Subroutines | |
subroutine | prep_watflux_unif (KLUOUT, HSURF, PFIELD) |
subroutine prep_watflux_unif | ( | integer, intent(in) | KLUOUT, |
character(len=7), intent(in) | HSURF, | ||
real, dimension(:,:), pointer | PFIELD | ||
) |