TABLE OF CONTENTS


::pwtk::queue::rerunPH

SYNOPSIS

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

PURPOSE

Rerun the ph.x program via queueSystem. The difference compared to runPH is:

ARGUMENTS

SOURCE

    variable scriptBody

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

    INPUTPH { recover = .true. }

    ::pwtk::phi_fprint $head.ph.in

    # shell-script for running above input
    set script_ {
\$PREFIX \$PH \$POSTFIX $ihandle $head.ph.in >> $head.ph.out
    }

    append scriptBody($queueSystem) "[subst -nocommands $script_]\n"
}