在Fortran中實現并行計算和分布式計算通常使用MPI（Message Passing Interface）庫來實現。MPI是一種消息傳遞編程模型，可以在多個進程之間傳遞消息以實現并行計算。
下面是一個簡單的Fortran代碼示例，演示如何使用MPI庫實現并行計算：
program hello_mpi
include 'mpif.h'
integer :: ierr, rank, size
call MPI_INIT(ierr)
call MPI_COMM_SIZE(MPI_COMM_WORLD, size, ierr)
call MPI_COMM_RANK(MPI_COMM_WORLD, rank, ierr)
write(*,*) 'Hello from process', rank, 'out of', size
call MPI_FINALIZE(ierr)
end program hello_mpi
在這個示例中，程序首先初始化MPI庫，然后獲取總的進程數量和當前進程的排名。然后每個進程都會打印一條消息，顯示當前進程的排名和總的進程數量。最后程序會結束MPI庫的使用。
要在多臺機器上實現分布式計算，可以使用MPI來創建一個跨多個機器的通信網絡。每臺機器上的進程可以通過MPI發送和接收消息，從而在多臺機器上協同完成任務。
需要注意的是，MPI庫需要在編譯時鏈接到程序中。在編譯Fortran程序時，需要使用MPI的編譯器和鏈接器，例如mpif90和mpif77。
這只是一個簡單的示例，實際的并行計算和分布式計算可能涉及更復雜的通信和同步操作。建議在實際應用中仔細閱讀MPI文檔，并參考MPI庫提供的示例代碼和教程。
