UPP (develop)
•All Data Structures Files Functions Variables Modules Pages
VRBLS3D_mod.f
Go to the documentation of this file.
1
15 module vrbls3d
16!- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
17 implicit none
18!
19
20 real, allocatable :: uh(:,:,:) &
21 ,vh(:,:,:) &
22 ,wh(:,:,:) &
23 ,u(:,:,:) &
24 ,v(:,:,:) &
25 ,t(:,:,:) &
26 ,q(:,:,:) &
27 ,cwm(:,:,:) &
28 ,q2(:,:,:) &
29 ,pmid(:,:,:) &
30 ,pmidv(:,:,:) &
31 ,pint(:,:,:) &
32 ,alpint(:,:,:) &
33 ,zmid(:,:,:) &
34 ,zint(:,:,:) &
35 ,omga(:,:,:) &
36 ,t_adj(:,:,:) &
37 ,f_ice(:,:,:) &
38 ,f_rain(:,:,:) &
39 ,f_rimef(:,:,:) &
40 ,qqw(:,:,:) &
41 ,qqi(:,:,:) &
42 ,qqr(:,:,:) &
43 ,qqs(:,:,:) &
44 ,qqg(:,:,:) &
45 ,qqh(:,:,:) &
46 ,qqnw(:,:,:) &
47 ,qqni(:,:,:) &
48 ,qqnr(:,:,:) &
49 ,qc_bl(:,:,:) &
50 ,qrimef(:,:,:) &
51 ,cfr(:,:,:) &
52 ,dbz(:,:,:) &
53 ,dbzr(:,:,:) &
54 ,dbzi(:,:,:) &
55 ,dbzc(:,:,:) &
56 ,ttnd(:,:,:) &
57 ,rswtt(:,:,:) &
58 ,rlwtt(:,:,:) &
59 ,ref_10cm(:,:,:) &
60 ,exch_h(:,:,:) &
61 ,train(:,:,:) &
62 ,tcucn(:,:,:) &
63 ,el_pbl(:,:,:) &
64 ,mcvg(:,:,:) &
65 ,extcof55(:,:,:) &
66 ,nlice(:,:,:) &
67 ,cfr_raw(:,:,:) &
69 ,nrain(:,:,:) &
70 ,effri(:,:,:) &
71 ,effrl(:,:,:) &
72 ,effrs(:,:,:) &
73 ,radius_cloud(:,:,:) &
74 ,radius_ice(:,:,:) &
75 ,radius_snow(:,:,:) &
76! KRS Add HWRF fields
77 ,refl_10cm(:,:,:) &
78! Add GFS fields
79 ,o3(:,:,:) &
80 ,o(:,:,:) &
81 ,o2(:,:,:) &
82! Add GFS D3D fields
83 ,vdifftt(:,:,:) &
84 ,tcucns(:,:,:) &
85 ,vdiffmois(:,:,:) &
86 ,dconvmois(:,:,:) &
87 ,sconvmois(:,:,:) &
88 ,nradtt(:,:,:) &
89 ,o3vdiff(:,:,:) &
90 ,o3prod(:,:,:) &
91 ,o3tndy(:,:,:) &
92 ,mwpv(:,:,:) &
93 ,unknown(:,:,:) &
94 ,vdiffzacce(:,:,:) &
95 ,zgdrag(:,:,:) &
96 ,cnvctummixing(:,:,:) &
97 ,vdiffmacce(:,:,:) &
98 ,mgdrag(:,:,:) &
99 ,cnvctvmmixing(:,:,:) &
100 ,ncnvctcfrac(:,:,:) &
101 ,cnvctumflx(:,:,:) &
102 ,cnvctdmflx(:,:,:) &
103 ,cnvctdetmflx(:,:,:) &
104 ,cnvctzgdrag(:,:,:) &
105 ,cnvctmgdrag(:,:,:) &
106 ,qqnwfa(:,:,:) &
107 ,qqnifa(:,:,:) &
108 ,taod5503d(:,:,:) &
109 ,aextc55(:,:,:) &
110!
111! Add aerosol optical properties for GOCART (NGAC)
112 ,ext(:,:,:) &
113 ,asy(:,:,:) &
114 ,ssa(:,:,:) &
115 ,sca(:,:,:) &
116! Add aerosol diagnosis fields for GOCART (NGAC)
117 ,duem(:,:,:) &
118 ,dusd(:,:,:) &
119 ,dudp(:,:,:) &
120 ,duwt(:,:,:) &
121 ,dusv(:,:,:) &
122 ,sssv(:,:,:) &
123 ,suem(:,:,:) &
124 ,susd(:,:,:) &
125 ,sudp(:,:,:) &
126 ,suwt(:,:,:) &
127 ,ssem(:,:,:) &
128 ,sssd(:,:,:) &
129 ,ssdp(:,:,:) &
130 ,sswt(:,:,:) &
131 ,ocem(:,:,:) &
132 ,ocsd(:,:,:) &
133 ,ocdp(:,:,:) &
134 ,ocwt(:,:,:) &
135 ,ocsv(:,:,:) &
136 ,bcsv(:,:,:) &
137 ,bcem(:,:,:) &
138 ,bcsd(:,:,:) &
139 ,bcdp(:,:,:) &
140 ,bcwt(:,:,:) &
141! Add air density and thickness for GOCART (NGAC)
142 ,dpres(:,:,:) &
143 ,rhomid(:,:,:) &
144
145! Add NCAR GFIP ICING
146 ,icing_gfip(:,:,:) &
147 ,icing_gfis(:,:,:) &
148! Add NCAR GTG turbulence
149 ,catedr(:,:,:) &
150 ,mwt(:,:,:) &
151 ,gtg(:,:,:) &
152 ,cit(:,:,:) &
153! AQF
154 ,avgozcon(:,:,:) &
155 ,avgpmtf(:,:,:)
156
157 end module vrbls3d