在Fortran中，接口編程可以通過使用interface關鍵字來實現。接口可以定義一個或多個過程，以及它們的參數和返回值的類型。通過使用接口，可以實現模塊化和代碼復用，同時可以確保過程的參數和返回值正確匹配。
以下是一個簡單的示例，演示如何在Fortran中實現接口編程：
module my_module
implicit none
interface
subroutine my_subroutine(x, y)
real, intent(in) :: x
real, intent(out) :: y
end subroutine my_subroutine
end interface
contains
subroutine my_subroutine(x, y)
real, intent(in) :: x
real, intent(out) :: y
y = x * 2
end subroutine my_subroutine
end module my_module
program main
use my_module
implicit none
real :: input, output
input = 10.0
call my_subroutine(input, output)
print*, 'The output is: ', output
end program main
在上面的示例中，我們定義了一個名為my_subroutine的接口，接受一個實數作為輸入參數，并返回一個實數作為輸出參數。然后在my_module模塊中實現了這個接口，計算輸入參數的兩倍，并將結果存儲在輸出參數中。最后在main程序中調用這個接口，并輸出結果。
通過接口編程，我們可以將不同部分的代碼組織在不同的模塊中，使代碼更具可讀性和可維護性。
