5.3 与传统 FORTRAN 77 编译的例程链接

• 要混合使用 f77 和 f95 对象二进制文件，应通过 -xlang=f77 选项利用 f95 编译器进行链接。即使主程序是 f77 程序，也使用 f95 执行链接步骤。

• 示例： 编译使用 f77 对象文件的 f95 主程序。

  demo% cat m.f95
  CHARACTER*74 :: c = ’This is a test.’
     CALL echo1( c )
  END
  demo% f95 -xlang=f77 m.f95 sub77.o
  demo% a.out
   This is a test.
  demo%

• 在 f95 程序中可以使用 FORTRAN 77 库和内部函数，《Fortran 库参考》手册中列出了这些库和内部函数。

  示例： f95 主程序调用 FORTRAN 77 库中的例程。

  demo% cat tdtime.f95
          REAL e, dtime, t(2)
          e = dtime( t )
          DO i = 1, 100000
             as = as + cos(sqrt(float(i)))
          END DO
          e = dtime( t )
          PRINT *, ’elapsed:’, e, ’, user:’, t(1), ’, sys:’, t(2)
          END
  demo% f95 tdtime.f95
  demo% a.out
  elapsed: 0.14 , user: 0.14 , sys: 0.0E+0
  demo%

  请参见 dtime(3F)。