trunk/Scripts/check_regr.jnl

! This is a script for Ferret.

! This script compares a Mobidic field with the field regridded in
! latitude. The field regridded in latitude is read from a text
! file. The text file is exported from TotalView.

! 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 "Input_etat0_lim/Ozone/coefoz_v2_3.nc"
use "Results_etat0_lim/40/coefoz_LMDZ.nc"
define grid/z=r[d=1]/y=r[d=2] mob_regr_lat

file/variables="-,r_regr_lat"/grid=mob_regr_lat/skip=44/format=delimited/delimiters=" " "Results_etat0_lim/40/v_regr_lat.txt"

set region/j=1/l=1
pplus axlsze 0.15
plot/vlog/vlimits=.01:1000/symbol/line r[d=1]
plot/overlay/symbol/line r_regr_lat
1	! This is a script for Ferret.
2
3	! This script compares a Mobidic field with the field regridded in
4	! latitude. The field regridded in latitude is read from a text
5	! file. The text file is exported from TotalView.
6
7	! Reset everything:
8	cancel data_set/all
9	cancel axis/all
10	cancel viewport
11	CANCEL EXPRESSION
12	CANCEL GRID
13	CANCEL LIST/ALL
14	CANCEL MEMORY/all
15	CANCEL SYMBOL/ALL
16	CANCEL REGION/all
17	CANCEL VARIABLE/ALL
18	pplus/reset
19
20	use "Input_etat0_lim/Ozone/coefoz_v2_3.nc"
21	use "Results_etat0_lim/40/coefoz_LMDZ.nc"
22	define grid/z=r[d=1]/y=r[d=2] mob_regr_lat
23
24	file/variables="-,r_regr_lat"/grid=mob_regr_lat/skip=44/format=delimited/delimiters=" " "Results_etat0_lim/40/v_regr_lat.txt"
25
26	set region/j=1/l=1
27	pplus axlsze 0.15
28	plot/vlog/vlimits=.01:1000/symbol/line r[d=1]
29	plot/overlay/symbol/line r_regr_lat