在Fortran中，子程序是一段独立的程序代码，它可以执行特定的功能，并且可以被主程序或其他子程序调用。子程序主要有以下几种类型：
函数子程序：
函数子程序与函数类似，但它返回一个值。函数的定义和调用格式如下：
```fortran
FUNCTION function_name （ argument1 , argument2 , ... ） result （ ）
```
其中，`function_name` 是函数名，`argument1`, `argument2`, ... 是函数的参数列表，`result` 是函数的返回值。
子例行程序：
子例行程序不返回任何值，它主要用于执行一系列操作，可以改变调用它的程序中的变量。子例行程序的定义和调用格式如下：
```fortran
SUBROUTINE subroutine_name （ argument1 , argument2 , ... ）
```
其中，`subroutine_name` 是子例行程序名，`argument1`, `argument2`, ... 是子例行程序的参数列表。
语句函数：
语句函数是一种特殊的子程序，它使用`语句函数`语句定义，并且没有返回值。语句函数的定义和调用格式如下：
```fortran
FUNCTION function_name （ argument1 , argument2 , ... ）
! 语句函数体
END FUNCTION function_name
```
其中，`function_name` 是语句函数名，`argument1`, `argument2`, ... 是语句函数的参数列表。
子程序的主要优点是它们可以实现代码的重用，提高程序的可读性和可维护性。通过将常用的代码封装成子程序，可以避免代码的重复编写，并且使得程序结构更加清晰。在编写大型程序时，合理使用子程序是至关重要的。