LMDZ
suecaess_09.F90
Go to the documentation of this file.
1 SUBROUTINE suecaess_09
2 
3 !** OPTICAL THICKNESS OF AEROSOLS OF SEA-SALT ORIGIN
4 ! September
5 
6 ! PURPOSE.
7 ! --------
8 
9 !** INTERFACE.
10 ! ----------
11 ! CALL *SUECAESS* 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 
48 USE yoeaerc , ONLY : raerss
49 
50 
51 IMPLICIT NONE
52 
53 
54 ! -----------------------------------------------------------------
55 
56 !* 0.1 ARGUMENTS.
57 ! ----------
58 
59 ! -----------------------------------------------------------------
60 
61 !* 0.2 LOCAL ARRAYS.
62 ! -------------
63 
64 real_b :: zaer(72,46,9:9)
65 
66 ! LOCAL INTEGER SCALARS
67 integer_m :: ji, jl, jm
68 
69 ! LOCAL REAL SCALARS
70 real_b :: zmax, zmin
71 
72 ! ------------------------------------------------------------------
73 
74 !-- Tegen et al., 1997
75 
76 !-- Sea Salt Aerosol month: 9 --- lat: 1 90.0
77 zaer(:, 1, 9) = (/&
78 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
79 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
80 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
81 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
82 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
83 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
84 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
85 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
86 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
87 &.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,.600e-03_jprb,&
88 &.600e-03_jprb,.600e-03_jprb/)
89 !-- Sea Salt Aerosol month: 9 --- lat: 2 86.0
90 zaer(:, 2, 9) = (/&
91 &.749e-03_jprb,.749e-03_jprb,.750e-03_jprb,.750e-03_jprb,.775e-03_jprb,.775e-03_jprb,.809e-03_jprb,&
92 &.809e-03_jprb,.867e-03_jprb,.867e-03_jprb,.944e-03_jprb,.944e-03_jprb,.105e-02_jprb,.105e-02_jprb,&
93 &.118e-02_jprb,.118e-02_jprb,.126e-02_jprb,.126e-02_jprb,.132e-02_jprb,.132e-02_jprb,.129e-02_jprb,&
94 &.129e-02_jprb,.120e-02_jprb,.120e-02_jprb,.106e-02_jprb,.106e-02_jprb,.898e-03_jprb,.898e-03_jprb,&
95 &.758e-03_jprb,.758e-03_jprb,.604e-03_jprb,.604e-03_jprb,.465e-03_jprb,.465e-03_jprb,.357e-03_jprb,&
96 &.357e-03_jprb,.275e-03_jprb,.275e-03_jprb,.243e-03_jprb,.243e-03_jprb,.239e-03_jprb,.239e-03_jprb,&
97 &.255e-03_jprb,.255e-03_jprb,.277e-03_jprb,.277e-03_jprb,.286e-03_jprb,.286e-03_jprb,.289e-03_jprb,&
98 &.289e-03_jprb,.300e-03_jprb,.300e-03_jprb,.312e-03_jprb,.312e-03_jprb,.341e-03_jprb,.341e-03_jprb,&
99 &.381e-03_jprb,.381e-03_jprb,.414e-03_jprb,.414e-03_jprb,.439e-03_jprb,.439e-03_jprb,.465e-03_jprb,&
100 &.465e-03_jprb,.507e-03_jprb,.507e-03_jprb,.586e-03_jprb,.586e-03_jprb,.682e-03_jprb,.682e-03_jprb,&
101 &.726e-03_jprb,.726e-03_jprb/)
102 !-- Sea Salt Aerosol month: 9 --- lat: 3 82.0
103 zaer(:, 3, 9) = (/&
104 &.749e-03_jprb,.749e-03_jprb,.750e-03_jprb,.750e-03_jprb,.775e-03_jprb,.775e-03_jprb,.809e-03_jprb,&
105 &.809e-03_jprb,.867e-03_jprb,.867e-03_jprb,.944e-03_jprb,.944e-03_jprb,.105e-02_jprb,.105e-02_jprb,&
106 &.118e-02_jprb,.118e-02_jprb,.126e-02_jprb,.126e-02_jprb,.132e-02_jprb,.132e-02_jprb,.129e-02_jprb,&
107 &.129e-02_jprb,.120e-02_jprb,.120e-02_jprb,.106e-02_jprb,.106e-02_jprb,.898e-03_jprb,.898e-03_jprb,&
108 &.758e-03_jprb,.758e-03_jprb,.604e-03_jprb,.604e-03_jprb,.465e-03_jprb,.465e-03_jprb,.357e-03_jprb,&
109 &.357e-03_jprb,.275e-03_jprb,.275e-03_jprb,.243e-03_jprb,.243e-03_jprb,.239e-03_jprb,.239e-03_jprb,&
110 &.255e-03_jprb,.255e-03_jprb,.277e-03_jprb,.277e-03_jprb,.286e-03_jprb,.286e-03_jprb,.289e-03_jprb,&
111 &.289e-03_jprb,.300e-03_jprb,.300e-03_jprb,.312e-03_jprb,.312e-03_jprb,.341e-03_jprb,.341e-03_jprb,&
112 &.381e-03_jprb,.381e-03_jprb,.414e-03_jprb,.414e-03_jprb,.439e-03_jprb,.439e-03_jprb,.465e-03_jprb,&
113 &.465e-03_jprb,.507e-03_jprb,.507e-03_jprb,.586e-03_jprb,.586e-03_jprb,.682e-03_jprb,.682e-03_jprb,&
114 &.726e-03_jprb,.726e-03_jprb/)
115 !-- Sea Salt Aerosol month: 9 --- lat: 4 78.0
116 zaer(:, 4, 9) = (/&
117 &.738e-03_jprb,.738e-03_jprb,.772e-03_jprb,.772e-03_jprb,.793e-03_jprb,.793e-03_jprb,.792e-03_jprb,&
118 &.792e-03_jprb,.791e-03_jprb,.791e-03_jprb,.798e-03_jprb,.798e-03_jprb,.936e-03_jprb,.936e-03_jprb,&
119 &.137e-02_jprb,.137e-02_jprb,.166e-02_jprb,.166e-02_jprb,.194e-02_jprb,.194e-02_jprb,.223e-02_jprb,&
120 &.223e-02_jprb,.209e-02_jprb,.209e-02_jprb,.188e-02_jprb,.188e-02_jprb,.145e-02_jprb,.145e-02_jprb,&
121 &.104e-02_jprb,.104e-02_jprb,.885e-03_jprb,.885e-03_jprb,.799e-03_jprb,.799e-03_jprb,.728e-03_jprb,&
122 &.728e-03_jprb,.471e-03_jprb,.471e-03_jprb,.336e-03_jprb,.336e-03_jprb,.326e-03_jprb,.326e-03_jprb,&
123 &.367e-03_jprb,.367e-03_jprb,.393e-03_jprb,.393e-03_jprb,.403e-03_jprb,.403e-03_jprb,.511e-03_jprb,&
124 &.511e-03_jprb,.544e-03_jprb,.544e-03_jprb,.406e-03_jprb,.406e-03_jprb,.379e-03_jprb,.379e-03_jprb,&
125 &.374e-03_jprb,.374e-03_jprb,.419e-03_jprb,.419e-03_jprb,.425e-03_jprb,.425e-03_jprb,.421e-03_jprb,&
126 &.421e-03_jprb,.418e-03_jprb,.418e-03_jprb,.461e-03_jprb,.461e-03_jprb,.557e-03_jprb,.557e-03_jprb,&
127 &.673e-03_jprb,.673e-03_jprb/)
128 !-- Sea Salt Aerosol month: 9 --- lat: 5 74.0
129 zaer(:, 5, 9) = (/&
130 &.738e-03_jprb,.738e-03_jprb,.772e-03_jprb,.772e-03_jprb,.793e-03_jprb,.793e-03_jprb,.792e-03_jprb,&
131 &.792e-03_jprb,.791e-03_jprb,.791e-03_jprb,.798e-03_jprb,.798e-03_jprb,.936e-03_jprb,.936e-03_jprb,&
132 &.137e-02_jprb,.137e-02_jprb,.166e-02_jprb,.166e-02_jprb,.194e-02_jprb,.194e-02_jprb,.223e-02_jprb,&
133 &.223e-02_jprb,.209e-02_jprb,.209e-02_jprb,.188e-02_jprb,.188e-02_jprb,.145e-02_jprb,.145e-02_jprb,&
134 &.104e-02_jprb,.104e-02_jprb,.885e-03_jprb,.885e-03_jprb,.799e-03_jprb,.799e-03_jprb,.728e-03_jprb,&
135 &.728e-03_jprb,.471e-03_jprb,.471e-03_jprb,.336e-03_jprb,.336e-03_jprb,.326e-03_jprb,.326e-03_jprb,&
136 &.367e-03_jprb,.367e-03_jprb,.393e-03_jprb,.393e-03_jprb,.403e-03_jprb,.403e-03_jprb,.511e-03_jprb,&
137 &.511e-03_jprb,.544e-03_jprb,.544e-03_jprb,.406e-03_jprb,.406e-03_jprb,.379e-03_jprb,.379e-03_jprb,&
138 &.374e-03_jprb,.374e-03_jprb,.419e-03_jprb,.419e-03_jprb,.425e-03_jprb,.425e-03_jprb,.421e-03_jprb,&
139 &.421e-03_jprb,.418e-03_jprb,.418e-03_jprb,.461e-03_jprb,.461e-03_jprb,.557e-03_jprb,.557e-03_jprb,&
140 &.673e-03_jprb,.673e-03_jprb/)
141 !-- Sea Salt Aerosol month: 9 --- lat: 6 70.0
142 zaer(:, 6, 9) = (/&
143 &.196e-02_jprb,.196e-02_jprb,.326e-02_jprb,.326e-02_jprb,.230e-02_jprb,.230e-02_jprb,.220e-02_jprb,&
144 &.220e-02_jprb,.236e-02_jprb,.236e-02_jprb,.205e-02_jprb,.205e-02_jprb,.188e-02_jprb,.188e-02_jprb,&
145 &.259e-02_jprb,.259e-02_jprb,.336e-02_jprb,.336e-02_jprb,.357e-02_jprb,.357e-02_jprb,.392e-02_jprb,&
146 &.392e-02_jprb,.396e-02_jprb,.396e-02_jprb,.339e-02_jprb,.339e-02_jprb,.237e-02_jprb,.237e-02_jprb,&
147 &.153e-02_jprb,.153e-02_jprb,.107e-02_jprb,.107e-02_jprb,.865e-03_jprb,.865e-03_jprb,.109e-02_jprb,&
148 &.109e-02_jprb,.132e-02_jprb,.132e-02_jprb,.705e-03_jprb,.705e-03_jprb,.774e-03_jprb,.774e-03_jprb,&
149 &.101e-02_jprb,.101e-02_jprb,.134e-02_jprb,.134e-02_jprb,.148e-02_jprb,.148e-02_jprb,.223e-02_jprb,&
150 &.223e-02_jprb,.294e-02_jprb,.294e-02_jprb,.165e-02_jprb,.165e-02_jprb,.112e-02_jprb,.112e-02_jprb,&
151 &.110e-02_jprb,.110e-02_jprb,.136e-02_jprb,.136e-02_jprb,.198e-02_jprb,.198e-02_jprb,.255e-02_jprb,&
152 &.255e-02_jprb,.205e-02_jprb,.205e-02_jprb,.182e-02_jprb,.182e-02_jprb,.188e-02_jprb,.188e-02_jprb,&
153 &.207e-02_jprb,.207e-02_jprb/)
154 !-- Sea Salt Aerosol month: 9 --- lat: 7 66.0
155 zaer(:, 7, 9) = (/&
156 &.196e-02_jprb,.196e-02_jprb,.326e-02_jprb,.326e-02_jprb,.230e-02_jprb,.230e-02_jprb,.220e-02_jprb,&
157 &.220e-02_jprb,.236e-02_jprb,.236e-02_jprb,.205e-02_jprb,.205e-02_jprb,.188e-02_jprb,.188e-02_jprb,&
158 &.259e-02_jprb,.259e-02_jprb,.336e-02_jprb,.336e-02_jprb,.357e-02_jprb,.357e-02_jprb,.392e-02_jprb,&
159 &.392e-02_jprb,.396e-02_jprb,.396e-02_jprb,.339e-02_jprb,.339e-02_jprb,.237e-02_jprb,.237e-02_jprb,&
160 &.153e-02_jprb,.153e-02_jprb,.107e-02_jprb,.107e-02_jprb,.865e-03_jprb,.865e-03_jprb,.109e-02_jprb,&
161 &.109e-02_jprb,.132e-02_jprb,.132e-02_jprb,.705e-03_jprb,.705e-03_jprb,.774e-03_jprb,.774e-03_jprb,&
162 &.101e-02_jprb,.101e-02_jprb,.134e-02_jprb,.134e-02_jprb,.148e-02_jprb,.148e-02_jprb,.223e-02_jprb,&
163 &.223e-02_jprb,.294e-02_jprb,.294e-02_jprb,.165e-02_jprb,.165e-02_jprb,.112e-02_jprb,.112e-02_jprb,&
164 &.110e-02_jprb,.110e-02_jprb,.136e-02_jprb,.136e-02_jprb,.198e-02_jprb,.198e-02_jprb,.255e-02_jprb,&
165 &.255e-02_jprb,.205e-02_jprb,.205e-02_jprb,.182e-02_jprb,.182e-02_jprb,.188e-02_jprb,.188e-02_jprb,&
166 &.207e-02_jprb,.207e-02_jprb/)
167 !-- Sea Salt Aerosol month: 9 --- lat: 8 62.0
168 zaer(:, 8, 9) = (/&
169 &.948e-02_jprb,.948e-02_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,&
170 &.102e-01_jprb,.105e-01_jprb,.105e-01_jprb,.979e-02_jprb,.979e-02_jprb,.986e-02_jprb,.986e-02_jprb,&
171 &.102e-01_jprb,.102e-01_jprb,.103e-01_jprb,.103e-01_jprb,.102e-01_jprb,.102e-01_jprb,.965e-02_jprb,&
172 &.965e-02_jprb,.903e-02_jprb,.903e-02_jprb,.830e-02_jprb,.830e-02_jprb,.628e-02_jprb,.628e-02_jprb,&
173 &.278e-02_jprb,.278e-02_jprb,.150e-02_jprb,.150e-02_jprb,.101e-02_jprb,.101e-02_jprb,.953e-03_jprb,&
174 &.953e-03_jprb,.146e-02_jprb,.146e-02_jprb,.192e-02_jprb,.192e-02_jprb,.238e-02_jprb,.238e-02_jprb,&
175 &.258e-02_jprb,.258e-02_jprb,.575e-02_jprb,.575e-02_jprb,.781e-02_jprb,.781e-02_jprb,.796e-02_jprb,&
176 &.796e-02_jprb,.734e-02_jprb,.734e-02_jprb,.690e-02_jprb,.690e-02_jprb,.677e-02_jprb,.677e-02_jprb,&
177 &.667e-02_jprb,.667e-02_jprb,.784e-02_jprb,.784e-02_jprb,.105e-01_jprb,.105e-01_jprb,.117e-01_jprb,&
178 &.117e-01_jprb,.899e-02_jprb,.899e-02_jprb,.861e-02_jprb,.861e-02_jprb,.970e-02_jprb,.970e-02_jprb,&
179 &.994e-02_jprb,.994e-02_jprb/)
180 !-- Sea Salt Aerosol month: 9 --- lat: 9 58.0
181 zaer(:, 9, 9) = (/&
182 &.948e-02_jprb,.948e-02_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,&
183 &.102e-01_jprb,.105e-01_jprb,.105e-01_jprb,.979e-02_jprb,.979e-02_jprb,.986e-02_jprb,.986e-02_jprb,&
184 &.102e-01_jprb,.102e-01_jprb,.103e-01_jprb,.103e-01_jprb,.102e-01_jprb,.102e-01_jprb,.965e-02_jprb,&
185 &.965e-02_jprb,.903e-02_jprb,.903e-02_jprb,.830e-02_jprb,.830e-02_jprb,.628e-02_jprb,.628e-02_jprb,&
186 &.278e-02_jprb,.278e-02_jprb,.150e-02_jprb,.150e-02_jprb,.101e-02_jprb,.101e-02_jprb,.953e-03_jprb,&
187 &.953e-03_jprb,.146e-02_jprb,.146e-02_jprb,.192e-02_jprb,.192e-02_jprb,.238e-02_jprb,.238e-02_jprb,&
188 &.258e-02_jprb,.258e-02_jprb,.575e-02_jprb,.575e-02_jprb,.781e-02_jprb,.781e-02_jprb,.796e-02_jprb,&
189 &.796e-02_jprb,.734e-02_jprb,.734e-02_jprb,.690e-02_jprb,.690e-02_jprb,.677e-02_jprb,.677e-02_jprb,&
190 &.667e-02_jprb,.667e-02_jprb,.784e-02_jprb,.784e-02_jprb,.105e-01_jprb,.105e-01_jprb,.117e-01_jprb,&
191 &.117e-01_jprb,.899e-02_jprb,.899e-02_jprb,.861e-02_jprb,.861e-02_jprb,.970e-02_jprb,.970e-02_jprb,&
192 &.994e-02_jprb,.994e-02_jprb/)
193 !-- Sea Salt Aerosol month: 9 --- lat: 10 54.0
194 zaer(:,10, 9) = (/&
195 &.916e-02_jprb,.916e-02_jprb,.101e-01_jprb,.101e-01_jprb,.114e-01_jprb,.114e-01_jprb,.120e-01_jprb,&
196 &.120e-01_jprb,.132e-01_jprb,.132e-01_jprb,.133e-01_jprb,.133e-01_jprb,.122e-01_jprb,.122e-01_jprb,&
197 &.113e-01_jprb,.113e-01_jprb,.111e-01_jprb,.111e-01_jprb,.114e-01_jprb,.114e-01_jprb,.993e-02_jprb,&
198 &.993e-02_jprb,.763e-02_jprb,.763e-02_jprb,.958e-02_jprb,.958e-02_jprb,.951e-02_jprb,.951e-02_jprb,&
199 &.927e-02_jprb,.927e-02_jprb,.909e-02_jprb,.909e-02_jprb,.955e-02_jprb,.955e-02_jprb,.835e-02_jprb,&
200 &.835e-02_jprb,.871e-02_jprb,.871e-02_jprb,.933e-02_jprb,.933e-02_jprb,.838e-02_jprb,.838e-02_jprb,&
201 &.878e-02_jprb,.878e-02_jprb,.112e-01_jprb,.112e-01_jprb,.118e-01_jprb,.118e-01_jprb,.120e-01_jprb,&
202 &.120e-01_jprb,.116e-01_jprb,.116e-01_jprb,.123e-01_jprb,.123e-01_jprb,.126e-01_jprb,.126e-01_jprb,&
203 &.116e-01_jprb,.116e-01_jprb,.113e-01_jprb,.113e-01_jprb,.120e-01_jprb,.120e-01_jprb,.124e-01_jprb,&
204 &.124e-01_jprb,.113e-01_jprb,.113e-01_jprb,.114e-01_jprb,.114e-01_jprb,.112e-01_jprb,.112e-01_jprb,&
205 &.973e-02_jprb,.973e-02_jprb/)
206 !-- Sea Salt Aerosol month: 9 --- lat: 11 50.0
207 zaer(:,11, 9) = (/&
208 &.916e-02_jprb,.916e-02_jprb,.101e-01_jprb,.101e-01_jprb,.114e-01_jprb,.114e-01_jprb,.120e-01_jprb,&
209 &.120e-01_jprb,.132e-01_jprb,.132e-01_jprb,.133e-01_jprb,.133e-01_jprb,.122e-01_jprb,.122e-01_jprb,&
210 &.113e-01_jprb,.113e-01_jprb,.111e-01_jprb,.111e-01_jprb,.114e-01_jprb,.114e-01_jprb,.993e-02_jprb,&
211 &.993e-02_jprb,.763e-02_jprb,.763e-02_jprb,.958e-02_jprb,.958e-02_jprb,.951e-02_jprb,.951e-02_jprb,&
212 &.927e-02_jprb,.927e-02_jprb,.909e-02_jprb,.909e-02_jprb,.955e-02_jprb,.955e-02_jprb,.835e-02_jprb,&
213 &.835e-02_jprb,.871e-02_jprb,.871e-02_jprb,.933e-02_jprb,.933e-02_jprb,.838e-02_jprb,.838e-02_jprb,&
214 &.878e-02_jprb,.878e-02_jprb,.112e-01_jprb,.112e-01_jprb,.118e-01_jprb,.118e-01_jprb,.120e-01_jprb,&
215 &.120e-01_jprb,.116e-01_jprb,.116e-01_jprb,.123e-01_jprb,.123e-01_jprb,.126e-01_jprb,.126e-01_jprb,&
216 &.116e-01_jprb,.116e-01_jprb,.113e-01_jprb,.113e-01_jprb,.120e-01_jprb,.120e-01_jprb,.124e-01_jprb,&
217 &.124e-01_jprb,.113e-01_jprb,.113e-01_jprb,.114e-01_jprb,.114e-01_jprb,.112e-01_jprb,.112e-01_jprb,&
218 &.973e-02_jprb,.973e-02_jprb/)
219 !-- Sea Salt Aerosol month: 9 --- lat: 12 46.0
220 zaer(:,12, 9) = (/&
221 &.768e-02_jprb,.768e-02_jprb,.809e-02_jprb,.809e-02_jprb,.102e-01_jprb,.102e-01_jprb,.105e-01_jprb,&
222 &.105e-01_jprb,.116e-01_jprb,.116e-01_jprb,.118e-01_jprb,.118e-01_jprb,.113e-01_jprb,.113e-01_jprb,&
223 &.107e-01_jprb,.107e-01_jprb,.104e-01_jprb,.104e-01_jprb,.102e-01_jprb,.102e-01_jprb,.908e-02_jprb,&
224 &.908e-02_jprb,.571e-02_jprb,.571e-02_jprb,.858e-02_jprb,.858e-02_jprb,.110e-01_jprb,.110e-01_jprb,&
225 &.111e-01_jprb,.111e-01_jprb,.101e-01_jprb,.101e-01_jprb,.982e-02_jprb,.982e-02_jprb,.984e-02_jprb,&
226 &.984e-02_jprb,.102e-01_jprb,.102e-01_jprb,.993e-02_jprb,.993e-02_jprb,.953e-02_jprb,.953e-02_jprb,&
227 &.102e-01_jprb,.102e-01_jprb,.112e-01_jprb,.112e-01_jprb,.124e-01_jprb,.124e-01_jprb,.133e-01_jprb,&
228 &.133e-01_jprb,.139e-01_jprb,.139e-01_jprb,.150e-01_jprb,.150e-01_jprb,.143e-01_jprb,.143e-01_jprb,&
229 &.119e-01_jprb,.119e-01_jprb,.102e-01_jprb,.102e-01_jprb,.100e-01_jprb,.100e-01_jprb,.103e-01_jprb,&
230 &.103e-01_jprb,.874e-02_jprb,.874e-02_jprb,.916e-02_jprb,.916e-02_jprb,.902e-02_jprb,.902e-02_jprb,&
231 &.649e-02_jprb,.649e-02_jprb/)
232 !-- Sea Salt Aerosol month: 9 --- lat: 13 42.0
233 zaer(:,13, 9) = (/&
234 &.768e-02_jprb,.768e-02_jprb,.809e-02_jprb,.809e-02_jprb,.102e-01_jprb,.102e-01_jprb,.105e-01_jprb,&
235 &.105e-01_jprb,.116e-01_jprb,.116e-01_jprb,.118e-01_jprb,.118e-01_jprb,.113e-01_jprb,.113e-01_jprb,&
236 &.107e-01_jprb,.107e-01_jprb,.104e-01_jprb,.104e-01_jprb,.102e-01_jprb,.102e-01_jprb,.908e-02_jprb,&
237 &.908e-02_jprb,.571e-02_jprb,.571e-02_jprb,.858e-02_jprb,.858e-02_jprb,.110e-01_jprb,.110e-01_jprb,&
238 &.111e-01_jprb,.111e-01_jprb,.101e-01_jprb,.101e-01_jprb,.982e-02_jprb,.982e-02_jprb,.984e-02_jprb,&
239 &.984e-02_jprb,.102e-01_jprb,.102e-01_jprb,.993e-02_jprb,.993e-02_jprb,.953e-02_jprb,.953e-02_jprb,&
240 &.102e-01_jprb,.102e-01_jprb,.112e-01_jprb,.112e-01_jprb,.124e-01_jprb,.124e-01_jprb,.133e-01_jprb,&
241 &.133e-01_jprb,.139e-01_jprb,.139e-01_jprb,.150e-01_jprb,.150e-01_jprb,.143e-01_jprb,.143e-01_jprb,&
242 &.119e-01_jprb,.119e-01_jprb,.102e-01_jprb,.102e-01_jprb,.100e-01_jprb,.100e-01_jprb,.103e-01_jprb,&
243 &.103e-01_jprb,.874e-02_jprb,.874e-02_jprb,.916e-02_jprb,.916e-02_jprb,.902e-02_jprb,.902e-02_jprb,&
244 &.649e-02_jprb,.649e-02_jprb/)
245 !-- Sea Salt Aerosol month: 9 --- lat: 14 38.0
246 zaer(:,14, 9) = (/&
247 &.759e-02_jprb,.759e-02_jprb,.826e-02_jprb,.826e-02_jprb,.960e-02_jprb,.960e-02_jprb,.100e-01_jprb,&
248 &.100e-01_jprb,.104e-01_jprb,.104e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,&
249 &.996e-02_jprb,.996e-02_jprb,.995e-02_jprb,.995e-02_jprb,.920e-02_jprb,.920e-02_jprb,.792e-02_jprb,&
250 &.792e-02_jprb,.422e-02_jprb,.422e-02_jprb,.438e-02_jprb,.438e-02_jprb,.881e-02_jprb,.881e-02_jprb,&
251 &.996e-02_jprb,.996e-02_jprb,.931e-02_jprb,.931e-02_jprb,.868e-02_jprb,.868e-02_jprb,.804e-02_jprb,&
252 &.804e-02_jprb,.764e-02_jprb,.764e-02_jprb,.786e-02_jprb,.786e-02_jprb,.654e-02_jprb,.654e-02_jprb,&
253 &.801e-02_jprb,.801e-02_jprb,.928e-02_jprb,.928e-02_jprb,.924e-02_jprb,.924e-02_jprb,.943e-02_jprb,&
254 &.943e-02_jprb,.978e-02_jprb,.978e-02_jprb,.954e-02_jprb,.954e-02_jprb,.939e-02_jprb,.939e-02_jprb,&
255 &.827e-02_jprb,.827e-02_jprb,.700e-02_jprb,.700e-02_jprb,.652e-02_jprb,.652e-02_jprb,.641e-02_jprb,&
256 &.641e-02_jprb,.411e-02_jprb,.411e-02_jprb,.663e-02_jprb,.663e-02_jprb,.853e-02_jprb,.853e-02_jprb,&
257 &.715e-02_jprb,.715e-02_jprb/)
258 !-- Sea Salt Aerosol month: 9 --- lat: 15 34.0
259 zaer(:,15, 9) = (/&
260 &.759e-02_jprb,.759e-02_jprb,.826e-02_jprb,.826e-02_jprb,.960e-02_jprb,.960e-02_jprb,.100e-01_jprb,&
261 &.100e-01_jprb,.104e-01_jprb,.104e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,.102e-01_jprb,&
262 &.996e-02_jprb,.996e-02_jprb,.995e-02_jprb,.995e-02_jprb,.920e-02_jprb,.920e-02_jprb,.792e-02_jprb,&
263 &.792e-02_jprb,.422e-02_jprb,.422e-02_jprb,.438e-02_jprb,.438e-02_jprb,.881e-02_jprb,.881e-02_jprb,&
264 &.996e-02_jprb,.996e-02_jprb,.931e-02_jprb,.931e-02_jprb,.868e-02_jprb,.868e-02_jprb,.804e-02_jprb,&
265 &.804e-02_jprb,.764e-02_jprb,.764e-02_jprb,.786e-02_jprb,.786e-02_jprb,.654e-02_jprb,.654e-02_jprb,&
266 &.801e-02_jprb,.801e-02_jprb,.928e-02_jprb,.928e-02_jprb,.924e-02_jprb,.924e-02_jprb,.943e-02_jprb,&
267 &.943e-02_jprb,.978e-02_jprb,.978e-02_jprb,.954e-02_jprb,.954e-02_jprb,.939e-02_jprb,.939e-02_jprb,&
268 &.827e-02_jprb,.827e-02_jprb,.700e-02_jprb,.700e-02_jprb,.652e-02_jprb,.652e-02_jprb,.641e-02_jprb,&
269 &.641e-02_jprb,.411e-02_jprb,.411e-02_jprb,.663e-02_jprb,.663e-02_jprb,.853e-02_jprb,.853e-02_jprb,&
270 &.715e-02_jprb,.715e-02_jprb/)
271 !-- Sea Salt Aerosol month: 9 --- lat: 16 30.0
272 zaer(:,16, 9) = (/&
273 &.797e-02_jprb,.797e-02_jprb,.836e-02_jprb,.836e-02_jprb,.910e-02_jprb,.910e-02_jprb,.937e-02_jprb,&
274 &.937e-02_jprb,.922e-02_jprb,.922e-02_jprb,.972e-02_jprb,.972e-02_jprb,.106e-01_jprb,.106e-01_jprb,&
275 &.106e-01_jprb,.106e-01_jprb,.100e-01_jprb,.100e-01_jprb,.926e-02_jprb,.926e-02_jprb,.804e-02_jprb,&
276 &.804e-02_jprb,.434e-02_jprb,.434e-02_jprb,.322e-02_jprb,.322e-02_jprb,.519e-02_jprb,.519e-02_jprb,&
277 &.742e-02_jprb,.742e-02_jprb,.774e-02_jprb,.774e-02_jprb,.796e-02_jprb,.796e-02_jprb,.778e-02_jprb,&
278 &.778e-02_jprb,.771e-02_jprb,.771e-02_jprb,.662e-02_jprb,.662e-02_jprb,.314e-02_jprb,.314e-02_jprb,&
279 &.446e-02_jprb,.446e-02_jprb,.685e-02_jprb,.685e-02_jprb,.776e-02_jprb,.776e-02_jprb,.794e-02_jprb,&
280 &.794e-02_jprb,.841e-02_jprb,.841e-02_jprb,.868e-02_jprb,.868e-02_jprb,.822e-02_jprb,.822e-02_jprb,&
281 &.741e-02_jprb,.741e-02_jprb,.559e-02_jprb,.559e-02_jprb,.280e-02_jprb,.280e-02_jprb,.252e-02_jprb,&
282 &.252e-02_jprb,.249e-02_jprb,.249e-02_jprb,.516e-02_jprb,.516e-02_jprb,.837e-02_jprb,.837e-02_jprb,&
283 &.823e-02_jprb,.823e-02_jprb/)
284 !-- Sea Salt Aerosol month: 9 --- lat: 17 26.0
285 zaer(:,17, 9) = (/&
286 &.797e-02_jprb,.797e-02_jprb,.836e-02_jprb,.836e-02_jprb,.910e-02_jprb,.910e-02_jprb,.937e-02_jprb,&
287 &.937e-02_jprb,.922e-02_jprb,.922e-02_jprb,.972e-02_jprb,.972e-02_jprb,.106e-01_jprb,.106e-01_jprb,&
288 &.106e-01_jprb,.106e-01_jprb,.100e-01_jprb,.100e-01_jprb,.926e-02_jprb,.926e-02_jprb,.804e-02_jprb,&
289 &.804e-02_jprb,.434e-02_jprb,.434e-02_jprb,.322e-02_jprb,.322e-02_jprb,.519e-02_jprb,.519e-02_jprb,&
290 &.742e-02_jprb,.742e-02_jprb,.774e-02_jprb,.774e-02_jprb,.796e-02_jprb,.796e-02_jprb,.778e-02_jprb,&
291 &.778e-02_jprb,.771e-02_jprb,.771e-02_jprb,.662e-02_jprb,.662e-02_jprb,.314e-02_jprb,.314e-02_jprb,&
292 &.446e-02_jprb,.446e-02_jprb,.685e-02_jprb,.685e-02_jprb,.776e-02_jprb,.776e-02_jprb,.794e-02_jprb,&
293 &.794e-02_jprb,.841e-02_jprb,.841e-02_jprb,.868e-02_jprb,.868e-02_jprb,.822e-02_jprb,.822e-02_jprb,&
294 &.741e-02_jprb,.741e-02_jprb,.559e-02_jprb,.559e-02_jprb,.280e-02_jprb,.280e-02_jprb,.252e-02_jprb,&
295 &.252e-02_jprb,.249e-02_jprb,.249e-02_jprb,.516e-02_jprb,.516e-02_jprb,.837e-02_jprb,.837e-02_jprb,&
296 &.823e-02_jprb,.823e-02_jprb/)
297 !-- Sea Salt Aerosol month: 9 --- lat: 18 22.0
298 zaer(:,18, 9) = (/&
299 &.961e-02_jprb,.961e-02_jprb,.105e-01_jprb,.105e-01_jprb,.115e-01_jprb,.115e-01_jprb,.118e-01_jprb,&
300 &.118e-01_jprb,.117e-01_jprb,.117e-01_jprb,.121e-01_jprb,.121e-01_jprb,.123e-01_jprb,.123e-01_jprb,&
301 &.114e-01_jprb,.114e-01_jprb,.103e-01_jprb,.103e-01_jprb,.960e-02_jprb,.960e-02_jprb,.794e-02_jprb,&
302 &.794e-02_jprb,.444e-02_jprb,.444e-02_jprb,.291e-02_jprb,.291e-02_jprb,.277e-02_jprb,.277e-02_jprb,&
303 &.617e-02_jprb,.617e-02_jprb,.836e-02_jprb,.836e-02_jprb,.858e-02_jprb,.858e-02_jprb,.754e-02_jprb,&
304 &.754e-02_jprb,.627e-02_jprb,.627e-02_jprb,.419e-02_jprb,.419e-02_jprb,.198e-02_jprb,.198e-02_jprb,&
305 &.259e-02_jprb,.259e-02_jprb,.514e-02_jprb,.514e-02_jprb,.673e-02_jprb,.673e-02_jprb,.889e-02_jprb,&
306 &.889e-02_jprb,.107e-01_jprb,.107e-01_jprb,.108e-01_jprb,.108e-01_jprb,.107e-01_jprb,.107e-01_jprb,&
307 &.102e-01_jprb,.102e-01_jprb,.816e-02_jprb,.816e-02_jprb,.524e-02_jprb,.524e-02_jprb,.453e-02_jprb,&
308 &.453e-02_jprb,.511e-02_jprb,.511e-02_jprb,.906e-02_jprb,.906e-02_jprb,.955e-02_jprb,.955e-02_jprb,&
309 &.978e-02_jprb,.978e-02_jprb/)
310 !-- Sea Salt Aerosol month: 9 --- lat: 19 18.0
311 zaer(:,19, 9) = (/&
312 &.961e-02_jprb,.961e-02_jprb,.105e-01_jprb,.105e-01_jprb,.115e-01_jprb,.115e-01_jprb,.118e-01_jprb,&
313 &.118e-01_jprb,.117e-01_jprb,.117e-01_jprb,.121e-01_jprb,.121e-01_jprb,.123e-01_jprb,.123e-01_jprb,&
314 &.114e-01_jprb,.114e-01_jprb,.103e-01_jprb,.103e-01_jprb,.960e-02_jprb,.960e-02_jprb,.794e-02_jprb,&
315 &.794e-02_jprb,.444e-02_jprb,.444e-02_jprb,.291e-02_jprb,.291e-02_jprb,.277e-02_jprb,.277e-02_jprb,&
316 &.617e-02_jprb,.617e-02_jprb,.836e-02_jprb,.836e-02_jprb,.858e-02_jprb,.858e-02_jprb,.754e-02_jprb,&
317 &.754e-02_jprb,.627e-02_jprb,.627e-02_jprb,.419e-02_jprb,.419e-02_jprb,.198e-02_jprb,.198e-02_jprb,&
318 &.259e-02_jprb,.259e-02_jprb,.514e-02_jprb,.514e-02_jprb,.673e-02_jprb,.673e-02_jprb,.889e-02_jprb,&
319 &.889e-02_jprb,.107e-01_jprb,.107e-01_jprb,.108e-01_jprb,.108e-01_jprb,.107e-01_jprb,.107e-01_jprb,&
320 &.102e-01_jprb,.102e-01_jprb,.816e-02_jprb,.816e-02_jprb,.524e-02_jprb,.524e-02_jprb,.453e-02_jprb,&
321 &.453e-02_jprb,.511e-02_jprb,.511e-02_jprb,.906e-02_jprb,.906e-02_jprb,.955e-02_jprb,.955e-02_jprb,&
322 &.978e-02_jprb,.978e-02_jprb/)
323 !-- Sea Salt Aerosol month: 9 --- lat: 20 14.0
324 zaer(:,20, 9) = (/&
325 &.128e-01_jprb,.128e-01_jprb,.139e-01_jprb,.139e-01_jprb,.153e-01_jprb,.153e-01_jprb,.156e-01_jprb,&
326 &.156e-01_jprb,.151e-01_jprb,.151e-01_jprb,.138e-01_jprb,.138e-01_jprb,.115e-01_jprb,.115e-01_jprb,&
327 &.994e-02_jprb,.994e-02_jprb,.853e-02_jprb,.853e-02_jprb,.682e-02_jprb,.682e-02_jprb,.472e-02_jprb,&
328 &.472e-02_jprb,.228e-02_jprb,.228e-02_jprb,.190e-02_jprb,.190e-02_jprb,.319e-02_jprb,.319e-02_jprb,&
329 &.673e-02_jprb,.673e-02_jprb,.919e-02_jprb,.919e-02_jprb,.723e-02_jprb,.723e-02_jprb,.568e-02_jprb,&
330 &.568e-02_jprb,.420e-02_jprb,.420e-02_jprb,.277e-02_jprb,.277e-02_jprb,.174e-02_jprb,.174e-02_jprb,&
331 &.297e-02_jprb,.297e-02_jprb,.657e-02_jprb,.657e-02_jprb,.980e-02_jprb,.980e-02_jprb,.128e-01_jprb,&
332 &.128e-01_jprb,.137e-01_jprb,.137e-01_jprb,.128e-01_jprb,.128e-01_jprb,.149e-01_jprb,.149e-01_jprb,&
333 &.139e-01_jprb,.139e-01_jprb,.107e-01_jprb,.107e-01_jprb,.899e-02_jprb,.899e-02_jprb,.765e-02_jprb,&
334 &.765e-02_jprb,.935e-02_jprb,.935e-02_jprb,.113e-01_jprb,.113e-01_jprb,.115e-01_jprb,.115e-01_jprb,&
335 &.124e-01_jprb,.124e-01_jprb/)
336 !-- Sea Salt Aerosol month: 9 --- lat: 21 10.0
337 zaer(:,21, 9) = (/&
338 &.128e-01_jprb,.128e-01_jprb,.139e-01_jprb,.139e-01_jprb,.153e-01_jprb,.153e-01_jprb,.156e-01_jprb,&
339 &.156e-01_jprb,.151e-01_jprb,.151e-01_jprb,.138e-01_jprb,.138e-01_jprb,.115e-01_jprb,.115e-01_jprb,&
340 &.994e-02_jprb,.994e-02_jprb,.853e-02_jprb,.853e-02_jprb,.682e-02_jprb,.682e-02_jprb,.472e-02_jprb,&
341 &.472e-02_jprb,.228e-02_jprb,.228e-02_jprb,.190e-02_jprb,.190e-02_jprb,.319e-02_jprb,.319e-02_jprb,&
342 &.673e-02_jprb,.673e-02_jprb,.919e-02_jprb,.919e-02_jprb,.723e-02_jprb,.723e-02_jprb,.568e-02_jprb,&
343 &.568e-02_jprb,.420e-02_jprb,.420e-02_jprb,.277e-02_jprb,.277e-02_jprb,.174e-02_jprb,.174e-02_jprb,&
344 &.297e-02_jprb,.297e-02_jprb,.657e-02_jprb,.657e-02_jprb,.980e-02_jprb,.980e-02_jprb,.128e-01_jprb,&
345 &.128e-01_jprb,.137e-01_jprb,.137e-01_jprb,.128e-01_jprb,.128e-01_jprb,.149e-01_jprb,.149e-01_jprb,&
346 &.139e-01_jprb,.139e-01_jprb,.107e-01_jprb,.107e-01_jprb,.899e-02_jprb,.899e-02_jprb,.765e-02_jprb,&
347 &.765e-02_jprb,.935e-02_jprb,.935e-02_jprb,.113e-01_jprb,.113e-01_jprb,.115e-01_jprb,.115e-01_jprb,&
348 &.124e-01_jprb,.124e-01_jprb/)
349 !-- Sea Salt Aerosol month: 9 --- lat: 22 6.0
350 zaer(:,22, 9) = (/&
351 &.144e-01_jprb,.144e-01_jprb,.149e-01_jprb,.149e-01_jprb,.148e-01_jprb,.148e-01_jprb,.136e-01_jprb,&
352 &.136e-01_jprb,.116e-01_jprb,.116e-01_jprb,.101e-01_jprb,.101e-01_jprb,.832e-02_jprb,.832e-02_jprb,&
353 &.653e-02_jprb,.653e-02_jprb,.515e-02_jprb,.515e-02_jprb,.435e-02_jprb,.435e-02_jprb,.192e-02_jprb,&
354 &.192e-02_jprb,.160e-02_jprb,.160e-02_jprb,.305e-02_jprb,.305e-02_jprb,.557e-02_jprb,.557e-02_jprb,&
355 &.823e-02_jprb,.823e-02_jprb,.805e-02_jprb,.805e-02_jprb,.582e-02_jprb,.582e-02_jprb,.436e-02_jprb,&
356 &.436e-02_jprb,.363e-02_jprb,.363e-02_jprb,.175e-02_jprb,.175e-02_jprb,.164e-02_jprb,.164e-02_jprb,&
357 &.380e-02_jprb,.380e-02_jprb,.731e-02_jprb,.731e-02_jprb,.941e-02_jprb,.941e-02_jprb,.965e-02_jprb,&
358 &.965e-02_jprb,.794e-02_jprb,.794e-02_jprb,.622e-02_jprb,.622e-02_jprb,.637e-02_jprb,.637e-02_jprb,&
359 &.660e-02_jprb,.660e-02_jprb,.762e-02_jprb,.762e-02_jprb,.830e-02_jprb,.830e-02_jprb,.772e-02_jprb,&
360 &.772e-02_jprb,.803e-02_jprb,.803e-02_jprb,.106e-01_jprb,.106e-01_jprb,.124e-01_jprb,.124e-01_jprb,&
361 &.137e-01_jprb,.137e-01_jprb/)
362 !-- Sea Salt Aerosol month: 9 --- lat: 23 2.0
363 zaer(:,23, 9) = (/&
364 &.144e-01_jprb,.144e-01_jprb,.149e-01_jprb,.149e-01_jprb,.148e-01_jprb,.148e-01_jprb,.136e-01_jprb,&
365 &.136e-01_jprb,.116e-01_jprb,.116e-01_jprb,.101e-01_jprb,.101e-01_jprb,.832e-02_jprb,.832e-02_jprb,&
366 &.653e-02_jprb,.653e-02_jprb,.515e-02_jprb,.515e-02_jprb,.435e-02_jprb,.435e-02_jprb,.192e-02_jprb,&
367 &.192e-02_jprb,.160e-02_jprb,.160e-02_jprb,.305e-02_jprb,.305e-02_jprb,.557e-02_jprb,.557e-02_jprb,&
368 &.823e-02_jprb,.823e-02_jprb,.805e-02_jprb,.805e-02_jprb,.582e-02_jprb,.582e-02_jprb,.436e-02_jprb,&
369 &.436e-02_jprb,.363e-02_jprb,.363e-02_jprb,.175e-02_jprb,.175e-02_jprb,.164e-02_jprb,.164e-02_jprb,&
370 &.380e-02_jprb,.380e-02_jprb,.731e-02_jprb,.731e-02_jprb,.941e-02_jprb,.941e-02_jprb,.965e-02_jprb,&
371 &.965e-02_jprb,.794e-02_jprb,.794e-02_jprb,.622e-02_jprb,.622e-02_jprb,.637e-02_jprb,.637e-02_jprb,&
372 &.660e-02_jprb,.660e-02_jprb,.762e-02_jprb,.762e-02_jprb,.830e-02_jprb,.830e-02_jprb,.772e-02_jprb,&
373 &.772e-02_jprb,.803e-02_jprb,.803e-02_jprb,.106e-01_jprb,.106e-01_jprb,.124e-01_jprb,.124e-01_jprb,&
374 &.137e-01_jprb,.137e-01_jprb/)
375 !-- Sea Salt Aerosol month: 9 --- lat: 24 -2.0
376 zaer(:,24, 9) = (/&
377 &.120e-01_jprb,.120e-01_jprb,.122e-01_jprb,.122e-01_jprb,.128e-01_jprb,.128e-01_jprb,.130e-01_jprb,&
378 &.130e-01_jprb,.122e-01_jprb,.122e-01_jprb,.112e-01_jprb,.112e-01_jprb,.940e-02_jprb,.940e-02_jprb,&
379 &.737e-02_jprb,.737e-02_jprb,.625e-02_jprb,.625e-02_jprb,.597e-02_jprb,.597e-02_jprb,.282e-02_jprb,&
380 &.282e-02_jprb,.254e-02_jprb,.254e-02_jprb,.554e-02_jprb,.554e-02_jprb,.100e-01_jprb,.100e-01_jprb,&
381 &.101e-01_jprb,.101e-01_jprb,.770e-02_jprb,.770e-02_jprb,.567e-02_jprb,.567e-02_jprb,.309e-02_jprb,&
382 &.309e-02_jprb,.216e-02_jprb,.216e-02_jprb,.676e-03_jprb,.676e-03_jprb,.132e-02_jprb,.132e-02_jprb,&
383 &.316e-02_jprb,.316e-02_jprb,.538e-02_jprb,.538e-02_jprb,.815e-02_jprb,.815e-02_jprb,.733e-02_jprb,&
384 &.733e-02_jprb,.646e-02_jprb,.646e-02_jprb,.590e-02_jprb,.590e-02_jprb,.460e-02_jprb,.460e-02_jprb,&
385 &.395e-02_jprb,.395e-02_jprb,.605e-02_jprb,.605e-02_jprb,.804e-02_jprb,.804e-02_jprb,.926e-02_jprb,&
386 &.926e-02_jprb,.909e-02_jprb,.909e-02_jprb,.885e-02_jprb,.885e-02_jprb,.930e-02_jprb,.930e-02_jprb,&
387 &.108e-01_jprb,.108e-01_jprb/)
388 !-- Sea Salt Aerosol month: 9 --- lat: 25 -6.0
389 zaer(:,25, 9) = (/&
390 &.120e-01_jprb,.120e-01_jprb,.122e-01_jprb,.122e-01_jprb,.128e-01_jprb,.128e-01_jprb,.130e-01_jprb,&
391 &.130e-01_jprb,.122e-01_jprb,.122e-01_jprb,.112e-01_jprb,.112e-01_jprb,.940e-02_jprb,.940e-02_jprb,&
392 &.737e-02_jprb,.737e-02_jprb,.625e-02_jprb,.625e-02_jprb,.597e-02_jprb,.597e-02_jprb,.282e-02_jprb,&
393 &.282e-02_jprb,.254e-02_jprb,.254e-02_jprb,.554e-02_jprb,.554e-02_jprb,.100e-01_jprb,.100e-01_jprb,&
394 &.101e-01_jprb,.101e-01_jprb,.770e-02_jprb,.770e-02_jprb,.567e-02_jprb,.567e-02_jprb,.309e-02_jprb,&
395 &.309e-02_jprb,.216e-02_jprb,.216e-02_jprb,.676e-03_jprb,.676e-03_jprb,.132e-02_jprb,.132e-02_jprb,&
396 &.316e-02_jprb,.316e-02_jprb,.538e-02_jprb,.538e-02_jprb,.815e-02_jprb,.815e-02_jprb,.733e-02_jprb,&
397 &.733e-02_jprb,.646e-02_jprb,.646e-02_jprb,.590e-02_jprb,.590e-02_jprb,.460e-02_jprb,.460e-02_jprb,&
398 &.395e-02_jprb,.395e-02_jprb,.605e-02_jprb,.605e-02_jprb,.804e-02_jprb,.804e-02_jprb,.926e-02_jprb,&
399 &.926e-02_jprb,.909e-02_jprb,.909e-02_jprb,.885e-02_jprb,.885e-02_jprb,.930e-02_jprb,.930e-02_jprb,&
400 &.108e-01_jprb,.108e-01_jprb/)
401 !-- Sea Salt Aerosol month: 9 --- lat: 26 -10.0
402 zaer(:,26, 9) = (/&
403 &.113e-01_jprb,.113e-01_jprb,.106e-01_jprb,.106e-01_jprb,.104e-01_jprb,.104e-01_jprb,.116e-01_jprb,&
404 &.116e-01_jprb,.121e-01_jprb,.121e-01_jprb,.107e-01_jprb,.107e-01_jprb,.804e-02_jprb,.804e-02_jprb,&
405 &.579e-02_jprb,.579e-02_jprb,.488e-02_jprb,.488e-02_jprb,.306e-02_jprb,.306e-02_jprb,.510e-02_jprb,&
406 &.510e-02_jprb,.662e-02_jprb,.662e-02_jprb,.816e-02_jprb,.816e-02_jprb,.998e-02_jprb,.998e-02_jprb,&
407 &.965e-02_jprb,.965e-02_jprb,.670e-02_jprb,.670e-02_jprb,.306e-02_jprb,.306e-02_jprb,.770e-03_jprb,&
408 &.770e-03_jprb,.372e-03_jprb,.372e-03_jprb,.329e-03_jprb,.329e-03_jprb,.540e-03_jprb,.540e-03_jprb,&
409 &.150e-02_jprb,.150e-02_jprb,.313e-02_jprb,.313e-02_jprb,.693e-02_jprb,.693e-02_jprb,.661e-02_jprb,&
410 &.661e-02_jprb,.519e-02_jprb,.519e-02_jprb,.396e-02_jprb,.396e-02_jprb,.411e-02_jprb,.411e-02_jprb,&
411 &.298e-02_jprb,.298e-02_jprb,.626e-02_jprb,.626e-02_jprb,.567e-02_jprb,.567e-02_jprb,.854e-02_jprb,&
412 &.854e-02_jprb,.832e-02_jprb,.832e-02_jprb,.893e-02_jprb,.893e-02_jprb,.905e-02_jprb,.905e-02_jprb,&
413 &.956e-02_jprb,.956e-02_jprb/)
414 !-- Sea Salt Aerosol month: 9 --- lat: 27 -14.0
415 zaer(:,27, 9) = (/&
416 &.113e-01_jprb,.113e-01_jprb,.106e-01_jprb,.106e-01_jprb,.104e-01_jprb,.104e-01_jprb,.116e-01_jprb,&
417 &.116e-01_jprb,.121e-01_jprb,.121e-01_jprb,.107e-01_jprb,.107e-01_jprb,.804e-02_jprb,.804e-02_jprb,&
418 &.579e-02_jprb,.579e-02_jprb,.488e-02_jprb,.488e-02_jprb,.306e-02_jprb,.306e-02_jprb,.510e-02_jprb,&
419 &.510e-02_jprb,.662e-02_jprb,.662e-02_jprb,.816e-02_jprb,.816e-02_jprb,.998e-02_jprb,.998e-02_jprb,&
420 &.965e-02_jprb,.965e-02_jprb,.670e-02_jprb,.670e-02_jprb,.306e-02_jprb,.306e-02_jprb,.770e-03_jprb,&
421 &.770e-03_jprb,.372e-03_jprb,.372e-03_jprb,.329e-03_jprb,.329e-03_jprb,.540e-03_jprb,.540e-03_jprb,&
422 &.150e-02_jprb,.150e-02_jprb,.313e-02_jprb,.313e-02_jprb,.693e-02_jprb,.693e-02_jprb,.661e-02_jprb,&
423 &.661e-02_jprb,.519e-02_jprb,.519e-02_jprb,.396e-02_jprb,.396e-02_jprb,.411e-02_jprb,.411e-02_jprb,&
424 &.298e-02_jprb,.298e-02_jprb,.626e-02_jprb,.626e-02_jprb,.567e-02_jprb,.567e-02_jprb,.854e-02_jprb,&
425 &.854e-02_jprb,.832e-02_jprb,.832e-02_jprb,.893e-02_jprb,.893e-02_jprb,.905e-02_jprb,.905e-02_jprb,&
426 &.956e-02_jprb,.956e-02_jprb/)
427 !-- Sea Salt Aerosol month: 9 --- lat: 28 -18.0
428 zaer(:,28, 9) = (/&
429 &.119e-01_jprb,.119e-01_jprb,.134e-01_jprb,.134e-01_jprb,.146e-01_jprb,.146e-01_jprb,.146e-01_jprb,&
430 &.146e-01_jprb,.122e-01_jprb,.122e-01_jprb,.100e-01_jprb,.100e-01_jprb,.770e-02_jprb,.770e-02_jprb,&
431 &.475e-02_jprb,.475e-02_jprb,.410e-02_jprb,.410e-02_jprb,.452e-02_jprb,.452e-02_jprb,.603e-02_jprb,&
432 &.603e-02_jprb,.834e-02_jprb,.834e-02_jprb,.113e-01_jprb,.113e-01_jprb,.132e-01_jprb,.132e-01_jprb,&
433 &.137e-01_jprb,.137e-01_jprb,.110e-01_jprb,.110e-01_jprb,.559e-02_jprb,.559e-02_jprb,.205e-02_jprb,&
434 &.205e-02_jprb,.129e-02_jprb,.129e-02_jprb,.132e-02_jprb,.132e-02_jprb,.862e-03_jprb,.862e-03_jprb,&
435 &.897e-03_jprb,.897e-03_jprb,.163e-02_jprb,.163e-02_jprb,.228e-02_jprb,.228e-02_jprb,.429e-02_jprb,&
436 &.429e-02_jprb,.254e-02_jprb,.254e-02_jprb,.156e-02_jprb,.156e-02_jprb,.217e-02_jprb,.217e-02_jprb,&
437 &.151e-02_jprb,.151e-02_jprb,.435e-02_jprb,.435e-02_jprb,.615e-02_jprb,.615e-02_jprb,.932e-02_jprb,&
438 &.932e-02_jprb,.107e-01_jprb,.107e-01_jprb,.116e-01_jprb,.116e-01_jprb,.113e-01_jprb,.113e-01_jprb,&
439 &.114e-01_jprb,.114e-01_jprb/)
440 !-- Sea Salt Aerosol month: 9 --- lat: 29 -22.0
441 zaer(:,29, 9) = (/&
442 &.119e-01_jprb,.119e-01_jprb,.134e-01_jprb,.134e-01_jprb,.146e-01_jprb,.146e-01_jprb,.146e-01_jprb,&
443 &.146e-01_jprb,.122e-01_jprb,.122e-01_jprb,.100e-01_jprb,.100e-01_jprb,.770e-02_jprb,.770e-02_jprb,&
444 &.475e-02_jprb,.475e-02_jprb,.410e-02_jprb,.410e-02_jprb,.452e-02_jprb,.452e-02_jprb,.603e-02_jprb,&
445 &.603e-02_jprb,.834e-02_jprb,.834e-02_jprb,.113e-01_jprb,.113e-01_jprb,.132e-01_jprb,.132e-01_jprb,&
446 &.137e-01_jprb,.137e-01_jprb,.110e-01_jprb,.110e-01_jprb,.559e-02_jprb,.559e-02_jprb,.205e-02_jprb,&
447 &.205e-02_jprb,.129e-02_jprb,.129e-02_jprb,.132e-02_jprb,.132e-02_jprb,.862e-03_jprb,.862e-03_jprb,&
448 &.897e-03_jprb,.897e-03_jprb,.163e-02_jprb,.163e-02_jprb,.228e-02_jprb,.228e-02_jprb,.429e-02_jprb,&
449 &.429e-02_jprb,.254e-02_jprb,.254e-02_jprb,.156e-02_jprb,.156e-02_jprb,.217e-02_jprb,.217e-02_jprb,&
450 &.151e-02_jprb,.151e-02_jprb,.435e-02_jprb,.435e-02_jprb,.615e-02_jprb,.615e-02_jprb,.932e-02_jprb,&
451 &.932e-02_jprb,.107e-01_jprb,.107e-01_jprb,.116e-01_jprb,.116e-01_jprb,.113e-01_jprb,.113e-01_jprb,&
452 &.114e-01_jprb,.114e-01_jprb/)
453 !-- Sea Salt Aerosol month: 9 --- lat: 30 -26.0
454 zaer(:,30, 9) = (/&
455 &.120e-01_jprb,.120e-01_jprb,.118e-01_jprb,.118e-01_jprb,.123e-01_jprb,.123e-01_jprb,.123e-01_jprb,&
456 &.123e-01_jprb,.109e-01_jprb,.109e-01_jprb,.919e-02_jprb,.919e-02_jprb,.731e-02_jprb,.731e-02_jprb,&
457 &.374e-02_jprb,.374e-02_jprb,.404e-02_jprb,.404e-02_jprb,.496e-02_jprb,.496e-02_jprb,.633e-02_jprb,&
458 &.633e-02_jprb,.801e-02_jprb,.801e-02_jprb,.998e-02_jprb,.998e-02_jprb,.121e-01_jprb,.121e-01_jprb,&
459 &.129e-01_jprb,.129e-01_jprb,.117e-01_jprb,.117e-01_jprb,.905e-02_jprb,.905e-02_jprb,.502e-02_jprb,&
460 &.502e-02_jprb,.341e-02_jprb,.341e-02_jprb,.328e-02_jprb,.328e-02_jprb,.293e-02_jprb,.293e-02_jprb,&
461 &.208e-02_jprb,.208e-02_jprb,.158e-02_jprb,.158e-02_jprb,.177e-02_jprb,.177e-02_jprb,.174e-02_jprb,&
462 &.174e-02_jprb,.140e-02_jprb,.140e-02_jprb,.947e-03_jprb,.947e-03_jprb,.854e-03_jprb,.854e-03_jprb,&
463 &.907e-03_jprb,.907e-03_jprb,.166e-02_jprb,.166e-02_jprb,.442e-02_jprb,.442e-02_jprb,.666e-02_jprb,&
464 &.666e-02_jprb,.797e-02_jprb,.797e-02_jprb,.102e-01_jprb,.102e-01_jprb,.112e-01_jprb,.112e-01_jprb,&
465 &.122e-01_jprb,.122e-01_jprb/)
466 !-- Sea Salt Aerosol month: 9 --- lat: 31 -30.0
467 zaer(:,31, 9) = (/&
468 &.120e-01_jprb,.120e-01_jprb,.118e-01_jprb,.118e-01_jprb,.123e-01_jprb,.123e-01_jprb,.123e-01_jprb,&
469 &.123e-01_jprb,.109e-01_jprb,.109e-01_jprb,.919e-02_jprb,.919e-02_jprb,.731e-02_jprb,.731e-02_jprb,&
470 &.374e-02_jprb,.374e-02_jprb,.404e-02_jprb,.404e-02_jprb,.496e-02_jprb,.496e-02_jprb,.633e-02_jprb,&
471 &.633e-02_jprb,.801e-02_jprb,.801e-02_jprb,.998e-02_jprb,.998e-02_jprb,.121e-01_jprb,.121e-01_jprb,&
472 &.129e-01_jprb,.129e-01_jprb,.117e-01_jprb,.117e-01_jprb,.905e-02_jprb,.905e-02_jprb,.502e-02_jprb,&
473 &.502e-02_jprb,.341e-02_jprb,.341e-02_jprb,.328e-02_jprb,.328e-02_jprb,.293e-02_jprb,.293e-02_jprb,&
474 &.208e-02_jprb,.208e-02_jprb,.158e-02_jprb,.158e-02_jprb,.177e-02_jprb,.177e-02_jprb,.174e-02_jprb,&
475 &.174e-02_jprb,.140e-02_jprb,.140e-02_jprb,.947e-03_jprb,.947e-03_jprb,.854e-03_jprb,.854e-03_jprb,&
476 &.907e-03_jprb,.907e-03_jprb,.166e-02_jprb,.166e-02_jprb,.442e-02_jprb,.442e-02_jprb,.666e-02_jprb,&
477 &.666e-02_jprb,.797e-02_jprb,.797e-02_jprb,.102e-01_jprb,.102e-01_jprb,.112e-01_jprb,.112e-01_jprb,&
478 &.122e-01_jprb,.122e-01_jprb/)
479 !-- Sea Salt Aerosol month: 9 --- lat: 32 -34.0
480 zaer(:,32, 9) = (/&
481 &.104e-01_jprb,.104e-01_jprb,.103e-01_jprb,.103e-01_jprb,.936e-02_jprb,.936e-02_jprb,.929e-02_jprb,&
482 &.929e-02_jprb,.878e-02_jprb,.878e-02_jprb,.780e-02_jprb,.780e-02_jprb,.594e-02_jprb,.594e-02_jprb,&
483 &.404e-02_jprb,.404e-02_jprb,.308e-02_jprb,.308e-02_jprb,.270e-02_jprb,.270e-02_jprb,.405e-02_jprb,&
484 &.405e-02_jprb,.707e-02_jprb,.707e-02_jprb,.856e-02_jprb,.856e-02_jprb,.975e-02_jprb,.975e-02_jprb,&
485 &.878e-02_jprb,.878e-02_jprb,.940e-02_jprb,.940e-02_jprb,.941e-02_jprb,.941e-02_jprb,.636e-02_jprb,&
486 &.636e-02_jprb,.496e-02_jprb,.496e-02_jprb,.509e-02_jprb,.509e-02_jprb,.493e-02_jprb,.493e-02_jprb,&
487 &.391e-02_jprb,.391e-02_jprb,.226e-02_jprb,.226e-02_jprb,.228e-02_jprb,.228e-02_jprb,.162e-02_jprb,&
488 &.162e-02_jprb,.139e-02_jprb,.139e-02_jprb,.115e-02_jprb,.115e-02_jprb,.860e-03_jprb,.860e-03_jprb,&
489 &.635e-03_jprb,.635e-03_jprb,.891e-03_jprb,.891e-03_jprb,.252e-02_jprb,.252e-02_jprb,.351e-02_jprb,&
490 &.351e-02_jprb,.592e-02_jprb,.592e-02_jprb,.865e-02_jprb,.865e-02_jprb,.881e-02_jprb,.881e-02_jprb,&
491 &.984e-02_jprb,.984e-02_jprb/)
492 !-- Sea Salt Aerosol month: 9 --- lat: 33 -38.0
493 zaer(:,33, 9) = (/&
494 &.104e-01_jprb,.104e-01_jprb,.103e-01_jprb,.103e-01_jprb,.936e-02_jprb,.936e-02_jprb,.929e-02_jprb,&
495 &.929e-02_jprb,.878e-02_jprb,.878e-02_jprb,.780e-02_jprb,.780e-02_jprb,.594e-02_jprb,.594e-02_jprb,&
496 &.404e-02_jprb,.404e-02_jprb,.308e-02_jprb,.308e-02_jprb,.270e-02_jprb,.270e-02_jprb,.405e-02_jprb,&
497 &.405e-02_jprb,.707e-02_jprb,.707e-02_jprb,.856e-02_jprb,.856e-02_jprb,.975e-02_jprb,.975e-02_jprb,&
498 &.878e-02_jprb,.878e-02_jprb,.940e-02_jprb,.940e-02_jprb,.941e-02_jprb,.941e-02_jprb,.636e-02_jprb,&
499 &.636e-02_jprb,.496e-02_jprb,.496e-02_jprb,.509e-02_jprb,.509e-02_jprb,.493e-02_jprb,.493e-02_jprb,&
500 &.391e-02_jprb,.391e-02_jprb,.226e-02_jprb,.226e-02_jprb,.228e-02_jprb,.228e-02_jprb,.162e-02_jprb,&
501 &.162e-02_jprb,.139e-02_jprb,.139e-02_jprb,.115e-02_jprb,.115e-02_jprb,.860e-03_jprb,.860e-03_jprb,&
502 &.635e-03_jprb,.635e-03_jprb,.891e-03_jprb,.891e-03_jprb,.252e-02_jprb,.252e-02_jprb,.351e-02_jprb,&
503 &.351e-02_jprb,.592e-02_jprb,.592e-02_jprb,.865e-02_jprb,.865e-02_jprb,.881e-02_jprb,.881e-02_jprb,&
504 &.984e-02_jprb,.984e-02_jprb/)
505 !-- Sea Salt Aerosol month: 9 --- lat: 34 -42.0
506 zaer(:,34, 9) = (/&
507 &.837e-02_jprb,.837e-02_jprb,.845e-02_jprb,.845e-02_jprb,.884e-02_jprb,.884e-02_jprb,.868e-02_jprb,&
508 &.868e-02_jprb,.801e-02_jprb,.801e-02_jprb,.591e-02_jprb,.591e-02_jprb,.337e-02_jprb,.337e-02_jprb,&
509 &.303e-02_jprb,.303e-02_jprb,.241e-02_jprb,.241e-02_jprb,.191e-02_jprb,.191e-02_jprb,.167e-02_jprb,&
510 &.167e-02_jprb,.315e-02_jprb,.315e-02_jprb,.542e-02_jprb,.542e-02_jprb,.729e-02_jprb,.729e-02_jprb,&
511 &.721e-02_jprb,.721e-02_jprb,.760e-02_jprb,.760e-02_jprb,.833e-02_jprb,.833e-02_jprb,.676e-02_jprb,&
512 &.676e-02_jprb,.429e-02_jprb,.429e-02_jprb,.343e-02_jprb,.343e-02_jprb,.271e-02_jprb,.271e-02_jprb,&
513 &.311e-02_jprb,.311e-02_jprb,.215e-02_jprb,.215e-02_jprb,.239e-02_jprb,.239e-02_jprb,.143e-02_jprb,&
514 &.143e-02_jprb,.115e-02_jprb,.115e-02_jprb,.100e-02_jprb,.100e-02_jprb,.859e-03_jprb,.859e-03_jprb,&
515 &.691e-03_jprb,.691e-03_jprb,.585e-03_jprb,.585e-03_jprb,.756e-03_jprb,.756e-03_jprb,.168e-02_jprb,&
516 &.168e-02_jprb,.342e-02_jprb,.342e-02_jprb,.606e-02_jprb,.606e-02_jprb,.696e-02_jprb,.696e-02_jprb,&
517 &.786e-02_jprb,.786e-02_jprb/)
518 !-- Sea Salt Aerosol month: 9 --- lat: 35 -46.0
519 zaer(:,35, 9) = (/&
520 &.837e-02_jprb,.837e-02_jprb,.845e-02_jprb,.845e-02_jprb,.884e-02_jprb,.884e-02_jprb,.868e-02_jprb,&
521 &.868e-02_jprb,.801e-02_jprb,.801e-02_jprb,.591e-02_jprb,.591e-02_jprb,.337e-02_jprb,.337e-02_jprb,&
522 &.303e-02_jprb,.303e-02_jprb,.241e-02_jprb,.241e-02_jprb,.191e-02_jprb,.191e-02_jprb,.167e-02_jprb,&
523 &.167e-02_jprb,.315e-02_jprb,.315e-02_jprb,.542e-02_jprb,.542e-02_jprb,.729e-02_jprb,.729e-02_jprb,&
524 &.721e-02_jprb,.721e-02_jprb,.760e-02_jprb,.760e-02_jprb,.833e-02_jprb,.833e-02_jprb,.676e-02_jprb,&
525 &.676e-02_jprb,.429e-02_jprb,.429e-02_jprb,.343e-02_jprb,.343e-02_jprb,.271e-02_jprb,.271e-02_jprb,&
526 &.311e-02_jprb,.311e-02_jprb,.215e-02_jprb,.215e-02_jprb,.239e-02_jprb,.239e-02_jprb,.143e-02_jprb,&
527 &.143e-02_jprb,.115e-02_jprb,.115e-02_jprb,.100e-02_jprb,.100e-02_jprb,.859e-03_jprb,.859e-03_jprb,&
528 &.691e-03_jprb,.691e-03_jprb,.585e-03_jprb,.585e-03_jprb,.756e-03_jprb,.756e-03_jprb,.168e-02_jprb,&
529 &.168e-02_jprb,.342e-02_jprb,.342e-02_jprb,.606e-02_jprb,.606e-02_jprb,.696e-02_jprb,.696e-02_jprb,&
530 &.786e-02_jprb,.786e-02_jprb/)
531 !-- Sea Salt Aerosol month: 9 --- lat: 36 -50.0
532 zaer(:,36, 9) = (/&
533 &.561e-02_jprb,.561e-02_jprb,.650e-02_jprb,.650e-02_jprb,.720e-02_jprb,.720e-02_jprb,.803e-02_jprb,&
534 &.803e-02_jprb,.716e-02_jprb,.716e-02_jprb,.354e-02_jprb,.354e-02_jprb,.156e-02_jprb,.156e-02_jprb,&
535 &.116e-02_jprb,.116e-02_jprb,.102e-02_jprb,.102e-02_jprb,.116e-02_jprb,.116e-02_jprb,.134e-02_jprb,&
536 &.134e-02_jprb,.112e-02_jprb,.112e-02_jprb,.304e-02_jprb,.304e-02_jprb,.674e-02_jprb,.674e-02_jprb,&
537 &.765e-02_jprb,.765e-02_jprb,.838e-02_jprb,.838e-02_jprb,.890e-02_jprb,.890e-02_jprb,.664e-02_jprb,&
538 &.664e-02_jprb,.466e-02_jprb,.466e-02_jprb,.318e-02_jprb,.318e-02_jprb,.257e-02_jprb,.257e-02_jprb,&
539 &.225e-02_jprb,.225e-02_jprb,.184e-02_jprb,.184e-02_jprb,.161e-02_jprb,.161e-02_jprb,.130e-02_jprb,&
540 &.130e-02_jprb,.108e-02_jprb,.108e-02_jprb,.959e-03_jprb,.959e-03_jprb,.881e-03_jprb,.881e-03_jprb,&
541 &.791e-03_jprb,.791e-03_jprb,.718e-03_jprb,.718e-03_jprb,.675e-03_jprb,.675e-03_jprb,.683e-03_jprb,&
542 &.683e-03_jprb,.225e-02_jprb,.225e-02_jprb,.402e-02_jprb,.402e-02_jprb,.441e-02_jprb,.441e-02_jprb,&
543 &.508e-02_jprb,.508e-02_jprb/)
544 !-- Sea Salt Aerosol month: 9 --- lat: 37 -54.0
545 zaer(:,37, 9) = (/&
546 &.561e-02_jprb,.561e-02_jprb,.650e-02_jprb,.650e-02_jprb,.720e-02_jprb,.720e-02_jprb,.803e-02_jprb,&
547 &.803e-02_jprb,.716e-02_jprb,.716e-02_jprb,.354e-02_jprb,.354e-02_jprb,.156e-02_jprb,.156e-02_jprb,&
548 &.116e-02_jprb,.116e-02_jprb,.102e-02_jprb,.102e-02_jprb,.116e-02_jprb,.116e-02_jprb,.134e-02_jprb,&
549 &.134e-02_jprb,.112e-02_jprb,.112e-02_jprb,.304e-02_jprb,.304e-02_jprb,.674e-02_jprb,.674e-02_jprb,&
550 &.765e-02_jprb,.765e-02_jprb,.838e-02_jprb,.838e-02_jprb,.890e-02_jprb,.890e-02_jprb,.664e-02_jprb,&
551 &.664e-02_jprb,.466e-02_jprb,.466e-02_jprb,.318e-02_jprb,.318e-02_jprb,.257e-02_jprb,.257e-02_jprb,&
552 &.225e-02_jprb,.225e-02_jprb,.184e-02_jprb,.184e-02_jprb,.161e-02_jprb,.161e-02_jprb,.130e-02_jprb,&
553 &.130e-02_jprb,.108e-02_jprb,.108e-02_jprb,.959e-03_jprb,.959e-03_jprb,.881e-03_jprb,.881e-03_jprb,&
554 &.791e-03_jprb,.791e-03_jprb,.718e-03_jprb,.718e-03_jprb,.675e-03_jprb,.675e-03_jprb,.683e-03_jprb,&
555 &.683e-03_jprb,.225e-02_jprb,.225e-02_jprb,.402e-02_jprb,.402e-02_jprb,.441e-02_jprb,.441e-02_jprb,&
556 &.508e-02_jprb,.508e-02_jprb/)
557 !-- Sea Salt Aerosol month: 9 --- lat: 38 -58.0
558 zaer(:,38, 9) = (/&
559 &.287e-02_jprb,.287e-02_jprb,.389e-02_jprb,.389e-02_jprb,.210e-02_jprb,.210e-02_jprb,.276e-02_jprb,&
560 &.276e-02_jprb,.245e-02_jprb,.245e-02_jprb,.119e-02_jprb,.119e-02_jprb,.785e-03_jprb,.785e-03_jprb,&
561 &.558e-03_jprb,.558e-03_jprb,.648e-03_jprb,.648e-03_jprb,.354e-02_jprb,.354e-02_jprb,.282e-02_jprb,&
562 &.282e-02_jprb,.168e-02_jprb,.168e-02_jprb,.444e-02_jprb,.444e-02_jprb,.500e-02_jprb,.500e-02_jprb,&
563 &.743e-02_jprb,.743e-02_jprb,.104e-01_jprb,.104e-01_jprb,.110e-01_jprb,.110e-01_jprb,.984e-02_jprb,&
564 &.984e-02_jprb,.830e-02_jprb,.830e-02_jprb,.427e-02_jprb,.427e-02_jprb,.326e-02_jprb,.326e-02_jprb,&
565 &.223e-02_jprb,.223e-02_jprb,.174e-02_jprb,.174e-02_jprb,.146e-02_jprb,.146e-02_jprb,.119e-02_jprb,&
566 &.119e-02_jprb,.970e-03_jprb,.970e-03_jprb,.844e-03_jprb,.844e-03_jprb,.788e-03_jprb,.788e-03_jprb,&
567 &.736e-03_jprb,.736e-03_jprb,.665e-03_jprb,.665e-03_jprb,.591e-03_jprb,.591e-03_jprb,.516e-03_jprb,&
568 &.516e-03_jprb,.109e-02_jprb,.109e-02_jprb,.178e-02_jprb,.178e-02_jprb,.190e-02_jprb,.190e-02_jprb,&
569 &.238e-02_jprb,.238e-02_jprb/)
570 !-- Sea Salt Aerosol month: 9 --- lat: 39 -62.0
571 zaer(:,39, 9) = (/&
572 &.287e-02_jprb,.287e-02_jprb,.389e-02_jprb,.389e-02_jprb,.210e-02_jprb,.210e-02_jprb,.276e-02_jprb,&
573 &.276e-02_jprb,.245e-02_jprb,.245e-02_jprb,.119e-02_jprb,.119e-02_jprb,.785e-03_jprb,.785e-03_jprb,&
574 &.558e-03_jprb,.558e-03_jprb,.648e-03_jprb,.648e-03_jprb,.354e-02_jprb,.354e-02_jprb,.282e-02_jprb,&
575 &.282e-02_jprb,.168e-02_jprb,.168e-02_jprb,.444e-02_jprb,.444e-02_jprb,.500e-02_jprb,.500e-02_jprb,&
576 &.743e-02_jprb,.743e-02_jprb,.104e-01_jprb,.104e-01_jprb,.110e-01_jprb,.110e-01_jprb,.984e-02_jprb,&
577 &.984e-02_jprb,.830e-02_jprb,.830e-02_jprb,.427e-02_jprb,.427e-02_jprb,.326e-02_jprb,.326e-02_jprb,&
578 &.223e-02_jprb,.223e-02_jprb,.174e-02_jprb,.174e-02_jprb,.146e-02_jprb,.146e-02_jprb,.119e-02_jprb,&
579 &.119e-02_jprb,.970e-03_jprb,.970e-03_jprb,.844e-03_jprb,.844e-03_jprb,.788e-03_jprb,.788e-03_jprb,&
580 &.736e-03_jprb,.736e-03_jprb,.665e-03_jprb,.665e-03_jprb,.591e-03_jprb,.591e-03_jprb,.516e-03_jprb,&
581 &.516e-03_jprb,.109e-02_jprb,.109e-02_jprb,.178e-02_jprb,.178e-02_jprb,.190e-02_jprb,.190e-02_jprb,&
582 &.238e-02_jprb,.238e-02_jprb/)
583 !-- Sea Salt Aerosol month: 9 --- lat: 40 -66.0
584 zaer(:,40, 9) = (/&
585 &.722e-03_jprb,.722e-03_jprb,.121e-02_jprb,.121e-02_jprb,.604e-03_jprb,.604e-03_jprb,.470e-03_jprb,&
586 &.470e-03_jprb,.743e-03_jprb,.743e-03_jprb,.657e-03_jprb,.657e-03_jprb,.589e-03_jprb,.589e-03_jprb,&
587 &.386e-03_jprb,.386e-03_jprb,.677e-03_jprb,.677e-03_jprb,.790e-03_jprb,.790e-03_jprb,.126e-02_jprb,&
588 &.126e-02_jprb,.120e-02_jprb,.120e-02_jprb,.251e-02_jprb,.251e-02_jprb,.197e-02_jprb,.197e-02_jprb,&
589 &.130e-02_jprb,.130e-02_jprb,.346e-02_jprb,.346e-02_jprb,.436e-02_jprb,.436e-02_jprb,.690e-02_jprb,&
590 &.690e-02_jprb,.763e-02_jprb,.763e-02_jprb,.547e-02_jprb,.547e-02_jprb,.275e-02_jprb,.275e-02_jprb,&
591 &.228e-02_jprb,.228e-02_jprb,.253e-02_jprb,.253e-02_jprb,.209e-02_jprb,.209e-02_jprb,.156e-02_jprb,&
592 &.156e-02_jprb,.860e-03_jprb,.860e-03_jprb,.619e-03_jprb,.619e-03_jprb,.536e-03_jprb,.536e-03_jprb,&
593 &.477e-03_jprb,.477e-03_jprb,.436e-03_jprb,.436e-03_jprb,.440e-03_jprb,.440e-03_jprb,.424e-03_jprb,&
594 &.424e-03_jprb,.413e-03_jprb,.413e-03_jprb,.397e-03_jprb,.397e-03_jprb,.433e-03_jprb,.433e-03_jprb,&
595 &.527e-03_jprb,.527e-03_jprb/)
596 !-- Sea Salt Aerosol month: 9 --- lat: 41 -70.0
597 zaer(:,41, 9) = (/&
598 &.722e-03_jprb,.722e-03_jprb,.121e-02_jprb,.121e-02_jprb,.604e-03_jprb,.604e-03_jprb,.470e-03_jprb,&
599 &.470e-03_jprb,.743e-03_jprb,.743e-03_jprb,.657e-03_jprb,.657e-03_jprb,.589e-03_jprb,.589e-03_jprb,&
600 &.386e-03_jprb,.386e-03_jprb,.677e-03_jprb,.677e-03_jprb,.790e-03_jprb,.790e-03_jprb,.126e-02_jprb,&
601 &.126e-02_jprb,.120e-02_jprb,.120e-02_jprb,.251e-02_jprb,.251e-02_jprb,.197e-02_jprb,.197e-02_jprb,&
602 &.130e-02_jprb,.130e-02_jprb,.346e-02_jprb,.346e-02_jprb,.436e-02_jprb,.436e-02_jprb,.690e-02_jprb,&
603 &.690e-02_jprb,.763e-02_jprb,.763e-02_jprb,.547e-02_jprb,.547e-02_jprb,.275e-02_jprb,.275e-02_jprb,&
604 &.228e-02_jprb,.228e-02_jprb,.253e-02_jprb,.253e-02_jprb,.209e-02_jprb,.209e-02_jprb,.156e-02_jprb,&
605 &.156e-02_jprb,.860e-03_jprb,.860e-03_jprb,.619e-03_jprb,.619e-03_jprb,.536e-03_jprb,.536e-03_jprb,&
606 &.477e-03_jprb,.477e-03_jprb,.436e-03_jprb,.436e-03_jprb,.440e-03_jprb,.440e-03_jprb,.424e-03_jprb,&
607 &.424e-03_jprb,.413e-03_jprb,.413e-03_jprb,.397e-03_jprb,.397e-03_jprb,.433e-03_jprb,.433e-03_jprb,&
608 &.527e-03_jprb,.527e-03_jprb/)
609 !-- Sea Salt Aerosol month: 9 --- lat: 42 -74.0
610 zaer(:,42, 9) = (/&
611 &.405e-03_jprb,.405e-03_jprb,.402e-03_jprb,.402e-03_jprb,.334e-03_jprb,.334e-03_jprb,.340e-03_jprb,&
612 &.340e-03_jprb,.407e-03_jprb,.407e-03_jprb,.507e-03_jprb,.507e-03_jprb,.424e-03_jprb,.424e-03_jprb,&
613 &.404e-03_jprb,.404e-03_jprb,.404e-03_jprb,.404e-03_jprb,.416e-03_jprb,.416e-03_jprb,.491e-03_jprb,&
614 &.491e-03_jprb,.670e-03_jprb,.670e-03_jprb,.982e-03_jprb,.982e-03_jprb,.851e-03_jprb,.851e-03_jprb,&
615 &.627e-03_jprb,.627e-03_jprb,.440e-03_jprb,.440e-03_jprb,.433e-03_jprb,.433e-03_jprb,.218e-02_jprb,&
616 &.218e-02_jprb,.434e-02_jprb,.434e-02_jprb,.417e-02_jprb,.417e-02_jprb,.350e-02_jprb,.350e-02_jprb,&
617 &.353e-02_jprb,.353e-02_jprb,.265e-02_jprb,.265e-02_jprb,.177e-02_jprb,.177e-02_jprb,.155e-02_jprb,&
618 &.155e-02_jprb,.801e-03_jprb,.801e-03_jprb,.558e-03_jprb,.558e-03_jprb,.384e-03_jprb,.384e-03_jprb,&
619 &.369e-03_jprb,.369e-03_jprb,.549e-03_jprb,.549e-03_jprb,.116e-02_jprb,.116e-02_jprb,.871e-03_jprb,&
620 &.871e-03_jprb,.350e-03_jprb,.350e-03_jprb,.309e-03_jprb,.309e-03_jprb,.308e-03_jprb,.308e-03_jprb,&
621 &.337e-03_jprb,.337e-03_jprb/)
622 !-- Sea Salt Aerosol month: 9 --- lat: 43 -78.0
623 zaer(:,43, 9) = (/&
624 &.405e-03_jprb,.405e-03_jprb,.402e-03_jprb,.402e-03_jprb,.334e-03_jprb,.334e-03_jprb,.340e-03_jprb,&
625 &.340e-03_jprb,.407e-03_jprb,.407e-03_jprb,.507e-03_jprb,.507e-03_jprb,.424e-03_jprb,.424e-03_jprb,&
626 &.404e-03_jprb,.404e-03_jprb,.404e-03_jprb,.404e-03_jprb,.416e-03_jprb,.416e-03_jprb,.491e-03_jprb,&
627 &.491e-03_jprb,.670e-03_jprb,.670e-03_jprb,.982e-03_jprb,.982e-03_jprb,.851e-03_jprb,.851e-03_jprb,&
628 &.627e-03_jprb,.627e-03_jprb,.440e-03_jprb,.440e-03_jprb,.433e-03_jprb,.433e-03_jprb,.218e-02_jprb,&
629 &.218e-02_jprb,.434e-02_jprb,.434e-02_jprb,.417e-02_jprb,.417e-02_jprb,.350e-02_jprb,.350e-02_jprb,&
630 &.353e-02_jprb,.353e-02_jprb,.265e-02_jprb,.265e-02_jprb,.177e-02_jprb,.177e-02_jprb,.155e-02_jprb,&
631 &.155e-02_jprb,.801e-03_jprb,.801e-03_jprb,.558e-03_jprb,.558e-03_jprb,.384e-03_jprb,.384e-03_jprb,&
632 &.369e-03_jprb,.369e-03_jprb,.549e-03_jprb,.549e-03_jprb,.116e-02_jprb,.116e-02_jprb,.871e-03_jprb,&
633 &.871e-03_jprb,.350e-03_jprb,.350e-03_jprb,.309e-03_jprb,.309e-03_jprb,.308e-03_jprb,.308e-03_jprb,&
634 &.337e-03_jprb,.337e-03_jprb/)
635 !-- Sea Salt Aerosol month: 9 --- lat: 44 -82.0
636 zaer(:,44, 9) = (/&
637 &.341e-03_jprb,.341e-03_jprb,.333e-03_jprb,.333e-03_jprb,.335e-03_jprb,.335e-03_jprb,.346e-03_jprb,&
638 &.346e-03_jprb,.354e-03_jprb,.354e-03_jprb,.362e-03_jprb,.362e-03_jprb,.361e-03_jprb,.361e-03_jprb,&
639 &.365e-03_jprb,.365e-03_jprb,.394e-03_jprb,.394e-03_jprb,.414e-03_jprb,.414e-03_jprb,.442e-03_jprb,&
640 &.442e-03_jprb,.484e-03_jprb,.484e-03_jprb,.533e-03_jprb,.533e-03_jprb,.446e-03_jprb,.446e-03_jprb,&
641 &.360e-03_jprb,.360e-03_jprb,.302e-03_jprb,.302e-03_jprb,.292e-03_jprb,.292e-03_jprb,.365e-03_jprb,&
642 &.365e-03_jprb,.499e-03_jprb,.499e-03_jprb,.708e-03_jprb,.708e-03_jprb,.467e-03_jprb,.467e-03_jprb,&
643 &.432e-03_jprb,.432e-03_jprb,.418e-03_jprb,.418e-03_jprb,.394e-03_jprb,.394e-03_jprb,.358e-03_jprb,&
644 &.358e-03_jprb,.340e-03_jprb,.340e-03_jprb,.326e-03_jprb,.326e-03_jprb,.316e-03_jprb,.316e-03_jprb,&
645 &.319e-03_jprb,.319e-03_jprb,.332e-03_jprb,.332e-03_jprb,.339e-03_jprb,.339e-03_jprb,.322e-03_jprb,&
646 &.322e-03_jprb,.317e-03_jprb,.317e-03_jprb,.323e-03_jprb,.323e-03_jprb,.331e-03_jprb,.331e-03_jprb,&
647 &.340e-03_jprb,.340e-03_jprb/)
648 !-- Sea Salt Aerosol month: 9 --- lat: 45 -86.0
649 zaer(:,45, 9) = (/&
650 &.341e-03_jprb,.341e-03_jprb,.333e-03_jprb,.333e-03_jprb,.335e-03_jprb,.335e-03_jprb,.346e-03_jprb,&
651 &.346e-03_jprb,.354e-03_jprb,.354e-03_jprb,.362e-03_jprb,.362e-03_jprb,.361e-03_jprb,.361e-03_jprb,&
652 &.365e-03_jprb,.365e-03_jprb,.394e-03_jprb,.394e-03_jprb,.414e-03_jprb,.414e-03_jprb,.442e-03_jprb,&
653 &.442e-03_jprb,.484e-03_jprb,.484e-03_jprb,.533e-03_jprb,.533e-03_jprb,.446e-03_jprb,.446e-03_jprb,&
654 &.360e-03_jprb,.360e-03_jprb,.302e-03_jprb,.302e-03_jprb,.292e-03_jprb,.292e-03_jprb,.365e-03_jprb,&
655 &.365e-03_jprb,.499e-03_jprb,.499e-03_jprb,.708e-03_jprb,.708e-03_jprb,.467e-03_jprb,.467e-03_jprb,&
656 &.432e-03_jprb,.432e-03_jprb,.418e-03_jprb,.418e-03_jprb,.394e-03_jprb,.394e-03_jprb,.358e-03_jprb,&
657 &.358e-03_jprb,.340e-03_jprb,.340e-03_jprb,.326e-03_jprb,.326e-03_jprb,.316e-03_jprb,.316e-03_jprb,&
658 &.319e-03_jprb,.319e-03_jprb,.332e-03_jprb,.332e-03_jprb,.339e-03_jprb,.339e-03_jprb,.322e-03_jprb,&
659 &.322e-03_jprb,.317e-03_jprb,.317e-03_jprb,.323e-03_jprb,.323e-03_jprb,.331e-03_jprb,.331e-03_jprb,&
660 &.340e-03_jprb,.340e-03_jprb/)
661 !-- Sea Salt Aerosol month: 9 --- lat: 46 -90.0
662 zaer(:,46, 9) = (/&
663 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
664 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
665 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
666 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
667 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
668 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
669 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
670 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
671 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
672 &.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,.298e-03_jprb,&
673 &.298e-03_jprb,.298e-03_jprb/)
674 
675 ! ------------------------------------------------------------------
676 
677 !ZMAX=-1.E+8_JPRB
678 !ZMIN= 1.E+8_JPRB
679  jm=9
680  DO ji=1,46
681  DO jl=1,72
682  raerss(jl,ji,jm)=zaer(jl,ji,jm)
683 ! ZMAX=MAX(ZMAX,ZAER(JL,JI,JM))
684 ! ZMIN=MIN(ZMIN,ZAER(JL,JI,JM))
685  ENDDO
686  ENDDO
687 
688 !PRINT 9000,ZMIN,ZMAX
689 9000 FORMAT(1x,'SEA-SALT AEROSOLS ',2e12.5)
690 
691 ! ------------------------------------------------------------------
692 
693 RETURN
694 END SUBROUTINE suecaess_09
!$Id jm
Definition: comconst.h:7
subroutine suecaess_09
Definition: suecaess_09.F90:2
!$Header!c c INCLUDE fxyprim h c c c Fonctions in line c c REAL fyprim REAL rj c c il faut la calculer avant d appeler ces fonctions c c c Fonctions a changer selon x(x) et y(y) choisis.c-----------------------------------------------------------------c c.....ici