TABLE OF CONTENTS

::pwtk::evalExpr

SYNOPSIS

proc ::pwtk::evalExpr {expression} {

PURPOSE

Evaluate expression and return its value. For integer expression integer value is returned, for real expression real value is returned. Beware that fortran "D" exponential syntax, i.e 1.0d0, is taken care of.

SOURCE

    if { [is_int $expression] } {
        return [expr $expression]
    } elseif { [is_double $expression] } {
        return [mathParser $expression]
    } else {
        return $expression
    }
}