Changeset 15162


Ignore:
Timestamp:
2021-07-30T17:05:27+02:00 (3 months ago)
Author:
jchanut
Message:

#2638, fixes bathymetry interpolation with even refinement factors

File:
1 edited

Legend:

Unmodified
Added
Removed
  • utils/tools/DOMAINcfg/src/dombat.F90

    r14623 r15162  
    160160            j_min = MAXLOC(lat_new1D,mask = lat_new1D < MINVAL(gphif)-zdel) 
    161161            j_max = MINLOC(lat_new1D,mask = lat_new1D > MAXVAL(gphif)+zdel) 
     162 
     163            ! jc: to prevent from issues with grids that exactly pass through 
     164            ! longitude= +-180:  
     165            IF (i_max(1)==0) i_max(1)=ddims(1) 
    162166          
    163167            i_min(1)=max(i_min(1),1) 
Note: See TracChangeset for help on using the changeset viewer.