PROGRAM FILE 17: ELEMENTARY USE OF GOSUB AND RETURN.                            
    ANSI STANDARD 10.2, 10.4                                                    
                                                                                
SECTION 17.1: ELEMENTARY USE OF GOSUB AND RETURN.                               
                                                                                
THIS PROGRAM TESTS THAT THE SUBROUTINE MECHANISM EXISTS                         
AND THAT A SUBROUTINE CAN BE INVOKED FROM SEVERAL                               
PLACES IN THE MAIN LINE OF CONTROL.                                             
                                                                                
                           BEGIN TEST.                                          
                                                                                
IF THE NEXT MESSAGE '***  GOSUB TEST PASSED  ***' IS                            
SPELLED CORRECTLY, THE TEST PASSED.                                             
                                                                                
***  GOSUB TEST PASSED  ***                                                     
                                                                                
                           END TEST.                                            
                                                                                
END PROGRAM 17                                                                  
                                                                                
Program interrupted at line 230                                                 
