source: LMDZ5/branches/testing/libf/phymar/suecaebc_07.F90 @ 4674

Last change on this file since 4674 was 2160, checked in by Laurent Fairhead, 10 years ago

Merged trunk changes -r2070:2158 into testing branch. Compilation problems introduced by revision r2155 have been corrected by hand

File size: 52.2 KB
Line 
1SUBROUTINE SUECAEBC_07
2
3!**   OPTICAL THICKNESS OF BLACK CARBON AEROSOLS (URBAN/FOREST FIRE ORIGIN)
4!                                                 July
5
6!     PURPOSE.
7!     --------
8
9!**   INTERFACE.
10!     ----------
11!        CALL *SUECAEBC* FROM *SUECRAD*
12
13!        EXPLICIT ARGUMENTS :
14!        --------------------
15!     ==== INPUTS ===
16!     ==== OUTPUTS ===
17
18!        IMPLICIT ARGUMENTS :   NONE
19!        --------------------
20
21!     METHOD.
22!     -------
23
24
25!     EXTERNALS.
26!     ----------
27
28!          NONE
29
30!     REFERENCE.
31!     ----------
32
33!        SEE RADIATION'S PART OF THE MODEL'S DOCUMENTATION AND
34!        ECMWF RESEARCH DEPARTMENT DOCUMENTATION OF THE "I.F.S"
35
36!     AUTHOR.
37!     -------
38!     J.-J. MORCRETTE  E.C.M.W.F.    98/12/21
39
40!     MODIFICATIONS.
41!     --------------
42!     H. GALLEE        L.G.G.E.      04/01/15:  split for the NEC SX5
43
44!-----------------------------------------------------------------------
45
46#include "tsmbkind.h"
47
48USE YOEAERC  , ONLY : RAERBC
49
50
51IMPLICIT NONE
52
53
54!     -----------------------------------------------------------------
55
56!*       0.1   ARGUMENTS.
57!              ----------
58
59!     -----------------------------------------------------------------
60
61!*       0.2   LOCAL ARRAYS.
62!              -------------
63
64REAL_B :: ZAER(72,46,7:7)
65
66!     LOCAL INTEGER SCALARS
67INTEGER_M :: JI, JL, JM
68
69!     LOCAL REAL SCALARS
70REAL_B :: ZMAX, ZMIN
71
72!     ------------------------------------------------------------------
73
74!-- Tegen et al., 1997
75
76!-- Black Carbon Aerosol     month:  7 --- lat:  1  90.0
77ZAER (:, 1, 7) = (/&
78&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
79&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
80&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
81&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
82&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
83&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
84&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
85&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
86&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
87&.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,.135E-03_JPRB,&
88&.135E-03_JPRB,.135E-03_JPRB/)
89!-- Black Carbon Aerosol     month:  7 --- lat:  2  86.0
90ZAER (:, 2, 7) = (/&
91&.140E-03_JPRB,.140E-03_JPRB,.142E-03_JPRB,.143E-03_JPRB,.144E-03_JPRB,.145E-03_JPRB,.146E-03_JPRB,&
92&.146E-03_JPRB,.147E-03_JPRB,.147E-03_JPRB,.148E-03_JPRB,.148E-03_JPRB,.148E-03_JPRB,.148E-03_JPRB,&
93&.148E-03_JPRB,.148E-03_JPRB,.147E-03_JPRB,.147E-03_JPRB,.147E-03_JPRB,.146E-03_JPRB,.146E-03_JPRB,&
94&.146E-03_JPRB,.145E-03_JPRB,.144E-03_JPRB,.143E-03_JPRB,.143E-03_JPRB,.142E-03_JPRB,.141E-03_JPRB,&
95&.140E-03_JPRB,.139E-03_JPRB,.138E-03_JPRB,.137E-03_JPRB,.136E-03_JPRB,.135E-03_JPRB,.134E-03_JPRB,&
96&.133E-03_JPRB,.132E-03_JPRB,.130E-03_JPRB,.129E-03_JPRB,.128E-03_JPRB,.127E-03_JPRB,.126E-03_JPRB,&
97&.125E-03_JPRB,.125E-03_JPRB,.124E-03_JPRB,.124E-03_JPRB,.123E-03_JPRB,.123E-03_JPRB,.123E-03_JPRB,&
98&.123E-03_JPRB,.123E-03_JPRB,.123E-03_JPRB,.123E-03_JPRB,.123E-03_JPRB,.123E-03_JPRB,.124E-03_JPRB,&
99&.124E-03_JPRB,.125E-03_JPRB,.125E-03_JPRB,.126E-03_JPRB,.127E-03_JPRB,.128E-03_JPRB,.129E-03_JPRB,&
100&.130E-03_JPRB,.131E-03_JPRB,.133E-03_JPRB,.134E-03_JPRB,.135E-03_JPRB,.136E-03_JPRB,.137E-03_JPRB,&
101&.139E-03_JPRB,.140E-03_JPRB/)
102!-- Black Carbon Aerosol     month:  7 --- lat:  3  82.0
103ZAER (:, 3, 7) = (/&
104&.161E-03_JPRB,.161E-03_JPRB,.166E-03_JPRB,.169E-03_JPRB,.171E-03_JPRB,.175E-03_JPRB,.175E-03_JPRB,&
105&.176E-03_JPRB,.177E-03_JPRB,.176E-03_JPRB,.176E-03_JPRB,.175E-03_JPRB,.174E-03_JPRB,.173E-03_JPRB,&
106&.171E-03_JPRB,.170E-03_JPRB,.169E-03_JPRB,.168E-03_JPRB,.166E-03_JPRB,.166E-03_JPRB,.165E-03_JPRB,&
107&.164E-03_JPRB,.163E-03_JPRB,.162E-03_JPRB,.161E-03_JPRB,.160E-03_JPRB,.159E-03_JPRB,.157E-03_JPRB,&
108&.155E-03_JPRB,.154E-03_JPRB,.151E-03_JPRB,.148E-03_JPRB,.146E-03_JPRB,.142E-03_JPRB,.138E-03_JPRB,&
109&.136E-03_JPRB,.132E-03_JPRB,.128E-03_JPRB,.126E-03_JPRB,.123E-03_JPRB,.120E-03_JPRB,.119E-03_JPRB,&
110&.116E-03_JPRB,.114E-03_JPRB,.113E-03_JPRB,.112E-03_JPRB,.111E-03_JPRB,.111E-03_JPRB,.110E-03_JPRB,&
111&.110E-03_JPRB,.110E-03_JPRB,.110E-03_JPRB,.110E-03_JPRB,.111E-03_JPRB,.112E-03_JPRB,.113E-03_JPRB,&
112&.114E-03_JPRB,.115E-03_JPRB,.117E-03_JPRB,.119E-03_JPRB,.121E-03_JPRB,.124E-03_JPRB,.127E-03_JPRB,&
113&.129E-03_JPRB,.132E-03_JPRB,.137E-03_JPRB,.139E-03_JPRB,.143E-03_JPRB,.148E-03_JPRB,.151E-03_JPRB,&
114&.155E-03_JPRB,.161E-03_JPRB/)
115!-- Black Carbon Aerosol     month:  7 --- lat:  4  78.0
116ZAER (:, 4, 7) = (/&
117&.206E-03_JPRB,.207E-03_JPRB,.217E-03_JPRB,.221E-03_JPRB,.225E-03_JPRB,.228E-03_JPRB,.226E-03_JPRB,&
118&.225E-03_JPRB,.222E-03_JPRB,.217E-03_JPRB,.214E-03_JPRB,.209E-03_JPRB,.203E-03_JPRB,.200E-03_JPRB,&
119&.196E-03_JPRB,.191E-03_JPRB,.189E-03_JPRB,.186E-03_JPRB,.184E-03_JPRB,.183E-03_JPRB,.182E-03_JPRB,&
120&.182E-03_JPRB,.182E-03_JPRB,.182E-03_JPRB,.183E-03_JPRB,.183E-03_JPRB,.183E-03_JPRB,.183E-03_JPRB,&
121&.182E-03_JPRB,.180E-03_JPRB,.177E-03_JPRB,.173E-03_JPRB,.170E-03_JPRB,.163E-03_JPRB,.158E-03_JPRB,&
122&.153E-03_JPRB,.146E-03_JPRB,.139E-03_JPRB,.135E-03_JPRB,.131E-03_JPRB,.126E-03_JPRB,.123E-03_JPRB,&
123&.120E-03_JPRB,.117E-03_JPRB,.116E-03_JPRB,.115E-03_JPRB,.114E-03_JPRB,.114E-03_JPRB,.114E-03_JPRB,&
124&.113E-03_JPRB,.113E-03_JPRB,.114E-03_JPRB,.114E-03_JPRB,.114E-03_JPRB,.115E-03_JPRB,.116E-03_JPRB,&
125&.118E-03_JPRB,.119E-03_JPRB,.122E-03_JPRB,.125E-03_JPRB,.127E-03_JPRB,.131E-03_JPRB,.136E-03_JPRB,&
126&.140E-03_JPRB,.145E-03_JPRB,.153E-03_JPRB,.158E-03_JPRB,.165E-03_JPRB,.177E-03_JPRB,.184E-03_JPRB,&
127&.192E-03_JPRB,.206E-03_JPRB/)
128!-- Black Carbon Aerosol     month:  7 --- lat:  5  74.0
129ZAER (:, 5, 7) = (/&
130&.277E-03_JPRB,.278E-03_JPRB,.295E-03_JPRB,.298E-03_JPRB,.300E-03_JPRB,.292E-03_JPRB,.283E-03_JPRB,&
131&.275E-03_JPRB,.261E-03_JPRB,.250E-03_JPRB,.242E-03_JPRB,.230E-03_JPRB,.220E-03_JPRB,.213E-03_JPRB,&
132&.205E-03_JPRB,.199E-03_JPRB,.195E-03_JPRB,.191E-03_JPRB,.188E-03_JPRB,.188E-03_JPRB,.187E-03_JPRB,&
133&.188E-03_JPRB,.190E-03_JPRB,.192E-03_JPRB,.198E-03_JPRB,.201E-03_JPRB,.204E-03_JPRB,.209E-03_JPRB,&
134&.211E-03_JPRB,.212E-03_JPRB,.211E-03_JPRB,.208E-03_JPRB,.205E-03_JPRB,.198E-03_JPRB,.192E-03_JPRB,&
135&.186E-03_JPRB,.177E-03_JPRB,.168E-03_JPRB,.162E-03_JPRB,.155E-03_JPRB,.149E-03_JPRB,.146E-03_JPRB,&
136&.142E-03_JPRB,.140E-03_JPRB,.140E-03_JPRB,.139E-03_JPRB,.140E-03_JPRB,.140E-03_JPRB,.141E-03_JPRB,&
137&.141E-03_JPRB,.140E-03_JPRB,.140E-03_JPRB,.138E-03_JPRB,.137E-03_JPRB,.137E-03_JPRB,.137E-03_JPRB,&
138&.138E-03_JPRB,.139E-03_JPRB,.141E-03_JPRB,.144E-03_JPRB,.146E-03_JPRB,.149E-03_JPRB,.154E-03_JPRB,&
139&.158E-03_JPRB,.165E-03_JPRB,.177E-03_JPRB,.187E-03_JPRB,.199E-03_JPRB,.222E-03_JPRB,.237E-03_JPRB,&
140&.252E-03_JPRB,.277E-03_JPRB/)
141!-- Black Carbon Aerosol     month:  7 --- lat:  6  70.0
142ZAER (:, 6, 7) = (/&
143&.378E-03_JPRB,.379E-03_JPRB,.400E-03_JPRB,.394E-03_JPRB,.387E-03_JPRB,.353E-03_JPRB,.328E-03_JPRB,&
144&.308E-03_JPRB,.281E-03_JPRB,.264E-03_JPRB,.252E-03_JPRB,.235E-03_JPRB,.222E-03_JPRB,.214E-03_JPRB,&
145&.205E-03_JPRB,.199E-03_JPRB,.195E-03_JPRB,.192E-03_JPRB,.189E-03_JPRB,.188E-03_JPRB,.187E-03_JPRB,&
146&.188E-03_JPRB,.191E-03_JPRB,.193E-03_JPRB,.203E-03_JPRB,.210E-03_JPRB,.217E-03_JPRB,.231E-03_JPRB,&
147&.238E-03_JPRB,.243E-03_JPRB,.248E-03_JPRB,.248E-03_JPRB,.248E-03_JPRB,.246E-03_JPRB,.243E-03_JPRB,&
148&.240E-03_JPRB,.232E-03_JPRB,.221E-03_JPRB,.213E-03_JPRB,.202E-03_JPRB,.193E-03_JPRB,.189E-03_JPRB,&
149&.187E-03_JPRB,.189E-03_JPRB,.190E-03_JPRB,.192E-03_JPRB,.197E-03_JPRB,.199E-03_JPRB,.201E-03_JPRB,&
150&.201E-03_JPRB,.198E-03_JPRB,.195E-03_JPRB,.187E-03_JPRB,.183E-03_JPRB,.180E-03_JPRB,.176E-03_JPRB,&
151&.177E-03_JPRB,.177E-03_JPRB,.180E-03_JPRB,.181E-03_JPRB,.183E-03_JPRB,.184E-03_JPRB,.186E-03_JPRB,&
152&.189E-03_JPRB,.194E-03_JPRB,.208E-03_JPRB,.223E-03_JPRB,.244E-03_JPRB,.286E-03_JPRB,.311E-03_JPRB,&
153&.338E-03_JPRB,.377E-03_JPRB/)
154!-- Black Carbon Aerosol     month:  7 --- lat:  7  66.0
155ZAER (:, 7, 7) = (/&
156&.485E-03_JPRB,.486E-03_JPRB,.500E-03_JPRB,.481E-03_JPRB,.460E-03_JPRB,.400E-03_JPRB,.362E-03_JPRB,&
157&.333E-03_JPRB,.297E-03_JPRB,.276E-03_JPRB,.261E-03_JPRB,.241E-03_JPRB,.228E-03_JPRB,.220E-03_JPRB,&
158&.212E-03_JPRB,.208E-03_JPRB,.206E-03_JPRB,.203E-03_JPRB,.199E-03_JPRB,.197E-03_JPRB,.194E-03_JPRB,&
159&.192E-03_JPRB,.192E-03_JPRB,.193E-03_JPRB,.202E-03_JPRB,.211E-03_JPRB,.221E-03_JPRB,.244E-03_JPRB,&
160&.257E-03_JPRB,.269E-03_JPRB,.285E-03_JPRB,.293E-03_JPRB,.299E-03_JPRB,.307E-03_JPRB,.312E-03_JPRB,&
161&.314E-03_JPRB,.311E-03_JPRB,.297E-03_JPRB,.287E-03_JPRB,.273E-03_JPRB,.261E-03_JPRB,.259E-03_JPRB,&
162&.258E-03_JPRB,.265E-03_JPRB,.272E-03_JPRB,.279E-03_JPRB,.291E-03_JPRB,.298E-03_JPRB,.304E-03_JPRB,&
163&.303E-03_JPRB,.294E-03_JPRB,.284E-03_JPRB,.261E-03_JPRB,.251E-03_JPRB,.244E-03_JPRB,.240E-03_JPRB,&
164&.242E-03_JPRB,.246E-03_JPRB,.253E-03_JPRB,.258E-03_JPRB,.259E-03_JPRB,.257E-03_JPRB,.250E-03_JPRB,&
165&.247E-03_JPRB,.244E-03_JPRB,.253E-03_JPRB,.270E-03_JPRB,.295E-03_JPRB,.358E-03_JPRB,.396E-03_JPRB,&
166&.437E-03_JPRB,.484E-03_JPRB/)
167!-- Black Carbon Aerosol     month:  7 --- lat:  8  62.0
168ZAER (:, 8, 7) = (/&
169&.591E-03_JPRB,.592E-03_JPRB,.600E-03_JPRB,.568E-03_JPRB,.536E-03_JPRB,.467E-03_JPRB,.431E-03_JPRB,&
170&.402E-03_JPRB,.364E-03_JPRB,.335E-03_JPRB,.313E-03_JPRB,.285E-03_JPRB,.266E-03_JPRB,.255E-03_JPRB,&
171&.245E-03_JPRB,.238E-03_JPRB,.233E-03_JPRB,.227E-03_JPRB,.219E-03_JPRB,.215E-03_JPRB,.212E-03_JPRB,&
172&.207E-03_JPRB,.204E-03_JPRB,.201E-03_JPRB,.205E-03_JPRB,.216E-03_JPRB,.227E-03_JPRB,.258E-03_JPRB,&
173&.279E-03_JPRB,.297E-03_JPRB,.323E-03_JPRB,.336E-03_JPRB,.347E-03_JPRB,.369E-03_JPRB,.384E-03_JPRB,&
174&.389E-03_JPRB,.387E-03_JPRB,.373E-03_JPRB,.362E-03_JPRB,.348E-03_JPRB,.344E-03_JPRB,.348E-03_JPRB,&
175&.355E-03_JPRB,.367E-03_JPRB,.376E-03_JPRB,.385E-03_JPRB,.406E-03_JPRB,.417E-03_JPRB,.428E-03_JPRB,&
176&.418E-03_JPRB,.397E-03_JPRB,.377E-03_JPRB,.341E-03_JPRB,.329E-03_JPRB,.322E-03_JPRB,.323E-03_JPRB,&
177&.338E-03_JPRB,.352E-03_JPRB,.377E-03_JPRB,.387E-03_JPRB,.388E-03_JPRB,.378E-03_JPRB,.352E-03_JPRB,&
178&.334E-03_JPRB,.312E-03_JPRB,.305E-03_JPRB,.317E-03_JPRB,.340E-03_JPRB,.413E-03_JPRB,.467E-03_JPRB,&
179&.527E-03_JPRB,.589E-03_JPRB/)
180!-- Black Carbon Aerosol     month:  7 --- lat:  9  58.0
181ZAER (:, 9, 7) = (/&
182&.655E-03_JPRB,.655E-03_JPRB,.665E-03_JPRB,.640E-03_JPRB,.616E-03_JPRB,.567E-03_JPRB,.536E-03_JPRB,&
183&.512E-03_JPRB,.480E-03_JPRB,.454E-03_JPRB,.431E-03_JPRB,.394E-03_JPRB,.355E-03_JPRB,.331E-03_JPRB,&
184&.303E-03_JPRB,.278E-03_JPRB,.264E-03_JPRB,.249E-03_JPRB,.240E-03_JPRB,.237E-03_JPRB,.235E-03_JPRB,&
185&.233E-03_JPRB,.231E-03_JPRB,.230E-03_JPRB,.236E-03_JPRB,.252E-03_JPRB,.269E-03_JPRB,.312E-03_JPRB,&
186&.335E-03_JPRB,.355E-03_JPRB,.378E-03_JPRB,.388E-03_JPRB,.400E-03_JPRB,.431E-03_JPRB,.454E-03_JPRB,&
187&.462E-03_JPRB,.455E-03_JPRB,.442E-03_JPRB,.435E-03_JPRB,.428E-03_JPRB,.442E-03_JPRB,.458E-03_JPRB,&
188&.482E-03_JPRB,.504E-03_JPRB,.510E-03_JPRB,.513E-03_JPRB,.512E-03_JPRB,.509E-03_JPRB,.507E-03_JPRB,&
189&.476E-03_JPRB,.448E-03_JPRB,.421E-03_JPRB,.384E-03_JPRB,.378E-03_JPRB,.378E-03_JPRB,.399E-03_JPRB,&
190&.442E-03_JPRB,.477E-03_JPRB,.536E-03_JPRB,.546E-03_JPRB,.539E-03_JPRB,.505E-03_JPRB,.454E-03_JPRB,&
191&.424E-03_JPRB,.390E-03_JPRB,.376E-03_JPRB,.383E-03_JPRB,.399E-03_JPRB,.460E-03_JPRB,.513E-03_JPRB,&
192&.573E-03_JPRB,.652E-03_JPRB/)
193!-- Black Carbon Aerosol     month:  7 --- lat: 10  54.0
194ZAER (:,10, 7) = (/&
195&.690E-03_JPRB,.689E-03_JPRB,.679E-03_JPRB,.672E-03_JPRB,.664E-03_JPRB,.633E-03_JPRB,.589E-03_JPRB,&
196&.552E-03_JPRB,.501E-03_JPRB,.478E-03_JPRB,.463E-03_JPRB,.448E-03_JPRB,.420E-03_JPRB,.397E-03_JPRB,&
197&.363E-03_JPRB,.318E-03_JPRB,.295E-03_JPRB,.270E-03_JPRB,.261E-03_JPRB,.260E-03_JPRB,.261E-03_JPRB,&
198&.271E-03_JPRB,.278E-03_JPRB,.287E-03_JPRB,.315E-03_JPRB,.347E-03_JPRB,.380E-03_JPRB,.446E-03_JPRB,&
199&.461E-03_JPRB,.474E-03_JPRB,.492E-03_JPRB,.506E-03_JPRB,.518E-03_JPRB,.537E-03_JPRB,.540E-03_JPRB,&
200&.535E-03_JPRB,.515E-03_JPRB,.510E-03_JPRB,.516E-03_JPRB,.534E-03_JPRB,.576E-03_JPRB,.610E-03_JPRB,&
201&.654E-03_JPRB,.677E-03_JPRB,.670E-03_JPRB,.655E-03_JPRB,.593E-03_JPRB,.564E-03_JPRB,.536E-03_JPRB,&
202&.481E-03_JPRB,.453E-03_JPRB,.427E-03_JPRB,.399E-03_JPRB,.404E-03_JPRB,.412E-03_JPRB,.447E-03_JPRB,&
203&.507E-03_JPRB,.552E-03_JPRB,.611E-03_JPRB,.606E-03_JPRB,.590E-03_JPRB,.552E-03_JPRB,.504E-03_JPRB,&
204&.480E-03_JPRB,.457E-03_JPRB,.452E-03_JPRB,.455E-03_JPRB,.462E-03_JPRB,.505E-03_JPRB,.553E-03_JPRB,&
205&.609E-03_JPRB,.687E-03_JPRB/)
206!-- Black Carbon Aerosol     month:  7 --- lat: 11  50.0
207ZAER (:,11, 7) = (/&
208&.734E-03_JPRB,.734E-03_JPRB,.714E-03_JPRB,.710E-03_JPRB,.708E-03_JPRB,.708E-03_JPRB,.650E-03_JPRB,&
209&.596E-03_JPRB,.492E-03_JPRB,.452E-03_JPRB,.431E-03_JPRB,.422E-03_JPRB,.423E-03_JPRB,.420E-03_JPRB,&
210&.411E-03_JPRB,.371E-03_JPRB,.347E-03_JPRB,.319E-03_JPRB,.309E-03_JPRB,.311E-03_JPRB,.317E-03_JPRB,&
211&.342E-03_JPRB,.358E-03_JPRB,.374E-03_JPRB,.440E-03_JPRB,.497E-03_JPRB,.553E-03_JPRB,.650E-03_JPRB,&
212&.658E-03_JPRB,.667E-03_JPRB,.682E-03_JPRB,.712E-03_JPRB,.727E-03_JPRB,.723E-03_JPRB,.677E-03_JPRB,&
213&.647E-03_JPRB,.613E-03_JPRB,.611E-03_JPRB,.635E-03_JPRB,.692E-03_JPRB,.767E-03_JPRB,.811E-03_JPRB,&
214&.862E-03_JPRB,.864E-03_JPRB,.839E-03_JPRB,.804E-03_JPRB,.697E-03_JPRB,.642E-03_JPRB,.587E-03_JPRB,&
215&.517E-03_JPRB,.496E-03_JPRB,.478E-03_JPRB,.467E-03_JPRB,.469E-03_JPRB,.473E-03_JPRB,.491E-03_JPRB,&
216&.540E-03_JPRB,.573E-03_JPRB,.605E-03_JPRB,.594E-03_JPRB,.580E-03_JPRB,.551E-03_JPRB,.524E-03_JPRB,&
217&.512E-03_JPRB,.501E-03_JPRB,.509E-03_JPRB,.514E-03_JPRB,.520E-03_JPRB,.556E-03_JPRB,.601E-03_JPRB,&
218&.654E-03_JPRB,.732E-03_JPRB/)
219!-- Black Carbon Aerosol     month:  7 --- lat: 12  46.0
220ZAER (:,12, 7) = (/&
221&.798E-03_JPRB,.798E-03_JPRB,.800E-03_JPRB,.784E-03_JPRB,.770E-03_JPRB,.769E-03_JPRB,.713E-03_JPRB,&
222&.658E-03_JPRB,.540E-03_JPRB,.485E-03_JPRB,.452E-03_JPRB,.425E-03_JPRB,.431E-03_JPRB,.438E-03_JPRB,&
223&.447E-03_JPRB,.435E-03_JPRB,.426E-03_JPRB,.415E-03_JPRB,.405E-03_JPRB,.407E-03_JPRB,.412E-03_JPRB,&
224&.450E-03_JPRB,.480E-03_JPRB,.512E-03_JPRB,.625E-03_JPRB,.700E-03_JPRB,.774E-03_JPRB,.876E-03_JPRB,&
225&.953E-03_JPRB,.102E-02_JPRB,.110E-02_JPRB,.114E-02_JPRB,.115E-02_JPRB,.111E-02_JPRB,.102E-02_JPRB,&
226&.950E-03_JPRB,.866E-03_JPRB,.865E-03_JPRB,.904E-03_JPRB,.997E-03_JPRB,.104E-02_JPRB,.105E-02_JPRB,&
227&.104E-02_JPRB,.108E-02_JPRB,.107E-02_JPRB,.105E-02_JPRB,.916E-03_JPRB,.851E-03_JPRB,.787E-03_JPRB,&
228&.728E-03_JPRB,.684E-03_JPRB,.648E-03_JPRB,.644E-03_JPRB,.614E-03_JPRB,.589E-03_JPRB,.557E-03_JPRB,&
229&.583E-03_JPRB,.595E-03_JPRB,.587E-03_JPRB,.578E-03_JPRB,.571E-03_JPRB,.561E-03_JPRB,.575E-03_JPRB,&
230&.577E-03_JPRB,.572E-03_JPRB,.581E-03_JPRB,.588E-03_JPRB,.598E-03_JPRB,.647E-03_JPRB,.693E-03_JPRB,&
231&.745E-03_JPRB,.796E-03_JPRB/)
232!-- Black Carbon Aerosol     month:  7 --- lat: 13  42.0
233ZAER (:,13, 7) = (/&
234&.913E-03_JPRB,.912E-03_JPRB,.900E-03_JPRB,.885E-03_JPRB,.870E-03_JPRB,.848E-03_JPRB,.792E-03_JPRB,&
235&.739E-03_JPRB,.639E-03_JPRB,.572E-03_JPRB,.529E-03_JPRB,.488E-03_JPRB,.491E-03_JPRB,.501E-03_JPRB,&
236&.523E-03_JPRB,.540E-03_JPRB,.545E-03_JPRB,.546E-03_JPRB,.531E-03_JPRB,.533E-03_JPRB,.540E-03_JPRB,&
237&.617E-03_JPRB,.663E-03_JPRB,.709E-03_JPRB,.877E-03_JPRB,.102E-02_JPRB,.117E-02_JPRB,.142E-02_JPRB,&
238&.170E-02_JPRB,.191E-02_JPRB,.208E-02_JPRB,.204E-02_JPRB,.199E-02_JPRB,.185E-02_JPRB,.172E-02_JPRB,&
239&.161E-02_JPRB,.144E-02_JPRB,.141E-02_JPRB,.143E-02_JPRB,.152E-02_JPRB,.147E-02_JPRB,.142E-02_JPRB,&
240&.136E-02_JPRB,.149E-02_JPRB,.151E-02_JPRB,.151E-02_JPRB,.136E-02_JPRB,.130E-02_JPRB,.125E-02_JPRB,&
241&.121E-02_JPRB,.111E-02_JPRB,.102E-02_JPRB,.995E-03_JPRB,.900E-03_JPRB,.817E-03_JPRB,.680E-03_JPRB,&
242&.665E-03_JPRB,.649E-03_JPRB,.610E-03_JPRB,.601E-03_JPRB,.605E-03_JPRB,.628E-03_JPRB,.707E-03_JPRB,&
243&.745E-03_JPRB,.779E-03_JPRB,.780E-03_JPRB,.773E-03_JPRB,.763E-03_JPRB,.851E-03_JPRB,.908E-03_JPRB,&
244&.969E-03_JPRB,.914E-03_JPRB/)
245!-- Black Carbon Aerosol     month:  7 --- lat: 14  38.0
246ZAER (:,14, 7) = (/&
247&.120E-02_JPRB,.119E-02_JPRB,.108E-02_JPRB,.106E-02_JPRB,.104E-02_JPRB,.103E-02_JPRB,.965E-03_JPRB,&
248&.908E-03_JPRB,.791E-03_JPRB,.712E-03_JPRB,.662E-03_JPRB,.613E-03_JPRB,.621E-03_JPRB,.634E-03_JPRB,&
249&.658E-03_JPRB,.679E-03_JPRB,.680E-03_JPRB,.672E-03_JPRB,.653E-03_JPRB,.668E-03_JPRB,.697E-03_JPRB,&
250&.811E-03_JPRB,.895E-03_JPRB,.983E-03_JPRB,.138E-02_JPRB,.179E-02_JPRB,.219E-02_JPRB,.270E-02_JPRB,&
251&.308E-02_JPRB,.336E-02_JPRB,.342E-02_JPRB,.311E-02_JPRB,.291E-02_JPRB,.278E-02_JPRB,.259E-02_JPRB,&
252&.243E-02_JPRB,.216E-02_JPRB,.219E-02_JPRB,.226E-02_JPRB,.244E-02_JPRB,.238E-02_JPRB,.230E-02_JPRB,&
253&.219E-02_JPRB,.236E-02_JPRB,.236E-02_JPRB,.234E-02_JPRB,.208E-02_JPRB,.194E-02_JPRB,.181E-02_JPRB,&
254&.171E-02_JPRB,.158E-02_JPRB,.146E-02_JPRB,.140E-02_JPRB,.126E-02_JPRB,.113E-02_JPRB,.918E-03_JPRB,&
255&.835E-03_JPRB,.777E-03_JPRB,.710E-03_JPRB,.707E-03_JPRB,.736E-03_JPRB,.822E-03_JPRB,.998E-03_JPRB,&
256&.111E-02_JPRB,.124E-02_JPRB,.128E-02_JPRB,.127E-02_JPRB,.124E-02_JPRB,.129E-02_JPRB,.131E-02_JPRB,&
257&.134E-02_JPRB,.120E-02_JPRB/)
258!-- Black Carbon Aerosol     month:  7 --- lat: 15  34.0
259ZAER (:,15, 7) = (/&
260&.169E-02_JPRB,.168E-02_JPRB,.144E-02_JPRB,.138E-02_JPRB,.133E-02_JPRB,.128E-02_JPRB,.119E-02_JPRB,&
261&.111E-02_JPRB,.969E-03_JPRB,.882E-03_JPRB,.829E-03_JPRB,.783E-03_JPRB,.799E-03_JPRB,.807E-03_JPRB,&
262&.814E-03_JPRB,.809E-03_JPRB,.796E-03_JPRB,.772E-03_JPRB,.753E-03_JPRB,.803E-03_JPRB,.883E-03_JPRB,&
263&.111E-02_JPRB,.131E-02_JPRB,.151E-02_JPRB,.266E-02_JPRB,.365E-02_JPRB,.459E-02_JPRB,.529E-02_JPRB,&
264&.523E-02_JPRB,.513E-02_JPRB,.462E-02_JPRB,.404E-02_JPRB,.369E-02_JPRB,.360E-02_JPRB,.329E-02_JPRB,&
265&.307E-02_JPRB,.277E-02_JPRB,.301E-02_JPRB,.328E-02_JPRB,.373E-02_JPRB,.403E-02_JPRB,.407E-02_JPRB,&
266&.402E-02_JPRB,.392E-02_JPRB,.368E-02_JPRB,.336E-02_JPRB,.273E-02_JPRB,.244E-02_JPRB,.215E-02_JPRB,&
267&.197E-02_JPRB,.187E-02_JPRB,.177E-02_JPRB,.172E-02_JPRB,.159E-02_JPRB,.147E-02_JPRB,.126E-02_JPRB,&
268&.112E-02_JPRB,.102E-02_JPRB,.927E-03_JPRB,.960E-03_JPRB,.106E-02_JPRB,.130E-02_JPRB,.192E-02_JPRB,&
269&.226E-02_JPRB,.264E-02_JPRB,.270E-02_JPRB,.259E-02_JPRB,.240E-02_JPRB,.219E-02_JPRB,.207E-02_JPRB,&
270&.195E-02_JPRB,.170E-02_JPRB/)
271!-- Black Carbon Aerosol     month:  7 --- lat: 16  30.0
272ZAER (:,16, 7) = (/&
273&.220E-02_JPRB,.219E-02_JPRB,.180E-02_JPRB,.169E-02_JPRB,.159E-02_JPRB,.149E-02_JPRB,.135E-02_JPRB,&
274&.125E-02_JPRB,.112E-02_JPRB,.104E-02_JPRB,.996E-03_JPRB,.952E-03_JPRB,.950E-03_JPRB,.946E-03_JPRB,&
275&.937E-03_JPRB,.911E-03_JPRB,.883E-03_JPRB,.841E-03_JPRB,.862E-03_JPRB,.100E-02_JPRB,.121E-02_JPRB,&
276&.172E-02_JPRB,.212E-02_JPRB,.254E-02_JPRB,.558E-02_JPRB,.749E-02_JPRB,.923E-02_JPRB,.950E-02_JPRB,&
277&.807E-02_JPRB,.682E-02_JPRB,.508E-02_JPRB,.445E-02_JPRB,.408E-02_JPRB,.399E-02_JPRB,.361E-02_JPRB,&
278&.341E-02_JPRB,.329E-02_JPRB,.393E-02_JPRB,.457E-02_JPRB,.562E-02_JPRB,.681E-02_JPRB,.715E-02_JPRB,&
279&.732E-02_JPRB,.612E-02_JPRB,.521E-02_JPRB,.414E-02_JPRB,.301E-02_JPRB,.264E-02_JPRB,.230E-02_JPRB,&
280&.206E-02_JPRB,.199E-02_JPRB,.193E-02_JPRB,.191E-02_JPRB,.182E-02_JPRB,.172E-02_JPRB,.154E-02_JPRB,&
281&.140E-02_JPRB,.131E-02_JPRB,.121E-02_JPRB,.137E-02_JPRB,.172E-02_JPRB,.259E-02_JPRB,.450E-02_JPRB,&
282&.535E-02_JPRB,.606E-02_JPRB,.565E-02_JPRB,.504E-02_JPRB,.417E-02_JPRB,.345E-02_JPRB,.306E-02_JPRB,&
283&.265E-02_JPRB,.221E-02_JPRB/)
284!-- Black Carbon Aerosol     month:  7 --- lat: 17  26.0
285ZAER (:,17, 7) = (/&
286&.241E-02_JPRB,.239E-02_JPRB,.190E-02_JPRB,.174E-02_JPRB,.160E-02_JPRB,.149E-02_JPRB,.137E-02_JPRB,&
287&.128E-02_JPRB,.120E-02_JPRB,.115E-02_JPRB,.111E-02_JPRB,.107E-02_JPRB,.105E-02_JPRB,.104E-02_JPRB,&
288&.105E-02_JPRB,.101E-02_JPRB,.973E-03_JPRB,.910E-03_JPRB,.107E-02_JPRB,.140E-02_JPRB,.187E-02_JPRB,&
289&.264E-02_JPRB,.340E-02_JPRB,.422E-02_JPRB,.108E-01_JPRB,.138E-01_JPRB,.164E-01_JPRB,.138E-01_JPRB,&
290&.103E-01_JPRB,.749E-02_JPRB,.476E-02_JPRB,.433E-02_JPRB,.406E-02_JPRB,.393E-02_JPRB,.365E-02_JPRB,&
291&.366E-02_JPRB,.411E-02_JPRB,.552E-02_JPRB,.681E-02_JPRB,.886E-02_JPRB,.110E-01_JPRB,.116E-01_JPRB,&
292&.117E-01_JPRB,.857E-02_JPRB,.670E-02_JPRB,.465E-02_JPRB,.307E-02_JPRB,.266E-02_JPRB,.230E-02_JPRB,&
293&.209E-02_JPRB,.204E-02_JPRB,.199E-02_JPRB,.196E-02_JPRB,.189E-02_JPRB,.181E-02_JPRB,.164E-02_JPRB,&
294&.155E-02_JPRB,.150E-02_JPRB,.149E-02_JPRB,.204E-02_JPRB,.297E-02_JPRB,.509E-02_JPRB,.883E-02_JPRB,&
295&.103E-01_JPRB,.111E-01_JPRB,.926E-02_JPRB,.775E-02_JPRB,.580E-02_JPRB,.438E-02_JPRB,.369E-02_JPRB,&
296&.299E-02_JPRB,.243E-02_JPRB/)
297!-- Black Carbon Aerosol     month:  7 --- lat: 18  22.0
298ZAER (:,18, 7) = (/&
299&.220E-02_JPRB,.219E-02_JPRB,.170E-02_JPRB,.153E-02_JPRB,.138E-02_JPRB,.128E-02_JPRB,.124E-02_JPRB,&
300&.121E-02_JPRB,.119E-02_JPRB,.115E-02_JPRB,.114E-02_JPRB,.114E-02_JPRB,.116E-02_JPRB,.119E-02_JPRB,&
301&.124E-02_JPRB,.121E-02_JPRB,.118E-02_JPRB,.115E-02_JPRB,.161E-02_JPRB,.222E-02_JPRB,.304E-02_JPRB,&
302&.411E-02_JPRB,.549E-02_JPRB,.703E-02_JPRB,.179E-01_JPRB,.211E-01_JPRB,.234E-01_JPRB,.157E-01_JPRB,&
303&.108E-01_JPRB,.694E-02_JPRB,.424E-02_JPRB,.404E-02_JPRB,.388E-02_JPRB,.366E-02_JPRB,.366E-02_JPRB,&
304&.414E-02_JPRB,.570E-02_JPRB,.836E-02_JPRB,.103E-01_JPRB,.130E-01_JPRB,.156E-01_JPRB,.159E-01_JPRB,&
305&.155E-01_JPRB,.104E-01_JPRB,.787E-02_JPRB,.528E-02_JPRB,.324E-02_JPRB,.270E-02_JPRB,.224E-02_JPRB,&
306&.204E-02_JPRB,.199E-02_JPRB,.195E-02_JPRB,.190E-02_JPRB,.182E-02_JPRB,.174E-02_JPRB,.160E-02_JPRB,&
307&.158E-02_JPRB,.162E-02_JPRB,.183E-02_JPRB,.302E-02_JPRB,.469E-02_JPRB,.825E-02_JPRB,.129E-01_JPRB,&
308&.143E-01_JPRB,.144E-01_JPRB,.108E-01_JPRB,.864E-02_JPRB,.614E-02_JPRB,.429E-02_JPRB,.353E-02_JPRB,&
309&.279E-02_JPRB,.222E-02_JPRB/)
310!-- Black Carbon Aerosol     month:  7 --- lat: 19  18.0
311ZAER (:,19, 7) = (/&
312&.176E-02_JPRB,.175E-02_JPRB,.136E-02_JPRB,.122E-02_JPRB,.110E-02_JPRB,.101E-02_JPRB,.103E-02_JPRB,&
313&.104E-02_JPRB,.108E-02_JPRB,.108E-02_JPRB,.111E-02_JPRB,.121E-02_JPRB,.131E-02_JPRB,.140E-02_JPRB,&
314&.154E-02_JPRB,.160E-02_JPRB,.169E-02_JPRB,.185E-02_JPRB,.277E-02_JPRB,.371E-02_JPRB,.491E-02_JPRB,&
315&.665E-02_JPRB,.892E-02_JPRB,.114E-01_JPRB,.243E-01_JPRB,.257E-01_JPRB,.262E-01_JPRB,.148E-01_JPRB,&
316&.991E-02_JPRB,.612E-02_JPRB,.388E-02_JPRB,.377E-02_JPRB,.366E-02_JPRB,.343E-02_JPRB,.381E-02_JPRB,&
317&.488E-02_JPRB,.784E-02_JPRB,.120E-01_JPRB,.143E-01_JPRB,.165E-01_JPRB,.183E-01_JPRB,.181E-01_JPRB,&
318&.171E-01_JPRB,.110E-01_JPRB,.845E-02_JPRB,.595E-02_JPRB,.354E-02_JPRB,.286E-02_JPRB,.226E-02_JPRB,&
319&.195E-02_JPRB,.187E-02_JPRB,.181E-02_JPRB,.176E-02_JPRB,.169E-02_JPRB,.164E-02_JPRB,.159E-02_JPRB,&
320&.167E-02_JPRB,.184E-02_JPRB,.237E-02_JPRB,.408E-02_JPRB,.616E-02_JPRB,.103E-01_JPRB,.140E-01_JPRB,&
321&.142E-01_JPRB,.126E-01_JPRB,.868E-02_JPRB,.679E-02_JPRB,.483E-02_JPRB,.334E-02_JPRB,.280E-02_JPRB,&
322&.230E-02_JPRB,.178E-02_JPRB/)
323!-- Black Carbon Aerosol     month:  7 --- lat: 20  14.0
324ZAER (:,20, 7) = (/&
325&.132E-02_JPRB,.131E-02_JPRB,.102E-02_JPRB,.937E-03_JPRB,.866E-03_JPRB,.807E-03_JPRB,.836E-03_JPRB,&
326&.866E-03_JPRB,.932E-03_JPRB,.100E-02_JPRB,.108E-02_JPRB,.124E-02_JPRB,.141E-02_JPRB,.157E-02_JPRB,&
327&.182E-02_JPRB,.216E-02_JPRB,.251E-02_JPRB,.304E-02_JPRB,.454E-02_JPRB,.579E-02_JPRB,.733E-02_JPRB,&
328&.993E-02_JPRB,.130E-01_JPRB,.163E-01_JPRB,.270E-01_JPRB,.260E-01_JPRB,.243E-01_JPRB,.126E-01_JPRB,&
329&.851E-02_JPRB,.532E-02_JPRB,.350E-02_JPRB,.341E-02_JPRB,.336E-02_JPRB,.339E-02_JPRB,.418E-02_JPRB,&
330&.570E-02_JPRB,.956E-02_JPRB,.154E-01_JPRB,.177E-01_JPRB,.190E-01_JPRB,.190E-01_JPRB,.182E-01_JPRB,&
331&.168E-01_JPRB,.112E-01_JPRB,.866E-02_JPRB,.615E-02_JPRB,.375E-02_JPRB,.304E-02_JPRB,.241E-02_JPRB,&
332&.194E-02_JPRB,.181E-02_JPRB,.170E-02_JPRB,.164E-02_JPRB,.159E-02_JPRB,.158E-02_JPRB,.170E-02_JPRB,&
333&.199E-02_JPRB,.232E-02_JPRB,.307E-02_JPRB,.481E-02_JPRB,.657E-02_JPRB,.979E-02_JPRB,.111E-01_JPRB,&
334&.103E-01_JPRB,.787E-02_JPRB,.523E-02_JPRB,.413E-02_JPRB,.310E-02_JPRB,.241E-02_JPRB,.210E-02_JPRB,&
335&.179E-02_JPRB,.133E-02_JPRB/)
336!-- Black Carbon Aerosol     month:  7 --- lat: 21  10.0
337ZAER (:,21, 7) = (/&
338&.952E-03_JPRB,.946E-03_JPRB,.748E-03_JPRB,.716E-03_JPRB,.690E-03_JPRB,.681E-03_JPRB,.721E-03_JPRB,&
339&.763E-03_JPRB,.862E-03_JPRB,.999E-03_JPRB,.111E-02_JPRB,.128E-02_JPRB,.151E-02_JPRB,.172E-02_JPRB,&
340&.206E-02_JPRB,.266E-02_JPRB,.326E-02_JPRB,.416E-02_JPRB,.627E-02_JPRB,.774E-02_JPRB,.949E-02_JPRB,&
341&.124E-01_JPRB,.153E-01_JPRB,.185E-01_JPRB,.249E-01_JPRB,.227E-01_JPRB,.200E-01_JPRB,.102E-01_JPRB,&
342&.691E-02_JPRB,.439E-02_JPRB,.305E-02_JPRB,.307E-02_JPRB,.318E-02_JPRB,.368E-02_JPRB,.489E-02_JPRB,&
343&.669E-02_JPRB,.109E-01_JPRB,.178E-01_JPRB,.203E-01_JPRB,.211E-01_JPRB,.193E-01_JPRB,.180E-01_JPRB,&
344&.164E-01_JPRB,.114E-01_JPRB,.875E-02_JPRB,.601E-02_JPRB,.376E-02_JPRB,.314E-02_JPRB,.258E-02_JPRB,&
345&.203E-02_JPRB,.187E-02_JPRB,.171E-02_JPRB,.161E-02_JPRB,.157E-02_JPRB,.158E-02_JPRB,.188E-02_JPRB,&
346&.252E-02_JPRB,.301E-02_JPRB,.371E-02_JPRB,.493E-02_JPRB,.584E-02_JPRB,.715E-02_JPRB,.691E-02_JPRB,&
347&.605E-02_JPRB,.434E-02_JPRB,.297E-02_JPRB,.246E-02_JPRB,.203E-02_JPRB,.177E-02_JPRB,.155E-02_JPRB,&
348&.131E-02_JPRB,.963E-03_JPRB/)
349!-- Black Carbon Aerosol     month:  7 --- lat: 22   6.0
350ZAER (:,22, 7) = (/&
351&.669E-03_JPRB,.666E-03_JPRB,.581E-03_JPRB,.579E-03_JPRB,.581E-03_JPRB,.622E-03_JPRB,.677E-03_JPRB,&
352&.735E-03_JPRB,.869E-03_JPRB,.102E-02_JPRB,.115E-02_JPRB,.135E-02_JPRB,.166E-02_JPRB,.191E-02_JPRB,&
353&.229E-02_JPRB,.301E-02_JPRB,.378E-02_JPRB,.495E-02_JPRB,.750E-02_JPRB,.920E-02_JPRB,.112E-01_JPRB,&
354&.135E-01_JPRB,.153E-01_JPRB,.171E-01_JPRB,.186E-01_JPRB,.164E-01_JPRB,.141E-01_JPRB,.735E-02_JPRB,&
355&.502E-02_JPRB,.326E-02_JPRB,.260E-02_JPRB,.281E-02_JPRB,.312E-02_JPRB,.405E-02_JPRB,.565E-02_JPRB,&
356&.755E-02_JPRB,.116E-01_JPRB,.177E-01_JPRB,.201E-01_JPRB,.216E-01_JPRB,.194E-01_JPRB,.178E-01_JPRB,&
357&.159E-01_JPRB,.112E-01_JPRB,.869E-02_JPRB,.608E-02_JPRB,.382E-02_JPRB,.325E-02_JPRB,.275E-02_JPRB,&
358&.222E-02_JPRB,.202E-02_JPRB,.184E-02_JPRB,.167E-02_JPRB,.160E-02_JPRB,.162E-02_JPRB,.205E-02_JPRB,&
359&.298E-02_JPRB,.358E-02_JPRB,.409E-02_JPRB,.461E-02_JPRB,.481E-02_JPRB,.485E-02_JPRB,.410E-02_JPRB,&
360&.346E-02_JPRB,.251E-02_JPRB,.191E-02_JPRB,.169E-02_JPRB,.150E-02_JPRB,.130E-02_JPRB,.111E-02_JPRB,&
361&.880E-03_JPRB,.675E-03_JPRB/)
362!-- Black Carbon Aerosol     month:  7 --- lat: 23   2.0
363ZAER (:,23, 7) = (/&
364&.494E-03_JPRB,.493E-03_JPRB,.471E-03_JPRB,.487E-03_JPRB,.509E-03_JPRB,.595E-03_JPRB,.667E-03_JPRB,&
365&.739E-03_JPRB,.897E-03_JPRB,.105E-02_JPRB,.118E-02_JPRB,.139E-02_JPRB,.178E-02_JPRB,.209E-02_JPRB,&
366&.254E-02_JPRB,.328E-02_JPRB,.410E-02_JPRB,.538E-02_JPRB,.821E-02_JPRB,.102E-01_JPRB,.126E-01_JPRB,&
367&.140E-01_JPRB,.141E-01_JPRB,.142E-01_JPRB,.123E-01_JPRB,.104E-01_JPRB,.849E-02_JPRB,.439E-02_JPRB,&
368&.323E-02_JPRB,.238E-02_JPRB,.225E-02_JPRB,.253E-02_JPRB,.292E-02_JPRB,.402E-02_JPRB,.555E-02_JPRB,&
369&.716E-02_JPRB,.103E-01_JPRB,.147E-01_JPRB,.168E-01_JPRB,.185E-01_JPRB,.176E-01_JPRB,.164E-01_JPRB,&
370&.147E-01_JPRB,.108E-01_JPRB,.856E-02_JPRB,.614E-02_JPRB,.399E-02_JPRB,.342E-02_JPRB,.293E-02_JPRB,&
371&.241E-02_JPRB,.221E-02_JPRB,.202E-02_JPRB,.174E-02_JPRB,.166E-02_JPRB,.170E-02_JPRB,.223E-02_JPRB,&
372&.301E-02_JPRB,.352E-02_JPRB,.404E-02_JPRB,.414E-02_JPRB,.399E-02_JPRB,.344E-02_JPRB,.272E-02_JPRB,&
373&.228E-02_JPRB,.174E-02_JPRB,.140E-02_JPRB,.126E-02_JPRB,.112E-02_JPRB,.916E-03_JPRB,.764E-03_JPRB,&
374&.597E-03_JPRB,.497E-03_JPRB/)
375!-- Black Carbon Aerosol     month:  7 --- lat: 24  -2.0
376ZAER (:,24, 7) = (/&
377&.416E-03_JPRB,.415E-03_JPRB,.404E-03_JPRB,.436E-03_JPRB,.471E-03_JPRB,.564E-03_JPRB,.640E-03_JPRB,&
378&.715E-03_JPRB,.875E-03_JPRB,.104E-02_JPRB,.117E-02_JPRB,.139E-02_JPRB,.180E-02_JPRB,.216E-02_JPRB,&
379&.274E-02_JPRB,.345E-02_JPRB,.418E-02_JPRB,.529E-02_JPRB,.770E-02_JPRB,.940E-02_JPRB,.114E-01_JPRB,&
380&.120E-01_JPRB,.111E-01_JPRB,.993E-02_JPRB,.719E-02_JPRB,.572E-02_JPRB,.429E-02_JPRB,.229E-02_JPRB,&
381&.201E-02_JPRB,.184E-02_JPRB,.197E-02_JPRB,.222E-02_JPRB,.256E-02_JPRB,.355E-02_JPRB,.451E-02_JPRB,&
382&.556E-02_JPRB,.769E-02_JPRB,.110E-01_JPRB,.124E-01_JPRB,.133E-01_JPRB,.134E-01_JPRB,.129E-01_JPRB,&
383&.121E-01_JPRB,.954E-02_JPRB,.784E-02_JPRB,.591E-02_JPRB,.423E-02_JPRB,.370E-02_JPRB,.320E-02_JPRB,&
384&.258E-02_JPRB,.238E-02_JPRB,.218E-02_JPRB,.188E-02_JPRB,.178E-02_JPRB,.177E-02_JPRB,.215E-02_JPRB,&
385&.262E-02_JPRB,.298E-02_JPRB,.348E-02_JPRB,.354E-02_JPRB,.334E-02_JPRB,.271E-02_JPRB,.210E-02_JPRB,&
386&.177E-02_JPRB,.140E-02_JPRB,.114E-02_JPRB,.101E-02_JPRB,.871E-03_JPRB,.706E-03_JPRB,.607E-03_JPRB,&
387&.502E-03_JPRB,.418E-03_JPRB/)
388!-- Black Carbon Aerosol     month:  7 --- lat: 25  -6.0
389ZAER (:,25, 7) = (/&
390&.420E-03_JPRB,.420E-03_JPRB,.414E-03_JPRB,.447E-03_JPRB,.480E-03_JPRB,.550E-03_JPRB,.618E-03_JPRB,&
391&.682E-03_JPRB,.805E-03_JPRB,.939E-03_JPRB,.106E-02_JPRB,.127E-02_JPRB,.169E-02_JPRB,.200E-02_JPRB,&
392&.245E-02_JPRB,.321E-02_JPRB,.376E-02_JPRB,.447E-02_JPRB,.588E-02_JPRB,.685E-02_JPRB,.798E-02_JPRB,&
393&.796E-02_JPRB,.706E-02_JPRB,.600E-02_JPRB,.380E-02_JPRB,.295E-02_JPRB,.214E-02_JPRB,.146E-02_JPRB,&
394&.150E-02_JPRB,.155E-02_JPRB,.175E-02_JPRB,.194E-02_JPRB,.220E-02_JPRB,.291E-02_JPRB,.364E-02_JPRB,&
395&.432E-02_JPRB,.556E-02_JPRB,.774E-02_JPRB,.875E-02_JPRB,.958E-02_JPRB,.953E-02_JPRB,.927E-02_JPRB,&
396&.880E-02_JPRB,.763E-02_JPRB,.663E-02_JPRB,.544E-02_JPRB,.438E-02_JPRB,.398E-02_JPRB,.360E-02_JPRB,&
397&.291E-02_JPRB,.270E-02_JPRB,.251E-02_JPRB,.225E-02_JPRB,.209E-02_JPRB,.198E-02_JPRB,.204E-02_JPRB,&
398&.226E-02_JPRB,.244E-02_JPRB,.273E-02_JPRB,.286E-02_JPRB,.278E-02_JPRB,.236E-02_JPRB,.183E-02_JPRB,&
399&.155E-02_JPRB,.125E-02_JPRB,.103E-02_JPRB,.919E-03_JPRB,.794E-03_JPRB,.661E-03_JPRB,.594E-03_JPRB,&
400&.526E-03_JPRB,.423E-03_JPRB/)
401!-- Black Carbon Aerosol     month:  7 --- lat: 26 -10.0
402ZAER (:,26, 7) = (/&
403&.487E-03_JPRB,.486E-03_JPRB,.472E-03_JPRB,.503E-03_JPRB,.534E-03_JPRB,.594E-03_JPRB,.658E-03_JPRB,&
404&.714E-03_JPRB,.808E-03_JPRB,.890E-03_JPRB,.966E-03_JPRB,.110E-02_JPRB,.143E-02_JPRB,.164E-02_JPRB,&
405&.188E-02_JPRB,.244E-02_JPRB,.280E-02_JPRB,.323E-02_JPRB,.385E-02_JPRB,.425E-02_JPRB,.471E-02_JPRB,&
406&.449E-02_JPRB,.391E-02_JPRB,.325E-02_JPRB,.202E-02_JPRB,.167E-02_JPRB,.136E-02_JPRB,.126E-02_JPRB,&
407&.136E-02_JPRB,.145E-02_JPRB,.165E-02_JPRB,.181E-02_JPRB,.199E-02_JPRB,.240E-02_JPRB,.295E-02_JPRB,&
408&.341E-02_JPRB,.417E-02_JPRB,.526E-02_JPRB,.588E-02_JPRB,.654E-02_JPRB,.666E-02_JPRB,.655E-02_JPRB,&
409&.629E-02_JPRB,.580E-02_JPRB,.540E-02_JPRB,.491E-02_JPRB,.447E-02_JPRB,.423E-02_JPRB,.398E-02_JPRB,&
410&.337E-02_JPRB,.324E-02_JPRB,.313E-02_JPRB,.300E-02_JPRB,.270E-02_JPRB,.247E-02_JPRB,.223E-02_JPRB,&
411&.230E-02_JPRB,.232E-02_JPRB,.227E-02_JPRB,.237E-02_JPRB,.234E-02_JPRB,.213E-02_JPRB,.173E-02_JPRB,&
412&.151E-02_JPRB,.126E-02_JPRB,.110E-02_JPRB,.985E-03_JPRB,.845E-03_JPRB,.706E-03_JPRB,.649E-03_JPRB,&
413&.593E-03_JPRB,.490E-03_JPRB/)
414!-- Black Carbon Aerosol     month:  7 --- lat: 27 -14.0
415ZAER (:,27, 7) = (/&
416&.613E-03_JPRB,.611E-03_JPRB,.565E-03_JPRB,.584E-03_JPRB,.607E-03_JPRB,.692E-03_JPRB,.756E-03_JPRB,&
417&.810E-03_JPRB,.893E-03_JPRB,.961E-03_JPRB,.101E-02_JPRB,.108E-02_JPRB,.128E-02_JPRB,.140E-02_JPRB,&
418&.151E-02_JPRB,.177E-02_JPRB,.197E-02_JPRB,.225E-02_JPRB,.255E-02_JPRB,.271E-02_JPRB,.290E-02_JPRB,&
419&.266E-02_JPRB,.233E-02_JPRB,.196E-02_JPRB,.136E-02_JPRB,.127E-02_JPRB,.120E-02_JPRB,.128E-02_JPRB,&
420&.138E-02_JPRB,.149E-02_JPRB,.168E-02_JPRB,.185E-02_JPRB,.200E-02_JPRB,.224E-02_JPRB,.253E-02_JPRB,&
421&.280E-02_JPRB,.328E-02_JPRB,.390E-02_JPRB,.433E-02_JPRB,.491E-02_JPRB,.514E-02_JPRB,.514E-02_JPRB,&
422&.504E-02_JPRB,.472E-02_JPRB,.460E-02_JPRB,.449E-02_JPRB,.458E-02_JPRB,.453E-02_JPRB,.447E-02_JPRB,&
423&.406E-02_JPRB,.409E-02_JPRB,.412E-02_JPRB,.421E-02_JPRB,.384E-02_JPRB,.354E-02_JPRB,.320E-02_JPRB,&
424&.337E-02_JPRB,.335E-02_JPRB,.291E-02_JPRB,.267E-02_JPRB,.250E-02_JPRB,.227E-02_JPRB,.195E-02_JPRB,&
425&.176E-02_JPRB,.152E-02_JPRB,.136E-02_JPRB,.121E-02_JPRB,.102E-02_JPRB,.818E-03_JPRB,.748E-03_JPRB,&
426&.685E-03_JPRB,.615E-03_JPRB/)
427!-- Black Carbon Aerosol     month:  7 --- lat: 28 -18.0
428ZAER (:,28, 7) = (/&
429&.782E-03_JPRB,.779E-03_JPRB,.704E-03_JPRB,.705E-03_JPRB,.716E-03_JPRB,.816E-03_JPRB,.877E-03_JPRB,&
430&.929E-03_JPRB,.101E-02_JPRB,.110E-02_JPRB,.116E-02_JPRB,.124E-02_JPRB,.137E-02_JPRB,.143E-02_JPRB,&
431&.147E-02_JPRB,.153E-02_JPRB,.162E-02_JPRB,.176E-02_JPRB,.196E-02_JPRB,.205E-02_JPRB,.213E-02_JPRB,&
432&.192E-02_JPRB,.172E-02_JPRB,.152E-02_JPRB,.119E-02_JPRB,.118E-02_JPRB,.118E-02_JPRB,.129E-02_JPRB,&
433&.141E-02_JPRB,.153E-02_JPRB,.172E-02_JPRB,.189E-02_JPRB,.203E-02_JPRB,.224E-02_JPRB,.236E-02_JPRB,&
434&.251E-02_JPRB,.281E-02_JPRB,.339E-02_JPRB,.388E-02_JPRB,.462E-02_JPRB,.522E-02_JPRB,.526E-02_JPRB,&
435&.510E-02_JPRB,.455E-02_JPRB,.450E-02_JPRB,.453E-02_JPRB,.496E-02_JPRB,.507E-02_JPRB,.515E-02_JPRB,&
436&.491E-02_JPRB,.509E-02_JPRB,.527E-02_JPRB,.559E-02_JPRB,.534E-02_JPRB,.518E-02_JPRB,.517E-02_JPRB,&
437&.583E-02_JPRB,.605E-02_JPRB,.558E-02_JPRB,.454E-02_JPRB,.389E-02_JPRB,.318E-02_JPRB,.261E-02_JPRB,&
438&.231E-02_JPRB,.199E-02_JPRB,.177E-02_JPRB,.157E-02_JPRB,.129E-02_JPRB,.101E-02_JPRB,.913E-03_JPRB,&
439&.824E-03_JPRB,.783E-03_JPRB/)
440!-- Black Carbon Aerosol     month:  7 --- lat: 29 -22.0
441ZAER (:,29, 7) = (/&
442&.969E-03_JPRB,.966E-03_JPRB,.872E-03_JPRB,.875E-03_JPRB,.886E-03_JPRB,.965E-03_JPRB,.100E-02_JPRB,&
443&.104E-02_JPRB,.112E-02_JPRB,.121E-02_JPRB,.130E-02_JPRB,.146E-02_JPRB,.164E-02_JPRB,.169E-02_JPRB,&
444&.165E-02_JPRB,.157E-02_JPRB,.159E-02_JPRB,.167E-02_JPRB,.180E-02_JPRB,.186E-02_JPRB,.191E-02_JPRB,&
445&.169E-02_JPRB,.154E-02_JPRB,.138E-02_JPRB,.116E-02_JPRB,.115E-02_JPRB,.114E-02_JPRB,.124E-02_JPRB,&
446&.137E-02_JPRB,.149E-02_JPRB,.168E-02_JPRB,.186E-02_JPRB,.200E-02_JPRB,.221E-02_JPRB,.230E-02_JPRB,&
447&.240E-02_JPRB,.259E-02_JPRB,.313E-02_JPRB,.365E-02_JPRB,.449E-02_JPRB,.581E-02_JPRB,.618E-02_JPRB,&
448&.635E-02_JPRB,.530E-02_JPRB,.509E-02_JPRB,.499E-02_JPRB,.554E-02_JPRB,.573E-02_JPRB,.591E-02_JPRB,&
449&.585E-02_JPRB,.609E-02_JPRB,.629E-02_JPRB,.621E-02_JPRB,.598E-02_JPRB,.599E-02_JPRB,.704E-02_JPRB,&
450&.883E-02_JPRB,.980E-02_JPRB,.100E-01_JPRB,.791E-02_JPRB,.648E-02_JPRB,.463E-02_JPRB,.355E-02_JPRB,&
451&.305E-02_JPRB,.262E-02_JPRB,.222E-02_JPRB,.191E-02_JPRB,.153E-02_JPRB,.120E-02_JPRB,.110E-02_JPRB,&
452&.102E-02_JPRB,.970E-03_JPRB/)
453!-- Black Carbon Aerosol     month:  7 --- lat: 30 -26.0
454ZAER (:,30, 7) = (/&
455&.115E-02_JPRB,.114E-02_JPRB,.105E-02_JPRB,.105E-02_JPRB,.105E-02_JPRB,.111E-02_JPRB,.113E-02_JPRB,&
456&.115E-02_JPRB,.120E-02_JPRB,.128E-02_JPRB,.138E-02_JPRB,.161E-02_JPRB,.194E-02_JPRB,.200E-02_JPRB,&
457&.188E-02_JPRB,.168E-02_JPRB,.169E-02_JPRB,.180E-02_JPRB,.195E-02_JPRB,.198E-02_JPRB,.200E-02_JPRB,&
458&.174E-02_JPRB,.155E-02_JPRB,.136E-02_JPRB,.115E-02_JPRB,.111E-02_JPRB,.109E-02_JPRB,.116E-02_JPRB,&
459&.128E-02_JPRB,.140E-02_JPRB,.162E-02_JPRB,.182E-02_JPRB,.199E-02_JPRB,.222E-02_JPRB,.240E-02_JPRB,&
460&.249E-02_JPRB,.257E-02_JPRB,.303E-02_JPRB,.348E-02_JPRB,.422E-02_JPRB,.593E-02_JPRB,.684E-02_JPRB,&
461&.783E-02_JPRB,.688E-02_JPRB,.633E-02_JPRB,.573E-02_JPRB,.607E-02_JPRB,.631E-02_JPRB,.655E-02_JPRB,&
462&.685E-02_JPRB,.675E-02_JPRB,.659E-02_JPRB,.552E-02_JPRB,.524E-02_JPRB,.539E-02_JPRB,.759E-02_JPRB,&
463&.109E-01_JPRB,.130E-01_JPRB,.148E-01_JPRB,.121E-01_JPRB,.988E-02_JPRB,.646E-02_JPRB,.470E-02_JPRB,&
464&.392E-02_JPRB,.328E-02_JPRB,.252E-02_JPRB,.210E-02_JPRB,.164E-02_JPRB,.136E-02_JPRB,.129E-02_JPRB,&
465&.123E-02_JPRB,.115E-02_JPRB/)
466!-- Black Carbon Aerosol     month:  7 --- lat: 31 -30.0
467ZAER (:,31, 7) = (/&
468&.131E-02_JPRB,.131E-02_JPRB,.122E-02_JPRB,.120E-02_JPRB,.118E-02_JPRB,.122E-02_JPRB,.125E-02_JPRB,&
469&.128E-02_JPRB,.130E-02_JPRB,.135E-02_JPRB,.145E-02_JPRB,.172E-02_JPRB,.211E-02_JPRB,.217E-02_JPRB,&
470&.198E-02_JPRB,.175E-02_JPRB,.180E-02_JPRB,.201E-02_JPRB,.231E-02_JPRB,.235E-02_JPRB,.233E-02_JPRB,&
471&.199E-02_JPRB,.171E-02_JPRB,.142E-02_JPRB,.114E-02_JPRB,.109E-02_JPRB,.106E-02_JPRB,.111E-02_JPRB,&
472&.122E-02_JPRB,.133E-02_JPRB,.159E-02_JPRB,.185E-02_JPRB,.207E-02_JPRB,.239E-02_JPRB,.264E-02_JPRB,&
473&.277E-02_JPRB,.285E-02_JPRB,.337E-02_JPRB,.379E-02_JPRB,.443E-02_JPRB,.620E-02_JPRB,.756E-02_JPRB,&
474&.935E-02_JPRB,.908E-02_JPRB,.813E-02_JPRB,.685E-02_JPRB,.664E-02_JPRB,.689E-02_JPRB,.718E-02_JPRB,&
475&.758E-02_JPRB,.680E-02_JPRB,.601E-02_JPRB,.429E-02_JPRB,.405E-02_JPRB,.425E-02_JPRB,.669E-02_JPRB,&
476&.109E-01_JPRB,.140E-01_JPRB,.182E-01_JPRB,.158E-01_JPRB,.133E-01_JPRB,.865E-02_JPRB,.610E-02_JPRB,&
477&.493E-02_JPRB,.389E-02_JPRB,.275E-02_JPRB,.226E-02_JPRB,.179E-02_JPRB,.158E-02_JPRB,.151E-02_JPRB,&
478&.144E-02_JPRB,.131E-02_JPRB/)
479!-- Black Carbon Aerosol     month:  7 --- lat: 32 -34.0
480ZAER (:,32, 7) = (/&
481&.151E-02_JPRB,.151E-02_JPRB,.142E-02_JPRB,.136E-02_JPRB,.132E-02_JPRB,.132E-02_JPRB,.136E-02_JPRB,&
482&.138E-02_JPRB,.140E-02_JPRB,.144E-02_JPRB,.153E-02_JPRB,.179E-02_JPRB,.207E-02_JPRB,.209E-02_JPRB,&
483&.188E-02_JPRB,.173E-02_JPRB,.185E-02_JPRB,.216E-02_JPRB,.263E-02_JPRB,.272E-02_JPRB,.274E-02_JPRB,&
484&.234E-02_JPRB,.197E-02_JPRB,.157E-02_JPRB,.115E-02_JPRB,.110E-02_JPRB,.105E-02_JPRB,.108E-02_JPRB,&
485&.119E-02_JPRB,.130E-02_JPRB,.160E-02_JPRB,.191E-02_JPRB,.219E-02_JPRB,.270E-02_JPRB,.303E-02_JPRB,&
486&.326E-02_JPRB,.352E-02_JPRB,.443E-02_JPRB,.508E-02_JPRB,.595E-02_JPRB,.798E-02_JPRB,.974E-02_JPRB,&
487&.121E-01_JPRB,.118E-01_JPRB,.104E-01_JPRB,.860E-02_JPRB,.782E-02_JPRB,.795E-02_JPRB,.814E-02_JPRB,&
488&.790E-02_JPRB,.659E-02_JPRB,.534E-02_JPRB,.363E-02_JPRB,.345E-02_JPRB,.359E-02_JPRB,.525E-02_JPRB,&
489&.921E-02_JPRB,.126E-01_JPRB,.185E-01_JPRB,.176E-01_JPRB,.157E-01_JPRB,.113E-01_JPRB,.794E-02_JPRB,&
490&.621E-02_JPRB,.442E-02_JPRB,.296E-02_JPRB,.246E-02_JPRB,.207E-02_JPRB,.188E-02_JPRB,.178E-02_JPRB,&
491&.167E-02_JPRB,.152E-02_JPRB/)
492!-- Black Carbon Aerosol     month:  7 --- lat: 33 -38.0
493ZAER (:,33, 7) = (/&
494&.179E-02_JPRB,.178E-02_JPRB,.167E-02_JPRB,.158E-02_JPRB,.151E-02_JPRB,.145E-02_JPRB,.146E-02_JPRB,&
495&.146E-02_JPRB,.148E-02_JPRB,.153E-02_JPRB,.161E-02_JPRB,.181E-02_JPRB,.193E-02_JPRB,.189E-02_JPRB,&
496&.168E-02_JPRB,.165E-02_JPRB,.182E-02_JPRB,.217E-02_JPRB,.271E-02_JPRB,.284E-02_JPRB,.293E-02_JPRB,&
497&.261E-02_JPRB,.222E-02_JPRB,.179E-02_JPRB,.123E-02_JPRB,.114E-02_JPRB,.107E-02_JPRB,.107E-02_JPRB,&
498&.116E-02_JPRB,.126E-02_JPRB,.153E-02_JPRB,.183E-02_JPRB,.215E-02_JPRB,.287E-02_JPRB,.352E-02_JPRB,&
499&.407E-02_JPRB,.497E-02_JPRB,.701E-02_JPRB,.842E-02_JPRB,.103E-01_JPRB,.128E-01_JPRB,.148E-01_JPRB,&
500&.173E-01_JPRB,.154E-01_JPRB,.136E-01_JPRB,.114E-01_JPRB,.101E-01_JPRB,.981E-02_JPRB,.961E-02_JPRB,&
501&.828E-02_JPRB,.684E-02_JPRB,.550E-02_JPRB,.396E-02_JPRB,.374E-02_JPRB,.369E-02_JPRB,.436E-02_JPRB,&
502&.713E-02_JPRB,.988E-02_JPRB,.155E-01_JPRB,.165E-01_JPRB,.160E-01_JPRB,.134E-01_JPRB,.965E-02_JPRB,&
503&.746E-02_JPRB,.490E-02_JPRB,.317E-02_JPRB,.268E-02_JPRB,.237E-02_JPRB,.219E-02_JPRB,.207E-02_JPRB,&
504&.194E-02_JPRB,.179E-02_JPRB/)
505!-- Black Carbon Aerosol     month:  7 --- lat: 34 -42.0
506ZAER (:,34, 7) = (/&
507&.203E-02_JPRB,.202E-02_JPRB,.188E-02_JPRB,.179E-02_JPRB,.170E-02_JPRB,.160E-02_JPRB,.156E-02_JPRB,&
508&.154E-02_JPRB,.154E-02_JPRB,.158E-02_JPRB,.163E-02_JPRB,.177E-02_JPRB,.178E-02_JPRB,.173E-02_JPRB,&
509&.156E-02_JPRB,.157E-02_JPRB,.173E-02_JPRB,.203E-02_JPRB,.246E-02_JPRB,.261E-02_JPRB,.273E-02_JPRB,&
510&.260E-02_JPRB,.231E-02_JPRB,.198E-02_JPRB,.137E-02_JPRB,.123E-02_JPRB,.111E-02_JPRB,.105E-02_JPRB,&
511&.109E-02_JPRB,.114E-02_JPRB,.133E-02_JPRB,.156E-02_JPRB,.184E-02_JPRB,.261E-02_JPRB,.383E-02_JPRB,&
512&.500E-02_JPRB,.715E-02_JPRB,.116E-01_JPRB,.148E-01_JPRB,.192E-01_JPRB,.218E-01_JPRB,.230E-01_JPRB,&
513&.241E-01_JPRB,.204E-01_JPRB,.182E-01_JPRB,.157E-01_JPRB,.132E-01_JPRB,.122E-01_JPRB,.113E-01_JPRB,&
514&.914E-02_JPRB,.782E-02_JPRB,.659E-02_JPRB,.512E-02_JPRB,.466E-02_JPRB,.435E-02_JPRB,.431E-02_JPRB,&
515&.573E-02_JPRB,.738E-02_JPRB,.112E-01_JPRB,.131E-01_JPRB,.136E-01_JPRB,.129E-01_JPRB,.986E-02_JPRB,&
516&.785E-02_JPRB,.530E-02_JPRB,.351E-02_JPRB,.297E-02_JPRB,.261E-02_JPRB,.241E-02_JPRB,.229E-02_JPRB,&
517&.217E-02_JPRB,.203E-02_JPRB/)
518!-- Black Carbon Aerosol     month:  7 --- lat: 35 -46.0
519ZAER (:,35, 7) = (/&
520&.213E-02_JPRB,.213E-02_JPRB,.195E-02_JPRB,.185E-02_JPRB,.176E-02_JPRB,.165E-02_JPRB,.159E-02_JPRB,&
521&.156E-02_JPRB,.154E-02_JPRB,.156E-02_JPRB,.158E-02_JPRB,.164E-02_JPRB,.162E-02_JPRB,.158E-02_JPRB,&
522&.150E-02_JPRB,.153E-02_JPRB,.162E-02_JPRB,.179E-02_JPRB,.197E-02_JPRB,.206E-02_JPRB,.216E-02_JPRB,&
523&.219E-02_JPRB,.206E-02_JPRB,.190E-02_JPRB,.146E-02_JPRB,.132E-02_JPRB,.119E-02_JPRB,.108E-02_JPRB,&
524&.106E-02_JPRB,.105E-02_JPRB,.114E-02_JPRB,.129E-02_JPRB,.150E-02_JPRB,.215E-02_JPRB,.379E-02_JPRB,&
525&.553E-02_JPRB,.895E-02_JPRB,.166E-01_JPRB,.226E-01_JPRB,.313E-01_JPRB,.329E-01_JPRB,.321E-01_JPRB,&
526&.302E-01_JPRB,.258E-01_JPRB,.231E-01_JPRB,.203E-01_JPRB,.163E-01_JPRB,.146E-01_JPRB,.130E-01_JPRB,&
527&.103E-01_JPRB,.919E-02_JPRB,.809E-02_JPRB,.667E-02_JPRB,.585E-02_JPRB,.522E-02_JPRB,.460E-02_JPRB,&
528&.502E-02_JPRB,.568E-02_JPRB,.756E-02_JPRB,.894E-02_JPRB,.950E-02_JPRB,.958E-02_JPRB,.830E-02_JPRB,&
529&.717E-02_JPRB,.550E-02_JPRB,.402E-02_JPRB,.344E-02_JPRB,.293E-02_JPRB,.258E-02_JPRB,.244E-02_JPRB,&
530&.230E-02_JPRB,.214E-02_JPRB/)
531!-- Black Carbon Aerosol     month:  7 --- lat: 36 -50.0
532ZAER (:,36, 7) = (/&
533&.207E-02_JPRB,.207E-02_JPRB,.184E-02_JPRB,.173E-02_JPRB,.163E-02_JPRB,.154E-02_JPRB,.150E-02_JPRB,&
534&.148E-02_JPRB,.147E-02_JPRB,.147E-02_JPRB,.146E-02_JPRB,.145E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,&
535&.143E-02_JPRB,.148E-02_JPRB,.151E-02_JPRB,.155E-02_JPRB,.153E-02_JPRB,.153E-02_JPRB,.153E-02_JPRB,&
536&.157E-02_JPRB,.156E-02_JPRB,.154E-02_JPRB,.143E-02_JPRB,.135E-02_JPRB,.127E-02_JPRB,.114E-02_JPRB,&
537&.110E-02_JPRB,.107E-02_JPRB,.110E-02_JPRB,.119E-02_JPRB,.136E-02_JPRB,.195E-02_JPRB,.392E-02_JPRB,&
538&.594E-02_JPRB,.983E-02_JPRB,.191E-01_JPRB,.267E-01_JPRB,.382E-01_JPRB,.385E-01_JPRB,.363E-01_JPRB,&
539&.320E-01_JPRB,.272E-01_JPRB,.247E-01_JPRB,.221E-01_JPRB,.179E-01_JPRB,.160E-01_JPRB,.141E-01_JPRB,&
540&.114E-01_JPRB,.105E-01_JPRB,.954E-02_JPRB,.806E-02_JPRB,.696E-02_JPRB,.606E-02_JPRB,.491E-02_JPRB,&
541&.469E-02_JPRB,.471E-02_JPRB,.524E-02_JPRB,.583E-02_JPRB,.611E-02_JPRB,.627E-02_JPRB,.627E-02_JPRB,&
542&.596E-02_JPRB,.532E-02_JPRB,.433E-02_JPRB,.384E-02_JPRB,.332E-02_JPRB,.276E-02_JPRB,.254E-02_JPRB,&
543&.233E-02_JPRB,.208E-02_JPRB/)
544!-- Black Carbon Aerosol     month:  7 --- lat: 37 -54.0
545ZAER (:,37, 7) = (/&
546&.189E-02_JPRB,.189E-02_JPRB,.163E-02_JPRB,.152E-02_JPRB,.142E-02_JPRB,.135E-02_JPRB,.134E-02_JPRB,&
547&.133E-02_JPRB,.133E-02_JPRB,.133E-02_JPRB,.133E-02_JPRB,.132E-02_JPRB,.130E-02_JPRB,.131E-02_JPRB,&
548&.135E-02_JPRB,.140E-02_JPRB,.139E-02_JPRB,.136E-02_JPRB,.128E-02_JPRB,.124E-02_JPRB,.121E-02_JPRB,&
549&.118E-02_JPRB,.120E-02_JPRB,.122E-02_JPRB,.128E-02_JPRB,.127E-02_JPRB,.125E-02_JPRB,.116E-02_JPRB,&
550&.113E-02_JPRB,.113E-02_JPRB,.119E-02_JPRB,.130E-02_JPRB,.148E-02_JPRB,.202E-02_JPRB,.358E-02_JPRB,&
551&.519E-02_JPRB,.826E-02_JPRB,.149E-01_JPRB,.204E-01_JPRB,.286E-01_JPRB,.298E-01_JPRB,.285E-01_JPRB,&
552&.257E-01_JPRB,.225E-01_JPRB,.206E-01_JPRB,.186E-01_JPRB,.155E-01_JPRB,.142E-01_JPRB,.130E-01_JPRB,&
553&.110E-01_JPRB,.102E-01_JPRB,.945E-02_JPRB,.806E-02_JPRB,.691E-02_JPRB,.596E-02_JPRB,.468E-02_JPRB,&
554&.426E-02_JPRB,.404E-02_JPRB,.403E-02_JPRB,.411E-02_JPRB,.415E-02_JPRB,.418E-02_JPRB,.446E-02_JPRB,&
555&.451E-02_JPRB,.447E-02_JPRB,.408E-02_JPRB,.379E-02_JPRB,.342E-02_JPRB,.278E-02_JPRB,.249E-02_JPRB,&
556&.221E-02_JPRB,.190E-02_JPRB/)
557!-- Black Carbon Aerosol     month:  7 --- lat: 38 -58.0
558ZAER (:,38, 7) = (/&
559&.168E-02_JPRB,.167E-02_JPRB,.144E-02_JPRB,.135E-02_JPRB,.128E-02_JPRB,.121E-02_JPRB,.120E-02_JPRB,&
560&.120E-02_JPRB,.120E-02_JPRB,.122E-02_JPRB,.123E-02_JPRB,.125E-02_JPRB,.127E-02_JPRB,.129E-02_JPRB,&
561&.132E-02_JPRB,.131E-02_JPRB,.128E-02_JPRB,.122E-02_JPRB,.114E-02_JPRB,.111E-02_JPRB,.107E-02_JPRB,&
562&.105E-02_JPRB,.107E-02_JPRB,.109E-02_JPRB,.112E-02_JPRB,.110E-02_JPRB,.108E-02_JPRB,.101E-02_JPRB,&
563&.102E-02_JPRB,.104E-02_JPRB,.118E-02_JPRB,.140E-02_JPRB,.162E-02_JPRB,.210E-02_JPRB,.285E-02_JPRB,&
564&.354E-02_JPRB,.474E-02_JPRB,.721E-02_JPRB,.937E-02_JPRB,.127E-01_JPRB,.148E-01_JPRB,.152E-01_JPRB,&
565&.151E-01_JPRB,.140E-01_JPRB,.131E-01_JPRB,.120E-01_JPRB,.103E-01_JPRB,.982E-02_JPRB,.939E-02_JPRB,&
566&.857E-02_JPRB,.803E-02_JPRB,.750E-02_JPRB,.650E-02_JPRB,.570E-02_JPRB,.502E-02_JPRB,.405E-02_JPRB,&
567&.368E-02_JPRB,.347E-02_JPRB,.338E-02_JPRB,.331E-02_JPRB,.326E-02_JPRB,.322E-02_JPRB,.330E-02_JPRB,&
568&.338E-02_JPRB,.350E-02_JPRB,.351E-02_JPRB,.339E-02_JPRB,.319E-02_JPRB,.263E-02_JPRB,.234E-02_JPRB,&
569&.203E-02_JPRB,.169E-02_JPRB/)
570!-- Black Carbon Aerosol     month:  7 --- lat: 39 -62.0
571ZAER (:,39, 7) = (/&
572&.145E-02_JPRB,.144E-02_JPRB,.130E-02_JPRB,.125E-02_JPRB,.122E-02_JPRB,.118E-02_JPRB,.116E-02_JPRB,&
573&.115E-02_JPRB,.114E-02_JPRB,.116E-02_JPRB,.117E-02_JPRB,.121E-02_JPRB,.125E-02_JPRB,.126E-02_JPRB,&
574&.127E-02_JPRB,.123E-02_JPRB,.119E-02_JPRB,.113E-02_JPRB,.107E-02_JPRB,.105E-02_JPRB,.103E-02_JPRB,&
575&.104E-02_JPRB,.104E-02_JPRB,.105E-02_JPRB,.100E-02_JPRB,.953E-03_JPRB,.906E-03_JPRB,.841E-03_JPRB,&
576&.852E-03_JPRB,.879E-03_JPRB,.103E-02_JPRB,.131E-02_JPRB,.157E-02_JPRB,.209E-02_JPRB,.251E-02_JPRB,&
577&.283E-02_JPRB,.329E-02_JPRB,.432E-02_JPRB,.531E-02_JPRB,.693E-02_JPRB,.833E-02_JPRB,.855E-02_JPRB,&
578&.843E-02_JPRB,.742E-02_JPRB,.691E-02_JPRB,.637E-02_JPRB,.588E-02_JPRB,.580E-02_JPRB,.574E-02_JPRB,&
579&.563E-02_JPRB,.548E-02_JPRB,.532E-02_JPRB,.491E-02_JPRB,.451E-02_JPRB,.416E-02_JPRB,.359E-02_JPRB,&
580&.332E-02_JPRB,.314E-02_JPRB,.299E-02_JPRB,.288E-02_JPRB,.282E-02_JPRB,.275E-02_JPRB,.276E-02_JPRB,&
581&.278E-02_JPRB,.283E-02_JPRB,.282E-02_JPRB,.274E-02_JPRB,.262E-02_JPRB,.221E-02_JPRB,.198E-02_JPRB,&
582&.173E-02_JPRB,.146E-02_JPRB/)
583!-- Black Carbon Aerosol     month:  7 --- lat: 40 -66.0
584ZAER (:,40, 7) = (/&
585&.130E-02_JPRB,.129E-02_JPRB,.122E-02_JPRB,.121E-02_JPRB,.121E-02_JPRB,.121E-02_JPRB,.120E-02_JPRB,&
586&.119E-02_JPRB,.119E-02_JPRB,.119E-02_JPRB,.120E-02_JPRB,.122E-02_JPRB,.123E-02_JPRB,.124E-02_JPRB,&
587&.123E-02_JPRB,.118E-02_JPRB,.115E-02_JPRB,.111E-02_JPRB,.107E-02_JPRB,.105E-02_JPRB,.103E-02_JPRB,&
588&.102E-02_JPRB,.100E-02_JPRB,.981E-03_JPRB,.908E-03_JPRB,.865E-03_JPRB,.823E-03_JPRB,.777E-03_JPRB,&
589&.785E-03_JPRB,.806E-03_JPRB,.928E-03_JPRB,.115E-02_JPRB,.136E-02_JPRB,.179E-02_JPRB,.220E-02_JPRB,&
590&.255E-02_JPRB,.311E-02_JPRB,.392E-02_JPRB,.454E-02_JPRB,.540E-02_JPRB,.599E-02_JPRB,.599E-02_JPRB,&
591&.577E-02_JPRB,.494E-02_JPRB,.455E-02_JPRB,.415E-02_JPRB,.396E-02_JPRB,.397E-02_JPRB,.400E-02_JPRB,&
592&.405E-02_JPRB,.402E-02_JPRB,.399E-02_JPRB,.386E-02_JPRB,.369E-02_JPRB,.352E-02_JPRB,.321E-02_JPRB,&
593&.300E-02_JPRB,.286E-02_JPRB,.268E-02_JPRB,.255E-02_JPRB,.247E-02_JPRB,.237E-02_JPRB,.230E-02_JPRB,&
594&.226E-02_JPRB,.221E-02_JPRB,.213E-02_JPRB,.206E-02_JPRB,.196E-02_JPRB,.173E-02_JPRB,.160E-02_JPRB,&
595&.147E-02_JPRB,.130E-02_JPRB/)
596!-- Black Carbon Aerosol     month:  7 --- lat: 41 -70.0
597ZAER (:,41, 7) = (/&
598&.130E-02_JPRB,.130E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,&
599&.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,&
600&.125E-02_JPRB,.122E-02_JPRB,.120E-02_JPRB,.116E-02_JPRB,.111E-02_JPRB,.108E-02_JPRB,.104E-02_JPRB,&
601&.990E-03_JPRB,.956E-03_JPRB,.921E-03_JPRB,.854E-03_JPRB,.823E-03_JPRB,.794E-03_JPRB,.763E-03_JPRB,&
602&.769E-03_JPRB,.782E-03_JPRB,.860E-03_JPRB,.100E-02_JPRB,.114E-02_JPRB,.145E-02_JPRB,.181E-02_JPRB,&
603&.211E-02_JPRB,.260E-02_JPRB,.314E-02_JPRB,.347E-02_JPRB,.388E-02_JPRB,.400E-02_JPRB,.392E-02_JPRB,&
604&.372E-02_JPRB,.331E-02_JPRB,.314E-02_JPRB,.298E-02_JPRB,.294E-02_JPRB,.298E-02_JPRB,.301E-02_JPRB,&
605&.310E-02_JPRB,.312E-02_JPRB,.313E-02_JPRB,.309E-02_JPRB,.301E-02_JPRB,.292E-02_JPRB,.274E-02_JPRB,&
606&.261E-02_JPRB,.252E-02_JPRB,.238E-02_JPRB,.227E-02_JPRB,.219E-02_JPRB,.208E-02_JPRB,.198E-02_JPRB,&
607&.192E-02_JPRB,.185E-02_JPRB,.175E-02_JPRB,.169E-02_JPRB,.162E-02_JPRB,.150E-02_JPRB,.144E-02_JPRB,&
608&.138E-02_JPRB,.130E-02_JPRB/)
609!-- Black Carbon Aerosol     month:  7 --- lat: 42 -74.0
610ZAER (:,42, 7) = (/&
611&.140E-02_JPRB,.140E-02_JPRB,.137E-02_JPRB,.137E-02_JPRB,.136E-02_JPRB,.135E-02_JPRB,.135E-02_JPRB,&
612&.134E-02_JPRB,.133E-02_JPRB,.133E-02_JPRB,.132E-02_JPRB,.132E-02_JPRB,.131E-02_JPRB,.130E-02_JPRB,&
613&.128E-02_JPRB,.125E-02_JPRB,.122E-02_JPRB,.118E-02_JPRB,.112E-02_JPRB,.108E-02_JPRB,.104E-02_JPRB,&
614&.974E-03_JPRB,.940E-03_JPRB,.905E-03_JPRB,.852E-03_JPRB,.831E-03_JPRB,.811E-03_JPRB,.793E-03_JPRB,&
615&.800E-03_JPRB,.811E-03_JPRB,.864E-03_JPRB,.950E-03_JPRB,.104E-02_JPRB,.122E-02_JPRB,.145E-02_JPRB,&
616&.163E-02_JPRB,.191E-02_JPRB,.219E-02_JPRB,.235E-02_JPRB,.252E-02_JPRB,.257E-02_JPRB,.254E-02_JPRB,&
617&.248E-02_JPRB,.237E-02_JPRB,.233E-02_JPRB,.230E-02_JPRB,.230E-02_JPRB,.232E-02_JPRB,.234E-02_JPRB,&
618&.237E-02_JPRB,.238E-02_JPRB,.239E-02_JPRB,.238E-02_JPRB,.234E-02_JPRB,.231E-02_JPRB,.223E-02_JPRB,&
619&.217E-02_JPRB,.212E-02_JPRB,.205E-02_JPRB,.199E-02_JPRB,.194E-02_JPRB,.188E-02_JPRB,.180E-02_JPRB,&
620&.176E-02_JPRB,.170E-02_JPRB,.164E-02_JPRB,.160E-02_JPRB,.156E-02_JPRB,.150E-02_JPRB,.147E-02_JPRB,&
621&.144E-02_JPRB,.140E-02_JPRB/)
622!-- Black Carbon Aerosol     month:  7 --- lat: 43 -78.0
623ZAER (:,43, 7) = (/&
624&.148E-02_JPRB,.148E-02_JPRB,.145E-02_JPRB,.144E-02_JPRB,.143E-02_JPRB,.141E-02_JPRB,.140E-02_JPRB,&
625&.138E-02_JPRB,.136E-02_JPRB,.135E-02_JPRB,.134E-02_JPRB,.131E-02_JPRB,.129E-02_JPRB,.128E-02_JPRB,&
626&.125E-02_JPRB,.121E-02_JPRB,.119E-02_JPRB,.115E-02_JPRB,.111E-02_JPRB,.108E-02_JPRB,.104E-02_JPRB,&
627&.992E-03_JPRB,.967E-03_JPRB,.942E-03_JPRB,.906E-03_JPRB,.894E-03_JPRB,.883E-03_JPRB,.876E-03_JPRB,&
628&.885E-03_JPRB,.895E-03_JPRB,.933E-03_JPRB,.984E-03_JPRB,.103E-02_JPRB,.112E-02_JPRB,.123E-02_JPRB,&
629&.132E-02_JPRB,.144E-02_JPRB,.156E-02_JPRB,.163E-02_JPRB,.171E-02_JPRB,.177E-02_JPRB,.179E-02_JPRB,&
630&.180E-02_JPRB,.181E-02_JPRB,.182E-02_JPRB,.182E-02_JPRB,.184E-02_JPRB,.185E-02_JPRB,.185E-02_JPRB,&
631&.187E-02_JPRB,.187E-02_JPRB,.187E-02_JPRB,.187E-02_JPRB,.185E-02_JPRB,.184E-02_JPRB,.182E-02_JPRB,&
632&.180E-02_JPRB,.179E-02_JPRB,.177E-02_JPRB,.175E-02_JPRB,.173E-02_JPRB,.171E-02_JPRB,.168E-02_JPRB,&
633&.166E-02_JPRB,.164E-02_JPRB,.161E-02_JPRB,.159E-02_JPRB,.157E-02_JPRB,.154E-02_JPRB,.152E-02_JPRB,&
634&.151E-02_JPRB,.148E-02_JPRB/)
635!-- Black Carbon Aerosol     month:  7 --- lat: 44 -82.0
636ZAER (:,44, 7) = (/&
637&.146E-02_JPRB,.146E-02_JPRB,.144E-02_JPRB,.143E-02_JPRB,.142E-02_JPRB,.140E-02_JPRB,.139E-02_JPRB,&
638&.138E-02_JPRB,.135E-02_JPRB,.134E-02_JPRB,.132E-02_JPRB,.130E-02_JPRB,.129E-02_JPRB,.127E-02_JPRB,&
639&.125E-02_JPRB,.122E-02_JPRB,.121E-02_JPRB,.119E-02_JPRB,.116E-02_JPRB,.114E-02_JPRB,.113E-02_JPRB,&
640&.110E-02_JPRB,.109E-02_JPRB,.108E-02_JPRB,.106E-02_JPRB,.106E-02_JPRB,.105E-02_JPRB,.105E-02_JPRB,&
641&.106E-02_JPRB,.107E-02_JPRB,.109E-02_JPRB,.111E-02_JPRB,.113E-02_JPRB,.116E-02_JPRB,.120E-02_JPRB,&
642&.123E-02_JPRB,.128E-02_JPRB,.132E-02_JPRB,.135E-02_JPRB,.138E-02_JPRB,.142E-02_JPRB,.144E-02_JPRB,&
643&.147E-02_JPRB,.149E-02_JPRB,.150E-02_JPRB,.152E-02_JPRB,.153E-02_JPRB,.154E-02_JPRB,.155E-02_JPRB,&
644&.156E-02_JPRB,.156E-02_JPRB,.157E-02_JPRB,.157E-02_JPRB,.157E-02_JPRB,.157E-02_JPRB,.157E-02_JPRB,&
645&.157E-02_JPRB,.157E-02_JPRB,.157E-02_JPRB,.157E-02_JPRB,.156E-02_JPRB,.155E-02_JPRB,.155E-02_JPRB,&
646&.155E-02_JPRB,.154E-02_JPRB,.153E-02_JPRB,.152E-02_JPRB,.151E-02_JPRB,.150E-02_JPRB,.149E-02_JPRB,&
647&.148E-02_JPRB,.146E-02_JPRB/)
648!-- Black Carbon Aerosol     month:  7 --- lat: 45 -86.0
649ZAER (:,45, 7) = (/&
650&.139E-02_JPRB,.139E-02_JPRB,.138E-02_JPRB,.138E-02_JPRB,.137E-02_JPRB,.136E-02_JPRB,.136E-02_JPRB,&
651&.135E-02_JPRB,.134E-02_JPRB,.133E-02_JPRB,.133E-02_JPRB,.132E-02_JPRB,.131E-02_JPRB,.130E-02_JPRB,&
652&.129E-02_JPRB,.129E-02_JPRB,.128E-02_JPRB,.127E-02_JPRB,.126E-02_JPRB,.126E-02_JPRB,.125E-02_JPRB,&
653&.125E-02_JPRB,.125E-02_JPRB,.124E-02_JPRB,.124E-02_JPRB,.124E-02_JPRB,.124E-02_JPRB,.124E-02_JPRB,&
654&.124E-02_JPRB,.124E-02_JPRB,.125E-02_JPRB,.125E-02_JPRB,.126E-02_JPRB,.127E-02_JPRB,.127E-02_JPRB,&
655&.128E-02_JPRB,.129E-02_JPRB,.130E-02_JPRB,.131E-02_JPRB,.132E-02_JPRB,.133E-02_JPRB,.134E-02_JPRB,&
656&.135E-02_JPRB,.136E-02_JPRB,.137E-02_JPRB,.138E-02_JPRB,.138E-02_JPRB,.139E-02_JPRB,.139E-02_JPRB,&
657&.140E-02_JPRB,.141E-02_JPRB,.141E-02_JPRB,.141E-02_JPRB,.141E-02_JPRB,.141E-02_JPRB,.142E-02_JPRB,&
658&.142E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,&
659&.142E-02_JPRB,.142E-02_JPRB,.141E-02_JPRB,.141E-02_JPRB,.141E-02_JPRB,.140E-02_JPRB,.140E-02_JPRB,&
660&.140E-02_JPRB,.139E-02_JPRB/)
661!-- Black Carbon Aerosol     month:  7 --- lat: 46 -90.0
662ZAER (:,46, 7) = (/&
663&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
664&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
665&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
666&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
667&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
668&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
669&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
670&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
671&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
672&.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,.134E-02_JPRB,&
673&.134E-02_JPRB,.134E-02_JPRB/)
674
675
676!     ------------------------------------------------------------------
677
678!ZMAX=-1.E+8_JPRB
679!ZMIN= 1.E+8_JPRB
680   JM=7   
681  DO JI=1,46
682    DO JL=1,72
683      RAERBC(JL,JI,JM)=ZAER(JL,JI,JM)
684!      ZMAX=MAX(ZMAX,ZAER(JL,JI,JM))
685!      ZMIN=MIN(ZMIN,ZAER(JL,JI,JM))
686    ENDDO
687  ENDDO
688
689!PRINT 9000,ZMIN,ZMAX
6909000 FORMAT(1x,'BLACK CARBON AEROSOLS ',2E12.5)
691
692!     ------------------------------------------------------------------
693
694RETURN
695END SUBROUTINE SUECAEBC_07
Note: See TracBrowser for help on using the repository browser.