[cam-users] Re: an error in CAM
Erik Kluzek
erik@ucar.edu
Mon, 22 Sep 2003 15:44:33 -0600 (MDT)
>
> >From: "Song, Qingyuan (Q.)" <qsong1@ford.com>
> >
> >Tom,
> >It is me again. I am trying to run CAM on our SGI machine. When compiling, I
> got the following error message in SRCHUTIL module. I am not familiar with this
> specific problem. Please let me know what's wrong. Your help will be much
> appreciated.
>From the description of the error it sounds like making the
"use shr_kind_mod" statement part of the declaration of the
module rather than repeated in the definition of ismax and ismin
might help. This also sounds like a compiler problem rather than
a fundamental problem with the model. So you might check if you
have the latest SGI compiler on your machine. And if you don't
you should try to get a newer one and possibly report this as
a bug to SGI. So add
use shr_kind_mod, only: r8 => shr_kind_r8
implicit none
just before the
CONTAINS
line, and remove the same lines from the functions ismax and ismin.
That's my best guess...
> >PS. The error message:
> >
> >module srchutil
> > ^
> >f90-855 f90: ERROR SRCHUTIL, File =
> >/ford/ladon/u/qsong1/cam/cam1/models/atm/cam/src/control/srchutil.F90,
> >Line = 4, Column
> >= 8
> > The compiler has detected errors in module "SRCHUTIL". No module
> >information file will be created for this module.
> >
> > use shr_kind_mod, only: r8 => shr_kind_r8
> > ^
> >f90-1015 f90: ERROR ISMIN, File =
> >/ford/ladon/u/qsong1/cam/cam1/models/atm/cam/src/control/srchutil.F90,
> >Line = 59, Column =
> > 28
> > Local-name "R8" must only be referenced once in a rename-list in this
> >scope.
> >
> >f90: SGI MIPSpro Fortran 90 Version 7.41 (f14) Mon Sep 22, 2003
> >16:19:32
> >f90: 145 source lines
> >f90: 2 Error(s), 0 Warning(s), 0 Other message(s), 0 ANSI(s)
> >cf90: "explain cf90-message number" gives more information about each
> >message
> >gmake: *** [srchutil.o] Error 2
> >
> >
>
> _______________________________________________
> cam-users mailing list
> cam-users@ucar.edu
> http://mailman.ucar.edu/mailman/listinfo/cam-users
>
Erik Kluzek, (CGD at NCAR)
National Center for Atmospheric Research
Boulder CO, (off) (303)497-1326 (fax) (303)497-1324
--------- Home page and public PGP key---------------
http://www.cgd.ucar.edu/~erik
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!