source:
WorldVistAEHR/trunk/r/IFCAP-PRC-PRX--PRCA--PRCN/PRCSETI.m@
1005
Last change on this file since 1005 was 613, checked in by , 15 years ago | |
---|---|
File size: 242 bytes |
Line | |
---|---|
1 | PRCSETI ;WIRMFO/ERC-RESET I IN 0 NODE ;9/13/96 |
2 | ;;5.0;IFCAP;**81,199**;4/21/95 |
3 | ;RESETS "I" INTO 2ND PIECE OF 0 NODES OF 442 AND 443.6 |
4 | I $P(^PRC(442,0),U,2)'["I" S $P(^(0),U,2)="442I" |
5 | I $P(^PRC(443.6,0),U,2)'["I" S $P(^(0),U,2)="443.6I" |
6 | Q |
Note:
See TracBrowser
for help on using the repository browser.