suecozc.F90

Go to the documentation of this file.

SUBROUTINE suecozc ( KINDAT, KMINUT )


!**** *SUECOZC* - DEFINES CLIMATOLOGICAL DISTRIBUTION OF OZONE
!                 (FORTUIN LANGEMATZ CLIMATOLOGY OF OZONE)

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

!**   INTERFACE.
!     ----------
!        CALL *SUECOZC* FROM *UPDTIM*

!        EXPLICIT ARGUMENTS :
!        --------------------
!     ==== INPUTS ===
!     ==== OUTPUTS ===
! ROZT    :                : AMOUNT OF OZONE (KG/KG) 


!        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.    95/01/25

!     MODIFICATIONS.
!     --------------
!     JJMorcrette 971117 Cy18
!-----------------------------------------------------------------------

#include "tsmbkind.h"

USE yomcst   , ONLY : rpi      ,rday
USE yoerdi   , ONLY : ro3
USE yoeozoc  , ONLY : rsinc    ,rozt     ,rproc


IMPLICIT NONE


!     DUMMY INTEGER SCALARS
integer_m :: kindat
integer_m :: kminut




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

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


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

real_b :: zozcl(19,34,12)
real_b :: zytime(12), zmday(12)

!     LOCAL INTEGER SCALARS
integer_m :: idy, im, im1, im2, imn, jk, jl

!     LOCAL REAL SCALARS
real_b :: ztimi, zxtime


#include "fcttim.h"      
!     ------------------------------------------------------------------

zmday = (/&
      &31._jprb,    59.25_jprb,  90.25_jprb, 120.25_jprb, 151.25_jprb, 181.25_jprb &
  &,  212.25_jprb, 243.25_jprb, 273.25_jprb, 304.25_jprb, 334.25_jprb, 365.25_jprb &
        &/)
zytime= (/&
     &22320._jprb,  64980._jprb, 107640._jprb, 151560._jprb, 195480._jprb, 239400._jprb &
  &, 283320._jprb, 327960._jprb, 371880._jprb, 415800._jprb, 459720._jprb, 503640._jprb &
        &/)

!* Ozone climatological mixing ratio (ppmv)
!        from Langematz and Fortuin 

! Month:  1
zozcl(:, 1, 1) = (/&
 &0.5500_jprb, 0.5500_jprb, 0.7200_jprb, 0.8000_jprb, 0.7700_jprb, 0.7000_jprb, 0.6300_jprb, 0.5600_jprb,&
 &0.5300_jprb, 0.5300_jprb, 0.5200_jprb, 0.5200_jprb, 0.6600_jprb, 0.8100_jprb, 0.8400_jprb, 0.8300_jprb,&
 &0.7700_jprb, 0.7200_jprb, 0.7200_jprb /)
zozcl(:, 2, 1) = (/&
 &0.2500_jprb, 0.2500_jprb, 0.3500_jprb, 0.4500_jprb, 0.5100_jprb, 0.4900_jprb, 0.4600_jprb, 0.4300_jprb,&
 &0.4200_jprb, 0.4100_jprb, 0.3800_jprb, 0.3500_jprb, 0.4100_jprb, 0.5000_jprb, 0.5200_jprb, 0.5000_jprb,&
 &0.4600_jprb, 0.4300_jprb, 0.4300_jprb /)
zozcl(:, 3, 1) = (/&
 &0.1800_jprb, 0.1800_jprb, 0.2100_jprb, 0.2800_jprb, 0.3500_jprb, 0.3600_jprb, 0.3600_jprb, 0.3700_jprb,&
 &0.3800_jprb, 0.3900_jprb, 0.3700_jprb, 0.3200_jprb, 0.3000_jprb, 0.3100_jprb, 0.3000_jprb, 0.2700_jprb,&
 &0.2500_jprb, 0.2300_jprb, 0.2300_jprb /)
zozcl(:, 4, 1) = (/&
 &0.1500_jprb, 0.1500_jprb, 0.1500_jprb, 0.1700_jprb, 0.2200_jprb, 0.2300_jprb, 0.2500_jprb, 0.2800_jprb,&
 &0.3100_jprb, 0.3200_jprb, 0.3400_jprb, 0.3200_jprb, 0.2800_jprb, 0.2300_jprb, 0.1900_jprb, 0.1400_jprb,&
 &0.1300_jprb, 0.1200_jprb, 0.1200_jprb /)
zozcl(:, 5, 1) = (/&
 &0.1600_jprb, 0.1600_jprb, 0.1500_jprb, 0.1400_jprb, 0.1600_jprb, 0.1500_jprb, 0.1600_jprb, 0.1900_jprb,&
 &0.2000_jprb, 0.2100_jprb, 0.2300_jprb, 0.2700_jprb, 0.2800_jprb, 0.2600_jprb, 0.2300_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1500_jprb, 0.1500_jprb /)
zozcl(:, 6, 1) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1600_jprb, 0.1500_jprb, 0.1400_jprb, 0.1400_jprb, 0.1300_jprb, 0.1400_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.2100_jprb, 0.2500_jprb, 0.2700_jprb, 0.2800_jprb, 0.2400_jprb,&
 &0.2200_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 7, 1) = (/&
 &0.2100_jprb, 0.2100_jprb, 0.1900_jprb, 0.1700_jprb, 0.1700_jprb, 0.1500_jprb, 0.1400_jprb, 0.1500_jprb,&
 &0.1500_jprb, 0.1500_jprb, 0.1600_jprb, 0.1700_jprb, 0.1900_jprb, 0.2400_jprb, 0.3200_jprb, 0.3700_jprb,&
 &0.3400_jprb, 0.3200_jprb, 0.3200_jprb /)
zozcl(:, 8, 1) = (/&
 &0.3100_jprb, 0.3100_jprb, 0.2800_jprb, 0.2600_jprb, 0.2500_jprb, 0.2400_jprb, 0.2200_jprb, 0.2200_jprb,&
 &0.2200_jprb, 0.2300_jprb, 0.2300_jprb, 0.2400_jprb, 0.2700_jprb, 0.3000_jprb, 0.3700_jprb, 0.4700_jprb,&
 &0.4300_jprb, 0.4100_jprb, 0.4100_jprb /)
zozcl(:, 9, 1) = (/&
 &0.4100_jprb, 0.4100_jprb, 0.3800_jprb, 0.3700_jprb, 0.3600_jprb, 0.3400_jprb, 0.3200_jprb, 0.3100_jprb,&
 &0.3200_jprb, 0.3200_jprb, 0.3200_jprb, 0.3400_jprb, 0.4100_jprb, 0.4600_jprb, 0.4900_jprb, 0.5300_jprb,&
 &0.4900_jprb, 0.4600_jprb, 0.4600_jprb /)
zozcl(:,10, 1) = (/&
 &0.5400_jprb, 0.5400_jprb, 0.5200_jprb, 0.5100_jprb, 0.4900_jprb, 0.4800_jprb, 0.4800_jprb, 0.4900_jprb,&
 &0.4900_jprb, 0.4700_jprb, 0.4600_jprb, 0.4900_jprb, 0.5200_jprb, 0.6900_jprb, 0.6900_jprb, 0.6700_jprb,&
 &0.6200_jprb, 0.5800_jprb, 0.5800_jprb /)
zozcl(:,11, 1) = (/&
 &0.7500_jprb, 0.7500_jprb, 0.7400_jprb, 0.7300_jprb, 0.7300_jprb, 0.7400_jprb, 0.7500_jprb, 0.7400_jprb,&
 &0.7100_jprb, 0.6800_jprb, 0.6800_jprb, 0.6900_jprb, 0.7500_jprb, 0.7900_jprb, 1.0100_jprb, 0.9300_jprb,&
 &0.8600_jprb, 0.8000_jprb, 0.8000_jprb /)
zozcl(:,12, 1) = (/&
 &0.8900_jprb, 0.8900_jprb, 0.9000_jprb, 0.9200_jprb, 0.9200_jprb, 0.9600_jprb, 0.9800_jprb, 0.9600_jprb,&
 &0.9200_jprb, 0.8900_jprb, 0.8900_jprb, 0.9200_jprb, 0.9900_jprb, 1.0300_jprb, 1.2800_jprb, 1.1900_jprb,&
 &1.1000_jprb, 1.0300_jprb, 1.0300_jprb /)
zozcl(:,13, 1) = (/&
 &1.1300_jprb, 1.1300_jprb, 1.1700_jprb, 1.2100_jprb, 1.2500_jprb, 1.3200_jprb, 1.3700_jprb, 1.3500_jprb,&
 &1.3000_jprb, 1.2600_jprb, 1.2700_jprb, 1.3300_jprb, 1.4200_jprb, 1.4800_jprb, 1.7700_jprb, 1.6300_jprb,&
 &1.5000_jprb, 1.4100_jprb, 1.4100_jprb /)
zozcl(:,14, 1) = (/&
 &1.4100_jprb, 1.4100_jprb, 1.5000_jprb, 1.6200_jprb, 1.7500_jprb, 1.8600_jprb, 1.9300_jprb, 1.9100_jprb,&
 &1.8500_jprb, 1.8300_jprb, 1.8400_jprb, 1.8800_jprb, 1.9900_jprb, 2.1600_jprb, 2.2600_jprb, 2.0700_jprb,&
 &1.9100_jprb, 1.7800_jprb, 1.7800_jprb /)
zozcl(:,15, 1) = (/&
 &1.6600_jprb, 1.6600_jprb, 1.7900_jprb, 1.9700_jprb, 2.1400_jprb, 2.2800_jprb, 2.3600_jprb, 2.3500_jprb,&
 &2.3000_jprb, 2.2900_jprb, 2.2900_jprb, 2.3100_jprb, 2.4500_jprb, 2.7100_jprb, 2.8000_jprb, 2.7000_jprb,&
 &2.3600_jprb, 2.2200_jprb, 2.2200_jprb /)
zozcl(:,16, 1) = (/&
 &2.1500_jprb, 2.1500_jprb, 2.2800_jprb, 2.4600_jprb, 2.6300_jprb, 2.8200_jprb, 2.9700_jprb, 3.0300_jprb,&
 &3.0300_jprb, 3.0400_jprb, 3.0500_jprb, 3.1000_jprb, 3.3300_jprb, 3.6700_jprb, 3.7500_jprb, 3.5500_jprb,&
 &3.0400_jprb, 2.8900_jprb, 2.8900_jprb /)
zozcl(:,17, 1) = (/&
 &2.9900_jprb, 2.9900_jprb, 3.0700_jprb, 3.2600_jprb, 3.4300_jprb, 3.6700_jprb, 3.9200_jprb, 4.1000_jprb,&
 &4.1900_jprb, 4.2300_jprb, 4.2800_jprb, 4.4200_jprb, 4.7400_jprb, 5.0500_jprb, 5.0400_jprb, 4.6500_jprb,&
 &3.9800_jprb, 3.7500_jprb, 3.7500_jprb /)

zozcl(:,18, 1) = (/&
 &3.9200_jprb, 3.9200_jprb, 3.9600_jprb, 4.1700_jprb, 4.3800_jprb, 4.6600_jprb, 4.9500_jprb, 5.2000_jprb,&
 &5.3500_jprb, 5.4000_jprb, 5.4600_jprb, 5.6000_jprb, 5.8700_jprb, 6.0300_jprb, 5.8800_jprb, 5.3300_jprb,&
 &4.6500_jprb, 4.3400_jprb, 4.3400_jprb /)
zozcl(:,19, 1) = (/&
 &5.4500_jprb, 5.4500_jprb, 5.4800_jprb, 5.7700_jprb, 6.1300_jprb, 6.4800_jprb, 6.8200_jprb, 7.1300_jprb,&
 &7.3400_jprb, 7.3500_jprb, 7.3100_jprb, 7.2700_jprb, 7.2100_jprb, 7.0400_jprb, 6.6400_jprb, 5.9600_jprb,&
 &5.3400_jprb, 5.0600_jprb, 5.0600_jprb /)
zozcl(:,20, 1) = (/&
 &5.9900_jprb, 5.9900_jprb, 6.0600_jprb, 6.7300_jprb, 7.3900_jprb, 8.0400_jprb, 8.5500_jprb, 8.9100_jprb,&
 &9.2500_jprb, 8.9400_jprb, 8.7000_jprb, 8.3200_jprb, 7.7900_jprb, 7.3100_jprb, 6.7000_jprb, 6.1400_jprb,&
 &5.5500_jprb, 5.3900_jprb, 5.3900_jprb /)
zozcl(:,21, 1) = (/&
 &5.4900_jprb, 5.4900_jprb, 5.7400_jprb, 6.7300_jprb, 7.6100_jprb, 8.3800_jprb, 8.9400_jprb, 9.3700_jprb,&
 &9.8400_jprb, 9.5400_jprb, 9.0200_jprb, 8.2900_jprb, 7.6000_jprb, 7.0100_jprb, 6.3500_jprb, 6.0200_jprb,&
 &5.3700_jprb, 5.2700_jprb, 5.2700_jprb /)
zozcl(:,22, 1) = (/&
 &4.6200_jprb, 4.6200_jprb, 5.1400_jprb, 6.2500_jprb, 7.2600_jprb, 8.0600_jprb, 8.6200_jprb, 9.1000_jprb,&
 &9.7500_jprb, 9.6500_jprb, 8.9000_jprb, 7.8900_jprb, 7.1200_jprb, 6.5200_jprb, 5.9100_jprb, 5.8300_jprb,&
 &5.0100_jprb, 4.9100_jprb, 4.9100_jprb /)
zozcl(:,23, 1) = (/&
 &3.8600_jprb, 3.8600_jprb, 4.3700_jprb, 5.5300_jprb, 6.4200_jprb, 7.0900_jprb, 7.4500_jprb, 7.7700_jprb,&
 &8.1700_jprb, 8.1200_jprb, 7.5600_jprb, 6.8500_jprb, 6.4300_jprb, 6.1000_jprb, 5.7400_jprb, 5.5200_jprb,&
 &4.6200_jprb, 4.4500_jprb, 4.4500_jprb /)
zozcl(:,24, 1) = (/&
 &3.5200_jprb, 3.5200_jprb, 3.9800_jprb, 5.0200_jprb, 5.7300_jprb, 6.1700_jprb, 6.3200_jprb, 6.4600_jprb,&
 &6.6000_jprb, 6.4900_jprb, 6.1600_jprb, 5.8800_jprb, 5.8200_jprb, 5.7600_jprb, 5.5700_jprb, 5.1900_jprb,&
 &4.3400_jprb, 4.1400_jprb, 4.1400_jprb /)
zozcl(:,25, 1) = (/&
 &3.1583_jprb, 3.1583_jprb, 3.4234_jprb, 4.0208_jprb, 4.4000_jprb, 4.5357_jprb, 4.5075_jprb, 4.4100_jprb,&
 &4.0617_jprb, 3.9694_jprb, 4.0400_jprb, 4.0400_jprb, 4.6674_jprb, 4.9255_jprb, 5.0897_jprb, 4.7433_jprb,&
 &4.0426_jprb, 3.8076_jprb, 3.8076_jprb /)
zozcl(:,26, 1) = (/&
 &2.7966_jprb, 2.7966_jprb, 2.9248_jprb, 2.8100_jprb, 2.7300_jprb, 2.2675_jprb, 1.8250_jprb, 1.7800_jprb,&
 &1.4507_jprb, 1.4660_jprb, 1.4200_jprb, 1.7600_jprb, 2.2840_jprb, 3.0940_jprb, 3.4392_jprb, 3.3920_jprb,&
 &3.1930_jprb, 3.0524_jprb, 3.0524_jprb /)
zozcl(:,27, 1) = (/&
 &2.0098_jprb, 2.0098_jprb, 1.9997_jprb, 1.9061_jprb, 1.7000_jprb, 1.0890_jprb, 0.6650_jprb, 0.7000_jprb,&
 &0.4262_jprb, 0.4404_jprb, 0.5600_jprb, 0.7400_jprb, 0.9924_jprb, 1.7507_jprb, 2.1023_jprb, 2.6257_jprb,&
 &2.1653_jprb, 2.3068_jprb, 2.3068_jprb /)
zozcl(:,28, 1) = (/&
 &1.0717_jprb, 1.0717_jprb, 0.9591_jprb, 0.9040_jprb, 0.4530_jprb, 0.3100_jprb, 0.1690_jprb, 0.1608_jprb,&
 &0.1179_jprb, 0.1440_jprb, 0.1650_jprb, 0.1439_jprb, 0.2560_jprb, 0.8109_jprb, 1.0131_jprb, 1.6720_jprb,&
 &1.2675_jprb, 1.6752_jprb, 1.6752_jprb /)
zozcl(:,29, 1) = (/&
 &0.4372_jprb, 0.4372_jprb, 0.4127_jprb, 0.3820_jprb, 0.1893_jprb, 0.1654_jprb, 0.0933_jprb, 0.0885_jprb,&
 &0.0626_jprb, 0.0781_jprb, 0.0923_jprb, 0.0892_jprb, 0.0999_jprb, 0.4074_jprb, 0.5184_jprb, 0.8047_jprb,&
 &0.5976_jprb, 0.7238_jprb, 0.7238_jprb /)
zozcl(:,30, 1) = (/&
 &0.3147_jprb, 0.3147_jprb, 0.2824_jprb, 0.2924_jprb, 0.1360_jprb, 0.0735_jprb, 0.0805_jprb, 0.0748_jprb,&
 &0.0441_jprb, 0.0555_jprb, 0.0608_jprb, 0.0650_jprb, 0.0710_jprb, 0.2430_jprb, 0.2822_jprb, 0.4525_jprb,&
 &0.3080_jprb, 0.3950_jprb, 0.3950_jprb /)
zozcl(:,31, 1) = (/&
 &0.0827_jprb, 0.0827_jprb, 0.0859_jprb, 0.1133_jprb, 0.0513_jprb, 0.0565_jprb, 0.0620_jprb, 0.0574_jprb,&
 &0.0367_jprb, 0.0479_jprb, 0.0467_jprb, 0.0498_jprb, 0.0609_jprb, 0.0785_jprb, 0.0848_jprb, 0.1037_jprb,&
 &0.0876_jprb, 0.1068_jprb, 0.1068_jprb /)
zozcl(:,32, 1) = (/&
 &0.0266_jprb, 0.0266_jprb, 0.0351_jprb, 0.0262_jprb, 0.0320_jprb, 0.0417_jprb, 0.0518_jprb, 0.0495_jprb,&
 &0.0445_jprb, 0.0492_jprb, 0.0342_jprb, 0.0469_jprb, 0.0435_jprb, 0.0447_jprb, 0.0486_jprb, 0.0466_jprb,&
 &0.0475_jprb, 0.0488_jprb, 0.0488_jprb /)
zozcl(:,33, 1) = (/&
 &0.0173_jprb, 0.0173_jprb, 0.0252_jprb, 0.0169_jprb, 0.0233_jprb, 0.0311_jprb, 0.0424_jprb, 0.0399_jprb,&
 &0.0274_jprb, 0.0313_jprb, 0.0293_jprb, 0.0409_jprb, 0.0403_jprb, 0.0393_jprb, 0.0406_jprb, 0.0419_jprb,&
 &0.0408_jprb, 0.0404_jprb, 0.0404_jprb /)
zozcl(:,34, 1) = (/&
 &0.0173_jprb, 0.0173_jprb, 0.0252_jprb, 0.0169_jprb, 0.0233_jprb, 0.0311_jprb, 0.0424_jprb, 0.0399_jprb,&
 &0.0274_jprb, 0.0313_jprb, 0.0293_jprb, 0.0409_jprb, 0.0403_jprb, 0.0393_jprb, 0.0406_jprb, 0.0419_jprb,&
 &0.0408_jprb, 0.0404_jprb, 0.0404_jprb /)

! Month:  2
zozcl(:, 1, 2) = (/&
 &0.4300_jprb, 0.4300_jprb, 0.5600_jprb, 0.6400_jprb, 0.6400_jprb, 0.6000_jprb, 0.5700_jprb, 0.6000_jprb,&
 &0.6900_jprb, 0.7300_jprb, 0.7000_jprb, 0.6500_jprb, 0.6300_jprb, 0.6600_jprb, 0.7300_jprb, 0.7500_jprb,&
 &0.7700_jprb, 0.7400_jprb, 0.7400_jprb /)
zozcl(:, 2, 2) = (/&
 &0.2100_jprb, 0.2100_jprb, 0.2900_jprb, 0.3700_jprb, 0.3900_jprb, 0.3800_jprb, 0.3900_jprb, 0.4400_jprb,&
 &0.4700_jprb, 0.4700_jprb, 0.4700_jprb, 0.4400_jprb, 0.4200_jprb, 0.4200_jprb, 0.4300_jprb, 0.4100_jprb,&
 &0.3700_jprb, 0.3600_jprb, 0.3600_jprb /)
zozcl(:, 3, 2) = (/&
 &0.1400_jprb, 0.1400_jprb, 0.1800_jprb, 0.2400_jprb, 0.2800_jprb, 0.3000_jprb, 0.3500_jprb, 0.4100_jprb,&
 &0.4200_jprb, 0.4200_jprb, 0.4200_jprb, 0.3900_jprb, 0.3300_jprb, 0.3000_jprb, 0.2700_jprb, 0.2300_jprb,&
 &0.1800_jprb, 0.1700_jprb, 0.1700_jprb /)
zozcl(:, 4, 2) = (/&
 &0.1300_jprb, 0.1300_jprb, 0.1400_jprb, 0.1600_jprb, 0.1900_jprb, 0.2300_jprb, 0.2900_jprb, 0.3400_jprb,&
 &0.3500_jprb, 0.3600_jprb, 0.3800_jprb, 0.3800_jprb, 0.3300_jprb, 0.2700_jprb, 0.2200_jprb, 0.1700_jprb,&
 &0.1200_jprb, 0.1200_jprb, 0.1200_jprb /)
zozcl(:, 5, 2) = (/&
 &0.1400_jprb, 0.1400_jprb, 0.1300_jprb, 0.1400_jprb, 0.1400_jprb, 0.1600_jprb, 0.1800_jprb, 0.2100_jprb,&
 &0.2200_jprb, 0.2300_jprb, 0.2600_jprb, 0.3000_jprb, 0.3200_jprb, 0.3100_jprb, 0.2800_jprb, 0.2400_jprb,&
 &0.2000_jprb, 0.1900_jprb, 0.1900_jprb /)
zozcl(:, 6, 2) = (/&
 &0.1500_jprb, 0.1500_jprb, 0.1500_jprb, 0.1400_jprb, 0.1400_jprb, 0.1300_jprb, 0.1400_jprb, 0.1500_jprb,&
 &0.1600_jprb, 0.1700_jprb, 0.1800_jprb, 0.2100_jprb, 0.2600_jprb, 0.3000_jprb, 0.3100_jprb, 0.3000_jprb,&
 &0.2700_jprb, 0.2600_jprb, 0.2600_jprb /)
zozcl(:, 7, 2) = (/&
 &0.2000_jprb, 0.2000_jprb, 0.1900_jprb, 0.1800_jprb, 0.1700_jprb, 0.1500_jprb, 0.1500_jprb, 0.1500_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.1900_jprb, 0.2300_jprb, 0.2800_jprb, 0.3500_jprb,&
 &0.3800_jprb, 0.3600_jprb, 0.3600_jprb /)
zozcl(:, 8, 2) = (/&
 &0.3000_jprb, 0.3000_jprb, 0.2900_jprb, 0.2800_jprb, 0.2600_jprb, 0.2400_jprb, 0.2400_jprb, 0.2300_jprb,&
 &0.2300_jprb, 0.2300_jprb, 0.2400_jprb, 0.2500_jprb, 0.2700_jprb, 0.2900_jprb, 0.3200_jprb, 0.3900_jprb,&
 &0.4600_jprb, 0.4400_jprb, 0.4400_jprb /)
zozcl(:, 9, 2) = (/&
 &0.4000_jprb, 0.4000_jprb, 0.4000_jprb, 0.4000_jprb, 0.3800_jprb, 0.3600_jprb, 0.3400_jprb, 0.3300_jprb,&
 &0.3200_jprb, 0.3100_jprb, 0.3200_jprb, 0.3600_jprb, 0.4000_jprb, 0.4300_jprb, 0.4500_jprb, 0.4700_jprb,&
 &0.5200_jprb, 0.5000_jprb, 0.5000_jprb /)
zozcl(:,10, 2) = (/&
 &0.5600_jprb, 0.5600_jprb, 0.5400_jprb, 0.5300_jprb, 0.5100_jprb, 0.5000_jprb, 0.5000_jprb, 0.5000_jprb,&
 &0.5000_jprb, 0.4800_jprb, 0.4600_jprb, 0.4700_jprb, 0.5100_jprb, 0.5200_jprb, 0.6400_jprb, 0.6300_jprb,&
 &0.6300_jprb, 0.6100_jprb, 0.6100_jprb /)
zozcl(:,11, 2) = (/&
 &0.7600_jprb, 0.7600_jprb, 0.7500_jprb, 0.7500_jprb, 0.7700_jprb, 0.7800_jprb, 0.7700_jprb, 0.7500_jprb,&
 &0.7300_jprb, 0.7100_jprb, 0.7000_jprb, 0.7000_jprb, 0.7100_jprb, 0.7200_jprb, 0.7500_jprb, 0.7400_jprb,&
 &0.8500_jprb, 0.8200_jprb, 0.8200_jprb /)
zozcl(:,12, 2) = (/&
 &0.9200_jprb, 0.9200_jprb, 0.9200_jprb, 0.9400_jprb, 0.9700_jprb, 1.0100_jprb, 1.0100_jprb, 0.9800_jprb,&
 &0.9400_jprb, 0.9200_jprb, 0.9100_jprb, 0.9300_jprb, 0.9400_jprb, 0.9500_jprb, 0.9500_jprb, 0.9300_jprb,&
 &1.0400_jprb, 1.0000_jprb, 1.0000_jprb /)
zozcl(:,13, 2) = (/&
 &1.2000_jprb, 1.2000_jprb, 1.2200_jprb, 1.2600_jprb, 1.3100_jprb, 1.3900_jprb, 1.4100_jprb, 1.3600_jprb,&
 &1.3000_jprb, 1.2900_jprb, 1.3000_jprb, 1.3400_jprb, 1.3700_jprb, 1.3700_jprb, 1.3500_jprb, 1.3200_jprb,&
 &1.5000_jprb, 1.4400_jprb, 1.4400_jprb /)
zozcl(:,14, 2) = (/&
 &1.5900_jprb, 1.5900_jprb, 1.6300_jprb, 1.7300_jprb, 1.8300_jprb, 1.9300_jprb, 1.9600_jprb, 1.9000_jprb,&
 &1.8300_jprb, 1.8200_jprb, 1.8500_jprb, 1.8800_jprb, 1.9400_jprb, 2.0200_jprb, 2.1400_jprb, 2.2200_jprb,&
 &2.2500_jprb, 2.1600_jprb, 2.1600_jprb /)
