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
- flag -- the option to pass to pwo2xsf.sh filter, one of -ic, -lc, -oc, or -a
- pwoFile -- pw.x output file
SOURCE
set output [::tclu::tempFile name xsf] set pwo2xsf [::pwtk::getVar_ PWO2XSF] if { $pwo2xsf == {} } { ::pwtk::error "can't run pwo2xsf.sh, because the PWOI2XSF variable is not defined" } exec -- $pwo2xsf -lc $pwoFile > $output return [::tclu::readFile $output] }