source: trunk/NEMO/OPA_SRC/trc_oce.F90 @ 719

Last change on this file since 719 was 719, checked in by ctlod, 14 years ago

get back to the nemo_v2_3 version for trunk

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.3 KB
Line 
1MODULE trc_oce
2   !!======================================================================
3   !!                      ***  MODULE  trc_oce  ***
4   !! Ocean passive tracer  :  share SMS/Ocean variables
5   !!======================================================================
6   !! History :
7   !!   9.0  !  04-03  (C. Ethe)  F90: Free form and module
8   !!----------------------------------------------------------------------
9#if defined key_passivetrc && defined key_trc_pisces
10   !!----------------------------------------------------------------------
11   !!  OPA 9.0 , LOCEAN-IPSL (2005)
12   !! $Header$
13   !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt
14   !!----------------------------------------------------------------------
15   USE sms , ONLY :  &
16      etot3    =>   etot3   !!:  Biological fluxes for light
17   !! Shared module variables
18   LOGICAL, PUBLIC, PARAMETER ::   lk_qsr_sms = .TRUE. 
19#else
20   !!----------------------------------------------------------------------
21   !! Default option                         No Biological fluxes for light         
22   !!----------------------------------------------------------------------
23   USE par_oce
24   LOGICAL, PUBLIC, PARAMETER ::   lk_qsr_sms = .FALSE. 
25   REAL(wp), PUBLIC , DIMENSION (jpi,jpj,jpk) :: &
26      etot3
27#endif
28
29END MODULE trc_oce
Note: See TracBrowser for help on using the repository browser.