【注意】怎样把marc和fortran连接起来？

lilungen2002

我看了网上很多的贴子，大体上可归纳如下：
1：marc2000可以做到，marc2001不行（d版）
2：要在marc之前安装fortran
3：改动marc2000安装目录下面的include.bat文件
  
但是如何改动include.bat文件，没有人说过
  
下面是.include.bat中有关fortran编译器部分，希望知道的同伴在此作一些说明和指导。
  
＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃
REM
REM  define Fortran and C compile syntax
REM
  
SET CC=cl -DWIN32 -c
SET FORTRAN=df /c  /I"%DIR%\common" %MPI_INCLUDE% /static /optimize:3 /fast /fpconstant /check:nounderflow
SET FORTFPP=fl32  -fpp -DWIN32 /c  /I"%DIR%\common" %MPI_INCLUDE% /static /optimize:3 /fast /fpconstant /check:nounderflow
if not %MPITYPE%==none set FORTFPP=%FORTFPP% -DDDM
if %MPITYPE%==mpich SET FORTFPP=%FORTFPP% -DWINMPICH
if %MPITYPE%==mpich SET CC=%CC% -DWINMPICH
SET FORTLOW=fl32 /c  /I"%DIR%\common" %MPI_INCLUDE% /static /fpconstant /check:nounderflow
SET FORTHIGH=df /c  /I"%DIR%\common" %MPI_INCLUDE% /optimize:3 /fast /fpconstant /check:nounderflow
SET LOAD=LINK
SET ARC=lib /out:
  
REM
REM  choose which libraries you want to use
REM
  
SET MRCLIBS="%LIBDIR%\clib.lib"
SET STUBS ="%LIBDIR%\stubs.lib"
SET SYSLIBS=/release /subsystem:console /incremental:no
if %MPITYPE%==mpich set SYSLIBS=%SYSLIBS% "%LIBDIR%\winmpich.lib"
if %MPITYPE%==patent set SYSLIBS=%SYSLIBS% "%MPI_ROOT%\lib\Console\cvwmpi.lib" "%MPI_ROOT%\lib\Console\cdvlibf.lib" /defaultlib:dformt.lib   /defaultlib:libc.lib /nodefaultlib:msvcrt.lib /nodefaultlib:libcmt.lib
rem list files which need low optimization level
SET LOW_OPT_CODES=bet049.f boudry.f contro.f eldata.f ndext.f norst3.f omarc*.f omars.f radivf.f bdrezn.f areb4.f arbcf.f arbcg.f
rem list files which should use high optimization level
SET HIGH_OPT_CODES=cg11.f cg12.f cg21.f cg22.f cg31.f cg32.f cg41.f cg42.f cg51.f cg52.f cg61.f cg62.f crxrsi.f fwbrsi.f dom*.f
REM
REM  set default and maximum allowable size of the MARC executable.
REM

comma

这个东西我的确没用过，不好胡说。

lilungen2002

Thank you!

littleants

以前有限元联盟里有相关的帖子，不过现在好象那里挂了！