Go to the source code of this file.
Functions/Subroutines | |
subroutine | SPINUP_MAX (PSPINMAX, KNBYEARSPIN, KNBYEARSOLD, KSPIN) |
subroutine SPINUP_MAX | ( | REAL, intent(in) | PSPINMAX, |
INTEGER, intent(in) | KNBYEARSPIN, | ||
INTEGER, intent(in) | KNBYEARSOLD, | ||
INTEGER, intent(out) | KSPIN | ||
) |