tcl - TCL中的绝对值

Question

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

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

我使用 tcl 8.4。

score 3 · Accepted Answer

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

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

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

score 2 · Accepted Answer

您将使用以下abs功能：

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

请注意，abs这只适用于表达式的上下文（例如：通过调用expr），但还要注意第一个参数if被评估为表达式。

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

2 回答 2