zozcl(:,15, 2) = (/&
 &2.0000_jprb, 2.0000_jprb, 2.0100_jprb, 2.1200_jprb, 2.2500_jprb, 2.3700_jprb, 2.4200_jprb, 2.3400_jprb,&
 &2.2400_jprb, 2.2200_jprb, 2.2500_jprb, 2.2900_jprb, 2.4000_jprb, 2.6000_jprb, 2.8600_jprb, 2.9800_jprb,&
 &2.9500_jprb, 2.6000_jprb, 2.6000_jprb /)
zozcl(:,16, 2) = (/&
 &2.7300_jprb, 2.7300_jprb, 2.6800_jprb, 2.7300_jprb, 2.8600_jprb, 3.0000_jprb, 3.0900_jprb, 3.0300_jprb,&
 &2.9000_jprb, 2.8600_jprb, 2.9100_jprb, 3.0200_jprb, 3.2400_jprb, 3.5800_jprb, 3.9300_jprb, 4.0000_jprb,&
 &3.8000_jprb, 3.2200_jprb, 3.2200_jprb /)
zozcl(:,17, 2) = (/&
 &3.8100_jprb, 3.8100_jprb, 3.7100_jprb, 3.7100_jprb, 3.8100_jprb, 3.9700_jprb, 4.1100_jprb, 4.1000_jprb,&
 &3.9500_jprb, 3.8700_jprb, 3.9800_jprb, 4.2000_jprb, 4.5800_jprb, 5.1000_jprb, 5.3800_jprb, 5.2200_jprb,&
 &4.7900_jprb, 4.1100_jprb, 4.1100_jprb /)

zozcl(:,18, 2) = (/&
 &4.6500_jprb, 4.6500_jprb, 4.6100_jprb, 4.6800_jprb, 4.8000_jprb, 4.9800_jprb, 5.1500_jprb, 5.1700_jprb,&
 &5.0500_jprb, 4.9900_jprb, 5.0900_jprb, 5.3000_jprb, 5.7300_jprb, 6.2400_jprb, 6.2900_jprb, 5.9200_jprb,&
 &5.4100_jprb, 4.8200_jprb, 4.8200_jprb /)
zozcl(:,19, 2) = (/&
 &5.5900_jprb, 5.5900_jprb, 5.8400_jprb, 6.1600_jprb, 6.4200_jprb, 6.6800_jprb, 6.9100_jprb, 7.0300_jprb,&
 &7.0800_jprb, 7.0500_jprb, 7.0400_jprb, 7.0900_jprb, 7.3700_jprb, 7.4500_jprb, 7.0400_jprb, 6.4700_jprb,&
 &6.0700_jprb, 5.6900_jprb, 5.6900_jprb /)
zozcl(:,20, 2) = (/&
 &5.5100_jprb, 5.5100_jprb, 6.2800_jprb, 6.7600_jprb, 7.5800_jprb, 8.0500_jprb, 8.5100_jprb, 8.9700_jprb,&
 &9.3600_jprb, 9.2400_jprb, 8.9200_jprb, 8.7000_jprb, 8.3300_jprb, 7.7400_jprb, 7.0600_jprb, 6.4900_jprb,&
 &6.4200_jprb, 6.3000_jprb, 6.3000_jprb /)
zozcl(:,21, 2) = (/&
 &4.8400_jprb, 4.8400_jprb, 5.7800_jprb, 6.5500_jprb, 7.6000_jprb, 8.2800_jprb, 8.9000_jprb, 9.5400_jprb,&
 &10.1000_jprb,10.0400_jprb, 9.5400_jprb, 8.9100_jprb, 8.1200_jprb, 7.3500_jprb, 6.7200_jprb, 6.3100_jprb,&
 &6.4600_jprb, 6.3100_jprb, 6.3100_jprb /)
zozcl(:,22, 2) = (/&
 &3.9800_jprb, 3.9800_jprb, 4.8400_jprb, 5.9100_jprb, 7.0800_jprb, 7.9400_jprb, 8.6700_jprb, 9.4300_jprb,&
 &10.0300_jprb,10.1400_jprb, 9.5200_jprb, 8.5500_jprb, 7.4700_jprb, 6.7300_jprb, 6.2600_jprb, 6.1500_jprb,&
 &6.4200_jprb, 6.0700_jprb, 6.0700_jprb /)
zozcl(:,23, 2) = (/&
 &3.3900_jprb, 3.3900_jprb, 4.0800_jprb, 5.1000_jprb, 6.1900_jprb, 6.9700_jprb, 7.5100_jprb, 8.0200_jprb,&
 &8.3900_jprb, 8.4300_jprb, 7.9400_jprb, 7.2600_jprb, 6.6300_jprb, 6.2100_jprb, 5.9800_jprb, 6.0100_jprb,&
 &6.0600_jprb, 5.7200_jprb, 5.7200_jprb /)
zozcl(:,24, 2) = (/&
 &3.2200_jprb, 3.2200_jprb, 3.7800_jprb, 4.6000_jprb, 5.4900_jprb, 6.0500_jprb, 6.3400_jprb, 6.5800_jprb,&
 &6.6900_jprb, 6.6400_jprb, 6.3600_jprb, 6.0900_jprb, 5.9300_jprb, 5.8200_jprb, 5.7800_jprb, 5.8000_jprb,&
 &5.5400_jprb, 5.3000_jprb, 5.3000_jprb /)
zozcl(:,25, 2) = (/&
 &3.0003_jprb, 3.0003_jprb, 3.5474_jprb, 3.1658_jprb, 4.1800_jprb, 4.3948_jprb, 4.4725_jprb, 4.3000_jprb,&
 &4.3085_jprb, 4.2517_jprb, 4.0900_jprb, 4.2500_jprb, 4.7925_jprb, 5.0370_jprb, 5.0522_jprb, 5.6167_jprb,&
 &5.0366_jprb, 4.8128_jprb, 4.8128_jprb /)
zozcl(:,26, 2) = (/&
 &2.7806_jprb, 2.7806_jprb, 2.8474_jprb, 2.4030_jprb, 2.5500_jprb, 2.1512_jprb, 1.8790_jprb, 1.7200_jprb,&
 &1.3503_jprb, 1.2765_jprb, 1.4200_jprb, 2.0100_jprb, 2.4662_jprb, 3.2013_jprb, 3.5803_jprb, 4.0760_jprb,&
 &3.5538_jprb, 3.3464_jprb, 3.3464_jprb /)
zozcl(:,27, 2) = (/&
 &2.0816_jprb, 2.0816_jprb, 2.0919_jprb, 1.6632_jprb, 1.6600_jprb, 1.0644_jprb, 0.6293_jprb, 0.6900_jprb,&
 &0.4460_jprb, 0.4129_jprb, 0.5400_jprb, 0.7800_jprb, 1.0097_jprb, 1.8169_jprb, 2.2099_jprb, 2.6986_jprb,&
 &2.5496_jprb, 2.7674_jprb, 2.7674_jprb /)
zozcl(:,28, 2) = (/&
 &1.1115_jprb, 1.1115_jprb, 1.0466_jprb, 0.8470_jprb, 0.4340_jprb, 0.3083_jprb, 0.1470_jprb, 0.1402_jprb,&
 &0.0730_jprb, 0.1244_jprb, 0.1460_jprb, 0.1402_jprb, 0.2737_jprb, 0.8487_jprb, 1.1139_jprb, 1.6160_jprb,&
 &1.5777_jprb, 1.7738_jprb, 1.7738_jprb /)
zozcl(:,29, 2) = (/&
 &0.4523_jprb, 0.4523_jprb, 0.4153_jprb, 0.2980_jprb, 0.1827_jprb, 0.1452_jprb, 0.0900_jprb, 0.0857_jprb,&
 &0.0410_jprb, 0.0631_jprb, 0.0707_jprb, 0.0789_jprb, 0.1307_jprb, 0.5048_jprb, 0.6104_jprb, 0.7773_jprb,&
 &0.7942_jprb, 0.9243_jprb, 0.9243_jprb /)
zozcl(:,30, 2) = (/&
 &0.3011_jprb, 0.3011_jprb, 0.2841_jprb, 0.2348_jprb, 0.1190_jprb, 0.0620_jprb, 0.0770_jprb, 0.0732_jprb,&
 &0.0302_jprb, 0.0446_jprb, 0.0515_jprb, 0.0643_jprb, 0.0864_jprb, 0.3351_jprb, 0.3536_jprb, 0.5345_jprb,&
 &0.4412_jprb, 0.4547_jprb, 0.4547_jprb /)
zozcl(:,31, 2) = (/&
 &0.1151_jprb, 0.1151_jprb, 0.0983_jprb, 0.1083_jprb, 0.0503_jprb, 0.0461_jprb, 0.0730_jprb, 0.0698_jprb,&
 &0.0308_jprb, 0.0374_jprb, 0.0450_jprb, 0.0457_jprb, 0.0681_jprb, 0.0962_jprb, 0.0882_jprb, 0.1167_jprb,&
 &0.1221_jprb, 0.1011_jprb, 0.1011_jprb /)
zozcl(:,32, 2) = (/&
 &0.0214_jprb, 0.0214_jprb, 0.0319_jprb, 0.0236_jprb, 0.0360_jprb, 0.0395_jprb, 0.0518_jprb, 0.0499_jprb,&
 &0.0277_jprb, 0.0309_jprb, 0.0322_jprb, 0.0447_jprb, 0.0439_jprb, 0.0484_jprb, 0.0503_jprb, 0.0484_jprb,&
 &0.0507_jprb, 0.0452_jprb, 0.0452_jprb /)
zozcl(:,33, 2) = (/&
 &0.0172_jprb, 0.0172_jprb, 0.0237_jprb, 0.0167_jprb, 0.0269_jprb, 0.0359_jprb, 0.0436_jprb, 0.0416_jprb,&
 &0.0222_jprb, 0.0309_jprb, 0.0286_jprb, 0.0397_jprb, 0.0397_jprb, 0.0434_jprb, 0.0428_jprb, 0.0423_jprb,&
 &0.0434_jprb, 0.0392_jprb, 0.0392_jprb /)
zozcl(:,34, 2) = (/&
 &0.0172_jprb, 0.0172_jprb, 0.0237_jprb, 0.0167_jprb, 0.0269_jprb, 0.0359_jprb, 0.0436_jprb, 0.0416_jprb,&
 &0.0222_jprb, 0.0309_jprb, 0.0286_jprb, 0.0397_jprb, 0.0397_jprb, 0.0434_jprb, 0.0428_jprb, 0.0423_jprb,&
 &0.0434_jprb, 0.0392_jprb, 0.0392_jprb /)

! Month:  3
zozcl(:, 1, 3) = (/&
 &0.3700_jprb, 0.3700_jprb, 0.5800_jprb, 0.6600_jprb, 0.6800_jprb, 0.7400_jprb, 0.8200_jprb, 0.8100_jprb,&
 &0.7400_jprb, 0.6900_jprb, 0.7100_jprb, 0.7600_jprb, 0.7600_jprb, 0.6800_jprb, 0.5800_jprb, 0.5700_jprb,&
 &0.6000_jprb, 0.6100_jprb, 0.6100_jprb /)
zozcl(:, 2, 3) = (/&
 &0.2100_jprb, 0.2100_jprb, 0.2800_jprb, 0.3100_jprb, 0.3800_jprb, 0.4800_jprb, 0.5300_jprb, 0.5200_jprb,&
 &0.4700_jprb, 0.4400_jprb, 0.4600_jprb, 0.4900_jprb, 0.4800_jprb, 0.4200_jprb, 0.3500_jprb, 0.3300_jprb,&
 &0.3100_jprb, 0.2700_jprb, 0.2700_jprb /)
zozcl(:, 3, 3) = (/&
 &0.1500_jprb, 0.1500_jprb, 0.2100_jprb, 0.2400_jprb, 0.3000_jprb, 0.3800_jprb, 0.4300_jprb, 0.4300_jprb,&
 &0.4100_jprb, 0.4000_jprb, 0.4100_jprb, 0.4200_jprb, 0.4100_jprb, 0.3600_jprb, 0.3000_jprb, 0.2600_jprb,&
 &0.2200_jprb, 0.1600_jprb, 0.1600_jprb /)
zozcl(:, 4, 3) = (/&
 &0.1200_jprb, 0.1200_jprb, 0.1900_jprb, 0.2200_jprb, 0.2600_jprb, 0.3300_jprb, 0.3800_jprb, 0.3700_jprb,&
 &0.3400_jprb, 0.3200_jprb, 0.3400_jprb, 0.3700_jprb, 0.3900_jprb, 0.3800_jprb, 0.3400_jprb, 0.2800_jprb,&
 &0.2200_jprb, 0.1500_jprb, 0.1500_jprb /)
zozcl(:, 5, 3) = (/&
 &0.1200_jprb, 0.1200_jprb, 0.1500_jprb, 0.1600_jprb, 0.2000_jprb, 0.2400_jprb, 0.2500_jprb, 0.2300_jprb,&
 &0.2100_jprb, 0.2000_jprb, 0.2200_jprb, 0.2600_jprb, 0.3200_jprb, 0.3800_jprb, 0.3900_jprb, 0.3500_jprb,&
 &0.3100_jprb, 0.2300_jprb, 0.2300_jprb /)
zozcl(:, 6, 3) = (/&
 &0.1500_jprb, 0.1500_jprb, 0.1500_jprb, 0.1400_jprb, 0.1500_jprb, 0.1700_jprb, 0.1700_jprb, 0.1600_jprb,&
 &0.1500_jprb, 0.1600_jprb, 0.1600_jprb, 0.1900_jprb, 0.2400_jprb, 0.3200_jprb, 0.3800_jprb, 0.3900_jprb,&
 &0.3700_jprb, 0.3100_jprb, 0.3100_jprb /)
zozcl(:, 7, 3) = (/&
 &0.2000_jprb, 0.2000_jprb, 0.1800_jprb, 0.1700_jprb, 0.1500_jprb, 0.1400_jprb, 0.1500_jprb, 0.1700_jprb,&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.2300_jprb, 0.2900_jprb, 0.3700_jprb,&
 &0.4300_jprb, 0.4100_jprb, 0.4100_jprb /)
zozcl(:, 8, 3) = (/&
 &0.3000_jprb, 0.3000_jprb, 0.3000_jprb, 0.2800_jprb, 0.2700_jprb, 0.2500_jprb, 0.2500_jprb, 0.2500_jprb,&
 &0.2400_jprb, 0.2300_jprb, 0.2400_jprb, 0.2500_jprb, 0.2600_jprb, 0.2800_jprb, 0.3000_jprb, 0.3700_jprb,&
 &0.4600_jprb, 0.4800_jprb, 0.4800_jprb /)
zozcl(:, 9, 3) = (/&
 &0.4000_jprb, 0.4000_jprb, 0.4000_jprb, 0.4100_jprb, 0.4000_jprb, 0.3800_jprb, 0.3500_jprb, 0.3400_jprb,&
 &0.3200_jprb, 0.3100_jprb, 0.3200_jprb, 0.3600_jprb, 0.3900_jprb, 0.4100_jprb, 0.4300_jprb, 0.4600_jprb,&
 &0.5000_jprb, 0.5200_jprb, 0.5200_jprb /)
zozcl(:,10, 3) = (/&
 &0.5500_jprb, 0.5500_jprb, 0.5400_jprb, 0.5300_jprb, 0.5200_jprb, 0.5100_jprb, 0.5000_jprb, 0.5100_jprb,&
 &0.5000_jprb, 0.4800_jprb, 0.4700_jprb, 0.4800_jprb, 0.4900_jprb, 0.5200_jprb, 0.5400_jprb, 0.5500_jprb,&
 &0.5700_jprb, 0.6100_jprb, 0.6100_jprb /)
zozcl(:,11, 3) = (/&
 &0.7900_jprb, 0.7900_jprb, 0.7600_jprb, 0.7700_jprb, 0.7800_jprb, 0.7700_jprb, 0.7500_jprb, 0.7500_jprb,&
 &0.7400_jprb, 0.7300_jprb, 0.7200_jprb, 0.7100_jprb, 0.7200_jprb, 0.7400_jprb, 0.7400_jprb, 0.7300_jprb,&
 &0.7400_jprb, 0.7500_jprb, 0.7500_jprb /)
zozcl(:,12, 3) = (/&
 &0.9900_jprb, 0.9900_jprb, 0.9700_jprb, 0.9800_jprb, 1.0000_jprb, 0.9900_jprb, 0.9700_jprb, 0.9600_jprb,&
 &0.9600_jprb, 0.9500_jprb, 0.9400_jprb, 0.9300_jprb, 0.9200_jprb, 0.9400_jprb, 0.9400_jprb, 0.9000_jprb,&
 &0.9100_jprb, 0.9300_jprb, 0.9300_jprb /)
zozcl(:,13, 3) = (/&
 &1.3300_jprb, 1.3300_jprb, 1.3500_jprb, 1.3600_jprb, 1.3800_jprb, 1.3900_jprb, 1.3700_jprb, 1.3300_jprb,&
 &1.3300_jprb, 1.3400_jprb, 1.3300_jprb, 1.3200_jprb, 1.3200_jprb, 1.3300_jprb, 1.3200_jprb, 1.2800_jprb,&
 &1.2900_jprb, 1.3500_jprb, 1.3500_jprb /)
zozcl(:,14, 3) = (/&
 &1.9700_jprb, 1.9700_jprb, 1.9600_jprb, 1.9200_jprb, 1.9300_jprb, 1.9500_jprb, 1.9200_jprb, 1.8900_jprb,&
 &1.8800_jprb, 1.8900_jprb, 1.8900_jprb, 1.9200_jprb, 1.9400_jprb, 1.9400_jprb, 1.9600_jprb, 2.0200_jprb,&
 &2.1200_jprb, 2.2700_jprb, 2.2700_jprb /)
zozcl(:,15, 3) = (/&
 &2.8200_jprb, 2.8200_jprb, 2.5800_jprb, 2.4200_jprb, 2.4000_jprb, 2.4000_jprb, 2.3700_jprb, 2.3200_jprb,&
 &2.3000_jprb, 2.3000_jprb, 2.3100_jprb, 2.3500_jprb, 2.4100_jprb, 2.4200_jprb, 2.5000_jprb, 2.6800_jprb,&
 &2.8900_jprb, 3.0000_jprb, 3.0000_jprb /)
zozcl(:,16, 3) = (/&
 &3.8600_jprb, 3.8600_jprb, 3.6200_jprb, 3.3000_jprb, 3.2000_jprb, 3.1700_jprb, 3.1100_jprb, 2.9900_jprb,&
 &2.9000_jprb, 2.8800_jprb, 2.9200_jprb, 3.0300_jprb, 3.1700_jprb, 3.2700_jprb, 3.4500_jprb, 3.7500_jprb,&
 &3.9600_jprb, 3.9300_jprb, 3.9300_jprb /)
zozcl(:,17, 3) = (/&
 &5.0100_jprb, 5.0100_jprb, 5.0400_jprb, 4.6600_jprb, 4.4600_jprb, 4.3600_jprb, 4.2800_jprb, 4.0600_jprb,&
 &3.8300_jprb, 3.7700_jprb, 3.8600_jprb, 4.1000_jprb, 4.3900_jprb, 4.6700_jprb, 5.0200_jprb, 5.3300_jprb,&
 &5.3200_jprb, 5.0000_jprb, 5.0000_jprb /)

zozcl(:,18, 3) = (/&
 &5.4100_jprb, 5.4100_jprb, 5.8000_jprb, 5.6800_jprb, 5.5300_jprb, 5.4500_jprb, 5.3700_jprb, 5.1200_jprb,&
 &4.8000_jprb, 4.7100_jprb, 4.8500_jprb, 5.1500_jprb, 5.5100_jprb, 5.9200_jprb, 6.2800_jprb, 6.4200_jprb,&
 &6.1800_jprb, 5.7400_jprb, 5.7400_jprb /)
zozcl(:,19, 3) = (/&
 &5.3900_jprb, 5.3900_jprb, 6.2600_jprb, 6.7600_jprb, 6.9300_jprb, 7.0000_jprb, 7.0600_jprb, 6.9300_jprb,&
 &6.6000_jprb, 6.4800_jprb, 6.6300_jprb, 6.9100_jprb, 7.2100_jprb, 7.6100_jprb, 7.7300_jprb, 7.4100_jprb,&
 &6.8800_jprb, 6.4900_jprb, 6.4900_jprb /)
zozcl(:,20, 3) = (/&
 &5.0800_jprb, 5.0800_jprb, 6.0500_jprb, 6.8800_jprb, 7.5300_jprb, 7.9800_jprb, 8.4100_jprb, 8.7200_jprb,&
 &8.8900_jprb, 8.7600_jprb, 8.6400_jprb, 8.5200_jprb, 8.4500_jprb, 8.4200_jprb, 7.9600_jprb, 7.2500_jprb,&
 &6.6500_jprb, 6.5000_jprb, 6.5000_jprb /)
zozcl(:,21, 3) = (/&
 &4.6500_jprb, 4.6500_jprb, 5.4000_jprb, 6.4000_jprb, 7.3000_jprb, 7.9900_jprb, 8.6900_jprb, 9.3100_jprb,&
 &9.8800_jprb, 9.9200_jprb, 9.5300_jprb, 9.0600_jprb, 8.6000_jprb, 8.0800_jprb, 7.4200_jprb, 6.7000_jprb,&
 &6.2800_jprb, 6.3000_jprb, 6.3000_jprb /)
zozcl(:,22, 3) = (/&
 &4.0900_jprb, 4.0900_jprb, 4.5200_jprb, 5.6100_jprb, 6.6400_jprb, 7.5300_jprb, 8.4300_jprb, 9.2700_jprb,&
 &10.1800_jprb,10.4300_jprb, 9.8000_jprb, 9.0300_jprb, 8.1800_jprb, 7.3100_jprb, 6.6500_jprb, 6.1500_jprb,&
 &6.0300_jprb, 6.1800_jprb, 6.1800_jprb /)
zozcl(:,23, 3) = (/&
 &3.7300_jprb, 3.7300_jprb, 3.9800_jprb, 4.8800_jprb, 5.8300_jprb, 6.6300_jprb, 7.3900_jprb, 8.0300_jprb,&
 &8.6500_jprb, 8.8000_jprb, 8.3400_jprb, 7.8100_jprb, 7.1800_jprb, 6.4600_jprb, 6.0500_jprb, 5.8200_jprb,&
 &5.8600_jprb, 5.9500_jprb, 5.9500_jprb /)
zozcl(:,24, 3) = (/&
 &3.6100_jprb, 3.6100_jprb, 3.8500_jprb, 4.4800_jprb, 5.2200_jprb, 5.8100_jprb, 6.2800_jprb, 6.6300_jprb,&
 &6.9400_jprb, 6.9800_jprb, 6.7600_jprb, 6.5900_jprb, 6.3300_jprb, 5.9100_jprb, 5.6800_jprb, 5.6600_jprb,&
 &5.6800_jprb, 5.5800_jprb, 5.5800_jprb /)
zozcl(:,25, 3) = (/&
 &3.1224_jprb, 3.1224_jprb, 3.6151_jprb, 3.7775_jprb, 4.1300_jprb, 4.3723_jprb, 4.4483_jprb, 4.4100_jprb,&
 &4.1969_jprb, 4.0694_jprb, 4.1500_jprb, 4.4000_jprb, 4.8127_jprb, 4.9401_jprb, 4.9680_jprb, 5.3133_jprb,&
 &5.0041_jprb, 4.9122_jprb, 4.9122_jprb /)
zozcl(:,26, 3) = (/&
 &2.6334_jprb, 2.6334_jprb, 2.7121_jprb, 2.6930_jprb, 2.5200_jprb, 2.2178_jprb, 1.8100_jprb, 1.7700_jprb,&
 &1.4103_jprb, 1.4057_jprb, 1.6100_jprb, 2.0200_jprb, 2.5684_jprb, 3.3099_jprb, 3.5610_jprb, 3.9360_jprb,&
 &3.8361_jprb, 4.1727_jprb, 4.1727_jprb /)
zozcl(:,27, 3) = (/&
 &2.0332_jprb, 2.0332_jprb, 1.9125_jprb, 1.8489_jprb, 1.6700_jprb, 1.1312_jprb, 0.5907_jprb, 0.7700_jprb,&
 &0.4366_jprb, 0.4548_jprb, 0.6900_jprb, 0.8800_jprb, 1.1434_jprb, 1.9708_jprb, 2.2482_jprb, 2.6371_jprb,&
 &2.6979_jprb, 3.0926_jprb, 3.0926_jprb /)
zozcl(:,28, 3) = (/&
 &1.1385_jprb, 1.1385_jprb, 0.9831_jprb, 0.8470_jprb, 0.4810_jprb, 0.3561_jprb, 0.1400_jprb, 0.1253_jprb,&
 &0.0974_jprb, 0.1627_jprb, 0.2000_jprb, 0.1653_jprb, 0.3618_jprb, 0.9371_jprb, 1.0914_jprb, 1.5090_jprb,&
 &1.6604_jprb, 2.0711_jprb, 2.0711_jprb /)
zozcl(:,29, 3) = (/&
 &0.4663_jprb, 0.4663_jprb, 0.4136_jprb, 0.2400_jprb, 0.1867_jprb, 0.1333_jprb, 0.0967_jprb, 0.0849_jprb,&
 &0.0506_jprb, 0.0800_jprb, 0.1020_jprb, 0.0796_jprb, 0.1820_jprb, 0.5252_jprb, 0.6249_jprb, 0.8747_jprb,&
 &0.8605_jprb, 1.1893_jprb, 1.1893_jprb /)
zozcl(:,30, 3) = (/&
 &0.2737_jprb, 0.2737_jprb, 0.2403_jprb, 0.1800_jprb, 0.1205_jprb, 0.0946_jprb, 0.0740_jprb, 0.0662_jprb,&
 &0.0375_jprb, 0.0530_jprb, 0.0740_jprb, 0.0561_jprb, 0.1221_jprb, 0.3503_jprb, 0.3935_jprb, 0.5720_jprb,&
 &0.5387_jprb, 0.6621_jprb, 0.6621_jprb /)
zozcl(:,31, 3) = (/&
 &0.0813_jprb, 0.0813_jprb, 0.0808_jprb, 0.0600_jprb, 0.0493_jprb, 0.0642_jprb, 0.0617_jprb, 0.0560_jprb,&
 &0.0363_jprb, 0.0436_jprb, 0.0510_jprb, 0.0466_jprb, 0.0676_jprb, 0.0846_jprb, 0.0938_jprb, 0.1320_jprb,&
 &0.1410_jprb, 0.1591_jprb, 0.1591_jprb /)
