This commit is contained in:
magical 2023-12-09 07:16:10 +00:00
父節點 484c0744fb
當前提交 395ad666c8

查看文件

@ -12,7 +12,7 @@ proc ladd {list} {
proc lmul {list} {
set p 1
foreach x $list { set p [eval {$p * $x}] }
foreach x $list { set p [expr {$p * $x}] }
return $p
}