Hi, Your program works on two fortran compilers, ifc on Linux as well as
F90 on HPUX. F gives errors (release 20030106 for Linux), but not the
ones you cite. For me it complains about the two write statements in MIA,
saying that you are doing external file i/o in a PURE procedure. I don't
know why it thinks your function is PURE. In any case, when I remove the
write statements, it compiles.
Cheers, Wes
On Thu, 17 Apr 2003, Giuseppe Panei wrote:
> Dear Mr MAine
>
> I have attacched the source in a
> f90 file
>
> Regards
>
> Giuseppe
Dr. W. J. Metzger Experimental High Energy Physics Group
tel. +31-24-3653127 Faculty of Natural Sciences
+31-24-3652099 (secr.) University of Nijmegen
fax. +31-24-3652191 Toernooiveld 1
telex 48228 wina nl 6525 ED Nijmegen, The Netherlands
e-mail: [log in to unmask] or [log in to unmask]
http://home.cern.ch/metzger/ or http://www.hef.kun.nl/~wes
|