lmdze/trunk/p_net_sigma.jnl

! This is a script for Ferret.

! This script reads a variable defined on sigma layers and creates a
! graph of the variable as a function of latitude and log(pressure).

! Reset everything:
cancel data_set/all
cancel axis/all
cancel viewport
CANCEL EXPRESSION
CANCEL GRID
CANCEL LIST/ALL
CANCEL MEMORY/all
CANCEL SYMBOL/ALL
CANCEL REGION/all
CANCEL VARIABLE/ALL
pplus/reset

use coefoz_LMDZ
let/title="latitude"/unit="degrees_north" ygg = y[g=p_net]
set region/i=1 ! for "p_net" and "pls" (useless for "ygg")
shade/vlimits=3:-2:-1/lev=3/set_up p_net[l=9], ygg, log(pls)
pplus ylab "log(pressure/(1 hPa))"
pplus shade
1	guez	3	! This is a script for Ferret.
2
3			! This script reads a variable defined on sigma layers and creates a
4			! graph of the variable as a function of latitude and log(pressure).
5
6			! Reset everything:
7			cancel data_set/all
8			cancel axis/all
9			cancel viewport
10			CANCEL EXPRESSION
11			CANCEL GRID
12			CANCEL LIST/ALL
13			CANCEL MEMORY/all
14			CANCEL SYMBOL/ALL
15			CANCEL REGION/all
16			CANCEL VARIABLE/ALL
17			pplus/reset
18
19			use coefoz_LMDZ
20			let/title="latitude"/unit="degrees_north" ygg = y[g=p_net]
21			set region/i=1 ! for "p_net" and "pls" (useless for "ygg")
22			shade/vlimits=3:-2:-1/lev=3/set_up p_net[l=9], ygg, log(pls)
23			pplus ylab "log(pressure/(1 hPa))"
24			pplus shade