TABLE OF CONTENTS


::pwtk::pwo::getXSF

SYNOPSIS

proc ::pwtk::pwo::getXSF {flag pwoFile} {

DESCRIPTION

Return the XSF-formatted structure data from the pw.x output file

ARGUMENTS

SOURCE

    set output [::fileutil::tempfile xsf.]
    
    set pwo2xsf [::pwtk::getExecutable [::pwtk::getVar_ PWO2XSF]]
    if { $pwo2xsf eq {} } {
        ::pwtk::error "cannot find the PWO-to-XSF (aka pwo2xsf.sh) converter" 1
    }

    exec -- $pwo2xsf $flag $pwoFile > $output
    return [::pwtk::readFile $output]
}