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 | ||
) |