fortran77+MPI编译异常

fortran77+MPI编译错误
FFLAGS = -O2 -w -I/usr/lib/openmpi/include -I/usr/lib/openmpi/lib 
CFLAGS = -O2 -w 

CODE = p2d3t.e

XDIR = run

SG21:$(SRC) $(SG21SRC)
  mpif77 $(FFLAGS) -o $(CODE) $(SRC) $(SG21SRC) 
  cp $(CODE) $(XDIR)/run1

别人的f77+mpi程序，在我的虚拟机ubuntu系统下编译出错，上面是部分makefile代码，我将FFLAGS路径修改后还是有问题，具体问题如下：

l****@ubuntu:~/Downloads/soft3$ make
f77 -O2 -w -I/usr/lib/openmpi/include -I/usr/lib/openmpi/lib -c -o e2d3ts.o e2d3ts.f
  e2d3ts:
Error on line 138: Declaration error for t0: adjustable dimension on non-argument
Error on line 138: wr_ardecls: nonconstant array size
Error on line 138: wr_ardecls: nonconstant array size
/usr/bin/f77: aborting compilation
make: *** [e2d3ts.o] Error 25

  我自己感觉应该是可调数组维数的问题，提示错误的源程序如下：
c
  subroutine e2d3ts(nconv,redf,linear_niter,
  1 iter_method_sles,npreconditioner)
  implicit real*8 (a-h,o-z)
  include "mpi2d3t.i"
  include "snesf.h"
c
  dimension t0(n,0:imcell+1,0:jmcell+1)
  dimension linear_niter(1)

但是不知道怎么修改，我查看相关介绍，f77是支持可调数组维数的啊，望高人指点，多谢。我刚刚接触fortran希望能回答的详细些。

------解决方案--------------------
还有一种可能，是不是你使用的编译器和这个mpi程序版本的兼容性有问题？
混合编译时，不同语言版本之间往往不是完全支持的。

------解决方案--------------------
我觉得可能这里用些问题。

“FFLAGS = -O2 -w -I/usr/lib/openmpi/include -I/usr/lib/openmpi/lib ”

链接lib需要用“-L”而不是“-I”，同时还需要指明链接哪个lib。上面需要改为

“FFLAGS = -O2 -w -I/usr/lib/openmpi/include -L/usr/lib/openmpi/lib lib???”
lib??? 是您需要指明的链接函数。

现在fortran已经发展到f2003了。更新的08标准也在酝酿了。老的f77，很多语法已经过时。您可以用新的gfortran来编译。