TCL 执行脚本提示无法读取result值

如图，TCL 阶乘程序报错，can't read "result": no such variable，但是看起来好像没问题啊

对啊，有点费解，同问