zozcl(:,32, 3) = (/&
 &0.0285_jprb, 0.0285_jprb, 0.0364_jprb, 0.0294_jprb, 0.0320_jprb, 0.0354_jprb, 0.0586_jprb, 0.0538_jprb,&
 &0.0366_jprb, 0.0472_jprb, 0.0610_jprb, 0.0460_jprb, 0.0515_jprb, 0.0539_jprb, 0.0573_jprb, 0.0522_jprb,&
 &0.0549_jprb, 0.0467_jprb, 0.0467_jprb /)
zozcl(:,33, 3) = (/&
 &0.0220_jprb, 0.0220_jprb, 0.0279_jprb, 0.0243_jprb, 0.0254_jprb, 0.0318_jprb, 0.0404_jprb, 0.0373_jprb,&
 &0.0268_jprb, 0.0363_jprb, 0.0471_jprb, 0.0443_jprb, 0.0465_jprb, 0.0492_jprb, 0.0480_jprb, 0.0470_jprb,&
 &0.0471_jprb, 0.0386_jprb, 0.0386_jprb /)
zozcl(:,34, 3) = (/&
 &0.0220_jprb, 0.0220_jprb, 0.0279_jprb, 0.0243_jprb, 0.0254_jprb, 0.0318_jprb, 0.0404_jprb, 0.0373_jprb,&
 &0.0268_jprb, 0.0363_jprb, 0.0471_jprb, 0.0443_jprb, 0.0465_jprb, 0.0492_jprb, 0.0480_jprb, 0.0470_jprb,&
 &0.0471_jprb, 0.0386_jprb, 0.0386_jprb /)

! Month:  4
zozcl(:, 1, 4) = (/&
 &0.8500_jprb, 0.8500_jprb, 0.8100_jprb, 0.7700_jprb, 0.8300_jprb, 0.9200_jprb, 0.9300_jprb, 0.8400_jprb,&
 &0.7700_jprb, 0.7600_jprb, 0.7900_jprb, 0.9300_jprb, 1.0100_jprb, 0.8300_jprb, 0.5800_jprb, 0.5200_jprb,&
 &0.5600_jprb, 0.6300_jprb, 0.6300_jprb /)
zozcl(:, 2, 4) = (/&
 &0.3900_jprb, 0.3900_jprb, 0.3700_jprb, 0.3500_jprb, 0.4300_jprb, 0.5400_jprb, 0.5700_jprb, 0.5000_jprb,&
 &0.4400_jprb, 0.4300_jprb, 0.4700_jprb, 0.6200_jprb, 0.7200_jprb, 0.6100_jprb, 0.4300_jprb, 0.3600_jprb,&
 &0.3800_jprb, 0.4200_jprb, 0.4200_jprb /)
zozcl(:, 3, 4) = (/&
 &0.2600_jprb, 0.2600_jprb, 0.2500_jprb, 0.2400_jprb, 0.3200_jprb, 0.4100_jprb, 0.4400_jprb, 0.4100_jprb,&
 &0.3900_jprb, 0.3900_jprb, 0.4100_jprb, 0.4900_jprb, 0.5600_jprb, 0.5100_jprb, 0.4100_jprb, 0.3400_jprb,&
 &0.3200_jprb, 0.3000_jprb, 0.3000_jprb /)
zozcl(:, 4, 4) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.2600_jprb, 0.2500_jprb, 0.3000_jprb, 0.3400_jprb, 0.3400_jprb, 0.3400_jprb,&
 &0.3500_jprb, 0.3500_jprb, 0.3500_jprb, 0.3800_jprb, 0.4600_jprb, 0.4800_jprb, 0.4400_jprb, 0.4100_jprb,&
 &0.3500_jprb, 0.2500_jprb, 0.2500_jprb /)
zozcl(:, 5, 4) = (/&
 &0.3100_jprb, 0.3100_jprb, 0.2900_jprb, 0.2800_jprb, 0.2700_jprb, 0.2600_jprb, 0.2200_jprb, 0.2000_jprb,&
 &0.2200_jprb, 0.2300_jprb, 0.2200_jprb, 0.2400_jprb, 0.3200_jprb, 0.4100_jprb, 0.4400_jprb, 0.4300_jprb,&
 &0.3900_jprb, 0.2900_jprb, 0.2900_jprb /)
zozcl(:, 6, 4) = (/&
 &0.3100_jprb, 0.3100_jprb, 0.2900_jprb, 0.2800_jprb, 0.2200_jprb, 0.1900_jprb, 0.1600_jprb, 0.1500_jprb,&
 &0.1500_jprb, 0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.2300_jprb, 0.3100_jprb, 0.3500_jprb, 0.3700_jprb,&
 &0.3700_jprb, 0.3100_jprb, 0.3100_jprb /)
zozcl(:, 7, 4) = (/&
 &0.2900_jprb, 0.2900_jprb, 0.2700_jprb, 0.2600_jprb, 0.1800_jprb, 0.1600_jprb, 0.1600_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.2100_jprb, 0.2300_jprb, 0.2600_jprb,&
 &0.3000_jprb, 0.3300_jprb, 0.3300_jprb /)
zozcl(:, 8, 4) = (/&
 &0.3500_jprb, 0.3500_jprb, 0.3400_jprb, 0.3200_jprb, 0.2800_jprb, 0.2700_jprb, 0.2600_jprb, 0.2600_jprb,&
 &0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2700_jprb, 0.2700_jprb, 0.2800_jprb, 0.2900_jprb, 0.3100_jprb,&
 &0.3500_jprb, 0.3900_jprb, 0.3900_jprb /)
zozcl(:, 9, 4) = (/&
 &0.4600_jprb, 0.4600_jprb, 0.4400_jprb, 0.4200_jprb, 0.4100_jprb, 0.4000_jprb, 0.3800_jprb, 0.3700_jprb,&
 &0.3500_jprb, 0.3400_jprb, 0.3400_jprb, 0.3700_jprb, 0.3800_jprb, 0.3900_jprb, 0.4100_jprb, 0.4300_jprb,&
 &0.4600_jprb, 0.4900_jprb, 0.4900_jprb /)
zozcl(:,10, 4) = (/&
 &0.6200_jprb, 0.6200_jprb, 0.5900_jprb, 0.5600_jprb, 0.5600_jprb, 0.5500_jprb, 0.5400_jprb, 0.5400_jprb,&
 &0.5200_jprb, 0.5000_jprb, 0.4900_jprb, 0.5000_jprb, 0.4900_jprb, 0.4900_jprb, 0.5000_jprb, 0.5300_jprb,&
 &0.5500_jprb, 0.5600_jprb, 0.5600_jprb /)
zozcl(:,11, 4) = (/&
 &0.8800_jprb, 0.8800_jprb, 0.8400_jprb, 0.8000_jprb, 0.8100_jprb, 0.7900_jprb, 0.7900_jprb, 0.7900_jprb,&
 &0.7800_jprb, 0.7600_jprb, 0.7500_jprb, 0.7500_jprb, 0.7400_jprb, 0.7300_jprb, 0.7300_jprb, 0.7300_jprb,&
 &0.7300_jprb, 0.7300_jprb, 0.7300_jprb /)
zozcl(:,12, 4) = (/&
 &1.1700_jprb, 1.1700_jprb, 1.1100_jprb, 1.0600_jprb, 1.0500_jprb, 1.0100_jprb, 1.0000_jprb, 1.0100_jprb,&
 &1.0000_jprb, 0.9800_jprb, 0.9700_jprb, 0.9600_jprb, 0.9500_jprb, 0.9400_jprb, 0.9300_jprb, 0.9100_jprb,&
 &0.9000_jprb, 0.8900_jprb, 0.8900_jprb /)
zozcl(:,13, 4) = (/&
 &1.7000_jprb, 1.7000_jprb, 1.6100_jprb, 1.5400_jprb, 1.5000_jprb, 1.4300_jprb, 1.4000_jprb, 1.3900_jprb,&
 &1.3800_jprb, 1.3600_jprb, 1.3500_jprb, 1.3500_jprb, 1.3300_jprb, 1.3200_jprb, 1.2900_jprb, 1.2600_jprb,&
 &1.2400_jprb, 1.2400_jprb, 1.2400_jprb /)
zozcl(:,14, 4) = (/&
 &2.5000_jprb, 2.5000_jprb, 2.3800_jprb, 2.2700_jprb, 2.1700_jprb, 2.0400_jprb, 1.9600_jprb, 1.9300_jprb,&
 &1.9400_jprb, 1.9400_jprb, 1.9300_jprb, 1.9400_jprb, 1.9400_jprb, 1.8900_jprb, 1.8400_jprb, 1.8300_jprb,&
 &1.8600_jprb, 1.9000_jprb, 1.9000_jprb /)
zozcl(:,15, 4) = (/&
 &3.4900_jprb, 3.4900_jprb, 3.3400_jprb, 2.9600_jprb, 2.7700_jprb, 2.5600_jprb, 2.4200_jprb, 2.3600_jprb,&
 &2.3700_jprb, 2.3700_jprb, 2.3700_jprb, 2.4000_jprb, 2.4100_jprb, 2.3300_jprb, 2.2600_jprb, 2.2800_jprb,&
 &2.3700_jprb, 2.4800_jprb, 2.4800_jprb /)
zozcl(:,16, 4) = (/&
 &4.6400_jprb, 4.6400_jprb, 4.6400_jprb, 4.1900_jprb, 3.8700_jprb, 3.5200_jprb, 3.2500_jprb, 3.0700_jprb,&
 &2.9900_jprb, 2.9700_jprb, 2.9900_jprb, 3.0600_jprb, 3.1100_jprb, 3.0300_jprb, 2.9600_jprb, 3.0300_jprb,&
 &3.1800_jprb, 3.3500_jprb, 3.3500_jprb /)
zozcl(:,17, 4) = (/&
 &5.5900_jprb, 5.5900_jprb, 6.0600_jprb, 5.8400_jprb, 5.4800_jprb, 5.0100_jprb, 4.5700_jprb, 4.1600_jprb,&
 &3.9300_jprb, 3.8800_jprb, 3.9400_jprb, 4.0800_jprb, 4.2100_jprb, 4.1800_jprb, 4.1600_jprb, 4.3000_jprb,&
 &4.4800_jprb, 4.5700_jprb, 4.5700_jprb /)

zozcl(:,18, 4) = (/&
 &5.6500_jprb, 5.6500_jprb, 6.3900_jprb, 6.6500_jprb, 6.5100_jprb, 6.1400_jprb, 5.7100_jprb, 5.2300_jprb,&
 &4.9000_jprb, 4.8300_jprb, 4.9300_jprb, 5.1300_jprb, 5.3100_jprb, 5.3500_jprb, 5.3900_jprb, 5.5500_jprb,&
 &5.6300_jprb, 5.4900_jprb, 5.4900_jprb /)
zozcl(:,19, 4) = (/&
 &5.1800_jprb, 5.1800_jprb, 5.9800_jprb, 6.9300_jprb, 7.3400_jprb, 7.4000_jprb, 7.3000_jprb, 6.9900_jprb,&
 &6.5800_jprb, 6.4900_jprb, 6.6600_jprb, 6.9500_jprb, 7.1200_jprb, 7.2500_jprb, 7.3100_jprb, 7.3000_jprb,&
 &7.0200_jprb, 6.4200_jprb, 6.4200_jprb /)
zozcl(:,20, 4) = (/&
 &4.9400_jprb, 4.9400_jprb, 5.5400_jprb, 6.4800_jprb, 6.9800_jprb, 7.8100_jprb, 8.3300_jprb, 8.5800_jprb,&
 &8.4600_jprb, 8.4400_jprb, 8.3600_jprb, 8.5700_jprb, 8.5700_jprb, 8.6400_jprb, 8.4100_jprb, 7.6400_jprb,&
 &6.9900_jprb, 6.1400_jprb, 6.1400_jprb /)
zozcl(:,21, 4) = (/&
 &4.6600_jprb, 4.6600_jprb, 5.0900_jprb, 5.9000_jprb, 6.5300_jprb, 7.5700_jprb, 8.4200_jprb, 9.1000_jprb,&
 &9.4700_jprb, 9.5600_jprb, 9.3000_jprb, 9.1100_jprb, 8.8600_jprb, 8.5900_jprb, 8.0400_jprb, 7.1700_jprb,&
 &6.3700_jprb, 5.6800_jprb, 5.6800_jprb /)
zozcl(:,22, 4) = (/&
 &4.1800_jprb, 4.1800_jprb, 4.5000_jprb, 5.2300_jprb, 5.8700_jprb, 6.9900_jprb, 8.0400_jprb, 9.0300_jprb,&
 &9.9400_jprb,10.2500_jprb, 9.7100_jprb, 9.0500_jprb, 8.5700_jprb, 7.9100_jprb, 7.1600_jprb, 6.4400_jprb,&
 &5.7800_jprb, 5.4000_jprb, 5.4000_jprb /)
zozcl(:,23, 4) = (/&
 &3.7300_jprb, 3.7300_jprb, 4.1500_jprb, 4.8200_jprb, 5.3000_jprb, 6.2100_jprb, 7.1300_jprb, 7.9400_jprb,&
 &8.6900_jprb, 8.8900_jprb, 8.5000_jprb, 7.9700_jprb, 7.5700_jprb, 6.9000_jprb, 6.2800_jprb, 5.8000_jprb,&
 &5.4000_jprb, 5.3000_jprb, 5.3000_jprb /)
zozcl(:,24, 4) = (/&
 &3.4600_jprb, 3.4600_jprb, 4.0300_jprb, 4.6300_jprb, 4.8800_jprb, 5.5400_jprb, 6.1700_jprb, 6.6300_jprb,&
 &7.0600_jprb, 7.1500_jprb, 7.0200_jprb, 6.8100_jprb, 6.6500_jprb, 6.1900_jprb, 5.7400_jprb, 5.4200_jprb,&
 &5.2400_jprb, 5.2600_jprb, 5.2600_jprb /)
zozcl(:,25, 4) = (/&
 &3.0632_jprb, 3.0632_jprb, 3.4158_jprb, 3.5100_jprb, 4.3100_jprb, 4.3752_jprb, 4.5208_jprb, 4.4600_jprb,&
 &4.2765_jprb, 4.1155_jprb, 4.5100_jprb, 4.7700_jprb, 4.8950_jprb, 4.9389_jprb, 4.9170_jprb, 4.8658_jprb,&
 &4.6739_jprb, 4.4704_jprb, 4.4704_jprb /)
zozcl(:,26, 4) = (/&
 &2.7866_jprb, 2.7866_jprb, 2.8827_jprb, 2.2940_jprb, 2.3100_jprb, 2.3000_jprb, 1.8480_jprb, 1.7500_jprb,&
 &1.4017_jprb, 1.3223_jprb, 1.9100_jprb, 2.1500_jprb, 2.4873_jprb, 3.0727_jprb, 3.3838_jprb, 3.6860_jprb,&
 &3.4798_jprb, 3.6792_jprb, 3.6792_jprb /)
zozcl(:,27, 4) = (/&
 &2.0170_jprb, 2.0170_jprb, 2.1027_jprb, 1.5043_jprb, 1.2057_jprb, 1.2311_jprb, 0.6146_jprb, 0.7500_jprb,&
 &0.4326_jprb, 0.4324_jprb, 0.8300_jprb, 0.9200_jprb, 1.0115_jprb, 1.7445_jprb, 2.1317_jprb, 2.5600_jprb,&
 &2.4715_jprb, 2.6507_jprb, 2.6507_jprb /)
zozcl(:,28, 4) = (/&
 &1.0687_jprb, 1.0687_jprb, 1.1158_jprb, 0.8870_jprb, 0.4880_jprb, 0.4550_jprb, 0.1530_jprb, 0.1371_jprb,&
 &0.0946_jprb, 0.1433_jprb, 0.2040_jprb, 0.1863_jprb, 0.3347_jprb, 0.8332_jprb, 1.1081_jprb, 1.4170_jprb,&
 &1.3721_jprb, 1.5628_jprb, 1.5628_jprb /)
zozcl(:,29, 4) = (/&
 &0.4071_jprb, 0.4071_jprb, 0.4014_jprb, 0.2647_jprb, 0.1933_jprb, 0.1891_jprb, 0.0920_jprb, 0.0776_jprb,&
 &0.0395_jprb, 0.0654_jprb, 0.0907_jprb, 0.0952_jprb, 0.1664_jprb, 0.4858_jprb, 0.6369_jprb, 0.7840_jprb,&
 &0.8782_jprb, 1.0681_jprb, 1.0681_jprb /)
zozcl(:,30, 4) = (/&
 &0.2599_jprb, 0.2599_jprb, 0.2491_jprb, 0.1898_jprb, 0.0915_jprb, 0.0924_jprb, 0.0690_jprb, 0.0586_jprb,&
 &0.0327_jprb, 0.0566_jprb, 0.0740_jprb, 0.0723_jprb, 0.1213_jprb, 0.3358_jprb, 0.4177_jprb, 0.5340_jprb,&
 &0.6533_jprb, 0.6759_jprb, 0.6759_jprb /)
zozcl(:,31, 4) = (/&
 &0.0723_jprb, 0.0723_jprb, 0.0732_jprb, 0.0400_jprb, 0.0433_jprb, 0.0441_jprb, 0.0517_jprb, 0.0451_jprb,&
 &0.0301_jprb, 0.0512_jprb, 0.0647_jprb, 0.0615_jprb, 0.0745_jprb, 0.0995_jprb, 0.1084_jprb, 0.1423_jprb,&
 &0.1592_jprb, 0.1711_jprb, 0.1711_jprb /)
zozcl(:,32, 4) = (/&
 &0.0306_jprb, 0.0306_jprb, 0.0345_jprb, 0.0334_jprb, 0.0346_jprb, 0.0344_jprb, 0.0400_jprb, 0.0366_jprb,&
 &0.0300_jprb, 0.0491_jprb, 0.0620_jprb, 0.0554_jprb, 0.0574_jprb, 0.0620_jprb, 0.0659_jprb, 0.0626_jprb,&
 &0.0634_jprb, 0.0558_jprb, 0.0558_jprb /)
zozcl(:,33, 4) = (/&
 &0.0251_jprb, 0.0251_jprb, 0.0280_jprb, 0.0281_jprb, 0.0269_jprb, 0.0290_jprb, 0.0376_jprb, 0.0341_jprb,&
 &0.0280_jprb, 0.0385_jprb, 0.0357_jprb, 0.0480_jprb, 0.0493_jprb, 0.0564_jprb, 0.0559_jprb, 0.0556_jprb,&
 &0.0570_jprb, 0.0493_jprb, 0.0493_jprb /)
zozcl(:,34, 4) = (/&
 &0.0251_jprb, 0.0251_jprb, 0.0280_jprb, 0.0281_jprb, 0.0269_jprb, 0.0290_jprb, 0.0376_jprb, 0.0341_jprb,&
 &0.0280_jprb, 0.0385_jprb, 0.0357_jprb, 0.0480_jprb, 0.0493_jprb, 0.0564_jprb, 0.0559_jprb, 0.0556_jprb,&
 &0.0570_jprb, 0.0493_jprb, 0.0493_jprb /)

! Month:  5
zozcl(:, 1, 5) = (/&
 &0.9400_jprb, 0.9400_jprb, 1.0600_jprb, 0.9900_jprb, 0.9900_jprb, 1.0200_jprb, 0.9200_jprb, 0.7500_jprb,&
 &0.6500_jprb, 0.6300_jprb, 0.6700_jprb, 0.7500_jprb, 0.8500_jprb, 0.8400_jprb, 0.7400_jprb, 0.6400_jprb,&
 &0.5600_jprb, 0.4800_jprb, 0.4800_jprb /)
zozcl(:, 2, 5) = (/&
 &0.4800_jprb, 0.4800_jprb, 0.5500_jprb, 0.5100_jprb, 0.5100_jprb, 0.5700_jprb, 0.5300_jprb, 0.4600_jprb,&
 &0.4200_jprb, 0.4100_jprb, 0.4300_jprb, 0.5200_jprb, 0.6200_jprb, 0.6300_jprb, 0.5600_jprb, 0.4900_jprb,&
 &0.4100_jprb, 0.3300_jprb, 0.3300_jprb /)
zozcl(:, 3, 5) = (/&
 &0.3100_jprb, 0.3100_jprb, 0.3500_jprb, 0.3300_jprb, 0.3300_jprb, 0.3800_jprb, 0.3800_jprb, 0.4000_jprb,&
 &0.4200_jprb, 0.4300_jprb, 0.4300_jprb, 0.4500_jprb, 0.5000_jprb, 0.5000_jprb, 0.4600_jprb, 0.4100_jprb,&
 &0.3300_jprb, 0.2500_jprb, 0.2500_jprb /)
zozcl(:, 4, 5) = (/&
 &0.2600_jprb, 0.2600_jprb, 0.2900_jprb, 0.2700_jprb, 0.2600_jprb, 0.2900_jprb, 0.3200_jprb, 0.3700_jprb,&
 &0.4100_jprb, 0.4200_jprb, 0.4000_jprb, 0.3800_jprb, 0.3800_jprb, 0.3800_jprb, 0.3500_jprb, 0.3300_jprb,&
 &0.2800_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 5, 5) = (/&
 &0.2300_jprb, 0.2300_jprb, 0.2600_jprb, 0.2400_jprb, 0.2400_jprb, 0.2200_jprb, 0.2300_jprb, 0.2400_jprb,&
 &0.2600_jprb, 0.2600_jprb, 0.2500_jprb, 0.2400_jprb, 0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2400_jprb,&
 &0.2100_jprb, 0.1900_jprb, 0.1900_jprb /)
zozcl(:, 6, 5) = (/&
 &0.2100_jprb, 0.2100_jprb, 0.2400_jprb, 0.2200_jprb, 0.2200_jprb, 0.1800_jprb, 0.1700_jprb, 0.1700_jprb,&
 &0.1800_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.1900_jprb, 0.2000_jprb, 0.1900_jprb,&
 &0.1900_jprb, 0.1800_jprb, 0.1800_jprb /)
zozcl(:, 7, 5) = (/&
 &0.2100_jprb, 0.2100_jprb, 0.2400_jprb, 0.2200_jprb, 0.2200_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.1900_jprb, 0.2000_jprb, 0.1900_jprb,&
 &0.1900_jprb, 0.2000_jprb, 0.2000_jprb /)
zozcl(:, 8, 5) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.3200_jprb, 0.3000_jprb, 0.3000_jprb, 0.2800_jprb, 0.2800_jprb, 0.2700_jprb,&
 &0.2600_jprb, 0.2700_jprb, 0.2700_jprb, 0.2700_jprb, 0.2700_jprb, 0.2800_jprb, 0.2900_jprb, 0.2800_jprb,&
 &0.2900_jprb, 0.3100_jprb, 0.3100_jprb /)
zozcl(:, 9, 5) = (/&
 &0.3900_jprb, 0.3900_jprb, 0.4400_jprb, 0.4100_jprb, 0.4100_jprb, 0.4100_jprb, 0.4000_jprb, 0.3900_jprb,&
 &0.3800_jprb, 0.3800_jprb, 0.3800_jprb, 0.3800_jprb, 0.3700_jprb, 0.3800_jprb, 0.3900_jprb, 0.3900_jprb,&
 &0.4000_jprb, 0.4300_jprb, 0.4300_jprb /)
zozcl(:,10, 5) = (/&
 &0.5600_jprb, 0.5600_jprb, 0.6300_jprb, 0.5900_jprb, 0.5800_jprb, 0.5700_jprb, 0.5600_jprb, 0.5600_jprb,&
 &0.5500_jprb, 0.5300_jprb, 0.5300_jprb, 0.5200_jprb, 0.5000_jprb, 0.4900_jprb, 0.5100_jprb, 0.5300_jprb,&
 &0.5400_jprb, 0.5400_jprb, 0.5400_jprb /)
zozcl(:,11, 5) = (/&
 &0.8000_jprb, 0.8000_jprb, 0.9100_jprb, 0.8500_jprb, 0.8500_jprb, 0.8100_jprb, 0.8100_jprb, 0.8300_jprb,&
 &0.8100_jprb, 0.7900_jprb, 0.7900_jprb, 0.8000_jprb, 0.7800_jprb, 0.7600_jprb, 0.7500_jprb, 0.7600_jprb,&
 &0.7500_jprb, 0.7300_jprb, 0.7300_jprb /)
zozcl(:,12, 5) = (/&
 &1.0600_jprb, 1.0600_jprb, 1.2000_jprb, 1.1200_jprb, 1.1200_jprb, 1.0500_jprb, 1.0300_jprb, 1.0500_jprb,&
 &1.0300_jprb, 1.0100_jprb, 1.0200_jprb, 1.0200_jprb, 1.0000_jprb, 0.9700_jprb, 0.9500_jprb, 0.9400_jprb,&
 &0.9100_jprb, 0.8800_jprb, 0.8800_jprb /)
zozcl(:,13, 5) = (/&
 &1.5800_jprb, 1.5800_jprb, 1.7900_jprb, 1.6800_jprb, 1.6700_jprb, 1.5200_jprb, 1.4300_jprb, 1.4200_jprb,&
 &1.4100_jprb, 1.3900_jprb, 1.4000_jprb, 1.3900_jprb, 1.3600_jprb, 1.3300_jprb, 1.2900_jprb, 1.2500_jprb,&
 &1.2000_jprb, 1.1600_jprb, 1.1600_jprb /)
zozcl(:,14, 5) = (/&
 &2.3200_jprb, 2.3200_jprb, 2.6400_jprb, 2.4700_jprb, 2.4600_jprb, 2.2400_jprb, 2.0200_jprb, 1.9600_jprb,&
 &1.9700_jprb, 1.9700_jprb, 1.9700_jprb, 1.9600_jprb, 1.9500_jprb, 1.8900_jprb, 1.8200_jprb, 1.7400_jprb,&
 &1.6500_jprb, 1.5900_jprb, 1.5900_jprb /)
zozcl(:,15, 5) = (/&
 &3.0600_jprb, 3.0600_jprb, 3.6600_jprb, 3.5000_jprb, 3.3500_jprb, 2.8900_jprb, 2.5400_jprb, 2.4300_jprb,&
 &2.4200_jprb, 2.4200_jprb, 2.4200_jprb, 2.4200_jprb, 2.4000_jprb, 2.3300_jprb, 2.2300_jprb, 2.1200_jprb,&
 &2.0400_jprb, 1.9700_jprb, 1.9700_jprb /)
zozcl(:,16, 5) = (/&
 &4.0500_jprb, 4.0500_jprb, 4.9700_jprb, 4.9100_jprb, 4.7900_jprb, 4.0900_jprb, 3.4900_jprb, 3.1800_jprb,&
 &3.0900_jprb, 3.0700_jprb, 3.0600_jprb, 3.0700_jprb, 3.0300_jprb, 2.9200_jprb, 2.7900_jprb, 2.6700_jprb,&
 &2.5900_jprb, 2.5900_jprb, 2.5900_jprb /)
