Fortran语言 contains 使用方法

Fortran，全称为Formula Translation，是一种主要用于科学计算、工程和数值分析的高级编程语言。它以清晰的数学表达式著称，并早期在数值计算领域广泛应用。在Fortran中，`contains`关键字用于模块（module）的内部声明部分，用来分隔出一个独立的子程序块，这个块包含函数、子程序（subroutine）、和子程序的接口。

例如，在Fortran 90及以后版本中，`contains`可以这样使用：

module MyModule
implicit none
contains

! 这里是一个子程序的声明
subroutine my_subroutine(arg1, arg2)
   real :: arg1, arg2
   ! ... 子程序体
end subroutine my_subroutine

! 另外一个函数也可以在这里定义
function my_function(input) result(output)
   integer, intent(in) :: input
   integer :: output
   ! ... 函数体
end function my_function
end module MyModule

`contains`之后的代码块将被视为该模块的一部分，可以在其他地方通过引用该模块名来调用里面的子程序和函数。