Go to the source code of this file.
Functions/Subroutines | |
subroutine | READ_ARRANGE_COVER (HPROGRAM, OWATER_TO_NATURE, OTOWN_TO_ROCK) |
subroutine READ_ARRANGE_COVER | ( | CHARACTER(LEN=6), intent(in) | HPROGRAM, |
LOGICAL, intent(out) | OWATER_TO_NATURE, | ||
LOGICAL, intent(out) | OTOWN_TO_ROCK | ||
) |