ug grip 建组问题

3星星星

! X* T8 d9 G! z/ d% }利用grp=group/E1,E1是一位数组，代表下面那些求差生成的实体。 建组过程中生产很多的组，为什么？那么多组？高手解答！！！利用ug格式---组--新建组，就不会。

( q. C  Z4 t, Q- B

3星星星

自己解决了 分享一下

首先用第一个实体建一个组 后面的实体添加到第一个实体所建立的组中即可。利用do循环和grpedt/add

! B5 ]. P0 c. S7 y" K2 P, `
代码如下：
+ C; Q2 f" Y" [: {' ddo/next123:,index11,1,cc
+ Z7 @' X0 Q$ C% G+ X& tifthen/index11==1
grp=group/E1(index11)
7 K# q& j: ?. l&name(grp)='grpjdgs'
else
grpedt/add,'grpjdgs',E1(index11)
endif
' L6 P  d* f  t" x& @8 T9 h7 s
next123:
halt
$ A1 L) ]% N# d" O7 y& d! N看看列表中是不是就只有一个组。

2 W0 e$ i1 i) P% m1 k

! Y$ n+ U% M) O: h