Function badrun

function badrun

        ! Calls
    call cdfget
    call kerror
    call kparse_word
    call rite

        ! Variables
    integer :: max_badrun
    logical :: badrun
    logical :: comment
    logical :: new
    logical :: last
    integer, dimension (max_badrun,2) :: badruns
    integer :: nbadrun
    integer :: i
    integer :: lastrun
    integer :: run
    integer, dimension (1) :: d1
    integer, dimension (1) :: d2
    integer :: type
    integer :: ndata
    integer :: lensig
    character (len=80) :: line
    character (len=80) :: file
    character (len=12) :: keyw

end function badrun

Description of Variables

max_badrun

integer :: max_badrun

badrun

logical :: badrun

comment

logical :: comment

new

logical :: new

last

logical :: last

badruns

integer, dimension (max_badrun,2) :: badruns

nbadrun

integer :: nbadrun

i

integer :: i

lastrun

integer :: lastrun

run

integer :: run

d1

integer, dimension (1) :: d1

d2

integer, dimension (1) :: d2

type

integer :: type

ndata

integer :: ndata

lensig

integer :: lensig

line

character (len=80) :: line

file

character (len=80) :: file

keyw

character (len=12) :: keyw