zozcl(:,17, 5) = (/&
 &4.9600_jprb, 4.9600_jprb, 6.3000_jprb, 6.3900_jprb, 6.6100_jprb, 5.8500_jprb, 4.9800_jprb, 4.3300_jprb,&
 &4.1000_jprb, 4.0500_jprb, 4.0400_jprb, 4.0600_jprb, 4.0200_jprb, 3.8800_jprb, 3.7300_jprb, 3.6200_jprb,&
 &3.5400_jprb, 3.6400_jprb, 3.6400_jprb /)

zozcl(:,18, 5) = (/&
 &5.1300_jprb, 5.1300_jprb, 6.5200_jprb, 6.7700_jprb, 7.3800_jprb, 6.9400_jprb, 6.1500_jprb, 5.4100_jprb,&
 &5.1000_jprb, 5.0300_jprb, 5.0500_jprb, 5.1100_jprb, 5.0700_jprb, 4.9400_jprb, 4.8100_jprb, 4.7200_jprb,&
 &4.6200_jprb, 4.7500_jprb, 4.7500_jprb /)
zozcl(:,19, 5) = (/&
 &4.8900_jprb, 4.8900_jprb, 6.0700_jprb, 6.3900_jprb, 7.4600_jprb, 7.7600_jprb, 7.5400_jprb, 7.0600_jprb,&
 &6.7400_jprb, 6.6800_jprb, 6.7700_jprb, 6.9300_jprb, 6.9200_jprb, 6.8200_jprb, 6.7300_jprb, 6.6000_jprb,&
 &6.3100_jprb, 6.3000_jprb, 6.3000_jprb /)
zozcl(:,20, 5) = (/&
 &4.3800_jprb, 4.3800_jprb, 5.7900_jprb, 5.7300_jprb, 6.7400_jprb, 7.6000_jprb, 8.1900_jprb, 8.4000_jprb,&
 &8.2700_jprb, 8.2200_jprb, 8.4500_jprb, 8.5700_jprb, 8.4800_jprb, 8.3900_jprb, 8.1700_jprb, 7.5400_jprb,&
 &6.7500_jprb, 6.1900_jprb, 6.1900_jprb /)
zozcl(:,21, 5) = (/&
 &3.8700_jprb, 3.8700_jprb, 5.4600_jprb, 5.3100_jprb, 6.1900_jprb, 7.1700_jprb, 8.0700_jprb, 8.7900_jprb,&
 &9.1300_jprb, 9.1000_jprb, 9.2400_jprb, 9.0900_jprb, 8.8600_jprb, 8.5900_jprb, 8.1300_jprb, 7.3100_jprb,&
 &6.2600_jprb, 5.4700_jprb, 5.4700_jprb /)
zozcl(:,22, 5) = (/&
 &3.3700_jprb, 3.3700_jprb, 4.9300_jprb, 4.9300_jprb, 5.6200_jprb, 6.5700_jprb, 7.5700_jprb, 8.6900_jprb,&
 &9.6300_jprb, 9.7700_jprb, 9.5700_jprb, 8.9800_jprb, 8.6100_jprb, 8.1500_jprb, 7.5200_jprb, 6.6900_jprb,&
 &5.6300_jprb, 4.8400_jprb, 4.8400_jprb /)
zozcl(:,23, 5) = (/&
 &3.1200_jprb, 3.1200_jprb, 4.4300_jprb, 4.7400_jprb, 5.3300_jprb, 6.0400_jprb, 6.8000_jprb, 7.7200_jprb,&
 &8.4800_jprb, 8.6400_jprb, 8.4400_jprb, 7.9500_jprb, 7.6400_jprb, 7.1700_jprb, 6.5900_jprb, 5.9200_jprb,&
 &5.0600_jprb, 4.4300_jprb, 4.4300_jprb /)
zozcl(:,24, 5) = (/&
 &3.0200_jprb, 3.0200_jprb, 4.1300_jprb, 4.6100_jprb, 5.0700_jprb, 5.5500_jprb, 6.0100_jprb, 6.5600_jprb,&
 &6.9800_jprb, 7.0700_jprb, 7.0400_jprb, 6.8200_jprb, 6.6900_jprb, 6.3900_jprb, 5.9200_jprb, 5.4100_jprb,&
 &4.7600_jprb, 4.3200_jprb, 4.3200_jprb /)
zozcl(:,25, 5) = (/&
 &2.9516_jprb, 2.9516_jprb, 3.4781_jprb, 3.6833_jprb, 4.4667_jprb, 4.8018_jprb, 4.7850_jprb, 4.5500_jprb,&
 &4.2181_jprb, 4.1108_jprb, 4.5700_jprb, 4.8100_jprb, 5.0088_jprb, 4.8876_jprb, 4.7114_jprb, 4.5625_jprb,&
 &4.0898_jprb, 4.1086_jprb, 4.1086_jprb /)
zozcl(:,26, 5) = (/&
 &2.8832_jprb, 2.8832_jprb, 2.7087_jprb, 2.6900_jprb, 2.3040_jprb, 2.5666_jprb, 1.9860_jprb, 1.8200_jprb,&
 &1.5096_jprb, 1.4102_jprb, 1.7700_jprb, 2.1900_jprb, 2.5664_jprb, 2.8653_jprb, 3.0488_jprb, 3.2530_jprb,&
 &3.2127_jprb, 3.2361_jprb, 3.2361_jprb /)
zozcl(:,27, 5) = (/&
 &2.0883_jprb, 2.0883_jprb, 1.8960_jprb, 1.9786_jprb, 1.3543_jprb, 1.4206_jprb, 0.7654_jprb, 0.7400_jprb,&
 &0.4328_jprb, 0.4241_jprb, 0.6800_jprb, 1.0200_jprb, 1.0424_jprb, 1.5531_jprb, 1.8924_jprb, 2.2554_jprb,&
 &2.3132_jprb, 2.4103_jprb, 2.4103_jprb /)
zozcl(:,28, 5) = (/&
 &1.1625_jprb, 1.1625_jprb, 1.0276_jprb, 0.9200_jprb, 0.5320_jprb, 0.5041_jprb, 0.1900_jprb, 0.1769_jprb,&
 &0.1036_jprb, 0.1433_jprb, 0.1935_jprb, 0.2574_jprb, 0.3144_jprb, 0.7746_jprb, 0.9693_jprb, 1.1890_jprb,&
 &1.3057_jprb, 1.4491_jprb, 1.4491_jprb /)
zozcl(:,29, 5) = (/&
 &0.4193_jprb, 0.4193_jprb, 0.3927_jprb, 0.4000_jprb, 0.3267_jprb, 0.2070_jprb, 0.1120_jprb, 0.1028_jprb,&
 &0.0514_jprb, 0.0754_jprb, 0.0987_jprb, 0.1170_jprb, 0.1789_jprb, 0.4257_jprb, 0.5698_jprb, 0.7120_jprb,&
 &0.7996_jprb, 0.8829_jprb, 0.8829_jprb /)
zozcl(:,30, 5) = (/&
 &0.2230_jprb, 0.2230_jprb, 0.2099_jprb, 0.2939_jprb, 0.1485_jprb, 0.1130_jprb, 0.0840_jprb, 0.0767_jprb,&
 &0.0367_jprb, 0.0658_jprb, 0.0820_jprb, 0.0748_jprb, 0.1186_jprb, 0.2669_jprb, 0.3765_jprb, 0.5405_jprb,&
 &0.6006_jprb, 0.6398_jprb, 0.6398_jprb /)
zozcl(:,31, 5) = (/&
 &0.0655_jprb, 0.0655_jprb, 0.0684_jprb, 0.0817_jprb, 0.0553_jprb, 0.0403_jprb, 0.0480_jprb, 0.0450_jprb,&
 &0.0287_jprb, 0.0469_jprb, 0.0673_jprb, 0.0601_jprb, 0.0723_jprb, 0.0953_jprb, 0.1043_jprb, 0.1463_jprb,&
 &0.2142_jprb, 0.2053_jprb, 0.2053_jprb /)
zozcl(:,32, 5) = (/&
 &0.0340_jprb, 0.0340_jprb, 0.0374_jprb, 0.0290_jprb, 0.0324_jprb, 0.0353_jprb, 0.0408_jprb, 0.0392_jprb,&
 &0.0312_jprb, 0.0474_jprb, 0.0555_jprb, 0.0564_jprb, 0.0634_jprb, 0.0663_jprb, 0.0679_jprb, 0.0658_jprb,&
 &0.0669_jprb, 0.0658_jprb, 0.0658_jprb /)
zozcl(:,33, 5) = (/&
 &0.0291_jprb, 0.0291_jprb, 0.0310_jprb, 0.0279_jprb, 0.0276_jprb, 0.0307_jprb, 0.0397_jprb, 0.0378_jprb,&
 &0.0271_jprb, 0.0307_jprb, 0.0318_jprb, 0.0465_jprb, 0.0547_jprb, 0.0581_jprb, 0.0590_jprb, 0.0570_jprb,&
 &0.0535_jprb, 0.0531_jprb, 0.0531_jprb /)
zozcl(:,34, 5) = (/&
 &0.0291_jprb, 0.0291_jprb, 0.0310_jprb, 0.0279_jprb, 0.0276_jprb, 0.0307_jprb, 0.0397_jprb, 0.0378_jprb,&
 &0.0271_jprb, 0.0307_jprb, 0.0318_jprb, 0.0465_jprb, 0.0547_jprb, 0.0581_jprb, 0.0590_jprb, 0.0570_jprb,&
 &0.0535_jprb, 0.0531_jprb, 0.0531_jprb /)

! Month:  6
zozcl(:, 1, 6) = (/&
 &0.7500_jprb, 0.7500_jprb, 0.7700_jprb, 0.8700_jprb, 0.8600_jprb, 0.8000_jprb, 0.7800_jprb, 0.5900_jprb,&
 &0.4700_jprb, 0.4700_jprb, 0.5400_jprb, 0.6200_jprb, 0.7300_jprb, 0.8700_jprb, 0.9400_jprb, 0.8800_jprb,&
 &0.7200_jprb, 0.5700_jprb, 0.5700_jprb /)
zozcl(:, 2, 6) = (/&
 &0.4700_jprb, 0.4700_jprb, 0.4800_jprb, 0.5400_jprb, 0.5400_jprb, 0.5000_jprb, 0.5000_jprb, 0.3800_jprb,&
 &0.3400_jprb, 0.3800_jprb, 0.4100_jprb, 0.4300_jprb, 0.5100_jprb, 0.6300_jprb, 0.6300_jprb, 0.5000_jprb,&
 &0.3900_jprb, 0.3200_jprb, 0.3200_jprb /)
zozcl(:, 3, 6) = (/&
 &0.3300_jprb, 0.3300_jprb, 0.3400_jprb, 0.3800_jprb, 0.3700_jprb, 0.3500_jprb, 0.3700_jprb, 0.3400_jprb,&
 &0.3500_jprb, 0.3800_jprb, 0.3800_jprb, 0.3600_jprb, 0.3800_jprb, 0.4600_jprb, 0.4200_jprb, 0.3000_jprb,&
 &0.2500_jprb, 0.2200_jprb, 0.2200_jprb /)
zozcl(:, 4, 6) = (/&
 &0.2500_jprb, 0.2500_jprb, 0.2600_jprb, 0.2900_jprb, 0.2900_jprb, 0.2600_jprb, 0.2900_jprb, 0.3000_jprb,&
 &0.3100_jprb, 0.3100_jprb, 0.3000_jprb, 0.2800_jprb, 0.2700_jprb, 0.2800_jprb, 0.2500_jprb, 0.1900_jprb,&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb /)
zozcl(:, 5, 6) = (/&
 &0.2000_jprb, 0.2000_jprb, 0.2000_jprb, 0.2300_jprb, 0.2200_jprb, 0.2100_jprb, 0.2200_jprb, 0.2100_jprb,&
 &0.2000_jprb, 0.1900_jprb, 0.1900_jprb, 0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.1800_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1600_jprb /)
zozcl(:, 6, 6) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.2000_jprb, 0.1900_jprb, 0.1800_jprb, 0.1700_jprb, 0.1600_jprb,&
 &0.1500_jprb, 0.1400_jprb, 0.1500_jprb, 0.1400_jprb, 0.1400_jprb, 0.1600_jprb, 0.1700_jprb, 0.1700_jprb,&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb /)
zozcl(:, 7, 6) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.2000_jprb, 0.1900_jprb, 0.1800_jprb, 0.1700_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.2000_jprb, 0.2000_jprb,&
 &0.2000_jprb, 0.2000_jprb, 0.2000_jprb /)
zozcl(:, 8, 6) = (/&
 &0.2900_jprb, 0.2900_jprb, 0.3000_jprb, 0.3400_jprb, 0.3300_jprb, 0.3100_jprb, 0.3000_jprb, 0.2800_jprb,&
 &0.2600_jprb, 0.2600_jprb, 0.2600_jprb, 0.2600_jprb, 0.2700_jprb, 0.2700_jprb, 0.2800_jprb, 0.2700_jprb,&
 &0.2800_jprb, 0.3000_jprb, 0.3000_jprb /)
zozcl(:, 9, 6) = (/&
 &0.4200_jprb, 0.4200_jprb, 0.4300_jprb, 0.4900_jprb, 0.4800_jprb, 0.4500_jprb, 0.4500_jprb, 0.4100_jprb,&
 &0.3800_jprb, 0.3700_jprb, 0.3700_jprb, 0.3800_jprb, 0.3900_jprb, 0.3800_jprb, 0.3800_jprb, 0.3800_jprb,&
 &0.3900_jprb, 0.4000_jprb, 0.4000_jprb /)
zozcl(:,10, 6) = (/&
 &0.5400_jprb, 0.5400_jprb, 0.5600_jprb, 0.6300_jprb, 0.6200_jprb, 0.5700_jprb, 0.5600_jprb, 0.5600_jprb,&
 &0.5600_jprb, 0.5700_jprb, 0.5800_jprb, 0.5800_jprb, 0.5500_jprb, 0.5200_jprb, 0.5300_jprb, 0.5600_jprb,&
 &0.5500_jprb, 0.5600_jprb, 0.5600_jprb /)
zozcl(:,11, 6) = (/&
 &0.7600_jprb, 0.7600_jprb, 0.7900_jprb, 0.8900_jprb, 0.8800_jprb, 0.8200_jprb, 0.8200_jprb, 0.8300_jprb,&
 &0.8300_jprb, 0.8300_jprb, 0.8500_jprb, 0.8800_jprb, 0.8400_jprb, 0.8000_jprb, 0.8000_jprb, 0.8000_jprb,&
 &0.8000_jprb, 0.7800_jprb, 0.7800_jprb /)
zozcl(:,12, 6) = (/&
 &0.9900_jprb, 0.9900_jprb, 1.0200_jprb, 1.1500_jprb, 1.1400_jprb, 1.0600_jprb, 1.0400_jprb, 1.0500_jprb,&
 &1.0600_jprb, 1.0600_jprb, 1.0800_jprb, 1.1100_jprb, 1.0800_jprb, 1.0300_jprb, 1.0100_jprb, 0.9900_jprb,&
 &0.9600_jprb, 0.9300_jprb, 0.9300_jprb /)
zozcl(:,13, 6) = (/&
 &1.4300_jprb, 1.4300_jprb, 1.4700_jprb, 1.6700_jprb, 1.6400_jprb, 1.5300_jprb, 1.4400_jprb, 1.4400_jprb,&
 &1.4700_jprb, 1.4700_jprb, 1.4800_jprb, 1.4900_jprb, 1.4400_jprb, 1.3900_jprb, 1.3500_jprb, 1.3000_jprb,&
 &1.2400_jprb, 1.1800_jprb, 1.1800_jprb /)
zozcl(:,14, 6) = (/&
 &2.1000_jprb, 2.1000_jprb, 2.1700_jprb, 2.4600_jprb, 2.4200_jprb, 2.2600_jprb, 2.0200_jprb, 1.9800_jprb,&
 &2.0000_jprb, 2.0000_jprb, 1.9900_jprb, 1.9800_jprb, 1.9500_jprb, 1.8700_jprb, 1.7800_jprb, 1.6700_jprb,&
 &1.5500_jprb, 1.4600_jprb, 1.4600_jprb /)
zozcl(:,15, 6) = (/&
 &2.8600_jprb, 2.8600_jprb, 2.9400_jprb, 3.5600_jprb, 3.5400_jprb, 2.9600_jprb, 2.5600_jprb, 2.4600_jprb,&
 &2.4600_jprb, 2.4600_jprb, 2.4500_jprb, 2.4400_jprb, 2.4100_jprb, 2.3000_jprb, 2.1600_jprb, 1.9900_jprb,&
 &1.8300_jprb, 1.7100_jprb, 1.7100_jprb /)
zozcl(:,16, 6) = (/&
 &3.9200_jprb, 3.9200_jprb, 4.0200_jprb, 5.0100_jprb, 5.1600_jprb, 4.2900_jprb, 3.5600_jprb, 3.3000_jprb,&
 &3.2200_jprb, 3.1900_jprb, 3.1600_jprb, 3.1300_jprb, 3.0500_jprb, 2.8800_jprb, 2.6800_jprb, 2.4700_jprb,&
 &2.2800_jprb, 2.1600_jprb, 2.1600_jprb /)
zozcl(:,17, 6) = (/&
 &5.1400_jprb, 5.1400_jprb, 5.2800_jprb, 6.5000_jprb, 7.1100_jprb, 6.1800_jprb, 5.0600_jprb, 4.5100_jprb,&
 &4.3000_jprb, 4.2400_jprb, 4.1900_jprb, 4.1500_jprb, 3.9800_jprb, 3.7300_jprb, 3.4900_jprb, 3.2400_jprb,&
 &3.0500_jprb, 2.9700_jprb, 2.9700_jprb /) 

zozcl(:,18, 6) = (/&
 &5.5200_jprb, 5.5200_jprb, 5.6800_jprb, 6.7700_jprb, 7.7400_jprb, 7.2700_jprb, 6.1600_jprb, 5.5500_jprb,&
 &5.3000_jprb, 5.2300_jprb, 5.2100_jprb, 5.2000_jprb, 5.0100_jprb, 4.7300_jprb, 4.4900_jprb, 4.2400_jprb,&
 &4.0500_jprb, 4.0300_jprb, 4.0300_jprb /)
zozcl(:,19, 6) = (/&
 &5.3000_jprb, 5.3000_jprb, 5.4800_jprb, 6.2000_jprb, 7.3600_jprb, 7.9600_jprb, 7.4300_jprb, 7.0500_jprb,&
 &6.9100_jprb, 6.8800_jprb, 6.9400_jprb, 7.0200_jprb, 6.8400_jprb, 6.5900_jprb, 6.3800_jprb, 6.0700_jprb,&
 &5.8300_jprb, 5.8700_jprb, 5.8700_jprb /)
zozcl(:,20, 6) = (/&
 &4.7300_jprb, 4.7300_jprb, 4.9300_jprb, 5.6400_jprb, 6.3100_jprb, 7.4700_jprb, 7.8600_jprb, 8.1400_jprb,&
 &8.4500_jprb, 8.4900_jprb, 8.5700_jprb, 8.5600_jprb, 8.3800_jprb, 8.1600_jprb, 7.8800_jprb, 7.1400_jprb,&
 &6.3500_jprb, 6.0800_jprb, 6.0800_jprb /)
zozcl(:,21, 6) = (/&
 &4.3200_jprb, 4.3200_jprb, 4.5000_jprb, 5.3200_jprb, 5.7000_jprb, 6.9600_jprb, 7.7100_jprb, 8.4200_jprb,&
 &8.9600_jprb, 9.1200_jprb, 9.1600_jprb, 8.9800_jprb, 8.8100_jprb, 8.4600_jprb, 7.9800_jprb, 7.0100_jprb,&
 &5.9300_jprb, 5.3700_jprb, 5.3700_jprb /)
zozcl(:,22, 6) = (/&
 &3.9400_jprb, 3.9400_jprb, 4.0500_jprb, 5.0200_jprb, 5.1000_jprb, 6.3100_jprb, 7.1900_jprb, 8.2200_jprb,&
 &9.0000_jprb, 9.2500_jprb, 9.1600_jprb, 8.6800_jprb, 8.5500_jprb, 8.0800_jprb, 7.4800_jprb, 6.5100_jprb,&
 &5.4300_jprb, 4.7100_jprb, 4.7100_jprb /)
zozcl(:,23, 6) = (/&
 &3.7800_jprb, 3.7800_jprb, 3.8600_jprb, 4.8200_jprb, 5.0700_jprb, 5.8700_jprb, 6.4500_jprb, 7.2000_jprb,&
 &7.7800_jprb, 8.0500_jprb, 7.9600_jprb, 7.5000_jprb, 7.4100_jprb, 7.0200_jprb, 6.4900_jprb, 5.6900_jprb,&
 &4.7500_jprb, 4.1800_jprb, 4.1800_jprb /)
zozcl(:,24, 6) = (/&
 &3.7000_jprb, 3.7000_jprb, 3.7900_jprb, 4.6800_jprb, 5.0000_jprb, 5.5100_jprb, 5.7800_jprb, 6.1900_jprb,&
 &6.4500_jprb, 6.6400_jprb, 6.6800_jprb, 6.4200_jprb, 6.4300_jprb, 6.2200_jprb, 5.8200_jprb, 5.1700_jprb,&
 &4.3800_jprb, 3.9400_jprb, 3.9400_jprb /)
zozcl(:,25, 6) = (/&
 &3.2554_jprb, 3.2554_jprb, 3.5115_jprb, 3.8000_jprb, 4.5633_jprb, 4.9030_jprb, 4.8933_jprb, 4.6000_jprb,&
 &4.3704_jprb, 4.5273_jprb, 4.8100_jprb, 4.8000_jprb, 4.8910_jprb, 4.8032_jprb, 4.4982_jprb, 4.1575_jprb,&
 &3.6667_jprb, 3.5714_jprb, 3.5714_jprb /)
zozcl(:,26, 6) = (/&
 &2.8571_jprb, 2.8571_jprb, 2.7376_jprb, 2.9200_jprb, 2.5300_jprb, 2.6316_jprb, 2.1180_jprb, 1.9200_jprb,&
 &1.5042_jprb, 1.5932_jprb, 1.8100_jprb, 2.1200_jprb, 2.3813_jprb, 2.7239_jprb, 2.8073_jprb, 2.9790_jprb,&
 &2.8574_jprb, 2.9008_jprb, 2.9008_jprb /)
zozcl(:,27, 6) = (/&
 &2.1443_jprb, 2.1443_jprb, 2.0070_jprb, 2.0500_jprb, 1.5029_jprb, 1.5219_jprb, 0.7621_jprb, 0.7800_jprb,&
 &0.4756_jprb, 0.5596_jprb, 0.6700_jprb, 0.9900_jprb, 1.0350_jprb, 1.4139_jprb, 1.6538_jprb, 1.9796_jprb,&
 &2.0081_jprb, 2.1384_jprb, 2.1384_jprb /)
zozcl(:,28, 6) = (/&
 &1.1405_jprb, 1.1405_jprb, 1.0828_jprb, 0.9800_jprb, 0.7300_jprb, 0.6089_jprb, 0.2110_jprb, 0.1911_jprb,&
 &0.1132_jprb, 0.1752_jprb, 0.1830_jprb, 0.2386_jprb, 0.2869_jprb, 0.5876_jprb, 0.8400_jprb, 1.0000_jprb,&
 &1.1505_jprb, 1.1950_jprb, 1.1950_jprb /)
zozcl(:,29, 6) = (/&
 &0.4485_jprb, 0.4485_jprb, 0.3870_jprb, 0.4187_jprb, 0.3760_jprb, 0.3635_jprb, 0.1067_jprb, 0.0965_jprb,&
 &0.0605_jprb, 0.1267_jprb, 0.1067_jprb, 0.1310_jprb, 0.1509_jprb, 0.3484_jprb, 0.4746_jprb, 0.5433_jprb,&
 &0.6391_jprb, 0.6481_jprb, 0.6481_jprb /)
zozcl(:,30, 6) = (/&
 &0.2079_jprb, 0.2079_jprb, 0.1828_jprb, 0.2929_jprb, 0.2540_jprb, 0.2042_jprb, 0.0855_jprb, 0.0775_jprb,&
 &0.0487_jprb, 0.0990_jprb, 0.0900_jprb, 0.0729_jprb, 0.1079_jprb, 0.1876_jprb, 0.3129_jprb, 0.4250_jprb,&
 &0.5245_jprb, 0.5229_jprb, 0.5229_jprb /)
zozcl(:,31, 6) = (/&
 &0.0536_jprb, 0.0536_jprb, 0.0557_jprb, 0.0413_jprb, 0.0500_jprb, 0.0645_jprb, 0.0503_jprb, 0.0490_jprb,&
 &0.0452_jprb, 0.0680_jprb, 0.0700_jprb, 0.0552_jprb, 0.0754_jprb, 0.0816_jprb, 0.1056_jprb, 0.1360_jprb,&
 &0.1443_jprb, 0.1905_jprb, 0.1905_jprb /)
zozcl(:,32, 6) = (/&
 &0.0372_jprb, 0.0372_jprb, 0.0384_jprb, 0.0340_jprb, 0.0340_jprb, 0.0406_jprb, 0.0426_jprb, 0.0422_jprb,&
 &0.0413_jprb, 0.0520_jprb, 0.0490_jprb, 0.0509_jprb, 0.0590_jprb, 0.0627_jprb, 0.0704_jprb, 0.0678_jprb,&
 &0.0703_jprb, 0.0628_jprb, 0.0628_jprb /)
zozcl(:,33, 6) = (/&
 &0.0315_jprb, 0.0315_jprb, 0.0332_jprb, 0.0326_jprb, 0.0304_jprb, 0.0351_jprb, 0.0373_jprb, 0.0363_jprb,&
 &0.0331_jprb, 0.0377_jprb, 0.0279_jprb, 0.0438_jprb, 0.0537_jprb, 0.0538_jprb, 0.0587_jprb, 0.0533_jprb,&
 &0.0534_jprb, 0.0438_jprb, 0.0438_jprb /)
zozcl(:,34, 6) = (/&
 &0.0315_jprb, 0.0315_jprb, 0.0332_jprb, 0.0326_jprb, 0.0304_jprb, 0.0351_jprb, 0.0373_jprb, 0.0363_jprb,&
 &0.0331_jprb, 0.0377_jprb, 0.0279_jprb, 0.0438_jprb, 0.0537_jprb, 0.0538_jprb, 0.0587_jprb, 0.0533_jprb,&
 &0.0534_jprb, 0.0438_jprb, 0.0438_jprb /) 

