HP Fortran Programmer's Reference

END INTERFACE
Terminates a procedure interface block.
Syntax
END INTERFACE
Description
HP Fortran statements
END INTERFACE
In Fortran 90, external procedures may be given explicit interfaces by means of procedure
interface blocks. Such a block is always terminated by the END INTERFACE statement.
Examples
The following makes the interface of function r_ave explicit, giving it the generic name
g_ave.
INTERFACE g_ave
FUNCTION r_ave(x)
! get the size of array x from module ave_stuff
USE ave_stuff, ONLY: n
REAL r_ave, x(n)
END FUNCTION r_ave
END INTERFACE
Related statements
INTERFACE
Related concepts
Interface blocks are described in “Interface blocks” on page 150.
Chapter 10 311