Question

我的问题是关于FORTRAN 77和FORTRAN 90.主程序（program.f77）是用FORTRAN 77编写的。一个子程序用FORTRAN 90编写。假设文件名是sub.f90，它有子程序。现在我想将这个子程序用于我的主程序。所以我在我的主程序中使用了'include sub.f90'，但它没有用。我的问题是有什么方法可以将sub.f90用于我的主程序（program.f77）？任何帮助将不胜感激。

Answer 1

这是Fortran 77文件test.f：

PROGRAM test

      integer i
      print*, 'Hello world'
      CALL subr(i)

END PROGRAM test

调用子程序subr，该子程序在单独的Fortran 90文件subr.f90中描述：

SUBROUTINE subr(i)

      IMPLICIT NONE
      integer, intent(out) :: i

      i=1
      write(*,*) i

END SUBROUTINE subr

只需编译它们并将它们链接在一起：

gfortran -c test.f subr.f90

gfortran -o main test.o subr.o

./主

输出：

Hello world
1

如何使用FORTRAN90编写的子程序到FORTRAN77编写的主程序

1 个答案: