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 6231 for branches/CNRS/dev_r4826_PISCES_QUOTA/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zopt.F90 – NEMO

Ignore:
Timestamp:
2016-01-12T11:51:52+01:00 (9 years ago)
Author:
aumont
Message:

update PISCES QUOTA to its latest version

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/CNRS/dev_r4826_PISCES_QUOTA/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zopt.F90

    r5288 r6231  
    2222   USE fldread         !  time interpolation 
    2323   USE prtctl_trc      !  print control for debugging 
     24   USE lib_mpp         ! distribued memory computing library 
     25 
    2426 
    2527 
     
    7375      INTEGER, INTENT(in) ::   kt, jnt   ! ocean time step 
    7476      ! 
    75       INTEGER  ::   ji, jj, jk 
     77      INTEGER  ::   ji, jj, jk, jn 
    7678      INTEGER  ::   irgb 
    7779      REAL(wp) ::   zchl, zxsi0r 
Note: See TracChangeset for help on using the changeset viewer.