;
@cm_4mesh
@cm_4cal
@cm_4data
;---------------------------------------------------------
; 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 = [1, 1, 1]
ncdf_meshread, 'micromeshmaskORCA2.nc', glamboundary = [20, 380] $
              , iodirectory = [iodir, homedir, !path], /recursive
;-------------------------------------------------------------
domdef
;
triangles_list = 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
;----------------------------------------------------------
@updateold