使用其他程式單元的模組
要從另一個程式單元(模組,過程或程式)訪問模組中宣告的實體,該模組必須與 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
。
如果選擇將名稱標記為私有,則無法將其匯入程式。