6 lines
109 B
Mathematica
6 lines
109 B
Mathematica
|
DVBAXA18 ; ;06/08/01
|
||
|
S X=DE(7),DIC=DIE
|
||
|
;
|
||
|
S X=DE(7),DIC=DIE
|
||
|
D:($T(ADGRU^DGRUDD01)'="") ADGRU^DGRUDD01(DA)
|