Changeset 3615


Ignore:
Timestamp:
2012-11-20T16:57:36+01:00 (8 years ago)
Author:
adani
Message:

Minor Bugs

Location:
branches/2012/dev_INGV/NEMOGCM/NEMO/OPA_SRC
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/2012/dev_INGV/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r3575 r3615  
    179179      ELSE 
    180180      IF ( ln_cdgw .OR. ln_sdw  )                                         &  
    181          &   CALL ctl_stop( 'Not Activated Wave Module (ln_wave=F) but asked coupling with drag coefficient (ln_cdgw =T) or Stokes drift (ln_sdw=T) ') 
     181         &   CALL ctl_stop('Not Activated Wave Module (ln_wave=F) but     & 
     182         & asked coupling with drag coefficient (ln_cdgw =T) or Stokes drift (ln_sdw=T) ') 
    182183      ENDIF  
    183184       
  • branches/2012/dev_INGV/NEMOGCM/NEMO/OPA_SRC/TRA/traadv_muscl.F90

    r3576 r3615  
    8181      ! 
    8282      INTEGER  ::   ji, jj, jk, jn   ! dummy loop indices 
    83       INTEGER  ::   ierr 
    8483      REAL(wp) ::   zu, z0u, zzwx, zw         ! local scalars 
    8584      REAL(wp) ::   zv, z0v, zzwy, z0w        !   -      - 
Note: See TracChangeset for help on using the changeset viewer.