TABLE OF CONTENTS

::pwtk::input::print

SYNOPSIS

proc ::pwtk::input::print {name} {

PURPOSE

Print to stdout a given namelist or card if it exists.

ARGUMENTS

SOURCE

    global ::pwtk::input::namelist
    global ::pwtk::input::card
        
    if { [info exists ::pwtk::input::namelist($name)] } {
        namelistPrint $name
    } 
    if { [info exists ::pwtk::input::card($name)] } {
        cardPrint $name
    }
}