Changeset 3886 for branches/2013/dev_r3859_martin_lim2_pisces_0000
- Timestamp:
- 2013-04-22T14:20:08+02:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_r3859_martin_lim2_pisces_0000/NEMOGCM/NEMO/OPA_SRC/trc_oce.F90
r3770 r3886 27 27 REAL(wp), PUBLIC, SAVE, ALLOCATABLE, DIMENSION(:,:,:) :: etot3 !: light absortion coefficient 28 28 REAL(wp), PUBLIC, SAVE, ALLOCATABLE, DIMENSION(:,:,:) :: facvol !: volume for degraded regions 29 30 ! MV 04-2013 sea ice tracers 31 INTEGER , PUBLIC :: nn_ice_trc !: type of sea ice boundary condition for DIC and Alk 32 REAL(wp), PUBLIC :: cice_dic !: concentration of DIC in sea ice (mol C/L) 33 REAL(wp), PUBLIC :: coce_dic !: standard concentration of DIC in ocean (mol C/L) 34 REAL(wp), PUBLIC :: cice_alk !: concentration of Alk in sea ice (eq/L) 35 REAL(wp), PUBLIC :: coce_alk !: standard concentration of Alk in ocean (eq/L) 36 ! END MV 04-2013 sea ice tracers 29 37 30 38 #if defined key_top
Note: See TracChangeset
for help on using the changeset viewer.