; ; @common ;--------------------------------------------------------- ; bornes de la grille ;---------------------------------------------------------- computegrid, 1.25, -88.75, 2.5, 2.5, 144, 72 tmask = replicate(1, jpi, jpj) ; jpt = 1 time = 0 ;------------------------------------------------------ ; lecture de la grille ;------------------------------------------------------ iodir = '/mnt/newdisk1/smasson/XIE_ARKIN/' iodir = '/usr1/antiope/smasson/DATA/' key_shift = 0 key_stride = [1, 1, 1] ;------------------------------------------------------------- domdef ; key_periodique = 1 triangles = -1 ;---------------------------------------------------------- ; 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