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 3382 for branches/2011/dev_NEMO_MERGE_2011 – NEMO

Ignore:
Timestamp:
2012-05-04T13:05:24+02:00 (12 years ago)
Author:
charris
Message:

#873 Yet another fix to diaptr.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/DIA/diaptr.F90

    r3281 r3382  
    332332      !!---------------------------------------------------------------------- 
    333333      USE oce,     vt  =>   ua   ! use ua as workspace 
    334       USE oce,     vs  =>   ua   ! use ua as workspace 
     334      USE oce,     vs  =>   va   ! use va as workspace 
    335335      IMPLICIT none 
    336336      !! 
Note: See TracChangeset for help on using the changeset viewer.