[CPMD-list] fileopen problem with CPMD 3.11.1 compilation

[Juerg Hutter]

Hi

your mpif77 probably really calls the pgf77 compiler and
not pgf90 as is assumed in this CONFIGURE file.
If you replace mpif77 by mpif90 in the Makefile it should work.

regards

Juerg Hutter

----------------------------------------------------------
Juerg Hutter                   Phone : ++41 44 635 4491
Physical Chemistry Institute   FAX   : ++41 44 635 6838
University of Zurich           E-mail: hutter at pci.uzh.ch
Winterthurerstrasse 190
CH-8057 Zurich, Switzerland
----------------------------------------------------------


On Mon, 16 Jul 2007, Dave Sherman wrote:

> 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
>