Tcl中的复数运算？

Question

是否有等效的expr命令适用于复数（代表两个双打的列表）？

This库提供了复数运算的函数，this似乎是定义所需cexpr函数的有用实用程序，但它不能很好地工作。

E.g。它没有正确处理括号。

ParseExpressions::ParseExpr { (1) + ((2) + (3)) } { }

返回

+ [+ 1 ((2)] (3))

虽然它应该返回

+ [+ 1 2] 3

另外 ParseExpressions :: ParseExpr {{1 2} + {3 4}} {}

返回

+ 1 2 3 4

虽然它应该返回

+ {1 2} {3 4}

所以基本上我要求的是this实用程序的强大版本。

Answer 1

为什么不试试这个：http://wiki.tcl.tk/11415 或类似的东西：http://wiki.tcl.tk/13885

我希望这些是上述实用程序的易用替代品。

Answer 2

如果您将它与FFIDL链接，则可以使用相当多的C库。