Go to the source code of this file.
Functions/Subroutines | |
subroutine | PREP_OCEAN_UNIF (KLUOUT, HSURF, PFIELD) |
subroutine PREP_OCEAN_UNIF | ( | INTEGER, intent(in) | KLUOUT, |
CHARACTER(LEN=7), intent(in) | HSURF, | ||
REAL, dimension(:,:,:), pointer | PFIELD | ||
) |