1 |
Intermediate complexity atmospheric physics package developed by Franco Molteni. |
2 |
|
3 |
--------------------------------------------------------------------------- |
4 |
10-26-2002: From Franco Molteni SPEEDY model (auden:~jmc/mitgcm/speedy_code) : |
5 |
"Multi-decadal simulations using an atmospheric GCM with simplified |
6 |
physical parametrizations. I: Model formulation and climatology ", |
7 |
by F. Molteni, Climate Dynamics, in press (2002). |
8 |
http://www.ictp.trieste.it/~moltenif/speedy-doc.html |
9 |
--------------------------------------------------------------------------- |
10 |
|
11 |
original files extracted from the SPEEDY code (master/ver23) : |
12 |
|
13 |
lrwxrwxrwx 1 jmc 16 Oct 26 14:56 atparam.h -> par_horres_t30.h |
14 |
lrwxrwxrwx 1 jmc 12 Oct 26 14:57 atparam1.h -> par_verres.h |
15 |
-rw-r----- 1 jmc 1498 Mar 8 2001 cls_inphys.h |
16 |
-rw-r----- 1 jmc 640 Mar 8 2001 com_cnvcon.h |
17 |
-rw-r----- 1 jmc 938 Mar 8 2001 com_forcing.h |
18 |
-rw-r----- 1 jmc 573 Mar 8 2001 com_forcon.h |
19 |
-rw-r----- 1 jmc 525 Mar 8 2001 com_lflags.h |
20 |
-rw-r----- 1 jmc 321 Mar 8 2001 com_lsccon.h |
21 |
-rw-r----- 1 jmc 1071 Mar 8 2001 com_physcon.h |
22 |
-rw-r----- 1 jmc 3197 Mar 8 2001 com_physvar.h |
23 |
-rw-r----- 1 jmc 2771 Mar 8 2001 com_radcon.h |
24 |
-rw-r----- 1 jmc 1361 Mar 8 2001 com_sflcon.h |
25 |
-rw-r----- 1 jmc 513 Mar 8 2001 com_vdicon.h |
26 |
-rw-r----- 1 jmc 2197 Mar 8 2001 ini_inphys.f |
27 |
-rw-r----- 1 jmc 249 Mar 8 2001 par_horres_t30.h |
28 |
-rw-r----- 1 jmc 97 Mar 8 2001 par_verres.h |
29 |
-rw-r----- 1 jmc 5107 Mar 8 2001 phy_convmf.f |
30 |
-rw-r----- 1 jmc 6476 Mar 8 2001 phy_fordate.f |
31 |
-rw-r----- 1 jmc 2142 Mar 8 2001 phy_lscond.f |
32 |
-rw-r----- 1 jmc 7305 Mar 8 2001 phy_phypar.f |
33 |
-rw-r----- 1 jmc 15391 Mar 8 2001 phy_radiat.f |
34 |
-rw-r----- 1 jmc 2403 Mar 8 2001 phy_shtorh.f |
35 |
-rw-r----- 1 jmc 6941 May 2 2001 phy_suflux.f |
36 |
-rw-r----- 1 jmc 3825 Mar 8 2001 phy_vdifsc.f |
37 |
|
38 |
----------------- |
39 |
mv ini_inphys.f --> phy_inphys.f |
40 |
mv cls_inphys.h --> phy_const.h |
41 |
include "cls_inphys.h" with CPP #include "phy_const.h" in phy_inphys.F |
42 |
|
43 |
phy_phypar.f --> phy_driver.F |
44 |
|
45 |
* from Sigma to P : |
46 |
change loop [DO K=1,NLEV --> DO K=1,kGrd(J) ] ; |
47 |
SIG & DSIG : *PSG or /PSG where necessary |
48 |
* rewrite stability condition using Pot.Temp. (phy_convmf.F phy_vdifsc.F) |
49 |
* U,V_Stress computed in Dynamics directly on C-grid ; and DRAG is |
50 |
computed in SUFLUX as a function of square surface wind speed (VsurfSq). |
51 |
|
52 |
* split com_radcom.h in 2 files: com_radcom.h & com_radvar.h |
53 |
* take arrays with horizontal index out off com_physcon.h & com_sflcon.h |
54 |
and put them into AIM_GRID.h |
55 |
|
56 |
* low level physics S/R : phy_convmf.F phy_radiat.F phy_suflux.F |
57 |
phy_lscond.F phy_shtorh.F phy_vdifsc.F |
58 |
no longer use common blocks for grid dependent (2D,3D) variables. |
59 |
instead, 2D & 3D arrays are passed as argument only. |
60 |
|
61 |
--------------------------------------------------------------------------- |