cal.f

一个简单的VC++调用FORTRAN的实例,可以作为初学者的入门实例

      SUBROUTINE CALARR(i,j,array)
$ATTRIBUTES DLLEXPORT :: CALARR
      INTEGER I,J
      REAL(4) ARRAY
      ARRAY=20.1*I+J
      END SUBROUTINE