Changeset 7750


Ignore:
Timestamp:
2017-03-01T16:29:47+01:00 (4 years ago)
Author:
mathiot
Message:

change the i-line used for diaptr to avoid land processor (now across Bering Strait)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

    r7179 r7750  
    15391539      ALLOCATE( zlon(ni*nj) )       ;       zlon(:) = 0. 
    15401540 
    1541       CALL dom_ngb( 180., 90., ix, iy, 'T' ) !  i-line that passes near the North Pole : Reference latitude (used in plots) 
     1541      CALL dom_ngb( -168.7, 65.6, ix, iy, 'T' ) !  i-line that passes across Bering strait to avoid land processor (used in plots) 
    15421542#if ! defined key_xios2 
    15431543      CALL iom_set_domain_attr("gznl", ni_glo=jpiglo, nj_glo=jpjglo, ibegin=nimpp+nldi-1, jbegin=njmpp+nldj-1, ni=ni, nj=nj) 
Note: See TracChangeset for help on using the changeset viewer.