TABLE OF CONTENTS


::pwtk::queue::runDYNMAT

SYNOPSIS

proc ::pwtk::queue::runDYNMAT {queueSystem head} {

PURPOSE

Run the dynmat.x program via queueSystem.

ARGUMENTS

SOURCE

    variable scriptBody

    set head    [::pwtk::headname $head {.dynmat.in .dynmat.inp .in .inp}]
    set ihandle [::pwtk::input_handle]
    
    ::pwtk::dmi_fprint $head.dynmat.in

    set script_ {
\$PREFIX \$DYNMAT \$POSTFIX $ihandle $head.dynmat.in > $head.dynmat.out
    }
    append scriptBody($queueSystem) "[subst -nocommands $script_]\n"
}