Subroutine RUNC
subroutine RUNC
! Calls
call Kparse_Word
call SETC
call kerror
! Variables
character (len=80) :: token
character (len=80) :: Qualifier
character (len=80) :: Argument
integer (kind=4) :: i
integer (kind=4) :: k
integer (kind=4) :: type
integer (kind=4) :: ndata
integer (kind=4) :: irun
integer (kind=4), dimension (20) :: irun1
integer (kind=4), dimension (20) :: irun2
logical (kind=4) :: streq
real :: VALUE
end subroutine RUNC
Description of Variables
token
character (len=80) :: token
Qualifier
character (len=80) :: Qualifier
Argument
character (len=80) :: Argument
i
integer (kind=4) :: i
k
integer (kind=4) :: k
type
integer (kind=4) :: type
ndata
integer (kind=4) :: ndata
irun
integer (kind=4) :: irun
irun1
integer (kind=4), dimension (20) :: irun1
irun2
integer (kind=4), dimension (20) :: irun2
streq
logical (kind=4) :: streq
VALUE
real :: VALUE