suecaebc_05.F90

Go to the documentation of this file.

SUBROUTINE suecaebc_05

!**   OPTICAL THICKNESS OF BLACK CARBON AEROSOLS (URBAN/FOREST FIRE ORIGIN)
!                                                 May

!     PURPOSE.
!     --------

!**   INTERFACE.
!     ----------
!        CALL *SUECAEBC* FROM *SUECRAD*

!        EXPLICIT ARGUMENTS :
!        --------------------
!     ==== INPUTS ===
!     ==== OUTPUTS ===

!        IMPLICIT ARGUMENTS :   NONE
!        --------------------

!     METHOD.
!     -------


!     EXTERNALS.
!     ----------

!          NONE

!     REFERENCE.
!     ----------

!        SEE RADIATION'S PART OF THE MODEL'S DOCUMENTATION AND
!        ECMWF RESEARCH DEPARTMENT DOCUMENTATION OF THE "I.F.S"

!     AUTHOR.
!     -------
!     J.-J. MORCRETTE  E.C.M.W.F.    98/12/21

!     MODIFICATIONS.
!     --------------
!     H. GALLEE        L.G.G.E.      04/01/15:  split for the NEC SX5

!-----------------------------------------------------------------------

#include "tsmbkind.h"

USE yoeaerc  , ONLY : raerbc


IMPLICIT NONE


!     -----------------------------------------------------------------

!*       0.1   ARGUMENTS.
!              ----------

!     ----------------------------------------------------------------- 

!*       0.2   LOCAL ARRAYS.
!              -------------

real_b :: zaer(72,46,5:5)

!     LOCAL INTEGER SCALARS
integer_m :: ji, jl, jm

!     LOCAL REAL SCALARS
real_b :: zmax, zmin

!     ------------------------------------------------------------------

!-- Tegen et al., 1997

