SUBROUTINE Statement (Nonexecutable) [ HP FORTRAN 77/iX Reference ] MPE/iX 5.0 Documentation
 
  
  
  
 
HP FORTRAN 77/iX Reference
SUBROUTINE Statement (Nonexecutable) 
The SUBROUTINE statement identifies a program unit as a subroutine
subprogram.
            
-----------------------------------------------------------------------------------------------
|                   |                                    |                                    |
|       Item        |        Description/Default         |            Restrictions            |
|                   |                                    |                                    |
-----------------------------------------------------------------------------------------------
|                   |                                    |                                    |
| *                 | Indicates an alternate return.     | None.                              |
|                   |                                    |                                    |
-----------------------------------------------------------------------------------------------
Semantics 
The formal arguments in a SUBROUTINE statement can be variables, array
names, record names, or subprogram names.  The formal arguments must be
of the same type and structure as the actual arguments passed to the
subroutine.  In particular, the fields in actual and formal record
arguments must agree in type, order, and dimension.
Asterisks in the SUBROUTINE statement can specify one or more alternate
returns.  Alternate returns are described in "RETURN Statement
(Executable)" .
             Examples                                     Notes 
--------------------------------------------------------------------------------------
SUBROUTINE add                     Begins a subroutine named add that has no formal
                                   arguments.
SUBROUTINE sub(z,i,d,*,*,*)        Begins a subroutine named sub with three arguments
                                   and three alternate return points.
 
  
  
  
 
 MPE/iX 5.0 Documentation