TABLE OF CONTENTS
splot::cmdlineOpts
SYNOPSIS
method cmdlineOpts {optVar} {
PURPOSE
A convenience method to facilitate easier handling of command-line options used by scanpar.tcl, pdos.tcl, bands.tcl, etc.
ARGUMENT
- optVar -- name of the 'opt' array of ::pwtk::parseOpt_.
SOURCE
upvar $optVar opt next opt ::pwtk::ifnotempty opt(i) { my set pm3d [list interpolate $opt(i)] } ::pwtk::ifnotempty opt(zt) { my set ztics $opt(zt) } ::pwtk::ifnotempty opt(cbt) { my set cbtics $opt(cbt) } ::pwtk::ifnotempty opt(mz) { my set mztics $opt(mz) } ::pwtk::ifnotempty opt(mcb) { my set mcbtics $opt(mcb) } ::pwtk::ifnotempty opt(zl) { my set zlabel [::pwtk::squote $opt(zl)] } ::pwtk::ifnotempty opt(cbl) { my set cblabel [::pwtk::squote $opt(cbl)] } ::pwtk::ifnotempty opt(zr) { my set zrange [::pwtk::rangequote $opt(zr)] } ::pwtk::ifnotempty opt(cbr) { my set cbrange [::pwtk::rangequote $opt(cbr)] } ::pwtk::ifnotempty opt(zf) { my set format "z [::pwtk::squote $opt(zf)]" } ::pwtk::ifnotempty opt(cbf) { my set format "cb [::pwtk::squote $opt(cbf)]" } }