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 6080 – NEMO

Changeset 6080


Ignore:
Timestamp:
2015-12-17T11:14:17+01:00 (8 years ago)
Author:
timgraham
Message:

Another missed file

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/dev_merge_2015/NEMOGCM/NEMO/OPA_SRC/DOM/iscplrst.F90

    r6075 r6080  
    117117      e3v_b (:,:,:) = e3v_n (:,:,:) 
    118118 
    119       IF ( lk_vvl ) THEN 
    120          e3uw_b(:,:,:)  = e3uw_n(:,:,:) 
    121          e3vw_b(:,:,:)  = e3vw_n(:,:,:) 
    122          dept_b(:,:,:)  = gdept_n(:,:,:) 
    123          gdepw_b(:,:,:) = gdepw_n(:,:,:) 
    124          hu_b (:,:) = hu_n(:,:) 
    125          hv_b (:,:) = hv_n(:,:) 
    126          r1_hu_b(:,:) = r1_hu_n(:,:) 
    127          r1_hv_b(:,:) = r1_hv_n(:,:) 
    128       END IF 
     119      e3uw_b(:,:,:)  = e3uw_n(:,:,:) 
     120      e3vw_b(:,:,:)  = e3vw_n(:,:,:) 
     121      gdept_b(:,:,:)  = gdept_n(:,:,:) 
     122      gdepw_b(:,:,:) = gdepw_n(:,:,:) 
     123      hu_b (:,:) = hu_n(:,:) 
     124      hv_b (:,:) = hv_n(:,:) 
     125      r1_hu_b(:,:) = r1_hu_n(:,:) 
     126      r1_hv_b(:,:) = r1_hv_n(:,:) 
    129127      ! 
    130128   END SUBROUTINE iscpl_stp 
Note: See TracChangeset for help on using the changeset viewer.