MODULE

モジュールの定義

MODULE hogehoge
   !Variables decralation
   CONTAINS
      SUBROUTINE fugafuga( n)
      ...
      ...
      ...
      END SUBROUTINE fugafuga
END MODULE

モジュールの呼び出し

PROGRAM foobar
   USE hogehoge
   CALL fugafuga( n)
END PROGRAM foobar