C SUBROUTINE TO TURN ON TURNOFF OR DELETE MODULES C C SUBROUTINE SHOW(IF,IE,IP,IO,IR) IF(IF.LT.3.OR.IF.GT.5)STOP 1 IF(IE.LT.3.OR.IE.GT.5)STOP 2 IF(IP.LT.3.OR.IP.GT.5)STOP 3 IF(IO.LT.3.OR.IO.GT.5)STOP 4 IF(IR.LT.3.OR.IR.GT.5)STOP 5 CALL DISPLY(IF,1) CALL DISPLY(IE,2) CALL DISPLY(IP,3) CALL DISPLY(IO,4) CALL DISPLY(IR,5) RETURN END