Changeset 8573 for trunk/NEMOGCM

Timestamp:

2017-09-28T10:31:26+02:00 (7 years ago)

Author:

cbricaud

Message:

Fix Ticket #1846 in trunk

File:

• trunk/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

@@ -1542 +1542 @@
       ALLOCATE( zlon(ni*nj) )       ;       zlon(:) = 0.
 
-      CALL dom_ngb( 180., 90., ix, iy, 'T' ) !  i-line that passes near the North Pole : Reference latitude (used in plots)
+      CALL dom_ngb( -168.53, 65.03, ix, iy, 'T' ) !  i-line that passes through Bering Strait: Reference latitude (used in plots)
       CALL iom_set_domain_attr("gznl", ni_glo=jpiglo, nj_glo=jpjglo, ibegin=nimpp+nldi-2, jbegin=njmpp+nldj-2, ni=ni, nj=nj)
       CALL iom_set_domain_attr("gznl", data_dim=2, data_ibegin = 1-nldi, data_ni = jpi, data_jbegin = 1-nldj, data_nj = jpj)