Last change
on this file was
3684,
checked in by idelkadi, 5 years ago
|
Repository under svn of a first version of Multiatlas diagnostics for LMDZ. This version is adapted to be able to run a LMDZ multiatlas on an individual account on the ciclad machine of the IPSL. In this version, the parts to be modified are identified so as to subsequently adapt it to other machines.
This version is still under development.
|
File size:
1.0 KB
|
Rev | Line | |
---|
[3684] | 1 | use tas.nc |
---|
| 2 | use tmp.nc |
---|
| 3 | let lat=y*(pourc_oce*0+1) |
---|
| 4 | let lon=x*(pourc_oce*0+1) |
---|
| 5 | reg/l=1 |
---|
| 6 | ! shade un |
---|
| 7 | !let maskcircA=if ( abs(lat+55) lt 15 and pourc_oce gt 80 ) then 1 |
---|
| 8 | let maskcircA=if ( abs(lat+50) le 10 and pourc_oce gt 80 ) then 1 |
---|
| 9 | let maskoce=if ( pourc_oce gt 80 ) then 1 |
---|
| 10 | let maskter=if ( pourc_oce lt 20 ) then 1 |
---|
| 11 | let maskNH=if ( lat gt 0 ) then 1 |
---|
| 12 | let maskSH=if ( lat lt 0 ) then 1 |
---|
| 13 | let maskNAtl=if ( lat ge 45 and lat le 60 and lon ge 310 and lon le 350 ) then 1 |
---|
| 14 | let maskArct=if ( lat ge 70 and pourc_oce ge 95 ) then 1 |
---|
| 15 | let maskSibe=if ( lat ge 40 and lon ge 50 and lon le 180 and pourc_oce le 5 ) then 1 |
---|
| 16 | let maskUSA=if ( lat ge 30 and lat le 55 and lon ge 250 and lon le 310 and pourc_oce le 5 ) then 1 |
---|
| 17 | save/clobber/file=maskcircA.nc maskcircA |
---|
| 18 | save/clobber/file=maskoce.nc maskoce |
---|
| 19 | save/clobber/file=maskter.nc maskter |
---|
| 20 | save/clobber/file=maskNH.nc maskNH |
---|
| 21 | save/clobber/file=maskSH.nc maskSH |
---|
| 22 | save/clobber/file=maskNAtl.nc maskNAtl |
---|
| 23 | save/clobber/file=maskArct.nc maskArct |
---|
| 24 | save/clobber/file=maskSibe.nc maskSibe |
---|
| 25 | save/clobber/file=maskUSA.nc maskUSA |
---|
| 26 | quit |
---|
Note: See
TracBrowser
for help on using the repository browser.