Changeset 1808 for branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES
- Timestamp:
- 2010-03-11T10:17:56+01:00 (14 years ago)
- Location:
- branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES
- Files:
-
- 1 added
- 14 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zbio.F90
r1678 r1808 39 39 40 40 !!* Substitution 41 # include " domzgr_substitute.h90"41 # include "top_substitute.h90" 42 42 !!---------------------------------------------------------------------- 43 43 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zche.F90
r1180 r1808 147 147 148 148 !!* Substitution 149 #include " domzgr_substitute.h90"149 #include "top_substitute.h90" 150 150 !!---------------------------------------------------------------------- 151 151 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zflx.F90
r1737 r1808 52 52 53 53 !!* Substitution 54 # include " domzgr_substitute.h90"54 # include "top_substitute.h90" 55 55 !!---------------------------------------------------------------------- 56 56 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zlim.F90
r1152 r1808 41 41 42 42 !!* Substitution 43 # include " domzgr_substitute.h90"43 # include "top_substitute.h90" 44 44 !!---------------------------------------------------------------------- 45 45 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zmeso.F90
r1736 r1808 45 45 46 46 !!* Substitution 47 # include " domzgr_substitute.h90"47 # include "top_substitute.h90" 48 48 !!---------------------------------------------------------------------- 49 49 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zmicro.F90
r1736 r1808 43 43 44 44 !!* Substitution 45 # include " domzgr_substitute.h90"45 # include "top_substitute.h90" 46 46 !!---------------------------------------------------------------------- 47 47 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zmort.F90
r1736 r1808 41 41 42 42 !!* Substitution 43 # include " domzgr_substitute.h90"43 # include "top_substitute.h90" 44 44 !!---------------------------------------------------------------------- 45 45 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zopt.F90
r1678 r1808 35 35 36 36 !!* Substitution 37 # include " domzgr_substitute.h90"37 # include "top_substitute.h90" 38 38 !!---------------------------------------------------------------------- 39 39 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zprod.F90
r1736 r1808 53 53 54 54 !!* Substitution 55 # include " domzgr_substitute.h90"55 # include "top_substitute.h90" 56 56 !!---------------------------------------------------------------------- 57 57 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zrem.F90
r1744 r1808 45 45 46 46 !!* Substitution 47 # include " domzgr_substitute.h90"47 # include "top_substitute.h90" 48 48 !!---------------------------------------------------------------------- 49 49 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zsink.F90
r1736 r1808 69 69 70 70 !!* Substitution 71 # include " domzgr_substitute.h90"71 # include "top_substitute.h90" 72 72 !!---------------------------------------------------------------------- 73 73 !! NEMO/TOP 2.0 , LOCEAN-IPSL (2007) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/sms_pisces.F90
r1678 r1808 38 38 LOGICAL :: ln_pisdmp !: relaxation or not of nutrients to a mean value 39 39 !: when initialize from a restart file 40 LOGICAL :: ln_pisclo !: Restoring or not of nutrients to initial value 41 !: on close seas 40 42 41 43 !!* Biological fluxes for light -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/trcini_pisces.F90
r1542 r1808 38 38 no3 = 31.04e-6 * 7.6 39 39 40 # include "domzgr_substitute.h90"41 40 # include "top_substitute.h90" 42 41 !!---------------------------------------------------------------------- -
branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/trclsm_pisces.F90
r1581 r1808 67 67 NAMELIST/nampisdia/ nwritedia, pisdia3d, pisdia2d ! additional diagnostics 68 68 #endif 69 NAMELIST/nampisdmp/ ln_pisdmp 69 NAMELIST/nampisdmp/ ln_pisdmp, ln_pisclo 70 70 71 71 !!---------------------------------------------------------------------- … … 188 188 WRITE(numout,*) 189 189 WRITE(numout,*) ' Namelist : nampisdmp' 190 WRITE(numout,*) ' Relaxation of tracer to glodap mean value ln_pisdmp =', ln_pisdmp 190 WRITE(numout,*) ' Relaxation of tracer to glodap mean value ln_pisdmp =', ln_pisdmp 191 WRITE(numout,*) ' Restoring of tracer to initial value on closed seas ln_pisclo =', ln_pisclo 191 192 WRITE(numout,*) ' ' 192 193 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.