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 9631 for branches – NEMO

Context Navigation

← Previous Change
Next Change →

Changeset 9631 for branches

Timestamp:

2018-05-25T10:14:07+02:00 (6 years ago)

Author:

davestorkey

Message:

Bug fix in nemo2cice in sbcice_cice.F90.

File:

: 1 edited

branches/UKMO/dev_merge_2017_CICE_interface/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

branches/UKMO/dev_merge_2017_CICE_interface/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90

-                      r9500
+                      r9631
       ! Copy local domain data from NEMO to CICE field
       pc(:,:,1)=0.0
       DO jj=2,ny_block-1
          DO ji=2,nx_block-1
+      DO jj=2,jpj-1
+         DO ji=2,jpi-1
             pc(ji,jj,1)=pn(ji-1+ji_off,jj-1+jj_off)
          ENDDO

Note: See TracChangeset for help on using the changeset viewer.

Download in other formats: