END INTERFACE

目的

END INTERFACE ステートメントはプロシージャー・ インターフェース・ブロックを終了させます。

構文



>>-  END INTERFACE--+-------------------+----------------------><
                    |              (1)  |
                    '-generic_spec------'
 
 


注:


  1. Fortran 95.


+---------------------------------Fortran 95---------------------------------+

generic_spec



>>-+-generic_name---------------------+------------------------><
   +-OPERATOR--(--defined_operator--)-+
   '-ASSIGNMENT--(-- = --)------------'
 
 

+-----------------------------End of Fortran 95------------------------------+

+---------------------------------Fortran 95---------------------------------+

defined_operator
定義された単項演算子、定義された 2 進演算子、 または拡張組み込み演算子です。

+-----------------------------End of Fortran 95------------------------------+

規則

INTERFACE ステートメントにはそれぞれ、対応 する END INTERFACE ステートメントが必要です。

END INTERFACE ステートメントに generic_spec を指定しない場合、generic_spec の あるなしに関係なく、すべての INTERFACE ステートメントと一致させることができます。

+---------------------------------Fortran 95---------------------------------+

END INTERFACE ステートメント内 の generic_specgeneric_name である場合、 対応する INTERFACE ステートメントの generic_spec は、 同じ generic_name でなければなりません。

END INTERFACE ステートメント内 の generic_specOPERATOR(defined_operator) である場合、 対応する INTERFACE ステートメントの generic_spec は、 同じ OPERATOR(defined_operator) でなければなりません。

END INTERFACE ステートメント内 の generic_specASSIGNMENT(=) である場合、 対応する INTERFACE ステートメントの generic_spec は、 同じ ASSIGNMENT(=) でなければなりません。

+-----------------------------End of Fortran 95------------------------------+

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

+---------------------------------Fortran 95---------------------------------+

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

+-----------------------------End of Fortran 95------------------------------+

関連情報

IBM Copyright 2003