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	guez	3	! 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