1 |
jscott |
1.1 |
C |
2 |
|
|
C RADCOM: CONTROL/INPUT PARAMETERS |
3 |
|
|
C |
4 |
|
|
COMMON/RADCOM/VADATA(11,4,3),DGLAT(46),DGLON(72),TMINSR,FULGAS(18) |
5 |
|
|
A ,FRACSL,RATQSL,FOGTSL,PTLISO,TLGRAD,TKCICE,FGOLDU(18) |
6 |
|
|
B ,FLONO3,FRAYLE,FCLDTR,FCLDSR,FALGAE,FMARCL,FEMTRA(6) |
7 |
|
|
C ,WETTRA,WETSRA,DMOICE,DMLICE,LICETK,NTRCE,FZASRA(6) |
8 |
|
|
D ,ID5(5),ITR(4),IMG(2),ILG(2),LAPGAS,KWVCON,NORMS0,NV |
9 |
|
|
E ,KEEPRH,KEEPAL,ISOSCT,IHGSCT,KFRACC,KGASSR,KAERSR |
10 |
|
|
F ,MARCLD,LAYTOP,LMR,LMRP,JMLAT,IMLON,KFORCE,LASTVC |
11 |
|
|
C |
12 |
|
|
C BASIC RADCOM INPUT DATA |
13 |
|
|
C |
14 |
|
|
G ,PLE(40),HLB(40),TLB(40),TLT(40),TL(40),U0GAS(40,9) |
15 |
|
|
H ,ULGAS(40,9),TRACER(40,4),RTAU(40),QL(40),RHL(40) |
16 |
|
|
I ,POCEAN,PEARTH,POICE,PLICE,AGESN,SNOWE,SNOWOI,SNOWLI |
17 |
|
|
J ,TGO,TGE,TGOI,TGLI,TS,WS,WEARTH,ZOICE,FSPARE(200) |
18 |
|
|
K ,S0,COSZN,PVT(11),BXA(153),SRBXAL(15,2),FRC(5),LUXGAS |
19 |
|
|
L ,JYEARR,JDAYR,JLAT,ILON,MEANAL,KALVIS,ISPARE(25),SGPS |
20 |
|
|
C |
21 |
|
|
C BASIC RADCOM OUTPUT DATA |
22 |
|
|
C |
23 |
|
|
M ,TRDFLB(40),TRUFLB(40),TRNFLB(40),TRFCRL(40),TRSLCR |
24 |
|
|
N ,SRDFLB(40),SRUFLB(40),SRNFLB(40),SRFHRL(40),SRSLHR |
25 |
|
|
O ,SRIVIS,SROVIS,PLAVIS,SRINIR,SRONIR,PLANIR,SRXATM(4) |
26 |
|
|
P ,SRDVIS,SRUVIS,ALBVIS,SRDNIR,SRUNIR,ALBNIR,FSRNFG(4) |
27 |
|
|
Q ,SRTVIS,SRRVIS,SRAVIS,SRTNIR,SRRNIR,SRANIR,FTRUFG(4) |
28 |
|
|
R ,TRDFGW,TRUFGW,TRUFTW,BTEMPW,TRDFSL,TRUFSL,DTRUFG(4) |
29 |
|
|
S ,TRSLTS,TRSLTG,TRSLWV,TRSLBS,TTRUFG,LBOTCL,LTOPCL |