TABLE OF CONTENTS

::pwtk::vecMathParser

SYNOPSIS

proc ::pwtk::vecMathParser {vec} {

PURPOSE

Math parser for a numeric vector of any dimension.

ARGUMENT

RETURN VALUE

SOURCE

    set result ""
    foreach x $vec {
        if { [is_expr $x] } {
            lappend result [mathParser $x]
        } else {
            lappend result $x
        }
    }
    return $result
}