CONTAINS statement

Standard: F77 F90 F95 F2003 F2008 F2018 Example program

---

＜Syntax＞

CONTAINS

A CONTAINS statement may appear as follows.

• In a module:
  MODULE module-name
        module-declaration-part
  CONTAINS
        module-procedure-part
  end-module-stmt
• In a main program:
  [ PROGRAM program-name ]
        specification-part
        executable-part
  CONTAINS
        internal-procedure-part
  end-program-stmt
• In an external subroutine or module subroutine:
  subroutine-stmt
        specification-part
        executable-part
  CONTAINS
        internal-procedure-part
  end-subroutine-stmt
• In an external function or module function:
  function-stmt
        specification-part
        executable-part
  CONTAINS
        internal-procedure-part
  end-function-stmt
• In a type definition:
  type-definition-stmt
        [ component-definition-stmt ]...
  CONTAINS
        type-bound-procedure-part
  end-type-stmt

＜Semantics＞

The CONTAINS statement separates:

• the declarations of a module from its module procedures;
• the declarations and executable statements of a main program or subprogram from its internal procedures;
• the components of a derived type from its type-bound procedures.

＜Related＞

CALL statement, Derived Type Definition, END FUNCTION statement, END MODULE statement, END PROGRAM statement, END SUBROUTINE statement, ENTRY statement, FUNCTION statement, MODULE statement, PROGRAM statement, RETURN statement, SUBROUTINE statement