Re: Fwd: Guru advice regarding Gfortran numeric libraries like AFNL or IMSL

[Frank Hauptle <frank dot hauptle at uwa dot edu dot au>]

OK, sweet, thankyou Mr Salvatore (and everyone else that has helped)...

so anyway, I blew away the directory and re-extracted the AFNL source 
and ran make again, all on the Fed 17 box.


[root@galleon afnl]# gfortran --version
GNU Fortran (GCC) 4.7.0 20120507 (Red Hat 4.7.0-5)
Copyright (C) 2012 Free Software Foundation, Inc.



Got this:

###############################################################
[root@galleon afnl]# make
gfortran -c numtypes.o error.o constants.o linear.o nonnum.o 
/home/ylan/afnl/src/statistics.f90 -o statistics.o
/home/ylan/afnl/src/statistics.f90:1801.2:

  Function Irand_S(I, J)
  1
Error: In generic interface 'irand' at (1) procedures must be either all 
SUBROUTINEs or all FUNCTIONs
make: *** [statistics.o] Error 1
###############################################################


This is the Makefile in question:




[root@galleon afnl]# cat Makefile

#F90=ifort -warn all
F90=gfortran
F90OPT=

VPATH=src
SRCDIR=$(VPATH)


all: lib

numtypes.o: numtypes.f90
        $(F90) -c $^ -o $@

constants.o: numtypes.o constants.f90
        $(F90) -c $^ -o $@

error.o: numtypes.o constants.o error.f90
        $(F90) -c $^ -o $@

nonnum.o: numtypes.o error.o constants.o nonnum.f90
        $(F90) -c $^ -o $@

linear.o: numtypes.o error.o constants.o linear.f90
        $(F90) -c $^ -o $@

int.o: numtypes.o error.o constants.o int.f90
        $(F90) -c $^ -o $@

time.o: numtypes.o error.o constants.o time.f90
        $(F90) -c $^ -o $@

specialfunc.o: numtypes.o error.o constants.o specialfunc.f90
        $(F90) -c $^ -o $@

root.o: numtypes.o error.o constants.o root.f90
        $(F90) -c $^ -o $@

min.o: numtypes.o error.o constants.o min.f90
        $(F90) -c $^ -o $@

statistics.o: numtypes.o error.o constants.o linear.o nonnum.o 
statistics.f90
        $(F90) -c $^ -o $@

poly.o: numtypes.o error.o constants.o poly.f90
        $(F90) -c $^ -o $@

fourier.o: numtypes.o error.o constants.o fourier.f90
        $(F90) -c $^ -o $@

lib: numtypes.o error.o constants.o statistics.o nonnum.o linear.o \
        int.o min.o time.o specialfunc.o root.o poly.o fourier.o
#       mv $(SRCDIR)/*.o .
#       mv $(SRCDIR)/*.mod .
        ar rcs libf90.a *.o

cleanall:
        rm *.o *.mod src/*~ libf90.a








My problem is that I don't even understand fortran enough to make sense 
of the error messages.


would appreciate any help to get this working, I've spent way to much 
time on this for one academic so I've going to have to tell her I can't 
do it if this won't compile.


many thanks and kindest regards

Frank
UWA




















Re: Fwd: Guru advice regarding Gfortran numeric libraries like AFNL or 
IMSL Salvatore Filippone Fri Jun 01 02:00:11 2012

The error below simply means that you have some leftover .mod files
from a previous attempt with a different version of gfortran.
Make sure to start from scratch.

HTH

Salvatore Filippone

Frank Hauptle wrote:
and tried to compile afnl again and got:


[EMAIL PROTECTED] ylan]# cd afnl
[EMAIL PROTECTED] afnl]# make
gfortran -c numtypes.o constants.o ./src/error.f90 -o error.o
gfortran: warning: numtypes.o: linker input file unused because linking 
not done
gfortran: warning: constants.o: linker input file unused because
linking not done
gfortran -c numtypes.o error.o constants.o ./src/linear.f90 -o linear.o
./src/linear.f90:30.6:

USE NumTypes
1
Fatal Error: Wrong module version '0' (expected '9') for file
'numtypes.mod' opened at (1)
make: *** [linear.o] Error 1