◄Up► ◄Contents► ◄Index► ◄Back►
─────INTERFACE TO───────────────────────────────────────────────────────────
 
     Action
 
     Specifies the name of a subroutine or function, its attributes and
     formal argument types.
 
     Syntax
 
     INTERFACE TO {function-statement | subroutine-statement}
     (Formal-parameter-declaration(s))
     END
 
     Parameter                        Description
 
     function-statement               A function declaration
 
     subroutine-statement             A subroutine declaration
 
     Formal-parameter-declaration(s)  Explicitly typed formal parameters,
                                      each on its own line.
 
     Remarks
 
     INTERFACE TO confirms the correctness of subprogram calls. The
     list of arguments can contain only type, DIMENSION, EXTERNAL,
     INTRINSIC, and END statements.
 
     Example
 
           INTERFACE TO INTEGER FUNCTION Func (p, d, q)
           INTEGER*2 p
           REAL d[C]         ! required; appears in function definition
           REAL*8 q[FAR]     ! overrides default in function definition
           END
 
     The interface above describes the following function to the calling
     unit:
 
           INTEGER FUNCTION Func (r, s, t)
           INTEGER*2 r
           REAL s[C]
           REAL*8 t
           .
           .
           .
           END
                                    -♦-