!-- Black Carbon Aerosol     month:  5 --- lat:  1  90.0
zaer(:, 1, 5) = (/&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,.795e-04_jprb,&
&.795e-04_jprb,.795e-04_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  2  86.0
zaer(:, 2, 5) = (/&
&.809e-04_jprb,.809e-04_jprb,.813e-04_jprb,.816e-04_jprb,.818e-04_jprb,.820e-04_jprb,.822e-04_jprb,&
&.824e-04_jprb,.825e-04_jprb,.826e-04_jprb,.827e-04_jprb,.828e-04_jprb,.828e-04_jprb,.829e-04_jprb,&
&.829e-04_jprb,.829e-04_jprb,.828e-04_jprb,.828e-04_jprb,.828e-04_jprb,.828e-04_jprb,.827e-04_jprb,&
&.826e-04_jprb,.826e-04_jprb,.825e-04_jprb,.823e-04_jprb,.822e-04_jprb,.821e-04_jprb,.818e-04_jprb,&
&.816e-04_jprb,.815e-04_jprb,.811e-04_jprb,.808e-04_jprb,.805e-04_jprb,.800e-04_jprb,.796e-04_jprb,&
&.792e-04_jprb,.788e-04_jprb,.783e-04_jprb,.780e-04_jprb,.776e-04_jprb,.771e-04_jprb,.769e-04_jprb,&
&.766e-04_jprb,.762e-04_jprb,.761e-04_jprb,.759e-04_jprb,.756e-04_jprb,.755e-04_jprb,.754e-04_jprb,&
&.754e-04_jprb,.753e-04_jprb,.753e-04_jprb,.754e-04_jprb,.754e-04_jprb,.755e-04_jprb,.757e-04_jprb,&
&.759e-04_jprb,.761e-04_jprb,.763e-04_jprb,.766e-04_jprb,.769e-04_jprb,.772e-04_jprb,.775e-04_jprb,&
&.778e-04_jprb,.782e-04_jprb,.786e-04_jprb,.789e-04_jprb,.793e-04_jprb,.798e-04_jprb,.801e-04_jprb,&
&.804e-04_jprb,.808e-04_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  3  82.0
zaer(:, 3, 5) = (/&
&.840e-04_jprb,.840e-04_jprb,.851e-04_jprb,.857e-04_jprb,.862e-04_jprb,.868e-04_jprb,.871e-04_jprb,&
&.873e-04_jprb,.875e-04_jprb,.876e-04_jprb,.877e-04_jprb,.877e-04_jprb,.876e-04_jprb,.876e-04_jprb,&
&.875e-04_jprb,.875e-04_jprb,.875e-04_jprb,.875e-04_jprb,.877e-04_jprb,.878e-04_jprb,.880e-04_jprb,&
&.884e-04_jprb,.887e-04_jprb,.890e-04_jprb,.895e-04_jprb,.897e-04_jprb,.898e-04_jprb,.898e-04_jprb,&
&.895e-04_jprb,.892e-04_jprb,.883e-04_jprb,.873e-04_jprb,.865e-04_jprb,.850e-04_jprb,.835e-04_jprb,&
&.824e-04_jprb,.809e-04_jprb,.793e-04_jprb,.783e-04_jprb,.771e-04_jprb,.758e-04_jprb,.750e-04_jprb,&
&.742e-04_jprb,.733e-04_jprb,.729e-04_jprb,.724e-04_jprb,.719e-04_jprb,.716e-04_jprb,.714e-04_jprb,&
&.712e-04_jprb,.711e-04_jprb,.710e-04_jprb,.710e-04_jprb,.710e-04_jprb,.711e-04_jprb,.713e-04_jprb,&
&.716e-04_jprb,.719e-04_jprb,.723e-04_jprb,.729e-04_jprb,.734e-04_jprb,.741e-04_jprb,.749e-04_jprb,&
&.756e-04_jprb,.765e-04_jprb,.777e-04_jprb,.785e-04_jprb,.795e-04_jprb,.809e-04_jprb,.817e-04_jprb,&
&.825e-04_jprb,.839e-04_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  4  78.0
zaer(:, 4, 5) = (/&
&.890e-04_jprb,.891e-04_jprb,.910e-04_jprb,.917e-04_jprb,.924e-04_jprb,.930e-04_jprb,.930e-04_jprb,&
&.929e-04_jprb,.926e-04_jprb,.922e-04_jprb,.920e-04_jprb,.916e-04_jprb,.912e-04_jprb,.910e-04_jprb,&
&.908e-04_jprb,.907e-04_jprb,.908e-04_jprb,.909e-04_jprb,.915e-04_jprb,.922e-04_jprb,.930e-04_jprb,&
&.948e-04_jprb,.961e-04_jprb,.975e-04_jprb,.100e-03_jprb,.101e-03_jprb,.102e-03_jprb,.103e-03_jprb,&
&.103e-03_jprb,.103e-03_jprb,.102e-03_jprb,.100e-03_jprb,.984e-04_jprb,.955e-04_jprb,.926e-04_jprb,&
&.904e-04_jprb,.872e-04_jprb,.843e-04_jprb,.825e-04_jprb,.802e-04_jprb,.782e-04_jprb,.771e-04_jprb,&
&.760e-04_jprb,.749e-04_jprb,.745e-04_jprb,.740e-04_jprb,.736e-04_jprb,.734e-04_jprb,.732e-04_jprb,&
&.729e-04_jprb,.726e-04_jprb,.724e-04_jprb,.718e-04_jprb,.714e-04_jprb,.711e-04_jprb,.708e-04_jprb,&
&.706e-04_jprb,.706e-04_jprb,.707e-04_jprb,.711e-04_jprb,.715e-04_jprb,.722e-04_jprb,.733e-04_jprb,&
&.742e-04_jprb,.755e-04_jprb,.776e-04_jprb,.791e-04_jprb,.808e-04_jprb,.835e-04_jprb,.850e-04_jprb,&
&.865e-04_jprb,.890e-04_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  5  74.0
zaer(:, 5, 5) = (/&
&.973e-04_jprb,.974e-04_jprb,.994e-04_jprb,.100e-03_jprb,.101e-03_jprb,.100e-03_jprb,.996e-04_jprb,&
&.989e-04_jprb,.973e-04_jprb,.962e-04_jprb,.955e-04_jprb,.946e-04_jprb,.940e-04_jprb,.937e-04_jprb,&
&.934e-04_jprb,.934e-04_jprb,.935e-04_jprb,.937e-04_jprb,.946e-04_jprb,.955e-04_jprb,.967e-04_jprb,&
&.997e-04_jprb,.102e-03_jprb,.104e-03_jprb,.109e-03_jprb,.111e-03_jprb,.113e-03_jprb,.115e-03_jprb,&
&.116e-03_jprb,.116e-03_jprb,.115e-03_jprb,.113e-03_jprb,.111e-03_jprb,.106e-03_jprb,.102e-03_jprb,&
&.992e-04_jprb,.948e-04_jprb,.910e-04_jprb,.887e-04_jprb,.860e-04_jprb,.841e-04_jprb,.833e-04_jprb,&
&.825e-04_jprb,.822e-04_jprb,.823e-04_jprb,.825e-04_jprb,.832e-04_jprb,.835e-04_jprb,.838e-04_jprb,&
&.837e-04_jprb,.831e-04_jprb,.825e-04_jprb,.808e-04_jprb,.794e-04_jprb,.782e-04_jprb,.763e-04_jprb,&
&.751e-04_jprb,.742e-04_jprb,.733e-04_jprb,.732e-04_jprb,.733e-04_jprb,.737e-04_jprb,.749e-04_jprb,&
&.760e-04_jprb,.778e-04_jprb,.808e-04_jprb,.829e-04_jprb,.855e-04_jprb,.895e-04_jprb,.917e-04_jprb,&
&.940e-04_jprb,.972e-04_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  6  70.0
zaer(:, 6, 5) = (/&
&.113e-03_jprb,.113e-03_jprb,.113e-03_jprb,.113e-03_jprb,.113e-03_jprb,.111e-03_jprb,.109e-03_jprb,&
&.107e-03_jprb,.104e-03_jprb,.102e-03_jprb,.101e-03_jprb,.100e-03_jprb,.996e-04_jprb,.995e-04_jprb,&
&.995e-04_jprb,.998e-04_jprb,.100e-03_jprb,.101e-03_jprb,.101e-03_jprb,.101e-03_jprb,.102e-03_jprb,&
&.104e-03_jprb,.106e-03_jprb,.108e-03_jprb,.112e-03_jprb,.114e-03_jprb,.116e-03_jprb,.120e-03_jprb,&
&.121e-03_jprb,.122e-03_jprb,.122e-03_jprb,.121e-03_jprb,.119e-03_jprb,.115e-03_jprb,.111e-03_jprb,&
&.108e-03_jprb,.103e-03_jprb,.996e-04_jprb,.976e-04_jprb,.955e-04_jprb,.946e-04_jprb,.945e-04_jprb,&
&.947e-04_jprb,.961e-04_jprb,.972e-04_jprb,.986e-04_jprb,.101e-03_jprb,.103e-03_jprb,.104e-03_jprb,&
&.104e-03_jprb,.103e-03_jprb,.102e-03_jprb,.977e-04_jprb,.948e-04_jprb,.922e-04_jprb,.880e-04_jprb,&
&.855e-04_jprb,.837e-04_jprb,.819e-04_jprb,.813e-04_jprb,.813e-04_jprb,.819e-04_jprb,.840e-04_jprb,&
&.859e-04_jprb,.889e-04_jprb,.935e-04_jprb,.965e-04_jprb,.100e-03_jprb,.105e-03_jprb,.108e-03_jprb,&
&.111e-03_jprb,.113e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  7  66.0
zaer(:, 7, 5) = (/&
&.142e-03_jprb,.142e-03_jprb,.138e-03_jprb,.136e-03_jprb,.134e-03_jprb,.128e-03_jprb,.124e-03_jprb,&
&.121e-03_jprb,.115e-03_jprb,.112e-03_jprb,.110e-03_jprb,.109e-03_jprb,.109e-03_jprb,.109e-03_jprb,&
&.110e-03_jprb,.111e-03_jprb,.111e-03_jprb,.112e-03_jprb,.112e-03_jprb,.111e-03_jprb,.111e-03_jprb,&
&.110e-03_jprb,.110e-03_jprb,.110e-03_jprb,.112e-03_jprb,.114e-03_jprb,.116e-03_jprb,.119e-03_jprb,&
&.121e-03_jprb,.122e-03_jprb,.124e-03_jprb,.125e-03_jprb,.125e-03_jprb,.125e-03_jprb,.123e-03_jprb,&
&.121e-03_jprb,.117e-03_jprb,.115e-03_jprb,.113e-03_jprb,.113e-03_jprb,.113e-03_jprb,.114e-03_jprb,&
&.115e-03_jprb,.118e-03_jprb,.121e-03_jprb,.123e-03_jprb,.128e-03_jprb,.130e-03_jprb,.132e-03_jprb,&
&.133e-03_jprb,.130e-03_jprb,.127e-03_jprb,.119e-03_jprb,.115e-03_jprb,.110e-03_jprb,.104e-03_jprb,&
&.101e-03_jprb,.992e-04_jprb,.976e-04_jprb,.975e-04_jprb,.980e-04_jprb,.994e-04_jprb,.104e-03_jprb,&
&.108e-03_jprb,.115e-03_jprb,.123e-03_jprb,.128e-03_jprb,.133e-03_jprb,.139e-03_jprb,.141e-03_jprb,&
&.144e-03_jprb,.142e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  8  62.0
zaer(:, 8, 5) = (/&
&.188e-03_jprb,.188e-03_jprb,.177e-03_jprb,.172e-03_jprb,.168e-03_jprb,.159e-03_jprb,.150e-03_jprb,&
&.143e-03_jprb,.133e-03_jprb,.127e-03_jprb,.123e-03_jprb,.121e-03_jprb,.122e-03_jprb,.122e-03_jprb,&
&.122e-03_jprb,.123e-03_jprb,.124e-03_jprb,.125e-03_jprb,.125e-03_jprb,.124e-03_jprb,.122e-03_jprb,&
&.120e-03_jprb,.119e-03_jprb,.118e-03_jprb,.117e-03_jprb,.117e-03_jprb,.116e-03_jprb,.119e-03_jprb,&
&.121e-03_jprb,.123e-03_jprb,.127e-03_jprb,.132e-03_jprb,.135e-03_jprb,.142e-03_jprb,.144e-03_jprb,&
&.144e-03_jprb,.141e-03_jprb,.140e-03_jprb,.140e-03_jprb,.138e-03_jprb,.138e-03_jprb,.139e-03_jprb,&
&.141e-03_jprb,.145e-03_jprb,.148e-03_jprb,.151e-03_jprb,.159e-03_jprb,.163e-03_jprb,.168e-03_jprb,&
&.169e-03_jprb,.163e-03_jprb,.158e-03_jprb,.145e-03_jprb,.137e-03_jprb,.131e-03_jprb,.124e-03_jprb,&
&.122e-03_jprb,.122e-03_jprb,.123e-03_jprb,.124e-03_jprb,.125e-03_jprb,.127e-03_jprb,.136e-03_jprb,&
&.144e-03_jprb,.156e-03_jprb,.172e-03_jprb,.180e-03_jprb,.188e-03_jprb,.196e-03_jprb,.196e-03_jprb,&
&.196e-03_jprb,.188e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat:  9  58.0
zaer(:, 9, 5) = (/&
&.239e-03_jprb,.239e-03_jprb,.231e-03_jprb,.226e-03_jprb,.221e-03_jprb,.206e-03_jprb,.193e-03_jprb,&
&.181e-03_jprb,.165e-03_jprb,.155e-03_jprb,.148e-03_jprb,.142e-03_jprb,.142e-03_jprb,.141e-03_jprb,&
&.141e-03_jprb,.138e-03_jprb,.137e-03_jprb,.136e-03_jprb,.136e-03_jprb,.135e-03_jprb,.135e-03_jprb,&
&.137e-03_jprb,.137e-03_jprb,.137e-03_jprb,.134e-03_jprb,.132e-03_jprb,.130e-03_jprb,.131e-03_jprb,&
&.137e-03_jprb,.142e-03_jprb,.152e-03_jprb,.160e-03_jprb,.166e-03_jprb,.175e-03_jprb,.179e-03_jprb,&
&.180e-03_jprb,.177e-03_jprb,.171e-03_jprb,.167e-03_jprb,.161e-03_jprb,.157e-03_jprb,.158e-03_jprb,&
&.160e-03_jprb,.168e-03_jprb,.174e-03_jprb,.182e-03_jprb,.197e-03_jprb,.204e-03_jprb,.211e-03_jprb,&
&.211e-03_jprb,.202e-03_jprb,.194e-03_jprb,.176e-03_jprb,.164e-03_jprb,.155e-03_jprb,.146e-03_jprb,&
&.149e-03_jprb,.152e-03_jprb,.159e-03_jprb,.162e-03_jprb,.164e-03_jprb,.167e-03_jprb,.185e-03_jprb,&
&.202e-03_jprb,.230e-03_jprb,.247e-03_jprb,.249e-03_jprb,.248e-03_jprb,.252e-03_jprb,.250e-03_jprb,&
&.246e-03_jprb,.239e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 10  54.0
zaer(:,10, 5) = (/&
&.292e-03_jprb,.291e-03_jprb,.278e-03_jprb,.275e-03_jprb,.271e-03_jprb,.260e-03_jprb,.242e-03_jprb,&
&.226e-03_jprb,.200e-03_jprb,.185e-03_jprb,.176e-03_jprb,.166e-03_jprb,.165e-03_jprb,.163e-03_jprb,&
&.160e-03_jprb,.155e-03_jprb,.152e-03_jprb,.148e-03_jprb,.145e-03_jprb,.145e-03_jprb,.145e-03_jprb,&
&.150e-03_jprb,.154e-03_jprb,.158e-03_jprb,.161e-03_jprb,.162e-03_jprb,.163e-03_jprb,.175e-03_jprb,&
&.192e-03_jprb,.206e-03_jprb,.222e-03_jprb,.227e-03_jprb,.230e-03_jprb,.233e-03_jprb,.230e-03_jprb,&
&.227e-03_jprb,.220e-03_jprb,.202e-03_jprb,.189e-03_jprb,.172e-03_jprb,.164e-03_jprb,.163e-03_jprb,&
&.166e-03_jprb,.181e-03_jprb,.193e-03_jprb,.208e-03_jprb,.235e-03_jprb,.243e-03_jprb,.249e-03_jprb,&
&.239e-03_jprb,.227e-03_jprb,.216e-03_jprb,.197e-03_jprb,.183e-03_jprb,.172e-03_jprb,.160e-03_jprb,&
&.161e-03_jprb,.163e-03_jprb,.174e-03_jprb,.182e-03_jprb,.188e-03_jprb,.198e-03_jprb,.225e-03_jprb,&
&.252e-03_jprb,.296e-03_jprb,.316e-03_jprb,.314e-03_jprb,.304e-03_jprb,.299e-03_jprb,.300e-03_jprb,&
&.301e-03_jprb,.292e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 11  50.0
zaer(:,11, 5) = (/&
&.344e-03_jprb,.343e-03_jprb,.307e-03_jprb,.302e-03_jprb,.298e-03_jprb,.293e-03_jprb,.274e-03_jprb,&
&.258e-03_jprb,.227e-03_jprb,.212e-03_jprb,.202e-03_jprb,.192e-03_jprb,.188e-03_jprb,.185e-03_jprb,&
&.182e-03_jprb,.178e-03_jprb,.174e-03_jprb,.168e-03_jprb,.161e-03_jprb,.159e-03_jprb,.157e-03_jprb,&
&.161e-03_jprb,.166e-03_jprb,.172e-03_jprb,.185e-03_jprb,.198e-03_jprb,.212e-03_jprb,.263e-03_jprb,&
&.297e-03_jprb,.325e-03_jprb,.350e-03_jprb,.346e-03_jprb,.342e-03_jprb,.331e-03_jprb,.315e-03_jprb,&
&.299e-03_jprb,.269e-03_jprb,.236e-03_jprb,.214e-03_jprb,.183e-03_jprb,.172e-03_jprb,.172e-03_jprb,&
&.177e-03_jprb,.199e-03_jprb,.218e-03_jprb,.240e-03_jprb,.276e-03_jprb,.279e-03_jprb,.279e-03_jprb,&
&.257e-03_jprb,.241e-03_jprb,.226e-03_jprb,.206e-03_jprb,.192e-03_jprb,.180e-03_jprb,.164e-03_jprb,&
&.161e-03_jprb,.162e-03_jprb,.169e-03_jprb,.180e-03_jprb,.191e-03_jprb,.210e-03_jprb,.242e-03_jprb,&
&.275e-03_jprb,.325e-03_jprb,.372e-03_jprb,.382e-03_jprb,.384e-03_jprb,.361e-03_jprb,.359e-03_jprb,&
&.360e-03_jprb,.345e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 12  46.0
zaer(:,12, 5) = (/&
&.384e-03_jprb,.381e-03_jprb,.317e-03_jprb,.310e-03_jprb,.304e-03_jprb,.302e-03_jprb,.291e-03_jprb,&
&.280e-03_jprb,.253e-03_jprb,.237e-03_jprb,.228e-03_jprb,.219e-03_jprb,.212e-03_jprb,.209e-03_jprb,&
&.208e-03_jprb,.206e-03_jprb,.202e-03_jprb,.192e-03_jprb,.182e-03_jprb,.178e-03_jprb,.174e-03_jprb,&
&.175e-03_jprb,.182e-03_jprb,.190e-03_jprb,.218e-03_jprb,.248e-03_jprb,.281e-03_jprb,.378e-03_jprb,&
&.428e-03_jprb,.469e-03_jprb,.514e-03_jprb,.504e-03_jprb,.489e-03_jprb,.448e-03_jprb,.410e-03_jprb,&
&.378e-03_jprb,.324e-03_jprb,.274e-03_jprb,.244e-03_jprb,.210e-03_jprb,.197e-03_jprb,.199e-03_jprb,&
&.208e-03_jprb,.238e-03_jprb,.265e-03_jprb,.297e-03_jprb,.346e-03_jprb,.342e-03_jprb,.335e-03_jprb,&
&.289e-03_jprb,.264e-03_jprb,.240e-03_jprb,.211e-03_jprb,.198e-03_jprb,.187e-03_jprb,.169e-03_jprb,&
&.165e-03_jprb,.165e-03_jprb,.171e-03_jprb,.182e-03_jprb,.195e-03_jprb,.217e-03_jprb,.256e-03_jprb,&
&.294e-03_jprb,.354e-03_jprb,.432e-03_jprb,.465e-03_jprb,.495e-03_jprb,.457e-03_jprb,.440e-03_jprb,&
&.424e-03_jprb,.385e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 13  42.0
zaer(:,13, 5) = (/&
&.443e-03_jprb,.440e-03_jprb,.344e-03_jprb,.329e-03_jprb,.317e-03_jprb,.311e-03_jprb,.307e-03_jprb,&
&.301e-03_jprb,.278e-03_jprb,.263e-03_jprb,.254e-03_jprb,.247e-03_jprb,.239e-03_jprb,.235e-03_jprb,&
&.233e-03_jprb,.231e-03_jprb,.226e-03_jprb,.216e-03_jprb,.204e-03_jprb,.198e-03_jprb,.192e-03_jprb,&
&.195e-03_jprb,.209e-03_jprb,.225e-03_jprb,.295e-03_jprb,.366e-03_jprb,.437e-03_jprb,.552e-03_jprb,&
&.592e-03_jprb,.631e-03_jprb,.706e-03_jprb,.678e-03_jprb,.646e-03_jprb,.572e-03_jprb,.497e-03_jprb,&
&.442e-03_jprb,.365e-03_jprb,.320e-03_jprb,.296e-03_jprb,.271e-03_jprb,.265e-03_jprb,.273e-03_jprb,&
&.291e-03_jprb,.331e-03_jprb,.371e-03_jprb,.420e-03_jprb,.477e-03_jprb,.464e-03_jprb,.446e-03_jprb,&
&.364e-03_jprb,.320e-03_jprb,.279e-03_jprb,.232e-03_jprb,.215e-03_jprb,.201e-03_jprb,.188e-03_jprb,&
&.183e-03_jprb,.182e-03_jprb,.189e-03_jprb,.199e-03_jprb,.212e-03_jprb,.236e-03_jprb,.291e-03_jprb,&
&.345e-03_jprb,.431e-03_jprb,.532e-03_jprb,.578e-03_jprb,.624e-03_jprb,.567e-03_jprb,.539e-03_jprb,&
&.510e-03_jprb,.445e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 14  38.0
zaer(:,14, 5) = (/&
&.519e-03_jprb,.516e-03_jprb,.419e-03_jprb,.391e-03_jprb,.366e-03_jprb,.340e-03_jprb,.333e-03_jprb,&
&.325e-03_jprb,.302e-03_jprb,.289e-03_jprb,.281e-03_jprb,.272e-03_jprb,.266e-03_jprb,.263e-03_jprb,&
&.258e-03_jprb,.253e-03_jprb,.246e-03_jprb,.237e-03_jprb,.224e-03_jprb,.218e-03_jprb,.212e-03_jprb,&
&.227e-03_jprb,.259e-03_jprb,.294e-03_jprb,.470e-03_jprb,.637e-03_jprb,.794e-03_jprb,.884e-03_jprb,&
&.914e-03_jprb,.944e-03_jprb,.100e-02_jprb,.939e-03_jprb,.874e-03_jprb,.730e-03_jprb,.599e-03_jprb,&
&.516e-03_jprb,.424e-03_jprb,.396e-03_jprb,.388e-03_jprb,.390e-03_jprb,.416e-03_jprb,.445e-03_jprb,&
&.490e-03_jprb,.543e-03_jprb,.598e-03_jprb,.666e-03_jprb,.689e-03_jprb,.643e-03_jprb,.591e-03_jprb,&
&.483e-03_jprb,.416e-03_jprb,.353e-03_jprb,.284e-03_jprb,.260e-03_jprb,.243e-03_jprb,.233e-03_jprb,&
&.227e-03_jprb,.226e-03_jprb,.234e-03_jprb,.248e-03_jprb,.265e-03_jprb,.298e-03_jprb,.397e-03_jprb,&
&.485e-03_jprb,.616e-03_jprb,.740e-03_jprb,.801e-03_jprb,.866e-03_jprb,.743e-03_jprb,.682e-03_jprb,&
&.619e-03_jprb,.522e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 15  34.0
zaer(:,15, 5) = (/&
&.612e-03_jprb,.609e-03_jprb,.515e-03_jprb,.479e-03_jprb,.445e-03_jprb,.397e-03_jprb,.376e-03_jprb,&
&.360e-03_jprb,.337e-03_jprb,.323e-03_jprb,.313e-03_jprb,.302e-03_jprb,.293e-03_jprb,.288e-03_jprb,&
&.283e-03_jprb,.273e-03_jprb,.265e-03_jprb,.256e-03_jprb,.245e-03_jprb,.241e-03_jprb,.238e-03_jprb,&
&.284e-03_jprb,.348e-03_jprb,.419e-03_jprb,.817e-03_jprb,.117e-02_jprb,.150e-02_jprb,.162e-02_jprb,&
&.156e-02_jprb,.149e-02_jprb,.132e-02_jprb,.118e-02_jprb,.106e-02_jprb,.866e-03_jprb,.694e-03_jprb,&
&.595e-03_jprb,.507e-03_jprb,.524e-03_jprb,.556e-03_jprb,.620e-03_jprb,.725e-03_jprb,.820e-03_jprb,&
&.951e-03_jprb,.969e-03_jprb,.986e-03_jprb,.101e-02_jprb,.933e-03_jprb,.852e-03_jprb,.767e-03_jprb,&
&.641e-03_jprb,.548e-03_jprb,.463e-03_jprb,.372e-03_jprb,.347e-03_jprb,.328e-03_jprb,.315e-03_jprb,&
&.308e-03_jprb,.307e-03_jprb,.322e-03_jprb,.347e-03_jprb,.387e-03_jprb,.473e-03_jprb,.739e-03_jprb,&
&.917e-03_jprb,.115e-02_jprb,.124e-02_jprb,.125e-02_jprb,.122e-02_jprb,.949e-03_jprb,.838e-03_jprb,&
&.731e-03_jprb,.616e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 16  30.0
zaer(:,16, 5) = (/&
&.710e-03_jprb,.706e-03_jprb,.598e-03_jprb,.558e-03_jprb,.521e-03_jprb,.465e-03_jprb,.433e-03_jprb,&
&.410e-03_jprb,.388e-03_jprb,.367e-03_jprb,.353e-03_jprb,.336e-03_jprb,.318e-03_jprb,.309e-03_jprb,&
&.302e-03_jprb,.289e-03_jprb,.281e-03_jprb,.272e-03_jprb,.269e-03_jprb,.272e-03_jprb,.277e-03_jprb,&
&.382e-03_jprb,.498e-03_jprb,.625e-03_jprb,.156e-02_jprb,.239e-02_jprb,.315e-02_jprb,.310e-02_jprb,&
&.262e-02_jprb,.220e-02_jprb,.162e-02_jprb,.135e-02_jprb,.116e-02_jprb,.944e-03_jprb,.767e-03_jprb,&
&.676e-03_jprb,.622e-03_jprb,.738e-03_jprb,.873e-03_jprb,.111e-02_jprb,.150e-02_jprb,.170e-02_jprb,&
&.192e-02_jprb,.170e-02_jprb,.154e-02_jprb,.135e-02_jprb,.109e-02_jprb,.997e-03_jprb,.908e-03_jprb,&
&.800e-03_jprb,.695e-03_jprb,.599e-03_jprb,.491e-03_jprb,.465e-03_jprb,.445e-03_jprb,.426e-03_jprb,&
&.423e-03_jprb,.428e-03_jprb,.454e-03_jprb,.510e-03_jprb,.631e-03_jprb,.919e-03_jprb,.171e-02_jprb,&
&.211e-02_jprb,.252e-02_jprb,.226e-02_jprb,.200e-02_jprb,.165e-02_jprb,.116e-02_jprb,.993e-03_jprb,&
&.844e-03_jprb,.714e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 17  26.0
zaer(:,17, 5) = (/&
&.777e-03_jprb,.773e-03_jprb,.648e-03_jprb,.605e-03_jprb,.566e-03_jprb,.517e-03_jprb,.484e-03_jprb,&
&.460e-03_jprb,.435e-03_jprb,.410e-03_jprb,.391e-03_jprb,.367e-03_jprb,.343e-03_jprb,.331e-03_jprb,&
&.321e-03_jprb,.307e-03_jprb,.300e-03_jprb,.294e-03_jprb,.312e-03_jprb,.329e-03_jprb,.349e-03_jprb,&
&.530e-03_jprb,.761e-03_jprb,.102e-02_jprb,.322e-02_jprb,.495e-02_jprb,.646e-02_jprb,.527e-02_jprb,&
&.405e-02_jprb,.304e-02_jprb,.191e-02_jprb,.149e-02_jprb,.121e-02_jprb,.966e-03_jprb,.820e-03_jprb,&
&.770e-03_jprb,.809e-03_jprb,.111e-02_jprb,.146e-02_jprb,.208e-02_jprb,.296e-02_jprb,.321e-02_jprb,&
&.335e-02_jprb,.254e-02_jprb,.209e-02_jprb,.161e-02_jprb,.116e-02_jprb,.105e-02_jprb,.956e-03_jprb,&
&.892e-03_jprb,.800e-03_jprb,.713e-03_jprb,.616e-03_jprb,.592e-03_jprb,.574e-03_jprb,.557e-03_jprb,&
&.562e-03_jprb,.576e-03_jprb,.626e-03_jprb,.763e-03_jprb,.108e-02_jprb,.185e-02_jprb,.369e-02_jprb,&
&.449e-02_jprb,.514e-02_jprb,.373e-02_jprb,.294e-02_jprb,.204e-02_jprb,.137e-02_jprb,.114e-02_jprb,&
&.934e-03_jprb,.782e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 18  22.0
zaer(:,18, 5) = (/&
&.778e-03_jprb,.774e-03_jprb,.651e-03_jprb,.612e-03_jprb,.577e-03_jprb,.537e-03_jprb,.510e-03_jprb,&
&.487e-03_jprb,.456e-03_jprb,.435e-03_jprb,.419e-03_jprb,.396e-03_jprb,.376e-03_jprb,.365e-03_jprb,&
&.354e-03_jprb,.342e-03_jprb,.341e-03_jprb,.346e-03_jprb,.412e-03_jprb,.460e-03_jprb,.519e-03_jprb,&
&.869e-03_jprb,.139e-02_jprb,.197e-02_jprb,.625e-02_jprb,.875e-02_jprb,.108e-01_jprb,.759e-02_jprb,&
&.556e-02_jprb,.388e-02_jprb,.211e-02_jprb,.157e-02_jprb,.121e-02_jprb,.957e-03_jprb,.883e-03_jprb,&
&.908e-03_jprb,.109e-02_jprb,.165e-02_jprb,.224e-02_jprb,.326e-02_jprb,.443e-02_jprb,.459e-02_jprb,&
&.444e-02_jprb,.304e-02_jprb,.244e-02_jprb,.184e-02_jprb,.126e-02_jprb,.109e-02_jprb,.949e-03_jprb,&
&.905e-03_jprb,.839e-03_jprb,.778e-03_jprb,.721e-03_jprb,.706e-03_jprb,.695e-03_jprb,.687e-03_jprb,&
&.706e-03_jprb,.747e-03_jprb,.874e-03_jprb,.120e-02_jprb,.182e-02_jprb,.327e-02_jprb,.622e-02_jprb,&
&.724e-02_jprb,.771e-02_jprb,.477e-02_jprb,.347e-02_jprb,.222e-02_jprb,.146e-02_jprb,.119e-02_jprb,&
&.937e-03_jprb,.783e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 19  18.0
zaer(:,19, 5) = (/&
&.717e-03_jprb,.714e-03_jprb,.614e-03_jprb,.582e-03_jprb,.555e-03_jprb,.522e-03_jprb,.502e-03_jprb,&
&.484e-03_jprb,.452e-03_jprb,.444e-03_jprb,.439e-03_jprb,.432e-03_jprb,.425e-03_jprb,.419e-03_jprb,&
&.409e-03_jprb,.405e-03_jprb,.428e-03_jprb,.475e-03_jprb,.644e-03_jprb,.793e-03_jprb,.979e-03_jprb,&
&.171e-02_jprb,.281e-02_jprb,.403e-02_jprb,.103e-01_jprb,.125e-01_jprb,.142e-01_jprb,.897e-02_jprb,&
&.638e-02_jprb,.424e-02_jprb,.208e-02_jprb,.151e-02_jprb,.116e-02_jprb,.973e-03_jprb,.101e-02_jprb,&
&.113e-02_jprb,.148e-02_jprb,.239e-02_jprb,.315e-02_jprb,.428e-02_jprb,.512e-02_jprb,.507e-02_jprb,&
&.465e-02_jprb,.314e-02_jprb,.258e-02_jprb,.207e-02_jprb,.143e-02_jprb,.118e-02_jprb,.946e-03_jprb,&
&.888e-03_jprb,.851e-03_jprb,.818e-03_jprb,.794e-03_jprb,.788e-03_jprb,.785e-03_jprb,.795e-03_jprb,&
&.860e-03_jprb,.960e-03_jprb,.124e-02_jprb,.186e-02_jprb,.277e-02_jprb,.470e-02_jprb,.768e-02_jprb,&
&.825e-02_jprb,.773e-02_jprb,.430e-02_jprb,.304e-02_jprb,.197e-02_jprb,.129e-02_jprb,.105e-02_jprb,&
&.842e-03_jprb,.721e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 20  14.0
zaer(:,20, 5) = (/&
&.656e-03_jprb,.653e-03_jprb,.565e-03_jprb,.534e-03_jprb,.508e-03_jprb,.484e-03_jprb,.471e-03_jprb,&
&.460e-03_jprb,.444e-03_jprb,.453e-03_jprb,.461e-03_jprb,.477e-03_jprb,.485e-03_jprb,.487e-03_jprb,&
&.486e-03_jprb,.510e-03_jprb,.583e-03_jprb,.716e-03_jprb,.108e-02_jprb,.143e-02_jprb,.189e-02_jprb,&
&.314e-02_jprb,.490e-02_jprb,.686e-02_jprb,.137e-01_jprb,.146e-01_jprb,.149e-01_jprb,.834e-02_jprb,&
&.570e-02_jprb,.357e-02_jprb,.179e-02_jprb,.136e-02_jprb,.111e-02_jprb,.106e-02_jprb,.123e-02_jprb,&
&.147e-02_jprb,.203e-02_jprb,.342e-02_jprb,.437e-02_jprb,.563e-02_jprb,.576e-02_jprb,.539e-02_jprb,&
&.469e-02_jprb,.319e-02_jprb,.265e-02_jprb,.216e-02_jprb,.149e-02_jprb,.121e-02_jprb,.944e-03_jprb,&
&.879e-03_jprb,.864e-03_jprb,.849e-03_jprb,.830e-03_jprb,.829e-03_jprb,.837e-03_jprb,.899e-03_jprb,&
&.108e-02_jprb,.126e-02_jprb,.166e-02_jprb,.252e-02_jprb,.348e-02_jprb,.536e-02_jprb,.691e-02_jprb,&
&.663e-02_jprb,.510e-02_jprb,.280e-02_jprb,.202e-02_jprb,.143e-02_jprb,.100e-02_jprb,.865e-03_jprb,&
&.748e-03_jprb,.659e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 21  10.0
zaer(:,21, 5) = (/&
&.618e-03_jprb,.615e-03_jprb,.525e-03_jprb,.495e-03_jprb,.470e-03_jprb,.451e-03_jprb,.446e-03_jprb,&
&.444e-03_jprb,.453e-03_jprb,.470e-03_jprb,.487e-03_jprb,.520e-03_jprb,.547e-03_jprb,.566e-03_jprb,&
&.592e-03_jprb,.666e-03_jprb,.804e-03_jprb,.104e-02_jprb,.165e-02_jprb,.224e-02_jprb,.297e-02_jprb,&
&.445e-02_jprb,.638e-02_jprb,.851e-02_jprb,.137e-01_jprb,.136e-01_jprb,.130e-01_jprb,.629e-02_jprb,&
&.406e-02_jprb,.234e-02_jprb,.140e-02_jprb,.120e-02_jprb,.111e-02_jprb,.125e-02_jprb,.157e-02_jprb,&
&.193e-02_jprb,.267e-02_jprb,.440e-02_jprb,.564e-02_jprb,.731e-02_jprb,.710e-02_jprb,.628e-02_jprb,&
&.489e-02_jprb,.307e-02_jprb,.248e-02_jprb,.197e-02_jprb,.141e-02_jprb,.118e-02_jprb,.975e-03_jprb,&
&.899e-03_jprb,.877e-03_jprb,.856e-03_jprb,.824e-03_jprb,.839e-03_jprb,.878e-03_jprb,.106e-02_jprb,&
&.142e-02_jprb,.167e-02_jprb,.199e-02_jprb,.281e-02_jprb,.356e-02_jprb,.484e-02_jprb,.486e-02_jprb,&
&.423e-02_jprb,.285e-02_jprb,.174e-02_jprb,.137e-02_jprb,.108e-02_jprb,.859e-03_jprb,.779e-03_jprb,&
&.706e-03_jprb,.621e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 22   6.0
zaer(:,22, 5) = (/&
&.618e-03_jprb,.615e-03_jprb,.519e-03_jprb,.487e-03_jprb,.461e-03_jprb,.449e-03_jprb,.454e-03_jprb,&
&.461e-03_jprb,.479e-03_jprb,.497e-03_jprb,.517e-03_jprb,.560e-03_jprb,.618e-03_jprb,.658e-03_jprb,&
&.713e-03_jprb,.831e-03_jprb,.102e-02_jprb,.135e-02_jprb,.217e-02_jprb,.292e-02_jprb,.387e-02_jprb,&
&.505e-02_jprb,.650e-02_jprb,.809e-02_jprb,.107e-01_jprb,.103e-01_jprb,.972e-02_jprb,.426e-02_jprb,&
&.278e-02_jprb,.165e-02_jprb,.118e-02_jprb,.115e-02_jprb,.119e-02_jprb,.146e-02_jprb,.192e-02_jprb,&
&.235e-02_jprb,.313e-02_jprb,.476e-02_jprb,.612e-02_jprb,.817e-02_jprb,.813e-02_jprb,.707e-02_jprb,&
&.516e-02_jprb,.297e-02_jprb,.231e-02_jprb,.177e-02_jprb,.134e-02_jprb,.117e-02_jprb,.102e-02_jprb,&
&.924e-03_jprb,.880e-03_jprb,.842e-03_jprb,.814e-03_jprb,.864e-03_jprb,.954e-03_jprb,.132e-02_jprb,&
&.174e-02_jprb,.200e-02_jprb,.218e-02_jprb,.269e-02_jprb,.309e-02_jprb,.372e-02_jprb,.322e-02_jprb,&
&.266e-02_jprb,.176e-02_jprb,.125e-02_jprb,.108e-02_jprb,.937e-03_jprb,.813e-03_jprb,.759e-03_jprb,&
&.706e-03_jprb,.621e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 23   2.0
zaer(:,23, 5) = (/&
&.628e-03_jprb,.626e-03_jprb,.544e-03_jprb,.513e-03_jprb,.488e-03_jprb,.477e-03_jprb,.488e-03_jprb,&
&.498e-03_jprb,.517e-03_jprb,.536e-03_jprb,.559e-03_jprb,.613e-03_jprb,.706e-03_jprb,.766e-03_jprb,&
&.839e-03_jprb,.972e-03_jprb,.120e-02_jprb,.157e-02_jprb,.258e-02_jprb,.346e-02_jprb,.454e-02_jprb,&
&.502e-02_jprb,.584e-02_jprb,.676e-02_jprb,.737e-02_jprb,.674e-02_jprb,.599e-02_jprb,.270e-02_jprb,&
&.190e-02_jprb,.129e-02_jprb,.104e-02_jprb,.112e-02_jprb,.123e-02_jprb,.157e-02_jprb,.206e-02_jprb,&
&.250e-02_jprb,.325e-02_jprb,.446e-02_jprb,.553e-02_jprb,.721e-02_jprb,.745e-02_jprb,.670e-02_jprb,&
&.525e-02_jprb,.299e-02_jprb,.228e-02_jprb,.169e-02_jprb,.129e-02_jprb,.117e-02_jprb,.106e-02_jprb,&
&.937e-03_jprb,.890e-03_jprb,.852e-03_jprb,.877e-03_jprb,.950e-03_jprb,.107e-02_jprb,.157e-02_jprb,&
&.190e-02_jprb,.206e-02_jprb,.206e-02_jprb,.231e-02_jprb,.248e-02_jprb,.268e-02_jprb,.220e-02_jprb,&
&.185e-02_jprb,.136e-02_jprb,.107e-02_jprb,.977e-03_jprb,.916e-03_jprb,.822e-03_jprb,.772e-03_jprb,&
&.721e-03_jprb,.631e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 24  -2.0
zaer(:,24, 5) = (/&
&.678e-03_jprb,.675e-03_jprb,.601e-03_jprb,.570e-03_jprb,.544e-03_jprb,.528e-03_jprb,.531e-03_jprb,&
&.537e-03_jprb,.560e-03_jprb,.578e-03_jprb,.605e-03_jprb,.677e-03_jprb,.791e-03_jprb,.860e-03_jprb,&
&.940e-03_jprb,.109e-02_jprb,.136e-02_jprb,.182e-02_jprb,.285e-02_jprb,.361e-02_jprb,.450e-02_jprb,&
&.450e-02_jprb,.478e-02_jprb,.512e-02_jprb,.441e-02_jprb,.371e-02_jprb,.301e-02_jprb,.174e-02_jprb,&
&.138e-02_jprb,.111e-02_jprb,.103e-02_jprb,.113e-02_jprb,.125e-02_jprb,.155e-02_jprb,.197e-02_jprb,&
&.237e-02_jprb,.307e-02_jprb,.374e-02_jprb,.426e-02_jprb,.499e-02_jprb,.515e-02_jprb,.476e-02_jprb,&
&.401e-02_jprb,.254e-02_jprb,.203e-02_jprb,.158e-02_jprb,.128e-02_jprb,.119e-02_jprb,.111e-02_jprb,&
&.995e-03_jprb,.101e-02_jprb,.102e-02_jprb,.108e-02_jprb,.112e-02_jprb,.121e-02_jprb,.168e-02_jprb,&
&.195e-02_jprb,.206e-02_jprb,.197e-02_jprb,.211e-02_jprb,.217e-02_jprb,.217e-02_jprb,.187e-02_jprb,&
&.166e-02_jprb,.136e-02_jprb,.113e-02_jprb,.106e-02_jprb,.102e-02_jprb,.930e-03_jprb,.865e-03_jprb,&
&.794e-03_jprb,.681e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 25  -6.0
zaer(:,25, 5) = (/&
&.821e-03_jprb,.817e-03_jprb,.691e-03_jprb,.662e-03_jprb,.636e-03_jprb,.611e-03_jprb,.612e-03_jprb,&
&.614e-03_jprb,.622e-03_jprb,.641e-03_jprb,.674e-03_jprb,.762e-03_jprb,.857e-03_jprb,.916e-03_jprb,&
&.984e-03_jprb,.122e-02_jprb,.156e-02_jprb,.213e-02_jprb,.297e-02_jprb,.338e-02_jprb,.380e-02_jprb,&
&.385e-02_jprb,.381e-02_jprb,.377e-02_jprb,.265e-02_jprb,.222e-02_jprb,.180e-02_jprb,.134e-02_jprb,&
&.117e-02_jprb,.106e-02_jprb,.111e-02_jprb,.126e-02_jprb,.140e-02_jprb,.172e-02_jprb,.216e-02_jprb,&
&.255e-02_jprb,.323e-02_jprb,.355e-02_jprb,.359e-02_jprb,.346e-02_jprb,.337e-02_jprb,.316e-02_jprb,&
&.280e-02_jprb,.208e-02_jprb,.179e-02_jprb,.152e-02_jprb,.133e-02_jprb,.127e-02_jprb,.122e-02_jprb,&
&.125e-02_jprb,.140e-02_jprb,.153e-02_jprb,.152e-02_jprb,.142e-02_jprb,.141e-02_jprb,.181e-02_jprb,&
&.217e-02_jprb,.235e-02_jprb,.233e-02_jprb,.245e-02_jprb,.249e-02_jprb,.248e-02_jprb,.211e-02_jprb,&
&.190e-02_jprb,.167e-02_jprb,.144e-02_jprb,.136e-02_jprb,.131e-02_jprb,.123e-02_jprb,.113e-02_jprb,&
&.101e-02_jprb,.827e-03_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 26 -10.0
zaer(:,26, 5) = (/&
&.113e-02_jprb,.112e-02_jprb,.929e-03_jprb,.886e-03_jprb,.845e-03_jprb,.775e-03_jprb,.769e-03_jprb,&
&.767e-03_jprb,.781e-03_jprb,.816e-03_jprb,.854e-03_jprb,.934e-03_jprb,.974e-03_jprb,.101e-02_jprb,&
&.107e-02_jprb,.155e-02_jprb,.212e-02_jprb,.301e-02_jprb,.366e-02_jprb,.359e-02_jprb,.333e-02_jprb,&
&.314e-02_jprb,.302e-02_jprb,.290e-02_jprb,.188e-02_jprb,.160e-02_jprb,.135e-02_jprb,.122e-02_jprb,&
&.113e-02_jprb,.108e-02_jprb,.119e-02_jprb,.143e-02_jprb,.168e-02_jprb,.223e-02_jprb,.253e-02_jprb,&
&.283e-02_jprb,.338e-02_jprb,.369e-02_jprb,.361e-02_jprb,.318e-02_jprb,.269e-02_jprb,.250e-02_jprb,&
&.234e-02_jprb,.195e-02_jprb,.175e-02_jprb,.153e-02_jprb,.145e-02_jprb,.145e-02_jprb,.146e-02_jprb,&
&.185e-02_jprb,.223e-02_jprb,.255e-02_jprb,.242e-02_jprb,.211e-02_jprb,.195e-02_jprb,.216e-02_jprb,&
&.291e-02_jprb,.335e-02_jprb,.359e-02_jprb,.346e-02_jprb,.335e-02_jprb,.316e-02_jprb,.269e-02_jprb,&
&.248e-02_jprb,.229e-02_jprb,.199e-02_jprb,.187e-02_jprb,.176e-02_jprb,.176e-02_jprb,.161e-02_jprb,&
&.142e-02_jprb,.114e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 27 -14.0
zaer(:,27, 5) = (/&
&.161e-02_jprb,.160e-02_jprb,.140e-02_jprb,.132e-02_jprb,.123e-02_jprb,.105e-02_jprb,.103e-02_jprb,&
&.103e-02_jprb,.110e-02_jprb,.115e-02_jprb,.119e-02_jprb,.122e-02_jprb,.119e-02_jprb,.123e-02_jprb,&
&.136e-02_jprb,.231e-02_jprb,.328e-02_jprb,.473e-02_jprb,.505e-02_jprb,.442e-02_jprb,.340e-02_jprb,&
&.265e-02_jprb,.247e-02_jprb,.233e-02_jprb,.163e-02_jprb,.145e-02_jprb,.129e-02_jprb,.125e-02_jprb,&
&.121e-02_jprb,.119e-02_jprb,.128e-02_jprb,.152e-02_jprb,.185e-02_jprb,.277e-02_jprb,.282e-02_jprb,&
&.287e-02_jprb,.300e-02_jprb,.344e-02_jprb,.351e-02_jprb,.337e-02_jprb,.269e-02_jprb,.245e-02_jprb,&
&.227e-02_jprb,.196e-02_jprb,.176e-02_jprb,.155e-02_jprb,.163e-02_jprb,.174e-02_jprb,.185e-02_jprb,&
&.279e-02_jprb,.348e-02_jprb,.406e-02_jprb,.399e-02_jprb,.353e-02_jprb,.318e-02_jprb,.283e-02_jprb,&
&.402e-02_jprb,.484e-02_jprb,.577e-02_jprb,.495e-02_jprb,.447e-02_jprb,.396e-02_jprb,.353e-02_jprb,&
&.330e-02_jprb,.307e-02_jprb,.260e-02_jprb,.241e-02_jprb,.225e-02_jprb,.230e-02_jprb,.215e-02_jprb,&
&.196e-02_jprb,.162e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 28 -18.0
zaer(:,28, 5) = (/&
&.224e-02_jprb,.224e-02_jprb,.208e-02_jprb,.192e-02_jprb,.177e-02_jprb,.141e-02_jprb,.137e-02_jprb,&
&.135e-02_jprb,.144e-02_jprb,.150e-02_jprb,.153e-02_jprb,.153e-02_jprb,.152e-02_jprb,.162e-02_jprb,&
&.189e-02_jprb,.300e-02_jprb,.395e-02_jprb,.528e-02_jprb,.542e-02_jprb,.467e-02_jprb,.352e-02_jprb,&
&.246e-02_jprb,.220e-02_jprb,.200e-02_jprb,.159e-02_jprb,.147e-02_jprb,.136e-02_jprb,.133e-02_jprb,&
&.133e-02_jprb,.135e-02_jprb,.143e-02_jprb,.160e-02_jprb,.188e-02_jprb,.278e-02_jprb,.271e-02_jprb,&
&.263e-02_jprb,.245e-02_jprb,.271e-02_jprb,.284e-02_jprb,.297e-02_jprb,.265e-02_jprb,.251e-02_jprb,&
&.240e-02_jprb,.208e-02_jprb,.187e-02_jprb,.164e-02_jprb,.188e-02_jprb,.208e-02_jprb,.229e-02_jprb,&
&.372e-02_jprb,.471e-02_jprb,.558e-02_jprb,.604e-02_jprb,.558e-02_jprb,.509e-02_jprb,.389e-02_jprb,&
&.540e-02_jprb,.671e-02_jprb,.895e-02_jprb,.744e-02_jprb,.642e-02_jprb,.512e-02_jprb,.463e-02_jprb,&
&.432e-02_jprb,.394e-02_jprb,.320e-02_jprb,.293e-02_jprb,.272e-02_jprb,.274e-02_jprb,.262e-02_jprb,&
&.248e-02_jprb,.225e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 29 -22.0
zaer(:,29, 5) = (/&
&.288e-02_jprb,.288e-02_jprb,.272e-02_jprb,.249e-02_jprb,.227e-02_jprb,.180e-02_jprb,.170e-02_jprb,&
&.165e-02_jprb,.174e-02_jprb,.179e-02_jprb,.182e-02_jprb,.183e-02_jprb,.189e-02_jprb,.202e-02_jprb,&
&.230e-02_jprb,.312e-02_jprb,.370e-02_jprb,.446e-02_jprb,.467e-02_jprb,.420e-02_jprb,.345e-02_jprb,&
&.245e-02_jprb,.217e-02_jprb,.192e-02_jprb,.162e-02_jprb,.153e-02_jprb,.144e-02_jprb,.140e-02_jprb,&
&.141e-02_jprb,.144e-02_jprb,.156e-02_jprb,.175e-02_jprb,.197e-02_jprb,.256e-02_jprb,.244e-02_jprb,&
&.232e-02_jprb,.207e-02_jprb,.213e-02_jprb,.224e-02_jprb,.246e-02_jprb,.258e-02_jprb,.265e-02_jprb,&
&.273e-02_jprb,.251e-02_jprb,.231e-02_jprb,.208e-02_jprb,.238e-02_jprb,.261e-02_jprb,.286e-02_jprb,&
&.432e-02_jprb,.534e-02_jprb,.626e-02_jprb,.710e-02_jprb,.664e-02_jprb,.619e-02_jprb,.522e-02_jprb,&
&.763e-02_jprb,.972e-02_jprb,.133e-01_jprb,.111e-01_jprb,.939e-02_jprb,.687e-02_jprb,.590e-02_jprb,&
&.541e-02_jprb,.493e-02_jprb,.399e-02_jprb,.362e-02_jprb,.330e-02_jprb,.317e-02_jprb,.305e-02_jprb,&
&.290e-02_jprb,.288e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 30 -26.0
zaer(:,30, 5) = (/&
&.340e-02_jprb,.340e-02_jprb,.314e-02_jprb,.288e-02_jprb,.262e-02_jprb,.212e-02_jprb,.200e-02_jprb,&
&.194e-02_jprb,.201e-02_jprb,.201e-02_jprb,.202e-02_jprb,.207e-02_jprb,.224e-02_jprb,.236e-02_jprb,&
&.250e-02_jprb,.291e-02_jprb,.323e-02_jprb,.366e-02_jprb,.398e-02_jprb,.379e-02_jprb,.344e-02_jprb,&
&.263e-02_jprb,.235e-02_jprb,.209e-02_jprb,.174e-02_jprb,.161e-02_jprb,.150e-02_jprb,.143e-02_jprb,&
&.144e-02_jprb,.147e-02_jprb,.164e-02_jprb,.194e-02_jprb,.220e-02_jprb,.267e-02_jprb,.249e-02_jprb,&
&.237e-02_jprb,.221e-02_jprb,.226e-02_jprb,.243e-02_jprb,.282e-02_jprb,.319e-02_jprb,.335e-02_jprb,&
&.349e-02_jprb,.341e-02_jprb,.332e-02_jprb,.322e-02_jprb,.336e-02_jprb,.352e-02_jprb,.370e-02_jprb,&
&.487e-02_jprb,.550e-02_jprb,.605e-02_jprb,.620e-02_jprb,.568e-02_jprb,.543e-02_jprb,.598e-02_jprb,&
&.101e-01_jprb,.133e-01_jprb,.182e-01_jprb,.156e-01_jprb,.133e-01_jprb,.948e-02_jprb,.756e-02_jprb,&
&.672e-02_jprb,.603e-02_jprb,.501e-02_jprb,.452e-02_jprb,.403e-02_jprb,.367e-02_jprb,.350e-02_jprb,&
&.332e-02_jprb,.340e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 31 -30.0
zaer(:,31, 5) = (/&
&.373e-02_jprb,.372e-02_jprb,.338e-02_jprb,.309e-02_jprb,.281e-02_jprb,.238e-02_jprb,.225e-02_jprb,&
&.217e-02_jprb,.216e-02_jprb,.210e-02_jprb,.211e-02_jprb,.224e-02_jprb,.248e-02_jprb,.256e-02_jprb,&
&.256e-02_jprb,.270e-02_jprb,.294e-02_jprb,.335e-02_jprb,.377e-02_jprb,.376e-02_jprb,.367e-02_jprb,&
&.304e-02_jprb,.270e-02_jprb,.236e-02_jprb,.191e-02_jprb,.174e-02_jprb,.159e-02_jprb,.149e-02_jprb,&
&.148e-02_jprb,.149e-02_jprb,.169e-02_jprb,.206e-02_jprb,.239e-02_jprb,.300e-02_jprb,.299e-02_jprb,&
&.300e-02_jprb,.303e-02_jprb,.348e-02_jprb,.395e-02_jprb,.472e-02_jprb,.519e-02_jprb,.528e-02_jprb,&
&.526e-02_jprb,.509e-02_jprb,.496e-02_jprb,.482e-02_jprb,.459e-02_jprb,.469e-02_jprb,.483e-02_jprb,&
&.571e-02_jprb,.567e-02_jprb,.556e-02_jprb,.458e-02_jprb,.408e-02_jprb,.402e-02_jprb,.582e-02_jprb,&
&.112e-01_jprb,.153e-01_jprb,.214e-01_jprb,.196e-01_jprb,.174e-01_jprb,.129e-01_jprb,.981e-02_jprb,&
&.840e-02_jprb,.718e-02_jprb,.593e-02_jprb,.530e-02_jprb,.462e-02_jprb,.414e-02_jprb,.393e-02_jprb,&
&.373e-02_jprb,.373e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 32 -34.0
zaer(:,32, 5) = (/&
&.388e-02_jprb,.387e-02_jprb,.352e-02_jprb,.322e-02_jprb,.294e-02_jprb,.257e-02_jprb,.241e-02_jprb,&
&.229e-02_jprb,.216e-02_jprb,.209e-02_jprb,.212e-02_jprb,.234e-02_jprb,.256e-02_jprb,.259e-02_jprb,&
&.244e-02_jprb,.251e-02_jprb,.275e-02_jprb,.320e-02_jprb,.367e-02_jprb,.379e-02_jprb,.387e-02_jprb,&
&.343e-02_jprb,.304e-02_jprb,.262e-02_jprb,.207e-02_jprb,.189e-02_jprb,.172e-02_jprb,.157e-02_jprb,&
&.154e-02_jprb,.154e-02_jprb,.170e-02_jprb,.206e-02_jprb,.243e-02_jprb,.318e-02_jprb,.375e-02_jprb,&
&.419e-02_jprb,.485e-02_jprb,.625e-02_jprb,.717e-02_jprb,.832e-02_jprb,.876e-02_jprb,.878e-02_jprb,&
&.863e-02_jprb,.765e-02_jprb,.708e-02_jprb,.646e-02_jprb,.587e-02_jprb,.602e-02_jprb,.623e-02_jprb,&
&.691e-02_jprb,.626e-02_jprb,.559e-02_jprb,.396e-02_jprb,.352e-02_jprb,.350e-02_jprb,.528e-02_jprb,&
&.102e-01_jprb,.143e-01_jprb,.212e-01_jprb,.211e-01_jprb,.196e-01_jprb,.154e-01_jprb,.116e-01_jprb,&
&.982e-02_jprb,.808e-02_jprb,.643e-02_jprb,.568e-02_jprb,.491e-02_jprb,.440e-02_jprb,.419e-02_jprb,&
&.398e-02_jprb,.389e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 33 -38.0
zaer(:,33, 5) = (/&
&.385e-02_jprb,.384e-02_jprb,.355e-02_jprb,.327e-02_jprb,.301e-02_jprb,.267e-02_jprb,.246e-02_jprb,&
&.229e-02_jprb,.210e-02_jprb,.207e-02_jprb,.212e-02_jprb,.236e-02_jprb,.250e-02_jprb,.246e-02_jprb,&
&.224e-02_jprb,.231e-02_jprb,.253e-02_jprb,.293e-02_jprb,.335e-02_jprb,.351e-02_jprb,.366e-02_jprb,&
&.345e-02_jprb,.315e-02_jprb,.280e-02_jprb,.220e-02_jprb,.200e-02_jprb,.182e-02_jprb,.163e-02_jprb,&
&.158e-02_jprb,.155e-02_jprb,.167e-02_jprb,.203e-02_jprb,.240e-02_jprb,.321e-02_jprb,.451e-02_jprb,&
&.564e-02_jprb,.756e-02_jprb,.105e-01_jprb,.120e-01_jprb,.135e-01_jprb,.136e-01_jprb,.135e-01_jprb,&
&.134e-01_jprb,.114e-01_jprb,.101e-01_jprb,.857e-02_jprb,.751e-02_jprb,.769e-02_jprb,.795e-02_jprb,&
&.845e-02_jprb,.750e-02_jprb,.655e-02_jprb,.479e-02_jprb,.431e-02_jprb,.413e-02_jprb,.504e-02_jprb,&
&.801e-02_jprb,.109e-01_jprb,.167e-01_jprb,.186e-01_jprb,.183e-01_jprb,.151e-01_jprb,.117e-01_jprb,&
&.992e-02_jprb,.809e-02_jprb,.638e-02_jprb,.564e-02_jprb,.493e-02_jprb,.435e-02_jprb,.414e-02_jprb,&
&.394e-02_jprb,.386e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 34 -42.0
zaer(:,34, 5) = (/&
&.360e-02_jprb,.359e-02_jprb,.337e-02_jprb,.315e-02_jprb,.294e-02_jprb,.265e-02_jprb,.243e-02_jprb,&
&.227e-02_jprb,.210e-02_jprb,.209e-02_jprb,.212e-02_jprb,.225e-02_jprb,.230e-02_jprb,.226e-02_jprb,&
&.211e-02_jprb,.217e-02_jprb,.230e-02_jprb,.252e-02_jprb,.277e-02_jprb,.288e-02_jprb,.299e-02_jprb,&
&.304e-02_jprb,.291e-02_jprb,.275e-02_jprb,.221e-02_jprb,.202e-02_jprb,.184e-02_jprb,.165e-02_jprb,&
&.158e-02_jprb,.154e-02_jprb,.166e-02_jprb,.207e-02_jprb,.249e-02_jprb,.343e-02_jprb,.525e-02_jprb,&
&.704e-02_jprb,.104e-01_jprb,.155e-01_jprb,.180e-01_jprb,.205e-01_jprb,.196e-01_jprb,.192e-01_jprb,&
&.189e-01_jprb,.166e-01_jprb,.146e-01_jprb,.121e-01_jprb,.994e-02_jprb,.992e-02_jprb,.100e-01_jprb,&
&.103e-01_jprb,.925e-02_jprb,.825e-02_jprb,.648e-02_jprb,.580e-02_jprb,.533e-02_jprb,.520e-02_jprb,&
&.614e-02_jprb,.736e-02_jprb,.104e-01_jprb,.131e-01_jprb,.137e-01_jprb,.127e-01_jprb,.100e-01_jprb,&
&.861e-02_jprb,.709e-02_jprb,.582e-02_jprb,.524e-02_jprb,.466e-02_jprb,.407e-02_jprb,.385e-02_jprb,&
&.365e-02_jprb,.360e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 35 -46.0
zaer(:,35, 5) = (/&
&.316e-02_jprb,.315e-02_jprb,.298e-02_jprb,.283e-02_jprb,.270e-02_jprb,.249e-02_jprb,.234e-02_jprb,&
&.223e-02_jprb,.211e-02_jprb,.207e-02_jprb,.204e-02_jprb,.203e-02_jprb,.206e-02_jprb,.207e-02_jprb,&
&.205e-02_jprb,.207e-02_jprb,.210e-02_jprb,.214e-02_jprb,.217e-02_jprb,.221e-02_jprb,.225e-02_jprb,&
&.239e-02_jprb,.236e-02_jprb,.231e-02_jprb,.199e-02_jprb,.187e-02_jprb,.177e-02_jprb,.164e-02_jprb,&
&.160e-02_jprb,.159e-02_jprb,.178e-02_jprb,.226e-02_jprb,.278e-02_jprb,.394e-02_jprb,.623e-02_jprb,&
&.856e-02_jprb,.130e-01_jprb,.209e-01_jprb,.252e-01_jprb,.295e-01_jprb,.270e-01_jprb,.258e-01_jprb,&
&.246e-01_jprb,.226e-01_jprb,.199e-01_jprb,.166e-01_jprb,.131e-01_jprb,.125e-01_jprb,.121e-01_jprb,&
&.117e-01_jprb,.108e-01_jprb,.992e-02_jprb,.808e-02_jprb,.712e-02_jprb,.635e-02_jprb,.544e-02_jprb,&
&.529e-02_jprb,.545e-02_jprb,.646e-02_jprb,.812e-02_jprb,.881e-02_jprb,.899e-02_jprb,.765e-02_jprb,&
&.682e-02_jprb,.581e-02_jprb,.500e-02_jprb,.457e-02_jprb,.411e-02_jprb,.363e-02_jprb,.345e-02_jprb,&
&.327e-02_jprb,.316e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 36 -50.0
zaer(:,36, 5) = (/&
&.266e-02_jprb,.266e-02_jprb,.256e-02_jprb,.250e-02_jprb,.243e-02_jprb,.229e-02_jprb,.220e-02_jprb,&
&.213e-02_jprb,.204e-02_jprb,.197e-02_jprb,.192e-02_jprb,.183e-02_jprb,.185e-02_jprb,.189e-02_jprb,&
&.197e-02_jprb,.196e-02_jprb,.193e-02_jprb,.187e-02_jprb,.178e-02_jprb,.174e-02_jprb,.171e-02_jprb,&
&.173e-02_jprb,.173e-02_jprb,.171e-02_jprb,.166e-02_jprb,.165e-02_jprb,.164e-02_jprb,.161e-02_jprb,&
&.165e-02_jprb,.170e-02_jprb,.196e-02_jprb,.253e-02_jprb,.312e-02_jprb,.443e-02_jprb,.718e-02_jprb,&
&.100e-01_jprb,.156e-01_jprb,.254e-01_jprb,.309e-01_jprb,.370e-01_jprb,.330e-01_jprb,.309e-01_jprb,&
&.286e-01_jprb,.268e-01_jprb,.240e-01_jprb,.206e-01_jprb,.157e-01_jprb,.144e-01_jprb,.133e-01_jprb,&
&.120e-01_jprb,.112e-01_jprb,.105e-01_jprb,.876e-02_jprb,.766e-02_jprb,.677e-02_jprb,.567e-02_jprb,&
&.527e-02_jprb,.510e-02_jprb,.523e-02_jprb,.566e-02_jprb,.582e-02_jprb,.582e-02_jprb,.525e-02_jprb,&
&.488e-02_jprb,.443e-02_jprb,.406e-02_jprb,.380e-02_jprb,.349e-02_jprb,.322e-02_jprb,.305e-02_jprb,&
&.287e-02_jprb,.267e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 37 -54.0
zaer(:,37, 5) = (/&
&.224e-02_jprb,.224e-02_jprb,.221e-02_jprb,.221e-02_jprb,.221e-02_jprb,.212e-02_jprb,.206e-02_jprb,&
&.200e-02_jprb,.191e-02_jprb,.184e-02_jprb,.178e-02_jprb,.170e-02_jprb,.171e-02_jprb,.174e-02_jprb,&
&.180e-02_jprb,.177e-02_jprb,.173e-02_jprb,.165e-02_jprb,.158e-02_jprb,.154e-02_jprb,.150e-02_jprb,&
&.143e-02_jprb,.142e-02_jprb,.142e-02_jprb,.147e-02_jprb,.150e-02_jprb,.154e-02_jprb,.159e-02_jprb,&
&.166e-02_jprb,.174e-02_jprb,.202e-02_jprb,.261e-02_jprb,.323e-02_jprb,.466e-02_jprb,.723e-02_jprb,&
&.977e-02_jprb,.145e-01_jprb,.221e-01_jprb,.262e-01_jprb,.305e-01_jprb,.283e-01_jprb,.277e-01_jprb,&
&.272e-01_jprb,.269e-01_jprb,.248e-01_jprb,.219e-01_jprb,.165e-01_jprb,.148e-01_jprb,.132e-01_jprb,&
&.113e-01_jprb,.105e-01_jprb,.960e-02_jprb,.813e-02_jprb,.722e-02_jprb,.648e-02_jprb,.553e-02_jprb,&
&.516e-02_jprb,.490e-02_jprb,.462e-02_jprb,.435e-02_jprb,.410e-02_jprb,.367e-02_jprb,.332e-02_jprb,&
&.318e-02_jprb,.309e-02_jprb,.303e-02_jprb,.296e-02_jprb,.286e-02_jprb,.273e-02_jprb,.260e-02_jprb,&
&.246e-02_jprb,.225e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 38 -58.0
zaer(:,38, 5) = (/&
&.201e-02_jprb,.201e-02_jprb,.199e-02_jprb,.199e-02_jprb,.199e-02_jprb,.195e-02_jprb,.189e-02_jprb,&
&.184e-02_jprb,.174e-02_jprb,.168e-02_jprb,.164e-02_jprb,.159e-02_jprb,.159e-02_jprb,.160e-02_jprb,&
&.163e-02_jprb,.159e-02_jprb,.156e-02_jprb,.151e-02_jprb,.147e-02_jprb,.144e-02_jprb,.141e-02_jprb,&
&.136e-02_jprb,.136e-02_jprb,.137e-02_jprb,.143e-02_jprb,.146e-02_jprb,.148e-02_jprb,.149e-02_jprb,&
&.152e-02_jprb,.157e-02_jprb,.183e-02_jprb,.234e-02_jprb,.287e-02_jprb,.407e-02_jprb,.560e-02_jprb,&
&.695e-02_jprb,.922e-02_jprb,.118e-01_jprb,.134e-01_jprb,.153e-01_jprb,.162e-01_jprb,.173e-01_jprb,&
&.190e-01_jprb,.201e-01_jprb,.190e-01_jprb,.173e-01_jprb,.138e-01_jprb,.125e-01_jprb,.113e-01_jprb,&
&.939e-02_jprb,.850e-02_jprb,.765e-02_jprb,.654e-02_jprb,.597e-02_jprb,.548e-02_jprb,.471e-02_jprb,&
&.429e-02_jprb,.399e-02_jprb,.361e-02_jprb,.325e-02_jprb,.299e-02_jprb,.262e-02_jprb,.241e-02_jprb,&
&.236e-02_jprb,.236e-02_jprb,.238e-02_jprb,.236e-02_jprb,.232e-02_jprb,.229e-02_jprb,.221e-02_jprb,&
&.212e-02_jprb,.201e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 39 -62.0
zaer(:,39, 5) = (/&
&.184e-02_jprb,.184e-02_jprb,.182e-02_jprb,.182e-02_jprb,.182e-02_jprb,.180e-02_jprb,.175e-02_jprb,&
&.171e-02_jprb,.162e-02_jprb,.158e-02_jprb,.155e-02_jprb,.151e-02_jprb,.152e-02_jprb,.152e-02_jprb,&
&.154e-02_jprb,.152e-02_jprb,.150e-02_jprb,.148e-02_jprb,.144e-02_jprb,.143e-02_jprb,.142e-02_jprb,&
&.139e-02_jprb,.140e-02_jprb,.141e-02_jprb,.140e-02_jprb,.136e-02_jprb,.133e-02_jprb,.124e-02_jprb,&
&.122e-02_jprb,.123e-02_jprb,.140e-02_jprb,.172e-02_jprb,.205e-02_jprb,.278e-02_jprb,.366e-02_jprb,&
&.436e-02_jprb,.547e-02_jprb,.669e-02_jprb,.744e-02_jprb,.833e-02_jprb,.962e-02_jprb,.105e-01_jprb,&
&.115e-01_jprb,.120e-01_jprb,.116e-01_jprb,.110e-01_jprb,.962e-02_jprb,.898e-02_jprb,.836e-02_jprb,&
&.725e-02_jprb,.666e-02_jprb,.609e-02_jprb,.516e-02_jprb,.462e-02_jprb,.416e-02_jprb,.347e-02_jprb,&
&.310e-02_jprb,.284e-02_jprb,.255e-02_jprb,.237e-02_jprb,.226e-02_jprb,.216e-02_jprb,.212e-02_jprb,&
&.209e-02_jprb,.205e-02_jprb,.203e-02_jprb,.201e-02_jprb,.198e-02_jprb,.195e-02_jprb,.193e-02_jprb,&
&.189e-02_jprb,.184e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 40 -66.0
zaer(:,40, 5) = (/&
&.175e-02_jprb,.175e-02_jprb,.172e-02_jprb,.172e-02_jprb,.171e-02_jprb,.168e-02_jprb,.164e-02_jprb,&
&.161e-02_jprb,.155e-02_jprb,.152e-02_jprb,.150e-02_jprb,.149e-02_jprb,.150e-02_jprb,.151e-02_jprb,&
&.153e-02_jprb,.152e-02_jprb,.151e-02_jprb,.149e-02_jprb,.147e-02_jprb,.146e-02_jprb,.144e-02_jprb,&
&.141e-02_jprb,.139e-02_jprb,.136e-02_jprb,.127e-02_jprb,.120e-02_jprb,.114e-02_jprb,.104e-02_jprb,&
&.103e-02_jprb,.103e-02_jprb,.112e-02_jprb,.129e-02_jprb,.148e-02_jprb,.190e-02_jprb,.247e-02_jprb,&
&.294e-02_jprb,.371e-02_jprb,.459e-02_jprb,.522e-02_jprb,.607e-02_jprb,.710e-02_jprb,.765e-02_jprb,&
&.826e-02_jprb,.837e-02_jprb,.813e-02_jprb,.778e-02_jprb,.712e-02_jprb,.680e-02_jprb,.648e-02_jprb,&
&.580e-02_jprb,.536e-02_jprb,.492e-02_jprb,.410e-02_jprb,.361e-02_jprb,.320e-02_jprb,.264e-02_jprb,&
&.238e-02_jprb,.222e-02_jprb,.207e-02_jprb,.204e-02_jprb,.204e-02_jprb,.206e-02_jprb,.206e-02_jprb,&
&.204e-02_jprb,.200e-02_jprb,.195e-02_jprb,.192e-02_jprb,.189e-02_jprb,.187e-02_jprb,.184e-02_jprb,&
&.181e-02_jprb,.176e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 41 -70.0
zaer(:,41, 5) = (/&
&.176e-02_jprb,.175e-02_jprb,.172e-02_jprb,.171e-02_jprb,.170e-02_jprb,.167e-02_jprb,.164e-02_jprb,&
&.162e-02_jprb,.159e-02_jprb,.157e-02_jprb,.156e-02_jprb,.157e-02_jprb,.159e-02_jprb,.160e-02_jprb,&
&.161e-02_jprb,.160e-02_jprb,.158e-02_jprb,.155e-02_jprb,.149e-02_jprb,.146e-02_jprb,.142e-02_jprb,&
&.135e-02_jprb,.131e-02_jprb,.127e-02_jprb,.117e-02_jprb,.111e-02_jprb,.106e-02_jprb,.991e-03_jprb,&
&.986e-03_jprb,.992e-03_jprb,.107e-02_jprb,.120e-02_jprb,.134e-02_jprb,.165e-02_jprb,.203e-02_jprb,&
&.235e-02_jprb,.289e-02_jprb,.354e-02_jprb,.405e-02_jprb,.478e-02_jprb,.567e-02_jprb,.610e-02_jprb,&
&.654e-02_jprb,.657e-02_jprb,.641e-02_jprb,.617e-02_jprb,.567e-02_jprb,.539e-02_jprb,.510e-02_jprb,&
&.452e-02_jprb,.416e-02_jprb,.381e-02_jprb,.317e-02_jprb,.279e-02_jprb,.250e-02_jprb,.214e-02_jprb,&
&.201e-02_jprb,.193e-02_jprb,.188e-02_jprb,.191e-02_jprb,.194e-02_jprb,.199e-02_jprb,.201e-02_jprb,&
&.200e-02_jprb,.199e-02_jprb,.195e-02_jprb,.193e-02_jprb,.190e-02_jprb,.186e-02_jprb,.183e-02_jprb,&
&.181e-02_jprb,.176e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 42 -74.0
zaer(:,42, 5) = (/&
&.180e-02_jprb,.180e-02_jprb,.178e-02_jprb,.178e-02_jprb,.178e-02_jprb,.177e-02_jprb,.176e-02_jprb,&
&.176e-02_jprb,.175e-02_jprb,.175e-02_jprb,.174e-02_jprb,.175e-02_jprb,.175e-02_jprb,.175e-02_jprb,&
&.175e-02_jprb,.171e-02_jprb,.168e-02_jprb,.163e-02_jprb,.155e-02_jprb,.151e-02_jprb,.145e-02_jprb,&
&.137e-02_jprb,.133e-02_jprb,.129e-02_jprb,.122e-02_jprb,.118e-02_jprb,.116e-02_jprb,.114e-02_jprb,&
&.116e-02_jprb,.119e-02_jprb,.129e-02_jprb,.141e-02_jprb,.154e-02_jprb,.180e-02_jprb,.208e-02_jprb,&
&.231e-02_jprb,.268e-02_jprb,.313e-02_jprb,.346e-02_jprb,.394e-02_jprb,.448e-02_jprb,.474e-02_jprb,&
&.501e-02_jprb,.501e-02_jprb,.489e-02_jprb,.472e-02_jprb,.434e-02_jprb,.411e-02_jprb,.388e-02_jprb,&
&.343e-02_jprb,.318e-02_jprb,.294e-02_jprb,.252e-02_jprb,.230e-02_jprb,.213e-02_jprb,.192e-02_jprb,&
&.185e-02_jprb,.181e-02_jprb,.180e-02_jprb,.182e-02_jprb,.184e-02_jprb,.188e-02_jprb,.191e-02_jprb,&
&.192e-02_jprb,.192e-02_jprb,.191e-02_jprb,.190e-02_jprb,.188e-02_jprb,.186e-02_jprb,.184e-02_jprb,&
&.183e-02_jprb,.180e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 43 -78.0
zaer(:,43, 5) = (/&
&.185e-02_jprb,.185e-02_jprb,.185e-02_jprb,.185e-02_jprb,.186e-02_jprb,.186e-02_jprb,.186e-02_jprb,&
&.187e-02_jprb,.188e-02_jprb,.188e-02_jprb,.188e-02_jprb,.188e-02_jprb,.188e-02_jprb,.187e-02_jprb,&
&.185e-02_jprb,.182e-02_jprb,.179e-02_jprb,.175e-02_jprb,.169e-02_jprb,.166e-02_jprb,.161e-02_jprb,&
&.156e-02_jprb,.153e-02_jprb,.150e-02_jprb,.147e-02_jprb,.146e-02_jprb,.146e-02_jprb,.148e-02_jprb,&
&.152e-02_jprb,.156e-02_jprb,.166e-02_jprb,.176e-02_jprb,.186e-02_jprb,.203e-02_jprb,.221e-02_jprb,&
&.235e-02_jprb,.255e-02_jprb,.278e-02_jprb,.293e-02_jprb,.314e-02_jprb,.334e-02_jprb,.344e-02_jprb,&
&.353e-02_jprb,.351e-02_jprb,.345e-02_jprb,.336e-02_jprb,.316e-02_jprb,.303e-02_jprb,.290e-02_jprb,&
&.265e-02_jprb,.251e-02_jprb,.238e-02_jprb,.217e-02_jprb,.206e-02_jprb,.197e-02_jprb,.186e-02_jprb,&
&.182e-02_jprb,.180e-02_jprb,.178e-02_jprb,.179e-02_jprb,.180e-02_jprb,.181e-02_jprb,.183e-02_jprb,&
&.184e-02_jprb,.185e-02_jprb,.186e-02_jprb,.186e-02_jprb,.186e-02_jprb,.186e-02_jprb,.186e-02_jprb,&
&.185e-02_jprb,.185e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 44 -82.0
zaer(:,44, 5) = (/&
&.188e-02_jprb,.188e-02_jprb,.189e-02_jprb,.189e-02_jprb,.189e-02_jprb,.190e-02_jprb,.191e-02_jprb,&
&.191e-02_jprb,.192e-02_jprb,.192e-02_jprb,.192e-02_jprb,.192e-02_jprb,.191e-02_jprb,.191e-02_jprb,&
&.190e-02_jprb,.189e-02_jprb,.187e-02_jprb,.186e-02_jprb,.183e-02_jprb,.182e-02_jprb,.180e-02_jprb,&
&.178e-02_jprb,.177e-02_jprb,.176e-02_jprb,.176e-02_jprb,.176e-02_jprb,.177e-02_jprb,.179e-02_jprb,&
&.181e-02_jprb,.184e-02_jprb,.189e-02_jprb,.194e-02_jprb,.198e-02_jprb,.206e-02_jprb,.213e-02_jprb,&
&.218e-02_jprb,.225e-02_jprb,.232e-02_jprb,.237e-02_jprb,.242e-02_jprb,.246e-02_jprb,.248e-02_jprb,&
&.249e-02_jprb,.247e-02_jprb,.245e-02_jprb,.242e-02_jprb,.235e-02_jprb,.231e-02_jprb,.226e-02_jprb,&
&.217e-02_jprb,.212e-02_jprb,.207e-02_jprb,.200e-02_jprb,.195e-02_jprb,.192e-02_jprb,.187e-02_jprb,&
&.185e-02_jprb,.184e-02_jprb,.183e-02_jprb,.183e-02_jprb,.182e-02_jprb,.182e-02_jprb,.183e-02_jprb,&
&.184e-02_jprb,.185e-02_jprb,.185e-02_jprb,.186e-02_jprb,.186e-02_jprb,.187e-02_jprb,.187e-02_jprb,&
&.187e-02_jprb,.188e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 45 -86.0
zaer(:,45, 5) = (/&
&.191e-02_jprb,.191e-02_jprb,.192e-02_jprb,.192e-02_jprb,.192e-02_jprb,.193e-02_jprb,.193e-02_jprb,&
&.193e-02_jprb,.193e-02_jprb,.193e-02_jprb,.193e-02_jprb,.193e-02_jprb,.193e-02_jprb,.193e-02_jprb,&
&.193e-02_jprb,.192e-02_jprb,.192e-02_jprb,.192e-02_jprb,.192e-02_jprb,.191e-02_jprb,.191e-02_jprb,&
&.191e-02_jprb,.191e-02_jprb,.191e-02_jprb,.191e-02_jprb,.191e-02_jprb,.192e-02_jprb,.193e-02_jprb,&
&.193e-02_jprb,.194e-02_jprb,.195e-02_jprb,.196e-02_jprb,.197e-02_jprb,.199e-02_jprb,.200e-02_jprb,&
&.201e-02_jprb,.202e-02_jprb,.202e-02_jprb,.203e-02_jprb,.204e-02_jprb,.204e-02_jprb,.204e-02_jprb,&
&.204e-02_jprb,.203e-02_jprb,.203e-02_jprb,.202e-02_jprb,.201e-02_jprb,.200e-02_jprb,.199e-02_jprb,&
&.198e-02_jprb,.197e-02_jprb,.196e-02_jprb,.194e-02_jprb,.193e-02_jprb,.193e-02_jprb,.191e-02_jprb,&
&.191e-02_jprb,.190e-02_jprb,.190e-02_jprb,.190e-02_jprb,.189e-02_jprb,.189e-02_jprb,.189e-02_jprb,&
&.189e-02_jprb,.190e-02_jprb,.190e-02_jprb,.190e-02_jprb,.190e-02_jprb,.190e-02_jprb,.191e-02_jprb,&
&.191e-02_jprb,.191e-02_jprb/)
!-- Black Carbon Aerosol     month:  5 --- lat: 46 -90.0
zaer(:,46, 5) = (/&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,.194e-02_jprb,&
&.194e-02_jprb,.194e-02_jprb/)


!     ------------------------------------------------------------------

!ZMAX=-1.E+8_JPRB
!ZMIN= 1.E+8_JPRB
   jm=5   
  DO ji=1,46
    DO jl=1,72
      raerbc(jl,ji,jm)=zaer(jl,ji,jm)
!      ZMAX=MAX(ZMAX,ZAER(JL,JI,JM))
!      ZMIN=MIN(ZMIN,ZAER(JL,JI,JM))
    ENDDO
  ENDDO

!PRINT 9000,ZMIN,ZMAX
9000 FORMAT(1x,'BLACK CARBON AEROSOLS ',2e12.5)

!     ------------------------------------------------------------------

RETURN
END SUBROUTINE suecaebc_05