外部程式
外部過程是在另一個程式單元外部定義的過程,或者由 Fortran 之外的其他過程定義的過程。
包含在檔案中的函式
integer function f()
implicit none
end function f
是一個外部功能。
對於外部過程,可以使用介面塊宣告它們的存在(給定一個顯式介面)
program prog
implicit none
interface
integer function f()
end interface
end program prog
或者通過宣告語句來提供隱式介面
program prog
implicit none
integer, external::f
end program prog
甚至
program prog
implicit none
integer f
external f
end program prog
external
屬性不是必需的:
program prog
implicit none
integer i
integer f
i = f() ! f is now an external function
end program prog