! Month:  7
zozcl(:, 1, 7) = (/&
 &0.4800_jprb, 0.4800_jprb, 0.5100_jprb, 0.5600_jprb, 0.5800_jprb, 0.6600_jprb, 0.6300_jprb, 0.5300_jprb,&
 &0.4800_jprb, 0.4700_jprb, 0.5100_jprb, 0.6000_jprb, 0.6600_jprb, 0.7100_jprb, 0.8500_jprb, 0.9300_jprb,&
 &0.8000_jprb, 0.5800_jprb, 0.5800_jprb /)
zozcl(:, 2, 7) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.3000_jprb, 0.3300_jprb, 0.3400_jprb, 0.4100_jprb, 0.4100_jprb, 0.3700_jprb,&
 &0.3400_jprb, 0.3700_jprb, 0.4000_jprb, 0.4200_jprb, 0.4400_jprb, 0.4900_jprb, 0.5500_jprb, 0.5200_jprb,&
 &0.4000_jprb, 0.3100_jprb, 0.3100_jprb /)
zozcl(:, 3, 7) = (/&
 &0.2000_jprb, 0.2000_jprb, 0.2100_jprb, 0.2300_jprb, 0.2400_jprb, 0.2800_jprb, 0.3200_jprb, 0.3200_jprb,&
 &0.3300_jprb, 0.3500_jprb, 0.3600_jprb, 0.3500_jprb, 0.3400_jprb, 0.3600_jprb, 0.3700_jprb, 0.3000_jprb,&
 &0.2300_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 4, 7) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.1900_jprb, 0.2000_jprb, 0.2300_jprb, 0.2700_jprb, 0.2800_jprb,&
 &0.2800_jprb, 0.2800_jprb, 0.2700_jprb, 0.2500_jprb, 0.2400_jprb, 0.2400_jprb, 0.2200_jprb, 0.1900_jprb,&
 &0.1600_jprb, 0.1700_jprb, 0.1700_jprb /)
zozcl(:, 5, 7) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.2000_jprb, 0.2100_jprb, 0.2000_jprb, 0.2000_jprb, 0.1900_jprb,&
 &0.1700_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1600_jprb /)
zozcl(:, 6, 7) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.2000_jprb, 0.2100_jprb, 0.1700_jprb, 0.1600_jprb, 0.1500_jprb,&
 &0.1400_jprb, 0.1400_jprb, 0.1400_jprb, 0.1400_jprb, 0.1400_jprb, 0.1500_jprb, 0.1600_jprb, 0.1700_jprb,&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb /)
zozcl(:, 7, 7) = (/&
 &0.1800_jprb, 0.1800_jprb, 0.1900_jprb, 0.2100_jprb, 0.2200_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb,&
 &0.1600_jprb, 0.1700_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb, 0.1800_jprb, 0.1900_jprb, 0.2000_jprb,&
 &0.2000_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 8, 7) = (/&
 &0.2600_jprb, 0.2600_jprb, 0.2700_jprb, 0.3000_jprb, 0.3100_jprb, 0.3100_jprb, 0.2900_jprb, 0.2600_jprb,&
 &0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2400_jprb, 0.2400_jprb, 0.2700_jprb, 0.2800_jprb, 0.2800_jprb,&
 &0.2800_jprb, 0.3100_jprb, 0.3100_jprb /)
zozcl(:, 9, 7) = (/&
 &0.3600_jprb, 0.3600_jprb, 0.3800_jprb, 0.4100_jprb, 0.4300_jprb, 0.4600_jprb, 0.4400_jprb, 0.3900_jprb,&
 &0.3600_jprb, 0.3600_jprb, 0.3500_jprb, 0.3500_jprb, 0.3600_jprb, 0.3900_jprb, 0.3900_jprb, 0.3800_jprb,&
 &0.3800_jprb, 0.4100_jprb, 0.4100_jprb /)
zozcl(:,10, 7) = (/&
 &0.5100_jprb, 0.5100_jprb, 0.5400_jprb, 0.5800_jprb, 0.6100_jprb, 0.6000_jprb, 0.6000_jprb, 0.5600_jprb,&
 &0.5500_jprb, 0.5500_jprb, 0.5600_jprb, 0.5700_jprb, 0.5700_jprb, 0.5500_jprb, 0.5500_jprb, 0.5700_jprb,&
 &0.5500_jprb, 0.5600_jprb, 0.5600_jprb /)
zozcl(:,11, 7) = (/&
 &0.7400_jprb, 0.7400_jprb, 0.7900_jprb, 0.8500_jprb, 0.8900_jprb, 0.8500_jprb, 0.8600_jprb, 0.8300_jprb,&
 &0.8100_jprb, 0.8100_jprb, 0.8300_jprb, 0.8700_jprb, 0.8800_jprb, 0.8500_jprb, 0.8200_jprb, 0.8100_jprb,&
 &0.8100_jprb, 0.7900_jprb, 0.7900_jprb /)
zozcl(:,12, 7) = (/&
 &0.9400_jprb, 0.9400_jprb, 1.0100_jprb, 1.0900_jprb, 1.1400_jprb, 1.0900_jprb, 1.0800_jprb, 1.0500_jprb,&
 &1.0400_jprb, 1.0400_jprb, 1.0600_jprb, 1.1100_jprb, 1.1200_jprb, 1.0900_jprb, 1.0400_jprb, 1.0000_jprb,&
 &0.9800_jprb, 0.9500_jprb, 0.9500_jprb /)
zozcl(:,13, 7) = (/&
 &1.2200_jprb, 1.2200_jprb, 1.3000_jprb, 1.4100_jprb, 1.4700_jprb, 1.5300_jprb, 1.4900_jprb, 1.4500_jprb,&
 &1.4400_jprb, 1.4400_jprb, 1.4600_jprb, 1.5000_jprb, 1.5100_jprb, 1.4600_jprb, 1.3900_jprb, 1.3200_jprb,&
 &1.2600_jprb, 1.1900_jprb, 1.1900_jprb /)
zozcl(:,14, 7) = (/&
 &1.7700_jprb, 1.7700_jprb, 1.8900_jprb, 2.0500_jprb, 2.1400_jprb, 2.2200_jprb, 2.0700_jprb, 2.0000_jprb,&
 &1.9900_jprb, 1.9900_jprb, 1.9900_jprb, 2.0000_jprb, 2.0000_jprb, 1.9300_jprb, 1.8100_jprb, 1.6800_jprb,&
 &1.5500_jprb, 1.4400_jprb, 1.4400_jprb /)
zozcl(:,15, 7) = (/&
 &2.3400_jprb, 2.3400_jprb, 2.4900_jprb, 2.8500_jprb, 3.0300_jprb, 2.8600_jprb, 2.6000_jprb, 2.4800_jprb,&
 &2.4400_jprb, 2.4400_jprb, 2.4400_jprb, 2.4800_jprb, 2.4900_jprb, 2.3900_jprb, 2.2000_jprb, 2.0000_jprb,&
 &1.8200_jprb, 1.6600_jprb, 1.6600_jprb /)
zozcl(:,16, 7) = (/&
 &3.3100_jprb, 3.3100_jprb, 3.4800_jprb, 4.0600_jprb, 4.4000_jprb, 4.0500_jprb, 3.5800_jprb, 3.3400_jprb,&
 &3.2300_jprb, 3.1900_jprb, 3.1800_jprb, 3.2200_jprb, 3.1900_jprb, 3.0100_jprb, 2.7600_jprb, 2.5200_jprb,&
 &2.3000_jprb, 2.1400_jprb, 2.1400_jprb /)
zozcl(:,17, 7) = (/&
 &4.5300_jprb, 4.5300_jprb, 4.8100_jprb, 5.6200_jprb, 6.2800_jprb, 5.7600_jprb, 5.0400_jprb, 4.6100_jprb,&
 &4.3900_jprb, 4.3100_jprb, 4.2900_jprb, 4.3100_jprb, 4.1800_jprb, 3.9100_jprb, 3.6100_jprb, 3.3200_jprb,&
 &3.0800_jprb, 2.9700_jprb, 2.9700_jprb /) 

zozcl(:,18, 7) = (/&
 &5.0800_jprb, 5.0800_jprb, 5.4400_jprb, 6.2400_jprb, 7.1700_jprb, 6.8600_jprb, 6.1300_jprb, 5.6900_jprb,&
 &5.4700_jprb, 5.3800_jprb, 5.3700_jprb, 5.3800_jprb, 5.2000_jprb, 4.9000_jprb, 4.5900_jprb, 4.2800_jprb,&
 &4.0300_jprb, 3.9700_jprb, 3.9700_jprb /)
zozcl(:,19, 7) = (/&
 &5.2800_jprb, 5.2800_jprb, 5.5700_jprb, 6.2200_jprb, 7.3900_jprb, 7.7900_jprb, 7.4300_jprb, 7.2300_jprb,&
 &7.1600_jprb, 7.1200_jprb, 7.1500_jprb, 7.1800_jprb, 6.9800_jprb, 6.6800_jprb, 6.3700_jprb, 6.0000_jprb,&
 &5.6600_jprb, 5.6400_jprb, 5.6400_jprb /)
zozcl(:,20, 7) = (/&
 &5.0800_jprb, 5.0800_jprb, 5.2300_jprb, 5.7900_jprb, 6.6700_jprb, 7.5300_jprb, 7.9200_jprb, 8.2000_jprb,&
 &8.6400_jprb, 8.6300_jprb, 8.6100_jprb, 8.6300_jprb, 8.3900_jprb, 8.0600_jprb, 7.7000_jprb, 6.9900_jprb,&
 &6.1400_jprb, 5.8400_jprb, 5.8400_jprb /)
zozcl(:,21, 7) = (/&
 &4.7200_jprb, 4.7200_jprb, 4.8100_jprb, 5.3900_jprb, 6.0700_jprb, 7.0900_jprb, 7.8200_jprb, 8.3200_jprb,&
 &8.9500_jprb, 9.0900_jprb, 9.1600_jprb, 9.0100_jprb, 8.8100_jprb, 8.3800_jprb, 7.7900_jprb, 6.8600_jprb,&
 &5.7500_jprb, 5.1800_jprb, 5.1800_jprb /)
zozcl(:,22, 7) = (/&
 &4.1900_jprb, 4.1900_jprb, 4.2800_jprb, 4.9800_jprb, 5.4600_jprb, 6.4700_jprb, 7.3400_jprb, 7.9800_jprb,&
 &8.8100_jprb, 9.0200_jprb, 9.1000_jprb, 8.7200_jprb, 8.5500_jprb, 8.0400_jprb, 7.2800_jprb, 6.3300_jprb,&
 &5.2300_jprb, 4.5000_jprb, 4.5000_jprb /)
zozcl(:,23, 7) = (/&
 &3.8200_jprb, 3.8200_jprb, 3.9700_jprb, 4.7400_jprb, 5.2600_jprb, 5.9600_jprb, 6.5700_jprb, 6.9900_jprb,&
 &7.5400_jprb, 7.7800_jprb, 7.9000_jprb, 7.5300_jprb, 7.4000_jprb, 6.9700_jprb, 6.3300_jprb, 5.5000_jprb,&
 &4.5300_jprb, 3.9400_jprb, 3.9400_jprb /)
zozcl(:,24, 7) = (/&
 &3.7100_jprb, 3.7100_jprb, 3.8900_jprb, 4.6500_jprb, 5.1700_jprb, 5.6000_jprb, 5.9100_jprb, 6.0600_jprb,&
 &6.2700_jprb, 6.4500_jprb, 6.6600_jprb, 6.4300_jprb, 6.3800_jprb, 6.1300_jprb, 5.6600_jprb, 4.9800_jprb,&
 &4.1400_jprb, 3.6800_jprb, 3.6800_jprb /)
zozcl(:,25, 7) = (/&
 &3.4701_jprb, 3.4701_jprb, 3.5162_jprb, 3.9933_jprb, 4.6133_jprb, 5.0536_jprb, 4.9825_jprb, 4.5500_jprb,&
 &4.1718_jprb, 4.4264_jprb, 4.7800_jprb, 4.8400_jprb, 4.8924_jprb, 4.7025_jprb, 4.4212_jprb, 3.9383_jprb,&
 &3.5126_jprb, 3.1965_jprb, 3.1965_jprb /)
zozcl(:,26, 7) = (/&
 &2.9388_jprb, 2.9388_jprb, 2.7899_jprb, 2.9840_jprb, 2.7140_jprb, 2.9684_jprb, 2.3390_jprb, 2.0700_jprb,&
 &1.6414_jprb, 1.6086_jprb, 1.9200_jprb, 2.1400_jprb, 2.2499_jprb, 2.5745_jprb, 2.6698_jprb, 2.7470_jprb,&
 &2.6827_jprb, 2.6723_jprb, 2.6723_jprb /)
zozcl(:,27, 7) = (/&
 &1.9786_jprb, 1.9786_jprb, 2.0127_jprb, 2.0657_jprb, 1.6057_jprb, 1.6493_jprb, 0.8961_jprb, 0.8600_jprb,&
 &0.5157_jprb, 0.5622_jprb, 0.8200_jprb, 1.0500_jprb, 0.9857_jprb, 1.2802_jprb, 1.5339_jprb, 1.8314_jprb,&
 &1.8882_jprb, 2.0093_jprb, 2.0093_jprb /)
zozcl(:,28, 7) = (/&
 &1.2198_jprb, 1.2198_jprb, 1.1289_jprb, 0.8280_jprb, 0.7900_jprb, 0.6996_jprb, 0.2260_jprb, 0.2119_jprb,&
 &0.1338_jprb, 0.1909_jprb, 0.2510_jprb, 0.2425_jprb, 0.2364_jprb, 0.4753_jprb, 0.7528_jprb, 0.9720_jprb,&
 &1.0715_jprb, 1.1551_jprb, 1.1551_jprb /)
zozcl(:,29, 7) = (/&
 &0.4683_jprb, 0.4683_jprb, 0.4347_jprb, 0.5000_jprb, 0.3573_jprb, 0.3828_jprb, 0.1227_jprb, 0.1129_jprb,&
 &0.0627_jprb, 0.0932_jprb, 0.1120_jprb, 0.0643_jprb, 0.0984_jprb, 0.2115_jprb, 0.3913_jprb, 0.4927_jprb,&
 &0.5340_jprb, 0.5590_jprb, 0.5590_jprb /)
zozcl(:,30, 7) = (/&
 &0.2218_jprb, 0.2218_jprb, 0.1946_jprb, 0.3528_jprb, 0.2505_jprb, 0.2352_jprb, 0.0930_jprb, 0.0859_jprb,&
 &0.0536_jprb, 0.0781_jprb, 0.0850_jprb, 0.0484_jprb, 0.0767_jprb, 0.1375_jprb, 0.2833_jprb, 0.3725_jprb,&
 &0.4364_jprb, 0.4529_jprb, 0.4529_jprb /)
zozcl(:,31, 7) = (/&
 &0.0448_jprb, 0.0448_jprb, 0.0520_jprb, 0.0583_jprb, 0.0640_jprb, 0.0620_jprb, 0.0693_jprb, 0.0642_jprb,&
 &0.0442_jprb, 0.0606_jprb, 0.0560_jprb, 0.0391_jprb, 0.0618_jprb, 0.0840_jprb, 0.1020_jprb, 0.1090_jprb,&
 &0.1481_jprb, 0.1344_jprb, 0.1344_jprb /)
zozcl(:,32, 7) = (/&
 &0.0361_jprb, 0.0361_jprb, 0.0398_jprb, 0.0390_jprb, 0.0362_jprb, 0.0367_jprb, 0.0572_jprb, 0.0539_jprb,&
 &0.0400_jprb, 0.0499_jprb, 0.0476_jprb, 0.0394_jprb, 0.0482_jprb, 0.0667_jprb, 0.0718_jprb, 0.0686_jprb,&
 &0.0652_jprb, 0.0560_jprb, 0.0560_jprb /)
zozcl(:,33, 7) = (/&
 &0.0312_jprb, 0.0312_jprb, 0.0337_jprb, 0.0334_jprb, 0.0329_jprb, 0.0350_jprb, 0.0493_jprb, 0.0465_jprb,&
 &0.0319_jprb, 0.0340_jprb, 0.0307_jprb, 0.0343_jprb, 0.0299_jprb, 0.0549_jprb, 0.0563_jprb, 0.0479_jprb,&
 &0.0495_jprb, 0.0394_jprb, 0.0394_jprb /)
zozcl(:,34, 7) = (/&
 &0.0312_jprb, 0.0312_jprb, 0.0337_jprb, 0.0334_jprb, 0.0329_jprb, 0.0350_jprb, 0.0493_jprb, 0.0465_jprb,&
 &0.0319_jprb, 0.0340_jprb, 0.0307_jprb, 0.0343_jprb, 0.0299_jprb, 0.0549_jprb, 0.0563_jprb, 0.0479_jprb,&
 &0.0495_jprb, 0.0394_jprb, 0.0394_jprb /) 

! Month:  8
zozcl(:, 1, 8) = (/&
 &0.6000_jprb, 0.6000_jprb, 0.6200_jprb, 0.6200_jprb, 0.6600_jprb, 0.6900_jprb, 0.6700_jprb, 0.6100_jprb,&
 &0.6000_jprb, 0.6100_jprb, 0.6200_jprb, 0.6500_jprb, 0.6800_jprb, 0.6700_jprb, 0.6400_jprb, 0.6700_jprb,&
 &0.6000_jprb, 0.4400_jprb, 0.4400_jprb /)
zozcl(:, 2, 8) = (/&
 &0.3600_jprb, 0.3600_jprb, 0.3700_jprb, 0.3700_jprb, 0.4000_jprb, 0.4300_jprb, 0.4300_jprb, 0.4100_jprb,&
 &0.4000_jprb, 0.4000_jprb, 0.4100_jprb, 0.4400_jprb, 0.4600_jprb, 0.4300_jprb, 0.4100_jprb, 0.4100_jprb,&
 &0.3500_jprb, 0.2400_jprb, 0.2400_jprb /)
zozcl(:, 3, 8) = (/&
 &0.2500_jprb, 0.2500_jprb, 0.2600_jprb, 0.2600_jprb, 0.2900_jprb, 0.3200_jprb, 0.3400_jprb, 0.3500_jprb,&
 &0.3500_jprb, 0.3600_jprb, 0.3600_jprb, 0.3800_jprb, 0.3600_jprb, 0.3200_jprb, 0.2900_jprb, 0.2800_jprb,&
 &0.2200_jprb, 0.1800_jprb, 0.1800_jprb /)
zozcl(:, 4, 8) = (/&
 &0.2200_jprb, 0.2200_jprb, 0.2300_jprb, 0.2200_jprb, 0.2500_jprb, 0.2800_jprb, 0.3000_jprb, 0.3100_jprb,&
 &0.3100_jprb, 0.2900_jprb, 0.2900_jprb, 0.3100_jprb, 0.2700_jprb, 0.2300_jprb, 0.2000_jprb, 0.1700_jprb,&
 &0.1500_jprb, 0.1400_jprb, 0.1400_jprb /)
zozcl(:, 5, 8) = (/&
 &0.2400_jprb, 0.2400_jprb, 0.2500_jprb, 0.2500_jprb, 0.2300_jprb, 0.2300_jprb, 0.2400_jprb, 0.2200_jprb,&
 &0.1900_jprb, 0.1800_jprb, 0.1800_jprb, 0.1900_jprb, 0.1700_jprb, 0.1600_jprb, 0.1500_jprb, 0.1400_jprb,&
 &0.1400_jprb, 0.1300_jprb, 0.1300_jprb /)
zozcl(:, 6, 8) = (/&
 &0.2300_jprb, 0.2300_jprb, 0.2400_jprb, 0.2400_jprb, 0.2000_jprb, 0.1900_jprb, 0.1800_jprb, 0.1600_jprb,&
 &0.1400_jprb, 0.1400_jprb, 0.1400_jprb, 0.1500_jprb, 0.1400_jprb, 0.1400_jprb, 0.1400_jprb, 0.1400_jprb,&
 &0.1500_jprb, 0.1500_jprb, 0.1500_jprb /)
zozcl(:, 7, 8) = (/&
 &0.2300_jprb, 0.2300_jprb, 0.2400_jprb, 0.2400_jprb, 0.1900_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb, 0.1700_jprb, 0.1800_jprb,&
 &0.1800_jprb, 0.1900_jprb, 0.1900_jprb /)
zozcl(:, 8, 8) = (/&
 &0.3200_jprb, 0.3200_jprb, 0.3300_jprb, 0.3300_jprb, 0.3200_jprb, 0.3100_jprb, 0.3000_jprb, 0.2600_jprb,&
 &0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2400_jprb, 0.2500_jprb, 0.2600_jprb, 0.2700_jprb,&
 &0.2700_jprb, 0.2900_jprb, 0.2900_jprb /)
zozcl(:, 9, 8) = (/&
 &0.4200_jprb, 0.4200_jprb, 0.4400_jprb, 0.4400_jprb, 0.4700_jprb, 0.4800_jprb, 0.4400_jprb, 0.3800_jprb,&
 &0.3500_jprb, 0.3500_jprb, 0.3500_jprb, 0.3400_jprb, 0.3400_jprb, 0.3600_jprb, 0.3800_jprb, 0.3800_jprb,&
 &0.3800_jprb, 0.3900_jprb, 0.3900_jprb /)
zozcl(:,10, 8) = (/&
 &0.5800_jprb, 0.5800_jprb, 0.6000_jprb, 0.6000_jprb, 0.6100_jprb, 0.6200_jprb, 0.5900_jprb, 0.5400_jprb,&
 &0.5200_jprb, 0.5300_jprb, 0.5300_jprb, 0.5200_jprb, 0.5200_jprb, 0.5300_jprb, 0.5300_jprb, 0.5200_jprb,&
 &0.5200_jprb, 0.5400_jprb, 0.5400_jprb /)
zozcl(:,11, 8) = (/&
 &0.8100_jprb, 0.8100_jprb, 0.8400_jprb, 0.8400_jprb, 0.8500_jprb, 0.8800_jprb, 0.8700_jprb, 0.8200_jprb,&
 &0.7900_jprb, 0.7900_jprb, 0.7900_jprb, 0.7900_jprb, 0.8000_jprb, 0.8100_jprb, 0.8000_jprb, 0.7600_jprb,&
 &0.7500_jprb, 0.7300_jprb, 0.7300_jprb /)
zozcl(:,12, 8) = (/&
 &0.9700_jprb, 0.9700_jprb, 1.0100_jprb, 1.0100_jprb, 1.0900_jprb, 1.1200_jprb, 1.1100_jprb, 1.0500_jprb,&
 &1.0200_jprb, 1.0100_jprb, 1.0100_jprb, 1.0300_jprb, 1.0400_jprb, 1.0500_jprb, 1.0200_jprb, 0.9600_jprb,&
 &0.9200_jprb, 0.8900_jprb, 0.8900_jprb /)
zozcl(:,13, 8) = (/&
 &1.1300_jprb, 1.1300_jprb, 1.1800_jprb, 1.1800_jprb, 1.5600_jprb, 1.5800_jprb, 1.5400_jprb, 1.4700_jprb,&
 &1.4300_jprb, 1.4000_jprb, 1.3900_jprb, 1.4200_jprb, 1.4600_jprb, 1.4500_jprb, 1.3800_jprb, 1.3000_jprb,&
 &1.2300_jprb, 1.1800_jprb, 1.1800_jprb /)
zozcl(:,14, 8) = (/&
 &1.8200_jprb, 1.8200_jprb, 1.9000_jprb, 1.9000_jprb, 2.1900_jprb, 2.2200_jprb, 2.1100_jprb, 2.0000_jprb,&
 &1.9700_jprb, 1.9500_jprb, 1.9400_jprb, 1.9700_jprb, 2.0200_jprb, 1.9800_jprb, 1.8500_jprb, 1.7400_jprb,&
 &1.6400_jprb, 1.5600_jprb, 1.5600_jprb /)
zozcl(:,15, 8) = (/&
 &2.2000_jprb, 2.2000_jprb, 2.5000_jprb, 2.5500_jprb, 2.7600_jprb, 2.7900_jprb, 2.6000_jprb, 2.4500_jprb,&
 &2.4000_jprb, 2.3900_jprb, 2.4000_jprb, 2.4400_jprb, 2.5000_jprb, 2.4400_jprb, 2.2600_jprb, 2.1100_jprb,&
 &2.0100_jprb, 1.9200_jprb, 1.9200_jprb /)
zozcl(:,16, 8) = (/&
 &2.8400_jprb, 2.8400_jprb, 3.3500_jprb, 3.5400_jprb, 3.8700_jprb, 3.8700_jprb, 3.5500_jprb, 3.2900_jprb,&
 &3.1700_jprb, 3.1300_jprb, 3.1400_jprb, 3.2200_jprb, 3.2800_jprb, 3.1800_jprb, 2.9500_jprb, 2.7700_jprb,&
 &2.6500_jprb, 2.5500_jprb, 2.5500_jprb /)
zozcl(:,17, 8) = (/&
 &3.7800_jprb, 3.7800_jprb, 4.4100_jprb, 4.9700_jprb, 5.5100_jprb, 5.4300_jprb, 4.9700_jprb, 4.5500_jprb,&
 &4.3100_jprb, 4.2400_jprb, 4.2700_jprb, 4.3900_jprb, 4.4200_jprb, 4.2500_jprb, 3.9800_jprb, 3.7800_jprb,&
 &3.6100_jprb, 3.4800_jprb, 3.4800_jprb /) 

zozcl(:,18, 8) = (/&
 &4.3800_jprb, 4.3800_jprb, 4.9200_jprb, 5.7900_jprb, 6.6000_jprb, 6.5500_jprb, 6.0900_jprb, 5.6800_jprb,&
 &5.4200_jprb, 5.3300_jprb, 5.3700_jprb, 5.5100_jprb, 5.4900_jprb, 5.2700_jprb, 4.9900_jprb, 4.7700_jprb,&
 &4.5300_jprb, 4.3200_jprb, 4.3200_jprb /)
zozcl(:,19, 8) = (/&
 &4.8800_jprb, 4.8800_jprb, 5.2100_jprb, 6.3500_jprb, 7.5700_jprb, 7.7800_jprb, 7.5400_jprb, 7.3700_jprb,&
 &7.2300_jprb, 7.1600_jprb, 7.2000_jprb, 7.3200_jprb, 7.2300_jprb, 6.9400_jprb, 6.6400_jprb, 6.3400_jprb,&
 &5.8600_jprb, 5.4300_jprb, 5.4300_jprb /)
zozcl(:,20, 8) = (/&
 &5.2400_jprb, 5.2400_jprb, 5.3400_jprb, 6.1400_jprb, 7.2600_jprb, 7.9400_jprb, 8.1700_jprb, 8.5200_jprb,&
 &8.8400_jprb, 8.9000_jprb, 8.9100_jprb, 8.7400_jprb, 8.5500_jprb, 8.2000_jprb, 7.7500_jprb, 7.1100_jprb,&
 &6.1300_jprb, 5.3000_jprb, 5.3000_jprb /)
