; domdef, 270,285,-10,0
; plt, a.array, /desstrich, colortrich = 50, petit = [1, 2, 1], /por
; tracegrille, colortri = 150
; plt, a.array, /notri, petit = [1, 2, 2], /noerase
; tracegrille, colortri = 150
;
;
domdef, 20,50,30,50
lct, 39
palit,  .2
plt, a.array,/land,/cont_nofill, nite = 1
lct, 39
tracegrille,color=60
vargrid='U'
tracegrille,color=20
vargrid='T'
tracecote,cont_thick=3