*NOSEQ 
.PROC,MAG.
MAGNET.
MAGNET1.
EXIT.
MAGNET1.