zozcl(:,21, 8) = (/&
 &5.1700_jprb, 5.1700_jprb, 5.2900_jprb, 5.5900_jprb, 6.5700_jprb, 7.5000_jprb, 7.9800_jprb, 8.6200_jprb,&
 &9.2200_jprb, 9.3700_jprb, 9.4200_jprb, 9.1600_jprb, 8.8300_jprb, 8.3600_jprb, 7.7000_jprb, 6.8700_jprb,&
 &5.6600_jprb, 4.6800_jprb, 4.6800_jprb /)
zozcl(:,22, 8) = (/&
 &4.8300_jprb, 4.8300_jprb, 5.1100_jprb, 4.9400_jprb, 5.7000_jprb, 6.7600_jprb, 7.3600_jprb, 8.2000_jprb,&
 &9.0800_jprb, 9.2400_jprb, 9.3100_jprb, 8.9200_jprb, 8.4600_jprb, 7.8800_jprb, 7.0800_jprb, 6.2200_jprb,&
 &5.0300_jprb, 4.0600_jprb, 4.0600_jprb /)
zozcl(:,23, 8) = (/&
 &4.4114_jprb, 4.4114_jprb, 4.3392_jprb, 3.8500_jprb, 5.2000_jprb, 6.0800_jprb, 6.5300_jprb, 7.0900_jprb,&
 &7.7200_jprb, 7.8900_jprb, 8.0000_jprb, 7.6600_jprb, 7.2800_jprb, 6.8400_jprb, 6.1300_jprb, 5.3300_jprb,&
 &4.3300_jprb, 3.6200_jprb, 3.6200_jprb /)
zozcl(:,24, 8) = (/&
 &3.8642_jprb, 3.8642_jprb, 3.7532_jprb, 3.3850_jprb, 4.9400_jprb, 5.6200_jprb, 5.8700_jprb, 6.1300_jprb,&
 &6.4200_jprb, 6.5400_jprb, 6.7200_jprb, 6.5200_jprb, 6.2600_jprb, 5.9800_jprb, 5.4700_jprb, 4.8100_jprb,&
 &3.9600_jprb, 3.4500_jprb, 3.4500_jprb /)
zozcl(:,25, 8) = (/&
 &3.2527_jprb, 3.2527_jprb, 3.1107_jprb, 3.1000_jprb, 4.9600_jprb, 4.9954_jprb, 4.9525_jprb, 4.6300_jprb,&
 &4.2568_jprb, 4.4121_jprb, 4.7500_jprb, 4.8600_jprb, 4.7875_jprb, 4.6815_jprb, 4.3089_jprb, 3.7158_jprb,&
 &3.3159_jprb, 3.1320_jprb, 3.1320_jprb /)
zozcl(:,26, 8) = (/&
 &2.8269_jprb, 2.8269_jprb, 2.5633_jprb, 2.3880_jprb, 3.0680_jprb, 3.0094_jprb, 2.5760_jprb, 2.2800_jprb,&
 &1.6597_jprb, 1.6279_jprb, 1.9500_jprb, 2.1300_jprb, 2.1947_jprb, 2.4610_jprb, 2.5566_jprb, 2.5730_jprb,&
 &2.5703_jprb, 2.6306_jprb, 2.6306_jprb /)
zozcl(:,27, 8) = (/&
 &2.0124_jprb, 2.0124_jprb, 1.7867_jprb, 1.4700_jprb, 1.7214_jprb, 1.6495_jprb, 0.9482_jprb, 1.0400_jprb,&
 &0.6012_jprb, 0.6575_jprb, 0.8800_jprb, 1.0100_jprb, 0.9167_jprb, 1.2381_jprb, 1.4940_jprb, 1.7246_jprb,&
 &1.8416_jprb, 1.9963_jprb, 1.9963_jprb /)
zozcl(:,28, 8) = (/&
 &1.0946_jprb, 1.0946_jprb, 1.0225_jprb, 0.9160_jprb, 0.8850_jprb, 0.7602_jprb, 0.2500_jprb, 0.2237_jprb,&
 &0.1148_jprb, 0.1680_jprb, 0.1830_jprb, 0.1922_jprb, 0.1848_jprb, 0.4119_jprb, 0.6847_jprb, 0.8300_jprb,&
 &0.9963_jprb, 1.0967_jprb, 1.0967_jprb /)
zozcl(:,29, 8) = (/&
 &0.4743_jprb, 0.4743_jprb, 0.4304_jprb, 0.3907_jprb, 0.3920_jprb, 0.3548_jprb, 0.1347_jprb, 0.1200_jprb,&
 &0.0588_jprb, 0.0724_jprb, 0.0580_jprb, 0.0565_jprb, 0.0841_jprb, 0.1486_jprb, 0.3128_jprb, 0.3640_jprb,&
 &0.4621_jprb, 0.5082_jprb, 0.5082_jprb /)
zozcl(:,30, 8) = (/&
 &0.2241_jprb, 0.2241_jprb, 0.2028_jprb, 0.2759_jprb, 0.2695_jprb, 0.2556_jprb, 0.1030_jprb, 0.0919_jprb,&
 &0.0441_jprb, 0.0555_jprb, 0.0540_jprb, 0.0374_jprb, 0.0641_jprb, 0.1085_jprb, 0.1991_jprb, 0.2510_jprb,&
 &0.3501_jprb, 0.3990_jprb, 0.3990_jprb /)
zozcl(:,31, 8) = (/&
 &0.0529_jprb, 0.0529_jprb, 0.0549_jprb, 0.0463_jprb, 0.0600_jprb, 0.0714_jprb, 0.0710_jprb, 0.0651_jprb,&
 &0.0403_jprb, 0.0451_jprb, 0.0387_jprb, 0.0299_jprb, 0.0512_jprb, 0.0798_jprb, 0.0908_jprb, 0.0883_jprb,&
 &0.1016_jprb, 0.1352_jprb, 0.1352_jprb /)
zozcl(:,32, 8) = (/&
 &0.0373_jprb, 0.0373_jprb, 0.0374_jprb, 0.0390_jprb, 0.0406_jprb, 0.0402_jprb, 0.0606_jprb, 0.0559_jprb,&
 &0.0394_jprb, 0.0454_jprb, 0.0280_jprb, 0.0336_jprb, 0.0450_jprb, 0.0673_jprb, 0.0685_jprb, 0.0632_jprb,&
 &0.0622_jprb, 0.0549_jprb, 0.0549_jprb /)
zozcl(:,33, 8) = (/&
 &0.0311_jprb, 0.0311_jprb, 0.0313_jprb, 0.0353_jprb, 0.0357_jprb, 0.0353_jprb, 0.0543_jprb, 0.0502_jprb,&
 &0.0337_jprb, 0.0366_jprb, 0.0286_jprb, 0.0355_jprb, 0.0340_jprb, 0.0563_jprb, 0.0561_jprb, 0.0500_jprb,&
 &0.0496_jprb, 0.0427_jprb, 0.0427_jprb /)
zozcl(:,34, 8) = (/&
 &0.0311_jprb, 0.0311_jprb, 0.0313_jprb, 0.0353_jprb, 0.0357_jprb, 0.0353_jprb, 0.0543_jprb, 0.0502_jprb,&
 &0.0337_jprb, 0.0366_jprb, 0.0286_jprb, 0.0355_jprb, 0.0340_jprb, 0.0563_jprb, 0.0561_jprb, 0.0500_jprb,&
 &0.0496_jprb, 0.0427_jprb, 0.0427_jprb /) 

! Month:  9
zozcl(:, 1, 9) = (/&
 &0.4200_jprb, 0.4200_jprb, 0.5800_jprb, 0.5900_jprb, 0.6400_jprb, 0.7400_jprb, 0.7900_jprb, 0.7700_jprb,&
 &0.7700_jprb, 0.7700_jprb, 0.7500_jprb, 0.7600_jprb, 0.7600_jprb, 0.6900_jprb, 0.6100_jprb, 0.6000_jprb,&
 &0.5600_jprb, 0.4600_jprb, 0.4600_jprb /)
zozcl(:, 2, 9) = (/&
 &0.2700_jprb, 0.2700_jprb, 0.3300_jprb, 0.3600_jprb, 0.3900_jprb, 0.4600_jprb, 0.5200_jprb, 0.5100_jprb,&
 &0.4800_jprb, 0.4800_jprb, 0.4700_jprb, 0.4900_jprb, 0.5300_jprb, 0.4700_jprb, 0.3700_jprb, 0.3100_jprb,&
 &0.2800_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 3, 9) = (/&
 &0.2300_jprb, 0.2300_jprb, 0.2600_jprb, 0.2900_jprb, 0.3300_jprb, 0.3800_jprb, 0.4300_jprb, 0.4300_jprb,&
 &0.4000_jprb, 0.3800_jprb, 0.3800_jprb, 0.4000_jprb, 0.4200_jprb, 0.3800_jprb, 0.2900_jprb, 0.2300_jprb,&
 &0.2000_jprb, 0.1600_jprb, 0.1600_jprb /)
zozcl(:, 4, 9) = (/&
 &0.2400_jprb, 0.2400_jprb, 0.2800_jprb, 0.3100_jprb, 0.3400_jprb, 0.3700_jprb, 0.3700_jprb, 0.3500_jprb,&
 &0.3200_jprb, 0.2900_jprb, 0.2900_jprb, 0.3200_jprb, 0.3400_jprb, 0.3100_jprb, 0.2500_jprb, 0.2000_jprb,&
 &0.1900_jprb, 0.1600_jprb, 0.1600_jprb /)
zozcl(:, 5, 9) = (/&
 &0.2700_jprb, 0.2700_jprb, 0.3100_jprb, 0.3100_jprb, 0.3200_jprb, 0.3000_jprb, 0.2700_jprb, 0.2300_jprb,&
 &0.2100_jprb, 0.2000_jprb, 0.1900_jprb, 0.2100_jprb, 0.2200_jprb, 0.2200_jprb, 0.1900_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1700_jprb, 0.1700_jprb /)
zozcl(:, 6, 9) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.3000_jprb, 0.2700_jprb, 0.2500_jprb, 0.2300_jprb, 0.1900_jprb, 0.1700_jprb,&
 &0.1600_jprb, 0.1600_jprb, 0.1500_jprb, 0.1600_jprb, 0.1700_jprb, 0.1700_jprb, 0.1600_jprb, 0.1500_jprb,&
 &0.1500_jprb, 0.1800_jprb, 0.1800_jprb /)
zozcl(:, 7, 9) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.2800_jprb, 0.2200_jprb, 0.1900_jprb, 0.1700_jprb, 0.1600_jprb, 0.1700_jprb,&
 &0.1700_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1500_jprb, 0.1500_jprb, 0.1600_jprb, 0.1600_jprb,&
 &0.1700_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 8, 9) = (/&
 &0.3300_jprb, 0.3300_jprb, 0.3300_jprb, 0.3100_jprb, 0.3100_jprb, 0.2900_jprb, 0.2800_jprb, 0.2600_jprb,&
 &0.2400_jprb, 0.2300_jprb, 0.2400_jprb, 0.2400_jprb, 0.2300_jprb, 0.2300_jprb, 0.2500_jprb, 0.2600_jprb,&
 &0.2700_jprb, 0.2900_jprb, 0.2900_jprb /)
zozcl(:, 9, 9) = (/&
 &0.4100_jprb, 0.4100_jprb, 0.4300_jprb, 0.4400_jprb, 0.4500_jprb, 0.4400_jprb, 0.4100_jprb, 0.3700_jprb,&
 &0.3400_jprb, 0.3300_jprb, 0.3400_jprb, 0.3400_jprb, 0.3400_jprb, 0.3500_jprb, 0.3800_jprb, 0.3900_jprb,&
 &0.3800_jprb, 0.3800_jprb, 0.3800_jprb /)
zozcl(:,10, 9) = (/&
 &0.5200_jprb, 0.5200_jprb, 0.5700_jprb, 0.5800_jprb, 0.5900_jprb, 0.5800_jprb, 0.5400_jprb, 0.5000_jprb,&
 &0.4900_jprb, 0.5000_jprb, 0.4900_jprb, 0.4700_jprb, 0.4600_jprb, 0.4700_jprb, 0.4900_jprb, 0.4800_jprb,&
 &0.4900_jprb, 0.5000_jprb, 0.5000_jprb /)
zozcl(:,11, 9) = (/&
 &0.7000_jprb, 0.7000_jprb, 0.8000_jprb, 0.8000_jprb, 0.8300_jprb, 0.8400_jprb, 0.8000_jprb, 0.7700_jprb,&
 &0.7600_jprb, 0.7600_jprb, 0.7400_jprb, 0.7200_jprb, 0.7000_jprb, 0.7200_jprb, 0.7300_jprb, 0.7000_jprb,&
 &0.6700_jprb, 0.6700_jprb, 0.6700_jprb /)
zozcl(:,12, 9) = (/&
 &0.8700_jprb, 0.8700_jprb, 0.9900_jprb, 1.0100_jprb, 1.0500_jprb, 1.0600_jprb, 1.0300_jprb, 1.0000_jprb,&
 &0.9900_jprb, 0.9800_jprb, 0.9700_jprb, 0.9600_jprb, 0.9600_jprb, 0.9700_jprb, 0.9700_jprb, 0.9400_jprb,&
 &0.8900_jprb, 0.8600_jprb, 0.8600_jprb /)
zozcl(:,13, 9) = (/&
 &1.2800_jprb, 1.2800_jprb, 1.3500_jprb, 1.4000_jprb, 1.4700_jprb, 1.4800_jprb, 1.4300_jprb, 1.4100_jprb,&
 &1.4100_jprb, 1.3800_jprb, 1.3600_jprb, 1.3800_jprb, 1.4000_jprb, 1.4000_jprb, 1.4000_jprb, 1.3600_jprb,&
 &1.2800_jprb, 1.2500_jprb, 1.2500_jprb /)
zozcl(:,14, 9) = (/&
 &1.7800_jprb, 1.7800_jprb, 1.8800_jprb, 1.9800_jprb, 2.1000_jprb, 2.1000_jprb, 2.0200_jprb, 1.9600_jprb,&
 &1.9500_jprb, 1.9300_jprb, 1.9200_jprb, 1.9400_jprb, 1.9600_jprb, 1.9500_jprb, 1.9200_jprb, 1.8900_jprb,&
 &1.8700_jprb, 1.9300_jprb, 1.9300_jprb /)
zozcl(:,15, 9) = (/&
 &2.3800_jprb, 2.3800_jprb, 2.3400_jprb, 2.4800_jprb, 2.6700_jprb, 2.6400_jprb, 2.4700_jprb, 2.3800_jprb,&
 &2.3600_jprb, 2.3500_jprb, 2.3600_jprb, 2.3800_jprb, 2.4000_jprb, 2.3800_jprb, 2.3600_jprb, 2.3700_jprb,&
 &2.4100_jprb, 2.4800_jprb, 2.4800_jprb /)
zozcl(:,16, 9) = (/&
 &3.1900_jprb, 3.1900_jprb, 3.1800_jprb, 3.3800_jprb, 3.6600_jprb, 3.6200_jprb, 3.3600_jprb, 3.1500_jprb,&
 &3.0600_jprb, 3.0400_jprb, 3.0700_jprb, 3.1500_jprb, 3.2300_jprb, 3.2300_jprb, 3.2300_jprb, 3.3000_jprb,&
 &3.3700_jprb, 3.3400_jprb, 3.3400_jprb /)
zozcl(:,17, 9) = (/&
 &4.2600_jprb, 4.2600_jprb, 4.3800_jprb, 4.7200_jprb, 5.1000_jprb, 5.0700_jprb, 4.7100_jprb, 4.3500_jprb,&
 &4.1300_jprb, 4.0700_jprb, 4.1500_jprb, 4.3400_jprb, 4.4800_jprb, 4.5100_jprb, 4.5400_jprb, 4.6600_jprb,&
 &4.6900_jprb, 4.3300_jprb, 4.3300_jprb /) 

zozcl(:,18, 9) = (/&
 &4.8600_jprb, 4.8600_jprb, 5.1600_jprb, 5.7200_jprb, 6.2300_jprb, 6.2600_jprb, 5.9000_jprb, 5.5000_jprb,&
 &5.2100_jprb, 5.1300_jprb, 5.2100_jprb, 5.4500_jprb, 5.6000_jprb, 5.5900_jprb, 5.6000_jprb, 5.6700_jprb,&
 &5.5200_jprb, 4.8700_jprb, 4.8700_jprb /)
zozcl(:,19, 9) = (/&
 &5.3400_jprb, 5.3400_jprb, 5.8900_jprb, 6.8600_jprb, 7.5800_jprb, 7.8000_jprb, 7.6300_jprb, 7.3600_jprb,&
 &7.0800_jprb, 6.9700_jprb, 7.0400_jprb, 7.2500_jprb, 7.3100_jprb, 7.1700_jprb, 7.0300_jprb, 6.8200_jprb,&
 &6.2300_jprb, 5.2200_jprb, 5.2200_jprb /)
zozcl(:,20, 9) = (/&
 &5.3600_jprb, 5.3600_jprb, 5.9400_jprb, 6.7700_jprb, 7.8900_jprb, 8.3600_jprb, 8.7000_jprb, 8.9000_jprb,&
 &8.9000_jprb, 8.8200_jprb, 8.8300_jprb, 8.7300_jprb, 8.6200_jprb, 8.2000_jprb, 7.7200_jprb, 7.0700_jprb,&
 &6.0700_jprb, 4.9700_jprb, 4.9700_jprb /)
zozcl(:,21, 9) = (/&
 &5.2800_jprb, 5.2800_jprb, 5.6200_jprb, 6.3600_jprb, 7.3900_jprb, 8.0400_jprb, 8.5700_jprb, 9.0700_jprb,&
 &9.4700_jprb, 9.4700_jprb, 9.5000_jprb, 9.2000_jprb, 8.8300_jprb, 8.2500_jprb, 7.4800_jprb, 6.6000_jprb,&
 &5.4700_jprb, 4.5800_jprb, 4.5800_jprb /)
zozcl(:,22, 9) = (/&
 &5.1500_jprb, 5.1500_jprb, 5.1800_jprb, 5.7500_jprb, 6.5900_jprb, 7.3200_jprb, 7.9000_jprb, 8.6000_jprb,&
 &9.4100_jprb, 9.4800_jprb, 9.5200_jprb, 9.0100_jprb, 8.4200_jprb, 7.7400_jprb, 6.7700_jprb, 5.8200_jprb,&
 &4.7100_jprb, 4.1400_jprb, 4.1400_jprb /)
zozcl(:,23, 9) = (/&
 &4.6717_jprb, 4.6717_jprb, 4.8458_jprb, 3.7400_jprb, 5.8700_jprb, 6.4500_jprb, 6.8700_jprb, 7.3500_jprb,&
 &7.9500_jprb, 8.0500_jprb, 8.1400_jprb, 7.7000_jprb, 7.2100_jprb, 6.6900_jprb, 5.8500_jprb, 5.0300_jprb,&
 &4.1300_jprb, 3.7500_jprb, 3.7500_jprb /)
zozcl(:,24, 9) = (/&
 &3.8037_jprb, 3.8037_jprb, 3.8848_jprb, 2.9500_jprb, 5.4400_jprb, 5.8800_jprb, 6.1100_jprb, 6.3000_jprb,&
 &6.5900_jprb, 6.6600_jprb, 6.8000_jprb, 6.5100_jprb, 6.1700_jprb, 5.8600_jprb, 5.2400_jprb, 4.5800_jprb,&
 &3.8900_jprb, 3.5300_jprb, 3.5300_jprb /)
zozcl(:,25, 9) = (/&
 &2.3519_jprb, 2.3519_jprb, 2.4684_jprb, 2.5767_jprb, 5.0900_jprb, 5.0874_jprb, 4.8300_jprb, 4.6000_jprb,&
 &4.2822_jprb, 4.4093_jprb, 4.7200_jprb, 4.7400_jprb, 4.7275_jprb, 4.5475_jprb, 4.1553_jprb, 3.7417_jprb,&
 &3.4637_jprb, 3.1593_jprb, 3.1593_jprb /)
zozcl(:,26, 9) = (/&
 &1.6783_jprb, 1.6783_jprb, 1.8105_jprb, 1.8080_jprb, 3.2640_jprb, 3.1160_jprb, 2.5420_jprb, 2.1000_jprb,&
 &1.6258_jprb, 1.6928_jprb, 1.9000_jprb, 2.0000_jprb, 2.0931_jprb, 2.3483_jprb, 2.4707_jprb, 2.5830_jprb,&
 &2.5729_jprb, 2.5568_jprb, 2.5568_jprb /)
zozcl(:,27, 9) = (/&
 &1.2168_jprb, 1.2168_jprb, 1.2714_jprb, 1.0043_jprb, 1.8843_jprb, 1.7599_jprb, 1.1100_jprb, 0.9300_jprb,&
 &0.5827_jprb, 0.6564_jprb, 0.7900_jprb, 0.8800_jprb, 0.8406_jprb, 1.2144_jprb, 1.4516_jprb, 1.7825_jprb,&
 &1.9065_jprb, 2.1061_jprb, 2.1061_jprb /)
zozcl(:,28, 9) = (/&
 &0.7290_jprb, 0.7290_jprb, 0.7549_jprb, 0.6280_jprb, 0.8840_jprb, 0.7060_jprb, 0.2840_jprb, 0.2657_jprb,&
 &0.1308_jprb, 0.1540_jprb, 0.1600_jprb, 0.1884_jprb, 0.1743_jprb, 0.4245_jprb, 0.6122_jprb, 0.8520_jprb,&
 &1.0364_jprb, 1.1360_jprb, 1.1360_jprb /)
zozcl(:,29, 9) = (/&
 &0.3900_jprb, 0.3900_jprb, 0.3966_jprb, 0.3887_jprb, 0.4313_jprb, 0.3504_jprb, 0.1280_jprb, 0.1188_jprb,&
 &0.0577_jprb, 0.0775_jprb, 0.0687_jprb, 0.0665_jprb, 0.0818_jprb, 0.1571_jprb, 0.2472_jprb, 0.3527_jprb,&
 &0.4632_jprb, 0.5169_jprb, 0.5169_jprb /)
zozcl(:,30, 9) = (/&
 &0.1897_jprb, 0.1897_jprb, 0.1921_jprb, 0.2789_jprb, 0.2805_jprb, 0.2363_jprb, 0.1080_jprb, 0.1004_jprb,&
 &0.0515_jprb, 0.0685_jprb, 0.0550_jprb, 0.0409_jprb, 0.0646_jprb, 0.1032_jprb, 0.1543_jprb, 0.2500_jprb,&
 &0.2984_jprb, 0.3550_jprb, 0.3550_jprb /)
zozcl(:,31, 9) = (/&
 &0.0479_jprb, 0.0479_jprb, 0.0560_jprb, 0.0593_jprb, 0.0707_jprb, 0.0820_jprb, 0.0993_jprb, 0.0918_jprb,&
 &0.0458_jprb, 0.0618_jprb, 0.0393_jprb, 0.0401_jprb, 0.0538_jprb, 0.0639_jprb, 0.0778_jprb, 0.0907_jprb,&
 &0.0977_jprb, 0.1328_jprb, 0.1328_jprb /)
zozcl(:,32, 9) = (/&
 &0.0367_jprb, 0.0367_jprb, 0.0404_jprb, 0.0436_jprb, 0.0488_jprb, 0.0421_jprb, 0.0834_jprb, 0.0781_jprb,&
 &0.0480_jprb, 0.0545_jprb, 0.0236_jprb, 0.0382_jprb, 0.0543_jprb, 0.0546_jprb, 0.0595_jprb, 0.0560_jprb,&
 &0.0579_jprb, 0.0574_jprb, 0.0574_jprb /)
zozcl(:,33, 9) = (/&
 &0.0316_jprb, 0.0316_jprb, 0.0346_jprb, 0.0357_jprb, 0.0379_jprb, 0.0368_jprb, 0.0790_jprb, 0.0735_jprb,&
 &0.0401_jprb, 0.0458_jprb, 0.0190_jprb, 0.0343_jprb, 0.0441_jprb, 0.0496_jprb, 0.0498_jprb, 0.0431_jprb,&
 &0.0462_jprb, 0.0475_jprb, 0.0475_jprb /)
zozcl(:,34, 9) = (/&
 &0.0316_jprb, 0.0316_jprb, 0.0346_jprb, 0.0357_jprb, 0.0379_jprb, 0.0368_jprb, 0.0790_jprb, 0.0735_jprb,&
 &0.0401_jprb, 0.0458_jprb, 0.0190_jprb, 0.0343_jprb, 0.0441_jprb, 0.0496_jprb, 0.0498_jprb, 0.0431_jprb,&
 &0.0462_jprb, 0.0475_jprb, 0.0475_jprb /) 

! Month: 10
zozcl(:, 1,10) = (/&
 &0.5700_jprb, 0.5700_jprb, 0.5600_jprb, 0.5400_jprb, 0.6100_jprb, 0.8000_jprb, 0.9300_jprb, 0.8700_jprb,&
 &0.8000_jprb, 0.8400_jprb, 0.8100_jprb, 0.7600_jprb, 0.8400_jprb, 0.8700_jprb, 0.7500_jprb, 0.6600_jprb,&
 &0.6500_jprb, 0.6300_jprb, 0.6300_jprb /)
zozcl(:, 2,10) = (/&
 &0.3800_jprb, 0.3800_jprb, 0.4100_jprb, 0.4100_jprb, 0.4500_jprb, 0.5800_jprb, 0.6600_jprb, 0.6000_jprb,&
 &0.5300_jprb, 0.5500_jprb, 0.5400_jprb, 0.5100_jprb, 0.5500_jprb, 0.5500_jprb, 0.4400_jprb, 0.3400_jprb,&
 &0.3000_jprb, 0.2300_jprb, 0.2300_jprb /)
zozcl(:, 3,10) = (/&
 &0.3100_jprb, 0.3100_jprb, 0.3800_jprb, 0.4100_jprb, 0.4400_jprb, 0.5000_jprb, 0.5200_jprb, 0.4700_jprb,&
 &0.4200_jprb, 0.4300_jprb, 0.4200_jprb, 0.3900_jprb, 0.4100_jprb, 0.4100_jprb, 0.3300_jprb, 0.2500_jprb,&
 &0.1900_jprb, 0.1200_jprb, 0.1200_jprb /)
zozcl(:, 4,10) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.3800_jprb, 0.4300_jprb, 0.4500_jprb, 0.4400_jprb, 0.3900_jprb, 0.3400_jprb,&
 &0.3300_jprb, 0.3300_jprb, 0.3100_jprb, 0.3000_jprb, 0.3000_jprb, 0.3100_jprb, 0.2800_jprb, 0.2300_jprb,&
 &0.1900_jprb, 0.1200_jprb, 0.1200_jprb /)
