*createarray 的问题
*createarray的格式如下*createarray 3 123 123 123
第一个3表示有3个数,依次是123 123 123
在二次开发中,这个个数是会变的,有可能是20个123,有可能是30个123
在这种情况下,应该如何用*createarray呢?
谢谢。
自己回答一下
set array_dofs ;
set array_weights ;
set i 0
while {$i < $n_nodes} {
lappend array_dofs 123
lappend array_weights 1
incr i 1
}
eval *createarray $n_nodes $array_dofs;
eval *createdoublearray $n_nodes $array_weights;
*rbe3 1 1 $n_nodes 1 $n_nodes $node_id 123456 1;
关键在于eval,之前没有加,所以总是出错。
页:
[1]