END INTERFACE

Terminates a procedure interface block.

Syntax

END INTERFACE

Description

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”.