fortran中的module怎么用

Fortran中的module（模块）是一种用于组织程序代码的结构化方式。通过将相关的函数、子程序、变量等放在同一个module中，可以方便地在程序的其他位置调用和使用它们。使用module可以提高代码的可维护性和可读性。

下面是一个简单的module示例：

module my_module
  implicit none
  integer :: my_variable = 0

  contains

  subroutine my_subroutine()
    print *, "Hello from my_subroutine!"
  end subroutine my_subroutine

end module my_module

在这个例子中，我们定义了一个名为my_module的module，它包含了一个整型变量my_variable和一个子程序my_subroutine。在程序的其他位置，可以通过使用use语句来调用这个module中的变量和子程序。例如：

program main_program
  use my_module
  implicit none
  my_variable = 10
  call my_subroutine()
  print *, "my_variable = ", my_variable
end program main_program

在这个例子中，我们使用use语句来调用my_module中的变量和子程序。在程序中，我们将my_variable的值设置为10，并调用my_subroutine子程序输出一条消息。最后，我们输出my_variable的值，以确认它已经被正确设置。

需要注意的是，module中的变量和子程序默认是私有的，即只能在module内部访问。如果要在module外部访问它们，需要在module中使用public语句进行声明。例如：

module my_module
  implicit none
  integer, public :: my_variable = 0

  contains

  subroutine my_subroutine()
    print *, "Hello from my_subroutine!"
  end subroutine my_subroutine

end module my_module

在这个例子中，我们使用public语句将my_variable声明为公共的，即可以在module外部访问它。