Subroutine show_cdf

subroutine show_cdf

        ! Calls
    call kerror
    call rite

        ! Variables
    character (len=80) :: line
    character (len=80) :: Argument
    character (len=80) :: Qualifier
    character (len=80) :: qual
    character (len=8) :: comp
    character (len=8) :: attr
    integer (kind=4) :: icdt
    integer (kind=4) :: Lensig
    integer (kind=4) :: lcomp
    integer (kind=4) :: lattr
    integer (kind=4) :: i
    logical (kind=4) :: cfm_cdf
    logical (kind=4) :: user_cdf
    logical (kind=4) :: print_line
    logical (kind=4) :: streq

end subroutine show_cdf

Description of Variables

character (len=80) :: line

character (len=80) :: Argument

character (len=80) :: Qualifier

character (len=80) :: qual

character (len=8) :: comp

character (len=8) :: attr

integer (kind=4) :: icdt

integer (kind=4) :: Lensig

integer (kind=4) :: lcomp

integer (kind=4) :: lattr

integer (kind=4) :: i

logical (kind=4) :: cfm_cdf

logical (kind=4) :: user_cdf

logical (kind=4) :: print_line

logical (kind=4) :: streq