[CPMD-list] fileopen problem with CPMD 3.11.1 compilation

Dave Sherman dave.sherman at bristol.ac.uk
Mon Jul 16 16:10:42 CEST 2007


I'm trying to compile CPMD-3.11.1 using the PGI-AMD64-MPI  
configuration but I'm having
trouble with the fileopen.F/fileopen.f subroutine:
.
.
.
rm -f fileopen.f
/lib/cpp -P -C -traditional -D__Linux -D__PGI -DFFT_DEFAULT - 
DPOINTER8 -D__pgf90 -DPARALLEL -DMYRINET   ./fileopen.F ./fileopen.f
mpif77 -c -fastsse -tp k8-64 -r8 -pc=64 -Msignextend   ./fileopen.f - 
o  ./fileopen.o
PGFTN-S-0038-Symbol, position, has not been explicitly declared (./ 
fileopen.f: 110)
PGFTN-S-0034-Syntax error at or near = (./fileopen.f: 110)
   0 inform,   0 warnings,   2 severes, 0 fatal for fileopen
make: *** [fileopen.o] Error 2

In the source code fileopen.f,
.
,
,
         IF(TFODBG) WRITE(*,*) 'FILEOPEN: OPEN FILE FOR APPENDING'
         OPEN(UNIT=IUNIT,FILE=FULLPATH(IA2:IE2),STATUS='OLD',
      &       POSITION='APPEND',
      &       FORM=FO_FORM,ERR=999)
         IF(TFOVRB) WRITE(*,'(3A)') ' FILE ',FILEN(IA1:IE1),
      &       ' EXISTS, NEW DATA WILL BE APPENDED'
       ELSE
.
the offending keyword is POSITION which, apparently, the PGI compiler  
does not recognize.  (I don't recognize it either..).

Any suggestions on how to get around this?

Thanks for your help.

______________
David M. Sherman
Professor of Geochemistry
Department of Earth Sciences
University of Bristol
Bristol BS8 1RJ UNITED KINGDOM
Phone: 44-(0)117-954-5446
http://mineral.gly.bris.ac.uk

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://cpmd.org/pipermail/cpmd-list/attachments/20070716/7c832a2f/attachment.html 


More information about the CPMD-list mailing list