/[lmdze]/trunk/Scripts/phys_grid.jnl
ViewVC logotype

Contents of /trunk/Scripts/phys_grid.jnl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 7 - (show annotations)
Mon Mar 31 12:24:17 2008 UTC (16 years, 1 month ago) by guez
File size: 777 byte(s)
This revision is not in working order. Pending some moving of files.

Important changes. In the program "etat0_lim": ozone coefficients from
Mobidic are regridded in time instead of pressure ; consequences in
"etat0". In the program "gcm", ozone coefficients from Mobidic are
read once per day only for the current day and regridded in pressure ;
consequences in "o3_chem_m", "regr_pr_coefoz", "phytrac" and
"regr_pr_comb_coefoz_m".

NetCDF95 is a library and does not export NetCDF.

New variables "nag_gl_options", "nag_fcalls_options" and
"nag_cross_options" in "nag_tools.mk".

"check_coefoz.jnl" rewritten entirely for new version of
"coefoz_LMDZ.nc".

Target "obj_etat0_lim" moved from "GNUmakefile" to "nag_rules.mk".

Added some "intent" attributes in "calfis", "clmain", "clqh",
"cltrac", "cltracrn", "cvltr", "ini_undefSTD", "moy_undefSTD",
"nflxtr", "phystokenc", "phytrac", "readsulfate", "readsulfate_preind"
and "undefSTD".

In "dynetat0", "dynredem0" and "gcm", "phis" has rank 2 instead of
1. "phis" has assumed shape in "dynredem0".

Added module containing "dynredem0". Changed some calls with NetCDF
Fortran 77 interface to calls with NetCDF95 interface.

Replaced calls to "ssum" by calls to "sum" in "inigeom".

In "make.sh", new option "-c" to change compiler.

In "aaam_bud", argument "rjour" deleted.

In "physiq": renamed some variables; deleted variable "xjour".

In "phytrac": renamed some variables; new argument "lmt_pas".

1 ! This is a script for Ferret.
2
3 ! This script visualizes data from the file "limit.nc" or
4 ! "startphy.nc".
5 ! It reshapes NetCDF variables from the "physics" grid to the "dynamics" grid.
6
7 ! Reset everything:
8 cancel data_set/all
9 CANCEL GRID
10 cancel viewport
11 CANCEL EXPRESSION
12 CANCEL LIST/ALL
13 CANCEL MEMORY/all
14 CANCEL SYMBOL/ALL
15 CANCEL REGION/all
16 CANCEL VARIABLE/ALL
17 cancel axis/all
18 pplus/reset
19 cancel window/all
20 set window/new
21
22 use limit
23 let iim = 32
24 let klon = `FOCE, RETURN=IEND`
25 let jjm = (klon - 2) / iim + 1
26 define axis/x=1:`iim`:1 long_index
27 define axis/y=1:`jjm-1`:1 lat_index
28 let dyn_grid= x[gx=long_index] + y[gy=lat_index]
29 use startphy
30 set region/l=1/i=2:`klon-1`
31 shade reshape(sst[d=1], dyn_grid), reshape(longitude, dyn_grid), \
32 reshape(latitude, dyn_grid)
33 go land

  ViewVC Help
Powered by ViewVC 1.1.21