AW: [CPMD-list] Re:Compiling V3.7

[Juerg Hutter]

Hi

it looks to me as if your compiler thinks PURGE is
an intrinsic routine. With other words there is a
conflict of name between a CPMD and a system
routine. An easy work around would be to change
the name of the CPMD routine to PURGE2 in egointer.F
and purge.F

regards

Juerg

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


On Mon, 3 Feb 2003, Masroor, Ahmad Bangesh wrote:

> Dear Seitsonen
> after
> f90 -g -R abcn -c -dp ./egointer.f -o ./egointer.o
> f-90 compiler gives following message:-(even without debugging options -R etc.)
>
>
> "CALL PURGE(TAU0,FION) (pointer at FION,Masroor)
> ftn-1700 f90: ERROR INTERFACE, File =3D ./egointer.f, Line =3D 183,
> Column =3D 25
> This argument does not have a corresponding dummy argument for
> intrinsic PURGE.
> "
> Thanks
> Masroor
>
>
> -----Ursprüngliche Nachricht-----
>
> Von:	Ari.P.Seitsonen at iki.fi [mailto:Ari.P.Seitsonen at iki.fi]
>
> Gesendet:	So 02.02.2003 01:34
>
> An:	Masroor, Ahmad Bangesh
>
> Cc:	cpmd-list at cpmd.org
>
> Betreff:	Re: [CPMD-list] Re:Compiling V3.7
>
>
>
>
> Dear Masroor,
>
>
>
> > Thanks for your kind response..but I need some more help because =
>
> > compiling stops at same point with same problem on line 183,column 25 of =
>
> > egointer.f even without debugging options.
>
>
>
> What is the error message there?
>
>
>
>     Greetings (from Munich),
>
>
>
>        apsi
>
>
>
> --
>
> -=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-
>
>  Ari Paavo Seitsonen / Ari.P.Seitsonen at iki.fi / http://www.iki.fi/~apsi/
>
>  Tel +41 1 635 44 97 / Fax +41 1 635 68 38 / GSM +41 79 719 09 35
>
>  Anschrift: Physikalisch Chemisches Institut (PCI), Universität Zürich (UniZh)
>
>  Indirizzo: Winterthurerstraße 190, CH-8057 Zürich
>
>  Address:   Schweiz / Svizzera / Suisse / Svizra / Switzerland
>
>
>
>
>
>
>