foreach 循环表示右括号后有多余的字符.无法确定在哪里


proc p_derived_bars args {
    *createmarkpanel elems 1 "select 3d elems"
    set buff1 ""
    set buff2 ""
    set i 0; set j 0
    foreach NodeList [hm_getvalue elems mark=1 dataname = nodes] cx [hm_getvalue elems mark=1 dataname=centrex] cy [hm_getvalue elems mark=1 dataname=centrey] cz[hm_getvalue elems mark=1 dataname=centrez] {
      append buff1 "GRID,[incr i],,$cx,$cy,$czn"
       foreach NodeId $NodeList {
         append buff2 "PLOTEL,[incr j],$i,$NodeIdn"
        }
    }
    set fpt [open temp.fem w]
    puts $fpt $buff1
    puts $fpt $buff2
    close $fpt
}

看不到多余的空间在哪里,有人介意帮我吗?这是针对超网格的。

在这里,你缺少一个空格:

  cz[hm

这将导致传递给 foreach 的参数数量不正确。

最新更新