;
;
@common
;---------------------------------------------------------
; bornes de la grille
;----------------------------------------------------------
;computegrid, 20.25, -90., 1.125, 1.125, 320, 161
computegrid, 0, -90., 1.125, 1.125, 320, 161
;
jpt = 1
time = 0
;------------------------------------------------------
; lecture de la grille
;------------------------------------------------------
iodir = '/usr1/antiope/smasson/DATA/'
tmask = ncdf_lec('mask.ecmwf.nc', iodir = iodir, var = 'mask')
;iodir = '/mnt/newdisk2/smasson/ECMWF_ANALYSE/'
key_shift = 0
key_stride = [1, 1, 1]
;-------------------------------------------------------------
domdef
;
key_periodique = 1
triangles = triangule()
;----------------------------------------------------------
; bornes pour la lecture des donnees
;----------------------------------------------------------
jpidta = jpiglo
jpjdta = jpjglo
jpkdta = jpkglo
ixmindta = 0
ixmaxdta = jpidta-1
iymindta = 0
iymaxdta = jpjdta-1
izmindta = 0
izmaxdta = jpkdta-1