在Fortran中,模塊可以用來(lái)封裝變量、常量、子程序和函數(shù),以便在程序中重復(fù)使用。下面是一個(gè)簡(jiǎn)單的示例來(lái)展示如何定義和使用一個(gè)模塊:
module my_module
implicit none
integer :: my_variable
contains
subroutine my_subroutine()
print *, "Hello from my subroutine!"
end subroutine my_subroutine
end module my_module
program main_program
use my_module
implicit none
! 定義變量并賦值
my_variable = 10
! 調(diào)用模塊中的子程序
call my_subroutine()
end program main_program
在這個(gè)示例中,首先定義了一個(gè)名為my_module
的模塊,里面包含了一個(gè)整型變量my_variable
和一個(gè)子程序my_subroutine
。在主程序中,通過(guò)use my_module
語(yǔ)句引入了模塊,然后可以直接使用模塊中定義的變量和子程序。
通過(guò)模塊的使用,可以將代碼模塊化,提高代碼的可讀性和維護(hù)性。