XT95POST ;OAK-OIFO/JDS - POST INIT FOR XT*7.3*95 ;04/22/2005  11:00
 ;;7.3;TOOLKIT;**95**;Apr 25, 1995  POST INIT
 ;
EN ;
 S $P(^VA(15.1,2,1),U,3)=180
 Q