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.
ticket/0927_Energy_diag (diff) – NEMO

Changes between Version 62 and Version 63 of ticket/0927_Energy_diag


Ignore:
Timestamp:
2012-06-27T19:37:50+02:00 (12 years ago)
Author:
fabien.roquet
Comment:

--

Legend:

Unmodified
Added
Removed
Modified
  • ticket/0927_Energy_diag

    v62 v63  
    1212'''     Motivation: '''    output 3D trends of tracers, momentum, kinetic energy and potential energy.[[BR]] '''     Status :''' the extraction of trends terms exists, but not the 3D output of the trends   [[BR]] '''     Main tasks :'''         [[BR]] 
    1313 
    14   (1) implement the 3D output of tracers and momentum trends using iom_put [[BR]]                                     (2) compute and output the 3D trends of PE and KE [[BR]]                                          (3) validatation + documentation  [[BR]] 
     14  (1) implement the 3D output of tracers and momentum trends using iom_put [[BR]]                                      (2) compute and output the 3D trends of PE and KE [[BR]]                                           (3) validatation + documentation  [[BR]] 
    1515 
    1616'''     Science Reviewer:''' NOCS guy?     [[BR]]     '''     System Reviewer:'''  NOCS guy?     [[BR]]    '''     Deadline:'''   spring 2012   [[BR]] '''     Priority:'''      high    [[BR]] '''     Depends on:'''    gurvan disponibilities   [[BR]] '''     Principal Investigator : '''      Gurvan Madec and Fabien Roquet (gurvan.madec@locean-ipsl.upmc.fr)  [[BR]] [[BR]] 
     
    2424see [https://forge.ipsl.jussieu.fr/nemo/log/branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/OPA_SRC?rev=3316 revision 3316] 
    2525 
    26   '''                                     trdmod_oce'''                                      module and '''                                     namtrd namelist'''                                      [[BR]] 
     26  '''                                      trdmod_oce'''                                       module and '''                                      namtrd namelist'''                                       [[BR]] 
    2727 
    2828logical flags added in namlist namtrd which now controls what is done with the trends. [[BR]] All the types of treatment of a given trend are available at the same time. The memory requirement will only increase due to the time averaged arrays defined in IOM. 
     
    4040Add these new logical in the namelist. '''==>>> CAUTION only in the ORCA2_LIM directory''' [[BR]] NB: here is the new name set in revision number 3318[[BR]] 
    4141 
    42   '''                                     trdtra'''                                      module[[BR]] 
     42  '''                                      trdtra'''                                       module[[BR]] 
    4343 
    4444Add a systematic mask of the trend.[[BR]] Change the comments to better describe the purpose of this module. Its purpose is: [[BR]] 
    4545 
    46   'TRA' case:  to regroup T & S trends and send them to trd_mod, with, in case of advection, transform the incoming advective fluxes into advctive trend (U.grad[T])[[BR]]                                     'TRC' case:  send trend to ted_mod_trc, with,  in case of advection,  transform the incoming advective fluxes into advective trend [[BR]]                                     all cases  : mask the trend    ('''                                     ===>>>   PROBABLY add in the module a lbc_lnk so that the trend is defined everywhere'''                                     ) 
    47  
    48   '''                                     dynadv_cen2 and _ubs'''                                      modules[[BR]] 
     46  'TRA' case:  to regroup T & S trends and send them to trd_mod, with, in case of advection, transform the incoming advective fluxes into advctive trend (U.grad[T])[[BR]]                                      'TRC' case:  send trend to ted_mod_trc, with,  in case of advection,  transform the incoming advective fluxes into advective trend [[BR]]                                      all cases  : mask the trend    ('''                                      ===>>>   PROBABLY add in the module a lbc_lnk so that the trend is defined everywhere'''                                      ) 
     47 
     48  '''                                      dynadv_cen2 and _ubs'''                                       modules[[BR]] 
    4949 
    5050change jpdyn_trd_had  into jpdyn_trd_keg. Now in flux form _keg corresponds to the horizontal advection trends and _rvo to the metric terms[[BR]] [[BR]] 
    5151 
    52   '''                                     dynnxt'''                                      module[[BR]] 
     52  '''                                      dynnxt'''                                       module[[BR]] 
    5353 
    5454add the output using sum of the total dyn trend (except asselin time filter) ("utrd_tot", "vtrd_tot") and of the asselin time filter trend ("utrd_atf", "vtrd_atf") but with a shift by one time step[[BR]] [[BR]] 
    5555 
    56   '''                                     dynvor, trdvor and trdmod_oce'''                                      modules[[BR]] 
     56  '''                                      dynvor, trdvor and trdmod_oce'''                                       modules[[BR]] 
    5757 
    5858suppress the call to trd_mod in the jpdyn_trd_dat case (computation of beta.V) add add the calculation of beta.V term in 'trdvor' in jpvor_pvo case. And obviously suppress jpdyn_trd_dat from trdmod_oce [[BR]] Also suppress the jpdyn_trd_had case  horizontal advection for the dynamics is 'keg' + 'vor'  ; in case of flux form,  'had' is put in 'keg' and the metric terms is put in 'vor' [[BR]] there is now only 10 trends on the dynamics instead of 12[[BR]] [[BR]] 
    5959 
    60   '''                                     trdmod'''                                      module[[BR]] 
     60  '''                                      trdmod'''                                       module[[BR]] 
    6161 
    62621- introduce the new logical namelist parameters[[BR]] 2- introduce new subroutines : '''trd_budget''' : computation of the domain averaged T,T^2^, PE, KE trends formerly computes in trd_mod routine)[[BR]] ''' trd_3Diom''': output of the 3D trends using IOM [[BR]] [[BR]] 
    6363 
    64   '''                                     trdicp'''                                      module[[BR]] 
     64  '''                                      trdicp'''                                       module[[BR]] 
    6565 
    6666add in trd_twr routine the computation of the vertical diffusive trend on T & S in case of iso-neutral diffusion (ln_traldf_iso=T). These trends ("ttrd_zdfp", "strd_zdfp")  name zdfp for "PURE" vertical diffusion trends are output so that by difference with "zdf" trends we can access to the vertical contribution of the iso-neutral operator [[BR]] [[BR]] 
    6767 
    68   '''                                     iodef.xml'''                                      file[[BR]] 
     68  '''                                      iodef.xml'''                                       file[[BR]] 
    6969 
    7070add all the trends nick name : '''==>>> CAUTION only in the ORCA2_LIM directory''' [[BR]] [[BR]] 
     
    7373''' Step II : simplification of the structure ''' 
    7474 
    75   '''                                     trdicp and trdicp_oce'''                                      modules[[BR]] 
     75  '''                                      trdicp and trdicp_oce'''                                       modules[[BR]] 
    7676 
    7777see [https://forge.ipsl.jussieu.fr/nemo/log/branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/OPA_SRC?rev=3317 revision 3317] 
     
    79791- suppress trdicp_oce module (put required variables in trdmod_oce parameters)[[BR]] 2- use the jptra_trd_...  instead of jpicp_...  3- move trd_budget subroutine from trdmod to trdicp.F90. Suppress trd_icp routine (i.e. trd_2d, trd_3d) as the work is now simply done in trd_budget.[[BR]] 4- rescan all dyn/tra trend indices. add jptra_trd_zdfp for "PURE Kz dissusive trend when ln_traldf_iso=T (see also changes in tranxt where a call to trd_tra is done just before the swap, so that PURE Kz trends can be diagnosed in tra_trd. See also xml file).  5- jptra_trd_nsr and jptra_trd_cdt are 3D trends as their incorporate both surface forcing AND runoff, the later being possibly spread in depth ('''==>>> probably to be changed''')[[BR]] 6- suppress the key_trddyn key trdtra  from trdicp[[BR]] 
    8080 
    81   '''                                     trdtra - trddyn - trdmod - trdvor'''                                      modules : impact on '''                                     TRA'''                                     , '''                                     DYN'''                                     , '''                                     TRD'''                                      and almost all '''                                     TOP_SRC'''                                      modules[[BR]] 
     81  '''                                      trdtra - trddyn - trdmod - trdvor'''                                       modules : impact on '''                                      TRA'''                                      , '''                                      DYN'''                                      , '''                                      TRD'''                                       and almost all '''                                      TOP_SRC'''                                       modules[[BR]] 
    8282 
    8383see [https://forge.ipsl.jussieu.fr/nemo/log/branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/OPA_SRC?rev=3318 revision 3318] 
     
    9494''' Step III : addition of 3D KE diagnostics ''' 
    9595 
    96   '''                                     trdken'''                                      module[[BR]] 
     96  '''                                      trdken'''                                       module[[BR]] 
    9797 
    9898see [https://forge.ipsl.jussieu.fr/nemo/log/branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/OPA_SRC?rev=3325 revision 3325] 
     
    109109''' Step IV : addition of 3D PE diagnostics ''' 
    110110 
    111   '''                                     trdpen'''                                      module[[BR]] 
     111  '''                                      trdpen'''                                       module[[BR]] 
    112112 
    113113see [https://forge.ipsl.jussieu.fr/nemo/log/branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/OPA_SRC?rev=3326 revision 3326] and [https://forge.ipsl.jussieu.fr/nemo/log/branches/2012/dev_r3309_LOCEAN12_Ediag/NEMOGCM/NEMO/OPA_SRC?rev=3327 revision 3327] 0- correct a bug in trdtra and trdken 
     
    125125[[BR]] [[BR]] [[BR]] [[BR]] [[BR]] [[BR]] [[BR]] [[BR]] [[BR]] '''Pending issues''' : 
    126126 
    127   atmospheric pressure gradient trend not taken into account (see dynspg.F90  '''                                     To be done !!!!'''                                     [[BR]]                                    ''' 
    128  
    129   kpp non-local trend put in zdf trends !!!  this will not work ! a additional trend term should be add '''                                     To be done !!!!'''                                     [[BR]]                                    ''' 
     127  atmospheric pressure gradient trend not taken into account (see dynspg.F90  '''                                      To be done !!!!'''                                      [[BR]]                                     ''' 
     128 
     129  kpp non-local trend put in zdf trends !!!  this will not work ! a additional trend term should be add '''                                      To be done !!!!'''                                      [[BR]]                                     ''' 
    130130 
    131131  problems to be solved: vvl case for tracer sad trends ; flux form case for had (keg) and zad momentum trends[[BR]] 
     
    136136 
    137137  reshape trdtra so that T and S are treated separately in all ted routine (including mld diag...) create umask_i and vmask_i (2D) fields that mirror task_i field but for the velocity points 
    138    
    139    
    140    
    141    
     138  '''''' 
    142139 
    143140'''Changes done by Fabien R.''' 
     141 
     142In oce.F90: 
     143 
     144 * Added 3D variables alpha and beta, thermal and haline expansion coefs.[[BR]]To avoid name conflict, replace variables alph and beta in sol_oce.F90 and solpcg.F90 by sol_alph and sol_beta resp. 
     145 * rhd and rhop are kept for backward compatibility, but they are meant to become obsolete[[BR]](especially rhop which could already be easily removed, with minor changes in zdfkpp, zdfmxl and zdfric) 
     146 
     147In step.F90: 
     148 
     149 * Added "IF( .NOT.ln_bfrimp)" before the "CALL  dyn_bfr( kstp )" to clarify that dyn_bfr is called only if bottom  friction is explicit. 
     150 * TODO: Diagnostic of BFR should be improved! 
     151 
     152 * TODO: add eos_alpbet calls to set alpha and beta expansion coeffs at the right moments. 
     153 * Also, remove obsolete calls to eos when necessary. 
    144154 
    145155In trdtra.F90: 
     
    157167In tranxt.F90: 
    158168 
    159  * Important:[[BR]]If ln_dyn_hpg_imp=.TRUE., Brown and Campana effect is added. The pressure gradient term is computed using a linear combination version of T and S at times b, n and a:[[BR]]   Tbc=Tb/4+Tn/2+Ta/4[[BR]]   Sbc=Sb/4+Sn/2+Sa/4 
    160  
    161 In step.F90: 
    162  
    163  * Added "IF( .NOT.ln_bfrimp)" before the "CALL dyn_bfr( kstp )" to clarify that dyn_bfr is called only if bottom friction is explicit. 
    164  * TODO: Diagnostic of BFR should be improved! 
     169 * Important:[[BR]]If ln_dyn_hpg_imp=.TRUE., Brown and Campana effect is added. The pressure gradient term is computed using a linear combination version of T and S at times b, n and a:[[BR]]   Tbc=Tb/4+Tn/2+Ta/4[[BR]]   Sbc=Sb/4+Sn/2+Sa/4 
    165170 
    166171In trdglo.F90: 
    167172 
    168  * In trd_glo_init, corrected definition for tvolt: 
    169  
    170 tvolt = tvolt + SUM( e1e2t(:,:) * fse3t(:,:,jk) * tmask(:,:,jk) * tmask_i(:,:) ) 
    171  
     173 * In trd_glo_init, corrected definition for tvolt:[[BR]]    tvolt = tvolt + SUM( e1e2t(:,:) * fse3t(:,:,jk) * tmask(:,:,jk) * tmask_i(:,:) ) 
    172174 * Treatment of bfr has been clarified: if bfr is implicit (ln_bfrimp=.TRUE.), the bottom friction term remain 0, as bottom friction is implicitly included in the vertical diffusion term. 
    173175 * Correction of outputs of dynamic trends and hke. 
     
    226228 * Buoyancy frequency calculation: exact formulation. 
    227229 * Same for alpha and beta 
    228  * eos_alpha_beta added, which provides alpha and beta 
     230 * eos_alpbet modified, which now provides alpha and beta instead of alpha/beta and beta0=0 or 1.[[BR]]ldf_slp_grif in ldfslp.F90 modified accordingly (only place eos_alpbet was used). 
     231 * eos_bn2 modified, calling first eos_alpbet to update alpha and beta coefficients, then interpolating alpha/beta on w-points and finally calculating pn2.  
    229232 * compute_pen added to provide PE anomaly, and its partial derivatives with respect to T and S, needed in PE diagnostic (trdpen).[[BR]]PE anomaly is the anomaly of PE: (PE - rau0*gz)/(rau0*gz). For a linear case, PE anomaly is equal to density anomaly (nice isn't it?)[[BR]]Done for linear case, and Vallis case.[[BR]]Not ready yet for realistic cases... (discussion with Trevor is needed!)[[BR]]When z=0, PE anomaly is always defined asymptotically, converging toward the density anomaly value. 
    230233 * TODO: add global arrays for alpha and beta, computed at the same time than bn2? Indeed, they are used in several places, and are needed to compute bn2 in any case...