USE文
copyright

green dotUSE文

モジュール副プログラムで定義したデータ(変数や手続きライブラリ等)を 使用する場合に、USE文を使う。

  USE モジュールの名前 [,変数名 => 変数名]
  USE モジュールの名前 [,ONLY : 変数名]

[例]
モジュールで定義した変数を主プログラムで使用する。

  MODULE data                       !モジュールの定義
     INTEGER,DIMENSION(5,3) :: a    !共通使用の変数
     REAL    :: b=12.3              !共通使用の変数
     INTEGER :: c=123               !共通使用の変数
  END MODULE data
  PROGRAM main                      !主プログラム
        USE data
        a=10
        WRITE(*,*) b,c
        CALL sub
     CONTAINS
     SUBROUTINE sub                 !サブルーチン
        USE data,ONLY : a,b         !変数a,bを参照する
        WRITE(*,*) a,b
     END SUBROUTINE sub
  END PROGRAM main
line-end