| 1 | ; docformat = 'rst' |
|---|
| 2 | ;+ |
|---|
| 3 | ; |
|---|
| 4 | ; plot figure 8 of paper1 |
|---|
| 5 | ; |
|---|
| 6 | ; :Categories: PNG hoevmuller VARAMMA |
|---|
| 7 | ; |
|---|
| 8 | ; :Uses: |
|---|
| 9 | ; hovmuller.pro_ |
|---|
| 10 | ; forout.pro_ |
|---|
| 11 | ; |
|---|
| 12 | ; .. _hovmuller.pro: hovmuller.pro.html |
|---|
| 13 | ; .. _forout.pro: forout.pro.html |
|---|
| 14 | ; |
|---|
| 15 | ; :Restrictions: |
|---|
| 16 | ; - Requires SAXO |
|---|
| 17 | ; |
|---|
| 18 | ; :Pre: |
|---|
| 19 | ; varamma_profile.sh_ |
|---|
| 20 | ; |
|---|
| 21 | ; .. _varamma_profile.sh: varamma_profile.sh.html |
|---|
| 22 | ; |
|---|
| 23 | ; for AMSU dataset be sure to have *cx*\ ``.an``\ *yyyy*\ ``.nc`` |
|---|
| 24 | ; in the directory defined in ${VARAMMA_ID}/ |
|---|
| 25 | ; |
|---|
| 26 | ; :Post: |
|---|
| 27 | ; varamma_profile.sh_ |
|---|
| 28 | ; |
|---|
| 29 | ; :Todo: |
|---|
| 30 | ; |
|---|
| 31 | ; ++ different min et max pour chaque plot ! |
|---|
| 32 | ; |
|---|
| 33 | ; ++ write a) b) c) d) near each plot |
|---|
| 34 | ; |
|---|
| 35 | ; :Examples: |
|---|
| 36 | ; |
|---|
| 37 | ; To produce a PNG file : |
|---|
| 38 | ; :: |
|---|
| 39 | ; |
|---|
| 40 | ; IDL> figure08 |
|---|
| 41 | ; |
|---|
| 42 | ; :History: |
|---|
| 43 | ; |
|---|
| 44 | ; - fplod 2008-12-23T15:47:59Z aedon.locean-ipsl.upmc.fr (Darwin) |
|---|
| 45 | ; |
|---|
| 46 | ; * add ubox keywords required by hovmuller.pro |
|---|
| 47 | ; |
|---|
| 48 | ; - fplod 2008-08-13T08:38:52Z aedon.locean-ipsl.upmc.fr (Darwin) |
|---|
| 49 | ; |
|---|
| 50 | ; * change hovmuller_latitude to hovmuller |
|---|
| 51 | ; and the colling sequence |
|---|
| 52 | ; |
|---|
| 53 | ; - fplod 2008-08-12T15:09:51Z aedon.locean-ipsl.upmc.fr (Darwin) |
|---|
| 54 | ; |
|---|
| 55 | ; * more concrete action ... |
|---|
| 56 | ; |
|---|
| 57 | ; - fplod 2008-08-11T15:41:20Z aedon.locean-ipsl.upmc.fr (Darwin) |
|---|
| 58 | ; |
|---|
| 59 | ; * creation of header not yet ok, just the idea |
|---|
| 60 | ; |
|---|
| 61 | ;- |
|---|
| 62 | pro figure08, _EXTRA=extra |
|---|
| 63 | ; |
|---|
| 64 | compile_opt idl2, strictarrsubs |
|---|
| 65 | ; |
|---|
| 66 | ifigure=8 |
|---|
| 67 | ; |
|---|
| 68 | fullfilename_out=forout('figure' + string(ifigure,format='(I2.2)')+ '.png', _EXTRA=extra) |
|---|
| 69 | IF (fullfilename_out EQ -1) THEN BEGIN |
|---|
| 70 | RETURN |
|---|
| 71 | ENDIF |
|---|
| 72 | ; |
|---|
| 73 | hovmuller, 'AMSU', 'a4', 2006L, axe='latitude', ubox=[-30.,+40.,-30.,45.], int=1.5, small=[2,2,1],/nosave,/nocolorbar |
|---|
| 74 | hovmuller, 'AMSU', 'a5', 2006L, axe='latitude', ubox=[-30.,+40.,-30.,45.], int=1., small=[2,2,2],/nosave,/nocolorbar,/noerase |
|---|
| 75 | hovmuller, 'AMSU', 'b5', 2006L, axe='latitude', ubox=[-30.,+40.,-30.,45.], int=3., small=[2,2,3],/nosave,/noerase |
|---|
| 76 | hovmuller, 'AMSU', 'b3', 2006L, axe='latitude', ubox=[-30.,+40.,-30.,45.], int=3., small=[2,2,4],/nosave,/noerase |
|---|
| 77 | ; |
|---|
| 78 | saveimage, fullfilename_out,/png |
|---|
| 79 | ; |
|---|
| 80 | end |
|---|
