Subroutine SLOW_PBEAM

subroutine SLOW_PBEAM

        ! Calls
    call NOBANK
    call SLOW_PBEAM_FILL

        ! 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

end subroutine SLOW_PBEAM

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