[EMAIL PROTECTED] hcol]$ gfortran -c difq3.F -o difq3.o
In file difq3.F:693
ams(1:ngmax)=
1
Error: The FORALL with index 'j' cause more than one assignment to this object
at (1)
In file difq3.F:696
p2m(1:ngmax)=0.5d0*(3.0d0*ams(1:ngmax)-1d0)
1
Error: The FORALL with index 'j' cause more than one assignment to this object
at (1)
In file difq3.F:697
fi(1:ngmax)=yb(j,1:ngmax,nutype)*enu(1:ngmax)
1
Error: The FORALL with index 'j' cause more than one assignment to this object
at (1)
[EMAIL PROTECTED] hcol]$ make
../bin/prefort n comdecks abcd0.srs
input files from 2 to 3: comdecks abcd0.srs
open file=abcd0.f
--
Summary: Attached fortran 95 code generates error
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: joe at confucius dot gnacademy dot org
CC: gcc-bugs at gcc dot gnu dot org
GCC build triplet: i586-mandrake-linux-gnu
GCC host triplet: i586-mandrake-linux-gnu
GCC target triplet: i586-mandrake-linux-gnu
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21409
