trunk/Scripts/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	! 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