PRCSETI ;WIRMFO/ERC-RESET I IN 0 NODE ;9/13/96
 ;;5.0;IFCAP;**81,199**;4/21/95
 ;RESETS "I" INTO 2ND PIECE OF 0 NODES OF 442 AND 443.6
 I $P(^PRC(442,0),U,2)'["I" S $P(^(0),U,2)="442I"
 I $P(^PRC(443.6,0),U,2)'["I" S $P(^(0),U,2)="443.6I"
 Q