Changeset 14239 for NEMO/trunk/src/TOP
- Timestamp:
- 2020-12-23T09:57:16+01:00 (3 years ago)
- Location:
- NEMO/trunk/src/TOP
- Files:
-
- 11 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/TOP/AGE/trcwri_age.F90
r12377 r14239 6 6 !! History : 1.0 ! 2009-05 (C. Ethe) Original code 7 7 !!---------------------------------------------------------------------- 8 #if defined key_top && defined key_ iomput8 #if defined key_top && defined key_xios 9 9 !!---------------------------------------------------------------------- 10 10 !! trc_wri_age : outputs of concentration fields -
NEMO/trunk/src/TOP/C14/trcwri_c14.F90
r13295 r14239 7 7 !! History : 2.0 ! 2015 (A. Mouchet) adapted code for C14 8 8 !!---------------------------------------------------------------------- 9 #if defined key_top && defined key_ iomput9 #if defined key_top && defined key_xios 10 10 !!---------------------------------------------------------------------- 11 11 !! trc_wri_c14 : outputs of ventilation fields -
NEMO/trunk/src/TOP/CFC/trcwri_cfc.F90
r12377 r14239 6 6 !! History : 1.0 ! 2009-05 (C. Ethe) Original code 7 7 !!---------------------------------------------------------------------- 8 #if defined key_top && defined key_ iomput8 #if defined key_top && defined key_xios 9 9 !!---------------------------------------------------------------------- 10 10 !! trc_wri_cfc : outputs of concentration fields -
NEMO/trunk/src/TOP/MY_TRC/trcwri_my_trc.F90
r12377 r14239 4 4 !! trc_wri_my_trc : outputs of concentration fields 5 5 !!====================================================================== 6 #if defined key_top && defined key_ iomput6 #if defined key_top && defined key_xios 7 7 !!---------------------------------------------------------------------- 8 8 !! History : ! 2007 (C. Ethe, G. Madec) Original code -
NEMO/trunk/src/TOP/PISCES/SED/sedrst.F90
r14039 r14239 84 84 CALL iom_open( TRIM(clpath)//TRIM(clname), numrsw, ldwrt = .TRUE., kdlev = jpksed, cdcomp = 'SED' ) 85 85 ELSE 86 #if defined key_ iomput86 #if defined key_xios 87 87 cw_sedrst_cxt = "rstws_"//TRIM(ADJUSTL(clkt)) 88 88 IF( TRIM(Agrif_CFixed()) == '0' ) THEN -
NEMO/trunk/src/TOP/PISCES/trcwri_pisces.F90
r13295 r14239 6 6 !! History : 1.0 ! 2009-05 (C. Ethe) Original code 7 7 !!---------------------------------------------------------------------- 8 #if defined key_top && defined key_ iomput8 #if defined key_top && defined key_xios 9 9 !!---------------------------------------------------------------------- 10 10 !! trc_wri_pisces : outputs of concentration fields -
NEMO/trunk/src/TOP/README.rst
r14229 r14239 62 62 Here below the list of preprocessing keys that applies to the TOP interface (beside ``key_top``): 63 63 64 ``key_ iomput``64 ``key_xios`` 65 65 use XIOS I/O 66 66 … … 320 320 .. code-block:: perl 321 321 322 bld::tool::fppkeys key_ iomputkey_top322 bld::tool::fppkeys key_xios key_top 323 323 324 324 the compilation with :file:`makenemo` will be executed through the following syntax … … 348 348 .. code-block:: perl 349 349 350 bld::tool::fppkeys key_ iomputkey_top350 bld::tool::fppkeys key_xios key_top 351 351 352 352 src::MYBGC::initialization <MYBGCPATH>/initialization … … 376 376 .. code-block:: perl 377 377 378 bld::tool::fppkeys key_zdftke key_dynspg_ts key_ iomputkey_top378 bld::tool::fppkeys key_zdftke key_dynspg_ts key_xios key_top 379 379 inc <MYBGCPATH>/MYBGC.fcm 380 380 -
NEMO/trunk/src/TOP/TRP/trdtrc_oce.F90
r10425 r14239 24 24 LOGICAL, DIMENSION(:), ALLOCATABLE :: ln_trdtrc !: large trends diagnostic to write or not (namelist) 25 25 26 # if defined key_trdtrc && defined key_ iomput26 # if defined key_trdtrc && defined key_xios 27 27 LOGICAL, PARAMETER :: lk_trdtrc = .TRUE. 28 28 # else -
NEMO/trunk/src/TOP/trcnam.F90
r14086 r14239 31 31 PUBLIC trc_nam ! called in trcini 32 32 33 TYPE(PTRACER), DIMENSION(jpmaxtrc), PUBLIC :: sn_tracer !: type of tracer for saving if not key_ iomput33 TYPE(PTRACER), DIMENSION(jpmaxtrc), PUBLIC :: sn_tracer !: type of tracer for saving if not key_xios 34 34 35 35 !!---------------------------------------------------------------------- -
NEMO/trunk/src/TOP/trcrst.F90
r14086 r14239 96 96 CALL iom_open( TRIM(clpath)//TRIM(clname), numrtw, ldwrt = .TRUE. ) 97 97 ELSE 98 #if defined key_ iomput98 #if defined key_xios 99 99 cw_toprst_cxt = "rstwt_"//TRIM(ADJUSTL(clkt)) 100 100 IF( TRIM(Agrif_CFixed()) == '0' ) THEN -
NEMO/trunk/src/TOP/trcwri.F90
r13237 r14239 6 6 !! History : 1.0 ! 2009-05 (C. Ethe) Original code 7 7 !!---------------------------------------------------------------------- 8 #if defined key_top && defined key_ iomput8 #if defined key_top && defined key_xios 9 9 !!---------------------------------------------------------------------- 10 10 !! 'key_top' TOP models
Note: See TracChangeset
for help on using the changeset viewer.