在Fortran中，可以使用SUBROUTINE關鍵字來定義子程序，然后在主程序中調用這個子程序。下面是一個簡單的示例：
PROGRAM MainProgram
IMPLICIT NONE
! 聲明子程序
SUBROUTINE MySubroutine()
PRINT *, 'Hello from subroutine!'
END SUBROUTINE MySubroutine
! 調用子程序
CALL MySubroutine()
END PROGRAM MainProgram
在上面的示例中，我們定義了一個名為MySubroutine的子程序，在主程序中調用了這個子程序。當程序運行時，會輸出Hello from subroutine!。
值得注意的是，在子程序中也可以定義參數，以便在調用子程序時傳遞參數。另外，子程序也可以返回值給主程序。Fortran中還提供了FUNCTION關鍵字來定義具有返回值的子程序。
