TABLE OF CONTENTS

::pwtk::input::printAll

SYNOPSIS

proc ::pwtk::input::printAll {} {

PURPOSE

Print to stdout all user-defined namelists and cards.

SOURCE

    global ::pwtk::input::namelist ::pwtk::input::card
    
    foreach name [array names ::pwtk::input::namelist] {
        if { ! [regexp , $name] } {
            namelistPrint $name
        }
    }
    foreach name [array names ::pwtk::input::card] {
        cardPrint $name
    }
}