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 8430 for branches/UKMO/dev_r4650_general_vert_coord_obsoper_pfts/NEMOGCM/NEMO/OPA_SRC/OBS/diaobs.F90 – NEMO

Ignore:
Timestamp:
2017-08-10T11:31:49+02:00 (7 years ago)
Author:
dford
Message:

Add a couple of declarations which got omitted in previous merge.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/dev_r4650_general_vert_coord_obsoper_pfts/NEMOGCM/NEMO/OPA_SRC/OBS/diaobs.F90

    r8105 r8430  
    17931793         & tmask, umask, vmask                             
    17941794      USE phycst, ONLY : &              ! Physical constants 
    1795          & rday                          
     1795         & rday, & 
     1796         & rt0 
    17961797      USE oce, ONLY : &                 ! Ocean dynamics and tracers variables 
    17971798         & tsn,  &              
    … …  
    18861887#if defined key_fabm 
    18871888      REAL(wp), DIMENSION(jpi,jpj,jpk) :: logchl_3d 
     1889      REAL(wp), DIMENSION(jpi,jpj,jpk) :: pco2_3d 
    18881890 
    18891891 
Note: See TracChangeset for help on using the changeset viewer.