source: dynamico_lmdz/aquaplanet/LMDZ5/libf/phymar/suecaesd_07.F90 @ 4031

Last change on this file since 4031 was 3990, checked in by millour, 8 years ago

An updated LMDZ5 (based on LMDZ rev 2786) to play with.
EM

File size: 52.1 KB
Line 
1SUBROUTINE SUECAESD_07
2
3!**   OPTICAL THICKNESS OF AEROSOLS OF SOIL-DUST ORIGIN
4!                                      July
5
6!     PURPOSE.
7!     --------
8
9!**   INTERFACE.
10!     ----------
11!        CALL *SUECAESD* 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 : RAERSD
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!-- Total Soil Dust Aerosol  month:  7 --- lat:  1  90.0
77ZAER (:, 1, 7) = (/&
78&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
79&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
80&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
81&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
82&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
83&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
84&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
85&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
86&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
87&.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,.122E-02_JPRB,&
88&.122E-02_JPRB,.122E-02_JPRB/)
89!-- Total Soil Dust Aerosol  month:  7 --- lat:  2  86.0
90ZAER (:, 2, 7) = (/&
91&.120E-02_JPRB,.119E-02_JPRB,.119E-02_JPRB,.118E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.116E-02_JPRB,&
92&.116E-02_JPRB,.117E-02_JPRB,.118E-02_JPRB,.119E-02_JPRB,.121E-02_JPRB,.122E-02_JPRB,.123E-02_JPRB,&
93&.124E-02_JPRB,.126E-02_JPRB,.127E-02_JPRB,.128E-02_JPRB,.129E-02_JPRB,.129E-02_JPRB,.129E-02_JPRB,&
94&.129E-02_JPRB,.128E-02_JPRB,.129E-02_JPRB,.129E-02_JPRB,.130E-02_JPRB,.130E-02_JPRB,.130E-02_JPRB,&
95&.129E-02_JPRB,.129E-02_JPRB,.128E-02_JPRB,.126E-02_JPRB,.125E-02_JPRB,.124E-02_JPRB,.124E-02_JPRB,&
96&.122E-02_JPRB,.121E-02_JPRB,.120E-02_JPRB,.120E-02_JPRB,.119E-02_JPRB,.118E-02_JPRB,.117E-02_JPRB,&
97&.116E-02_JPRB,.116E-02_JPRB,.116E-02_JPRB,.116E-02_JPRB,.115E-02_JPRB,.115E-02_JPRB,.116E-02_JPRB,&
98&.116E-02_JPRB,.116E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.118E-02_JPRB,.118E-02_JPRB,&
99&.117E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.116E-02_JPRB,.116E-02_JPRB,&
100&.117E-02_JPRB,.117E-02_JPRB,.118E-02_JPRB,.118E-02_JPRB,.119E-02_JPRB,.119E-02_JPRB,.119E-02_JPRB,&
101&.120E-02_JPRB,.120E-02_JPRB/)
102!-- Total Soil Dust Aerosol  month:  7 --- lat:  3  82.0
103ZAER (:, 3, 7) = (/&
104&.105E-02_JPRB,.104E-02_JPRB,.103E-02_JPRB,.103E-02_JPRB,.104E-02_JPRB,.104E-02_JPRB,.104E-02_JPRB,&
105&.105E-02_JPRB,.107E-02_JPRB,.109E-02_JPRB,.112E-02_JPRB,.116E-02_JPRB,.121E-02_JPRB,.126E-02_JPRB,&
106&.129E-02_JPRB,.133E-02_JPRB,.136E-02_JPRB,.139E-02_JPRB,.141E-02_JPRB,.142E-02_JPRB,.140E-02_JPRB,&
107&.137E-02_JPRB,.135E-02_JPRB,.133E-02_JPRB,.132E-02_JPRB,.132E-02_JPRB,.134E-02_JPRB,.135E-02_JPRB,&
108&.137E-02_JPRB,.139E-02_JPRB,.141E-02_JPRB,.142E-02_JPRB,.142E-02_JPRB,.141E-02_JPRB,.139E-02_JPRB,&
109&.136E-02_JPRB,.132E-02_JPRB,.127E-02_JPRB,.124E-02_JPRB,.121E-02_JPRB,.118E-02_JPRB,.116E-02_JPRB,&
110&.114E-02_JPRB,.114E-02_JPRB,.115E-02_JPRB,.115E-02_JPRB,.116E-02_JPRB,.116E-02_JPRB,.115E-02_JPRB,&
111&.115E-02_JPRB,.115E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.116E-02_JPRB,.115E-02_JPRB,.114E-02_JPRB,&
112&.113E-02_JPRB,.112E-02_JPRB,.112E-02_JPRB,.113E-02_JPRB,.113E-02_JPRB,.112E-02_JPRB,.112E-02_JPRB,&
113&.113E-02_JPRB,.113E-02_JPRB,.113E-02_JPRB,.113E-02_JPRB,.114E-02_JPRB,.113E-02_JPRB,.112E-02_JPRB,&
114&.110E-02_JPRB,.107E-02_JPRB/)
115!-- Total Soil Dust Aerosol  month:  7 --- lat:  4  78.0
116ZAER (:, 4, 7) = (/&
117&.109E-02_JPRB,.109E-02_JPRB,.109E-02_JPRB,.108E-02_JPRB,.109E-02_JPRB,.110E-02_JPRB,.110E-02_JPRB,&
118&.109E-02_JPRB,.109E-02_JPRB,.109E-02_JPRB,.111E-02_JPRB,.115E-02_JPRB,.121E-02_JPRB,.127E-02_JPRB,&
119&.131E-02_JPRB,.135E-02_JPRB,.139E-02_JPRB,.142E-02_JPRB,.145E-02_JPRB,.145E-02_JPRB,.144E-02_JPRB,&
120&.143E-02_JPRB,.142E-02_JPRB,.139E-02_JPRB,.137E-02_JPRB,.137E-02_JPRB,.141E-02_JPRB,.145E-02_JPRB,&
121&.148E-02_JPRB,.151E-02_JPRB,.152E-02_JPRB,.155E-02_JPRB,.158E-02_JPRB,.158E-02_JPRB,.153E-02_JPRB,&
122&.147E-02_JPRB,.141E-02_JPRB,.134E-02_JPRB,.127E-02_JPRB,.121E-02_JPRB,.117E-02_JPRB,.116E-02_JPRB,&
123&.117E-02_JPRB,.118E-02_JPRB,.120E-02_JPRB,.121E-02_JPRB,.121E-02_JPRB,.120E-02_JPRB,.120E-02_JPRB,&
124&.121E-02_JPRB,.122E-02_JPRB,.121E-02_JPRB,.118E-02_JPRB,.117E-02_JPRB,.115E-02_JPRB,.114E-02_JPRB,&
125&.115E-02_JPRB,.115E-02_JPRB,.116E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,.117E-02_JPRB,&
126&.116E-02_JPRB,.116E-02_JPRB,.114E-02_JPRB,.113E-02_JPRB,.111E-02_JPRB,.109E-02_JPRB,.106E-02_JPRB,&
127&.106E-02_JPRB,.107E-02_JPRB/)
128!-- Total Soil Dust Aerosol  month:  7 --- lat:  5  74.0
129ZAER (:, 5, 7) = (/&
130&.115E-02_JPRB,.119E-02_JPRB,.121E-02_JPRB,.123E-02_JPRB,.130E-02_JPRB,.134E-02_JPRB,.131E-02_JPRB,&
131&.125E-02_JPRB,.121E-02_JPRB,.119E-02_JPRB,.120E-02_JPRB,.120E-02_JPRB,.119E-02_JPRB,.121E-02_JPRB,&
132&.123E-02_JPRB,.125E-02_JPRB,.129E-02_JPRB,.134E-02_JPRB,.140E-02_JPRB,.142E-02_JPRB,.140E-02_JPRB,&
133&.140E-02_JPRB,.144E-02_JPRB,.148E-02_JPRB,.152E-02_JPRB,.158E-02_JPRB,.164E-02_JPRB,.168E-02_JPRB,&
134&.171E-02_JPRB,.173E-02_JPRB,.169E-02_JPRB,.165E-02_JPRB,.165E-02_JPRB,.167E-02_JPRB,.166E-02_JPRB,&
135&.161E-02_JPRB,.153E-02_JPRB,.142E-02_JPRB,.130E-02_JPRB,.124E-02_JPRB,.123E-02_JPRB,.127E-02_JPRB,&
136&.132E-02_JPRB,.136E-02_JPRB,.139E-02_JPRB,.141E-02_JPRB,.140E-02_JPRB,.136E-02_JPRB,.131E-02_JPRB,&
137&.127E-02_JPRB,.128E-02_JPRB,.130E-02_JPRB,.127E-02_JPRB,.124E-02_JPRB,.122E-02_JPRB,.120E-02_JPRB,&
138&.121E-02_JPRB,.121E-02_JPRB,.120E-02_JPRB,.119E-02_JPRB,.118E-02_JPRB,.119E-02_JPRB,.120E-02_JPRB,&
139&.119E-02_JPRB,.118E-02_JPRB,.116E-02_JPRB,.113E-02_JPRB,.109E-02_JPRB,.105E-02_JPRB,.104E-02_JPRB,&
140&.106E-02_JPRB,.110E-02_JPRB/)
141!-- Total Soil Dust Aerosol  month:  7 --- lat:  6  70.0
142ZAER (:, 6, 7) = (/&
143&.135E-02_JPRB,.136E-02_JPRB,.135E-02_JPRB,.136E-02_JPRB,.149E-02_JPRB,.165E-02_JPRB,.172E-02_JPRB,&
144&.162E-02_JPRB,.147E-02_JPRB,.141E-02_JPRB,.139E-02_JPRB,.137E-02_JPRB,.130E-02_JPRB,.125E-02_JPRB,&
145&.121E-02_JPRB,.120E-02_JPRB,.121E-02_JPRB,.126E-02_JPRB,.135E-02_JPRB,.139E-02_JPRB,.140E-02_JPRB,&
146&.143E-02_JPRB,.153E-02_JPRB,.166E-02_JPRB,.170E-02_JPRB,.173E-02_JPRB,.177E-02_JPRB,.177E-02_JPRB,&
147&.179E-02_JPRB,.181E-02_JPRB,.180E-02_JPRB,.179E-02_JPRB,.178E-02_JPRB,.178E-02_JPRB,.174E-02_JPRB,&
148&.169E-02_JPRB,.162E-02_JPRB,.148E-02_JPRB,.135E-02_JPRB,.131E-02_JPRB,.133E-02_JPRB,.140E-02_JPRB,&
149&.147E-02_JPRB,.151E-02_JPRB,.157E-02_JPRB,.163E-02_JPRB,.167E-02_JPRB,.165E-02_JPRB,.156E-02_JPRB,&
150&.145E-02_JPRB,.140E-02_JPRB,.142E-02_JPRB,.141E-02_JPRB,.138E-02_JPRB,.135E-02_JPRB,.132E-02_JPRB,&
151&.129E-02_JPRB,.125E-02_JPRB,.122E-02_JPRB,.120E-02_JPRB,.120E-02_JPRB,.121E-02_JPRB,.123E-02_JPRB,&
152&.123E-02_JPRB,.122E-02_JPRB,.118E-02_JPRB,.113E-02_JPRB,.107E-02_JPRB,.105E-02_JPRB,.107E-02_JPRB,&
153&.118E-02_JPRB,.130E-02_JPRB/)
154!-- Total Soil Dust Aerosol  month:  7 --- lat:  7  66.0
155ZAER (:, 7, 7) = (/&
156&.188E-02_JPRB,.175E-02_JPRB,.165E-02_JPRB,.162E-02_JPRB,.168E-02_JPRB,.185E-02_JPRB,.197E-02_JPRB,&
157&.199E-02_JPRB,.183E-02_JPRB,.171E-02_JPRB,.164E-02_JPRB,.155E-02_JPRB,.145E-02_JPRB,.137E-02_JPRB,&
158&.134E-02_JPRB,.131E-02_JPRB,.126E-02_JPRB,.125E-02_JPRB,.128E-02_JPRB,.131E-02_JPRB,.137E-02_JPRB,&
159&.140E-02_JPRB,.153E-02_JPRB,.181E-02_JPRB,.201E-02_JPRB,.193E-02_JPRB,.176E-02_JPRB,.173E-02_JPRB,&
160&.172E-02_JPRB,.175E-02_JPRB,.180E-02_JPRB,.185E-02_JPRB,.179E-02_JPRB,.176E-02_JPRB,.179E-02_JPRB,&
161&.178E-02_JPRB,.171E-02_JPRB,.162E-02_JPRB,.153E-02_JPRB,.149E-02_JPRB,.149E-02_JPRB,.155E-02_JPRB,&
162&.163E-02_JPRB,.163E-02_JPRB,.168E-02_JPRB,.181E-02_JPRB,.191E-02_JPRB,.191E-02_JPRB,.179E-02_JPRB,&
163&.170E-02_JPRB,.162E-02_JPRB,.157E-02_JPRB,.155E-02_JPRB,.150E-02_JPRB,.146E-02_JPRB,.139E-02_JPRB,&
164&.134E-02_JPRB,.129E-02_JPRB,.123E-02_JPRB,.119E-02_JPRB,.116E-02_JPRB,.116E-02_JPRB,.120E-02_JPRB,&
165&.127E-02_JPRB,.132E-02_JPRB,.133E-02_JPRB,.135E-02_JPRB,.146E-02_JPRB,.162E-02_JPRB,.177E-02_JPRB,&
166&.193E-02_JPRB,.197E-02_JPRB/)
167!-- Total Soil Dust Aerosol  month:  7 --- lat:  8  62.0
168ZAER (:, 8, 7) = (/&
169&.264E-02_JPRB,.243E-02_JPRB,.226E-02_JPRB,.218E-02_JPRB,.215E-02_JPRB,.228E-02_JPRB,.242E-02_JPRB,&
170&.253E-02_JPRB,.246E-02_JPRB,.224E-02_JPRB,.210E-02_JPRB,.195E-02_JPRB,.179E-02_JPRB,.168E-02_JPRB,&
171&.160E-02_JPRB,.152E-02_JPRB,.147E-02_JPRB,.141E-02_JPRB,.134E-02_JPRB,.133E-02_JPRB,.136E-02_JPRB,&
172&.140E-02_JPRB,.149E-02_JPRB,.193E-02_JPRB,.251E-02_JPRB,.249E-02_JPRB,.211E-02_JPRB,.196E-02_JPRB,&
173&.189E-02_JPRB,.192E-02_JPRB,.195E-02_JPRB,.192E-02_JPRB,.177E-02_JPRB,.177E-02_JPRB,.186E-02_JPRB,&
174&.192E-02_JPRB,.189E-02_JPRB,.188E-02_JPRB,.184E-02_JPRB,.180E-02_JPRB,.178E-02_JPRB,.178E-02_JPRB,&
175&.187E-02_JPRB,.181E-02_JPRB,.186E-02_JPRB,.201E-02_JPRB,.213E-02_JPRB,.216E-02_JPRB,.208E-02_JPRB,&
176&.198E-02_JPRB,.189E-02_JPRB,.182E-02_JPRB,.178E-02_JPRB,.168E-02_JPRB,.159E-02_JPRB,.149E-02_JPRB,&
177&.143E-02_JPRB,.138E-02_JPRB,.130E-02_JPRB,.123E-02_JPRB,.118E-02_JPRB,.115E-02_JPRB,.119E-02_JPRB,&
178&.130E-02_JPRB,.148E-02_JPRB,.180E-02_JPRB,.249E-02_JPRB,.308E-02_JPRB,.321E-02_JPRB,.313E-02_JPRB,&
179&.298E-02_JPRB,.285E-02_JPRB/)
180!-- Total Soil Dust Aerosol  month:  7 --- lat:  9  58.0
181ZAER (:, 9, 7) = (/&
182&.423E-02_JPRB,.391E-02_JPRB,.368E-02_JPRB,.341E-02_JPRB,.316E-02_JPRB,.308E-02_JPRB,.299E-02_JPRB,&
183&.284E-02_JPRB,.273E-02_JPRB,.260E-02_JPRB,.254E-02_JPRB,.246E-02_JPRB,.236E-02_JPRB,.229E-02_JPRB,&
184&.218E-02_JPRB,.205E-02_JPRB,.194E-02_JPRB,.177E-02_JPRB,.164E-02_JPRB,.157E-02_JPRB,.153E-02_JPRB,&
185&.158E-02_JPRB,.180E-02_JPRB,.234E-02_JPRB,.324E-02_JPRB,.327E-02_JPRB,.275E-02_JPRB,.261E-02_JPRB,&
186&.246E-02_JPRB,.242E-02_JPRB,.240E-02_JPRB,.248E-02_JPRB,.260E-02_JPRB,.273E-02_JPRB,.265E-02_JPRB,&
187&.243E-02_JPRB,.232E-02_JPRB,.232E-02_JPRB,.238E-02_JPRB,.234E-02_JPRB,.225E-02_JPRB,.216E-02_JPRB,&
188&.219E-02_JPRB,.209E-02_JPRB,.204E-02_JPRB,.214E-02_JPRB,.226E-02_JPRB,.231E-02_JPRB,.230E-02_JPRB,&
189&.228E-02_JPRB,.222E-02_JPRB,.214E-02_JPRB,.210E-02_JPRB,.202E-02_JPRB,.194E-02_JPRB,.185E-02_JPRB,&
190&.177E-02_JPRB,.172E-02_JPRB,.165E-02_JPRB,.153E-02_JPRB,.142E-02_JPRB,.138E-02_JPRB,.141E-02_JPRB,&
191&.157E-02_JPRB,.195E-02_JPRB,.270E-02_JPRB,.428E-02_JPRB,.529E-02_JPRB,.547E-02_JPRB,.529E-02_JPRB,&
192&.496E-02_JPRB,.460E-02_JPRB/)
193!-- Total Soil Dust Aerosol  month:  7 --- lat: 10  54.0
194ZAER (:,10, 7) = (/&
195&.597E-02_JPRB,.544E-02_JPRB,.516E-02_JPRB,.464E-02_JPRB,.412E-02_JPRB,.352E-02_JPRB,.316E-02_JPRB,&
196&.316E-02_JPRB,.324E-02_JPRB,.316E-02_JPRB,.310E-02_JPRB,.304E-02_JPRB,.296E-02_JPRB,.290E-02_JPRB,&
197&.275E-02_JPRB,.264E-02_JPRB,.253E-02_JPRB,.243E-02_JPRB,.232E-02_JPRB,.222E-02_JPRB,.210E-02_JPRB,&
198&.210E-02_JPRB,.234E-02_JPRB,.304E-02_JPRB,.493E-02_JPRB,.473E-02_JPRB,.403E-02_JPRB,.360E-02_JPRB,&
199&.312E-02_JPRB,.301E-02_JPRB,.298E-02_JPRB,.382E-02_JPRB,.386E-02_JPRB,.362E-02_JPRB,.319E-02_JPRB,&
200&.303E-02_JPRB,.299E-02_JPRB,.302E-02_JPRB,.300E-02_JPRB,.290E-02_JPRB,.280E-02_JPRB,.268E-02_JPRB,&
201&.262E-02_JPRB,.246E-02_JPRB,.225E-02_JPRB,.223E-02_JPRB,.228E-02_JPRB,.231E-02_JPRB,.243E-02_JPRB,&
202&.255E-02_JPRB,.258E-02_JPRB,.248E-02_JPRB,.241E-02_JPRB,.235E-02_JPRB,.232E-02_JPRB,.230E-02_JPRB,&
203&.223E-02_JPRB,.220E-02_JPRB,.220E-02_JPRB,.211E-02_JPRB,.200E-02_JPRB,.195E-02_JPRB,.204E-02_JPRB,&
204&.214E-02_JPRB,.290E-02_JPRB,.499E-02_JPRB,.856E-02_JPRB,.994E-02_JPRB,.941E-02_JPRB,.861E-02_JPRB,&
205&.782E-02_JPRB,.684E-02_JPRB/)
206!-- Total Soil Dust Aerosol  month:  7 --- lat: 11  50.0
207ZAER (:,11, 7) = (/&
208&.773E-02_JPRB,.677E-02_JPRB,.601E-02_JPRB,.540E-02_JPRB,.494E-02_JPRB,.403E-02_JPRB,.360E-02_JPRB,&
209&.369E-02_JPRB,.381E-02_JPRB,.380E-02_JPRB,.373E-02_JPRB,.355E-02_JPRB,.344E-02_JPRB,.339E-02_JPRB,&
210&.335E-02_JPRB,.332E-02_JPRB,.330E-02_JPRB,.325E-02_JPRB,.312E-02_JPRB,.298E-02_JPRB,.286E-02_JPRB,&
211&.280E-02_JPRB,.428E-02_JPRB,.807E-02_JPRB,.910E-02_JPRB,.719E-02_JPRB,.727E-02_JPRB,.565E-02_JPRB,&
212&.422E-02_JPRB,.385E-02_JPRB,.365E-02_JPRB,.381E-02_JPRB,.437E-02_JPRB,.423E-02_JPRB,.365E-02_JPRB,&
213&.370E-02_JPRB,.377E-02_JPRB,.373E-02_JPRB,.372E-02_JPRB,.368E-02_JPRB,.347E-02_JPRB,.329E-02_JPRB,&
214&.312E-02_JPRB,.287E-02_JPRB,.265E-02_JPRB,.256E-02_JPRB,.263E-02_JPRB,.275E-02_JPRB,.295E-02_JPRB,&
215&.315E-02_JPRB,.324E-02_JPRB,.313E-02_JPRB,.299E-02_JPRB,.287E-02_JPRB,.277E-02_JPRB,.271E-02_JPRB,&
216&.273E-02_JPRB,.300E-02_JPRB,.313E-02_JPRB,.307E-02_JPRB,.283E-02_JPRB,.287E-02_JPRB,.285E-02_JPRB,&
217&.304E-02_JPRB,.582E-02_JPRB,.107E-01_JPRB,.134E-01_JPRB,.115E-01_JPRB,.878E-02_JPRB,.939E-02_JPRB,&
218&.104E-01_JPRB,.913E-02_JPRB/)
219!-- Total Soil Dust Aerosol  month:  7 --- lat: 12  46.0
220ZAER (:,12, 7) = (/&
221&.847E-02_JPRB,.748E-02_JPRB,.685E-02_JPRB,.628E-02_JPRB,.562E-02_JPRB,.484E-02_JPRB,.429E-02_JPRB,&
222&.420E-02_JPRB,.427E-02_JPRB,.398E-02_JPRB,.369E-02_JPRB,.353E-02_JPRB,.343E-02_JPRB,.346E-02_JPRB,&
223&.355E-02_JPRB,.358E-02_JPRB,.360E-02_JPRB,.359E-02_JPRB,.358E-02_JPRB,.355E-02_JPRB,.347E-02_JPRB,&
224&.348E-02_JPRB,.496E-02_JPRB,.197E-01_JPRB,.218E-01_JPRB,.134E-01_JPRB,.106E-01_JPRB,.726E-02_JPRB,&
225&.493E-02_JPRB,.422E-02_JPRB,.398E-02_JPRB,.377E-02_JPRB,.395E-02_JPRB,.429E-02_JPRB,.445E-02_JPRB,&
226&.439E-02_JPRB,.420E-02_JPRB,.404E-02_JPRB,.415E-02_JPRB,.430E-02_JPRB,.423E-02_JPRB,.418E-02_JPRB,&
227&.388E-02_JPRB,.357E-02_JPRB,.346E-02_JPRB,.355E-02_JPRB,.392E-02_JPRB,.401E-02_JPRB,.388E-02_JPRB,&
228&.386E-02_JPRB,.388E-02_JPRB,.380E-02_JPRB,.363E-02_JPRB,.345E-02_JPRB,.331E-02_JPRB,.322E-02_JPRB,&
229&.361E-02_JPRB,.528E-02_JPRB,.683E-02_JPRB,.558E-02_JPRB,.457E-02_JPRB,.443E-02_JPRB,.415E-02_JPRB,&
230&.623E-02_JPRB,.124E-01_JPRB,.156E-01_JPRB,.128E-01_JPRB,.907E-02_JPRB,.920E-02_JPRB,.120E-01_JPRB,&
231&.120E-01_JPRB,.982E-02_JPRB/)
232!-- Total Soil Dust Aerosol  month:  7 --- lat: 13  42.0
233ZAER (:,13, 7) = (/&
234&.818E-02_JPRB,.765E-02_JPRB,.759E-02_JPRB,.726E-02_JPRB,.651E-02_JPRB,.581E-02_JPRB,.530E-02_JPRB,&
235&.505E-02_JPRB,.492E-02_JPRB,.449E-02_JPRB,.418E-02_JPRB,.404E-02_JPRB,.380E-02_JPRB,.373E-02_JPRB,&
236&.379E-02_JPRB,.380E-02_JPRB,.371E-02_JPRB,.360E-02_JPRB,.363E-02_JPRB,.370E-02_JPRB,.370E-02_JPRB,&
237&.386E-02_JPRB,.727E-02_JPRB,.382E-01_JPRB,.373E-01_JPRB,.183E-01_JPRB,.114E-01_JPRB,.832E-02_JPRB,&
238&.623E-02_JPRB,.514E-02_JPRB,.465E-02_JPRB,.439E-02_JPRB,.446E-02_JPRB,.478E-02_JPRB,.498E-02_JPRB,&
239&.479E-02_JPRB,.448E-02_JPRB,.436E-02_JPRB,.464E-02_JPRB,.459E-02_JPRB,.486E-02_JPRB,.522E-02_JPRB,&
240&.523E-02_JPRB,.520E-02_JPRB,.533E-02_JPRB,.559E-02_JPRB,.559E-02_JPRB,.512E-02_JPRB,.478E-02_JPRB,&
241&.465E-02_JPRB,.461E-02_JPRB,.454E-02_JPRB,.443E-02_JPRB,.418E-02_JPRB,.397E-02_JPRB,.408E-02_JPRB,&
242&.564E-02_JPRB,.111E-01_JPRB,.179E-01_JPRB,.188E-01_JPRB,.141E-01_JPRB,.101E-01_JPRB,.920E-02_JPRB,&
243&.156E-01_JPRB,.199E-01_JPRB,.165E-01_JPRB,.112E-01_JPRB,.924E-02_JPRB,.106E-01_JPRB,.123E-01_JPRB,&
244&.113E-01_JPRB,.942E-02_JPRB/)
245!-- Total Soil Dust Aerosol  month:  7 --- lat: 14  38.0
246ZAER (:,14, 7) = (/&
247&.906E-02_JPRB,.887E-02_JPRB,.891E-02_JPRB,.856E-02_JPRB,.796E-02_JPRB,.733E-02_JPRB,.677E-02_JPRB,&
248&.635E-02_JPRB,.600E-02_JPRB,.563E-02_JPRB,.525E-02_JPRB,.487E-02_JPRB,.465E-02_JPRB,.455E-02_JPRB,&
249&.441E-02_JPRB,.420E-02_JPRB,.403E-02_JPRB,.398E-02_JPRB,.398E-02_JPRB,.402E-02_JPRB,.402E-02_JPRB,&
250&.401E-02_JPRB,.612E-02_JPRB,.291E-01_JPRB,.336E-01_JPRB,.186E-01_JPRB,.117E-01_JPRB,.926E-02_JPRB,&
251&.783E-02_JPRB,.673E-02_JPRB,.606E-02_JPRB,.570E-02_JPRB,.551E-02_JPRB,.543E-02_JPRB,.523E-02_JPRB,&
252&.481E-02_JPRB,.465E-02_JPRB,.481E-02_JPRB,.556E-02_JPRB,.584E-02_JPRB,.700E-02_JPRB,.680E-02_JPRB,&
253&.749E-02_JPRB,.799E-02_JPRB,.800E-02_JPRB,.724E-02_JPRB,.609E-02_JPRB,.546E-02_JPRB,.544E-02_JPRB,&
254&.551E-02_JPRB,.553E-02_JPRB,.544E-02_JPRB,.540E-02_JPRB,.519E-02_JPRB,.493E-02_JPRB,.537E-02_JPRB,&
255&.792E-02_JPRB,.154E-01_JPRB,.243E-01_JPRB,.280E-01_JPRB,.299E-01_JPRB,.263E-01_JPRB,.290E-01_JPRB,&
256&.355E-01_JPRB,.326E-01_JPRB,.259E-01_JPRB,.187E-01_JPRB,.147E-01_JPRB,.128E-01_JPRB,.123E-01_JPRB,&
257&.107E-01_JPRB,.914E-02_JPRB/)
258!-- Total Soil Dust Aerosol  month:  7 --- lat: 15  34.0
259ZAER (:,15, 7) = (/&
260&.120E-01_JPRB,.115E-01_JPRB,.112E-01_JPRB,.106E-01_JPRB,.960E-02_JPRB,.879E-02_JPRB,.809E-02_JPRB,&
261&.762E-02_JPRB,.722E-02_JPRB,.687E-02_JPRB,.645E-02_JPRB,.613E-02_JPRB,.605E-02_JPRB,.591E-02_JPRB,&
262&.558E-02_JPRB,.528E-02_JPRB,.510E-02_JPRB,.501E-02_JPRB,.483E-02_JPRB,.463E-02_JPRB,.462E-02_JPRB,&
263&.475E-02_JPRB,.686E-02_JPRB,.130E-01_JPRB,.181E-01_JPRB,.144E-01_JPRB,.112E-01_JPRB,.955E-02_JPRB,&
264&.852E-02_JPRB,.782E-02_JPRB,.746E-02_JPRB,.690E-02_JPRB,.635E-02_JPRB,.629E-02_JPRB,.598E-02_JPRB,&
265&.544E-02_JPRB,.523E-02_JPRB,.594E-02_JPRB,.880E-02_JPRB,.119E-01_JPRB,.151E-01_JPRB,.166E-01_JPRB,&
266&.149E-01_JPRB,.122E-01_JPRB,.989E-02_JPRB,.797E-02_JPRB,.688E-02_JPRB,.647E-02_JPRB,.655E-02_JPRB,&
267&.671E-02_JPRB,.698E-02_JPRB,.719E-02_JPRB,.705E-02_JPRB,.662E-02_JPRB,.647E-02_JPRB,.721E-02_JPRB,&
268&.885E-02_JPRB,.174E-01_JPRB,.229E-01_JPRB,.282E-01_JPRB,.418E-01_JPRB,.609E-01_JPRB,.980E-01_JPRB,&
269&.113E+00_JPRB,.939E-01_JPRB,.558E-01_JPRB,.356E-01_JPRB,.266E-01_JPRB,.214E-01_JPRB,.183E-01_JPRB,&
270&.155E-01_JPRB,.130E-01_JPRB/)
271!-- Total Soil Dust Aerosol  month:  7 --- lat: 16  30.0
272ZAER (:,16, 7) = (/&
273&.162E-01_JPRB,.152E-01_JPRB,.138E-01_JPRB,.124E-01_JPRB,.112E-01_JPRB,.103E-01_JPRB,.958E-02_JPRB,&
274&.901E-02_JPRB,.857E-02_JPRB,.831E-02_JPRB,.804E-02_JPRB,.763E-02_JPRB,.725E-02_JPRB,.686E-02_JPRB,&
275&.642E-02_JPRB,.615E-02_JPRB,.597E-02_JPRB,.570E-02_JPRB,.547E-02_JPRB,.536E-02_JPRB,.539E-02_JPRB,&
276&.631E-02_JPRB,.116E-01_JPRB,.133E-01_JPRB,.115E-01_JPRB,.109E-01_JPRB,.933E-02_JPRB,.826E-02_JPRB,&
277&.806E-02_JPRB,.815E-02_JPRB,.812E-02_JPRB,.791E-02_JPRB,.761E-02_JPRB,.741E-02_JPRB,.699E-02_JPRB,&
278&.628E-02_JPRB,.623E-02_JPRB,.807E-02_JPRB,.137E-01_JPRB,.224E-01_JPRB,.341E-01_JPRB,.307E-01_JPRB,&
279&.216E-01_JPRB,.158E-01_JPRB,.119E-01_JPRB,.945E-02_JPRB,.824E-02_JPRB,.802E-02_JPRB,.844E-02_JPRB,&
280&.922E-02_JPRB,.100E-01_JPRB,.104E-01_JPRB,.995E-02_JPRB,.930E-02_JPRB,.925E-02_JPRB,.990E-02_JPRB,&
281&.107E-01_JPRB,.210E-01_JPRB,.301E-01_JPRB,.422E-01_JPRB,.656E-01_JPRB,.963E-01_JPRB,.192E+00_JPRB,&
282&.222E+00_JPRB,.140E+00_JPRB,.665E-01_JPRB,.427E-01_JPRB,.341E-01_JPRB,.289E-01_JPRB,.247E-01_JPRB,&
283&.208E-01_JPRB,.179E-01_JPRB/)
284!-- Total Soil Dust Aerosol  month:  7 --- lat: 17  26.0
285ZAER (:,17, 7) = (/&
286&.179E-01_JPRB,.164E-01_JPRB,.153E-01_JPRB,.143E-01_JPRB,.129E-01_JPRB,.118E-01_JPRB,.112E-01_JPRB,&
287&.106E-01_JPRB,.997E-02_JPRB,.917E-02_JPRB,.817E-02_JPRB,.707E-02_JPRB,.654E-02_JPRB,.636E-02_JPRB,&
288&.625E-02_JPRB,.619E-02_JPRB,.604E-02_JPRB,.575E-02_JPRB,.563E-02_JPRB,.568E-02_JPRB,.602E-02_JPRB,&
289&.741E-02_JPRB,.131E-01_JPRB,.172E-01_JPRB,.146E-01_JPRB,.119E-01_JPRB,.104E-01_JPRB,.922E-02_JPRB,&
290&.852E-02_JPRB,.843E-02_JPRB,.841E-02_JPRB,.841E-02_JPRB,.816E-02_JPRB,.773E-02_JPRB,.709E-02_JPRB,&
291&.653E-02_JPRB,.726E-02_JPRB,.991E-02_JPRB,.150E-01_JPRB,.256E-01_JPRB,.387E-01_JPRB,.338E-01_JPRB,&
292&.265E-01_JPRB,.202E-01_JPRB,.149E-01_JPRB,.128E-01_JPRB,.117E-01_JPRB,.117E-01_JPRB,.123E-01_JPRB,&
293&.128E-01_JPRB,.132E-01_JPRB,.134E-01_JPRB,.132E-01_JPRB,.127E-01_JPRB,.124E-01_JPRB,.129E-01_JPRB,&
294&.140E-01_JPRB,.251E-01_JPRB,.429E-01_JPRB,.728E-01_JPRB,.109E+00_JPRB,.125E+00_JPRB,.159E+00_JPRB,&
295&.154E+00_JPRB,.853E-01_JPRB,.508E-01_JPRB,.355E-01_JPRB,.291E-01_JPRB,.256E-01_JPRB,.236E-01_JPRB,&
296&.215E-01_JPRB,.197E-01_JPRB/)
297!-- Total Soil Dust Aerosol  month:  7 --- lat: 18  22.0
298ZAER (:,18, 7) = (/&
299&.160E-01_JPRB,.150E-01_JPRB,.140E-01_JPRB,.126E-01_JPRB,.112E-01_JPRB,.100E-01_JPRB,.942E-02_JPRB,&
300&.888E-02_JPRB,.814E-02_JPRB,.720E-02_JPRB,.636E-02_JPRB,.571E-02_JPRB,.554E-02_JPRB,.566E-02_JPRB,&
301&.587E-02_JPRB,.603E-02_JPRB,.599E-02_JPRB,.577E-02_JPRB,.570E-02_JPRB,.583E-02_JPRB,.632E-02_JPRB,&
302&.798E-02_JPRB,.124E-01_JPRB,.187E-01_JPRB,.253E-01_JPRB,.144E-01_JPRB,.113E-01_JPRB,.102E-01_JPRB,&
303&.914E-02_JPRB,.882E-02_JPRB,.884E-02_JPRB,.868E-02_JPRB,.830E-02_JPRB,.795E-02_JPRB,.764E-02_JPRB,&
304&.784E-02_JPRB,.939E-02_JPRB,.119E-01_JPRB,.160E-01_JPRB,.274E-01_JPRB,.365E-01_JPRB,.349E-01_JPRB,&
305&.291E-01_JPRB,.243E-01_JPRB,.211E-01_JPRB,.250E-01_JPRB,.194E-01_JPRB,.175E-01_JPRB,.173E-01_JPRB,&
306&.167E-01_JPRB,.160E-01_JPRB,.157E-01_JPRB,.158E-01_JPRB,.155E-01_JPRB,.149E-01_JPRB,.155E-01_JPRB,&
307&.207E-01_JPRB,.343E-01_JPRB,.513E-01_JPRB,.755E-01_JPRB,.841E-01_JPRB,.789E-01_JPRB,.912E-01_JPRB,&
308&.776E-01_JPRB,.520E-01_JPRB,.389E-01_JPRB,.293E-01_JPRB,.216E-01_JPRB,.188E-01_JPRB,.180E-01_JPRB,&
309&.175E-01_JPRB,.168E-01_JPRB/)
310!-- Total Soil Dust Aerosol  month:  7 --- lat: 19  18.0
311ZAER (:,19, 7) = (/&
312&.124E-01_JPRB,.115E-01_JPRB,.104E-01_JPRB,.898E-02_JPRB,.779E-02_JPRB,.691E-02_JPRB,.635E-02_JPRB,&
313&.598E-02_JPRB,.557E-02_JPRB,.529E-02_JPRB,.511E-02_JPRB,.500E-02_JPRB,.515E-02_JPRB,.543E-02_JPRB,&
314&.577E-02_JPRB,.596E-02_JPRB,.605E-02_JPRB,.596E-02_JPRB,.587E-02_JPRB,.597E-02_JPRB,.640E-02_JPRB,&
315&.801E-02_JPRB,.135E-01_JPRB,.229E-01_JPRB,.235E-01_JPRB,.133E-01_JPRB,.114E-01_JPRB,.105E-01_JPRB,&
316&.960E-02_JPRB,.933E-02_JPRB,.911E-02_JPRB,.893E-02_JPRB,.891E-02_JPRB,.907E-02_JPRB,.951E-02_JPRB,&
317&.105E-01_JPRB,.123E-01_JPRB,.152E-01_JPRB,.211E-01_JPRB,.274E-01_JPRB,.311E-01_JPRB,.329E-01_JPRB,&
318&.312E-01_JPRB,.292E-01_JPRB,.347E-01_JPRB,.391E-01_JPRB,.269E-01_JPRB,.231E-01_JPRB,.210E-01_JPRB,&
319&.192E-01_JPRB,.181E-01_JPRB,.173E-01_JPRB,.170E-01_JPRB,.169E-01_JPRB,.175E-01_JPRB,.206E-01_JPRB,&
320&.275E-01_JPRB,.342E-01_JPRB,.432E-01_JPRB,.513E-01_JPRB,.528E-01_JPRB,.544E-01_JPRB,.535E-01_JPRB,&
321&.431E-01_JPRB,.326E-01_JPRB,.239E-01_JPRB,.194E-01_JPRB,.160E-01_JPRB,.145E-01_JPRB,.140E-01_JPRB,&
322&.136E-01_JPRB,.131E-01_JPRB/)
323!-- Total Soil Dust Aerosol  month:  7 --- lat: 20  14.0
324ZAER (:,20, 7) = (/&
325&.889E-02_JPRB,.831E-02_JPRB,.746E-02_JPRB,.633E-02_JPRB,.547E-02_JPRB,.490E-02_JPRB,.468E-02_JPRB,&
326&.449E-02_JPRB,.444E-02_JPRB,.448E-02_JPRB,.456E-02_JPRB,.476E-02_JPRB,.521E-02_JPRB,.561E-02_JPRB,&
327&.600E-02_JPRB,.621E-02_JPRB,.642E-02_JPRB,.662E-02_JPRB,.686E-02_JPRB,.714E-02_JPRB,.745E-02_JPRB,&
328&.912E-02_JPRB,.170E-01_JPRB,.212E-01_JPRB,.143E-01_JPRB,.115E-01_JPRB,.112E-01_JPRB,.105E-01_JPRB,&
329&.102E-01_JPRB,.107E-01_JPRB,.109E-01_JPRB,.111E-01_JPRB,.118E-01_JPRB,.128E-01_JPRB,.141E-01_JPRB,&
330&.161E-01_JPRB,.186E-01_JPRB,.234E-01_JPRB,.289E-01_JPRB,.317E-01_JPRB,.335E-01_JPRB,.346E-01_JPRB,&
331&.343E-01_JPRB,.370E-01_JPRB,.414E-01_JPRB,.353E-01_JPRB,.274E-01_JPRB,.232E-01_JPRB,.207E-01_JPRB,&
332&.183E-01_JPRB,.168E-01_JPRB,.153E-01_JPRB,.147E-01_JPRB,.156E-01_JPRB,.172E-01_JPRB,.207E-01_JPRB,&
333&.248E-01_JPRB,.278E-01_JPRB,.309E-01_JPRB,.315E-01_JPRB,.324E-01_JPRB,.323E-01_JPRB,.286E-01_JPRB,&
334&.236E-01_JPRB,.183E-01_JPRB,.144E-01_JPRB,.119E-01_JPRB,.109E-01_JPRB,.104E-01_JPRB,.102E-01_JPRB,&
335&.998E-02_JPRB,.922E-02_JPRB/)
336!-- Total Soil Dust Aerosol  month:  7 --- lat: 21  10.0
337ZAER (:,21, 7) = (/&
338&.594E-02_JPRB,.558E-02_JPRB,.506E-02_JPRB,.452E-02_JPRB,.423E-02_JPRB,.419E-02_JPRB,.427E-02_JPRB,&
339&.436E-02_JPRB,.449E-02_JPRB,.466E-02_JPRB,.490E-02_JPRB,.526E-02_JPRB,.567E-02_JPRB,.600E-02_JPRB,&
340&.632E-02_JPRB,.670E-02_JPRB,.719E-02_JPRB,.769E-02_JPRB,.833E-02_JPRB,.908E-02_JPRB,.101E-01_JPRB,&
341&.123E-01_JPRB,.144E-01_JPRB,.131E-01_JPRB,.107E-01_JPRB,.111E-01_JPRB,.116E-01_JPRB,.121E-01_JPRB,&
342&.130E-01_JPRB,.145E-01_JPRB,.157E-01_JPRB,.166E-01_JPRB,.179E-01_JPRB,.195E-01_JPRB,.220E-01_JPRB,&
343&.250E-01_JPRB,.281E-01_JPRB,.316E-01_JPRB,.357E-01_JPRB,.370E-01_JPRB,.380E-01_JPRB,.401E-01_JPRB,&
344&.414E-01_JPRB,.410E-01_JPRB,.331E-01_JPRB,.248E-01_JPRB,.208E-01_JPRB,.180E-01_JPRB,.160E-01_JPRB,&
345&.139E-01_JPRB,.125E-01_JPRB,.113E-01_JPRB,.104E-01_JPRB,.106E-01_JPRB,.120E-01_JPRB,.139E-01_JPRB,&
346&.158E-01_JPRB,.177E-01_JPRB,.201E-01_JPRB,.201E-01_JPRB,.185E-01_JPRB,.156E-01_JPRB,.126E-01_JPRB,&
347&.109E-01_JPRB,.951E-02_JPRB,.799E-02_JPRB,.690E-02_JPRB,.667E-02_JPRB,.627E-02_JPRB,.610E-02_JPRB,&
348&.612E-02_JPRB,.593E-02_JPRB/)
349!-- Total Soil Dust Aerosol  month:  7 --- lat: 22   6.0
350ZAER (:,22, 7) = (/&
351&.393E-02_JPRB,.389E-02_JPRB,.387E-02_JPRB,.389E-02_JPRB,.410E-02_JPRB,.435E-02_JPRB,.459E-02_JPRB,&
352&.486E-02_JPRB,.515E-02_JPRB,.543E-02_JPRB,.564E-02_JPRB,.587E-02_JPRB,.609E-02_JPRB,.631E-02_JPRB,&
353&.662E-02_JPRB,.699E-02_JPRB,.749E-02_JPRB,.796E-02_JPRB,.848E-02_JPRB,.896E-02_JPRB,.939E-02_JPRB,&
354&.100E-01_JPRB,.104E-01_JPRB,.105E-01_JPRB,.115E-01_JPRB,.127E-01_JPRB,.140E-01_JPRB,.155E-01_JPRB,&
355&.173E-01_JPRB,.192E-01_JPRB,.211E-01_JPRB,.229E-01_JPRB,.250E-01_JPRB,.277E-01_JPRB,.323E-01_JPRB,&
356&.360E-01_JPRB,.399E-01_JPRB,.420E-01_JPRB,.438E-01_JPRB,.431E-01_JPRB,.425E-01_JPRB,.437E-01_JPRB,&
357&.453E-01_JPRB,.360E-01_JPRB,.210E-01_JPRB,.163E-01_JPRB,.137E-01_JPRB,.112E-01_JPRB,.921E-02_JPRB,&
358&.803E-02_JPRB,.723E-02_JPRB,.648E-02_JPRB,.612E-02_JPRB,.627E-02_JPRB,.664E-02_JPRB,.725E-02_JPRB,&
359&.781E-02_JPRB,.840E-02_JPRB,.845E-02_JPRB,.764E-02_JPRB,.647E-02_JPRB,.478E-02_JPRB,.360E-02_JPRB,&
360&.348E-02_JPRB,.354E-02_JPRB,.345E-02_JPRB,.346E-02_JPRB,.343E-02_JPRB,.332E-02_JPRB,.348E-02_JPRB,&
361&.379E-02_JPRB,.390E-02_JPRB/)
362!-- Total Soil Dust Aerosol  month:  7 --- lat: 23   2.0
363ZAER (:,23, 7) = (/&
364&.282E-02_JPRB,.301E-02_JPRB,.326E-02_JPRB,.356E-02_JPRB,.390E-02_JPRB,.424E-02_JPRB,.462E-02_JPRB,&
365&.498E-02_JPRB,.527E-02_JPRB,.549E-02_JPRB,.563E-02_JPRB,.580E-02_JPRB,.601E-02_JPRB,.632E-02_JPRB,&
366&.665E-02_JPRB,.695E-02_JPRB,.723E-02_JPRB,.767E-02_JPRB,.839E-02_JPRB,.886E-02_JPRB,.881E-02_JPRB,&
367&.945E-02_JPRB,.102E-01_JPRB,.115E-01_JPRB,.132E-01_JPRB,.150E-01_JPRB,.167E-01_JPRB,.182E-01_JPRB,&
368&.199E-01_JPRB,.220E-01_JPRB,.244E-01_JPRB,.266E-01_JPRB,.290E-01_JPRB,.322E-01_JPRB,.364E-01_JPRB,&
369&.408E-01_JPRB,.464E-01_JPRB,.517E-01_JPRB,.558E-01_JPRB,.571E-01_JPRB,.590E-01_JPRB,.612E-01_JPRB,&
370&.617E-01_JPRB,.511E-01_JPRB,.260E-01_JPRB,.119E-01_JPRB,.884E-02_JPRB,.658E-02_JPRB,.556E-02_JPRB,&
371&.509E-02_JPRB,.468E-02_JPRB,.416E-02_JPRB,.377E-02_JPRB,.357E-02_JPRB,.336E-02_JPRB,.322E-02_JPRB,&
372&.327E-02_JPRB,.323E-02_JPRB,.295E-02_JPRB,.246E-02_JPRB,.193E-02_JPRB,.151E-02_JPRB,.148E-02_JPRB,&
373&.162E-02_JPRB,.172E-02_JPRB,.181E-02_JPRB,.192E-02_JPRB,.201E-02_JPRB,.215E-02_JPRB,.238E-02_JPRB,&
374&.260E-02_JPRB,.269E-02_JPRB/)
375!-- Total Soil Dust Aerosol  month:  7 --- lat: 24  -2.0
376ZAER (:,24, 7) = (/&
377&.183E-02_JPRB,.198E-02_JPRB,.226E-02_JPRB,.268E-02_JPRB,.309E-02_JPRB,.343E-02_JPRB,.376E-02_JPRB,&
378&.407E-02_JPRB,.437E-02_JPRB,.461E-02_JPRB,.478E-02_JPRB,.496E-02_JPRB,.519E-02_JPRB,.534E-02_JPRB,&
379&.555E-02_JPRB,.574E-02_JPRB,.581E-02_JPRB,.625E-02_JPRB,.683E-02_JPRB,.701E-02_JPRB,.781E-02_JPRB,&
380&.893E-02_JPRB,.961E-02_JPRB,.102E-01_JPRB,.112E-01_JPRB,.137E-01_JPRB,.170E-01_JPRB,.186E-01_JPRB,&
381&.195E-01_JPRB,.199E-01_JPRB,.203E-01_JPRB,.203E-01_JPRB,.211E-01_JPRB,.242E-01_JPRB,.283E-01_JPRB,&
382&.319E-01_JPRB,.369E-01_JPRB,.444E-01_JPRB,.557E-01_JPRB,.681E-01_JPRB,.827E-01_JPRB,.103E+00_JPRB,&
383&.121E+00_JPRB,.126E+00_JPRB,.998E-01_JPRB,.579E-01_JPRB,.258E-01_JPRB,.140E-01_JPRB,.910E-02_JPRB,&
384&.780E-02_JPRB,.699E-02_JPRB,.618E-02_JPRB,.481E-02_JPRB,.348E-02_JPRB,.229E-02_JPRB,.175E-02_JPRB,&
385&.138E-02_JPRB,.121E-02_JPRB,.108E-02_JPRB,.913E-03_JPRB,.829E-03_JPRB,.820E-03_JPRB,.877E-03_JPRB,&
386&.966E-03_JPRB,.106E-02_JPRB,.115E-02_JPRB,.122E-02_JPRB,.128E-02_JPRB,.136E-02_JPRB,.150E-02_JPRB,&
387&.164E-02_JPRB,.174E-02_JPRB/)
388!-- Total Soil Dust Aerosol  month:  7 --- lat: 25  -6.0
389ZAER (:,25, 7) = (/&
390&.161E-02_JPRB,.182E-02_JPRB,.214E-02_JPRB,.260E-02_JPRB,.306E-02_JPRB,.339E-02_JPRB,.364E-02_JPRB,&
391&.381E-02_JPRB,.397E-02_JPRB,.413E-02_JPRB,.422E-02_JPRB,.434E-02_JPRB,.452E-02_JPRB,.459E-02_JPRB,&
392&.469E-02_JPRB,.470E-02_JPRB,.476E-02_JPRB,.510E-02_JPRB,.562E-02_JPRB,.633E-02_JPRB,.733E-02_JPRB,&
393&.917E-02_JPRB,.106E-01_JPRB,.112E-01_JPRB,.130E-01_JPRB,.179E-01_JPRB,.238E-01_JPRB,.265E-01_JPRB,&
394&.286E-01_JPRB,.272E-01_JPRB,.237E-01_JPRB,.203E-01_JPRB,.192E-01_JPRB,.225E-01_JPRB,.268E-01_JPRB,&
395&.279E-01_JPRB,.296E-01_JPRB,.341E-01_JPRB,.468E-01_JPRB,.660E-01_JPRB,.908E-01_JPRB,.128E+00_JPRB,&
396&.179E+00_JPRB,.250E+00_JPRB,.317E+00_JPRB,.324E+00_JPRB,.345E+00_JPRB,.122E+00_JPRB,.362E-01_JPRB,&
397&.257E-01_JPRB,.202E-01_JPRB,.210E-01_JPRB,.202E-01_JPRB,.144E-01_JPRB,.663E-02_JPRB,.269E-02_JPRB,&
398&.136E-02_JPRB,.900E-03_JPRB,.715E-03_JPRB,.608E-03_JPRB,.559E-03_JPRB,.560E-03_JPRB,.591E-03_JPRB,&
399&.658E-03_JPRB,.752E-03_JPRB,.852E-03_JPRB,.917E-03_JPRB,.976E-03_JPRB,.103E-02_JPRB,.114E-02_JPRB,&
400&.129E-02_JPRB,.144E-02_JPRB/)
401!-- Total Soil Dust Aerosol  month:  7 --- lat: 26 -10.0
402ZAER (:,26, 7) = (/&
403&.233E-02_JPRB,.272E-02_JPRB,.316E-02_JPRB,.369E-02_JPRB,.428E-02_JPRB,.485E-02_JPRB,.518E-02_JPRB,&
404&.514E-02_JPRB,.497E-02_JPRB,.460E-02_JPRB,.417E-02_JPRB,.402E-02_JPRB,.406E-02_JPRB,.414E-02_JPRB,&
405&.421E-02_JPRB,.420E-02_JPRB,.425E-02_JPRB,.438E-02_JPRB,.501E-02_JPRB,.631E-02_JPRB,.830E-02_JPRB,&
406&.113E-01_JPRB,.146E-01_JPRB,.180E-01_JPRB,.234E-01_JPRB,.323E-01_JPRB,.414E-01_JPRB,.479E-01_JPRB,&
407&.523E-01_JPRB,.534E-01_JPRB,.510E-01_JPRB,.458E-01_JPRB,.363E-01_JPRB,.399E-01_JPRB,.487E-01_JPRB,&
408&.469E-01_JPRB,.446E-01_JPRB,.458E-01_JPRB,.491E-01_JPRB,.610E-01_JPRB,.873E-01_JPRB,.125E+00_JPRB,&
409&.171E+00_JPRB,.276E+00_JPRB,.475E+00_JPRB,.699E+00_JPRB,.983E+00_JPRB,.547E+00_JPRB,.160E+00_JPRB,&
410&.971E-01_JPRB,.657E-01_JPRB,.698E-01_JPRB,.798E-01_JPRB,.674E-01_JPRB,.302E-01_JPRB,.775E-02_JPRB,&
411&.432E-02_JPRB,.380E-02_JPRB,.271E-02_JPRB,.165E-02_JPRB,.112E-02_JPRB,.856E-03_JPRB,.593E-03_JPRB,&
412&.678E-03_JPRB,.913E-03_JPRB,.123E-02_JPRB,.153E-02_JPRB,.167E-02_JPRB,.172E-02_JPRB,.168E-02_JPRB,&
413&.178E-02_JPRB,.201E-02_JPRB/)
414!-- Total Soil Dust Aerosol  month:  7 --- lat: 27 -14.0
415ZAER (:,27, 7) = (/&
416&.315E-02_JPRB,.373E-02_JPRB,.453E-02_JPRB,.549E-02_JPRB,.668E-02_JPRB,.798E-02_JPRB,.895E-02_JPRB,&
417&.919E-02_JPRB,.908E-02_JPRB,.858E-02_JPRB,.793E-02_JPRB,.760E-02_JPRB,.764E-02_JPRB,.757E-02_JPRB,&
418&.750E-02_JPRB,.745E-02_JPRB,.691E-02_JPRB,.580E-02_JPRB,.575E-02_JPRB,.666E-02_JPRB,.920E-02_JPRB,&
419&.128E-01_JPRB,.178E-01_JPRB,.237E-01_JPRB,.312E-01_JPRB,.433E-01_JPRB,.564E-01_JPRB,.646E-01_JPRB,&
420&.717E-01_JPRB,.792E-01_JPRB,.854E-01_JPRB,.900E-01_JPRB,.932E-01_JPRB,.105E+00_JPRB,.110E+00_JPRB,&
421&.108E+00_JPRB,.998E-01_JPRB,.988E-01_JPRB,.920E-01_JPRB,.101E+00_JPRB,.123E+00_JPRB,.147E+00_JPRB,&
422&.207E+00_JPRB,.329E+00_JPRB,.480E+00_JPRB,.541E+00_JPRB,.671E+00_JPRB,.643E+00_JPRB,.383E+00_JPRB,&
423&.208E+00_JPRB,.135E+00_JPRB,.138E+00_JPRB,.169E+00_JPRB,.155E+00_JPRB,.850E-01_JPRB,.342E-01_JPRB,&
424&.177E-01_JPRB,.150E-01_JPRB,.108E-01_JPRB,.591E-02_JPRB,.364E-02_JPRB,.290E-02_JPRB,.193E-02_JPRB,&
425&.159E-02_JPRB,.186E-02_JPRB,.229E-02_JPRB,.289E-02_JPRB,.328E-02_JPRB,.331E-02_JPRB,.312E-02_JPRB,&
426&.284E-02_JPRB,.283E-02_JPRB/)
427!-- Total Soil Dust Aerosol  month:  7 --- lat: 28 -18.0
428ZAER (:,28, 7) = (/&
429&.493E-02_JPRB,.529E-02_JPRB,.646E-02_JPRB,.809E-02_JPRB,.984E-02_JPRB,.116E-01_JPRB,.130E-01_JPRB,&
430&.141E-01_JPRB,.149E-01_JPRB,.151E-01_JPRB,.155E-01_JPRB,.164E-01_JPRB,.179E-01_JPRB,.200E-01_JPRB,&
431&.215E-01_JPRB,.213E-01_JPRB,.173E-01_JPRB,.134E-01_JPRB,.112E-01_JPRB,.979E-02_JPRB,.116E-01_JPRB,&
432&.146E-01_JPRB,.186E-01_JPRB,.252E-01_JPRB,.331E-01_JPRB,.414E-01_JPRB,.486E-01_JPRB,.545E-01_JPRB,&
433&.624E-01_JPRB,.751E-01_JPRB,.955E-01_JPRB,.125E+00_JPRB,.168E+00_JPRB,.196E+00_JPRB,.186E+00_JPRB,&
434&.183E+00_JPRB,.172E+00_JPRB,.165E+00_JPRB,.164E+00_JPRB,.177E+00_JPRB,.199E+00_JPRB,.223E+00_JPRB,&
435&.256E+00_JPRB,.341E+00_JPRB,.406E+00_JPRB,.395E+00_JPRB,.380E+00_JPRB,.489E+00_JPRB,.458E+00_JPRB,&
436&.364E+00_JPRB,.237E+00_JPRB,.202E+00_JPRB,.244E+00_JPRB,.216E+00_JPRB,.140E+00_JPRB,.759E-01_JPRB,&
437&.466E-01_JPRB,.351E-01_JPRB,.267E-01_JPRB,.160E-01_JPRB,.937E-02_JPRB,.707E-02_JPRB,.594E-02_JPRB,&
438&.494E-02_JPRB,.524E-02_JPRB,.581E-02_JPRB,.674E-02_JPRB,.783E-02_JPRB,.807E-02_JPRB,.774E-02_JPRB,&
439&.649E-02_JPRB,.529E-02_JPRB/)
440!-- Total Soil Dust Aerosol  month:  7 --- lat: 29 -22.0
441ZAER (:,29, 7) = (/&
442&.103E-01_JPRB,.888E-02_JPRB,.861E-02_JPRB,.956E-02_JPRB,.112E-01_JPRB,.132E-01_JPRB,.155E-01_JPRB,&
443&.176E-01_JPRB,.190E-01_JPRB,.191E-01_JPRB,.192E-01_JPRB,.208E-01_JPRB,.241E-01_JPRB,.302E-01_JPRB,&
444&.383E-01_JPRB,.443E-01_JPRB,.374E-01_JPRB,.275E-01_JPRB,.232E-01_JPRB,.170E-01_JPRB,.139E-01_JPRB,&
445&.138E-01_JPRB,.164E-01_JPRB,.205E-01_JPRB,.251E-01_JPRB,.268E-01_JPRB,.273E-01_JPRB,.265E-01_JPRB,&
446&.292E-01_JPRB,.383E-01_JPRB,.571E-01_JPRB,.980E-01_JPRB,.166E+00_JPRB,.222E+00_JPRB,.213E+00_JPRB,&
447&.209E+00_JPRB,.209E+00_JPRB,.197E+00_JPRB,.203E+00_JPRB,.225E+00_JPRB,.219E+00_JPRB,.218E+00_JPRB,&
448&.230E+00_JPRB,.286E+00_JPRB,.344E+00_JPRB,.347E+00_JPRB,.368E+00_JPRB,.421E+00_JPRB,.446E+00_JPRB,&
449&.420E+00_JPRB,.353E+00_JPRB,.292E+00_JPRB,.271E+00_JPRB,.201E+00_JPRB,.146E+00_JPRB,.107E+00_JPRB,&
450&.674E-01_JPRB,.430E-01_JPRB,.321E-01_JPRB,.249E-01_JPRB,.178E-01_JPRB,.156E-01_JPRB,.145E-01_JPRB,&
451&.126E-01_JPRB,.116E-01_JPRB,.117E-01_JPRB,.135E-01_JPRB,.154E-01_JPRB,.173E-01_JPRB,.175E-01_JPRB,&
452&.150E-01_JPRB,.122E-01_JPRB/)
453!-- Total Soil Dust Aerosol  month:  7 --- lat: 30 -26.0
454ZAER (:,30, 7) = (/&
455&.213E-01_JPRB,.181E-01_JPRB,.156E-01_JPRB,.147E-01_JPRB,.153E-01_JPRB,.170E-01_JPRB,.191E-01_JPRB,&
456&.206E-01_JPRB,.222E-01_JPRB,.232E-01_JPRB,.229E-01_JPRB,.232E-01_JPRB,.260E-01_JPRB,.350E-01_JPRB,&
457&.468E-01_JPRB,.627E-01_JPRB,.593E-01_JPRB,.354E-01_JPRB,.316E-01_JPRB,.274E-01_JPRB,.218E-01_JPRB,&
458&.174E-01_JPRB,.161E-01_JPRB,.171E-01_JPRB,.191E-01_JPRB,.187E-01_JPRB,.168E-01_JPRB,.153E-01_JPRB,&
459&.148E-01_JPRB,.163E-01_JPRB,.231E-01_JPRB,.403E-01_JPRB,.869E-01_JPRB,.156E+00_JPRB,.192E+00_JPRB,&
460&.207E+00_JPRB,.236E+00_JPRB,.210E+00_JPRB,.191E+00_JPRB,.214E+00_JPRB,.191E+00_JPRB,.166E+00_JPRB,&
461&.170E+00_JPRB,.234E+00_JPRB,.308E+00_JPRB,.338E+00_JPRB,.360E+00_JPRB,.359E+00_JPRB,.359E+00_JPRB,&
462&.346E+00_JPRB,.357E+00_JPRB,.338E+00_JPRB,.249E+00_JPRB,.156E+00_JPRB,.112E+00_JPRB,.989E-01_JPRB,&
463&.801E-01_JPRB,.539E-01_JPRB,.377E-01_JPRB,.303E-01_JPRB,.307E-01_JPRB,.345E-01_JPRB,.356E-01_JPRB,&
464&.322E-01_JPRB,.267E-01_JPRB,.230E-01_JPRB,.242E-01_JPRB,.262E-01_JPRB,.285E-01_JPRB,.292E-01_JPRB,&
465&.265E-01_JPRB,.239E-01_JPRB/)
466!-- Total Soil Dust Aerosol  month:  7 --- lat: 31 -30.0
467ZAER (:,31, 7) = (/&
468&.306E-01_JPRB,.289E-01_JPRB,.271E-01_JPRB,.256E-01_JPRB,.244E-01_JPRB,.244E-01_JPRB,.249E-01_JPRB,&
469&.244E-01_JPRB,.253E-01_JPRB,.266E-01_JPRB,.273E-01_JPRB,.268E-01_JPRB,.270E-01_JPRB,.324E-01_JPRB,&
470&.427E-01_JPRB,.678E-01_JPRB,.665E-01_JPRB,.343E-01_JPRB,.293E-01_JPRB,.302E-01_JPRB,.274E-01_JPRB,&
471&.222E-01_JPRB,.183E-01_JPRB,.171E-01_JPRB,.182E-01_JPRB,.173E-01_JPRB,.156E-01_JPRB,.145E-01_JPRB,&
472&.142E-01_JPRB,.141E-01_JPRB,.142E-01_JPRB,.168E-01_JPRB,.244E-01_JPRB,.548E-01_JPRB,.121E+00_JPRB,&
473&.185E+00_JPRB,.236E+00_JPRB,.232E+00_JPRB,.185E+00_JPRB,.164E+00_JPRB,.152E+00_JPRB,.117E+00_JPRB,&
474&.106E+00_JPRB,.169E+00_JPRB,.253E+00_JPRB,.320E+00_JPRB,.371E+00_JPRB,.337E+00_JPRB,.309E+00_JPRB,&
475&.299E+00_JPRB,.301E+00_JPRB,.245E+00_JPRB,.186E+00_JPRB,.142E+00_JPRB,.105E+00_JPRB,.897E-01_JPRB,&
476&.756E-01_JPRB,.552E-01_JPRB,.409E-01_JPRB,.378E-01_JPRB,.424E-01_JPRB,.462E-01_JPRB,.510E-01_JPRB,&
477&.505E-01_JPRB,.451E-01_JPRB,.368E-01_JPRB,.339E-01_JPRB,.334E-01_JPRB,.337E-01_JPRB,.325E-01_JPRB,&
478&.306E-01_JPRB,.299E-01_JPRB/)
479!-- Total Soil Dust Aerosol  month:  7 --- lat: 32 -34.0
480ZAER (:,32, 7) = (/&
481&.332E-01_JPRB,.331E-01_JPRB,.316E-01_JPRB,.304E-01_JPRB,.294E-01_JPRB,.287E-01_JPRB,.281E-01_JPRB,&
482&.270E-01_JPRB,.267E-01_JPRB,.273E-01_JPRB,.297E-01_JPRB,.316E-01_JPRB,.315E-01_JPRB,.316E-01_JPRB,&
483&.351E-01_JPRB,.495E-01_JPRB,.570E-01_JPRB,.342E-01_JPRB,.273E-01_JPRB,.271E-01_JPRB,.252E-01_JPRB,&
484&.220E-01_JPRB,.193E-01_JPRB,.174E-01_JPRB,.178E-01_JPRB,.170E-01_JPRB,.156E-01_JPRB,.149E-01_JPRB,&
485&.147E-01_JPRB,.146E-01_JPRB,.147E-01_JPRB,.144E-01_JPRB,.148E-01_JPRB,.198E-01_JPRB,.434E-01_JPRB,&
486&.971E-01_JPRB,.167E+00_JPRB,.185E+00_JPRB,.135E+00_JPRB,.965E-01_JPRB,.842E-01_JPRB,.642E-01_JPRB,&
487&.584E-01_JPRB,.935E-01_JPRB,.152E+00_JPRB,.235E+00_JPRB,.282E+00_JPRB,.274E+00_JPRB,.242E+00_JPRB,&
488&.245E+00_JPRB,.233E+00_JPRB,.206E+00_JPRB,.172E+00_JPRB,.148E+00_JPRB,.137E+00_JPRB,.121E+00_JPRB,&
489&.807E-01_JPRB,.538E-01_JPRB,.415E-01_JPRB,.417E-01_JPRB,.469E-01_JPRB,.487E-01_JPRB,.520E-01_JPRB,&
490&.547E-01_JPRB,.499E-01_JPRB,.406E-01_JPRB,.350E-01_JPRB,.332E-01_JPRB,.367E-01_JPRB,.358E-01_JPRB,&
491&.331E-01_JPRB,.326E-01_JPRB/)
492!-- Total Soil Dust Aerosol  month:  7 --- lat: 33 -38.0
493ZAER (:,33, 7) = (/&
494&.332E-01_JPRB,.316E-01_JPRB,.295E-01_JPRB,.281E-01_JPRB,.269E-01_JPRB,.263E-01_JPRB,.261E-01_JPRB,&
495&.258E-01_JPRB,.256E-01_JPRB,.260E-01_JPRB,.288E-01_JPRB,.343E-01_JPRB,.374E-01_JPRB,.351E-01_JPRB,&
496&.326E-01_JPRB,.357E-01_JPRB,.402E-01_JPRB,.330E-01_JPRB,.280E-01_JPRB,.269E-01_JPRB,.248E-01_JPRB,&
497&.218E-01_JPRB,.195E-01_JPRB,.173E-01_JPRB,.169E-01_JPRB,.167E-01_JPRB,.163E-01_JPRB,.158E-01_JPRB,&
498&.153E-01_JPRB,.148E-01_JPRB,.146E-01_JPRB,.144E-01_JPRB,.148E-01_JPRB,.162E-01_JPRB,.222E-01_JPRB,&
499&.483E-01_JPRB,.901E-01_JPRB,.901E-01_JPRB,.821E-01_JPRB,.690E-01_JPRB,.582E-01_JPRB,.483E-01_JPRB,&
500&.451E-01_JPRB,.583E-01_JPRB,.800E-01_JPRB,.118E+00_JPRB,.176E+00_JPRB,.195E+00_JPRB,.160E+00_JPRB,&
501&.150E+00_JPRB,.144E+00_JPRB,.145E+00_JPRB,.177E+00_JPRB,.164E+00_JPRB,.155E+00_JPRB,.149E+00_JPRB,&
502&.108E+00_JPRB,.630E-01_JPRB,.552E-01_JPRB,.542E-01_JPRB,.571E-01_JPRB,.608E-01_JPRB,.665E-01_JPRB,&
503&.606E-01_JPRB,.493E-01_JPRB,.400E-01_JPRB,.357E-01_JPRB,.361E-01_JPRB,.421E-01_JPRB,.402E-01_JPRB,&
504&.362E-01_JPRB,.343E-01_JPRB/)
505!-- Total Soil Dust Aerosol  month:  7 --- lat: 34 -42.0
506ZAER (:,34, 7) = (/&
507&.333E-01_JPRB,.295E-01_JPRB,.269E-01_JPRB,.246E-01_JPRB,.227E-01_JPRB,.220E-01_JPRB,.224E-01_JPRB,&
508&.229E-01_JPRB,.232E-01_JPRB,.236E-01_JPRB,.253E-01_JPRB,.307E-01_JPRB,.363E-01_JPRB,.373E-01_JPRB,&
509&.355E-01_JPRB,.373E-01_JPRB,.380E-01_JPRB,.315E-01_JPRB,.280E-01_JPRB,.264E-01_JPRB,.249E-01_JPRB,&
510&.226E-01_JPRB,.208E-01_JPRB,.193E-01_JPRB,.185E-01_JPRB,.178E-01_JPRB,.172E-01_JPRB,.165E-01_JPRB,&
511&.157E-01_JPRB,.152E-01_JPRB,.147E-01_JPRB,.143E-01_JPRB,.144E-01_JPRB,.148E-01_JPRB,.172E-01_JPRB,&
512&.296E-01_JPRB,.497E-01_JPRB,.505E-01_JPRB,.527E-01_JPRB,.532E-01_JPRB,.462E-01_JPRB,.377E-01_JPRB,&
513&.332E-01_JPRB,.389E-01_JPRB,.512E-01_JPRB,.750E-01_JPRB,.136E+00_JPRB,.159E+00_JPRB,.135E+00_JPRB,&
514&.132E+00_JPRB,.130E+00_JPRB,.127E+00_JPRB,.152E+00_JPRB,.155E+00_JPRB,.168E+00_JPRB,.186E+00_JPRB,&
515&.205E+00_JPRB,.146E+00_JPRB,.125E+00_JPRB,.137E+00_JPRB,.106E+00_JPRB,.985E-01_JPRB,.951E-01_JPRB,&
516&.804E-01_JPRB,.619E-01_JPRB,.512E-01_JPRB,.443E-01_JPRB,.422E-01_JPRB,.457E-01_JPRB,.436E-01_JPRB,&
517&.408E-01_JPRB,.380E-01_JPRB/)
518!-- Total Soil Dust Aerosol  month:  7 --- lat: 35 -46.0
519ZAER (:,35, 7) = (/&
520&.325E-01_JPRB,.274E-01_JPRB,.247E-01_JPRB,.215E-01_JPRB,.193E-01_JPRB,.189E-01_JPRB,.192E-01_JPRB,&
521&.200E-01_JPRB,.206E-01_JPRB,.211E-01_JPRB,.222E-01_JPRB,.256E-01_JPRB,.308E-01_JPRB,.344E-01_JPRB,&
522&.364E-01_JPRB,.387E-01_JPRB,.365E-01_JPRB,.298E-01_JPRB,.262E-01_JPRB,.243E-01_JPRB,.232E-01_JPRB,&
523&.220E-01_JPRB,.208E-01_JPRB,.196E-01_JPRB,.186E-01_JPRB,.178E-01_JPRB,.170E-01_JPRB,.163E-01_JPRB,&
524&.157E-01_JPRB,.155E-01_JPRB,.152E-01_JPRB,.146E-01_JPRB,.141E-01_JPRB,.136E-01_JPRB,.140E-01_JPRB,&
525&.186E-01_JPRB,.308E-01_JPRB,.335E-01_JPRB,.340E-01_JPRB,.337E-01_JPRB,.325E-01_JPRB,.290E-01_JPRB,&
526&.263E-01_JPRB,.315E-01_JPRB,.569E-01_JPRB,.844E-01_JPRB,.951E-01_JPRB,.904E-01_JPRB,.114E+00_JPRB,&
527&.133E+00_JPRB,.132E+00_JPRB,.145E+00_JPRB,.168E+00_JPRB,.148E+00_JPRB,.171E+00_JPRB,.210E+00_JPRB,&
528&.242E+00_JPRB,.243E+00_JPRB,.243E+00_JPRB,.245E+00_JPRB,.194E+00_JPRB,.135E+00_JPRB,.112E+00_JPRB,&
529&.878E-01_JPRB,.652E-01_JPRB,.534E-01_JPRB,.479E-01_JPRB,.447E-01_JPRB,.439E-01_JPRB,.424E-01_JPRB,&
530&.407E-01_JPRB,.387E-01_JPRB/)
531!-- Total Soil Dust Aerosol  month:  7 --- lat: 36 -50.0
532ZAER (:,36, 7) = (/&
533&.320E-01_JPRB,.269E-01_JPRB,.237E-01_JPRB,.216E-01_JPRB,.190E-01_JPRB,.172E-01_JPRB,.169E-01_JPRB,&
534&.174E-01_JPRB,.177E-01_JPRB,.182E-01_JPRB,.195E-01_JPRB,.223E-01_JPRB,.255E-01_JPRB,.278E-01_JPRB,&
535&.313E-01_JPRB,.329E-01_JPRB,.292E-01_JPRB,.255E-01_JPRB,.234E-01_JPRB,.216E-01_JPRB,.210E-01_JPRB,&
536&.209E-01_JPRB,.200E-01_JPRB,.191E-01_JPRB,.183E-01_JPRB,.174E-01_JPRB,.164E-01_JPRB,.158E-01_JPRB,&
537&.153E-01_JPRB,.149E-01_JPRB,.144E-01_JPRB,.138E-01_JPRB,.133E-01_JPRB,.128E-01_JPRB,.125E-01_JPRB,&
538&.140E-01_JPRB,.191E-01_JPRB,.239E-01_JPRB,.258E-01_JPRB,.252E-01_JPRB,.241E-01_JPRB,.231E-01_JPRB,&
539&.234E-01_JPRB,.293E-01_JPRB,.446E-01_JPRB,.571E-01_JPRB,.625E-01_JPRB,.568E-01_JPRB,.675E-01_JPRB,&
540&.847E-01_JPRB,.104E+00_JPRB,.123E+00_JPRB,.145E+00_JPRB,.146E+00_JPRB,.144E+00_JPRB,.155E+00_JPRB,&
541&.166E+00_JPRB,.173E+00_JPRB,.190E+00_JPRB,.212E+00_JPRB,.189E+00_JPRB,.138E+00_JPRB,.969E-01_JPRB,&
542&.660E-01_JPRB,.507E-01_JPRB,.431E-01_JPRB,.386E-01_JPRB,.360E-01_JPRB,.359E-01_JPRB,.363E-01_JPRB,&
543&.364E-01_JPRB,.365E-01_JPRB/)
544!-- Total Soil Dust Aerosol  month:  7 --- lat: 37 -54.0
545ZAER (:,37, 7) = (/&
546&.307E-01_JPRB,.258E-01_JPRB,.227E-01_JPRB,.225E-01_JPRB,.203E-01_JPRB,.172E-01_JPRB,.164E-01_JPRB,&
547&.162E-01_JPRB,.161E-01_JPRB,.166E-01_JPRB,.184E-01_JPRB,.214E-01_JPRB,.231E-01_JPRB,.236E-01_JPRB,&
548&.242E-01_JPRB,.243E-01_JPRB,.231E-01_JPRB,.215E-01_JPRB,.208E-01_JPRB,.199E-01_JPRB,.196E-01_JPRB,&
549&.207E-01_JPRB,.196E-01_JPRB,.183E-01_JPRB,.170E-01_JPRB,.158E-01_JPRB,.152E-01_JPRB,.147E-01_JPRB,&
550&.139E-01_JPRB,.133E-01_JPRB,.129E-01_JPRB,.124E-01_JPRB,.124E-01_JPRB,.121E-01_JPRB,.121E-01_JPRB,&
551&.126E-01_JPRB,.142E-01_JPRB,.171E-01_JPRB,.195E-01_JPRB,.207E-01_JPRB,.214E-01_JPRB,.217E-01_JPRB,&
552&.219E-01_JPRB,.240E-01_JPRB,.300E-01_JPRB,.337E-01_JPRB,.341E-01_JPRB,.337E-01_JPRB,.381E-01_JPRB,&
553&.467E-01_JPRB,.530E-01_JPRB,.561E-01_JPRB,.651E-01_JPRB,.807E-01_JPRB,.931E-01_JPRB,.995E-01_JPRB,&
554&.961E-01_JPRB,.943E-01_JPRB,.106E+00_JPRB,.109E+00_JPRB,.976E-01_JPRB,.706E-01_JPRB,.521E-01_JPRB,&
555&.412E-01_JPRB,.352E-01_JPRB,.311E-01_JPRB,.276E-01_JPRB,.277E-01_JPRB,.300E-01_JPRB,.315E-01_JPRB,&
556&.320E-01_JPRB,.324E-01_JPRB/)
557!-- Total Soil Dust Aerosol  month:  7 --- lat: 38 -58.0
558ZAER (:,38, 7) = (/&
559&.260E-01_JPRB,.239E-01_JPRB,.222E-01_JPRB,.223E-01_JPRB,.209E-01_JPRB,.187E-01_JPRB,.176E-01_JPRB,&
560&.175E-01_JPRB,.174E-01_JPRB,.178E-01_JPRB,.191E-01_JPRB,.213E-01_JPRB,.227E-01_JPRB,.225E-01_JPRB,&
561&.222E-01_JPRB,.216E-01_JPRB,.211E-01_JPRB,.208E-01_JPRB,.202E-01_JPRB,.197E-01_JPRB,.190E-01_JPRB,&
562&.198E-01_JPRB,.183E-01_JPRB,.165E-01_JPRB,.147E-01_JPRB,.135E-01_JPRB,.132E-01_JPRB,.126E-01_JPRB,&
563&.118E-01_JPRB,.113E-01_JPRB,.113E-01_JPRB,.114E-01_JPRB,.115E-01_JPRB,.114E-01_JPRB,.116E-01_JPRB,&
564&.119E-01_JPRB,.124E-01_JPRB,.138E-01_JPRB,.152E-01_JPRB,.165E-01_JPRB,.181E-01_JPRB,.194E-01_JPRB,&
565&.210E-01_JPRB,.217E-01_JPRB,.230E-01_JPRB,.263E-01_JPRB,.270E-01_JPRB,.286E-01_JPRB,.317E-01_JPRB,&
566&.329E-01_JPRB,.281E-01_JPRB,.247E-01_JPRB,.272E-01_JPRB,.313E-01_JPRB,.401E-01_JPRB,.474E-01_JPRB,&
567&.498E-01_JPRB,.499E-01_JPRB,.509E-01_JPRB,.501E-01_JPRB,.443E-01_JPRB,.380E-01_JPRB,.335E-01_JPRB,&
568&.294E-01_JPRB,.255E-01_JPRB,.224E-01_JPRB,.201E-01_JPRB,.203E-01_JPRB,.229E-01_JPRB,.251E-01_JPRB,&
569&.261E-01_JPRB,.268E-01_JPRB/)
570!-- Total Soil Dust Aerosol  month:  7 --- lat: 39 -62.0
571ZAER (:,39, 7) = (/&
572&.225E-01_JPRB,.229E-01_JPRB,.221E-01_JPRB,.219E-01_JPRB,.224E-01_JPRB,.216E-01_JPRB,.202E-01_JPRB,&
573&.197E-01_JPRB,.199E-01_JPRB,.203E-01_JPRB,.210E-01_JPRB,.223E-01_JPRB,.234E-01_JPRB,.235E-01_JPRB,&
574&.233E-01_JPRB,.227E-01_JPRB,.225E-01_JPRB,.229E-01_JPRB,.215E-01_JPRB,.205E-01_JPRB,.195E-01_JPRB,&
575&.189E-01_JPRB,.171E-01_JPRB,.152E-01_JPRB,.134E-01_JPRB,.125E-01_JPRB,.122E-01_JPRB,.123E-01_JPRB,&
576&.114E-01_JPRB,.107E-01_JPRB,.109E-01_JPRB,.110E-01_JPRB,.108E-01_JPRB,.108E-01_JPRB,.108E-01_JPRB,&
577&.107E-01_JPRB,.110E-01_JPRB,.118E-01_JPRB,.129E-01_JPRB,.134E-01_JPRB,.142E-01_JPRB,.158E-01_JPRB,&
578&.174E-01_JPRB,.184E-01_JPRB,.186E-01_JPRB,.210E-01_JPRB,.228E-01_JPRB,.235E-01_JPRB,.249E-01_JPRB,&
579&.249E-01_JPRB,.225E-01_JPRB,.226E-01_JPRB,.232E-01_JPRB,.231E-01_JPRB,.237E-01_JPRB,.247E-01_JPRB,&
580&.252E-01_JPRB,.248E-01_JPRB,.247E-01_JPRB,.252E-01_JPRB,.254E-01_JPRB,.248E-01_JPRB,.245E-01_JPRB,&
581&.234E-01_JPRB,.221E-01_JPRB,.198E-01_JPRB,.175E-01_JPRB,.173E-01_JPRB,.191E-01_JPRB,.214E-01_JPRB,&
582&.224E-01_JPRB,.224E-01_JPRB/)
583!-- Total Soil Dust Aerosol  month:  7 --- lat: 40 -66.0
584ZAER (:,40, 7) = (/&
585&.212E-01_JPRB,.219E-01_JPRB,.218E-01_JPRB,.215E-01_JPRB,.225E-01_JPRB,.235E-01_JPRB,.233E-01_JPRB,&
586&.226E-01_JPRB,.221E-01_JPRB,.217E-01_JPRB,.223E-01_JPRB,.232E-01_JPRB,.240E-01_JPRB,.244E-01_JPRB,&
587&.248E-01_JPRB,.254E-01_JPRB,.256E-01_JPRB,.265E-01_JPRB,.246E-01_JPRB,.211E-01_JPRB,.191E-01_JPRB,&
588&.178E-01_JPRB,.168E-01_JPRB,.153E-01_JPRB,.133E-01_JPRB,.121E-01_JPRB,.124E-01_JPRB,.131E-01_JPRB,&
589&.130E-01_JPRB,.125E-01_JPRB,.121E-01_JPRB,.117E-01_JPRB,.113E-01_JPRB,.110E-01_JPRB,.107E-01_JPRB,&
590&.105E-01_JPRB,.106E-01_JPRB,.108E-01_JPRB,.115E-01_JPRB,.121E-01_JPRB,.124E-01_JPRB,.128E-01_JPRB,&
591&.138E-01_JPRB,.144E-01_JPRB,.146E-01_JPRB,.159E-01_JPRB,.186E-01_JPRB,.209E-01_JPRB,.224E-01_JPRB,&
592&.231E-01_JPRB,.223E-01_JPRB,.218E-01_JPRB,.215E-01_JPRB,.202E-01_JPRB,.188E-01_JPRB,.183E-01_JPRB,&
593&.182E-01_JPRB,.181E-01_JPRB,.184E-01_JPRB,.191E-01_JPRB,.198E-01_JPRB,.210E-01_JPRB,.216E-01_JPRB,&
594&.222E-01_JPRB,.220E-01_JPRB,.196E-01_JPRB,.182E-01_JPRB,.180E-01_JPRB,.186E-01_JPRB,.201E-01_JPRB,&
595&.207E-01_JPRB,.208E-01_JPRB/)
596!-- Total Soil Dust Aerosol  month:  7 --- lat: 41 -70.0
597ZAER (:,41, 7) = (/&
598&.216E-01_JPRB,.216E-01_JPRB,.211E-01_JPRB,.218E-01_JPRB,.225E-01_JPRB,.231E-01_JPRB,.232E-01_JPRB,&
599&.231E-01_JPRB,.225E-01_JPRB,.220E-01_JPRB,.220E-01_JPRB,.222E-01_JPRB,.230E-01_JPRB,.241E-01_JPRB,&
600&.251E-01_JPRB,.252E-01_JPRB,.241E-01_JPRB,.226E-01_JPRB,.213E-01_JPRB,.198E-01_JPRB,.182E-01_JPRB,&
601&.169E-01_JPRB,.160E-01_JPRB,.153E-01_JPRB,.143E-01_JPRB,.126E-01_JPRB,.125E-01_JPRB,.135E-01_JPRB,&
602&.140E-01_JPRB,.141E-01_JPRB,.142E-01_JPRB,.134E-01_JPRB,.122E-01_JPRB,.117E-01_JPRB,.112E-01_JPRB,&
603&.112E-01_JPRB,.112E-01_JPRB,.111E-01_JPRB,.114E-01_JPRB,.117E-01_JPRB,.120E-01_JPRB,.122E-01_JPRB,&
604&.124E-01_JPRB,.126E-01_JPRB,.128E-01_JPRB,.131E-01_JPRB,.140E-01_JPRB,.156E-01_JPRB,.173E-01_JPRB,&
605&.187E-01_JPRB,.190E-01_JPRB,.187E-01_JPRB,.180E-01_JPRB,.169E-01_JPRB,.162E-01_JPRB,.165E-01_JPRB,&
606&.172E-01_JPRB,.174E-01_JPRB,.176E-01_JPRB,.180E-01_JPRB,.185E-01_JPRB,.197E-01_JPRB,.208E-01_JPRB,&
607&.230E-01_JPRB,.227E-01_JPRB,.194E-01_JPRB,.184E-01_JPRB,.184E-01_JPRB,.185E-01_JPRB,.190E-01_JPRB,&
608&.193E-01_JPRB,.194E-01_JPRB/)
609!-- Total Soil Dust Aerosol  month:  7 --- lat: 42 -74.0
610ZAER (:,42, 7) = (/&
611&.209E-01_JPRB,.205E-01_JPRB,.201E-01_JPRB,.205E-01_JPRB,.209E-01_JPRB,.211E-01_JPRB,.211E-01_JPRB,&
612&.209E-01_JPRB,.206E-01_JPRB,.205E-01_JPRB,.201E-01_JPRB,.201E-01_JPRB,.212E-01_JPRB,.228E-01_JPRB,&
613&.228E-01_JPRB,.218E-01_JPRB,.217E-01_JPRB,.200E-01_JPRB,.198E-01_JPRB,.187E-01_JPRB,.171E-01_JPRB,&
614&.165E-01_JPRB,.163E-01_JPRB,.160E-01_JPRB,.151E-01_JPRB,.142E-01_JPRB,.138E-01_JPRB,.143E-01_JPRB,&
615&.147E-01_JPRB,.146E-01_JPRB,.146E-01_JPRB,.145E-01_JPRB,.135E-01_JPRB,.123E-01_JPRB,.121E-01_JPRB,&
616&.120E-01_JPRB,.117E-01_JPRB,.116E-01_JPRB,.118E-01_JPRB,.119E-01_JPRB,.121E-01_JPRB,.123E-01_JPRB,&
617&.122E-01_JPRB,.122E-01_JPRB,.127E-01_JPRB,.130E-01_JPRB,.133E-01_JPRB,.138E-01_JPRB,.139E-01_JPRB,&
618&.145E-01_JPRB,.152E-01_JPRB,.153E-01_JPRB,.154E-01_JPRB,.169E-01_JPRB,.203E-01_JPRB,.222E-01_JPRB,&
619&.222E-01_JPRB,.197E-01_JPRB,.187E-01_JPRB,.180E-01_JPRB,.184E-01_JPRB,.195E-01_JPRB,.211E-01_JPRB,&
620&.248E-01_JPRB,.276E-01_JPRB,.232E-01_JPRB,.190E-01_JPRB,.183E-01_JPRB,.182E-01_JPRB,.182E-01_JPRB,&
621&.184E-01_JPRB,.193E-01_JPRB/)
622!-- Total Soil Dust Aerosol  month:  7 --- lat: 43 -78.0
623ZAER (:,43, 7) = (/&
624&.191E-01_JPRB,.191E-01_JPRB,.191E-01_JPRB,.191E-01_JPRB,.190E-01_JPRB,.188E-01_JPRB,.186E-01_JPRB,&
625&.185E-01_JPRB,.184E-01_JPRB,.183E-01_JPRB,.181E-01_JPRB,.183E-01_JPRB,.202E-01_JPRB,.204E-01_JPRB,&
626&.196E-01_JPRB,.194E-01_JPRB,.198E-01_JPRB,.194E-01_JPRB,.189E-01_JPRB,.185E-01_JPRB,.180E-01_JPRB,&
627&.181E-01_JPRB,.196E-01_JPRB,.187E-01_JPRB,.164E-01_JPRB,.155E-01_JPRB,.148E-01_JPRB,.147E-01_JPRB,&
628&.147E-01_JPRB,.146E-01_JPRB,.146E-01_JPRB,.145E-01_JPRB,.140E-01_JPRB,.130E-01_JPRB,.127E-01_JPRB,&
629&.127E-01_JPRB,.126E-01_JPRB,.126E-01_JPRB,.128E-01_JPRB,.130E-01_JPRB,.133E-01_JPRB,.135E-01_JPRB,&
630&.136E-01_JPRB,.137E-01_JPRB,.140E-01_JPRB,.142E-01_JPRB,.143E-01_JPRB,.145E-01_JPRB,.148E-01_JPRB,&
631&.154E-01_JPRB,.158E-01_JPRB,.160E-01_JPRB,.164E-01_JPRB,.167E-01_JPRB,.172E-01_JPRB,.178E-01_JPRB,&
632&.185E-01_JPRB,.195E-01_JPRB,.202E-01_JPRB,.190E-01_JPRB,.184E-01_JPRB,.185E-01_JPRB,.189E-01_JPRB,&
633&.194E-01_JPRB,.193E-01_JPRB,.186E-01_JPRB,.182E-01_JPRB,.184E-01_JPRB,.186E-01_JPRB,.187E-01_JPRB,&
634&.187E-01_JPRB,.188E-01_JPRB/)
635!-- Total Soil Dust Aerosol  month:  7 --- lat: 44 -82.0
636ZAER (:,44, 7) = (/&
637&.181E-01_JPRB,.179E-01_JPRB,.178E-01_JPRB,.178E-01_JPRB,.176E-01_JPRB,.175E-01_JPRB,.173E-01_JPRB,&
638&.172E-01_JPRB,.171E-01_JPRB,.170E-01_JPRB,.169E-01_JPRB,.168E-01_JPRB,.171E-01_JPRB,.169E-01_JPRB,&
639&.167E-01_JPRB,.167E-01_JPRB,.168E-01_JPRB,.167E-01_JPRB,.169E-01_JPRB,.173E-01_JPRB,.173E-01_JPRB,&
640&.173E-01_JPRB,.174E-01_JPRB,.172E-01_JPRB,.162E-01_JPRB,.154E-01_JPRB,.151E-01_JPRB,.149E-01_JPRB,&
641&.148E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.148E-01_JPRB,.144E-01_JPRB,.138E-01_JPRB,.134E-01_JPRB,&
642&.133E-01_JPRB,.133E-01_JPRB,.135E-01_JPRB,.137E-01_JPRB,.140E-01_JPRB,.144E-01_JPRB,.147E-01_JPRB,&
643&.148E-01_JPRB,.149E-01_JPRB,.149E-01_JPRB,.149E-01_JPRB,.151E-01_JPRB,.153E-01_JPRB,.156E-01_JPRB,&
644&.158E-01_JPRB,.161E-01_JPRB,.168E-01_JPRB,.172E-01_JPRB,.172E-01_JPRB,.172E-01_JPRB,.175E-01_JPRB,&
645&.178E-01_JPRB,.181E-01_JPRB,.179E-01_JPRB,.175E-01_JPRB,.173E-01_JPRB,.172E-01_JPRB,.172E-01_JPRB,&
646&.171E-01_JPRB,.172E-01_JPRB,.176E-01_JPRB,.179E-01_JPRB,.181E-01_JPRB,.183E-01_JPRB,.183E-01_JPRB,&
647&.183E-01_JPRB,.183E-01_JPRB/)
648!-- Total Soil Dust Aerosol  month:  7 --- lat: 45 -86.0
649ZAER (:,45, 7) = (/&
650&.160E-01_JPRB,.159E-01_JPRB,.158E-01_JPRB,.157E-01_JPRB,.155E-01_JPRB,.154E-01_JPRB,.153E-01_JPRB,&
651&.152E-01_JPRB,.151E-01_JPRB,.150E-01_JPRB,.148E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
652&.147E-01_JPRB,.148E-01_JPRB,.148E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
653&.146E-01_JPRB,.146E-01_JPRB,.145E-01_JPRB,.144E-01_JPRB,.143E-01_JPRB,.143E-01_JPRB,.142E-01_JPRB,&
654&.142E-01_JPRB,.142E-01_JPRB,.142E-01_JPRB,.142E-01_JPRB,.142E-01_JPRB,.142E-01_JPRB,.143E-01_JPRB,&
655&.144E-01_JPRB,.146E-01_JPRB,.147E-01_JPRB,.148E-01_JPRB,.149E-01_JPRB,.149E-01_JPRB,.149E-01_JPRB,&
656&.150E-01_JPRB,.149E-01_JPRB,.149E-01_JPRB,.150E-01_JPRB,.151E-01_JPRB,.151E-01_JPRB,.152E-01_JPRB,&
657&.153E-01_JPRB,.154E-01_JPRB,.155E-01_JPRB,.156E-01_JPRB,.157E-01_JPRB,.158E-01_JPRB,.158E-01_JPRB,&
658&.159E-01_JPRB,.158E-01_JPRB,.159E-01_JPRB,.159E-01_JPRB,.160E-01_JPRB,.161E-01_JPRB,.161E-01_JPRB,&
659&.162E-01_JPRB,.162E-01_JPRB,.163E-01_JPRB,.163E-01_JPRB,.164E-01_JPRB,.164E-01_JPRB,.163E-01_JPRB,&
660&.162E-01_JPRB,.162E-01_JPRB/)
661!-- Total Soil Dust Aerosol  month:  7 --- lat: 46 -90.0
662ZAER (:,46, 7) = (/&
663&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
664&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
665&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
666&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
667&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
668&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
669&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
670&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
671&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
672&.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,.147E-01_JPRB,&
673&.147E-01_JPRB,.147E-01_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      RAERSD(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,'SOIL DUST AEROSOLS ',2E12.5)
691
692!     ------------------------------------------------------------------
693
694RETURN
695END SUBROUTINE SUECAESD_07
Note: See TracBrowser for help on using the repository browser.