------- Comment #2 from dominiq at lps dot ens dot fr 2007-06-18 14:52 -------
Compiling your code with g95 gives a lot of warnings. You should probably check
the use of the different subroutines.
In file pr32393.f:189
subroutine clect2
1
In file pr32393.f:155
call clect2 (t(nj),w(nj),nvg,nl1,mtrans,ctrans,itrans)
2
Warning (154): Inconsistent number of arguments in reference to 'clect2' at (1)
and (2)
In file pr32393.f:168
call prmx(t(nj),nvg)
1
In file pr32393.f:201
subroutine prmx (a,n)
2
Warning (155): Inconsistent types (INTEGER(4)/REAL(4)) in actual argument lists
at (1) and (2)
In file pr32393.f:156
call prmx(t(nj),nvg)
1
In file pr32393.f:201
subroutine prmx (a,n)
2
Warning (155): Inconsistent types (INTEGER(4)/REAL(4)) in actual argument lists
at (1) and (2)
In file pr32393.f:140
if (title(1:4).eq.its1 .and. ielt.le.4) call prmx(t(nj),nvg)
1
In file pr32393.f:201
subroutine prmx (a,n)
2
Warning (155): Inconsistent types (INTEGER(4)/REAL(4)) in actual argument lists
at (1) and (2)
In file pr32393.f:133
call prmx (t(nj),nvl)
1
In file pr32393.f:201
subroutine prmx (a,n)
2
Warning (155): Inconsistent types (INTEGER(4)/REAL(4)) in actual argument lists
at (1) and (2)
In file pr32393.f:195
subroutine mover
1
In file pr32393.f:154
call mover (0.,0,t(nj),1,nj1)
2
Warning (154): Inconsistent number of arguments in reference to 'mover' at (1)
and (2)
In file pr32393.f:192
subroutine mid2
1
In file pr32393.f:139
call mid2 (4,tgc,t(nj),t(nj))
2
Warning (154): Inconsistent number of arguments in reference to 'mid2' at (1)
and (2)
In file pr32393.f:198
subroutine penal
1
In file pr32393.f:120
if(ntyp.eq.411) call penal(a(ll),istab,t(nj))
2
Warning (154): Inconsistent number of arguments in reference to 'penal' at (1)
and (2)
In file pr32393.f:230
subroutine scprod
1
In file pr32393.f:101
call scprod (ns*ns,1,1,cc,cc,sum)
2
Warning (154): Inconsistent number of arguments in reference to 'scprod' at (1)
and (2)
In file pr32393.f:227
subroutine scopu
1
In file pr32393.f:152
210 call scopu (nnl,t,w)
2
Warning (154): Inconsistent number of arguments in reference to 'scopu' at (1)
and (2)
In file pr32393.f:236
subroutine vr22d
1
In file pr32393.f:112
if (idvr.eq.2) call vr22d (cc,ns,stdb,stdm,nlin,istab,t,t(nj))
2
Warning (154): Inconsistent number of arguments in reference to 'vr22d' at (1)
and (2)
In file pr32393.f:233
subroutine vr21d
1
In file pr32393.f:108
if (idvr.eq.1) call vr21d (cc,ns,stdb,nlin,istab,t)
2
Warning (154): Inconsistent number of arguments in reference to 'vr21d' at (1)
and (2)
In file pr32393.f:185
call vr2 ( intp, ivg, ccrans, cc, ns, stdb, stdm, t,
1
In file pr32393.f:2
cc, ns, stdb, stdm, t,
2
Warning (155): Inconsistent types (REAL(4)/INTEGER(4)) in actual argument lists
at (1) and (2)
In file pr32393.f:239
subroutine vr23d
1
In file pr32393.f:116
if (idvr.eq.3) call vr23d (cc,ns,stdm,nlin,istab,t)
2
Warning (154): Inconsistent number of arguments in reference to 'vr23d' at (1)
and (2)
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32393
