; ; @common ;--------------------------------------------------------- ; bornes de la grille ;---------------------------------------------------------- computegrid, .5, -89.5, 1, 1, 360, 180 tmask = replicate(1, jpi, jpj) ; jpt = 1 time = 0 ;------------------------------------------------------ ; lecture de la grille ;------------------------------------------------------ iodir = '/usr1/antiope/smasson/DATA/AMIP/' 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