;
@common
@common
@common
;---------------------------------------------------------
; boundaries of the read grid regarding to the original grid
;----------------------------------------------------------
ixminmesh  =1
ixmaxmesh  =180
;
iyminmesh  =0
iymaxmesh  =147
;
izminmesh  =-1
izmaxmesh  =-1
;
jpt = 1
time = 0
;------------------------------------------------------
; read the grid
;------------------------------------------------------
key_stride = [2, 2, 1]
ncdf_meshread, 'micromeshmaskORCA2.nc' $
               , glamboundary = [20, 380], /lookalldir
;-------------------------------------------------------------
domdef
;
triangles = triangule()
;----------------------------------------------------------
; boundaries of the data regarding to the original grid
;----------------------------------------------------------
jpidta = jpiglo
jpjdta = jpjglo
jpkdta = jpkglo
ixmindta = 0
ixmaxdta = jpidta-1
iymindta = 0
iymaxdta = jpjdta-1
izmindta = 0
izmaxdta = jpkdta-1
;----------------------------------------------------------