Subroutine SLOW_SCALER
subroutine SLOW_SCALER
! Calls
call BAD_SC_VERSION
call NOBANK
call USER_SLOW
! Variables
integer (kind=4) :: istatus
integer (kind=4) :: ind
integer (kind=4) :: indat
integer (kind=4) :: blocat
integer (kind=4) :: IVERSION
integer (kind=4) :: ICHAN
integer (kind=4) :: I
end subroutine SLOW_SCALER
Description of Variables
istatus
integer (kind=4) :: istatus
ind
integer (kind=4) :: ind
indat
integer (kind=4) :: indat
blocat
integer (kind=4) :: blocat
IVERSION
integer (kind=4) :: IVERSION
ICHAN
integer (kind=4) :: ICHAN
I
integer (kind=4) :: I