Changeset 8641


Ignore:
Timestamp:
2017-10-19T17:18:43+02:00 (3 years ago)
Author:
jchanut
Message:

Fixes ticket #1760

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/TOOLS/NESTING/src/agrif_create_bathy.f90

    r2455 r8641  
    5454  REAL*8, DIMENSION(:,:),POINTER :: save_gdepw,rx,ry,maskedtopo 
    5555  REAL*8  :: Cell_lonmin,Cell_lonmax,Cell_latmin,Cell_latmax,wghts 
    56   LOGICAL :: Pacifique 
     56  LOGICAL :: Pacifique=.FALSE. 
    5757  INTEGER :: boundary,xpos,ypos,iimin,iimax,jjmax,jjmin 
    5858  INTEGER :: nbloops,nxhr,nyhr,ji,jj,nbiter,nbloopmax 
Note: See TracChangeset for help on using the changeset viewer.