/[MITgcm]/MITgcm_contrib/jscott/igsm/inc/CLM.COM
ViewVC logotype

Annotation of /MITgcm_contrib/jscott/igsm/inc/CLM.COM

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (hide annotations) (download)
Fri Aug 11 19:33:30 2006 UTC (18 years, 11 months ago) by jscott
Branch: MAIN
atm2d package

1 jscott 1.1 parameter(lsmlon=1,lsmlat=N_LAT,nlevsoi=10)
2     common/mit2din/ ps4clm (lsmlon,lsmlat),pcpl4clm (lsmlon,lsmlat),
3     & pcpc4clm (lsmlon,lsmlat),tpr4clm (lsmlon,lsmlat),
4     & tsl4clm (lsmlon,lsmlat),
5     & qs4clm (lsmlon,lsmlat),ws4clm (lsmlon,lsmlat)
6     & ,us4clm (lsmlon,lsmlat),vs4clm (lsmlon,lsmlat),
7     & dsw4clm (lsmlon,lsmlat),
8     & dlw4clm (lsmlon,lsmlat),pco24clm (lsmlon,lsmlat)
9     & ,swinr4clm (lsmlon,lsmlat),swvis4clm (lsmlon,lsmlat)
10    
11     !
12     ! MIT 2D COMMON BLOCK
13     !
14     real lhfclm,lwuclm
15     common/clm4mit/ lhfclm(lsmlon,lsmlat),
16     & shfclm(lsmlon,lsmlat),
17     & tauxclm(lsmlon,lsmlat),
18     & tauyclm(lsmlon,lsmlat),
19     & asdirclm(lsmlon,lsmlat),
20     & aldirclm(lsmlon,lsmlat),
21     & asdifclm(lsmlon,lsmlat),
22     & aldifclm(lsmlon,lsmlat),
23     & sroclm(lsmlon,lsmlat),
24     & ssrclm(lsmlon,lsmlat),
25     & glrclm(lsmlon,lsmlat),
26     & vetclm(lsmlon,lsmlat),
27     & sevclm(lsmlon,lsmlat),
28     & cevclm(lsmlon,lsmlat),
29     & lwuclm(lsmlon,lsmlat),
30     & tref2mclm(lsmlon,lsmlat),
31     & tflxclm(lsmlon,lsmlat),
32     & tgndclm(lsmlon,lsmlat),
33     & snwdclm(lsmlon,lsmlat),
34     & snwcclm(lsmlon,lsmlat),
35     & tsoiclm(lsmlon,lsmlat,nlevsoi),
36     & h2oiclm(lsmlon,lsmlat,nlevsoi),
37     & h2olclm(lsmlon,lsmlat,nlevsoi)
38    
39     common/clm4r95/ ncallclm
40     ! common/prratio/prlnd2total(lsmlat,12)

  ViewVC Help
Powered by ViewVC 1.1.22