ROMS model compile problem
807575May 22 2007 — edited May 24 2007Hi, I am trying to compile ROMS (available from http://www.myroms.org/) and am receiving the following error
cd Build; f95 -c -u -U -xarch=v9 -openmp -fast mod_forces.f90
f95: Warning: -xarch=native has been explicitly specified, or implicitly specified by a macro option, -xarch=native on this architecture implies -xarch=v8plusb which generates code that does not run on pre UltraSPARC III processors
MODULE mod_forces
^
"mod_forces.f90", Line = 1, Column = 14: ERROR: The compiler has detected errors in module "mod_forces". No module information file will be created for this module.
SUBROUTINE initialize_forces (ng, tile, model)
^
"mod_forces.f90", Line = 207, Column = 41: ERROR: IMPLICIT NONE is specified in the host scope, therefore an explicit type must be specified for data object "tile".
integer, intent(in) :: ng, tile, model
^
"mod_forces.f90", Line = 223, Column = 34: ERROR: "tile" has the INTENT attribute, therefore it must be a dummy argument.
f90comp: 312 SOURCE LINES
f90comp: 3 ERRORS, 0 WARNINGS, 0 OTHER MESSAGES, 0 ANSI
gmake: *** [Build/mod_forces.o] Error 1
A code snippet from initialize_forces is
SUBROUTINE initialize_forces(ng, tile, model)
!
!=======================================================================
! !
! This routine initialize all variables in the module using first !
! touch distribution policy. In shared-memory configuration, this !
! operation actually performs propagation of the "shared arrays" !
! across the cluster, unless another policy is specified to !
! override the default. !
! !
!=======================================================================
!
USE mod_param
!
! Imported variable declarations.
!
integer, intent(in) :: ng, tile,model
Can anyone shed some light on why
f95: Sun Fortran 95 8.2 Patch 121019-05 2006/12/08
complains about this bit of code.
Thanks,
Simon.