zozcl(:, 5,10) = (/&
 &0.2600_jprb, 0.2600_jprb, 0.3200_jprb, 0.3400_jprb, 0.3400_jprb, 0.3100_jprb, 0.2600_jprb, 0.2300_jprb,&
 &0.2400_jprb, 0.2400_jprb, 0.2200_jprb, 0.2200_jprb, 0.2200_jprb, 0.2200_jprb, 0.2300_jprb, 0.2500_jprb,&
 &0.2500_jprb, 0.1900_jprb, 0.1900_jprb /)
zozcl(:, 6,10) = (/&
 &0.2300_jprb, 0.2300_jprb, 0.2400_jprb, 0.2500_jprb, 0.2500_jprb, 0.2300_jprb, 0.1900_jprb, 0.1900_jprb,&
 &0.1900_jprb, 0.2000_jprb, 0.1800_jprb, 0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.2000_jprb, 0.2500_jprb,&
 &0.2900_jprb, 0.2500_jprb, 0.2500_jprb /)
zozcl(:, 7,10) = (/&
 &0.2400_jprb, 0.2400_jprb, 0.2100_jprb, 0.2000_jprb, 0.1900_jprb, 0.1800_jprb, 0.1700_jprb, 0.1700_jprb,&
 &0.1800_jprb, 0.1700_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb, 0.1600_jprb, 0.1800_jprb, 0.2400_jprb,&
 &0.3300_jprb, 0.3100_jprb, 0.3100_jprb /)
zozcl(:, 8,10) = (/&
 &0.3500_jprb, 0.3500_jprb, 0.3300_jprb, 0.3200_jprb, 0.3100_jprb, 0.2800_jprb, 0.2600_jprb, 0.2600_jprb,&
 &0.2600_jprb, 0.2500_jprb, 0.2400_jprb, 0.2400_jprb, 0.2500_jprb, 0.2500_jprb, 0.2600_jprb, 0.2800_jprb,&
 &0.3500_jprb, 0.3700_jprb, 0.3700_jprb /)
zozcl(:, 9,10) = (/&
 &0.4500_jprb, 0.4500_jprb, 0.4500_jprb, 0.4400_jprb, 0.4300_jprb, 0.4100_jprb, 0.3900_jprb, 0.3800_jprb,&
 &0.3700_jprb, 0.3600_jprb, 0.3500_jprb, 0.3500_jprb, 0.3600_jprb, 0.3700_jprb, 0.3800_jprb, 0.3800_jprb,&
 &0.4000_jprb, 0.4100_jprb, 0.4100_jprb /)
zozcl(:,10,10) = (/&
 &0.5600_jprb, 0.5600_jprb, 0.5500_jprb, 0.5400_jprb, 0.5200_jprb, 0.5000_jprb, 0.4800_jprb, 0.4800_jprb,&
 &0.4600_jprb, 0.4600_jprb, 0.4500_jprb, 0.5200_jprb, 0.5300_jprb, 0.5500_jprb, 0.5600_jprb, 0.5400_jprb,&
 &0.5100_jprb, 0.4900_jprb, 0.4900_jprb /)
zozcl(:,11,10) = (/&
 &0.7800_jprb, 0.7800_jprb, 0.7500_jprb, 0.7500_jprb, 0.7500_jprb, 0.7400_jprb, 0.7400_jprb, 0.7300_jprb,&
 &0.7100_jprb, 0.6800_jprb, 0.6900_jprb, 0.7900_jprb, 0.6500_jprb, 0.6800_jprb, 0.7000_jprb, 0.6900_jprb,&
 &0.7200_jprb, 0.6900_jprb, 0.6900_jprb /)
zozcl(:,12,10) = (/&
 &0.9700_jprb, 0.9700_jprb, 0.9300_jprb, 0.9400_jprb, 0.9500_jprb, 0.9600_jprb, 0.9600_jprb, 0.9600_jprb,&
 &0.9400_jprb, 0.9200_jprb, 0.9200_jprb, 0.9300_jprb, 0.9200_jprb, 0.9300_jprb, 0.9200_jprb, 0.9100_jprb,&
 &0.9400_jprb, 0.9000_jprb, 0.9000_jprb /)
zozcl(:,13,10) = (/&
 &1.3100_jprb, 1.3100_jprb, 1.2800_jprb, 1.3000_jprb, 1.3300_jprb, 1.3700_jprb, 1.3900_jprb, 1.3900_jprb,&
 &1.3900_jprb, 1.3700_jprb, 1.3800_jprb, 1.4100_jprb, 1.3900_jprb, 1.3700_jprb, 1.3600_jprb, 1.3600_jprb,&
 &1.3700_jprb, 1.3100_jprb, 1.3100_jprb /)
zozcl(:,14,10) = (/&
 &1.7600_jprb, 1.7600_jprb, 1.7900_jprb, 1.8600_jprb, 1.9100_jprb, 1.9300_jprb, 1.9400_jprb, 1.9500_jprb,&
 &1.9700_jprb, 1.9700_jprb, 1.9700_jprb, 1.9600_jprb, 1.9400_jprb, 1.9700_jprb, 2.0700_jprb, 2.1600_jprb,&
 &2.1600_jprb, 2.0900_jprb, 2.0900_jprb /)
zozcl(:,15,10) = (/&
 &2.1600_jprb, 2.1600_jprb, 2.1800_jprb, 2.3300_jprb, 2.4000_jprb, 2.3600_jprb, 2.3100_jprb, 2.3300_jprb,&
 &2.3500_jprb, 2.3700_jprb, 2.3700_jprb, 2.3400_jprb, 2.3200_jprb, 2.4400_jprb, 2.6800_jprb, 2.8400_jprb,&
 &2.8800_jprb, 2.9400_jprb, 2.9400_jprb /)
zozcl(:,16,10) = (/&
 &2.8300_jprb, 2.8300_jprb, 2.8700_jprb, 3.1000_jprb, 3.2200_jprb, 3.1700_jprb, 3.0700_jprb, 3.0400_jprb,&
 &3.0300_jprb, 3.0400_jprb, 3.0600_jprb, 3.1000_jprb, 3.1800_jprb, 3.4400_jprb, 3.8000_jprb, 4.0500_jprb,&
 &4.0600_jprb, 3.9600_jprb, 3.9600_jprb /)
zozcl(:,17,10) = (/&
 &3.8600_jprb, 3.8600_jprb, 3.9300_jprb, 4.2600_jprb, 4.4700_jprb, 4.4300_jprb, 4.2600_jprb, 4.1400_jprb,&
 &4.0500_jprb, 4.0300_jprb, 4.0900_jprb, 4.2600_jprb, 4.5300_jprb, 4.9600_jprb, 5.4100_jprb, 5.6600_jprb,&
 &5.4900_jprb, 4.9600_jprb, 4.9600_jprb /) 

zozcl(:,18,10) = (/&
 &4.7500_jprb, 4.7500_jprb, 4.9100_jprb, 5.3400_jprb, 5.6400_jprb, 5.6600_jprb, 5.4700_jprb, 5.2700_jprb,&
 &5.1100_jprb, 5.0300_jprb, 5.1100_jprb, 5.3400_jprb, 5.6700_jprb, 6.0900_jprb, 6.4200_jprb, 6.4900_jprb,&
 &6.0700_jprb, 5.2600_jprb, 5.2600_jprb /)
zozcl(:,19,10) = (/&
 &5.9200_jprb, 5.9200_jprb, 6.3300_jprb, 6.9300_jprb, 7.3900_jprb, 7.5800_jprb, 7.4700_jprb, 7.2400_jprb,&
 &6.9800_jprb, 6.8200_jprb, 6.8600_jprb, 7.1000_jprb, 7.3200_jprb, 7.4100_jprb, 7.3000_jprb, 6.9200_jprb,&
 &6.1800_jprb, 5.1800_jprb, 5.1800_jprb /)
zozcl(:,20,10) = (/&
 &6.1800_jprb, 6.1800_jprb, 6.6100_jprb, 7.3800_jprb, 8.0400_jprb, 8.5000_jprb, 8.8700_jprb, 9.0500_jprb,&
 &8.8300_jprb, 8.7100_jprb, 8.7600_jprb, 8.7000_jprb, 8.5300_jprb, 7.9900_jprb, 7.3800_jprb, 6.7500_jprb,&
 &5.9200_jprb, 5.0300_jprb, 5.0300_jprb /)
zozcl(:,21,10) = (/&
 &6.0000_jprb, 6.0000_jprb, 6.4300_jprb, 7.2000_jprb, 7.8300_jprb, 8.3700_jprb, 8.9500_jprb, 9.4600_jprb,&
 &9.5800_jprb, 9.6000_jprb, 9.5900_jprb, 9.2900_jprb, 8.7500_jprb, 7.7900_jprb, 6.9600_jprb, 6.2400_jprb,&
 &5.5200_jprb, 4.8100_jprb, 4.8100_jprb /)
zozcl(:,22,10) = (/&
 &5.7600_jprb, 5.7600_jprb, 6.0700_jprb, 6.7200_jprb, 7.2100_jprb, 7.7200_jprb, 8.3700_jprb, 9.1400_jprb,&
 &9.6500_jprb, 9.8700_jprb, 9.8100_jprb, 9.2500_jprb, 8.4100_jprb, 7.2000_jprb, 6.2600_jprb, 5.5400_jprb,&
 &4.9900_jprb, 4.4500_jprb, 4.4500_jprb /)
zozcl(:,23,10) = (/&
 &5.2232_jprb, 5.2232_jprb, 5.5374_jprb, 5.2400_jprb, 6.4300_jprb, 6.7200_jprb, 7.1800_jprb, 7.7400_jprb,&
 &8.1300_jprb, 8.3600_jprb, 8.3600_jprb, 7.8600_jprb, 7.1900_jprb, 6.2900_jprb, 5.5800_jprb, 4.9700_jprb,&
 &4.4900_jprb, 3.9800_jprb, 3.9800_jprb /)
zozcl(:,24,10) = (/&
 &4.1747_jprb, 4.1747_jprb, 4.6023_jprb, 4.3050_jprb, 5.9400_jprb, 6.0800_jprb, 6.3100_jprb, 6.5900_jprb,&
 &6.6800_jprb, 6.7700_jprb, 6.8000_jprb, 6.5300_jprb, 6.1200_jprb, 5.5800_jprb, 5.1000_jprb, 4.7000_jprb,&
 &4.1900_jprb, 3.6200_jprb, 3.6200_jprb /)
zozcl(:,25,10) = (/&
 &2.7866_jprb, 2.7866_jprb, 3.1177_jprb, 3.2367_jprb, 4.9933_jprb, 5.0993_jprb, 4.9783_jprb, 4.7000_jprb,&
 &4.2500_jprb, 4.3832_jprb, 4.4600_jprb, 4.4700_jprb, 4.4959_jprb, 4.4443_jprb, 4.2617_jprb, 4.1667_jprb,&
 &3.4780_jprb, 3.1447_jprb, 3.1447_jprb /)
zozcl(:,26,10) = (/&
 &0.9992_jprb, 0.9992_jprb, 1.3984_jprb, 1.7960_jprb, 3.1540_jprb, 3.2618_jprb, 2.5540_jprb, 2.1500_jprb,&
 &1.6459_jprb, 1.5903_jprb, 1.6300_jprb, 1.8000_jprb, 1.9871_jprb, 2.2845_jprb, 2.4964_jprb, 2.5960_jprb,&
 &2.5710_jprb, 2.6438_jprb, 2.6438_jprb /)
zozcl(:,27,10) = (/&
 &0.5779_jprb, 0.5779_jprb, 0.7611_jprb, 1.0371_jprb, 1.8243_jprb, 1.7040_jprb, 1.0114_jprb, 0.8600_jprb,&
 &0.6233_jprb, 0.5728_jprb, 0.5700_jprb, 0.7500_jprb, 0.8863_jprb, 1.2364_jprb, 1.4982_jprb, 1.7757_jprb,&
 &1.9050_jprb, 2.0538_jprb, 2.0538_jprb /)
zozcl(:,28,10) = (/&
 &0.3652_jprb, 0.3652_jprb, 0.4404_jprb, 0.4940_jprb, 0.8220_jprb, 0.6328_jprb, 0.2510_jprb, 0.2327_jprb,&
 &0.1303_jprb, 0.1350_jprb, 0.1380_jprb, 0.1498_jprb, 0.2285_jprb, 0.4636_jprb, 0.6430_jprb, 0.8710_jprb,&
 &1.0466_jprb, 1.2723_jprb, 1.2723_jprb /)
zozcl(:,29,10) = (/&
 &0.3389_jprb, 0.3389_jprb, 0.3542_jprb, 0.2953_jprb, 0.3893_jprb, 0.3197_jprb, 0.1213_jprb, 0.1104_jprb,&
 &0.0632_jprb, 0.0823_jprb, 0.0647_jprb, 0.0665_jprb, 0.1016_jprb, 0.1857_jprb, 0.2449_jprb, 0.3827_jprb,&
 &0.4579_jprb, 0.4815_jprb, 0.4815_jprb /)
zozcl(:,30,10) = (/&
 &0.1870_jprb, 0.1870_jprb, 0.2085_jprb, 0.2174_jprb, 0.2435_jprb, 0.2014_jprb, 0.1030_jprb, 0.0932_jprb,&
 &0.0541_jprb, 0.0718_jprb, 0.0475_jprb, 0.0496_jprb, 0.0732_jprb, 0.1118_jprb, 0.1368_jprb, 0.2495_jprb,&
 &0.2686_jprb, 0.3042_jprb, 0.3042_jprb /)
zozcl(:,31,10) = (/&
 &0.0500_jprb, 0.0500_jprb, 0.0650_jprb, 0.0617_jprb, 0.0787_jprb, 0.0777_jprb, 0.0897_jprb, 0.0823_jprb,&
 &0.0509_jprb, 0.0618_jprb, 0.0443_jprb, 0.0411_jprb, 0.0544_jprb, 0.0596_jprb, 0.0680_jprb, 0.1030_jprb,&
 &0.0955_jprb, 0.1119_jprb, 0.1119_jprb /)
zozcl(:,32,10) = (/&
 &0.0336_jprb, 0.0336_jprb, 0.0420_jprb, 0.0396_jprb, 0.0458_jprb, 0.0480_jprb, 0.0698_jprb, 0.0658_jprb,&
 &0.0539_jprb, 0.0641_jprb, 0.0462_jprb, 0.0411_jprb, 0.0496_jprb, 0.0501_jprb, 0.0543_jprb, 0.0592_jprb,&
 &0.0524_jprb, 0.0541_jprb, 0.0541_jprb /)
zozcl(:,33,10) = (/&
 &0.0273_jprb, 0.0273_jprb, 0.0336_jprb, 0.0323_jprb, 0.0376_jprb, 0.0347_jprb, 0.0579_jprb, 0.0540_jprb,&
 &0.0438_jprb, 0.0563_jprb, 0.0390_jprb, 0.0351_jprb, 0.0453_jprb, 0.0459_jprb, 0.0470_jprb, 0.0487_jprb,&
 &0.0453_jprb, 0.0401_jprb, 0.0401_jprb /)
zozcl(:,34,10) = (/&
 &0.0273_jprb, 0.0273_jprb, 0.0336_jprb, 0.0323_jprb, 0.0376_jprb, 0.0347_jprb, 0.0579_jprb, 0.0540_jprb,&
 &0.0438_jprb, 0.0563_jprb, 0.0390_jprb, 0.0351_jprb, 0.0453_jprb, 0.0459_jprb, 0.0470_jprb, 0.0487_jprb,&
 &0.0453_jprb, 0.0401_jprb, 0.0401_jprb /) 

! Month: 11
zozcl(:, 1,11) = (/&
 &0.5000_jprb, 0.5000_jprb, 0.6000_jprb, 0.6700_jprb, 0.7400_jprb, 0.8200_jprb, 0.8400_jprb, 0.7700_jprb,&
 &0.7600_jprb, 0.7900_jprb, 0.8000_jprb, 0.7700_jprb, 0.8400_jprb, 0.9800_jprb, 0.9700_jprb, 0.8800_jprb,&
 &0.8800_jprb, 0.7700_jprb, 0.7700_jprb /)
zozcl(:, 2,11) = (/&
 &0.3300_jprb, 0.3300_jprb, 0.4100_jprb, 0.4800_jprb, 0.5400_jprb, 0.5900_jprb, 0.5900_jprb, 0.5500_jprb,&
 &0.5300_jprb, 0.5500_jprb, 0.5700_jprb, 0.5400_jprb, 0.5400_jprb, 0.5900_jprb, 0.5200_jprb, 0.4500_jprb,&
 &0.4500_jprb, 0.4000_jprb, 0.4000_jprb /)
zozcl(:, 3,11) = (/&
 &0.2400_jprb, 0.2400_jprb, 0.3000_jprb, 0.3700_jprb, 0.4200_jprb, 0.4500_jprb, 0.4500_jprb, 0.4300_jprb,&
 &0.4300_jprb, 0.4500_jprb, 0.4700_jprb, 0.4300_jprb, 0.4100_jprb, 0.4100_jprb, 0.3200_jprb, 0.2400_jprb,&
 &0.2400_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 4,11) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.2200_jprb, 0.2600_jprb, 0.3100_jprb, 0.3200_jprb, 0.3300_jprb, 0.3200_jprb,&
 &0.3300_jprb, 0.3500_jprb, 0.3700_jprb, 0.3500_jprb, 0.3200_jprb, 0.3000_jprb, 0.2400_jprb, 0.1700_jprb,&
 &0.1800_jprb, 0.1600_jprb, 0.1600_jprb /)
zozcl(:, 5,11) = (/&
 &0.1500_jprb, 0.1500_jprb, 0.1700_jprb, 0.1900_jprb, 0.2100_jprb, 0.2200_jprb, 0.2200_jprb, 0.2300_jprb,&
 &0.2400_jprb, 0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2500_jprb, 0.2400_jprb, 0.2500_jprb, 0.2200_jprb,&
 &0.2200_jprb, 0.1900_jprb, 0.1900_jprb /)
zozcl(:, 6,11) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.1800_jprb, 0.1800_jprb, 0.1800_jprb, 0.1800_jprb,&
 &0.2000_jprb, 0.2000_jprb, 0.2000_jprb, 0.2000_jprb, 0.2000_jprb, 0.2000_jprb, 0.2400_jprb, 0.2600_jprb,&
 &0.2600_jprb, 0.2300_jprb, 0.2300_jprb /)
zozcl(:, 7,11) = (/&
 &0.2100_jprb, 0.2100_jprb, 0.2000_jprb, 0.2000_jprb, 0.2000_jprb, 0.1900_jprb, 0.1800_jprb, 0.1700_jprb,&
 &0.1800_jprb, 0.1700_jprb, 0.1600_jprb, 0.1800_jprb, 0.1800_jprb, 0.1900_jprb, 0.2400_jprb, 0.3100_jprb,&
 &0.3100_jprb, 0.2700_jprb, 0.2700_jprb /)
zozcl(:, 8,11) = (/&
 &0.3100_jprb, 0.3100_jprb, 0.3000_jprb, 0.3000_jprb, 0.3000_jprb, 0.2800_jprb, 0.2700_jprb, 0.2600_jprb,&
 &0.2500_jprb, 0.2500_jprb, 0.2400_jprb, 0.2500_jprb, 0.2700_jprb, 0.2800_jprb, 0.3100_jprb, 0.3800_jprb,&
 &0.3800_jprb, 0.3300_jprb, 0.3300_jprb /)
zozcl(:, 9,11) = (/&
 &0.4300_jprb, 0.4300_jprb, 0.4100_jprb, 0.4100_jprb, 0.4100_jprb, 0.4000_jprb, 0.3900_jprb, 0.3800_jprb,&
 &0.3700_jprb, 0.3600_jprb, 0.3700_jprb, 0.3800_jprb, 0.3900_jprb, 0.4100_jprb, 0.4300_jprb, 0.4400_jprb,&
 &0.4400_jprb, 0.3900_jprb, 0.3900_jprb /)
zozcl(:,10,11) = (/&
 &0.5400_jprb, 0.5400_jprb, 0.5200_jprb, 0.5100_jprb, 0.4900_jprb, 0.4600_jprb, 0.4600_jprb, 0.4600_jprb,&
 &0.4600_jprb, 0.4700_jprb, 0.4800_jprb, 0.5700_jprb, 0.5700_jprb, 0.5800_jprb, 0.5900_jprb, 0.5700_jprb,&
 &0.5800_jprb, 0.5100_jprb, 0.5100_jprb /)
zozcl(:,11,11) = (/&
 &0.7400_jprb, 0.7400_jprb, 0.7300_jprb, 0.7400_jprb, 0.7300_jprb, 0.7100_jprb, 0.7200_jprb, 0.7100_jprb,&
 &0.7000_jprb, 0.7000_jprb, 0.7100_jprb, 0.7300_jprb, 0.7000_jprb, 0.7000_jprb, 0.7100_jprb, 0.7900_jprb,&
 &0.7900_jprb, 0.7000_jprb, 0.7000_jprb /)
zozcl(:,12,11) = (/&
 &0.9100_jprb, 0.9100_jprb, 0.9100_jprb, 0.9100_jprb, 0.9300_jprb, 0.9300_jprb, 0.9400_jprb, 0.9400_jprb,&
 &0.9400_jprb, 0.9300_jprb, 0.9400_jprb, 0.9500_jprb, 0.9600_jprb, 0.9500_jprb, 0.9100_jprb, 0.9100_jprb,&
 &0.9100_jprb, 0.8000_jprb, 0.8000_jprb /)
zozcl(:,13,11) = (/&
 &1.2000_jprb, 1.2000_jprb, 1.2100_jprb, 1.2400_jprb, 1.2800_jprb, 1.3200_jprb, 1.3500_jprb, 1.3800_jprb,&
 &1.4000_jprb, 1.3800_jprb, 1.3800_jprb, 1.4100_jprb, 1.4500_jprb, 1.4200_jprb, 1.3700_jprb, 1.2700_jprb,&
 &1.2700_jprb, 1.1200_jprb, 1.1200_jprb /)
zozcl(:,14,11) = (/&
 &1.5900_jprb, 1.5900_jprb, 1.6400_jprb, 1.7200_jprb, 1.7900_jprb, 1.8500_jprb, 1.9000_jprb, 1.9400_jprb,&
 &1.9800_jprb, 1.9800_jprb, 1.9800_jprb, 1.9600_jprb, 1.9900_jprb, 2.0800_jprb, 2.1900_jprb, 2.0900_jprb,&
 &2.0900_jprb, 1.8400_jprb, 1.8400_jprb /)
zozcl(:,15,11) = (/&
 &1.8600_jprb, 1.8600_jprb, 1.9300_jprb, 2.0700_jprb, 2.1500_jprb, 2.2100_jprb, 2.2600_jprb, 2.3000_jprb,&
 &2.3600_jprb, 2.3900_jprb, 2.3700_jprb, 2.3100_jprb, 2.3700_jprb, 2.6000_jprb, 2.8700_jprb, 2.9800_jprb,&
 &2.8900_jprb, 2.4200_jprb, 2.4200_jprb /)
zozcl(:,16,11) = (/&
 &2.4200_jprb, 2.4200_jprb, 2.4700_jprb, 2.6300_jprb, 2.7200_jprb, 2.7800_jprb, 2.8600_jprb, 2.9400_jprb,&
 &3.0200_jprb, 3.0700_jprb, 3.0600_jprb, 3.0400_jprb, 3.2200_jprb, 3.6800_jprb, 4.1400_jprb, 4.2400_jprb,&
 &3.9800_jprb, 3.2400_jprb, 3.2400_jprb /)
zozcl(:,17,11) = (/&
 &3.3700_jprb, 3.3700_jprb, 3.3800_jprb, 3.5500_jprb, 3.6400_jprb, 3.7100_jprb, 3.8200_jprb, 3.9400_jprb,&
 &4.0200_jprb, 4.0600_jprb, 4.0900_jprb, 4.1900_jprb, 4.6000_jprb, 5.3400_jprb, 5.8700_jprb, 5.7600_jprb,&
 &5.2600_jprb, 4.1400_jprb, 4.1400_jprb /) 

zozcl(:,18,11) = (/&
 &4.3800_jprb, 4.3800_jprb, 4.3900_jprb, 4.5900_jprb, 4.7100_jprb, 4.7900_jprb, 4.8900_jprb, 5.0100_jprb,&
 &5.0400_jprb, 5.0500_jprb, 5.0900_jprb, 5.2600_jprb, 5.7600_jprb, 6.4600_jprb, 6.7700_jprb, 6.3800_jprb,&
 &5.7800_jprb, 4.5500_jprb, 4.5500_jprb /)
zozcl(:,19,11) = (/&
 &5.9600_jprb, 5.9600_jprb, 6.0600_jprb, 6.3200_jprb, 6.6100_jprb, 6.7600_jprb, 6.8500_jprb, 6.9000_jprb,&
 &6.8100_jprb, 6.7000_jprb, 6.7200_jprb, 6.9200_jprb, 7.2500_jprb, 7.4300_jprb, 7.1800_jprb, 6.4500_jprb,&
 &5.8800_jprb, 4.7400_jprb, 4.7400_jprb /)
zozcl(:,20,11) = (/&
 &6.3900_jprb, 6.3900_jprb, 6.4800_jprb, 7.1500_jprb, 7.7700_jprb, 8.2100_jprb, 8.5200_jprb, 8.6800_jprb,&
 &8.5100_jprb, 8.2700_jprb, 8.2500_jprb, 8.2200_jprb, 7.9900_jprb, 7.5200_jprb, 6.8200_jprb, 6.0400_jprb,&
 &5.6700_jprb, 4.2900_jprb, 4.2900_jprb /)
zozcl(:,21,11) = (/&
 &6.0300_jprb, 6.0300_jprb, 6.2400_jprb, 7.0000_jprb, 7.7200_jprb, 8.3000_jprb, 8.8100_jprb, 9.1800_jprb,&
 &9.2600_jprb, 9.1100_jprb, 8.9400_jprb, 8.6200_jprb, 8.0200_jprb, 7.1400_jprb, 6.3300_jprb, 5.6700_jprb,&
 &5.3900_jprb, 3.8200_jprb, 3.8200_jprb /)
zozcl(:,22,11) = (/&
 &5.5800_jprb, 5.5800_jprb, 5.7800_jprb, 6.5000_jprb, 7.1600_jprb, 7.7000_jprb, 8.4000_jprb, 8.9800_jprb,&
 &9.4400_jprb, 9.5900_jprb, 9.2100_jprb, 8.5300_jprb, 7.6800_jprb, 6.5700_jprb, 5.7600_jprb, 5.3100_jprb,&
 &4.9900_jprb, 3.4200_jprb, 3.4200_jprb /)
