SUBROUTINE SUB2
C
C	Second subroutine in practice routines
C
	WRITE (5,10)
10	FORMAT (' In subroutine SUB2. Returning ....')
	RETURN
	END