Цикл foreach говорит о наличии дополнительных символов после закрывающей скобки.Не могу определить где

Question

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,$cz\n"
       foreach NodeId $NodeList {
         append buff2 "PLOTEL,[incr j],$i,$NodeId\n"
        }
    }

    set fpt [open temp.fem w]
    puts $fpt $buff1
    puts $fpt $buff2
    close $fpt
}

Я не могу понять, где находится дополнительное место, кто-то возражает помочь мне.Это для Hypermesh.

Answer 1

Здесь вам не хватает пробела:

  cz[hm

, что приведет к неверному количеству аргументов, передаваемых foreach.