zozcl(:,23,11) = (/&
 &5.2715_jprb, 5.2715_jprb, 5.3393_jprb, 5.9000_jprb, 6.3100_jprb, 6.7100_jprb, 7.2900_jprb, 7.7600_jprb,&
 &8.1600_jprb, 8.3100_jprb, 8.0600_jprb, 7.5100_jprb, 6.8200_jprb, 5.9300_jprb, 5.3900_jprb, 4.9800_jprb,&
 &4.5200_jprb, 3.1800_jprb, 3.1800_jprb /)
zozcl(:,24,11) = (/&
 &5.0164_jprb, 5.0164_jprb, 5.1827_jprb, 5.2200_jprb, 5.7300_jprb, 5.9600_jprb, 6.3300_jprb, 6.5700_jprb,&
 &6.7500_jprb, 6.7700_jprb, 6.6400_jprb, 6.3600_jprb, 5.9600_jprb, 5.3900_jprb, 5.0500_jprb, 4.6800_jprb,&
 &4.1100_jprb, 3.0100_jprb, 3.0100_jprb /)
zozcl(:,25,11) = (/&
 &3.8180_jprb, 3.8180_jprb, 4.0890_jprb, 4.4433_jprb, 4.6700_jprb, 4.8787_jprb, 4.7767_jprb, 4.6600_jprb,&
 &4.3413_jprb, 4.1637_jprb, 4.3100_jprb, 4.3700_jprb, 4.4538_jprb, 4.5045_jprb, 4.5130_jprb, 3.8410_jprb,&
 &3.4766_jprb, 2.9674_jprb, 2.9674_jprb /)
zozcl(:,26,11) = (/&
 &1.8826_jprb, 1.8826_jprb, 2.0512_jprb, 2.7920_jprb, 2.9240_jprb, 2.9289_jprb, 2.2350_jprb, 2.0200_jprb,&
 &1.6868_jprb, 1.5394_jprb, 1.6600_jprb, 1.8100_jprb, 1.9540_jprb, 2.4411_jprb, 2.6708_jprb, 3.0020_jprb,&
 &2.8432_jprb, 2.9248_jprb, 2.9248_jprb /)
zozcl(:,27,11) = (/&
 &1.0698_jprb, 1.0698_jprb, 1.1287_jprb, 1.9386_jprb, 1.6729_jprb, 1.5172_jprb, 0.8607_jprb, 0.8600_jprb,&
 &0.6016_jprb, 0.5556_jprb, 0.6600_jprb, 0.8100_jprb, 0.8538_jprb, 1.3784_jprb, 1.6005_jprb, 1.9543_jprb,&
 &2.0807_jprb, 2.1844_jprb, 2.1844_jprb /)
zozcl(:,28,11) = (/&
 &0.5528_jprb, 0.5528_jprb, 0.5834_jprb, 0.8250_jprb, 0.6770_jprb, 0.6063_jprb, 0.1660_jprb, 0.1592_jprb,&
 &0.1180_jprb, 0.1394_jprb, 0.1610_jprb, 0.1603_jprb, 0.2309_jprb, 0.5118_jprb, 0.6898_jprb, 1.1380_jprb,&
 &1.2988_jprb, 1.4342_jprb, 1.4342_jprb /)
zozcl(:,29,11) = (/&
 &0.3854_jprb, 0.3854_jprb, 0.3701_jprb, 0.3700_jprb, 0.3027_jprb, 0.3665_jprb, 0.1187_jprb, 0.1093_jprb,&
 &0.0550_jprb, 0.0837_jprb, 0.0893_jprb, 0.0756_jprb, 0.1015_jprb, 0.2158_jprb, 0.2926_jprb, 0.5020_jprb,&
 &0.5740_jprb, 0.6050_jprb, 0.6050_jprb /)
zozcl(:,30,11) = (/&
 &0.2489_jprb, 0.2489_jprb, 0.2443_jprb, 0.2711_jprb, 0.2035_jprb, 0.2187_jprb, 0.0980_jprb, 0.0910_jprb,&
 &0.0491_jprb, 0.0595_jprb, 0.0587_jprb, 0.0516_jprb, 0.0680_jprb, 0.1358_jprb, 0.1652_jprb, 0.2735_jprb,&
 &0.3147_jprb, 0.3034_jprb, 0.3034_jprb /)
zozcl(:,31,11) = (/&
 &0.0634_jprb, 0.0634_jprb, 0.0734_jprb, 0.0733_jprb, 0.0687_jprb, 0.0717_jprb, 0.0807_jprb, 0.0749_jprb,&
 &0.0420_jprb, 0.0545_jprb, 0.0463_jprb, 0.0464_jprb, 0.0556_jprb, 0.0645_jprb, 0.0703_jprb, 0.0897_jprb,&
 &0.1083_jprb, 0.0987_jprb, 0.0987_jprb /)
zozcl(:,32,11) = (/&
 &0.0297_jprb, 0.0297_jprb, 0.0362_jprb, 0.0356_jprb, 0.0432_jprb, 0.0435_jprb, 0.0682_jprb, 0.0645_jprb,&
 &0.0441_jprb, 0.0525_jprb, 0.0412_jprb, 0.0434_jprb, 0.0487_jprb, 0.0479_jprb, 0.0513_jprb, 0.0498_jprb,&
 &0.0487_jprb, 0.0490_jprb, 0.0490_jprb /)
zozcl(:,33,11) = (/&
 &0.0238_jprb, 0.0238_jprb, 0.0277_jprb, 0.0271_jprb, 0.0351_jprb, 0.0343_jprb, 0.0571_jprb, 0.0542_jprb,&
 &0.0375_jprb, 0.0434_jprb, 0.0345_jprb, 0.0362_jprb, 0.0434_jprb, 0.0439_jprb, 0.0445_jprb, 0.0443_jprb,&
 &0.0422_jprb, 0.0414_jprb, 0.0414_jprb /)
zozcl(:,34,11) = (/&
 &0.0238_jprb, 0.0238_jprb, 0.0277_jprb, 0.0271_jprb, 0.0351_jprb, 0.0343_jprb, 0.0571_jprb, 0.0542_jprb,&
 &0.0375_jprb, 0.0434_jprb, 0.0345_jprb, 0.0362_jprb, 0.0434_jprb, 0.0439_jprb, 0.0445_jprb, 0.0443_jprb,&
 &0.0422_jprb, 0.0414_jprb, 0.0414_jprb /) 

! Month: 12
zozcl(:, 1,12) = (/&
 &0.5400_jprb, 0.5400_jprb, 0.7000_jprb, 0.7900_jprb, 0.8000_jprb, 0.7500_jprb, 0.6600_jprb, 0.5800_jprb,&
 &0.5700_jprb, 0.5500_jprb, 0.5200_jprb, 0.6000_jprb, 0.7900_jprb, 0.9400_jprb, 0.9600_jprb, 0.9600_jprb,&
 &0.8500_jprb, 0.8200_jprb, 0.8200_jprb /)
zozcl(:, 2,12) = (/&
 &0.2800_jprb, 0.2800_jprb, 0.3500_jprb, 0.4400_jprb, 0.5200_jprb, 0.5200_jprb, 0.4700_jprb, 0.4400_jprb,&
 &0.4500_jprb, 0.4400_jprb, 0.4100_jprb, 0.4100_jprb, 0.4900_jprb, 0.5800_jprb, 0.5600_jprb, 0.5700_jprb,&
 &0.5000_jprb, 0.4900_jprb, 0.4900_jprb /)
zozcl(:, 3,12) = (/&
 &0.2000_jprb, 0.2000_jprb, 0.2200_jprb, 0.2700_jprb, 0.3500_jprb, 0.3800_jprb, 0.3600_jprb, 0.3700_jprb,&
 &0.4000_jprb, 0.4100_jprb, 0.3900_jprb, 0.3600_jprb, 0.3500_jprb, 0.3700_jprb, 0.3300_jprb, 0.3300_jprb,&
 &0.2900_jprb, 0.2800_jprb, 0.2800_jprb /)
zozcl(:, 4,12) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.2200_jprb, 0.2500_jprb, 0.2500_jprb, 0.2800_jprb,&
 &0.3200_jprb, 0.3300_jprb, 0.3300_jprb, 0.3400_jprb, 0.3100_jprb, 0.2600_jprb, 0.2100_jprb, 0.2100_jprb,&
 &0.1900_jprb, 0.1800_jprb, 0.1800_jprb /)
zozcl(:, 5,12) = (/&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.2000_jprb,&
 &0.2200_jprb, 0.2200_jprb, 0.2300_jprb, 0.2600_jprb, 0.2700_jprb, 0.2600_jprb, 0.2400_jprb, 0.2400_jprb,&
 &0.2100_jprb, 0.2100_jprb, 0.2100_jprb /)
zozcl(:, 6,12) = (/&
 &0.1800_jprb, 0.1800_jprb, 0.1800_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb, 0.1500_jprb, 0.1600_jprb,&
 &0.1700_jprb, 0.1700_jprb, 0.1800_jprb, 0.2000_jprb, 0.2300_jprb, 0.2500_jprb, 0.2700_jprb, 0.2700_jprb,&
 &0.2400_jprb, 0.2300_jprb, 0.2300_jprb /)
zozcl(:, 7,12) = (/&
 &0.2200_jprb, 0.2200_jprb, 0.2000_jprb, 0.2000_jprb, 0.1900_jprb, 0.1700_jprb, 0.1600_jprb, 0.1600_jprb,&
 &0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1700_jprb, 0.1900_jprb, 0.2300_jprb, 0.3100_jprb, 0.3100_jprb,&
 &0.2700_jprb, 0.2700_jprb, 0.2700_jprb /)
zozcl(:, 8,12) = (/&
 &0.3300_jprb, 0.3300_jprb, 0.3000_jprb, 0.2900_jprb, 0.2800_jprb, 0.2700_jprb, 0.2500_jprb, 0.2400_jprb,&
 &0.2500_jprb, 0.2500_jprb, 0.2400_jprb, 0.2600_jprb, 0.3000_jprb, 0.3400_jprb, 0.3900_jprb, 0.3900_jprb,&
 &0.3400_jprb, 0.3300_jprb, 0.3300_jprb /)
zozcl(:, 9,12) = (/&
 &0.4300_jprb, 0.4300_jprb, 0.4100_jprb, 0.4000_jprb, 0.3900_jprb, 0.3900_jprb, 0.3800_jprb, 0.3600_jprb,&
 &0.3500_jprb, 0.3500_jprb, 0.3500_jprb, 0.3800_jprb, 0.4500_jprb, 0.4900_jprb, 0.5100_jprb, 0.5100_jprb,&
 &0.4500_jprb, 0.4400_jprb, 0.4400_jprb /)
zozcl(:,10,12) = (/&
 &0.5800_jprb, 0.5800_jprb, 0.5700_jprb, 0.5200_jprb, 0.5000_jprb, 0.4800_jprb, 0.4900_jprb, 0.5100_jprb,&
 &0.5000_jprb, 0.4900_jprb, 0.4800_jprb, 0.4900_jprb, 0.6500_jprb, 0.7100_jprb, 0.6900_jprb, 0.7000_jprb,&
 &0.6200_jprb, 0.6000_jprb, 0.6000_jprb /)
zozcl(:,11,12) = (/&
 &0.7800_jprb, 0.7800_jprb, 0.7700_jprb, 0.7600_jprb, 0.7500_jprb, 0.7500_jprb, 0.7700_jprb, 0.7700_jprb,&
 &0.7400_jprb, 0.7100_jprb, 0.7100_jprb, 0.7200_jprb, 0.7600_jprb, 0.8000_jprb, 0.9900_jprb, 0.9900_jprb,&
 &0.8700_jprb, 0.8500_jprb, 0.8500_jprb /)
zozcl(:,12,12) = (/&
 &0.9400_jprb, 0.9400_jprb, 0.9300_jprb, 0.9500_jprb, 0.9500_jprb, 0.9600_jprb, 1.0000_jprb, 1.0100_jprb,&
 &0.9600_jprb, 0.9400_jprb, 0.9400_jprb, 0.9700_jprb, 1.0200_jprb, 1.0400_jprb, 1.2500_jprb, 1.2500_jprb,&
 &1.1000_jprb, 1.0700_jprb, 1.0700_jprb /)
zozcl(:,13,12) = (/&
 &1.2000_jprb, 1.2000_jprb, 1.2200_jprb, 1.2600_jprb, 1.2900_jprb, 1.3300_jprb, 1.3900_jprb, 1.4200_jprb,&
 &1.3900_jprb, 1.3600_jprb, 1.3700_jprb, 1.4200_jprb, 1.4800_jprb, 1.5000_jprb, 1.7800_jprb, 1.7800_jprb,&
 &1.5700_jprb, 1.5200_jprb, 1.5200_jprb /)
zozcl(:,14,12) = (/&
 &1.4700_jprb, 1.4700_jprb, 1.5500_jprb, 1.6500_jprb, 1.7700_jprb, 1.8600_jprb, 1.9300_jprb, 1.9700_jprb,&
 &1.9800_jprb, 1.9800_jprb, 1.9800_jprb, 1.9700_jprb, 1.9900_jprb, 2.0900_jprb, 1.9400_jprb, 1.9400_jprb,&
 &1.7100_jprb, 1.6600_jprb, 1.6600_jprb /)
zozcl(:,15,12) = (/&
 &1.6500_jprb, 1.6500_jprb, 1.7700_jprb, 1.9400_jprb, 2.1000_jprb, 2.2100_jprb, 2.2900_jprb, 2.3400_jprb,&
 &2.4000_jprb, 2.4400_jprb, 2.4100_jprb, 2.3500_jprb, 2.3800_jprb, 2.5700_jprb, 2.7100_jprb, 2.6800_jprb,&
 &2.2100_jprb, 2.1500_jprb, 2.1500_jprb /)
zozcl(:,16,12) = (/&
 &2.1100_jprb, 2.1100_jprb, 2.2300_jprb, 2.4200_jprb, 2.5700_jprb, 2.7200_jprb, 2.8600_jprb, 2.9900_jprb,&
 &3.1100_jprb, 3.1800_jprb, 3.1500_jprb, 3.1300_jprb, 3.2500_jprb, 3.6300_jprb, 3.9200_jprb, 3.7300_jprb,&
 &3.0000_jprb, 2.9300_jprb, 2.9300_jprb /)
zozcl(:,17,12) = (/&
 &2.9200_jprb, 2.9200_jprb, 3.0000_jprb, 3.1900_jprb, 3.3400_jprb, 3.5300_jprb, 3.7700_jprb, 4.0100_jprb,&
 &4.1800_jprb, 4.2700_jprb, 4.2900_jprb, 4.3500_jprb, 4.6600_jprb, 5.2600_jprb, 5.5900_jprb, 5.1000_jprb,&
 &4.1400_jprb, 4.0300_jprb, 4.0300_jprb /)  

zozcl(:,18,12) = (/&
 &3.9000_jprb, 3.9000_jprb, 3.9500_jprb, 4.1300_jprb, 4.3100_jprb, 4.5400_jprb, 4.8100_jprb, 5.0800_jprb,&
 &5.2500_jprb, 5.3200_jprb, 5.3500_jprb, 5.4500_jprb, 5.8000_jprb, 6.3600_jprb, 6.4900_jprb, 5.7900_jprb,&
 &4.8600_jprb, 4.7200_jprb, 4.7200_jprb /)
zozcl(:,19,12) = (/&
 &5.6100_jprb, 5.6100_jprb, 5.6400_jprb, 5.8300_jprb, 6.1600_jprb, 6.4500_jprb, 6.7100_jprb, 6.9600_jprb,&
 &7.0400_jprb, 6.9900_jprb, 6.9700_jprb, 7.0200_jprb, 7.1800_jprb, 7.3100_jprb, 6.9200_jprb, 6.1000_jprb,&
 &5.3900_jprb, 5.2100_jprb, 5.2100_jprb /)
zozcl(:,20,12) = (/&
 &6.2700_jprb, 6.2700_jprb, 6.2300_jprb, 6.8800_jprb, 7.6200_jprb, 7.9400_jprb, 8.4000_jprb, 8.7500_jprb,&
 &8.7200_jprb, 8.4800_jprb, 8.1600_jprb, 7.9900_jprb, 7.8000_jprb, 7.3300_jprb, 6.5300_jprb, 5.9400_jprb,&
 &5.1900_jprb, 4.9800_jprb, 4.9800_jprb /)
zozcl(:,21,12) = (/&
 &5.7900_jprb, 5.7900_jprb, 5.9500_jprb, 6.8600_jprb, 7.7600_jprb, 8.2900_jprb, 8.8600_jprb, 9.2900_jprb,&
 &9.3700_jprb, 9.0300_jprb, 8.6000_jprb, 8.1500_jprb, 7.7100_jprb, 6.9600_jprb, 6.0900_jprb, 5.6900_jprb,&
 &4.8100_jprb, 4.6200_jprb, 4.6200_jprb /)
zozcl(:,22,12) = (/&
 &4.9900_jprb, 4.9900_jprb, 5.3900_jprb, 6.3800_jprb, 7.3500_jprb, 8.0200_jprb, 8.6600_jprb, 9.1400_jprb,&
 &9.4500_jprb, 9.2400_jprb, 8.6900_jprb, 7.9100_jprb, 7.2800_jprb, 6.4100_jprb, 5.6000_jprb, 5.4200_jprb,&
 &4.3700_jprb, 4.2500_jprb, 4.2500_jprb /)
zozcl(:,23,12) = (/&
 &4.6332_jprb, 4.6332_jprb, 4.9550_jprb, 5.8500_jprb, 6.4400_jprb, 7.0100_jprb, 7.5100_jprb, 7.8800_jprb,&
 &8.1500_jprb, 8.0800_jprb, 7.6500_jprb, 7.0200_jprb, 6.5700_jprb, 5.9400_jprb, 5.4200_jprb, 5.1000_jprb,&
 &4.0800_jprb, 4.0000_jprb, 4.0000_jprb /)
zozcl(:,24,12) = (/&
 &4.8574_jprb, 4.8574_jprb, 4.9240_jprb, 5.4500_jprb, 5.7500_jprb, 6.1500_jprb, 6.4700_jprb, 6.6400_jprb,&
 &6.6900_jprb, 6.5500_jprb, 6.3400_jprb, 6.0500_jprb, 5.8600_jprb, 5.5400_jprb, 5.2300_jprb, 4.7700_jprb,&
 &3.8600_jprb, 3.7700_jprb, 3.7700_jprb /)
zozcl(:,25,12) = (/&
 &4.7325_jprb, 4.7325_jprb, 4.4182_jprb, 4.3533_jprb, 4.2633_jprb, 4.4898_jprb, 4.5542_jprb, 4.6100_jprb,&
 &4.4068_jprb, 4.3667_jprb, 4.3200_jprb, 4.4100_jprb, 4.6224_jprb, 4.8237_jprb, 4.8392_jprb, 3.9730_jprb,&
 &3.3764_jprb, 3.4643_jprb, 3.4643_jprb /)
zozcl(:,26,12) = (/&
 &3.0907_jprb, 3.0907_jprb, 2.8831_jprb, 2.4640_jprb, 2.4420_jprb, 2.6292_jprb, 2.1590_jprb, 2.0700_jprb,&
 &1.5686_jprb, 1.4776_jprb, 1.5800_jprb, 1.9000_jprb, 2.1818_jprb, 2.7110_jprb, 3.0231_jprb, 3.1760_jprb,&
 &2.8928_jprb, 3.1586_jprb, 3.1586_jprb /)
zozcl(:,27,12) = (/&
 &1.7454_jprb, 1.7454_jprb, 1.5773_jprb, 1.6300_jprb, 1.2857_jprb, 1.3283_jprb, 0.7750_jprb, 0.9300_jprb,&
 &0.5321_jprb, 0.4725_jprb, 0.6400_jprb, 0.8800_jprb, 0.9425_jprb, 1.5350_jprb, 1.8095_jprb, 2.1829_jprb,&
 &2.1034_jprb, 2.3644_jprb, 2.3644_jprb /)
zozcl(:,28,12) = (/&
 &0.7455_jprb, 0.7455_jprb, 0.7238_jprb, 0.8030_jprb, 0.4890_jprb, 0.4723_jprb, 0.1650_jprb, 0.1559_jprb,&
 &0.0825_jprb, 0.1756_jprb, 0.1840_jprb, 0.1397_jprb, 0.3389_jprb, 0.6753_jprb, 0.8529_jprb, 1.3150_jprb,&
 &1.2478_jprb, 1.4815_jprb, 1.4815_jprb /)
zozcl(:,29,12) = (/&
 &0.3825_jprb, 0.3825_jprb, 0.3773_jprb, 0.3720_jprb, 0.2427_jprb, 0.1998_jprb, 0.1060_jprb, 0.0997_jprb,&
 &0.0485_jprb, 0.1056_jprb, 0.1140_jprb, 0.0693_jprb, 0.1087_jprb, 0.2997_jprb, 0.3720_jprb, 0.6467_jprb,&
 &0.6166_jprb, 0.6367_jprb, 0.6367_jprb /)
zozcl(:,30,12) = (/&
 &0.2977_jprb, 0.2977_jprb, 0.2726_jprb, 0.2711_jprb, 0.1600_jprb, 0.1016_jprb, 0.0905_jprb, 0.0847_jprb,&
 &0.0374_jprb, 0.0820_jprb, 0.0700_jprb, 0.0536_jprb, 0.0939_jprb, 0.1798_jprb, 0.2019_jprb, 0.3510_jprb,&
 &0.2935_jprb, 0.3471_jprb, 0.3471_jprb /)
zozcl(:,31,12) = (/&
 &0.0783_jprb, 0.0783_jprb, 0.0717_jprb, 0.0693_jprb, 0.0600_jprb, 0.0517_jprb, 0.0713_jprb, 0.0676_jprb,&
 &0.0371_jprb, 0.0614_jprb, 0.0483_jprb, 0.0488_jprb, 0.0639_jprb, 0.0688_jprb, 0.0764_jprb, 0.0943_jprb,&
 &0.0892_jprb, 0.1108_jprb, 0.1108_jprb /)
zozcl(:,32,12) = (/&
 &0.0262_jprb, 0.0262_jprb, 0.0372_jprb, 0.0300_jprb, 0.0378_jprb, 0.0365_jprb, 0.0552_jprb, 0.0530_jprb,&
 &0.0373_jprb, 0.0685_jprb, 0.0362_jprb, 0.0437_jprb, 0.0419_jprb, 0.0452_jprb, 0.0515_jprb, 0.0458_jprb,&
 &0.0440_jprb, 0.0453_jprb, 0.0453_jprb /)
zozcl(:,33,12) = (/&
 &0.0220_jprb, 0.0220_jprb, 0.0281_jprb, 0.0234_jprb, 0.0307_jprb, 0.0337_jprb, 0.0520_jprb, 0.0494_jprb,&
 &0.0280_jprb, 0.0420_jprb, 0.0300_jprb, 0.0379_jprb, 0.0426_jprb, 0.0409_jprb, 0.0453_jprb, 0.0411_jprb,&
 &0.0391_jprb, 0.0393_jprb, 0.0393_jprb /)
zozcl(:,34,12) = (/&
 &0.0220_jprb, 0.0220_jprb, 0.0281_jprb, 0.0234_jprb, 0.0307_jprb, 0.0337_jprb, 0.0520_jprb, 0.0494_jprb,&
 &0.0280_jprb, 0.0420_jprb, 0.0300_jprb, 0.0379_jprb, 0.0426_jprb, 0.0409_jprb, 0.0453_jprb, 0.0411_jprb,&
 &0.0391_jprb, 0.0393_jprb, 0.0393_jprb /) 


! PRESSURE LEVELS FOR O3 CLIMATOLOGY

rproc = (/&
            &_zero_ &
           &,                    0.3_jprb,    _half_,    0.7_jprb,      _one_ &
           &,     1.5_jprb,    _two_,     3._jprb,     5._jprb,     7._jprb,     10._jprb &
           &,    15._jprb,    20._jprb,    30._jprb,    50._jprb,    70._jprb,    100._jprb &
           &,   150._jprb,   200._jprb,   300._jprb,   500._jprb,   700._jprb,   1000._jprb &
           &,  1500._jprb,  2000._jprb,  3000._jprb,  5000._jprb,  7000._jprb,  10000._jprb &
           &, 15000._jprb, 20000._jprb, 30000._jprb, 50000._jprb, 70000._jprb, 100000._jprb &
           &,                                         110000._jprb &
           &/)

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

!*         1.     TIME INDEX WITHIN OZONE CLIMATOLOGY
!                 -----------------------------------


idy=ndd(kindat)-1
imn=nmm(kindat)
IF (imn == 1) THEN
  zxtime=REAL(idy,kind(zxtime))*1440._JPRB + KMINUT
ELSEIF (imn == 2) THEN
  IF(idy == 28) idy=idy-1
! A DAY IN FEB. IS 28.25*24*60/28=1452.8571min LONG.
  zxtime=44640._jprb+REAL(idy,kind(zxtime))*1452.8571_JPRB+KMINUT
ELSE
  zxtime=(zmday(imn-1)+REAL(idy,kind(zxtime)))*1440._jprb+kminut
ENDIF
! 525960=MINUTES IN A SIDERAL YEAR (365.25d)
zxtime=mod(zxtime,525960._jprb)

im1=0
im2=0
IF (zxtime <= zytime(1)) THEN
  im1=12
  im2=1
  ztimi=(zytime(1)-zxtime)/44640._jprb
ELSEIF(zxtime > zytime(12)) THEN
  im1=12
  im2=1
  ztimi=(548280._jprb-zxtime)/44640._jprb
! 548280.=(365.25d + 15.5d)*24*60
ELSE
  DO im=1,11
    IF (zxtime > zytime(im) .AND. zxtime <= zytime(im+1)) THEN
      im1=im
      im2=im+1
      ztimi=(zxtime-zytime(im2))/(zytime(im1)-zytime(im2))
    ENDIF
  ENDDO
  IF (im1 == 0.OR. im2 == 0 ) THEN
!    CALL ABOR1('Problem with time interpolation in suecozc!')
    print *,'Problem with time interpolation in suecozc!'
    stop
  ENDIF
ENDIF


!*         2.0    TIME INTERPOLATED FIELD
!                 -----------------------


!*( Field is also transformed in kg/kg! )

DO jl=1,19
  DO jk=1,34
    rozt(jl,jk)=ro3 * (zozcl(jl,jk,im2)&
     &+ztimi*(zozcl(jl,jk,im1)-zozcl(jl,jk,im2)))
  ENDDO
  rozt(jl, 0)=_zero_
  rozt(jl,35)=rozt(jl,34)
ENDDO


!     VECTOR OF LATITUDES FOR OZONE CLIMATOLOGY:

DO jl=1,19
  rsinc(jl)=sin((-90._jprb+(jl-1)*10._jprb)*rpi/180._jprb)
ENDDO

RETURN
END SUBROUTINE suecozc