input.tcl

::pwtk::input::namelist

SYNOPSIS

proc ::pwtk::input::namelist {name content} {

PURPOSE

Set or update the namelist.

ARGUMENTS

name -- name of the namelist
content -- content of the namelist in the syntax of fortran namelist (without namelist begin&end markers)

SOURCE

    global ::pwtk::input::namelist

    set ::pwtk::input::namelist($name) [string trim $content]
    namelistParse_ $name    
}