END INTERFACE

用途

END INTERFACE 语句终止过程接口块。

generic_spec

备注信息：

每个 INTERFACE 语句都必须具有相应的 END INTERFACE 语句。

没有 generic_spec 的 END INTERFACE 语句可以与任何 INTERFACE 语句匹配。使用或不使用 generic_spec。

如果 END INTERFACE 语句中的通用规范是通用名称，那么相应 INTERFACE 语句的通用规范必须相同通用名称。

如果 END INTERFACE 语句中的通用规范是 OPERATOR(定义运算符) ，那么相应 INTERFACE 语句的通用规范必须是相同的 OPERATOR(定义运算符)。

如果 END INTERFACE 语句中的通用规范是 ASSIGNMENT(=) ，那么对应 INTERFACE 语句的通用规范必须是相同的 ASSIGNMENT(=)。

如果 END INTERFACE 语句中的通用规范是 dtio_generic_spec，那么对应 INTERFACE 语句的通用规范必须是相同的 dtio_generic_spec。

INTERFACE OPERATOR (.DETERMINANT.)
  FUNCTION DETERMINANT (X)
    INTENT(IN) X
    REAL X(50,50), DETERMINANT
  END FUNCTION
END INTERFACE

INTERFACE OPERATOR(.INVERSE.)
  FUNCTION INVERSE(Y)
    INTENT(IN) Y
    REAL Y(50,50), INVERSE
  END FUNCTION
END INTERFACE OPERATOR(.INVERSE.)