Skip to Content.
Sympa Menu

forum - Death by a thousand INTENT(OUT) statements

forum@abinit.org

Subject: The ABINIT Users Mailing List ( CLOSED )

List archive

Death by a thousand INTENT(OUT) statements


Chronological Thread 
  • From: Paul Fons <paul-fons@aist.go.jp>
  • To: forum@abinit.org
  • Subject: Death by a thousand INTENT(OUT) statements
  • Date: Sat, 6 Aug 2005 14:01:24 +0900

By foolhardily commenting out debugging statements, I my "make allseq" proceeded until ./Src_5common/hessupdt.F90 when I encountered the same form of error in a statement that was obviously not just for debugging purposes. The error is reprinted below. I would appreciate it if someone might pass along an explanation as to how to fix these problems (for which if it works, I can send patches back to a "real" coder).

Thanks (as always),
Paul



/usr/bin/cpp -Dmacosx -DFLOAT="double precision" -DPOINTER_SIZE=4 -P hessupdt.F90 > hessupdt_cpp.f90
f90 -w -O -f free -N11 -cpu:g5 -altiVec -I../Lib_nanoquantaxc -c hessupdt_cpp.f90

hdelta(:)=hdelta(:)+hessin(:,ii)*dout(ii)
^
cf90-1640 f90fe: ERROR HESSUPDT, File = hessupdt_cpp.f90, Line = 82, Column = 34
Dummy arguments with the INTENT(OUT) attribute must be defined before use.

f90: Copyright Absoft Corporation 1994-2005; Absoft Fortran Compiler Version 9.2




Archive powered by MHonArc 2.6.16.

Top of Page