Tcl中的复数运算？

Question

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

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

例如,它没有正确处理括号.

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}

所以基本上我要求这个实用程序的强大版本.

Answer 1

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

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