在Fortran中，子程序是一种可重用的代码块，它可以在主程序或其他子程序中被调用。以下是使用Fortran子程序的基本步骤：
定义子程序
使用`SUBROUTINE`关键字定义子程序，并在子程序内部声明变量和编写代码。例如：
```fortran
SUBROUTINE MySubroutine（）
PRINT *, 'Hello from subroutine!'
END SUBROUTINE MySubroutine
```
调用子程序
在主程序或其他子程序中使用`CALL`语句调用子程序。例如：
```fortran
PROGRAM MainProgram
IMPLICIT NONE
CALL MySubroutine（）
END PROGRAM MainProgram
```
传递参数
如果子程序需要参数，可以在调用时通过参数列表传递。例如：
```fortran
SUBROUTINE MySubroutine（message）
PRINT *, message
END SUBROUTINE MySubroutine
PROGRAM MainProgram
IMPLICIT NONE
CHARACTER（len=*） :: message
message = 'Hello from subroutine!'
CALL MySubroutine（message）
END PROGRAM MainProgram
```
返回值
子程序可以通过`RETURN`语句返回值给主程序。例如：
```fortran
SUBROUTINE MySubroutine（a, b, result）
a = 2 * b
result = a + b
END SUBROUTINE MySubroutine
PROGRAM MainProgram
IMPLICIT NONE
REAL :: a, b, result
b = 3
CALL MySubroutine（a, b, result）
PRINT *, 'Result:', result
END PROGRAM MainProgram
```
编译和运行
将主程序和子程序编译成可执行文件，并运行该文件以执行程序。例如，使用gfortran编译器：
```bash
gfortran -o main main.f90 subroutine.f90
./main
```
注意事项
确保子程序和主程序在同一个文件或不同的.f文件中，只要它们可以被编译器找到即可。
如果子程序依赖于其他库文件，需要在编译时指定库文件的路径和名称。
对于复杂的程序，可能需要使用模块（MODULE）来组织代码，以便更好地管理和重用代码。
通过以上步骤，你可以有效地在Fortran中使用子程序，提高代码的可读性和可维护性。