Ignore:
Timestamp:
2007-12-17T11:51:41+01:00 (13 years ago)
Author:
gm
Message:

dev_001_GM - small error corrections

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/dev_001_GM/NEMO/TOP_SRC/LOBSTER/trcini_lobster.F90

    r766 r771  
    1818   USE par_trc         ! TOP parameters 
    1919   USE trccfc          ! CFC sms trends 
     20   USE sms             ! Source Minus Sink variables 
     21   USE oce_trc         ! ocean variables 
    2022 
    2123   IMPLICIT NONE 
     
    2830   !!---------------------------------------------------------------------- 
    2931   !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007)  
    30    !! $Id:$  
     32   !! $Id$  
    3133   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 
    3234   !!---------------------------------------------------------------------- 
     
    4042      !!---------------------------------------------------------------------- 
    4143      INTEGER  ::   ji, jj, jk, jn 
    42       REAL(wp) ::   zdm0(jpi,jpj,jpk), zrro(jpi,jpj), zfluo, zfluu 
    4344      REAL(wp) ::   ztest, zfluo, zfluu 
    4445      REAL(wp), DIMENSION(jpi,jpj)     ::   zrro 
Note: See TracChangeset for help on using the changeset viewer.