VistA-WorldVistAEHR/r/HINQ-DVB--DVBA--DVBE--DVBC/DVBHCE24.m

4 lines
61 B
Mathematica

DVBHCE24 ; ;12/27/07
S X=DE(19),DIC=DIE
D KILL^DGREGDD(DA)