LMDZ
suecaess_06.F90
Go to the documentation of this file.
1 SUBROUTINE suecaess_06
2 
3 !** OPTICAL THICKNESS OF AEROSOLS OF SEA-SALT ORIGIN
4 ! June
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,6:6)
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: 6 --- lat: 1 90.0
77 zaer(:, 1, 6) = (/&
78 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
79 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
80 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
81 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
82 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
83 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
84 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
85 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
86 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
87 &.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,.438e-03_jprb,&
88 &.438e-03_jprb,.438e-03_jprb/)
89 !-- Sea Salt Aerosol month: 6 --- lat: 2 86.0
90 zaer(:, 2, 6) = (/&
91 &.548e-03_jprb,.548e-03_jprb,.550e-03_jprb,.550e-03_jprb,.584e-03_jprb,.584e-03_jprb,.644e-03_jprb,&
92 &.644e-03_jprb,.704e-03_jprb,.704e-03_jprb,.754e-03_jprb,.754e-03_jprb,.791e-03_jprb,.791e-03_jprb,&
93 &.829e-03_jprb,.829e-03_jprb,.832e-03_jprb,.832e-03_jprb,.817e-03_jprb,.817e-03_jprb,.796e-03_jprb,&
94 &.796e-03_jprb,.768e-03_jprb,.768e-03_jprb,.756e-03_jprb,.756e-03_jprb,.724e-03_jprb,.724e-03_jprb,&
95 &.693e-03_jprb,.693e-03_jprb,.615e-03_jprb,.615e-03_jprb,.512e-03_jprb,.512e-03_jprb,.401e-03_jprb,&
96 &.401e-03_jprb,.343e-03_jprb,.343e-03_jprb,.318e-03_jprb,.318e-03_jprb,.300e-03_jprb,.300e-03_jprb,&
97 &.288e-03_jprb,.288e-03_jprb,.286e-03_jprb,.286e-03_jprb,.290e-03_jprb,.290e-03_jprb,.292e-03_jprb,&
98 &.292e-03_jprb,.292e-03_jprb,.292e-03_jprb,.284e-03_jprb,.284e-03_jprb,.274e-03_jprb,.274e-03_jprb,&
99 &.275e-03_jprb,.275e-03_jprb,.297e-03_jprb,.297e-03_jprb,.330e-03_jprb,.330e-03_jprb,.364e-03_jprb,&
100 &.364e-03_jprb,.401e-03_jprb,.401e-03_jprb,.436e-03_jprb,.436e-03_jprb,.489e-03_jprb,.489e-03_jprb,&
101 &.541e-03_jprb,.541e-03_jprb/)
102 !-- Sea Salt Aerosol month: 6 --- lat: 3 82.0
103 zaer(:, 3, 6) = (/&
104 &.548e-03_jprb,.548e-03_jprb,.550e-03_jprb,.550e-03_jprb,.584e-03_jprb,.584e-03_jprb,.644e-03_jprb,&
105 &.644e-03_jprb,.704e-03_jprb,.704e-03_jprb,.754e-03_jprb,.754e-03_jprb,.791e-03_jprb,.791e-03_jprb,&
106 &.829e-03_jprb,.829e-03_jprb,.832e-03_jprb,.832e-03_jprb,.817e-03_jprb,.817e-03_jprb,.796e-03_jprb,&
107 &.796e-03_jprb,.768e-03_jprb,.768e-03_jprb,.756e-03_jprb,.756e-03_jprb,.724e-03_jprb,.724e-03_jprb,&
108 &.693e-03_jprb,.693e-03_jprb,.615e-03_jprb,.615e-03_jprb,.512e-03_jprb,.512e-03_jprb,.401e-03_jprb,&
109 &.401e-03_jprb,.343e-03_jprb,.343e-03_jprb,.318e-03_jprb,.318e-03_jprb,.300e-03_jprb,.300e-03_jprb,&
110 &.288e-03_jprb,.288e-03_jprb,.286e-03_jprb,.286e-03_jprb,.290e-03_jprb,.290e-03_jprb,.292e-03_jprb,&
111 &.292e-03_jprb,.292e-03_jprb,.292e-03_jprb,.284e-03_jprb,.284e-03_jprb,.274e-03_jprb,.274e-03_jprb,&
112 &.275e-03_jprb,.275e-03_jprb,.297e-03_jprb,.297e-03_jprb,.330e-03_jprb,.330e-03_jprb,.364e-03_jprb,&
113 &.364e-03_jprb,.401e-03_jprb,.401e-03_jprb,.436e-03_jprb,.436e-03_jprb,.489e-03_jprb,.489e-03_jprb,&
114 &.541e-03_jprb,.541e-03_jprb/)
115 !-- Sea Salt Aerosol month: 6 --- lat: 4 78.0
116 zaer(:, 4, 6) = (/&
117 &.648e-03_jprb,.648e-03_jprb,.640e-03_jprb,.640e-03_jprb,.620e-03_jprb,.620e-03_jprb,.643e-03_jprb,&
118 &.643e-03_jprb,.699e-03_jprb,.699e-03_jprb,.761e-03_jprb,.761e-03_jprb,.918e-03_jprb,.918e-03_jprb,&
119 &.118e-02_jprb,.118e-02_jprb,.134e-02_jprb,.134e-02_jprb,.135e-02_jprb,.135e-02_jprb,.125e-02_jprb,&
120 &.125e-02_jprb,.122e-02_jprb,.122e-02_jprb,.129e-02_jprb,.129e-02_jprb,.136e-02_jprb,.136e-02_jprb,&
121 &.131e-02_jprb,.131e-02_jprb,.116e-02_jprb,.116e-02_jprb,.989e-03_jprb,.989e-03_jprb,.744e-03_jprb,&
122 &.744e-03_jprb,.477e-03_jprb,.477e-03_jprb,.345e-03_jprb,.345e-03_jprb,.413e-03_jprb,.413e-03_jprb,&
123 &.549e-03_jprb,.549e-03_jprb,.653e-03_jprb,.653e-03_jprb,.667e-03_jprb,.667e-03_jprb,.640e-03_jprb,&
124 &.640e-03_jprb,.573e-03_jprb,.573e-03_jprb,.456e-03_jprb,.456e-03_jprb,.344e-03_jprb,.344e-03_jprb,&
125 &.301e-03_jprb,.301e-03_jprb,.311e-03_jprb,.311e-03_jprb,.341e-03_jprb,.341e-03_jprb,.369e-03_jprb,&
126 &.369e-03_jprb,.447e-03_jprb,.447e-03_jprb,.564e-03_jprb,.564e-03_jprb,.621e-03_jprb,.621e-03_jprb,&
127 &.664e-03_jprb,.664e-03_jprb/)
128 !-- Sea Salt Aerosol month: 6 --- lat: 5 74.0
129 zaer(:, 5, 6) = (/&
130 &.648e-03_jprb,.648e-03_jprb,.640e-03_jprb,.640e-03_jprb,.620e-03_jprb,.620e-03_jprb,.643e-03_jprb,&
131 &.643e-03_jprb,.699e-03_jprb,.699e-03_jprb,.761e-03_jprb,.761e-03_jprb,.918e-03_jprb,.918e-03_jprb,&
132 &.118e-02_jprb,.118e-02_jprb,.134e-02_jprb,.134e-02_jprb,.135e-02_jprb,.135e-02_jprb,.125e-02_jprb,&
133 &.125e-02_jprb,.122e-02_jprb,.122e-02_jprb,.129e-02_jprb,.129e-02_jprb,.136e-02_jprb,.136e-02_jprb,&
134 &.131e-02_jprb,.131e-02_jprb,.116e-02_jprb,.116e-02_jprb,.989e-03_jprb,.989e-03_jprb,.744e-03_jprb,&
135 &.744e-03_jprb,.477e-03_jprb,.477e-03_jprb,.345e-03_jprb,.345e-03_jprb,.413e-03_jprb,.413e-03_jprb,&
136 &.549e-03_jprb,.549e-03_jprb,.653e-03_jprb,.653e-03_jprb,.667e-03_jprb,.667e-03_jprb,.640e-03_jprb,&
137 &.640e-03_jprb,.573e-03_jprb,.573e-03_jprb,.456e-03_jprb,.456e-03_jprb,.344e-03_jprb,.344e-03_jprb,&
138 &.301e-03_jprb,.301e-03_jprb,.311e-03_jprb,.311e-03_jprb,.341e-03_jprb,.341e-03_jprb,.369e-03_jprb,&
139 &.369e-03_jprb,.447e-03_jprb,.447e-03_jprb,.564e-03_jprb,.564e-03_jprb,.621e-03_jprb,.621e-03_jprb,&
140 &.664e-03_jprb,.664e-03_jprb/)
141 !-- Sea Salt Aerosol month: 6 --- lat: 6 70.0
142 zaer(:, 6, 6) = (/&
143 &.147e-02_jprb,.147e-02_jprb,.143e-02_jprb,.143e-02_jprb,.144e-02_jprb,.144e-02_jprb,.131e-02_jprb,&
144 &.131e-02_jprb,.137e-02_jprb,.137e-02_jprb,.157e-02_jprb,.157e-02_jprb,.196e-02_jprb,.196e-02_jprb,&
145 &.272e-02_jprb,.272e-02_jprb,.400e-02_jprb,.400e-02_jprb,.321e-02_jprb,.321e-02_jprb,.295e-02_jprb,&
146 &.295e-02_jprb,.229e-02_jprb,.229e-02_jprb,.193e-02_jprb,.193e-02_jprb,.178e-02_jprb,.178e-02_jprb,&
147 &.160e-02_jprb,.160e-02_jprb,.141e-02_jprb,.141e-02_jprb,.130e-02_jprb,.130e-02_jprb,.103e-02_jprb,&
148 &.103e-02_jprb,.721e-03_jprb,.721e-03_jprb,.559e-03_jprb,.559e-03_jprb,.579e-03_jprb,.579e-03_jprb,&
149 &.772e-03_jprb,.772e-03_jprb,.110e-02_jprb,.110e-02_jprb,.132e-02_jprb,.132e-02_jprb,.144e-02_jprb,&
150 &.144e-02_jprb,.132e-02_jprb,.132e-02_jprb,.103e-02_jprb,.103e-02_jprb,.767e-03_jprb,.767e-03_jprb,&
151 &.675e-03_jprb,.675e-03_jprb,.716e-03_jprb,.716e-03_jprb,.810e-03_jprb,.810e-03_jprb,.934e-03_jprb,&
152 &.934e-03_jprb,.130e-02_jprb,.130e-02_jprb,.167e-02_jprb,.167e-02_jprb,.178e-02_jprb,.178e-02_jprb,&
153 &.181e-02_jprb,.181e-02_jprb/)
154 !-- Sea Salt Aerosol month: 6 --- lat: 7 66.0
155 zaer(:, 7, 6) = (/&
156 &.147e-02_jprb,.147e-02_jprb,.143e-02_jprb,.143e-02_jprb,.144e-02_jprb,.144e-02_jprb,.131e-02_jprb,&
157 &.131e-02_jprb,.137e-02_jprb,.137e-02_jprb,.157e-02_jprb,.157e-02_jprb,.196e-02_jprb,.196e-02_jprb,&
158 &.272e-02_jprb,.272e-02_jprb,.400e-02_jprb,.400e-02_jprb,.321e-02_jprb,.321e-02_jprb,.295e-02_jprb,&
159 &.295e-02_jprb,.229e-02_jprb,.229e-02_jprb,.193e-02_jprb,.193e-02_jprb,.178e-02_jprb,.178e-02_jprb,&
160 &.160e-02_jprb,.160e-02_jprb,.141e-02_jprb,.141e-02_jprb,.130e-02_jprb,.130e-02_jprb,.103e-02_jprb,&
161 &.103e-02_jprb,.721e-03_jprb,.721e-03_jprb,.559e-03_jprb,.559e-03_jprb,.579e-03_jprb,.579e-03_jprb,&
162 &.772e-03_jprb,.772e-03_jprb,.110e-02_jprb,.110e-02_jprb,.132e-02_jprb,.132e-02_jprb,.144e-02_jprb,&
163 &.144e-02_jprb,.132e-02_jprb,.132e-02_jprb,.103e-02_jprb,.103e-02_jprb,.767e-03_jprb,.767e-03_jprb,&
164 &.675e-03_jprb,.675e-03_jprb,.716e-03_jprb,.716e-03_jprb,.810e-03_jprb,.810e-03_jprb,.934e-03_jprb,&
165 &.934e-03_jprb,.130e-02_jprb,.130e-02_jprb,.167e-02_jprb,.167e-02_jprb,.178e-02_jprb,.178e-02_jprb,&
166 &.181e-02_jprb,.181e-02_jprb/)
167 !-- Sea Salt Aerosol month: 6 --- lat: 8 62.0
168 zaer(:, 8, 6) = (/&
169 &.855e-02_jprb,.855e-02_jprb,.763e-02_jprb,.763e-02_jprb,.553e-02_jprb,.553e-02_jprb,.361e-02_jprb,&
170 &.361e-02_jprb,.455e-02_jprb,.455e-02_jprb,.731e-02_jprb,.731e-02_jprb,.912e-02_jprb,.912e-02_jprb,&
171 &.100e-01_jprb,.100e-01_jprb,.108e-01_jprb,.108e-01_jprb,.103e-01_jprb,.103e-01_jprb,.981e-02_jprb,&
172 &.981e-02_jprb,.749e-02_jprb,.749e-02_jprb,.455e-02_jprb,.455e-02_jprb,.344e-02_jprb,.344e-02_jprb,&
173 &.333e-02_jprb,.333e-02_jprb,.271e-02_jprb,.271e-02_jprb,.251e-02_jprb,.251e-02_jprb,.195e-02_jprb,&
174 &.195e-02_jprb,.137e-02_jprb,.137e-02_jprb,.963e-03_jprb,.963e-03_jprb,.798e-03_jprb,.798e-03_jprb,&
175 &.114e-02_jprb,.114e-02_jprb,.213e-02_jprb,.213e-02_jprb,.340e-02_jprb,.340e-02_jprb,.439e-02_jprb,&
176 &.439e-02_jprb,.425e-02_jprb,.425e-02_jprb,.338e-02_jprb,.338e-02_jprb,.259e-02_jprb,.259e-02_jprb,&
177 &.206e-02_jprb,.206e-02_jprb,.296e-02_jprb,.296e-02_jprb,.381e-02_jprb,.381e-02_jprb,.444e-02_jprb,&
178 &.444e-02_jprb,.543e-02_jprb,.543e-02_jprb,.592e-02_jprb,.592e-02_jprb,.693e-02_jprb,.693e-02_jprb,&
179 &.894e-02_jprb,.894e-02_jprb/)
180 !-- Sea Salt Aerosol month: 6 --- lat: 9 58.0
181 zaer(:, 9, 6) = (/&
182 &.855e-02_jprb,.855e-02_jprb,.763e-02_jprb,.763e-02_jprb,.553e-02_jprb,.553e-02_jprb,.361e-02_jprb,&
183 &.361e-02_jprb,.455e-02_jprb,.455e-02_jprb,.731e-02_jprb,.731e-02_jprb,.912e-02_jprb,.912e-02_jprb,&
184 &.100e-01_jprb,.100e-01_jprb,.108e-01_jprb,.108e-01_jprb,.103e-01_jprb,.103e-01_jprb,.981e-02_jprb,&
185 &.981e-02_jprb,.749e-02_jprb,.749e-02_jprb,.455e-02_jprb,.455e-02_jprb,.344e-02_jprb,.344e-02_jprb,&
186 &.333e-02_jprb,.333e-02_jprb,.271e-02_jprb,.271e-02_jprb,.251e-02_jprb,.251e-02_jprb,.195e-02_jprb,&
187 &.195e-02_jprb,.137e-02_jprb,.137e-02_jprb,.963e-03_jprb,.963e-03_jprb,.798e-03_jprb,.798e-03_jprb,&
188 &.114e-02_jprb,.114e-02_jprb,.213e-02_jprb,.213e-02_jprb,.340e-02_jprb,.340e-02_jprb,.439e-02_jprb,&
189 &.439e-02_jprb,.425e-02_jprb,.425e-02_jprb,.338e-02_jprb,.338e-02_jprb,.259e-02_jprb,.259e-02_jprb,&
190 &.206e-02_jprb,.206e-02_jprb,.296e-02_jprb,.296e-02_jprb,.381e-02_jprb,.381e-02_jprb,.444e-02_jprb,&
191 &.444e-02_jprb,.543e-02_jprb,.543e-02_jprb,.592e-02_jprb,.592e-02_jprb,.693e-02_jprb,.693e-02_jprb,&
192 &.894e-02_jprb,.894e-02_jprb/)
193 !-- Sea Salt Aerosol month: 6 --- lat: 10 54.0
194 zaer(:,10, 6) = (/&
195 &.104e-01_jprb,.104e-01_jprb,.101e-01_jprb,.101e-01_jprb,.930e-02_jprb,.930e-02_jprb,.853e-02_jprb,&
196 &.853e-02_jprb,.822e-02_jprb,.822e-02_jprb,.861e-02_jprb,.861e-02_jprb,.948e-02_jprb,.948e-02_jprb,&
197 &.961e-02_jprb,.961e-02_jprb,.104e-01_jprb,.104e-01_jprb,.109e-01_jprb,.109e-01_jprb,.101e-01_jprb,&
198 &.101e-01_jprb,.804e-02_jprb,.804e-02_jprb,.960e-02_jprb,.960e-02_jprb,.106e-01_jprb,.106e-01_jprb,&
199 &.948e-02_jprb,.948e-02_jprb,.822e-02_jprb,.822e-02_jprb,.765e-02_jprb,.765e-02_jprb,.596e-02_jprb,&
200 &.596e-02_jprb,.500e-02_jprb,.500e-02_jprb,.468e-02_jprb,.468e-02_jprb,.515e-02_jprb,.515e-02_jprb,&
201 &.775e-02_jprb,.775e-02_jprb,.105e-01_jprb,.105e-01_jprb,.120e-01_jprb,.120e-01_jprb,.135e-01_jprb,&
202 &.135e-01_jprb,.134e-01_jprb,.134e-01_jprb,.115e-01_jprb,.115e-01_jprb,.106e-01_jprb,.106e-01_jprb,&
203 &.930e-02_jprb,.930e-02_jprb,.993e-02_jprb,.993e-02_jprb,.119e-01_jprb,.119e-01_jprb,.129e-01_jprb,&
204 &.129e-01_jprb,.124e-01_jprb,.124e-01_jprb,.117e-01_jprb,.117e-01_jprb,.118e-01_jprb,.118e-01_jprb,&
205 &.107e-01_jprb,.107e-01_jprb/)
206 !-- Sea Salt Aerosol month: 6 --- lat: 11 50.0
207 zaer(:,11, 6) = (/&
208 &.104e-01_jprb,.104e-01_jprb,.101e-01_jprb,.101e-01_jprb,.930e-02_jprb,.930e-02_jprb,.853e-02_jprb,&
209 &.853e-02_jprb,.822e-02_jprb,.822e-02_jprb,.861e-02_jprb,.861e-02_jprb,.948e-02_jprb,.948e-02_jprb,&
210 &.961e-02_jprb,.961e-02_jprb,.104e-01_jprb,.104e-01_jprb,.109e-01_jprb,.109e-01_jprb,.101e-01_jprb,&
211 &.101e-01_jprb,.804e-02_jprb,.804e-02_jprb,.960e-02_jprb,.960e-02_jprb,.106e-01_jprb,.106e-01_jprb,&
212 &.948e-02_jprb,.948e-02_jprb,.822e-02_jprb,.822e-02_jprb,.765e-02_jprb,.765e-02_jprb,.596e-02_jprb,&
213 &.596e-02_jprb,.500e-02_jprb,.500e-02_jprb,.468e-02_jprb,.468e-02_jprb,.515e-02_jprb,.515e-02_jprb,&
214 &.775e-02_jprb,.775e-02_jprb,.105e-01_jprb,.105e-01_jprb,.120e-01_jprb,.120e-01_jprb,.135e-01_jprb,&
215 &.135e-01_jprb,.134e-01_jprb,.134e-01_jprb,.115e-01_jprb,.115e-01_jprb,.106e-01_jprb,.106e-01_jprb,&
216 &.930e-02_jprb,.930e-02_jprb,.993e-02_jprb,.993e-02_jprb,.119e-01_jprb,.119e-01_jprb,.129e-01_jprb,&
217 &.129e-01_jprb,.124e-01_jprb,.124e-01_jprb,.117e-01_jprb,.117e-01_jprb,.118e-01_jprb,.118e-01_jprb,&
218 &.107e-01_jprb,.107e-01_jprb/)
219 !-- Sea Salt Aerosol month: 6 --- lat: 12 46.0
220 zaer(:,12, 6) = (/&
221 &.947e-02_jprb,.947e-02_jprb,.993e-02_jprb,.993e-02_jprb,.109e-01_jprb,.109e-01_jprb,.107e-01_jprb,&
222 &.107e-01_jprb,.106e-01_jprb,.106e-01_jprb,.115e-01_jprb,.115e-01_jprb,.104e-01_jprb,.104e-01_jprb,&
223 &.102e-01_jprb,.102e-01_jprb,.103e-01_jprb,.103e-01_jprb,.110e-01_jprb,.110e-01_jprb,.961e-02_jprb,&
224 &.961e-02_jprb,.585e-02_jprb,.585e-02_jprb,.871e-02_jprb,.871e-02_jprb,.115e-01_jprb,.115e-01_jprb,&
225 &.115e-01_jprb,.115e-01_jprb,.111e-01_jprb,.111e-01_jprb,.102e-01_jprb,.102e-01_jprb,.896e-02_jprb,&
226 &.896e-02_jprb,.900e-02_jprb,.900e-02_jprb,.985e-02_jprb,.985e-02_jprb,.117e-01_jprb,.117e-01_jprb,&
227 &.141e-01_jprb,.141e-01_jprb,.153e-01_jprb,.153e-01_jprb,.157e-01_jprb,.157e-01_jprb,.172e-01_jprb,&
228 &.172e-01_jprb,.155e-01_jprb,.155e-01_jprb,.141e-01_jprb,.141e-01_jprb,.126e-01_jprb,.126e-01_jprb,&
229 &.116e-01_jprb,.116e-01_jprb,.123e-01_jprb,.123e-01_jprb,.144e-01_jprb,.144e-01_jprb,.139e-01_jprb,&
230 &.139e-01_jprb,.112e-01_jprb,.112e-01_jprb,.112e-01_jprb,.112e-01_jprb,.113e-01_jprb,.113e-01_jprb,&
231 &.797e-02_jprb,.797e-02_jprb/)
232 !-- Sea Salt Aerosol month: 6 --- lat: 13 42.0
233 zaer(:,13, 6) = (/&
234 &.947e-02_jprb,.947e-02_jprb,.993e-02_jprb,.993e-02_jprb,.109e-01_jprb,.109e-01_jprb,.107e-01_jprb,&
235 &.107e-01_jprb,.106e-01_jprb,.106e-01_jprb,.115e-01_jprb,.115e-01_jprb,.104e-01_jprb,.104e-01_jprb,&
236 &.102e-01_jprb,.102e-01_jprb,.103e-01_jprb,.103e-01_jprb,.110e-01_jprb,.110e-01_jprb,.961e-02_jprb,&
237 &.961e-02_jprb,.585e-02_jprb,.585e-02_jprb,.871e-02_jprb,.871e-02_jprb,.115e-01_jprb,.115e-01_jprb,&
238 &.115e-01_jprb,.115e-01_jprb,.111e-01_jprb,.111e-01_jprb,.102e-01_jprb,.102e-01_jprb,.896e-02_jprb,&
239 &.896e-02_jprb,.900e-02_jprb,.900e-02_jprb,.985e-02_jprb,.985e-02_jprb,.117e-01_jprb,.117e-01_jprb,&
240 &.141e-01_jprb,.141e-01_jprb,.153e-01_jprb,.153e-01_jprb,.157e-01_jprb,.157e-01_jprb,.172e-01_jprb,&
241 &.172e-01_jprb,.155e-01_jprb,.155e-01_jprb,.141e-01_jprb,.141e-01_jprb,.126e-01_jprb,.126e-01_jprb,&
242 &.116e-01_jprb,.116e-01_jprb,.123e-01_jprb,.123e-01_jprb,.144e-01_jprb,.144e-01_jprb,.139e-01_jprb,&
243 &.139e-01_jprb,.112e-01_jprb,.112e-01_jprb,.112e-01_jprb,.112e-01_jprb,.113e-01_jprb,.113e-01_jprb,&
244 &.797e-02_jprb,.797e-02_jprb/)
245 !-- Sea Salt Aerosol month: 6 --- lat: 14 38.0
246 zaer(:,14, 6) = (/&
247 &.103e-01_jprb,.103e-01_jprb,.110e-01_jprb,.110e-01_jprb,.110e-01_jprb,.110e-01_jprb,.109e-01_jprb,&
248 &.109e-01_jprb,.115e-01_jprb,.115e-01_jprb,.124e-01_jprb,.124e-01_jprb,.115e-01_jprb,.115e-01_jprb,&
249 &.107e-01_jprb,.107e-01_jprb,.102e-01_jprb,.102e-01_jprb,.935e-02_jprb,.935e-02_jprb,.760e-02_jprb,&
250 &.760e-02_jprb,.411e-02_jprb,.411e-02_jprb,.416e-02_jprb,.416e-02_jprb,.863e-02_jprb,.863e-02_jprb,&
251 &.108e-01_jprb,.108e-01_jprb,.102e-01_jprb,.102e-01_jprb,.950e-02_jprb,.950e-02_jprb,.980e-02_jprb,&
252 &.980e-02_jprb,.968e-02_jprb,.968e-02_jprb,.101e-01_jprb,.101e-01_jprb,.975e-02_jprb,.975e-02_jprb,&
253 &.117e-01_jprb,.117e-01_jprb,.128e-01_jprb,.128e-01_jprb,.127e-01_jprb,.127e-01_jprb,.125e-01_jprb,&
254 &.125e-01_jprb,.123e-01_jprb,.123e-01_jprb,.110e-01_jprb,.110e-01_jprb,.101e-01_jprb,.101e-01_jprb,&
255 &.102e-01_jprb,.102e-01_jprb,.105e-01_jprb,.105e-01_jprb,.103e-01_jprb,.103e-01_jprb,.103e-01_jprb,&
256 &.103e-01_jprb,.620e-02_jprb,.620e-02_jprb,.803e-02_jprb,.803e-02_jprb,.109e-01_jprb,.109e-01_jprb,&
257 &.973e-02_jprb,.973e-02_jprb/)
258 !-- Sea Salt Aerosol month: 6 --- lat: 15 34.0
259 zaer(:,15, 6) = (/&
260 &.103e-01_jprb,.103e-01_jprb,.110e-01_jprb,.110e-01_jprb,.110e-01_jprb,.110e-01_jprb,.109e-01_jprb,&
261 &.109e-01_jprb,.115e-01_jprb,.115e-01_jprb,.124e-01_jprb,.124e-01_jprb,.115e-01_jprb,.115e-01_jprb,&
262 &.107e-01_jprb,.107e-01_jprb,.102e-01_jprb,.102e-01_jprb,.935e-02_jprb,.935e-02_jprb,.760e-02_jprb,&
263 &.760e-02_jprb,.411e-02_jprb,.411e-02_jprb,.416e-02_jprb,.416e-02_jprb,.863e-02_jprb,.863e-02_jprb,&
264 &.108e-01_jprb,.108e-01_jprb,.102e-01_jprb,.102e-01_jprb,.950e-02_jprb,.950e-02_jprb,.980e-02_jprb,&
265 &.980e-02_jprb,.968e-02_jprb,.968e-02_jprb,.101e-01_jprb,.101e-01_jprb,.975e-02_jprb,.975e-02_jprb,&
266 &.117e-01_jprb,.117e-01_jprb,.128e-01_jprb,.128e-01_jprb,.127e-01_jprb,.127e-01_jprb,.125e-01_jprb,&
267 &.125e-01_jprb,.123e-01_jprb,.123e-01_jprb,.110e-01_jprb,.110e-01_jprb,.101e-01_jprb,.101e-01_jprb,&
268 &.102e-01_jprb,.102e-01_jprb,.105e-01_jprb,.105e-01_jprb,.103e-01_jprb,.103e-01_jprb,.103e-01_jprb,&
269 &.103e-01_jprb,.620e-02_jprb,.620e-02_jprb,.803e-02_jprb,.803e-02_jprb,.109e-01_jprb,.109e-01_jprb,&
270 &.973e-02_jprb,.973e-02_jprb/)
271 !-- Sea Salt Aerosol month: 6 --- lat: 16 30.0
272 zaer(:,16, 6) = (/&
273 &.100e-01_jprb,.100e-01_jprb,.103e-01_jprb,.103e-01_jprb,.968e-02_jprb,.968e-02_jprb,.913e-02_jprb,&
274 &.913e-02_jprb,.991e-02_jprb,.991e-02_jprb,.103e-01_jprb,.103e-01_jprb,.120e-01_jprb,.120e-01_jprb,&
275 &.116e-01_jprb,.116e-01_jprb,.995e-02_jprb,.995e-02_jprb,.871e-02_jprb,.871e-02_jprb,.735e-02_jprb,&
276 &.735e-02_jprb,.411e-02_jprb,.411e-02_jprb,.348e-02_jprb,.348e-02_jprb,.563e-02_jprb,.563e-02_jprb,&
277 &.842e-02_jprb,.842e-02_jprb,.901e-02_jprb,.901e-02_jprb,.934e-02_jprb,.934e-02_jprb,.907e-02_jprb,&
278 &.907e-02_jprb,.904e-02_jprb,.904e-02_jprb,.767e-02_jprb,.767e-02_jprb,.408e-02_jprb,.408e-02_jprb,&
279 &.611e-02_jprb,.611e-02_jprb,.933e-02_jprb,.933e-02_jprb,.105e-01_jprb,.105e-01_jprb,.105e-01_jprb,&
280 &.105e-01_jprb,.106e-01_jprb,.106e-01_jprb,.102e-01_jprb,.102e-01_jprb,.903e-02_jprb,.903e-02_jprb,&
281 &.861e-02_jprb,.861e-02_jprb,.769e-02_jprb,.769e-02_jprb,.552e-02_jprb,.552e-02_jprb,.512e-02_jprb,&
282 &.512e-02_jprb,.492e-02_jprb,.492e-02_jprb,.661e-02_jprb,.661e-02_jprb,.986e-02_jprb,.986e-02_jprb,&
283 &.102e-01_jprb,.102e-01_jprb/)
284 !-- Sea Salt Aerosol month: 6 --- lat: 17 26.0
285 zaer(:,17, 6) = (/&
286 &.100e-01_jprb,.100e-01_jprb,.103e-01_jprb,.103e-01_jprb,.968e-02_jprb,.968e-02_jprb,.913e-02_jprb,&
287 &.913e-02_jprb,.991e-02_jprb,.991e-02_jprb,.103e-01_jprb,.103e-01_jprb,.120e-01_jprb,.120e-01_jprb,&
288 &.116e-01_jprb,.116e-01_jprb,.995e-02_jprb,.995e-02_jprb,.871e-02_jprb,.871e-02_jprb,.735e-02_jprb,&
289 &.735e-02_jprb,.411e-02_jprb,.411e-02_jprb,.348e-02_jprb,.348e-02_jprb,.563e-02_jprb,.563e-02_jprb,&
290 &.842e-02_jprb,.842e-02_jprb,.901e-02_jprb,.901e-02_jprb,.934e-02_jprb,.934e-02_jprb,.907e-02_jprb,&
291 &.907e-02_jprb,.904e-02_jprb,.904e-02_jprb,.767e-02_jprb,.767e-02_jprb,.408e-02_jprb,.408e-02_jprb,&
292 &.611e-02_jprb,.611e-02_jprb,.933e-02_jprb,.933e-02_jprb,.105e-01_jprb,.105e-01_jprb,.105e-01_jprb,&
293 &.105e-01_jprb,.106e-01_jprb,.106e-01_jprb,.102e-01_jprb,.102e-01_jprb,.903e-02_jprb,.903e-02_jprb,&
294 &.861e-02_jprb,.861e-02_jprb,.769e-02_jprb,.769e-02_jprb,.552e-02_jprb,.552e-02_jprb,.512e-02_jprb,&
295 &.512e-02_jprb,.492e-02_jprb,.492e-02_jprb,.661e-02_jprb,.661e-02_jprb,.986e-02_jprb,.986e-02_jprb,&
296 &.102e-01_jprb,.102e-01_jprb/)
297 !-- Sea Salt Aerosol month: 6 --- lat: 18 22.0
298 zaer(:,18, 6) = (/&
299 &.104e-01_jprb,.104e-01_jprb,.106e-01_jprb,.106e-01_jprb,.105e-01_jprb,.105e-01_jprb,.109e-01_jprb,&
300 &.109e-01_jprb,.115e-01_jprb,.115e-01_jprb,.116e-01_jprb,.116e-01_jprb,.127e-01_jprb,.127e-01_jprb,&
301 &.122e-01_jprb,.122e-01_jprb,.109e-01_jprb,.109e-01_jprb,.960e-02_jprb,.960e-02_jprb,.784e-02_jprb,&
302 &.784e-02_jprb,.472e-02_jprb,.472e-02_jprb,.349e-02_jprb,.349e-02_jprb,.361e-02_jprb,.361e-02_jprb,&
303 &.690e-02_jprb,.690e-02_jprb,.887e-02_jprb,.887e-02_jprb,.961e-02_jprb,.961e-02_jprb,.923e-02_jprb,&
304 &.923e-02_jprb,.754e-02_jprb,.754e-02_jprb,.494e-02_jprb,.494e-02_jprb,.255e-02_jprb,.255e-02_jprb,&
305 &.358e-02_jprb,.358e-02_jprb,.598e-02_jprb,.598e-02_jprb,.806e-02_jprb,.806e-02_jprb,.114e-01_jprb,&
306 &.114e-01_jprb,.141e-01_jprb,.141e-01_jprb,.155e-01_jprb,.155e-01_jprb,.147e-01_jprb,.147e-01_jprb,&
307 &.134e-01_jprb,.134e-01_jprb,.113e-01_jprb,.113e-01_jprb,.799e-02_jprb,.799e-02_jprb,.694e-02_jprb,&
308 &.694e-02_jprb,.717e-02_jprb,.717e-02_jprb,.105e-01_jprb,.105e-01_jprb,.110e-01_jprb,.110e-01_jprb,&
309 &.107e-01_jprb,.107e-01_jprb/)
310 !-- Sea Salt Aerosol month: 6 --- lat: 19 18.0
311 zaer(:,19, 6) = (/&
312 &.104e-01_jprb,.104e-01_jprb,.106e-01_jprb,.106e-01_jprb,.105e-01_jprb,.105e-01_jprb,.109e-01_jprb,&
313 &.109e-01_jprb,.115e-01_jprb,.115e-01_jprb,.116e-01_jprb,.116e-01_jprb,.127e-01_jprb,.127e-01_jprb,&
314 &.122e-01_jprb,.122e-01_jprb,.109e-01_jprb,.109e-01_jprb,.960e-02_jprb,.960e-02_jprb,.784e-02_jprb,&
315 &.784e-02_jprb,.472e-02_jprb,.472e-02_jprb,.349e-02_jprb,.349e-02_jprb,.361e-02_jprb,.361e-02_jprb,&
316 &.690e-02_jprb,.690e-02_jprb,.887e-02_jprb,.887e-02_jprb,.961e-02_jprb,.961e-02_jprb,.923e-02_jprb,&
317 &.923e-02_jprb,.754e-02_jprb,.754e-02_jprb,.494e-02_jprb,.494e-02_jprb,.255e-02_jprb,.255e-02_jprb,&
318 &.358e-02_jprb,.358e-02_jprb,.598e-02_jprb,.598e-02_jprb,.806e-02_jprb,.806e-02_jprb,.114e-01_jprb,&
319 &.114e-01_jprb,.141e-01_jprb,.141e-01_jprb,.155e-01_jprb,.155e-01_jprb,.147e-01_jprb,.147e-01_jprb,&
320 &.134e-01_jprb,.134e-01_jprb,.113e-01_jprb,.113e-01_jprb,.799e-02_jprb,.799e-02_jprb,.694e-02_jprb,&
321 &.694e-02_jprb,.717e-02_jprb,.717e-02_jprb,.105e-01_jprb,.105e-01_jprb,.110e-01_jprb,.110e-01_jprb,&
322 &.107e-01_jprb,.107e-01_jprb/)
323 !-- Sea Salt Aerosol month: 6 --- lat: 20 14.0
324 zaer(:,20, 6) = (/&
325 &.128e-01_jprb,.128e-01_jprb,.126e-01_jprb,.126e-01_jprb,.136e-01_jprb,.136e-01_jprb,.151e-01_jprb,&
326 &.151e-01_jprb,.147e-01_jprb,.147e-01_jprb,.148e-01_jprb,.148e-01_jprb,.146e-01_jprb,.146e-01_jprb,&
327 &.128e-01_jprb,.128e-01_jprb,.107e-01_jprb,.107e-01_jprb,.841e-02_jprb,.841e-02_jprb,.550e-02_jprb,&
328 &.550e-02_jprb,.304e-02_jprb,.304e-02_jprb,.317e-02_jprb,.317e-02_jprb,.462e-02_jprb,.462e-02_jprb,&
329 &.806e-02_jprb,.806e-02_jprb,.119e-01_jprb,.119e-01_jprb,.109e-01_jprb,.109e-01_jprb,.779e-02_jprb,&
330 &.779e-02_jprb,.556e-02_jprb,.556e-02_jprb,.386e-02_jprb,.386e-02_jprb,.307e-02_jprb,.307e-02_jprb,&
331 &.447e-02_jprb,.447e-02_jprb,.824e-02_jprb,.824e-02_jprb,.124e-01_jprb,.124e-01_jprb,.154e-01_jprb,&
332 &.154e-01_jprb,.170e-01_jprb,.170e-01_jprb,.171e-01_jprb,.171e-01_jprb,.164e-01_jprb,.164e-01_jprb,&
333 &.146e-01_jprb,.146e-01_jprb,.123e-01_jprb,.123e-01_jprb,.101e-01_jprb,.101e-01_jprb,.838e-02_jprb,&
334 &.838e-02_jprb,.101e-01_jprb,.101e-01_jprb,.122e-01_jprb,.122e-01_jprb,.114e-01_jprb,.114e-01_jprb,&
335 &.117e-01_jprb,.117e-01_jprb/)
336 !-- Sea Salt Aerosol month: 6 --- lat: 21 10.0
337 zaer(:,21, 6) = (/&
338 &.128e-01_jprb,.128e-01_jprb,.126e-01_jprb,.126e-01_jprb,.136e-01_jprb,.136e-01_jprb,.151e-01_jprb,&
339 &.151e-01_jprb,.147e-01_jprb,.147e-01_jprb,.148e-01_jprb,.148e-01_jprb,.146e-01_jprb,.146e-01_jprb,&
340 &.128e-01_jprb,.128e-01_jprb,.107e-01_jprb,.107e-01_jprb,.841e-02_jprb,.841e-02_jprb,.550e-02_jprb,&
341 &.550e-02_jprb,.304e-02_jprb,.304e-02_jprb,.317e-02_jprb,.317e-02_jprb,.462e-02_jprb,.462e-02_jprb,&
342 &.806e-02_jprb,.806e-02_jprb,.119e-01_jprb,.119e-01_jprb,.109e-01_jprb,.109e-01_jprb,.779e-02_jprb,&
343 &.779e-02_jprb,.556e-02_jprb,.556e-02_jprb,.386e-02_jprb,.386e-02_jprb,.307e-02_jprb,.307e-02_jprb,&
344 &.447e-02_jprb,.447e-02_jprb,.824e-02_jprb,.824e-02_jprb,.124e-01_jprb,.124e-01_jprb,.154e-01_jprb,&
345 &.154e-01_jprb,.170e-01_jprb,.170e-01_jprb,.171e-01_jprb,.171e-01_jprb,.164e-01_jprb,.164e-01_jprb,&
346 &.146e-01_jprb,.146e-01_jprb,.123e-01_jprb,.123e-01_jprb,.101e-01_jprb,.101e-01_jprb,.838e-02_jprb,&
347 &.838e-02_jprb,.101e-01_jprb,.101e-01_jprb,.122e-01_jprb,.122e-01_jprb,.114e-01_jprb,.114e-01_jprb,&
348 &.117e-01_jprb,.117e-01_jprb/)
349 !-- Sea Salt Aerosol month: 6 --- lat: 22 6.0
350 zaer(:,22, 6) = (/&
351 &.149e-01_jprb,.149e-01_jprb,.154e-01_jprb,.154e-01_jprb,.160e-01_jprb,.160e-01_jprb,.159e-01_jprb,&
352 &.159e-01_jprb,.150e-01_jprb,.150e-01_jprb,.137e-01_jprb,.137e-01_jprb,.125e-01_jprb,.125e-01_jprb,&
353 &.107e-01_jprb,.107e-01_jprb,.847e-02_jprb,.847e-02_jprb,.537e-02_jprb,.537e-02_jprb,.205e-02_jprb,&
354 &.205e-02_jprb,.181e-02_jprb,.181e-02_jprb,.322e-02_jprb,.322e-02_jprb,.633e-02_jprb,.633e-02_jprb,&
355 &.994e-02_jprb,.994e-02_jprb,.107e-01_jprb,.107e-01_jprb,.868e-02_jprb,.868e-02_jprb,.653e-02_jprb,&
356 &.653e-02_jprb,.485e-02_jprb,.485e-02_jprb,.387e-02_jprb,.387e-02_jprb,.520e-02_jprb,.520e-02_jprb,&
357 &.820e-02_jprb,.820e-02_jprb,.119e-01_jprb,.119e-01_jprb,.125e-01_jprb,.125e-01_jprb,.115e-01_jprb,&
358 &.115e-01_jprb,.105e-01_jprb,.105e-01_jprb,.900e-02_jprb,.900e-02_jprb,.796e-02_jprb,.796e-02_jprb,&
359 &.666e-02_jprb,.666e-02_jprb,.688e-02_jprb,.688e-02_jprb,.730e-02_jprb,.730e-02_jprb,.736e-02_jprb,&
360 &.736e-02_jprb,.813e-02_jprb,.813e-02_jprb,.100e-01_jprb,.100e-01_jprb,.120e-01_jprb,.120e-01_jprb,&
361 &.139e-01_jprb,.139e-01_jprb/)
362 !-- Sea Salt Aerosol month: 6 --- lat: 23 2.0
363 zaer(:,23, 6) = (/&
364 &.149e-01_jprb,.149e-01_jprb,.154e-01_jprb,.154e-01_jprb,.160e-01_jprb,.160e-01_jprb,.159e-01_jprb,&
365 &.159e-01_jprb,.150e-01_jprb,.150e-01_jprb,.137e-01_jprb,.137e-01_jprb,.125e-01_jprb,.125e-01_jprb,&
366 &.107e-01_jprb,.107e-01_jprb,.847e-02_jprb,.847e-02_jprb,.537e-02_jprb,.537e-02_jprb,.205e-02_jprb,&
367 &.205e-02_jprb,.181e-02_jprb,.181e-02_jprb,.322e-02_jprb,.322e-02_jprb,.633e-02_jprb,.633e-02_jprb,&
368 &.994e-02_jprb,.994e-02_jprb,.107e-01_jprb,.107e-01_jprb,.868e-02_jprb,.868e-02_jprb,.653e-02_jprb,&
369 &.653e-02_jprb,.485e-02_jprb,.485e-02_jprb,.387e-02_jprb,.387e-02_jprb,.520e-02_jprb,.520e-02_jprb,&
370 &.820e-02_jprb,.820e-02_jprb,.119e-01_jprb,.119e-01_jprb,.125e-01_jprb,.125e-01_jprb,.115e-01_jprb,&
371 &.115e-01_jprb,.105e-01_jprb,.105e-01_jprb,.900e-02_jprb,.900e-02_jprb,.796e-02_jprb,.796e-02_jprb,&
372 &.666e-02_jprb,.666e-02_jprb,.688e-02_jprb,.688e-02_jprb,.730e-02_jprb,.730e-02_jprb,.736e-02_jprb,&
373 &.736e-02_jprb,.813e-02_jprb,.813e-02_jprb,.100e-01_jprb,.100e-01_jprb,.120e-01_jprb,.120e-01_jprb,&
374 &.139e-01_jprb,.139e-01_jprb/)
375 !-- Sea Salt Aerosol month: 6 --- lat: 24 -2.0
376 zaer(:,24, 6) = (/&
377 &.111e-01_jprb,.111e-01_jprb,.114e-01_jprb,.114e-01_jprb,.126e-01_jprb,.126e-01_jprb,.140e-01_jprb,&
378 &.140e-01_jprb,.137e-01_jprb,.137e-01_jprb,.125e-01_jprb,.125e-01_jprb,.114e-01_jprb,.114e-01_jprb,&
379 &.988e-02_jprb,.988e-02_jprb,.776e-02_jprb,.776e-02_jprb,.511e-02_jprb,.511e-02_jprb,.208e-02_jprb,&
380 &.208e-02_jprb,.192e-02_jprb,.192e-02_jprb,.514e-02_jprb,.514e-02_jprb,.889e-02_jprb,.889e-02_jprb,&
381 &.801e-02_jprb,.801e-02_jprb,.601e-02_jprb,.601e-02_jprb,.482e-02_jprb,.482e-02_jprb,.359e-02_jprb,&
382 &.359e-02_jprb,.292e-02_jprb,.292e-02_jprb,.184e-02_jprb,.184e-02_jprb,.316e-02_jprb,.316e-02_jprb,&
383 &.626e-02_jprb,.626e-02_jprb,.950e-02_jprb,.950e-02_jprb,.132e-01_jprb,.132e-01_jprb,.105e-01_jprb,&
384 &.105e-01_jprb,.930e-02_jprb,.930e-02_jprb,.893e-02_jprb,.893e-02_jprb,.667e-02_jprb,.667e-02_jprb,&
385 &.482e-02_jprb,.482e-02_jprb,.530e-02_jprb,.530e-02_jprb,.625e-02_jprb,.625e-02_jprb,.753e-02_jprb,&
386 &.753e-02_jprb,.816e-02_jprb,.816e-02_jprb,.892e-02_jprb,.892e-02_jprb,.961e-02_jprb,.961e-02_jprb,&
387 &.104e-01_jprb,.104e-01_jprb/)
388 !-- Sea Salt Aerosol month: 6 --- lat: 25 -6.0
389 zaer(:,25, 6) = (/&
390 &.111e-01_jprb,.111e-01_jprb,.114e-01_jprb,.114e-01_jprb,.126e-01_jprb,.126e-01_jprb,.140e-01_jprb,&
391 &.140e-01_jprb,.137e-01_jprb,.137e-01_jprb,.125e-01_jprb,.125e-01_jprb,.114e-01_jprb,.114e-01_jprb,&
392 &.988e-02_jprb,.988e-02_jprb,.776e-02_jprb,.776e-02_jprb,.511e-02_jprb,.511e-02_jprb,.208e-02_jprb,&
393 &.208e-02_jprb,.192e-02_jprb,.192e-02_jprb,.514e-02_jprb,.514e-02_jprb,.889e-02_jprb,.889e-02_jprb,&
394 &.801e-02_jprb,.801e-02_jprb,.601e-02_jprb,.601e-02_jprb,.482e-02_jprb,.482e-02_jprb,.359e-02_jprb,&
395 &.359e-02_jprb,.292e-02_jprb,.292e-02_jprb,.184e-02_jprb,.184e-02_jprb,.316e-02_jprb,.316e-02_jprb,&
396 &.626e-02_jprb,.626e-02_jprb,.950e-02_jprb,.950e-02_jprb,.132e-01_jprb,.132e-01_jprb,.105e-01_jprb,&
397 &.105e-01_jprb,.930e-02_jprb,.930e-02_jprb,.893e-02_jprb,.893e-02_jprb,.667e-02_jprb,.667e-02_jprb,&
398 &.482e-02_jprb,.482e-02_jprb,.530e-02_jprb,.530e-02_jprb,.625e-02_jprb,.625e-02_jprb,.753e-02_jprb,&
399 &.753e-02_jprb,.816e-02_jprb,.816e-02_jprb,.892e-02_jprb,.892e-02_jprb,.961e-02_jprb,.961e-02_jprb,&
400 &.104e-01_jprb,.104e-01_jprb/)
401 !-- Sea Salt Aerosol month: 6 --- lat: 26 -10.0
402 zaer(:,26, 6) = (/&
403 &.130e-01_jprb,.130e-01_jprb,.132e-01_jprb,.132e-01_jprb,.142e-01_jprb,.142e-01_jprb,.150e-01_jprb,&
404 &.150e-01_jprb,.141e-01_jprb,.141e-01_jprb,.117e-01_jprb,.117e-01_jprb,.883e-02_jprb,.883e-02_jprb,&
405 &.664e-02_jprb,.664e-02_jprb,.532e-02_jprb,.532e-02_jprb,.382e-02_jprb,.382e-02_jprb,.649e-02_jprb,&
406 &.649e-02_jprb,.797e-02_jprb,.797e-02_jprb,.109e-01_jprb,.109e-01_jprb,.126e-01_jprb,.126e-01_jprb,&
407 &.924e-02_jprb,.924e-02_jprb,.543e-02_jprb,.543e-02_jprb,.315e-02_jprb,.315e-02_jprb,.130e-02_jprb,&
408 &.130e-02_jprb,.913e-03_jprb,.913e-03_jprb,.908e-03_jprb,.908e-03_jprb,.122e-02_jprb,.122e-02_jprb,&
409 &.249e-02_jprb,.249e-02_jprb,.626e-02_jprb,.626e-02_jprb,.143e-01_jprb,.143e-01_jprb,.134e-01_jprb,&
410 &.134e-01_jprb,.806e-02_jprb,.806e-02_jprb,.715e-02_jprb,.715e-02_jprb,.677e-02_jprb,.677e-02_jprb,&
411 &.367e-02_jprb,.367e-02_jprb,.710e-02_jprb,.710e-02_jprb,.673e-02_jprb,.673e-02_jprb,.988e-02_jprb,&
412 &.988e-02_jprb,.952e-02_jprb,.952e-02_jprb,.112e-01_jprb,.112e-01_jprb,.124e-01_jprb,.124e-01_jprb,&
413 &.127e-01_jprb,.127e-01_jprb/)
414 !-- Sea Salt Aerosol month: 6 --- lat: 27 -14.0
415 zaer(:,27, 6) = (/&
416 &.130e-01_jprb,.130e-01_jprb,.132e-01_jprb,.132e-01_jprb,.142e-01_jprb,.142e-01_jprb,.150e-01_jprb,&
417 &.150e-01_jprb,.141e-01_jprb,.141e-01_jprb,.117e-01_jprb,.117e-01_jprb,.883e-02_jprb,.883e-02_jprb,&
418 &.664e-02_jprb,.664e-02_jprb,.532e-02_jprb,.532e-02_jprb,.382e-02_jprb,.382e-02_jprb,.649e-02_jprb,&
419 &.649e-02_jprb,.797e-02_jprb,.797e-02_jprb,.109e-01_jprb,.109e-01_jprb,.126e-01_jprb,.126e-01_jprb,&
420 &.924e-02_jprb,.924e-02_jprb,.543e-02_jprb,.543e-02_jprb,.315e-02_jprb,.315e-02_jprb,.130e-02_jprb,&
421 &.130e-02_jprb,.913e-03_jprb,.913e-03_jprb,.908e-03_jprb,.908e-03_jprb,.122e-02_jprb,.122e-02_jprb,&
422 &.249e-02_jprb,.249e-02_jprb,.626e-02_jprb,.626e-02_jprb,.143e-01_jprb,.143e-01_jprb,.134e-01_jprb,&
423 &.134e-01_jprb,.806e-02_jprb,.806e-02_jprb,.715e-02_jprb,.715e-02_jprb,.677e-02_jprb,.677e-02_jprb,&
424 &.367e-02_jprb,.367e-02_jprb,.710e-02_jprb,.710e-02_jprb,.673e-02_jprb,.673e-02_jprb,.988e-02_jprb,&
425 &.988e-02_jprb,.952e-02_jprb,.952e-02_jprb,.112e-01_jprb,.112e-01_jprb,.124e-01_jprb,.124e-01_jprb,&
426 &.127e-01_jprb,.127e-01_jprb/)
427 !-- Sea Salt Aerosol month: 6 --- lat: 28 -18.0
428 zaer(:,28, 6) = (/&
429 &.130e-01_jprb,.130e-01_jprb,.137e-01_jprb,.137e-01_jprb,.139e-01_jprb,.139e-01_jprb,.131e-01_jprb,&
430 &.131e-01_jprb,.115e-01_jprb,.115e-01_jprb,.946e-02_jprb,.946e-02_jprb,.775e-02_jprb,.775e-02_jprb,&
431 &.550e-02_jprb,.550e-02_jprb,.412e-02_jprb,.412e-02_jprb,.466e-02_jprb,.466e-02_jprb,.648e-02_jprb,&
432 &.648e-02_jprb,.963e-02_jprb,.963e-02_jprb,.114e-01_jprb,.114e-01_jprb,.122e-01_jprb,.122e-01_jprb,&
433 &.112e-01_jprb,.112e-01_jprb,.889e-02_jprb,.889e-02_jprb,.494e-02_jprb,.494e-02_jprb,.169e-02_jprb,&
434 &.169e-02_jprb,.158e-02_jprb,.158e-02_jprb,.152e-02_jprb,.152e-02_jprb,.132e-02_jprb,.132e-02_jprb,&
435 &.144e-02_jprb,.144e-02_jprb,.306e-02_jprb,.306e-02_jprb,.548e-02_jprb,.548e-02_jprb,.841e-02_jprb,&
436 &.841e-02_jprb,.504e-02_jprb,.504e-02_jprb,.283e-02_jprb,.283e-02_jprb,.343e-02_jprb,.343e-02_jprb,&
437 &.176e-02_jprb,.176e-02_jprb,.407e-02_jprb,.407e-02_jprb,.612e-02_jprb,.612e-02_jprb,.714e-02_jprb,&
438 &.714e-02_jprb,.884e-02_jprb,.884e-02_jprb,.104e-01_jprb,.104e-01_jprb,.116e-01_jprb,.116e-01_jprb,&
439 &.125e-01_jprb,.125e-01_jprb/)
440 !-- Sea Salt Aerosol month: 6 --- lat: 29 -22.0
441 zaer(:,29, 6) = (/&
442 &.130e-01_jprb,.130e-01_jprb,.137e-01_jprb,.137e-01_jprb,.139e-01_jprb,.139e-01_jprb,.131e-01_jprb,&
443 &.131e-01_jprb,.115e-01_jprb,.115e-01_jprb,.946e-02_jprb,.946e-02_jprb,.775e-02_jprb,.775e-02_jprb,&
444 &.550e-02_jprb,.550e-02_jprb,.412e-02_jprb,.412e-02_jprb,.466e-02_jprb,.466e-02_jprb,.648e-02_jprb,&
445 &.648e-02_jprb,.963e-02_jprb,.963e-02_jprb,.114e-01_jprb,.114e-01_jprb,.122e-01_jprb,.122e-01_jprb,&
446 &.112e-01_jprb,.112e-01_jprb,.889e-02_jprb,.889e-02_jprb,.494e-02_jprb,.494e-02_jprb,.169e-02_jprb,&
447 &.169e-02_jprb,.158e-02_jprb,.158e-02_jprb,.152e-02_jprb,.152e-02_jprb,.132e-02_jprb,.132e-02_jprb,&
448 &.144e-02_jprb,.144e-02_jprb,.306e-02_jprb,.306e-02_jprb,.548e-02_jprb,.548e-02_jprb,.841e-02_jprb,&
449 &.841e-02_jprb,.504e-02_jprb,.504e-02_jprb,.283e-02_jprb,.283e-02_jprb,.343e-02_jprb,.343e-02_jprb,&
450 &.176e-02_jprb,.176e-02_jprb,.407e-02_jprb,.407e-02_jprb,.612e-02_jprb,.612e-02_jprb,.714e-02_jprb,&
451 &.714e-02_jprb,.884e-02_jprb,.884e-02_jprb,.104e-01_jprb,.104e-01_jprb,.116e-01_jprb,.116e-01_jprb,&
452 &.125e-01_jprb,.125e-01_jprb/)
453 !-- Sea Salt Aerosol month: 6 --- lat: 30 -26.0
454 zaer(:,30, 6) = (/&
455 &.904e-02_jprb,.904e-02_jprb,.889e-02_jprb,.889e-02_jprb,.905e-02_jprb,.905e-02_jprb,.903e-02_jprb,&
456 &.903e-02_jprb,.790e-02_jprb,.790e-02_jprb,.708e-02_jprb,.708e-02_jprb,.666e-02_jprb,.666e-02_jprb,&
457 &.443e-02_jprb,.443e-02_jprb,.398e-02_jprb,.398e-02_jprb,.422e-02_jprb,.422e-02_jprb,.539e-02_jprb,&
458 &.539e-02_jprb,.746e-02_jprb,.746e-02_jprb,.951e-02_jprb,.951e-02_jprb,.104e-01_jprb,.104e-01_jprb,&
459 &.937e-02_jprb,.937e-02_jprb,.811e-02_jprb,.811e-02_jprb,.649e-02_jprb,.649e-02_jprb,.340e-02_jprb,&
460 &.340e-02_jprb,.244e-02_jprb,.244e-02_jprb,.241e-02_jprb,.241e-02_jprb,.241e-02_jprb,.241e-02_jprb,&
461 &.184e-02_jprb,.184e-02_jprb,.135e-02_jprb,.135e-02_jprb,.164e-02_jprb,.164e-02_jprb,.198e-02_jprb,&
462 &.198e-02_jprb,.191e-02_jprb,.191e-02_jprb,.125e-02_jprb,.125e-02_jprb,.952e-03_jprb,.952e-03_jprb,&
463 &.833e-03_jprb,.833e-03_jprb,.140e-02_jprb,.140e-02_jprb,.343e-02_jprb,.343e-02_jprb,.468e-02_jprb,&
464 &.468e-02_jprb,.573e-02_jprb,.573e-02_jprb,.645e-02_jprb,.645e-02_jprb,.736e-02_jprb,.736e-02_jprb,&
465 &.863e-02_jprb,.863e-02_jprb/)
466 !-- Sea Salt Aerosol month: 6 --- lat: 31 -30.0
467 zaer(:,31, 6) = (/&
468 &.904e-02_jprb,.904e-02_jprb,.889e-02_jprb,.889e-02_jprb,.905e-02_jprb,.905e-02_jprb,.903e-02_jprb,&
469 &.903e-02_jprb,.790e-02_jprb,.790e-02_jprb,.708e-02_jprb,.708e-02_jprb,.666e-02_jprb,.666e-02_jprb,&
470 &.443e-02_jprb,.443e-02_jprb,.398e-02_jprb,.398e-02_jprb,.422e-02_jprb,.422e-02_jprb,.539e-02_jprb,&
471 &.539e-02_jprb,.746e-02_jprb,.746e-02_jprb,.951e-02_jprb,.951e-02_jprb,.104e-01_jprb,.104e-01_jprb,&
472 &.937e-02_jprb,.937e-02_jprb,.811e-02_jprb,.811e-02_jprb,.649e-02_jprb,.649e-02_jprb,.340e-02_jprb,&
473 &.340e-02_jprb,.244e-02_jprb,.244e-02_jprb,.241e-02_jprb,.241e-02_jprb,.241e-02_jprb,.241e-02_jprb,&
474 &.184e-02_jprb,.184e-02_jprb,.135e-02_jprb,.135e-02_jprb,.164e-02_jprb,.164e-02_jprb,.198e-02_jprb,&
475 &.198e-02_jprb,.191e-02_jprb,.191e-02_jprb,.125e-02_jprb,.125e-02_jprb,.952e-03_jprb,.952e-03_jprb,&
476 &.833e-03_jprb,.833e-03_jprb,.140e-02_jprb,.140e-02_jprb,.343e-02_jprb,.343e-02_jprb,.468e-02_jprb,&
477 &.468e-02_jprb,.573e-02_jprb,.573e-02_jprb,.645e-02_jprb,.645e-02_jprb,.736e-02_jprb,.736e-02_jprb,&
478 &.863e-02_jprb,.863e-02_jprb/)
479 !-- Sea Salt Aerosol month: 6 --- lat: 32 -34.0
480 zaer(:,32, 6) = (/&
481 &.563e-02_jprb,.563e-02_jprb,.547e-02_jprb,.547e-02_jprb,.609e-02_jprb,.609e-02_jprb,.643e-02_jprb,&
482 &.643e-02_jprb,.544e-02_jprb,.544e-02_jprb,.446e-02_jprb,.446e-02_jprb,.287e-02_jprb,.287e-02_jprb,&
483 &.244e-02_jprb,.244e-02_jprb,.214e-02_jprb,.214e-02_jprb,.161e-02_jprb,.161e-02_jprb,.259e-02_jprb,&
484 &.259e-02_jprb,.582e-02_jprb,.582e-02_jprb,.778e-02_jprb,.778e-02_jprb,.795e-02_jprb,.795e-02_jprb,&
485 &.650e-02_jprb,.650e-02_jprb,.588e-02_jprb,.588e-02_jprb,.547e-02_jprb,.547e-02_jprb,.389e-02_jprb,&
486 &.389e-02_jprb,.324e-02_jprb,.324e-02_jprb,.347e-02_jprb,.347e-02_jprb,.339e-02_jprb,.339e-02_jprb,&
487 &.268e-02_jprb,.268e-02_jprb,.148e-02_jprb,.148e-02_jprb,.153e-02_jprb,.153e-02_jprb,.106e-02_jprb,&
488 &.106e-02_jprb,.848e-03_jprb,.848e-03_jprb,.760e-03_jprb,.760e-03_jprb,.595e-03_jprb,.595e-03_jprb,&
489 &.440e-03_jprb,.440e-03_jprb,.511e-03_jprb,.511e-03_jprb,.164e-02_jprb,.164e-02_jprb,.291e-02_jprb,&
490 &.291e-02_jprb,.477e-02_jprb,.477e-02_jprb,.584e-02_jprb,.584e-02_jprb,.570e-02_jprb,.570e-02_jprb,&
491 &.631e-02_jprb,.631e-02_jprb/)
492 !-- Sea Salt Aerosol month: 6 --- lat: 33 -38.0
493 zaer(:,33, 6) = (/&
494 &.563e-02_jprb,.563e-02_jprb,.547e-02_jprb,.547e-02_jprb,.609e-02_jprb,.609e-02_jprb,.643e-02_jprb,&
495 &.643e-02_jprb,.544e-02_jprb,.544e-02_jprb,.446e-02_jprb,.446e-02_jprb,.287e-02_jprb,.287e-02_jprb,&
496 &.244e-02_jprb,.244e-02_jprb,.214e-02_jprb,.214e-02_jprb,.161e-02_jprb,.161e-02_jprb,.259e-02_jprb,&
497 &.259e-02_jprb,.582e-02_jprb,.582e-02_jprb,.778e-02_jprb,.778e-02_jprb,.795e-02_jprb,.795e-02_jprb,&
498 &.650e-02_jprb,.650e-02_jprb,.588e-02_jprb,.588e-02_jprb,.547e-02_jprb,.547e-02_jprb,.389e-02_jprb,&
499 &.389e-02_jprb,.324e-02_jprb,.324e-02_jprb,.347e-02_jprb,.347e-02_jprb,.339e-02_jprb,.339e-02_jprb,&
500 &.268e-02_jprb,.268e-02_jprb,.148e-02_jprb,.148e-02_jprb,.153e-02_jprb,.153e-02_jprb,.106e-02_jprb,&
501 &.106e-02_jprb,.848e-03_jprb,.848e-03_jprb,.760e-03_jprb,.760e-03_jprb,.595e-03_jprb,.595e-03_jprb,&
502 &.440e-03_jprb,.440e-03_jprb,.511e-03_jprb,.511e-03_jprb,.164e-02_jprb,.164e-02_jprb,.291e-02_jprb,&
503 &.291e-02_jprb,.477e-02_jprb,.477e-02_jprb,.584e-02_jprb,.584e-02_jprb,.570e-02_jprb,.570e-02_jprb,&
504 &.631e-02_jprb,.631e-02_jprb/)
505 !-- Sea Salt Aerosol month: 6 --- lat: 34 -42.0
506 zaer(:,34, 6) = (/&
507 &.573e-02_jprb,.573e-02_jprb,.591e-02_jprb,.591e-02_jprb,.619e-02_jprb,.619e-02_jprb,.605e-02_jprb,&
508 &.605e-02_jprb,.515e-02_jprb,.515e-02_jprb,.335e-02_jprb,.335e-02_jprb,.742e-03_jprb,.742e-03_jprb,&
509 &.623e-03_jprb,.623e-03_jprb,.603e-03_jprb,.603e-03_jprb,.627e-03_jprb,.627e-03_jprb,.587e-03_jprb,&
510 &.587e-03_jprb,.237e-02_jprb,.237e-02_jprb,.469e-02_jprb,.469e-02_jprb,.657e-02_jprb,.657e-02_jprb,&
511 &.675e-02_jprb,.675e-02_jprb,.651e-02_jprb,.651e-02_jprb,.597e-02_jprb,.597e-02_jprb,.367e-02_jprb,&
512 &.367e-02_jprb,.211e-02_jprb,.211e-02_jprb,.183e-02_jprb,.183e-02_jprb,.135e-02_jprb,.135e-02_jprb,&
513 &.212e-02_jprb,.212e-02_jprb,.158e-02_jprb,.158e-02_jprb,.176e-02_jprb,.176e-02_jprb,.924e-03_jprb,&
514 &.924e-03_jprb,.652e-03_jprb,.652e-03_jprb,.554e-03_jprb,.554e-03_jprb,.516e-03_jprb,.516e-03_jprb,&
515 &.456e-03_jprb,.456e-03_jprb,.392e-03_jprb,.392e-03_jprb,.512e-03_jprb,.512e-03_jprb,.145e-02_jprb,&
516 &.145e-02_jprb,.254e-02_jprb,.254e-02_jprb,.410e-02_jprb,.410e-02_jprb,.460e-02_jprb,.460e-02_jprb,&
517 &.515e-02_jprb,.515e-02_jprb/)
518 !-- Sea Salt Aerosol month: 6 --- lat: 35 -46.0
519 zaer(:,35, 6) = (/&
520 &.573e-02_jprb,.573e-02_jprb,.591e-02_jprb,.591e-02_jprb,.619e-02_jprb,.619e-02_jprb,.605e-02_jprb,&
521 &.605e-02_jprb,.515e-02_jprb,.515e-02_jprb,.335e-02_jprb,.335e-02_jprb,.742e-03_jprb,.742e-03_jprb,&
522 &.623e-03_jprb,.623e-03_jprb,.603e-03_jprb,.603e-03_jprb,.627e-03_jprb,.627e-03_jprb,.587e-03_jprb,&
523 &.587e-03_jprb,.237e-02_jprb,.237e-02_jprb,.469e-02_jprb,.469e-02_jprb,.657e-02_jprb,.657e-02_jprb,&
524 &.675e-02_jprb,.675e-02_jprb,.651e-02_jprb,.651e-02_jprb,.597e-02_jprb,.597e-02_jprb,.367e-02_jprb,&
525 &.367e-02_jprb,.211e-02_jprb,.211e-02_jprb,.183e-02_jprb,.183e-02_jprb,.135e-02_jprb,.135e-02_jprb,&
526 &.212e-02_jprb,.212e-02_jprb,.158e-02_jprb,.158e-02_jprb,.176e-02_jprb,.176e-02_jprb,.924e-03_jprb,&
527 &.924e-03_jprb,.652e-03_jprb,.652e-03_jprb,.554e-03_jprb,.554e-03_jprb,.516e-03_jprb,.516e-03_jprb,&
528 &.456e-03_jprb,.456e-03_jprb,.392e-03_jprb,.392e-03_jprb,.512e-03_jprb,.512e-03_jprb,.145e-02_jprb,&
529 &.145e-02_jprb,.254e-02_jprb,.254e-02_jprb,.410e-02_jprb,.410e-02_jprb,.460e-02_jprb,.460e-02_jprb,&
530 &.515e-02_jprb,.515e-02_jprb/)
531 !-- Sea Salt Aerosol month: 6 --- lat: 36 -50.0
532 zaer(:,36, 6) = (/&
533 &.462e-02_jprb,.462e-02_jprb,.498e-02_jprb,.498e-02_jprb,.495e-02_jprb,.495e-02_jprb,.538e-02_jprb,&
534 &.538e-02_jprb,.414e-02_jprb,.414e-02_jprb,.197e-02_jprb,.197e-02_jprb,.595e-03_jprb,.595e-03_jprb,&
535 &.306e-03_jprb,.306e-03_jprb,.332e-03_jprb,.332e-03_jprb,.590e-03_jprb,.590e-03_jprb,.624e-03_jprb,&
536 &.624e-03_jprb,.591e-03_jprb,.591e-03_jprb,.213e-02_jprb,.213e-02_jprb,.497e-02_jprb,.497e-02_jprb,&
537 &.636e-02_jprb,.636e-02_jprb,.725e-02_jprb,.725e-02_jprb,.685e-02_jprb,.685e-02_jprb,.414e-02_jprb,&
538 &.414e-02_jprb,.208e-02_jprb,.208e-02_jprb,.129e-02_jprb,.129e-02_jprb,.978e-03_jprb,.978e-03_jprb,&
539 &.957e-03_jprb,.957e-03_jprb,.101e-02_jprb,.101e-02_jprb,.887e-03_jprb,.887e-03_jprb,.693e-03_jprb,&
540 &.693e-03_jprb,.563e-03_jprb,.563e-03_jprb,.492e-03_jprb,.492e-03_jprb,.448e-03_jprb,.448e-03_jprb,&
541 &.406e-03_jprb,.406e-03_jprb,.365e-03_jprb,.365e-03_jprb,.323e-03_jprb,.323e-03_jprb,.390e-03_jprb,&
542 &.390e-03_jprb,.147e-02_jprb,.147e-02_jprb,.266e-02_jprb,.266e-02_jprb,.310e-02_jprb,.310e-02_jprb,&
543 &.424e-02_jprb,.424e-02_jprb/)
544 !-- Sea Salt Aerosol month: 6 --- lat: 37 -54.0
545 zaer(:,37, 6) = (/&
546 &.462e-02_jprb,.462e-02_jprb,.498e-02_jprb,.498e-02_jprb,.495e-02_jprb,.495e-02_jprb,.538e-02_jprb,&
547 &.538e-02_jprb,.414e-02_jprb,.414e-02_jprb,.197e-02_jprb,.197e-02_jprb,.595e-03_jprb,.595e-03_jprb,&
548 &.306e-03_jprb,.306e-03_jprb,.332e-03_jprb,.332e-03_jprb,.590e-03_jprb,.590e-03_jprb,.624e-03_jprb,&
549 &.624e-03_jprb,.591e-03_jprb,.591e-03_jprb,.213e-02_jprb,.213e-02_jprb,.497e-02_jprb,.497e-02_jprb,&
550 &.636e-02_jprb,.636e-02_jprb,.725e-02_jprb,.725e-02_jprb,.685e-02_jprb,.685e-02_jprb,.414e-02_jprb,&
551 &.414e-02_jprb,.208e-02_jprb,.208e-02_jprb,.129e-02_jprb,.129e-02_jprb,.978e-03_jprb,.978e-03_jprb,&
552 &.957e-03_jprb,.957e-03_jprb,.101e-02_jprb,.101e-02_jprb,.887e-03_jprb,.887e-03_jprb,.693e-03_jprb,&
553 &.693e-03_jprb,.563e-03_jprb,.563e-03_jprb,.492e-03_jprb,.492e-03_jprb,.448e-03_jprb,.448e-03_jprb,&
554 &.406e-03_jprb,.406e-03_jprb,.365e-03_jprb,.365e-03_jprb,.323e-03_jprb,.323e-03_jprb,.390e-03_jprb,&
555 &.390e-03_jprb,.147e-02_jprb,.147e-02_jprb,.266e-02_jprb,.266e-02_jprb,.310e-02_jprb,.310e-02_jprb,&
556 &.424e-02_jprb,.424e-02_jprb/)
557 !-- Sea Salt Aerosol month: 6 --- lat: 38 -58.0
558 zaer(:,38, 6) = (/&
559 &.343e-02_jprb,.343e-02_jprb,.323e-02_jprb,.323e-02_jprb,.160e-02_jprb,.160e-02_jprb,.231e-02_jprb,&
560 &.231e-02_jprb,.161e-02_jprb,.161e-02_jprb,.647e-03_jprb,.647e-03_jprb,.392e-03_jprb,.392e-03_jprb,&
561 &.305e-03_jprb,.305e-03_jprb,.512e-03_jprb,.512e-03_jprb,.233e-02_jprb,.233e-02_jprb,.155e-02_jprb,&
562 &.155e-02_jprb,.120e-02_jprb,.120e-02_jprb,.304e-02_jprb,.304e-02_jprb,.338e-02_jprb,.338e-02_jprb,&
563 &.494e-02_jprb,.494e-02_jprb,.624e-02_jprb,.624e-02_jprb,.586e-02_jprb,.586e-02_jprb,.485e-02_jprb,&
564 &.485e-02_jprb,.395e-02_jprb,.395e-02_jprb,.172e-02_jprb,.172e-02_jprb,.141e-02_jprb,.141e-02_jprb,&
565 &.830e-03_jprb,.830e-03_jprb,.810e-03_jprb,.810e-03_jprb,.738e-03_jprb,.738e-03_jprb,.576e-03_jprb,&
566 &.576e-03_jprb,.484e-03_jprb,.484e-03_jprb,.403e-03_jprb,.403e-03_jprb,.337e-03_jprb,.337e-03_jprb,&
567 &.295e-03_jprb,.295e-03_jprb,.260e-03_jprb,.260e-03_jprb,.234e-03_jprb,.234e-03_jprb,.243e-03_jprb,&
568 &.243e-03_jprb,.878e-03_jprb,.878e-03_jprb,.157e-02_jprb,.157e-02_jprb,.174e-02_jprb,.174e-02_jprb,&
569 &.281e-02_jprb,.281e-02_jprb/)
570 !-- Sea Salt Aerosol month: 6 --- lat: 39 -62.0
571 zaer(:,39, 6) = (/&
572 &.343e-02_jprb,.343e-02_jprb,.323e-02_jprb,.323e-02_jprb,.160e-02_jprb,.160e-02_jprb,.231e-02_jprb,&
573 &.231e-02_jprb,.161e-02_jprb,.161e-02_jprb,.647e-03_jprb,.647e-03_jprb,.392e-03_jprb,.392e-03_jprb,&
574 &.305e-03_jprb,.305e-03_jprb,.512e-03_jprb,.512e-03_jprb,.233e-02_jprb,.233e-02_jprb,.155e-02_jprb,&
575 &.155e-02_jprb,.120e-02_jprb,.120e-02_jprb,.304e-02_jprb,.304e-02_jprb,.338e-02_jprb,.338e-02_jprb,&
576 &.494e-02_jprb,.494e-02_jprb,.624e-02_jprb,.624e-02_jprb,.586e-02_jprb,.586e-02_jprb,.485e-02_jprb,&
577 &.485e-02_jprb,.395e-02_jprb,.395e-02_jprb,.172e-02_jprb,.172e-02_jprb,.141e-02_jprb,.141e-02_jprb,&
578 &.830e-03_jprb,.830e-03_jprb,.810e-03_jprb,.810e-03_jprb,.738e-03_jprb,.738e-03_jprb,.576e-03_jprb,&
579 &.576e-03_jprb,.484e-03_jprb,.484e-03_jprb,.403e-03_jprb,.403e-03_jprb,.337e-03_jprb,.337e-03_jprb,&
580 &.295e-03_jprb,.295e-03_jprb,.260e-03_jprb,.260e-03_jprb,.234e-03_jprb,.234e-03_jprb,.243e-03_jprb,&
581 &.243e-03_jprb,.878e-03_jprb,.878e-03_jprb,.157e-02_jprb,.157e-02_jprb,.174e-02_jprb,.174e-02_jprb,&
582 &.281e-02_jprb,.281e-02_jprb/)
583 !-- Sea Salt Aerosol month: 6 --- lat: 40 -66.0
584 zaer(:,40, 6) = (/&
585 &.186e-02_jprb,.186e-02_jprb,.253e-02_jprb,.253e-02_jprb,.988e-03_jprb,.988e-03_jprb,.830e-03_jprb,&
586 &.830e-03_jprb,.101e-02_jprb,.101e-02_jprb,.823e-03_jprb,.823e-03_jprb,.699e-03_jprb,.699e-03_jprb,&
587 &.491e-03_jprb,.491e-03_jprb,.714e-03_jprb,.714e-03_jprb,.689e-03_jprb,.689e-03_jprb,.928e-03_jprb,&
588 &.928e-03_jprb,.122e-02_jprb,.122e-02_jprb,.263e-02_jprb,.263e-02_jprb,.145e-02_jprb,.145e-02_jprb,&
589 &.150e-02_jprb,.150e-02_jprb,.334e-02_jprb,.334e-02_jprb,.384e-02_jprb,.384e-02_jprb,.484e-02_jprb,&
590 &.484e-02_jprb,.511e-02_jprb,.511e-02_jprb,.383e-02_jprb,.383e-02_jprb,.180e-02_jprb,.180e-02_jprb,&
591 &.153e-02_jprb,.153e-02_jprb,.213e-02_jprb,.213e-02_jprb,.175e-02_jprb,.175e-02_jprb,.120e-02_jprb,&
592 &.120e-02_jprb,.669e-03_jprb,.669e-03_jprb,.473e-03_jprb,.473e-03_jprb,.302e-03_jprb,.302e-03_jprb,&
593 &.259e-03_jprb,.259e-03_jprb,.273e-03_jprb,.273e-03_jprb,.330e-03_jprb,.330e-03_jprb,.328e-03_jprb,&
594 &.328e-03_jprb,.362e-03_jprb,.362e-03_jprb,.428e-03_jprb,.428e-03_jprb,.581e-03_jprb,.581e-03_jprb,&
595 &.903e-03_jprb,.903e-03_jprb/)
596 !-- Sea Salt Aerosol month: 6 --- lat: 41 -70.0
597 zaer(:,41, 6) = (/&
598 &.186e-02_jprb,.186e-02_jprb,.253e-02_jprb,.253e-02_jprb,.988e-03_jprb,.988e-03_jprb,.830e-03_jprb,&
599 &.830e-03_jprb,.101e-02_jprb,.101e-02_jprb,.823e-03_jprb,.823e-03_jprb,.699e-03_jprb,.699e-03_jprb,&
600 &.491e-03_jprb,.491e-03_jprb,.714e-03_jprb,.714e-03_jprb,.689e-03_jprb,.689e-03_jprb,.928e-03_jprb,&
601 &.928e-03_jprb,.122e-02_jprb,.122e-02_jprb,.263e-02_jprb,.263e-02_jprb,.145e-02_jprb,.145e-02_jprb,&
602 &.150e-02_jprb,.150e-02_jprb,.334e-02_jprb,.334e-02_jprb,.384e-02_jprb,.384e-02_jprb,.484e-02_jprb,&
603 &.484e-02_jprb,.511e-02_jprb,.511e-02_jprb,.383e-02_jprb,.383e-02_jprb,.180e-02_jprb,.180e-02_jprb,&
604 &.153e-02_jprb,.153e-02_jprb,.213e-02_jprb,.213e-02_jprb,.175e-02_jprb,.175e-02_jprb,.120e-02_jprb,&
605 &.120e-02_jprb,.669e-03_jprb,.669e-03_jprb,.473e-03_jprb,.473e-03_jprb,.302e-03_jprb,.302e-03_jprb,&
606 &.259e-03_jprb,.259e-03_jprb,.273e-03_jprb,.273e-03_jprb,.330e-03_jprb,.330e-03_jprb,.328e-03_jprb,&
607 &.328e-03_jprb,.362e-03_jprb,.362e-03_jprb,.428e-03_jprb,.428e-03_jprb,.581e-03_jprb,.581e-03_jprb,&
608 &.903e-03_jprb,.903e-03_jprb/)
609 !-- Sea Salt Aerosol month: 6 --- lat: 42 -74.0
610 zaer(:,42, 6) = (/&
611 &.818e-03_jprb,.818e-03_jprb,.122e-02_jprb,.122e-02_jprb,.812e-03_jprb,.812e-03_jprb,.663e-03_jprb,&
612 &.663e-03_jprb,.731e-03_jprb,.731e-03_jprb,.887e-03_jprb,.887e-03_jprb,.687e-03_jprb,.687e-03_jprb,&
613 &.596e-03_jprb,.596e-03_jprb,.585e-03_jprb,.585e-03_jprb,.560e-03_jprb,.560e-03_jprb,.126e-02_jprb,&
614 &.126e-02_jprb,.197e-02_jprb,.197e-02_jprb,.145e-02_jprb,.145e-02_jprb,.696e-03_jprb,.696e-03_jprb,&
615 &.516e-03_jprb,.516e-03_jprb,.573e-03_jprb,.573e-03_jprb,.163e-02_jprb,.163e-02_jprb,.359e-02_jprb,&
616 &.359e-02_jprb,.393e-02_jprb,.393e-02_jprb,.351e-02_jprb,.351e-02_jprb,.322e-02_jprb,.322e-02_jprb,&
617 &.320e-02_jprb,.320e-02_jprb,.309e-02_jprb,.309e-02_jprb,.245e-02_jprb,.245e-02_jprb,.179e-02_jprb,&
618 &.179e-02_jprb,.166e-02_jprb,.166e-02_jprb,.125e-02_jprb,.125e-02_jprb,.382e-03_jprb,.382e-03_jprb,&
619 &.346e-03_jprb,.346e-03_jprb,.553e-03_jprb,.553e-03_jprb,.138e-02_jprb,.138e-02_jprb,.128e-02_jprb,&
620 &.128e-02_jprb,.298e-03_jprb,.298e-03_jprb,.292e-03_jprb,.292e-03_jprb,.370e-03_jprb,.370e-03_jprb,&
621 &.535e-03_jprb,.535e-03_jprb/)
622 !-- Sea Salt Aerosol month: 6 --- lat: 43 -78.0
623 zaer(:,43, 6) = (/&
624 &.818e-03_jprb,.818e-03_jprb,.122e-02_jprb,.122e-02_jprb,.812e-03_jprb,.812e-03_jprb,.663e-03_jprb,&
625 &.663e-03_jprb,.731e-03_jprb,.731e-03_jprb,.887e-03_jprb,.887e-03_jprb,.687e-03_jprb,.687e-03_jprb,&
626 &.596e-03_jprb,.596e-03_jprb,.585e-03_jprb,.585e-03_jprb,.560e-03_jprb,.560e-03_jprb,.126e-02_jprb,&
627 &.126e-02_jprb,.197e-02_jprb,.197e-02_jprb,.145e-02_jprb,.145e-02_jprb,.696e-03_jprb,.696e-03_jprb,&
628 &.516e-03_jprb,.516e-03_jprb,.573e-03_jprb,.573e-03_jprb,.163e-02_jprb,.163e-02_jprb,.359e-02_jprb,&
629 &.359e-02_jprb,.393e-02_jprb,.393e-02_jprb,.351e-02_jprb,.351e-02_jprb,.322e-02_jprb,.322e-02_jprb,&
630 &.320e-02_jprb,.320e-02_jprb,.309e-02_jprb,.309e-02_jprb,.245e-02_jprb,.245e-02_jprb,.179e-02_jprb,&
631 &.179e-02_jprb,.166e-02_jprb,.166e-02_jprb,.125e-02_jprb,.125e-02_jprb,.382e-03_jprb,.382e-03_jprb,&
632 &.346e-03_jprb,.346e-03_jprb,.553e-03_jprb,.553e-03_jprb,.138e-02_jprb,.138e-02_jprb,.128e-02_jprb,&
633 &.128e-02_jprb,.298e-03_jprb,.298e-03_jprb,.292e-03_jprb,.292e-03_jprb,.370e-03_jprb,.370e-03_jprb,&
634 &.535e-03_jprb,.535e-03_jprb/)
635 !-- Sea Salt Aerosol month: 6 --- lat: 44 -82.0
636 zaer(:,44, 6) = (/&
637 &.421e-03_jprb,.421e-03_jprb,.420e-03_jprb,.420e-03_jprb,.396e-03_jprb,.396e-03_jprb,.405e-03_jprb,&
638 &.405e-03_jprb,.440e-03_jprb,.440e-03_jprb,.489e-03_jprb,.489e-03_jprb,.525e-03_jprb,.525e-03_jprb,&
639 &.564e-03_jprb,.564e-03_jprb,.628e-03_jprb,.628e-03_jprb,.724e-03_jprb,.724e-03_jprb,.843e-03_jprb,&
640 &.843e-03_jprb,.845e-03_jprb,.845e-03_jprb,.684e-03_jprb,.684e-03_jprb,.626e-03_jprb,.626e-03_jprb,&
641 &.691e-03_jprb,.691e-03_jprb,.808e-03_jprb,.808e-03_jprb,.102e-02_jprb,.102e-02_jprb,.130e-02_jprb,&
642 &.130e-02_jprb,.174e-02_jprb,.174e-02_jprb,.176e-02_jprb,.176e-02_jprb,.120e-02_jprb,.120e-02_jprb,&
643 &.100e-02_jprb,.100e-02_jprb,.911e-03_jprb,.911e-03_jprb,.794e-03_jprb,.794e-03_jprb,.687e-03_jprb,&
644 &.687e-03_jprb,.582e-03_jprb,.582e-03_jprb,.475e-03_jprb,.475e-03_jprb,.422e-03_jprb,.422e-03_jprb,&
645 &.435e-03_jprb,.435e-03_jprb,.403e-03_jprb,.403e-03_jprb,.402e-03_jprb,.402e-03_jprb,.383e-03_jprb,&
646 &.383e-03_jprb,.366e-03_jprb,.366e-03_jprb,.374e-03_jprb,.374e-03_jprb,.386e-03_jprb,.386e-03_jprb,&
647 &.394e-03_jprb,.394e-03_jprb/)
648 !-- Sea Salt Aerosol month: 6 --- lat: 45 -86.0
649 zaer(:,45, 6) = (/&
650 &.421e-03_jprb,.421e-03_jprb,.420e-03_jprb,.420e-03_jprb,.396e-03_jprb,.396e-03_jprb,.405e-03_jprb,&
651 &.405e-03_jprb,.440e-03_jprb,.440e-03_jprb,.489e-03_jprb,.489e-03_jprb,.525e-03_jprb,.525e-03_jprb,&
652 &.564e-03_jprb,.564e-03_jprb,.628e-03_jprb,.628e-03_jprb,.724e-03_jprb,.724e-03_jprb,.843e-03_jprb,&
653 &.843e-03_jprb,.845e-03_jprb,.845e-03_jprb,.684e-03_jprb,.684e-03_jprb,.626e-03_jprb,.626e-03_jprb,&
654 &.691e-03_jprb,.691e-03_jprb,.808e-03_jprb,.808e-03_jprb,.102e-02_jprb,.102e-02_jprb,.130e-02_jprb,&
655 &.130e-02_jprb,.174e-02_jprb,.174e-02_jprb,.176e-02_jprb,.176e-02_jprb,.120e-02_jprb,.120e-02_jprb,&
656 &.100e-02_jprb,.100e-02_jprb,.911e-03_jprb,.911e-03_jprb,.794e-03_jprb,.794e-03_jprb,.687e-03_jprb,&
657 &.687e-03_jprb,.582e-03_jprb,.582e-03_jprb,.475e-03_jprb,.475e-03_jprb,.422e-03_jprb,.422e-03_jprb,&
658 &.435e-03_jprb,.435e-03_jprb,.403e-03_jprb,.403e-03_jprb,.402e-03_jprb,.402e-03_jprb,.383e-03_jprb,&
659 &.383e-03_jprb,.366e-03_jprb,.366e-03_jprb,.374e-03_jprb,.374e-03_jprb,.386e-03_jprb,.386e-03_jprb,&
660 &.394e-03_jprb,.394e-03_jprb/)
661 !-- Sea Salt Aerosol month: 6 --- lat: 46 -90.0
662 zaer(:,46, 6) = (/&
663 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
664 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
665 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
666 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
667 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
668 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
669 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
670 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
671 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
672 &.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,.426e-03_jprb,&
673 &.426e-03_jprb,.426e-03_jprb/)
674 
675 ! ------------------------------------------------------------------
676 
677 !ZMAX=-1.E+8_JPRB
678 !ZMIN= 1.E+8_JPRB
679  jm=6
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_06
!$Id jm
Definition: comconst.h:7
!$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
subroutine suecaess_06
Definition: suecaess_06.F90:2