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.
Changeset 13233 for NEMO/branches/2019/dev_r11708_aumont_PISCES_QUOTA/src/TOP/PISCES/P4Z/p4zagg.F90 – NEMO

Ignore:
Timestamp:
2020-07-02T20:34:16+02:00 (4 years ago)
Author:
aumont
Message:

update of the PISCES comments

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/dev_r11708_aumont_PISCES_QUOTA/src/TOP/PISCES/P4Z/p4zagg.F90

    r12537 r13233  
    100100                  zaggdoc2 = ( 3.53E3 * zfact + 0.1 * xstep ) * trb(ji,jj,jk,jpgoc) * 0.3 * trb(ji,jj,jk,jpdoc) 
    101101                  ! tranfer of DOC to POC due to brownian motion 
     102                  ! The temperature dependency has been omitted. 
    102103                  zaggdoc3 =  114. * 0.3 * trb(ji,jj,jk,jpdoc) *xstep * 0.3 * trb(ji,jj,jk,jpdoc) 
    103104 
     
    123124                  ! 
    124125                  zfact = xstep * xdiss(ji,jj,jk) 
    125                   !  Part I : Coagulation dependent on turbulence 
     126                  ! Part I : Coagulation dependent on turbulence 
    126127                  ! The stickiness has been assumed to be 0.1 
    127128                  zaggtmp = 25.9  * zfact * trb(ji,jj,jk,jppoc) 
Note: See TracChangeset for help on using the changeset viewer.