TCL的绝对值

Question

获取expr语句的绝对值的函数是什么？ 例如expr [$a - $b ]。 现在解决方案可以是-ve或+正数。但我想要+ ve值。

我想像if { |$diff_a| > 0 & |$diff_b| >0 } {一样使用它 ....

我正在使用tcl 8.4。

Answer 1

我想补充一点，'abs'命令只能在Tcl中的数学表达式中使用，所以正确的例子是：

if {[expr abs($diff_a)] > 0} {...}

有关详细信息，请参阅上面答案中指定的expr手册页。

Answer 2

您可以使用abs功能：

if {abs($diff_a) > 0 ...} ...

请注意，abs仅适用于表达式的上下文（例如：通过调用expr），但请注意if的第一个参数被计算为表达式。

abs记录在tcl 8.4之前版本的expr手册页中。从8.5开始，它位于mathfunc手册页上。