New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
st2D_fabm.F90 in branches/UKMO/CO6_shelfclimate_fabm/NEMOGCM/NEMO/TOP_SRC/FABM – NEMO

source: branches/UKMO/CO6_shelfclimate_fabm/NEMOGCM/NEMO/TOP_SRC/FABM/st2D_fabm.F90 @ 7835

Last change on this file since 7835 was 7835, checked in by dford, 7 years ago

Initial attempt to add FABM. In theory this should give equivalent results to PML gitlab commit 2e51db55.

File size: 1.4 KB
Line 
1MODULE st2D_fabm
2   !!======================================================================
3   !!                      ***  MODULE  trc  ***
4   !! Passive tracers   :  module for tracers defined
5   !!======================================================================
6#if defined key_top
7   !!----------------------------------------------------------------------
8   !!   'key_top'                                                TOP models
9   !!----------------------------------------------------------------------
10   USE par_oce
11
12   IMPLICIT NONE
13   PUBLIC
14   !! passive tracers fields (before,now,after)
15   !! --------------------------------------------------
16   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:,:)         ::  fabm_st2Dn           !: 2D state concentration for now time step
17   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:,:)         ::  fabm_st2Da           !: 2D state concentration for next time step
18   REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:,:)         ::  fabm_st2Db           !: 2D state concentration for before time step
19#else
20   !!----------------------------------------------------------------------
21   !!  Empty module :                                     No passive tracer
22   !!----------------------------------------------------------------------
23#endif
24
25   !!======================================================================
26END MODULE st2d_fabm
27   
Note: See TracBrowser for help on using the repository browser.