Question

使用compaq visual fortran6.6调试fortran77程序时出现错误： error LNK2005

--------------------Configuration: my - Win32 Debug--------------------
Compiling Fortran...
D:\mytest\tj_out.for
D:\mytest\Split.for
D:\mytest\Read_Grid.for
D:\mytest\Dife_Par.for
D:\mytest\Dife_iter.for
D:\mytest\Cal_roua_bak.for
D:\mytest\Cal_roua.for
D:\mytest\2DMT_main.FOR
D:\mytest\2d_initials.for
Linking...
Cal_roua_bak.obj : error LNK2005: _PROJTANY1@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANZ1@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANY2@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANZ2@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANY3@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANZ3@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANY4@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANZ4@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANY5@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _PROJTANZ5@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUF1@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUF2@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUU@16 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUTAN1@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUTAN2@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUTAN3@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUTAN4@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALUTAN5@44 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALAN@8 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _CALANZ@12 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJY1@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJZ1@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJR1@32 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJY2@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJZ2@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJR2@32 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJY3@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJR3@32 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJZ4@20 already defined in Cal_roua.obj
Cal_roua_bak.obj : error LNK2005: _TAPROJR4@32 already defined in Cal_roua.obj
... ...
Debug/my.exe : fatal error LNK1169: one or more multiply defined symbols found
Error executing link.exe.
my.exe - 66 error(s), 0 warning(s)
本人菜鸟一个，急！谢谢~

Answer 1

@前面那几个变量名被重复定义了，建议LZ回源程序查找_PROJTANY1等的定义，“@”后是行号