使用其他程式單元的模組

要從另一個程式單元(模組,過程或程式)訪問模組中宣告的實體,該模組必須與 use 語句一起使用

module shared_data
  implicit none

  integer::iarray(4) = [1, 2, 3, 4]
  real::rarray(4) = [1., 2., 3., 4.]
end module

program test

  !use statements most come before implicit none
  use shared_data

  implicit none

  print *, iarray
  print *, rarray
end program

use 語句僅支援匯入選定的名稱

program test

  !only iarray is accessible
  use shared_data, only: iarray

  implicit none

  print *, iarray
  
end program

也可以使用重新命名列表以不同的名稱訪問實體 :

program test

  !only iarray is locally renamed to local_name, rarray is still acessible
  use shared_data, local_name => iarray

  implicit none

  print *, local_name

  print *, rarray
  
end program

此外,重新命名可以與 only 選項結合使用

program test
  use shared_data, only : local_name => iarray
end program

這樣只訪問模組實體 iarray,但它的本地名稱為 local_name

如果選擇將名稱標記為私有,則無法將其匯入程式。