THIS IS DECUS #100 ERRIN.FOR CHANGED AT LINE 290 (ILLEGAL STATEMENT I=I IN LOOP I REMOVED) AND RAND.MAC (JOB??? CHANGED TO .JB???) BY D. MAZUR, WESLEYAN UNIVERSITY 2 FEB 78.