From 21b2dfadc8a9c126d55f0e77d28aeb8f85b36b81 Mon Sep 17 00:00:00 2001 From: Chiu Wiegand Date: Tue, 13 Feb 2024 01:04:54 +0000 Subject: [PATCH] add all files found in pub --- EUV/ae-euv/aareadme.doc | 16 + EUV/ae-euv/f74113.dat | 2004 ++++++++++++ EUV/ae-euv/f76ref.dat | 2009 ++++++++++++ EUV/ae-euv/r74113.dat | 1966 +++++++++++ EUV/ae-euv/sc21refw.dat | 1692 ++++++++++ EUV/euv91/aareadme.doc | 98 + EUV/euv91/euv91.pro | 227 ++ EUV/euv91/euv91coe.txt | 97 + EUV/euv91/euv91ix1.dat | 1246 +++++++ EUV/euv91/euv91ix2.dat | 1246 +++++++ EUV/euv91/euv91ix3.dat | 559 ++++ EUV/euv91/euv91ix3_old.dat | 367 +++ EUV/euv91/euv91sub.for | 392 +++ EUV/euv91/f80183.dat | 43 + EUV/euv91/serfd.for | 87 + EUV/euv91/update.log | 148 + EUV/euv91/update.log.bak | 136 + EUV/euvac/aareadme.doc | 36 + EUV/euvac/euvac.for | 122 + EUV/solar2000/aareadme.doc | 20 + HWM93/AAREADME.TXT | 37 + HWM93/hwm93.txt | 2876 +++++++++++++++++ IGRF/data_files_for_Matlab/README | 8 + IGRF/data_files_for_Matlab/dgrf1945.dat | 122 + IGRF/data_files_for_Matlab/dgrf1950.dat | 122 + IGRF/data_files_for_Matlab/dgrf1955.dat | 122 + IGRF/data_files_for_Matlab/dgrf1960.dat | 122 + IGRF/data_files_for_Matlab/dgrf1965.dat | 122 + IGRF/data_files_for_Matlab/dgrf1970.dat | 122 + IGRF/data_files_for_Matlab/dgrf1975.dat | 122 + IGRF/data_files_for_Matlab/dgrf1980.dat | 122 + IGRF/data_files_for_Matlab/dgrf1985.dat | 122 + IGRF/data_files_for_Matlab/dgrf1990.dat | 122 + IGRF/data_files_for_Matlab/dgrf1995.dat | 122 + IGRF/data_files_for_Matlab/dgrf2000.dat | 197 ++ IGRF/data_files_for_Matlab/dgrf2005.dat | 197 ++ IGRF/data_files_for_Matlab/dgrf2010.dat | 197 ++ IGRF/data_files_for_Matlab/dgrf2015.dat | 197 ++ IGRF/data_files_for_Matlab/igrf2020.dat | 197 ++ IGRF/data_files_for_Matlab/igrf2020s.dat | 197 ++ IGRF/fortran_code/README | 20 + IGRF/fortran_code/bilcal.for | 315 ++ IGRF/fortran_code/dgrf1945.dat | 67 + IGRF/fortran_code/dgrf1950.dat | 67 + IGRF/fortran_code/dgrf1955.dat | 67 + IGRF/fortran_code/dgrf1960.dat | 67 + IGRF/fortran_code/dgrf1965.dat | 67 + IGRF/fortran_code/dgrf1970.dat | 67 + IGRF/fortran_code/dgrf1975.dat | 67 + IGRF/fortran_code/dgrf1980.dat | 67 + IGRF/fortran_code/dgrf1985.dat | 67 + IGRF/fortran_code/dgrf1990.dat | 67 + IGRF/fortran_code/dgrf1995.dat | 67 + IGRF/fortran_code/dgrf2000.dat | 67 + IGRF/fortran_code/dgrf2005.dat | 67 + IGRF/fortran_code/dgrf2010.dat | 67 + IGRF/fortran_code/dgrf2015.dat | 67 + IGRF/fortran_code/igrf2020.dat | 67 + IGRF/fortran_code/igrf2020s.dat | 67 + IGRF/fortran_code/igrf_sub.for | 910 ++++++ IGRF/fortran_code/shellig.for | 852 +++++ .../10th-generation/dgrf00.dat | 67 + .../10th-generation/dgrf45.dat | 67 + .../10th-generation/dgrf50.dat | 67 + .../10th-generation/dgrf55.dat | 67 + .../10th-generation/dgrf60.dat | 67 + .../10th-generation/dgrf65.dat | 67 + .../10th-generation/dgrf70.dat | 67 + .../10th-generation/dgrf75.dat | 67 + .../10th-generation/dgrf80.dat | 67 + .../10th-generation/dgrf85.dat | 67 + .../10th-generation/dgrf90.dat | 67 + .../10th-generation/dgrf95.dat | 67 + .../10th-generation/igrf05.dat | 67 + .../10th-generation/igrf05s.dat | 46 + .../11th-generation/dgrf1945.dat | 122 + .../11th-generation/dgrf1950.dat | 122 + .../11th-generation/dgrf1955.dat | 122 + .../11th-generation/dgrf1960.dat | 122 + .../11th-generation/dgrf1965.dat | 122 + .../11th-generation/dgrf1970.dat | 122 + .../11th-generation/dgrf1975.dat | 122 + .../11th-generation/dgrf1980.dat | 122 + .../11th-generation/dgrf1985.dat | 122 + .../11th-generation/dgrf1990.dat | 122 + .../11th-generation/dgrf1995.dat | 122 + .../11th-generation/dgrf2000.dat | 197 ++ .../11th-generation/dgrf2005.dat | 197 ++ .../11th-generation/dgrf2010.dat | 197 ++ .../11th-generation/igrf2010.dat | 197 ++ .../11th-generation/igrf2010s.dat | 82 + .../12th-generation/dgrf1945.dat | 122 + .../12th-generation/dgrf1950.dat | 122 + .../12th-generation/dgrf1955.dat | 122 + .../12th-generation/dgrf1960.dat | 122 + .../12th-generation/dgrf1965.dat | 122 + .../12th-generation/dgrf1970.dat | 122 + .../12th-generation/dgrf1975.dat | 122 + .../12th-generation/dgrf1980.dat | 122 + .../12th-generation/dgrf1985.dat | 122 + .../12th-generation/dgrf1990.dat | 122 + .../12th-generation/dgrf1995.dat | 122 + .../12th-generation/dgrf2000.dat | 197 ++ .../12th-generation/dgrf2005.dat | 197 ++ .../12th-generation/dgrf2010.dat | 197 ++ .../12th-generation/igrf2015.dat | 197 ++ .../12th-generation/igrf2015s.dat | 197 ++ .../7th-generation/dgrf45.dat | 67 + .../7th-generation/dgrf50.dat | 67 + .../7th-generation/dgrf55.dat | 67 + .../7th-generation/dgrf60.dat | 67 + .../7th-generation/dgrf65.dat | 67 + .../7th-generation/dgrf70.dat | 67 + .../7th-generation/dgrf75.dat | 67 + .../7th-generation/dgrf80.dat | 67 + .../7th-generation/dgrf85.dat | 67 + .../7th-generation/dgrf90.dat | 67 + .../7th-generation/igrf95.dat | 67 + .../7th-generation/igrf95s.dat | 46 + .../8th-generation/dgrf45.dat | 67 + .../8th-generation/dgrf50.dat | 67 + .../8th-generation/dgrf55.dat | 67 + .../8th-generation/dgrf60.dat | 67 + .../8th-generation/dgrf65.dat | 67 + .../8th-generation/dgrf70.dat | 67 + .../8th-generation/dgrf75.dat | 67 + .../8th-generation/dgrf80.dat | 67 + .../8th-generation/dgrf85.dat | 67 + .../8th-generation/dgrf90.dat | 67 + .../8th-generation/dgrf95.dat | 67 + .../8th-generation/igrf00.dat | 67 + .../8th-generation/igrf00s.dat | 46 + .../9th-generation/dgrf45.dat | 67 + .../9th-generation/dgrf50.dat | 67 + .../9th-generation/dgrf55.dat | 67 + .../9th-generation/dgrf60.dat | 67 + .../9th-generation/dgrf65.dat | 67 + .../9th-generation/dgrf70.dat | 67 + .../9th-generation/dgrf75.dat | 67 + .../9th-generation/dgrf80.dat | 67 + .../9th-generation/dgrf85.dat | 67 + .../9th-generation/dgrf90.dat | 67 + .../9th-generation/dgrf95.dat | 67 + .../9th-generation/igrf00.dat | 67 + .../9th-generation/igrf00s.dat | 46 + IGRF/old_coefficients/update.txt | 28 + IGRF/old_fortran_code/bilcal.for | 315 ++ IGRF/old_fortran_code/bilcal.log | 403 +++ IGRF/old_fortran_code/dgrf00.dat | 67 + IGRF/old_fortran_code/dgrf45.dat | 67 + IGRF/old_fortran_code/dgrf50.dat | 67 + IGRF/old_fortran_code/dgrf55.dat | 67 + IGRF/old_fortran_code/dgrf60.dat | 67 + IGRF/old_fortran_code/dgrf65.dat | 67 + IGRF/old_fortran_code/dgrf70.dat | 67 + IGRF/old_fortran_code/dgrf75.dat | 67 + IGRF/old_fortran_code/dgrf80.dat | 67 + IGRF/old_fortran_code/dgrf85.dat | 67 + IGRF/old_fortran_code/dgrf90.dat | 67 + IGRF/old_fortran_code/dgrf95.dat | 67 + IGRF/old_fortran_code/igrf05.dat | 68 + IGRF/old_fortran_code/igrf05full.dat | 106 + IGRF/old_fortran_code/igrf05s.dat | 46 + IGRF/old_fortran_code/igrf_sub.for | 908 ++++++ IGRF/old_fortran_code/shellig.for | 852 +++++ IGRF/old_fortran_code/update.txt | 4 + IGRF/old_matlab_igrf/Contributions.pdf | Bin 0 -> 424614 bytes IGRF/old_matlab_igrf/IGRF95.m | 87 + IGRF/old_matlab_igrf/aareadme.doc | 126 + IGRF/old_matlab_igrf/aareadme.txt | 126 + IGRF/old_matlab_igrf/bfield.m | 130 + IGRF/old_matlab_igrf/igrf_example.m | 110 + IGRF/old_matlab_igrf/recursion.m | 104 + IGRF/old_matlab_igrf/schmidt.m | 74 + MSIS/MSIS86/AAREADME.TXT | 64 + MSIS/MSIS86/m86dri.doc | 1337 ++++++++ MSIS/MSIS86/m86dri.for | 556 ++++ MSIS/MSIS86/m86dri.log | 619 ++++ MSIS/MSIS86/m86tes.dat | 92 + MSIS/MSIS86/m86tes.for | 80 + MSIS/MSIS86/msis86.dat | 293 ++ MSIS/MSIS86/msis86.for | 835 +++++ MSIS/MSIS90/AAREADME.TXT | 53 + MSIS/MSIS90/msise90_driver.for | 107 + MSIS/MSIS90/msise90_out.txt | 154 + MSIS/MSIS90/msise90_sub.for | 2199 +++++++++++++ .../nrlmsis00_c_version/DOCUMENTATION | 275 ++ .../nrlmsis00_c_version/nrlmsise-00.c | 1459 +++++++++ .../nrlmsis00_c_version/nrlmsise-00.h | 222 ++ .../nrlmsis00_c_version/nrlmsise-00_data.c | 740 +++++ .../nrlmsis00_c_version/nrlmsise-00_test.c | 168 + MSIS/NRLMSIS00/nrlmsise00_driver.for | 114 + MSIS/NRLMSIS00/nrlmsise00_output.txt | 157 + MSIS/NRLMSIS00/nrlmsise00_sub.for | 2441 ++++++++++++++ MSIS/NRLMSIS00/readme.txt | 58 + SOFIP/guzik_version/aareadme.txt | 30 + SOFIP/guzik_version/ae5min.for | 772 +++++ SOFIP/guzik_version/ae6max.for | 772 +++++ SOFIP/guzik_version/aei7hi.for | 665 ++++ SOFIP/guzik_version/aei7lo.for | 592 ++++ SOFIP/guzik_version/ap8mac.for | 818 +++++ SOFIP/guzik_version/ap8mic.for | 843 +++++ SOFIP/guzik_version/dspctr.for | 120 + SOFIP/guzik_version/guzik.doc | 47 + SOFIP/guzik_version/run_sofip.com | 22 + SOFIP/guzik_version/sample_input.inp | 2 + SOFIP/guzik_version/sample_orbit.dat | 721 +++++ SOFIP/guzik_version/sample_orbit_6.out | 965 ++++++ SOFIP/guzik_version/sample_orbit_7.out | 25 + SOFIP/guzik_version/sofip.for | 802 +++++ SOFIP/guzik_version/sofip_main.for | 401 +++ SOFIP/guzik_version/solpro.for | 75 + SOFIP/guzik_version/strip_to_72.for | 70 + SOFIP/guzik_version/tarara1.for | 92 + SOFIP/guzik_version/tarara2.for | 113 + SOFIP/guzik_version/unfold_records.for | 191 ++ SOFIP/guzik_version/unpack_sofip.com | 101 + SOFIP/original/aareadme.doc | 34 + SOFIP/original/ae5min.dat | 772 +++++ SOFIP/original/ae6max.dat | 772 +++++ SOFIP/original/ap8mac.dat | 818 +++++ SOFIP/original/ap8mic.dat | 843 +++++ SOFIP/original/sofip.for | 801 +++++ SOFIP/original/test.dat | 721 +++++ .../2001paper/Paper1/2001ja000219.pdf | Bin 0 -> 899703 bytes .../2001paper/Paper2/2001ja000220.pdf | Bin 0 -> 4011143 bytes Tsyganenko-Models/Errata_for_T01_01 | 27 + Tsyganenko-Models/Example1.for | 106 + Tsyganenko-Models/Example2.for | 93 + Tsyganenko-Models/Geopack-2005.doc | Bin 0 -> 122368 bytes Tsyganenko-Models/Geopack_2005.for | 1702 ++++++++++ Tsyganenko-Models/Geopack_2005.html | 1703 ++++++++++ Tsyganenko-Models/Storm_paper2.pdf | Bin 0 -> 1223105 bytes Tsyganenko-Models/T01_01.for | 2583 +++++++++++++++ Tsyganenko-Models/T89c.for | 489 +++ Tsyganenko-Models/T96.for | 2571 +++++++++++++++ Tsyganenko-Models/T96_comments.txt | 121 + Tsyganenko-Models/TS04.for | 2530 +++++++++++++++ Tsyganenko-Models/TS04.html | 2535 +++++++++++++++ Tsyganenko-Models/aareadme.txt | 23 + photoelectron_code/pesimp.for | 496 +++ 241 files changed, 73424 insertions(+) create mode 100755 EUV/ae-euv/aareadme.doc create mode 100755 EUV/ae-euv/f74113.dat create mode 100755 EUV/ae-euv/f76ref.dat create mode 100755 EUV/ae-euv/r74113.dat create mode 100755 EUV/ae-euv/sc21refw.dat create mode 100755 EUV/euv91/aareadme.doc create mode 100755 EUV/euv91/euv91.pro create mode 100755 EUV/euv91/euv91coe.txt create mode 100755 EUV/euv91/euv91ix1.dat create mode 100755 EUV/euv91/euv91ix2.dat create mode 100755 EUV/euv91/euv91ix3.dat create mode 100755 EUV/euv91/euv91ix3_old.dat create mode 100755 EUV/euv91/euv91sub.for create mode 100755 EUV/euv91/f80183.dat create mode 100755 EUV/euv91/serfd.for create mode 100755 EUV/euv91/update.log create mode 100755 EUV/euv91/update.log.bak create mode 100755 EUV/euvac/aareadme.doc create mode 100755 EUV/euvac/euvac.for create mode 100644 EUV/solar2000/aareadme.doc create mode 100755 HWM93/AAREADME.TXT create mode 100755 HWM93/hwm93.txt create mode 100644 IGRF/data_files_for_Matlab/README create mode 100644 IGRF/data_files_for_Matlab/dgrf1945.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1950.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1955.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1960.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1965.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1970.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1975.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1980.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1985.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1990.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf1995.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf2000.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf2005.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf2010.dat create mode 100644 IGRF/data_files_for_Matlab/dgrf2015.dat create mode 100644 IGRF/data_files_for_Matlab/igrf2020.dat create mode 100644 IGRF/data_files_for_Matlab/igrf2020s.dat create mode 100644 IGRF/fortran_code/README create mode 100755 IGRF/fortran_code/bilcal.for create mode 100644 IGRF/fortran_code/dgrf1945.dat create mode 100644 IGRF/fortran_code/dgrf1950.dat create mode 100644 IGRF/fortran_code/dgrf1955.dat create mode 100644 IGRF/fortran_code/dgrf1960.dat create mode 100644 IGRF/fortran_code/dgrf1965.dat create mode 100644 IGRF/fortran_code/dgrf1970.dat create mode 100644 IGRF/fortran_code/dgrf1975.dat create mode 100644 IGRF/fortran_code/dgrf1980.dat create mode 100644 IGRF/fortran_code/dgrf1985.dat create mode 100644 IGRF/fortran_code/dgrf1990.dat create mode 100644 IGRF/fortran_code/dgrf1995.dat create mode 100644 IGRF/fortran_code/dgrf2000.dat create mode 100644 IGRF/fortran_code/dgrf2005.dat create mode 100644 IGRF/fortran_code/dgrf2010.dat create mode 100644 IGRF/fortran_code/dgrf2015.dat create mode 100644 IGRF/fortran_code/igrf2020.dat create mode 100644 IGRF/fortran_code/igrf2020s.dat create mode 100755 IGRF/fortran_code/igrf_sub.for create mode 100755 IGRF/fortran_code/shellig.for create mode 100644 IGRF/old_coefficients/10th-generation/dgrf00.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf45.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf50.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf55.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf60.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf65.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf70.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf75.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf80.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf85.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf90.dat create mode 100644 IGRF/old_coefficients/10th-generation/dgrf95.dat create mode 100644 IGRF/old_coefficients/10th-generation/igrf05.dat create mode 100644 IGRF/old_coefficients/10th-generation/igrf05s.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1945.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1950.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1955.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1960.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1965.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1970.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1975.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1980.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1985.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1990.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf1995.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf2000.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf2005.dat create mode 100644 IGRF/old_coefficients/11th-generation/dgrf2010.dat create mode 100644 IGRF/old_coefficients/11th-generation/igrf2010.dat create mode 100644 IGRF/old_coefficients/11th-generation/igrf2010s.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1945.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1950.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1955.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1960.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1965.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1970.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1975.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1980.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1985.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1990.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf1995.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf2000.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf2005.dat create mode 100644 IGRF/old_coefficients/12th-generation/dgrf2010.dat create mode 100644 IGRF/old_coefficients/12th-generation/igrf2015.dat create mode 100644 IGRF/old_coefficients/12th-generation/igrf2015s.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf45.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf50.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf55.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf60.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf65.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf70.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf75.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf80.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf85.dat create mode 100644 IGRF/old_coefficients/7th-generation/dgrf90.dat create mode 100755 IGRF/old_coefficients/7th-generation/igrf95.dat create mode 100755 IGRF/old_coefficients/7th-generation/igrf95s.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf45.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf50.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf55.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf60.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf65.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf70.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf75.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf80.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf85.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf90.dat create mode 100644 IGRF/old_coefficients/8th-generation/dgrf95.dat create mode 100644 IGRF/old_coefficients/8th-generation/igrf00.dat create mode 100644 IGRF/old_coefficients/8th-generation/igrf00s.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf45.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf50.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf55.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf60.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf65.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf70.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf75.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf80.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf85.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf90.dat create mode 100644 IGRF/old_coefficients/9th-generation/dgrf95.dat create mode 100644 IGRF/old_coefficients/9th-generation/igrf00.dat create mode 100644 IGRF/old_coefficients/9th-generation/igrf00s.dat create mode 100755 IGRF/old_coefficients/update.txt create mode 100755 IGRF/old_fortran_code/bilcal.for create mode 100755 IGRF/old_fortran_code/bilcal.log create mode 100644 IGRF/old_fortran_code/dgrf00.dat create mode 100755 IGRF/old_fortran_code/dgrf45.dat create mode 100755 IGRF/old_fortran_code/dgrf50.dat create mode 100755 IGRF/old_fortran_code/dgrf55.dat create mode 100755 IGRF/old_fortran_code/dgrf60.dat create mode 100755 IGRF/old_fortran_code/dgrf65.dat create mode 100755 IGRF/old_fortran_code/dgrf70.dat create mode 100755 IGRF/old_fortran_code/dgrf75.dat create mode 100755 IGRF/old_fortran_code/dgrf80.dat create mode 100755 IGRF/old_fortran_code/dgrf85.dat create mode 100755 IGRF/old_fortran_code/dgrf90.dat create mode 100755 IGRF/old_fortran_code/dgrf95.dat create mode 100644 IGRF/old_fortran_code/igrf05.dat create mode 100644 IGRF/old_fortran_code/igrf05full.dat create mode 100644 IGRF/old_fortran_code/igrf05s.dat create mode 100755 IGRF/old_fortran_code/igrf_sub.for create mode 100755 IGRF/old_fortran_code/shellig.for create mode 100644 IGRF/old_fortran_code/update.txt create mode 100644 IGRF/old_matlab_igrf/Contributions.pdf create mode 100755 IGRF/old_matlab_igrf/IGRF95.m create mode 100755 IGRF/old_matlab_igrf/aareadme.doc create mode 100644 IGRF/old_matlab_igrf/aareadme.txt create mode 100755 IGRF/old_matlab_igrf/bfield.m create mode 100755 IGRF/old_matlab_igrf/igrf_example.m create mode 100755 IGRF/old_matlab_igrf/recursion.m create mode 100755 IGRF/old_matlab_igrf/schmidt.m create mode 100755 MSIS/MSIS86/AAREADME.TXT create mode 100755 MSIS/MSIS86/m86dri.doc create mode 100755 MSIS/MSIS86/m86dri.for create mode 100755 MSIS/MSIS86/m86dri.log create mode 100755 MSIS/MSIS86/m86tes.dat create mode 100755 MSIS/MSIS86/m86tes.for create mode 100755 MSIS/MSIS86/msis86.dat create mode 100755 MSIS/MSIS86/msis86.for create mode 100755 MSIS/MSIS90/AAREADME.TXT create mode 100644 MSIS/MSIS90/msise90_driver.for create mode 100644 MSIS/MSIS90/msise90_out.txt create mode 100644 MSIS/MSIS90/msise90_sub.for create mode 100644 MSIS/NRLMSIS00/nrlmsis00_c_version/DOCUMENTATION create mode 100644 MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.c create mode 100644 MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.h create mode 100644 MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_data.c create mode 100644 MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_test.c create mode 100644 MSIS/NRLMSIS00/nrlmsise00_driver.for create mode 100644 MSIS/NRLMSIS00/nrlmsise00_output.txt create mode 100644 MSIS/NRLMSIS00/nrlmsise00_sub.for create mode 100644 MSIS/NRLMSIS00/readme.txt create mode 100755 SOFIP/guzik_version/aareadme.txt create mode 100755 SOFIP/guzik_version/ae5min.for create mode 100755 SOFIP/guzik_version/ae6max.for create mode 100755 SOFIP/guzik_version/aei7hi.for create mode 100755 SOFIP/guzik_version/aei7lo.for create mode 100755 SOFIP/guzik_version/ap8mac.for create mode 100755 SOFIP/guzik_version/ap8mic.for create mode 100755 SOFIP/guzik_version/dspctr.for create mode 100755 SOFIP/guzik_version/guzik.doc create mode 100755 SOFIP/guzik_version/run_sofip.com create mode 100755 SOFIP/guzik_version/sample_input.inp create mode 100755 SOFIP/guzik_version/sample_orbit.dat create mode 100755 SOFIP/guzik_version/sample_orbit_6.out create mode 100755 SOFIP/guzik_version/sample_orbit_7.out create mode 100755 SOFIP/guzik_version/sofip.for create mode 100755 SOFIP/guzik_version/sofip_main.for create mode 100755 SOFIP/guzik_version/solpro.for create mode 100755 SOFIP/guzik_version/strip_to_72.for create mode 100755 SOFIP/guzik_version/tarara1.for create mode 100755 SOFIP/guzik_version/tarara2.for create mode 100755 SOFIP/guzik_version/unfold_records.for create mode 100755 SOFIP/guzik_version/unpack_sofip.com create mode 100755 SOFIP/original/aareadme.doc create mode 100755 SOFIP/original/ae5min.dat create mode 100755 SOFIP/original/ae6max.dat create mode 100755 SOFIP/original/ap8mac.dat create mode 100755 SOFIP/original/ap8mic.dat create mode 100755 SOFIP/original/sofip.for create mode 100755 SOFIP/original/test.dat create mode 100644 Tsyganenko-Models/2001paper/Paper1/2001ja000219.pdf create mode 100644 Tsyganenko-Models/2001paper/Paper2/2001ja000220.pdf create mode 100644 Tsyganenko-Models/Errata_for_T01_01 create mode 100644 Tsyganenko-Models/Example1.for create mode 100644 Tsyganenko-Models/Example2.for create mode 100644 Tsyganenko-Models/Geopack-2005.doc create mode 100644 Tsyganenko-Models/Geopack_2005.for create mode 100644 Tsyganenko-Models/Geopack_2005.html create mode 100644 Tsyganenko-Models/Storm_paper2.pdf create mode 100644 Tsyganenko-Models/T01_01.for create mode 100644 Tsyganenko-Models/T89c.for create mode 100644 Tsyganenko-Models/T96.for create mode 100644 Tsyganenko-Models/T96_comments.txt create mode 100644 Tsyganenko-Models/TS04.for create mode 100644 Tsyganenko-Models/TS04.html create mode 100644 Tsyganenko-Models/aareadme.txt create mode 100755 photoelectron_code/pesimp.for diff --git a/EUV/ae-euv/aareadme.doc b/EUV/ae-euv/aareadme.doc new file mode 100755 index 0000000..979084d --- /dev/null +++ b/EUV/ae-euv/aareadme.doc @@ -0,0 +1,16 @@ +This directory contains Extrem Ultraviolet (EUV) reference spectra and +related EUV model parameters based on the measurements and work of H.E. +Hinteregger and his colleagues. The model and reference spectra (R74113, +F74113, F76REF, SC21REFW) are described by Hinteregger et al. (Geophys. Res. +Lett. 8, 1147, 1981). The spectra and model are based on rocket measurements +and simultaneously obtained EUV fluxes by the AE-C and AE-E spectrometer. +The rocket measurements were used to establish absolute calibration factors +for the AE-E instrument. The originally proposed R74113 spectrum (Hinteregger, +J. Atmos. Terr. Phys. 38, 701, 1976) is based on AE-C measurements and data +froma rocket flight on April 23, 1974. R74113 revised to become F74113 +(Heroux and Hinteregger, J. Geophys. Res. 83, 5305, 1978), following refined +evaluation of the rocket and satellite data. F76REF used in addition AE-E +data from July 13-28, 1976 (when solar activity was low and constant). +SC21REFW extends F76REF to include a rocket flight on August 14, 1979. +The F76REF and SC21REFW files include also the wave-length dependent +adjustment factors that are used in Hinteregger's flux model. diff --git a/EUV/ae-euv/f74113.dat b/EUV/ae-euv/f74113.dat new file mode 100755 index 0000000..9da5a41 --- /dev/null +++ b/EUV/ae-euv/f74113.dat @@ -0,0 +1,2004 @@ +This file lists the wavelength (W) in Angstroem and photon flux (F) +in 1E10 m-2 s-1, followed by the line/range identification for the specific +wavelength group. -------------------- 12/15/94/dkb + + + W F + 14.25 .0FE XVIII + 14.40 .0FE XVIII + 15.01 .0FE XVII + 15.26 .0FE XVII + 16.01 .1 O VIII + 16.77 .0FE XVII + 17.05 .0FE XVII + 17.11 .2FE XVI + 18.62 .1 O VII + 18.97 .6 O VIII + 21.60 .5 O VII + 21.80 .2 O VII + 22.10 .5 O VII + 28.47 .8 C VI + 28.79 3.2 N VI + 29.52 2.8 N VI + 30.02 .7UNSPEC'D + 30.43 1.0 S XIV + 33.74 1.8 C VI + 40.95 .8SI XII + 43.76 2.4SI XI + 44.02 1.0SI XII + 44.16 1.2SI XII + 45.66 .6SI XII + 46.40 3.0SI XI + 46.67 3.2UNSPEC'D + 47.87 3.6UNSPEC'D + 49.22 4.8SI XI + 50.36 .2FE XVI + 50.52 6.0SI X + 50.69 6.0SI X + 52.30 3.2SI XI + 52.91 .4FE XV + 54.15 5.3BLEND + 54.42 2.3UNSPEC'D + 54.70 .2FE XVI + 55.06 2.8MG IX + 55.34 8.9SI IX + 56.08 2.0 S IX + 56.92 4.8UNSPEC'D + 57.36 4.0UNSPEC'D + 57.56 3.2UNSPEC'D + 57.88 2.9MG X + 58.96 1.5FE XIV + 59.62 1.4FE XIV + 60.30 2.0UNSPEC'D + 60.85 2.9UNSPEC'D + 61.07 5.2SI VIII + 61.63 2.4 S VIII + 61.90 4.0BLEND + 62.30 .1NE VIII + 62.35 1.7FE XII + 62.77 3.0MG IX + 62.92 .1FE XVI + 63.16 2.8MG X + 63.30 4.5MG X + 63.65 3.3UNSPEC'D + 63.72 .2FE XVI + 64.11 2.2FE XIII + 64.60 2.0UNSPEC'D + 65.21 2.4UNSPEC'D + 65.71 3.3UNSPEC'D + 65.85 2.5MG X + 66.30 6.0FE XII + 67.14 2.6MG IX + 67.35 3.1FE XII + 68.35 1.8UNSPEC'D + 69.65 11.0UNSPEC'D + 70.00 .4FE XV + 70.54 2.6UNSPEC'D + 70.75 2.4UNSPEC'D + 71.00 3.5UNSPEC'D + 71.94 3.1FE XIV + 72.31 5.1BLEND + 72.63 1.9FE XI + 72.80 1.7UNSPEC'D + 72.95 2.7UNSPEC'D + 73.55 2.0NE VIII + 74.21 2.0UNSPEC'D + 74.44 1.0UNSPEC'D + 74.83 3.2BLEND + 75.03 4.1MG VIII + 75.29 2.0UNSPEC'D + 75.46 3.0UNSPEC'D + 75.73 2.0UNSPEC'D + 76.01 5.6FE XIII + 76.48 2.0FE XIII + 76.83 3.3BLEND + 76.94 2.6UNSPEC'D + 77.30 2.3UNSPEC'D + 77.74 3.4MG IX + 78.56 2.4UNSPEC'D + 78.70 2.9NI XI + 79.08 1.5UNSPEC'D + 79.48 2.8FE XII + 79.76 1.8UNSPEC'D + 80.00 2.3FE XII + 80.21 2.3UNSPEC'D + 80.55 3.6FE XII + 80.94 1.6UNSPEC'D + 81.16 2.1UNSPEC'D + 81.58 2.4UNSPEC'D + 81.94 3.4UNSPEC'D + 82.43 4.8FE IX + 82.67 6.7UNSPEC'D + 83.25 3.5UNSPEC'D + 83.42 4.1MG VII + 83.67 3.5MG VII + 84.00 4.7MG VII + 84.26 3.0UNSPEC'D + 84.50 4.7UNSPEC'D + 84.72 3.3UNSPEC'D + 84.86 3.1UNSPEC'D + 85.16 2.4UNSPEC'D + 85.50 4.7UNSPEC'D + 85.69 2.2UNSPEC'D + 85.87 2.3UNSPEC'D + 86.23 1.7UNSPEC'D + 86.40 1.4UNSPEC'D + 86.77 5.9FE XI + 86.98 3.6FE XI + 87.30 1.9UNSPEC'D + 87.61 1.6UNSPEC'D + 88.10 .1NE VIII + 88.11 4.9BLEND + 88.14 .1NE VIII + 88.42 1.5UNSPEC'D + 88.64 1.9UNSPEC'D + 88.90 4.5FE XI + 89.14 3.2FE XI + 89.70 3.5FE XI + 90.14 3.7FE XI + 90.45 2.3FE XI + 90.71 2.4UNSPEC'D + 91.00 3.1UNSPEC'D + 91.48 1.5UNSPEC'D + 91.69 4.6NI X + 91.81 3.8UNSPEC'D + 92.09 3.0UNSPEC'D + 92.55 2.4UNSPEC'D + 92.81 3.0UNSPEC'D + 93.61 4.5UNSPEC'D + 94.07 6.8FE X + 94.25 .1NE VII + 94.39 1.4UNSPEC'D + 94.81 1.1UNSPEC'D + 94.90 .1NE VII + 95.37 5.0FE X + 95.51 2.3UNSPEC'D + 95.81 2.3UNSPEC'D + 96.05 9.2FE X + 96.49 1.5UNSPEC'D + 96.83 2.6FE X + 97.12 5.0FE X + 97.51 2.4BLEND + 97.87 2.2FE X + 98.12 4.5BLEND + 98.23 5.2BLEND + 98.50 2.1UNSPEC'D + 98.88 1.2UNSPEC'D + 99.44 1.3UNSPEC'D + 99.71 1.6UNSPEC'D + 99.99 2.2UNSPEC'D + 100.54 6.7UNSPEC'D + 100.96 2.1UNSPEC'D + 101.57 2.7UNSPEC'D + 102.15 3.6UNSPEC'D + 103.01 1.6NE VIII + 103.15 .1NE VII + 103.17 3.4UNSPEC'D + 103.58 6.0FE IX + 103.94 4.9UNSPEC'D + 104.23 1.3UNSPEC'D + 104.76 1.6UNSPEC'D + 105.23 5.0FE IX + 106.25 1.8NE VII + 106.57 .9UNSPEC'D + 106.93 1.5UNSPEC'D + 108.05 1.5FE VIII + 108.46 1.6UNSPEC'D + 109.50 1.6UNSPEC'D + 109.98 .1NE VII + 110.56 .1NE VII + 110.62 .1NE VII + 110.76 1.2UNSPEC'D + 111.16 .1NE VI + 111.25 3.8UNSPEC'D + 113.80 2.4UNSPEC'D + 114.09 2.1UNSPEC'D + 114.24 .1NE VI + 115.39 .1NE VII + 115.82 1.9UNSPEC'D + 116.75 3.1UNSPEC'D + 117.20 2.1UNSPEC'D + 120.40 .1NE VII + 121.15 .1NE VI + 121.79 .9UNSPEC'D + 122.70 3.7NE VI + 123.50 2.1UNSPEC'D + 127.65 3.6UNSPEC'D + 129.87 3.7 O VI + 130.30 .1NE VI + 131.02 4.2BLEND + 131.21 3.8BLEND + 136.21 .1NE VI + 136.28 .1NE VI + 136.34 .1NE VI + 136.45 .1NE VI + 136.48 .1NE VI + 141.20 9.0UNSPEC'D + 144.27 .9NI X + 145.04 11.9NI X + 148.40 40.0NI XI + 150.10 19.2 O VI + 152.15 19.2NI XII + 154.18 12.8NI XII + 157.73 7.5NI XIII + 158.37 12.0NI X + 159.98 11.0NI X + 160.37 6.0UNSPEC'D + 164.15 3.2NI XIV + 167.50 19.3FE VIII + 168.17 35.6FE VIII + 168.55 20.2FE VIII + 168.92 12.4FE VIII + 169.70 18.7UNSPEC'D + 171.08 300.0FE IX + 172.17 9.6 O V + 173.08 17.1BLEND + 174.58 256.0FE X + 175.26 26.5BLEND + 177.24 136.0FE X + 178.05 18.2FE XI + 179.27 .4NI XV + 179.75 18.4FE XI + 180.41 220.0FE XI + 181.14 25.0FE XI + 182.17 66.0FE XI + 183.45 16.9CA XIV + 184.53 103.7FE X + 184.80 6.9FE XI + 185.21 44.5FE VIII B + 186.60 25.8CA XIV + 186.87 70.0 S XI B + 187.95 1.9AR XIV + 188.31 191.0FE XI + 188.23 15.4FE XII + 190.02 48.0FE X + 191.04 19.9FE XII + 191.34 22.5FE XIII B + 192.40 64.0FE XII + 192.82 76.8FE XI + 193.52 100.0FE XII + 195.13 174.0FE XII + 196.52 45.3FE XIII + 196.65 9.9FE XII + 197.44 18.2FE XIII + 198.58 23.3FE XII B + 200.02 37.9FE XIII + 201.13 66.0FE XIII B + 202.05 96.0FE XIII + 202.64 20.7BLEND + 203.81 39.0FE XIII + 204.25 15.0FE XIII + 204.94 9.9FE XIII + 206.26 .9UNSPEC'D + 206.38 .9UNSPEC'D + 207.46 .9UNSPEC'D + 208.33 1.9 S X B + 209.63 1.9FE XIII + 209.78 .9UNSPEC'D + 211.32 54.0FE XIV + 212.14 11.8 S XII + 213.78 9.9FEXIII + 214.75 7.6SI VIII + 215.16 21.7 S XII + 216.88 32.8SI VIII B + 217.00 51.0UNSPEC'D + 218.19 65.0 S XII + 219.13 12.0FE XIV + 220.08 17.0FE XIV + 221.44 20.1 S XII + 221.82 1.9FE XIII + 224.74 37.4 S IX B + 225.12 51.0BLEND + 227.01 90.3SI IX + 227.19 1.9FE XV + 227.47 29.8 S XII + 228.70 18.4 S X + 230.65 10.5HE II + 231.55 12.8HE II + 232.60 18.7HE II + 233.84 10.0FE XV + 234.38 82.6BLEND + 237.33 55.0HE II + 239.87 16.9 S XI + 240.71 54.0FE XIII + 241.74 138.0FE IX + 243.03 98.0HE II + 243.86 50.0UNSPEC'D + 244.92 67.5FE IX + 245.94 14.9BLEND + 246.24 50.0BLEND + 246.91 18.7BLEND + 247.18 19.9BLEND + 249.18 20.2NI XVII + 251.10 9.6FE XVI + 251.95 73.0FE XIII + 252.19 35.0FE XIV + 253.78 29.0SI X + 256.32 400.0HE II + 256.38 60.0SI X + 256.64 30.0 S XIII + 257.16 200.0 S X B + 257.39 200.0FE XIV B + 258.36 140.0SI X + 259.52 56.0 S X + 261.05 62.0SI X + 262.99 10.0FE XVI + 264.24 68.0 S X + 264.80 64.0FE XIV + 270.51 30.0FE XIV + 271.99 60.0SI X + 272.64 25.0SI VII + 274.19 90.0FE XIV + 275.35 30.0SI VII + 275.67 25.0SI VII + 276.15 5.6MG VII + 276.84 10.0BLEND + 277.00 40.0BLEND + 277.27 60.0BLEND + 278.40 50.0MG VII B + 281.41 15.0 S XI + 284.15 210.0FE XV + 285.70 24.0 S XI G + 289.17 13.0FE XIV + 290.69 40.0SI IX + 291.70 18.0 S XI G + 292.78 63.4SI IX + 296.19 94.0SI IX + 299.50 9.8 S XII + 303.31 800.0SI XI + 303.78 6900.0HE II + 315.02 120.0MG VIII + 319.01 25.0NI XV + 320.56 20.0NI XVIIIB + 316.20 100.0SI VIII + 319.83 130.0SI VIII + 335.41 140.0FE XVI + 345.13 100.0SI IX + 345.74 80.0FE X + 347.39 150.0SI X + 349.85 100.0SI IX + 356.01 110.0SI X + 360.80 70.0FE XVI + 364.48 120.0FE XII + 368.07 650.0MG IX + 399.82 14.0NE VI + 401.14 31.0NE VI + 401.94 82.0NE VI + 403.26 48.0NE VI + 405.00 .0HE I (C) + 406.00 .0HE I (C) + 407.00 .0HE I (C) + 408.00 .0HE I (C) + 409.00 .0HE I (C) + 410.00 .0HE I (C) + 411.00 .0HE I (C) + 412.00 .0HE I (C) + 413.00 .0HE I (C) + 414.00 .0HE I (C) + 415.00 .0HE I (C) + 416.00 .0HE I (C) + 417.00 .0HE I (C) + 417.24 27.0FE XV + 418.00 .0HE I (C) + 419.00 .0HE I (C) + 420.00 .0HE I (C) + 421.00 .0HE I (C) + 422.00 .0HE I (C) + 423.00 .3HE I (C) + 424.00 .3HE I (C) + 425.00 .3HE I (C) + 426.00 .3HE I (C) + 427.00 .3HE I (C) + 428.00 .3HE I (C) + 429.00 .3HE I (C) + 430.00 .3HE I (C) + 430.47 74.0MG VIII + 431.00 .3HE I (C) + 432.00 .3HE I (C) + 433.00 .3HE I (C) + 434.00 .3HE I (C) + 435.00 .3HE I (C) + 436.00 .3HE I (C) + 436.70 110.0MG VIII + 437.00 .3HE I (C) + 438.00 .3HE I (C) + 439.00 .3HE I (C) + 440.00 .3HE I (C) + 441.00 .3HE I (C) + 442.00 .3HE I (C) + 443.00 .3HE I (C) + 444.00 .7HE I (C) + 445.00 .7HE I (C) + 446.00 .7HE I (C) + 447.00 .7HE I (C) + 448.00 .7HE I (C) + 449.00 .7HE I (C) + 450.00 .7HE I (C) + 451.00 .7HE I (C) + 452.00 .7HE I (C) + 453.00 1.0HE I (C) + 454.00 1.0HE I (C) + 455.00 1.0HE I (C) + 456.00 1.0HE I (C) + 457.00 1.0HE I (C) + 458.00 1.0HE I (C) + 459.00 1.0HE I (C) + 460.00 1.3HE I (C) + 461.00 1.3HE I (C) + 462.00 1.3HE I (C) + 463.00 1.3HE I (C) + 464.00 1.3HE I (C) + 465.00 1.6HE I (C) + 465.22 290.0NE VII + 466.00 1.6HE I (C) + 467.00 1.6HE I (C) + 468.00 2.0HE I (C) + 469.00 2.0HE I (C) + 470.00 2.0HE I (C) + 471.00 2.0HE I (C) + 472.00 2.3HE I (C) + 473.00 2.3HE I (C) + 474.00 2.6HE I (C) + 475.00 2.6HE I (C) + 476.00 2.6HE I (C) + 477.00 3.0HE I (C) + 478.00 3.0HE I (C) + 479.00 3.3HE I (C) + 480.00 3.3HE I (C) + 481.00 3.6HE I (C) + 482.00 3.6HE I (C) + 483.00 4.0HE I (C) + 484.00 4.3HE I (C) + 485.00 4.3HE I (C) + 486.00 4.6HE I (C) + 487.00 4.9HE I (C) + 488.00 5.3HE I (C) + 489.00 5.3HE I (C) + 489.50 10.0NE III + 490.00 5.6HE I (C) + 491.00 5.9HE I (C) + 492.00 6.3HE I (C) + 493.00 6.6HE I (C) + 494.00 6.9HE I (C) + 495.00 7.6HE I (C) + 496.00 7.9HE I (C) + 497.00 8.3HE I (C) + 498.00 8.6HE I (C) + 499.00 9.2HE I (C) + 499.37 100.0SI XII + 500.00 9.6HE I (C) + 501.00 10.2HE I (C) + 502.00 10.6HE I (C) + 503.00 11.2HE I (C) + 504.00 11.9HE I (C) + 507.93 110.0 O III G + 515.60 25.0HE I + 520.66 46.0SI XII + 525.80 65.0 O III + 537.02 120.0HE I + 554.37 720.0 O IV G + 558.60 45.0NE VI + 562.80 70.0NE VI + 584.33 1270.0HE I + 599.60 140.0 O III + 608.00 .1 H LY(C) + 609.00 .1 H LY(C) + 609.76 530.0MG X + 610.00 .1 H LY(C) + 611.00 .1 H LY(C) + 612.00 .1 H LY(C) + 613.00 .1 H LY(C) + 614.00 .1 H LY(C) + 615.00 .1 H LY(C) + 616.00 .1 H LY(C) + 616.60 15.7 O II + 617.00 .1 H LY(C) + 618.00 .1 H LY(C) + 619.00 .1 H LY(C) + 620.00 .1 H LY(C) + 621.00 .1 H LY(C) + 622.00 .1 H LY(C) + 623.00 .1 H LY(C) + 624.00 .2 H LY(C) + 624.93 240.0MG X + 625.00 .2 H LY(C) + 626.00 .2 H LY(C) + 627.00 .2 H LY(C) + 628.00 .2 H LY(C) + 629.00 .2 H LY(C) + 629.73 1590.0 O V + 630.00 .2 H LY(C) + 631.00 .1 H LY(C) + 632.00 .1 H LY(C) + 633.00 .1 H LY(C) + 634.00 .1 H LY(C) + 635.00 .1 H LY(C) + 636.00 .1 H LY(C) + 637.00 .1 H LY(C) + 638.00 .1 H LY(C) + 639.00 .1 H LY(C) + 640.00 .1 H LY(C) + 640.41 10.9 S II + 640.93 12.9 S II + 641.00 .1 H LY(C) + 641.81 16.9 S II + 642.00 .1 H LY(C) + 643.00 .1 H LY(C) + 644.00 .2 H LY(C) + 645.00 .2 H LY(C) + 646.00 .2 H LY(C) + 647.00 .2 H LY(C) + 648.00 .2 H LY(C) + 649.00 .2 H LY(C) + 650.00 .2 H LY(C) + 651.00 .2 H LY(C) + 652.00 .2 H LY(C) + 653.00 .2 H LY(C) + 654.00 .2 H LY(C) + 655.00 .2 H LY(C) + 656.00 .2 H LY(C) + 657.00 .3 H LY(C) + 657.30 11.0 S IV + 658.00 .3 H LY(C) + 659.00 .3 H LY(C) + 660.00 .3 H LY(C) + 661.00 .3 H LY(C) + 661.40 11.0 S IV + 662.00 .3 H LY(C) + 663.00 .3 H LY(C) + 664.00 .3 H LY(C) + 665.00 .3 H LY(C) + 666.00 .3 H LY(C) + 667.00 .4 H LY(C) + 668.00 .4 H LY(C) + 669.00 .4 H LY(C) + 670.00 .4 H LY(C) + 671.00 .4 H LY(C) + 672.00 .4 H LY(C) + 673.00 .4 H LY(C) + 674.00 .4 H LY(C) + 675.00 .5 H LY(C) + 676.00 .5 H LY(C) + 677.00 .5 H LY(C) + 678.00 .5 H LY(C) + 679.00 .5 H LY(C) + 680.00 .5 H LY(C) + 681.00 .5 H LY(C) + 682.00 .5 H LY(C) + 683.00 .5 H LY(C) + 684.00 .5 H LY(C) + 685.00 .5 H LY(C) + 685.71 90.0 N III G + 686.00 .5 H LY(C) + 687.00 .6 H LY(C) + 688.00 .6 H LY(C) + 689.00 .6 H LY(C) + 690.00 .6 H LY(C) + 691.00 .6 H LY(C) + 692.00 .7 H LY(C) + 693.00 .7 H LY(C) + 694.00 .7 H LY(C) + 695.00 .7 H LY(C) + 696.00 .7 H LY(C) + 697.00 .7 H LY(C) + 698.00 .7 H LY(C) + 699.00 .7 H LY(C) + 700.00 .8 H LY(C) + 701.00 .8 H LY(C) + 702.00 .8 H LY(C) + 703.00 .9 H LY(C) + 703.36 360.0 O III G + 704.00 .9 H LY(C) + 705.00 .9 H LY(C) + 706.00 .9 H LY(C) + 707.00 .9 H LY(C) + 708.00 .9 H LY(C) + 709.00 .9 H LY(C) + 710.00 1.0 H LY(C) + 711.00 1.0 H LY(C) + 712.00 1.0 H LY(C) + 713.00 1.1 H LY(C) + 714.00 1.1 H LY(C) + 715.00 1.2 H LY(C) + 716.00 1.2 H LY(C) + 717.00 1.2 H LY(C) + 718.00 1.3 H LY(C) + 718.50 50.0 O II + 719.00 1.3 H LY(C) + 720.00 1.3 H LY(C) + 721.00 1.3 H LY(C) + 722.00 1.4 H LY(C) + 723.00 1.4 H LY(C) + 724.00 1.5 H LY(C) + 725.00 1.5 H LY(C) + 726.00 1.5 H LY(C) + 727.00 1.5 H LY(C) + 728.00 1.6 H LY(C) + 729.00 1.6 H LY(C) + 730.00 1.7 H LY(C) + 731.00 1.7 H LY(C) + 732.00 1.7 H LY(C) + 733.00 1.9 H LY(C) + 734.00 1.9 H LY(C) + 735.00 1.9 H LY(C) + 736.00 2.0 H LY(C) + 737.00 2.0 H LY(C) + 738.00 2.1 H LY(C) + 739.00 2.1 H LY(C) + 740.00 2.1 H LY(C) + 741.00 2.2 H LY(C) + 742.00 2.3 H LY(C) + 743.00 2.3 H LY(C) + 744.00 2.4 H LY(C) + 745.00 2.4 H LY(C) + 746.00 2.5 H LY(C) + 747.00 2.6 H LY(C) + 748.00 2.7 H LY(C) + 749.00 2.7 H LY(C) + 750.00 2.8 H LY(C) + 751.00 2.9 H LY(C) + 752.00 2.9 H LY(C) + 753.00 3.0 H LY(C) + 754.00 3.1 H LY(C) + 755.00 3.1 H LY(C) + 756.00 3.2 H LY(C) + 757.00 3.3 H LY(C) + 758.00 3.4 H LY(C) + 758.68 30.0 O V + 759.00 3.6 H LY(C) + 759.44 23.0 O V + 760.00 3.6 H LY(C) + 760.30 80.0 O V + 761.00 3.7 H LY(C) + 761.13 20.0 O V + 762.00 3.8 H LY(C) + 762.00 30.0 O V + 763.00 3.9 H LY(C) + 764.00 4.0 H LY(C) + 765.00 4.1 H LY(C) + 765.15 170.0 N IV + 766.00 4.2 H LY(C) + 767.00 4.3 H LY(C) + 768.00 4.4 H LY(C) + 769.00 4.5 H LY(C) + 770.00 4.6 H LY(C) + 770.41 260.0NE VIII + 771.00 4.8 H LY(C) + 772.00 4.9 H LY(C) + 773.00 5.0 H LY(C) + 774.00 5.2 H LY(C) + 775.00 5.2 H LY(C) + 776.00 11.0 N II + 776.00 5.4 H LY(C) + 777.00 5.6 H LY(C) + 778.00 5.7 H LY(C) + 779.00 5.8 H LY(C) + 780.00 6.0 H LY(C) + 780.32 140.0NE VIII + 781.00 6.1 H LY(C) + 782.00 6.3 H LY(C) + 783.00 6.4 H LY(C) + 784.00 6.6 H LY(C) + 785.00 6.8 H LY(C) + 786.00 6.9 H LY(C) + 786.47 130.0 S V + 787.00 7.2 H LY(C) + 787.71 250.0 O IV + 788.00 7.3 H LY(C) + 789.00 7.5 H LY(C) + 790.00 7.6 H LY(C) + 790.15 430.0 O IV G + 791.00 7.9 H LY(C) + 792.00 8.1 H LY(C) + 793.00 8.2 H LY(C) + 794.00 8.5 H LY(C) + 795.00 8.7 H LY(C) + 796.00 8.9 H LY(C) + 797.00 9.1 H LY(C) + 798.00 9.4 H LY(C) + 799.00 9.6 H LY(C) + 800.00 9.8 H LY(C) + 801.00 10.2 H LY(C) + 802.00 10.4 H LY(C) + 803.00 10.7 H LY(C) + 804.00 11.0 H LY(C) + 805.00 11.2 H LY(C) + 806.00 11.5 H LY(C) + 807.00 11.8 H LY(C) + 808.00 12.1 H LY(C) + 809.00 12.4 H LY(C) + 810.00 12.7 H LY(C) + 811.00 13.1 H LY(C) + 812.00 13.4 H LY(C) + 813.00 13.7 H LY(C) + 814.00 14.1 H LY(C) + 815.00 14.5 H LY(C) + 816.00 14.8 H LY(C) + 817.00 15.2 H LY(C) + 818.00 15.5 H LY(C) + 819.00 16.0 H LY(C) + 820.00 16.3 H LY(C) + 821.00 16.8 H LY(C) + 822.00 17.2 H LY(C) + 823.00 17.7 H LY(C) + 824.00 18.2 H LY(C) + 825.00 18.6 H LY(C) + 826.00 19.1 H LY(C) + 827.00 19.6 H LY(C) + 828.00 20.0 H LY(C) + 829.00 20.6 H LY(C) + 830.00 21.1 H LY(C) + 831.00 21.6 H LY(C) + 832.00 22.2 H LY(C) + 833.00 22.8 H LY(C) + 834.00 23.3 H LY(C) + 834.20 620.0 OII,IIIG + 835.00 24.0 H LY(C) + 836.00 24.5 H LY(C) + 837.00 25.1 H LY(C) + 838.00 25.8 H LY(C) + 839.00 26.5 H LY(C) + 840.00 27.1 H LY(C) + 841.00 27.9 H LY(C) + 842.00 28.5 H LY(C) + 843.00 29.3 H LY(C) + 844.00 30.0 H LY(C) + 845.00 30.8 H LY(C) + 846.00 31.6 H LY(C) + 847.00 32.4 H LY(C) + 848.00 33.2 H LY(C) + 849.00 34.0 H LY(C) + 850.00 34.9 H LY(C) + 851.00 35.8 H LY(C) + 852.00 36.7 H LY(C) + 853.00 37.7 H LY(C) + 854.00 38.6 H LY(C) + 855.00 39.6 H LY(C) + 856.00 40.6 H LY(C) + 857.00 41.7 H LY(C) + 858.00 42.7 H LY(C) + 859.00 43.8 H LY(C) + 860.00 44.9 H LY(C) + 861.00 46.1 H LY(C) + 862.00 47.2 H LY(C) + 863.00 48.4 H LY(C) + 864.00 49.6 H LY(C) + 865.00 50.9 H LY(C) + 866.00 52.2 H LY(C) + 867.00 53.5 H LY(C) + 868.00 54.9 H LY(C) + 869.00 56.3 H LY(C) + 870.00 57.7 H LY(C) + 871.00 59.2 H LY(C) + 872.00 60.7 H LY(C) + 873.00 62.3 H LY(C) + 874.00 63.9 H LY(C) + 875.00 65.5 H LY(C) + 876.00 67.1 H LY(C) + 877.00 68.8 H LY(C) + 878.00 70.6 H LY(C) + 879.00 72.4 H LY(C) + 880.00 74.2 H LY(C) + 881.00 76.1 H LY(C) + 882.00 78.1 H LY(C) + 883.00 80.1 H LY(C) + 884.00 82.1 H LY(C) + 885.00 84.2 H LY(C) + 886.00 86.3 H LY(C) + 887.00 88.5 H LY(C) + 888.00 90.8 H LY(C) + 889.00 93.1 H LY(C) + 890.00 95.5 H LY(C) + 891.00 97.9 H LY(C) + 892.00 100.4 H LY(C) + 893.00 102.9 H LY(C) + 894.00 105.5 H LY(C) + 895.00 108.2 H LY(C) + 896.00 111.0 H LY(C) + 897.00 113.8 H LY(C) + 898.00 116.6 H LY(C) + 899.00 119.6 H LY(C) + 900.00 122.7 H LY(C) + 901.00 125.8 H LY(C) + 902.00 129.0 H LY(C) + 903.00 132.3 H LY(C) + 904.00 135.7 H LY(C) + 904.10 110.0 C II G + 905.00 139.1 H LY(C) + 906.00 142.6 H LY(C) + 907.00 146.3 H LY(C) + 908.00 150.0 H LY(C) + 909.00 153.8 H LY(C) + 910.00 157.7 H LY(C) + 911.00 161.7 H LY(C) + 912.00 165.8 H LY(C) + 913.00 2.3 C I (C) + 914.00 2.3 C I (C) + 915.00 2.3 C I (C) + 916.00 2.4 C I (C) + 917.00 2.4 C I (C) + 918.00 2.5 C I (C) + 919.00 2.5 C I (C) + 920.00 2.6 C I (C) + 920.96 56.0 H LY-9 + 921.00 2.6 C I (C) + 922.00 2.6 C I (C) + 923.00 2.8 C I (C) + 923.15 80.0 H LY-8 B + 924.00 2.8 C I (C) + 925.00 2.9 C I (C) + 926.00 2.9 C I (C) + 926.20 110.0 H LY-7 + 927.00 3.0 C I (C) + 928.00 3.0 C I (C) + 929.00 3.1 C I (C) + 930.00 3.1 C I (C) + 930.75 130.0 H LY-6 B + 931.00 3.2 C I (C) + 932.00 3.2 C I (C) + 933.00 3.3 C I (C) + 933.38 103.0 S VI + 934.00 3.3 C I (C) + 935.00 3.4 C I (C) + 936.00 3.4 C I (C) + 937.00 3.5 C I (C) + 937.80 180.0 H LY-5 + 938.00 3.6 C I (C) + 939.00 3.6 C I (C) + 940.00 3.7 C I (C) + 941.00 3.7 C I (C) + 942.00 3.9 C I (C) + 943.00 4.0 C I (C) + 944.00 4.0 C I (C) + 944.52 68.0 S VI + 945.00 4.1 C I (C) + 946.00 4.2 C I (C) + 947.00 4.2 C I (C) + 948.00 4.3 C I (C) + 949.00 4.4 C I (C) + 949.74 300.0 H LY-4 + 950.00 4.4 C I (C) + 951.00 4.5 C I (C) + 952.00 4.6 C I (C) + 953.00 4.7 C I (C) + 954.00 4.7 C I (C) + 955.00 4.8 C I (C) + 956.00 5.0 C I (C) + 957.00 5.1 C I (C) + 958.00 5.2 C I (C) + 959.00 5.3 C I (C) + 960.00 5.3 C I (C) + 961.00 5.4 C I (C) + 962.00 5.5 C I (C) + 963.00 5.6 C I (C) + 964.00 5.7 C I (C) + 965.00 5.8 C I (C) + 966.00 5.9 C I (C) + 967.00 6.1 C I (C) + 968.00 6.2 C I (C) + 969.00 6.3 C I (C) + 970.00 6.4 C I (C) + 971.00 6.5 C I (C) + 972.00 6.6 C I (C) + 972.54 600.0 H LY-3 + 973.00 6.7 C I (C) + 974.00 6.8 C I (C) + 975.00 7.0 C I (C) + 976.00 7.2 C I (C) + 977.00 7.3 C I (C) + 977.02 4400.0 C III + 978.00 7.4 C I (C) + 979.00 7.5 C I (C) + 980.00 7.7 C I (C) + 981.00 7.8 C I (C) + 982.00 7.9 C I (C) + 983.00 8.0 C I (C) + 984.00 8.3 C I (C) + 985.00 8.4 C I (C) + 986.00 8.5 C I (C) + 987.00 8.7 C I (C) + 988.00 8.8 C I (C) + 989.00 9.0 C I (C) + 989.79 170.0 N III + 990.00 9.1 C I (C) + 991.00 9.4 C I (C) + 991.55 340.0 N III + 992.00 9.5 C I (C) + 993.00 9.7 C I (C) + 994.00 9.8 C I (C) + 995.00 10.0 C I (C) + 996.00 10.2 C I (C) + 997.00 10.3 C I (C) + 998.00 10.6 C I (C) + 999.00 10.8 C I (C) + 1000.00 11.0 C I (C) + 1001.00 11.1 C I (C) + 1002.00 11.3 C I (C) + 1003.00 11.6 C I (C) + 1004.00 11.8 C I (C) + 1005.00 12.0 C I (C) + 1006.00 12.2 C I (C) + 1007.00 12.4 C I (C) + 1008.00 12.7 C I (C) + 1009.00 12.9 C I (C) + 1010.00 13.1 C I (C) + 1010.20 80.0 C II + 1011.00 13.3 C I (C) + 1012.00 13.6 C I (C) + 1013.00 13.9 C I (C) + 1014.00 14.1 C I (C) + 1015.00 14.4 C I (C) + 1016.00 14.6 C I (C) + 1017.00 14.9 C I (C) + 1018.00 15.2 C I (C) + 1019.00 15.4 C I (C) + 1020.00 15.7 C I (C) + 1021.00 16.0 C I (C) + 1022.00 16.3 C I (C) + 1023.00 16.6 C I (C) + 1024.00 16.8 C I (C) + 1025.00 17.2 C I (C) + 1025.72 3500.0 H LY-2 + 1026.00 17.5 C I (C) + 1027.00 17.8 C I (C) + 1028.00 18.2 C I (C) + 1029.00 18.5 C I (C) + 1030.00 18.8 C I (C) + 1031.00 19.1 C I (C) + 1031.91 2100.0 O VI + 1032.00 19.5 C I (C) + 1033.00 19.8 C I (C) + 1034.00 20.2 C I (C) + 1035.00 20.6 C I (C) + 1036.00 20.9 C I (C) + 1036.34 200.0 C II + 1037.00 21.3 C I (C) + 1037.02 250.0 C II + 1037.61 1040.0 O VI + 1038.00 21.7 C I (C) + 1039.00 22.1 C I (C) + 1040.00 22.6 C I (C) + 1041.00 22.9 C I (C) + 1042.00 23.3 C I (C) + 1043.00 23.8 C I (C) + 1044.00 24.2 C I (C) + 1045.00 24.6 C I (C) + 1046.00 25.1 C I (C) + 1047.00 25.5 C I (C) + 1048.00 26.0 C I (C) + 1049.00 26.4 C I (C) + 1050.00 27.0 C I (C) + 1051.00 27.4 C I (C) + 1052.00 27.9 C I (C) + 1053.00 28.4 C I (C) + 1054.00 28.9 C I (C) + 1055.00 29.5 C I (C) + 1056.00 30.0 C I (C) + 1057.00 30.6 C I (C) + 1058.00 31.1 C I (C) + 1059.00 31.7 C I (C) + 1060.00 32.2 C I (C) + 1061.00 32.8 C I (C) + 1062.00 33.4 C I (C) + 1062.70 55.0 S IV ? + 1063.00 34.0 C I (C) + 1064.00 34.7 C I (C) + 1065.00 35.2 C I (C) + 1066.00 35.9 C I (C) + 1067.00 36.5 C I (C) + 1068.00 37.2 C I (C) + 1069.00 37.8 C I (C) + 1070.00 38.5 C I (C) + 1071.00 39.3 C I (C) + 1072.00 39.9 C I (C) + 1073.00 40.7 C I (C) + 1074.00 41.5 C I (C) + 1075.00 42.1 C I (C) + 1076.00 42.9 C I (C) + 1077.00 43.7 C I (C) + 1077.10 110.0 S III B + 1078.00 44.6 C I (C) + 1079.00 45.3 C I (C) + 1080.00 46.1 C I (C) + 1081.00 47.0 C I (C) + 1082.00 47.9 C I (C) + 1083.00 48.6 C I (C) + 1084.00 49.5 C I (C) + 1085.00 50.5 C I (C) + 1085.10 520.0 N II G + 1086.00 51.4 C I (C) + 1087.00 52.3 C I (C) + 1088.00 53.2 C I (C) + 1089.00 54.2 C I (C) + 1090.00 55.2 C I (C) + 1091.00 56.2 C I (C) + 1092.00 57.2 C I (C) + 1093.00 58.2 C I (C) + 1094.00 59.3 C I (C) + 1095.00 60.4 C I (C) + 1096.00 61.5 C I (C) + 1097.00 62.6 C I (C) + 1098.00 63.7 C I (C) + 1099.00 64.8 C I (C) + 1100.00 66.0 C I (C) + 1101.00 1.8QUASI(C) + 1102.00 1.8QUASI(C) + 1103.00 1.8QUASI(C) + 1104.00 1.8QUASI(C) + 1105.00 1.9QUASI(C) + 1106.00 1.9QUASI(C) + 1107.00 1.9QUASI(C) + 1108.00 1.9QUASI(C) + 1109.00 2.0QUASI(C) + 1110.00 2.0QUASI(C) + 1111.00 2.0QUASI(C) + 1112.00 2.1QUASI(C) + 1113.00 2.1QUASI(C) + 1114.00 2.2QUASI(C) + 1115.00 2.2QUASI(C) + 1116.00 2.2QUASI(C) + 1117.00 2.3QUASI(C) + 1118.00 2.3QUASI(C) + 1119.00 2.4QUASI(C) + 1120.00 2.4QUASI(C) + 1121.00 2.5QUASI(C) + 1122.00 2.6QUASI(C) + 1122.50 290.0SI IV B + 1123.00 2.8QUASI(C) + 1124.00 2.9QUASI(C) + 1125.00 3.0QUASI(C) + 1126.00 3.1QUASI(C) + 1127.00 3.2QUASI(C) + 1128.00 3.3QUASI(C) + 1128.30 360.0SI IV + 1129.00 3.4QUASI(C) + 1130.00 3.5QUASI(C) + 1131.00 3.7QUASI(C) + 1132.00 4.0QUASI(C) + 1133.00 4.2QUASI(C) + 1134.00 4.4QUASI(C) + 1135.00 4.6QUASI(C) + 1136.00 4.8QUASI(C) + 1137.00 5.1QUASI(C) + 1138.00 5.3QUASI(C) + 1139.00 5.5QUASI(C) + 1140.00 5.7QUASI(C) + 1141.00 6.2QUASI(C) + 1142.00 6.6QUASI(C) + 1143.00 7.0QUASI(C) + 1144.00 7.5QUASI(C) + 1145.00 7.9QUASI(C) + 1146.00 8.4QUASI(C) + 1147.00 8.8QUASI(C) + 1148.00 9.2QUASI(C) + 1149.00 9.7QUASI(C) + 1150.00 10.1QUASI(C) + 1151.00 10.7QUASI(C) + 1152.00 11.4QUASI(C) + 1153.00 12.0QUASI(C) + 1154.00 12.6QUASI(C) + 1155.00 13.2QUASI(C) + 1156.00 13.8QUASI(C) + 1157.00 14.4QUASI(C) + 1158.00 15.0QUASI(C) + 1159.00 15.6QUASI(C) + 1160.00 16.1QUASI(C) + 1161.00 17.5QUASI(C) + 1162.00 18.8QUASI(C) + 1163.00 20.1QUASI(C) + 1164.00 21.3QUASI(C) + 1165.00 22.6QUASI(C) + 1166.00 23.9QUASI(C) + 1167.00 25.1QUASI(C) + 1168.00 26.4QUASI(C) + 1169.00 27.6QUASI(C) + 1170.00 28.8QUASI(C) + 1171.00 30.1QUASI(C) + 1172.00 31.3QUASI(C) + 1173.00 32.5QUASI(C) + 1174.00 33.7QUASI(C) + 1175.00 34.8QUASI(C) + 1175.71 2530.0 C III + 1176.00 36.0QUASI(C) + 1177.00 37.2QUASI(C) + 1178.00 38.3QUASI(C) + 1179.00 39.4QUASI(C) + 1180.00 40.6QUASI(C) + 1181.00 42.5QUASI(C) + 1182.00 44.5QUASI(C) + 1183.00 46.5QUASI(C) + 1184.00 48.4QUASI(C) + 1185.00 50.3QUASI(C) + 1186.00 52.2QUASI(C) + 1187.00 54.1QUASI(C) + 1188.00 55.9QUASI(C) + 1189.00 57.8QUASI(C) + 1190.00 59.6QUASI(C) + 1191.00 61.4QUASI(C) + 1192.00 63.2QUASI(C) + 1193.00 65.0QUASI(C) + 1194.00 66.8QUASI(C) + 1195.00 68.5QUASI(C) + 1196.00 70.2QUASI(C) + 1197.00 71.9QUASI(C) + 1198.00 73.6QUASI(C) + 1199.00 75.3QUASI(C) + 1200.00 77.0QUASI(C) + 1201.00 79.9QUASI(C) + 1202.00 82.8QUASI(C) + 1203.00 85.7QUASI(C) + 1204.00 88.5QUASI(C) + 1205.00 91.3QUASI(C) + 1206.00 89.8QUASI(C) + 1206.52 4000.0SI III + 1207.00 88.3QUASI(C) + 1208.00 86.8QUASI(C) + 1209.00 85.3QUASI(C) + 1210.00 83.8QUASI(C) + 1211.00 82.4QUASI(C) + 1212.00 80.9QUASI(C) + 1213.00 79.5QUASI(C) + 1214.00 78.0QUASI(C) + 1215.00 76.6QUASI(C) + 1215.67251000.0 H LY-1 + 1216.00 75.2QUASI(C) + 1217.00 73.8QUASI(C) + 1218.00 72.4QUASI(C) + 1219.00 71.0QUASI(C) + 1220.00 69.6QUASI(C) + 1221.00 68.3QUASI(C) + 1222.00 66.9QUASI(C) + 1223.00 65.6QUASI(C) + 1224.00 64.2QUASI(C) + 1225.00 62.9QUASI(C) + 1226.00 61.6QUASI(C) + 1227.00 60.3QUASI(C) + 1228.00 59.0QUASI(C) + 1229.00 57.7QUASI(C) + 1230.00 146.6QUASI(C) + 1231.00 142.2QUASI(C) + 1232.00 137.8QUASI(C) + 1233.00 133.6QUASI(C) + 1234.00 129.4QUASI(C) + 1235.00 125.3QUASI(C) + 1236.00 121.1QUASI(C) + 1237.00 117.0QUASI(C) + 1238.00 113.0QUASI(C) + 1238.82 205.0 N V + 1239.00 108.9QUASI(C) + 1240.00 59.7QUASI(C) + 1241.00 61.5QUASI(C) + 1242.00 59.7QUASI(C) + 1242.80 90.0 N V + 1243.00 57.9QUASI(C) + 1244.00 56.1QUASI(C) + 1245.00 54.4QUASI(C) + 1246.00 52.7QUASI(C) + 1247.00 50.9QUASI(C) + 1248.00 49.2QUASI(C) + 1249.00 47.6QUASI(C) + 1250.00 125.1QUASI(C) + 1251.00 121.2QUASI(C) + 1252.00 117.3QUASI(C) + 1253.00 113.7QUASI(C) + 1254.00 109.6QUASI(C) + 1255.00 106.1QUASI(C) + 1256.00 102.2QUASI(C) + 1257.00 98.5QUASI(C) + 1258.00 94.9QUASI(C) + 1259.00 91.2QUASI(C) + 1260.00 62.1QUASI(C) + 1260.42 147.0SI II + 1261.00 59.5QUASI(C) + 1262.00 57.0QUASI(C) + 1263.00 54.5QUASI(C) + 1264.00 52.1QUASI(C) + 1264.74 273.0SI II + 1265.00 49.6QUASI(C) + 1266.00 47.3QUASI(C) + 1267.00 45.0QUASI(C) + 1268.00 42.8QUASI(C) + 1269.00 40.3QUASI(C) + 1270.00 84.4QUASI(C) + 1271.00 82.3QUASI(C) + 1272.00 80.1QUASI(C) + 1273.00 78.1QUASI(C) + 1274.00 75.9QUASI(C) + 1275.00 73.8QUASI(C) + 1276.00 71.9QUASI(C) + 1277.00 69.7QUASI(C) + 1278.00 67.7QUASI(C) + 1279.00 65.8QUASI(C) + 1280.00 48.0QUASI(C) + 1281.00 48.5QUASI(C) + 1282.00 48.9QUASI(C) + 1283.00 49.3QUASI(C) + 1284.00 49.8QUASI(C) + 1285.00 50.2QUASI(C) + 1286.00 50.6QUASI(C) + 1287.00 51.1QUASI(C) + 1288.00 51.5QUASI(C) + 1289.00 51.9QUASI(C) + 1290.00 82.6QUASI(C) + 1291.00 83.4QUASI(C) + 1292.00 84.1QUASI(C) + 1293.00 84.8QUASI(C) + 1294.00 85.7QUASI(C) + 1295.00 86.4QUASI(C) + 1296.00 87.2QUASI(C) + 1297.00 87.9QUASI(C) + 1298.00 88.7QUASI(C) + 1299.00 89.3QUASI(C) + 1300.00 88.1QUASI(C) + 1301.00 89.1QUASI(C) + 1302.00 89.9QUASI(C) + 1302.17 1100.0 O I + 1303.00 90.5QUASI(C) + 1304.00 91.2QUASI(C) + 1304.86 1130.0 O I + 1305.00 92.2QUASI(C) + 1306.00 93.0QUASI(C) + 1306.03 1230.0 O I + 1307.00 94.0QUASI(C) + 1308.00 94.8QUASI(C) + 1309.00 95.5QUASI(C) + 1309.28 207.0SI III + 1310.00 65.2QUASI(C) + 1311.00 65.6QUASI(C) + 1312.00 66.0QUASI(C) + 1313.00 66.6QUASI(C) + 1314.00 67.1QUASI(C) + 1315.00 67.6QUASI(C) + 1316.00 68.1QUASI(C) + 1317.00 68.6QUASI(C) + 1318.00 69.3QUASI(C) + 1318.95 106.0UNSPEC'D + 1319.00 69.8QUASI(C) + 1320.00 75.0QUASI(C) + 1321.00 75.7QUASI(C) + 1322.00 76.4QUASI(C) + 1323.00 77.0QUASI(C) + 1324.00 77.6QUASI(C) + 1325.00 78.3QUASI(C) + 1326.00 79.0QUASI(C) + 1327.00 79.6QUASI(C) + 1328.00 80.3QUASI(C) + 1329.00 80.9QUASI(C) + 1330.00 90.7QUASI(C) + 1331.00 91.3QUASI(C) + 1332.00 92.0QUASI(C) + 1333.00 92.8QUASI(C) + 1334.00 93.7QUASI(C) + 1334.53 1840.0 C II + 1335.00 94.4QUASI(C) + 1335.66 2520.0 C II + 1336.00 95.1QUASI(C) + 1337.00 96.0QUASI(C) + 1338.00 96.7QUASI(C) + 1339.00 97.6QUASI(C) + 1340.00 88.4QUASI(C) + 1341.00 89.2QUASI(C) + 1342.00 90.0QUASI(C) + 1343.00 90.8QUASI(C) + 1344.00 91.6QUASI(C) + 1345.00 92.4QUASI(C) + 1346.00 93.1QUASI(C) + 1347.00 93.9QUASI(C) + 1348.00 94.8QUASI(C) + 1349.00 95.4QUASI(C) + 1350.00 102.1QUASI(C) + 1351.00 102.7QUASI(C) + 1352.00 103.4QUASI(C) + 1353.00 104.0QUASI(C) + 1354.00 104.8QUASI(C) + 1355.00 105.4QUASI(C) + 1355.60 330.0 O I + 1356.00 106.2QUASI(C) + 1357.00 106.7QUASI(C) + 1358.00 107.5QUASI(C) + 1358.51 89.0 O I + 1359.00 108.2QUASI(C) + 1360.00 101.5QUASI(C) + 1361.00 102.1QUASI(C) + 1362.00 102.8QUASI(C) + 1363.00 103.7QUASI(C) + 1364.00 104.5QUASI(C) + 1365.00 105.4QUASI(C) + 1366.00 106.3QUASI(C) + 1367.00 107.0QUASI(C) + 1368.00 107.9QUASI(C) + 1369.00 108.8QUASI(C) + 1370.00 108.8QUASI(C) + 1371.00 109.7QUASI(C) + 1372.00 110.6QUASI(C) + 1373.00 111.7QUASI(C) + 1374.00 112.5QUASI(C) + 1375.00 113.5QUASI(C) + 1376.00 114.4QUASI(C) + 1377.00 115.5QUASI(C) + 1378.00 116.4QUASI(C) + 1379.00 117.4QUASI(C) + 1380.00 100.1QUASI(C) + 1381.00 101.0QUASI(C) + 1382.00 101.8QUASI(C) + 1383.00 102.7QUASI(C) + 1384.00 103.6QUASI(C) + 1385.00 104.4QUASI(C) + 1386.00 105.4QUASI(C) + 1387.00 106.2QUASI(C) + 1388.00 107.1QUASI(C) + 1389.00 108.1QUASI(C) + 1390.00 134.7QUASI(C) + 1391.00 135.8QUASI(C) + 1392.00 136.9QUASI(C) + 1393.00 138.2QUASI(C) + 1393.76 1300.0SI IV + 1394.00 139.5QUASI(C) + 1395.00 140.5QUASI(C) + 1396.00 141.7QUASI(C) + 1397.00 143.0QUASI(C) + 1398.00 144.1QUASI(C) + 1399.00 145.3QUASI(C) + 1400.00 172.1QUASI(C) + 1401.00 173.7QUASI(C) + 1402.00 174.9QUASI(C) + 1402.77 910.0SI IV + 1403.00 176.5QUASI(C) + 1404.00 178.1QUASI(C) + 1405.00 179.7QUASI(C) + 1406.00 181.3QUASI(C) + 1407.00 182.9QUASI(C) + 1408.00 184.5QUASI(C) + 1409.00 186.1QUASI(C) + 1410.00 153.0QUASI(C) + 1411.00 154.3QUASI(C) + 1412.00 155.5QUASI(C) + 1413.00 156.9QUASI(C) + 1414.00 158.3QUASI(C) + 1415.00 159.6QUASI(C) + 1416.00 160.9QUASI(C) + 1417.00 162.3QUASI(C) + 1418.00 163.6QUASI(C) + 1419.00 165.1QUASI(C) + 1420.00 182.9QUASI(C) + 1421.00 184.4QUASI(C) + 1422.00 185.9QUASI(C) + 1423.00 187.5QUASI(C) + 1424.00 189.1QUASI(C) + 1425.00 190.6QUASI(C) + 1426.00 192.4QUASI(C) + 1427.00 194.0QUASI(C) + 1428.00 195.6QUASI(C) + 1429.00 197.3QUASI(C) + 1430.00 202.4QUASI(C) + 1431.00 204.0QUASI(C) + 1432.00 205.5QUASI(C) + 1433.00 207.4QUASI(C) + 1434.00 209.2QUASI(C) + 1435.00 210.8QUASI(C) + 1436.00 212.7QUASI(C) + 1437.00 214.5QUASI(C) + 1438.00 216.3QUASI(C) + 1439.00 218.1QUASI(C) + 1440.00 202.2QUASI(C) + 1441.00 203.9QUASI(C) + 1442.00 205.6QUASI(C) + 1443.00 207.3QUASI(C) + 1444.00 209.1QUASI(C) + 1445.00 211.0QUASI(C) + 1446.00 212.7QUASI(C) + 1447.00 214.5QUASI(C) + 1448.00 216.3QUASI(C) + 1449.00 218.1QUASI(C) + 1450.00 221.5QUASI(C) + 1451.00 223.3QUASI(C) + 1452.00 225.2QUASI(C) + 1453.00 227.1QUASI(C) + 1454.00 229.0QUASI(C) + 1455.00 230.9QUASI(C) + 1456.00 232.9QUASI(C) + 1457.00 234.9QUASI(C) + 1458.00 236.9QUASI(C) + 1459.00 238.9QUASI(C) + 1460.00 288.8QUASI(C) + 1461.00 291.3QUASI(C) + 1462.00 293.8QUASI(C) + 1463.00 296.3QUASI(C) + 1464.00 298.8QUASI(C) + 1465.00 301.3QUASI(C) + 1466.00 303.8QUASI(C) + 1467.00 306.4QUASI(C) + 1468.00 309.1QUASI(C) + 1469.00 311.7QUASI(C) + 1470.00 320.5QUASI(C) + 1471.00 323.5QUASI(C) + 1472.00 326.2QUASI(C) + 1472.99 470.0 S I + 1473.00 329.0QUASI(C) + 1474.00 331.7QUASI(C) + 1475.00 334.5QUASI(C) + 1476.00 337.2QUASI(C) + 1477.00 340.0QUASI(C) + 1478.00 342.9QUASI(C) + 1479.00 345.7QUASI(C) + 1480.00 356.2QUASI(C) + 1481.00 359.1QUASI(C) + 1482.00 362.0QUASI(C) + 1483.00 365.2QUASI(C) + 1484.00 368.3QUASI(C) + 1485.00 371.4QUASI(C) + 1486.00 374.6QUASI(C) + 1487.00 377.6QUASI(C) + 1488.00 380.9QUASI(C) + 1489.00 384.1QUASI(C) + 1490.00 327.0QUASI(C) + 1491.00 329.9QUASI(C) + 1492.00 332.7QUASI(C) + 1493.00 335.4QUASI(C) + 1494.00 338.3QUASI(C) + 1495.00 341.2QUASI(C) + 1496.00 344.0QUASI(C) + 1497.00 347.0QUASI(C) + 1498.00 349.9QUASI(C) + 1499.00 353.0QUASI(C) + 1500.00 375.2QUASI(C) + 1501.00 378.5QUASI(C) + 1502.00 381.8QUASI(C) + 1503.00 384.9QUASI(C) + 1504.00 388.2QUASI(C) + 1505.00 391.6QUASI(C) + 1506.00 394.9QUASI(C) + 1507.00 398.2QUASI(C) + 1508.00 401.5QUASI(C) + 1509.00 405.0QUASI(C) + 1510.00 433.0QUASI(C) + 1511.00 436.6QUASI(C) + 1512.00 440.3QUASI(C) + 1513.00 444.1QUASI(C) + 1514.00 447.8QUASI(C) + 1515.00 451.5QUASI(C) + 1516.00 455.4QUASI(C) + 1517.00 459.1QUASI(C) + 1518.00 463.0QUASI(C) + 1519.00 467.0QUASI(C) + 1520.00 447.7QUASI(C) + 1521.00 451.9QUASI(C) + 1522.00 456.2QUASI(C) + 1523.00 460.3QUASI(C) + 1524.00 464.6QUASI(C) + 1525.00 468.8QUASI(C) + 1526.00 473.2QUASI(C) + 1526.71 830.0SI II + 1527.00 477.5QUASI(C) + 1528.00 482.0QUASI(C) + 1529.00 486.3QUASI(C) + 1530.00 502.1QUASI(C) + 1531.00 506.8QUASI(C) + 1532.00 511.3QUASI(C) + 1533.00 515.9QUASI(C) + 1533.43 670.0SI II + 1534.00 520.7QUASI(C) + 1535.00 525.4QUASI(C) + 1536.00 530.0QUASI(C) + 1537.00 534.8QUASI(C) + 1538.00 539.7QUASI(C) + 1539.00 544.4QUASI(C) + 1540.00 550.9QUASI(C) + 1541.00 555.8QUASI(C) + 1542.00 560.5QUASI(C) + 1543.00 565.5QUASI(C) + 1544.00 570.3QUASI(C) + 1545.00 575.3QUASI(C) + 1546.00 580.3QUASI(C) + 1547.00 585.4QUASI(C) + 1548.00 590.5QUASI(C) + 1548.20 3770.0 C IV + 1549.00 595.7QUASI(C) + 1550.00 611.4QUASI(C) + 1550.77 1950.0 C IV + 1551.00 617.0QUASI(C) + 1552.00 622.3QUASI(C) + 1553.00 627.7QUASI(C) + 1554.00 633.5QUASI(C) + 1555.00 638.8QUASI(C) + 1556.00 644.5QUASI(C) + 1557.00 650.3QUASI(C) + 1558.00 655.9QUASI(C) + 1559.00 661.7QUASI(C) + 1559.08 490.0FE II + 1560.00 720.4QUASI(C) + 1561.00 725.8QUASI(C) + 1561.00 1060.0 C I G + 1562.00 731.0QUASI(C) + 1563.00 736.4QUASI(C) + 1563.79 490.0FE II + 1564.00 741.7QUASI(C) + 1565.00 747.2QUASI(C) + 1566.00 752.6QUASI(C) + 1567.00 758.2QUASI(C) + 1568.00 763.8QUASI(C) + 1569.00 769.5QUASI(C) + 1570.00 714.7QUASI(C) + 1570.24 290.0FE II + 1571.00 720.5QUASI(C) + 1572.00 726.4QUASI(C) + 1573.00 732.2QUASI(C) + 1574.00 738.0QUASI(C) + 1575.00 743.9QUASI(C) + 1576.00 749.8QUASI(C) + 1577.00 756.0QUASI(C) + 1578.00 761.9QUASI(C) + 1579.00 768.0QUASI(C) + 1580.00 684.9QUASI(C) + 1581.00 690.6QUASI(C) + 1582.00 696.0QUASI(C) + 1583.00 701.5QUASI(C) + 1584.00 707.1QUASI(C) + 1585.00 712.6QUASI(C) + 1586.00 718.5QUASI(C) + 1587.00 724.1QUASI(C) + 1588.00 729.9QUASI(C) + 1589.00 735.6QUASI(C) + 1590.00 679.1QUASI(C) + 1591.00 685.0QUASI(C) + 1592.00 690.9QUASI(C) + 1593.00 696.7QUASI(C) + 1594.00 702.7QUASI(C) + 1594.57 142.0UNSPEC'D + 1595.00 708.5QUASI(C) + 1596.00 714.5QUASI(C) + 1597.00 720.5QUASI(C) + 1598.00 726.7QUASI(C) + 1599.00 732.8QUASI(C) + 1600.00 762.0QUASI(C) + 1601.00 768.1QUASI(C) + 1602.00 774.4QUASI(C) + 1603.00 780.6QUASI(C) + 1604.00 786.8QUASI(C) + 1605.00 793.1QUASI(C) + 1606.00 799.6QUASI(C) + 1607.00 805.9QUASI(C) + 1608.00 812.5QUASI(C) + 1609.00 819.0QUASI(C) + 1610.00 905.9QUASI(C) + 1611.00 913.3QUASI(C) + 1612.00 920.7QUASI(C) + 1613.00 928.2QUASI(C) + 1614.00 935.8QUASI(C) + 1615.00 943.4QUASI(C) + 1616.00 951.0QUASI(C) + 1617.00 958.9QUASI(C) + 1618.00 966.8QUASI(C) + 1619.00 974.6QUASI(C) + 1620.00 1035.0QUASI(C) + 1621.00 1051.1QUASI(C) + 1622.00 1067.4QUASI(C) + 1623.00 1083.9QUASI(C) + 1624.00 1100.5QUASI(C) + 1625.00 1117.5QUASI(C) + 1626.00 1134.7QUASI(C) + 1627.00 1152.4QUASI(C) + 1628.00 1170.1QUASI(C) + 1629.00 1188.3QUASI(C) + 1630.00 1120.2QUASI(C) + 1631.00 1137.4QUASI(C) + 1632.00 1154.7QUASI(C) + 1633.00 1172.1QUASI(C) + 1634.00 1189.8QUASI(C) + 1635.00 1207.8QUASI(C) + 1636.00 1226.1QUASI(C) + 1637.00 1244.6QUASI(C) + 1638.00 1263.5QUASI(C) + 1639.00 1282.8QUASI(C) + 1640.00 1235.7QUASI(C) + 1640.27 1500.0FE II B + 1640.38 470.0UNSPEC'D + 1641.00 1256.6QUASI(C) + 1642.00 1277.5QUASI(C) + 1643.00 1298.7QUASI(C) + 1644.00 1320.1QUASI(C) + 1645.00 1342.1QUASI(C) + 1646.00 1364.4QUASI(C) + 1647.00 1386.9QUASI(C) + 1648.00 1409.8QUASI(C) + 1649.00 1433.3QUASI(C) + 1650.00 1968.6QUASI(C) + 1651.00 1996.2QUASI(C) + 1652.00 2023.5QUASI(C) + 1653.00 2051.3QUASI(C) + 1654.00 2079.7QUASI(C) + 1655.00 2108.3QUASI(C) + 1656.00 2137.7QUASI(C) + 1656.27 1790.0 C I G + 1657.00 2167.3QUASI(C)G + 1657.38 2150.0 C I G + 1658.00 2197.5QUASI(C) + 1659.00 2329.0QUASI(C) + 1660.00 1553.4QUASI(C) + 1661.00 1755.1QUASI(C) + 1662.00 1783.2QUASI(C) + 1663.00 1811.9QUASI(C) + 1664.00 1840.8QUASI(C) + 1665.00 1870.2QUASI(C) + 1666.00 1900.2QUASI(C) + 1667.00 1930.6QUASI(C) + 1668.00 1961.6QUASI(C) + 1669.00 1993.0QUASI(C) + 1670.00 1850.7QUASI(C) + 1670.79 2740.0FE II B + 1671.00 1881.9QUASI(C) + 1672.00 1913.3QUASI(C) + 1673.00 1945.2QUASI(C) + 1674.00 1977.6QUASI(C) + 1675.00 2010.4QUASI(C) + 1676.00 2043.9QUASI(C) + 1676.85 300.0FE II + 1677.00 2077.8QUASI(C) + 1678.00 2112.4QUASI(C) + 1679.00 2147.3QUASI(C) + 1680.00 2514.9QUASI(C) + 1681.00 2554.7QUASI(C) + 1682.00 2594.4QUASI(C) + 1683.00 2634.9QUASI(C) + 1684.00 2675.8QUASI(C) + 1685.00 2717.4QUASI(C) + 1686.00 2760.0QUASI(C) + 1687.00 2803.1QUASI(C) + 1688.00 2846.8QUASI(C) + 1689.00 2891.3QUASI(C) + 1690.00 3459.9QUASI(C) + 1691.00 3512.1QUASI(C) + 1692.00 3564.3QUASI(C) + 1693.00 3617.2QUASI(C) + 1694.00 3671.0QUASI(C) + 1695.00 3725.6QUASI(C) + 1696.00 3781.0QUASI(C) + 1697.00 3837.5QUASI(C) + 1698.00 3894.8QUASI(C) + 1699.00 3953.1QUASI(C) + 1700.00 4005.4QUASI(C) + 1701.00 4069.1QUASI(C) + 1702.00 4132.8QUASI(C) + 1703.00 4197.3QUASI(C) + 1704.00 4263.1QUASI(C) + 1705.00 4329.7QUASI(C) + 1706.00 4397.6QUASI(C) + 1707.00 4466.5QUASI(C) + 1708.00 4536.6QUASI(C) + 1709.00 4607.7QUASI(C) + 1710.00 3920.0QUASI(C) + 1711.00 3985.7QUASI(C) + 1712.00 4051.3QUASI(C) + 1713.00 4118.1QUASI(C) + 1713.01 1740.0FE II + 1714.00 4186.0QUASI(C) + 1715.00 4254.8QUASI(C) + 1716.00 4324.8QUASI(C) + 1717.00 4396.0QUASI(C) + 1718.00 4468.3QUASI(C) + 1719.00 4541.8QUASI(C) + 1720.00 4440.4QUASI(C) + 1721.00 4475.5QUASI(C) + 1722.00 4509.8QUASI(C) + 1723.00 4544.5QUASI(C) + 1724.00 4579.4QUASI(C) + 1725.00 4614.4QUASI(C) + 1726.00 4649.9QUASI(C) + 1727.00 4685.7QUASI(C) + 1728.00 4721.7QUASI(C) + 1729.00 4758.1QUASI(C) + 1730.00 4052.4QUASI(C) + 1731.00 4084.8QUASI(C) + 1732.00 4116.8QUASI(C) + 1733.00 4148.9QUASI(C) + 1734.00 4181.5QUASI(C) + 1735.00 4214.3QUASI(C) + 1736.00 4247.3QUASI(C) + 1737.00 4280.6QUASI(C) + 1738.00 4314.1QUASI(C) + 1739.00 4347.9QUASI(C) + 1740.00 4823.2QUASI(C) + 1741.00 4866.0QUASI(C) + 1742.00 4904.1QUASI(C) + 1743.00 4942.6QUASI(C) + 1744.00 4981.2QUASI(C) + 1745.00 5020.2QUASI(C) + 1746.00 5059.6QUASI(C) + 1747.00 5099.2QUASI(C) + 1748.00 5139.2QUASI(C) + 1749.00 5179.4QUASI(C) + 1750.00 5500.4QUASI(C) + 1751.00 5543.9QUASI(C) + 1752.00 5587.4QUASI(C) + 1753.00 5631.1QUASI(C) + 1754.00 5675.2QUASI(C) + 1755.00 5719.6QUASI(C) + 1756.00 5764.5QUASI(C) + 1757.00 5809.7QUASI(C) + 1758.00 5855.2QUASI(C) + 1759.00 5901.1QUASI(C) + 1760.00 5981.2QUASI(C) + 1761.00 6028.5QUASI(C) + 1762.00 6075.9QUASI(C) + 1763.00 6123.5QUASI(C) + 1764.00 6171.5QUASI(C) + 1765.00 6219.7QUASI(C) + 1766.00 6268.5QUASI(C) + 1767.00 6317.6QUASI(C) + 1768.00 6367.1QUASI(C) + 1769.00 6417.1QUASI(C) + 1770.00 7143.8QUASI(C) + 1771.00 7200.5QUASI(C) + 1772.00 7256.9QUASI(C) + 1773.00 7313.8QUASI(C) + 1774.00 7371.1QUASI(C) + 1775.00 7428.9QUASI(C) + 1776.00 7487.0QUASI(C) + 1777.00 7545.7QUASI(C) + 1778.00 7604.9QUASI(C) + 1779.00 7664.3QUASI(C) + 1780.00 7817.3QUASI(C) + 1781.00 7879.1QUASI(C) + 1782.00 7940.8QUASI(C) + 1783.00 8003.1QUASI(C) + 1784.00 8065.7QUASI(C) + 1785.00 8129.0QUASI(C) + 1786.00 8192.6QUASI(C) + 1787.00 8256.8QUASI(C) + 1788.00 8321.5QUASI(C) + 1789.00 8386.7QUASI(C) + 1790.00 8007.6QUASI(C) + 1791.00 8070.8QUASI(C) + 1792.00 8133.9QUASI(C) + 1793.00 8197.7QUASI(C) + 1794.00 8261.9QUASI(C) + 1795.00 8326.7QUASI(C) + 1796.00 8391.9QUASI(C) + 1797.00 8457.6QUASI(C) + 1798.00 8523.9QUASI(C) + 1799.00 8590.6QUASI(C) + 1800.00 9060.2QUASI(C) + 1801.00 9130.3QUASI(C) + 1802.00 9200.3QUASI(C) + 1803.00 9271.1QUASI(C) + 1804.00 9342.2QUASI(C) + 1805.00 9414.0QUASI(C) + 1806.00 9486.4QUASI(C) + 1807.00 9559.3QUASI(C) + 1808.00 9632.7QUASI(C) + 1808.01 9200.0SI II + 1809.00 9706.8QUASI(C) + 1810.00 10271.0QUASI(C) + 1811.00 10349.7QUASI(C) + 1812.00 10428.5QUASI(C) + 1813.00 10507.8QUASI(C) + 1814.00 10587.5QUASI(C) + 1815.00 10668.1QUASI(C) + 1816.00 10749.2QUASI(C) + 1816.93 14200.0SI II + 1817.00 10831.0QUASI(C) + 1817.45 5500.0SI II + 1818.00 10913.4QUASI(C) + 1819.00 10996.5QUASI(C) + 1820.00 12742.0QUASI(C) + 1821.00 12842.6QUASI(C) + 1822.00 12943.2QUASI(C) + 1823.00 13044.6QUASI(C) + 1824.00 13146.9QUASI(C) + 1825.00 13249.8QUASI(C) + 1826.00 13353.6QUASI(C) + 1827.00 13458.4QUASI(C) + 1828.00 13563.7QUASI(C) + 1829.00 13670.1QUASI(C) + 1830.00 12735.4QUASI(C) + 1831.00 12837.2QUASI(C) + 1832.00 12937.8QUASI(C) + 1833.00 13039.3QUASI(C) + 1834.00 13141.3QUASI(C) + 1835.00 13244.3QUASI(C) + 1836.00 13348.0QUASI(C) + 1837.00 13452.7QUASI(C) + 1838.00 13558.1QUASI(C) + 1839.00 13664.3QUASI(C) + 1840.00 10709.2QUASI(C) + 1841.00 10793.8QUASI(C) + 1842.00 10878.3QUASI(C) + 1843.00 10963.5QUASI(C) + 1844.00 11049.4QUASI(C) + 1845.00 11136.0QUASI(C) + 1846.00 11223.2QUASI(C) + 1847.00 11311.1QUASI(C) + 1848.00 11399.8QUASI(C) + 1849.00 11489.1QUASI(C) + 1850.00 11298.3QUASI(C) + 1851.00 11387.6QUASI(C) + 1852.00 11476.8QUASI(C) + 1853.00 11566.8QUASI(C) + 1854.00 11657.5QUASI(C) + 1855.00 11748.6QUASI(C) + 1856.00 11840.7QUASI(C) + 1857.00 11933.6QUASI(C) + 1858.00 12027.0QUASI(C) + 1859.00 12121.2QUASI(C) + 1860.00 13611.6QUASI(C) + 1861.00 13719.1QUASI(C) + 1862.00 13826.6QUASI(C) + 1863.00 13935.0QUASI(C) + 1864.00 14044.1QUASI(C) + 1865.00 14154.1QUASI(C) + 1866.00 14265.1QUASI(C) + 1867.00 14376.8QUASI(C) + 1868.00 14489.5QUASI(C) + 1869.00 14602.9QUASI(C) + 1870.00 14964.1QUASI(C) + 1871.00 15082.3QUASI(C) + 1872.00 15200.5QUASI(C) + 1873.00 15319.5QUASI(C) + 1874.00 15439.6QUASI(C) + 1875.00 15560.5QUASI(C) + 1876.00 15682.4QUASI(C) + 1877.00 15805.3QUASI(C) + 1878.00 15929.1QUASI(C) + 1879.00 16053.9QUASI(C) + 1880.00 16601.1QUASI(C) + 1881.00 16732.2QUASI(C) + 1882.00 16863.2QUASI(C) + 1883.00 16995.3QUASI(C) + 1884.00 17128.4QUASI(C) + 1885.00 17262.6QUASI(C) + 1886.00 17397.9QUASI(C) + 1887.00 17534.2QUASI(C) + 1888.00 17671.6QUASI(C) + 1889.00 17810.1QUASI(C) + 1890.00 18531.8QUASI(C) + 1891.00 18678.8QUASI(C) + 1892.00 18825.2QUASI(C) + 1893.00 18972.7QUASI(C) + 1894.00 19121.4QUASI(C) + 1895.00 19271.1QUASI(C) + 1896.00 19422.1QUASI(C) + 1897.00 19574.3QUASI(C) + 1898.00 19727.6QUASI(C) + 1899.00 19882.2QUASI(C) + 1900.00 18291.8QUASI(C) + 1901.00 18273.4QUASI(C) + 1902.00 18416.6QUASI(C) + 1903.00 18560.9QUASI(C) + 1904.00 18706.3QUASI(C) + 1905.00 18852.9QUASI(C) + 1906.00 19000.6QUASI(C) + 1907.00 19149.3QUASI(C) + 1908.00 19299.5QUASI(C) + 1909.00 19450.6QUASI(C) + 1910.00 21963.1QUASI(C) + 1911.00 21743.4QUASI(C) + 1912.00 21913.7QUASI(C) + 1913.00 22085.4QUASI(C) + 1914.00 22258.5QUASI(C) + 1915.00 22432.9QUASI(C) + 1916.00 22608.5QUASI(C) + 1917.00 22785.7QUASI(C) + 1918.00 22964.2QUASI(C) + 1919.00 23144.1QUASI(C) + 1920.00 19005.2QUASI(C) + 1921.00 20016.8QUASI(C) + 1922.00 20173.7QUASI(C) + 1923.00 20331.6QUASI(C) + 1924.00 20491.1QUASI(C) + 1925.00 20651.5QUASI(C) + 1926.00 20813.4QUASI(C) + 1927.00 20976.3QUASI(C) + 1928.00 21140.7QUASI(C) + 1929.00 21306.4QUASI(C) + 1930.00 26973.5QUASI(C) + 1931.00 19919.9QUASI(C) + 1932.00 20076.0QUASI(C) + 1933.00 20233.3QUASI(C) + 1934.00 20391.9QUASI(C) + 1935.00 20551.6QUASI(C) + 1936.00 20712.7QUASI(C) + 1937.00 20874.9QUASI(C) + 1938.00 21038.4QUASI(C) + 1939.00 21203.2QUASI(C) + 1940.00 21284.9QUASI(C) + 1941.00 25236.9QUASI(C) + 1942.00 25434.7QUASI(C) + 1943.00 25633.9QUASI(C) + 1944.00 25834.8QUASI(C) + 1945.00 26037.2QUASI(C) + 1946.00 26241.2QUASI(C) + 1947.00 26446.8QUASI(C) + 1948.00 26654.0QUASI(C) + 1949.00 26862.8QUASI(C) + 1950.00 27073.2QUASI(C) + 1951.00 27285.3QUASI(C) + 1952.00 27499.1QUASI(C) + 1953.00 27714.5QUASI(C) + 1954.00 27931.7QUASI(C) + 1955.00 28150.5QUASI(C) + 1956.00 28371.1QUASI(C) + 1957.00 28593.3QUASI(C) + 1958.00 28817.4QUASI(C) + 1959.00 29043.1QUASI(C) + 1960.00 29270.7QUASI(C) + 1961.00 29500.0QUASI(C) + 1962.00 29731.1QUASI(C) + 1963.00 29964.0QUASI(C) + 1964.00 30198.8QUASI(C) + 1965.00 30435.4QUASI(C) + 1966.00 30673.8QUASI(C) + 1967.00 30914.2QUASI(C) + 1968.00 31156.4QUASI(C) + 1969.00 31400.5QUASI(C) + 1970.00 31646.5QUASI(C) + 1971.00 31894.4QUASI(C) + 1972.00 32144.3QUASI(C) + 1973.00 32396.1QUASI(C) + 1974.00 32649.9QUASI(C) + 1975.00 32905.7QUASI(C) + 1976.00 33163.5QUASI(C) + 1977.00 33423.4QUASI(C) + 1978.00 33685.2QUASI(C) + 1979.00 33949.2QUASI(C) + 1980.00 34215.1QUASI(C) + 1981.00 34483.2QUASI(C) + 1982.00 34753.3QUASI(C) + 1983.00 35025.5QUASI(C) + 1984.00 35300.0QUASI(C) + 1985.00 35576.5QUASI(C) + 1986.00 35855.2QUASI(C) + 1987.00 36136.2QUASI(C) + 1988.00 36419.3QUASI(C) + 1989.00 36704.6QUASI(C) + 1990.00 36992.2QUASI(C) + 1991.00 37282.0QUASI(C) + 1992.00 37574.1QUASI(C) + 1993.00 37868.5QUASI(C) + 1994.00 38165.1QUASI(C) + 1995.00 38464.1QUASI(C) + 1996.00 38765.5QUASI(C) + 1997.00 39069.2QUASI(C) + 1998.00 39375.3QUASI(C) + 1999.00 39683.8QUASI(C) + 2000.00 39994.7QUASI(C) + 0.00 -0.0 + 78115 1957 + ***- 'F74113' REFERENCE SPECTRUM MODEL FOR 23 APRIL 1974 -*** + * IS VERY CLOSE TO PREVIOUSLY RELEASED 'R74113' * + * * + * FORMAT(1X,F7.2,F8.1,2A4,A1) * + * =========================== WHERE * + * F7.2 GIVES WAVELENGTH IN ANGSTROM UNITS * + * F8.2 FLUX IN UNITS OF 1.E 06 PHOTONS/(SQ.CM*SEC) * + * 2A4 8-CHARACTER IDENTIFICATION * + * A1 1-CHARACTER NOTE (B="BLEND",G="GROUP",? = UNCERTAIN) * + * * + * DISTINCTIONS OF NEW 'F74113' RELATIVE TO R74113 ARE * + * THE FOLLOWING: * + * 1230-1940 A REGION NOW MATCHES FLUXES FOR 10 A * + * INTERVALS OF ROCKET RESULTS FOR 23 APRIL 1974 * + * TO ABOUT 1 PERCENT; * + * * + * 1100-1230 A H LYMAN-ALPHA WING INTENSITIES ARE * + * REDUCED TO 20 PERCENT OF R74113-LISTED VALUES * + * -- AGAIN IDENTIFIED AS 'QUASI(C)' * + * * + * 608-912 A H LYMAN CONTINUUM INTENSITIES ARE * + * REDUCED TO 67 PERCENT OF R74113-LISTED VALUES * + * * + * 404-504 A HE I CONTINUUM VALUES ARE REDUCED TO * + * 66 PERCENT OF R74113-LISTED VALUES * + * * + * 140-230 A REGION (OBSERVED IN ROCKET EXPERIMENT * + * OF 23 APR 74 ONLY IN 2-ND ORDER AND WITHOUT TRUE * + * PRE-FLIGHT LABORATORY CALIBRATION) SHOWS ESTIMATED * + * FLUX VALUES BASED ON CONSIDERATION OF BOTH ROCKET * + * AND SATELLITE DATA (AE-C,AE-E) ALONG WITH THE * + * SECOND-ORDER OBSERVATIONS OF 23 APR 74 ROCKET * + * * + * NOTE: FURTHER SMALL REVISIONS MAY BE MADE OCCASIONALLY, * + * BUT WILL HAVE NEGLIGIBLE AERONOMICAL SIGNIFICANCE * + * * + * 25 APR 1978 * + * * + ************************************************************* diff --git a/EUV/ae-euv/f76ref.dat b/EUV/ae-euv/f76ref.dat new file mode 100755 index 0000000..cba7ddf --- /dev/null +++ b/EUV/ae-euv/f76ref.dat @@ -0,0 +1,2009 @@ + +his file lists the wavelength (W) in Angstroem and photon flux (F) +n 1E10 m-2 s-1, followed by the line/range identification for the +pecific wavelength group. -------------------- 12/15/94/dkb + + W F + 14.25 .0FE XVIII 2 2.500000 + 14.40 .0FE XVIII 2 2.500000 + 15.01 .0FE XVII 2 2.000000 + 15.26 .0FE XVII 2 2.000000 + 16.01 .0 O VIII 2 .700000 + 16.77 .0FE XVII 2 2.000000 + 17.05 .0FE XVII 2 2.000000 + 17.11 .0FE XVI 2 1.000000 + 18.62 .1 O VII 2 .200000 + 18.97 .1 O VIII 2 .700000 + 21.60 .3 O VII 2 .200000 + 21.80 .1 O VII 2 .200000 + 22.10 .3 O VII 2 .200000 + 28.47 .5 C VI 2 .180000 + 28.79 2.5 N VI 2 .100000 + 29.52 2.2 N VI 2 .100000 + 30.02 .9UNSPEC'D 1 1.000000 + 30.43 .6 S XIV 2 .220000 + 33.74 1.1 C VI 2 .180000 + 40.95 .6SI XII 2 .150000 + 43.76 2.1SI XI 2 .070000 + 44.02 .8SI XII 2 .150000 + 44.16 .9SI XII 2 .150000 + 45.66 .5SI XII 2 .150000 + 46.40 2.7SI XI 2 .070000 + 46.67 4.0UNSPEC'D 1 1.000000 + 47.87 4.5UNSPEC'D 1 1.000000 + 49.22 4.3SI XI 2 .070000 + 50.36 .0FE XVI 2 1.000000 + 50.52 5.6SI X 2 .035000 + 50.69 5.6SI X 2 .035000 + 52.30 2.8SI XI 2 .070000 + 52.91 .1FE XV 2 .750000 + 54.15 6.6BLEND 1 1.000000 + 54.42 2.9UNSPEC'D 1 1.000000 + 54.70 .0FE XVI 2 1.000000 + 55.06 3.2MG IX 2 .011040 + 55.34 8.6SI IX 2 .024000 + 56.08 1.9 S IX 2 .020000 + 56.92 6.0UNSPEC'D 1 1.000000 + 57.36 5.0UNSPEC'D 1 1.000000 + 57.56 4.0UNSPEC'D 1 1.000000 + 57.88 3.5MG X 2 .030000 + 58.96 .6FE XIV 2 .420000 + 59.62 .6FE XIV 2 .420000 + 60.30 2.5UNSPEC'D 1 1.000000 + 60.85 3.6UNSPEC'D 1 1.000000 + 61.07 5.8SI VIII 2 .015800 + 61.63 2.9 S VIII 2 .015780 + 61.90 5.0BLEND 1 1.000000 + 62.30 .1NE VIII 2 .022000 + 62.35 1.1FE XII 2 .033000 + 62.77 3.4MG IX 2 .011040 + 62.92 .0FE XVI 2 1.000000 + 63.16 3.3MG X 2 .030000 + 63.30 5.4MG X 2 .030000 + 63.65 4.1UNSPEC'D 1 1.000000 + 63.72 .0FE XVI 2 1.000000 + 64.11 1.1FE XIII 2 .075000 + 64.60 2.5UNSPEC'D 1 1.000000 + 65.21 3.0UNSPEC'D 1 1.000000 + 65.71 4.1UNSPEC'D 1 1.000000 + 65.85 3.0MG X 2 .030000 + 66.30 3.8FE XII 2 .033000 + 67.14 3.0MG IX 2 .011040 + 67.35 2.0FE XII 2 .033000 + 68.35 2.3UNSPEC'D 1 1.000000 + 69.65 13.8UNSPEC'D 1 1.000000 + 70.00 .1FE XV 2 .750000 + 70.54 3.3UNSPEC'D 1 1.000000 + 70.75 3.0UNSPEC'D 1 1.000000 + 71.00 4.4UNSPEC'D 1 1.000000 + 71.94 1.2FE XIV 2 .420000 + 72.31 6.4BLEND 1 1.000000 + 72.63 1.6FE XI 2 .022500 + 72.80 2.1UNSPEC'D 1 1.000000 + 72.95 3.4UNSPEC'D 1 1.000000 + 73.55 1.9NE VIII 2 .022000 + 74.21 2.5UNSPEC'D 1 1.000000 + 74.44 1.3UNSPEC'D 1 1.000000 + 74.83 4.0BLEND 1 1.000000 + 75.03 4.6MG VIII 2 .009640 + 75.29 2.5UNSPEC'D 1 1.000000 + 75.46 3.8UNSPEC'D 1 1.000000 + 75.73 2.5UNSPEC'D 1 1.000000 + 76.01 2.7FE XIII 2 .075000 + 76.48 1.0FE XIII 2 .075000 + 76.83 4.1BLEND 1 1.000000 + 76.94 3.3UNSPEC'D 1 1.000000 + 77.30 2.9UNSPEC'D 1 1.000000 + 77.74 3.9MG IX 2 .011040 + 78.56 3.0UNSPEC'D 1 1.000000 + 78.70 2.8NI XI 2 .025000 + 79.08 1.9UNSPEC'D 1 1.000000 + 79.48 1.8FE XII 2 .033000 + 79.76 2.3UNSPEC'D 1 1.000000 + 80.00 1.4FE XII 2 .033000 + 80.21 2.9UNSPEC'D 1 1.000000 + 80.55 2.3FE XII 2 .033000 + 80.94 2.0UNSPEC'D 1 1.000000 + 81.16 2.6UNSPEC'D 1 1.000000 + 81.58 3.0UNSPEC'D 1 1.000000 + 81.94 4.2UNSPEC'D 1 1.000000 + 82.43 4.9FE IX 2 .009640 + 82.67 8.4UNSPEC'D 1 1.000000 + 83.25 4.4UNSPEC'D 1 1.000000 + 83.42 4.5MG VII 2 .008760 + 83.67 3.8MG VII 2 .008760 + 84.00 5.1MG VII 2 .008760 + 84.26 3.8UNSPEC'D 1 1.000000 + 84.50 5.9UNSPEC'D 1 1.000000 + 84.72 4.1UNSPEC'D 1 1.000000 + 84.86 3.9UNSPEC'D 1 1.000000 + 85.16 3.0UNSPEC'D 1 1.000000 + 85.50 5.9UNSPEC'D 1 1.000000 + 85.69 2.7UNSPEC'D 1 1.000000 + 85.87 2.9UNSPEC'D 1 1.000000 + 86.23 2.1UNSPEC'D 1 1.000000 + 86.40 1.7UNSPEC'D 1 1.000000 + 86.77 5.0FE XI 2 .022500 + 86.98 3.1FE XI 2 .022500 + 87.30 2.4UNSPEC'D 1 1.000000 + 87.61 2.0UNSPEC'D 1 1.000000 + 88.10 .1NE VIII 2 .022000 + 88.11 6.1BLEND 1 1.000000 + 88.14 .1NE VIII 2 .022000 + 88.42 1.9UNSPEC'D 1 1.000000 + 88.64 2.4UNSPEC'D 1 1.000000 + 88.90 3.8FE XI 2 .022500 + 89.14 2.7FE XI 2 .022500 + 89.70 3.0FE XI 2 .022500 + 90.14 3.1FE XI 2 .022500 + 90.45 2.0FE XI 2 .022500 + 90.71 3.0UNSPEC'D 1 1.000000 + 91.00 3.9UNSPEC'D 1 1.000000 + 91.48 1.9UNSPEC'D 1 1.000000 + 91.69 5.4NI X 2 .012800 + 91.81 4.8UNSPEC'D 1 1.000000 + 92.09 3.8UNSPEC'D 1 1.000000 + 92.55 3.0UNSPEC'D 1 1.000000 + 92.81 3.8UNSPEC'D 1 1.000000 + 93.61 5.6UNSPEC'D 1 1.000000 + 94.07 7.1FE X 2 .010520 + 94.25 .1NE VII 2 .012600 + 94.39 1.7UNSPEC'D 1 1.000000 + 94.81 1.4UNSPEC'D 1 1.000000 + 94.90 .1NE VII 2 .012600 + 95.37 5.2FE X 2 .010520 + 95.51 2.9UNSPEC'D 1 1.000000 + 95.81 2.9UNSPEC'D 1 1.000000 + 96.05 9.7FE X 2 .010520 + 96.49 1.9UNSPEC'D 1 1.000000 + 96.83 2.7FE X 2 .010520 + 97.12 5.2FE X 2 .010520 + 97.51 3.0BLEND 1 1.000000 + 97.87 2.3FE X 2 .010520 + 98.12 5.6BLEND 1 1.000000 + 98.23 6.5BLEND 1 1.000000 + 98.50 2.6UNSPEC'D 1 1.000000 + 98.88 1.5UNSPEC'D 1 1.000000 + 99.44 1.6UNSPEC'D 1 1.000000 + 99.71 2.0UNSPEC'D 1 1.000000 + 99.99 2.7UNSPEC'D 1 1.000000 + 100.54 8.4UNSPEC'D 1 1.000000 + 100.96 2.6UNSPEC'D 1 1.000000 + 101.57 3.4UNSPEC'D 1 1.000000 + 102.15 4.5UNSPEC'D 1 1.000000 + 103.01 1.5NE VIII 2 .022000 + 103.15 .1NE VII 2 .012600 + 103.17 4.2UNSPEC'D 1 1.000000 + 103.58 6.1FE IX 2 .009640 + 103.94 6.1UNSPEC'D 1 1.000000 + 104.23 1.6UNSPEC'D 1 1.000000 + 104.76 2.0UNSPEC'D 1 1.000000 + 105.23 5.1FE IX 2 .009640 + 106.25 2.0NE VII 2 .012600 + 106.57 1.1UNSPEC'D 1 1.000000 + 106.93 1.9UNSPEC'D 1 1.000000 + 108.05 1.5FE VIII 1 .500000 + 108.46 2.0UNSPEC'D 1 1.000000 + 109.50 2.0UNSPEC'D 1 1.000000 + 109.98 .1NE VII 2 .012600 + 110.56 .1NE VII 2 .012600 + 110.62 .1NE VII 2 .012600 + 110.76 1.5UNSPEC'D 1 1.000000 + 111.16 .1NE VI 1 .580000 + 111.25 4.8UNSPEC'D 1 1.000000 + 113.80 3.0UNSPEC'D 1 1.000000 + 114.09 2.6UNSPEC'D 1 1.000000 + 114.24 .1NE VI 1 .580000 + 115.39 .1NE VII 2 .012600 + 115.82 2.4UNSPEC'D 1 1.000000 + 116.75 3.9UNSPEC'D 1 1.000000 + 117.20 2.6UNSPEC'D 1 1.000000 + 120.40 .1NE VII 2 .012600 + 121.15 .1NE VI 1 .580000 + 121.79 1.1UNSPEC'D 1 1.000000 + 122.70 4.1NE VI 1 .580000 + 123.50 2.6UNSPEC'D 1 1.000000 + 127.65 4.5UNSPEC'D 1 1.000000 + 129.87 3.4 O VI 1 1.250000 + 130.30 .1NE VI 1 .580000 + 131.02 5.2BLEND 1 1.000000 + 131.21 4.8BLEND 1 1.000000 + 136.21 .1NE VI 1 .580000 + 136.28 .1NE VI 1 .580000 + 136.34 .1NE VI 1 .580000 + 136.45 .1NE VI 1 .580000 + 136.48 .1NE VI 1 .580000 + 141.20 11.3UNSPEC'D 1 1.000000 + 144.27 1.1NI X 2 .012800 + 145.04 14.1NI X 2 .012800 + 148.40 38.2NI XI 2 .025000 + 150.10 17.8 O VI 1 1.250000 + 152.15 17.5NI XII 2 .070000 + 154.18 11.6NI XII 2 .070000 + 157.73 6.5NI XIII 2 .120000 + 158.37 14.2NI X 2 .012800 + 159.98 13.0NI X 2 .012800 + 160.37 7.5UNSPEC'D 1 1.000000 + 164.15 2.6NI XIV 2 .200000 + 167.50 19.5FE VIII 1 .500000 + 168.17 36.0FE VIII 1 .500000 + 168.55 20.5FE VIII 1 .500000 + 168.92 12.6FE VIII 1 .500000 + 169.70 23.4UNSPEC'D 1 1.000000 + 171.08 307.5FE IX 2 .009640 + 172.17 11.2 O V 1 .640000 + 173.08 21.4BLEND 1 1.000000 + 174.58 268.8FE X 2 .010520 + 175.26 33.1BLEND 1 1.000000 + 177.24 142.8FE X 2 .010520 + 178.05 15.5FE XI 2 .022500 + 179.27 .3NI XV 2 .300000 + 179.75 15.6FE XI 2 .022500 + 180.41 138.0FE XI 2 .022500 + 181.14 21.3FE XI 2 .022500 + 182.17 39.2FE XI 2 .022500 + 183.45 10.0CA XIV 2 .400000 + 184.53 78.2FE X 2 .010520 + 184.80 4.0FE XI 2 .022500 + 185.21 32.5FE VIII B 1 .500000 + 186.60 16.5CA XIV 2 .400000 + 186.87 30.0 S XI B 2 .030000 + 187.95 1.5AR XIV 2 .400000 + 188.23 9.7FE XII 2 .033000 + 188.31 120.0FE XI 2 .022500 + 190.02 50.4FE X 2 .010520 + 191.04 10.5FE XII 2 .033000 + 191.34 9.0FE XIII B 2 .075000 + 192.40 32.0FE XII 2 .033000 + 192.82 49.0FE XI 2 .022500 + 193.52 57.0FE XII 2 .033000 + 195.13 100.0FE XII 2 .033000 + 196.52 17.0FE XIII 2 .075000 + 196.65 5.0FE XII 2 .033000 + 197.44 7.0FE XIII 2 .075000 + 198.58 12.5FE XII B 2 .033000 + 200.02 15.0FE XIII 2 .075000 + 201.13 25.0FE XIII B 2 .075000 + 202.05 38.0FE XIII 2 .075000 + 202.64 21.0BLEND 1 1.000000 + 203.81 16.0FE XIII 2 .075000 + 204.25 6.0FE XIII 2 .075000 + 204.94 4.0FE XIII 2 .075000 + 206.26 1.1UNSPEC'D 1 1.000000 + 206.38 1.1UNSPEC'D 1 1.000000 + 207.46 1.1UNSPEC'D 1 1.000000 + 208.33 1.8 S X B 2 .025000 + 209.63 .9FE XIII 2 .075000 + 209.78 1.1UNSPEC'D 1 1.000000 + 211.32 21.6FE XIV 2 .420000 + 212.14 10.5 S XII 2 .070000 + 213.78 4.9FE XIII 2 .075000 + 214.75 8.6SI VIII 2 .015800 + 215.16 19.3 S XII 2 .070000 + 216.88 36.9SI VIII B 2 .015800 + 217.00 63.8UNSPEC'D 1 1.000000 + 218.19 57.7 S XII 2 .070000 + 219.13 4.8FE XIV 2 .420000 + 220.08 6.8FE XIV 2 .420000 + 221.44 17.8 S XII 2 .070000 + 221.82 .9FE XIII 2 .075000 + 224.74 36.3 S IX B 2 .020000 + 225.12 63.8BLEND 1 1.000000 + 227.01 86.9SI IX 2 .024000 + 227.19 .6FE XV 2 .750000 + 227.47 26.4 S XII 2 .070000 + 228.70 17.7 S X 2 .025000 + 230.65 11.8HE II 1 .500000 + 231.55 14.4HE II 1 .500000 + 232.60 21.0HE II 1 .500000 + 233.84 3.3FE XV 2 .750000 + 234.38 103.3BLEND 1 1.000000 + 237.33 61.9HE II 1 .500000 + 239.87 16.1 S XI 2 .030000 + 240.71 26.5FE XIII 2 .075000 + 241.74 141.4FE IX 2 .009640 + 243.03 110.3HE II 1 .500000 + 243.86 62.5UNSPEC'D 1 1.000000 + 244.92 69.2FE IX 2 .009640 + 245.94 18.6BLEND 1 1.000000 + 246.24 62.5BLEND 1 1.000000 + 246.91 23.4BLEND 1 1.000000 + 247.18 24.9BLEND 1 1.000000 + 249.18 6.6NI XVII 2 .900000 + 251.10 2.4FE XVI 2 1.000000 + 251.95 29.0FE XIII 2 .075000 + 252.19 14.0FE XIV 2 .420000 + 253.78 27.3SI X 2 .035000 + 256.32 450.0HE II 1 .500000 + 256.38 56.4SI X 2 .035000 + 256.64 24.4 S XIII 2 .120000 + 257.16 192.5 S X B 2 .025000 + 257.39 80.0FE XIV B 2 .420000 + 258.36 131.6SI X 2 .035000 + 259.52 53.9 S X 2 .025000 + 261.05 58.3SI X 2 .035000 + 262.99 2.5FE XVI 2 1.000000 + 264.24 65.4 S X 2 .025000 + 264.80 25.6FE XIV 2 .420000 + 270.51 12.0FE XIV 2 .420000 + 271.99 56.4SI X 2 .035000 + 272.64 27.5SI VII 2 .014000 + 274.19 36.0FE XIV 2 .420000 + 275.35 33.0SI VII 2 .014000 + 275.67 27.5SI VII 2 .014000 + 276.15 6.1MG VII 2 .008760 + 276.84 12.5BLEND 1 1.000000 + 277.00 50.0BLEND 1 1.000000 + 277.27 75.0BLEND 1 1.000000 + 278.40 54.4MG VII B 2 .008760 + 281.41 14.3 S XI 2 .030000 + 284.15 77.3FE XV 2 .750000 + 285.70 22.9 S XI G 2 .030000 + 289.17 5.2FE XIV 2 .420000 + 290.69 38.5SI IX 2 .024000 + 291.70 17.2 S XI G 2 .030000 + 292.78 61.0SI IX 2 .024000 + 296.19 90.5SI IX 2 .024000 + 299.50 8.7 S XII 2 .070000 + 303.31 600.0SI XI 2 .070000 + 303.78 7762.5HE II 1 .500000 + 315.02 133.5MG VIII 2 .009640 + 316.20 112.5SI VIII 2 .015800 + 319.01 17.5NI XV 2 .300000 + 319.83 146.3SI VIII 2 .015800 + 320.56 4.7NI XVIIIB 2 1.100000 + 335.41 35.0FE XVI 2 1.000000 + 345.13 96.3SI IX 2 .024000 + 345.74 84.0FE X 2 .010520 + 347.39 141.0SI X 2 .035000 + 349.85 96.3SI IX 2 .024000 + 356.01 103.4SI X 2 .035000 + 360.80 17.5FE XVI 2 1.000000 + 364.48 75.6FE XII 2 .033000 + 368.07 739.4MG IX 2 .011040 + 399.82 15.6NE VI 1 .580000 + 401.14 34.5NE VI 1 .580000 + 401.94 91.2NE VI 1 .580000 + 403.26 53.4NE VI 1 .580000 + 405.00 .0HE I (C) 1 1.000000 + 406.00 .0HE I (C) 1 1.000000 + 407.00 .0HE I (C) 1 1.000000 + 408.00 .0HE I (C) 1 1.000000 + 409.00 .0HE I (C) 1 1.000000 + 410.00 .0HE I (C) 1 1.000000 + 411.00 .0HE I (C) 1 1.000000 + 412.00 .0HE I (C) 1 1.000000 + 413.00 .0HE I (C) 1 1.000000 + 414.00 .0HE I (C) 1 1.000000 + 415.00 .0HE I (C) 1 1.000000 + 416.00 .0HE I (C) 1 1.000000 + 417.00 .0HE I (C) 1 1.000000 + 417.24 8.8FE XV 2 .750000 + 418.00 .0HE I (C) 1 1.000000 + 419.00 .0HE I (C) 1 1.000000 + 420.00 .0HE I (C) 1 1.000000 + 421.00 .0HE I (C) 1 1.000000 + 422.00 .0HE I (C) 1 1.000000 + 423.00 .4HE I (C) 1 1.000000 + 424.00 .4HE I (C) 1 1.000000 + 425.00 .4HE I (C) 1 1.000000 + 426.00 .4HE I (C) 1 1.000000 + 427.00 .4HE I (C) 1 1.000000 + 428.00 .4HE I (C) 1 1.000000 + 429.00 .4HE I (C) 1 1.000000 + 430.00 .4HE I (C) 1 1.000000 + 430.47 82.3MG VIII 2 .009640 + 431.00 .4HE I (C) 1 1.000000 + 432.00 .4HE I (C) 1 1.000000 + 433.00 .4HE I (C) 1 1.000000 + 434.00 .4HE I (C) 1 1.000000 + 435.00 .4HE I (C) 1 1.000000 + 436.00 .4HE I (C) 1 1.000000 + 436.70 122.4MG VIII 2 .009640 + 437.00 .4HE I (C) 1 1.000000 + 438.00 .4HE I (C) 1 1.000000 + 439.00 .4HE I (C) 1 1.000000 + 440.00 .4HE I (C) 1 1.000000 + 441.00 .4HE I (C) 1 1.000000 + 442.00 .4HE I (C) 1 1.000000 + 443.00 .4HE I (C) 1 1.000000 + 444.00 .9HE I (C) 1 1.000000 + 445.00 .9HE I (C) 1 1.000000 + 446.00 .9HE I (C) 1 1.000000 + 447.00 .9HE I (C) 1 1.000000 + 448.00 .9HE I (C) 1 1.000000 + 449.00 .9HE I (C) 1 1.000000 + 450.00 .9HE I (C) 1 1.000000 + 451.00 .9HE I (C) 1 1.000000 + 452.00 .9HE I (C) 1 1.000000 + 453.00 1.3HE I (C) 1 1.000000 + 454.00 1.3HE I (C) 1 1.000000 + 455.00 1.3HE I (C) 1 1.000000 + 456.00 1.3HE I (C) 1 1.000000 + 457.00 1.3HE I (C) 1 1.000000 + 458.00 1.3HE I (C) 1 1.000000 + 459.00 1.3HE I (C) 1 1.000000 + 460.00 1.6HE I (C) 1 1.000000 + 461.00 1.6HE I (C) 1 1.000000 + 462.00 1.6HE I (C) 1 1.000000 + 463.00 1.6HE I (C) 1 1.000000 + 464.00 1.6HE I (C) 1 1.000000 + 465.00 2.0HE I (C) 1 1.000000 + 465.22 329.9NE VII 2 .012600 + 466.00 2.0HE I (C) 1 1.000000 + 467.00 2.0HE I (C) 1 1.000000 + 468.00 2.5HE I (C) 1 1.000000 + 469.00 2.5HE I (C) 1 1.000000 + 470.00 2.5HE I (C) 1 1.000000 + 471.00 2.5HE I (C) 1 1.000000 + 472.00 2.9HE I (C) 1 1.000000 + 473.00 2.9HE I (C) 1 1.000000 + 474.00 3.3HE I (C) 1 1.000000 + 475.00 3.3HE I (C) 1 1.000000 + 476.00 3.3HE I (C) 1 1.000000 + 477.00 3.8HE I (C) 1 1.000000 + 478.00 3.8HE I (C) 1 1.000000 + 479.00 4.1HE I (C) 1 1.000000 + 480.00 4.1HE I (C) 1 1.000000 + 481.00 4.5HE I (C) 1 1.000000 + 482.00 4.5HE I (C) 1 1.000000 + 483.00 5.0HE I (C) 1 1.000000 + 484.00 5.4HE I (C) 1 1.000000 + 485.00 5.4HE I (C) 1 1.000000 + 486.00 5.8HE I (C) 1 1.000000 + 487.00 6.1HE I (C) 1 1.000000 + 488.00 6.6HE I (C) 1 1.000000 + 489.00 6.6HE I (C) 1 1.000000 + 489.50 11.0NE III 1 .400000 + 490.00 7.0HE I (C) 1 1.000000 + 491.00 7.4HE I (C) 1 1.000000 + 492.00 7.9HE I (C) 1 1.000000 + 493.00 8.3HE I (C) 1 1.000000 + 494.00 8.6HE I (C) 1 1.000000 + 495.00 9.5HE I (C) 1 1.000000 + 496.00 9.9HE I (C) 1 1.000000 + 497.00 10.4HE I (C) 1 1.000000 + 498.00 10.8HE I (C) 1 1.000000 + 499.00 11.5HE I (C) 1 1.000000 + 499.37 77.5SI XII 2 .150000 + 500.00 12.0HE I (C) 1 1.000000 + 501.00 12.7HE I (C) 1 1.000000 + 502.00 13.3HE I (C) 1 1.000000 + 503.00 14.0HE I (C) 1 1.000000 + 504.00 14.9HE I (C) 1 1.000000 + 507.93 119.6 O III G 1 .500000 + 515.60 31.3HE I 1 1.000000 + 520.66 35.6SI XII 2 .150000 + 525.80 70.7 O III 1 .500000 + 537.02 150.0HE I 1 1.000000 + 542.80 23.2NE IV 1 .410000 + 550.00 23.2AL XI 1 .700000 + 554.37 799.2 O IV G 1 .525000 + 558.60 61.5NE VI 1 .580000 + 562.80 81.9NE VI 1 .580000 + 568.50 51.7BLEND 1 1.300000 + 572.30 68.9BLEND 1 1.300000 + 580.40 11.1 O II 1 .500000 + 584.33 1587.5HE I 1 1.000000 + 592.40 19.2UNSPEC'D 1 1.000000 + 599.60 190.0 O III 1 .500000 + 608.00 .1 H LY(C) 1 -.000324 + 609.00 .1 H LY(C) 1 -.000324 + 609.76 633.3MG X 2 .030000 + 610.00 .1 H LY(C) 1 -.000324 + 611.00 .1 H LY(C) 1 -.000324 + 612.00 .1 H LY(C) 1 -.000324 + 613.00 .1 H LY(C) 1 -.000324 + 614.00 .1 H LY(C) 1 -.000324 + 615.00 .1 H LY(C) 1 -.000324 + 616.00 .1 H LY(C) 1 -.000324 + 616.60 16.7 O II 1 .500000 + 617.00 .1 H LY(C) 1 -.000324 + 618.00 .1 H LY(C) 1 -.000324 + 619.00 .1 H LY(C) 1 -.000324 + 620.00 .1 H LY(C) 1 -.000324 + 621.00 .1 H LY(C) 1 -.000324 + 622.00 .1 H LY(C) 1 -.000324 + 623.00 .1 H LY(C) 1 -.000324 + 624.00 .3 H LY(C) 1 -.000324 + 624.93 286.8MG X 2 .030000 + 625.00 .3 H LY(C) 1 -.000324 + 626.00 .3 H LY(C) 1 -.000324 + 627.00 .3 H LY(C) 1 -.000324 + 628.00 .3 H LY(C) 1 -.000324 + 629.00 .3 H LY(C) 1 -.000324 + 629.73 1848.4 O V 1 .640000 + 630.00 .3 H LY(C) 1 -.000324 + 631.00 .1 H LY(C) 1 -.000324 + 632.00 .1 H LY(C) 1 -.000324 + 633.00 .1 H LY(C) 1 -.000324 + 634.00 .1 H LY(C) 1 -.000324 + 635.00 .1 H LY(C) 1 -.000324 + 636.00 .1 H LY(C) 1 -.000324 + 637.00 .1 H LY(C) 1 -.000324 + 638.00 .1 H LY(C) 1 -.000324 + 638.50 24.9UNSPEC'D 1 1.000000 + 639.00 .1 H LY(C) 1 -.000324 + 640.00 .1 H LY(C) 1 -.000324 + 640.41 11.6 S II 1 .500000 + 640.93 13.7 S II 1 .500000 + 641.00 .1 H LY(C) 1 -.000324 + 641.81 18.0 S II 1 .500000 + 642.00 .1 H LY(C) 1 -.000324 + 643.00 .1 H LY(C) 1 -.000324 + 644.00 .3 H LY(C) 1 -.000324 + 644.10 21.4 O II 1 .500000 + 645.00 .3 H LY(C) 1 -.000324 + 646.00 .3 H LY(C) 1 -.000324 + 647.00 .3 H LY(C) 1 -.000324 + 648.00 .3 H LY(C) 1 -.000324 + 649.00 .3 H LY(C) 1 -.000324 + 650.00 .3 H LY(C) 1 -.000324 + 650.30 15.6UNSPEC'D 1 1.000000 + 651.00 .3 H LY(C) 1 -.000324 + 652.00 .3 H LY(C) 1 -.000324 + 653.00 .3 H LY(C) 1 -.000324 + 654.00 .3 H LY(C) 1 -.000324 + 655.00 .3 H LY(C) 1 -.000324 + 656.00 .3 H LY(C) 1 -.000324 + 657.00 .4 H LY(C) 1 -.000324 + 657.30 12.1 S IV 1 .500000 + 658.00 .4 H LY(C) 1 -.000324 + 659.00 .4 H LY(C) 1 -.000324 + 660.00 .4 H LY(C) 1 -.000324 + 661.00 .4 H LY(C) 1 -.000324 + 661.40 12.1 S IV 1 .500000 + 662.00 .4 H LY(C) 1 -.000324 + 663.00 .4 H LY(C) 1 -.000324 + 664.00 .4 H LY(C) 1 -.000324 + 665.00 .4 H LY(C) 1 -.000324 + 666.00 .4 H LY(C) 1 -.000324 + 667.00 .5 H LY(C) 1 -.000324 + 668.00 .5 H LY(C) 1 -.000324 + 669.00 .5 H LY(C) 1 -.000324 + 670.00 .5 H LY(C) 1 -.000324 + 671.00 .5 H LY(C) 1 -.000324 + 671.50 10.6 N II 1 .600000 + 672.00 .5 H LY(C) 1 -.000324 + 673.00 .5 H LY(C) 1 -.000324 + 674.00 .5 H LY(C) 1 -.000324 + 675.00 .6 H LY(C) 1 -.000324 + 676.00 .6 H LY(C) 1 -.000324 + 677.00 .6 H LY(C) 1 -.000324 + 678.00 .6 H LY(C) 1 -.000324 + 679.00 .6 H LY(C) 1 -.000324 + 680.00 .6 H LY(C) 1 -.000324 + 681.00 .6 H LY(C) 1 -.000324 + 681.70 37.9NA IX 2 .009000 + 682.00 .6 H LY(C) 1 -.000324 + 683.00 .6 H LY(C) 1 -.000324 + 684.00 .6 H LY(C) 1 -.000324 + 685.00 .6 H LY(C) 1 -.000324 + 685.71 101.3 N III G 1 .650000 + 686.00 .6 H LY(C) 1 -.000324 + 687.00 .8 H LY(C) 1 -.000324 + 688.00 .8 H LY(C) 1 -.000324 + 689.00 .8 H LY(C) 1 -.000324 + 690.00 .8 H LY(C) 1 -.000324 + 690.80 20.9UNSPEC'D 1 1.000000 + 691.00 .8 H LY(C) 1 -.000324 + 692.00 .9 H LY(C) 1 -.000324 + 693.00 .9 H LY(C) 1 -.000324 + 694.00 .9 H LY(C) 1 -.000324 + 694.30 22.6NA IX 2 .009000 + 695.00 .9 H LY(C) 1 -.000324 + 696.00 .9 H LY(C) 1 -.000324 + 697.00 .9 H LY(C) 1 -.000324 + 698.00 .9 H LY(C) 1 -.000324 + 699.00 .9 H LY(C) 1 -.000324 + 700.00 1.0 H LY(C) 1 -.000324 + 701.00 1.0 H LY(C) 1 -.000324 + 702.00 1.0 H LY(C) 1 -.000324 + 703.00 1.1 H LY(C) 1 -.000324 + 703.36 391.5 O III G 1 .500000 + 704.00 1.1 H LY(C) 1 -.000324 + 705.00 1.1 H LY(C) 1 -.000324 + 706.00 1.1 H LY(C) 1 -.000324 + 707.00 1.1 H LY(C) 1 -.000324 + 708.00 1.1 H LY(C) 1 -.000324 + 709.00 1.1 H LY(C) 1 -.000324 + 710.00 1.3 H LY(C) 1 -.000324 + 711.00 1.3 H LY(C) 1 -.000324 + 712.00 1.3 H LY(C) 1 -.000324 + 712.70 12.4 S VI 1 .600000 + 713.00 1.4 H LY(C) 1 -.000324 + 714.00 1.4 H LY(C) 1 -.000324 + 715.00 1.5 H LY(C) 1 -.000324 + 716.00 1.5 H LY(C) 1 -.000324 + 717.00 1.5 H LY(C) 1 -.000324 + 718.00 1.7 H LY(C) 1 -.000324 + 718.50 53.1 O II 1 .500000 + 719.00 1.7 H LY(C) 1 -.000324 + 720.00 1.7 H LY(C) 1 -.000324 + 721.00 1.7 H LY(C) 1 -.000324 + 722.00 1.8 H LY(C) 1 -.000324 + 723.00 1.8 H LY(C) 1 -.000324 + 724.00 1.9 H LY(C) 1 -.000324 + 725.00 1.9 H LY(C) 1 -.000324 + 726.00 1.9 H LY(C) 1 -.000324 + 727.00 1.9 H LY(C) 1 -.000324 + 728.00 2.0 H LY(C) 1 -.000324 + 729.00 2.0 H LY(C) 1 -.000324 + 730.00 2.2 H LY(C) 1 -.000324 + 731.00 2.2 H LY(C) 1 -.000324 + 732.00 2.2 H LY(C) 1 -.000324 + 733.00 2.4 H LY(C) 1 -.000324 + 734.00 2.4 H LY(C) 1 -.000324 + 735.00 2.4 H LY(C) 1 -.000324 + 736.00 2.5 H LY(C) 1 -.000324 + 737.00 2.5 H LY(C) 1 -.000324 + 738.00 2.7 H LY(C) 1 -.000324 + 739.00 2.7 H LY(C) 1 -.000324 + 740.00 2.7 H LY(C) 1 -.000324 + 741.00 2.8 H LY(C) 1 -.000324 + 742.00 2.9 H LY(C) 1 -.000324 + 743.00 2.9 H LY(C) 1 -.000324 + 744.00 3.0 H LY(C) 1 -.000324 + 745.00 3.0 H LY(C) 1 -.000324 + 746.00 3.2 H LY(C) 1 -.000324 + 747.00 3.3 H LY(C) 1 -.000324 + 748.00 3.4 H LY(C) 1 -.000324 + 749.00 3.4 H LY(C) 1 -.000324 + 750.00 3.5 H LY(C) 1 -.000324 + 750.01 40.5UNSPEC'D 1 1.000000 + 751.00 3.7 H LY(C) 1 -.000324 + 752.00 3.7 H LY(C) 1 -.000324 + 753.00 3.8 H LY(C) 1 -.000324 + 754.00 3.9 H LY(C) 1 -.000324 + 755.00 3.9 H LY(C) 1 -.000324 + 756.00 4.1 H LY(C) 1 -.000324 + 757.00 4.2 H LY(C) 1 -.000324 + 758.00 4.3 H LY(C) 1 -.000324 + 758.68 34.9 O V 1 .640000 + 759.00 4.6 H LY(C) 1 -.000324 + 759.44 26.7 O V 1 .640000 + 760.00 4.6 H LY(C) 1 -.000324 + 760.30 93.0 O V 1 .640000 + 761.00 4.7 H LY(C) 1 -.000324 + 761.13 23.2 O V 1 .640000 + 762.00 4.8 H LY(C) 1 -.000324 + 762.00 34.9 O V 1 .640000 + 763.00 4.9 H LY(C) 1 -.000324 + 764.00 5.1 H LY(C) 1 -.000324 + 765.00 5.2 H LY(C) 1 -.000324 + 765.15 199.7 N IV 1 .700000 + 766.00 5.3 H LY(C) 1 -.000324 + 767.00 5.4 H LY(C) 1 -.000324 + 768.00 5.6 H LY(C) 1 -.000324 + 769.00 5.7 H LY(C) 1 -.000324 + 770.00 5.8 H LY(C) 1 -.000324 + 770.41 242.5NE VIII 2 .022000 + 771.00 6.1 H LY(C) 1 -.000324 + 772.00 6.2 H LY(C) 1 -.000324 + 773.00 6.3 H LY(C) 1 -.000324 + 774.00 6.6 H LY(C) 1 -.000324 + 775.00 6.6 H LY(C) 1 -.000324 + 776.00 11.8 N II 1 .600000 + 776.00 6.8 H LY(C) 1 -.000324 + 777.00 7.1 H LY(C) 1 -.000324 + 778.00 7.2 H LY(C) 1 -.000324 + 779.00 7.3 H LY(C) 1 -.000324 + 780.00 7.6 H LY(C) 1 -.000324 + 780.32 130.6NE VIII 2 .022000 + 781.00 7.7 H LY(C) 1 -.000324 + 782.00 8.0 H LY(C) 1 -.000324 + 783.00 8.1 H LY(C) 1 -.000324 + 784.00 8.3 H LY(C) 1 -.000324 + 785.00 8.6 H LY(C) 1 -.000324 + 786.00 8.7 H LY(C) 1 -.000324 + 786.47 146.3 S V 1 .500000 + 787.00 9.1 H LY(C) 1 -.000324 + 787.71 277.5 O IV 1 .525000 + 788.00 9.2 H LY(C) 1 -.000324 + 789.00 9.5 H LY(C) 1 -.000324 + 790.00 9.6 H LY(C) 1 -.000324 + 790.15 477.3 O IV G 1 .525000 + 791.00 10.0 H LY(C) 1 -.000324 + 792.00 10.2 H LY(C) 1 -.000324 + 793.00 10.3 H LY(C) 1 -.000324 + 794.00 10.7 H LY(C) 1 -.000324 + 795.00 11.0 H LY(C) 1 -.000324 + 796.00 11.2 H LY(C) 1 -.000324 + 797.00 11.5 H LY(C) 1 -.000324 + 798.00 11.9 H LY(C) 1 -.000324 + 799.00 12.1 H LY(C) 1 -.000324 + 800.00 12.4 H LY(C) 1 -.000324 + 801.00 12.9 H LY(C) 1 -.000324 + 802.00 13.1 H LY(C) 1 -.000324 + 803.00 13.5 H LY(C) 1 -.000324 + 804.00 13.9 H LY(C) 1 -.000324 + 805.00 14.1 H LY(C) 1 -.000324 + 806.00 14.5 H LY(C) 1 -.000324 + 807.00 14.9 H LY(C) 1 -.000324 + 808.00 15.3 H LY(C) 1 -.000324 + 809.00 15.6 H LY(C) 1 -.000324 + 810.00 16.0 H LY(C) 1 -.000324 + 811.00 16.5 H LY(C) 1 -.000324 + 812.00 16.9 H LY(C) 1 -.000324 + 813.00 17.3 H LY(C) 1 -.000324 + 814.00 17.8 H LY(C) 1 -.000324 + 815.00 18.3 H LY(C) 1 -.000324 + 816.00 18.6 H LY(C) 1 -.000324 + 817.00 19.1 H LY(C) 1 -.000324 + 818.00 19.5 H LY(C) 1 -.000324 + 819.00 20.2 H LY(C) 1 -.000324 + 820.00 20.5 H LY(C) 1 -.000324 + 821.00 21.2 H LY(C) 1 -.000324 + 822.00 21.7 H LY(C) 1 -.000324 + 823.00 22.3 H LY(C) 1 -.000324 + 824.00 22.9 H LY(C) 1 -.000324 + 825.00 23.4 H LY(C) 1 -.000324 + 826.00 24.0 H LY(C) 1 -.000324 + 827.00 24.7 H LY(C) 1 -.000324 + 828.00 25.2 H LY(C) 1 -.000324 + 829.00 25.9 H LY(C) 1 -.000324 + 830.00 26.6 H LY(C) 1 -.000324 + 831.00 27.2 H LY(C) 1 -.000324 + 832.00 27.9 H LY(C) 1 -.000324 + 833.00 28.7 H LY(C) 1 -.000324 + 834.00 29.3 H LY(C) 1 -.000324 + 834.20 666.5 OII,IIIG 1 .500000 + 835.00 30.2 H LY(C) 1 -.000324 + 836.00 30.8 H LY(C) 1 -.000324 + 837.00 31.6 H LY(C) 1 -.000324 + 838.00 32.4 H LY(C) 1 -.000324 + 839.00 33.3 H LY(C) 1 -.000324 + 840.00 34.1 H LY(C) 1 -.000324 + 841.00 35.1 H LY(C) 1 -.000324 + 842.00 35.8 H LY(C) 1 -.000324 + 843.00 36.8 H LY(C) 1 -.000324 + 844.00 37.7 H LY(C) 1 -.000324 + 845.00 38.7 H LY(C) 1 -.000324 + 846.00 39.7 H LY(C) 1 -.000324 + 847.00 40.7 H LY(C) 1 -.000324 + 848.00 41.7 H LY(C) 1 -.000324 + 849.00 42.7 H LY(C) 1 -.000324 + 850.00 43.8 H LY(C) 1 -.000324 + 851.00 45.0 H LY(C) 1 -.000324 + 852.00 46.1 H LY(C) 1 -.000324 + 853.00 47.4 H LY(C) 1 -.000324 + 854.00 48.5 H LY(C) 1 -.000324 + 855.00 49.7 H LY(C) 1 -.000324 + 856.00 51.0 H LY(C) 1 -.000324 + 857.00 52.4 H LY(C) 1 -.000324 + 858.00 53.6 H LY(C) 1 -.000324 + 859.00 55.0 H LY(C) 1 -.000324 + 860.00 56.4 H LY(C) 1 -.000324 + 861.00 57.9 H LY(C) 1 -.000324 + 862.00 59.2 H LY(C) 1 -.000324 + 863.00 60.7 H LY(C) 1 -.000324 + 864.00 62.2 H LY(C) 1 -.000324 + 865.00 63.9 H LY(C) 1 -.000324 + 866.00 65.5 H LY(C) 1 -.000324 + 867.00 67.1 H LY(C) 1 -.000324 + 868.00 68.9 H LY(C) 1 -.000324 + 869.00 70.6 H LY(C) 1 -.000324 + 870.00 72.4 H LY(C) 1 -.000324 + 871.00 74.2 H LY(C) 1 -.000324 + 872.00 76.1 H LY(C) 1 -.000324 + 873.00 78.1 H LY(C) 1 -.000324 + 874.00 80.1 H LY(C) 1 -.000324 + 875.00 82.1 H LY(C) 1 -.000324 + 876.00 84.1 H LY(C) 1 -.000324 + 877.00 86.2 H LY(C) 1 -.000324 + 878.00 88.5 H LY(C) 1 -.000324 + 879.00 90.7 H LY(C) 1 -.000324 + 880.00 93.0 H LY(C) 1 -.000324 + 881.00 95.4 H LY(C) 1 -.000324 + 882.00 97.9 H LY(C) 1 -.000324 + 883.00 100.4 H LY(C) 1 -.000324 + 884.00 102.9 H LY(C) 1 -.000324 + 885.00 105.5 H LY(C) 1 -.000324 + 886.00 108.1 H LY(C) 1 -.000324 + 887.00 110.8 H LY(C) 1 -.000324 + 888.00 113.7 H LY(C) 1 -.000324 + 889.00 116.6 H LY(C) 1 -.000324 + 890.00 119.6 H LY(C) 1 -.000324 + 891.00 122.6 H LY(C) 1 -.000324 + 892.00 125.7 H LY(C) 1 -.000324 + 893.00 128.8 H LY(C) 1 -.000324 + 894.00 132.1 H LY(C) 1 -.000324 + 895.00 135.4 H LY(C) 1 -.000324 + 896.00 138.9 H LY(C) 1 -.000324 + 897.00 142.4 H LY(C) 1 -.000324 + 898.00 145.9 H LY(C) 1 -.000324 + 899.00 149.7 H LY(C) 1 -.000324 + 900.00 153.5 H LY(C) 1 -.000324 + 901.00 157.4 H LY(C) 1 -.000324 + 902.00 161.4 H LY(C) 1 -.000324 + 903.00 165.5 H LY(C) 1 -.000324 + 904.00 169.7 H LY(C) 1 -.000324 + 904.10 116.9 C II G 1 .600000 + 905.00 174.0 H LY(C) 1 -.000324 + 906.00 178.3 H LY(C) 1 -.000324 + 907.00 182.9 H LY(C) 1 -.000324 + 908.00 187.6 H LY(C) 1 -.000324 + 909.00 192.3 H LY(C) 1 -.000324 + 910.00 197.2 H LY(C) 1 -.000324 + 911.00 202.1 H LY(C) 1 -.000324 + 912.00 207.3 H LY(C) 1 -.000324 + 913.00 2.4 C I (C) 1 .600000 + 914.00 2.4 C I (C) 1 .600000 + 915.00 2.4 C I (C) 1 .600000 + 916.00 2.5 C I (C) 1 .600000 + 917.00 2.5 C I (C) 1 .600000 + 918.00 2.7 C I (C) 1 .600000 + 919.00 2.7 C I (C) 1 .600000 + 920.00 2.8 C I (C) 1 .600000 + 920.96 71.1 H LY-9 1 1.080000 + 921.00 2.8 C I (C) 1 .600000 + 922.00 2.8 C I (C) 1 .600000 + 923.00 3.0 C I (C) 1 .600000 + 923.15 101.5 H LY-8 B 1 1.075000 + 924.00 3.0 C I (C) 1 .600000 + 925.00 3.1 C I (C) 1 .600000 + 926.00 3.1 C I (C) 1 .600000 + 926.20 139.4 H LY-7 1 1.070000 + 927.00 3.2 C I (C) 1 .600000 + 928.00 3.2 C I (C) 1 .600000 + 929.00 3.3 C I (C) 1 .600000 + 930.00 3.3 C I (C) 1 .600000 + 930.75 164.6 H LY-6 B 1 1.065000 + 931.00 3.4 C I (C) 1 .600000 + 932.00 3.4 C I (C) 1 .600000 + 933.00 3.5 C I (C) 1 .600000 + 933.38 115.9 S VI 1 .600000 + 934.00 3.5 C I (C) 1 .600000 + 935.00 3.6 C I (C) 1 .600000 + 936.00 3.6 C I (C) 1 .600000 + 937.00 3.7 C I (C) 1 .600000 + 937.80 227.7 H LY-5 1 1.060000 + 938.00 3.8 C I (C) 1 .600000 + 939.00 3.8 C I (C) 1 .600000 + 940.00 3.9 C I (C) 1 .600000 + 941.00 3.9 C I (C) 1 .600000 + 942.00 4.1 C I (C) 1 .600000 + 943.00 4.3 C I (C) 1 .600000 + 944.00 4.3 C I (C) 1 .600000 + 944.52 76.5 S VI 1 .600000 + 945.00 4.4 C I (C) 1 .600000 + 946.00 4.5 C I (C) 1 .600000 + 947.00 4.5 C I (C) 1 .600000 + 948.00 4.6 C I (C) 1 .600000 + 949.00 4.7 C I (C) 1 .600000 + 949.74 378.7 H LY-4 1 1.050000 + 950.00 4.7 C I (C) 1 .600000 + 951.00 4.8 C I (C) 1 .600000 + 952.00 4.9 C I (C) 1 .600000 + 953.00 5.0 C I (C) 1 .600000 + 954.00 5.0 C I (C) 1 .600000 + 955.00 5.1 C I (C) 1 .600000 + 956.00 5.3 C I (C) 1 .600000 + 957.00 5.4 C I (C) 1 .600000 + 958.00 5.5 C I (C) 1 .600000 + 959.00 5.6 C I (C) 1 .600000 + 960.00 5.6 C I (C) 1 .600000 + 961.00 5.7 C I (C) 1 .600000 + 962.00 5.8 C I (C) 1 .600000 + 963.00 5.9 C I (C) 1 .600000 + 964.00 6.1 C I (C) 1 .600000 + 965.00 6.2 C I (C) 1 .600000 + 966.00 6.3 C I (C) 1 .600000 + 967.00 6.5 C I (C) 1 .600000 + 968.00 6.6 C I (C) 1 .600000 + 969.00 6.7 C I (C) 1 .600000 + 970.00 6.8 C I (C) 1 .600000 + 971.00 6.9 C I (C) 1 .600000 + 972.00 7.0 C I (C) 1 .600000 + 972.54 754.5 H LY-3 1 1.030000 + 973.00 7.1 C I (C) 1 .600000 + 974.00 7.2 C I (C) 1 .600000 + 975.00 7.4 C I (C) 1 .600000 + 976.00 7.6 C I (C) 1 .600000 + 977.00 7.8 C I (C) 1 .600000 + 977.02 4840.0 C III 1 .650000 + 978.00 7.9 C I (C) 1 .600000 + 979.00 8.0 C I (C) 1 .600000 + 980.00 8.2 C I (C) 1 .600000 + 981.00 8.3 C I (C) 1 .600000 + 982.00 8.4 C I (C) 1 .600000 + 983.00 8.5 C I (C) 1 .600000 + 984.00 8.8 C I (C) 1 .600000 + 985.00 8.9 C I (C) 1 .600000 + 986.00 9.0 C I (C) 1 .600000 + 987.00 9.2 C I (C) 1 .600000 + 988.00 9.3 C I (C) 1 .600000 + 989.00 9.6 C I (C) 1 .600000 + 989.79 191.3 N III 1 .650000 + 990.00 9.7 C I (C) 1 .600000 + 991.00 10.0 C I (C) 1 .600000 + 991.55 382.5 N III 1 .650000 + 992.00 10.1 C I (C) 1 .600000 + 993.00 10.3 C I (C) 1 .600000 + 994.00 10.4 C I (C) 1 .600000 + 995.00 10.6 C I (C) 1 .600000 + 996.00 10.8 C I (C) 1 .600000 + 997.00 10.9 C I (C) 1 .600000 + 998.00 11.3 C I (C) 1 .600000 + 999.00 11.5 C I (C) 1 .600000 +1000.00 11.7 C I (C) 1 .600000 +1001.00 11.8 C I (C) 1 .600000 +1002.00 12.0 C I (C) 1 .600000 +1003.00 12.3 C I (C) 1 .600000 +1004.00 12.5 C I (C) 1 .600000 +1005.00 12.8 C I (C) 1 .600000 +1006.00 13.0 C I (C) 1 .600000 +1007.00 13.2 C I (C) 1 .600000 +1008.00 13.5 C I (C) 1 .600000 +1009.00 13.7 C I (C) 1 .600000 +1010.00 13.9 C I (C) 1 .600000 +1010.20 85.0 C II 1 .600000 +1011.00 14.1 C I (C) 1 .600000 +1012.00 14.4 C I (C) 1 .600000 +1013.00 14.8 C I (C) 1 .600000 +1014.00 15.0 C I (C) 1 .600000 +1015.00 15.3 C I (C) 1 .600000 +1016.00 15.5 C I (C) 1 .600000 +1017.00 15.8 C I (C) 1 .600000 +1018.00 16.1 C I (C) 1 .600000 +1019.00 16.4 C I (C) 1 .600000 +1020.00 16.7 C I (C) 1 .600000 +1021.00 17.0 C I (C) 1 .600000 +1022.00 17.3 C I (C) 1 .600000 +1023.00 17.6 C I (C) 1 .600000 +1024.00 17.8 C I (C) 1 .600000 +1025.00 18.3 C I (C) 1 .600000 +1025.72 4375.0 H LY-2 1 1.000000 +1026.00 18.6 C I (C) 1 .600000 +1027.00 18.9 C I (C) 1 .600000 +1028.00 19.3 C I (C) 1 .600000 +1029.00 19.7 C I (C) 1 .600000 +1030.00 20.0 C I (C) 1 .600000 +1031.00 20.3 C I (C) 1 .600000 +1031.91 1942.5 O VI 1 1.250000 +1032.00 20.7 C I (C) 1 .600000 +1033.00 21.0 C I (C) 1 .600000 +1034.00 21.5 C I (C) 1 .600000 +1035.00 21.9 C I (C) 1 .600000 +1036.00 22.2 C I (C) 1 .600000 +1036.34 212.5 C II 1 .600000 +1037.00 22.6 C I (C) 1 .600000 +1037.02 265.6 C II 1 .600000 +1037.61 962.0 O VI 1 1.250000 +1038.00 23.1 C I (C) 1 .600000 +1039.00 23.5 C I (C) 1 .600000 +1040.00 24.0 C I (C) 1 .600000 +1041.00 24.3 C I (C) 1 .600000 +1042.00 24.8 C I (C) 1 .600000 +1043.00 25.3 C I (C) 1 .600000 +1044.00 25.7 C I (C) 1 .600000 +1045.00 26.1 C I (C) 1 .600000 +1046.00 26.7 C I (C) 1 .600000 +1047.00 27.1 C I (C) 1 .600000 +1048.00 27.6 C I (C) 1 .600000 +1049.00 28.0 C I (C) 1 .600000 +1050.00 28.7 C I (C) 1 .600000 +1051.00 29.1 C I (C) 1 .600000 +1052.00 29.6 C I (C) 1 .600000 +1053.00 30.2 C I (C) 1 .600000 +1054.00 30.7 C I (C) 1 .600000 +1055.00 31.3 C I (C) 1 .600000 +1056.00 31.9 C I (C) 1 .600000 +1057.00 32.5 C I (C) 1 .600000 +1058.00 33.0 C I (C) 1 .600000 +1059.00 33.7 C I (C) 1 .600000 +1060.00 34.2 C I (C) 1 .600000 +1061.00 34.8 C I (C) 1 .600000 +1062.00 35.5 C I (C) 1 .600000 +1062.70 60.5 S IV ? 1 .500000 +1063.00 36.1 C I (C) 1 .600000 +1064.00 36.9 C I (C) 1 .600000 +1065.00 37.4 C I (C) 1 .600000 +1066.00 38.1 C I (C) 1 .600000 +1067.00 38.8 C I (C) 1 .600000 +1068.00 39.5 C I (C) 1 .600000 +1069.00 40.2 C I (C) 1 .600000 +1070.00 40.9 C I (C) 1 .600000 +1071.00 41.8 C I (C) 1 .600000 +1072.00 42.4 C I (C) 1 .600000 +1073.00 43.2 C I (C) 1 .600000 +1074.00 44.1 C I (C) 1 .600000 +1075.00 44.7 C I (C) 1 .600000 +1076.00 45.6 C I (C) 1 .600000 +1077.00 46.4 C I (C) 1 .600000 +1077.10 118.2 S III B 1 .500000 +1078.00 47.4 C I (C) 1 .600000 +1079.00 48.1 C I (C) 1 .600000 +1080.00 49.0 C I (C) 1 .600000 +1081.00 49.9 C I (C) 1 .600000 +1082.00 50.9 C I (C) 1 .600000 +1083.00 51.6 C I (C) 1 .600000 +1084.00 52.6 C I (C) 1 .600000 +1085.00 53.7 C I (C) 1 .600000 +1085.10 559.0 N II G 1 .600000 +1086.00 54.6 C I (C) 1 .600000 +1087.00 55.6 C I (C) 1 .600000 +1088.00 56.5 C I (C) 1 .600000 +1089.00 57.6 C I (C) 1 .600000 +1090.00 58.6 C I (C) 1 .600000 +1091.00 59.7 C I (C) 1 .600000 +1092.00 60.8 C I (C) 1 .600000 +1093.00 61.8 C I (C) 1 .600000 +1094.00 63.0 C I (C) 1 .600000 +1095.00 64.2 C I (C) 1 .600000 +1096.00 65.3 C I (C) 1 .600000 +1097.00 66.5 C I (C) 1 .600000 +1098.00 67.7 C I (C) 1 .600000 +1099.00 68.8 C I (C) 1 .600000 +1100.00 70.1 C I (C) 1 .600000 +1101.00 1.8QUASI(C) 0 -.007590 +1102.00 1.8QUASI(C) 0 -.007590 +1103.00 1.8QUASI(C) 0 -.007590 +1104.00 1.8QUASI(C) 0 -.007590 +1105.00 1.9QUASI(C) 0 -.007590 +1106.00 1.9QUASI(C) 0 -.007590 +1107.00 1.9QUASI(C) 0 -.007590 +1108.00 1.9QUASI(C) 0 -.007590 +1109.00 2.0QUASI(C) 0 -.007590 +1110.00 2.0QUASI(C) 0 -.007590 +1111.00 2.0QUASI(C) 0 -.007590 +1112.00 2.1QUASI(C) 0 -.007590 +1113.00 2.1QUASI(C) 0 -.007590 +1114.00 2.2QUASI(C) 0 -.007590 +1115.00 2.2QUASI(C) 0 -.007590 +1116.00 2.2QUASI(C) 0 -.007590 +1117.00 2.3QUASI(C) 0 -.007590 +1118.00 2.3QUASI(C) 0 -.007590 +1119.00 2.4QUASI(C) 0 -.007590 +1120.00 2.4QUASI(C) 0 -.007590 +1121.00 2.5QUASI(C) 0 -.007590 +1122.00 2.6QUASI(C) 0 -.007590 +1122.50 311.7SI IV B 1 .700000 +1123.00 2.8QUASI(C) 0 -.007590 +1124.00 2.9QUASI(C) 0 -.007590 +1125.00 3.0QUASI(C) 0 -.007590 +1126.00 3.1QUASI(C) 0 -.007590 +1127.00 3.2QUASI(C) 0 -.007590 +1128.00 3.3QUASI(C) 0 -.007590 +1128.30 387.0SI IV 1 .700000 +1129.00 3.4QUASI(C) 0 -.007590 +1130.00 3.5QUASI(C) 0 -.007590 +1131.00 3.7QUASI(C) 0 -.007590 +1132.00 4.0QUASI(C) 0 -.007590 +1133.00 4.2QUASI(C) 0 -.007590 +1134.00 4.4QUASI(C) 0 -.007590 +1135.00 4.6QUASI(C) 0 -.007590 +1136.00 4.8QUASI(C) 0 -.007590 +1137.00 5.1QUASI(C) 0 -.007590 +1138.00 5.3QUASI(C) 0 -.007590 +1139.00 5.5QUASI(C) 0 -.007590 +1140.00 5.7QUASI(C) 0 -.007590 +1141.00 6.2QUASI(C) 0 -.007590 +1142.00 6.6QUASI(C) 0 -.007590 +1143.00 7.0QUASI(C) 0 -.007590 +1144.00 7.5QUASI(C) 0 -.007590 +1145.00 7.9QUASI(C) 0 -.007590 +1146.00 8.4QUASI(C) 0 -.007590 +1147.00 8.8QUASI(C) 0 -.007590 +1148.00 9.2QUASI(C) 0 -.007590 +1149.00 9.7QUASI(C) 0 -.007590 +1150.00 10.1QUASI(C) 0 -.007590 +1151.00 10.7QUASI(C) 0 -.007590 +1152.00 11.4QUASI(C) 0 -.007590 +1153.00 12.0QUASI(C) 0 -.007590 +1154.00 12.6QUASI(C) 0 -.007590 +1155.00 13.2QUASI(C) 0 -.007590 +1156.00 13.8QUASI(C) 0 -.007590 +1157.00 14.4QUASI(C) 0 -.007590 +1158.00 15.0QUASI(C) 0 -.007590 +1159.00 15.6QUASI(C) 0 -.007590 +1160.00 16.1QUASI(C) 0 -.007590 +1161.00 17.5QUASI(C) 0 -.007590 +1162.00 18.8QUASI(C) 0 -.007590 +1163.00 20.1QUASI(C) 0 -.007590 +1164.00 21.3QUASI(C) 0 -.007590 +1165.00 22.6QUASI(C) 0 -.007590 +1166.00 23.9QUASI(C) 0 -.007590 +1167.00 25.1QUASI(C) 0 -.007590 +1168.00 26.4QUASI(C) 0 -.007590 +1169.00 27.6QUASI(C) 0 -.007590 +1170.00 28.8QUASI(C) 0 -.007590 +1171.00 30.1QUASI(C) 0 -.007590 +1172.00 31.3QUASI(C) 0 -.007590 +1173.00 32.5QUASI(C) 0 -.007590 +1174.00 33.7QUASI(C) 0 -.007590 +1175.00 34.8QUASI(C) 0 -.007590 +1175.71 2783.0 C III 1 .650000 +1176.00 36.0QUASI(C) 0 -.007590 +1177.00 37.2QUASI(C) 0 -.007590 +1178.00 38.3QUASI(C) 0 -.007590 +1179.00 39.4QUASI(C) 0 -.007590 +1180.00 40.6QUASI(C) 0 -.007590 +1181.00 42.5QUASI(C) 0 -.007590 +1182.00 44.5QUASI(C) 0 -.007590 +1183.00 46.5QUASI(C) 0 -.007590 +1184.00 48.4QUASI(C) 0 -.007590 +1185.00 50.3QUASI(C) 0 -.007590 +1186.00 52.2QUASI(C) 0 -.007590 +1187.00 54.1QUASI(C) 0 -.007590 +1188.00 55.9QUASI(C) 0 -.007590 +1189.00 57.8QUASI(C) 0 -.007590 +1190.00 59.6QUASI(C) 0 -.007590 +1191.00 61.4QUASI(C) 0 -.007590 +1192.00 63.2QUASI(C) 0 -.007590 +1193.00 65.0QUASI(C) 0 -.007590 +1194.00 66.8QUASI(C) 0 -.007590 +1195.00 68.5QUASI(C) 0 -.007590 +1196.00 70.2QUASI(C) 0 -.007590 +1197.00 71.9QUASI(C) 0 -.007590 +1198.00 73.6QUASI(C) 0 -.007590 +1199.00 75.3QUASI(C) 0 -.007590 +1200.00 77.0QUASI(C) 0 -.007590 +1201.00 79.9QUASI(C) 0 -.007590 +1202.00 82.8QUASI(C) 0 -.007590 +1203.00 85.7QUASI(C) 0 -.007590 +1204.00 88.5QUASI(C) 0 -.007590 +1205.00 91.3QUASI(C) 0 -.007590 +1206.00 89.8QUASI(C) 0 -.007590 +1206.52 4250.0SI III 1 .600000 +1207.00 88.3QUASI(C) 0 -.007590 +1208.00 86.8QUASI(C) 0 -.007590 +1209.00 85.3QUASI(C) 0 -.007590 +1210.00 83.8QUASI(C) 0 -.007590 +1211.00 82.4QUASI(C) 0 -.007590 +1212.00 80.9QUASI(C) 0 -.007590 +1213.00 79.5QUASI(C) 0 -.007590 +1214.00 78.0QUASI(C) 0 -.007590 +1215.00 76.6QUASI(C) 0 -.007590 +1215.67294924.8 H LY-1 1 .700000 +1216.00 75.2QUASI(C) 0 -.007590 +1217.00 73.8QUASI(C) 0 -.007590 +1218.00 72.4QUASI(C) 0 -.007590 +1219.00 71.0QUASI(C) 0 -.007590 +1220.00 69.6QUASI(C) 0 -.007590 +1221.00 68.3QUASI(C) 0 -.007590 +1222.00 66.9QUASI(C) 0 -.007590 +1223.00 65.6QUASI(C) 0 -.007590 +1224.00 64.2QUASI(C) 0 -.007590 +1225.00 62.9QUASI(C) 0 -.007590 +1226.00 61.6QUASI(C) 0 -.007590 +1227.00 60.3QUASI(C) 0 -.007590 +1228.00 59.0QUASI(C) 0 -.007590 +1229.00 57.7QUASI(C) 0 -.007590 +1230.00 146.6QUASI(C) 0 -.007590 +1231.00 142.2QUASI(C) 0 -.007590 +1232.00 137.8QUASI(C) 0 -.007590 +1233.00 133.6QUASI(C) 0 -.007590 +1234.00 129.4QUASI(C) 0 -.007590 +1235.00 125.3QUASI(C) 0 -.007590 +1236.00 121.1QUASI(C) 0 -.007590 +1237.00 117.0QUASI(C) 0 -.007590 +1238.00 113.0QUASI(C) 0 -.007590 +1238.82 191.2 N V 1 1.500000 +1239.00 108.9QUASI(C) 0 -.007590 +1240.00 59.7QUASI(C) 0 -.007590 +1241.00 61.5QUASI(C) 0 -.007590 +1242.00 59.7QUASI(C) 0 -.007590 +1242.80 83.9 N V 1 1.500000 +1243.00 57.9QUASI(C) 0 -.007590 +1244.00 56.1QUASI(C) 0 -.007590 +1245.00 54.4QUASI(C) 0 -.007590 +1246.00 52.7QUASI(C) 0 -.007590 +1247.00 50.9QUASI(C) 0 -.007590 +1248.00 49.2QUASI(C) 0 -.007590 +1249.00 47.6QUASI(C) 0 -.007590 +1250.00 125.1QUASI(C) 0 -.007590 +1251.00 121.2QUASI(C) 0 -.007590 +1252.00 117.3QUASI(C) 0 -.007590 +1253.00 113.7QUASI(C) 0 -.007590 +1254.00 109.6QUASI(C) 0 -.007590 +1255.00 106.1QUASI(C) 0 -.007590 +1256.00 102.2QUASI(C) 0 -.007590 +1257.00 98.5QUASI(C) 0 -.007590 +1258.00 94.9QUASI(C) 0 -.007590 +1259.00 91.2QUASI(C) 0 -.007590 +1260.00 62.1QUASI(C) 0 -.007590 +1260.42 154.3SI II 1 .500000 +1261.00 59.5QUASI(C) 0 -.007590 +1262.00 57.0QUASI(C) 0 -.007590 +1263.00 54.5QUASI(C) 0 -.007590 +1264.00 52.1QUASI(C) 0 -.007590 +1264.74 286.6SI II 1 .500000 +1265.00 49.6QUASI(C) 0 -.007590 +1266.00 47.3QUASI(C) 0 -.007590 +1267.00 45.0QUASI(C) 0 -.007590 +1268.00 42.8QUASI(C) 0 -.007590 +1269.00 40.3QUASI(C) 0 -.007590 +1270.00 84.4QUASI(C) 0 -.007590 +1271.00 82.3QUASI(C) 0 -.007590 +1272.00 80.1QUASI(C) 0 -.007590 +1273.00 78.1QUASI(C) 0 -.007590 +1274.00 75.9QUASI(C) 0 -.007590 +1275.00 73.8QUASI(C) 0 -.007590 +1276.00 71.9QUASI(C) 0 -.007590 +1277.00 69.7QUASI(C) 0 -.007590 +1278.00 67.7QUASI(C) 0 -.007590 +1279.00 65.8QUASI(C) 0 -.007590 +1280.00 48.0QUASI(C) 0 -.007590 +1281.00 48.5QUASI(C) 0 -.007590 +1282.00 48.9QUASI(C) 0 -.007590 +1283.00 49.3QUASI(C) 0 -.007590 +1284.00 49.8QUASI(C) 0 -.007590 +1285.00 50.2QUASI(C) 0 -.007590 +1286.00 50.6QUASI(C) 0 -.007590 +1287.00 51.1QUASI(C) 0 -.007590 +1288.00 51.5QUASI(C) 0 -.007590 +1289.00 51.9QUASI(C) 0 -.007590 +1290.00 82.6QUASI(C) 0 -.007590 +1291.00 83.4QUASI(C) 0 -.007590 +1292.00 84.1QUASI(C) 0 -.007590 +1293.00 84.8QUASI(C) 0 -.007590 +1294.00 85.7QUASI(C) 0 -.007590 +1295.00 86.4QUASI(C) 0 -.007590 +1296.00 87.2QUASI(C) 0 -.007590 +1297.00 87.9QUASI(C) 0 -.007590 +1298.00 88.7QUASI(C) 0 -.007590 +1299.00 89.3QUASI(C) 0 -.007590 +1300.00 88.1QUASI(C) 0 -.007590 +1301.00 89.1QUASI(C) 0 -.007590 +1302.00 89.9QUASI(C) 0 -.007590 +1302.17 1155.0 O I 1 .500000 +1303.00 90.5QUASI(C) 0 -.007590 +1304.00 91.2QUASI(C) 0 -.007590 +1304.86 1186.5 O I 1 .500000 +1305.00 92.2QUASI(C) 0 -.007590 +1306.00 93.0QUASI(C) 0 -.007590 +1306.03 1291.5 O I 1 .500000 +1307.00 94.0QUASI(C) 0 -.007590 +1308.00 94.8QUASI(C) 0 -.007590 +1309.00 95.5QUASI(C) 0 -.007590 +1309.28 219.9SI III 1 .600000 +1310.00 65.2QUASI(C) 0 -.007590 +1311.00 65.6QUASI(C) 0 -.007590 +1312.00 66.0QUASI(C) 0 -.007590 +1313.00 66.6QUASI(C) 0 -.007590 +1314.00 67.1QUASI(C) 0 -.007590 +1315.00 67.6QUASI(C) 0 -.007590 +1316.00 68.1QUASI(C) 0 -.007590 +1317.00 68.6QUASI(C) 0 -.007590 +1318.00 69.3QUASI(C) 0 -.007590 +1318.95 132.5UNSPEC'D 1 1.000000 +1319.00 69.8QUASI(C) 0 -.007590 +1320.00 75.0QUASI(C) 0 -.007590 +1321.00 75.7QUASI(C) 0 -.007590 +1322.00 76.4QUASI(C) 0 -.007590 +1323.00 77.0QUASI(C) 0 -.007590 +1324.00 77.6QUASI(C) 0 -.007590 +1325.00 78.3QUASI(C) 0 -.007590 +1326.00 79.0QUASI(C) 0 -.007590 +1327.00 79.6QUASI(C) 0 -.007590 +1328.00 80.3QUASI(C) 0 -.007590 +1329.00 80.9QUASI(C) 0 -.007590 +1330.00 90.7QUASI(C) 0 -.007590 +1331.00 91.3QUASI(C) 0 -.007590 +1332.00 92.0QUASI(C) 0 -.007590 +1333.00 92.8QUASI(C) 0 -.007590 +1334.00 93.7QUASI(C) 0 -.007590 +1334.53 1955.0 C II 1 .600000 +1335.00 94.4QUASI(C) 0 -.007590 +1335.66 2677.5 C II 1 .600000 +1336.00 95.1QUASI(C) 0 -.007590 +1337.00 96.0QUASI(C) 0 -.007590 +1338.00 96.7QUASI(C) 0 -.007590 +1339.00 97.6QUASI(C) 0 -.007590 +1340.00 88.4QUASI(C) 0 -.007590 +1341.00 89.2QUASI(C) 0 -.007590 +1342.00 90.0QUASI(C) 0 -.007590 +1343.00 90.8QUASI(C) 0 -.007590 +1344.00 91.6QUASI(C) 0 -.007590 +1345.00 92.4QUASI(C) 0 -.007590 +1346.00 93.1QUASI(C) 0 -.007590 +1347.00 93.9QUASI(C) 0 -.007590 +1348.00 94.8QUASI(C) 0 -.007590 +1349.00 95.4QUASI(C) 0 -.007590 +1350.00 102.1QUASI(C) 0 -.007590 +1351.00 102.7QUASI(C) 0 -.007590 +1352.00 103.4QUASI(C) 0 -.007590 +1353.00 104.0QUASI(C) 0 -.007590 +1354.00 104.8QUASI(C) 0 -.007590 +1355.00 105.4QUASI(C) 0 -.007590 +1355.60 346.5 O I 1 .500000 +1356.00 106.2QUASI(C) 0 -.007590 +1357.00 106.7QUASI(C) 0 -.007590 +1358.00 107.5QUASI(C) 0 -.007590 +1358.51 93.4 O I 1 .500000 +1359.00 108.2QUASI(C) 0 -.007590 +1360.00 101.5QUASI(C) 0 -.007590 +1361.00 102.1QUASI(C) 0 -.007590 +1362.00 102.8QUASI(C) 0 -.007590 +1363.00 103.7QUASI(C) 0 -.007590 +1364.00 104.5QUASI(C) 0 -.007590 +1365.00 105.4QUASI(C) 0 -.007590 +1366.00 106.3QUASI(C) 0 -.007590 +1367.00 107.0QUASI(C) 0 -.007590 +1368.00 107.9QUASI(C) 0 -.007590 +1369.00 108.8QUASI(C) 0 -.007590 +1370.00 108.8QUASI(C) 0 -.007590 +1371.00 109.7QUASI(C) 0 -.007590 +1372.00 110.6QUASI(C) 0 -.007590 +1373.00 111.7QUASI(C) 0 -.007590 +1374.00 112.5QUASI(C) 0 -.007590 +1375.00 113.5QUASI(C) 0 -.007590 +1376.00 114.4QUASI(C) 0 -.007590 +1377.00 115.5QUASI(C) 0 -.007590 +1378.00 116.4QUASI(C) 0 -.007590 +1379.00 117.4QUASI(C) 0 -.007590 +1380.00 100.1QUASI(C) 0 -.007590 +1381.00 101.0QUASI(C) 0 -.007590 +1382.00 101.8QUASI(C) 0 -.007590 +1383.00 102.7QUASI(C) 0 -.007590 +1384.00 103.6QUASI(C) 0 -.007590 +1385.00 104.4QUASI(C) 0 -.007590 +1386.00 105.4QUASI(C) 0 -.007590 +1387.00 106.2QUASI(C) 0 -.007590 +1388.00 107.1QUASI(C) 0 -.007590 +1389.00 108.1QUASI(C) 0 -.007590 +1390.00 134.7QUASI(C) 0 -.007590 +1391.00 135.8QUASI(C) 0 -.007590 +1392.00 136.9QUASI(C) 0 -.007590 +1393.00 138.2QUASI(C) 0 -.007590 +1393.76 1397.5SI IV 1 .700000 +1394.00 139.5QUASI(C) 0 -.007590 +1395.00 140.5QUASI(C) 0 -.007590 +1396.00 141.7QUASI(C) 0 -.007590 +1397.00 143.0QUASI(C) 0 -.007590 +1398.00 144.1QUASI(C) 0 -.007590 +1399.00 145.3QUASI(C) 0 -.007590 +1400.00 172.1QUASI(C) 0 -.007590 +1401.00 173.7QUASI(C) 0 -.007590 +1402.00 174.9QUASI(C) 0 -.007590 +1402.77 978.2SI IV 1 .700000 +1403.00 176.5QUASI(C) 0 -.007590 +1404.00 178.1QUASI(C) 0 -.007590 +1405.00 179.7QUASI(C) 0 -.007590 +1406.00 181.3QUASI(C) 0 -.007590 +1407.00 182.9QUASI(C) 0 -.007590 +1408.00 184.5QUASI(C) 0 -.007590 +1409.00 186.1QUASI(C) 0 -.007590 +1410.00 153.0QUASI(C) 0 -.007590 +1411.00 154.3QUASI(C) 0 -.007590 +1412.00 155.5QUASI(C) 0 -.007590 +1413.00 156.9QUASI(C) 0 -.007590 +1414.00 158.3QUASI(C) 0 -.007590 +1415.00 159.6QUASI(C) 0 -.007590 +1416.00 160.9QUASI(C) 0 -.007590 +1417.00 162.3QUASI(C) 0 -.007590 +1418.00 163.6QUASI(C) 0 -.007590 +1419.00 165.1QUASI(C) 0 -.007590 +1420.00 182.9QUASI(C) 0 -.007590 +1421.00 184.4QUASI(C) 0 -.007590 +1422.00 185.9QUASI(C) 0 -.007590 +1423.00 187.5QUASI(C) 0 -.007590 +1424.00 189.1QUASI(C) 0 -.007590 +1425.00 190.6QUASI(C) 0 -.007590 +1426.00 192.4QUASI(C) 0 -.007590 +1427.00 194.0QUASI(C) 0 -.007590 +1428.00 195.6QUASI(C) 0 -.007590 +1429.00 197.3QUASI(C) 0 -.007590 +1430.00 202.4QUASI(C) 0 -.007590 +1431.00 204.0QUASI(C) 0 -.007590 +1432.00 205.5QUASI(C) 0 -.007590 +1433.00 207.4QUASI(C) 0 -.007590 +1434.00 209.2QUASI(C) 0 -.007590 +1435.00 210.8QUASI(C) 0 -.007590 +1436.00 212.7QUASI(C) 0 -.007590 +1437.00 214.5QUASI(C) 0 -.007590 +1438.00 216.3QUASI(C) 0 -.007590 +1439.00 218.1QUASI(C) 0 -.007590 +1440.00 202.2QUASI(C) 0 -.007590 +1441.00 203.9QUASI(C) 0 -.007590 +1442.00 205.6QUASI(C) 0 -.007590 +1443.00 207.3QUASI(C) 0 -.007590 +1444.00 209.1QUASI(C) 0 -.007590 +1445.00 211.0QUASI(C) 0 -.007590 +1446.00 212.7QUASI(C) 0 -.007590 +1447.00 214.5QUASI(C) 0 -.007590 +1448.00 216.3QUASI(C) 0 -.007590 +1449.00 218.1QUASI(C) 0 -.007590 +1450.00 221.5QUASI(C) 0 -.007590 +1451.00 223.3QUASI(C) 0 -.007590 +1452.00 225.2QUASI(C) 0 -.007590 +1453.00 227.1QUASI(C) 0 -.007590 +1454.00 229.0QUASI(C) 0 -.007590 +1455.00 230.9QUASI(C) 0 -.007590 +1456.00 232.9QUASI(C) 0 -.007590 +1457.00 234.9QUASI(C) 0 -.007590 +1458.00 236.9QUASI(C) 0 -.007590 +1459.00 238.9QUASI(C) 0 -.007590 +1460.00 288.8QUASI(C) 0 -.007590 +1461.00 291.3QUASI(C) 0 -.007590 +1462.00 293.8QUASI(C) 0 -.007590 +1463.00 296.3QUASI(C) 0 -.007590 +1464.00 298.8QUASI(C) 0 -.007590 +1465.00 301.3QUASI(C) 0 -.007590 +1466.00 303.8QUASI(C) 0 -.007590 +1467.00 306.4QUASI(C) 0 -.007590 +1468.00 309.1QUASI(C) 0 -.007590 +1469.00 311.7QUASI(C) 0 -.007590 +1470.00 320.5QUASI(C) 0 -.007590 +1471.00 323.5QUASI(C) 0 -.007590 +1472.00 326.2QUASI(C) 0 -.007590 +1472.99 493.5 S I 1 .500000 +1473.00 329.0QUASI(C) 0 -.007590 +1474.00 331.7QUASI(C) 0 -.007590 +1475.00 334.5QUASI(C) 0 -.007590 +1476.00 337.2QUASI(C) 0 -.007590 +1477.00 340.0QUASI(C) 0 -.007590 +1478.00 342.9QUASI(C) 0 -.007590 +1479.00 345.7QUASI(C) 0 -.007590 +1480.00 356.2QUASI(C) 0 -.007590 +1481.00 359.1QUASI(C) 0 -.007590 +1482.00 362.0QUASI(C) 0 -.007590 +1483.00 365.2QUASI(C) 0 -.007590 +1484.00 368.3QUASI(C) 0 -.007590 +1485.00 371.4QUASI(C) 0 -.007590 +1486.00 374.6QUASI(C) 0 -.007590 +1487.00 377.6QUASI(C) 0 -.007590 +1488.00 380.9QUASI(C) 0 -.007590 +1489.00 384.1QUASI(C) 0 -.007590 +1490.00 327.0QUASI(C) 0 -.007590 +1491.00 329.9QUASI(C) 0 -.007590 +1492.00 332.7QUASI(C) 0 -.007590 +1493.00 335.4QUASI(C) 0 -.007590 +1494.00 338.3QUASI(C) 0 -.007590 +1495.00 341.2QUASI(C) 0 -.007590 +1496.00 344.0QUASI(C) 0 -.007590 +1497.00 347.0QUASI(C) 0 -.007590 +1498.00 349.9QUASI(C) 0 -.007590 +1499.00 353.0QUASI(C) 0 -.007590 +1500.00 375.2QUASI(C) 0 -.007590 +1501.00 378.5QUASI(C) 0 -.007590 +1502.00 381.8QUASI(C) 0 -.007590 +1503.00 384.9QUASI(C) 0 -.007590 +1504.00 388.2QUASI(C) 0 -.007590 +1505.00 391.6QUASI(C) 0 -.007590 +1506.00 394.9QUASI(C) 0 -.007590 +1507.00 398.2QUASI(C) 0 -.007590 +1508.00 401.5QUASI(C) 0 -.007590 +1509.00 405.0QUASI(C) 0 -.007590 +1510.00 433.0QUASI(C) 0 -.007590 +1511.00 436.6QUASI(C) 0 -.007590 +1512.00 440.3QUASI(C) 0 -.007590 +1513.00 444.1QUASI(C) 0 -.007590 +1514.00 447.8QUASI(C) 0 -.007590 +1515.00 451.5QUASI(C) 0 -.007590 +1516.00 455.4QUASI(C) 0 -.007590 +1517.00 459.1QUASI(C) 0 -.007590 +1518.00 463.0QUASI(C) 0 -.007590 +1519.00 467.0QUASI(C) 0 -.007590 +1520.00 447.7QUASI(C) 0 -.007590 +1521.00 451.9QUASI(C) 0 -.007590 +1522.00 456.2QUASI(C) 0 -.007590 +1523.00 460.3QUASI(C) 0 -.007590 +1524.00 464.6QUASI(C) 0 -.007590 +1525.00 468.8QUASI(C) 0 -.007590 +1526.00 473.2QUASI(C) 0 -.007590 +1526.71 871.5SI II 1 .500000 +1527.00 477.5QUASI(C) 0 -.007590 +1528.00 482.0QUASI(C) 0 -.007590 +1529.00 486.3QUASI(C) 0 -.007590 +1530.00 502.1QUASI(C) 0 -.007590 +1531.00 506.8QUASI(C) 0 -.007590 +1532.00 511.3QUASI(C) 0 -.007590 +1533.00 515.9QUASI(C) 0 -.007590 +1533.43 703.5SI II 1 .500000 +1534.00 520.7QUASI(C) 0 -.007590 +1535.00 525.4QUASI(C) 0 -.007590 +1536.00 530.0QUASI(C) 0 -.007590 +1537.00 534.8QUASI(C) 0 -.007590 +1538.00 539.7QUASI(C) 0 -.007590 +1539.00 544.4QUASI(C) 0 -.007590 +1540.00 550.9QUASI(C) 0 -.007590 +1541.00 555.8QUASI(C) 0 -.007590 +1542.00 560.5QUASI(C) 0 -.007590 +1543.00 565.5QUASI(C) 0 -.007590 +1544.00 570.3QUASI(C) 0 -.007590 +1545.00 575.3QUASI(C) 0 -.007590 +1546.00 580.3QUASI(C) 0 -.007590 +1547.00 585.4QUASI(C) 0 -.007590 +1548.00 590.5QUASI(C) 0 -.007590 +1548.20 4241.3 C IV 1 .700000 +1549.00 595.7QUASI(C) 0 -.007590 +1550.00 611.4QUASI(C) 0 -.007590 +1550.77 2193.8 C IV 1 .700000 +1551.00 617.0QUASI(C) 0 -.007590 +1552.00 622.3QUASI(C) 0 -.007590 +1553.00 627.7QUASI(C) 0 -.007590 +1554.00 633.5QUASI(C) 0 -.007590 +1555.00 638.8QUASI(C) 0 -.007590 +1556.00 644.5QUASI(C) 0 -.007590 +1557.00 650.3QUASI(C) 0 -.007590 +1558.00 655.9QUASI(C) 0 -.007590 +1559.00 661.7QUASI(C) 0 -.007590 +1559.08 526.7FE II 1 .500000 +1560.00 720.4QUASI(C) 0 -.007590 +1561.00 725.8QUASI(C) 0 -.007590 +1561.00 1099.7 C I G 1 .600000 +1562.00 731.0QUASI(C) 0 -.007590 +1563.00 736.4QUASI(C) 0 -.007590 +1563.79 526.7FE II 1 .500000 +1564.00 741.7QUASI(C) 0 -.007590 +1565.00 747.2QUASI(C) 0 -.007590 +1566.00 752.6QUASI(C) 0 -.007590 +1567.00 758.2QUASI(C) 0 -.007590 +1568.00 763.8QUASI(C) 0 -.007590 +1569.00 769.5QUASI(C) 0 -.007590 +1570.00 714.7QUASI(C) 0 -.007590 +1570.24 311.7FE II 1 .500000 +1571.00 720.5QUASI(C) 0 -.007590 +1572.00 726.4QUASI(C) 0 -.007590 +1573.00 732.2QUASI(C) 0 -.007590 +1574.00 738.0QUASI(C) 0 -.007590 +1575.00 743.9QUASI(C) 0 -.007590 +1576.00 749.8QUASI(C) 0 -.007590 +1577.00 756.0QUASI(C) 0 -.007590 +1578.00 761.9QUASI(C) 0 -.007590 +1579.00 768.0QUASI(C) 0 -.007590 +1580.00 684.9QUASI(C) 0 -.007590 +1581.00 690.6QUASI(C) 0 -.007590 +1582.00 696.0QUASI(C) 0 -.007590 +1583.00 701.5QUASI(C) 0 -.007590 +1584.00 707.1QUASI(C) 0 -.007590 +1585.00 712.6QUASI(C) 0 -.007590 +1586.00 718.5QUASI(C) 0 -.007590 +1587.00 724.1QUASI(C) 0 -.007590 +1588.00 729.9QUASI(C) 0 -.007590 +1589.00 735.6QUASI(C) 0 -.007590 +1590.00 679.1QUASI(C) 0 -.007590 +1591.00 685.0QUASI(C) 0 -.007590 +1592.00 690.9QUASI(C) 0 -.007590 +1593.00 696.7QUASI(C) 0 -.007590 +1594.00 702.7QUASI(C) 0 -.007590 +1594.57 177.5UNSPEC'D 1 1.000000 +1595.00 708.5QUASI(C) 0 -.007590 +1596.00 714.5QUASI(C) 0 -.007590 +1597.00 720.5QUASI(C) 0 -.007590 +1598.00 726.7QUASI(C) 0 -.007590 +1599.00 732.8QUASI(C) 0 -.007590 +1600.00 762.0QUASI(C) 0 -.007590 +1601.00 768.1QUASI(C) 0 -.007590 +1602.00 774.4QUASI(C) 0 -.007590 +1603.00 780.6QUASI(C) 0 -.007590 +1604.00 786.8QUASI(C) 0 -.007590 +1605.00 793.1QUASI(C) 0 -.007590 +1606.00 799.6QUASI(C) 0 -.007590 +1607.00 805.9QUASI(C) 0 -.007590 +1608.00 812.5QUASI(C) 0 -.007590 +1609.00 819.0QUASI(C) 0 -.007590 +1610.00 905.9QUASI(C) 0 -.007590 +1611.00 913.3QUASI(C) 0 -.007590 +1612.00 920.7QUASI(C) 0 -.007590 +1613.00 928.2QUASI(C) 0 -.007590 +1614.00 935.8QUASI(C) 0 -.007590 +1615.00 943.4QUASI(C) 0 -.007590 +1616.00 951.0QUASI(C) 0 -.007590 +1617.00 958.9QUASI(C) 0 -.007590 +1618.00 966.8QUASI(C) 0 -.007590 +1619.00 974.6QUASI(C) 0 -.007590 +1620.00 1035.0QUASI(C) 0 -.007590 +1621.00 1051.1QUASI(C) 0 -.007590 +1622.00 1067.4QUASI(C) 0 -.007590 +1623.00 1083.9QUASI(C) 0 -.007590 +1624.00 1100.5QUASI(C) 0 -.007590 +1625.00 1117.5QUASI(C) 0 -.007590 +1626.00 1134.7QUASI(C) 0 -.007590 +1627.00 1152.4QUASI(C) 0 -.007590 +1628.00 1170.1QUASI(C) 0 -.007590 +1629.00 1188.3QUASI(C) 0 -.007590 +1630.00 1120.2QUASI(C) 0 -.007590 +1631.00 1137.4QUASI(C) 0 -.007590 +1632.00 1154.7QUASI(C) 0 -.007590 +1633.00 1172.1QUASI(C) 0 -.007590 +1634.00 1189.8QUASI(C) 0 -.007590 +1635.00 1207.8QUASI(C) 0 -.007590 +1636.00 1226.1QUASI(C) 0 -.007590 +1637.00 1244.6QUASI(C) 0 -.007590 +1638.00 1263.5QUASI(C) 0 -.007590 +1639.00 1282.8QUASI(C) 0 -.007590 +1640.00 1235.7QUASI(C) 0 -.007590 +1640.27 1612.5FE II B 1 .500000 +1640.38 587.5UNSPEC'D 1 1.000000 +1641.00 1256.6QUASI(C) 0 -.007590 +1642.00 1277.5QUASI(C) 0 -.007590 +1643.00 1298.7QUASI(C) 0 -.007590 +1644.00 1320.1QUASI(C) 0 -.007590 +1645.00 1342.1QUASI(C) 0 -.007590 +1646.00 1364.4QUASI(C) 0 -.007590 +1647.00 1386.9QUASI(C) 0 -.007590 +1648.00 1409.8QUASI(C) 0 -.007590 +1649.00 1433.3QUASI(C) 0 -.007590 +1650.00 1968.6QUASI(C) 0 -.007590 +1651.00 1996.2QUASI(C) 0 -.007590 +1652.00 2023.5QUASI(C) 0 -.007590 +1653.00 2051.3QUASI(C) 0 -.007590 +1654.00 2079.7QUASI(C) 0 -.007590 +1655.00 2108.3QUASI(C) 0 -.007590 +1656.00 2137.7QUASI(C) 0 -.007590 +1656.27 1857.1 C I G 1 .600000 +1657.00 2167.3QUASI(C)G 0 -.007590 +1657.38 2230.6 C I G 1 .600000 +1658.00 2197.5QUASI(C) 0 -.007590 +1659.00 2329.0QUASI(C) 0 -.007590 +1660.00 1553.4QUASI(C) 0 -.007590 +1661.00 1755.1QUASI(C) 0 -.007590 +1662.00 1783.2QUASI(C) 0 -.007590 +1663.00 1811.9QUASI(C) 0 -.007590 +1664.00 1840.8QUASI(C) 0 -.007590 +1665.00 1870.2QUASI(C) 0 -.007590 +1666.00 1900.2QUASI(C) 0 -.007590 +1667.00 1930.6QUASI(C) 0 -.007590 +1668.00 1961.6QUASI(C) 0 -.007590 +1669.00 1993.0QUASI(C) 0 -.007590 +1670.00 1850.7QUASI(C) 0 -.007590 +1670.79 2945.5FE II B 1 .500000 +1671.00 1881.9QUASI(C) 0 -.007590 +1672.00 1913.3QUASI(C) 0 -.007590 +1673.00 1945.2QUASI(C) 0 -.007590 +1674.00 1977.6QUASI(C) 0 -.007590 +1675.00 2010.4QUASI(C) 0 -.007590 +1676.00 2043.9QUASI(C) 0 -.007590 +1676.85 322.5FE II 1 .500000 +1677.00 2077.8QUASI(C) 0 -.007590 +1678.00 2112.4QUASI(C) 0 -.007590 +1679.00 2147.3QUASI(C) 0 -.007590 +1680.00 2514.9QUASI(C) 0 -.007590 +1681.00 2554.7QUASI(C) 0 -.007590 +1682.00 2594.4QUASI(C) 0 -.007590 +1683.00 2634.9QUASI(C) 0 -.007590 +1684.00 2675.8QUASI(C) 0 -.007590 +1685.00 2717.4QUASI(C) 0 -.007590 +1686.00 2760.0QUASI(C) 0 -.007590 +1687.00 2803.1QUASI(C) 0 -.007590 +1688.00 2846.8QUASI(C) 0 -.007590 +1689.00 2891.3QUASI(C) 0 -.007590 +1690.00 3459.9QUASI(C) 0 -.007590 +1691.00 3512.1QUASI(C) 0 -.007590 +1692.00 3564.3QUASI(C) 0 -.007590 +1693.00 3617.2QUASI(C) 0 -.007590 +1694.00 3671.0QUASI(C) 0 -.007590 +1695.00 3725.6QUASI(C) 0 -.007590 +1696.00 3781.0QUASI(C) 0 -.007590 +1697.00 3837.5QUASI(C) 0 -.007590 +1698.00 3894.8QUASI(C) 0 -.007590 +1699.00 3953.1QUASI(C) 0 -.007590 +1700.00 4005.4QUASI(C) 0 -.007590 +1701.00 4069.1QUASI(C) 0 -.007590 +1702.00 4132.8QUASI(C) 0 -.007590 +1703.00 4197.3QUASI(C) 0 -.007590 +1704.00 4263.1QUASI(C) 0 -.007590 +1705.00 4329.7QUASI(C) 0 -.007590 +1706.00 4397.6QUASI(C) 0 -.007590 +1707.00 4466.5QUASI(C) 0 -.007590 +1708.00 4536.6QUASI(C) 0 -.007590 +1709.00 4607.7QUASI(C) 0 -.007590 +1710.00 3920.0QUASI(C) 0 -.007590 +1711.00 3985.7QUASI(C) 0 -.007590 +1712.00 4051.3QUASI(C) 0 -.007590 +1713.00 4118.1QUASI(C) 0 -.007590 +1713.01 1870.5FE II 1 .500000 +1714.00 4186.0QUASI(C) 0 -.007590 +1715.00 4254.8QUASI(C) 0 -.007590 +1716.00 4324.8QUASI(C) 0 -.007590 +1717.00 4396.0QUASI(C) 0 -.007590 +1718.00 4468.3QUASI(C) 0 -.007590 +1719.00 4541.8QUASI(C) 0 -.007590 +1720.00 4440.4QUASI(C) 0 -.007590 +1721.00 4475.5QUASI(C) 0 -.007590 +1722.00 4509.8QUASI(C) 0 -.007590 +1723.00 4544.5QUASI(C) 0 -.007590 +1724.00 4579.4QUASI(C) 0 -.007590 +1725.00 4614.4QUASI(C) 0 -.007590 +1726.00 4649.9QUASI(C) 0 -.007590 +1727.00 4685.7QUASI(C) 0 -.007590 +1728.00 4721.7QUASI(C) 0 -.007590 +1729.00 4758.1QUASI(C) 0 -.007590 +1730.00 4052.4QUASI(C) 0 -.007590 +1731.00 4084.8QUASI(C) 0 -.007590 +1732.00 4116.8QUASI(C) 0 -.007590 +1733.00 4148.9QUASI(C) 0 -.007590 +1734.00 4181.5QUASI(C) 0 -.007590 +1735.00 4214.3QUASI(C) 0 -.007590 +1736.00 4247.3QUASI(C) 0 -.007590 +1737.00 4280.6QUASI(C) 0 -.007590 +1738.00 4314.1QUASI(C) 0 -.007590 +1739.00 4347.9QUASI(C) 0 -.007590 +1740.00 4823.2QUASI(C) 0 -.007590 +1741.00 4866.0QUASI(C) 0 -.007590 +1742.00 4904.1QUASI(C) 0 -.007590 +1743.00 4942.6QUASI(C) 0 -.007590 +1744.00 4981.2QUASI(C) 0 -.007590 +1745.00 5020.2QUASI(C) 0 -.007590 +1746.00 5059.6QUASI(C) 0 -.007590 +1747.00 5099.2QUASI(C) 0 -.007590 +1748.00 5139.2QUASI(C) 0 -.007590 +1749.00 5179.4QUASI(C) 0 -.007590 +1750.00 5500.4QUASI(C) 0 -.007590 +1751.00 5543.9QUASI(C) 0 -.007590 +1752.00 5587.4QUASI(C) 0 -.007590 +1753.00 5631.1QUASI(C) 0 -.007590 +1754.00 5675.2QUASI(C) 0 -.007590 +1755.00 5719.6QUASI(C) 0 -.007590 +1756.00 5764.5QUASI(C) 0 -.007590 +1757.00 5809.7QUASI(C) 0 -.007590 +1758.00 5855.2QUASI(C) 0 -.007590 +1759.00 5901.1QUASI(C) 0 -.007590 +1760.00 5981.2QUASI(C) 0 -.007590 +1761.00 6028.5QUASI(C) 0 -.007590 +1762.00 6075.9QUASI(C) 0 -.007590 +1763.00 6123.5QUASI(C) 0 -.007590 +1764.00 6171.5QUASI(C) 0 -.007590 +1765.00 6219.7QUASI(C) 0 -.007590 +1766.00 6268.5QUASI(C) 0 -.007590 +1767.00 6317.6QUASI(C) 0 -.007590 +1768.00 6367.1QUASI(C) 0 -.007590 +1769.00 6417.1QUASI(C) 0 -.007590 +1770.00 7143.8QUASI(C) 0 -.007590 +1771.00 7200.5QUASI(C) 0 -.007590 +1772.00 7256.9QUASI(C) 0 -.007590 +1773.00 7313.8QUASI(C) 0 -.007590 +1774.00 7371.1QUASI(C) 0 -.007590 +1775.00 7428.9QUASI(C) 0 -.007590 +1776.00 7487.0QUASI(C) 0 -.007590 +1777.00 7545.7QUASI(C) 0 -.007590 +1778.00 7604.9QUASI(C) 0 -.007590 +1779.00 7664.3QUASI(C) 0 -.007590 +1780.00 7817.3QUASI(C) 0 -.007590 +1781.00 7879.1QUASI(C) 0 -.007590 +1782.00 7940.8QUASI(C) 0 -.007590 +1783.00 8003.1QUASI(C) 0 -.007590 +1784.00 8065.7QUASI(C) 0 -.007590 +1785.00 8129.0QUASI(C) 0 -.007590 +1786.00 8192.6QUASI(C) 0 -.007590 +1787.00 8256.8QUASI(C) 0 -.007590 +1788.00 8321.5QUASI(C) 0 -.007590 +1789.00 8386.7QUASI(C) 0 -.007590 +1790.00 8007.6QUASI(C) 0 -.007590 +1791.00 8070.8QUASI(C) 0 -.007590 +1792.00 8133.9QUASI(C) 0 -.007590 +1793.00 8197.7QUASI(C) 0 -.007590 +1794.00 8261.9QUASI(C) 0 -.007590 +1795.00 8326.7QUASI(C) 0 -.007590 +1796.00 8391.9QUASI(C) 0 -.007590 +1797.00 8457.6QUASI(C) 0 -.007590 +1798.00 8523.9QUASI(C) 0 -.007590 +1799.00 8590.6QUASI(C) 0 -.007590 +1800.00 9060.2QUASI(C) 0 -.007590 +1801.00 9130.3QUASI(C) 0 -.007590 +1802.00 9200.3QUASI(C) 0 -.007590 +1803.00 9271.1QUASI(C) 0 -.007590 +1804.00 9342.2QUASI(C) 0 -.007590 +1805.00 9414.0QUASI(C) 0 -.007590 +1806.00 9486.4QUASI(C) 0 -.007590 +1807.00 9559.3QUASI(C) 0 -.007590 +1808.00 9632.7QUASI(C) 0 -.007590 +1808.01 9660.0SI II 1 .500000 +1809.00 9706.8QUASI(C) 0 -.007590 +1810.00 10271.0QUASI(C) 0 -.007590 +1811.00 10349.7QUASI(C) 0 -.007590 +1812.00 10428.5QUASI(C) 0 -.007590 +1813.00 10507.8QUASI(C) 0 -.007590 +1814.00 10587.5QUASI(C) 0 -.007590 +1815.00 10668.1QUASI(C) 0 -.007590 +1816.00 10749.2QUASI(C) 0 -.007590 +1816.93 14910.0SI II 1 .500000 +1817.00 10831.0QUASI(C) 0 -.007590 +1817.45 5775.0SI II 1 .500000 +1818.00 10913.4QUASI(C) 0 -.007590 +1819.00 10996.5QUASI(C) 0 -.007590 +1820.00 12742.0QUASI(C) 0 -.007590 +1821.00 12842.6QUASI(C) 0 -.007590 +1822.00 12943.2QUASI(C) 0 -.007590 +1823.00 13044.6QUASI(C) 0 -.007590 +1824.00 13146.9QUASI(C) 0 -.007590 +1825.00 13249.8QUASI(C) 0 -.007590 +1826.00 13353.6QUASI(C) 0 -.007590 +1827.00 13458.4QUASI(C) 0 -.007590 +1828.00 13563.7QUASI(C) 0 -.007590 +1829.00 13670.1QUASI(C) 0 -.007590 +1830.00 12735.4QUASI(C) 0 -.007590 +1831.00 12837.2QUASI(C) 0 -.007590 +1832.00 12937.8QUASI(C) 0 -.007590 +1833.00 13039.3QUASI(C) 0 -.007590 +1834.00 13141.3QUASI(C) 0 -.007590 +1835.00 13244.3QUASI(C) 0 -.007590 +1836.00 13348.0QUASI(C) 0 -.007590 +1837.00 13452.7QUASI(C) 0 -.007590 +1838.00 13558.1QUASI(C) 0 -.007590 +1839.00 13664.3QUASI(C) 0 -.007590 +1840.00 10709.2QUASI(C) 0 -.007590 +1841.00 10793.8QUASI(C) 0 -.007590 +1842.00 10878.3QUASI(C) 0 -.007590 +1843.00 10963.5QUASI(C) 0 -.007590 +1844.00 11049.4QUASI(C) 0 -.007590 +1845.00 11136.0QUASI(C) 0 -.007590 +1846.00 11223.2QUASI(C) 0 -.007590 +1847.00 11311.1QUASI(C) 0 -.007590 +1848.00 11399.8QUASI(C) 0 -.007590 +1849.00 11489.1QUASI(C) 0 -.007590 +1850.00 11298.3QUASI(C) 0 -.007590 +1851.00 11387.6QUASI(C) 0 -.007590 +1852.00 11476.8QUASI(C) 0 -.007590 +1853.00 11566.8QUASI(C) 0 -.007590 +1854.00 11657.5QUASI(C) 0 -.007590 +1855.00 11748.6QUASI(C) 0 -.007590 +1856.00 11840.7QUASI(C) 0 -.007590 +1857.00 11933.6QUASI(C) 0 -.007590 +1858.00 12027.0QUASI(C) 0 -.007590 +1859.00 12121.2QUASI(C) 0 -.007590 +1860.00 13611.6QUASI(C) 0 -.007590 +1861.00 13719.1QUASI(C) 0 -.007590 +1862.00 13826.6QUASI(C) 0 -.007590 +1863.00 13935.0QUASI(C) 0 -.007590 +1864.00 14044.1QUASI(C) 0 -.007590 +1865.00 14154.1QUASI(C) 0 -.007590 +1866.00 14265.1QUASI(C) 0 -.007590 +1867.00 14376.8QUASI(C) 0 -.007590 +1868.00 14489.5QUASI(C) 0 -.007590 +1869.00 14602.9QUASI(C) 0 -.007590 +1870.00 14964.1QUASI(C) 0 -.007590 +1871.00 15082.3QUASI(C) 0 -.007590 +1872.00 15200.5QUASI(C) 0 -.007590 +1873.00 15319.5QUASI(C) 0 -.007590 +1874.00 15439.6QUASI(C) 0 -.007590 +1875.00 15560.5QUASI(C) 0 -.007590 +1876.00 15682.4QUASI(C) 0 -.007590 +1877.00 15805.3QUASI(C) 0 -.007590 +1878.00 15929.1QUASI(C) 0 -.007590 +1879.00 16053.9QUASI(C) 0 -.007590 +1880.00 16601.1QUASI(C) 0 -.007590 +1881.00 16732.2QUASI(C) 0 -.007590 +1882.00 16863.2QUASI(C) 0 -.007590 +1883.00 16995.3QUASI(C) 0 -.007590 +1884.00 17128.4QUASI(C) 0 -.007590 +1885.00 17262.6QUASI(C) 0 -.007590 +1886.00 17397.9QUASI(C) 0 -.007590 +1887.00 17534.2QUASI(C) 0 -.007590 +1888.00 17671.6QUASI(C) 0 -.007590 +1889.00 17810.1QUASI(C) 0 -.007590 +1890.00 18531.8QUASI(C) 0 -.007590 +1891.00 18678.8QUASI(C) 0 -.007590 +1892.00 18825.2QUASI(C) 0 -.007590 +1893.00 18972.7QUASI(C) 0 -.007590 +1894.00 19121.4QUASI(C) 0 -.007590 +1895.00 19271.1QUASI(C) 0 -.007590 +1896.00 19422.1QUASI(C) 0 -.007590 +1897.00 19574.3QUASI(C) 0 -.007590 +1898.00 19727.6QUASI(C) 0 -.007590 +1899.00 19882.2QUASI(C) 0 -.007590 +1900.00 18291.8QUASI(C) 0 -.007590 +1901.00 18273.4QUASI(C) 0 -.007590 +1902.00 18416.6QUASI(C) 0 -.007590 +1903.00 18560.9QUASI(C) 0 -.007590 +1904.00 18706.3QUASI(C) 0 -.007590 +1905.00 18852.9QUASI(C) 0 -.007590 +1906.00 19000.6QUASI(C) 0 -.007590 +1907.00 19149.3QUASI(C) 0 -.007590 +1908.00 19299.5QUASI(C) 0 -.007590 +1909.00 19450.6QUASI(C) 0 -.007590 +1910.00 21963.1QUASI(C) 0 -.007590 +1911.00 21743.4QUASI(C) 0 -.007590 +1912.00 21913.7QUASI(C) 0 -.007590 +1913.00 22085.4QUASI(C) 0 -.007590 +1914.00 22258.5QUASI(C) 0 -.007590 +1915.00 22432.9QUASI(C) 0 -.007590 +1916.00 22608.5QUASI(C) 0 -.007590 +1917.00 22785.7QUASI(C) 0 -.007590 +1918.00 22964.2QUASI(C) 0 -.007590 +1919.00 23144.1QUASI(C) 0 -.007590 +1920.00 19005.2QUASI(C) 0 -.007590 +1921.00 20016.8QUASI(C) 0 -.007590 +1922.00 20173.7QUASI(C) 0 -.007590 +1923.00 20331.6QUASI(C) 0 -.007590 +1924.00 20491.1QUASI(C) 0 -.007590 +1925.00 20651.5QUASI(C) 0 -.007590 +1926.00 20813.4QUASI(C) 0 -.007590 +1927.00 20976.3QUASI(C) 0 -.007590 +1928.00 21140.7QUASI(C) 0 -.007590 +1929.00 21306.4QUASI(C) 0 -.007590 +1930.00 26973.5QUASI(C) 0 -.007590 +1931.00 19919.9QUASI(C) 0 -.007590 +1932.00 20076.0QUASI(C) 0 -.007590 +1933.00 20233.3QUASI(C) 0 -.007590 +1934.00 20391.9QUASI(C) 0 -.007590 +1935.00 20551.6QUASI(C) 0 -.007590 +1936.00 20712.7QUASI(C) 0 -.007590 +1937.00 20874.9QUASI(C) 0 -.007590 +1938.00 21038.4QUASI(C) 0 -.007590 +1939.00 21203.2QUASI(C) 0 -.007590 +1940.00 21284.9QUASI(C) 0 -.007590 +1941.00 25236.9QUASI(C) 0 -.007590 +1942.00 25434.7QUASI(C) 0 -.007590 +1943.00 25633.9QUASI(C) 0 -.007590 +1944.00 25834.8QUASI(C) 0 -.007590 +1945.00 26037.2QUASI(C) 0 -.007590 +1946.00 26241.2QUASI(C) 0 -.007590 +1947.00 26446.8QUASI(C) 0 -.007590 +1948.00 26654.0QUASI(C) 0 -.007590 +1949.00 26862.8QUASI(C) 0 -.007590 +1950.00 27073.2QUASI(C) 0 -.007590 +1951.00 27285.3QUASI(C) 0 -.007590 +1952.00 27499.1QUASI(C) 0 -.007590 +1953.00 27714.5QUASI(C) 0 -.007590 +1954.00 27931.7QUASI(C) 0 -.007590 +1955.00 28150.5QUASI(C) 0 -.007590 +1956.00 28371.1QUASI(C) 0 -.007590 +1957.00 28593.3QUASI(C) 0 -.007590 +1958.00 28817.4QUASI(C) 0 -.007590 +1959.00 29043.1QUASI(C) 0 -.007590 +1960.00 29270.7QUASI(C) 0 -.007590 +1961.00 29500.0QUASI(C) 0 -.007590 +1962.00 29731.1QUASI(C) 0 -.007590 +1963.00 29964.0QUASI(C) 0 -.007590 +1964.00 30198.8QUASI(C) 0 -.007590 +1965.00 30435.4QUASI(C) 0 -.007590 +1966.00 30673.8QUASI(C) 0 -.007590 +1967.00 30914.2QUASI(C) 0 -.007590 +1968.00 31156.4QUASI(C) 0 -.007590 +1969.00 31400.5QUASI(C) 0 -.007590 +1970.00 31646.5QUASI(C) 0 -.007590 +1971.00 31894.4QUASI(C) 0 -.007590 +1972.00 32144.3QUASI(C) 0 -.007590 +1973.00 32396.1QUASI(C) 0 -.007590 +1974.00 32649.9QUASI(C) 0 -.007590 +1975.00 32905.7QUASI(C) 0 -.007590 +1976.00 33163.5QUASI(C) 0 -.007590 +1977.00 33423.4QUASI(C) 0 -.007590 +1978.00 33685.2QUASI(C) 0 -.007590 +1979.00 33949.2QUASI(C) 0 -.007590 +1980.00 34215.1QUASI(C) 0 -.007590 +1981.00 34483.2QUASI(C) 0 -.007590 +1982.00 34753.3QUASI(C) 0 -.007590 +1983.00 35025.5QUASI(C) 0 -.007590 +1984.00 35300.0QUASI(C) 0 -.007590 +1985.00 35576.5QUASI(C) 0 -.007590 +1986.00 35855.2QUASI(C) 0 -.007590 +1987.00 36136.2QUASI(C) 0 -.007590 +1988.00 36419.3QUASI(C) 0 -.007590 +1989.00 36704.6QUASI(C) 0 -.007590 +1990.00 36992.2QUASI(C) 0 -.007590 +1991.00 37282.0QUASI(C) 0 -.007590 +1992.00 37574.1QUASI(C) 0 -.007590 +1993.00 37868.5QUASI(C) 0 -.007590 +1994.00 38165.1QUASI(C) 0 -.007590 +1995.00 38464.1QUASI(C) 0 -.007590 +1996.00 38765.5QUASI(C) 0 -.007590 +1997.00 39069.2QUASI(C) 0 -.007590 +1998.00 39375.3QUASI(C) 0 -.007590 +1999.00 39683.8QUASI(C) 0 -.007590 +2000.00 39994.7QUASI(C) 0 -.007590 + .00 .0 +79135 + THE PRESENT DATA OF 'F76REF.EUVS' REFER TO JULY 1976 RESULTS +OF 24 EXPERIMENT TURNONS FOR DAYS OF RZ=0 AND F10=69-70. + 'F76REF' IS STRUCTURED IN THE SAME MANNER AS 'F74113', BUT IT +INCLUDES 2 ADDITIONAL COLUMNS, 'K' AND 'C' WHICH ALLOW A PRELIMINARY +CONVERSION OF THE ENTIRE SPECTRUM TO ANY DATE OF CYCLE 21 SIMPLY +IN RESPONSE TO A DATE-APPROPRIATE SET OF THREE RATIO PARAMETERS, +R0, R1, AND R2, FOR THE THREE "VARIABILTY CLASSES" (K = 0,1,2) +USING THE RELATION + F = FREF + FREF*(R - 1.)*C +WHERE BOTH K AND C ARE LISTED FOR EACH WAVELENGTH IN F76REF +THE FORMAT OF WHICH NOW IS (2F8,2A4,A1,I2,F10.6). +THE H LY-CONTINUUM AND THE QUASI-CONTINUUM AT THE LONGER WAVELEMGTHS +SHOW NEGATIVE VALUES FOR C WHICH ARE USED FOR AN EMPIRICAL ADJUSTMENT +OF THE LOG-SLOPE OF THESE CONTINUA(IN A MANNER NOT DETAILED HERE); +IF THE LATTER FEATURE IS NOT USED, REPLACE THE TWO NEGATIVE C-VALUES +BY C = 1. + THE AFOREMENTIONED USE OF F76REF WILL EVENTUALLY GREATLY SIMPLIFY +SYSTEMATIC INSERTION OF DETAILED EUV FLUX SPECTRA IN ALL SORTS OF +AERONOMICAL APPLICATIONS, I HOPE. HOWEVER THE FINAL VERSION OF THIS +SCHEME WILL BE READY FOR RELEASE ONLY AFTER A GREAT DEAL OF FURTHER +WORK ON MY PART. BUT FEEL FREE TO EXPERIMENT WITH IT, IF YOU WISH, +AS LONG AS YOU ARE AWARE OF ITS EXPLORATORY NATURE. + PLEASE CALL ME(617-861-4281,283, OR 481) OR SEND MSG IN +EUVS.EXPMSG IF YOU WISH MORE INFORMATION, OR IF YOU WANT PRELIMINARY +VALUES OF R0,R1,R2(SEE ABOVE) FOR ANY SPECIFIC DATE(CYCLE 21 ONLY) +FOR WHICH YOU WISH TO DO ANY DETAILED AERONOMICAL CALCULATIONS OR +CORRELATION WITH OTHER AE OBSERVATIONS. + 10 MAY 1979 H.E.H. +08-28-79 ERR-CORRECTED LINE 480 \ No newline at end of file diff --git a/EUV/ae-euv/r74113.dat b/EUV/ae-euv/r74113.dat new file mode 100755 index 0000000..d0bd0a2 --- /dev/null +++ b/EUV/ae-euv/r74113.dat @@ -0,0 +1,1966 @@ +This file lists the wavelength (W) in Angstroem and photon flux (F) +in 1E10 m-2 s-1, followed by the line/range identification for the +specific wavelength group. -------------------- 12/15/94/dkb + + W F + 14.25 .1FE XVIII + 14.40 .1FE XVIII + 15.01 .3FE XVII + 15.26 .3FE XVII + 16.01 .2 O VIII + 16.77 .4FE XVII + 17.05 .4FE XVII + 17.11 .8FE XVI + 18.62 .2 O VII + 18.97 1.6 O VIII + 21.60 .9 O VII + 21.80 .4 O VII + 22.10 .9 O VII + 28.47 1.6 C VI + 28.79 3.2 N VI + 29.52 2.8 N VI + 30.02 .7UNSPEC'D + 30.43 2.1 S XIV + 33.74 3.6 C VI + 40.95 1.5SI XII + 43.76 3.4SI XI + 44.02 1.9SI XII + 44.16 2.4SI XII + 45.66 1.2SI XII + 46.40 4.3SI XI + 46.67 3.2UNSPEC'D + 47.87 3.6UNSPEC'D + 49.22 6.9SI XI + 50.36 .9FE XVI + 50.52 7.3SI X + 50.69 7.3SI X + 52.30 4.5SI XI + 52.91 1.1FE XV + 54.15 5.3BLEND + 54.42 2.3UNSPEC'D + 54.70 .8FE XVI + 55.06 2.8MG IX + 55.34 8.9SI IX + 56.08 2.0 S IX + 56.92 4.8UNSPEC'D + 57.36 4.0UNSPEC'D + 57.56 3.2UNSPEC'D + 57.88 3.4MG X + 58.96 2.9FE XIV + 59.62 2.8FE XIV + 60.30 2.0UNSPEC'D + 60.85 2.9UNSPEC'D + 61.07 5.2SI VIII + 61.63 2.4 S VIII + 61.90 4.0BLEND + 62.30 .1NE VIII + 62.35 1.9FE XII + 62.77 3.0MG IX + 62.92 .7FE XVI + 63.16 3.3MG X + 63.30 5.3MG X + 63.65 3.3UNSPEC'D + 63.72 .9FE XVI + 64.11 3.1FE XIII + 64.60 2.0UNSPEC'D + 65.21 2.4UNSPEC'D + 65.71 3.3UNSPEC'D + 65.85 2.9MG X + 66.30 6.7FE XII + 67.14 2.6MG IX + 67.35 3.4FE XII + 68.35 1.8UNSPEC'D + 69.65 11.0UNSPEC'D + 70.00 1.1FE XV + 70.54 2.6UNSPEC'D + 70.75 2.4UNSPEC'D + 71.00 3.5UNSPEC'D + 71.94 6.2FE XIV + 72.31 5.1BLEND + 72.63 1.9FE XI + 72.80 1.7UNSPEC'D + 72.95 2.7UNSPEC'D + 73.55 2.9NE VIII + 74.21 2.0UNSPEC'D + 74.44 1.0UNSPEC'D + 74.83 3.2BLEND + 75.03 4.1MG VIII + 75.29 2.0UNSPEC'D + 75.46 3.0UNSPEC'D + 75.73 2.0UNSPEC'D + 76.01 8.0FE XIII + 76.48 2.8FE XIII + 76.83 3.3BLEND + 76.94 2.6UNSPEC'D + 77.30 2.3UNSPEC'D + 77.74 3.4MG IX + 78.56 2.4UNSPEC'D + 78.70 2.9NI XI + 79.08 1.5UNSPEC'D + 79.48 3.1FE XII + 79.76 1.8UNSPEC'D + 80.00 2.6FE XII + 80.21 2.3UNSPEC'D + 80.55 4.0FE XII + 80.94 1.6UNSPEC'D + 81.16 2.1UNSPEC'D + 81.58 2.4UNSPEC'D + 81.94 3.4UNSPEC'D + 82.43 4.8FE IX + 82.67 6.7UNSPEC'D + 83.25 3.5UNSPEC'D + 83.42 4.1MG VII + 83.67 3.5MG VII + 84.00 4.7MG VII + 84.26 3.0UNSPEC'D + 84.50 4.7UNSPEC'D + 84.72 3.3UNSPEC'D + 84.86 3.1UNSPEC'D + 85.16 2.4UNSPEC'D + 85.50 4.7UNSPEC'D + 85.69 2.2UNSPEC'D + 85.87 2.3UNSPEC'D + 86.23 1.7UNSPEC'D + 86.40 1.4UNSPEC'D + 86.77 5.9FE XI + 86.98 3.6FE XI + 87.30 1.9UNSPEC'D + 87.61 1.6UNSPEC'D + 88.10 .1NE VIII + 88.11 4.9BLEND + 88.14 .1NE VIII + 88.42 1.5UNSPEC'D + 88.64 1.9UNSPEC'D + 88.90 4.5FE XI + 89.14 3.2FE XI + 89.70 3.5FE XI + 90.14 3.7FE XI + 90.45 2.3FE XI + 90.71 2.4UNSPEC'D + 91.00 3.1UNSPEC'D + 91.48 1.5UNSPEC'D + 91.69 4.6NI X + 91.81 3.8UNSPEC'D + 92.09 3.0UNSPEC'D + 92.55 2.4UNSPEC'D + 92.81 3.0UNSPEC'D + 93.61 4.5UNSPEC'D + 94.07 6.8FE X + 94.25 .1NE VII + 94.39 1.4UNSPEC'D + 94.81 1.1UNSPEC'D + 94.90 .1NE VII + 95.37 5.0FE X + 95.51 2.3UNSPEC'D + 95.81 2.3UNSPEC'D + 96.05 9.2FE X + 96.49 1.5UNSPEC'D + 96.83 2.6FE X + 97.12 5.0FE X + 97.51 2.4BLEND + 97.87 2.2FE X + 98.12 4.5BLEND + 98.23 5.2BLEND + 98.50 2.1UNSPEC'D + 98.88 1.2UNSPEC'D + 99.44 1.3UNSPEC'D + 99.71 1.6UNSPEC'D + 99.99 2.2UNSPEC'D + 100.54 6.7UNSPEC'D + 100.96 2.1UNSPEC'D + 101.57 2.7UNSPEC'D + 102.15 3.6UNSPEC'D + 103.01 2.3NE VIII + 103.15 .1NE VII + 103.17 3.4UNSPEC'D + 103.58 6.0FE IX + 103.94 4.9UNSPEC'D + 104.23 1.3UNSPEC'D + 104.76 1.6UNSPEC'D + 105.23 5.0FE IX + 106.25 1.8NE VII + 106.57 .9UNSPEC'D + 106.93 1.5UNSPEC'D + 108.05 1.5FE VIII + 108.46 1.6UNSPEC'D + 109.50 1.6UNSPEC'D + 109.98 .1NE VII + 110.56 .1NE VII + 110.62 .1NE VII + 110.76 1.2UNSPEC'D + 111.16 .1NE VI + 111.25 3.8UNSPEC'D + 113.80 2.4UNSPEC'D + 114.09 2.1UNSPEC'D + 114.24 .1NE VI + 115.39 .1NE VII + 115.82 1.9UNSPEC'D + 116.75 3.1UNSPEC'D + 117.20 2.1UNSPEC'D + 120.40 .1NE VII + 121.15 .1NE VI + 121.79 .9UNSPEC'D + 122.70 3.7NE VI + 123.50 2.1UNSPEC'D + 127.65 3.6UNSPEC'D + 129.87 3.7 O VI + 130.30 .1NE VI + 131.02 4.2BLEND + 131.21 3.8BLEND + 136.21 .1NE VI + 136.28 .1NE VI + 136.34 .1NE VI + 136.45 .1NE VI + 136.48 .1NE VI + 141.20 9.0UNSPEC'D + 144.21 .9NI X + 145.00 11.9NI X + 148.38 73.6NI XI + 150.10 19.2BLEND + 152.15 51.4NI XII + 152.84 3.3BLEND + 154.20 29.9NI XII + 157.73 30.7NI XIII + 158.38 10.6NI X + 159.94 9.8NI X + 164.13 24.4NI XIV + 167.50 21.4FE VIII + 168.17 39.6FE VIII + 168.55 22.4FE VIII + 168.92 13.8FE VIII + 169.70 28.4UNSPEC'D + 171.06 438.0FE IX + 172.12 9.6 O V + 172.92 12.4BLEND + 173.10 26.6BLEND + 174.53 389.0FE X + 175.24 40.3BLEND + 175.47 11.7BLEND + 177.22 207.0FE X + 178.02 18.2BLEND + 179.74 18.4FE XI + 180.40 353.0FE XI + 180.71 18.5BLEND + 181.14 25.0FE XI + 182.16 66.0FE XI + 182.39 9.3BLEND + 183.91 6.6BLEND + 184.10 12.3BLEND + 184.52 103.7FE X + 184.76 9.4BLEND + 185.21 44.5FE VIII + 186.60 25.8BLEND + 186.87 70.0BLEND + 188.23 191.0BLEND + 188.70 15.4BLEND + 190.00 48.0FE X + 191.29 22.5 S XI + 192.38 64.0FE XII + 192.80 76.8FE XI + 193.50 132.0FE XII + 195.14 174.0FE XII + 196.63 45.3FE XIII + 197.41 18.2FE XIII + 198.53 23.3BLEND + 200.00 37.9FE XIII + 201.10 66.0FE XIII + 202.00 96.0UNSPEC'D + 202.64 20.7BLEND + 203.78 39.0FE XIII + 204.89 30.3FE XIII + 206.26 .9UNSPEC'D + 206.38 .9UNSPEC'D + 207.46 .9UNSPEC'D + 208.33 .9UNSPEC'D + 209.63 .9UNSPEC'D + 209.78 .9UNSPEC'D + 209.93 32.0UNSPEC'D + 211.32 54.0FE XIV + 212.15 11.8 S XII + 214.75 7.6SI VIII + 215.16 21.7 S XII + 216.90 32.8SI VIII + 217.00 51.0UNSPEC'D + 218.21 65.0 S XII + 219.09 12.0FE XIV + 220.08 17.0FE XIV + 221.26 14.5BLEND + 221.51 20.1 S XII + 223.26 10.1BLEND + 223.72 27.0SI IX + 224.81 37.4BLEND + 225.12 51.0BLEND + 227.01 90.3SI IX + 227.47 29.8 S XII + 228.79 18.4BLEND + 230.65 10.5HE II + 231.55 12.8HE II + 232.60 18.7HE II + 233.84 12.7FE XV + 234.38 82.6BLEND + 235.55 5.9SI VIII + 237.36 44.2HE II + 239.87 16.9 S XI + 240.73 66.7FE XIII + 241.80 111.0UNSPEC'D + 243.03 110.2HE II + 243.86 75.0UNSPEC'D + 244.92 55.0UNSPEC'D + 245.94 14.9BLEND + 246.24 88.0BLEND + 246.91 18.7BLEND + 247.18 19.9BLEND + 249.23 40.2NI XVII + 251.1 9.6FE XVI + 251.96 149.7FE XIII + 252.17 59.7BLEND + 253.80 32.0SI X + 256.37 516.4BLEND + 256.69 113.8BLEND + 257.48 60.0BLEND + 258.40 175.7SI X + 259.50 68.0 S X + 261.08 89.4SI X + 262.99 14.6FE XVI + 264.27 65.2 S X + 264.80 240.0FE XIV + 270.50 141.7FE XIV + 271.99 75.3SI X + 272.70 9.6SI VII + 274.24 301.1FE XIV + 275.35 27.7SI VII + 275.76 4.2SI VII + 276.15 5.6MG VII + 276.77 7.0BLEND + 277.00 44.6BLEND + 277.27 65.6BLEND + 278.40 33.6MG VII + 281.41 32.6 S XI + 284.15 210.0FE XV + 285.85 23.0BLEND + 288.36 34.9BLEND + 289.17 18.9FE XIV + 290.72 30.7SI IX + 291.63 12.5 S XI + 292.00 20.6NI XVIII + 292.83 63.4SI IX + 295.57 20.8BLEND + 296.17 94.0SI IX + 299.50 9.8 S XII + 303.78 7700.0HE II + 315.02 10.0MG VIII + 315.05 10.0 N IV + 316.20 10.0SI VIII + 319.83 10.0SI VIII + 335.05 10.0 N IV + 335.39 150.0FE XVI + 345.13 10.0SI IX + 345.74 10.0FE X + 347.42 10.0SI X + 349.85 10.0SI IX + 353.86 10.0MG VIII + 356.07 10.0SI X + 360.76 320.0FE XVI + 364.80 150.0UNSPEC'D + 368.07 650.0MG IX + 401.70 60.0NE VI + 405.00 .1HE I (C) + 406.00 .1HE I (C) + 407.00 .1HE I (C) + 408.00 .1HE I (C) + 409.00 .1HE I (C) + 410.00 .1HE I (C) + 411.00 .1HE I (C) + 412.00 .1HE I (C) + 413.00 .2HE I (C) + 414.00 .2HE I (C) + 415.00 .2HE I (C) + 416.00 .2HE I (C) + 417.00 .2HE I (C) + 417.24 18.0FE XV + 417.71 60.0 S XIV + 418.00 .2HE I (C) + 419.00 .2HE I (C) + 420.00 .2HE I (C) + 421.00 .2HE I (C) + 422.00 .2HE I (C) + 423.00 .3HE I (C) + 424.00 .3HE I (C) + 425.00 .3HE I (C) + 426.00 .3HE I (C) + 427.00 .3HE I (C) + 428.00 .3HE I (C) + 429.00 .4HE I (C) + 430.00 .4HE I (C) + 430.50 30.0MG VIII + 431.00 .4HE I (C) + 432.00 .4HE I (C) + 433.00 .4HE I (C) + 434.00 .5HE I (C) + 435.00 .5HE I (C) + 436.00 .5HE I (C) + 436.10 50.0BLEND(2) + 437.00 .5HE I (C) + 438.00 .6HE I (C) + 439.00 .6HE I (C) + 440.00 .6HE I (C) + 441.00 .7HE I (C) + 442.00 .7HE I (C) + 443.00 .7HE I (C) + 444.00 .8HE I (C) + 445.00 .8HE I (C) + 446.00 .9HE I (C) + 447.00 .9HE I (C) + 448.00 1.0HE I (C) + 449.00 1.0HE I (C) + 450.00 1.1HE I (C) + 451.00 1.1HE I (C) + 452.00 1.2HE I (C) + 453.00 1.3HE I (C) + 454.00 1.3HE I (C) + 455.00 1.4HE I (C) + 456.00 1.5HE I (C) + 457.00 1.6HE I (C) + 458.00 1.6HE I (C) + 459.00 1.7HE I (C) + 460.00 1.8HE I (C) + 461.00 1.9HE I (C) + 462.00 2.0HE I (C) + 463.00 2.1HE I (C) + 464.00 2.2HE I (C) + 465.00 2.4HE I (C) + 465.22 270.0NE VII + 466.00 2.5HE I (C) + 467.00 2.6HE I (C) + 468.00 2.8HE I (C) + 469.00 2.9HE I (C) + 469.80 10.0NE IV + 470.00 3.1HE I (C) + 471.00 3.2HE I (C) + 472.00 3.4HE I (C) + 473.00 3.6HE I (C) + 474.00 3.8HE I (C) + 475.00 4.0HE I (C) + 476.00 4.2HE I (C) + 477.00 4.4HE I (C) + 478.00 4.7HE I (C) + 479.00 4.9HE I (C) + 480.00 5.2HE I (C) + 481.00 5.4HE I (C) + 482.00 5.7HE I (C) + 482.10 10.0NE V + 483.00 6.0HE I (C) + 484.00 6.4HE I (C) + 485.00 6.7HE I (C) + 486.00 7.1HE I (C) + 487.00 7.4HE I (C) + 488.00 7.8HE I (C) + 489.00 8.2HE I (C) + 489.50 10.0NE III + 490.00 8.7HE I (C) + 491.00 9.2HE I (C) + 492.00 9.6HE I (C) + 493.00 10.2HE I (C) + 494.00 10.7HE I (C) + 495.00 11.3HE I (C) + 496.00 11.9HE I (C) + 497.00 12.5HE I (C) + 498.00 13.2HE I (C) + 499.00 13.9HE I (C) + 499.27 100.0SI XII + 500.00 14.6HE I (C) + 501.00 15.4HE I (C) + 502.00 16.2HE I (C) + 503.00 17.1HE I (C) + 504.00 18.0HE I (C) + 507.90 160.0 O III + 515.60 10.0HE I + 521.10 60.0SI XII + 525.80 15.2 O III + 537.03 140.7HE I + 542.80 15.9NE IV + 550.00 16.1AL XI + 554.51 720.0 O IV + 558.60 16.5NE VI + 562.80 16.6NE VI + 568.50 16.9BLEND(2) + 572.30 17.0NE V + 580.40 17.3 O II + 584.33 1270.0HE I + 599.60 160.0 O III + 608.00 .2 H LY(C) + 609.00 .2 H LY(C) + 609.85 530.0MG X + 610.00 .2 H LY(C) + 611.00 .2 H LY(C) + 612.00 .2 H LY(C) + 613.00 .2 H LY(C) + 614.00 .2 H LY(C) + 615.00 .2 H LY(C) + 616.00 .2 H LY(C) + 616.60 15.7 O II + 617.00 .2 H LY(C) + 618.00 .2 H LY(C) + 619.00 .2 H LY(C) + 620.00 .2 H LY(C) + 621.00 .2 H LY(C) + 622.00 .2 H LY(C) + 623.00 .2 H LY(C) + 624.00 .3 H LY(C) + 625.00 .3 H LY(C) + 625.28 210.0MG X + 626.00 .3 H LY(C) + 627.00 .3 H LY(C) + 628.00 .3 H LY(C) + 629.00 .3 H LY(C) + 629.73 1520.0 O V + 630.00 .3 H LY(C) + 631.00 .2 H LY(C) + 632.00 .2 H LY(C) + 633.00 .2 H LY(C) + 634.00 .2 H LY(C) + 635.00 .2 H LY(C) + 636.00 .2 H LY(C) + 637.00 .2 H LY(C) + 638.00 .2 H LY(C) + 639.00 .2 H LY(C) + 640.00 .2 H LY(C) + 641.00 .2 H LY(C) + 642.00 .2 H LY(C) + 643.00 .2 H LY(C) + 644.00 .3 H LY(C) + 644.10 11.0 O II + 645.00 .3 H LY(C) + 646.00 .3 H LY(C) + 647.00 .3 H LY(C) + 648.00 .3 H LY(C) + 649.00 .3 H LY(C) + 650.00 .3 H LY(C) + 651.00 .3 H LY(C) + 652.00 .3 H LY(C) + 653.00 .3 H LY(C) + 654.00 .3 H LY(C) + 655.00 .3 H LY(C) + 656.00 .3 H LY(C) + 657.00 .4 H LY(C) + 657.30 11.0 S IV + 658.00 .4 H LY(C) + 659.00 .4 H LY(C) + 660.00 .4 H LY(C) + 661.00 .4 H LY(C) + 661.40 11.0 S IV + 662.00 .4 H LY(C) + 663.00 .4 H LY(C) + 664.00 .4 H LY(C) + 665.00 .4 H LY(C) + 666.00 .4 H LY(C) + 667.00 .6 H LY(C) + 668.00 .6 H LY(C) + 669.00 .6 H LY(C) + 670.00 .6 H LY(C) + 671.00 .6 H LY(C) + 671.50 11.0 N II + 672.00 .6 H LY(C) + 673.00 .6 H LY(C) + 674.00 .6 H LY(C) + 675.00 .7 H LY(C) + 676.00 .7 H LY(C) + 677.00 .7 H LY(C) + 678.00 .7 H LY(C) + 679.00 .7 H LY(C) + 680.00 .7 H LY(C) + 680.94 11.0 S V + 681.00 .8 H LY(C) + 681.70 11.0NA IX + 682.00 .8 H LY(C) + 683.00 .8 H LY(C) + 684.00 .8 H LY(C) + 685.00 .8 H LY(C) + 685.70 66.0 N III + 686.00 .8 H LY(C) + 687.00 .9 H LY(C) + 688.00 .9 H LY(C) + 689.00 .9 H LY(C) + 690.00 .9 H LY(C) + 691.00 .9 H LY(C) + 692.00 1.0 H LY(C) + 693.00 1.0 H LY(C) + 694.00 1.0 H LY(C) + 694.30 11.0NA IX + 695.00 1.0 H LY(C) + 696.00 1.1 H LY(C) + 697.00 1.1 H LY(C) + 698.00 1.1 H LY(C) + 699.00 1.1 H LY(C) + 700.00 1.2 H LY(C) + 701.00 1.2 H LY(C) + 702.00 1.2 H LY(C) + 703.00 1.3 H LY(C) + 703.40 66.0 O III + 704.00 1.3 H LY(C) + 705.00 1.3 H LY(C) + 706.00 1.3 H LY(C) + 707.00 1.4 H LY(C) + 708.00 1.4 H LY(C) + 709.00 1.4 H LY(C) + 710.00 1.5 H LY(C) + 711.00 1.5 H LY(C) + 712.00 1.5 H LY(C) + 712.70 11.0 S VI + 713.00 1.7 H LY(C) + 714.00 1.7 H LY(C) + 715.00 1.8 H LY(C) + 716.00 1.8 H LY(C) + 717.00 1.8 H LY(C) + 718.00 1.9 H LY(C) + 718.50 11.0 O II + 719.00 1.9 H LY(C) + 720.00 2.0 H LY(C) + 721.00 2.0 H LY(C) + 722.00 2.1 H LY(C) + 723.00 2.1 H LY(C) + 724.00 2.2 H LY(C) + 725.00 2.2 H LY(C) + 726.00 2.3 H LY(C) + 727.00 2.3 H LY(C) + 728.00 2.4 H LY(C) + 729.00 2.4 H LY(C) + 730.00 2.5 H LY(C) + 731.00 2.5 H LY(C) + 732.00 2.6 H LY(C) + 733.00 2.8 H LY(C) + 734.00 2.8 H LY(C) + 735.00 2.9 H LY(C) + 736.00 3.0 H LY(C) + 737.00 3.0 H LY(C) + 738.00 3.1 H LY(C) + 739.00 3.2 H LY(C) + 740.00 3.2 H LY(C) + 741.00 3.3 H LY(C) + 742.00 3.4 H LY(C) + 743.00 3.5 H LY(C) + 744.00 3.6 H LY(C) + 745.00 3.6 H LY(C) + 746.00 3.7 H LY(C) + 747.00 3.9 H LY(C) + 748.00 4.0 H LY(C) + 749.00 4.1 H LY(C) + 750.00 4.2 H LY(C) + 751.00 4.3 H LY(C) + 752.00 4.4 H LY(C) + 753.00 4.5 H LY(C) + 754.00 4.6 H LY(C) + 755.00 4.7 H LY(C) + 756.00 4.8 H LY(C) + 757.00 5.0 H LY(C) + 758.00 5.1 H LY(C) + 758.70 16.8 O V + 759.00 5.3 H LY(C) + 759.40 16.8 O V + 760.00 5.4 H LY(C) + 760.40 88.0 O V + 761.00 5.5 H LY(C) + 762.00 5.6 H LY(C) + 762.00 16.8 O V + 763.00 5.8 H LY(C) + 764.00 5.9 H LY(C) + 764.60 160.0BLEND(2) + 765.00 6.1 H LY(C) + 766.00 6.3 H LY(C) + 767.00 6.4 H LY(C) + 768.00 6.6 H LY(C) + 769.00 6.7 H LY(C) + 770.00 6.9 H LY(C) + 770.40 280.0BLEND( ) + 771.00 7.2 H LY(C) + 772.00 7.3 H LY(C) + 773.00 7.5 H LY(C) + 774.00 7.7 H LY(C) + 775.00 7.8 H LY(C) + 776.00 11.0 N II + 776.00 8.0 H LY(C) + 777.00 8.3 H LY(C) + 778.00 8.5 H LY(C) + 779.00 8.7 H LY(C) + 780.00 8.9 H LY(C) + 780.30 220.0BLEND( ) + 781.00 9.1 H LY(C) + 782.00 9.4 H LY(C) + 783.00 9.6 H LY(C) + 784.00 9.9 H LY(C) + 785.00 10.1 H LY(C) + 786.00 10.3 H LY(C) + 786.48 100.0 S V + 787.00 10.7 H LY(C) + 787.71 200.0 O IV + 788.00 10.9 H LY(C) + 789.00 11.2 H LY(C) + 790.00 11.4 H LY(C) + 790.21 370.0 O IV + 791.00 11.8 H LY(C) + 792.00 12.1 H LY(C) + 793.00 12.3 H LY(C) + 794.00 12.7 H LY(C) + 795.00 13.0 H LY(C) + 796.00 13.3 H LY(C) + 797.00 13.6 H LY(C) + 798.00 14.1 H LY(C) + 799.00 14.4 H LY(C) + 800.00 14.7 H LY(C) + 801.00 15.2 H LY(C) + 802.00 15.5 H LY(C) + 803.00 16.0 H LY(C) + 804.00 16.4 H LY(C) + 805.00 16.7 H LY(C) + 806.00 17.2 H LY(C) + 807.00 17.6 H LY(C) + 808.00 18.0 H LY(C) + 809.00 18.5 H LY(C) + 810.00 19.0 H LY(C) + 811.00 19.5 H LY(C) + 812.00 20.0 H LY(C) + 813.00 20.5 H LY(C) + 814.00 21.0 H LY(C) + 815.00 21.6 H LY(C) + 816.00 22.1 H LY(C) + 817.00 22.7 H LY(C) + 818.00 23.2 H LY(C) + 819.00 23.9 H LY(C) + 820.00 24.4 H LY(C) + 821.00 25.1 H LY(C) + 822.00 25.7 H LY(C) + 823.00 26.4 H LY(C) + 824.00 27.1 H LY(C) + 825.00 27.7 H LY(C) + 826.00 28.5 H LY(C) + 827.00 29.2 H LY(C) + 828.00 29.9 H LY(C) + 829.00 30.7 H LY(C) + 830.00 31.5 H LY(C) + 831.00 32.2 H LY(C) + 832.00 33.1 H LY(C) + 833.00 34.0 H LY(C) + 834.00 34.8 H LY(C) + 834.20 630.0BLEND(2) + 835.00 35.8 H LY(C) + 836.00 36.6 H LY(C) + 837.00 37.5 H LY(C) + 838.00 38.5 H LY(C) + 839.00 39.5 H LY(C) + 840.00 40.5 H LY(C) + 841.00 41.6 H LY(C) + 842.00 42.6 H LY(C) + 843.00 43.7 H LY(C) + 844.00 44.8 H LY(C) + 845.00 46.0 H LY(C) + 846.00 47.1 H LY(C) + 847.00 48.3 H LY(C) + 848.00 49.5 H LY(C) + 849.00 50.8 H LY(C) + 850.00 52.1 H LY(C) + 851.00 53.5 H LY(C) + 852.00 54.8 H LY(C) + 853.00 56.2 H LY(C) + 854.00 57.6 H LY(C) + 855.00 59.1 H LY(C) + 856.00 60.6 H LY(C) + 857.00 62.2 H LY(C) + 858.00 63.7 H LY(C) + 859.00 65.3 H LY(C) + 860.00 67.0 H LY(C) + 861.00 68.8 H LY(C) + 862.00 70.5 H LY(C) + 863.00 72.3 H LY(C) + 864.00 74.1 H LY(C) + 865.00 76.0 H LY(C) + 866.00 77.9 H LY(C) + 867.00 79.9 H LY(C) + 868.00 81.9 H LY(C) + 869.00 84.0 H LY(C) + 870.00 86.1 H LY(C) + 871.00 88.3 H LY(C) + 872.00 90.6 H LY(C) + 873.00 93.0 H LY(C) + 874.00 95.3 H LY(C) + 875.00 97.7 H LY(C) + 876.00 100.2 H LY(C) + 877.00 102.7 H LY(C) + 878.00 105.4 H LY(C) + 879.00 108.0 H LY(C) + 880.00 110.8 H LY(C) + 881.00 113.6 H LY(C) + 882.00 116.5 H LY(C) + 883.00 119.5 H LY(C) + 884.00 122.5 H LY(C) + 885.00 125.6 H LY(C) + 886.00 128.8 H LY(C) + 887.00 132.1 H LY(C) + 888.00 135.5 H LY(C) + 889.00 138.9 H LY(C) + 890.00 142.5 H LY(C) + 891.00 146.1 H LY(C) + 892.00 149.8 H LY(C) + 893.00 153.6 H LY(C) + 894.00 157.5 H LY(C) + 895.00 161.5 H LY(C) + 896.00 165.7 H LY(C) + 897.00 169.8 H LY(C) + 898.00 174.1 H LY(C) + 899.00 178.5 H LY(C) + 900.00 183.2 H LY(C) + 901.00 187.8 H LY(C) + 902.00 192.6 H LY(C) + 903.00 197.5 H LY(C) + 904.00 202.5 H LY(C) + 904.10 160.0 C II + 905.00 207.6 H LY(C) + 906.00 212.9 H LY(C) + 907.00 218.4 H LY(C) + 908.00 223.9 H LY(C) + 909.00 229.6 H LY(C) + 910.00 235.4 H LY(C) + 911.00 241.3 H LY(C) + 912.00 247.5 H LY(C) + 913.00 2.3 C I (C) + 914.00 2.3 C I (C) + 915.00 2.3 C I (C) + 916.00 2.4 C I (C) + 917.00 2.4 C I (C) + 918.00 2.5 C I (C) + 919.00 2.5 C I (C) + 920.00 2.6 C I (C) + 921.00 2.6 C I (C) + 922.00 2.6 C I (C) + 923.00 2.8 C I (C) + 923.10 242.0 N IV + 924.00 2.8 C I (C) + 925.00 2.9 C I (C) + 926.00 2.9 C I (C) + 926.20 110.0 H LY-7 + 927.00 3.0 C I (C) + 928.00 3.0 C I (C) + 929.00 3.1 C I (C) + 930.00 3.1 C I (C) + 930.70 260.0 BLEND( ) + 931.00 3.2 C I (C) + 932.00 3.2 C I (C) + 933.00 3.3 C I (C) + 933.40 140.0 S VI + 934.00 3.3 C I (C) + 935.00 3.4 C I (C) + 936.00 3.4 C I (C) + 937.00 3.5 C I (C) + 937.80 160.0 H LY-5 + 938.00 3.6 C I (C) + 939.00 3.6 C I (C) + 940.00 3.7 C I (C) + 941.00 3.7 C I (C) + 942.00 3.9 C I (C) + 943.00 4.0 C I (C) + 944.00 4.0 C I (C) + 944.50 130.0 S VI + 945.00 4.1 C I (C) + 946.00 4.2 C I (C) + 947.00 4.2 C I (C) + 948.00 4.3 C I (C) + 949.00 4.4 C I (C) + 949.74 300.0 H LY-4 + 950.00 4.4 C I (C) + 951.00 4.5 C I (C) + 952.00 4.6 C I (C) + 953.00 4.7 C I (C) + 954.00 4.7 C I (C) + 955.00 4.8 C I (C) + 956.00 5.0 C I (C) + 957.00 5.1 C I (C) + 958.00 5.2 C I (C) + 959.00 5.3 C I (C) + 960.00 5.3 C I (C) + 961.00 5.4 C I (C) + 962.00 5.5 C I (C) + 963.00 5.6 C I (C) + 964.00 5.7 C I (C) + 965.00 5.8 C I (C) + 966.00 5.9 C I (C) + 967.00 6.1 C I (C) + 968.00 6.2 C I (C) + 969.00 6.3 C I (C) + 970.00 6.4 C I (C) + 971.00 6.5 C I (C) + 972.00 6.6 C I (C) + 972.50 600.0 H LY-3 + 973.00 6.7 C I (C) + 974.00 6.8 C I (C) + 975.00 7.0 C I (C) + 976.00 7.2 C I (C) + 977.00 7.3 C I (C) + 977.03 4400.0 C III + 978.00 7.4 C I (C) + 979.00 7.5 C I (C) + 980.00 7.7 C I (C) + 981.00 7.8 C I (C) + 982.00 7.9 C I (C) + 983.00 8.0 C I (C) + 984.00 8.3 C I (C) + 985.00 8.4 C I (C) + 986.00 8.5 C I (C) + 987.00 8.7 C I (C) + 988.00 8.8 C I (C) + 989.00 9.0 C I (C) + 990.00 9.1 C I (C) + 991.00 9.4 C I (C) + 991.00 590.0 N III + 992.00 9.5 C I (C) + 993.00 9.7 C I (C) + 994.00 9.8 C I (C) + 995.00 10.0 C I (C) + 996.00 10.2 C I (C) + 997.00 10.3 C I (C) + 998.00 10.6 C I (C) + 999.00 10.8 C I (C) + 1000.00 11.0 C I (C) + 1001.00 11.1 C I (C) + 1002.00 11.3 C I (C) + 1003.00 11.6 C I (C) + 1004.00 11.8 C I (C) + 1005.00 12.0 C I (C) + 1006.00 12.2 C I (C) + 1007.00 12.4 C I (C) + 1008.00 12.7 C I (C) + 1009.00 12.9 C I (C) + 1010.00 13.1 C I (C) + 1010.20 110.0 C II + 1011.00 13.3 C I (C) + 1012.00 13.6 C I (C) + 1013.00 13.9 C I (C) + 1014.00 14.1 C I (C) + 1015.00 14.4 C I (C) + 1016.00 14.6 C I (C) + 1017.00 14.9 C I (C) + 1018.00 15.2 C I (C) + 1019.00 15.4 C I (C) + 1020.00 15.7 C I (C) + 1021.00 16.0 C I (C) + 1021.00 11.0UNSPEC'D + 1022.00 16.3 C I (C) + 1023.00 16.6 C I (C) + 1024.00 16.8 C I (C) + 1025.00 17.2 C I (C) + 1025.72 2650.0 H LY-2 + 1026.00 17.5 C I (C) + 1027.00 17.8 C I (C) + 1028.00 18.2 C I (C) + 1029.00 18.5 C I (C) + 1030.00 18.8 C I (C) + 1031.00 19.1 C I (C) + 1031.91 2080.0 O VI + 1032.00 19.5 C I (C) + 1033.00 19.8 C I (C) + 1034.00 20.2 C I (C) + 1035.00 20.6 C I (C) + 1036.00 20.9 C I (C) + 1037.00 21.3 C I (C) + 1037.61 1440.0BLEND + 1038.00 21.7 C I (C) + 1039.00 22.1 C I (C) + 1040.00 22.6 C I (C) + 1041.00 22.9 C I (C) + 1042.00 23.3 C I (C) + 1043.00 23.8 C I (C) + 1044.00 24.2 C I (C) + 1045.00 24.6 C I (C) + 1046.00 25.1 C I (C) + 1047.00 25.5 C I (C) + 1048.00 26.0 C I (C) + 1049.00 26.4 C I (C) + 1050.00 27.0 C I (C) + 1051.00 27.4 C I (C) + 1052.00 27.9 C I (C) + 1053.00 28.4 C I (C) + 1054.00 28.9 C I (C) + 1055.00 29.5 C I (C) + 1056.00 30.0 C I (C) + 1057.00 30.6 C I (C) + 1058.00 31.1 C I (C) + 1059.00 31.7 C I (C) + 1060.00 32.2 C I (C) + 1061.00 32.8 C I (C) + 1062.00 33.4 C I (C) + 1062.70 55.0 S IV + 1063.00 34.0 C I (C) + 1064.00 34.7 C I (C) + 1065.00 35.2 C I (C) + 1066.00 35.9 C I (C) + 1067.00 36.5 C I (C) + 1068.00 37.2 C I (C) + 1069.00 37.8 C I (C) + 1070.00 38.5 C I (C) + 1071.00 39.3 C I (C) + 1072.00 39.9 C I (C) + 1073.00 40.7 C I (C) + 1074.00 41.5 C I (C) + 1075.00 42.1 C I (C) + 1076.00 42.9 C I (C) + 1077.00 43.7 C I (C) + 1077.10 110.0 S III + 1078.00 44.6 C I (C) + 1079.00 45.3 C I (C) + 1080.00 46.1 C I (C) + 1081.00 47.0 C I (C) + 1082.00 47.9 C I (C) + 1083.00 48.6 C I (C) + 1084.00 49.5 C I (C) + 1085.00 50.5 C I (C) + 1085.70 620.0 N II + 1086.00 51.4 C I (C) + 1087.00 52.3 C I (C) + 1088.00 53.2 C I (C) + 1089.00 54.2 C I (C) + 1090.00 55.2 C I (C) + 1091.00 56.2 C I (C) + 1092.00 57.2 C I (C) + 1093.00 58.2 C I (C) + 1094.00 59.3 C I (C) + 1095.00 60.4 C I (C) + 1096.00 61.5 C I (C) + 1097.00 62.6 C I (C) + 1098.00 63.7 C I (C) + 1099.00 64.8 C I (C) + 1100.00 66.0 C I (C) + 1101.00 8.9QUASI(C) + 1102.00 9.0QUASI(C) + 1103.00 9.1QUASI(C) + 1104.00 9.2QUASI(C) + 1105.00 9.4QUASI(C) + 1106.00 9.5QUASI(C) + 1107.00 9.6QUASI(C) + 1108.00 9.7QUASI(C) + 1109.00 9.8QUASI(C) + 1110.00 9.9QUASI(C) + 1111.00 10.1QUASI(C) + 1112.00 10.3QUASI(C) + 1113.00 10.6QUASI(C) + 1114.00 10.8QUASI(C) + 1115.00 11.0QUASI(C) + 1116.00 11.2QUASI(C) + 1117.00 11.4QUASI(C) + 1118.00 11.7QUASI(C) + 1119.00 11.9QUASI(C) + 1120.00 12.1QUASI(C) + 1121.00 12.7QUASI(C) + 1122.00 13.2QUASI(C) + 1122.50 290.0SI IV + 1123.00 13.8QUASI(C) + 1124.00 14.3QUASI(C) + 1125.00 14.9QUASI(C) + 1126.00 15.4QUASI(C) + 1127.00 16.0QUASI(C) + 1128.00 16.5QUASI(C) + 1128.30 360.0SI IV + 1129.00 17.1QUASI(C) + 1130.00 17.6QUASI(C) + 1131.00 18.7QUASI(C) + 1132.00 19.8QUASI(C) + 1133.00 20.9QUASI(C) + 1134.00 22.0QUASI(C) + 1135.00 23.1QUASI(C) + 1136.00 24.2QUASI(C) + 1137.00 25.3QUASI(C) + 1138.00 26.4QUASI(C) + 1139.00 27.5QUASI(C) + 1139.89 341.0 C I + 1140.00 28.6QUASI(C) + 1141.00 30.8QUASI(C) + 1142.00 33.0QUASI(C) + 1143.00 35.2QUASI(C) + 1144.00 37.4QUASI(C) + 1145.00 39.6QUASI(C) + 1146.00 41.8QUASI(C) + 1147.00 44.0QUASI(C) + 1148.00 46.2QUASI(C) + 1149.00 48.4QUASI(C) + 1150.00 50.6QUASI(C) + 1151.00 53.7QUASI(C) + 1152.00 56.8QUASI(C) + 1153.00 59.9QUASI(C) + 1154.00 62.9QUASI(C) + 1155.00 65.9QUASI(C) + 1156.00 68.9QUASI(C) + 1157.00 71.9QUASI(C) + 1158.00 74.8QUASI(C) + 1159.00 77.8QUASI(C) + 1160.00 80.7QUASI(C) + 1161.00 87.3QUASI(C) + 1162.00 93.8QUASI(C) + 1163.00 100.3QUASI(C) + 1164.00 106.7QUASI(C) + 1165.00 113.1QUASI(C) + 1166.00 119.4QUASI(C) + 1167.00 125.7QUASI(C) + 1168.00 131.9QUASI(C) + 1169.00 138.2QUASI(C) + 1170.00 144.2QUASI(C) + 1171.00 150.4QUASI(C) + 1172.00 156.4QUASI(C) + 1173.00 162.4QUASI(C) + 1174.00 168.3QUASI(C) + 1175.00 174.2QUASI(C) + 1175.70 2000.0 C III + 1176.00 180.0QUASI(C) + 1177.00 185.8QUASI(C) + 1178.00 191.5QUASI(C) + 1179.00 197.2QUASI(C) + 1180.00 202.8QUASI(C) + 1181.00 212.7QUASI(C) + 1182.00 222.5QUASI(C) + 1183.00 232.3QUASI(C) + 1184.00 241.9QUASI(C) + 1185.00 251.5QUASI(C) + 1186.00 260.9QUASI(C) + 1187.00 270.3QUASI(C) + 1188.00 279.6QUASI(C) + 1189.00 288.9QUASI(C) + 1190.00 298.0QUASI(C) + 1191.00 307.1QUASI(C) + 1192.00 316.1QUASI(C) + 1193.00 325.0QUASI(C) + 1194.00 333.8QUASI(C) + 1195.00 342.5QUASI(C) + 1196.00 351.1QUASI(C) + 1197.00 359.6QUASI(C) + 1198.00 368.1QUASI(C) + 1199.00 376.5QUASI(C) + 1200.00 384.8QUASI(C) + 1201.00 399.5QUASI(C) + 1202.00 413.9QUASI(C) + 1203.00 428.3QUASI(C) + 1204.00 442.5QUASI(C) + 1205.00 456.6QUASI(C) + 1206.00 449.1QUASI(C) + 1206.52 3960.0SI III + 1207.00 441.5QUASI(C) + 1208.00 434.0QUASI(C) + 1209.00 426.6QUASI(C) + 1210.00 419.2QUASI(C) + 1211.00 411.9QUASI(C) + 1212.00 404.7QUASI(C) + 1213.00 397.4QUASI(C) + 1214.00 390.2QUASI(C) + 1215.00 383.1QUASI(C) + 1215.67251000.0 H LY-1 + 1216.00 376.1QUASI(C) + 1217.00 369.0QUASI(C) + 1218.00 362.0QUASI(C) + 1219.00 355.1QUASI(C) + 1220.00 348.2QUASI(C) + 1221.00 341.4QUASI(C) + 1222.00 334.6QUASI(C) + 1223.00 327.8QUASI(C) + 1224.00 321.1QUASI(C) + 1225.00 314.5QUASI(C) + 1226.00 307.9QUASI(C) + 1227.00 301.4QUASI(C) + 1228.00 294.8QUASI(C) + 1229.00 288.4QUASI(C) + 1230.00 282.0QUASI(C) + 1231.00 274.0QUASI(C) + 1232.00 265.9QUASI(C) + 1233.00 258.0QUASI(C) + 1234.00 250.1QUASI(C) + 1235.00 242.3QUASI(C) + 1236.00 234.6QUASI(C) + 1237.00 226.9QUASI(C) + 1238.00 219.3QUASI(C) + 1238.80 473.0 N V + 1239.00 211.8QUASI(C) + 1240.00 204.2QUASI(C) + 1241.00 198.4QUASI(C) + 1242.00 192.6QUASI(C) + 1242.78 319.0 N V + 1243.00 186.9QUASI(C) + 1244.00 181.1QUASI(C) + 1245.00 175.5QUASI(C) + 1246.00 170.0QUASI(C) + 1247.00 164.4QUASI(C) + 1248.00 158.9QUASI(C) + 1249.00 153.4QUASI(C) + 1250.00 148.0QUASI(C) + 1251.00 142.7QUASI(C) + 1252.00 137.4QUASI(C) + 1253.00 132.2QUASI(C) + 1254.00 126.9QUASI(C) + 1255.00 121.8QUASI(C) + 1256.00 116.7QUASI(C) + 1257.00 111.6QUASI(C) + 1258.00 106.6QUASI(C) + 1259.00 101.6QUASI(C) + 1260.00 96.8QUASI(C) + 1260.66 253.0SI II + 1261.00 93.6QUASI(C) + 1262.00 90.4QUASI(C) + 1263.00 87.3QUASI(C) + 1264.00 84.2QUASI(C) + 1265.00 81.1QUASI(C) + 1265.04 506.0SI II + 1266.00 78.1QUASI(C) + 1267.00 75.1QUASI(C) + 1268.00 72.2QUASI(C) + 1269.00 69.2QUASI(C) + 1270.00 66.3QUASI(C) + 1271.00 63.4QUASI(C) + 1272.00 61.8QUASI(C) + 1273.00 60.2QUASI(C) + 1274.00 58.5QUASI(C) + 1275.00 56.9QUASI(C) + 1276.00 55.4QUASI(C) + 1277.00 53.8QUASI(C) + 1278.00 52.2QUASI(C) + 1279.00 50.7QUASI(C) + 1280.00 51.1QUASI(C) + 1281.00 51.5QUASI(C) + 1282.00 51.9QUASI(C) + 1283.00 52.4QUASI(C) + 1284.00 52.8QUASI(C) + 1285.00 53.3QUASI(C) + 1286.00 53.7QUASI(C) + 1287.00 54.2QUASI(C) + 1288.00 54.6QUASI(C) + 1289.00 55.1QUASI(C) + 1290.00 55.6QUASI(C) + 1291.00 56.0QUASI(C) + 1292.00 56.5QUASI(C) + 1293.00 57.0QUASI(C) + 1294.00 57.5QUASI(C) + 1295.00 58.0QUASI(C) + 1296.00 58.5QUASI(C) + 1297.00 59.0QUASI(C) + 1298.00 59.5QUASI(C) + 1299.00 60.0QUASI(C) + 1300.00 60.5QUASI(C) + 1301.00 61.0QUASI(C) + 1302.00 61.5QUASI(C) + 1302.17 594.0 O I + 1303.00 62.0QUASI(C) + 1304.00 62.5QUASI(C) + 1304.86 1445.7 O I + 1305.00 63.1QUASI(C) + 1306.00 63.6QUASI(C) + 1306.02 1808.7 O I + 1307.00 64.2QUASI(C) + 1308.00 64.7QUASI(C) + 1309.00 65.2QUASI(C) + 1309.30 145.1SI II + 1310.00 65.8QUASI(C) + 1311.00 66.4QUASI(C) + 1312.00 66.9QUASI(C) + 1313.00 67.5QUASI(C) + 1314.00 68.1QUASI(C) + 1315.00 68.6QUASI(C) + 1316.00 69.2QUASI(C) + 1317.00 69.8QUASI(C) + 1318.00 70.4QUASI(C) + 1319.00 71.0QUASI(C) + 1320.00 71.6QUASI(C) + 1321.00 72.2QUASI(C) + 1322.00 72.8QUASI(C) + 1323.00 73.4QUASI(C) + 1324.00 74.0QUASI(C) + 1325.00 74.7QUASI(C) + 1326.00 75.3QUASI(C) + 1327.00 75.9QUASI(C) + 1328.00 76.6QUASI(C) + 1329.00 77.2QUASI(C) + 1330.00 77.9QUASI(C) + 1331.00 78.6QUASI(C) + 1332.00 79.2QUASI(C) + 1333.00 79.9QUASI(C) + 1334.00 80.6QUASI(C) + 1334.51 3696.3 C II + 1335.00 81.3QUASI(C) + 1335.68 3699.5 C II + 1336.00 81.9QUASI(C) + 1337.00 82.6QUASI(C) + 1338.00 83.3QUASI(C) + 1339.00 84.0QUASI(C) + 1340.00 84.8QUASI(C) + 1341.00 85.5QUASI(C) + 1342.00 86.2QUASI(C) + 1343.00 86.9QUASI(C) + 1344.00 87.7QUASI(C) + 1345.00 88.4QUASI(C) + 1346.00 89.2QUASI(C) + 1347.00 89.9QUASI(C) + 1348.00 90.7QUASI(C) + 1349.00 91.4QUASI(C) + 1350.00 92.2QUASI(C) + 1351.00 93.0QUASI(C) + 1352.00 93.8QUASI(C) + 1353.00 94.6QUASI(C) + 1354.00 95.4QUASI(C) + 1355.00 96.2QUASI(C) + 1356.00 97.0QUASI(C) + 1356.70 601.3 O I + 1357.00 97.8QUASI(C) + 1358.00 98.7QUASI(C) + 1359.00 99.5QUASI(C) + 1360.00 100.3QUASI(C) + 1361.00 101.2QUASI(C) + 1362.00 102.0QUASI(C) + 1363.00 102.9QUASI(C) + 1364.00 103.8QUASI(C) + 1365.00 104.7QUASI(C) + 1366.00 105.5QUASI(C) + 1367.00 106.4QUASI(C) + 1368.00 107.3QUASI(C) + 1369.00 108.3QUASI(C) + 1370.00 109.2QUASI(C) + 1371.00 110.1QUASI(C) + 1372.00 111.0QUASI(C) + 1373.00 112.0QUASI(C) + 1374.00 112.9QUASI(C) + 1375.00 113.9QUASI(C) + 1376.00 114.8QUASI(C) + 1377.00 115.8QUASI(C) + 1378.00 116.8QUASI(C) + 1379.00 117.8QUASI(C) + 1380.00 118.8QUASI(C) + 1381.00 119.8QUASI(C) + 1382.00 120.8QUASI(C) + 1383.00 121.8QUASI(C) + 1384.00 122.9QUASI(C) + 1385.00 123.9QUASI(C) + 1386.00 125.0QUASI(C) + 1387.00 126.0QUASI(C) + 1388.00 127.1QUASI(C) + 1389.00 128.2QUASI(C) + 1390.00 129.2QUASI(C) + 1391.00 130.3QUASI(C) + 1392.00 131.4QUASI(C) + 1393.00 132.6QUASI(C) + 1393.73 2526.7SI IV + 1394.00 133.7QUASI(C) + 1395.00 134.8QUASI(C) + 1396.00 136.0QUASI(C) + 1397.00 137.1QUASI(C) + 1398.00 138.3QUASI(C) + 1399.00 139.4QUASI(C) + 1400.00 140.6QUASI(C) + 1401.00 141.8QUASI(C) + 1402.00 143.0QUASI(C) + 1402.73 1102.0SI IV + 1403.00 144.2QUASI(C) + 1404.00 145.4QUASI(C) + 1405.00 146.7QUASI(C) + 1406.00 147.9QUASI(C) + 1407.00 149.2QUASI(C) + 1408.00 150.4QUASI(C) + 1409.00 151.7QUASI(C) + 1410.00 153.0QUASI(C) + 1411.00 154.3QUASI(C) + 1412.00 155.6QUASI(C) + 1413.00 156.9QUASI(C) + 1414.00 158.3QUASI(C) + 1415.00 159.6QUASI(C) + 1416.00 160.9QUASI(C) + 1417.00 162.3QUASI(C) + 1418.00 163.7QUASI(C) + 1419.00 165.1QUASI(C) + 1420.00 166.5QUASI(C) + 1421.00 167.9QUASI(C) + 1422.00 169.3QUASI(C) + 1423.00 170.7QUASI(C) + 1424.00 172.2QUASI(C) + 1425.00 173.6QUASI(C) + 1426.00 175.1QUASI(C) + 1427.00 176.6QUASI(C) + 1428.00 178.1QUASI(C) + 1429.00 179.6QUASI(C) + 1430.00 181.1QUASI(C) + 1431.00 182.7QUASI(C) + 1432.00 184.2QUASI(C) + 1433.00 185.8QUASI(C) + 1434.00 187.4QUASI(C) + 1435.00 188.9QUASI(C) + 1436.00 190.5QUASI(C) + 1437.00 192.2QUASI(C) + 1438.00 193.8QUASI(C) + 1439.00 195.4QUASI(C) + 1440.00 197.1QUASI(C) + 1441.00 198.8QUASI(C) + 1442.00 200.4QUASI(C) + 1443.00 202.1QUASI(C) + 1444.00 203.8QUASI(C) + 1445.00 205.6QUASI(C) + 1446.00 207.3QUASI(C) + 1447.00 209.1QUASI(C) + 1448.00 210.8QUASI(C) + 1449.00 212.6QUASI(C) + 1450.00 214.4QUASI(C) + 1451.00 216.3QUASI(C) + 1452.00 218.1QUASI(C) + 1453.00 219.9QUASI(C) + 1454.00 221.8QUASI(C) + 1455.00 223.7QUASI(C) + 1456.00 225.6QUASI(C) + 1457.00 227.5QUASI(C) + 1458.00 229.4QUASI(C) + 1459.00 231.4QUASI(C) + 1460.00 233.3QUASI(C) + 1461.00 235.3QUASI(C) + 1462.00 237.3QUASI(C) + 1463.00 239.3QUASI(C) + 1464.00 241.3QUASI(C) + 1465.00 243.4QUASI(C) + 1466.00 245.4QUASI(C) + 1467.00 247.5QUASI(C) + 1468.00 249.6QUASI(C) + 1469.00 251.7QUASI(C) + 1470.00 253.9QUASI(C) + 1471.00 256.0QUASI(C) + 1472.00 258.2QUASI(C) + 1473.00 260.4QUASI(C) + 1474.00 262.6QUASI(C) + 1475.00 264.8QUASI(C) + 1476.00 267.0QUASI(C) + 1477.00 269.3QUASI(C) + 1478.00 271.6QUASI(C) + 1479.00 273.9QUASI(C) + 1480.00 276.2QUASI(C) + 1481.00 278.6QUASI(C) + 1482.00 280.9QUASI(C) + 1483.00 283.3QUASI(C) + 1484.00 285.7QUASI(C) + 1485.00 288.1QUASI(C) + 1486.00 290.6QUASI(C) + 1487.00 293.0QUASI(C) + 1488.00 295.5QUASI(C) + 1489.00 298.0QUASI(C) + 1490.00 300.5QUASI(C) + 1491.00 303.1QUASI(C) + 1492.00 305.7QUASI(C) + 1493.00 308.2QUASI(C) + 1494.00 310.9QUASI(C) + 1495.00 313.5QUASI(C) + 1496.00 316.1QUASI(C) + 1497.00 318.8QUASI(C) + 1498.00 321.5QUASI(C) + 1499.00 324.3QUASI(C) + 1500.00 327.0QUASI(C) + 1501.00 329.8QUASI(C) + 1502.00 332.6QUASI(C) + 1503.00 335.4QUASI(C) + 1504.00 338.2QUASI(C) + 1505.00 341.1QUASI(C) + 1506.00 344.0QUASI(C) + 1507.00 346.9QUASI(C) + 1508.00 349.8QUASI(C) + 1509.00 352.8QUASI(C) + 1510.00 355.8QUASI(C) + 1511.00 358.8QUASI(C) + 1512.00 361.9QUASI(C) + 1513.00 364.9QUASI(C) + 1514.00 368.0QUASI(C) + 1515.00 371.1QUASI(C) + 1516.00 374.3QUASI(C) + 1517.00 377.4QUASI(C) + 1518.00 380.6QUASI(C) + 1519.00 383.9QUASI(C) + 1520.00 387.1QUASI(C) + 1521.00 390.4QUASI(C) + 1522.00 393.7QUASI(C) + 1523.00 397.1QUASI(C) + 1524.00 400.4QUASI(C) + 1525.00 403.8QUASI(C) + 1526.00 407.2QUASI(C) + 1526.72 3798.2SI II + 1527.00 410.7QUASI(C) + 1528.00 414.2QUASI(C) + 1529.00 417.7QUASI(C) + 1530.00 421.2QUASI(C) + 1531.00 424.8QUASI(C) + 1532.00 428.4QUASI(C) + 1533.00 432.0QUASI(C) + 1533.44 4116.1SI II + 1534.00 435.7QUASI(C) + 1535.00 439.4QUASI(C) + 1536.00 443.1QUASI(C) + 1537.00 446.8QUASI(C) + 1538.00 450.6QUASI(C) + 1539.00 454.4QUASI(C) + 1540.00 458.3QUASI(C) + 1541.00 462.2QUASI(C) + 1542.00 466.1QUASI(C) + 1543.00 470.1QUASI(C) + 1544.00 474.0QUASI(C) + 1545.00 478.1QUASI(C) + 1546.00 482.1QUASI(C) + 1547.00 486.2QUASI(C) + 1548.00 490.3QUASI(C) + 1548.19 11149.3 C IV + 1549.00 494.5QUASI(C) + 1550.00 498.7QUASI(C) + 1550.77 6091.5 C IV + 1551.00 502.9QUASI(C) + 1552.00 507.1QUASI(C) + 1553.00 511.4QUASI(C) + 1554.00 515.8QUASI(C) + 1555.00 520.1QUASI(C) + 1556.00 524.6QUASI(C) + 1557.00 529.0QUASI(C) + 1558.00 533.5QUASI(C) + 1559.00 538.0QUASI(C) + 1560.00 542.6QUASI(C) + 1561.00 547.2QUASI(C) + 1561.40 9200.0 C I + 1562.00 551.8QUASI(C) + 1563.00 556.5QUASI(C) + 1564.00 561.2QUASI(C) + 1565.00 565.9QUASI(C) + 1566.00 570.7QUASI(C) + 1567.00 575.6QUASI(C) + 1568.00 580.5QUASI(C) + 1569.00 585.4QUASI(C) + 1570.00 590.3QUASI(C) + 1571.00 595.3QUASI(C) + 1572.00 600.4QUASI(C) + 1573.00 605.5QUASI(C) + 1574.00 610.6QUASI(C) + 1575.00 615.8QUASI(C) + 1576.00 621.0QUASI(C) + 1577.00 626.3QUASI(C) + 1578.00 631.6QUASI(C) + 1579.00 636.9QUASI(C) + 1580.00 642.3QUASI(C) + 1581.00 647.8QUASI(C) + 1582.00 653.3QUASI(C) + 1583.00 658.8QUASI(C) + 1584.00 664.4QUASI(C) + 1585.00 670.0QUASI(C) + 1586.00 675.7QUASI(C) + 1587.00 681.4QUASI(C) + 1588.00 687.2QUASI(C) + 1588.30 2639.6FE II + 1589.00 693.0QUASI(C) + 1590.00 698.9QUASI(C) + 1591.00 704.8QUASI(C) + 1592.00 710.8QUASI(C) + 1593.00 716.8QUASI(C) + 1594.00 722.9QUASI(C) + 1595.00 729.0QUASI(C) + 1596.00 735.2QUASI(C) + 1597.00 741.4QUASI(C) + 1598.00 747.7QUASI(C) + 1599.00 754.0QUASI(C) + 1600.00 760.4QUASI(C) + 1601.00 766.9QUASI(C) + 1602.00 773.4QUASI(C) + 1603.00 779.9QUASI(C) + 1604.00 786.5QUASI(C) + 1605.00 793.2QUASI(C) + 1606.00 799.9QUASI(C) + 1607.00 806.7QUASI(C) + 1608.00 813.5QUASI(C) + 1609.00 820.4QUASI(C) + 1610.00 827.4QUASI(C) + 1611.00 834.4QUASI(C) + 1612.00 841.5QUASI(C) + 1613.00 848.6QUASI(C) + 1614.00 855.8QUASI(C) + 1615.00 863.0QUASI(C) + 1616.00 870.3QUASI(C) + 1617.00 877.7QUASI(C) + 1618.00 885.2QUASI(C) + 1619.00 892.7QUASI(C) + 1620.00 900.2QUASI(C) + 1621.00 914.7QUASI(C) + 1622.00 929.5QUASI(C) + 1623.00 944.6QUASI(C) + 1624.00 959.9QUASI(C) + 1625.00 975.5QUASI(C) + 1626.00 991.3QUASI(C) + 1627.00 1007.4QUASI(C) + 1628.00 1023.8QUASI(C) + 1629.00 1040.4QUASI(C) + 1630.00 1057.3QUASI(C) + 1631.00 1074.4QUASI(C) + 1632.00 1091.8QUASI(C) + 1633.00 1109.6QUASI(C) + 1634.00 1127.6QUASI(C) + 1635.00 1145.8QUASI(C) + 1636.00 1164.4QUASI(C) + 1637.00 1183.3QUASI(C) + 1638.00 1202.5QUASI(C) + 1639.00 1222.0QUASI(C) + 1640.00 1241.9QUASI(C) + 1640.47 4626.4HE II + 1641.00 1262.0QUASI(C) + 1642.00 1282.5QUASI(C) + 1643.00 1303.3QUASI(C) + 1644.00 1324.4QUASI(C) + 1645.00 1345.9QUASI(C) + 1646.00 1367.8QUASI(C) + 1647.00 1390.0QUASI(C) + 1648.00 1412.5QUASI(C) + 1649.00 1435.4QUASI(C) + 1650.00 1458.7QUASI(C) + 1651.00 1482.4QUASI(C) + 1652.00 1506.4QUASI(C) + 1653.00 1530.9QUASI(C) + 1654.00 1555.7QUASI(C) + 1655.00 1580.9QUASI(C) + 1656.00 1606.6QUASI(C) + 1657.00 1632.7QUASI(C) + 1657.01 12016.3 C I + 1658.00 1659.1QUASI(C) + 1659.00 1686.1QUASI(C) + 1660.00 1713.4QUASI(C) + 1661.00 1741.2QUASI(C) + 1662.00 1769.5QUASI(C) + 1663.00 1798.2QUASI(C) + 1664.00 1827.4QUASI(C) + 1665.00 1857.0QUASI(C) + 1666.00 1887.1QUASI(C) + 1667.00 1917.8QUASI(C) + 1668.00 1948.9QUASI(C) + 1669.00 1980.5QUASI(C) + 1670.00 2012.6QUASI(C) + 1670.76 3029.0FE II + 1670.81 3029.1AL II + 1671.00 2045.3QUASI(C) + 1672.00 2078.5QUASI(C) + 1673.00 2112.2QUASI(C) + 1674.00 2146.4QUASI(C) + 1675.00 2181.3QUASI(C) + 1676.00 2216.7QUASI(C) + 1677.00 2252.6QUASI(C) + 1678.00 2289.2QUASI(C) + 1679.00 2326.3QUASI(C) + 1680.00 2364.1QUASI(C) + 1681.00 2402.4QUASI(C) + 1682.00 2441.4QUASI(C) + 1683.00 2481.0QUASI(C) + 1684.00 2521.2QUASI(C) + 1685.00 2562.1QUASI(C) + 1686.00 2603.7QUASI(C) + 1687.00 2646.0QUASI(C) + 1688.00 2688.9QUASI(C) + 1689.00 2732.5QUASI(C) + 1690.00 2776.9QUASI(C) + 1691.00 2821.9QUASI(C) + 1692.00 2867.7QUASI(C) + 1693.00 2914.2QUASI(C) + 1694.00 2961.5QUASI(C) + 1695.00 3009.6QUASI(C) + 1696.00 3058.3QUASI(C) + 1696.80 2563.5FE II + 1697.00 3108.0QUASI(C) + 1698.00 3158.4QUASI(C) + 1699.00 3209.7QUASI(C) + 1700.00 3261.7QUASI(C) + 1701.00 3314.6QUASI(C) + 1702.00 3368.4QUASI(C) + 1703.00 3423.0QUASI(C) + 1704.00 3478.6QUASI(C) + 1705.00 3535.0QUASI(C) + 1706.00 3592.4QUASI(C) + 1707.00 3650.7QUASI(C) + 1708.00 3709.9QUASI(C) + 1709.00 3770.1QUASI(C) + 1710.00 3831.3QUASI(C) + 1711.00 3893.4QUASI(C) + 1712.00 3956.6QUASI(C) + 1713.00 4020.8QUASI(C) + 1713.01 2846.8FE II + 1714.00 4086.1QUASI(C) + 1715.00 4152.3QUASI(C) + 1716.00 4219.7QUASI(C) + 1717.00 4288.2QUASI(C) + 1718.00 4357.7QUASI(C) + 1719.00 4428.4QUASI(C) + 1720.00 4499.3QUASI(C) + 1721.00 4533.3QUASI(C) + 1722.00 4568.8QUASI(C) + 1723.00 4604.6QUASI(C) + 1724.00 4640.6QUASI(C) + 1725.00 4677.0QUASI(C) + 1726.00 4713.6QUASI(C) + 1727.00 4750.6QUASI(C) + 1728.00 4787.8QUASI(C) + 1729.00 4825.3QUASI(C) + 1730.00 4863.1QUASI(C) + 1731.00 4901.2QUASI(C) + 1732.00 4939.6QUASI(C) + 1733.00 4978.3QUASI(C) + 1734.00 5017.3QUASI(C) + 1735.00 5056.6QUASI(C) + 1736.00 5096.2QUASI(C) + 1737.00 5136.2QUASI(C) + 1738.00 5176.4QUASI(C) + 1739.00 5216.9QUASI(C) + 1740.00 5257.8QUASI(C) + 1741.00 5299.0QUASI(C) + 1742.00 5340.5QUASI(C) + 1743.00 5382.4QUASI(C) + 1744.00 5424.5QUASI(C) + 1745.00 5467.0QUASI(C) + 1745.33 483.5SI I + 1746.00 5509.9QUASI(C) + 1747.00 5553.0QUASI(C) + 1748.00 5596.5QUASI(C) + 1749.00 5640.4QUASI(C) + 1750.00 5684.6QUASI(C) + 1751.00 5729.1QUASI(C) + 1752.00 5774.0QUASI(C) + 1753.00 5819.2QUASI(C) + 1754.00 5864.8QUASI(C) + 1755.00 5910.8QUASI(C) + 1756.00 5957.1QUASI(C) + 1757.00 6003.8QUASI(C) + 1758.00 6050.8QUASI(C) + 1759.00 6098.2QUASI(C) + 1760.00 6146.0QUASI(C) + 1761.00 6194.1QUASI(C) + 1762.00 6242.7QUASI(C) + 1763.00 6291.6QUASI(C) + 1764.00 6340.9QUASI(C) + 1765.00 6390.5QUASI(C) + 1766.00 6440.6QUASI(C) + 1767.00 6491.1QUASI(C) + 1768.00 6541.9QUASI(C) + 1769.00 6593.2QUASI(C) + 1770.00 6644.8QUASI(C) + 1771.00 6696.9QUASI(C) + 1772.00 6749.3QUASI(C) + 1772.52 535.6FE II + 1773.00 6802.2QUASI(C) + 1774.00 6855.5QUASI(C) + 1775.00 6909.2QUASI(C) + 1776.00 6963.3QUASI(C) + 1777.00 7017.9QUASI(C) + 1778.00 7072.9QUASI(C) + 1779.00 7128.3QUASI(C) + 1780.00 7184.1QUASI(C) + 1781.00 7240.4QUASI(C) + 1782.00 7297.1QUASI(C) + 1783.00 7354.3QUASI(C) + 1784.00 7411.9QUASI(C) + 1785.00 7470.0QUASI(C) + 1786.00 7528.5QUASI(C) + 1787.00 7587.5QUASI(C) + 1788.00 7647.0QUASI(C) + 1789.00 7706.9QUASI(C) + 1790.00 7767.2QUASI(C) + 1791.00 7828.1QUASI(C) + 1792.00 7889.4QUASI(C) + 1793.00 7951.2QUASI(C) + 1794.00 8013.5QUASI(C) + 1795.00 8076.3QUASI(C) + 1796.00 8139.6QUASI(C) + 1797.00 8203.4QUASI(C) + 1798.00 8267.6QUASI(C) + 1799.00 8332.4QUASI(C) + 1800.00 8397.7QUASI(C) + 1801.00 8463.5QUASI(C) + 1802.00 8529.8QUASI(C) + 1803.00 8596.6QUASI(C) + 1804.00 8664.0QUASI(C) + 1805.00 8731.8QUASI(C) + 1806.00 8800.3QUASI(C) + 1807.00 8869.2QUASI(C) + 1808.00 8938.7QUASI(C) + 1808.01 16389.2SI II + 1809.00 9008.7QUASI(C) + 1810.00 9079.3QUASI(C) + 1811.00 9150.4QUASI(C) + 1812.00 9222.1QUASI(C) + 1813.00 9294.4QUASI(C) + 1814.00 9367.2QUASI(C) + 1815.00 9440.6QUASI(C) + 1816.00 9514.5QUASI(C) + 1817.00 9589.1QUASI(C) + 1817.42 49423.7SI II + 1818.00 9664.2QUASI(C) + 1819.00 9739.9QUASI(C) + 1820.00 9816.2QUASI(C) + 1821.00 9893.1QUASI(C) + 1822.00 9970.6QUASI(C) + 1823.00 10048.7QUASI(C) + 1824.00 10127.5QUASI(C) + 1825.00 10206.8QUASI(C) + 1826.00 10286.8QUASI(C) + 1827.00 10367.4QUASI(C) + 1828.00 10448.6QUASI(C) + 1829.00 10530.5QUASI(C) + 1830.00 10613.0QUASI(C) + 1831.00 10696.1QUASI(C) + 1832.00 10779.9QUASI(C) + 1833.00 10864.4QUASI(C) + 1834.00 10949.5QUASI(C) + 1835.00 11035.3QUASI(C) + 1836.00 11121.7QUASI(C) + 1837.00 11208.9QUASI(C) + 1838.00 11296.7QUASI(C) + 1839.00 11385.2QUASI(C) + 1840.00 11474.4QUASI(C) + 1841.00 11564.3QUASI(C) + 1842.00 11654.9QUASI(C) + 1843.00 11746.2QUASI(C) + 1844.00 11838.2QUASI(C) + 1845.00 11931.0QUASI(C) + 1846.00 12024.4QUASI(C) + 1847.00 12118.6QUASI(C) + 1848.00 12213.6QUASI(C) + 1849.00 12309.3QUASI(C) + 1850.00 12405.7QUASI(C) + 1851.00 12502.9QUASI(C) + 1852.00 12600.9QUASI(C) + 1853.00 12699.6QUASI(C) + 1854.00 12799.1QUASI(C) + 1855.00 12899.3QUASI(C) + 1856.00 13000.4QUASI(C) + 1857.00 13102.3QUASI(C) + 1858.00 13204.9QUASI(C) + 1859.00 13308.4QUASI(C) + 1860.00 13412.6QUASI(C) + 1861.00 13517.7QUASI(C) + 1862.00 13623.6QUASI(C) + 1863.00 13730.4QUASI(C) + 1864.00 13837.9QUASI(C) + 1865.00 13946.3QUASI(C) + 1866.00 14055.6QUASI(C) + 1867.00 14165.7QUASI(C) + 1868.00 14276.7QUASI(C) + 1869.00 14388.5QUASI(C) + 1870.00 14501.3QUASI(C) + 1871.00 14614.9QUASI(C) + 1872.00 14729.4QUASI(C) + 1873.00 14844.8QUASI(C) + 1874.00 14961.1QUASI(C) + 1875.00 15078.3QUASI(C) + 1876.00 15196.4QUASI(C) + 1877.00 15315.5QUASI(C) + 1878.00 15435.5QUASI(C) + 1879.00 15556.4QUASI(C) + 1880.00 15678.3QUASI(C) + 1881.00 15801.1QUASI(C) + 1882.00 15924.9QUASI(C) + 1883.00 16049.7QUASI(C) + 1884.00 16175.4QUASI(C) + 1885.00 16302.1QUASI(C) + 1886.00 16429.9QUASI(C) + 1887.00 16558.6QUASI(C) + 1888.00 16688.3QUASI(C) + 1889.00 16819.1QUASI(C) + 1890.00 16950.8QUASI(C) + 1891.00 17083.6QUASI(C) + 1892.00 17217.5QUASI(C) + 1893.00 17352.4QUASI(C) + 1894.00 17488.3QUASI(C) + 1895.00 17625.3QUASI(C) + 1896.00 17763.4QUASI(C) + 1897.00 17902.6QUASI(C) + 1898.00 18042.8QUASI(C) + 1899.00 18184.2QUASI(C) + 1900.00 18326.7QUASI(C) + 1901.00 18470.2QUASI(C) + 1902.00 18615.0QUASI(C) + 1903.00 18760.8QUASI(C) + 1904.00 18907.8QUASI(C) + 1905.00 19055.9QUASI(C) + 1906.00 19205.2QUASI(C) + 1907.00 19355.6QUASI(C) + 1908.00 19507.3QUASI(C) + 1909.00 19660.1QUASI(C) + 1910.00 19814.2QUASI(C) + 1911.00 19969.4QUASI(C) + 1912.00 20125.8QUASI(C) + 1913.00 20283.5QUASI(C) + 1914.00 20442.4QUASI(C) + 1915.00 20602.6QUASI(C) + 1916.00 20764.0QUASI(C) + 1917.00 20926.7QUASI(C) + 1918.00 21090.6QUASI(C) + 1919.00 21255.8QUASI(C) + 1920.00 21422.4QUASI(C) + 1921.00 21590.2QUASI(C) + 1922.00 21759.4QUASI(C) + 1923.00 21929.8QUASI(C) + 1924.00 22101.7QUASI(C) + 1925.00 22274.8QUASI(C) + 1926.00 22449.3QUASI(C) + 1927.00 22625.2QUASI(C) + 1928.00 22802.5QUASI(C) + 1929.00 22981.1QUASI(C) + 1930.00 23161.1QUASI(C) + 1931.00 23342.6QUASI(C) + 1932.00 23525.5QUASI(C) + 1933.00 23709.8QUASI(C) + 1934.00 23895.6QUASI(C) + 1935.00 24082.8QUASI(C) + 1936.00 24271.5QUASI(C) + 1937.00 24461.6QUASI(C) + 1938.00 24653.2QUASI(C) + 1939.00 24846.4QUASI(C) + 1940.00 25041.1QUASI(C) + 1941.00 25237.2QUASI(C) + 1942.00 25435.0QUASI(C) + 1943.00 25634.2QUASI(C) + 1944.00 25835.1QUASI(C) + 1945.00 26037.5QUASI(C) + 1946.00 26241.5QUASI(C) + 1947.00 26447.1QUASI(C) + 1948.00 26654.3QUASI(C) + 1949.00 26863.1QUASI(C) + 1950.00 27073.5QUASI(C) + 1951.00 27285.6QUASI(C) + 1952.00 27499.4QUASI(C) + 1953.00 27714.8QUASI(C) + 1954.00 27932.0QUASI(C) + 1955.00 28150.8QUASI(C) + 1956.00 28371.4QUASI(C) + 1957.00 28593.6QUASI(C) + 1958.00 28817.7QUASI(C) + 1959.00 29043.4QUASI(C) + 1960.00 29271.0QUASI(C) + 1961.00 29500.3QUASI(C) + 1962.00 29731.4QUASI(C) + 1963.00 29964.3QUASI(C) + 1964.00 30199.1QUASI(C) + 1965.00 30435.7QUASI(C) + 1966.00 30674.1QUASI(C) + 1967.00 30914.5QUASI(C) + 1968.00 31156.7QUASI(C) + 1969.00 31400.8QUASI(C) + 1970.00 31646.8QUASI(C) + 1971.00 31894.7QUASI(C) + 1972.00 32144.6QUASI(C) + 1973.00 32396.4QUASI(C) + 1974.00 32650.2QUASI(C) + 1975.00 32906.0QUASI(C) + 1976.00 33163.8QUASI(C) + 1977.00 33423.7QUASI(C) + 1978.00 33685.5QUASI(C) + 1979.00 33949.5QUASI(C) + 1980.00 34215.4QUASI(C) + 1981.00 34483.5QUASI(C) + 1982.00 34753.7QUASI(C) + 1983.00 35025.9QUASI(C) + 1984.00 35300.4QUASI(C) + 1985.00 35576.9QUASI(C) + 1986.00 35855.6QUASI(C) + 1987.00 36136.6QUASI(C) + 1988.00 36419.7QUASI(C) + 1989.00 36705.0QUASI(C) + 1990.00 36992.6QUASI(C) + 1991.00 37282.4QUASI(C) + 1992.00 37574.5QUASI(C) + 1993.00 37868.9QUASI(C) + 1994.00 38165.5QUASI(C) + 1995.00 38464.5QUASI(C) + 1996.00 38765.9QUASI(C) + 1997.00 39069.6QUASI(C) + 1998.00 39375.7QUASI(C) + 1999.00 39684.2QUASI(C) + 2000.00 39995.1QUASI(C) + 0.00 -0.0 + 75036 1959 diff --git a/EUV/ae-euv/sc21refw.dat b/EUV/ae-euv/sc21refw.dat new file mode 100755 index 0000000..6e04b16 --- /dev/null +++ b/EUV/ae-euv/sc21refw.dat @@ -0,0 +1,1692 @@ +This file lists the wavelength (W) in Angstroem and photon flux (F) +in 1E10 m-2 s-1, followed by the line/range identification for the +specific wavelength group. -------------------- 12/15/94/dkb + + W F + 18.62 .1 O VII 2 .200000 + 18.97 .1 O VIII 2 .700000 + 21.60 .3 O VII 2 .200000 + 21.80 .1 O VII 2 .200000 + 22.10 .3 O VII 2 .200000 + 28.47 .5 C VI 2 .180000 + 28.79 2.5 N VI 2 .100000 + 29.52 2.2 N VI 2 .100000 + 30.02 .9UNSPEC'D 1 .830009 + 30.43 .6 S XIV 2 .220000 + 33.74 1.1 C VI 2 .180000 + 40.95 .6SI XII 2 .150000 + 43.76 2.1SI XI 2 .070000 + 44.02 .8SI XII 2 .150000 + 44.16 .9SI XII 2 .150000 + 45.66 .5SI XII 2 .150000 + 46.40 2.7SI XI 2 .070000 + 46.67 4.0UNSPEC'D 1 .830009 + 47.87 4.5UNSPEC'D 1 .830009 + 49.22 4.3SI XI 2 .070000 + 50.52 5.6SI X 2 .035000 + 50.69 5.6SI X 2 .035000 + 52.30 3.5SI XI 2 .070000 + 52.91 .1FE XV 2 .408009 + 54.15 8.2BLEND 1 .830009 + 54.42 3.6UNSPEC'D 1 .830009 + 55.06 4.0MG IX 2 .011040 + 55.34 10.6SI IX 2 .024000 + 56.08 2.4 S IX 2 .020000 + 56.92 7.4UNSPEC'D 1 .830009 + 57.36 6.2UNSPEC'D 1 .830009 + 57.56 5.0UNSPEC'D 1 .830009 + 57.88 4.3MG X 2 .028009 + 58.96 .7FE XIV 2 .150009 + 59.62 .7FE XIV 2 .150009 + 60.30 2.5UNSPEC'D 1 .830009 + 60.85 3.6UNSPEC'D 1 .830009 + 61.07 5.8SI VIII 2 .015800 + 61.63 2.9 S VIII 2 .015780 + 61.90 5.0BLEND 1 .830009 + 62.30 .1NE VIII 2 .022000 + 62.35 1.1FE XII 2 .050409 + 62.77 3.4MG IX 2 .011040 + 63.16 3.3MG X 2 .028009 + 63.30 5.4MG X 2 .028009 + 63.65 4.1UNSPEC'D 1 .830009 + 64.11 1.1FE XIII 2 .088109 + 64.60 2.5UNSPEC'D 1 .830009 + 65.21 3.0UNSPEC'D 1 .830009 + 65.71 4.1UNSPEC'D 1 .830009 + 65.85 3.0MG X 2 .028009 + 66.26 .3FE XVI 2 1.00 + 66.30 3.8FE XII 2 .050409 + 66.37 .4FE XVI 2 1.00 + 67.14 3.0MG IX 2 .011040 + 67.35 2.0FE XII 2 .050409 + 68.35 2.3UNSPEC'D 1 .830009 + 69.65 13.8UNSPEC'D 1 .830009 + 70.00 .1FE XV 2 .408009 + 70.54 3.3UNSPEC'D 1 .830009 + 70.75 3.0UNSPEC'D 1 .830009 + 71.00 4.4UNSPEC'D 1 .830009 + 71.94 1.2FE XIV 2 .150009 + 72.31 6.4BLEND 1 .830009 + 72.63 1.6FE XI 2 .026409 + 72.80 2.1UNSPEC'D 1 .830009 + 72.95 3.4UNSPEC'D 1 .830009 + 73.47 .5FE XV 2 .408009 + 73.55 1.9NE VIII 2 .022000 + 74.21 2.5UNSPEC'D 1 .830009 + 74.44 1.3UNSPEC'D 1 .830009 + 74.83 4.0BLEND 1 .830009 + 75.03 4.6MG VIII 2 .009640 + 75.29 2.5UNSPEC'D 1 .830009 + 75.46 3.8UNSPEC'D 1 .830009 + 75.73 2.5UNSPEC'D 1 .830009 + 76.01 3.2FE XIII 2 .088109 + 76.48 1.0FE XIII 2 .088109 + 76.83 4.1BLEND 1 .830009 + 76.94 3.3UNSPEC'D 1 .830009 + 77.30 2.9UNSPEC'D 1 .830009 + 77.74 3.9MG IX 2 .011040 + 78.56 3.0UNSPEC'D 1 .830009 + 78.70 2.8NI XI 2 .025000 + 79.08 1.9UNSPEC'D 1 .830009 + 79.48 1.8FE XII 2 .050409 + 79.76 2.3UNSPEC'D 1 .830009 + 80.00 1.4FE XII 2 .050409 + 80.55 2.3FE XII 2 .050409 + 82.43 4.9FE IX 2 .011509 + 82.74 2.6FE XII 2 .0504 + 82.84 2.6FE XII 2 .0504 + 83.42 4.5MG VII 2 .008760 + 83.67 3.8MG VII 2 .008760 + 84.00 5.1MG VII 2 .008760 + 86.77 4.6FE XI 2 .026409 + 86.86 1.9NI X 2 .0128 + 86.98 3.1FE XI 2 .026409 + 87.30 2.4UNSPEC'D 1 .830009 + 87.61 2.0UNSPEC'D 1 .830009 + 88.09 4.5NE VIII 2 .022000 + 88.11 6.1BLEND 1 .830009 + 88.14 .1NE VIII 2 .022000 + 88.42 1.9UNSPEC'D 1 .830009 + 88.64 2.4UNSPEC'D 1 .830009 + 88.90 3.8FE XI 2 .026409 + 89.14 2.7FE XI 2 .026409 + 89.70 3.0FE XI 2 .026409 + 90.14 3.1FE XI 2 .026409 + 90.45 2.0FE XI 2 .026409 + 90.71 3.0UNSPEC'D 1 .830009 + 91.00 3.9UNSPEC'D 1 .830009 + 91.48 1.9UNSPEC'D 1 .830009 + 91.69 5.4NI X 2 .012800 + 91.81 4.8UNSPEC'D 1 .830009 + 92.09 3.8UNSPEC'D 1 .830009 + 92.81 3.8UNSPEC'D 1 .830009 + 93.61 5.6UNSPEC'D 1 .830009 + 94.07 8.2FE X 2 .015909 + 94.25 .1NE VII 2 .012600 + 94.39 1.7UNSPEC'D 1 .830009 + 94.90 .1NE VII 2 .012600 + 95.37 4.8FE X 2 .015909 + 95.51 2.9UNSPEC'D 1 .830009 + 95.81 2.9UNSPEC'D 1 .830009 + 96.05 8.2FE X 2 .015909 + 96.49 1.9UNSPEC'D 1 .830009 + 96.83 2.7FE X 2 .015909 + 97.12 5.2FE X 2 .015909 + 97.51 3.0BLEND 1 .830009 + 97.87 2.3FE X 2 .015909 + 98.12 2.7NE VIII 2 .022 + 98.26 2.7NE VIII 2 .022 + 98.50 2.6UNSPEC'D 1 .830009 + 99.71 2.0UNSPEC'D 1 .830009 + 99.99 2.7UNSPEC'D 1 .830009 + 100.54 8.4UNSPEC'D 1 .830009 + 103.01 1.5NE VIII 2 .022000 + 103.15 .1NE VII 2 .012600 + 103.58 6.1FE IX 2 .011509 + 103.94 6.1UNSPEC'D 1 .830009 + 105.23 5.1FE IX 2 .011509 + 106.25 2.0NE VII 2 .012600 + 108.05 1.5FE VIII 1 .415009 + 109.98 .1NE VII 2 .012600 + 110.56 .1NE VII 2 .012600 + 110.62 .1NE VII 2 .012600 + 110.76 1.5UNSPEC'D 1 .830009 + 111.16 .1NE VI 1 .481009 + 111.25 4.8UNSPEC'D 1 .830009 + 113.80 3.0UNSPEC'D 1 .830009 + 114.09 2.6UNSPEC'D 1 .830009 + 114.24 .1NE VI 1 .481009 + 115.39 .1NE VII 2 .012600 + 115.82 2.4UNSPEC'D 1 .830009 + 116.75 3.9UNSPEC'D 1 .830009 + 117.20 2.6UNSPEC'D 1 .830009 + 120.40 .1NE VII 2 .012600 + 121.15 .1NE VI 1 .481009 + 121.79 1.1UNSPEC'D 1 .830009 + 122.70 4.1NE VI 1 .481009 + 123.50 2.6UNSPEC'D 1 .830009 + 127.65 4.5UNSPEC'D 1 .830009 + 129.87 3.4 O VI 1 1.041009 + 130.30 .1NE VI 1 .481009 + 131.02 5.2BLEND 1 .830009 + 131.21 4.8BLEND 1 .830009 + 136.21 .1NE VI 1 .481009 + 136.28 .1NE VI 1 .481009 + 136.34 .1NE VI 1 .481009 + 136.45 .1NE VI 1 .481009 + 136.48 .1NE VI 1 .481009 + 141.20 11.3UNSPEC'D 1 .830009 + 144.27 1.1NI X 2 .012800 + 145.04 14.1NI X 2 .012800 + 148.40 29.4NI XI 2 .025000 + 150.10 7.6 O VI 1 1.041009 + 152.15 13.1NI XII 2 .070000 + 154.18 6.9NI XII 2 .070000 + 157.73 6.2NI XIII 2 .120000 + 158.37 14.2NI X 2 .012800 + 159.98 13.0NI X 2 .012800 + 160.37 11.0UNSPEC'D 1 .830009 + 162.00 5.5UNSPEC'D 1 .830009 + 164.15 3.7NI XIV 2 .200000 + 167.50 19.5FE VIII 1 .415009 + 168.17 36.0FE VIII 1 .415009 + 168.55 20.5FE VIII 1 .415009 + 168.92 12.6FE VIII 1 .415009 + 169.70 23.4UNSPEC'D 1 .830009 + 171.08 307.5FE IX 2 .011509 + 172.17 11.2 O V 1 .473009 + 173.08 21.4BLEND 1 .830009 + 174.58 268.8FE X 2 .015909 + 175.26 33.1BLEND 1 .830009 + 177.24 162.5FE X 2 .015909 + 178.05 20.5FE XI 2 .026409 + 179.27 .4NI XV 2 .300000 + 179.75 20.6FE XI 2 .026409 + 180.41 179.0FE XI 2 .026409 + 181.14 21.2FE XI 2 .026409 + 182.17 23.1FE XI 2 .026409 + 183.45 1.5CA XIV 2 .150000 + 184.53 43.8FE X 2 .015909 + 184.80 2.3FE XI 2 .026409 + 185.21 18.2FE VIII B 1 .415009 + 186.60 3.2CA XIV 2 .150000 + 186.87 23.1 S XI B 2 .030000 + 187.95 .7AR XIV 2 .400000 + 188.23 9.7FE XII 2 .050409 + 188.31 120.0FE XI 2 .026409 + 190.02 42.3FE X 2 .015909 + 191.04 10.5FE XII 2 .050409 + 191.34 9.0FE XIII B 2 .088109 + 192.40 40.0FE XII 2 .050409 + 192.82 58.8FE XI 2 .026409 + 193.52 65.5FE XII 2 .050409 + 195.13 107.0FE XII 2 .050409 + 196.52 9.7FE XIII 2 .088109 + 196.65 2.9FE XII 2 .050409 + 197.44 4.0FE XIII 2 .088109 + 198.58 7.1FE XII B 2 .050409 + 200.02 15.0FE XIII 2 .088109 + 201.13 25.5FE XIII B 2 .088109 + 202.05 39.5FE XIII 2 .088109 + 202.64 22.1BLEND 1 .830009 + 203.81 19.5FE XIII 2 .088109 + 204.25 7.2FE XIII 2 .088109 + 204.94 4.9FE XIII 2 .088109 + 206.26 1.5UNSPEC'D 1 .830009 + 206.38 1.5UNSPEC'D 1 .830009 + 207.46 1.5UNSPEC'D 1 .830009 + 208.33 1.8 S X B 2 .025000 + 209.63 .9FE XIII 2 .088109 + 209.78 1.1UNSPEC'D 1 .830009 + 211.32 27.4FE XIV 2 .150009 + 212.14 8.0 S XII 2 .070000 + 213.78 2.5FE XIII 2 .088109 + 214.75 4.3SI VIII 2 .015800 + 215.16 14.5 S XII 2 .070000 + 216.88 10.0SI VIII B 2 .015800 + 218.19 18.5 S XII 2 .070000 + 219.13 7.2FE XIV 2 .150009 + 220.08 10.3FE XIV 2 .150009 + 221.44 17.8 S XII 2 .070000 + 221.82 .9FE XIII 2 .088109 + 224.74 41.7 S IX B 2 .015000 + 225.12 76.5BLEND 1 .830009 + 227.01 41.5SI IX 2 .016000 + 227.19 .2FE XV 2 .408009 + 227.47 29.5 S XII 2 .050000 + 228.70 20.4 S X 2 .020000 + 230.65 13.0HE II 1 .415009 + 231.55 15.8HE II 1 .415009 + 232.60 23.0HE II 1 .415009 + 233.84 3.6FE XV 2 .408009 + 234.38 33.1BLEND 1 .830009 + 237.12 3.9FE XII 2 .0504 + 237.20 .2SI XIV 2 1.5 + 237.33 19.3HE II 1 .37 + 239.87 20.0 S XI 2 .030000 + 240.71 16.7FE XIII 2 .088109 + 241.74 89.4FE IX 2 .011509 + 243.03 87.0HE II 1 .37 + 243.78 5.7FE XV 2 .408009 + 244.92 58.0FE IX 2 .011509 + 245.94 1.0BLEND 1 .830009 + 246.21 22.8FE XIII 2 .088109 + 246.91 11.7BLEND 1 .830009 + 247.18 24.9BLEND 1 .830009 + 249.18 1.2NI XVII 2 .900009 + 251.10 .8FE XVI 2 1.000009 + 251.95 22.8FE XIII 2 .088109 + 252.19 16.0FE XIV 2 .150009 + 253.78 16.5SI X 2 .035000 + 256.32 235.0HE II 1 .37 + 256.38 36.3SI X 2 .035000 + 256.64 15.0 S XIII 2 .120000 + 256.92 2.5FE XV 2 .408009 + 257.16 65.7 S X B 2 .025000 + 257.39 17.9FE XIV B 2 .150009 + 258.36 85.0SI X 2 .035000 + 259.52 36.2 S X 2 .025000 + 261.05 42.0SI X 2 .035000 + 262.99 2.0FE XVI 2 1.000009 + 264.24 31.2 S X 2 .025000 + 264.80 30.0FE XIV 2 .150009 + 270.51 25.0FE XIV 2 .150009 + 271.99 45.6SI X 2 .035000 + 272.64 8.8SI VII 2 .014000 + 274.19 50.0FE XIV 2 .150009 + 275.35 21.5SI VII 2 .014000 + 275.67 17.9SI VII 2 .014000 + 276.15 6.1MG VII 2 .008760 + 276.84 7.5BLEND 1 .830009 + 277.00 3.0BLEND 1 .830009 + 277.27 63.0BLEND 1 .830009 + 278.40 24.1MG VII B 2 .008760 + 281.41 10.5 S XI 2 .030000 + 284.15 100.0FE XV 2 .408009 + 285.70 14.4 S XI G 2 .030000 + 289.17 11.8FE XIV 2 .150009 + 290.69 30.0SI IX 2 .024000 + 291.70 15.0 S XI G 2 .030000 + 292.78 44.0SI IX 2 .024000 + 296.19 50.0SI IX 2 .024000 + 299.50 8.7 S XII 2 .070000 + 303.31 235.0SI XI 2 .120000 + 303.78 6000.0HE II 1 .37 + 315.02 133.5MG VIII 2 .009640 + 316.20 112.5SI VIII 2 .015800 + 319.01 17.5NI XV 2 .300000 + 319.83 146.3SI VIII 2 .015800 + 320.56 4.7NI XVIIIB 2 1.100000 + 335.41 34.0FE XVI 2 1.000009 + 345.13 96.3SI IX 2 .024000 + 345.74 84.0FE X 2 .015909 + 347.39 141.0SI X 2 .035000 + 349.85 96.3SI IX 2 .024000 + 356.01 103.4SI X 2 .035000 + 360.80 17.5FE XVI 2 1.000009 + 364.48 75.6FE XII 2 .050409 + 368.07 739.4MG IX 2 .011040 + 399.82 15.6NE VI 1 .481009 + 401.14 34.5NE VI 1 .481009 + 401.94 91.2NE VI 1 .481009 + 403.26 53.4NE VI 1 .481009 + 417.24 8.8FE XV 2 .408009 + 430.47 82.3MG VIII 2 .009640 + 436.70 122.4MG VIII 2 .009640 + 453.00 1.3HE I (C) 1 .830009 + 454.00 1.3HE I (C) 1 .830009 + 455.00 1.3HE I (C) 1 .830009 + 456.00 1.3HE I (C) 1 .830009 + 457.00 1.3HE I (C) 1 .830009 + 458.00 1.3HE I (C) 1 .830009 + 459.00 1.3HE I (C) 1 .830009 + 460.00 1.6HE I (C) 1 .830009 + 461.00 1.6HE I (C) 1 .830009 + 462.00 1.6HE I (C) 1 .830009 + 463.00 1.6HE I (C) 1 .830009 + 464.00 1.6HE I (C) 1 .830009 + 465.00 2.0HE I (C) 1 .830009 + 465.22 180.0NE VII 2 .012600 + 466.00 2.0HE I (C) 1 .830009 + 467.00 2.0HE I (C) 1 .830009 + 468.00 2.5HE I (C) 1 .830009 + 469.00 2.5HE I (C) 1 .830009 + 470.00 2.5HE I (C) 1 .830009 + 471.00 2.5HE I (C) 1 .830009 + 472.00 2.9HE I (C) 1 .830009 + 473.00 2.9HE I (C) 1 .830009 + 474.00 3.3HE I (C) 1 .830009 + 475.00 3.3HE I (C) 1 .830009 + 476.00 3.3HE I (C) 1 .830009 + 477.00 3.8HE I (C) 1 .830009 + 478.00 3.8HE I (C) 1 .830009 + 479.00 4.1HE I (C) 1 .830009 + 480.00 4.1HE I (C) 1 .830009 + 481.00 4.5HE I (C) 1 .830009 + 482.00 4.5HE I (C) 1 .830009 + 483.00 5.0HE I (C) 1 .830009 + 484.00 5.4HE I (C) 1 .830009 + 485.00 5.4HE I (C) 1 .830009 + 486.00 5.8HE I (C) 1 .830009 + 487.00 6.1HE I (C) 1 .830009 + 488.00 6.6HE I (C) 1 .830009 + 489.00 6.6HE I (C) 1 .830009 + 489.50 11.0NE III 1 .326009 + 490.00 7.0HE I (C) 1 .830009 + 491.00 7.4HE I (C) 1 .830009 + 492.00 7.9HE I (C) 1 .830009 + 493.00 8.3HE I (C) 1 .830009 + 494.00 8.6HE I (C) 1 .830009 + 495.00 9.5HE I (C) 1 .830009 + 496.00 9.9HE I (C) 1 .830009 + 497.00 10.4HE I (C) 1 .830009 + 498.00 10.8HE I (C) 1 .830009 + 499.00 11.5HE I (C) 1 .830009 + 499.37 77.5SI XII 2 .150000 + 500.00 12.0HE I (C) 1 .830009 + 501.00 12.7HE I (C) 1 .830009 + 502.00 13.3HE I (C) 1 .830009 + 503.00 14.0HE I (C) 1 .830009 + 504.00 14.9HE I (C) 1 .830009 + 507.93 76.5 O III G 1 .415009 + 515.60 33.5HE I-3 1 .730009 + 520.66 35.6SI XII 2 .150000 + 525.80 75.6 O III 1 .415009 + 537.02 186.0HE I-2 1 .730009 + 542.80 23.2NE IV 1 .330009 + 550.00 23.2AL XI 1 .581009 + 554.37 799.2 O IV G 1 .460009 + 558.60 61.5NE VI 1 .481009 + 562.80 81.9NE VI 1 .481009 + 568.50 51.7BLEND 1 .830009 + 572.30 68.9BLEND 1 .830009 + 580.40 11.1 O II 1 .415009 + 584.33 1580.0HE I 1 .988009 + 592.40 19.2UNSPEC'D 1 .830009 + 599.60 190.0 O III 1 .415009 + 609.76 450.0MG X 2 .028009 + 616.60 16.7 O II 1 .415009 + 624.93 100.0MG X 2 .033009 + 629.73 1500.0 O V 1 .473009 + 638.50 24.9UNSPEC'D 1 .830009 + 640.41 5.9 S II 1 .415009 + 640.93 7.0 S II 1 .415009 + 641.81 9.2 S II 1 .415009 + 644.10 10.9 O II 1 .415009 + 650.30 15.6UNSPEC'D 1 .830009 + 657.30 6.2 S IV 1 .415009 + 661.40 6.2 S IV 1 .415009 + 671.50 10.6 N II 1 .498009 + 681.70 37.9NA IX 2 .009000 + 685.71 101.3 N III G 1 .523009 + 690.80 20.9UNSPEC'D 1 .830009 + 694.30 22.6NA IX 2 .009000 + 700.00 1.0 H LY(C) 1 1.000009 + 701.00 1.0 H LY(C) 1 1.000009 + 702.00 1.0 H LY(C) 1 1.000009 + 703.00 1.1 H LY(C) 1 1.000009 + 703.36 391.5 O III G 1 .415009 + 704.00 1.1 H LY(C) 1 1.000009 + 705.00 1.1 H LY(C) 1 1.000009 + 706.00 1.1 H LY(C) 1 1.000009 + 707.00 1.1 H LY(C) 1 1.000009 + 708.00 1.1 H LY(C) 1 1.000009 + 709.00 1.1 H LY(C) 1 1.000009 + 710.00 1.3 H LY(C) 1 1.000009 + 711.00 1.3 H LY(C) 1 1.000009 + 712.00 1.3 H LY(C) 1 1.000009 + 712.70 12.4 S VI 1 .498009 + 713.00 1.4 H LY(C) 1 1.000009 + 714.00 1.4 H LY(C) 1 1.000009 + 715.00 1.5 H LY(C) 1 1.000009 + 716.00 1.5 H LY(C) 1 1.000009 + 717.00 1.5 H LY(C) 1 1.000009 + 718.00 1.7 H LY(C) 1 1.000009 + 718.50 53.1 O II 1 .415009 + 719.00 1.7 H LY(C) 1 1.000009 + 720.00 1.7 H LY(C) 1 1.000009 + 721.00 1.7 H LY(C) 1 1.000009 + 722.00 1.8 H LY(C) 1 1.000009 + 723.00 1.8 H LY(C) 1 1.000009 + 724.00 1.9 H LY(C) 1 1.000009 + 725.00 1.9 H LY(C) 1 1.000009 + 726.00 1.9 H LY(C) 1 1.000009 + 727.00 1.9 H LY(C) 1 1.000009 + 728.00 2.0 H LY(C) 1 1.000009 + 729.00 2.0 H LY(C) 1 1.000009 + 730.00 2.2 H LY(C) 1 1.000009 + 731.00 2.2 H LY(C) 1 1.000009 + 732.00 2.2 H LY(C) 1 1.000009 + 733.00 2.4 H LY(C) 1 1.000009 + 734.00 2.4 H LY(C) 1 1.000009 + 735.00 2.4 H LY(C) 1 1.000009 + 736.00 2.5 H LY(C) 1 1.000009 + 737.00 2.5 H LY(C) 1 1.000009 + 738.00 2.7 H LY(C) 1 1.000009 + 739.00 2.7 H LY(C) 1 1.000009 + 740.00 2.7 H LY(C) 1 1.000009 + 741.00 2.8 H LY(C) 1 1.000009 + 742.00 2.9 H LY(C) 1 1.000009 + 743.00 2.9 H LY(C) 1 1.000009 + 744.00 3.0 H LY(C) 1 1.000009 + 745.00 3.0 H LY(C) 1 1.000009 + 746.00 3.2 H LY(C) 1 1.000009 + 747.00 3.3 H LY(C) 1 1.000009 + 748.00 3.4 H LY(C) 1 1.000009 + 749.00 3.4 H LY(C) 1 1.000009 + 750.00 3.5 H LY(C) 1 1.000009 + 750.01 40.5UNSPEC'D 1 .830009 + 751.00 3.7 H LY(C) 1 1.000009 + 752.00 3.7 H LY(C) 1 1.000009 + 753.00 3.8 H LY(C) 1 1.000009 + 754.00 3.9 H LY(C) 1 1.000009 + 755.00 3.9 H LY(C) 1 1.000009 + 756.00 4.1 H LY(C) 1 1.000009 + 757.00 4.2 H LY(C) 1 1.000009 + 758.00 4.3 H LY(C) 1 1.000009 + 758.68 34.9 O V 1 .473009 + 759.00 4.6 H LY(C) 1 1.000009 + 759.44 26.7 O V 1 .473009 + 760.00 4.6 H LY(C) 1 1.000009 + 760.30 93.0 O V 1 .473009 + 761.00 4.7 H LY(C) 1 1.000009 + 761.13 23.2 O V 1 .473009 + 762.00 4.8 H LY(C) 1 1.000009 + 762.00 34.9 O V 1 .473009 + 763.00 4.9 H LY(C) 1 1.000009 + 764.00 5.1 H LY(C) 1 1.000009 + 765.00 5.2 H LY(C) 1 1.000009 + 765.15 199.7 N IV 1 .581009 + 766.00 5.3 H LY(C) 1 1.000009 + 767.00 5.4 H LY(C) 1 1.000009 + 768.00 5.6 H LY(C) 1 1.000009 + 769.00 5.7 H LY(C) 1 1.000009 + 770.00 5.8 H LY(C) 1 1.000009 + 770.41 242.5NE VIII 2 .022000 + 771.00 6.1 H LY(C) 1 1.000009 + 772.00 6.2 H LY(C) 1 1.000009 + 773.00 6.3 H LY(C) 1 1.000009 + 774.00 6.6 H LY(C) 1 1.000009 + 775.00 6.6 H LY(C) 1 1.000009 + 776.00 11.8 N II 1 .498009 + 776.00 6.8 H LY(C) 1 1.000009 + 777.00 7.1 H LY(C) 1 1.000009 + 778.00 7.2 H LY(C) 1 1.000009 + 779.00 7.3 H LY(C) 1 1.000009 + 780.00 7.6 H LY(C) 1 1.000009 + 780.32 130.6NE VIII 2 .022000 + 781.00 7.7 H LY(C) 1 1.000009 + 782.00 8.0 H LY(C) 1 1.000009 + 783.00 8.1 H LY(C) 1 1.000009 + 784.00 8.3 H LY(C) 1 1.000009 + 785.00 8.6 H LY(C) 1 1.000009 + 786.00 8.7 H LY(C) 1 1.000009 + 786.47 146.3 S V 1 .415009 + 787.00 9.1 H LY(C) 1 1.000009 + 787.71 277.5 O IV 1 .460009 + 788.00 9.2 H LY(C) 1 1.000009 + 789.00 9.5 H LY(C) 1 1.000009 + 790.00 9.6 H LY(C) 1 1.000009 + 790.15 477.3 O IV G 1 .460009 + 791.00 10.0 H LY(C) 1 1.000009 + 792.00 10.2 H LY(C) 1 1.000009 + 793.00 10.3 H LY(C) 1 1.000009 + 794.00 10.7 H LY(C) 1 1.000009 + 795.00 11.0 H LY(C) 1 1.000009 + 796.00 11.2 H LY(C) 1 1.000009 + 797.00 11.5 H LY(C) 1 1.000009 + 798.00 11.9 H LY(C) 1 1.000009 + 799.00 12.1 H LY(C) 1 1.000009 + 800.00 12.4 H LY(C) 1 1.000009 + 801.00 12.9 H LY(C) 1 1.000009 + 802.00 13.1 H LY(C) 1 1.000009 + 803.00 13.5 H LY(C) 1 1.000009 + 804.00 13.9 H LY(C) 1 1.000009 + 805.00 14.1 H LY(C) 1 1.000009 + 806.00 14.5 H LY(C) 1 1.000009 + 807.00 14.9 H LY(C) 1 1.000009 + 808.00 15.3 H LY(C) 1 1.000009 + 809.00 15.6 H LY(C) 1 1.000009 + 810.00 16.0 H LY(C) 1 1.000009 + 811.00 16.5 H LY(C) 1 1.000009 + 812.00 16.9 H LY(C) 1 1.000009 + 813.00 17.3 H LY(C) 1 1.000009 + 814.00 17.8 H LY(C) 1 1.000009 + 815.00 18.3 H LY(C) 1 1.000009 + 816.00 18.6 H LY(C) 1 1.000009 + 817.00 19.1 H LY(C) 1 1.000009 + 818.00 19.5 H LY(C) 1 1.000009 + 819.00 20.2 H LY(C) 1 1.000009 + 820.00 20.5 H LY(C) 1 1.000009 + 821.00 21.2 H LY(C) 1 1.000009 + 822.00 21.7 H LY(C) 1 1.000009 + 823.00 22.3 H LY(C) 1 1.000009 + 824.00 22.9 H LY(C) 1 1.000009 + 825.00 23.4 H LY(C) 1 1.000009 + 826.00 24.0 H LY(C) 1 1.000009 + 827.00 24.7 H LY(C) 1 1.000009 + 828.00 25.2 H LY(C) 1 1.000009 + 829.00 25.9 H LY(C) 1 1.000009 + 830.00 26.6 H LY(C) 1 1.000009 + 831.00 27.2 H LY(C) 1 1.000009 + 832.00 27.9 H LY(C) 1 1.000009 + 833.00 28.7 H LY(C) 1 1.000009 + 834.00 29.3 H LY(C) 1 1.000009 + 834.20 666.5 OII,IIIG 1 .415009 + 835.00 30.2 H LY(C) 1 1.000009 + 836.00 30.8 H LY(C) 1 1.000009 + 837.00 31.6 H LY(C) 1 1.000009 + 838.00 32.4 H LY(C) 1 1.000009 + 839.00 33.3 H LY(C) 1 1.000009 + 840.00 34.1 H LY(C) 1 1.000009 + 841.00 35.1 H LY(C) 1 1.000009 + 842.00 35.8 H LY(C) 1 1.000009 + 843.00 36.8 H LY(C) 1 1.000009 + 844.00 37.7 H LY(C) 1 1.000009 + 845.00 38.7 H LY(C) 1 1.000009 + 846.00 39.7 H LY(C) 1 1.000009 + 847.00 40.7 H LY(C) 1 1.000009 + 848.00 41.7 H LY(C) 1 1.000009 + 849.00 42.7 H LY(C) 1 1.000009 + 850.00 43.8 H LY(C) 1 1.000009 + 851.00 45.0 H LY(C) 1 1.000009 + 852.00 46.1 H LY(C) 1 1.000009 + 853.00 47.4 H LY(C) 1 1.000009 + 854.00 48.5 H LY(C) 1 1.000009 + 855.00 49.7 H LY(C) 1 1.000009 + 856.00 51.0 H LY(C) 1 1.000009 + 857.00 52.4 H LY(C) 1 1.000009 + 858.00 53.6 H LY(C) 1 1.000009 + 859.00 55.0 H LY(C) 1 1.000009 + 860.00 56.4 H LY(C) 1 1.000009 + 861.00 57.9 H LY(C) 1 1.000009 + 862.00 59.2 H LY(C) 1 1.000009 + 863.00 60.7 H LY(C) 1 1.000009 + 864.00 62.2 H LY(C) 1 1.000009 + 865.00 63.9 H LY(C) 1 1.000009 + 866.00 65.5 H LY(C) 1 1.000009 + 867.00 67.1 H LY(C) 1 1.000009 + 868.00 68.9 H LY(C) 1 1.000009 + 869.00 70.6 H LY(C) 1 1.000009 + 870.00 72.4 H LY(C) 1 1.000009 + 871.00 74.2 H LY(C) 1 1.000009 + 872.00 76.1 H LY(C) 1 1.000009 + 873.00 78.1 H LY(C) 1 1.000009 + 874.00 80.1 H LY(C) 1 1.000009 + 875.00 82.1 H LY(C) 1 1.000009 + 876.00 84.1 H LY(C) 1 1.000009 + 877.00 86.2 H LY(C) 1 1.000009 + 878.00 88.5 H LY(C) 1 1.000009 + 879.00 90.7 H LY(C) 1 1.000009 + 880.00 93.0 H LY(C) 1 1.000009 + 881.00 95.4 H LY(C) 1 1.000009 + 882.00 97.9 H LY(C) 1 1.000009 + 883.00 100.4 H LY(C) 1 1.000009 + 884.00 102.9 H LY(C) 1 1.000009 + 885.00 105.5 H LY(C) 1 1.000009 + 886.00 108.1 H LY(C) 1 1.000009 + 887.00 110.8 H LY(C) 1 1.000009 + 888.00 113.7 H LY(C) 1 1.000009 + 889.00 116.6 H LY(C) 1 1.000009 + 890.00 119.6 H LY(C) 1 1.000009 + 891.00 122.6 H LY(C) 1 1.000009 + 892.00 125.7 H LY(C) 1 1.000009 + 893.00 128.8 H LY(C) 1 1.000009 + 894.00 132.1 H LY(C) 1 1.000009 + 895.00 135.4 H LY(C) 1 1.000009 + 896.00 138.9 H LY(C) 1 1.000009 + 897.00 142.4 H LY(C) 1 1.000009 + 898.00 145.9 H LY(C) 1 1.000009 + 899.00 149.7 H LY(C) 1 1.000009 + 900.00 153.5 H LY(C) 1 1.000009 + 901.00 157.4 H LY(C) 1 1.000009 + 902.00 161.4 H LY(C) 1 1.000009 + 903.00 165.5 H LY(C) 1 1.000009 + 904.00 169.7 H LY(C) 1 1.000009 + 904.10 116.9 C II G 1 .498009 + 905.00 174.0 H LY(C) 1 1.000009 + 906.00 178.3 H LY(C) 1 1.000009 + 907.00 182.9 H LY(C) 1 1.000009 + 908.00 187.6 H LY(C) 1 1.000009 + 909.00 192.3 H LY(C) 1 1.000009 + 910.00 197.2 H LY(C) 1 1.000009 + 911.00 202.1 H LY(C) 1 1.000009 + 912.00 207.3 H LY(C) 1 1.000009 + 913.00 2.4 C I (C) 1 .498009 + 913.99 155.0BLEND 1 .830009 + 914.00 2.4 C I (C) 1 .498009 + 914.99 130.0BLEND 1 .830009 + 915.00 2.4 C I (C) 1 .498009 + 915.99 115.0BLEND 1 .830009 + 916.00 2.5 C I (C) 1 .498009 + 916.99 100.0BLEND 1 .830009 + 917.00 2.5 C I (C) 1 .498009 + 918.00 2.7 C I (C) 1 .498009 + 918.99 100.0BLEND 1 .830009 + 919.00 2.7 C I (C) 1 .498009 + 920.00 2.8 C I (C) 1 .498009 + 920.96 115.0 H LY-9 1 1.000009 + 921.00 2.8 C I (C) 1 .498009 + 922.00 2.8 C I (C) 1 .498009 + 923.00 3.0 C I (C) 1 .498009 + 923.15 120.0 H LY-8 B 1 1.000009 + 924.00 3.0 C I (C) 1 .498009 + 925.00 3.1 C I (C) 1 .498009 + 926.00 3.1 C I (C) 1 .498009 + 926.20 125.0 H LY-7 1 1.000009 + 927.00 3.2 C I (C) 1 .498009 + 928.00 3.2 C I (C) 1 .498009 + 929.00 3.3 C I (C) 1 .498009 + 930.00 3.3 C I (C) 1 .498009 + 930.75 130.0 H LY-6 B 1 1.000009 + 931.00 3.4 C I (C) 1 .498009 + 932.00 3.4 C I (C) 1 .498009 + 933.00 3.5 C I (C) 1 .498009 + 933.38 98.0 S VI 1 .498009 + 934.00 3.5 C I (C) 1 .498009 + 935.00 3.6 C I (C) 1 .498009 + 936.00 3.6 C I (C) 1 .498009 + 937.00 3.7 C I (C) 1 .498009 + 937.80 190.0 H LY-5 1 1.000009 + 938.00 3.8 C I (C) 1 .498009 + 939.00 3.8 C I (C) 1 .498009 + 940.00 3.9 C I (C) 1 .498009 + 941.00 3.9 C I (C) 1 .498009 + 942.00 4.1 C I (C) 1 .498009 + 943.00 4.3 C I (C) 1 .498009 + 944.00 4.3 C I (C) 1 .498009 + 944.52 65.0 S VI 1 .498009 + 945.00 4.4 C I (C) 1 .498009 + 946.00 4.5 C I (C) 1 .498009 + 947.00 4.5 C I (C) 1 .498009 + 948.00 4.6 C I (C) 1 .498009 + 949.00 4.7 C I (C) 1 .498009 + 949.74 350.0 H LY-4 1 1.000009 + 950.00 4.7 C I (C) 1 .498009 + 951.00 4.8 C I (C) 1 .498009 + 952.00 4.9 C I (C) 1 .498009 + 953.00 5.0 C I (C) 1 .498009 + 954.00 5.0 C I (C) 1 .498009 + 955.00 5.1 C I (C) 1 .498009 + 956.00 5.3 C I (C) 1 .498009 + 957.00 5.4 C I (C) 1 .498009 + 958.00 5.5 C I (C) 1 .498009 + 959.00 5.6 C I (C) 1 .498009 + 960.00 5.6 C I (C) 1 .498009 + 961.00 5.7 C I (C) 1 .498009 + 962.00 5.8 C I (C) 1 .498009 + 963.00 5.9 C I (C) 1 .498009 + 964.00 6.1 C I (C) 1 .498009 + 965.00 6.2 C I (C) 1 .498009 + 966.00 6.3 C I (C) 1 .498009 + 967.00 6.5 C I (C) 1 .498009 + 968.00 6.6 C I (C) 1 .498009 + 969.00 6.7 C I (C) 1 .498009 + 970.00 6.8 C I (C) 1 .498009 + 971.00 6.9 C I (C) 1 .498009 + 972.00 7.0 C I (C) 1 .498009 + 972.54 824.0 H LY-3 1 1.000009 + 973.00 7.1 C I (C) 1 .498009 + 974.00 7.2 C I (C) 1 .498009 + 975.00 7.4 C I (C) 1 .498009 + 976.00 7.6 C I (C) 1 .498009 + 977.00 7.8 C I (C) 1 .498009 + 977.02 5957.0 C III 1 .608009 + 978.00 7.9 C I (C) 1 .498009 + 979.00 8.0 C I (C) 1 .498009 + 980.00 8.2 C I (C) 1 .498009 + 981.00 8.3 C I (C) 1 .498009 + 982.00 8.4 C I (C) 1 .498009 + 983.00 8.5 C I (C) 1 .498009 + 984.00 8.8 C I (C) 1 .498009 + 985.00 8.9 C I (C) 1 .498009 + 986.00 9.0 C I (C) 1 .498009 + 987.00 9.2 C I (C) 1 .498009 + 988.00 9.3 C I (C) 1 .498009 + 989.00 9.6 C I (C) 1 .498009 + 989.79 191.3 N III 1 .523009 + 990.00 9.7 C I (C) 1 .498009 + 991.00 10.0 C I (C) 1 .498009 + 991.55 382.5 N III 1 .523009 + 992.00 10.1 C I (C) 1 .498009 + 993.00 10.3 C I (C) 1 .498009 + 994.00 10.4 C I (C) 1 .498009 + 995.00 10.6 C I (C) 1 .498009 + 996.00 10.8 C I (C) 1 .498009 + 997.00 10.9 C I (C) 1 .498009 + 998.00 11.3 C I (C) 1 .498009 + 999.00 11.5 C I (C) 1 .498009 + 1000.00 11.7 C I (C) 1 .498009 + 1001.00 11.8 C I (C) 1 .498009 + 1002.00 12.0 C I (C) 1 .498009 + 1003.00 12.3 C I (C) 1 .498009 + 1004.00 12.5 C I (C) 1 .498009 + 1005.00 12.8 C I (C) 1 .498009 + 1006.00 13.0 C I (C) 1 .498009 + 1007.00 13.2 C I (C) 1 .498009 + 1008.00 13.5 C I (C) 1 .498009 + 1009.00 13.7 C I (C) 1 .498009 + 1010.00 13.9 C I (C) 1 .498009 + 1010.20 85.0 C II 1 .498009 + 1011.00 14.1 C I (C) 1 .498009 + 1012.00 14.4 C I (C) 1 .498009 + 1013.00 14.8 C I (C) 1 .498009 + 1014.00 15.0 C I (C) 1 .498009 + 1015.00 15.3 C I (C) 1 .498009 + 1016.00 15.5 C I (C) 1 .498009 + 1017.00 15.8 C I (C) 1 .498009 + 1018.00 16.1 C I (C) 1 .498009 + 1019.00 16.4 C I (C) 1 .498009 + 1020.00 16.7 C I (C) 1 .498009 + 1021.00 17.0 C I (C) 1 .498009 + 1022.00 17.3 C I (C) 1 .498009 + 1023.00 17.6 C I (C) 1 .498009 + 1024.00 17.8 C I (C) 1 .498009 + 1025.00 18.3 C I (C) 1 .498009 + 1025.72 4375.0 H LY-2 1 1.000009 + 1026.00 18.6 C I (C) 1 .498009 + 1027.00 18.9 C I (C) 1 .498009 + 1028.00 19.3 C I (C) 1 .498009 + 1029.00 19.7 C I (C) 1 .498009 + 1030.00 20.0 C I (C) 1 .498009 + 1031.00 20.3 C I (C) 1 .498009 + 1031.91 3184.0 O VI 1 1.041009 + 1032.00 20.7 C I (C) 1 .498009 + 1033.00 21.0 C I (C) 1 .498009 + 1034.00 21.5 C I (C) 1 .498009 + 1035.00 21.9 C I (C) 1 .498009 + 1036.00 22.2 C I (C) 1 .498009 + 1036.34 418.0 C II 1 .498009 + 1037.00 22.6 C I (C) 1 .498009 + 1037.02 470.0 C II 1 .498009 + 1037.61 1703.0 O VI 1 1.041009 + 1038.00 23.1 C I (C) 1 .498009 + 1039.00 23.5 C I (C) 1 .498009 + 1040.00 24.0 C I (C) 1 .498009 + 1041.00 24.3 C I (C) 1 .498009 + 1042.00 24.8 C I (C) 1 .498009 + 1043.00 25.3 C I (C) 1 .498009 + 1044.00 25.7 C I (C) 1 .498009 + 1045.00 26.1 C I (C) 1 .498009 + 1046.00 26.7 C I (C) 1 .498009 + 1047.00 27.1 C I (C) 1 .498009 + 1048.00 27.6 C I (C) 1 .498009 + 1049.00 28.0 C I (C) 1 .498009 + 1050.00 28.7 C I (C) 1 .498009 + 1051.00 29.1 C I (C) 1 .498009 + 1052.00 29.6 C I (C) 1 .498009 + 1053.00 30.2 C I (C) 1 .498009 + 1054.00 30.7 C I (C) 1 .498009 + 1055.00 31.3 C I (C) 1 .498009 + 1056.00 31.9 C I (C) 1 .498009 + 1057.00 32.5 C I (C) 1 .498009 + 1058.00 33.0 C I (C) 1 .498009 + 1059.00 33.7 C I (C) 1 .498009 + 1060.00 34.2 C I (C) 1 .498009 + 1061.00 34.8 C I (C) 1 .498009 + 1062.00 35.5 C I (C) 1 .498009 + 1062.70 60.5 S IV ? 1 .415009 + 1063.00 36.1 C I (C) 1 .498009 + 1064.00 36.9 C I (C) 1 .498009 + 1065.00 37.4 C I (C) 1 .498009 + 1066.00 38.1 C I (C) 1 .498009 + 1067.00 38.8 C I (C) 1 .498009 + 1068.00 39.5 C I (C) 1 .498009 + 1069.00 40.2 C I (C) 1 .498009 + 1070.00 40.9 C I (C) 1 .498009 + 1071.00 41.8 C I (C) 1 .498009 + 1072.00 42.4 C I (C) 1 .498009 + 1073.00 43.2 C I (C) 1 .498009 + 1074.00 44.1 C I (C) 1 .498009 + 1075.00 44.7 C I (C) 1 .498009 + 1076.00 45.6 C I (C) 1 .498009 + 1077.00 46.4 C I (C) 1 .498009 + 1077.10 118.2 S III B 1 .415009 + 1078.00 47.4 C I (C) 1 .498009 + 1079.00 48.1 C I (C) 1 .498009 + 1080.00 49.0 C I (C) 1 .498009 + 1081.00 49.9 C I (C) 1 .498009 + 1082.00 50.9 C I (C) 1 .498009 + 1083.00 51.6 C I (C) 1 .498009 + 1084.00 52.6 C I (C) 1 .498009 + 1085.00 53.7 C I (C) 1 .498009 + 1085.10 559.0 N II G 1 .498009 + 1086.00 54.6 C I (C) 1 .498009 + 1087.00 55.6 C I (C) 1 .498009 + 1088.00 56.5 C I (C) 1 .498009 + 1089.00 57.6 C I (C) 1 .498009 + 1090.00 58.6 C I (C) 1 .498009 + 1091.00 59.7 C I (C) 1 .498009 + 1092.00 60.8 C I (C) 1 .498009 + 1093.00 61.8 C I (C) 1 .498009 + 1094.00 63.0 C I (C) 1 .498009 + 1095.00 64.2 C I (C) 1 .498009 + 1096.00 65.3 C I (C) 1 .498009 + 1097.00 66.5 C I (C) 1 .498009 + 1098.00 67.7 C I (C) 1 .498009 + 1099.00 68.8 C I (C) 1 .498009 + 1100.00 70.1 C I (C) 1 .498009 + 1122.50 311.7SI IV B 1 .581009 + 1128.30 387.0SI IV 1 .581009 + 1175.71 2783.0 C III 1 .608009 + 1206.52 4250.0SI III 1 .498009 + 1215.67300000.0 H LY-1 1 .830009 + 1238.82 191.2 N V 1 1.245009 + 1240.00 59.7QCON(01) 1 .820009 + 1241.00 61.5QCON(01) 1 .820009 + 1242.00 59.7QCON(01) 1 .820009 + 1242.80 83.9 N V 1 1.500000 + 1243.00 57.9QCON(01) 1 .820009 + 1244.00 56.1QCON(01) 1 .820009 + 1245.00 54.4QCON(01) 1 .820009 + 1246.00 52.7QCON(01) 1 .820009 + 1247.00 50.9QCON(01) 1 .820009 + 1248.00 49.2QCON(01) 1 .820009 + 1249.00 47.6QCON(01) 1 .820009 + 1250.00 125.1QCON(01) 1 .820009 + 1251.00 121.2QCON(01) 1 .820009 + 1252.00 117.3QCON(01) 1 .820009 + 1253.00 113.7QCON(01) 1 .820009 + 1254.00 109.6QCON(01) 1 .820009 + 1255.00 106.1QCON(01) 1 .820009 + 1256.00 102.2QCON(01) 1 .820009 + 1257.00 98.5QCON(01) 1 .820009 + 1258.00 94.9QCON(01) 1 .820009 + 1259.00 91.2QCON(01) 1 .820009 + 1260.00 62.1QCON(01) 1 .820009 + 1260.42 154.3SI II 1 .415009 + 1261.00 59.5QCON(01) 1 .820009 + 1262.00 57.0QCON(01) 1 .820009 + 1263.00 54.5QCON(01) 1 .820009 + 1264.00 52.1QCON(01) 1 .820009 + 1264.74 286.6SI II 1 .415009 + 1265.00 49.6QCON(01) 1 .820009 + 1266.00 47.3QCON(01) 1 .820009 + 1267.00 45.0QCON(01) 1 .820009 + 1268.00 42.8QCON(01) 1 .820009 + 1269.00 40.3QCON(01) 1 .820009 + 1270.00 84.4QCON(01) 1 .820009 + 1271.00 82.3QCON(01) 1 .820009 + 1272.00 80.1QCON(01) 1 .820009 + 1273.00 78.1QCON(01) 1 .820009 + 1274.00 75.9QCON(01) 1 .820009 + 1275.00 73.8QCON(01) 1 .820009 + 1276.00 71.9QCON(01) 1 .820009 + 1277.00 69.7QCON(01) 1 .820009 + 1278.00 67.7QCON(01) 1 .820009 + 1279.00 65.8QCON(01) 1 .820009 + 1280.00 48.0QCON(01) 1 .820009 + 1281.00 48.5QCON(01) 1 .820009 + 1282.00 48.9QCON(01) 1 .820009 + 1283.00 49.3QCON(01) 1 .820009 + 1284.00 49.8QCON(01) 1 .820009 + 1285.00 50.2QCON(01) 1 .820009 + 1286.00 50.6QCON(01) 1 .820009 + 1287.00 51.1QCON(01) 1 .820009 + 1288.00 51.5QCON(01) 1 .820009 + 1289.00 51.9QCON(01) 1 .820009 + 1290.00 82.6QCON(01) 1 .820009 + 1291.00 83.4QCON(01) 1 .820009 + 1292.00 84.1QCON(01) 1 .820009 + 1293.00 84.8QCON(01) 1 .820009 + 1294.00 85.7QCON(01) 1 .820009 + 1295.00 86.4QCON(01) 1 .820009 + 1296.00 87.2QCON(01) 1 .820009 + 1297.00 87.9QCON(01) 1 .820009 + 1298.00 88.7QCON(01) 1 .820009 + 1299.00 89.3QCON(01) 1 .820009 + 1300.00 88.1QCON(01) 1 .820009 + 1301.00 89.1QCON(01) 1 .820009 + 1302.00 89.9QCON(01) 1 .820009 + 1302.17 1155.0 O I 1 .415009 + 1303.00 90.5QCON(01) 1 .820009 + 1304.00 91.2QCON(01) 1 .820009 + 1304.86 1186.5 O I 1 .415009 + 1305.00 92.2QCON(01) 1 .820009 + 1306.00 93.0QCON(01) 1 .820009 + 1306.03 1291.5 O I 1 .415009 + 1307.00 94.0QCON(01) 1 .820009 + 1308.00 94.8QCON(01) 1 .820009 + 1309.00 95.5QCON(01) 1 .820009 + 1309.28 219.9SI III 1 .600000 + 1310.00 65.2QCON(01) 1 .820009 + 1311.00 65.6QCON(01) 1 .820009 + 1312.00 66.0QCON(01) 1 .820009 + 1313.00 66.6QCON(01) 1 .820009 + 1314.00 67.1QCON(01) 1 .820009 + 1315.00 67.6QCON(01) 1 .820009 + 1316.00 68.1QCON(01) 1 .820009 + 1317.00 68.6QCON(01) 1 .820009 + 1318.00 69.3QCON(01) 1 .820009 + 1318.95 132.5UNSPEC'D 1 .830009 + 1319.00 69.8QCON(01) 1 .820009 + 1320.00 75.0QCON(01) 1 .820009 + 1321.00 75.7QCON(01) 1 .820009 + 1322.00 76.4QCON(01) 1 .820009 + 1323.00 77.0QCON(01) 1 .820009 + 1324.00 77.6QCON(01) 1 .820009 + 1325.00 78.3QCON(01) 1 .820009 + 1326.00 79.0QCON(01) 1 .820009 + 1327.00 79.6QCON(01) 1 .820009 + 1328.00 80.3QCON(01) 1 .820009 + 1329.00 80.9QCON(01) 1 .820009 + 1330.00 90.7QCON(01) 1 .820009 + 1331.00 91.3QCON(01) 1 .820009 + 1332.00 92.0QCON(01) 1 .820009 + 1333.00 92.8QCON(01) 1 .820009 + 1334.00 93.7QCON(01) 1 .820009 + 1334.53 1955.0 C II 1 .600000 + 1335.00 94.4QCON(01) 1 .820009 + 1335.66 2677.5 C II 1 .600000 + 1336.00 95.1QCON(01) 1 .820009 + 1337.00 96.0QCON(01) 1 .820009 + 1338.00 96.7QCON(01) 1 .820009 + 1339.00 97.6QCON(01) 1 .820009 + 1340.00 88.4QCON(01) 1 .820009 + 1341.00 89.2QCON(01) 1 .820009 + 1342.00 90.0QCON(01) 1 .820009 + 1343.00 90.8QCON(01) 1 .820009 + 1344.00 91.6QCON(01) 1 .820009 + 1345.00 92.4QCON(01) 1 .820009 + 1346.00 93.1QCON(01) 1 .820009 + 1347.00 93.9QCON(01) 1 .820009 + 1348.00 94.8QCON(01) 1 .820009 + 1349.00 95.4QCON(01) 1 .820009 + 1350.00 102.1QCON(02) 1 .810009 + 1351.00 102.7QCON(02) 1 .810009 + 1352.00 103.4QCON(02) 1 .810009 + 1353.00 104.0QCON(02) 1 .810009 + 1354.00 104.8QCON(02) 1 .810009 + 1355.00 105.4QCON(02) 1 .810009 + 1355.60 346.5 O I 1 .415009 + 1356.00 106.2QCON(02) 1 .810009 + 1357.00 106.7QCON(02) 1 .810009 + 1358.00 107.5QCON(02) 1 .810009 + 1358.51 93.4 O I 1 .415009 + 1359.00 108.2QCON(02) 1 .810009 + 1360.00 101.5QCON(02) 1 .810009 + 1361.00 102.1QCON(02) 1 .810009 + 1362.00 102.8QCON(02) 1 .810009 + 1363.00 103.7QCON(02) 1 .810009 + 1364.00 104.5QCON(02) 1 .810009 + 1365.00 105.4QCON(02) 1 .810009 + 1366.00 106.3QCON(02) 1 .810009 + 1367.00 107.0QCON(02) 1 .810009 + 1368.00 107.9QCON(02) 1 .810009 + 1369.00 108.8QCON(02) 1 .810009 + 1370.00 108.8QCON(02) 1 .810009 + 1371.00 109.7QCON(02) 1 .810009 + 1372.00 110.6QCON(02) 1 .810009 + 1373.00 111.7QCON(02) 1 .810009 + 1374.00 112.5QCON(02) 1 .810009 + 1375.00 113.5QCON(02) 1 .810009 + 1376.00 114.4QCON(02) 1 .810009 + 1377.00 115.5QCON(02) 1 .810009 + 1378.00 116.4QCON(02) 1 .810009 + 1379.00 117.4QCON(02) 1 .810009 + 1380.00 100.1QCON(02) 1 .810009 + 1381.00 101.0QCON(02) 1 .810009 + 1382.00 101.8QCON(02) 1 .810009 + 1383.00 102.7QCON(02) 1 .810009 + 1384.00 103.6QCON(02) 1 .810009 + 1385.00 104.4QCON(02) 1 .810009 + 1386.00 105.4QCON(02) 1 .810009 + 1387.00 106.2QCON(02) 1 .810009 + 1388.00 107.1QCON(02) 1 .810009 + 1389.00 108.1QCON(02) 1 .810009 + 1390.00 134.7QCON(02) 1 .810009 + 1391.00 135.8QCON(02) 1 .810009 + 1392.00 136.9QCON(02) 1 .810009 + 1393.00 138.2QCON(02) 1 .810009 + 1393.76 1397.5SI IV 1 .700000 + 1394.00 139.5QCON(02) 1 .810009 + 1395.00 140.5QCON(02) 1 .810009 + 1396.00 141.7QCON(02) 1 .810009 + 1397.00 143.0QCON(02) 1 .810009 + 1398.00 144.1QCON(02) 1 .810009 + 1399.00 145.3QCON(02) 1 .810009 + 1400.00 172.1QCON(03) 1 .626009 + 1401.00 173.7QCON(03) 1 .626009 + 1402.00 174.9QCON(03) 1 .626009 + 1402.77 978.2SI IV 1 .700000 + 1403.00 176.5QCON(03) 1 .626009 + 1404.00 178.1QCON(03) 1 .626009 + 1405.00 179.7QCON(03) 1 .626009 + 1406.00 181.3QCON(03) 1 .626009 + 1407.00 182.9QCON(03) 1 .626009 + 1408.00 184.5QCON(03) 1 .626009 + 1409.00 186.1QCON(03) 1 .626009 + 1410.00 153.0QCON(03) 1 .626009 + 1411.00 154.3QCON(03) 1 .626009 + 1412.00 155.5QCON(03) 1 .626009 + 1413.00 156.9QCON(03) 1 .626009 + 1414.00 158.3QCON(03) 1 .626009 + 1415.00 159.6QCON(03) 1 .626009 + 1416.00 160.9QCON(03) 1 .626009 + 1417.00 162.3QCON(03) 1 .626009 + 1418.00 163.6QCON(03) 1 .626009 + 1419.00 165.1QCON(03) 1 .626009 + 1420.00 182.9QCON(03) 1 .626009 + 1421.00 184.4QCON(03) 1 .626009 + 1422.00 185.9QCON(03) 1 .626009 + 1423.00 187.5QCON(03) 1 .626009 + 1424.00 189.1QCON(03) 1 .626009 + 1425.00 190.6QCON(03) 1 .626009 + 1426.00 192.4QCON(03) 1 .626009 + 1427.00 194.0QCON(03) 1 .626009 + 1428.00 195.6QCON(03) 1 .626009 + 1429.00 197.3QCON(03) 1 .626009 + 1430.00 202.4QCON(03) 1 .626009 + 1431.00 204.0QCON(03) 1 .626009 + 1432.00 205.5QCON(03) 1 .626009 + 1433.00 207.4QCON(03) 1 .626009 + 1434.00 209.2QCON(03) 1 .626009 + 1435.00 210.8QCON(03) 1 .626009 + 1436.00 212.7QCON(03) 1 .626009 + 1437.00 214.5QCON(03) 1 .626009 + 1438.00 216.3QCON(03) 1 .626009 + 1439.00 218.1QCON(03) 1 .626009 + 1440.00 202.2QCON(03) 1 .626009 + 1441.00 203.9QCON(03) 1 .626009 + 1442.00 205.6QCON(03) 1 .626009 + 1443.00 207.3QCON(03) 1 .626009 + 1444.00 209.1QCON(03) 1 .626009 + 1445.00 211.0QCON(03) 1 .626009 + 1446.00 212.7QCON(03) 1 .626009 + 1447.00 214.5QCON(03) 1 .626009 + 1448.00 216.3QCON(03) 1 .626009 + 1449.00 218.1QCON(03) 1 .626009 + 1450.00 221.5QCON(04) 1 .437009 + 1451.00 223.3QCON(04) 1 .437009 + 1452.00 225.2QCON(04) 1 .437009 + 1453.00 227.1QCON(04) 1 .437009 + 1454.00 229.0QCON(04) 1 .437009 + 1455.00 230.9QCON(04) 1 .437009 + 1456.00 232.9QCON(04) 1 .437009 + 1457.00 234.9QCON(04) 1 .437009 + 1458.00 236.9QCON(04) 1 .437009 + 1459.00 238.9QCON(04) 1 .437009 + 1460.00 288.8QCON(04) 1 .437009 + 1461.00 291.3QCON(04) 1 .437009 + 1462.00 293.8QCON(04) 1 .437009 + 1463.00 296.3QCON(04) 1 .437009 + 1464.00 298.8QCON(04) 1 .437009 + 1465.00 301.3QCON(04) 1 .437009 + 1466.00 303.8QCON(04) 1 .437009 + 1467.00 306.4QCON(04) 1 .437009 + 1468.00 309.1QCON(04) 1 .437009 + 1469.00 311.7QCON(04) 1 .437009 + 1470.00 320.5QCON(04) 1 .437009 + 1471.00 323.5QCON(04) 1 .437009 + 1472.00 326.2QCON(04) 1 .437009 + 1472.99 493.5 S I 1 .415009 + 1473.00 329.0QCON(04) 1 .437009 + 1474.00 331.7QCON(04) 1 .437009 + 1475.00 334.5QCON(04) 1 .437009 + 1476.00 337.2QCON(04) 1 .437009 + 1477.00 340.0QCON(04) 1 .437009 + 1478.00 342.9QCON(04) 1 .437009 + 1479.00 345.7QCON(04) 1 .437009 + 1480.00 356.2QCON(04) 1 .437009 + 1481.00 359.1QCON(04) 1 .437009 + 1482.00 362.0QCON(04) 1 .437009 + 1483.00 365.2QCON(04) 1 .437009 + 1484.00 368.3QCON(04) 1 .437009 + 1485.00 371.4QCON(04) 1 .437009 + 1486.00 374.6QCON(04) 1 .437009 + 1487.00 377.6QCON(04) 1 .437009 + 1488.00 380.9QCON(04) 1 .437009 + 1489.00 384.1QCON(04) 1 .437009 + 1490.00 327.0QCON(04) 1 .437009 + 1491.00 329.9QCON(04) 1 .437009 + 1492.00 332.7QCON(04) 1 .437009 + 1493.00 335.4QCON(04) 1 .437009 + 1494.00 338.3QCON(04) 1 .437009 + 1495.00 341.2QCON(04) 1 .437009 + 1496.00 344.0QCON(04) 1 .437009 + 1497.00 347.0QCON(04) 1 .437009 + 1498.00 349.9QCON(04) 1 .437009 + 1499.00 353.0QCON(04) 1 .437009 + 1500.00 375.2QCON(05) 1 .370009 + 1501.00 378.5QCON(05) 1 .370009 + 1502.00 381.8QCON(05) 1 .370009 + 1503.00 384.9QCON(05) 1 .370009 + 1504.00 388.2QCON(05) 1 .370009 + 1505.00 391.6QCON(05) 1 .370009 + 1506.00 394.9QCON(05) 1 .370009 + 1507.00 398.2QCON(05) 1 .370009 + 1508.00 401.5QCON(05) 1 .370009 + 1509.00 405.0QCON(05) 1 .370009 + 1510.00 433.0QCON(05) 1 .370009 + 1511.00 436.6QCON(05) 1 .370009 + 1512.00 440.3QCON(05) 1 .370009 + 1513.00 444.1QCON(05) 1 .370009 + 1514.00 447.8QCON(05) 1 .370009 + 1515.00 451.5QCON(05) 1 .370009 + 1516.00 455.4QCON(05) 1 .370009 + 1517.00 459.1QCON(05) 1 .370009 + 1518.00 463.0QCON(05) 1 .370009 + 1519.00 467.0QCON(05) 1 .370009 + 1520.00 447.7QCON(05) 1 .370009 + 1521.00 451.9QCON(05) 1 .370009 + 1522.00 456.2QCON(05) 1 .370009 + 1523.00 460.3QCON(05) 1 .370009 + 1524.00 464.6QCON(05) 1 .370009 + 1525.00 468.8QCON(05) 1 .370009 + 1526.00 473.2QCON(05) 1 .370009 + 1526.71 871.5SI II 1 .415009 + 1527.00 477.5QCON(05) 1 .370009 + 1528.00 482.0QCON(05) 1 .370009 + 1529.00 486.3QCON(05) 1 .370009 + 1530.00 502.1QCON(05) 1 .370009 + 1531.00 506.8QCON(05) 1 .370009 + 1532.00 511.3QCON(05) 1 .370009 + 1533.00 515.9QCON(05) 1 .370009 + 1533.43 703.5SI II 1 .415009 + 1534.00 520.7QCON(05) 1 .370009 + 1535.00 525.4QCON(05) 1 .370009 + 1536.00 530.0QCON(05) 1 .370009 + 1537.00 534.8QCON(05) 1 .370009 + 1538.00 539.7QCON(05) 1 .370009 + 1539.00 544.4QCON(05) 1 .370009 + 1540.00 550.9QCON(05) 1 .370009 + 1541.00 555.8QCON(05) 1 .370009 + 1542.00 560.5QCON(05) 1 .370009 + 1543.00 565.5QCON(05) 1 .370009 + 1544.00 570.3QCON(05) 1 .370009 + 1545.00 575.3QCON(05) 1 .370009 + 1546.00 580.3QCON(05) 1 .370009 + 1547.00 585.4QCON(05) 1 .370009 + 1548.00 590.5QCON(05) 1 .370009 + 1548.20 4241.3 C IV 1 .700000 + 1549.00 595.7QCON(05) 1 .370009 + 1550.00 611.4QCON(06) 1 .311009 + 1550.77 2193.8 C IV 1 .700000 + 1551.00 617.0QCON(06) 1 .311009 + 1552.00 622.3QCON(06) 1 .311009 + 1553.00 627.7QCON(06) 1 .311009 + 1554.00 633.5QCON(06) 1 .311009 + 1555.00 638.8QCON(06) 1 .311009 + 1556.00 644.5QCON(06) 1 .311009 + 1557.00 650.3QCON(06) 1 .311009 + 1558.00 655.9QCON(06) 1 .311009 + 1559.00 661.7QCON(06) 1 .311009 + 1559.08 526.7FE II 1 .415009 + 1560.00 720.4QCON(06) 1 .311009 + 1561.00 725.8QCON(06) 1 .311009 + 1561.00 1099.7 C I G 1 .600000 + 1562.00 731.0QCON(06) 1 .311009 + 1563.00 736.4QCON(06) 1 .311009 + 1563.79 526.7FE II 1 .415009 + 1564.00 741.7QCON(06) 1 .311009 + 1565.00 747.2QCON(06) 1 .311009 + 1566.00 752.6QCON(06) 1 .311009 + 1567.00 758.2QCON(06) 1 .311009 + 1568.00 763.8QCON(06) 1 .311009 + 1569.00 769.5QCON(06) 1 .311009 + 1570.00 714.7QCON(06) 1 .311009 + 1570.24 311.7FE II 1 .415009 + 1571.00 720.5QCON(06) 1 .311009 + 1572.00 726.4QCON(06) 1 .311009 + 1573.00 732.2QCON(06) 1 .311009 + 1574.00 738.0QCON(06) 1 .311009 + 1575.00 743.9QCON(06) 1 .311009 + 1576.00 749.8QCON(06) 1 .311009 + 1577.00 756.0QCON(06) 1 .311009 + 1578.00 761.9QCON(06) 1 .311009 + 1579.00 768.0QCON(06) 1 .311009 + 1580.00 684.9QCON(06) 1 .311009 + 1581.00 690.6QCON(06) 1 .311009 + 1582.00 696.0QCON(06) 1 .311009 + 1583.00 701.5QCON(06) 1 .311009 + 1584.00 707.1QCON(06) 1 .311009 + 1585.00 712.6QCON(06) 1 .311009 + 1586.00 718.5QCON(06) 1 .311009 + 1587.00 724.1QCON(06) 1 .311009 + 1588.00 729.9QCON(06) 1 .311009 + 1589.00 735.6QCON(06) 1 .311009 + 1590.00 679.1QCON(06) 1 .311009 + 1591.00 685.0QCON(06) 1 .311009 + 1592.00 690.9QCON(06) 1 .311009 + 1593.00 696.7QCON(06) 1 .311009 + 1594.00 702.7QCON(06) 1 .311009 + 1594.57 177.5UNSPEC'D 1 .830009 + 1595.00 708.5QCON(06) 1 .311009 + 1596.00 714.5QCON(06) 1 .311009 + 1597.00 720.5QCON(06) 1 .311009 + 1598.00 726.7QCON(06) 1 .311009 + 1599.00 732.8QCON(06) 1 .311009 + 1600.00 762.0QCON(07) 1 .310009 + 1601.00 768.1QCON(07) 1 .310009 + 1602.00 774.4QCON(07) 1 .310009 + 1603.00 780.6QCON(07) 1 .310009 + 1604.00 786.8QCON(07) 1 .310009 + 1605.00 793.1QCON(07) 1 .310009 + 1606.00 799.6QCON(07) 1 .310009 + 1607.00 805.9QCON(07) 1 .310009 + 1608.00 812.5QCON(07) 1 .310009 + 1609.00 819.0QCON(07) 1 .310009 + 1610.00 905.9QCON(07) 1 .310009 + 1611.00 913.3QCON(07) 1 .310009 + 1612.00 920.7QCON(07) 1 .310009 + 1613.00 928.2QCON(07) 1 .310009 + 1614.00 935.8QCON(07) 1 .310009 + 1615.00 943.4QCON(07) 1 .310009 + 1616.00 951.0QCON(07) 1 .310009 + 1617.00 958.9QCON(07) 1 .310009 + 1618.00 966.8QCON(07) 1 .310009 + 1619.00 974.6QCON(07) 1 .310009 + 1620.00 1035.0QCON(07) 1 .310009 + 1621.00 1051.1QCON(07) 1 .310009 + 1622.00 1067.4QCON(07) 1 .310009 + 1623.00 1083.9QCON(07) 1 .310009 + 1624.00 1100.5QCON(07) 1 .310009 + 1625.00 1117.5QCON(07) 1 .310009 + 1626.00 1134.7QCON(07) 1 .310009 + 1627.00 1152.4QCON(07) 1 .310009 + 1628.00 1170.1QCON(07) 1 .310009 + 1629.00 1188.3QCON(07) 1 .310009 + 1630.00 1120.2QCON(07) 1 .310009 + 1631.00 1137.4QCON(07) 1 .310009 + 1632.00 1154.7QCON(07) 1 .310009 + 1633.00 1172.1QCON(07) 1 .310009 + 1634.00 1189.8QCON(07) 1 .310009 + 1635.00 1207.8QCON(07) 1 .310009 + 1636.00 1226.1QCON(07) 1 .310009 + 1637.00 1244.6QCON(07) 1 .310009 + 1638.00 1263.5QCON(07) 1 .310009 + 1639.00 1282.8QCON(07) 1 .310009 + 1640.00 1235.7QCON(07) 1 .310009 + 1640.27 1612.5FE II B 1 .415009 + 1640.38 587.5UNSPEC'D 1 .830009 + 1641.00 1256.6QCON(07) 1 .310009 + 1642.00 1277.5QCON(07) 1 .310009 + 1643.00 1298.7QCON(07) 1 .310009 + 1644.00 1320.1QCON(07) 1 .310009 + 1645.00 1342.1QCON(07) 1 .310009 + 1646.00 1364.4QCON(07) 1 .310009 + 1647.00 1386.9QCON(07) 1 .310009 + 1648.00 1409.8QCON(07) 1 .310009 + 1649.00 1433.3QCON(07) 1 .310009 + 1650.00 1968.6QCON(08) 1 .236009 + 1651.00 1996.2QCON(08) 1 .236009 + 1652.00 2023.5QCON(08) 1 .236009 + 1653.00 2051.3QCON(08) 1 .236009 + 1654.00 2079.7QCON(08) 1 .236009 + 1655.00 2108.3QCON(08) 1 .236009 + 1656.00 2137.7QCON(08) 1 .236009 + 1656.27 1857.1 C I G 1 .600000 + 1657.00 2167.3QCON(08)G 1 .236009 + 1657.38 2230.6 C I G 1 .600000 + 1658.00 2197.5QCON(08) 1 .236009 + 1659.00 2329.0QCON(08) 1 .236009 + 1660.00 1553.4QCON(08) 1 .236009 + 1661.00 1755.1QCON(08) 1 .236009 + 1662.00 1783.2QCON(08) 1 .236009 + 1663.00 1811.9QCON(08) 1 .236009 + 1664.00 1840.8QCON(08) 1 .236009 + 1665.00 1870.2QCON(08) 1 .236009 + 1666.00 1900.2QCON(08) 1 .236009 + 1667.00 1930.6QCON(08) 1 .236009 + 1668.00 1961.6QCON(08) 1 .236009 + 1669.00 1993.0QCON(08) 1 .236009 + 1670.00 1850.7QCON(08) 1 .236009 + 1670.79 2945.5FE II B 1 .415009 + 1671.00 1881.9QCON(08) 1 .236009 + 1672.00 1913.3QCON(08) 1 .236009 + 1673.00 1945.2QCON(08) 1 .236009 + 1674.00 1977.6QCON(08) 1 .236009 + 1675.00 2010.4QCON(08) 1 .236009 + 1676.00 2043.9QCON(08) 1 .236009 + 1676.85 322.5FE II 1 .415009 + 1677.00 2077.8QCON(08) 1 .236009 + 1678.00 2112.4QCON(08) 1 .236009 + 1679.00 2147.3QCON(08) 1 .236009 + 1680.00 2514.9QCON(08) 1 .236009 + 1681.00 2554.7QCON(08) 1 .236009 + 1682.00 2594.4QCON(08) 1 .236009 + 1683.00 2634.9QCON(08) 1 .236009 + 1684.00 2675.8QCON(08) 1 .236009 + 1685.00 2717.4QCON(08) 1 .236009 + 1686.00 2760.0QCON(08) 1 .236009 + 1687.00 2803.1QCON(08) 1 .236009 + 1688.00 2846.8QCON(08) 1 .236009 + 1689.00 2891.3QCON(08) 1 .236009 + 1690.00 3459.9QCON(08) 1 .236009 + 1691.00 3512.1QCON(08) 1 .236009 + 1692.00 3564.3QCON(08) 1 .236009 + 1693.00 3617.2QCON(08) 1 .236009 + 1694.00 3671.0QCON(08) 1 .236009 + 1695.00 3725.6QCON(08) 1 .236009 + 1696.00 3781.0QCON(08) 1 .236009 + 1697.00 3837.5QCON(08) 1 .236009 + 1698.00 3894.8QCON(08) 1 .236009 + 1699.00 3953.1QCON(08) 1 .236009 + 1700.00 4005.4QCON(09) 1 .155009 + 1701.00 4069.1QCON(09) 1 .155009 + 1702.00 4132.8QCON(09) 1 .155009 + 1703.00 4197.3QCON(09) 1 .155009 + 1704.00 4263.1QCON(09) 1 .155009 + 1705.00 4329.7QCON(09) 1 .155009 + 1706.00 4397.6QCON(09) 1 .155009 + 1707.00 4466.5QCON(09) 1 .155009 + 1708.00 4536.6QCON(09) 1 .155009 + 1709.00 4607.7QCON(09) 1 .155009 + 1710.00 3920.0QCON(09) 1 .155009 + 1711.00 3985.7QCON(09) 1 .155009 + 1712.00 4051.3QCON(09) 1 .155009 + 1713.00 4118.1QCON(09) 1 .155009 + 1713.01 1870.5FE II 1 .415009 + 1714.00 4186.0QCON(09) 1 .155009 + 1715.00 4254.8QCON(09) 1 .155009 + 1716.00 4324.8QCON(09) 1 .155009 + 1717.00 4396.0QCON(09) 1 .155009 + 1718.00 4468.3QCON(09) 1 .155009 + 1719.00 4541.8QCON(09) 1 .155009 + 1720.00 4440.4QCON(09) 1 .155009 + 1721.00 4475.5QCON(09) 1 .155009 + 1722.00 4509.8QCON(09) 1 .155009 + 1723.00 4544.5QCON(09) 1 .155009 + 1724.00 4579.4QCON(09) 1 .155009 + 1725.00 4614.4QCON(09) 1 .155009 + 1726.00 4649.9QCON(09) 1 .155009 + 1727.00 4685.7QCON(09) 1 .155009 + 1728.00 4721.7QCON(09) 1 .155009 + 1729.00 4758.1QCON(09) 1 .155009 + 1730.00 4052.4QCON(09) 1 .155009 + 1731.00 4084.8QCON(09) 1 .155009 + 1732.00 4116.8QCON(09) 1 .155009 + 1733.00 4148.9QCON(09) 1 .155009 + 1734.00 4181.5QCON(09) 1 .155009 + 1735.00 4214.3QCON(09) 1 .155009 + 1736.00 4247.3QCON(09) 1 .155009 + 1737.00 4280.6QCON(09) 1 .155009 + 1738.00 4314.1QCON(09) 1 .155009 + 1739.00 4347.9QCON(09) 1 .155009 + 1740.00 4823.2QCON(09) 1 .155009 + 1741.00 4866.0QCON(09) 1 .155009 + 1742.00 4904.1QCON(09) 1 .155009 + 1743.00 4942.6QCON(09) 1 .155009 + 1744.00 4981.2QCON(09) 1 .155009 + 1745.00 5020.2QCON(09) 1 .155009 + 1746.00 5059.6QCON(09) 1 .155009 + 1747.00 5099.2QCON(09) 1 .155009 + 1748.00 5139.2QCON(09) 1 .155009 + 1749.00 5179.4QCON(09) 1 .155009 + 1750.00 5500.4QCON(10) 1 .107009 + 1751.00 5543.9QCON(10) 1 .107009 + 1752.00 5587.4QCON(10) 1 .107009 + 1753.00 5631.1QCON(10) 1 .107009 + 1754.00 5675.2QCON(10) 1 .107009 + 1755.00 5719.6QCON(10) 1 .107009 + 1756.00 5764.5QCON(10) 1 .107009 + 1757.00 5809.7QCON(10) 1 .107009 + 1758.00 5855.2QCON(10) 1 .107009 + 1759.00 5901.1QCON(10) 1 .107009 + 1760.00 5981.2QCON(10) 1 .107009 + 1761.00 6028.5QCON(10) 1 .107009 + 1762.00 6075.9QCON(10) 1 .107009 + 1763.00 6123.5QCON(10) 1 .107009 + 1764.00 6171.5QCON(10) 1 .107009 + 1765.00 6219.7QCON(10) 1 .107009 + 1766.00 6268.5QCON(10) 1 .107009 + 1767.00 6317.6QCON(10) 1 .107009 + 1768.00 6367.1QCON(10) 1 .107009 + 1769.00 6417.1QCON(10) 1 .107009 + 1770.00 7143.8QCON(10) 1 .107009 + 1771.00 7200.5QCON(10) 1 .107009 + 1772.00 7256.9QCON(10) 1 .107009 + 1773.00 7313.8QCON(10) 1 .107009 + 1774.00 7371.1QCON(10) 1 .107009 + 1775.00 7428.9QCON(10) 1 .107009 + 1776.00 7487.0QCON(10) 1 .107009 + 1777.00 7545.7QCON(10) 1 .107009 + 1778.00 7604.9QCON(10) 1 .107009 + 1779.00 7664.3QCON(10) 1 .107009 + 1780.00 7817.3QCON(10) 1 .107009 + 1781.00 7879.1QCON(10) 1 .107009 + 1782.00 7940.8QCON(10) 1 .107009 + 1783.00 8003.1QCON(10) 1 .107009 + 1784.00 8065.7QCON(10) 1 .107009 + 1785.00 8129.0QCON(10) 1 .107009 + 1786.00 8192.6QCON(10) 1 .107009 + 1787.00 8256.8QCON(10) 1 .107009 + 1788.00 8321.5QCON(10) 1 .107009 + 1789.00 8386.7QCON(10) 1 .107009 + 1790.00 8007.6QCON(10) 1 .107009 + 1791.00 8070.8QCON(10) 1 .107009 + 1792.00 8133.9QCON(10) 1 .107009 + 1793.00 8197.7QCON(10) 1 .107009 + 1794.00 8261.9QCON(10) 1 .107009 + 1795.00 8326.7QCON(10) 1 .107009 + 1796.00 8391.9QCON(10) 1 .107009 + 1797.00 8457.6QCON(10) 1 .107009 + 1798.00 8523.9QCON(10) 1 .107009 + 1799.00 8590.6QCON(10) 1 .107009 + 1800.00 9060.2QCON(11) 1 .089009 + 1801.00 9130.3QCON(11) 1 .089009 + 1802.00 9200.3QCON(11) 1 .089009 + 1803.00 9271.1QCON(11) 1 .089009 + 1804.00 9342.2QCON(11) 1 .089009 + 1805.00 9414.0QCON(11) 1 .089009 + 1806.00 9486.4QCON(11) 1 .089009 + 1807.00 9559.3QCON(11) 1 .089009 + 1808.00 9632.7QCON(11) 1 .089009 + 1808.01 9660.0SI II 1 .415009 + 1809.00 9706.8QCON(11) 1 .089009 + 1810.00 10271.0QCON(11) 1 .089009 + 1811.00 10349.7QCON(11) 1 .089009 + 1812.00 10428.5QCON(11) 1 .089009 + 1813.00 10507.8QCON(11) 1 .089009 + 1814.00 10587.5QCON(11) 1 .089009 + 1815.00 10668.1QCON(11) 1 .089009 + 1816.00 10749.2QCON(11) 1 .089009 + 1816.93 14910.0SI II 1 .415009 + 1817.00 10831.0QCON(11) 1 .089009 + 1817.45 5775.0SI II 1 .415009 + 1818.00 10913.4QCON(11) 1 .089009 + 1819.00 10996.5QCON(11) 1 .089009 + 1820.00 12742.0QCON(11) 1 .089009 + 1821.00 12842.6QCON(11) 1 .089009 + 1822.00 12943.2QCON(11) 1 .089009 + 1823.00 13044.6QCON(11) 1 .089009 + 1824.00 13146.9QCON(11) 1 .089009 + 1825.00 13249.8QCON(11) 1 .089009 + 1826.00 13353.6QCON(11) 1 .089009 + 1827.00 13458.4QCON(11) 1 .089009 + 1828.00 13563.7QCON(11) 1 .089009 + 1829.00 13670.1QCON(11) 1 .089009 + 1830.00 12735.4QCON(11) 1 .089009 + 1831.00 12837.2QCON(11) 1 .089009 + 1832.00 12937.8QCON(11) 1 .089009 + 1833.00 13039.3QCON(11) 1 .089009 + 1834.00 13141.3QCON(11) 1 .089009 + 1835.00 13244.3QCON(11) 1 .089009 + 1836.00 13348.0QCON(11) 1 .089009 + 1837.00 13452.7QCON(11) 1 .089009 + 1838.00 13558.1QCON(11) 1 .089009 + 1839.00 13664.3QCON(11) 1 .089009 + 1840.00 10709.2QCON(11) 1 .089009 + 1841.00 10793.8QCON(11) 1 .089009 + 1842.00 10878.3QCON(11) 1 .089009 + 1843.00 10963.5QCON(11) 1 .089009 + 1844.00 11049.4QCON(11) 1 .089009 + 1845.00 11136.0QCON(11) 1 .089009 + 1846.00 11223.2QCON(11) 1 .089009 + 1847.00 11311.1QCON(11) 1 .089009 + 1848.00 11399.8QCON(11) 1 .089009 + 1849.00 11489.1QCON(11) 1 .089009 + 1850.00 11298.3QCON(12) 1 .083009 + 1851.00 11387.6QCON(12) 1 .083009 + 1852.00 11476.8QCON(12) 1 .083009 + 1853.00 11566.8QCON(12) 1 .083009 + 1854.00 11657.5QCON(12) 1 .083009 + 1855.00 11748.6QCON(12) 1 .083009 + 1856.00 11840.7QCON(12) 1 .083009 + 1857.00 11933.6QCON(12) 1 .083009 + 1858.00 12027.0QCON(12) 1 .083009 + 1859.00 12121.2QCON(12) 1 .083009 + 1860.00 13611.6QCON(12) 1 .083009 + 1861.00 13719.1QCON(12) 1 .083009 + 1862.00 13826.6QCON(12) 1 .083009 + 1863.00 13935.0QCON(12) 1 .083009 + 1864.00 14044.1QCON(12) 1 .083009 + 1865.00 14154.1QCON(12) 1 .083009 + 1866.00 14265.1QCON(12) 1 .083009 + 1867.00 14376.8QCON(12) 1 .083009 + 1868.00 14489.5QCON(12) 1 .083009 + 1869.00 14602.9QCON(12) 1 .083009 + 1870.00 14964.1QCON(12) 1 .083009 + 1871.00 15082.3QCON(12) 1 .083009 + 1872.00 15200.5QCON(12) 1 .083009 + 1873.00 15319.5QCON(12) 1 .083009 + 1874.00 15439.6QCON(12) 1 .083009 + 1875.00 15560.5QCON(12) 1 .083009 + 1876.00 15682.4QCON(12) 1 .083009 + 1877.00 15805.3QCON(12) 1 .083009 + 1878.00 15929.1QCON(12) 1 .083009 + 1879.00 16053.9QCON(12) 1 .083009 + 1880.00 16601.1QCON(12) 1 .083009 + 1881.00 16732.2QCON(12) 1 .083009 + 1882.00 16863.2QCON(12) 1 .083009 + 1883.00 16995.3QCON(12) 1 .083009 + 1884.00 17128.4QCON(12) 1 .083009 + 1885.00 17262.6QCON(12) 1 .083009 + 1886.00 17397.9QCON(12) 1 .083009 + 1887.00 17534.2QCON(12) 1 .083009 + 1888.00 17671.6QCON(12) 1 .083009 + 1889.00 17810.1QCON(12) 1 .083009 + 1890.00 18531.8QCON(12) 1 .083009 + 1891.00 18678.8QCON(12) 1 .083009 + 1892.00 18825.2QCON(12) 1 .083009 + 1893.00 18972.7QCON(12) 1 .083009 + 1894.00 19121.4QCON(12) 1 .083009 + 1895.00 19271.1QCON(12) 1 .083009 + 1896.00 19422.1QCON(12) 1 .083009 + 1897.00 19574.3QCON(12) 1 .083009 + 1898.00 19727.6QCON(12) 1 .083009 + 1899.00 19882.2QCON(12) 1 .083009 + 1900.00 18291.8QCON(12) 1 .083009 + 1901.00 18273.4QCON(12) 1 .083009 + 1902.00 18416.6QCON(12) 1 .083009 + 1903.00 18560.9QCON(12) 1 .083009 + 1904.00 18706.3QCON(12) 1 .083009 + 1905.00 18852.9QCON(12) 1 .083009 + 1906.00 19000.6QCON(12) 1 .083009 + 1907.00 19149.3QCON(12) 1 .083009 + 1908.00 19299.5QCON(12) 1 .083009 + 1909.00 19450.6QCON(12) 1 .083009 + 1910.00 21963.1QCON(12) 1 .083009 + 1911.00 21743.4QCON(12) 1 .083009 + 1912.00 21913.7QCON(12) 1 .083009 + 1913.00 22085.4QCON(12) 1 .083009 + 1914.00 22258.5QCON(12) 1 .083009 + 1915.00 22432.9QCON(12) 1 .083009 + 1916.00 22608.5QCON(12) 1 .083009 + 1917.00 22785.7QCON(12) 1 .083009 + 1918.00 22964.2QCON(12) 1 .083009 + 1919.00 23144.1QCON(12) 1 .083009 + 1920.00 19005.2QCON(12) 1 .083009 + 1921.00 20016.8QCON(12) 1 .083009 + 1922.00 20173.7QCON(12) 1 .083009 + 1923.00 20331.6QCON(12) 1 .083009 + 1924.00 20491.1QCON(12) 1 .083009 + 1925.00 20651.5QCON(12) 1 .083009 + 1926.00 20813.4QCON(12) 1 .083009 + 1927.00 20976.3QCON(12) 1 .083009 + 1928.00 21140.7QCON(12) 1 .083009 + 1929.00 21306.4QCON(12) 1 .083009 + 1930.00 26973.5QCON(12) 1 .083009 + 1931.00 19919.9QCON(12) 1 .083009 + 1932.00 20076.0QCON(12) 1 .083009 + 1933.00 20233.3QCON(12) 1 .083009 + 1934.00 20391.9QCON(12) 1 .083009 + 1935.00 20551.6QCON(12) 1 .083009 + 1936.00 20712.7QCON(12) 1 .083009 + 1937.00 20874.9QCON(12) 1 .083009 + 1938.00 21038.4QCON(12) 1 .083009 + 1939.00 21203.2QCON(12) 1 .083009 + 1940.00 21284.9QCON(12) 1 .083009 + 1941.00 25236.9QCON(12) 1 .083009 + 1942.00 25434.7QCON(12) 1 .083009 + 1943.00 25633.9QCON(12) 1 .083009 + 1944.00 25834.8QCON(12) 1 .083009 + 1945.00 26037.2QCON(12) 1 .083009 + 1946.00 26241.2QCON(12) 1 .083009 + 1947.00 26446.8QCON(12) 1 .083009 + 1948.00 26654.0QCON(12) 1 .083009 + 1949.00 26862.8QCON(12) 1 .083009 + 1950.00 27073.2QCON(12) 1 .083009 + 1951.00 27285.3QCON(12) 1 .083009 + 1952.00 27499.1QCON(12) 1 .083009 + 1953.00 27714.5QCON(12) 1 .083009 + 1954.00 27931.7QCON(12) 1 .083009 + 1955.00 28150.5QCON(12) 1 .083009 + 1956.00 28371.1QCON(12) 1 .083009 + 1957.00 28593.3QCON(12) 1 .083009 + 1958.00 28817.4QCON(12) 1 .083009 + 1959.00 29043.1QCON(12) 1 .083009 + 1960.00 29270.7QCON(12) 1 .083009 + 1961.00 29500.0QCON(12) 1 .083009 + 1962.00 29731.1QCON(12) 1 .083009 + 1963.00 29964.0QCON(12) 1 .083009 + 1964.00 30198.8QCON(12) 1 .083009 + 1965.00 30435.4QCON(12) 1 .083009 + 1966.00 30673.8QCON(12) 1 .083009 + 1967.00 30914.2QCON(12) 1 .083009 + 1968.00 31156.4QCON(12) 1 .083009 + 1969.00 31400.5QCON(12) 1 .083009 + 1970.00 31646.5QCON(12) 1 .083009 + 1971.00 31894.4QCON(12) 1 .083009 + 1972.00 32144.3QCON(12) 1 .083009 + 1973.00 32396.1QCON(12) 1 .083009 + 1974.00 32649.9QCON(12) 1 .083009 + 1975.00 32905.7QCON(12) 1 .083009 + 1976.00 33163.5QCON(12) 1 .083009 + 1977.00 33423.4QCON(12) 1 .083009 + 1978.00 33685.2QCON(12) 1 .083009 + 1979.00 33949.2QCON(12) 1 .083009 + 1980.00 34215.1QCON(12) 1 .083009 + 1981.00 34483.2QCON(12) 1 .083009 + 1982.00 34753.3QCON(12) 1 .083009 + 1983.00 35025.5QCON(12) 1 .083009 + 1984.00 35300.0QCON(12) 1 .083009 + 1985.00 35576.5QCON(12) 1 .083009 + 1986.00 35855.2QCON(12) 1 .083009 + 1987.00 36136.2QCON(12) 1 .083009 + 1988.00 36419.3QCON(12) 1 .083009 + 1989.00 36704.6QCON(12) 1 .083009 + 1990.00 36992.2QCON(12) 1 .083009 + 1991.00 37282.0QCON(12) 1 .083009 + 1992.00 37574.1QCON(12) 1 .083009 + 1993.00 37868.5QCON(12) 1 .083009 + 1994.00 38165.1QCON(12) 1 .083009 + 1995.00 38464.1QCON(12) 1 .083009 + 1996.00 38765.5QCON(12) 1 .083009 + 1997.00 39069.2QCON(12) 1 .083009 + 1998.00 39375.3QCON(12) 1 .083009 + 1999.00 39683.8QCON(12) 1 .083009 + 2000.00 39994.7QCON(12) 1 .083009 + .00 .0 + 81167 + UPDATED VERSION(ID=81160) OF 'SC#21REF'(ID=81099) + ======================================= + 81101: REFLECTS MINOR CORRECTION OF THE LATTER + (REVISED REF.FLUXES FOR 224.74--228.70 A, + REC# 247-252; ALSO CHANGED C(I) FOR S IX,X,XII & SI IX + + 81153: REVISED NE VII 465, SI XII 521, OII 508, AND H LY-3--9 AND + OTHER LINE FLUXES IN RANGE OF 920-1038 A. + + 81167: FURTHER REVISION OF H LY-6--9 FLUXES AND ADDITION OF + SUBSTITUTE-LINE ENTRIES AT 913.99, 914.99 A ETC. FOR + HIGHER MEMBERS OF LY-LINES NEAR CONVERGENCE; ALSO REVISED + SI XII 521 BACK TO ORIG. REF. FLUX (35.6). + + C(I) VALUES REPRESENT + 3-YEAR AVERAGES (77182-80269) + ONLY CRUDELY APPLICABLE + FOR SPECIFIC DATES; PLEASE READ + TEXT FILE '4SC#21' FOR GUIDANCE. + + diff --git a/EUV/euv91/aareadme.doc b/EUV/euv91/aareadme.doc new file mode 100755 index 0000000..4f232d9 --- /dev/null +++ b/EUV/euv91/aareadme.doc @@ -0,0 +1,98 @@ +========================================================================= +National Space Science Data Center Data set MS-13D June 1992 +========================================================================= + +NAME: Revised SERF2 Solar EUV Flux Model + +SCIENTIFIC CONTACT: W. Kent Tobiska + JPL, MS 264-723 + 4800 Oak Grove Dr. + Pasadena, CA 91109-8099 + Telephone: (818) 393-7742 + E-mail : W.Kent.Tobiska@cc2mhb.jpl.nasa.gov + Fax : (818) 393-4530 + +NSSDC CONTACT: D. Bilitza, GSFC/NSSDC code 633/STX, + Greenbelt, MD 20771, USA + Telephone: (301) 286-0190 + NSSDCA:: BILITZA + bilitza@nssdca.gsfc.nasa.gov + +FILES: (1) FORTRAN driver program SERFD.FOR 7 + (2) FORTRAN EUV91 subroutines EUV91SUB.FOR 34 + (3) input data file for (2) EUV91IX2.DAT 587 + (from 68173 to 88366) + (4) model coefficients (ASCII) EUV91COE.TXT 8 + (5) output of test run F80183.DAT 4 + (6) data file from 47001 to 68172 EUV91IX1.DAT 613 + (7) data file from 89001 to 90365 EUV91IX3.DAT 58 + (8) Log-file of recent updates UPDATE.LOG 9 + (9) IDL version of EUV91 EUV91.PRO 19 + (10) This file AAREADME.DOC + +BRIEF DESCRIPTION: + +The Revised SERF2 model was developed by Kent Tobiska and colleagues. +It describes the solar full-disk photon fluxes +at 1 AU for 39 EUV wavelength groups and discrete lines between 1.8 +and 105.0 nm (18 - 1050 Angstrom) for a given date. It represents an +advance over the previous SERF1 and SERF2 models, (i) by its ability +to incorporate new data sets as they become available, and (ii) by +extending beyond the SME Lyman-alpha timeframe. The Solar Electro- +magnetic Radiation Flux (SERF) study group is part of the World +Ionosphere Thermosphere Study (WITS) project organized by the +Scientific Committee on Solar-Terrestrial Physics (SCOSTEP). Solar +EUV photon fluxes are fundamental input parameters in the study of +the terrestrial and planetary upper atmospheres. Earlier EUV models +were reviewed by Lean (1987, 1990). + +The model is based on the time regression of the fluxes (in the 39 +wavelength groups) with four independent solar parameters: (1) H Lyman- +alpha, 121.6 nm, (2) He I 1083 nm equivalent width, (3) 10.7 cm radio +flux, daily and (4) 81-day running mean. (1) and (2) are used as the +independent model parameters for the chromospheric irradiances while +(3) and (4) are the independent parameters for the coronal and +transition region irradiances. Regression coefficients are determined +using EUV measurements of the OSO, AEROS, and AE satellites and of +five rocket flights. Using ground-based observations of the solar +radio flux (3,4) the model extends from 1947 to the present for coronal +EUV full-disk irradiances. Chromospheric EUV full-disk irradiances +can be obtained from 1976 to the present based on OSO, AE and SME +Lyman-alpha satellite data and ground-based He I 1083 nm equivalent +width observations. + +The software package was supplied by K. Tobiska and includes the main +program and subroutines [EUV91.FOR], the model data files containing +date (YYDDD), Lyman-alpha, He I 1083 (converted to units of Lyman-alpha), +10.7 cm solar radio flux (F10.7), and 81-day-mean F10.7 [EUV91INDEX1.DAT, +..2.DAT, ..3.DAT], the model coefficients [EUV91COEF.TXT], and output +from a test run of EUV91 [80183.DAT]. Program EUV91 provides energy and +photonfluxes for given date between 68178 (178th day of 1968) and 88366. +The final flux tables are stored in ASCII files (FYYDDD.DAT, YYDDD is +chosen date). To obtain irradiances before 68178 and after 88366 the +model index file EUV91INDEX.DAT has to be extended to cover those times. +An improved and corrected version of this code was released in April +1991, superseding the 1990 version. Recent updates of the model software +are explained in file UPDATE.LOG. + +REFERENCES + +H.E. Hinteregger, K. Fukui, and B.G. Gilson, Observational Reference +and Model Data on Solar EUV, from Measurements on AE-E, Geophys. Res. +Lett. 8, 1147-1150 (1981) [SERF1 model] + +J.L. Lean, Solar Ultraviolet Irradiance Variations: A Review, J. +Geophys. Res. 92, 839-868 (1987) + +W.K. Tobiska and C.A. Barth, A Solar EUV Flux Model, J. Geophys. Res. +95, 8243-8251 (1990) [SERF2 model] + +J.L. Lean, A Comparison of Models of the Sun's Extreme Ultraviolet +Irradiance Variations, J. Geophys. Res. 95, 11933-11944 (1990) + +K. Tobiska, Revised Solar Extreme Ultraviolet Flux Model, J. Atmos. +Terr. Phys. 53, 1005-1018 (1991) + +========================================================================= +National Space Science Data Center Data set MS-13D Jan 1992 +========================================================================= diff --git a/EUV/euv91/euv91.pro b/EUV/euv91/euv91.pro new file mode 100755 index 0000000..19e575d --- /dev/null +++ b/EUV/euv91/euv91.pro @@ -0,0 +1,227 @@ +From: STAR::"@nettlerash.berkeley.edu:kent@ssl.Berkeley.EDU" 12-JUN-1991 07:10:59.91 +To: ISAS::bilitza +CC: +Subj: + +Received: from nettlerash.berkeley.edu by STAR.STANFORD.EDU via SMTP + with TCP; Tue, 11 Jun 91 15:11:12-PST +Received: from sdaf1.ssl.berkeley.edu by nettlerash.berkeley.edu + (5.64/1.34) id AA04770; Tue, 11 Jun 91 12:21:36 -0700 +Received: by sdaf1.ssl.berkeley.edu (4.0/SMI-3.2) id AA05938; Tue, + 11 Jun 91 12:20:09 PDT +Date: Tue, 11 Jun 91 12:20:09 PDT +From: Kent Tobiska +Message-Id: <9106111920.AA05938@sdaf1.ssl.berkeley.edu> +To: bilitza%isas.span@star.stanford.edu + +;pro euv91 +;************************************************************************ +; This program creates the solar EUV irradiance for 18-1050 A based on +; the multiple linear regression model for solar EUV flux. Reference: +; Tobiska, W.K., Revised solar extreme ultraviolet flux model, JATP, +; (accepted) 1991. This paper was presented as XXVIII COSPAR, +; The Hague, STP I.2-P1, 1990. +; The model values produced in this program include: +; E_mod_ph = photon flux (39 wlg, # days modeled) +; E_mod = energy flux (39 wlg, # days modeled) +; specfluxm = photon flux (21 5nm bins, # days modeled) +; Files required for model to run: +; euv91coef.txt = ASCII file of model coefficients +; euv91index.dat = ASCII file of proxy values +; Files created by running this model: +; [Note: if these files are represented as arrays, then the +; rows are the values of a given wavelength interval for all +; dates (starting with the label of the wavelength) and the +; columns are the values of a given date for all wavelengths.] +; +; .dat = binary file (assoc(unit,fltarr(moddays+1)) +; 22 records: record item +; 0 dates +; 1-21 5nm ph flux +; _F.dat= binary file (assoc(unit,fltarr(moddays+1)) +; 40 records: record item +; 0 dates +; 1-39 photon flux +; 40 daily flux total +; _E.dat= binary file (assoc(unit,fltarr(moddays+1)) +; 40 records: record item +; 0 dates +; 1-39 energy flux +; 40 daily flux total +; +; K. Tobiska Baseline version: 7-31-90 Rev: 4-30-91 +;************************************************************************ + +print,'Initializing variables and reading files' +moddays=1 & yyddd=0. ; number of modeled days +c=fltarr(12,52) ; array of model coefficients +indices=fltarr(10,3750) ; array of proxy values +dates=fltarr(7500) ; array of dates available +lya=dates & he1=dates & f10=dates & f81=dates ; more arrays for indices +ij=fltarr(52)+1. ; identity vector +specwave=findgen(21)*50+25&specwave(0)=35. ; spectrum wavelengths +filename=' ' ; filename for saving data +wave1=[18.62,30.02,50.52,100.54,150.10,$ + 200.02,256.32,284.15,251.10,303.31,303.78,303.31,368.07,$ + 356.01,401.14,465.22,453.00,500.00,$ + 554.37,584.33,554.37,609.76,629.73,609.76,650.30,$ + 703.36,701.00,765.15,770.41,787.71,750.01,801.00,851.00,$ + 901.00,977.02,951.00,1025.72,1031.91,1001.00] +wave2=[29.52,49.22,99.99,148.40,198.58,249.18,$ + 256.32,284.15,299.50,303.31,303.78,349.85,368.07,$ + 399.82,436.70,465.22,499.37,550.00,$ + 554.37,584.33,599.60,609.76,629.73,644.10,700.00,$ + 703.36,750.00,765.15,770.41,787.71,800.00,850.00,900.00,$ + 950.00,977.02,1000.00,1025.72,1031.91,1050.00] +wave=(wave1+wave2)/2. ; average wavelength interval +temp1=fltarr(39)&temp2=temp1&temp=fltarr(6) ; temporary arrays + +openr,1,'euv91coef.txt' ; get the coefficients + line=' ' & for i=0,2 do readf,1,line & readf,1,c +openr,2,'euv91index2.dat' ; get the indices + for i=0,1 do readf,2,line & readf,2,indices +close,1 & close,2 + dates(0)=transpose(indices(0,*)) & dates(3750)=transpose(indices(5,*)) + lya(0)=transpose(indices(1,*)) & lya(3750)=transpose(indices(6,*)) + he1(0)=transpose(indices(2,*)) & he1(3750)=transpose(indices(7,*)) + f10(0)=transpose(indices(3,*)) & f10(3750)=transpose(indices(8,*)) + f81(0)=transpose(indices(4,*)) & f81(3750)=transpose(indices(9,*)) +read,' How many days will be modeled? ',moddays + ik=fltarr(moddays)+1. ; identity vector + E_mod_ph=fltarr(39,moddays) ; 39 wlgs (photon flux) + specfluxm=fltarr(21,moddays) ; consolidate to 5 nm bins +getdate: +read,' What is the starting date (yyddd: 68172-88366)? ',yyddd + ind1=where(dates eq yyddd) ; find the starting date + if (ind1(0) eq -1) then goto,getdate ; date out of range, try again +date=dates(ind1(0):ind1(0)+moddays-1) ; dates to be modeled +i1=lya(ind1(0):ind1(0)+moddays-1) ; lyman alpha +i2=he1(ind1(0):ind1(0)+moddays-1) ; helium I 10830 +i3=f10(ind1(0):ind1(0)+moddays-1) ; daily f10.7 +i4=f81(ind1(0):ind1(0)+moddays-1) ; 81-day smoothed f10.7 + for i=0,moddays-1 do begin ; substitute for missing data + if (lya(ind1(0)+i)eq 0)and(he1(ind1(0)+i)gt 0) then i1(i) = i2(i) ; Lya=HeI + if (lya(ind1(0)+i)eq 0) then i1(i) = (8.7e8)*i3(i) + 1.9e11 ; Lya=F10 + if (he1(ind1(0)+i)eq 0) then i2(i) = i1(i) ; HeI=Lya + end + +w1=1+(transpose(c(08,*))#ik)*(ij#exp(-i1*1e-10)); He I scaling factor +w2=1+(transpose(c(09,*))#ik)*(ij#exp(-i2*1e-10)); Lyman alpha scaling factor +w3=1+(transpose(c(10,*))#ik)*(ij#exp(-i3*.7)) ; F81 scaling factor +w4=1+(transpose(c(11,*))#ik)*(ij#exp(-i4*.7)) ; F10.7 scaling factor +model=((transpose(c(3,*))#ik)+$ ; create the model + (transpose(c(4,*))#ik)*(ij#i1)+$ + (transpose(c(5,*))#ik)*(ij#i2)+$ + (transpose(c(6,*))#ik)*(ij#i3)+$ + (transpose(c(7,*))#ik)*(ij#i4)) *w1*w2*w3*w4 + +print,'Making 5 nm bins and 39 wavelength groups' +E_mod_ph(0,0)=model(0,*) +E_mod_ph(1,0)=model(1,*)+model(2,*) +E_mod_ph(2,0)=model(3,*)+model(4,*) +E_mod_ph(3,0)=model(5,*)+model(6,*) +E_mod_ph(4,0)=model(7,*)+model(8,*) +E_mod_ph(5,0)=model(9,*)+model(10,*) +E_mod_ph(6,0)=model(11,*) +E_mod_ph(7,0)=model(12,*) +E_mod_ph(8,0)=model(13,*)+model(14,*) +E_mod_ph(9,0)=model(15,*) +E_mod_ph(10,0)=model(16,*) +E_mod_ph(11,0)=model(17,*) +E_mod_ph(12,0)=model(18,*) +E_mod_ph(13,0)=model(19,*)+model(20,*) +E_mod_ph(14,0)=model(21,*)+model(22,*) +E_mod_ph(15,0)=model(23,*) +E_mod_ph(16,0)=model(24,*)+model(25,*) +E_mod_ph(17,0)=model(26,*)+model(27,*) +E_mod_ph(18,0)=model(28,*) +E_mod_ph(19,0)=model(29,*) +E_mod_ph(20,0)=model(30,*) +E_mod_ph(21,0)=model(31,*) +E_mod_ph(22,0)=model(32,*) +E_mod_ph(23,0)=model(33,*)+model(34,*) +E_mod_ph(24,0)=model(35,*)+model(36,*) +E_mod_ph(25,0)=model(37,*) +E_mod_ph(26,0)=model(38,*) +E_mod_ph(27,0)=model(39,*) +E_mod_ph(28,0)=model(40,*) +E_mod_ph(29,0)=model(41,*) +E_mod_ph(30,0)=model(42,*)+model(43,*) +E_mod_ph(31,0)=model(44,*) +E_mod_ph(32,0)=model(45,*) +E_mod_ph(33,0)=model(46,*) +E_mod_ph(34,0)=model(47,*) +E_mod_ph(35,0)=model(48,*) +E_mod_ph(36,0)=model(49,*) +E_mod_ph(37,0)=model(50,*) +E_mod_ph(38,0)=model(51,*) +E_mod=(12400.*1.6022e-12)*(E_mod_ph*((1./wave)#ik)) ; energy flux + +specfluxm(0,0)=E_mod_ph(0,*)+E_mod_ph(1,*) +specfluxm(1,0)=E_mod_ph(2,*) +specfluxm(2,0)=E_mod_ph(3,*) +specfluxm(3,0)=E_mod_ph(4,*) +specfluxm(4,0)=E_mod_ph(5,*) +specfluxm(5,0)=E_mod_ph(6,*)+E_mod_ph(7,*)+E_mod_ph(8,*) +specfluxm(6,0)=E_mod_ph(9,*)+E_mod_ph(10,*)+E_mod_ph(11,*) +specfluxm(7,0)=E_mod_ph(12,*)+E_mod_ph(13,*) +specfluxm(8,0)=E_mod_ph(14,*) +specfluxm(9,0)=E_mod_ph(15,*)+E_mod_ph(16,*) +specfluxm(10,0)=E_mod_ph(17,*) +specfluxm(11,0)=E_mod_ph(18,*)+E_mod_ph(19,*)+E_mod_ph(20,*) +specfluxm(12,0)=E_mod_ph(21,*)+E_mod_ph(22,*)+E_mod_ph(23,*) +specfluxm(13,0)=E_mod_ph(24,*) +specfluxm(14,0)=E_mod_ph(25,*)+E_mod_ph(26,*) +specfluxm(15,0)=E_mod_ph(27,*)+E_mod_ph(28,*)+E_mod_ph(29,*)+E_mod_ph(30,*) +specfluxm(16,0)=E_mod_ph(31,*) +specfluxm(17,0)=E_mod_ph(32,*) +specfluxm(18,0)=E_mod_ph(33,*) +specfluxm(19,0)=E_mod_ph(34,*)+E_mod_ph(35,*) +specfluxm(20,0)=E_mod_ph(36,*)+E_mod_ph(37,*)+E_mod_ph(38,*) + +read,' What is the name of the file for saving the values: ',filename + print,'opening '+filename+'.dat' + openw,18,filename+'.dat',4*moddays+1 ; 5 nm binned photon flux + e=assoc(18,fltarr(moddays+1)) + print,'opening '+filename+'_F.dat' + openw,19,filename+'_F.dat',4*moddays+1 ; photon flux + ef=assoc(19,fltarr(moddays+1)) + print,'opening '+filename+'_E.dat' + openw,20,filename+'_E.dat',4*moddays+1 ; energy flux + ee=assoc(20,fltarr(moddays+1)) + for ii=0,21 do e(ii)=fltarr(moddays+1) ; initialize data files + for ii=0,40 do begin + ef(ii)=fltarr(moddays+1) + ee(ii)=fltarr(moddays+1) + end + for ii=1,21 do begin ; insert the wavelengths + temp(0)=specwave(ii-1) + e(ii)=temp + end + for ii=1,39 do begin ; insert the wavelengths + temp1(0)=wave1(ii-1)&temp2(0)=wave2(ii-1) + ef(ii)=temp1 + ee(ii)=temp2 + end + +print,'Inserting modeled values into data files' + for i=1,moddays do begin + print,date(i-1) + temp=e(0)&temp(i)=date(i-1)&e(0)=temp + for ii=1,21 do begin ; 5 nm bins - photon flux + temp=e(ii)&temp(i)=specfluxm(ii-1,i-1)&e(ii)=temp + end + temp=ef(0)&temp(i)=date(i-1)&ef(0)=temp + for ii=1,39 do begin + temp=ef(ii)&temp(i)=E_mod_ph(ii-1,i-1)&ef(ii)=temp + end + temp=ef(40)&temp(i)=total(E_mod_ph(*,i-1))&ef(40)=temp + temp=ee(0)&temp(i)=date(i-1)&ee(0)=temp + for ii=1,39 do begin + temp=ee(ii)&temp(i)=E_mod(ii-1,i-1)&ee(ii)=temp + end + temp=ee(40)&temp(i)=total(E_mod(*,i-1))&ee(40)=temp + end + +close,18,19,20 +end diff --git a/EUV/euv91/euv91coe.txt b/EUV/euv91/euv91coe.txt new file mode 100755 index 0000000..3541584 --- /dev/null +++ b/EUV/euv91/euv91coe.txt @@ -0,0 +1,97 @@ + SOLAR EUV MODEL COEFFICIENTS + wl1 wl2 K a0 8 numbers in this order: a1 a2 a3 a4 b1 b2 b3 b4 + + 19 30 2 -3.63742e+07 0 0 313454. 203595. 0 0 0 0 + 30 49 1 -1.09355e+07 -7.94382e-07 9.08989e-05 0 0 0 0 0 0 + 30 49 2 -6.09718e+07 0 0 550330. 357449. 0 0 0 0 + 51 100 1 -2.63824e+08 -1.91867e-05 0.00219300 0 0 0 0 0 0 + 51 100 2 -2.01169e+08 0 0 3.59384e+06 2.32841e+06 0 0 0 0 + 101 148 1 -1.04138e+08 -8.22424e-06 0.000891052 0 0 0 0 0 0 + 101 148 2 -210080. 0 0 634184. 409793. 0 0 0 0 + 150 199 1 -1.74864e+08 -1.80512e-05 0.00206329 0 0 0 0 0 0 + 150 199 2 -8.50452e+08 0 0 2.15983e+07 1.39840e+07 0 0 0 0 + 200 249 1 -2.03915e+08 -2.09982e-05 0.00240001 0 0 0 0 0 0 + 200 249 2 -1.89626e+09 0 0 2.02855e+07 1.31572e+07 0 0 0 0 + 256 256 1 -3.03544e+07 -1.74375e-05 0.00188883 0 0 0 0 0 0 + 284 284 2 -1.87425e+09 0 0 1.60441e+07 9.43640e+06 0 0 0 0 + 251 300 1 -7.71343e+07 -1.50827e-05 0.00172379 0 0 0 0 0 0 + 251 300 2 -3.82102e+09 0 0 3.48145e+07 2.27244e+07 0 0 0 0 + 303 303 2 -1.05822e+09 0 0 1.00705e+07 7.17696e+06 0 0 0 0 + 304 304 1 2.13752e+08 -0.000226291 0.0258646 0 0 0 0 0 0 + 303 350 2 -4.65860e+09 0 0 4.45973e+07 2.91061e+07 0 0 0 0 + 368 368 2 2.87050e+08 0 0 2.79581e+06 1.72142e+06 0 0 0 0 + 356 400 1 -5.81546e+06 -1.12352e-06 0.000128457 0 0 0 0 0 0 + 356 400 2 -1.24569e+09 0 0 1.90743e+07 1.20416e+07 0 0 0 0 + 401 437 1 -5.89509e+07 -1.22148e-05 0.00132441 0 0 0 0 0 0 + 401 437 2 -1.26274e+08 0 0 3.23658e+06 1.98280e+06 0 0 0 0 + 465 465 2 5.89122e+07 0 0 844715. 520445. 0 0 0 0 + 453 499 1 -1.97061e+08 -1.56248e-05 0.00169281 0 0 0 0 0 0 + 453 499 2 -9.71259e+08 0 0 1.08776e+07 7.12062e+06 0 0 0 0 + 500 550 1 -4.19500e+08 -4.59222e-05 0.00497529 0 0 0 0 0 0 + 500 550 2 -4.74330e+08 0 0 4.08502e+06 2.44630e+06 0 0 0 0 + 554 554 1 -7.97562e+07 -2.02404e-05 0.00219429 0 0 0 0 0 0 + 584 584 1 -2.40503e+09 -0.000153646 0.0175754 0 0 0 0 0 0 + 554 600 1 -1.46520e+09 -0.000121468 0.0131720 0 0 0 0 0 0 + 610 610 2 -2.41248e+08 0 0 5.22489e+06 2.80106e+06 0 0 0 0 + 630 630 1 -3.35139e+08 -6.93489e-05 0.00793148 0 0 0 0 0 0 + 610 644 1 -2.40644e+08 -5.17453e-05 0.00560413 0 0 0 0 0 0 + 610 644 2 -1.76203e+08 0 0 3.64330e+06 2.32576e+06 0 0 0 0 + 650 700 1 -1.27309e+08 -1.53872e-05 0.00166690 0 0 0 0 0 0 + 650 700 2 4.86650e+07 0 0 331301. 189074. 0 0 0 0 + 703 703 1 -2.33828e+07 -1.34285e-05 0.00145501 0 0 0 0 0 0 + 701 750 1 -6.59024e+07 -1.03395e-05 0.00112001 0 0 0 0 0 0 + 765 765 1 -9.70182e+07 -1.18974e-05 0.00128860 0 0 0 0 0 0 + 770 770 2 -3.39939e+07 0 0 1.75960e+06 1.12721e+06 0 0 0 0 + 788 790 1 -1.44845e+08 -3.41107e-05 0.00390139 0 0 0 0 0 0 + 750 800 1 -4.03358e+08 -4.75313e-05 0.00514938 0 0 0 0 0 0 + 750 800 2 -6.05958e+07 0 0 2.87651e+06 1.84637e+06 0 0 0 0 + 801 850 1 -1.91143e+09 -0.000152671 0.0165404 0 0 0 0 0 0 + 851 900 1 -6.50213e+09 -0.000412484 0.0471572 0 0 0 0 0 0 + 901 950 1 -5.46244e+09 -0.000364619 0.0416639 0 0 0 0 0 0 + 977 977 1 -3.42946e+09 -0.000386760 0.0418920 0 0 0 0 0 0 + 951 1000 1 -1.16091e+09 -0.000121071 0.0131176 0 0 0 0 0 0 +1026 1026 1 -8.49329e+09 -0.000538460 0.0615978 0 0 0 0 0 0 +1032 1032 1 -5.70932e+09 -0.000374521 0.0405749 0 0 0 0 0 0 +1001 1050 1 -4.28991e+09 -0.000302346 0.0327477 0 0 0 0 0 0 +1050 1099 1 -0 0 -0 0 0 0 0 0 0 +1100 1149 1 -0 0 -0 0 0 0 0 0 0 +1150 1199 1 0 0 -0 0 0 0 0 0 0 +1200 1249 1 0 0 -0 0 0 0 0 0 0 +1250 1299 1 0 0 0 0 0 0 0 0 0 +1300 1349 1 0 0 0 0 0 0 0 0 0 +1304 1304 1 0 0 0 0 0 0 0 0 0 +1335 1335 1 0 0 0 0 0 0 0 0 0 +1350 1399 1 0 0 0 0 0 0 0 0 0 +1400 1449 1 0 0 0 0 0 0 0 0 0 +1450 1499 1 0 0 0 0 0 0 0 0 0 +1500 1549 1 0 0 0 0 0 0 0 0 0 +1548 1548 1 0 0 0 0 0 0 0 0 0 +1550 1599 1 0 0 0 0 0 0 0 0 0 +1600 1649 1 0 0 -0 0 0 0 0 0 0 +1640 1640 1 0 0 -0 0 0 0 0 0 0 +1650 1699 1 0 0 0 0 0 0 0 0 0 +1657 1657 1 0 0 0 0 0 0 0 0 0 +1700 1749 1 0 0 0 0 0 0 0 0 0 +1750 1799 1 0 0 0 0 0 0 0 0 0 +1800 1849 1 0 0 0 0 0 0 0 0 0 +1808 1808 1 0 0 0 0 0 0 0 0 0 +1817 1817 1 0 0 0 0 0 0 0 0 0 + + +wl1 = start of wavelength interval +wl2 = end of wavelength interval +K = key (1=chromospheric and 2=transition region or coronal) +a0 through b4 = coefficients described in text +b1 through b4 are set to 0 in this revision (Apr 12 1991) +ref: Tobiska, W.K., Revised Solar Extreme Ultraviolet Flux Model, + JATP, in press, 1991. Also given as poster paper I.2-P1 at the + XXVIII COSPAR, The Hague, 1990. Preprints available from author + at Space Sciences Lab, Univ. of Cal., Berkeley, CA 94720, USA. + +The following intervals and lines have been slightly revised due to +reprocessing of the LASP 1989 data and incorporation of the smaller, +"nonstandard" lines into the wavelength range flux (Sep 4 1991): + 356-400(2), 401-437(2), 453-499(2), 500-550(1,2), 701-750(1), + 750-800(1,2), 801-850(1), 901-950(1), 977(1), 951-1000(1), + 1026(1), 1001-1050(1) +Far UV lines and intervals were added solely based on the SME data. diff --git a/EUV/euv91/euv91ix1.dat b/EUV/euv91/euv91ix1.dat new file mode 100755 index 0000000..aed0dc7 --- /dev/null +++ b/EUV/euv91/euv91ix1.dat @@ -0,0 +1,1246 @@ + Date Lyman-a He I 10830 F10 F81 Date Lyman-a He I 10830 F10 F81 + + 47001 0.00000E+00 0.00000E+00 0 0 57269 0.00000E+00 0.00000E+00 270 264 + 47002 0.00000E+00 0.00000E+00 0 0 57270 0.00000E+00 0.00000E+00 259 264 + 47003 0.00000E+00 0.00000E+00 0 0 57271 0.00000E+00 0.00000E+00 259 264 + 47004 0.00000E+00 0.00000E+00 0 0 57272 0.00000E+00 0.00000E+00 256 264 + 47005 0.00000E+00 0.00000E+00 0 0 57273 0.00000E+00 0.00000E+00 262 265 + 47006 0.00000E+00 0.00000E+00 0 0 57274 0.00000E+00 0.00000E+00 268 265 + 47007 0.00000E+00 0.00000E+00 0 0 57275 0.00000E+00 0.00000E+00 252 266 + 47008 0.00000E+00 0.00000E+00 0 0 57276 0.00000E+00 0.00000E+00 265 267 + 47009 0.00000E+00 0.00000E+00 0 0 57277 0.00000E+00 0.00000E+00 237 267 + 47010 0.00000E+00 0.00000E+00 0 0 57278 0.00000E+00 0.00000E+00 245 268 + 47011 0.00000E+00 0.00000E+00 0 0 57279 0.00000E+00 0.00000E+00 250 268 + 47012 0.00000E+00 0.00000E+00 0 0 57280 0.00000E+00 0.00000E+00 253 268 + 47013 0.00000E+00 0.00000E+00 0 0 57281 0.00000E+00 0.00000E+00 261 268 + 47014 0.00000E+00 0.00000E+00 0 0 57282 0.00000E+00 0.00000E+00 275 268 + 47015 0.00000E+00 0.00000E+00 0 0 57283 0.00000E+00 0.00000E+00 275 268 + 47016 0.00000E+00 0.00000E+00 0 0 57284 0.00000E+00 0.00000E+00 278 268 + 47017 0.00000E+00 0.00000E+00 0 0 57285 0.00000E+00 0.00000E+00 284 268 + 47018 0.00000E+00 0.00000E+00 0 0 57286 0.00000E+00 0.00000E+00 281 268 + 47019 0.00000E+00 0.00000E+00 0 0 57287 0.00000E+00 0.00000E+00 289 268 + 47020 0.00000E+00 0.00000E+00 0 0 57288 0.00000E+00 0.00000E+00 277 269 + 47021 0.00000E+00 0.00000E+00 0 0 57289 0.00000E+00 0.00000E+00 289 269 + 47022 0.00000E+00 0.00000E+00 0 0 57290 0.00000E+00 0.00000E+00 272 270 + 47023 0.00000E+00 0.00000E+00 0 0 57291 0.00000E+00 0.00000E+00 294 270 + 47024 0.00000E+00 0.00000E+00 0 0 57292 0.00000E+00 0.00000E+00 291 270 + 47025 0.00000E+00 0.00000E+00 0 0 57293 0.00000E+00 0.00000E+00 303 270 + 47026 0.00000E+00 0.00000E+00 0 0 57294 0.00000E+00 0.00000E+00 282 271 + 47027 0.00000E+00 0.00000E+00 0 0 57295 0.00000E+00 0.00000E+00 274 271 + 47028 0.00000E+00 0.00000E+00 0 0 57296 0.00000E+00 0.00000E+00 295 271 + 47029 0.00000E+00 0.00000E+00 0 0 57297 0.00000E+00 0.00000E+00 280 271 + 47030 0.00000E+00 0.00000E+00 0 0 57298 0.00000E+00 0.00000E+00 259 272 + 47031 0.00000E+00 0.00000E+00 0 0 57299 0.00000E+00 0.00000E+00 266 272 + 47032 0.00000E+00 0.00000E+00 0 0 57300 0.00000E+00 0.00000E+00 296 272 + 47033 0.00000E+00 0.00000E+00 0 0 57301 0.00000E+00 0.00000E+00 323 271 + 47034 0.00000E+00 0.00000E+00 0 0 57302 0.00000E+00 0.00000E+00 342 271 + 47035 0.00000E+00 0.00000E+00 0 0 57303 0.00000E+00 0.00000E+00 344 270 + 47036 0.00000E+00 0.00000E+00 0 0 57304 0.00000E+00 0.00000E+00 318 269 + 47037 0.00000E+00 0.00000E+00 0 0 57305 0.00000E+00 0.00000E+00 300 268 + 47038 0.00000E+00 0.00000E+00 0 0 57306 0.00000E+00 0.00000E+00 289 266 + 47039 0.00000E+00 0.00000E+00 0 0 57307 0.00000E+00 0.00000E+00 266 265 + 47040 0.00000E+00 0.00000E+00 0 0 57308 0.00000E+00 0.00000E+00 236 264 + 47041 0.00000E+00 0.00000E+00 0 0 57309 0.00000E+00 0.00000E+00 240 264 + 47042 0.00000E+00 0.00000E+00 0 0 57310 0.00000E+00 0.00000E+00 239 264 + 47043 0.00000E+00 0.00000E+00 0 0 57311 0.00000E+00 0.00000E+00 243 264 + 47044 0.00000E+00 0.00000E+00 0 0 57312 0.00000E+00 0.00000E+00 235 265 + 47045 0.00000E+00 0.00000E+00 258 243 57313 0.00000E+00 0.00000E+00 230 265 + 47046 0.00000E+00 0.00000E+00 256 242 57314 0.00000E+00 0.00000E+00 232 266 + 47047 0.00000E+00 0.00000E+00 248 241 57315 0.00000E+00 0.00000E+00 246 267 + 47048 0.00000E+00 0.00000E+00 232 241 57316 0.00000E+00 0.00000E+00 257 268 + 47049 0.00000E+00 0.00000E+00 207 241 57317 0.00000E+00 0.00000E+00 250 270 + 47050 0.00000E+00 0.00000E+00 182 241 57318 0.00000E+00 0.00000E+00 248 271 + 47051 0.00000E+00 0.00000E+00 166 241 57319 0.00000E+00 0.00000E+00 242 273 + 47052 0.00000E+00 0.00000E+00 155 241 57320 0.00000E+00 0.00000E+00 242 274 + 47053 0.00000E+00 0.00000E+00 148 241 57321 0.00000E+00 0.00000E+00 228 275 + 47054 0.00000E+00 0.00000E+00 149 242 57322 0.00000E+00 0.00000E+00 247 276 + 47055 0.00000E+00 0.00000E+00 167 243 57323 0.00000E+00 0.00000E+00 251 276 + 47056 0.00000E+00 0.00000E+00 195 245 57324 0.00000E+00 0.00000E+00 261 276 + 47057 0.00000E+00 0.00000E+00 173 247 57325 0.00000E+00 0.00000E+00 274 276 + 47058 0.00000E+00 0.00000E+00 193 249 57326 0.00000E+00 0.00000E+00 294 276 + 47059 0.00000E+00 0.00000E+00 236 250 57327 0.00000E+00 0.00000E+00 280 275 + 47060 0.00000E+00 0.00000E+00 265 251 57328 0.00000E+00 0.00000E+00 285 275 + 47061 0.00000E+00 0.00000E+00 283 252 57329 0.00000E+00 0.00000E+00 271 275 + 47062 0.00000E+00 0.00000E+00 296 252 57330 0.00000E+00 0.00000E+00 259 274 + 47063 0.00000E+00 0.00000E+00 305 251 57331 0.00000E+00 0.00000E+00 258 274 + 47064 0.00000E+00 0.00000E+00 309 250 57332 0.00000E+00 0.00000E+00 255 274 + 47065 0.00000E+00 0.00000E+00 309 248 57333 0.00000E+00 0.00000E+00 247 273 + 47066 0.00000E+00 0.00000E+00 324 247 57334 0.00000E+00 0.00000E+00 278 273 + 47067 0.00000E+00 0.00000E+00 349 246 57335 0.00000E+00 0.00000E+00 295 273 + 47068 0.00000E+00 0.00000E+00 347 245 57336 0.00000E+00 0.00000E+00 270 273 + 47069 0.00000E+00 0.00000E+00 329 243 57337 0.00000E+00 0.00000E+00 283 273 + 47070 0.00000E+00 0.00000E+00 306 242 57338 0.00000E+00 0.00000E+00 278 273 + 47071 0.00000E+00 0.00000E+00 308 241 57339 0.00000E+00 0.00000E+00 273 274 + 47072 0.00000E+00 0.00000E+00 362 240 57340 0.00000E+00 0.00000E+00 271 274 + 47073 0.00000E+00 0.00000E+00 269 239 57341 0.00000E+00 0.00000E+00 234 274 + 47074 0.00000E+00 0.00000E+00 225 238 57342 0.00000E+00 0.00000E+00 242 274 + 47075 0.00000E+00 0.00000E+00 203 238 57343 0.00000E+00 0.00000E+00 229 273 + 47076 0.00000E+00 0.00000E+00 181 239 57344 0.00000E+00 0.00000E+00 210 271 + 47077 0.00000E+00 0.00000E+00 158 239 57345 0.00000E+00 0.00000E+00 211 271 + 47078 0.00000E+00 0.00000E+00 142 239 57346 0.00000E+00 0.00000E+00 209 270 + 47079 0.00000E+00 0.00000E+00 142 240 57347 0.00000E+00 0.00000E+00 222 269 + 47080 0.00000E+00 0.00000E+00 150 240 57348 0.00000E+00 0.00000E+00 228 268 + 47081 0.00000E+00 0.00000E+00 160 240 57349 0.00000E+00 0.00000E+00 236 268 + 47082 0.00000E+00 0.00000E+00 166 240 57350 0.00000E+00 0.00000E+00 252 268 + 47083 0.00000E+00 0.00000E+00 165 240 57351 0.00000E+00 0.00000E+00 278 267 + 47084 0.00000E+00 0.00000E+00 161 241 57352 0.00000E+00 0.00000E+00 291 267 + 47085 0.00000E+00 0.00000E+00 182 241 57353 0.00000E+00 0.00000E+00 293 266 + 47086 0.00000E+00 0.00000E+00 195 240 57354 0.00000E+00 0.00000E+00 333 266 + 47087 0.00000E+00 0.00000E+00 199 240 57355 0.00000E+00 0.00000E+00 348 265 + 47088 0.00000E+00 0.00000E+00 227 240 57356 0.00000E+00 0.00000E+00 365 265 + 47089 0.00000E+00 0.00000E+00 227 240 57357 0.00000E+00 0.00000E+00 377 264 + 47090 0.00000E+00 0.00000E+00 258 240 57358 0.00000E+00 0.00000E+00 370 263 + 47091 0.00000E+00 0.00000E+00 252 240 57359 0.00000E+00 0.00000E+00 363 263 + 47092 0.00000E+00 0.00000E+00 261 241 57360 0.00000E+00 0.00000E+00 356 263 + 47093 0.00000E+00 0.00000E+00 301 242 57361 0.00000E+00 0.00000E+00 342 263 + 47094 0.00000E+00 0.00000E+00 296 243 57362 0.00000E+00 0.00000E+00 317 263 + 47095 0.00000E+00 0.00000E+00 347 243 57363 0.00000E+00 0.00000E+00 282 263 + 47096 0.00000E+00 0.00000E+00 417 244 57364 0.00000E+00 0.00000E+00 276 263 + 47097 0.00000E+00 0.00000E+00 456 245 57365 0.00000E+00 0.00000E+00 280 263 + 47098 0.00000E+00 0.00000E+00 423 245 58001 0.00000E+00 0.00000E+00 257 263 + 47099 0.00000E+00 0.00000E+00 356 246 58002 0.00000E+00 0.00000E+00 263 262 + 47100 0.00000E+00 0.00000E+00 334 247 58003 0.00000E+00 0.00000E+00 262 261 + 47101 0.00000E+00 0.00000E+00 298 247 58004 0.00000E+00 0.00000E+00 261 260 + 47102 0.00000E+00 0.00000E+00 234 247 58005 0.00000E+00 0.00000E+00 246 260 + 47103 0.00000E+00 0.00000E+00 191 248 58006 0.00000E+00 0.00000E+00 254 259 + 47104 0.00000E+00 0.00000E+00 168 248 58007 0.00000E+00 0.00000E+00 255 258 + 47105 0.00000E+00 0.00000E+00 158 248 58008 0.00000E+00 0.00000E+00 255 257 + 47106 0.00000E+00 0.00000E+00 156 248 58009 0.00000E+00 0.00000E+00 259 256 + 47107 0.00000E+00 0.00000E+00 157 248 58010 0.00000E+00 0.00000E+00 274 255 + 47108 0.00000E+00 0.00000E+00 158 248 58011 0.00000E+00 0.00000E+00 273 253 + 47109 0.00000E+00 0.00000E+00 154 248 58012 0.00000E+00 0.00000E+00 290 252 + 47110 0.00000E+00 0.00000E+00 153 247 58013 0.00000E+00 0.00000E+00 310 251 + 47111 0.00000E+00 0.00000E+00 157 246 58014 0.00000E+00 0.00000E+00 321 250 + 47112 0.00000E+00 0.00000E+00 165 246 58015 0.00000E+00 0.00000E+00 309 249 + 47113 0.00000E+00 0.00000E+00 187 244 58016 0.00000E+00 0.00000E+00 297 248 + 47114 0.00000E+00 0.00000E+00 227 244 58017 0.00000E+00 0.00000E+00 285 248 + 47115 0.00000E+00 0.00000E+00 237 244 58018 0.00000E+00 0.00000E+00 260 247 + 47116 0.00000E+00 0.00000E+00 296 244 58019 0.00000E+00 0.00000E+00 238 247 + 47117 0.00000E+00 0.00000E+00 299 244 58020 0.00000E+00 0.00000E+00 251 247 + 47118 0.00000E+00 0.00000E+00 281 245 58021 0.00000E+00 0.00000E+00 239 247 + 47119 0.00000E+00 0.00000E+00 294 247 58022 0.00000E+00 0.00000E+00 227 247 + 47120 0.00000E+00 0.00000E+00 292 248 58023 0.00000E+00 0.00000E+00 210 247 + 47121 0.00000E+00 0.00000E+00 258 249 58024 0.00000E+00 0.00000E+00 211 247 + 47122 0.00000E+00 0.00000E+00 265 250 58025 0.00000E+00 0.00000E+00 206 247 + 47123 0.00000E+00 0.00000E+00 272 249 58026 0.00000E+00 0.00000E+00 220 247 + 47124 0.00000E+00 0.00000E+00 278 249 58027 0.00000E+00 0.00000E+00 200 247 + 47125 0.00000E+00 0.00000E+00 262 249 58028 0.00000E+00 0.00000E+00 189 246 + 47126 0.00000E+00 0.00000E+00 219 249 58029 0.00000E+00 0.00000E+00 194 246 + 47127 0.00000E+00 0.00000E+00 236 249 58030 0.00000E+00 0.00000E+00 181 245 + 47128 0.00000E+00 0.00000E+00 226 249 58031 0.00000E+00 0.00000E+00 187 243 + 47129 0.00000E+00 0.00000E+00 220 250 58032 0.00000E+00 0.00000E+00 195 242 + 47130 0.00000E+00 0.00000E+00 221 250 58033 0.00000E+00 0.00000E+00 217 240 + 47131 0.00000E+00 0.00000E+00 221 250 58034 0.00000E+00 0.00000E+00 222 238 + 47132 0.00000E+00 0.00000E+00 235 251 58035 0.00000E+00 0.00000E+00 233 236 + 47133 0.00000E+00 0.00000E+00 255 251 58036 0.00000E+00 0.00000E+00 249 234 + 47134 0.00000E+00 0.00000E+00 191 251 58037 0.00000E+00 0.00000E+00 252 233 + 47135 0.00000E+00 0.00000E+00 182 250 58038 0.00000E+00 0.00000E+00 257 231 + 47136 0.00000E+00 0.00000E+00 230 249 58039 0.00000E+00 0.00000E+00 250 231 + 47137 0.00000E+00 0.00000E+00 234 247 58040 0.00000E+00 0.00000E+00 234 230 + 47138 0.00000E+00 0.00000E+00 235 244 58041 0.00000E+00 0.00000E+00 231 230 + 47139 0.00000E+00 0.00000E+00 248 242 58042 0.00000E+00 0.00000E+00 228 230 + 47140 0.00000E+00 0.00000E+00 282 241 58043 0.00000E+00 0.00000E+00 226 230 + 47141 0.00000E+00 0.00000E+00 328 239 58044 0.00000E+00 0.00000E+00 222 230 + 47142 0.00000E+00 0.00000E+00 294 238 58045 0.00000E+00 0.00000E+00 210 230 + 47143 0.00000E+00 0.00000E+00 328 237 58046 0.00000E+00 0.00000E+00 202 231 + 47144 0.00000E+00 0.00000E+00 340 237 58047 0.00000E+00 0.00000E+00 187 232 + 47145 0.00000E+00 0.00000E+00 323 238 58048 0.00000E+00 0.00000E+00 183 233 + 47146 0.00000E+00 0.00000E+00 300 238 58049 0.00000E+00 0.00000E+00 177 234 + 47147 0.00000E+00 0.00000E+00 294 239 58050 0.00000E+00 0.00000E+00 173 235 + 47148 0.00000E+00 0.00000E+00 338 239 58051 0.00000E+00 0.00000E+00 172 235 + 47149 0.00000E+00 0.00000E+00 327 240 58052 0.00000E+00 0.00000E+00 175 236 + 47150 0.00000E+00 0.00000E+00 289 240 58053 0.00000E+00 0.00000E+00 176 236 + 47151 0.00000E+00 0.00000E+00 254 241 58054 0.00000E+00 0.00000E+00 194 236 + 47152 0.00000E+00 0.00000E+00 254 242 58055 0.00000E+00 0.00000E+00 206 236 + 47153 0.00000E+00 0.00000E+00 253 242 58056 0.00000E+00 0.00000E+00 207 235 + 47154 0.00000E+00 0.00000E+00 219 242 58057 0.00000E+00 0.00000E+00 205 235 + 47155 0.00000E+00 0.00000E+00 215 242 58058 0.00000E+00 0.00000E+00 197 235 + 47156 0.00000E+00 0.00000E+00 215 242 58059 0.00000E+00 0.00000E+00 192 235 + 47157 0.00000E+00 0.00000E+00 211 242 58060 0.00000E+00 0.00000E+00 195 235 + 47158 0.00000E+00 0.00000E+00 238 241 58061 0.00000E+00 0.00000E+00 209 235 + 47159 0.00000E+00 0.00000E+00 258 241 58062 0.00000E+00 0.00000E+00 223 234 + 47160 0.00000E+00 0.00000E+00 261 241 58063 0.00000E+00 0.00000E+00 232 233 + 47161 0.00000E+00 0.00000E+00 239 240 58064 0.00000E+00 0.00000E+00 233 233 + 47162 0.00000E+00 0.00000E+00 183 240 58065 0.00000E+00 0.00000E+00 251 233 + 47163 0.00000E+00 0.00000E+00 147 240 58066 0.00000E+00 0.00000E+00 256 233 + 47164 0.00000E+00 0.00000E+00 170 239 58067 0.00000E+00 0.00000E+00 251 232 + 47165 0.00000E+00 0.00000E+00 171 239 58068 0.00000E+00 0.00000E+00 255 233 + 47166 0.00000E+00 0.00000E+00 168 238 58069 0.00000E+00 0.00000E+00 242 233 + 47167 0.00000E+00 0.00000E+00 178 238 58070 0.00000E+00 0.00000E+00 235 233 + 47168 0.00000E+00 0.00000E+00 208 237 58071 0.00000E+00 0.00000E+00 232 234 + 47169 0.00000E+00 0.00000E+00 251 236 58072 0.00000E+00 0.00000E+00 238 235 + 47170 0.00000E+00 0.00000E+00 278 236 58073 0.00000E+00 0.00000E+00 227 235 + 47171 0.00000E+00 0.00000E+00 270 235 58074 0.00000E+00 0.00000E+00 217 235 + 47172 0.00000E+00 0.00000E+00 287 235 58075 0.00000E+00 0.00000E+00 214 236 + 47173 0.00000E+00 0.00000E+00 295 235 58076 0.00000E+00 0.00000E+00 208 236 + 47174 0.00000E+00 0.00000E+00 282 235 58077 0.00000E+00 0.00000E+00 210 236 + 47175 0.00000E+00 0.00000E+00 258 235 58078 0.00000E+00 0.00000E+00 220 236 + 47176 0.00000E+00 0.00000E+00 262 236 58079 0.00000E+00 0.00000E+00 232 236 + 47177 0.00000E+00 0.00000E+00 235 236 58080 0.00000E+00 0.00000E+00 224 236 + 47178 0.00000E+00 0.00000E+00 220 236 58081 0.00000E+00 0.00000E+00 266 236 + 47179 0.00000E+00 0.00000E+00 245 237 58082 0.00000E+00 0.00000E+00 268 237 + 47180 0.00000E+00 0.00000E+00 233 238 58083 0.00000E+00 0.00000E+00 274 238 + 47181 0.00000E+00 0.00000E+00 206 238 58084 0.00000E+00 0.00000E+00 258 238 + 47182 0.00000E+00 0.00000E+00 195 238 58085 0.00000E+00 0.00000E+00 284 239 + 47183 0.00000E+00 0.00000E+00 195 238 58086 0.00000E+00 0.00000E+00 302 240 + 47184 0.00000E+00 0.00000E+00 196 238 58087 0.00000E+00 0.00000E+00 295 240 + 47185 0.00000E+00 0.00000E+00 204 237 58088 0.00000E+00 0.00000E+00 332 241 + 47186 0.00000E+00 0.00000E+00 198 237 58089 0.00000E+00 0.00000E+00 344 241 + 47187 0.00000E+00 0.00000E+00 204 237 58090 0.00000E+00 0.00000E+00 338 242 + 47188 0.00000E+00 0.00000E+00 210 236 58091 0.00000E+00 0.00000E+00 331 242 + 47189 0.00000E+00 0.00000E+00 199 234 58092 0.00000E+00 0.00000E+00 326 243 + 47190 0.00000E+00 0.00000E+00 195 233 58093 0.00000E+00 0.00000E+00 302 243 + 47191 0.00000E+00 0.00000E+00 204 232 58094 0.00000E+00 0.00000E+00 295 243 + 47192 0.00000E+00 0.00000E+00 211 231 58095 0.00000E+00 0.00000E+00 290 243 + 47193 0.00000E+00 0.00000E+00 204 229 58096 0.00000E+00 0.00000E+00 289 243 + 47194 0.00000E+00 0.00000E+00 208 228 58097 0.00000E+00 0.00000E+00 283 243 + 47195 0.00000E+00 0.00000E+00 216 227 58098 0.00000E+00 0.00000E+00 272 243 + 47196 0.00000E+00 0.00000E+00 226 227 58099 0.00000E+00 0.00000E+00 250 243 + 47197 0.00000E+00 0.00000E+00 259 226 58100 0.00000E+00 0.00000E+00 244 243 + 47198 0.00000E+00 0.00000E+00 271 225 58101 0.00000E+00 0.00000E+00 216 243 + 47199 0.00000E+00 0.00000E+00 252 225 58102 0.00000E+00 0.00000E+00 196 243 + 47200 0.00000E+00 0.00000E+00 254 224 58103 0.00000E+00 0.00000E+00 179 243 + 47201 0.00000E+00 0.00000E+00 247 223 58104 0.00000E+00 0.00000E+00 177 242 + 47202 0.00000E+00 0.00000E+00 244 223 58105 0.00000E+00 0.00000E+00 188 242 + 47203 0.00000E+00 0.00000E+00 256 224 58106 0.00000E+00 0.00000E+00 197 242 + 47204 0.00000E+00 0.00000E+00 238 226 58107 0.00000E+00 0.00000E+00 207 241 + 47205 0.00000E+00 0.00000E+00 237 227 58108 0.00000E+00 0.00000E+00 213 240 + 47206 0.00000E+00 0.00000E+00 202 228 58109 0.00000E+00 0.00000E+00 221 240 + 47207 0.00000E+00 0.00000E+00 202 229 58110 0.00000E+00 0.00000E+00 226 240 + 47208 0.00000E+00 0.00000E+00 184 229 58111 0.00000E+00 0.00000E+00 229 239 + 47209 0.00000E+00 0.00000E+00 164 230 58112 0.00000E+00 0.00000E+00 237 239 + 47210 0.00000E+00 0.00000E+00 170 229 58113 0.00000E+00 0.00000E+00 235 239 + 47211 0.00000E+00 0.00000E+00 177 229 58114 0.00000E+00 0.00000E+00 244 239 + 47212 0.00000E+00 0.00000E+00 212 228 58115 0.00000E+00 0.00000E+00 241 239 + 47213 0.00000E+00 0.00000E+00 217 227 58116 0.00000E+00 0.00000E+00 245 240 + 47214 0.00000E+00 0.00000E+00 231 226 58117 0.00000E+00 0.00000E+00 247 240 + 47215 0.00000E+00 0.00000E+00 242 225 58118 0.00000E+00 0.00000E+00 258 241 + 47216 0.00000E+00 0.00000E+00 245 224 58119 0.00000E+00 0.00000E+00 255 241 + 47217 0.00000E+00 0.00000E+00 242 223 58120 0.00000E+00 0.00000E+00 265 241 + 47218 0.00000E+00 0.00000E+00 253 222 58121 0.00000E+00 0.00000E+00 266 241 + 47219 0.00000E+00 0.00000E+00 296 221 58122 0.00000E+00 0.00000E+00 276 241 + 47220 0.00000E+00 0.00000E+00 290 220 58123 0.00000E+00 0.00000E+00 282 240 + 47221 0.00000E+00 0.00000E+00 307 219 58124 0.00000E+00 0.00000E+00 280 240 + 47222 0.00000E+00 0.00000E+00 313 219 58125 0.00000E+00 0.00000E+00 269 239 + 47223 0.00000E+00 0.00000E+00 315 218 58126 0.00000E+00 0.00000E+00 263 238 + 47224 0.00000E+00 0.00000E+00 319 218 58127 0.00000E+00 0.00000E+00 249 237 + 47225 0.00000E+00 0.00000E+00 294 217 58128 0.00000E+00 0.00000E+00 236 235 + 47226 0.00000E+00 0.00000E+00 296 217 58129 0.00000E+00 0.00000E+00 239 233 + 47227 0.00000E+00 0.00000E+00 272 217 58130 0.00000E+00 0.00000E+00 209 231 + 47228 0.00000E+00 0.00000E+00 228 217 58131 0.00000E+00 0.00000E+00 211 230 + 47229 0.00000E+00 0.00000E+00 209 217 58132 0.00000E+00 0.00000E+00 209 228 + 47230 0.00000E+00 0.00000E+00 203 217 58133 0.00000E+00 0.00000E+00 203 227 + 47231 0.00000E+00 0.00000E+00 192 217 58134 0.00000E+00 0.00000E+00 194 225 + 47232 0.00000E+00 0.00000E+00 175 217 58135 0.00000E+00 0.00000E+00 196 225 + 47233 0.00000E+00 0.00000E+00 161 217 58136 0.00000E+00 0.00000E+00 194 224 + 47234 0.00000E+00 0.00000E+00 156 217 58137 0.00000E+00 0.00000E+00 194 223 + 47235 0.00000E+00 0.00000E+00 151 218 58138 0.00000E+00 0.00000E+00 197 223 + 47236 0.00000E+00 0.00000E+00 147 218 58139 0.00000E+00 0.00000E+00 197 222 + 47237 0.00000E+00 0.00000E+00 153 218 58140 0.00000E+00 0.00000E+00 197 222 + 47238 0.00000E+00 0.00000E+00 175 218 58141 0.00000E+00 0.00000E+00 199 221 + 47239 0.00000E+00 0.00000E+00 186 218 58142 0.00000E+00 0.00000E+00 199 221 + 47240 0.00000E+00 0.00000E+00 196 218 58143 0.00000E+00 0.00000E+00 206 222 + 47241 0.00000E+00 0.00000E+00 209 218 58144 0.00000E+00 0.00000E+00 211 222 + 47242 0.00000E+00 0.00000E+00 244 217 58145 0.00000E+00 0.00000E+00 207 223 + 47243 0.00000E+00 0.00000E+00 265 217 58146 0.00000E+00 0.00000E+00 210 223 + 47244 0.00000E+00 0.00000E+00 270 216 58147 0.00000E+00 0.00000E+00 201 224 + 47245 0.00000E+00 0.00000E+00 259 216 58148 0.00000E+00 0.00000E+00 202 224 + 47246 0.00000E+00 0.00000E+00 234 215 58149 0.00000E+00 0.00000E+00 219 224 + 47247 0.00000E+00 0.00000E+00 231 215 58150 0.00000E+00 0.00000E+00 213 224 + 47248 0.00000E+00 0.00000E+00 227 214 58151 0.00000E+00 0.00000E+00 209 224 + 47249 0.00000E+00 0.00000E+00 231 214 58152 0.00000E+00 0.00000E+00 219 224 + 47250 0.00000E+00 0.00000E+00 235 214 58153 0.00000E+00 0.00000E+00 220 223 + 47251 0.00000E+00 0.00000E+00 229 213 58154 0.00000E+00 0.00000E+00 227 223 + 47252 0.00000E+00 0.00000E+00 219 213 58155 0.00000E+00 0.00000E+00 246 222 + 47253 0.00000E+00 0.00000E+00 227 213 58156 0.00000E+00 0.00000E+00 256 221 + 47254 0.00000E+00 0.00000E+00 185 213 58157 0.00000E+00 0.00000E+00 260 221 + 47255 0.00000E+00 0.00000E+00 181 213 58158 0.00000E+00 0.00000E+00 238 220 + 47256 0.00000E+00 0.00000E+00 198 212 58159 0.00000E+00 0.00000E+00 233 219 + 47257 0.00000E+00 0.00000E+00 188 212 58160 0.00000E+00 0.00000E+00 252 218 + 47258 0.00000E+00 0.00000E+00 168 212 58161 0.00000E+00 0.00000E+00 234 218 + 47259 0.00000E+00 0.00000E+00 159 212 58162 0.00000E+00 0.00000E+00 235 217 + 47260 0.00000E+00 0.00000E+00 158 211 58163 0.00000E+00 0.00000E+00 227 216 + 47261 0.00000E+00 0.00000E+00 159 210 58164 0.00000E+00 0.00000E+00 220 215 + 47262 0.00000E+00 0.00000E+00 156 209 58165 0.00000E+00 0.00000E+00 208 215 + 47263 0.00000E+00 0.00000E+00 147 208 58166 0.00000E+00 0.00000E+00 197 214 + 47264 0.00000E+00 0.00000E+00 145 206 58167 0.00000E+00 0.00000E+00 191 214 + 47265 0.00000E+00 0.00000E+00 155 204 58168 0.00000E+00 0.00000E+00 182 214 + 47266 0.00000E+00 0.00000E+00 183 203 58169 0.00000E+00 0.00000E+00 177 215 + 47267 0.00000E+00 0.00000E+00 217 201 58170 0.00000E+00 0.00000E+00 189 216 + 47268 0.00000E+00 0.00000E+00 217 200 58171 0.00000E+00 0.00000E+00 193 217 + 47269 0.00000E+00 0.00000E+00 207 199 58172 0.00000E+00 0.00000E+00 194 217 + 47270 0.00000E+00 0.00000E+00 200 198 58173 0.00000E+00 0.00000E+00 213 218 + 47271 0.00000E+00 0.00000E+00 194 197 58174 0.00000E+00 0.00000E+00 217 219 + 47272 0.00000E+00 0.00000E+00 204 196 58175 0.00000E+00 0.00000E+00 221 219 + 47273 0.00000E+00 0.00000E+00 227 196 58176 0.00000E+00 0.00000E+00 226 220 + 47274 0.00000E+00 0.00000E+00 203 195 58177 0.00000E+00 0.00000E+00 233 220 + 47275 0.00000E+00 0.00000E+00 214 195 58178 0.00000E+00 0.00000E+00 237 221 + 47276 0.00000E+00 0.00000E+00 248 195 58179 0.00000E+00 0.00000E+00 232 221 + 47277 0.00000E+00 0.00000E+00 270 195 58180 0.00000E+00 0.00000E+00 220 222 + 47278 0.00000E+00 0.00000E+00 255 196 58181 0.00000E+00 0.00000E+00 217 222 + 47279 0.00000E+00 0.00000E+00 237 196 58182 0.00000E+00 0.00000E+00 215 222 + 47280 0.00000E+00 0.00000E+00 242 196 58183 0.00000E+00 0.00000E+00 215 222 + 47281 0.00000E+00 0.00000E+00 235 196 58184 0.00000E+00 0.00000E+00 224 223 + 47282 0.00000E+00 0.00000E+00 226 195 58185 0.00000E+00 0.00000E+00 232 223 + 47283 0.00000E+00 0.00000E+00 212 195 58186 0.00000E+00 0.00000E+00 238 223 + 47284 0.00000E+00 0.00000E+00 202 194 58187 0.00000E+00 0.00000E+00 232 224 + 47285 0.00000E+00 0.00000E+00 195 193 58188 0.00000E+00 0.00000E+00 237 224 + 47286 0.00000E+00 0.00000E+00 179 193 58189 0.00000E+00 0.00000E+00 232 224 + 47287 0.00000E+00 0.00000E+00 160 192 58190 0.00000E+00 0.00000E+00 218 224 + 47288 0.00000E+00 0.00000E+00 151 192 58191 0.00000E+00 0.00000E+00 208 224 + 47289 0.00000E+00 0.00000E+00 161 192 58192 0.00000E+00 0.00000E+00 203 224 + 47290 0.00000E+00 0.00000E+00 168 191 58193 0.00000E+00 0.00000E+00 188 224 + 47291 0.00000E+00 0.00000E+00 151 191 58194 0.00000E+00 0.00000E+00 191 224 + 47292 0.00000E+00 0.00000E+00 169 190 58195 0.00000E+00 0.00000E+00 182 225 + 47293 0.00000E+00 0.00000E+00 192 190 58196 0.00000E+00 0.00000E+00 181 225 + 47294 0.00000E+00 0.00000E+00 192 189 58197 0.00000E+00 0.00000E+00 192 225 + 47295 0.00000E+00 0.00000E+00 214 189 58198 0.00000E+00 0.00000E+00 188 225 + 47296 0.00000E+00 0.00000E+00 232 188 58199 0.00000E+00 0.00000E+00 190 225 + 47297 0.00000E+00 0.00000E+00 238 188 58200 0.00000E+00 0.00000E+00 205 225 + 47298 0.00000E+00 0.00000E+00 238 187 58201 0.00000E+00 0.00000E+00 200 225 + 47299 0.00000E+00 0.00000E+00 234 187 58202 0.00000E+00 0.00000E+00 209 225 + 47300 0.00000E+00 0.00000E+00 227 188 58203 0.00000E+00 0.00000E+00 214 226 + 47301 0.00000E+00 0.00000E+00 214 188 58204 0.00000E+00 0.00000E+00 213 226 + 47302 0.00000E+00 0.00000E+00 200 188 58205 0.00000E+00 0.00000E+00 228 227 + 47303 0.00000E+00 0.00000E+00 199 188 58206 0.00000E+00 0.00000E+00 240 228 + 47304 0.00000E+00 0.00000E+00 192 188 58207 0.00000E+00 0.00000E+00 260 228 + 47305 0.00000E+00 0.00000E+00 189 189 58208 0.00000E+00 0.00000E+00 261 229 + 47306 0.00000E+00 0.00000E+00 174 189 58209 0.00000E+00 0.00000E+00 290 229 + 47307 0.00000E+00 0.00000E+00 155 189 58210 0.00000E+00 0.00000E+00 285 230 + 47308 0.00000E+00 0.00000E+00 146 188 58211 0.00000E+00 0.00000E+00 287 230 + 47309 0.00000E+00 0.00000E+00 147 188 58212 0.00000E+00 0.00000E+00 288 230 + 47310 0.00000E+00 0.00000E+00 134 187 58213 0.00000E+00 0.00000E+00 274 231 + 47311 0.00000E+00 0.00000E+00 133 188 58214 0.00000E+00 0.00000E+00 254 232 + 47312 0.00000E+00 0.00000E+00 132 188 58215 0.00000E+00 0.00000E+00 237 232 + 47313 0.00000E+00 0.00000E+00 132 187 58216 0.00000E+00 0.00000E+00 216 233 + 47314 0.00000E+00 0.00000E+00 135 187 58217 0.00000E+00 0.00000E+00 221 234 + 47315 0.00000E+00 0.00000E+00 146 186 58218 0.00000E+00 0.00000E+00 239 234 + 47316 0.00000E+00 0.00000E+00 158 186 58219 0.00000E+00 0.00000E+00 235 235 + 47317 0.00000E+00 0.00000E+00 164 185 58220 0.00000E+00 0.00000E+00 236 235 + 47318 0.00000E+00 0.00000E+00 170 183 58221 0.00000E+00 0.00000E+00 225 235 + 47319 0.00000E+00 0.00000E+00 190 182 58222 0.00000E+00 0.00000E+00 222 236 + 47320 0.00000E+00 0.00000E+00 186 181 58223 0.00000E+00 0.00000E+00 225 236 + 47321 0.00000E+00 0.00000E+00 177 180 58224 0.00000E+00 0.00000E+00 222 236 + 47322 0.00000E+00 0.00000E+00 187 180 58225 0.00000E+00 0.00000E+00 236 236 + 47323 0.00000E+00 0.00000E+00 197 179 58226 0.00000E+00 0.00000E+00 235 236 + 47324 0.00000E+00 0.00000E+00 199 179 58227 0.00000E+00 0.00000E+00 231 236 + 47325 0.00000E+00 0.00000E+00 211 179 58228 0.00000E+00 0.00000E+00 215 236 + 47326 0.00000E+00 0.00000E+00 214 179 58229 0.00000E+00 0.00000E+00 211 236 + 47327 0.00000E+00 0.00000E+00 219 179 58230 0.00000E+00 0.00000E+00 218 235 + 47328 0.00000E+00 0.00000E+00 206 179 58231 0.00000E+00 0.00000E+00 219 235 + 47329 0.00000E+00 0.00000E+00 195 179 58232 0.00000E+00 0.00000E+00 220 236 + 47330 0.00000E+00 0.00000E+00 190 180 58233 0.00000E+00 0.00000E+00 231 236 + 47331 0.00000E+00 0.00000E+00 184 180 58234 0.00000E+00 0.00000E+00 239 237 + 47332 0.00000E+00 0.00000E+00 193 180 58235 0.00000E+00 0.00000E+00 243 237 + 47333 0.00000E+00 0.00000E+00 170 180 58236 0.00000E+00 0.00000E+00 253 237 + 47334 0.00000E+00 0.00000E+00 176 179 58237 0.00000E+00 0.00000E+00 263 238 + 47335 0.00000E+00 0.00000E+00 178 179 58238 0.00000E+00 0.00000E+00 264 238 + 47336 0.00000E+00 0.00000E+00 146 178 58239 0.00000E+00 0.00000E+00 252 238 + 47337 0.00000E+00 0.00000E+00 149 177 58240 0.00000E+00 0.00000E+00 244 238 + 47338 0.00000E+00 0.00000E+00 141 176 58241 0.00000E+00 0.00000E+00 252 238 + 47339 0.00000E+00 0.00000E+00 172 174 58242 0.00000E+00 0.00000E+00 249 238 + 47340 0.00000E+00 0.00000E+00 175 173 58243 0.00000E+00 0.00000E+00 259 237 + 47341 0.00000E+00 0.00000E+00 173 172 58244 0.00000E+00 0.00000E+00 261 237 + 47342 0.00000E+00 0.00000E+00 162 171 58245 0.00000E+00 0.00000E+00 281 237 + 47343 0.00000E+00 0.00000E+00 171 171 58246 0.00000E+00 0.00000E+00 270 237 + 47344 0.00000E+00 0.00000E+00 168 170 58247 0.00000E+00 0.00000E+00 256 237 + 47345 0.00000E+00 0.00000E+00 173 169 58248 0.00000E+00 0.00000E+00 233 237 + 47346 0.00000E+00 0.00000E+00 164 169 58249 0.00000E+00 0.00000E+00 216 237 + 47347 0.00000E+00 0.00000E+00 180 169 58250 0.00000E+00 0.00000E+00 210 237 + 47348 0.00000E+00 0.00000E+00 175 169 58251 0.00000E+00 0.00000E+00 211 237 + 47349 0.00000E+00 0.00000E+00 174 169 58252 0.00000E+00 0.00000E+00 235 237 + 47350 0.00000E+00 0.00000E+00 202 169 58253 0.00000E+00 0.00000E+00 245 237 + 47351 0.00000E+00 0.00000E+00 207 169 58254 0.00000E+00 0.00000E+00 250 237 + 47352 0.00000E+00 0.00000E+00 199 169 58255 0.00000E+00 0.00000E+00 270 237 + 47353 0.00000E+00 0.00000E+00 191 169 58256 0.00000E+00 0.00000E+00 285 237 + 47354 0.00000E+00 0.00000E+00 179 169 58257 0.00000E+00 0.00000E+00 290 237 + 47355 0.00000E+00 0.00000E+00 163 170 58258 0.00000E+00 0.00000E+00 271 237 + 47356 0.00000E+00 0.00000E+00 154 169 58259 0.00000E+00 0.00000E+00 263 236 + 47357 0.00000E+00 0.00000E+00 160 169 58260 0.00000E+00 0.00000E+00 259 236 + 47358 0.00000E+00 0.00000E+00 152 169 58261 0.00000E+00 0.00000E+00 246 235 + 47359 0.00000E+00 0.00000E+00 159 168 58262 0.00000E+00 0.00000E+00 243 235 + 47360 0.00000E+00 0.00000E+00 172 167 58263 0.00000E+00 0.00000E+00 231 235 + 47361 0.00000E+00 0.00000E+00 177 167 58264 0.00000E+00 0.00000E+00 221 235 + 47362 0.00000E+00 0.00000E+00 177 166 58265 0.00000E+00 0.00000E+00 249 235 + 47363 0.00000E+00 0.00000E+00 184 165 58266 0.00000E+00 0.00000E+00 226 236 + 47364 0.00000E+00 0.00000E+00 197 164 58267 0.00000E+00 0.00000E+00 225 235 + 47365 0.00000E+00 0.00000E+00 185 164 58268 0.00000E+00 0.00000E+00 222 235 + 48001 0.00000E+00 0.00000E+00 197 163 58269 0.00000E+00 0.00000E+00 218 235 + 48002 0.00000E+00 0.00000E+00 205 162 58270 0.00000E+00 0.00000E+00 219 235 + 48003 0.00000E+00 0.00000E+00 176 161 58271 0.00000E+00 0.00000E+00 225 235 + 48004 0.00000E+00 0.00000E+00 166 160 58272 0.00000E+00 0.00000E+00 227 235 + 48005 0.00000E+00 0.00000E+00 170 159 58273 0.00000E+00 0.00000E+00 228 234 + 48006 0.00000E+00 0.00000E+00 174 158 58274 0.00000E+00 0.00000E+00 231 234 + 48007 0.00000E+00 0.00000E+00 176 158 58275 0.00000E+00 0.00000E+00 221 233 + 48008 0.00000E+00 0.00000E+00 169 157 58276 0.00000E+00 0.00000E+00 219 232 + 48009 0.00000E+00 0.00000E+00 151 157 58277 0.00000E+00 0.00000E+00 215 231 + 48010 0.00000E+00 0.00000E+00 145 156 58278 0.00000E+00 0.00000E+00 199 229 + 48011 0.00000E+00 0.00000E+00 138 156 58279 0.00000E+00 0.00000E+00 189 228 + 48012 0.00000E+00 0.00000E+00 141 156 58280 0.00000E+00 0.00000E+00 189 227 + 48013 0.00000E+00 0.00000E+00 143 156 58281 0.00000E+00 0.00000E+00 187 226 + 48014 0.00000E+00 0.00000E+00 144 156 58282 0.00000E+00 0.00000E+00 192 225 + 48015 0.00000E+00 0.00000E+00 140 155 58283 0.00000E+00 0.00000E+00 198 224 + 48016 0.00000E+00 0.00000E+00 145 155 58284 0.00000E+00 0.00000E+00 210 224 + 48017 0.00000E+00 0.00000E+00 139 154 58285 0.00000E+00 0.00000E+00 219 223 + 48018 0.00000E+00 0.00000E+00 141 154 58286 0.00000E+00 0.00000E+00 225 222 + 48019 0.00000E+00 0.00000E+00 148 153 58287 0.00000E+00 0.00000E+00 228 221 + 48020 0.00000E+00 0.00000E+00 155 153 58288 0.00000E+00 0.00000E+00 230 221 + 48021 0.00000E+00 0.00000E+00 147 152 58289 0.00000E+00 0.00000E+00 253 221 + 48022 0.00000E+00 0.00000E+00 160 152 58290 0.00000E+00 0.00000E+00 286 221 + 48023 0.00000E+00 0.00000E+00 152 151 58291 0.00000E+00 0.00000E+00 286 222 + 48024 0.00000E+00 0.00000E+00 148 150 58292 0.00000E+00 0.00000E+00 296 223 + 48025 0.00000E+00 0.00000E+00 147 150 58293 0.00000E+00 0.00000E+00 278 223 + 48026 0.00000E+00 0.00000E+00 148 149 58294 0.00000E+00 0.00000E+00 277 223 + 48027 0.00000E+00 0.00000E+00 148 148 58295 0.00000E+00 0.00000E+00 270 224 + 48028 0.00000E+00 0.00000E+00 135 147 58296 0.00000E+00 0.00000E+00 240 223 + 48029 0.00000E+00 0.00000E+00 144 146 58297 0.00000E+00 0.00000E+00 227 223 + 48030 0.00000E+00 0.00000E+00 154 146 58298 0.00000E+00 0.00000E+00 191 222 + 48031 0.00000E+00 0.00000E+00 141 146 58299 0.00000E+00 0.00000E+00 194 222 + 48032 0.00000E+00 0.00000E+00 126 146 58300 0.00000E+00 0.00000E+00 191 222 + 48033 0.00000E+00 0.00000E+00 130 146 58301 0.00000E+00 0.00000E+00 209 222 + 48034 0.00000E+00 0.00000E+00 133 146 58302 0.00000E+00 0.00000E+00 220 222 + 48035 0.00000E+00 0.00000E+00 131 146 58303 0.00000E+00 0.00000E+00 228 222 + 48036 0.00000E+00 0.00000E+00 133 145 58304 0.00000E+00 0.00000E+00 222 223 + 48037 0.00000E+00 0.00000E+00 121 145 58305 0.00000E+00 0.00000E+00 234 223 + 48038 0.00000E+00 0.00000E+00 128 144 58306 0.00000E+00 0.00000E+00 241 223 + 48039 0.00000E+00 0.00000E+00 121 143 58307 0.00000E+00 0.00000E+00 224 224 + 48040 0.00000E+00 0.00000E+00 129 142 58308 0.00000E+00 0.00000E+00 220 224 + 48041 0.00000E+00 0.00000E+00 143 142 58309 0.00000E+00 0.00000E+00 222 224 + 48042 0.00000E+00 0.00000E+00 139 141 58310 0.00000E+00 0.00000E+00 204 224 + 48043 0.00000E+00 0.00000E+00 132 140 58311 0.00000E+00 0.00000E+00 206 224 + 48044 0.00000E+00 0.00000E+00 128 139 58312 0.00000E+00 0.00000E+00 191 224 + 48045 0.00000E+00 0.00000E+00 132 138 58313 0.00000E+00 0.00000E+00 180 223 + 48046 0.00000E+00 0.00000E+00 140 138 58314 0.00000E+00 0.00000E+00 169 223 + 48047 0.00000E+00 0.00000E+00 141 137 58315 0.00000E+00 0.00000E+00 166 222 + 48048 0.00000E+00 0.00000E+00 133 137 58316 0.00000E+00 0.00000E+00 166 222 + 48049 0.00000E+00 0.00000E+00 140 137 58317 0.00000E+00 0.00000E+00 163 222 + 48050 0.00000E+00 0.00000E+00 151 137 58318 0.00000E+00 0.00000E+00 166 222 + 48051 0.00000E+00 0.00000E+00 149 137 58319 0.00000E+00 0.00000E+00 166 223 + 48052 0.00000E+00 0.00000E+00 142 137 58320 0.00000E+00 0.00000E+00 169 223 + 48053 0.00000E+00 0.00000E+00 144 138 58321 0.00000E+00 0.00000E+00 173 224 + 48054 0.00000E+00 0.00000E+00 143 138 58322 0.00000E+00 0.00000E+00 174 224 + 48055 0.00000E+00 0.00000E+00 126 139 58323 0.00000E+00 0.00000E+00 183 225 + 48056 0.00000E+00 0.00000E+00 131 140 58324 0.00000E+00 0.00000E+00 187 225 + 48057 0.00000E+00 0.00000E+00 127 140 58325 0.00000E+00 0.00000E+00 194 225 + 48058 0.00000E+00 0.00000E+00 123 141 58326 0.00000E+00 0.00000E+00 200 225 + 48059 0.00000E+00 0.00000E+00 118 142 58327 0.00000E+00 0.00000E+00 213 226 + 48060 0.00000E+00 0.00000E+00 119 142 58328 0.00000E+00 0.00000E+00 229 226 + 48061 0.00000E+00 0.00000E+00 132 142 58329 0.00000E+00 0.00000E+00 243 227 + 48062 0.00000E+00 0.00000E+00 133 143 58330 0.00000E+00 0.00000E+00 264 227 + 48063 0.00000E+00 0.00000E+00 120 144 58331 0.00000E+00 0.00000E+00 268 227 + 48064 0.00000E+00 0.00000E+00 118 145 58332 0.00000E+00 0.00000E+00 259 227 + 48065 0.00000E+00 0.00000E+00 115 146 58333 0.00000E+00 0.00000E+00 263 227 + 48066 0.00000E+00 0.00000E+00 124 147 58334 0.00000E+00 0.00000E+00 264 227 + 48067 0.00000E+00 0.00000E+00 131 148 58335 0.00000E+00 0.00000E+00 268 227 + 48068 0.00000E+00 0.00000E+00 134 148 58336 0.00000E+00 0.00000E+00 259 227 + 48069 0.00000E+00 0.00000E+00 138 149 58337 0.00000E+00 0.00000E+00 241 227 + 48070 0.00000E+00 0.00000E+00 152 150 58338 0.00000E+00 0.00000E+00 241 227 + 48071 0.00000E+00 0.00000E+00 156 151 58339 0.00000E+00 0.00000E+00 253 228 + 48072 0.00000E+00 0.00000E+00 163 152 58340 0.00000E+00 0.00000E+00 249 228 + 48073 0.00000E+00 0.00000E+00 153 153 58341 0.00000E+00 0.00000E+00 253 228 + 48074 0.00000E+00 0.00000E+00 152 154 58342 0.00000E+00 0.00000E+00 260 228 + 48075 0.00000E+00 0.00000E+00 146 156 58343 0.00000E+00 0.00000E+00 254 228 + 48076 0.00000E+00 0.00000E+00 134 157 58344 0.00000E+00 0.00000E+00 269 229 + 48077 0.00000E+00 0.00000E+00 133 158 58345 0.00000E+00 0.00000E+00 256 230 + 48078 0.00000E+00 0.00000E+00 126 159 58346 0.00000E+00 0.00000E+00 257 231 + 48079 0.00000E+00 0.00000E+00 124 160 58347 0.00000E+00 0.00000E+00 260 232 + 48080 0.00000E+00 0.00000E+00 132 161 58348 0.00000E+00 0.00000E+00 258 233 + 48081 0.00000E+00 0.00000E+00 130 162 58349 0.00000E+00 0.00000E+00 235 235 + 48082 0.00000E+00 0.00000E+00 124 162 58350 0.00000E+00 0.00000E+00 217 236 + 48083 0.00000E+00 0.00000E+00 113 163 58351 0.00000E+00 0.00000E+00 204 237 + 48084 0.00000E+00 0.00000E+00 114 164 58352 0.00000E+00 0.00000E+00 202 239 + 48085 0.00000E+00 0.00000E+00 121 165 58353 0.00000E+00 0.00000E+00 187 240 + 48086 0.00000E+00 0.00000E+00 127 166 58354 0.00000E+00 0.00000E+00 199 242 + 48087 0.00000E+00 0.00000E+00 132 167 58355 0.00000E+00 0.00000E+00 198 243 + 48088 0.00000E+00 0.00000E+00 137 169 58356 0.00000E+00 0.00000E+00 211 244 + 48089 0.00000E+00 0.00000E+00 144 172 58357 0.00000E+00 0.00000E+00 215 244 + 48090 0.00000E+00 0.00000E+00 154 174 58358 0.00000E+00 0.00000E+00 224 245 + 48091 0.00000E+00 0.00000E+00 167 176 58359 0.00000E+00 0.00000E+00 235 245 + 48092 0.00000E+00 0.00000E+00 171 178 58360 0.00000E+00 0.00000E+00 238 245 + 48093 0.00000E+00 0.00000E+00 183 180 58361 0.00000E+00 0.00000E+00 227 246 + 48094 0.00000E+00 0.00000E+00 198 182 58362 0.00000E+00 0.00000E+00 223 246 + 48095 0.00000E+00 0.00000E+00 199 184 58363 0.00000E+00 0.00000E+00 219 246 + 48096 0.00000E+00 0.00000E+00 192 185 58364 0.00000E+00 0.00000E+00 224 246 + 48097 0.00000E+00 0.00000E+00 196 187 58365 0.00000E+00 0.00000E+00 226 246 + 48098 0.00000E+00 0.00000E+00 186 188 59001 0.00000E+00 0.00000E+00 235 246 + 48099 0.00000E+00 0.00000E+00 187 189 59002 0.00000E+00 0.00000E+00 250 246 + 48100 0.00000E+00 0.00000E+00 183 189 59003 0.00000E+00 0.00000E+00 266 246 + 48101 0.00000E+00 0.00000E+00 194 190 59004 0.00000E+00 0.00000E+00 270 245 + 48102 0.00000E+00 0.00000E+00 200 191 59005 0.00000E+00 0.00000E+00 282 245 + 48103 0.00000E+00 0.00000E+00 206 191 59006 0.00000E+00 0.00000E+00 302 244 + 48104 0.00000E+00 0.00000E+00 226 192 59007 0.00000E+00 0.00000E+00 306 243 + 48105 0.00000E+00 0.00000E+00 249 192 59008 0.00000E+00 0.00000E+00 278 243 + 48106 0.00000E+00 0.00000E+00 218 193 59009 0.00000E+00 0.00000E+00 268 242 + 48107 0.00000E+00 0.00000E+00 211 194 59010 0.00000E+00 0.00000E+00 282 242 + 48108 0.00000E+00 0.00000E+00 207 194 59011 0.00000E+00 0.00000E+00 260 241 + 48109 0.00000E+00 0.00000E+00 212 195 59012 0.00000E+00 0.00000E+00 251 241 + 48110 0.00000E+00 0.00000E+00 232 196 59013 0.00000E+00 0.00000E+00 235 241 + 48111 0.00000E+00 0.00000E+00 216 196 59014 0.00000E+00 0.00000E+00 224 240 + 48112 0.00000E+00 0.00000E+00 226 197 59015 0.00000E+00 0.00000E+00 207 240 + 48113 0.00000E+00 0.00000E+00 228 197 59016 0.00000E+00 0.00000E+00 213 240 + 48114 0.00000E+00 0.00000E+00 221 198 59017 0.00000E+00 0.00000E+00 220 239 + 48115 0.00000E+00 0.00000E+00 232 198 59018 0.00000E+00 0.00000E+00 237 239 + 48116 0.00000E+00 0.00000E+00 230 199 59019 0.00000E+00 0.00000E+00 265 238 + 48117 0.00000E+00 0.00000E+00 218 200 59020 0.00000E+00 0.00000E+00 294 237 + 48118 0.00000E+00 0.00000E+00 226 201 59021 0.00000E+00 0.00000E+00 315 236 + 48119 0.00000E+00 0.00000E+00 207 201 59022 0.00000E+00 0.00000E+00 337 235 + 48120 0.00000E+00 0.00000E+00 191 202 59023 0.00000E+00 0.00000E+00 328 234 + 48121 0.00000E+00 0.00000E+00 183 203 59024 0.00000E+00 0.00000E+00 334 233 + 48122 0.00000E+00 0.00000E+00 199 204 59025 0.00000E+00 0.00000E+00 321 233 + 48123 0.00000E+00 0.00000E+00 189 204 59026 0.00000E+00 0.00000E+00 314 232 + 48124 0.00000E+00 0.00000E+00 179 205 59027 0.00000E+00 0.00000E+00 314 232 + 48125 0.00000E+00 0.00000E+00 202 206 59028 0.00000E+00 0.00000E+00 322 232 + 48126 0.00000E+00 0.00000E+00 229 206 59029 0.00000E+00 0.00000E+00 304 232 + 48127 0.00000E+00 0.00000E+00 267 207 59030 0.00000E+00 0.00000E+00 262 232 + 48128 0.00000E+00 0.00000E+00 296 207 59031 0.00000E+00 0.00000E+00 224 232 + 48129 0.00000E+00 0.00000E+00 319 208 59032 0.00000E+00 0.00000E+00 205 232 + 48130 0.00000E+00 0.00000E+00 334 208 59033 0.00000E+00 0.00000E+00 205 232 + 48131 0.00000E+00 0.00000E+00 336 209 59034 0.00000E+00 0.00000E+00 204 232 + 48132 0.00000E+00 0.00000E+00 319 209 59035 0.00000E+00 0.00000E+00 201 232 + 48133 0.00000E+00 0.00000E+00 306 209 59036 0.00000E+00 0.00000E+00 191 233 + 48134 0.00000E+00 0.00000E+00 291 210 59037 0.00000E+00 0.00000E+00 195 233 + 48135 0.00000E+00 0.00000E+00 282 210 59038 0.00000E+00 0.00000E+00 182 234 + 48136 0.00000E+00 0.00000E+00 246 210 59039 0.00000E+00 0.00000E+00 182 235 + 48137 0.00000E+00 0.00000E+00 231 211 59040 0.00000E+00 0.00000E+00 174 236 + 48138 0.00000E+00 0.00000E+00 219 211 59041 0.00000E+00 0.00000E+00 190 236 + 48139 0.00000E+00 0.00000E+00 193 211 59042 0.00000E+00 0.00000E+00 199 236 + 48140 0.00000E+00 0.00000E+00 184 212 59043 0.00000E+00 0.00000E+00 199 236 + 48141 0.00000E+00 0.00000E+00 173 212 59044 0.00000E+00 0.00000E+00 201 236 + 48142 0.00000E+00 0.00000E+00 188 212 59045 0.00000E+00 0.00000E+00 199 236 + 48143 0.00000E+00 0.00000E+00 163 212 59046 0.00000E+00 0.00000E+00 213 235 + 48144 0.00000E+00 0.00000E+00 161 212 59047 0.00000E+00 0.00000E+00 214 235 + 48145 0.00000E+00 0.00000E+00 174 212 59048 0.00000E+00 0.00000E+00 220 234 + 48146 0.00000E+00 0.00000E+00 175 211 59049 0.00000E+00 0.00000E+00 218 234 + 48147 0.00000E+00 0.00000E+00 172 210 59050 0.00000E+00 0.00000E+00 218 233 + 48148 0.00000E+00 0.00000E+00 188 209 59051 0.00000E+00 0.00000E+00 228 233 + 48149 0.00000E+00 0.00000E+00 195 209 59052 0.00000E+00 0.00000E+00 224 233 + 48150 0.00000E+00 0.00000E+00 194 208 59053 0.00000E+00 0.00000E+00 219 232 + 48151 0.00000E+00 0.00000E+00 193 207 59054 0.00000E+00 0.00000E+00 212 232 + 48152 0.00000E+00 0.00000E+00 197 206 59055 0.00000E+00 0.00000E+00 220 232 + 48153 0.00000E+00 0.00000E+00 201 206 59056 0.00000E+00 0.00000E+00 227 232 + 48154 0.00000E+00 0.00000E+00 191 205 59057 0.00000E+00 0.00000E+00 219 232 + 48155 0.00000E+00 0.00000E+00 199 205 59058 0.00000E+00 0.00000E+00 211 232 + 48156 0.00000E+00 0.00000E+00 200 204 59059 0.00000E+00 0.00000E+00 201 231 + 48157 0.00000E+00 0.00000E+00 205 203 59060 0.00000E+00 0.00000E+00 187 231 + 48158 0.00000E+00 0.00000E+00 192 203 59061 0.00000E+00 0.00000E+00 181 230 + 48159 0.00000E+00 0.00000E+00 184 202 59062 0.00000E+00 0.00000E+00 181 229 + 48160 0.00000E+00 0.00000E+00 202 202 59063 0.00000E+00 0.00000E+00 178 227 + 48161 0.00000E+00 0.00000E+00 194 202 59064 0.00000E+00 0.00000E+00 179 226 + 48162 0.00000E+00 0.00000E+00 187 202 59065 0.00000E+00 0.00000E+00 190 224 + 48163 0.00000E+00 0.00000E+00 172 202 59066 0.00000E+00 0.00000E+00 188 222 + 48164 0.00000E+00 0.00000E+00 170 202 59067 0.00000E+00 0.00000E+00 191 221 + 48165 0.00000E+00 0.00000E+00 168 202 59068 0.00000E+00 0.00000E+00 198 219 + 48166 0.00000E+00 0.00000E+00 163 202 59069 0.00000E+00 0.00000E+00 204 218 + 48167 0.00000E+00 0.00000E+00 158 201 59070 0.00000E+00 0.00000E+00 201 216 + 48168 0.00000E+00 0.00000E+00 162 200 59071 0.00000E+00 0.00000E+00 194 216 + 48169 0.00000E+00 0.00000E+00 184 199 59072 0.00000E+00 0.00000E+00 207 215 + 48170 0.00000E+00 0.00000E+00 197 198 59073 0.00000E+00 0.00000E+00 215 215 + 48171 0.00000E+00 0.00000E+00 196 196 59074 0.00000E+00 0.00000E+00 235 215 + 48172 0.00000E+00 0.00000E+00 197 195 59075 0.00000E+00 0.00000E+00 246 216 + 48173 0.00000E+00 0.00000E+00 197 193 59076 0.00000E+00 0.00000E+00 259 216 + 48174 0.00000E+00 0.00000E+00 198 192 59077 0.00000E+00 0.00000E+00 274 216 + 48175 0.00000E+00 0.00000E+00 221 191 59078 0.00000E+00 0.00000E+00 281 216 + 48176 0.00000E+00 0.00000E+00 231 190 59079 0.00000E+00 0.00000E+00 285 217 + 48177 0.00000E+00 0.00000E+00 220 189 59080 0.00000E+00 0.00000E+00 287 217 + 48178 0.00000E+00 0.00000E+00 217 189 59081 0.00000E+00 0.00000E+00 262 218 + 48179 0.00000E+00 0.00000E+00 219 189 59082 0.00000E+00 0.00000E+00 258 218 + 48180 0.00000E+00 0.00000E+00 218 189 59083 0.00000E+00 0.00000E+00 247 218 + 48181 0.00000E+00 0.00000E+00 209 189 59084 0.00000E+00 0.00000E+00 248 217 + 48182 0.00000E+00 0.00000E+00 209 188 59085 0.00000E+00 0.00000E+00 247 217 + 48183 0.00000E+00 0.00000E+00 204 188 59086 0.00000E+00 0.00000E+00 246 217 + 48184 0.00000E+00 0.00000E+00 197 188 59087 0.00000E+00 0.00000E+00 248 217 + 48185 0.00000E+00 0.00000E+00 191 188 59088 0.00000E+00 0.00000E+00 245 217 + 48186 0.00000E+00 0.00000E+00 175 187 59089 0.00000E+00 0.00000E+00 258 218 + 48187 0.00000E+00 0.00000E+00 166 187 59090 0.00000E+00 0.00000E+00 254 218 + 48188 0.00000E+00 0.00000E+00 152 187 59091 0.00000E+00 0.00000E+00 256 219 + 48189 0.00000E+00 0.00000E+00 150 187 59092 0.00000E+00 0.00000E+00 236 219 + 48190 0.00000E+00 0.00000E+00 147 186 59093 0.00000E+00 0.00000E+00 216 220 + 48191 0.00000E+00 0.00000E+00 162 186 59094 0.00000E+00 0.00000E+00 215 220 + 48192 0.00000E+00 0.00000E+00 165 186 59095 0.00000E+00 0.00000E+00 196 220 + 48193 0.00000E+00 0.00000E+00 171 186 59096 0.00000E+00 0.00000E+00 196 220 + 48194 0.00000E+00 0.00000E+00 177 186 59097 0.00000E+00 0.00000E+00 217 220 + 48195 0.00000E+00 0.00000E+00 174 186 59098 0.00000E+00 0.00000E+00 215 220 + 48196 0.00000E+00 0.00000E+00 178 186 59099 0.00000E+00 0.00000E+00 215 220 + 48197 0.00000E+00 0.00000E+00 186 185 59100 0.00000E+00 0.00000E+00 220 220 + 48198 0.00000E+00 0.00000E+00 185 184 59101 0.00000E+00 0.00000E+00 232 220 + 48199 0.00000E+00 0.00000E+00 187 184 59102 0.00000E+00 0.00000E+00 224 221 + 48200 0.00000E+00 0.00000E+00 177 184 59103 0.00000E+00 0.00000E+00 209 221 + 48201 0.00000E+00 0.00000E+00 174 183 59104 0.00000E+00 0.00000E+00 198 221 + 48202 0.00000E+00 0.00000E+00 190 183 59105 0.00000E+00 0.00000E+00 189 221 + 48203 0.00000E+00 0.00000E+00 183 182 59106 0.00000E+00 0.00000E+00 188 222 + 48204 0.00000E+00 0.00000E+00 191 182 59107 0.00000E+00 0.00000E+00 190 222 + 48205 0.00000E+00 0.00000E+00 185 182 59108 0.00000E+00 0.00000E+00 181 222 + 48206 0.00000E+00 0.00000E+00 194 181 59109 0.00000E+00 0.00000E+00 196 222 + 48207 0.00000E+00 0.00000E+00 199 181 59110 0.00000E+00 0.00000E+00 203 221 + 48208 0.00000E+00 0.00000E+00 184 181 59111 0.00000E+00 0.00000E+00 203 221 + 48209 0.00000E+00 0.00000E+00 197 181 59112 0.00000E+00 0.00000E+00 199 221 + 48210 0.00000E+00 0.00000E+00 207 180 59113 0.00000E+00 0.00000E+00 213 221 + 48211 0.00000E+00 0.00000E+00 205 179 59114 0.00000E+00 0.00000E+00 213 221 + 48212 0.00000E+00 0.00000E+00 206 178 59115 0.00000E+00 0.00000E+00 211 220 + 48213 0.00000E+00 0.00000E+00 200 177 59116 0.00000E+00 0.00000E+00 218 219 + 48214 0.00000E+00 0.00000E+00 206 177 59117 0.00000E+00 0.00000E+00 212 219 + 48215 0.00000E+00 0.00000E+00 195 176 59118 0.00000E+00 0.00000E+00 216 218 + 48216 0.00000E+00 0.00000E+00 206 175 59119 0.00000E+00 0.00000E+00 211 217 + 48217 0.00000E+00 0.00000E+00 220 175 59120 0.00000E+00 0.00000E+00 220 216 + 48218 0.00000E+00 0.00000E+00 206 174 59121 0.00000E+00 0.00000E+00 204 216 + 48219 0.00000E+00 0.00000E+00 186 174 59122 0.00000E+00 0.00000E+00 194 215 + 48220 0.00000E+00 0.00000E+00 184 174 59123 0.00000E+00 0.00000E+00 195 215 + 48221 0.00000E+00 0.00000E+00 182 173 59124 0.00000E+00 0.00000E+00 184 214 + 48222 0.00000E+00 0.00000E+00 151 174 59125 0.00000E+00 0.00000E+00 186 214 + 48223 0.00000E+00 0.00000E+00 146 174 59126 0.00000E+00 0.00000E+00 202 213 + 48224 0.00000E+00 0.00000E+00 155 174 59127 0.00000E+00 0.00000E+00 208 213 + 48225 0.00000E+00 0.00000E+00 166 174 59128 0.00000E+00 0.00000E+00 244 213 + 48226 0.00000E+00 0.00000E+00 141 174 59129 0.00000E+00 0.00000E+00 249 213 + 48227 0.00000E+00 0.00000E+00 153 175 59130 0.00000E+00 0.00000E+00 259 212 + 48228 0.00000E+00 0.00000E+00 154 175 59131 0.00000E+00 0.00000E+00 264 212 + 48229 0.00000E+00 0.00000E+00 161 175 59132 0.00000E+00 0.00000E+00 266 212 + 48230 0.00000E+00 0.00000E+00 166 175 59133 0.00000E+00 0.00000E+00 264 211 + 48231 0.00000E+00 0.00000E+00 176 175 59134 0.00000E+00 0.00000E+00 244 212 + 48232 0.00000E+00 0.00000E+00 197 175 59135 0.00000E+00 0.00000E+00 228 212 + 48233 0.00000E+00 0.00000E+00 201 175 59136 0.00000E+00 0.00000E+00 222 212 + 48234 0.00000E+00 0.00000E+00 182 174 59137 0.00000E+00 0.00000E+00 224 213 + 48235 0.00000E+00 0.00000E+00 186 174 59138 0.00000E+00 0.00000E+00 213 213 + 48236 0.00000E+00 0.00000E+00 185 173 59139 0.00000E+00 0.00000E+00 199 213 + 48237 0.00000E+00 0.00000E+00 154 173 59140 0.00000E+00 0.00000E+00 201 213 + 48238 0.00000E+00 0.00000E+00 155 172 59141 0.00000E+00 0.00000E+00 201 213 + 48239 0.00000E+00 0.00000E+00 164 171 59142 0.00000E+00 0.00000E+00 201 212 + 48240 0.00000E+00 0.00000E+00 163 171 59143 0.00000E+00 0.00000E+00 198 212 + 48241 0.00000E+00 0.00000E+00 163 170 59144 0.00000E+00 0.00000E+00 199 211 + 48242 0.00000E+00 0.00000E+00 159 170 59145 0.00000E+00 0.00000E+00 203 211 + 48243 0.00000E+00 0.00000E+00 146 169 59146 0.00000E+00 0.00000E+00 205 211 + 48244 0.00000E+00 0.00000E+00 148 169 59147 0.00000E+00 0.00000E+00 208 211 + 48245 0.00000E+00 0.00000E+00 149 169 59148 0.00000E+00 0.00000E+00 195 211 + 48246 0.00000E+00 0.00000E+00 140 169 59149 0.00000E+00 0.00000E+00 176 211 + 48247 0.00000E+00 0.00000E+00 138 169 59150 0.00000E+00 0.00000E+00 177 211 + 48248 0.00000E+00 0.00000E+00 133 169 59151 0.00000E+00 0.00000E+00 179 211 + 48249 0.00000E+00 0.00000E+00 132 169 59152 0.00000E+00 0.00000E+00 193 211 + 48250 0.00000E+00 0.00000E+00 136 169 59153 0.00000E+00 0.00000E+00 198 211 + 48251 0.00000E+00 0.00000E+00 127 169 59154 0.00000E+00 0.00000E+00 198 211 + 48252 0.00000E+00 0.00000E+00 133 168 59155 0.00000E+00 0.00000E+00 190 212 + 48253 0.00000E+00 0.00000E+00 133 168 59156 0.00000E+00 0.00000E+00 197 212 + 48254 0.00000E+00 0.00000E+00 136 167 59157 0.00000E+00 0.00000E+00 210 213 + 48255 0.00000E+00 0.00000E+00 146 167 59158 0.00000E+00 0.00000E+00 198 213 + 48256 0.00000E+00 0.00000E+00 164 167 59159 0.00000E+00 0.00000E+00 213 214 + 48257 0.00000E+00 0.00000E+00 177 166 59160 0.00000E+00 0.00000E+00 223 214 + 48258 0.00000E+00 0.00000E+00 186 165 59161 0.00000E+00 0.00000E+00 228 214 + 48259 0.00000E+00 0.00000E+00 190 165 59162 0.00000E+00 0.00000E+00 226 213 + 48260 0.00000E+00 0.00000E+00 200 164 59163 0.00000E+00 0.00000E+00 220 213 + 48261 0.00000E+00 0.00000E+00 200 164 59164 0.00000E+00 0.00000E+00 212 213 + 48262 0.00000E+00 0.00000E+00 223 163 59165 0.00000E+00 0.00000E+00 208 213 + 48263 0.00000E+00 0.00000E+00 236 163 59166 0.00000E+00 0.00000E+00 225 213 + 48264 0.00000E+00 0.00000E+00 222 163 59167 0.00000E+00 0.00000E+00 220 213 + 48265 0.00000E+00 0.00000E+00 208 163 59168 0.00000E+00 0.00000E+00 225 212 + 48266 0.00000E+00 0.00000E+00 197 163 59169 0.00000E+00 0.00000E+00 228 212 + 48267 0.00000E+00 0.00000E+00 187 163 59170 0.00000E+00 0.00000E+00 237 211 + 48268 0.00000E+00 0.00000E+00 178 163 59171 0.00000E+00 0.00000E+00 226 211 + 48269 0.00000E+00 0.00000E+00 170 163 59172 0.00000E+00 0.00000E+00 228 210 + 48270 0.00000E+00 0.00000E+00 165 163 59173 0.00000E+00 0.00000E+00 219 209 + 48271 0.00000E+00 0.00000E+00 165 162 59174 0.00000E+00 0.00000E+00 220 209 + 48272 0.00000E+00 0.00000E+00 165 162 59175 0.00000E+00 0.00000E+00 232 209 + 48273 0.00000E+00 0.00000E+00 133 162 59176 0.00000E+00 0.00000E+00 233 209 + 48274 0.00000E+00 0.00000E+00 127 162 59177 0.00000E+00 0.00000E+00 238 209 + 48275 0.00000E+00 0.00000E+00 125 162 59178 0.00000E+00 0.00000E+00 240 209 + 48276 0.00000E+00 0.00000E+00 126 162 59179 0.00000E+00 0.00000E+00 224 209 + 48277 0.00000E+00 0.00000E+00 126 162 59180 0.00000E+00 0.00000E+00 219 209 + 48278 0.00000E+00 0.00000E+00 132 162 59181 0.00000E+00 0.00000E+00 196 209 + 48279 0.00000E+00 0.00000E+00 133 162 59182 0.00000E+00 0.00000E+00 188 209 + 48280 0.00000E+00 0.00000E+00 131 162 59183 0.00000E+00 0.00000E+00 174 209 + 48281 0.00000E+00 0.00000E+00 139 163 59184 0.00000E+00 0.00000E+00 171 209 + 48282 0.00000E+00 0.00000E+00 163 163 59185 0.00000E+00 0.00000E+00 177 209 + 48283 0.00000E+00 0.00000E+00 145 164 59186 0.00000E+00 0.00000E+00 176 209 + 48284 0.00000E+00 0.00000E+00 148 164 59187 0.00000E+00 0.00000E+00 188 209 + 48285 0.00000E+00 0.00000E+00 171 165 59188 0.00000E+00 0.00000E+00 192 209 + 48286 0.00000E+00 0.00000E+00 195 166 59189 0.00000E+00 0.00000E+00 185 209 + 48287 0.00000E+00 0.00000E+00 207 166 59190 0.00000E+00 0.00000E+00 185 210 + 48288 0.00000E+00 0.00000E+00 201 166 59191 0.00000E+00 0.00000E+00 201 210 + 48289 0.00000E+00 0.00000E+00 192 166 59192 0.00000E+00 0.00000E+00 194 211 + 48290 0.00000E+00 0.00000E+00 184 167 59193 0.00000E+00 0.00000E+00 234 211 + 48291 0.00000E+00 0.00000E+00 180 167 59194 0.00000E+00 0.00000E+00 243 212 + 48292 0.00000E+00 0.00000E+00 166 167 59195 0.00000E+00 0.00000E+00 264 213 + 48293 0.00000E+00 0.00000E+00 169 167 59196 0.00000E+00 0.00000E+00 245 213 + 48294 0.00000E+00 0.00000E+00 170 167 59197 0.00000E+00 0.00000E+00 261 214 + 48295 0.00000E+00 0.00000E+00 178 166 59198 0.00000E+00 0.00000E+00 240 215 + 48296 0.00000E+00 0.00000E+00 162 166 59199 0.00000E+00 0.00000E+00 231 216 + 48297 0.00000E+00 0.00000E+00 162 166 59200 0.00000E+00 0.00000E+00 222 217 + 48298 0.00000E+00 0.00000E+00 159 165 59201 0.00000E+00 0.00000E+00 208 218 + 48299 0.00000E+00 0.00000E+00 165 165 59202 0.00000E+00 0.00000E+00 189 219 + 48300 0.00000E+00 0.00000E+00 158 164 59203 0.00000E+00 0.00000E+00 178 220 + 48301 0.00000E+00 0.00000E+00 144 163 59204 0.00000E+00 0.00000E+00 178 220 + 48302 0.00000E+00 0.00000E+00 142 163 59205 0.00000E+00 0.00000E+00 181 221 + 48303 0.00000E+00 0.00000E+00 154 162 59206 0.00000E+00 0.00000E+00 182 222 + 48304 0.00000E+00 0.00000E+00 145 162 59207 0.00000E+00 0.00000E+00 182 222 + 48305 0.00000E+00 0.00000E+00 134 161 59208 0.00000E+00 0.00000E+00 200 222 + 48306 0.00000E+00 0.00000E+00 138 161 59209 0.00000E+00 0.00000E+00 205 222 + 48307 0.00000E+00 0.00000E+00 137 161 59210 0.00000E+00 0.00000E+00 207 221 + 48308 0.00000E+00 0.00000E+00 146 161 59211 0.00000E+00 0.00000E+00 204 221 + 48309 0.00000E+00 0.00000E+00 154 162 59212 0.00000E+00 0.00000E+00 208 221 + 48310 0.00000E+00 0.00000E+00 155 162 59213 0.00000E+00 0.00000E+00 214 220 + 48311 0.00000E+00 0.00000E+00 155 163 59214 0.00000E+00 0.00000E+00 228 220 + 48312 0.00000E+00 0.00000E+00 175 163 59215 0.00000E+00 0.00000E+00 240 220 + 48313 0.00000E+00 0.00000E+00 188 164 59216 0.00000E+00 0.00000E+00 236 219 + 48314 0.00000E+00 0.00000E+00 171 165 59217 0.00000E+00 0.00000E+00 229 219 + 48315 0.00000E+00 0.00000E+00 167 166 59218 0.00000E+00 0.00000E+00 227 218 + 48316 0.00000E+00 0.00000E+00 173 168 59219 0.00000E+00 0.00000E+00 212 217 + 48317 0.00000E+00 0.00000E+00 176 169 59220 0.00000E+00 0.00000E+00 204 216 + 48318 0.00000E+00 0.00000E+00 186 170 59221 0.00000E+00 0.00000E+00 204 216 + 48319 0.00000E+00 0.00000E+00 182 171 59222 0.00000E+00 0.00000E+00 202 216 + 48320 0.00000E+00 0.00000E+00 180 172 59223 0.00000E+00 0.00000E+00 200 216 + 48321 0.00000E+00 0.00000E+00 192 173 59224 0.00000E+00 0.00000E+00 196 216 + 48322 0.00000E+00 0.00000E+00 189 174 59225 0.00000E+00 0.00000E+00 194 216 + 48323 0.00000E+00 0.00000E+00 197 175 59226 0.00000E+00 0.00000E+00 189 216 + 48324 0.00000E+00 0.00000E+00 204 175 59227 0.00000E+00 0.00000E+00 190 216 + 48325 0.00000E+00 0.00000E+00 201 175 59228 0.00000E+00 0.00000E+00 201 216 + 48326 0.00000E+00 0.00000E+00 198 175 59229 0.00000E+00 0.00000E+00 224 215 + 48327 0.00000E+00 0.00000E+00 184 175 59230 0.00000E+00 0.00000E+00 229 215 + 48328 0.00000E+00 0.00000E+00 153 174 59231 0.00000E+00 0.00000E+00 215 215 + 48329 0.00000E+00 0.00000E+00 144 173 59232 0.00000E+00 0.00000E+00 224 214 + 48330 0.00000E+00 0.00000E+00 147 173 59233 0.00000E+00 0.00000E+00 230 214 + 48331 0.00000E+00 0.00000E+00 135 172 59234 0.00000E+00 0.00000E+00 243 213 + 48332 0.00000E+00 0.00000E+00 134 172 59235 0.00000E+00 0.00000E+00 262 212 + 48333 0.00000E+00 0.00000E+00 132 172 59236 0.00000E+00 0.00000E+00 245 210 + 48334 0.00000E+00 0.00000E+00 126 171 59237 0.00000E+00 0.00000E+00 253 209 + 48335 0.00000E+00 0.00000E+00 119 171 59238 0.00000E+00 0.00000E+00 257 208 + 48336 0.00000E+00 0.00000E+00 122 171 59239 0.00000E+00 0.00000E+00 279 207 + 48337 0.00000E+00 0.00000E+00 125 171 59240 0.00000E+00 0.00000E+00 302 206 + 48338 0.00000E+00 0.00000E+00 143 171 59241 0.00000E+00 0.00000E+00 308 205 + 48339 0.00000E+00 0.00000E+00 137 171 59242 0.00000E+00 0.00000E+00 312 205 + 48340 0.00000E+00 0.00000E+00 140 171 59243 0.00000E+00 0.00000E+00 305 204 + 48341 0.00000E+00 0.00000E+00 153 172 59244 0.00000E+00 0.00000E+00 282 204 + 48342 0.00000E+00 0.00000E+00 168 173 59245 0.00000E+00 0.00000E+00 269 203 + 48343 0.00000E+00 0.00000E+00 177 175 59246 0.00000E+00 0.00000E+00 257 203 + 48344 0.00000E+00 0.00000E+00 182 175 59247 0.00000E+00 0.00000E+00 239 203 + 48345 0.00000E+00 0.00000E+00 192 177 59248 0.00000E+00 0.00000E+00 220 203 + 48346 0.00000E+00 0.00000E+00 190 178 59249 0.00000E+00 0.00000E+00 200 202 + 48347 0.00000E+00 0.00000E+00 198 179 59250 0.00000E+00 0.00000E+00 192 202 + 48348 0.00000E+00 0.00000E+00 203 180 59251 0.00000E+00 0.00000E+00 199 201 + 48349 0.00000E+00 0.00000E+00 194 181 59252 0.00000E+00 0.00000E+00 209 201 + 48350 0.00000E+00 0.00000E+00 207 181 59253 0.00000E+00 0.00000E+00 201 200 + 48351 0.00000E+00 0.00000E+00 210 181 59254 0.00000E+00 0.00000E+00 203 200 + 48352 0.00000E+00 0.00000E+00 218 182 59255 0.00000E+00 0.00000E+00 195 199 + 48353 0.00000E+00 0.00000E+00 217 181 59256 0.00000E+00 0.00000E+00 189 199 + 48354 0.00000E+00 0.00000E+00 232 181 59257 0.00000E+00 0.00000E+00 196 198 + 48355 0.00000E+00 0.00000E+00 233 181 59258 0.00000E+00 0.00000E+00 184 198 + 48356 0.00000E+00 0.00000E+00 224 181 59259 0.00000E+00 0.00000E+00 168 197 + 48357 0.00000E+00 0.00000E+00 232 181 59260 0.00000E+00 0.00000E+00 170 197 + 48358 0.00000E+00 0.00000E+00 218 181 59261 0.00000E+00 0.00000E+00 167 196 + 48359 0.00000E+00 0.00000E+00 223 181 59262 0.00000E+00 0.00000E+00 175 196 + 48360 0.00000E+00 0.00000E+00 221 182 59263 0.00000E+00 0.00000E+00 185 196 + 48361 0.00000E+00 0.00000E+00 212 182 59264 0.00000E+00 0.00000E+00 182 195 + 48362 0.00000E+00 0.00000E+00 205 183 59265 0.00000E+00 0.00000E+00 188 195 + 48363 0.00000E+00 0.00000E+00 199 183 59266 0.00000E+00 0.00000E+00 182 194 + 48364 0.00000E+00 0.00000E+00 179 184 59267 0.00000E+00 0.00000E+00 183 194 + 48365 0.00000E+00 0.00000E+00 186 184 59268 0.00000E+00 0.00000E+00 175 194 + 48366 0.00000E+00 0.00000E+00 164 184 59269 0.00000E+00 0.00000E+00 164 193 + 49001 0.00000E+00 0.00000E+00 148 184 59270 0.00000E+00 0.00000E+00 163 192 + 49002 0.00000E+00 0.00000E+00 143 185 59271 0.00000E+00 0.00000E+00 162 191 + 49003 0.00000E+00 0.00000E+00 142 186 59272 0.00000E+00 0.00000E+00 159 191 + 49004 0.00000E+00 0.00000E+00 144 187 59273 0.00000E+00 0.00000E+00 156 190 + 49005 0.00000E+00 0.00000E+00 154 188 59274 0.00000E+00 0.00000E+00 150 190 + 49006 0.00000E+00 0.00000E+00 151 189 59275 0.00000E+00 0.00000E+00 145 189 + 49007 0.00000E+00 0.00000E+00 144 191 59276 0.00000E+00 0.00000E+00 144 188 + 49008 0.00000E+00 0.00000E+00 154 192 59277 0.00000E+00 0.00000E+00 148 188 + 49009 0.00000E+00 0.00000E+00 161 193 59278 0.00000E+00 0.00000E+00 155 187 + 49010 0.00000E+00 0.00000E+00 164 195 59279 0.00000E+00 0.00000E+00 174 186 + 49011 0.00000E+00 0.00000E+00 165 196 59280 0.00000E+00 0.00000E+00 169 185 + 49012 0.00000E+00 0.00000E+00 169 197 59281 0.00000E+00 0.00000E+00 155 183 + 49013 0.00000E+00 0.00000E+00 165 198 59282 0.00000E+00 0.00000E+00 153 181 + 49014 0.00000E+00 0.00000E+00 169 198 59283 0.00000E+00 0.00000E+00 149 179 + 49015 0.00000E+00 0.00000E+00 208 199 59284 0.00000E+00 0.00000E+00 147 177 + 49016 0.00000E+00 0.00000E+00 251 200 59285 0.00000E+00 0.00000E+00 154 176 + 49017 0.00000E+00 0.00000E+00 254 200 59286 0.00000E+00 0.00000E+00 155 175 + 49018 0.00000E+00 0.00000E+00 209 200 59287 0.00000E+00 0.00000E+00 153 174 + 49019 0.00000E+00 0.00000E+00 234 200 59288 0.00000E+00 0.00000E+00 160 173 + 49020 0.00000E+00 0.00000E+00 230 201 59289 0.00000E+00 0.00000E+00 167 173 + 49021 0.00000E+00 0.00000E+00 206 201 59290 0.00000E+00 0.00000E+00 169 174 + 49022 0.00000E+00 0.00000E+00 228 201 59291 0.00000E+00 0.00000E+00 171 174 + 49023 0.00000E+00 0.00000E+00 212 201 59292 0.00000E+00 0.00000E+00 173 174 + 49024 0.00000E+00 0.00000E+00 190 201 59293 0.00000E+00 0.00000E+00 175 175 + 49025 0.00000E+00 0.00000E+00 183 201 59294 0.00000E+00 0.00000E+00 175 175 + 49026 0.00000E+00 0.00000E+00 176 201 59295 0.00000E+00 0.00000E+00 187 175 + 49027 0.00000E+00 0.00000E+00 169 201 59296 0.00000E+00 0.00000E+00 183 175 + 49028 0.00000E+00 0.00000E+00 161 201 59297 0.00000E+00 0.00000E+00 181 176 + 49029 0.00000E+00 0.00000E+00 151 201 59298 0.00000E+00 0.00000E+00 186 176 + 49030 0.00000E+00 0.00000E+00 159 201 59299 0.00000E+00 0.00000E+00 190 176 + 49031 0.00000E+00 0.00000E+00 175 201 59300 0.00000E+00 0.00000E+00 188 176 + 49032 0.00000E+00 0.00000E+00 192 201 59301 0.00000E+00 0.00000E+00 182 177 + 49033 0.00000E+00 0.00000E+00 207 201 59302 0.00000E+00 0.00000E+00 175 177 + 49034 0.00000E+00 0.00000E+00 216 201 59303 0.00000E+00 0.00000E+00 168 177 + 49035 0.00000E+00 0.00000E+00 228 201 59304 0.00000E+00 0.00000E+00 161 177 + 49036 0.00000E+00 0.00000E+00 229 201 59305 0.00000E+00 0.00000E+00 159 177 + 49037 0.00000E+00 0.00000E+00 243 201 59306 0.00000E+00 0.00000E+00 168 176 + 49038 0.00000E+00 0.00000E+00 232 201 59307 0.00000E+00 0.00000E+00 165 176 + 49039 0.00000E+00 0.00000E+00 207 202 59308 0.00000E+00 0.00000E+00 154 176 + 49040 0.00000E+00 0.00000E+00 216 203 59309 0.00000E+00 0.00000E+00 151 176 + 49041 0.00000E+00 0.00000E+00 202 203 59310 0.00000E+00 0.00000E+00 157 176 + 49042 0.00000E+00 0.00000E+00 221 203 59311 0.00000E+00 0.00000E+00 161 176 + 49043 0.00000E+00 0.00000E+00 233 204 59312 0.00000E+00 0.00000E+00 173 176 + 49044 0.00000E+00 0.00000E+00 235 204 59313 0.00000E+00 0.00000E+00 183 176 + 49045 0.00000E+00 0.00000E+00 234 205 59314 0.00000E+00 0.00000E+00 194 176 + 49046 0.00000E+00 0.00000E+00 239 205 59315 0.00000E+00 0.00000E+00 193 177 + 49047 0.00000E+00 0.00000E+00 251 205 59316 0.00000E+00 0.00000E+00 192 177 + 49048 0.00000E+00 0.00000E+00 245 205 59317 0.00000E+00 0.00000E+00 191 177 + 49049 0.00000E+00 0.00000E+00 238 205 59318 0.00000E+00 0.00000E+00 187 178 + 49050 0.00000E+00 0.00000E+00 238 205 59319 0.00000E+00 0.00000E+00 182 178 + 49051 0.00000E+00 0.00000E+00 219 205 59320 0.00000E+00 0.00000E+00 175 178 + 49052 0.00000E+00 0.00000E+00 204 205 59321 0.00000E+00 0.00000E+00 161 178 + 49053 0.00000E+00 0.00000E+00 198 205 59322 0.00000E+00 0.00000E+00 155 178 + 49054 0.00000E+00 0.00000E+00 192 206 59323 0.00000E+00 0.00000E+00 157 178 + 49055 0.00000E+00 0.00000E+00 179 206 59324 0.00000E+00 0.00000E+00 154 178 + 49056 0.00000E+00 0.00000E+00 231 206 59325 0.00000E+00 0.00000E+00 154 179 + 49057 0.00000E+00 0.00000E+00 192 205 59326 0.00000E+00 0.00000E+00 173 179 + 49058 0.00000E+00 0.00000E+00 188 204 59327 0.00000E+00 0.00000E+00 187 179 + 49059 0.00000E+00 0.00000E+00 205 204 59328 0.00000E+00 0.00000E+00 205 179 + 49060 0.00000E+00 0.00000E+00 199 203 59329 0.00000E+00 0.00000E+00 226 180 + 49061 0.00000E+00 0.00000E+00 201 203 59330 0.00000E+00 0.00000E+00 221 180 + 49062 0.00000E+00 0.00000E+00 207 202 59331 0.00000E+00 0.00000E+00 218 181 + 49063 0.00000E+00 0.00000E+00 210 202 59332 0.00000E+00 0.00000E+00 227 182 + 49064 0.00000E+00 0.00000E+00 209 201 59333 0.00000E+00 0.00000E+00 225 182 + 49065 0.00000E+00 0.00000E+00 201 201 59334 0.00000E+00 0.00000E+00 230 182 + 49066 0.00000E+00 0.00000E+00 196 201 59335 0.00000E+00 0.00000E+00 222 183 + 49067 0.00000E+00 0.00000E+00 216 201 59336 0.00000E+00 0.00000E+00 217 183 + 49068 0.00000E+00 0.00000E+00 238 201 59337 0.00000E+00 0.00000E+00 202 183 + 49069 0.00000E+00 0.00000E+00 250 201 59338 0.00000E+00 0.00000E+00 199 183 + 49070 0.00000E+00 0.00000E+00 229 202 59339 0.00000E+00 0.00000E+00 204 183 + 49071 0.00000E+00 0.00000E+00 216 202 59340 0.00000E+00 0.00000E+00 202 183 + 49072 0.00000E+00 0.00000E+00 212 202 59341 0.00000E+00 0.00000E+00 191 183 + 49073 0.00000E+00 0.00000E+00 214 202 59342 0.00000E+00 0.00000E+00 193 183 + 49074 0.00000E+00 0.00000E+00 219 202 59343 0.00000E+00 0.00000E+00 173 183 + 49075 0.00000E+00 0.00000E+00 210 201 59344 0.00000E+00 0.00000E+00 174 182 + 49076 0.00000E+00 0.00000E+00 219 201 59345 0.00000E+00 0.00000E+00 171 182 + 49077 0.00000E+00 0.00000E+00 224 200 59346 0.00000E+00 0.00000E+00 169 182 + 49078 0.00000E+00 0.00000E+00 231 200 59347 0.00000E+00 0.00000E+00 162 183 + 49079 0.00000E+00 0.00000E+00 234 199 59348 0.00000E+00 0.00000E+00 165 183 + 49080 0.00000E+00 0.00000E+00 224 198 59349 0.00000E+00 0.00000E+00 171 183 + 49081 0.00000E+00 0.00000E+00 198 198 59350 0.00000E+00 0.00000E+00 164 184 + 49082 0.00000E+00 0.00000E+00 182 197 59351 0.00000E+00 0.00000E+00 167 186 + 49083 0.00000E+00 0.00000E+00 186 197 59352 0.00000E+00 0.00000E+00 169 187 + 49084 0.00000E+00 0.00000E+00 179 196 59353 0.00000E+00 0.00000E+00 180 188 + 49085 0.00000E+00 0.00000E+00 171 195 59354 0.00000E+00 0.00000E+00 178 188 + 49086 0.00000E+00 0.00000E+00 160 194 59355 0.00000E+00 0.00000E+00 185 189 + 49087 0.00000E+00 0.00000E+00 153 194 59356 0.00000E+00 0.00000E+00 171 189 + 49088 0.00000E+00 0.00000E+00 159 193 59357 0.00000E+00 0.00000E+00 166 189 + 49089 0.00000E+00 0.00000E+00 172 192 59358 0.00000E+00 0.00000E+00 163 190 + 49090 0.00000E+00 0.00000E+00 172 190 59359 0.00000E+00 0.00000E+00 160 190 + 49091 0.00000E+00 0.00000E+00 156 189 59360 0.00000E+00 0.00000E+00 161 190 + 49092 0.00000E+00 0.00000E+00 139 188 59361 0.00000E+00 0.00000E+00 167 191 + 49093 0.00000E+00 0.00000E+00 196 187 59362 0.00000E+00 0.00000E+00 172 191 + 49094 0.00000E+00 0.00000E+00 188 187 59363 0.00000E+00 0.00000E+00 171 192 + 49095 0.00000E+00 0.00000E+00 196 186 59364 0.00000E+00 0.00000E+00 179 192 + 49096 0.00000E+00 0.00000E+00 208 186 59365 0.00000E+00 0.00000E+00 167 192 + 49097 0.00000E+00 0.00000E+00 198 185 60001 0.00000E+00 0.00000E+00 167 193 + 49098 0.00000E+00 0.00000E+00 172 184 60002 0.00000E+00 0.00000E+00 175 193 + 49099 0.00000E+00 0.00000E+00 180 184 60003 0.00000E+00 0.00000E+00 182 192 + 49100 0.00000E+00 0.00000E+00 183 183 60004 0.00000E+00 0.00000E+00 193 192 + 49101 0.00000E+00 0.00000E+00 181 182 60005 0.00000E+00 0.00000E+00 213 191 + 49102 0.00000E+00 0.00000E+00 185 182 60006 0.00000E+00 0.00000E+00 215 190 + 49103 0.00000E+00 0.00000E+00 186 181 60007 0.00000E+00 0.00000E+00 224 190 + 49104 0.00000E+00 0.00000E+00 176 180 60008 0.00000E+00 0.00000E+00 219 189 + 49105 0.00000E+00 0.00000E+00 173 180 60009 0.00000E+00 0.00000E+00 201 188 + 49106 0.00000E+00 0.00000E+00 175 179 60010 0.00000E+00 0.00000E+00 194 187 + 49107 0.00000E+00 0.00000E+00 172 178 60011 0.00000E+00 0.00000E+00 200 186 + 49108 0.00000E+00 0.00000E+00 171 178 60012 0.00000E+00 0.00000E+00 184 185 + 49109 0.00000E+00 0.00000E+00 179 176 60013 0.00000E+00 0.00000E+00 178 184 + 49110 0.00000E+00 0.00000E+00 197 175 60014 0.00000E+00 0.00000E+00 176 184 + 49111 0.00000E+00 0.00000E+00 186 175 60015 0.00000E+00 0.00000E+00 183 183 + 49112 0.00000E+00 0.00000E+00 196 174 60016 0.00000E+00 0.00000E+00 183 182 + 49113 0.00000E+00 0.00000E+00 177 173 60017 0.00000E+00 0.00000E+00 179 182 + 49114 0.00000E+00 0.00000E+00 166 173 60018 0.00000E+00 0.00000E+00 176 181 + 49115 0.00000E+00 0.00000E+00 175 172 60019 0.00000E+00 0.00000E+00 164 181 + 49116 0.00000E+00 0.00000E+00 195 171 60020 0.00000E+00 0.00000E+00 157 180 + 49117 0.00000E+00 0.00000E+00 189 170 60021 0.00000E+00 0.00000E+00 162 180 + 49118 0.00000E+00 0.00000E+00 188 169 60022 0.00000E+00 0.00000E+00 172 179 + 49119 0.00000E+00 0.00000E+00 183 168 60023 0.00000E+00 0.00000E+00 188 179 + 49120 0.00000E+00 0.00000E+00 157 167 60024 0.00000E+00 0.00000E+00 210 179 + 49121 0.00000E+00 0.00000E+00 152 166 60025 0.00000E+00 0.00000E+00 230 178 + 49122 0.00000E+00 0.00000E+00 165 165 60026 0.00000E+00 0.00000E+00 242 178 + 49123 0.00000E+00 0.00000E+00 180 165 60027 0.00000E+00 0.00000E+00 248 178 + 49124 0.00000E+00 0.00000E+00 173 165 60028 0.00000E+00 0.00000E+00 252 177 + 49125 0.00000E+00 0.00000E+00 183 164 60029 0.00000E+00 0.00000E+00 237 177 + 49126 0.00000E+00 0.00000E+00 169 164 60030 0.00000E+00 0.00000E+00 230 176 + 49127 0.00000E+00 0.00000E+00 163 164 60031 0.00000E+00 0.00000E+00 223 176 + 49128 0.00000E+00 0.00000E+00 166 163 60032 0.00000E+00 0.00000E+00 225 175 + 49129 0.00000E+00 0.00000E+00 166 163 60033 0.00000E+00 0.00000E+00 213 175 + 49130 0.00000E+00 0.00000E+00 153 163 60034 0.00000E+00 0.00000E+00 215 174 + 49131 0.00000E+00 0.00000E+00 137 162 60035 0.00000E+00 0.00000E+00 209 174 + 49132 0.00000E+00 0.00000E+00 137 162 60036 0.00000E+00 0.00000E+00 209 174 + 49133 0.00000E+00 0.00000E+00 126 162 60037 0.00000E+00 0.00000E+00 192 174 + 49134 0.00000E+00 0.00000E+00 140 162 60038 0.00000E+00 0.00000E+00 187 173 + 49135 0.00000E+00 0.00000E+00 148 162 60039 0.00000E+00 0.00000E+00 183 173 + 49136 0.00000E+00 0.00000E+00 148 161 60040 0.00000E+00 0.00000E+00 183 172 + 49137 0.00000E+00 0.00000E+00 150 161 60041 0.00000E+00 0.00000E+00 178 172 + 49138 0.00000E+00 0.00000E+00 156 161 60042 0.00000E+00 0.00000E+00 175 172 + 49139 0.00000E+00 0.00000E+00 154 161 60043 0.00000E+00 0.00000E+00 166 172 + 49140 0.00000E+00 0.00000E+00 155 161 60044 0.00000E+00 0.00000E+00 167 171 + 49141 0.00000E+00 0.00000E+00 149 162 60045 0.00000E+00 0.00000E+00 167 171 + 49142 0.00000E+00 0.00000E+00 144 162 60046 0.00000E+00 0.00000E+00 160 170 + 49143 0.00000E+00 0.00000E+00 144 162 60047 0.00000E+00 0.00000E+00 158 170 + 49144 0.00000E+00 0.00000E+00 152 161 60048 0.00000E+00 0.00000E+00 153 169 + 49145 0.00000E+00 0.00000E+00 155 161 60049 0.00000E+00 0.00000E+00 151 168 + 49146 0.00000E+00 0.00000E+00 145 160 60050 0.00000E+00 0.00000E+00 143 168 + 49147 0.00000E+00 0.00000E+00 150 160 60051 0.00000E+00 0.00000E+00 142 168 + 49148 0.00000E+00 0.00000E+00 148 159 60052 0.00000E+00 0.00000E+00 156 168 + 49149 0.00000E+00 0.00000E+00 153 159 60053 0.00000E+00 0.00000E+00 149 168 + 49150 0.00000E+00 0.00000E+00 161 158 60054 0.00000E+00 0.00000E+00 143 168 + 49151 0.00000E+00 0.00000E+00 165 157 60055 0.00000E+00 0.00000E+00 140 168 + 49152 0.00000E+00 0.00000E+00 166 156 60056 0.00000E+00 0.00000E+00 147 168 + 49153 0.00000E+00 0.00000E+00 157 155 60057 0.00000E+00 0.00000E+00 147 168 + 49154 0.00000E+00 0.00000E+00 160 155 60058 0.00000E+00 0.00000E+00 147 168 + 49155 0.00000E+00 0.00000E+00 151 154 60059 0.00000E+00 0.00000E+00 140 168 + 49156 0.00000E+00 0.00000E+00 150 154 60060 0.00000E+00 0.00000E+00 140 167 + 49157 0.00000E+00 0.00000E+00 153 153 60061 0.00000E+00 0.00000E+00 137 167 + 49158 0.00000E+00 0.00000E+00 146 153 60062 0.00000E+00 0.00000E+00 137 167 + 49159 0.00000E+00 0.00000E+00 150 152 60063 0.00000E+00 0.00000E+00 138 167 + 49160 0.00000E+00 0.00000E+00 147 152 60064 0.00000E+00 0.00000E+00 139 167 + 49161 0.00000E+00 0.00000E+00 137 152 60065 0.00000E+00 0.00000E+00 140 167 + 49162 0.00000E+00 0.00000E+00 144 152 60066 0.00000E+00 0.00000E+00 135 166 + 49163 0.00000E+00 0.00000E+00 149 152 60067 0.00000E+00 0.00000E+00 139 166 + 49164 0.00000E+00 0.00000E+00 150 152 60068 0.00000E+00 0.00000E+00 141 165 + 49165 0.00000E+00 0.00000E+00 144 152 60069 0.00000E+00 0.00000E+00 143 164 + 49166 0.00000E+00 0.00000E+00 141 152 60070 0.00000E+00 0.00000E+00 132 163 + 49167 0.00000E+00 0.00000E+00 143 152 60071 0.00000E+00 0.00000E+00 132 162 + 49168 0.00000E+00 0.00000E+00 144 152 60072 0.00000E+00 0.00000E+00 129 162 + 49169 0.00000E+00 0.00000E+00 138 153 60073 0.00000E+00 0.00000E+00 135 161 + 49170 0.00000E+00 0.00000E+00 137 154 60074 0.00000E+00 0.00000E+00 134 160 + 49171 0.00000E+00 0.00000E+00 142 155 60075 0.00000E+00 0.00000E+00 137 160 + 49172 0.00000E+00 0.00000E+00 149 156 60076 0.00000E+00 0.00000E+00 142 159 + 49173 0.00000E+00 0.00000E+00 152 157 60077 0.00000E+00 0.00000E+00 140 158 + 49174 0.00000E+00 0.00000E+00 153 158 60078 0.00000E+00 0.00000E+00 133 157 + 49175 0.00000E+00 0.00000E+00 160 158 60079 0.00000E+00 0.00000E+00 137 157 + 49176 0.00000E+00 0.00000E+00 162 159 60080 0.00000E+00 0.00000E+00 143 157 + 49177 0.00000E+00 0.00000E+00 173 159 60081 0.00000E+00 0.00000E+00 145 156 + 49178 0.00000E+00 0.00000E+00 193 159 60082 0.00000E+00 0.00000E+00 150 156 + 49179 0.00000E+00 0.00000E+00 209 158 60083 0.00000E+00 0.00000E+00 154 156 + 49180 0.00000E+00 0.00000E+00 202 158 60084 0.00000E+00 0.00000E+00 158 156 + 49181 0.00000E+00 0.00000E+00 210 157 60085 0.00000E+00 0.00000E+00 157 156 + 49182 0.00000E+00 0.00000E+00 183 157 60086 0.00000E+00 0.00000E+00 161 155 + 49183 0.00000E+00 0.00000E+00 169 156 60087 0.00000E+00 0.00000E+00 169 155 + 49184 0.00000E+00 0.00000E+00 159 156 60088 0.00000E+00 0.00000E+00 175 155 + 49185 0.00000E+00 0.00000E+00 149 156 60089 0.00000E+00 0.00000E+00 181 156 + 49186 0.00000E+00 0.00000E+00 132 156 60090 0.00000E+00 0.00000E+00 193 156 + 49187 0.00000E+00 0.00000E+00 133 156 60091 0.00000E+00 0.00000E+00 182 156 + 49188 0.00000E+00 0.00000E+00 133 156 60092 0.00000E+00 0.00000E+00 201 157 + 49189 0.00000E+00 0.00000E+00 129 157 60093 0.00000E+00 0.00000E+00 184 157 + 49190 0.00000E+00 0.00000E+00 121 157 60094 0.00000E+00 0.00000E+00 179 157 + 49191 0.00000E+00 0.00000E+00 116 158 60095 0.00000E+00 0.00000E+00 188 157 + 49192 0.00000E+00 0.00000E+00 115 158 60096 0.00000E+00 0.00000E+00 182 158 + 49193 0.00000E+00 0.00000E+00 117 159 60097 0.00000E+00 0.00000E+00 169 158 + 49194 0.00000E+00 0.00000E+00 124 160 60098 0.00000E+00 0.00000E+00 165 158 + 49195 0.00000E+00 0.00000E+00 132 160 60099 0.00000E+00 0.00000E+00 147 158 + 49196 0.00000E+00 0.00000E+00 144 161 60100 0.00000E+00 0.00000E+00 148 158 + 49197 0.00000E+00 0.00000E+00 149 162 60101 0.00000E+00 0.00000E+00 156 158 + 49198 0.00000E+00 0.00000E+00 143 163 60102 0.00000E+00 0.00000E+00 159 159 + 49199 0.00000E+00 0.00000E+00 143 163 60103 0.00000E+00 0.00000E+00 168 159 + 49200 0.00000E+00 0.00000E+00 148 164 60104 0.00000E+00 0.00000E+00 179 159 + 49201 0.00000E+00 0.00000E+00 165 164 60105 0.00000E+00 0.00000E+00 183 160 + 49202 0.00000E+00 0.00000E+00 164 165 60106 0.00000E+00 0.00000E+00 190 160 + 49203 0.00000E+00 0.00000E+00 146 165 60107 0.00000E+00 0.00000E+00 183 160 + 49204 0.00000E+00 0.00000E+00 162 166 60108 0.00000E+00 0.00000E+00 178 160 + 49205 0.00000E+00 0.00000E+00 174 166 60109 0.00000E+00 0.00000E+00 176 161 + 49206 0.00000E+00 0.00000E+00 180 166 60110 0.00000E+00 0.00000E+00 170 161 + 49207 0.00000E+00 0.00000E+00 191 167 60111 0.00000E+00 0.00000E+00 175 162 + 49208 0.00000E+00 0.00000E+00 204 167 60112 0.00000E+00 0.00000E+00 163 162 + 49209 0.00000E+00 0.00000E+00 215 167 60113 0.00000E+00 0.00000E+00 160 162 + 49210 0.00000E+00 0.00000E+00 230 168 60114 0.00000E+00 0.00000E+00 166 163 + 49211 0.00000E+00 0.00000E+00 222 168 60115 0.00000E+00 0.00000E+00 165 163 + 49212 0.00000E+00 0.00000E+00 234 168 60116 0.00000E+00 0.00000E+00 147 164 + 49213 0.00000E+00 0.00000E+00 229 169 60117 0.00000E+00 0.00000E+00 143 164 + 49214 0.00000E+00 0.00000E+00 195 169 60118 0.00000E+00 0.00000E+00 140 164 + 49215 0.00000E+00 0.00000E+00 188 169 60119 0.00000E+00 0.00000E+00 142 165 + 49216 0.00000E+00 0.00000E+00 169 170 60120 0.00000E+00 0.00000E+00 153 166 + 49217 0.00000E+00 0.00000E+00 166 170 60121 0.00000E+00 0.00000E+00 161 166 + 49218 0.00000E+00 0.00000E+00 140 170 60122 0.00000E+00 0.00000E+00 152 167 + 49219 0.00000E+00 0.00000E+00 130 171 60123 0.00000E+00 0.00000E+00 160 167 + 49220 0.00000E+00 0.00000E+00 117 170 60124 0.00000E+00 0.00000E+00 158 167 + 49221 0.00000E+00 0.00000E+00 108 170 60125 0.00000E+00 0.00000E+00 156 167 + 49222 0.00000E+00 0.00000E+00 114 170 60126 0.00000E+00 0.00000E+00 152 167 + 49223 0.00000E+00 0.00000E+00 110 170 60127 0.00000E+00 0.00000E+00 156 167 + 49224 0.00000E+00 0.00000E+00 126 170 60128 0.00000E+00 0.00000E+00 162 167 + 49225 0.00000E+00 0.00000E+00 138 170 60129 0.00000E+00 0.00000E+00 168 167 + 49226 0.00000E+00 0.00000E+00 151 171 60130 0.00000E+00 0.00000E+00 170 166 + 49227 0.00000E+00 0.00000E+00 160 171 60131 0.00000E+00 0.00000E+00 170 166 + 49228 0.00000E+00 0.00000E+00 165 171 60132 0.00000E+00 0.00000E+00 180 165 + 49229 0.00000E+00 0.00000E+00 182 172 60133 0.00000E+00 0.00000E+00 179 164 + 49230 0.00000E+00 0.00000E+00 188 172 60134 0.00000E+00 0.00000E+00 170 163 + 49231 0.00000E+00 0.00000E+00 205 172 60135 0.00000E+00 0.00000E+00 162 163 + 49232 0.00000E+00 0.00000E+00 216 172 60136 0.00000E+00 0.00000E+00 162 162 + 49233 0.00000E+00 0.00000E+00 215 172 60137 0.00000E+00 0.00000E+00 155 162 + 49234 0.00000E+00 0.00000E+00 221 173 60138 0.00000E+00 0.00000E+00 151 162 + 49235 0.00000E+00 0.00000E+00 208 173 60139 0.00000E+00 0.00000E+00 153 161 + 49236 0.00000E+00 0.00000E+00 215 173 60140 0.00000E+00 0.00000E+00 153 162 + 49237 0.00000E+00 0.00000E+00 220 174 60141 0.00000E+00 0.00000E+00 160 162 + 49238 0.00000E+00 0.00000E+00 206 175 60142 0.00000E+00 0.00000E+00 164 163 + 49239 0.00000E+00 0.00000E+00 194 176 60143 0.00000E+00 0.00000E+00 164 164 + 49240 0.00000E+00 0.00000E+00 188 177 60144 0.00000E+00 0.00000E+00 163 164 + 49241 0.00000E+00 0.00000E+00 186 178 60145 0.00000E+00 0.00000E+00 164 164 + 49242 0.00000E+00 0.00000E+00 185 179 60146 0.00000E+00 0.00000E+00 163 165 + 49243 0.00000E+00 0.00000E+00 182 180 60147 0.00000E+00 0.00000E+00 158 165 + 49244 0.00000E+00 0.00000E+00 163 181 60148 0.00000E+00 0.00000E+00 166 165 + 49245 0.00000E+00 0.00000E+00 177 181 60149 0.00000E+00 0.00000E+00 171 165 + 49246 0.00000E+00 0.00000E+00 178 182 60150 0.00000E+00 0.00000E+00 170 165 + 49247 0.00000E+00 0.00000E+00 172 182 60151 0.00000E+00 0.00000E+00 170 165 + 49248 0.00000E+00 0.00000E+00 169 182 60152 0.00000E+00 0.00000E+00 159 165 + 49249 0.00000E+00 0.00000E+00 169 182 60153 0.00000E+00 0.00000E+00 166 165 + 49250 0.00000E+00 0.00000E+00 165 181 60154 0.00000E+00 0.00000E+00 167 165 + 49251 0.00000E+00 0.00000E+00 168 180 60155 0.00000E+00 0.00000E+00 167 165 + 49252 0.00000E+00 0.00000E+00 174 180 60156 0.00000E+00 0.00000E+00 172 164 + 49253 0.00000E+00 0.00000E+00 169 178 60157 0.00000E+00 0.00000E+00 170 164 + 49254 0.00000E+00 0.00000E+00 178 177 60158 0.00000E+00 0.00000E+00 175 164 + 49255 0.00000E+00 0.00000E+00 186 177 60159 0.00000E+00 0.00000E+00 185 164 + 49256 0.00000E+00 0.00000E+00 184 176 60160 0.00000E+00 0.00000E+00 185 165 + 49257 0.00000E+00 0.00000E+00 204 176 60161 0.00000E+00 0.00000E+00 181 165 + 49258 0.00000E+00 0.00000E+00 195 176 60162 0.00000E+00 0.00000E+00 178 165 + 49259 0.00000E+00 0.00000E+00 211 176 60163 0.00000E+00 0.00000E+00 171 165 + 49260 0.00000E+00 0.00000E+00 195 176 60164 0.00000E+00 0.00000E+00 167 164 + 49261 0.00000E+00 0.00000E+00 196 176 60165 0.00000E+00 0.00000E+00 162 164 + 49262 0.00000E+00 0.00000E+00 189 177 60166 0.00000E+00 0.00000E+00 166 164 + 49263 0.00000E+00 0.00000E+00 179 177 60167 0.00000E+00 0.00000E+00 166 164 + 49264 0.00000E+00 0.00000E+00 175 178 60168 0.00000E+00 0.00000E+00 157 164 + 49265 0.00000E+00 0.00000E+00 185 178 60169 0.00000E+00 0.00000E+00 153 164 + 49266 0.00000E+00 0.00000E+00 170 178 60170 0.00000E+00 0.00000E+00 139 164 + 49267 0.00000E+00 0.00000E+00 165 178 60171 0.00000E+00 0.00000E+00 140 164 + 49268 0.00000E+00 0.00000E+00 156 178 60172 0.00000E+00 0.00000E+00 133 163 + 49269 0.00000E+00 0.00000E+00 148 178 60173 0.00000E+00 0.00000E+00 131 163 + 49270 0.00000E+00 0.00000E+00 144 179 60174 0.00000E+00 0.00000E+00 130 162 + 49271 0.00000E+00 0.00000E+00 131 179 60175 0.00000E+00 0.00000E+00 136 162 + 49272 0.00000E+00 0.00000E+00 129 179 60176 0.00000E+00 0.00000E+00 132 162 + 49273 0.00000E+00 0.00000E+00 128 179 60177 0.00000E+00 0.00000E+00 140 161 + 49274 0.00000E+00 0.00000E+00 147 178 60178 0.00000E+00 0.00000E+00 155 161 + 49275 0.00000E+00 0.00000E+00 163 178 60179 0.00000E+00 0.00000E+00 164 160 + 49276 0.00000E+00 0.00000E+00 164 178 60180 0.00000E+00 0.00000E+00 184 160 + 49277 0.00000E+00 0.00000E+00 191 177 60181 0.00000E+00 0.00000E+00 190 160 + 49278 0.00000E+00 0.00000E+00 217 176 60182 0.00000E+00 0.00000E+00 194 160 + 49279 0.00000E+00 0.00000E+00 239 176 60183 0.00000E+00 0.00000E+00 208 160 + 49280 0.00000E+00 0.00000E+00 223 176 60184 0.00000E+00 0.00000E+00 207 160 + 49281 0.00000E+00 0.00000E+00 230 177 60185 0.00000E+00 0.00000E+00 210 161 + 49282 0.00000E+00 0.00000E+00 238 177 60186 0.00000E+00 0.00000E+00 212 162 + 49283 0.00000E+00 0.00000E+00 225 177 60187 0.00000E+00 0.00000E+00 209 163 + 49284 0.00000E+00 0.00000E+00 226 177 60188 0.00000E+00 0.00000E+00 200 164 + 49285 0.00000E+00 0.00000E+00 224 177 60189 0.00000E+00 0.00000E+00 187 165 + 49286 0.00000E+00 0.00000E+00 214 176 60190 0.00000E+00 0.00000E+00 176 166 + 49287 0.00000E+00 0.00000E+00 198 176 60191 0.00000E+00 0.00000E+00 176 167 + 49288 0.00000E+00 0.00000E+00 188 176 60192 0.00000E+00 0.00000E+00 166 167 + 49289 0.00000E+00 0.00000E+00 189 176 60193 0.00000E+00 0.00000E+00 153 168 + 49290 0.00000E+00 0.00000E+00 172 176 60194 0.00000E+00 0.00000E+00 142 169 + 49291 0.00000E+00 0.00000E+00 152 176 60195 0.00000E+00 0.00000E+00 135 169 + 49292 0.00000E+00 0.00000E+00 146 176 60196 0.00000E+00 0.00000E+00 139 169 + 49293 0.00000E+00 0.00000E+00 140 176 60197 0.00000E+00 0.00000E+00 146 169 + 49294 0.00000E+00 0.00000E+00 144 176 60198 0.00000E+00 0.00000E+00 144 169 + 49295 0.00000E+00 0.00000E+00 147 176 60199 0.00000E+00 0.00000E+00 153 168 + 49296 0.00000E+00 0.00000E+00 161 176 60200 0.00000E+00 0.00000E+00 159 168 + 49297 0.00000E+00 0.00000E+00 163 176 60201 0.00000E+00 0.00000E+00 156 167 + 49298 0.00000E+00 0.00000E+00 133 176 60202 0.00000E+00 0.00000E+00 152 167 + 49299 0.00000E+00 0.00000E+00 128 175 60203 0.00000E+00 0.00000E+00 153 166 + 49300 0.00000E+00 0.00000E+00 142 175 60204 0.00000E+00 0.00000E+00 148 166 + 49301 0.00000E+00 0.00000E+00 145 175 60205 0.00000E+00 0.00000E+00 151 165 + 49302 0.00000E+00 0.00000E+00 146 174 60206 0.00000E+00 0.00000E+00 159 165 + 49303 0.00000E+00 0.00000E+00 149 174 60207 0.00000E+00 0.00000E+00 148 165 + 49304 0.00000E+00 0.00000E+00 150 174 60208 0.00000E+00 0.00000E+00 149 165 + 49305 0.00000E+00 0.00000E+00 148 174 60209 0.00000E+00 0.00000E+00 150 165 + 49306 0.00000E+00 0.00000E+00 150 174 60210 0.00000E+00 0.00000E+00 149 164 + 49307 0.00000E+00 0.00000E+00 165 174 60211 0.00000E+00 0.00000E+00 154 165 + 49308 0.00000E+00 0.00000E+00 167 174 60212 0.00000E+00 0.00000E+00 146 165 + 49309 0.00000E+00 0.00000E+00 172 174 60213 0.00000E+00 0.00000E+00 145 166 + 49310 0.00000E+00 0.00000E+00 187 174 60214 0.00000E+00 0.00000E+00 140 166 + 49311 0.00000E+00 0.00000E+00 205 175 60215 0.00000E+00 0.00000E+00 134 167 + 49312 0.00000E+00 0.00000E+00 220 175 60216 0.00000E+00 0.00000E+00 125 167 + 49313 0.00000E+00 0.00000E+00 212 175 60217 0.00000E+00 0.00000E+00 122 168 + 49314 0.00000E+00 0.00000E+00 183 175 60218 0.00000E+00 0.00000E+00 126 168 + 49315 0.00000E+00 0.00000E+00 186 175 60219 0.00000E+00 0.00000E+00 127 169 + 49316 0.00000E+00 0.00000E+00 169 175 60220 0.00000E+00 0.00000E+00 134 169 + 49317 0.00000E+00 0.00000E+00 164 174 60221 0.00000E+00 0.00000E+00 145 169 + 49318 0.00000E+00 0.00000E+00 177 174 60222 0.00000E+00 0.00000E+00 152 169 + 49319 0.00000E+00 0.00000E+00 196 173 60223 0.00000E+00 0.00000E+00 170 169 + 49320 0.00000E+00 0.00000E+00 200 172 60224 0.00000E+00 0.00000E+00 187 169 + 49321 0.00000E+00 0.00000E+00 217 171 60225 0.00000E+00 0.00000E+00 214 168 + 49322 0.00000E+00 0.00000E+00 202 170 60226 0.00000E+00 0.00000E+00 234 168 + 49323 0.00000E+00 0.00000E+00 186 169 60227 0.00000E+00 0.00000E+00 238 168 + 49324 0.00000E+00 0.00000E+00 169 168 60228 0.00000E+00 0.00000E+00 240 167 + 49325 0.00000E+00 0.00000E+00 155 168 60229 0.00000E+00 0.00000E+00 241 167 + 49326 0.00000E+00 0.00000E+00 151 167 60230 0.00000E+00 0.00000E+00 247 166 + 49327 0.00000E+00 0.00000E+00 154 166 60231 0.00000E+00 0.00000E+00 250 166 + 49328 0.00000E+00 0.00000E+00 168 165 60232 0.00000E+00 0.00000E+00 234 165 + 49329 0.00000E+00 0.00000E+00 170 165 60233 0.00000E+00 0.00000E+00 219 165 + 49330 0.00000E+00 0.00000E+00 170 164 60234 0.00000E+00 0.00000E+00 201 164 + 49331 0.00000E+00 0.00000E+00 158 164 60235 0.00000E+00 0.00000E+00 189 164 + 49332 0.00000E+00 0.00000E+00 171 164 60236 0.00000E+00 0.00000E+00 171 164 + 49333 0.00000E+00 0.00000E+00 181 164 60237 0.00000E+00 0.00000E+00 162 163 + 49334 0.00000E+00 0.00000E+00 184 163 60238 0.00000E+00 0.00000E+00 158 163 + 49335 0.00000E+00 0.00000E+00 181 163 60239 0.00000E+00 0.00000E+00 162 163 + 49336 0.00000E+00 0.00000E+00 174 163 60240 0.00000E+00 0.00000E+00 150 163 + 49337 0.00000E+00 0.00000E+00 174 162 60241 0.00000E+00 0.00000E+00 140 163 + 49338 0.00000E+00 0.00000E+00 170 162 60242 0.00000E+00 0.00000E+00 129 162 + 49339 0.00000E+00 0.00000E+00 170 162 60243 0.00000E+00 0.00000E+00 129 162 + 49340 0.00000E+00 0.00000E+00 178 162 60244 0.00000E+00 0.00000E+00 132 162 + 49341 0.00000E+00 0.00000E+00 171 162 60245 0.00000E+00 0.00000E+00 137 163 + 49342 0.00000E+00 0.00000E+00 180 161 60246 0.00000E+00 0.00000E+00 152 163 + 49343 0.00000E+00 0.00000E+00 167 161 60247 0.00000E+00 0.00000E+00 149 163 + 49344 0.00000E+00 0.00000E+00 170 161 60248 0.00000E+00 0.00000E+00 142 163 + 49345 0.00000E+00 0.00000E+00 177 161 60249 0.00000E+00 0.00000E+00 142 163 + 49346 0.00000E+00 0.00000E+00 191 161 60250 0.00000E+00 0.00000E+00 149 163 + 49347 0.00000E+00 0.00000E+00 191 162 60251 0.00000E+00 0.00000E+00 162 164 + 49348 0.00000E+00 0.00000E+00 163 162 60252 0.00000E+00 0.00000E+00 170 164 + 49349 0.00000E+00 0.00000E+00 161 162 60253 0.00000E+00 0.00000E+00 173 164 + 49350 0.00000E+00 0.00000E+00 152 162 60254 0.00000E+00 0.00000E+00 175 164 + 49351 0.00000E+00 0.00000E+00 155 162 60255 0.00000E+00 0.00000E+00 175 164 + 49352 0.00000E+00 0.00000E+00 154 162 60256 0.00000E+00 0.00000E+00 177 164 + 49353 0.00000E+00 0.00000E+00 144 161 60257 0.00000E+00 0.00000E+00 181 164 + 49354 0.00000E+00 0.00000E+00 132 160 60258 0.00000E+00 0.00000E+00 181 164 + 49355 0.00000E+00 0.00000E+00 134 160 60259 0.00000E+00 0.00000E+00 178 164 + 49356 0.00000E+00 0.00000E+00 146 159 60260 0.00000E+00 0.00000E+00 177 164 + 49357 0.00000E+00 0.00000E+00 144 159 60261 0.00000E+00 0.00000E+00 185 164 + 49358 0.00000E+00 0.00000E+00 143 158 60262 0.00000E+00 0.00000E+00 190 164 + 49359 0.00000E+00 0.00000E+00 146 158 60263 0.00000E+00 0.00000E+00 199 164 + 49360 0.00000E+00 0.00000E+00 151 157 60264 0.00000E+00 0.00000E+00 195 163 + 49361 0.00000E+00 0.00000E+00 156 155 60265 0.00000E+00 0.00000E+00 189 162 + 49362 0.00000E+00 0.00000E+00 161 154 60266 0.00000E+00 0.00000E+00 184 161 + 49363 0.00000E+00 0.00000E+00 161 153 60267 0.00000E+00 0.00000E+00 175 160 + 49364 0.00000E+00 0.00000E+00 156 152 60268 0.00000E+00 0.00000E+00 162 159 + 49365 0.00000E+00 0.00000E+00 151 151 60269 0.00000E+00 0.00000E+00 155 157 + 50001 0.00000E+00 0.00000E+00 150 150 60270 0.00000E+00 0.00000E+00 148 156 + 50002 0.00000E+00 0.00000E+00 152 150 60271 0.00000E+00 0.00000E+00 142 155 + 50003 0.00000E+00 0.00000E+00 153 150 60272 0.00000E+00 0.00000E+00 132 154 + 50004 0.00000E+00 0.00000E+00 148 150 60273 0.00000E+00 0.00000E+00 124 153 + 50005 0.00000E+00 0.00000E+00 151 150 60274 0.00000E+00 0.00000E+00 121 152 + 50006 0.00000E+00 0.00000E+00 143 150 60275 0.00000E+00 0.00000E+00 115 152 + 50007 0.00000E+00 0.00000E+00 133 150 60276 0.00000E+00 0.00000E+00 112 152 + 50008 0.00000E+00 0.00000E+00 129 150 60277 0.00000E+00 0.00000E+00 120 152 + 50009 0.00000E+00 0.00000E+00 120 151 60278 0.00000E+00 0.00000E+00 132 152 + 50010 0.00000E+00 0.00000E+00 114 151 60279 0.00000E+00 0.00000E+00 132 153 + 50011 0.00000E+00 0.00000E+00 121 151 60280 0.00000E+00 0.00000E+00 132 153 + 50012 0.00000E+00 0.00000E+00 129 151 60281 0.00000E+00 0.00000E+00 144 153 + 50013 0.00000E+00 0.00000E+00 127 151 60282 0.00000E+00 0.00000E+00 143 154 + 50014 0.00000E+00 0.00000E+00 128 151 60283 0.00000E+00 0.00000E+00 151 154 + 50015 0.00000E+00 0.00000E+00 130 151 60284 0.00000E+00 0.00000E+00 159 154 + 50016 0.00000E+00 0.00000E+00 130 151 60285 0.00000E+00 0.00000E+00 152 154 + 50017 0.00000E+00 0.00000E+00 125 150 60286 0.00000E+00 0.00000E+00 159 154 + 50018 0.00000E+00 0.00000E+00 124 149 60287 0.00000E+00 0.00000E+00 162 154 + 50019 0.00000E+00 0.00000E+00 139 149 60288 0.00000E+00 0.00000E+00 166 154 + 50020 0.00000E+00 0.00000E+00 170 148 60289 0.00000E+00 0.00000E+00 165 153 + 50021 0.00000E+00 0.00000E+00 171 147 60290 0.00000E+00 0.00000E+00 165 153 + 50022 0.00000E+00 0.00000E+00 172 147 60291 0.00000E+00 0.00000E+00 167 153 + 50023 0.00000E+00 0.00000E+00 183 146 60292 0.00000E+00 0.00000E+00 154 152 + 50024 0.00000E+00 0.00000E+00 197 145 60293 0.00000E+00 0.00000E+00 153 151 + 50025 0.00000E+00 0.00000E+00 182 145 60294 0.00000E+00 0.00000E+00 149 151 + 50026 0.00000E+00 0.00000E+00 163 145 60295 0.00000E+00 0.00000E+00 144 150 + 50027 0.00000E+00 0.00000E+00 165 145 60296 0.00000E+00 0.00000E+00 141 150 + 50028 0.00000E+00 0.00000E+00 164 145 60297 0.00000E+00 0.00000E+00 134 149 + 50029 0.00000E+00 0.00000E+00 158 146 60298 0.00000E+00 0.00000E+00 129 149 + 50030 0.00000E+00 0.00000E+00 149 146 60299 0.00000E+00 0.00000E+00 130 149 + 50031 0.00000E+00 0.00000E+00 135 146 60300 0.00000E+00 0.00000E+00 132 149 + 50032 0.00000E+00 0.00000E+00 127 146 60301 0.00000E+00 0.00000E+00 132 148 + 50033 0.00000E+00 0.00000E+00 125 147 60302 0.00000E+00 0.00000E+00 122 148 + 50034 0.00000E+00 0.00000E+00 122 147 60303 0.00000E+00 0.00000E+00 131 147 + 50035 0.00000E+00 0.00000E+00 112 147 60304 0.00000E+00 0.00000E+00 128 147 + 50036 0.00000E+00 0.00000E+00 112 147 60305 0.00000E+00 0.00000E+00 127 146 + 50037 0.00000E+00 0.00000E+00 99 146 60306 0.00000E+00 0.00000E+00 124 146 + 50038 0.00000E+00 0.00000E+00 102 146 60307 0.00000E+00 0.00000E+00 129 145 + 50039 0.00000E+00 0.00000E+00 103 145 60308 0.00000E+00 0.00000E+00 130 145 + 50040 0.00000E+00 0.00000E+00 106 145 60309 0.00000E+00 0.00000E+00 131 144 + 50041 0.00000E+00 0.00000E+00 113 144 60310 0.00000E+00 0.00000E+00 144 144 + 50042 0.00000E+00 0.00000E+00 126 144 60311 0.00000E+00 0.00000E+00 148 144 + 50043 0.00000E+00 0.00000E+00 141 144 60312 0.00000E+00 0.00000E+00 157 144 + 50044 0.00000E+00 0.00000E+00 152 143 60313 0.00000E+00 0.00000E+00 168 144 + 50045 0.00000E+00 0.00000E+00 161 143 60314 0.00000E+00 0.00000E+00 175 143 + 50046 0.00000E+00 0.00000E+00 188 142 60315 0.00000E+00 0.00000E+00 200 143 + 50047 0.00000E+00 0.00000E+00 191 142 60316 0.00000E+00 0.00000E+00 188 143 + 50048 0.00000E+00 0.00000E+00 186 142 60317 0.00000E+00 0.00000E+00 168 143 + 50049 0.00000E+00 0.00000E+00 195 142 60318 0.00000E+00 0.00000E+00 180 143 + 50050 0.00000E+00 0.00000E+00 207 142 60319 0.00000E+00 0.00000E+00 192 143 + 50051 0.00000E+00 0.00000E+00 207 143 60320 0.00000E+00 0.00000E+00 183 143 + 50052 0.00000E+00 0.00000E+00 185 143 60321 0.00000E+00 0.00000E+00 174 142 + 50053 0.00000E+00 0.00000E+00 177 143 60322 0.00000E+00 0.00000E+00 164 142 + 50054 0.00000E+00 0.00000E+00 163 144 60323 0.00000E+00 0.00000E+00 153 142 + 50055 0.00000E+00 0.00000E+00 150 144 60324 0.00000E+00 0.00000E+00 150 142 + 50056 0.00000E+00 0.00000E+00 137 145 60325 0.00000E+00 0.00000E+00 147 142 + 50057 0.00000E+00 0.00000E+00 132 145 60326 0.00000E+00 0.00000E+00 139 142 + 50058 0.00000E+00 0.00000E+00 128 146 60327 0.00000E+00 0.00000E+00 127 142 + 50059 0.00000E+00 0.00000E+00 121 146 60328 0.00000E+00 0.00000E+00 116 142 + 50060 0.00000E+00 0.00000E+00 117 147 60329 0.00000E+00 0.00000E+00 113 142 + 50061 0.00000E+00 0.00000E+00 116 147 60330 0.00000E+00 0.00000E+00 111 142 + 50062 0.00000E+00 0.00000E+00 125 147 60331 0.00000E+00 0.00000E+00 117 142 + 50063 0.00000E+00 0.00000E+00 125 147 60332 0.00000E+00 0.00000E+00 119 142 + 50064 0.00000E+00 0.00000E+00 125 147 60333 0.00000E+00 0.00000E+00 117 142 + 50065 0.00000E+00 0.00000E+00 136 146 60334 0.00000E+00 0.00000E+00 119 142 + 50066 0.00000E+00 0.00000E+00 157 146 60335 0.00000E+00 0.00000E+00 131 141 + 50067 0.00000E+00 0.00000E+00 153 146 60336 0.00000E+00 0.00000E+00 136 141 + 50068 0.00000E+00 0.00000E+00 162 146 60337 0.00000E+00 0.00000E+00 145 140 + 50069 0.00000E+00 0.00000E+00 173 146 60338 0.00000E+00 0.00000E+00 152 140 + 50070 0.00000E+00 0.00000E+00 161 146 60339 0.00000E+00 0.00000E+00 163 140 + 50071 0.00000E+00 0.00000E+00 157 146 60340 0.00000E+00 0.00000E+00 159 139 + 50072 0.00000E+00 0.00000E+00 158 146 60341 0.00000E+00 0.00000E+00 161 139 + 50073 0.00000E+00 0.00000E+00 159 146 60342 0.00000E+00 0.00000E+00 152 138 + 50074 0.00000E+00 0.00000E+00 157 147 60343 0.00000E+00 0.00000E+00 154 138 + 50075 0.00000E+00 0.00000E+00 149 147 60344 0.00000E+00 0.00000E+00 150 138 + 50076 0.00000E+00 0.00000E+00 146 148 60345 0.00000E+00 0.00000E+00 151 137 + 50077 0.00000E+00 0.00000E+00 135 149 60346 0.00000E+00 0.00000E+00 144 137 + 50078 0.00000E+00 0.00000E+00 122 150 60347 0.00000E+00 0.00000E+00 140 137 + 50079 0.00000E+00 0.00000E+00 117 151 60348 0.00000E+00 0.00000E+00 136 137 + 50080 0.00000E+00 0.00000E+00 123 152 60349 0.00000E+00 0.00000E+00 132 136 + 50081 0.00000E+00 0.00000E+00 113 152 60350 0.00000E+00 0.00000E+00 138 136 + 50082 0.00000E+00 0.00000E+00 113 153 60351 0.00000E+00 0.00000E+00 134 135 + 50083 0.00000E+00 0.00000E+00 117 153 60352 0.00000E+00 0.00000E+00 125 135 + 50084 0.00000E+00 0.00000E+00 113 154 60353 0.00000E+00 0.00000E+00 118 134 + 50085 0.00000E+00 0.00000E+00 112 154 60354 0.00000E+00 0.00000E+00 115 134 + 50086 0.00000E+00 0.00000E+00 117 154 60355 0.00000E+00 0.00000E+00 118 133 + 50087 0.00000E+00 0.00000E+00 125 154 60356 0.00000E+00 0.00000E+00 116 132 + 50088 0.00000E+00 0.00000E+00 133 154 60357 0.00000E+00 0.00000E+00 106 132 + 50089 0.00000E+00 0.00000E+00 143 154 60358 0.00000E+00 0.00000E+00 103 131 + 50090 0.00000E+00 0.00000E+00 138 153 60359 0.00000E+00 0.00000E+00 106 130 + 50091 0.00000E+00 0.00000E+00 136 153 60360 0.00000E+00 0.00000E+00 111 129 + 50092 0.00000E+00 0.00000E+00 146 152 60361 0.00000E+00 0.00000E+00 116 129 + 50093 0.00000E+00 0.00000E+00 157 152 60362 0.00000E+00 0.00000E+00 125 128 + 50094 0.00000E+00 0.00000E+00 159 151 60363 0.00000E+00 0.00000E+00 136 127 + 50095 0.00000E+00 0.00000E+00 165 151 60364 0.00000E+00 0.00000E+00 145 127 + 50096 0.00000E+00 0.00000E+00 166 151 60365 0.00000E+00 0.00000E+00 159 126 + 50097 0.00000E+00 0.00000E+00 174 151 60366 0.00000E+00 0.00000E+00 163 126 + 50098 0.00000E+00 0.00000E+00 181 151 61001 0.00000E+00 0.00000E+00 164 125 + 50099 0.00000E+00 0.00000E+00 176 152 61002 0.00000E+00 0.00000E+00 176 125 + 50100 0.00000E+00 0.00000E+00 166 152 61003 0.00000E+00 0.00000E+00 175 125 + 50101 0.00000E+00 0.00000E+00 164 153 61004 0.00000E+00 0.00000E+00 165 125 + 50102 0.00000E+00 0.00000E+00 171 153 61005 0.00000E+00 0.00000E+00 160 125 + 50103 0.00000E+00 0.00000E+00 161 154 61006 0.00000E+00 0.00000E+00 143 124 + 50104 0.00000E+00 0.00000E+00 181 154 61007 0.00000E+00 0.00000E+00 132 124 + 50105 0.00000E+00 0.00000E+00 184 155 61008 0.00000E+00 0.00000E+00 125 124 + 50106 0.00000E+00 0.00000E+00 172 155 61009 0.00000E+00 0.00000E+00 122 123 + 50107 0.00000E+00 0.00000E+00 162 155 61010 0.00000E+00 0.00000E+00 115 123 + 50108 0.00000E+00 0.00000E+00 161 155 61011 0.00000E+00 0.00000E+00 110 123 + 50109 0.00000E+00 0.00000E+00 153 155 61012 0.00000E+00 0.00000E+00 103 122 + 50110 0.00000E+00 0.00000E+00 131 154 61013 0.00000E+00 0.00000E+00 96 121 + 50111 0.00000E+00 0.00000E+00 135 154 61014 0.00000E+00 0.00000E+00 96 121 + 50112 0.00000E+00 0.00000E+00 148 153 61015 0.00000E+00 0.00000E+00 97 120 + 50113 0.00000E+00 0.00000E+00 161 153 61016 0.00000E+00 0.00000E+00 100 119 + 50114 0.00000E+00 0.00000E+00 170 153 61017 0.00000E+00 0.00000E+00 102 119 + 50115 0.00000E+00 0.00000E+00 175 152 61018 0.00000E+00 0.00000E+00 103 118 + 50116 0.00000E+00 0.00000E+00 188 152 61019 0.00000E+00 0.00000E+00 102 117 + 50117 0.00000E+00 0.00000E+00 188 152 61020 0.00000E+00 0.00000E+00 102 117 + 50118 0.00000E+00 0.00000E+00 177 152 61021 0.00000E+00 0.00000E+00 104 116 + 50119 0.00000E+00 0.00000E+00 166 152 61022 0.00000E+00 0.00000E+00 102 116 + 50120 0.00000E+00 0.00000E+00 158 152 61023 0.00000E+00 0.00000E+00 100 115 + 50121 0.00000E+00 0.00000E+00 156 152 61024 0.00000E+00 0.00000E+00 103 115 + 50122 0.00000E+00 0.00000E+00 161 153 61025 0.00000E+00 0.00000E+00 103 114 + 50123 0.00000E+00 0.00000E+00 157 153 61026 0.00000E+00 0.00000E+00 108 114 + 50124 0.00000E+00 0.00000E+00 157 153 61027 0.00000E+00 0.00000E+00 109 114 + 50125 0.00000E+00 0.00000E+00 175 153 61028 0.00000E+00 0.00000E+00 125 113 + 50126 0.00000E+00 0.00000E+00 179 154 61029 0.00000E+00 0.00000E+00 132 113 + 50127 0.00000E+00 0.00000E+00 177 154 61030 0.00000E+00 0.00000E+00 129 113 + 50128 0.00000E+00 0.00000E+00 182 154 61031 0.00000E+00 0.00000E+00 123 112 + 50129 0.00000E+00 0.00000E+00 179 154 61032 0.00000E+00 0.00000E+00 123 112 + 50130 0.00000E+00 0.00000E+00 166 154 61033 0.00000E+00 0.00000E+00 122 112 + 50131 0.00000E+00 0.00000E+00 159 154 61034 0.00000E+00 0.00000E+00 118 112 + 50132 0.00000E+00 0.00000E+00 154 153 61035 0.00000E+00 0.00000E+00 118 112 + 50133 0.00000E+00 0.00000E+00 150 153 61036 0.00000E+00 0.00000E+00 118 112 + 50134 0.00000E+00 0.00000E+00 145 153 61037 0.00000E+00 0.00000E+00 121 111 + 50135 0.00000E+00 0.00000E+00 136 152 61038 0.00000E+00 0.00000E+00 114 111 + 50136 0.00000E+00 0.00000E+00 129 152 61039 0.00000E+00 0.00000E+00 111 110 + 50137 0.00000E+00 0.00000E+00 147 152 61040 0.00000E+00 0.00000E+00 108 110 + 50138 0.00000E+00 0.00000E+00 152 151 61041 0.00000E+00 0.00000E+00 104 109 + 50139 0.00000E+00 0.00000E+00 169 151 61042 0.00000E+00 0.00000E+00 101 108 + 50140 0.00000E+00 0.00000E+00 171 150 61043 0.00000E+00 0.00000E+00 98 108 + 50141 0.00000E+00 0.00000E+00 164 149 61044 0.00000E+00 0.00000E+00 97 107 + 50142 0.00000E+00 0.00000E+00 159 149 61045 0.00000E+00 0.00000E+00 97 106 + 50143 0.00000E+00 0.00000E+00 165 148 61046 0.00000E+00 0.00000E+00 98 106 + 50144 0.00000E+00 0.00000E+00 171 147 61047 0.00000E+00 0.00000E+00 96 106 + 50145 0.00000E+00 0.00000E+00 171 147 61048 0.00000E+00 0.00000E+00 96 106 + 50146 0.00000E+00 0.00000E+00 162 146 61049 0.00000E+00 0.00000E+00 96 106 + 50147 0.00000E+00 0.00000E+00 152 145 61050 0.00000E+00 0.00000E+00 96 106 + 50148 0.00000E+00 0.00000 \ No newline at end of file diff --git a/EUV/euv91/euv91ix2.dat b/EUV/euv91/euv91ix2.dat new file mode 100755 index 0000000..e8e4d40 --- /dev/null +++ b/EUV/euv91/euv91ix2.dat @@ -0,0 +1,1246 @@ + Date Lyman-a He I 10830 F10 F81 Date Lyman-a He I 10830 F10 F81 + + 68172 0.00000 0.00000 152 149 78269 5.16468e+11 3.18297e+11 149 150 + 68173 3.48600e+11 0.00000 157 149 78270 5.19000e+11 3.29632e+11 146 151 + 68174 3.48623e+11 0.00000 155 149 78271 5.20651e+11 3.40968e+11 148 152 + 68175 3.48653e+11 0.00000 164 149 78272 5.22283e+11 3.48525e+11 148 152 + 68176 3.48686e+11 0.00000 158 150 78273 5.25000e+11 3.46377e+11 143 153 + 68177 3.48721e+11 0.00000 154 149 78274 5.31000e+11 3.39864e+11 139 154 + 68178 3.48756e+11 0.00000 146 149 78275 5.43000e+11 3.37189e+11 138 154 + 68179 3.48790e+11 0.00000 148 149 78276 5.53361e+11 3.40968e+11 132 155 + 68180 3.48824e+11 0.00000 143 149 78277 5.60369e+11 3.37189e+11 132 156 + 68181 3.48856e+11 0.00000 139 148 78278 5.64106e+11 3.35402e+11 139 156 + 68182 3.48884e+11 0.00000 136 147 78279 5.64000e+11 3.37189e+11 137 156 + 68183 3.48902e+11 0.00000 128 147 78280 5.59823e+11 3.37189e+11 142 157 + 68184 3.48900e+11 0.00000 120 146 78281 5.55000e+11 3.25854e+11 150 157 + 68185 3.48866e+11 0.00000 117 146 78282 5.52000e+11 3.24166e+11 156 157 + 68186 3.48814e+11 0.00000 116 146 78283 5.49000e+11 3.29632e+11 162 157 + 68187 3.48764e+11 0.00000 119 146 78284 5.52188e+11 3.37189e+11 172 157 + 68188 3.48731e+11 0.00000 120 146 78285 5.60948e+11 3.48525e+11 177 157 + 68189 3.48745e+11 0.00000 135 146 78286 5.73000e+11 3.40968e+11 179 156 + 68190 3.48861e+11 0.00000 147 146 78287 5.85894e+11 3.40968e+11 180 156 + 68191 3.49200e+11 0.00000 154 146 78288 5.94000e+11 3.51011e+11 182 155 + 68192 3.49898e+11 0.00000 157 147 78289 5.92416e+11 3.56081e+11 177 154 + 68193 3.50819e+11 0.00000 163 147 78290 5.84434e+11 3.48525e+11 172 154 + 68194 3.51844e+11 0.00000 166 147 78291 5.74578e+11 3.48525e+11 169 153 + 68195 3.52919e+11 0.00000 156 147 78292 5.67000e+11 3.40968e+11 170 153 + 68196 3.54020e+11 0.00000 156 147 78293 5.64185e+11 3.34330e+11 171 153 + 68197 3.55136e+11 0.00000 148 147 78294 5.61000e+11 3.30741e+11 167 153 + 68198 3.56270e+11 0.00000 150 147 78295 5.52000e+11 3.28969e+11 161 154 + 68199 3.57433e+11 0.00000 144 146 78296 5.38887e+11 3.28395e+11 161 154 + 68200 3.58654e+11 0.00000 135 146 78297 5.27212e+11 3.28805e+11 157 154 + 68201 3.60000e+11 0.00000 135 145 78298 5.23500e+11 3.30315e+11 156 155 + 68202 3.61611e+11 0.00000 134 145 78299 5.31175e+11 3.33411e+11 154 155 + 68203 3.63793e+11 0.00000 133 145 78300 5.37000e+11 3.37189e+11 151 155 + 68204 3.67200e+11 0.00000 139 144 78301 5.31000e+11 3.37189e+11 148 155 + 68205 3.69800e+11 0.00000 146 144 78302 5.28808e+11 3.39466e+11 150 155 + 68206 3.65900e+11 0.00000 153 144 78303 5.32377e+11 3.44008e+11 147 156 + 68207 3.72600e+11 0.00000 158 144 78304 5.39173e+11 3.48890e+11 144 156 + 68208 3.70700e+11 0.00000 154 144 78305 5.47304e+11 3.52303e+11 152 156 + 68209 3.61500e+11 0.00000 147 144 78306 5.55141e+11 3.52303e+11 159 157 + 68210 3.64300e+11 0.00000 144 144 78307 5.61000e+11 3.48525e+11 170 158 + 68211 3.56000e+11 0.00000 144 144 78308 5.63515e+11 3.44192e+11 177 158 + 68212 3.49700e+11 0.00000 139 144 78309 5.63534e+11 3.40968e+11 181 159 + 68213 3.46100e+11 0.00000 135 144 78310 5.62122e+11 3.39847e+11 172 159 + 68214 3.49266e+11 0.00000 134 144 78311 5.60061e+11 3.40968e+11 175 159 + 68215 3.53593e+11 0.00000 134 144 78312 5.58000e+11 3.40968e+11 168 159 + 68216 3.50000e+11 0.00000 141 144 78313 5.56447e+11 3.29632e+11 165 160 + 68217 3.39600e+11 0.00000 136 144 78314 5.55424e+11 3.21083e+11 166 159 + 68218 3.51500e+11 0.00000 136 144 78315 5.54913e+11 3.17196e+11 164 159 + 68219 3.49100e+11 0.00000 148 144 78316 5.55000e+11 3.15899e+11 150 159 + 68220 3.56900e+11 0.00000 140 143 78317 5.55772e+11 3.15995e+11 145 159 + 68221 3.65400e+11 0.00000 142 143 78318 5.56985e+11 3.16755e+11 136 159 + 68222 3.62000e+11 0.00000 147 143 78319 5.58365e+11 3.17673e+11 134 159 + 68223 3.63300e+11 0.00000 147 143 78320 5.59674e+11 3.18297e+11 129 159 + 68224 3.58500e+11 0.00000 151 143 78321 5.60659e+11 3.18297e+11 128 160 + 68225 3.54900e+11 0.00000 162 143 78322 5.61000e+11 3.18297e+11 127 160 + 68226 3.44700e+11 0.00000 171 143 78323 5.61000e+11 3.18297e+11 129 160 + 68227 3.63500e+11 0.00000 185 144 78324 5.63009e+11 3.14518e+11 135 160 + 68228 3.55400e+11 0.00000 186 144 78325 5.66880e+11 3.12965e+11 126 160 + 68229 3.59800e+11 0.00000 179 144 78326 5.71934e+11 3.14071e+11 127 161 + 68230 3.60100e+11 0.00000 169 145 78327 5.77730e+11 3.16680e+11 122 161 + 68231 3.60400e+11 0.00000 165 145 78328 5.83971e+11 3.20138e+11 124 161 + 68232 3.60600e+11 0.00000 160 145 78329 5.90450e+11 3.24079e+11 125 161 + 68233 3.61600e+11 0.00000 160 145 78330 5.97009e+11 3.28299e+11 133 162 + 68234 3.60500e+11 0.00000 159 145 78331 6.03502e+11 3.32687e+11 144 162 + 68235 3.59800e+11 0.00000 154 144 78332 6.09774e+11 3.37189e+11 154 162 + 68236 3.60100e+11 0.00000 138 144 78333 6.15623e+11 3.41581e+11 162 162 + 68237 3.53500e+11 0.00000 131 144 78334 6.20765e+11 3.44746e+11 168 163 + 68238 3.47900e+11 0.00000 124 144 78335 6.24774e+11 3.45633e+11 167 163 + 68239 3.43608e+11 0.00000 118 144 78336 6.27000e+11 3.45223e+11 168 163 + 68240 3.45000e+11 0.00000 115 144 78337 6.26912e+11 3.44746e+11 164 163 + 68241 3.54500e+11 0.00000 119 144 78338 6.25441e+11 3.44746e+11 165 164 + 68242 3.57800e+11 0.00000 122 144 78339 6.23717e+11 3.43844e+11 170 164 + 68243 3.59000e+11 0.00000 126 144 78340 6.22822e+11 3.42235e+11 165 165 + 68244 3.60400e+11 0.00000 124 144 78341 6.24000e+11 3.40505e+11 179 165 + 68245 3.69100e+11 0.00000 130 144 78342 6.28062e+11 3.39197e+11 190 165 + 68246 3.59700e+11 0.00000 134 144 78343 6.32968e+11 3.38998e+11 190 166 + 68247 3.67300e+11 0.00000 143 144 78344 6.36000e+11 3.40968e+11 205 166 + 68248 3.61300e+11 0.00000 143 143 78345 6.35098e+11 3.44746e+11 211 167 + 68249 3.62400e+11 0.00000 140 143 78346 6.31592e+11 3.44356e+11 217 168 + 68250 3.64400e+11 0.00000 136 143 78347 6.27328e+11 3.40463e+11 211 169 + 68251 3.67800e+11 0.00000 141 143 78348 6.24000e+11 3.35061e+11 197 169 + 68252 3.66800e+11 0.00000 149 143 78349 6.22573e+11 3.29632e+11 193 170 + 68253 3.68500e+11 0.00000 149 143 78350 6.20693e+11 3.25250e+11 181 170 + 68254 3.69800e+11 0.00000 156 143 78351 6.15000e+11 3.21691e+11 178 170 + 68255 3.68200e+11 0.00000 153 144 78352 6.06000e+11 3.18606e+11 162 171 + 68256 3.68200e+11 0.00000 156 144 78353 6.03000e+11 3.15804e+11 153 171 + 68257 3.64300e+11 0.00000 151 144 78354 5.94000e+11 3.13193e+11 138 172 + 68258 3.68400e+11 0.00000 147 145 78355 5.91000e+11 3.10740e+11 132 172 + 68259 3.68300e+11 0.00000 136 145 78356 0.00000 3.10740e+11 133 172 + 68260 3.58600e+11 0.00000 132 146 78357 0.00000 3.18297e+11 133 173 + 68261 3.54738e+11 0.00000 132 146 78358 0.00000 3.22075e+11 135 173 + 68262 3.54400e+11 0.00000 129 146 78359 0.00000 3.30507e+11 138 174 + 68263 3.54200e+11 0.00000 127 147 78360 0.00000 3.40968e+11 144 175 + 68264 3.59800e+11 0.00000 127 147 78361 0.00000 3.48115e+11 149 175 + 68265 3.60800e+11 0.00000 134 147 78362 0.00000 3.52497e+11 164 176 + 68266 3.54700e+11 0.00000 128 147 78363 0.00000 3.55452e+11 166 177 + 68267 3.47500e+11 0.00000 127 147 78364 0.00000 3.57843e+11 182 178 + 68268 3.48700e+11 0.00000 143 146 78365 0.00000 3.60336e+11 195 179 + 68269 3.62200e+11 0.00000 158 146 79001 0.00000 3.63638e+11 194 180 + 68270 3.47700e+11 0.00000 160 145 79002 0.00000 3.68182e+11 200 181 + 68271 3.53200e+11 0.00000 158 145 79003 0.00000 3.72607e+11 204 182 + 68272 3.52500e+11 0.00000 159 144 79004 0.00000 3.74974e+11 193 183 + 68273 3.47100e+11 0.00000 154 144 79005 0.00000 3.73696e+11 195 184 + 68274 3.55700e+11 0.00000 144 144 79006 0.00000 3.70227e+11 191 185 + 68275 3.54200e+11 0.00000 137 144 79007 0.00000 3.66334e+11 186 185 + 68276 3.59300e+11 0.00000 136 143 79008 0.00000 3.63638e+11 200 186 + 68277 3.68200e+11 0.00000 145 143 79009 0.00000 3.63287e+11 193 187 + 68278 3.64700e+11 0.00000 146 143 79010 0.00000 3.63638e+11 186 188 + 68279 3.60700e+11 0.00000 148 143 79011 0.00000 3.62973e+11 180 189 + 68280 3.57100e+11 0.00000 145 143 79012 0.00000 3.61531e+11 175 189 + 68281 3.70300e+11 0.00000 147 144 79013 0.00000 3.59860e+11 194 190 + 68282 3.62700e+11 0.00000 142 144 79014 0.00000 3.58332e+11 200 191 + 68283 3.65300e+11 0.00000 137 144 79015 0.00000 3.56987e+11 192 191 + 68284 3.60600e+11 0.00000 135 144 79016 0.00000 3.55828e+11 190 191 + 68285 3.64600e+11 0.00000 134 145 79017 0.00000 3.54926e+11 176 191 + 68286 3.60100e+11 0.00000 137 145 79018 0.00000 3.54433e+11 178 190 + 68287 3.51700e+11 0.00000 127 145 79019 0.00000 3.54642e+11 188 190 + 68288 3.57000e+11 0.00000 132 144 79020 0.00000 3.56081e+11 197 189 + 68289 3.65400e+11 0.00000 137 144 79021 0.00000 3.59276e+11 210 189 + 68290 3.65269e+11 0.00000 137 144 79022 0.00000 3.63638e+11 227 188 + 68291 3.63100e+11 0.00000 143 144 79023 0.00000 3.68500e+11 225 188 + 68292 3.62700e+11 0.00000 150 144 79024 0.00000 3.73138e+11 209 188 + 68293 3.53700e+11 0.00000 154 144 79025 0.00000 3.76701e+11 206 188 + 68294 3.57113e+11 0.00000 156 144 79026 0.00000 3.77974e+11 193 188 + 68295 3.63600e+11 0.00000 163 143 79027 0.00000 3.74974e+11 205 188 + 68296 3.61200e+11 0.00000 165 143 79028 0.00000 3.67417e+11 210 188 + 68297 3.61400e+11 0.00000 167 143 79029 0.00000 3.63388e+11 209 188 + 68298 3.62900e+11 0.00000 173 143 79030 0.00000 3.63638e+11 194 189 + 68299 3.56600e+11 0.00000 172 143 79031 0.00000 3.67117e+11 194 190 + 68300 3.67300e+11 0.00000 173 143 79032 0.00000 3.72351e+11 186 190 + 68301 3.62300e+11 0.00000 173 143 79033 0.00000 3.78090e+11 186 191 + 68302 3.57521e+11 0.00000 171 144 79034 0.00000 3.83252e+11 187 192 + 68303 3.59600e+11 0.00000 191 144 79035 0.00000 3.86560e+11 188 192 + 68304 3.63200e+11 0.00000 164 144 79036 0.00000 3.86115e+11 197 192 + 68305 3.50200e+11 0.00000 160 144 79037 0.00000 3.78752e+11 207 193 + 68306 3.50600e+11 0.00000 153 144 79038 0.00000 3.67417e+11 203 193 + 68307 3.51200e+11 0.00000 152 144 79039 0.00000 3.71195e+11 207 193 + 68308 3.57900e+11 0.00000 146 144 79040 0.00000 3.67417e+11 199 193 + 68309 3.64000e+11 0.00000 140 144 79041 0.00000 3.63151e+11 198 193 + 68310 3.46800e+11 0.00000 133 144 79042 0.00000 3.60972e+11 202 193 + 68311 3.60100e+11 0.00000 131 144 79043 0.00000 3.59860e+11 195 193 + 68312 3.63315e+11 0.00000 129 143 79044 0.00000 3.59252e+11 195 193 + 68313 3.63100e+11 0.00000 133 143 79045 0.00000 3.59158e+11 204 193 + 68314 3.73300e+11 0.00000 135 143 79046 0.00000 3.59860e+11 205 193 + 68315 3.73200e+11 0.00000 135 143 79047 0.00000 3.61590e+11 209 193 + 68316 3.73600e+11 0.00000 133 143 79048 0.00000 3.63638e+11 213 193 + 68317 3.66300e+11 0.00000 129 143 79049 0.00000 3.65286e+11 238 193 + 68318 3.74900e+11 0.00000 132 143 79050 0.00000 3.66487e+11 238 193 + 68319 3.57300e+11 0.00000 131 143 79051 0.00000 3.67246e+11 230 193 + 68320 3.50800e+11 0.00000 134 143 79052 0.00000 3.67417e+11 225 193 + 68321 3.46300e+11 0.00000 128 143 79053 0.00000 3.66127e+11 223 194 + 68322 3.53450e+11 0.00000 141 144 79054 0.00000 3.59860e+11 196 193 + 68323 3.58579e+11 0.00000 148 144 79055 0.00000 3.48525e+11 183 193 + 68324 3.59136e+11 0.00000 141 144 79056 0.00000 3.48525e+11 168 193 + 68325 3.55700e+11 0.00000 139 144 79057 0.00000 3.59860e+11 166 193 + 68326 3.51400e+11 0.00000 134 144 79058 0.00000 3.62419e+11 163 193 + 68327 3.56200e+11 0.00000 131 144 79059 0.00000 3.59860e+11 164 192 + 68328 3.53300e+11 0.00000 132 144 79060 0.00000 3.60012e+11 169 192 + 68329 3.60100e+11 0.00000 134 144 79061 0.00000 3.62095e+11 171 192 + 68330 3.54800e+11 0.00000 135 145 79062 0.00000 3.63638e+11 173 192 + 68331 3.46800e+11 0.00000 135 145 79063 0.00000 3.63638e+11 181 191 + 68332 3.56000e+11 0.00000 134 145 79064 0.00000 3.63638e+11 180 190 + 68333 3.53400e+11 0.00000 130 146 79065 0.00000 3.59860e+11 182 190 + 68334 3.49300e+11 0.00000 128 146 79066 0.00000 3.63638e+11 183 189 + 68335 3.53500e+11 0.00000 129 147 79067 0.00000 3.59860e+11 179 189 + 68336 3.54838e+11 0.00000 140 147 79068 0.00000 3.59132e+11 181 188 + 68337 3.55550e+11 0.00000 150 147 79069 0.00000 3.59860e+11 181 188 + 68338 3.59000e+11 0.00000 150 147 79070 0.00000 3.56081e+11 182 187 + 68339 3.58400e+11 0.00000 148 146 79071 0.00000 3.52303e+11 189 187 + 68340 3.56000e+11 0.00000 147 146 79072 0.00000 3.63638e+11 186 186 + 68341 3.51250e+11 0.00000 143 146 79073 0.00000 3.63638e+11 189 186 + 68342 3.49000e+11 0.00000 140 146 79074 0.00000 3.74974e+11 181 186 + 68343 3.53050e+11 0.00000 142 145 79075 0.00000 3.52303e+11 184 186 + 68344 3.55003e+11 0.00000 146 145 79076 0.00000 3.47649e+11 178 185 + 68345 3.54350e+11 0.00000 148 144 79077 0.00000 3.61216e+11 189 185 + 68346 3.52269e+11 0.00000 144 144 79078 0.00000 3.74974e+11 178 185 + 68347 3.48700e+11 0.00000 139 144 79079 0.00000 3.76224e+11 184 185 + 68348 3.44450e+11 0.00000 132 144 79080 0.00000 3.69463e+11 182 185 + 68349 3.46300e+11 0.00000 134 143 79081 0.00000 3.61759e+11 181 185 + 68350 3.51400e+11 0.00000 134 143 79082 0.00000 3.59860e+11 189 184 + 68351 3.43500e+11 0.00000 127 143 79083 0.00000 3.67417e+11 188 184 + 68352 3.62600e+11 0.00000 130 143 79084 0.00000 3.74165e+11 188 184 + 68353 3.66485e+11 0.00000 134 143 79085 0.00000 3.78502e+11 200 183 + 68354 3.59200e+11 0.00000 142 143 79086 0.00000 3.81453e+11 188 183 + 68355 3.54700e+11 0.00000 145 143 79087 0.00000 3.83576e+11 189 183 + 68356 3.52900e+11 0.00000 147 143 79088 0.00000 3.85152e+11 191 182 + 68357 3.64800e+11 0.00000 147 143 79089 0.00000 3.86278e+11 187 182 + 68358 3.70800e+11 0.00000 146 143 79090 0.00000 3.86896e+11 201 181 + 68359 3.67800e+11 0.00000 154 143 79091 0.00000 3.86781e+11 203 180 + 68360 3.69263e+11 0.00000 155 143 79092 0.00000 3.85460e+11 203 180 + 68361 3.73347e+11 0.00000 154 143 79093 0.00000 3.82051e+11 194 179 + 68362 3.74200e+11 0.00000 164 143 79094 0.00000 3.74974e+11 184 179 + 68363 3.69300e+11 0.00000 151 143 79095 0.00000 3.63638e+11 179 179 + 68364 3.69400e+11 0.00000 147 143 79096 0.00000 3.52303e+11 176 179 + 68365 0.00000 0.00000 144 143 79097 0.00000 3.40968e+11 167 179 + 68366 0.00000 0.00000 140 143 79098 0.00000 3.37189e+11 169 179 + 69001 0.00000 0.00000 140 143 79099 0.00000 3.29632e+11 170 179 + 69002 0.00000 0.00000 142 143 79100 0.00000 3.33623e+11 173 179 + 69003 0.00000 0.00000 144 143 79101 0.00000 3.40968e+11 170 179 + 69004 0.00000 0.00000 155 143 79102 0.00000 3.44746e+11 175 178 + 69005 0.00000 0.00000 163 143 79103 0.00000 3.59860e+11 176 178 + 69006 0.00000 0.00000 179 143 79104 0.00000 3.63638e+11 171 178 + 69007 0.00000 0.00000 183 143 79105 0.00000 3.69112e+11 168 178 + 69008 0.00000 0.00000 183 143 79106 0.00000 3.71195e+11 172 177 + 69009 0.00000 0.00000 183 143 79107 0.00000 3.63638e+11 168 177 + 69010 0.00000 0.00000 169 143 79108 0.00000 3.59860e+11 159 176 + 69011 0.00000 0.00000 169 143 79109 0.00000 3.48525e+11 159 176 + 69012 0.00000 0.00000 163 144 79110 0.00000 3.44746e+11 156 176 + 69013 0.00000 0.00000 157 144 79111 0.00000 3.40968e+11 162 176 + 69014 0.00000 0.00000 153 145 79112 0.00000 3.33411e+11 160 176 + 69015 0.00000 0.00000 154 145 79113 0.00000 3.28046e+11 162 176 + 69016 0.00000 0.00000 153 146 79114 0.00000 3.29632e+11 162 176 + 69017 0.00000 0.00000 149 147 79115 0.00000 3.40968e+11 173 177 + 69018 0.00000 0.00000 144 147 79116 0.00000 3.56081e+11 182 177 + 69019 0.00000 0.00000 132 148 79117 0.00000 3.71195e+11 195 178 + 69020 0.00000 0.00000 128 148 79118 0.00000 3.78752e+11 192 179 + 69021 0.00000 0.00000 132 148 79119 0.00000 3.71195e+11 186 180 + 69022 0.00000 0.00000 134 148 79120 0.00000 3.71195e+11 185 180 + 69023 0.00000 0.00000 125 149 79121 0.00000 3.69316e+11 180 181 + 69024 0.00000 0.00000 131 149 79122 0.00000 3.63638e+11 179 182 + 69025 0.00000 0.00000 134 149 79123 0.00000 3.59860e+11 164 182 + 69026 0.00000 0.00000 142 149 79124 0.00000 3.67417e+11 176 182 + 69027 0.00000 0.00000 132 149 79125 0.00000 3.63638e+11 170 182 + 69028 0.00000 0.00000 130 149 79126 0.00000 3.52303e+11 171 182 + 69029 0.00000 0.00000 129 149 79127 0.00000 3.52745e+11 178 181 + 69030 0.00000 0.00000 126 149 79128 0.00000 3.61511e+11 182 181 + 69031 0.00000 0.00000 126 149 79129 0.00000 3.70387e+11 181 181 + 69032 0.00000 0.00000 130 148 79130 0.00000 3.71195e+11 175 180 + 69033 0.00000 0.00000 139 148 79131 0.00000 3.63638e+11 179 179 + 69034 0.00000 0.00000 139 148 79132 0.00000 3.71195e+11 184 179 + 69035 0.00000 0.00000 138 149 79133 0.00000 3.74974e+11 187 178 + 69036 0.00000 0.00000 139 149 79134 0.00000 3.73899e+11 182 177 + 69037 0.00000 0.00000 139 150 79135 0.00000 3.71195e+11 182 177 + 69038 0.00000 0.00000 140 151 79136 0.00000 3.67417e+11 176 176 + 69039 0.00000 0.00000 134 151 79137 0.00000 3.59860e+11 188 176 + 69040 0.00000 0.00000 133 152 79138 0.00000 3.52303e+11 171 176 + 69041 0.00000 0.00000 130 154 79139 0.00000 3.44407e+11 162 176 + 69042 0.00000 0.00000 129 154 79140 0.00000 3.38000e+11 156 176 + 69043 0.00000 0.00000 125 155 79141 0.00000 3.36446e+11 156 176 + 69044 0.00000 0.00000 126 155 79142 0.00000 3.44746e+11 157 176 + 69045 0.00000 0.00000 125 156 79143 0.00000 3.63638e+11 156 176 + 69046 0.00000 0.00000 125 156 79144 0.00000 3.73848e+11 159 177 + 69047 0.00000 0.00000 128 156 79145 0.00000 3.74974e+11 153 177 + 69048 0.00000 0.00000 134 156 79146 0.00000 3.71195e+11 149 178 + 69049 0.00000 0.00000 139 156 79147 0.00000 3.66440e+11 149 178 + 69050 0.00000 0.00000 150 156 79148 0.00000 3.63638e+11 149 179 + 69051 0.00000 0.00000 159 156 79149 0.00000 3.63638e+11 150 179 + 69052 0.00000 0.00000 169 157 79150 0.00000 3.59860e+11 158 180 + 69053 0.00000 0.00000 185 157 79151 0.00000 3.52303e+11 175 180 + 69054 0.00000 0.00000 201 157 79152 0.00000 3.52303e+11 190 181 + 69055 0.00000 0.00000 206 157 79153 0.00000 3.59860e+11 207 181 + 69056 0.00000 0.00000 207 158 79154 0.00000 3.63638e+11 216 181 + 69057 0.00000 0.00000 195 158 79155 0.00000 3.66898e+11 229 181 + 69058 0.00000 0.00000 197 158 79156 0.00000 3.74974e+11 230 180 + 69059 0.00000 0.00000 181 158 79157 0.00000 3.86309e+11 238 180 + 69060 0.00000 0.00000 166 158 79158 0.00000 3.82531e+11 238 179 + 69061 0.00000 0.00000 152 158 79159 0.00000 3.80727e+11 243 179 + 69062 0.00000 0.00000 148 158 79160 0.00000 3.78752e+11 247 178 + 69063 0.00000 0.00000 144 159 79161 0.00000 3.71195e+11 240 178 + 69064 0.00000 0.00000 136 159 79162 0.00000 3.66652e+11 230 177 + 69065 0.00000 0.00000 139 160 79163 0.00000 3.59860e+11 208 177 + 69066 0.00000 0.00000 138 161 79164 0.00000 3.48525e+11 194 177 + 69067 0.00000 0.00000 137 161 79165 0.00000 3.48525e+11 186 177 + 69068 0.00000 0.00000 142 161 79166 0.00000 3.40968e+11 176 177 + 69069 0.00000 0.00000 138 161 79167 0.00000 3.40968e+11 168 177 + 69070 0.00000 0.00000 136 161 79168 0.00000 3.40656e+11 158 176 + 69071 0.00000 0.00000 139 162 79169 0.00000 3.37189e+11 153 176 + 69072 0.00000 0.00000 134 162 79170 0.00000 3.37189e+11 146 176 + 69073 0.00000 0.00000 139 162 79171 0.00000 3.52303e+11 152 176 + 69074 0.00000 0.00000 162 162 79172 0.00000 3.39494e+11 149 175 + 69075 0.00000 0.00000 175 162 79173 0.00000 3.29632e+11 141 175 + 69076 0.00000 0.00000 200 162 79174 0.00000 3.48525e+11 139 174 + 69077 0.00000 0.00000 211 162 79175 0.00000 3.40968e+11 141 174 + 69078 0.00000 0.00000 209 162 79176 0.00000 3.48525e+11 148 173 + 69079 0.00000 0.00000 214 162 79177 0.00000 3.59860e+11 154 173 + 69080 0.00000 0.00000 231 162 79178 0.00000 3.59860e+11 159 172 + 69081 0.00000 0.00000 223 162 79179 0.00000 3.63638e+11 159 172 + 69082 0.00000 0.00000 206 162 79180 0.00000 3.67507e+11 167 172 + 69083 0.00000 0.00000 195 162 79181 0.00000 3.70729e+11 177 172 + 69084 0.00000 0.00000 181 162 79182 0.00000 3.75038e+11 186 172 + 69085 0.00000 0.00000 191 162 79183 0.00000 3.82531e+11 201 172 + 69086 0.00000 0.00000 178 163 79184 0.00000 3.90088e+11 213 172 + 69087 0.00000 0.00000 178 163 79185 0.00000 3.80964e+11 218 172 + 69088 0.00000 0.00000 182 163 79186 0.00000 3.74974e+11 205 172 + 69089 0.00000 0.00000 183 163 79187 0.00000 3.86309e+11 211 172 + 69090 0.00000 0.00000 186 163 79188 0.00000 3.82531e+11 207 172 + 69091 0.00000 0.00000 189 163 79189 0.00000 3.82531e+11 207 172 + 69092 0.00000 0.00000 191 163 79190 0.00000 3.67417e+11 198 173 + 69093 0.00000 0.00000 190 163 79191 0.00000 3.52303e+11 186 173 + 69094 0.00000 0.00000 177 162 79192 0.00000 3.44746e+11 179 174 + 69095 0.00000 0.00000 176 162 79193 0.00000 3.39854e+11 170 174 + 69096 0.00000 0.00000 163 161 79194 0.00000 3.36053e+11 161 174 + 69097 0.00000 0.00000 154 161 79195 0.00000 3.33411e+11 155 174 + 69098 0.00000 0.00000 148 160 79196 0.00000 3.32122e+11 151 174 + 69099 0.00000 0.00000 144 160 79197 0.00000 3.31759e+11 144 174 + 69100 0.00000 0.00000 149 160 79198 0.00000 3.31940e+11 143 174 + 69101 0.00000 0.00000 151 160 79199 0.00000 3.32470e+11 141 173 + 69102 0.00000 0.00000 156 160 79200 0.00000 3.33266e+11 144 173 + 69103 0.00000 0.00000 173 160 79201 0.00000 3.34340e+11 147 173 + 69104 0.00000 0.00000 179 161 79202 0.00000 3.35793e+11 144 172 + 69105 0.00000 0.00000 181 161 79203 0.00000 3.37857e+11 156 171 + 69106 0.00000 0.00000 167 161 79204 0.00000 3.40968e+11 163 171 + 69107 0.00000 0.00000 155 161 79205 0.00000 3.45250e+11 169 171 + 69108 0.00000 0.00000 147 162 79206 0.00000 3.48525e+11 165 171 + 69109 0.00000 0.00000 146 161 79207 0.00000 3.48525e+11 166 171 + 69110 0.00000 0.00000 149 161 79208 0.00000 3.45912e+11 159 171 + 69111 0.00000 0.00000 157 161 79209 0.00000 3.42637e+11 158 171 + 69112 0.00000 0.00000 148 160 79210 0.00000 3.40730e+11 157 171 + 69113 0.00000 0.00000 144 160 79211 0.00000 3.42687e+11 160 172 + 69114 0.00000 0.00000 145 160 79212 0.00000 3.52303e+11 152 172 + 69115 0.00000 0.00000 148 160 79213 0.00000 3.63638e+11 149 173 + 69116 0.00000 0.00000 144 160 79214 0.00000 3.52303e+11 144 173 + 69117 0.00000 0.00000 135 160 79215 0.00000 3.59860e+11 145 174 + 69118 0.00000 0.00000 135 160 79216 0.00000 3.40968e+11 142 174 + 69119 0.00000 0.00000 128 161 79217 0.00000 3.37917e+11 142 175 + 69120 0.00000 0.00000 129 161 79218 0.00000 3.44746e+11 150 175 + 69121 0.00000 0.00000 125 161 79219 0.00000 3.42681e+11 151 176 + 69122 0.00000 0.00000 128 161 79220 0.00000 3.37189e+11 153 176 + 69123 0.00000 0.00000 132 162 79221 0.00000 3.36710e+11 157 177 + 69124 0.00000 0.00000 136 162 79222 0.00000 3.40925e+11 152 178 + 69125 0.00000 0.00000 154 163 79223 0.00000 3.48525e+11 154 178 + 69126 0.00000 0.00000 138 163 79224 0.00000 3.58522e+11 145 178 + 69127 0.00000 0.00000 130 163 79225 0.00000 3.67417e+11 156 178 + 69128 0.00000 0.00000 139 163 79226 0.00000 3.71922e+11 158 178 + 69129 0.00000 0.00000 135 162 79227 0.00000 3.72979e+11 168 179 + 69130 0.00000 0.00000 138 162 79228 0.00000 3.71773e+11 165 179 + 69131 0.00000 0.00000 150 161 79229 0.00000 3.68725e+11 166 179 + 69132 0.00000 0.00000 160 161 79230 0.00000 3.63638e+11 180 179 + 69133 0.00000 0.00000 154 160 79231 0.00000 3.59860e+11 186 180 + 69134 0.00000 0.00000 158 159 79232 0.00000 3.67417e+11 204 180 + 69135 0.00000 0.00000 159 159 79233 0.00000 3.71195e+11 208 181 + 69136 0.00000 0.00000 159 158 79234 0.00000 3.82531e+11 223 181 + 69137 0.00000 0.00000 164 157 79235 0.00000 3.93866e+11 219 182 + 69138 0.00000 0.00000 162 157 79236 0.00000 3.93866e+11 225 183 + 69139 0.00000 0.00000 158 157 79237 0.00000 3.93866e+11 229 183 + 69140 0.00000 0.00000 159 156 79238 0.00000 3.74974e+11 223 184 + 69141 0.00000 0.00000 171 156 79239 0.00000 3.90088e+11 213 185 + 69142 0.00000 0.00000 177 156 79240 0.00000 3.97473e+11 214 185 + 69143 0.00000 0.00000 173 156 79241 0.00000 3.90088e+11 198 186 + 69144 0.00000 0.00000 171 156 79242 0.00000 3.75663e+11 188 187 + 69145 0.00000 0.00000 169 156 79243 0.00000 3.63638e+11 180 188 + 69146 0.00000 0.00000 164 156 79244 0.00000 3.61271e+11 176 188 + 69147 0.00000 0.00000 154 156 79245 0.00000 3.62818e+11 180 189 + 69148 0.00000 0.00000 143 156 79246 0.00000 3.59860e+11 181 190 + 69149 0.00000 0.00000 123 156 79247 0.00000 3.52303e+11 175 191 + 69150 0.00000 0.00000 117 156 79248 0.00000 3.59860e+11 177 191 + 69151 0.00000 0.00000 112 157 79249 0.00000 3.59860e+11 180 192 + 69152 0.00000 0.00000 113 157 79250 0.00000 3.67417e+11 186 193 + 69153 0.00000 0.00000 121 157 79251 0.00000 3.63638e+11 184 194 + 69154 0.00000 0.00000 133 157 79252 0.00000 3.56081e+11 187 195 + 69155 0.00000 0.00000 159 157 79253 0.00000 3.56041e+11 185 196 + 69156 0.00000 0.00000 178 156 79254 0.00000 3.61249e+11 182 197 + 69157 0.00000 0.00000 196 156 79255 0.00000 3.67417e+11 182 198 + 69158 0.00000 0.00000 222 156 79256 0.00000 3.71195e+11 186 199 + 69159 0.00000 0.00000 238 156 79257 0.00000 3.72210e+11 193 200 + 69160 0.00000 0.00000 236 156 79258 0.00000 3.74974e+11 194 201 + 69161 0.00000 0.00000 244 155 79259 0.00000 3.82119e+11 196 202 + 69162 0.00000 0.00000 247 155 79260 0.00000 3.82531e+11 203 202 + 69163 0.00000 0.00000 237 155 79261 0.00000 3.74974e+11 216 203 + 69164 0.00000 0.00000 229 155 79262 0.00000 3.90088e+11 218 204 + 69165 0.00000 0.00000 224 155 79263 0.00000 3.86309e+11 214 204 + 69166 0.00000 0.00000 201 154 79264 0.00000 3.86309e+11 218 205 + 69167 0.00000 0.00000 175 154 79265 0.00000 3.97645e+11 217 206 + 69168 0.00000 0.00000 157 154 79266 0.00000 3.90088e+11 224 207 + 69169 0.00000 0.00000 154 154 79267 0.00000 3.89984e+11 231 207 + 69170 0.00000 0.00000 147 154 79268 0.00000 3.93866e+11 236 208 + 69171 0.00000 0.00000 145 154 79269 0.00000 3.90361e+11 230 209 + 69172 0.00000 0.00000 140 154 79270 0.00000 3.82531e+11 229 210 + 69173 0.00000 0.00000 133 154 79271 0.00000 3.75079e+11 234 211 + 69174 0.00000 0.00000 132 155 79272 0.00000 3.68521e+11 225 213 + 69175 0.00000 0.00000 129 155 79273 0.00000 3.62609e+11 232 214 + 69176 0.00000 0.00000 120 156 79274 0.00000 3.57312e+11 213 216 + 69177 0.00000 0.00000 117 156 79275 0.00000 3.52809e+11 212 218 + 69178 0.00000 0.00000 114 156 79276 0.00000 3.49545e+11 205 218 + 69179 0.00000 0.00000 118 156 79277 0.00000 3.48380e+11 198 219 + 69180 0.00000 0.00000 124 156 79278 0.00000 3.50884e+11 193 219 + 69181 0.00000 0.00000 137 156 79279 0.00000 3.59860e+11 196 220 + 69182 0.00000 0.00000 149 156 79280 0.00000 3.74974e+11 197 220 + 69183 0.00000 0.00000 162 155 79281 0.00000 3.82145e+11 200 220 + 69184 0.00000 0.00000 168 155 79282 0.00000 3.82927e+11 210 220 + 69185 0.00000 0.00000 169 154 79283 0.00000 3.82531e+11 209 221 + 69186 0.00000 0.00000 167 153 79284 0.00000 3.82531e+11 212 221 + 69187 0.00000 0.00000 165 153 79285 0.00000 3.78752e+11 216 221 + 69188 0.00000 0.00000 167 152 79286 0.00000 3.83787e+11 239 221 + 69189 0.00000 0.00000 165 152 79287 0.00000 3.86309e+11 236 221 + 69190 0.00000 0.00000 166 152 79288 0.00000 3.75411e+11 231 221 + 69191 0.00000 0.00000 164 151 79289 0.00000 3.74974e+11 232 221 + 69192 0.00000 0.00000 158 151 79290 0.00000 4.01423e+11 226 221 + 69193 0.00000 0.00000 151 151 79291 0.00000 4.12759e+11 237 221 + 69194 0.00000 0.00000 145 151 79292 0.00000 4.08980e+11 237 220 + 69195 0.00000 0.00000 134 151 79293 0.00000 4.05202e+11 237 220 + 69196 0.00000 0.00000 127 151 79294 0.00000 4.08980e+11 230 219 + 69197 0.00000 0.00000 126 151 79295 0.00000 4.01423e+11 222 219 + 69198 0.00000 0.00000 124 150 79296 0.00000 3.97645e+11 215 219 + 69199 0.00000 0.00000 120 150 79297 0.00000 3.84799e+11 226 219 + 69200 0.00000 0.00000 118 149 79298 0.00000 3.74974e+11 215 219 + 69201 0.00000 0.00000 115 148 79299 0.00000 3.78752e+11 203 220 + 69202 0.00000 0.00000 116 147 79300 0.00000 3.71195e+11 211 220 + 69203 0.00000 0.00000 115 146 79301 0.00000 3.59860e+11 210 220 + 69204 0.00000 0.00000 117 145 79302 0.00000 3.63638e+11 215 221 + 69205 0.00000 0.00000 116 144 79303 0.00000 3.74974e+11 214 221 + 69206 0.00000 0.00000 118 144 79304 0.00000 3.74974e+11 215 221 + 69207 0.00000 0.00000 119 143 79305 0.00000 3.82531e+11 212 221 + 69208 0.00000 0.00000 126 142 79306 0.00000 3.71195e+11 210 221 + 69209 0.00000 0.00000 135 142 79307 0.00000 3.78752e+11 208 221 + 69210 0.00000 0.00000 137 142 79308 0.00000 3.86309e+11 214 222 + 69211 0.00000 0.00000 147 142 79309 0.00000 3.86309e+11 236 221 + 69212 0.00000 0.00000 167 141 79310 0.00000 3.90615e+11 273 221 + 69213 0.00000 0.00000 176 141 79311 0.00000 3.99400e+11 287 221 + 69214 0.00000 0.00000 193 141 79312 0.00000 4.09990e+11 310 220 + 69215 0.00000 0.00000 189 141 79313 0.00000 4.20315e+11 314 220 + 69216 0.00000 0.00000 193 141 79314 0.00000 4.27872e+11 367 219 + 69217 0.00000 0.00000 188 141 79315 0.00000 4.28757e+11 326 219 + 69218 0.00000 0.00000 172 141 79316 0.00000 4.20315e+11 294 218 + 69219 0.00000 0.00000 163 141 79317 0.00000 4.05202e+11 273 218 + 69220 0.00000 0.00000 150 141 79318 0.00000 4.04169e+11 256 217 + 69221 0.00000 0.00000 146 142 79319 0.00000 4.08980e+11 240 217 + 69222 0.00000 0.00000 139 142 79320 0.00000 4.08980e+11 231 217 + 69223 0.00000 0.00000 136 141 79321 0.00000 4.10336e+11 232 216 + 69224 0.00000 0.00000 129 141 79322 0.00000 4.05202e+11 232 216 + 69225 0.00000 0.00000 123 141 79323 0.00000 3.85619e+11 215 215 + 69226 0.00000 0.00000 118 140 79324 0.00000 3.67417e+11 206 215 + 69227 0.00000 0.00000 116 140 79325 0.00000 3.63638e+11 190 215 + 69228 0.00000 0.00000 112 140 79326 0.00000 3.59860e+11 183 214 + 69229 0.00000 0.00000 108 140 79327 0.00000 3.59860e+11 183 214 + 69230 0.00000 0.00000 105 140 79328 0.00000 3.52303e+11 175 213 + 69231 0.00000 0.00000 104 140 79329 0.00000 3.59860e+11 166 213 + 69232 0.00000 0.00000 110 140 79330 0.00000 3.62288e+11 162 213 + 69233 0.00000 0.00000 116 139 79331 0.00000 3.57292e+11 156 213 + 69234 0.00000 0.00000 121 139 79332 0.00000 3.49346e+11 150 213 + 69235 0.00000 0.00000 133 139 79333 0.00000 3.41932e+11 154 213 + 69236 0.00000 0.00000 146 139 79334 0.00000 3.38708e+11 152 213 + 69237 0.00000 0.00000 155 139 79335 0.00000 3.44746e+11 162 213 + 69238 0.00000 0.00000 156 139 79336 0.00000 3.59860e+11 172 213 + 69239 0.00000 0.00000 168 139 79337 0.00000 3.67417e+11 195 214 + 69240 0.00000 0.00000 172 140 79338 0.00000 3.82531e+11 221 214 + 69241 0.00000 0.00000 178 140 79339 0.00000 3.86309e+11 223 214 + 69242 0.00000 0.00000 170 141 79340 0.00000 3.93866e+11 223 214 + 69243 0.00000 0.00000 164 141 79341 0.00000 4.01423e+11 223 213 + 69244 0.00000 0.00000 156 141 79342 0.00000 4.12759e+11 229 213 + 69245 0.00000 0.00000 155 141 79343 0.00000 4.12759e+11 232 213 + 69246 0.00000 0.00000 152 141 79344 0.00000 4.12759e+11 230 212 + 69247 0.00000 0.00000 151 141 79345 0.00000 4.15294e+11 231 211 + 69248 0.00000 0.00000 138 141 79346 0.00000 4.19253e+11 232 211 + 69249 0.00000 0.00000 136 141 79347 0.00000 4.24094e+11 232 210 + 69250 0.00000 0.00000 128 141 79348 0.00000 4.27872e+11 238 209 + 69251 0.00000 0.00000 124 141 79349 0.00000 4.24094e+11 232 209 + 69252 0.00000 0.00000 117 141 79350 0.00000 4.13332e+11 216 208 + 69253 0.00000 0.00000 117 141 79351 0.00000 3.97645e+11 202 207 + 69254 0.00000 0.00000 119 141 79352 0.00000 3.78752e+11 187 206 + 69255 0.00000 0.00000 121 141 79353 0.00000 3.60593e+11 183 204 + 69256 0.00000 0.00000 131 141 79354 0.00000 3.44518e+11 181 203 + 69257 0.00000 0.00000 130 141 79355 0.00000 3.31624e+11 177 201 + 69258 0.00000 0.00000 135 141 79356 0.00000 3.24079e+11 175 199 + 69259 0.00000 0.00000 134 141 79357 0.00000 3.25854e+11 169 198 + 69260 0.00000 0.00000 133 142 79358 0.00000 3.37189e+11 160 198 + 69261 0.00000 0.00000 134 142 79359 0.00000 3.40627e+11 162 197 + 69262 0.00000 0.00000 132 143 79360 0.00000 3.37609e+11 160 197 + 69263 0.00000 0.00000 137 143 79361 0.00000 3.34398e+11 154 197 + 69264 0.00000 0.00000 138 143 79362 0.00000 3.37189e+11 163 197 + 69265 3.02800e+11 0.00000 141 143 79363 0.00000 3.50059e+11 174 197 + 69266 3.06000e+11 0.00000 146 144 79364 0.00000 3.63638e+11 186 197 + 69267 3.12230e+11 0.00000 160 144 79365 0.00000 3.68878e+11 189 197 + 69268 3.17800e+11 0.00000 169 144 80001 0.00000 3.71081e+11 189 197 + 69269 3.18999e+11 0.00000 159 144 80002 0.00000 3.78752e+11 200 197 + 69270 3.18900e+11 0.00000 151 144 80003 0.00000 3.93866e+11 212 198 + 69271 3.19600e+11 0.00000 143 145 80004 0.00000 3.97645e+11 212 198 + 69272 3.15200e+11 0.00000 140 145 80005 0.00000 3.99013e+11 208 199 + 69273 3.06300e+11 0.00000 137 145 80006 0.00000 4.01146e+11 222 199 + 69274 3.02576e+11 0.00000 134 145 80007 0.00000 4.03617e+11 228 200 + 69275 2.99300e+11 0.00000 143 145 80008 0.00000 4.06111e+11 228 200 + 69276 2.94100e+11 0.00000 133 145 80009 0.00000 4.08322e+11 241 201 + 69277 2.98600e+11 0.00000 132 145 80010 0.00000 4.09849e+11 253 201 + 69278 2.94200e+11 0.00000 141 145 80011 0.00000 4.10059e+11 256 201 + 69279 2.98817e+11 0.00000 143 145 80012 0.00000 4.07877e+11 245 201 + 69280 3.05200e+11 0.00000 145 144 80013 0.00000 4.01423e+11 222 201 + 69281 3.01886e+11 0.00000 150 144 80014 0.00000 3.89625e+11 204 200 + 69282 2.97700e+11 0.00000 142 144 80015 0.00000 3.78752e+11 200 199 + 69283 3.00400e+11 0.00000 137 144 80016 0.00000 3.74974e+11 189 198 + 69284 2.98743e+11 0.00000 130 145 80017 0.00000 3.74974e+11 187 198 + 69285 2.94198e+11 0.00000 128 145 80018 0.00000 3.71999e+11 178 197 + 69286 2.92100e+11 0.00000 124 146 80019 0.00000 3.66312e+11 164 196 + 69287 2.95300e+11 0.00000 119 146 80020 0.00000 3.59492e+11 157 196 + 69288 2.97109e+11 0.00000 118 147 80021 0.00000 3.52739e+11 153 195 + 69289 2.98484e+11 0.00000 115 148 80022 0.00000 3.47272e+11 158 194 + 69290 3.03100e+11 0.00000 122 148 80023 0.00000 3.44746e+11 167 193 + 69291 3.13097e+11 0.00000 129 149 80024 0.00000 3.44746e+11 171 193 + 69292 3.20500e+11 0.00000 146 149 80025 0.00000 3.40968e+11 171 192 + 69293 3.21200e+11 0.00000 162 149 80026 0.00000 3.40968e+11 179 191 + 69294 3.31600e+11 0.00000 177 150 80027 0.00000 3.41046e+11 191 191 + 69295 3.42518e+11 0.00000 186 150 80028 0.00000 3.40707e+11 194 191 + 69296 3.43900e+11 0.00000 193 150 80029 0.00000 3.41325e+11 197 190 + 69297 3.35700e+11 0.00000 205 150 80030 0.00000 3.44594e+11 198 190 + 69298 3.45200e+11 0.00000 204 150 80031 0.00000 3.53101e+11 214 190 + 69299 3.50529e+11 0.00000 205 150 80032 0.00000 3.71195e+11 213 189 + 69300 3.41200e+11 0.00000 201 150 80033 0.00000 3.93866e+11 218 189 + 69301 3.18300e+11 0.00000 190 150 80034 0.00000 3.90088e+11 226 189 + 69302 3.08878e+11 0.00000 173 149 80035 0.00000 3.90088e+11 232 188 + 69303 3.10486e+11 0.00000 162 149 80036 0.00000 3.93866e+11 219 188 + 69304 3.14600e+11 0.00000 154 149 80037 0.00000 3.90643e+11 222 188 + 69305 3.15546e+11 0.00000 139 149 80038 0.00000 3.86309e+11 224 188 + 69306 3.12800e+11 0.00000 139 149 80039 0.00000 3.86928e+11 219 188 + 69307 3.07188e+11 0.00000 127 148 80040 0.00000 3.82531e+11 208 187 + 69308 3.04300e+11 0.00000 130 148 80041 0.00000 3.67417e+11 205 187 + 69309 3.07800e+11 0.00000 130 148 80042 0.00000 3.59860e+11 214 187 + 69310 3.06700e+11 0.00000 132 147 80043 0.00000 3.44746e+11 214 186 + 69311 2.99700e+11 0.00000 136 147 80044 0.00000 3.33302e+11 218 186 + 69312 3.07300e+11 0.00000 130 147 80045 0.00000 3.27109e+11 201 185 + 69313 3.08725e+11 0.00000 128 147 80046 0.00000 3.23887e+11 201 185 + 69314 3.04100e+11 0.00000 123 148 80047 0.00000 3.22355e+11 200 185 + 69315 2.99514e+11 0.00000 122 148 80048 0.00000 3.21802e+11 183 185 + 69316 2.97000e+11 0.00000 122 148 80049 0.00000 3.21846e+11 180 184 + 69317 2.99400e+11 0.00000 127 148 80050 0.00000 3.22307e+11 177 184 + 69318 3.10299e+11 0.00000 134 149 80051 0.00000 3.23144e+11 175 183 + 69319 3.18100e+11 0.00000 138 149 80052 0.00000 3.24443e+11 170 182 + 69320 3.15400e+11 0.00000 146 149 80053 0.00000 3.26446e+11 167 181 + 69321 3.22274e+11 0.00000 160 149 80054 0.00000 3.29632e+11 160 181 + 69322 3.29600e+11 0.00000 177 149 80055 0.00000 3.34782e+11 157 180 + 69323 3.25700e+11 0.00000 185 149 80056 0.00000 3.42943e+11 166 180 + 69324 3.25200e+11 0.00000 189 149 80057 0.00000 3.56081e+11 169 181 + 69325 3.33700e+11 0.00000 198 150 80058 0.00000 3.71195e+11 173 182 + 69326 3.25000e+11 0.00000 205 150 80059 0.00000 3.71195e+11 172 182 + 69327 3.21600e+11 0.00000 210 150 80060 0.00000 3.71101e+11 177 183 + 69328 3.22900e+11 0.00000 201 150 80061 0.00000 3.73901e+11 176 185 + 69329 3.12600e+11 0.00000 186 151 80062 0.00000 3.77593e+11 173 186 + 69330 3.08300e+11 0.00000 175 151 80063 0.00000 3.80475e+11 170 187 + 69331 3.13900e+11 0.00000 173 151 80064 0.00000 3.80572e+11 173 188 + 69332 3.11700e+11 0.00000 157 151 80065 0.00000 3.74974e+11 172 188 + 69333 3.10100e+11 0.00000 142 150 80066 0.00000 3.63638e+11 169 189 + 69334 3.12097e+11 0.00000 137 150 80067 0.00000 3.58990e+11 166 189 + 69335 3.15668e+11 0.00000 130 149 80068 0.00000 3.59860e+11 165 189 + 69336 3.18800e+11 0.00000 132 149 80069 0.00000 3.62157e+11 161 189 + 69337 3.20064e+11 0.00000 132 148 80070 0.00000 3.63477e+11 154 189 + 69338 3.20400e+11 0.00000 139 148 80071 0.00000 3.61387e+11 148 190 + 69339 3.16800e+11 0.00000 133 148 80072 0.00000 3.52303e+11 139 189 + 69340 3.00300e+11 0.00000 123 147 80073 0.00000 3.40968e+11 145 189 + 69341 2.94600e+11 0.00000 121 147 80074 0.00000 3.52303e+11 141 189 + 69342 2.95265e+11 0.00000 112 147 80075 0.00000 3.53969e+11 139 188 + 69343 3.02100e+11 0.00000 116 147 80076 0.00000 3.52303e+11 137 188 + 69344 3.13500e+11 0.00000 115 147 80077 0.00000 3.59860e+11 143 187 + 69345 3.14700e+11 0.00000 118 147 80078 0.00000 3.63638e+11 147 187 + 69346 3.26600e+11 0.00000 122 148 80079 0.00000 3.63710e+11 162 187 + 69347 3.29000e+11 0.00000 130 148 80080 0.00000 3.59860e+11 162 187 + 69348 3.23400e+11 0.00000 133 148 80081 0.00000 3.52303e+11 162 187 + 69349 3.27500e+11 0.00000 136 149 80082 0.00000 3.49296e+11 163 187 + 69350 3.28157e+11 0.00000 137 149 80083 0.00000 3.52303e+11 172 187 + 69351 3.25977e+11 0.00000 144 149 80084 0.00000 3.60812e+11 172 187 + 69352 3.26800e+11 0.00000 144 150 80085 0.00000 3.71195e+11 183 187 + 69353 3.30300e+11 0.00000 147 150 80086 0.00000 3.80023e+11 185 187 + 69354 3.21200e+11 0.00000 154 150 80087 0.00000 3.86559e+11 195 187 + 69355 3.20200e+11 0.00000 160 151 80088 0.00000 3.90088e+11 204 187 + 69356 3.22479e+11 0.00000 163 151 80089 0.00000 3.90088e+11 200 188 + 69357 3.23300e+11 0.00000 156 151 80090 0.00000 3.86309e+11 194 188 + 69358 3.22700e+11 0.00000 153 151 80091 0.00000 3.71195e+11 187 188 + 69359 3.27468e+11 0.00000 154 151 80092 0.00000 3.59860e+11 182 188 + 69360 3.29400e+11 0.00000 151 151 80093 0.00000 3.63638e+11 181 188 + 69361 3.20143e+11 0.00000 147 151 80094 0.00000 3.44746e+11 176 189 + 69362 3.11600e+11 0.00000 149 150 80095 0.00000 3.44746e+11 184 189 + 69363 3.11000e+11 0.00000 153 150 80096 0.00000 3.52303e+11 210 190 + 69364 3.02800e+11 0.00000 158 149 80097 0.00000 3.52303e+11 238 190 + 69365 3.12800e+11 0.00000 151 149 80098 0.00000 3.52303e+11 236 191 + 70001 3.13300e+11 0.00000 159 149 80099 0.00000 3.56081e+11 242 191 + 70002 3.10111e+11 0.00000 145 148 80100 0.00000 3.63638e+11 245 192 + 70003 3.05550e+11 0.00000 137 148 80101 0.00000 3.67417e+11 249 193 + 70004 2.98569e+11 0.00000 132 148 80102 0.00000 3.71195e+11 250 194 + 70005 2.93850e+11 0.00000 127 148 80103 0.00000 3.71195e+11 246 195 + 70006 2.96702e+11 0.00000 118 149 80104 0.00000 3.71195e+11 233 197 + 70007 3.07300e+11 0.00000 113 149 80105 0.00000 3.78752e+11 226 198 + 70008 3.20300e+11 0.00000 113 149 80106 0.00000 3.78614e+11 206 199 + 70009 3.23000e+11 0.00000 120 150 80107 0.00000 3.74974e+11 192 201 + 70010 3.47000e+11 0.00000 135 151 80108 0.00000 3.74974e+11 192 202 + 70011 3.58800e+11 0.00000 160 152 80109 0.00000 3.73520e+11 201 204 + 70012 3.62955e+11 0.00000 172 152 80110 0.00000 3.63638e+11 215 205 + 70013 3.63700e+11 0.00000 173 153 80111 0.00000 3.44746e+11 216 206 + 70014 3.61300e+11 0.00000 172 154 80112 0.00000 3.39473e+11 208 206 + 70015 3.58816e+11 0.00000 180 154 80113 0.00000 3.46280e+11 199 207 + 70016 3.55427e+11 0.00000 174 155 80114 0.00000 3.58479e+11 186 208 + 70017 3.48600e+11 0.00000 181 156 80115 0.00000 3.71195e+11 186 208 + 70018 3.40200e+11 0.00000 179 156 80116 0.00000 3.78752e+11 186 209 + 70019 3.38400e+11 0.00000 175 157 80117 0.00000 3.74974e+11 187 209 + 70020 3.19200e+11 0.00000 168 158 80118 0.00000 3.68247e+11 201 209 + 70021 3.26200e+11 0.00000 177 159 80119 0.00000 3.63638e+11 204 210 + 70022 3.27100e+11 0.00000 161 159 80120 0.00000 3.63586e+11 204 210 + 70023 3.25942e+11 0.00000 153 160 80121 0.00000 3.66022e+11 201 210 + 70024 3.24100e+11 0.00000 144 160 80122 0.00000 3.68230e+11 219 210 + 70025 3.18974e+11 0.00000 150 160 80123 0.00000 3.67417e+11 223 210 + 70026 3.12273e+11 0.00000 156 161 80124 0.00000 3.67417e+11 221 211 + 70027 3.06387e+11 0.00000 163 161 80125 0.00000 3.82531e+11 223 211 + 70028 3.04100e+11 0.00000 162 161 80126 0.00000 3.74974e+11 222 211 + 70029 3.05500e+11 0.00000 163 162 80127 0.00000 3.63638e+11 204 211 + 70030 2.99895e+11 0.00000 155 162 80128 0.00000 3.78752e+11 203 211 + 70031 2.91700e+11 0.00000 143 162 80129 0.00000 3.86309e+11 200 211 + 70032 2.89000e+11 0.00000 135 161 80130 0.00000 3.82531e+11 194 211 + 70033 2.96312e+11 0.00000 133 161 80131 0.00000 3.75385e+11 191 211 + 70034 3.08181e+11 0.00000 124 161 80132 0.00000 3.68290e+11 191 212 + 70035 3.17900e+11 0.00000 119 161 80133 0.00000 3.63638e+11 190 212 + 70036 3.20822e+11 0.00000 121 161 80134 0.00000 3.63442e+11 193 213 + 70037 3.21679e+11 0.00000 132 161 80135 0.00000 3.66309e+11 203 214 + 70038 3.27300e+11 0.00000 139 160 80136 0.00000 3.70672e+11 200 215 + 70039 3.38000e+11 0.00000 153 160 80137 0.00000 3.75469e+11 203 215 + 70040 3.33381e+11 0.00000 154 160 80138 0.00000 3.79782e+11 208 215 + 70041 3.29800e+11 0.00000 170 160 80139 0.00000 3.82531e+11 214 215 + 70042 3.46700e+11 0.00000 184 160 80140 0.00000 3.82531e+11 234 214 + 70043 0.00000 0.00000 201 161 80141 0.00000 3.82531e+11 245 213 + 70044 0.00000 0.00000 198 161 80142 0.00000 3.90088e+11 253 213 + 70045 0.00000 0.00000 196 161 80143 0.00000 3.97645e+11 277 211 + 70046 0.00000 0.00000 202 162 80144 0.00000 4.16537e+11 290 210 + 70047 0.00000 0.00000 193 162 80145 0.00000 4.05202e+11 290 209 + 70048 0.00000 0.00000 194 163 80146 0.00000 4.08980e+11 293 208 + 70049 0.00000 0.00000 198 163 80147 0.00000 3.97645e+11 284 208 + 70050 0.00000 0.00000 199 164 80148 0.00000 4.08980e+11 281 207 + 70051 0.00000 0.00000 197 164 80149 0.00000 3.97645e+11 281 207 + 70052 0.00000 0.00000 191 164 80150 0.00000 3.90088e+11 252 206 + 70053 0.00000 0.00000 183 164 80151 0.00000 3.86309e+11 223 205 + 70054 0.00000 0.00000 184 164 80152 0.00000 3.63638e+11 201 205 + 70055 0.00000 0.00000 186 164 80153 0.00000 3.49963e+11 191 204 + 70056 0.00000 0.00000 180 164 80154 0.00000 3.47871e+11 184 204 + 70057 0.00000 0.00000 178 164 80155 0.00000 3.52303e+11 179 204 + 70058 0.00000 0.00000 177 165 80156 0.00000 3.59127e+11 182 204 + 70059 0.00000 0.00000 174 165 80157 0.00000 3.59860e+11 178 205 + 70060 0.00000 0.00000 176 166 80158 0.00000 3.48525e+11 172 205 + 70061 0.00000 0.00000 173 166 80159 0.00000 3.40968e+11 166 206 + 70062 0.00000 0.00000 167 166 80160 0.00000 3.48525e+11 172 207 + 70063 0.00000 0.00000 165 167 80161 0.00000 3.40968e+11 174 207 + 70064 0.00000 0.00000 170 167 80162 0.00000 3.59860e+11 176 208 + 70065 0.00000 0.00000 168 167 80163 0.00000 3.56081e+11 183 208 + 70066 0.00000 0.00000 168 167 80164 0.00000 3.71195e+11 189 209 + 70067 0.00000 0.00000 173 167 80165 0.00000 3.78752e+11 187 209 + 70068 0.00000 0.00000 164 167 80166 0.00000 3.72923e+11 189 209 + 70069 0.00000 0.00000 158 167 80167 0.00000 3.63638e+11 186 209 + 70070 0.00000 0.00000 156 166 80168 0.00000 3.63638e+11 193 209 + 70071 0.00000 0.00000 164 166 80169 0.00000 3.82531e+11 197 208 + 70072 0.00000 0.00000 152 166 80170 0.00000 3.86309e+11 208 208 + 70073 0.00000 0.00000 147 166 80171 0.00000 3.78752e+11 220 208 + 70074 0.00000 0.00000 145 166 80172 0.00000 4.01423e+11 228 207 + 70075 0.00000 0.00000 139 166 80173 0.00000 3.97645e+11 228 206 + 70076 0.00000 0.00000 134 166 80174 0.00000 3.97645e+11 250 206 + 70077 0.00000 0.00000 134 166 80175 0.00000 4.05202e+11 252 205 + 70078 0.00000 0.00000 130 166 80176 0.00000 4.01423e+11 246 204 + 70079 0.00000 0.00000 141 167 80177 0.00000 4.03693e+11 239 203 + 70080 0.00000 0.00000 150 167 80178 0.00000 3.97645e+11 226 202 + 70081 0.00000 0.00000 151 167 80179 0.00000 3.71195e+11 213 201 + 70082 0.00000 0.00000 165 166 80180 0.00000 3.59481e+11 200 201 + 70083 0.00000 0.00000 170 166 80181 0.00000 3.59860e+11 189 199 + 70084 0.00000 0.00000 167 166 80182 0.00000 3.56081e+11 183 198 + 70085 0.00000 0.00000 166 165 80183 0.00000 3.40968e+11 160 197 + 70086 0.00000 0.00000 159 165 80184 0.00000 3.52303e+11 155 196 + 70087 0.00000 0.00000 154 164 80185 0.00000 3.37189e+11 148 195 + 70088 0.00000 0.00000 153 164 80186 0.00000 3.37189e+11 147 194 + 70089 0.00000 0.00000 149 164 80187 0.00000 3.38040e+11 153 193 + 70090 0.00000 0.00000 149 163 80188 0.00000 3.35050e+11 150 191 + 70091 0.00000 0.00000 161 163 80189 0.00000 3.31304e+11 153 190 + 70092 0.00000 0.00000 167 163 80190 0.00000 3.29632e+11 153 189 + 70093 0.00000 0.00000 164 163 80191 0.00000 3.32300e+11 155 189 + 70094 0.00000 0.00000 170 163 80192 0.00000 3.37899e+11 162 189 + 70095 0.00000 0.00000 179 163 80193 0.00000 3.44746e+11 173 188 + 70096 0.00000 0.00000 193 163 80194 0.00000 3.52303e+11 178 188 + 70097 0.00000 0.00000 193 164 80195 0.00000 3.61937e+11 197 188 + 70098 0.00000 0.00000 203 164 80196 0.00000 3.71195e+11 210 188 + 70099 0.00000 0.00000 219 164 80197 0.00000 3.77500e+11 218 188 + 70100 0.00000 0.00000 225 164 80198 0.00000 3.82531e+11 235 188 + 70101 0.00000 0.00000 206 164 80199 0.00000 3.88176e+11 250 188 + 70102 0.00000 0.00000 199 164 80200 0.00000 3.93866e+11 250 188 + 70103 0.00000 0.00000 185 164 80201 0.00000 3.98721e+11 255 187 + 70104 0.00000 0.00000 174 164 80202 0.00000 4.02917e+11 258 188 + 70105 0.00000 0.00000 164 164 80203 0.00000 4.06734e+11 254 188 + 70106 0.00000 0.00000 152 164 80204 0.00000 4.10327e+11 249 188 + 70107 0.00000 0.00000 148 164 80205 0.00000 4.13775e+11 235 188 + 70108 0.00000 0.00000 142 163 80206 0.00000 4.17107e+11 222 189 + 70109 0.00000 0.00000 136 163 80207 0.00000 4.20315e+11 206 189 + 70110 0.00000 0.00000 131 163 80208 0.00000 4.12759e+11 197 190 + 70111 0.00000 0.00000 126 164 80209 0.00000 3.74974e+11 188 190 + 70112 0.00000 0.00000 129 163 80210 0.00000 3.74974e+11 170 190 + 70113 0.00000 0.00000 130 163 80211 0.00000 3.67893e+11 155 190 + 70114 0.00000 0.00000 130 163 80212 0.00000 3.51115e+11 143 190 + 70115 0.00000 0.00000 135 163 80213 0.00000 3.40968e+11 137 189 + 70116 0.00000 0.00000 135 163 80214 0.00000 3.44746e+11 132 189 + 70117 0.00000 0.00000 138 163 80215 0.00000 3.40968e+11 132 188 + 70118 0.00000 0.00000 149 163 80216 0.00000 3.38819e+11 133 187 + 70119 0.00000 0.00000 156 163 80217 0.00000 3.37189e+11 131 186 + 70120 0.00000 0.00000 153 163 80218 0.00000 3.31716e+11 133 185 + 70121 0.00000 0.00000 160 163 80219 0.00000 3.26004e+11 143 185 + 70122 0.00000 0.00000 161 163 80220 0.00000 3.25854e+11 142 184 + 70123 0.00000 0.00000 164 163 80221 0.00000 3.35504e+11 146 183 + 70124 0.00000 0.00000 162 163 80222 0.00000 3.48525e+11 157 183 + 70125 0.00000 0.00000 168 164 80223 0.00000 3.58364e+11 174 183 + 70126 0.00000 0.00000 163 164 80224 0.00000 3.66260e+11 184 183 + 70127 0.00000 0.00000 162 165 80225 0.00000 3.74974e+11 190 183 + 70128 0.00000 0.00000 157 165 80226 0.00000 3.86275e+11 193 183 + 70129 0.00000 0.00000 155 166 80227 0.00000 3.97645e+11 192 184 + 70130 0.00000 0.00000 163 166 80228 0.00000 4.05202e+11 192 184 + 70131 0.00000 0.00000 176 166 80229 0.00000 4.08980e+11 196 185 + 70132 0.00000 0.00000 180 166 80230 0.00000 4.20315e+11 198 185 + 70133 0.00000 0.00000 193 166 80231 0.00000 4.23389e+11 204 185 + 70134 0.00000 0.00000 197 166 80232 0.00000 4.17230e+11 201 186 + 70135 0.00000 0.00000 206 165 80233 0.00000 4.04652e+11 193 186 + 70136 0.00000 0.00000 206 165 80234 0.00000 3.86309e+11 194 186 + 70137 0.00000 0.00000 197 165 80235 0.00000 3.63638e+11 178 186 + 70138 0.00000 0.00000 195 164 80236 0.00000 3.45041e+11 174 186 + 70139 0.00000 0.00000 197 164 80237 0.00000 3.32180e+11 164 185 + 70140 0.00000 0.00000 184 163 80238 0.00000 3.25986e+11 154 185 + 70141 0.00000 0.00000 175 162 80239 0.00000 3.29632e+11 155 184 + 70142 0.00000 0.00000 170 162 80240 0.00000 3.40968e+11 159 183 + 70143 0.00000 0.00000 164 162 80241 0.00000 3.40968e+11 168 182 + 70144 0.00000 0.00000 163 162 80242 0.00000 3.48525e+11 179 182 + 70145 0.00000 0.00000 161 162 80243 0.00000 3.56081e+11 191 182 + 70146 0.00000 0.00000 163 163 80244 0.00000 3.67417e+11 199 181 + 70147 0.00000 0.00000 155 163 80245 0.00000 3.59860e+11 213 181 + 70148 0.00000 0.00000 154 163 80246 0.00000 3.59860e+11 225 181 + 70149 0.00000 0.00000 159 164 80247 0.00000 3.82531e+11 232 182 + 70150 0.00000 0.00000 164 164 80248 0.00000 3.89320e+11 225 182 + 70151 0.00000 0.00000 165 164 80249 0.00000 3.82531e+11 216 183 + 70152 0.00000 0.00000 146 164 80250 0.00000 3.74974e+11 211 183 + 70153 0.00000 0.00000 142 164 80251 0.00000 3.73627e+11 213 183 + 70154 0.00000 0.00000 133 164 80252 0.00000 3.76571e+11 201 184 + 70155 0.00000 0.00000 132 164 80253 0.00000 3.80811e+11 190 185 + 70156 0.00000 0.00000 133 164 80254 0.00000 3.83792e+11 189 186 + 70157 0.00000 0.00000 130 164 80255 0.00000 3.82531e+11 188 186 + 70158 0.00000 0.00000 135 164 80256 0.00000 3.75531e+11 179 187 + 70159 0.00000 0.00000 134 163 80257 0.00000 3.71195e+11 172 188 + 70160 0.00000 0.00000 138 163 80258 0.00000 3.74974e+11 163 189 + 70161 0.00000 0.00000 146 163 80259 0.00000 3.74202e+11 154 190 + 70162 0.00000 0.00000 170 163 80260 0.00000 3.74974e+11 160 190 + 70163 0.00000 0.00000 172 163 80261 0.00000 3.78752e+11 158 190 + 70164 0.00000 0.00000 200 163 80262 0.00000 3.67417e+11 154 191 + 70165 0.00000 0.00000 207 163 80263 0.00000 3.74974e+11 160 191 + 70166 0.00000 0.00000 209 163 80264 0.00000 3.56081e+11 168 192 + 70167 0.00000 0.00000 199 163 80265 0.00000 3.78752e+11 160 192 + 70168 0.00000 0.00000 191 163 80266 0.00000 3.52303e+11 179 192 + 70169 0.00000 0.00000 182 164 80267 0.00000 3.52303e+11 189 193 + 70170 0.00000 0.00000 175 164 80268 0.00000 3.56081e+11 191 193 + 70171 0.00000 0.00000 163 164 80269 0.00000 3.59860e+11 184 194 + 70172 0.00000 0.00000 161 163 80270 0.00000 3.67417e+11 184 195 + 70173 0.00000 0.00000 150 163 80271 0.00000 3.67417e+11 183 196 + 70174 0.00000 0.00000 144 162 80272 0.00000 3.64410e+11 185 197 + 70175 0.00000 0.00000 142 161 80273 0.00000 3.67417e+11 178 198 + 70176 0.00000 0.00000 149 160 80274 0.00000 3.78752e+11 174 198 + 70177 0.00000 0.00000 151 159 80275 0.00000 3.78752e+11 171 199 + 70178 0.00000 0.00000 160 158 80276 0.00000 3.74974e+11 168 200 + 70179 0.00000 0.00000 161 157 80277 0.00000 3.71195e+11 174 201 + 70180 0.00000 0.00000 168 156 80278 0.00000 3.63638e+11 175 202 + 70181 0.00000 0.00000 175 156 80279 0.00000 3.63638e+11 183 202 + 70182 0.00000 0.00000 180 155 80280 0.00000 3.63638e+11 185 203 + 70183 0.00000 0.00000 189 155 80281 0.00000 3.74974e+11 199 203 + 70184 0.00000 0.00000 195 155 80282 0.00000 3.86309e+11 212 204 + 70185 0.00000 0.00000 195 154 80283 0.00000 3.74974e+11 223 204 + 70186 0.00000 0.00000 191 154 80284 0.00000 3.86309e+11 233 203 + 70187 0.00000 0.00000 186 155 80285 0.00000 3.97645e+11 241 203 + 70188 0.00000 0.00000 166 155 80286 0.00000 3.90088e+11 248 202 + 70189 0.00000 0.00000 160 155 80287 0.00000 3.81234e+11 253 202 + 70190 0.00000 0.00000 148 154 80288 0.00000 3.75379e+11 251 201 + 70191 0.00000 0.00000 144 154 80289 0.00000 3.72010e+11 237 200 + 70192 0.00000 0.00000 138 154 80290 0.00000 3.71451e+11 215 200 + 70193 0.00000 0.00000 135 154 80291 0.00000 3.74974e+11 201 199 + 70194 0.00000 0.00000 131 154 80292 0.00000 3.82531e+11 201 199 + 70195 0.00000 0.00000 126 154 80293 0.00000 3.82531e+11 203 199 + 70196 0.00000 0.00000 122 154 80294 0.00000 3.67417e+11 201 199 + 70197 0.00000 0.00000 121 154 80295 0.00000 3.71195e+11 204 199 + 70198 0.00000 0.00000 126 154 80296 0.00000 3.74974e+11 205 200 + 70199 0.00000 0.00000 131 154 80297 0.00000 3.78752e+11 196 200 + 70200 0.00000 0.00000 136 155 80298 0.00000 3.78459e+11 193 201 + 70201 0.00000 0.00000 136 155 80299 0.00000 3.74974e+11 183 201 + 70202 0.00000 0.00000 151 155 80300 0.00000 3.71122e+11 180 201 + 70203 0.00000 0.00000 164 155 80301 0.00000 3.71195e+11 177 202 + 70204 0.00000 0.00000 159 154 80302 0.00000 3.74974e+11 178 202 + 70205 0.00000 0.00000 164 154 80303 0.00000 3.67734e+11 186 202 + 70206 0.00000 0.00000 169 153 80304 0.00000 3.63638e+11 202 202 + 70207 0.00000 0.00000 176 153 80305 0.00000 3.74974e+11 212 202 + 70208 0.00000 0.00000 186 152 80306 0.00000 3.79652e+11 226 203 + 70209 0.00000 0.00000 182 152 80307 0.00000 3.86309e+11 234 204 + 70210 0.00000 0.00000 161 152 80308 0.00000 3.97645e+11 242 204 + 70211 0.00000 0.00000 156 151 80309 0.00000 3.86309e+11 250 205 + 70212 0.00000 0.00000 142 151 80310 0.00000 4.08980e+11 263 206 + 70213 0.00000 0.00000 134 151 80311 0.00000 3.97645e+11 274 207 + 70214 0.00000 0.00000 129 151 80312 0.00000 3.93866e+11 273 208 + 70215 0.00000 0.00000 128 151 80313 0.00000 3.86309e+11 266 209 + 70216 0.00000 0.00000 127 150 80314 0.00000 3.75907e+11 255 210 + 70217 0.00000 0.00000 128 150 80315 0.00000 3.67993e+11 257 210 + 70218 0.00000 0.00000 128 150 80316 0.00000 3.67417e+11 256 211 + 70219 0.00000 0.00000 128 149 80317 0.00000 3.74974e+11 233 212 + 70220 0.00000 0.00000 132 149 80318 0.00000 3.74974e+11 227 213 + 70221 0.00000 0.00000 138 148 80319 0.00000 3.71195e+11 219 213 + 70222 0.00000 0.00000 137 148 80320 0.00000 3.67991e+11 205 214 + 70223 0.00000 0.00000 127 147 80321 0.00000 3.66395e+11 191 214 + 70224 0.00000 0.00000 137 147 80322 0.00000 3.67417e+11 182 214 + 70225 0.00000 0.00000 150 146 80323 0.00000 3.71588e+11 175 215 + 70226 0.00000 0.00000 167 146 80324 0.00000 3.74974e+11 172 215 + 70227 0.00000 0.00000 169 145 80325 0.00000 3.73943e+11 162 214 + 70228 0.00000 0.00000 163 145 80326 0.00000 3.71195e+11 162 214 + 70229 0.00000 0.00000 152 145 80327 0.00000 3.70025e+11 171 213 + 70230 0.00000 0.00000 149 145 80328 0.00000 3.71195e+11 167 212 + 70231 0.00000 0.00000 145 145 80329 0.00000 3.71195e+11 175 211 + 70232 0.00000 0.00000 149 145 80330 0.00000 3.63638e+11 176 210 + 70233 0.00000 0.00000 143 144 80331 0.00000 3.71195e+11 190 210 + 70234 0.00000 0.00000 142 144 80332 0.00000 3.63638e+11 185 209 + 70235 0.00000 0.00000 146 144 80333 0.00000 3.74974e+11 191 209 + 70236 0.00000 0.00000 140 144 80334 0.00000 3.82531e+11 206 208 + 70237 0.00000 0.00000 137 145 80335 0.00000 3.86575e+11 216 208 + 70238 0.00000 0.00000 136 145 80336 0.00000 3.90088e+11 223 207 + 70239 0.00000 0.00000 137 145 80337 0.00000 3.93866e+11 213 207 + 70240 0.00000 0.00000 142 145 80338 0.00000 3.97645e+11 198 206 + 70241 0.00000 0.00000 149 145 80339 0.00000 3.95914e+11 199 206 + 70242 0.00000 0.00000 149 145 80340 0.00000 3.90088e+11 186 206 + 70243 0.00000 0.00000 155 145 80341 0.00000 3.82734e+11 171 205 + 70244 0.00000 0.00000 154 145 80342 0.00000 3.75431e+11 176 205 + 70245 0.00000 0.00000 157 144 80343 0.00000 3.69660e+11 169 205 + 70246 0.00000 0.00000 163 144 80344 0.00000 3.67417e+11 175 204 + 70247 0.00000 0.00000 163 144 80345 0.00000 3.71195e+11 181 204 + 70248 0.00000 0.00000 162 143 80346 0.00000 3.78752e+11 204 203 + 70249 0.00000 0.00000 162 142 80347 0.00000 3.78445e+11 241 202 + 70250 0.00000 0.00000 164 142 80348 0.00000 3.76871e+11 244 201 + 70251 0.00000 0.00000 157 142 80349 0.00000 3.86309e+11 253 200 + 70252 0.00000 0.00000 157 141 80350 0.00000 4.12759e+11 266 199 + 70253 0.00000 0.00000 144 141 80351 0.00000 4.24094e+11 273 198 + 70254 0.00000 0.00000 134 141 80352 0.00000 4.01423e+11 255 197 + 70255 0.00000 0.00000 126 141 80353 0.00000 4.24094e+11 255 196 + 70256 0.00000 0.00000 120 142 80354 0.00000 4.31305e+11 239 195 + 70257 0.00000 0.00000 122 142 80355 0.00000 4.20315e+11 236 194 + 70258 0.00000 0.00000 118 143 80356 0.00000 4.08980e+11 225 193 + 70259 0.00000 0.00000 118 143 80357 0.00000 4.05202e+11 231 193 + 70260 0.00000 0.00000 117 144 80358 0.00000 4.05202e+11 226 193 + 70261 0.00000 0.00000 121 145 80359 0.00000 3.82531e+11 224 192 + 70262 0.00000 0.00000 135 145 80360 0.00000 3.86118e+11 221 192 + 70263 0.00000 0.00000 147 146 80361 0.00000 3.97645e+11 220 192 + 70264 0.00000 0.00000 149 146 80362 0.00000 3.93866e+11 220 192 + 70265 0.00000 0.00000 155 147 80363 0.00000 4.01423e+11 232 192 + 70266 0.00000 0.00000 162 147 80364 0.00000 3.99327e+11 217 192 + 70267 0.00000 0.00000 156 147 80365 0.00000 3.93866e+11 210 192 + 70268 0.00000 0.00000 156 146 80366 0.00000 3.97568e+11 199 192 + 70269 0.00000 0.00000 156 146 81001 0.00000 4.05202e+11 190 193 + 70270 0.00000 0.00000 145 146 81002 0.00000 4.05202e+11 181 193 + 70271 0.00000 0.00000 145 146 81003 0.00000 3.86309e+11 173 193 + 70272 0.00000 0.00000 139 146 81004 0.00000 3.72891e+11 167 194 + 70273 0.00000 0.00000 135 146 81005 0.00000 3.67567e+11 162 194 + 70274 0.00000 0.00000 129 146 81006 0.00000 3.66638e+11 157 194 + 70275 0.00000 0.00000 125 146 81007 0.00000 3.67885e+11 169 194 + 70276 0.00000 0.00000 126 147 81008 0.00000 3.69822e+11 169 194 + 70277 0.00000 0.00000 137 147 81009 0.00000 3.71195e+11 167 194 + 70278 0.00000 0.00000 135 148 81010 0.00000 3.71038e+11 165 193 + 70279 0.00000 0.00000 128 148 81011 0.00000 3.69807e+11 161 193 + 70280 0.00000 0.00000 133 149 81012 0.00000 3.68070e+11 157 192 + 70281 0.00000 0.00000 142 150 81013 0.00000 3.66228e+11 158 192 + 70282 0.00000 0.00000 145 150 81014 0.00000 3.64647e+11 154 193 + 70283 0.00000 0.00000 148 151 81015 0.00000 3.63777e+11 150 193 + 70284 0.00000 0.00000 143 151 81016 0.00000 3.64312e+11 153 194 + 70285 0.00000 0.00000 135 151 81017 0.00000 3.67417e+11 155 195 + 70286 0.00000 0.00000 132 151 81018 0.00000 3.71195e+11 161 196 + 70287 0.00000 0.00000 135 151 81019 0.00000 3.65518e+11 165 196 + 70288 0.00000 0.00000 140 150 81020 0.00000 3.63638e+11 160 197 + 70289 0.00000 0.00000 134 150 81021 0.00000 3.74974e+11 157 197 + 70290 0.00000 0.00000 132 150 81022 0.00000 3.74974e+11 156 197 + 70291 0.00000 0.00000 139 149 81023 0.00000 3.71253e+11 157 197 + 70292 0.00000 0.00000 139 149 81024 0.00000 3.68117e+11 157 197 + 70293 0.00000 0.00000 137 149 81025 0.00000 3.66401e+11 169 196 + 70294 0.00000 0.00000 137 149 81026 0.00000 3.67417e+11 175 195 + 70295 0.00000 0.00000 135 149 81027 0.00000 3.72217e+11 176 195 + 70296 0.00000 0.00000 149 149 81028 0.00000 3.78327e+11 197 194 + 70297 0.00000 0.00000 161 150 81029 0.00000 3.82531e+11 204 194 + 70298 0.00000 0.00000 169 150 81030 0.00000 3.82566e+11 209 193 + 70299 0.00000 0.00000 187 151 81031 0.00000 3.81248e+11 209 193 + 70300 0.00000 0.00000 192 151 81032 0.00000 3.82531e+11 207 192 + 70301 0.00000 0.00000 190 152 81033 0.00000 3.88801e+11 210 192 + 70302 0.00000 0.00000 189 153 81034 0.00000 3.94190e+11 205 192 + 70303 0.00000 0.00000 175 153 81035 0.00000 3.90088e+11 198 192 + 70304 0.00000 0.00000 169 153 81036 0.00000 3.74974e+11 188 191 + 70305 0.00000 0.00000 163 154 81037 0.00000 3.74192e+11 185 191 + 70306 0.00000 0.00000 159 154 81038 0.00000 3.82531e+11 181 190 + 70307 0.00000 0.00000 153 154 81039 0.00000 3.89166e+11 179 189 + 70308 0.00000 0.00000 148 154 81040 0.00000 3.93075e+11 177 189 + 70309 0.00000 0.00000 148 154 81041 0.00000 3.94869e+11 185 189 + 70310 0.00000 0.00000 150 154 81042 0.00000 3.94446e+11 186 189 + 70311 0.00000 0.00000 151 154 81043 0.00000 3.90960e+11 191 189 + 70312 0.00000 0.00000 141 154 81044 0.00000 3.82531e+11 198 189 + 70313 0.00000 0.00000 142 154 81045 0.00000 3.67417e+11 200 190 + 70314 0.00000 0.00000 148 154 81046 0.00000 3.52303e+11 194 190 + 70315 0.00000 0.00000 156 155 81047 0.00000 3.52303e+11 187 191 + 70316 0.00000 0.00000 165 155 81048 0.00000 3.59860e+11 188 191 + 70317 0.00000 0.00000 179 155 81049 0.00000 3.59860e+11 190 192 + 70318 0.00000 0.00000 186 155 81050 0.00000 3.59860e+11 179 192 + 70319 0.00000 0.00000 200 154 81051 0.00000 3.59860e+11 188 193 + 70320 0.00000 0.00000 194 154 81052 0.00000 3.59860e+11 190 194 + 70321 0.00000 0.00000 184 154 81053 0.00000 3.59860e+11 200 194 + 70322 0.00000 0.00000 193 154 81054 0.00000 3.56081e+11 218 195 + 70323 0.00000 0.00000 186 154 81055 0.00000 3.52303e+11 232 196 + 70324 0.00000 0.00000 174 153 81056 0.00000 3.50478e+11 234 197 + 70325 0.00000 0.00000 163 153 81057 0.00000 3.50053e+11 239 198 + 70326 0.00000 0.00000 154 153 81058 0.00000 3.50419e+11 235 200 + 70327 0.00000 0.00000 142 153 81059 0.00000 3.51232e+11 225 201 + 70328 0.00000 0.00000 134 153 81060 0.00000 3.52300e+11 224 203 + 70329 0.00000 0.00000 128 153 81061 0.00000 3.53516e+11 231 204 + 70330 0.00000 0.00000 129 153 81062 0.00000 3.54823e+11 239 205 + 70331 0.00000 0.00000 135 154 81063 0.00000 3.56193e+11 246 206 + 70332 0.00000 0.00000 149 154 81064 0.00000 3.57623e+11 227 208 + 70333 0.00000 0.00000 148 154 81065 0.00000 3.59126e+11 213 209 + 70334 0.00000 0.00000 153 154 81066 0.00000 3.60743e+11 201 210 + 70335 0.00000 0.00000 146 154 81067 0.00000 3.62552e+11 201 211 + 70336 0.00000 0.00000 148 154 81068 0.00000 3.64694e+11 203 211 + 70337 0.00000 0.00000 148 154 81069 0.00000 3.67424e+11 203 211 + 70338 0.00000 0.00000 154 154 81070 0.00000 3.71195e+11 200 211 + 70339 0.00000 0.00000 162 154 81071 0.00000 3.76435e+11 189 211 + 70340 0.00000 0.00000 168 154 81072 0.00000 3.82531e+11 202 211 + 70341 0.00000 0.00000 167 153 81073 0.00000 3.86309e+11 209 211 + 70342 0.00000 0.00000 167 153 81074 0.00000 3.82531e+11 206 211 + 70343 0.00000 0.00000 172 152 81075 0.00000 3.86356e+11 195 211 + 70344 0.00000 0.00000 171 152 81076 0.00000 3.82531e+11 182 211 + 70345 0.00000 0.00000 173 152 81077 0.00000 3.59860e+11 180 211 + 70346 0.00000 0.00000 178 153 81078 0.00000 3.54315e+11 175 211 + 70347 0.00000 0.00000 164 153 81079 0.00000 3.62677e+11 183 211 + 70348 0.00000 0.00000 155 153 81080 0.00000 3.71195e+11 190 211 + 70349 0.00000 0.00000 154 154 81081 0.00000 3.71195e+11 189 211 + 70350 0.00000 0.00000 147 154 81082 0.00000 3.67417e+11 188 211 + 70351 0.00000 0.00000 147 154 81083 0.00000 3.59860e+11 191 211 + 70352 0.00000 0.00000 152 154 81084 0.00000 3.63638e+11 199 212 + 70353 0.00000 0.00000 152 155 81085 0.00000 3.59860e+11 199 212 + 70354 0.00000 0.00000 156 155 81086 0.00000 3.48620e+11 198 213 + 70355 0.00000 0.00000 146 155 81087 0.00000 3.38088e+11 204 213 + 70356 0.00000 0.00000 137 155 81088 0.00000 3.37189e+11 212 213 + 70357 0.00000 0.00000 132 155 81089 0.00000 3.51798e+11 208 214 + 70358 0.00000 0.00000 124 155 81090 0.00000 3.67417e+11 214 214 + 70359 0.00000 0.00000 124 154 81091 0.00000 3.71195e+11 211 215 + 70360 0.00000 0.00000 122 154 81092 0.00000 3.73581e+11 211 215 + 70361 0.00000 0.00000 120 153 81093 0.00000 3.77443e+11 221 216 + 70362 0.00000 0.00000 117 153 81094 0.00000 3.82531e+11 220 216 + 70363 0.00000 0.00000 123 152 81095 0.00000 3.86309e+11 226 216 + 70364 0.00000 0.00000 129 151 81096 0.00000 3.81978e+11 236 216 + 70365 0.00000 0.00000 133 150 81097 0.00000 3.86309e+11 242 216 + 71001 0.00000 0.00000 131 150 81098 0.00000 4.05202e+11 269 215 + 71002 0.00000 0.00000 135 149 81099 0.00000 3.97645e+11 288 214 + 71003 0.00000 0.00000 135 149 81100 0.00000 4.01423e+11 269 214 + 71004 0.00000 0.00000 140 149 81101 0.00000 3.97645e+11 272 213 + 71005 0.00000 0.00000 146 148 81102 0.00000 3.91929e+11 252 213 + 71006 0.00000 0.00000 147 148 81103 0.00000 3.87327e+11 255 212 + 71007 0.00000 0.00000 150 148 81104 0.00000 3.83314e+11 257 211 + 71008 0.00000 0.00000 149 148 81105 0.00000 3.79561e+11 255 210 + 71009 0.00000 0.00000 153 148 81106 0.00000 3.75829e+11 248 210 + 71010 0.00000 0.00000 152 148 81107 0.00000 3.71882e+11 243 209 + 71011 0.00000 0.00000 149 148 81108 0.00000 3.67417e+11 229 209 + 71012 0.00000 0.00000 151 147 81109 0.00000 3.62217e+11 215 209 + 71013 0.00000 0.00000 148 147 81110 0.00000 3.56899e+11 201 208 + 71014 0.00000 0.00000 154 147 81111 0.00000 3.52303e+11 196 208 + 71015 0.00000 0.00000 154 147 81112 0.00000 3.49311e+11 192 207 + 71016 0.00000 0.00000 156 147 81113 0.00000 3.48525e+11 205 206 + 71017 0.00000 0.00000 155 146 81114 0.00000 3.48525e+11 203 206 + 71018 0.00000 0.00000 160 146 81115 0.00000 3.44746e+11 204 205 + 71019 0.00000 0.00000 166 146 81116 0.00000 3.48525e+11 199 204 + 71020 0.00000 0.00000 169 145 81117 0.00000 3.50004e+11 195 203 + 71021 0.00000 0.00000 179 145 81118 0.00000 3.49674e+11 178 203 + 71022 0.00000 0.00000 181 144 81119 0.00000 3.52303e+11 177 203 + 71023 0.00000 0.00000 183 143 81120 0.00000 3.59860e+11 175 202 + 71024 0.00000 0.00000 177 143 81121 0.00000 3.64672e+11 188 202 + 71025 0.00000 0.00000 169 142 81122 0.00000 3.71195e+11 193 201 + 71026 0.00000 0.00000 165 142 81123 0.00000 3.82531e+11 207 201 + 71027 0.00000 0.00000 167 141 81124 0.00000 3.86309e+11 221 201 + 71028 0.00000 0.00000 166 141 81125 0.00000 3.86309e+11 238 200 + 71029 0.00000 0.00000 161 140 81126 0.00000 3.78752e+11 231 200 + 71030 0.00000 0.00000 163 139 81127 0.00000 3.82531e+11 234 199 + 71031 0.00000 0.00000 170 139 81128 0.00000 3.82531e+11 222 199 + 71032 0.00000 0.00000 166 139 81129 0.00000 3.78752e+11 219 198 + 71033 0.00000 0.00000 161 139 81130 0.00000 3.71195e+11 218 198 + 71034 0.00000 0.00000 155 138 81131 0.00000 3.67417e+11 228 197 + 71035 0.00000 0.00000 149 138 81132 0.00000 3.63638e+11 223 196 + 71036 0.00000 0.00000 145 138 81133 0.00000 3.67417e+11 221 196 + 71037 0.00000 0.00000 144 138 81134 0.00000 3.48525e+11 233 195 + 71038 0.00000 0.00000 133 138 81135 0.00000 3.56081e+11 224 195 + 71039 0.00000 0.00000 123 138 81136 0.00000 3.44746e+11 219 194 + 71040 0.00000 0.00000 110 138 81137 0.00000 3.44746e+11 208 194 + 71041 0.00000 0.00000 110 137 81138 0.00000 3.37189e+11 194 193 + 71042 0.00000 0.00000 110 137 81139 0.00000 3.31000e+11 187 192 + 71043 0.00000 0.00000 111 137 81140 0.00000 3.30546e+11 180 191 + 71044 0.00000 0.00000 113 136 81141 0.00000 3.37189e+11 180 190 + 71045 0.00000 0.00000 115 136 81142 0.00000 3.44746e+11 169 189 + 71046 0.00000 0.00000 117 136 81143 0.00000 3.29632e+11 160 188 + 71047 0.00000 0.00000 130 135 81144 0.00000 3.25854e+11 170 186 + 71048 0.00000 0.00000 133 134 81145 0.00000 3.29632e+11 177 185 + 71049 0.00000 0.00000 130 134 81146 0.00000 3.40351e+11 174 184 + 71050 0.00000 0.00000 139 133 81147 0.00000 3.53722e+11 177 183 + 71051 0.00000 0.00000 136 133 81148 0.00000 3.63638e+11 181 182 + 71052 0.00000 0.00000 136 132 81149 0.00000 3.65594e+11 171 181 + 71053 0.00000 0.00000 144 132 81150 0.00000 3.63638e+11 165 180 + 71054 0.00000 0.00000 143 131 81151 0.00000 3.62158e+11 156 179 + 71055 0.00000 0.00000 148 131 81152 0.00000 3.61196e+11 150 179 + 71056 0.00000 0.00000 146 130 81153 0.00000 3.59860e+11 144 179 + 71057 0.00000 0.00000 143 129 81154 0.00000 3.52303e+11 135 178 + 71058 0.00000 0.00000 140 129 81155 0.00000 3.29632e+11 134 178 + 71059 0.00000 0.00000 137 128 81156 0.00000 3.25854e+11 136 178 + 71060 0.00000 0.00000 129 128 81157 0.00000 3.22075e+11 141 178 + 71061 0.00000 0.00000 126 127 81158 0.00000 3.29632e+11 147 178 + 71062 0.00000 0.00000 122 126 81159 0.00000 3.33411e+11 147 178 + 71063 0.00000 0.00000 116 126 81160 0.00000 3.29632e+11 153 179 + 71064 0.00000 0.00000 114 125 81161 0.00000 3.29632e+11 157 180 + 71065 0.00000 0.00000 109 125 81162 0.00000 3.33411e+11 155 180 + 71066 0.00000 0.00000 105 125 81163 0.00000 3.37189e+11 152 181 + 71067 0.00000 0.00000 104 124 81164 0.00000 3.33411e+11 153 181 + 71068 0.00000 0.00000 105 124 81165 0.00000 3.27231e+11 159 182 + 71069 0.00000 0.00000 107 124 81166 0.00000 3.25854e+11 165 182 + 71070 0.00000 0.00000 110 123 81167 0.00000 3.33411e+11 169 183 + 71071 0.00000 0.00000 115 123 81168 0.00000 3.40968e+11 171 183 + 71072 0.00000 0.00000 113 122 81169 0.00000 3.40968e+11 170 183 + 71073 0.00000 0.00000 112 122 81170 0.00000 3.33411e+11 166 183 + 71074 0.00000 0.00000 110 121 81171 0.00000 3.37189e+11 160 183 + 71075 0.00000 0.00000 115 120 81172 0.00000 3.29632e+11 154 182 + 71076 0.00000 0.00000 116 120 81173 0.00000 3.29632e+11 166 182 + 71077 0.00000 0.00000 114 119 81174 0.00000 3.25854e+11 171 181 + 71078 0.00000 0.00000 109 119 81175 0.00000 3.25854e+11 175 181 + 71079 0.00000 0.00000 106 118 81176 0.00000 3.25854e+11 184 180 + 71080 0.00000 0.00000 113 118 81177 0.00000 3.40968e+11 194 180 + 71081 0.00000 0.00000 112 118 81178 0.00000 3.44746e+11 193 180 + 71082 0.00000 0.00000 108 118 81179 0.00000 3.40968e+11 192 179 + 71083 0.00000 0.00000 108 118 81180 0.00000 3.40968e+11 188 179 + 71084 0.00000 0.00000 108 118 81181 0.00000 3.43887e+11 179 179 + 71085 0.00000 0.00000 108 118 81182 0.00000 3.40968e+11 175 179 + 71086 0.00000 0.00000 109 118 81183 0.00000 3.29632e+11 169 180 + 71087 0.00000 0.00000 106 118 81184 0.00000 3.29632e+11 163 180 + 71088 0.00000 0.00000 103 118 81185 0.00000 3.29632e+11 166 181 + 71089 0.00000 0.00000 101 118 81186 0.00000 3.40968e+11 153 181 + 71090 0.00000 0.00000 103 118 81187 0.00000 3.49293e+11 149 182 + 71091 0.00000 0.00000 101 118 81188 0.00000 3.52502e+11 150 182 + 71092 0.00000 0.00000 108 118 81189 0.00000 3.52894e+11 152 183 + 71093 0.00000 0.00000 109 118 81190 0.00000 3.51823e+11 150 184 + 71094 0.00000 0.00000 108 118 81191 0.00000 3.50149e+11 157 185 + 71095 0.00000 0.00000 108 117 81192 0.00000 3.48531e+11 167 186 + 71096 0.00000 0.00000 107 117 81193 0.00000 3.47643e+11 168 188 + 71097 0.00000 0.00000 113 116 81194 0.00000 3.48407e+11 174 189 + 71098 0.00000 0.00000 110 116 81195 0.00000 3.52303e+11 184 191 + 71099 0.00000 0.00000 109 116 81196 0.00000 3.59734e+11 195 192 + 71100 0.00000 0.00000 110 115 81197 0.00000 3.63638e+11 205 194 + 71101 0.00000 0.00000 124 115 81198 0.00000 3.59860e+11 201 195 + 71102 0.00000 0.00000 130 115 81199 0.00000 3.59860e+11 205 197 + 71103 0.00000 0.00000 140 114 81200 0.00000 3.57345e+11 220 199 + 71104 0.00000 0.00000 141 114 81201 0.00000 3.52556e+11 235 200 + 71105 0.00000 0.00000 140 114 81202 0.00000 3.48525e+11 228 201 + 71106 0.00000 0.00000 140 113 81203 0.00000 3.47442e+11 236 203 + 71107 0.00000 0.00000 140 113 81204 0.00000 3.48042e+11 255 204 + 71108 0.00000 0.00000 137 113 81205 0.00000 3.48525e+11 262 205 + 71109 0.00000 0.00000 138 113 81206 0.00000 3.47579e+11 260 206 + 71110 0.00000 0.00000 137 114 81207 0.00000 3.45540e+11 273 207 + 71111 0.00000 0.00000 129 114 81208 0.00000 3.42900e+11 256 208 + 71112 0.00000 0.00000 121 113 81209 0.00000 3.39949e+11 224 209 + 71113 0.00000 0.00000 118 113 81210 0.00000 3.36870e+11 213 210 + 71114 0.00000 0.00000 109 113 81211 0.00000 3.33804e+11 204 211 + 71115 0.00000 0.00000 106 113 81212 0.00000 3.30899e+11 198 212 + 71116 0.00000 0.00000 105 113 81213 0.00000 3.28353e+11 184 213 + 71117 0.00000 0.00000 102 113 81214 0.00000 3.26488e+11 183 214 + 71118 0.00000 0.00000 98 113 81215 0.00000 3.25854e+11 192 215 + 71119 0.00000 0.00000 96 113 81216 0.00000 3.26907e+11 191 216 + 71120 0.00000 0.00000 95 113 81217 0.00000 3.28609e+11 179 216 + 71121 0.00000 0.00000 95 113 81218 0.00000 3.29632e+11 180 217 + 71122 0.00000 0.00000 100 112 81219 0.00000 3.29351e+11 173 217 + 71123 0.00000 0.00000 106 112 81220 0.00000 3.30491e+11 178 218 + 71124 0.00000 0.00000 113 112 81221 0.00000 3.37189e+11 181 218 + 71125 0.00000 0.00000 118 112 81222 0.00000 3.50349e+11 182 218 + 71126 0.00000 0.00000 126 112 81223 0.00000 3.52303e+11 206 219 + 71127 0.00000 0.00000 131 111 81224 0.00000 3.40968e+11 209 219 + 71128 0.00000 0.00000 133 111 81225 0.00000 3.63638e+11 209 219 + 71129 0.00000 0.00000 138 111 81226 0.00000 3.59860e+11 208 219 + 71130 0.00000 0.00000 136 111 81227 0.00000 3.59860e+11 225 220 + 71131 0.00000 0.00000 135 111 81228 0.00000 3.52303e+11 222 220 + 71132 0.00000 0.00000 130 111 81229 0.00000 3.56081e+11 229 221 + 71133 0.00000 0.00000 125 111 81230 0.00000 3.78752e+11 244 221 + 71134 0.00000 0.00000 122 111 81231 0.00000 3.82531e+11 255 222 + 71135 0.00000 0.00000 118 111 81232 0.00000 3.82132e+11 270 222 + 71136 0.00000 0.00000 116 111 81233 0.00000 3.86309e+11 267 223 + 71137 0.00000 0.00000 113 111 81234 0.00000 3.96096e+11 262 223 + 71138 0.00000 0.00000 111 111 81235 0.00000 4.01423e+11 255 224 + 71139 0.00000 0.00000 110 111 81236 0.00000 3.93866e+11 259 224 + 71140 0.00000 0.00000 106 112 81237 0.00000 3.84531e+11 255 224 + 71141 0.00000 0.00000 102 112 81238 0.00000 3.82531e+11 273 224 + 71142 0.00000 0.00000 93 112 81239 0.00000 3.90088e+11 282 224 + 71143 0.00000 0.00000 90 112 81240 0.00000 3.86309e+11 275 224 + 71144 0.00000 0.00000 89 112 81241 0.00000 3.71195e+11 259 224 + 71145 0.00000 0.00000 92 112 81242 0.00000 3.82531e+11 265 223 + 71146 0.00000 0.00000 94 112 81243 0.00000 3.86998e+11 256 223 + 71147 0.00000 0.00000 104 112 81244 0.00000 3.82531e+11 248 223 + 71148 0.00000 0.00000 107 112 81245 0.00000 3.77454e+11 243 223 + 71149 0.00000 0.00000 109 112 81246 0.00000 3.73497e+11 229 223 + 71150 0.00000 0.00000 110 111 81247 0.00000 3.71195e+11 233 223 + 71151 0.00000 0.00000 112 111 81248 0.00000 3.71015e+11 249 223 + 71152 0.00000 0.00000 110 111 81249 0.00000 3.71592e+11 263 223 + 71153 0.00000 0.00000 108 110 81250 0.00000 3.71195e+11 263 224 + 71154 0.00000 0.00000 108 110 81251 0.00000 3.74974e+11 266 225 + 71155 0.00000 0.00000 107 110 81252 0.00000 3.90088e+11 257 226 + 71156 0.00000 0.00000 106 111 81253 0.00000 3.63638e+11 248 227 + 71157 0.00000 0.00000 105 111 81254 0.00000 3.56086e+11 241 228 + 71158 0.00000 0.00000 102 111 81255 0.00000 3.59860e+11 234 228 + 71159 0.00000 0.00000 102 111 81256 0.00000 3.56081e+11 230 228 + 71160 0.00000 0.00000 101 112 81257 0.00000 3.63638e+11 229 229 + 71161 0.00000 0.00000 98 112 81258 0.00000 3.63638e+11 230 229 + 71162 0.00000 0.00000 96 112 81259 0.00000 3.71195e+11 228 229 + 71163 0.00000 0.00000 93 113 81260 0.00000 3.63638e+11 218 229 + 71164 0.00000 0.00000 94 113 81261 0.00000 3.65622e+11 217 229 + 71165 0.00000 0.00000 94 113 81262 0.00000 3.82531e+11 211 229 + 71166 0.00000 0.00000 91 113 81263 0.00000 4.01423e+11 200 229 + 71167 0.00000 0.00000 91 113 81264 0.00000 3.86309e+11 191 229 + 71168 0.00000 0.00000 93 113 81265 0.00000 3.76944e+11 183 229 + 71169 0.00000 0.00000 95 113 81266 0.00000 3.79040e+11 184 230 + 71170 0.00000 0.00000 95 112 81267 0.00000 3.86309e+11 182 230 + 71171 0.00000 0.00000 94 112 81268 0.00000 3.93866e+11 182 231 + 71172 0.00000 0.00000 95 112 81269 0.00000 3.97645e+11 189 231 + 71173 0.00000 0.00000 98 112 81270 0.00000 3.99841e+11 203 231 + 71174 0.00000 0.00000 95 111 81271 0.00000 4.01708e+11 201 231 + 71175 0.00000 0.00000 105 111 81272 0.00000 4.03769e+11 205 231 + 71176 0.00000 0.00000 110 111 81273 0.00000 4.06615e+11 204 230 + 71177 0.00000 0.00000 116 111 81274 0.00000 4.11102e+11 211 230 + 71178 0.00000 0.00000 123 111 81275 0.00000 4.18636e+11 205 229 + 71179 0.00000 0.00000 131 111 81276 0.00000 4.31651e+11 197 229 + 71180 0.00000 0.00000 141 111 81277 0.00000 4.46765e+11 191 228 + 71181 0.00000 0.00000 149 111 81278 0.00000 4.41396e+11 194 228 + 71182 0.00000 0.00000 145 111 81279 0.00000 4.24094e+11 200 227 + 71183 0.00000 0.00000 139 111 81280 0.00000 4.08980e+11 204 226 + 71184 0.00000 0.00000 131 111 81281 3.97857e+11 4.01423e+11 201 224 + 71185 0.00000 0.00000 135 111 81282 3.98035e+11 3.97645e+11 205 223 + 71186 0.00000 0.00000 135 111 81283 3.98213e+11 3.96957e+11 213 222 + 71187 0.00000 0.00000 127 111 81284 3.60287e+11 3.98163e+11 220 221 + 71188 0.00000 0.00000 123 111 81285 3.84559e+11 4.00001e+11 237 219 + 71189 0.00000 0.00000 117 111 81286 3.92843e+11 4.01423e+11 256 218 + 71190 0.00000 0.00000 108 111 81287 4.04121e+11 4.01423e+11 276 217 + 71191 0.00000 0.00000 109 112 81288 4.22613e+11 4.01085e+11 287 216 + 71192 0.00000 0.00000 109 112 81289 4.03701e+11 4.08980e+11 302 215 + 71193 0.00000 0.00000 110 112 81290 4.17412e+11 4.24094e+11 303 214 + 71194 0.00000 0.00000 111 113 81291 4.04831e+11 4.12759e+11 297 213 + 71195 0.00000 0.00000 114 113 81292 4.10987e+11 3.99990e+11 279 213 + 71196 0.00000 0.00000 126 114 81293 4.11304e+11 3.92263e+11 258 212 + 71197 0.00000 0.00000 125 115 81294 4.07074e+11 3.87758e+11 238 212 + 71198 0.00000 0.00000 122 115 81295 4.01574e+11 3.85739e+11 219 212 + 71199 0.00000 0.00000 121 115 81296 4.05910e+11 3.86309e+11 208 212 + 71200 0.00000 0.00000 127 116 81297 4.06087e+11 3.89674e+11 201 212 + 71201 0.00000 0.00000 119 116 81298 3.98166e+11 3.93866e+11 186 212 + 71202 0.00000 0.00000 114 116 81299 4.01495e+11 3.97645e+11 172 212 + 71203 0.00000 0.00000 116 116 81300 3.96834e+11 4.03351e+11 171 213 + 71204 0.00000 0.00000 121 116 81301 4.14187e+11 4.10194e+11 182 214 + 71205 0.00000 0.00000 135 116 81302 4.06274e+11 4.16537e+11 188 214 + 71206 0.00000 0.00000 121 116 81303 4.23894e+11 4.20315e+11 202 215 + 71207 0.00000 0.00000 122 116 81304 4.10294e+11 4.20315e+11 207 216 + 71208 0.00000 0.00000 119 116 81305 4.11941e+11 4.20315e+11 223 217 + 71209 0.00000 0.00000 117 116 81306 4.38347e+11 4.16537e+11 241 218 + 71210 0.00000 0.00000 114 116 81307 4.33665e+11 4.24094e+11 255 219 + 71211 0.00000 0.00000 116 116 81308 4.19630e+11 4.30195e+11 263 219 + 71212 0.00000 0.00000 113 116 81309 4.28647e+11 4.32234e+11 254 219 + 71213 0.00000 0.00000 110 116 81310 4.31396e+11 4.31651e+11 245 218 + 71214 0.00000 0.00000 109 116 81311 4.31203e+11 4.29256e+11 241 218 + 71215 0.00000 0.00000 106 116 81312 4.13699e+11 4.26299e+11 235 217 + 71216 0.00000 0.00000 106 116 81313 4.09579e+11 4.24094e+11 233 216 + 71217 0.00000 0.00000 107 116 81314 4.27361e+11 4.20315e+11 231 215 + 71218 0.00000 0.00000 105 116 81315 4.32483e+11 4.08980e+11 217 214 + 71219 0.00000 0.00000 103 116 81316 4.51242e+11 4.12759e+11 224 213 + 71220 0.00000 0.00000 109 116 81317 4.33574e+11 4.13170e+11 216 213 + 71221 0.00000 0.00000 112 115 81318 4.06924e+11 4.07982e+11 207 212 + 71222 0.00000 0.00000 110 115 81319 4.05993e+11 4.01423e+11 191 212 + 71223 0.00000 0.00000 105 114 81320 3.75850e+11 3.93866e+11 181 212 + 71224 0.00000 0.00000 102 114 81321 3.83892e+11 3.78752e+11 173 211 + 71225 0.00000 0.00000 102 114 81322 3.62975e+11 3.71195e+11 161 211 + 71226 0.00000 0.00000 101 113 81323 3.58181e+11 3.74974e+11 157 211 + 71227 0.00000 0.00000 97 113 81324 3.61941e+11 3.59860e+11 152 210 + 71228 0.00000 0.00000 99 113 81325 3.65242e+11 3.52303e+11 154 210 + 71229 0.00000 0.00000 104 113 81326 3.71808e+11 3.57758e+11 153 209 + 71230 0.00000 0.00000 111 113 81327 3.77202e+11 3.67417e+11 152 208 + 71231 0.00000 0.00000 126 113 81328 3.77144e+11 3.74091e+11 150 207 + 71232 0.00000 0.00000 141 113 81329 3.87509e+11 3.78442e+11 159 206 + 71233 0.00000 0.00000 150 113 81330 3.91476e+11 3.82531e+11 178 204 + 71234 0.00000 0.00000 151 113 81331 3.88681e+11 3.87779e+11 190 202 + 71235 0.00000 0.00000 149 113 81332 3.96832e+11 3.93776e+11 206 201 + 71236 0.00000 0.00000 158 113 81333 4.01816e+11 3.99814e+11 227 199 + 71237 0.00000 0.00000 144 113 81334 3.99335e+11 4.05202e+11 232 198 + 71238 0.00000 0.00000 139 113 81335 4.14783e+11 4.08980e+11 231 197 + 71239 0.00000 0.00000 135 113 81336 4.22875e+11 4.12759e+11 230 196 + 71240 0.00000 0.00000 124 112 81337 4.17095e+11 4.24094e+11 239 195 + 71241 0.00000 0.00000 112 112 81338 4.22313e+11 4.31141e+11 242 194 + 71242 0.00000 0.00000 103 112 81339 4.41120e+11 4.32947e+11 260 193 + 71243 0.00000 0.00000 96 111 81340 4.41417e+11 4.31651e+11 262 193 + 71244 0.00000 0.00000 90 111 81341 4.47875e+11 4.31651e+11 276 193 + 71245 0.00000 0.00000 90 111 81342 4.36803e+11 4.42986e+11 288 192 + 71246 0.00000 0.00000 93 110 81343 4.65701e+11 4.50543e+11 292 192 + 71247 0.00000 0.00000 93 110 81344 4.56986e+11 4.42986e+11 279 192 + 71248 0.00000 0.00000 95 109 81345 4.46863e+11 4.34572e+11 267 191 + 71249 0.00000 0.00000 102 109 81346 4.42164e+11 4.26869e+11 254 190 + 71250 0.00000 0.00000 107 109 81347 4.30000e+11 4.16537e+11 219 189 + 71251 0.00000 0.00000 104 109 81348 4.09435e+11 4.01438e+11 193 188 + 71252 0.00000 0.00000 98 109 81349 3.96527e+11 3.86309e+11 173 187 + 71253 0.00000 0.00000 92 109 81350 3.78224e+11 3.74974e+11 157 185 + 71254 0.00000 0.00000 89 109 81351 3.50549e+11 3.62862e+11 144 185 + 71255 0.00000 0.00000 92 109 81352 3.56813e+11 3.52303e+11 136 184 + 71256 0.00000 0.00000 99 109 81353 3.53336e+11 3.47334e+11 130 184 + 71257 0.00000 0.00000 108 109 81354 3.55515e+11 3.48525e+11 134 185 + 71258 0.00000 0.00000 114 110 81355 3.55049e+11 3.56036e+11 142 185 + 71259 0.00000 0.00000 113 110 81356 3.53363e+11 3.67417e+11 146 186 + 71260 0.00000 0.00000 117 110 81357 3.51380e+11 3.78752e+11 153 187 + 71261 0.00000 0.00000 117 110 81358 3.81058e+11 3.83067e+11 156 188 + 71262 0.00000 0.00000 113 110 81359 4.01387e+11 3.83461e+11 162 189 + 71263 0.00000 0.00000 110 110 81360 4.01812e+11 3.85169e+11 166 189 + 71264 0.00000 0.00000 109 110 81361 3.86849e+11 3.93866e+11 177 190 + 71265 0.00000 0.00000 110 110 81362 4.27701e+11 4.08980e+11 183 191 + 71266 0.00000 0.00000 108 110 81363 4.07544e+11 4.12759e+11 184 192 + 71267 0.00000 0.00000 106 110 81364 4.30517e+11 4.20315e+11 186 193 + 71268 0.00000 0.00000 109 110 81365 4.20369e+11 4.08980e+11 183 194 + 71269 0.00000 0.00000 112 111 82001 4.15079e+11 4.01503e+11 180 195 + 71270 0.00000 0.00000 117 111 82002 4.04933e+11 4.01118e+11 177 195 + 71271 0.00000 0.00000 117 111 82003 4.20196e+11 4.03488e+11 176 196 + 71272 0.00000 0.00000 115 110 82004 4.09505e+11 4.05202e+11 170 197 + 71273 0.00000 0.00000 117 110 82005 4.09503e+11 4.03684e+11 166 197 + 71274 0.00000 0.00000 115 109 82006 4.19010e+11 3.99576e+11 167 197 + 71275 0.00000 0.00000 114 109 82007 4.06984e+11 3.93707e+11 167 197 + 71276 0.00000 0.00000 113 108 82008 3.96463e+11 3.86309e+11 157 196 + 71277 0.00000 0.00000 109 107 82009 3.81430e+11 3.77398e+11 164 195 + 71278 0.00000 0.00000 106 107 82010 3.73993e+11 3.67676e+11 146 195 + 71279 0.00000 0.00000 102 106 82011 3.54209e+11 3.57866e+11 136 194 + 71280 0.00000 0.00000 98 106 82012 3.33458e+11 3.48664e+11 132 193 + 71281 0.00000 0.00000 98 106 82013 3.38553e+11 3.40968e+11 128 192 + 71282 0.00000 0.00000 100 106 82014 3.37170e+11 3.37189e+11 131 191 + 71283 0.00000 0.00000 95 106 82015 3.40500e+11 3.40968e+11 136 190 + 71284 0.00000 0.00000 95 106 82016 3.58452e+11 3.48525e+11 147 190 + 71285 0.00000 0.00000 95 106 82017 3.76184e+11 3.67417e+11 153 189 + 71286 0.00000 0.00000 91 107 82018 3.58033e+11 3.80328e+11 168 188 + 71287 0.00000 0.00000 90 107 82019 3.96603e+11 3.85697e+11 169 187 + 71288 0.00000 0.00000 90 107 82020 4.05960e+11 3.86309e+11 167 186 + 71289 0.00000 0.00000 89 108 82021 3.66752e+11 3.84031e+11 163 186 + 71290 0.00000 0.00000 95 108 82022 2.95877e+11 3.82531e+11 153 186 + 71291 0.00000 0.00000 99 108 82023 3.10788e+11 3.84537e+11 148 186 + 71292 0.00000 0.00000 110 109 82024 4.53133e+11 3.86309e+11 149 187 + 71293 0.00000 0.00000 116 109 82025 3.46416e+11 3.86309e+11 169 187 + 71294 0.00000 0.00000 119 109 82026 3.91680e+11 3.93866e+11 183 188 + 71295 0.00000 0.00000 122 109 82027 3.78942e+11 4.05202e+11 197 189 + 71296 0.00000 0.00000 124 110 82028 4.02186e+11 4.19897e+11 235 190 + 71297 0.00000 0.00000 126 110 82029 4.28265e+11 4.32647e+11 267 190 + 71298 0.00000 0.00000 124 110 82030 4.30541e+11 4.35429e+11 285 191 + 71299 0.00000 0.00000 119 110 82031 4.25276e+11 4.27872e+11 289 191 + 71300 0.00000 0.00000 116 110 82032 4.35721e+11 4.31651e+11 285 192 + 71301 0.00000 0.00000 111 110 82033 4.31790e+11 4.24094e+11 280 192 + 71302 0.00000 0.00000 105 110 82034 4.30711e+11 4.24094e+11 273 193 + 71303 0.00000 0.00000 108 110 82035 4.17929e+11 4.25160e+11 253 194 + 71304 0.00000 0.00000 106 110 82036 4.12686e+11 4.23409e+11 245 195 + 71305 0.00000 0.00000 110 110 82037 3.95438e+11 4.17618e+11 245 195 + 71306 0.00000 0.00000 112 110 82038 3.99648e+11 4.05202e+11 240 196 + 71307 0.00000 0.00000 115 110 82039 4.01878e+11 3.84920e+11 245 196 + 71308 0.00000 0.00000 113 111 82040 3.77472e+11 3.67417e+11 232 196 + 71309 0.00000 0.00000 116 111 82041 3.72747e+11 3.63150e+11 214 197 + 71310 0.00000 0.00000 110 111 82042 3.84663e+11 3.67945e+11 211 197 + 71311 0.00000 0.00000 105 111 82043 3.69328e+11 3.75981e+11 204 197 + 71312 0.00000 0.00000 101 111 82044 3.64710e+11 3.82531e+11 195 197 + 71313 0.00000 0.00000 102 111 82045 3.69764e+11 3.84006e+11 185 198 + 71314 0.00000 0.00000 103 112 82046 3.66601e+11 3.81780e+11 180 198 + 71315 0.00000 0.00000 105 112 82047 3.57514e+11 3.77622e+11 171 198 + 71316 0.00000 0.00000 103 112 82048 3.48490e+11 3.72648e+11 163 199 + 71317 0.00000 0.00000 103 112 82049 3.43623e+11 3.67703e+11 166 199 + 71318 0.00000 0.00000 103 113 82050 3.69505e+11 3.63638e+11 171 199 + 71319 0.00000 0.00 \ No newline at end of file diff --git a/EUV/euv91/euv91ix3.dat b/EUV/euv91/euv91ix3.dat new file mode 100755 index 0000000..d22d20a --- /dev/null +++ b/EUV/euv91/euv91ix3.dat @@ -0,0 +1,559 @@ +From: NCF::STPMODELS "D. Bilitza (301)513-1664" 20-DEC-1996 15:16:31.07 +To: BILITZA +CC: STPMODELS +Subj: euv91index3.dat + +From: LRSP::KTOBISKA 24-APR-1992 18:42:52.04 +To: NSSDCA::STPMODELS +CC: KTOBISKA +Subj: EUV91INDEX3.DAT + + Date Lyman-a He I 10830 F10 F81 Date Lyman-a He I 10830 F10 F81 + + 89001 0.00000E+00 2.10825E+11 180 202 90183 0.00000E+00 3.75774E+11 268 182 + 89002 0.00000E+00 2.66329E+11 194 203 90184 0.00000E+00 3.74200E+11 254 181 + 89003 0.00000E+00 3.02784E+11 189 204 90185 0.00000E+00 3.71521E+11 238 181 + 89004 0.00000E+00 3.28614E+11 196 205 90186 0.00000E+00 3.68276E+11 232 181 + 89005 0.00000E+00 3.48525E+11 202 206 90187 0.00000E+00 3.64807E+11 222 181 + 89006 0.00000E+00 3.65151E+11 199 207 90188 0.00000E+00 3.61376E+11 216 182 + 89007 0.00000E+00 3.79980E+11 240 207 90189 0.00000E+00 3.58258E+11 190 182 + 89008 0.00000E+00 3.93866E+11 260 208 90190 0.00000E+00 3.55838E+11 171 184 + 89009 0.00000E+00 4.05202E+11 251 208 90191 0.00000E+00 3.54748E+11 164 185 + 89010 0.00000E+00 4.08980E+11 250 209 90192 0.00000E+00 3.56081E+11 160 187 + 89011 0.00000E+00 4.08980E+11 255 209 90193 0.00000E+00 3.59860E+11 161 189 + 89012 0.00000E+00 3.93866E+11 263 210 90194 0.00000E+00 3.61067E+11 162 191 + 89013 0.00000E+00 4.08980E+11 292 210 90195 0.00000E+00 3.59690E+11 155 193 + 89014 0.00000E+00 4.08980E+11 275 210 90196 0.00000E+00 3.56734E+11 149 196 + 89015 0.00000E+00 3.97645E+11 280 211 90197 0.00000E+00 3.52652E+11 147 197 + 89016 0.00000E+00 3.93866E+11 292 211 90198 0.00000E+00 3.47501E+11 148 199 + 89017 0.00000E+00 3.92085E+11 267 211 90199 0.00000E+00 3.40968E+11 145 200 + 89018 0.00000E+00 3.90088E+11 271 211 90200 0.00000E+00 3.33411E+11 145 201 + 89019 0.00000E+00 3.86309E+11 242 211 90201 0.00000E+00 3.29632E+11 154 201 + 89020 0.00000E+00 3.75378E+11 222 211 90202 0.00000E+00 3.34050E+11 159 201 + 89021 0.00000E+00 3.64195E+11 198 211 90203 0.00000E+00 3.40968E+11 166 201 + 89022 0.00000E+00 3.63638E+11 204 211 90204 0.00000E+00 3.44563E+11 180 200 + 89023 0.00000E+00 3.78752E+11 206 210 90205 0.00000E+00 3.46865E+11 187 199 + 89024 0.00000E+00 3.88641E+11 211 210 90206 0.00000E+00 3.51668E+11 214 199 + 89025 0.00000E+00 3.91352E+11 227 211 90207 0.00000E+00 3.63638E+11 210 198 + 89026 0.00000E+00 3.89879E+11 206 211 90208 0.00000E+00 3.78752E+11 197 198 + 89027 0.00000E+00 3.85749E+11 211 211 90209 0.00000E+00 3.71195E+11 193 198 + 89028 0.00000E+00 3.79562E+11 207 211 90210 0.00000E+00 3.71195E+11 180 198 + 89029 0.00000E+00 3.71195E+11 201 212 90211 0.00000E+00 3.71195E+11 188 198 + 89030 0.00000E+00 3.59860E+11 187 213 90212 0.00000E+00 3.71195E+11 183 198 + 89031 0.00000E+00 3.45668E+11 188 213 90213 0.00000E+00 3.72303E+11 199 198 + 89032 0.00000E+00 3.34169E+11 185 214 90214 0.00000E+00 3.73834E+11 209 198 + 89033 0.00000E+00 3.33411E+11 171 215 90215 0.00000E+00 3.75021E+11 192 199 + 89034 0.00000E+00 3.44746E+11 186 216 90216 0.00000E+00 3.74974E+11 191 200 + 89035 0.00000E+00 3.44746E+11 183 217 90217 0.00000E+00 3.72979E+11 181 200 + 89036 0.00000E+00 3.45103E+11 195 218 90218 0.00000E+00 3.70102E+11 175 201 + 89037 0.00000E+00 3.48878E+11 205 219 90219 0.00000E+00 3.67708E+11 172 201 + 89038 0.00000E+00 3.54850E+11 211 219 90220 0.00000E+00 3.67326E+11 185 202 + 89039 0.00000E+00 3.62569E+11 244 220 90221 0.00000E+00 3.71195E+11 183 202 + 89040 0.00000E+00 3.72193E+11 259 220 90222 0.00000E+00 3.80748E+11 186 202 + 89041 0.00000E+00 3.84550E+11 270 221 90223 0.00000E+00 3.90088E+11 187 201 + 89042 0.00000E+00 4.01423E+11 257 221 90224 0.00000E+00 3.93344E+11 188 200 + 89043 0.00000E+00 4.16537E+11 257 221 90225 0.00000E+00 3.92244E+11 193 200 + 89044 0.00000E+00 4.05202E+11 258 221 90226 0.00000E+00 3.89377E+11 188 199 + 89045 0.00000E+00 3.98170E+11 261 221 90227 0.00000E+00 3.86717E+11 200 198 + 89046 0.00000E+00 3.97299E+11 241 220 90228 0.00000E+00 3.86309E+11 211 198 + 89047 0.00000E+00 3.93866E+11 241 220 90229 0.00000E+00 3.90088E+11 228 197 + 89048 0.00000E+00 3.82531E+11 234 219 90230 0.00000E+00 3.97645E+11 246 196 + 89049 0.00000E+00 3.71195E+11 214 217 90231 0.00000E+00 4.01423E+11 268 196 + 89050 0.00000E+00 3.65406E+11 214 216 90232 0.00000E+00 3.90088E+11 289 196 + 89051 0.00000E+00 3.67417E+11 202 215 90233 0.00000E+00 4.08980E+11 298 196 + 89052 0.00000E+00 3.74974E+11 218 215 90234 0.00000E+00 4.12759E+11 323 196 + 89053 0.00000E+00 3.71195E+11 214 214 90235 0.00000E+00 4.08980E+11 323 196 + 89054 0.00000E+00 3.63280E+11 215 212 90236 0.00000E+00 4.05987E+11 329 196 + 89055 0.00000E+00 3.56091E+11 213 211 90237 0.00000E+00 4.01423E+11 304 197 + 89056 0.00000E+00 3.52303E+11 204 210 90238 0.00000E+00 3.92854E+11 285 197 + 89057 0.00000E+00 3.52303E+11 190 209 90239 0.00000E+00 3.84477E+11 269 197 + 89058 0.00000E+00 3.48525E+11 169 208 90240 0.00000E+00 3.82531E+11 250 198 + 89059 0.00000E+00 3.45951E+11 164 208 90241 0.00000E+00 3.90088E+11 225 198 + 89060 0.00000E+00 3.44746E+11 169 207 90242 0.00000E+00 3.93866E+11 210 198 + 89061 0.00000E+00 3.43441E+11 174 206 90243 0.00000E+00 3.86967E+11 183 199 + 89062 0.00000E+00 3.42058E+11 169 206 90244 0.00000E+00 3.75479E+11 171 199 + 89063 0.00000E+00 3.40968E+11 164 206 90245 0.00000E+00 3.67417E+11 169 199 + 89064 0.00000E+00 3.40968E+11 184 206 90246 0.00000E+00 3.68794E+11 163 200 + 89065 0.00000E+00 3.43691E+11 201 206 90247 0.00000E+00 3.75905E+11 158 200 + 89066 0.00000E+00 3.48525E+11 190 205 90248 0.00000E+00 3.83855E+11 158 200 + 89067 0.00000E+00 3.59860E+11 203 205 90249 0.00000E+00 3.88037E+11 158 200 + 89068 0.00000E+00 3.86309E+11 204 205 90250 0.00000E+00 3.82531E+11 165 200 + 89069 0.00000E+00 3.86309E+11 212 205 90251 0.00000E+00 3.67417E+11 164 201 + 89070 0.00000E+00 3.71195E+11 232 205 90252 0.00000E+00 3.67417E+11 170 201 + 89071 0.00000E+00 3.90088E+11 238 205 90253 0.00000E+00 3.74974E+11 171 201 + 89072 0.00000E+00 4.07074E+11 253 205 90254 0.00000E+00 3.71195E+11 181 201 + 89073 0.00000E+00 4.05202E+11 264 205 90255 0.00000E+00 3.82531E+11 193 201 + 89074 0.00000E+00 3.90088E+11 256 206 90256 0.00000E+00 3.90088E+11 198 200 + 89075 0.00000E+00 4.01423E+11 262 206 90257 0.00000E+00 3.93866E+11 209 200 + 89076 0.00000E+00 4.01423E+11 241 205 90258 0.00000E+00 3.94994E+11 207 200 + 89077 0.00000E+00 3.91915E+11 234 205 90259 0.00000E+00 3.94279E+11 205 199 + 89078 0.00000E+00 3.82531E+11 221 205 90260 0.00000E+00 3.92548E+11 211 199 + 89079 0.00000E+00 3.78805E+11 218 205 90261 0.00000E+00 3.90269E+11 208 199 + 89080 0.00000E+00 3.78828E+11 214 204 90262 0.00000E+00 3.87723E+11 214 198 + 89081 0.00000E+00 3.79685E+11 223 203 90263 0.00000E+00 3.85091E+11 204 198 + 89082 0.00000E+00 3.78752E+11 216 202 90264 0.00000E+00 3.82531E+11 203 197 + 89083 0.00000E+00 3.71195E+11 193 201 90265 0.00000E+00 3.80086E+11 195 197 + 89084 0.00000E+00 3.52303E+11 186 200 90266 0.00000E+00 3.77293E+11 185 196 + 89085 0.00000E+00 3.40465E+11 172 200 90267 0.00000E+00 3.73434E+11 179 196 + 89086 0.00000E+00 3.34925E+11 163 199 90268 0.00000E+00 3.67417E+11 167 195 + 89087 0.00000E+00 3.29632E+11 157 198 90269 0.00000E+00 3.63638E+11 160 195 + 89088 0.00000E+00 3.25854E+11 156 198 90270 0.00000E+00 3.74974E+11 153 194 + 89089 0.00000E+00 3.37189E+11 160 198 90271 0.00000E+00 3.71195E+11 152 194 + 89090 0.00000E+00 3.37189E+11 168 197 90272 0.00000E+00 3.64175E+11 150 193 + 89091 0.00000E+00 3.44746E+11 174 197 90273 0.00000E+00 3.58679E+11 158 192 + 89092 0.00000E+00 3.52303E+11 184 197 90274 0.00000E+00 3.54257E+11 161 191 + 89093 0.00000E+00 3.44746E+11 197 197 90275 0.00000E+00 3.50833E+11 163 189 + 89094 0.00000E+00 3.59860E+11 189 197 90276 0.00000E+00 3.48682E+11 177 188 + 89095 0.00000E+00 3.63638E+11 191 196 90277 0.00000E+00 3.48525E+11 187 186 + 89096 0.00000E+00 3.74974E+11 197 196 90278 0.00000E+00 3.52303E+11 170 184 + 89097 0.00000E+00 3.90088E+11 200 196 90279 0.00000E+00 3.59860E+11 170 184 + 89098 0.00000E+00 3.86309E+11 207 196 90280 0.00000E+00 3.59860E+11 169 183 + 89099 0.00000E+00 3.90088E+11 194 196 90281 0.00000E+00 3.64415E+11 176 182 + 89100 0.00000E+00 3.78752E+11 182 197 90282 0.00000E+00 3.63638E+11 184 182 + 89101 0.00000E+00 3.79560E+11 181 197 90283 0.00000E+00 3.56081E+11 195 182 + 89102 0.00000E+00 3.86309E+11 181 198 90284 0.00000E+00 3.74974E+11 205 182 + 89103 0.00000E+00 3.84472E+11 185 198 90285 0.00000E+00 3.67417E+11 201 182 + 89104 0.00000E+00 3.74974E+11 198 199 90286 0.00000E+00 3.74974E+11 209 182 + 89105 0.00000E+00 3.63638E+11 200 199 90287 0.00000E+00 3.82531E+11 221 182 + 89106 0.00000E+00 3.63638E+11 204 199 90288 0.00000E+00 3.86309E+11 232 182 + 89107 0.00000E+00 3.71195E+11 211 198 90289 0.00000E+00 3.82531E+11 225 182 + 89108 0.00000E+00 3.67417E+11 204 198 90290 0.00000E+00 3.90806E+11 194 182 + 89109 0.00000E+00 3.67417E+11 210 198 90291 0.00000E+00 4.01423E+11 198 182 + 89110 0.00000E+00 3.78752E+11 193 197 90292 0.00000E+00 3.93866E+11 214 182 + 89111 0.00000E+00 3.74974E+11 196 197 90293 0.00000E+00 3.67417E+11 202 182 + 89112 0.00000E+00 3.63638E+11 194 196 90294 0.00000E+00 3.86309E+11 189 182 + 89113 0.00000E+00 3.58261E+11 183 196 90295 0.00000E+00 3.91513E+11 168 182 + 89114 0.00000E+00 3.52303E+11 189 195 90296 0.00000E+00 3.82531E+11 164 182 + 89115 0.00000E+00 3.40968E+11 180 195 90297 0.00000E+00 3.78752E+11 158 182 + 89116 0.00000E+00 3.37189E+11 177 194 90298 0.00000E+00 3.78752E+11 162 182 + 89117 0.00000E+00 3.33411E+11 177 194 90299 0.00000E+00 3.51828E+11 154 182 + 89118 0.00000E+00 3.44746E+11 183 193 90300 0.00000E+00 3.33411E+11 163 182 + 89119 0.00000E+00 3.40968E+11 190 193 90301 0.00000E+00 3.52303E+11 151 182 + 89120 0.00000E+00 3.44746E+11 181 194 90302 0.00000E+00 3.49128E+11 156 182 + 89121 0.00000E+00 3.44746E+11 181 194 90303 0.00000E+00 3.29632E+11 151 182 + 89122 0.00000E+00 3.44373E+11 185 195 90304 0.00000E+00 3.14616E+11 142 183 + 89123 0.00000E+00 3.52303E+11 191 195 90305 0.00000E+00 3.06893E+11 142 183 + 89124 0.00000E+00 3.71195E+11 198 197 90306 0.00000E+00 3.07018E+11 139 183 + 89125 0.00000E+00 3.78752E+11 194 199 90307 0.00000E+00 3.18297E+11 150 184 + 89126 0.00000E+00 3.71195E+11 196 201 90308 0.00000E+00 3.40968E+11 155 184 + 89127 0.00000E+00 3.78752E+11 201 203 90309 0.00000E+00 3.57337E+11 170 184 + 89128 0.00000E+00 3.90088E+11 212 205 90310 0.00000E+00 3.66672E+11 196 185 + 89129 0.00000E+00 3.90088E+11 205 206 90311 0.00000E+00 3.72199E+11 214 185 + 89130 0.00000E+00 4.05202E+11 209 207 90312 0.00000E+00 3.75817E+11 212 186 + 89131 0.00000E+00 4.01423E+11 199 208 90313 0.00000E+00 3.78752E+11 201 186 + 89132 0.00000E+00 4.12758E+11 197 209 90314 0.00000E+00 3.78752E+11 191 187 + 89133 0.00000E+00 4.12759E+11 198 210 90315 0.00000E+00 3.71195E+11 195 187 + 89134 0.00000E+00 4.12759E+11 193 210 90316 0.00000E+00 3.78752E+11 191 187 + 89135 0.00000E+00 3.78752E+11 196 211 90317 0.00000E+00 3.86309E+11 182 187 + 89136 0.00000E+00 3.75929E+11 189 211 90318 0.00000E+00 3.82531E+11 198 187 + 89137 0.00000E+00 3.90088E+11 187 212 90319 0.00000E+00 3.59860E+11 207 187 + 89138 0.00000E+00 3.90088E+11 185 212 90320 0.00000E+00 3.67417E+11 207 188 + 89139 0.00000E+00 3.78752E+11 189 212 90321 0.00000E+00 3.59860E+11 217 188 + 89140 0.00000E+00 3.67417E+11 203 213 90322 0.00000E+00 3.59860E+11 199 188 + 89141 0.00000E+00 3.67417E+11 212 213 90323 0.00000E+00 3.63638E+11 191 188 + 89142 0.00000E+00 3.48525E+11 204 213 90324 0.00000E+00 3.51540E+11 187 188 + 89143 0.00000E+00 3.37189E+11 212 213 90325 0.00000E+00 3.40968E+11 178 188 + 89144 0.00000E+00 3.52303E+11 210 214 90326 0.00000E+00 3.48525E+11 177 188 + 89145 0.00000E+00 3.52303E+11 195 213 90327 0.00000E+00 3.52933E+11 172 187 + 89146 0.00000E+00 3.48525E+11 188 213 90328 0.00000E+00 3.49268E+11 167 187 + 89147 0.00000E+00 3.52303E+11 177 213 90329 0.00000E+00 3.37189E+11 162 186 + 89148 0.00000E+00 3.48525E+11 174 213 90330 0.00000E+00 3.19083E+11 153 185 + 89149 0.00000E+00 3.46896E+11 174 213 90331 0.00000E+00 3.18297E+11 155 185 + 89150 0.00000E+00 3.48525E+11 183 212 90332 0.00000E+00 3.44746E+11 167 185 + 89151 0.00000E+00 3.56081E+11 194 212 90333 0.00000E+00 3.44746E+11 163 185 + 89152 0.00000E+00 3.78752E+11 192 212 90334 0.00000E+00 3.40968E+11 170 185 + 89153 0.00000E+00 3.82531E+11 208 212 90335 0.00000E+00 3.48525E+11 173 185 + 89154 0.00000E+00 3.74974E+11 203 212 90336 0.00000E+00 3.63638E+11 178 186 + 89155 0.00000E+00 3.82531E+11 221 212 90337 0.00000E+00 3.71075E+11 188 186 + 89156 0.00000E+00 3.91461E+11 213 212 90338 0.00000E+00 3.74974E+11 199 187 + 89157 0.00000E+00 3.97645E+11 212 212 90339 0.00000E+00 3.82531E+11 207 187 + 89158 0.00000E+00 4.01423E+11 205 212 90340 0.00000E+00 3.90088E+11 221 187 + 89159 0.00000E+00 4.01423E+11 223 213 90341 0.00000E+00 3.90088E+11 222 188 + 89160 0.00000E+00 4.01423E+11 242 213 90342 0.00000E+00 3.97645E+11 224 188 + 89161 0.00000E+00 4.12759E+11 251 213 90343 0.00000E+00 3.93866E+11 230 189 + 89162 0.00000E+00 4.05202E+11 270 213 90344 0.00000E+00 3.97645E+11 233 189 + 89163 0.00000E+00 4.01423E+11 286 213 90345 0.00000E+00 3.99267E+11 233 190 + 89164 0.00000E+00 4.05202E+11 319 213 90346 0.00000E+00 3.96676E+11 228 191 + 89165 0.00000E+00 4.01423E+11 327 213 90347 0.00000E+00 3.91673E+11 220 192 + 89166 0.00000E+00 4.05202E+11 335 213 90348 0.00000E+00 3.85215E+11 195 192 + 89167 0.00000E+00 4.01423E+11 321 213 90349 0.00000E+00 3.77750E+11 193 193 + 89168 0.00000E+00 3.97645E+11 304 212 90350 0.00000E+00 3.69373E+11 186 195 + 89169 0.00000E+00 4.05202E+11 272 212 90351 0.00000E+00 3.59860E+11 193 196 + 89170 0.00000E+00 3.82531E+11 271 211 90352 0.00000E+00 3.52303E+11 202 196 + 89171 0.00000E+00 3.73471E+11 249 211 90353 0.00000E+00 3.56081E+11 191 198 + 89172 0.00000E+00 3.71195E+11 243 211 90354 0.00000E+00 3.55859E+11 182 200 + 89173 0.00000E+00 3.63638E+11 233 211 90355 0.00000E+00 3.50825E+11 186 202 + 89174 0.00000E+00 3.74974E+11 239 211 90356 0.00000E+00 3.44733E+11 178 203 + 89175 0.00000E+00 3.78752E+11 228 211 90357 0.00000E+00 3.40968E+11 186 205 + 89176 0.00000E+00 3.78752E+11 222 212 90358 0.00000E+00 3.42208E+11 185 206 + 89177 0.00000E+00 3.74974E+11 233 212 90359 0.00000E+00 3.46698E+11 185 207 + 89178 0.00000E+00 3.77919E+11 228 213 90360 0.00000E+00 3.52303E+11 188 207 + 89179 0.00000E+00 3.78752E+11 227 214 90361 0.00000E+00 3.57595E+11 192 208 + 89180 0.00000E+00 3.71195E+11 223 214 90362 0.00000E+00 3.62348E+11 192 207 + 89181 0.00000E+00 3.71195E+11 217 215 90363 0.00000E+00 3.66466E+11 196 207 + 89182 0.00000E+00 3.59860E+11 204 215 90364 0.00000E+00 3.69632E+11 190 207 + 89183 0.00000E+00 3.56081E+11 193 216 90365 0.00000E+00 3.71195E+11 181 207 + 89184 0.00000E+00 3.56081E+11 193 216 91001 0.00000E+00 3.70500E+11 181 207 + 89185 0.00000E+00 3.63638E+11 190 217 91002 0.00000E+00 3.68356E+11 176 207 + 89186 0.00000E+00 3.71195E+11 183 218 91003 0.00000E+00 3.65622E+11 170 207 + 89187 0.00000E+00 3.86309E+11 192 219 91004 0.00000E+00 3.62950E+11 170 207 + 89188 0.00000E+00 3.90088E+11 194 220 91005 0.00000E+00 3.61011E+11 173 208 + 89189 0.00000E+00 3.82531E+11 189 221 91006 0.00000E+00 3.60737E+11 180 208 + 89190 0.00000E+00 3.86396E+11 188 222 91007 0.00000E+00 3.63638E+11 200 209 + 89191 0.00000E+00 3.93866E+11 184 223 91008 0.00000E+00 3.70378E+11 208 209 + 89192 0.00000E+00 3.93866E+11 193 223 91009 0.00000E+00 3.74974E+11 209 210 + 89193 0.00000E+00 3.90088E+11 191 224 91010 0.00000E+00 3.71659E+11 215 212 + 89194 0.00000E+00 3.74974E+11 184 224 91011 0.00000E+00 3.63796E+11 209 213 + 89195 0.00000E+00 3.64892E+11 184 224 91012 0.00000E+00 3.56081E+11 202 214 + 89196 0.00000E+00 3.61313E+11 186 223 91013 0.00000E+00 3.52303E+11 191 216 + 89197 0.00000E+00 3.61427E+11 184 223 91014 0.00000E+00 3.52303E+11 185 217 + 89198 0.00000E+00 3.63715E+11 184 222 91015 0.00000E+00 3.52303E+11 185 219 + 89199 0.00000E+00 3.67417E+11 189 221 91016 0.00000E+00 3.53206E+11 182 219 + 89200 0.00000E+00 3.72130E+11 194 221 91017 0.00000E+00 3.53923E+11 202 220 + 89201 0.00000E+00 3.77236E+11 192 220 91018 0.00000E+00 3.52303E+11 197 220 + 89202 0.00000E+00 3.82109E+11 195 219 91019 0.00000E+00 3.48525E+11 192 220 + 89203 0.00000E+00 3.86048E+11 201 218 91020 0.00000E+00 3.51023E+11 198 220 + 89204 0.00000E+00 3.88021E+11 197 218 91021 0.00000E+00 3.58143E+11 196 220 + 89205 0.00000E+00 3.86309E+11 191 217 91022 0.00000E+00 3.66053E+11 218 219 + 89206 0.00000E+00 3.78752E+11 180 216 91023 0.00000E+00 3.71195E+11 216 219 + 89207 0.00000E+00 3.67417E+11 170 214 91024 0.00000E+00 3.74974E+11 237 220 + 89208 0.00000E+00 3.61742E+11 173 214 91025 0.00000E+00 3.90088E+11 261 220 + 89209 0.00000E+00 3.61200E+11 171 214 91026 0.00000E+00 3.97645E+11 277 220 + 89210 0.00000E+00 3.63431E+11 181 214 91027 0.00000E+00 4.01423E+11 294 220 + 89211 0.00000E+00 3.67046E+11 185 214 91028 0.00000E+00 4.12759E+11 314 221 + 89212 0.00000E+00 3.71140E+11 188 215 91029 0.00000E+00 4.17427E+11 345 221 + 89213 0.00000E+00 3.74974E+11 199 216 91030 0.00000E+00 4.16537E+11 359 221 + 89214 0.00000E+00 3.77982E+11 202 217 91031 0.00000E+00 4.12759E+11 349 222 + 89215 0.00000E+00 3.80378E+11 220 217 91032 0.00000E+00 4.01423E+11 307 223 + 89216 0.00000E+00 3.82424E+11 226 218 91033 0.00000E+00 3.90088E+11 289 223 + 89217 0.00000E+00 3.84261E+11 242 218 91034 0.00000E+00 3.74974E+11 258 224 + 89218 0.00000E+00 3.85953E+11 240 218 91035 0.00000E+00 3.78752E+11 239 225 + 89219 0.00000E+00 3.87516E+11 241 218 91036 0.00000E+00 3.86309E+11 217 226 + 89220 0.00000E+00 3.88923E+11 234 218 91037 0.00000E+00 3.74974E+11 199 227 + 89221 0.00000E+00 3.90088E+11 234 218 91038 0.00000E+00 3.63638E+11 193 228 + 89222 0.00000E+00 3.90937E+11 233 217 91039 0.00000E+00 3.67417E+11 193 228 + 89223 0.00000E+00 3.91671E+11 244 217 91040 0.00000E+00 3.70307E+11 174 229 + 89224 0.00000E+00 3.92546E+11 256 217 91041 0.00000E+00 3.69667E+11 170 230 + 89225 0.00000E+00 3.93866E+11 264 216 91042 0.00000E+00 3.67435E+11 177 231 + 89226 0.00000E+00 3.93866E+11 271 216 91043 0.00000E+00 3.64990E+11 182 232 + 89227 0.00000E+00 3.86540E+11 282 216 91044 0.00000E+00 3.63638E+11 182 233 + 89228 0.00000E+00 3.82531E+11 260 215 91045 0.00000E+00 3.63638E+11 184 233 + 89229 0.00000E+00 3.90088E+11 263 215 91046 0.00000E+00 3.61549E+11 192 234 + 89230 0.00000E+00 3.92897E+11 265 215 91047 0.00000E+00 3.58484E+11 200 234 + 89231 0.00000E+00 3.93866E+11 249 215 91048 0.00000E+00 3.56863E+11 210 234 + 89232 0.00000E+00 3.97645E+11 236 216 91049 0.00000E+00 3.59615E+11 260 234 + 89233 0.00000E+00 3.93866E+11 226 216 91050 0.00000E+00 3.71195E+11 270 234 + 89234 0.00000E+00 3.82531E+11 205 216 91051 0.00000E+00 3.93866E+11 284 233 + 89235 0.00000E+00 3.71195E+11 191 216 91052 0.00000E+00 4.12759E+11 299 233 + 89236 0.00000E+00 3.63638E+11 182 217 91053 0.00000E+00 4.14540E+11 303 233 + 89237 0.00000E+00 3.56081E+11 160 217 91054 0.00000E+00 4.05402E+11 312 233 + 89238 0.00000E+00 3.52303E+11 161 218 91055 0.00000E+00 3.93866E+11 313 233 + 89239 0.00000E+00 3.44746E+11 160 218 91056 0.00000E+00 3.85769E+11 288 233 + 89240 0.00000E+00 3.49255E+11 174 219 91057 0.00000E+00 3.80630E+11 272 233 + 89241 0.00000E+00 3.61441E+11 180 219 91058 0.00000E+00 3.77158E+11 249 233 + 89242 0.00000E+00 3.71195E+11 192 219 91059 0.00000E+00 3.74643E+11 228 233 + 89243 0.00000E+00 3.74974E+11 209 219 91060 0.00000E+00 3.72712E+11 217 234 + 89244 0.00000E+00 3.86309E+11 224 219 91061 0.00000E+00 3.71195E+11 208 234 + 89245 0.00000E+00 3.91027E+11 233 219 91062 0.00000E+00 3.67417E+11 206 235 + 89246 0.00000E+00 3.90088E+11 243 219 91063 0.00000E+00 3.56081E+11 219 235 + 89247 0.00000E+00 3.90088E+11 245 220 91064 0.00000E+00 3.56081E+11 208 236 + 89248 0.00000E+00 3.97645E+11 273 220 91065 0.00000E+00 3.68106E+11 207 236 + 89249 0.00000E+00 4.10363E+11 288 221 91066 0.00000E+00 3.78752E+11 215 236 + 89250 0.00000E+00 4.21751E+11 303 222 91067 0.00000E+00 3.78752E+11 209 236 + 89251 0.00000E+00 4.24094E+11 302 222 91068 0.00000E+00 3.80502E+11 216 235 + 89252 0.00000E+00 4.12759E+11 312 223 91069 0.00000E+00 3.85217E+11 223 234 + 89253 0.00000E+00 4.01423E+11 303 223 91070 0.00000E+00 3.90435E+11 222 233 + 89254 0.00000E+00 3.97645E+11 299 223 91071 0.00000E+00 3.93866E+11 229 231 + 89255 0.00000E+00 3.97180E+11 292 223 91072 0.00000E+00 3.93550E+11 239 229 + 89256 0.00000E+00 3.93866E+11 249 223 91073 0.00000E+00 3.90088E+11 242 227 + 89257 0.00000E+00 3.86309E+11 245 223 91074 0.00000E+00 3.84279E+11 242 225 + 89258 0.00000E+00 3.86309E+11 226 222 91075 0.00000E+00 3.77514E+11 259 223 + 89259 0.00000E+00 3.82930E+11 234 221 91076 0.00000E+00 3.71195E+11 245 222 + 89260 0.00000E+00 3.75114E+11 216 221 91077 0.00000E+00 3.67417E+11 275 221 + 89261 0.00000E+00 3.65154E+11 209 220 91078 0.00000E+00 3.69435E+11 265 221 + 89262 0.00000E+00 3.54589E+11 197 219 91079 0.00000E+00 3.75345E+11 254 220 + 89263 0.00000E+00 3.44746E+11 173 219 91080 0.00000E+00 3.82705E+11 253 220 + 89264 0.00000E+00 3.40968E+11 162 218 91081 0.00000E+00 3.89580E+11 258 220 + 89265 0.00000E+00 3.52303E+11 159 218 91082 0.00000E+00 3.93866E+11 233 220 + 89266 0.00000E+00 3.52341E+11 158 217 91083 0.00000E+00 3.93614E+11 261 219 + 89267 0.00000E+00 3.42794E+11 157 216 91084 0.00000E+00 3.89597E+11 235 219 + 89268 0.00000E+00 3.33276E+11 167 216 91085 0.00000E+00 3.82331E+11 229 219 + 89269 0.00000E+00 3.33411E+11 182 215 91086 0.00000E+00 3.71195E+11 203 219 + 89270 0.00000E+00 3.44746E+11 199 215 91087 0.00000E+00 3.56728E+11 198 220 + 89271 0.00000E+00 3.48525E+11 194 214 91088 0.00000E+00 3.48525E+11 193 220 + 89272 0.00000E+00 3.71195E+11 205 215 91089 0.00000E+00 3.48525E+11 201 220 + 89273 0.00000E+00 3.71195E+11 202 215 91090 0.00000E+00 3.33411E+11 195 220 + 89274 0.00000E+00 3.78752E+11 198 215 91091 0.00000E+00 3.35720E+11 193 220 + 89275 0.00000E+00 3.88111E+11 209 216 91092 0.00000E+00 3.48525E+11 189 219 + 89276 0.00000E+00 3.95326E+11 222 217 91093 0.00000E+00 3.59860E+11 196 218 + 89277 0.00000E+00 4.00548E+11 234 217 91094 0.00000E+00 3.78752E+11 195 217 + 89278 0.00000E+00 4.03233E+11 223 218 91095 0.00000E+00 3.86309E+11 197 216 + 89279 0.00000E+00 4.01947E+11 221 219 91096 0.00000E+00 3.82531E+11 200 214 + 89280 0.00000E+00 3.93866E+11 226 220 91097 0.00000E+00 3.93866E+11 193 213 + 89281 0.00000E+00 3.78752E+11 210 220 91098 0.00000E+00 3.88629E+11 183 212 + 89282 0.00000E+00 3.71195E+11 202 221 91099 0.00000E+00 3.82531E+11 204 211 + 89283 0.00000E+00 3.76710E+11 196 221 91100 0.00000E+00 3.93866E+11 224 210 + 89284 0.00000E+00 3.82531E+11 192 221 91101 0.00000E+00 4.01423E+11 232 209 + 89285 0.00000E+00 3.78752E+11 203 221 91102 0.00000E+00 4.16537E+11 254 208 + 89286 0.00000E+00 3.78752E+11 224 221 91103 0.00000E+00 4.05202E+11 243 208 + 89287 0.00000E+00 3.82531E+11 226 221 91104 0.00000E+00 4.24094E+11 269 207 + 89288 0.00000E+00 3.78752E+11 225 220 91105 0.00000E+00 4.08980E+11 263 207 + 89289 0.00000E+00 3.71195E+11 237 220 91106 0.00000E+00 4.00420E+11 269 206 + 89290 0.00000E+00 3.44746E+11 225 219 91107 0.00000E+00 4.01423E+11 254 206 + 89291 0.00000E+00 3.25375E+11 221 218 91108 0.00000E+00 4.00194E+11 239 206 + 89292 0.00000E+00 3.15848E+11 215 217 91109 0.00000E+00 3.97645E+11 232 207 + 89293 0.00000E+00 3.11923E+11 205 216 91110 0.00000E+00 3.93866E+11 235 207 + 89294 0.00000E+00 3.11317E+11 206 215 91111 0.00000E+00 3.79254E+11 182 207 + 89295 0.00000E+00 3.12908E+11 218 215 91112 0.00000E+00 3.59860E+11 169 207 + 89296 0.00000E+00 3.16343E+11 210 214 91113 0.00000E+00 3.43467E+11 149 207 + 89297 0.00000E+00 3.21916E+11 214 213 91114 0.00000E+00 3.29632E+11 137 206 + 89298 0.00000E+00 3.30666E+11 183 213 91115 0.00000E+00 3.22075E+11 138 207 + 89299 0.00000E+00 3.44746E+11 172 212 91116 0.00000E+00 3.33411E+11 138 207 + 89300 0.00000E+00 3.59860E+11 177 212 91117 0.00000E+00 3.37189E+11 145 206 + 89301 0.00000E+00 3.56081E+11 173 212 91118 0.00000E+00 3.40968E+11 158 206 + 89302 0.00000E+00 3.59860E+11 172 212 91119 0.00000E+00 3.52303E+11 161 206 + 89303 0.00000E+00 3.71195E+11 186 212 91120 0.00000E+00 3.59860E+11 162 206 + 89304 0.00000E+00 3.79486E+11 202 212 91121 0.00000E+00 3.63638E+11 164 206 + 89305 0.00000E+00 3.83318E+11 211 212 91122 0.00000E+00 3.64998E+11 160 205 + 89306 0.00000E+00 3.82531E+11 216 212 91123 0.00000E+00 3.67417E+11 160 205 + 89307 0.00000E+00 3.78752E+11 218 212 91124 0.00000E+00 3.71195E+11 166 205 + 89308 0.00000E+00 3.81540E+11 224 212 91125 0.00000E+00 3.67417E+11 183 205 + 89309 0.00000E+00 3.86309E+11 235 212 91126 0.00000E+00 3.68269E+11 207 204 + 89310 0.00000E+00 3.86549E+11 255 212 91127 0.00000E+00 3.71195E+11 215 204 + 89311 0.00000E+00 3.83365E+11 207 212 91128 0.00000E+00 3.71195E+11 236 204 + 89312 0.00000E+00 3.78929E+11 271 212 91129 0.00000E+00 3.72404E+11 230 204 + 89313 0.00000E+00 3.74974E+11 257 212 91130 0.00000E+00 3.75196E+11 237 204 + 89314 0.00000E+00 3.74974E+11 246 211 91131 0.00000E+00 3.78752E+11 235 203 + 89315 0.00000E+00 3.82531E+11 249 211 91132 0.00000E+00 3.82106E+11 254 203 + 89316 0.00000E+00 3.82013E+11 254 211 91133 0.00000E+00 3.82531E+11 220 203 + 89317 0.00000E+00 3.78752E+11 240 211 91134 0.00000E+00 3.74974E+11 213 203 + 89318 0.00000E+00 3.81571E+11 243 211 91135 0.00000E+00 3.63638E+11 198 202 + 89319 0.00000E+00 3.88072E+11 217 211 91136 0.00000E+00 3.78752E+11 193 202 + 89320 0.00000E+00 3.93866E+11 216 212 91137 0.00000E+00 3.67417E+11 176 202 + 89321 0.00000E+00 3.96065E+11 215 212 91138 0.00000E+00 3.63638E+11 174 202 + 89322 0.00000E+00 3.97645E+11 222 213 91139 0.00000E+00 3.71195E+11 163 203 + 89323 0.00000E+00 4.01865E+11 229 213 91140 0.00000E+00 3.61899E+11 152 203 + 89324 0.00000E+00 4.07833E+11 224 214 91141 0.00000E+00 3.44746E+11 153 203 + 89325 0.00000E+00 4.14020E+11 229 215 91142 0.00000E+00 3.37189E+11 152 203 + 89326 0.00000E+00 4.18972E+11 222 215 91143 0.00000E+00 3.44746E+11 159 203 + 89327 0.00000E+00 4.20803E+11 213 215 91144 0.00000E+00 3.48525E+11 163 204 + 89328 0.00000E+00 4.16537E+11 209 214 91145 0.00000E+00 3.56081E+11 179 203 + 89329 0.00000E+00 4.05202E+11 216 214 91146 0.00000E+00 3.63638E+11 191 203 + 89330 0.00000E+00 3.96677E+11 234 213 91147 0.00000E+00 3.63638E+11 203 203 + 89331 0.00000E+00 3.91679E+11 239 213 91148 0.00000E+00 3.71195E+11 221 203 + 89332 0.00000E+00 3.88645E+11 231 212 91149 0.00000E+00 3.74974E+11 231 202 + 89333 0.00000E+00 3.86701E+11 215 211 91150 0.00000E+00 3.79489E+11 214 202 + 89334 0.00000E+00 3.85353E+11 241 211 91151 0.00000E+00 3.84808E+11 231 201 + 89335 0.00000E+00 3.84318E+11 224 210 91152 0.00000E+00 3.88212E+11 225 202 + 89336 0.00000E+00 3.83420E+11 214 210 91153 0.00000E+00 3.86309E+11 243 202 + 89337 0.00000E+00 3.82531E+11 206 209 91154 0.00000E+00 3.78752E+11 227 203 + 89338 0.00000E+00 3.81538E+11 213 209 91155 0.00000E+00 3.78155E+11 246 204 + 89339 0.00000E+00 3.80335E+11 210 209 91156 0.00000E+00 3.84189E+11 258 204 + 89340 0.00000E+00 3.78752E+11 210 209 91157 0.00000E+00 3.93866E+11 241 205 + 89341 0.00000E+00 3.78752E+11 222 209 91158 0.00000E+00 4.01423E+11 237 205 + 89342 0.00000E+00 3.86309E+11 204 209 91159 0.00000E+00 3.97645E+11 251 205 + 89343 0.00000E+00 3.90088E+11 195 210 91160 0.00000E+00 4.05202E+11 245 206 + 89344 0.00000E+00 3.82187E+11 177 210 91161 0.00000E+00 4.08980E+11 246 206 + 89345 0.00000E+00 3.74974E+11 172 211 91162 0.00000E+00 4.12503E+11 243 207 + 89346 0.00000E+00 3.78752E+11 165 211 91163 0.00000E+00 4.13542E+11 237 208 + 89347 0.00000E+00 3.80212E+11 163 211 91164 0.00000E+00 4.05202E+11 225 209 + 89348 0.00000E+00 3.77954E+11 162 212 91165 0.00000E+00 3.86309E+11 207 210 + 89349 0.00000E+00 3.74374E+11 166 212 91166 0.00000E+00 3.74974E+11 203 210 + 89350 0.00000E+00 3.71405E+11 164 212 91167 0.00000E+00 3.56081E+11 191 211 + 89351 0.00000E+00 3.71195E+11 176 212 91168 0.00000E+00 3.40968E+11 182 211 + 89352 0.00000E+00 3.75555E+11 186 212 91169 0.00000E+00 3.43123E+11 179 210 + 89353 0.00000E+00 3.82601E+11 188 211 91170 0.00000E+00 3.52303E+11 181 210 + 89354 0.00000E+00 3.90088E+11 189 211 91171 0.00000E+00 3.56081E+11 172 210 + 89355 0.00000E+00 3.96398E+11 190 211 91172 0.00000E+00 3.56081E+11 175 210 + 89356 0.00000E+00 4.01423E+11 200 210 91173 0.00000E+00 3.67417E+11 175 210 + 89357 0.00000E+00 4.05256E+11 214 209 91174 0.00000E+00 3.74974E+11 167 210 + 89358 0.00000E+00 4.08296E+11 231 209 91175 0.00000E+00 3.74974E+11 174 210 + 89359 0.00000E+00 4.10845E+11 248 208 91176 0.00000E+00 3.78752E+11 179 210 + 89360 0.00000E+00 4.13030E+11 253 207 91177 0.00000E+00 3.78752E+11 191 210 + 89361 0.00000E+00 4.14854E+11 275 206 91178 0.00000E+00 3.82531E+11 206 210 + 89362 0.00000E+00 4.16191E+11 246 205 91179 0.00000E+00 3.90088E+11 218 210 + 89363 0.00000E+00 4.16746E+11 243 204 91180 0.00000E+00 3.86309E+11 234 210 + 89364 0.00000E+00 4.15949E+11 258 203 91181 0.00000E+00 3.90088E+11 244 210 + 89365 0.00000E+00 4.12759E+11 237 202 91182 0.00000E+00 3.93866E+11 250 210 + 90001 0.00000E+00 4.05202E+11 209 201 91183 0.00000E+00 4.01423E+11 252 209 + 90002 0.00000E+00 3.91812E+11 209 200 91184 0.00000E+00 4.08980E+11 257 209 + 90003 0.00000E+00 3.78811E+11 193 199 91185 0.00000E+00 4.08980E+11 255 209 + 90004 0.00000E+00 3.74974E+11 189 198 91186 0.00000E+00 4.08980E+11 260 209 + 90005 0.00000E+00 3.82531E+11 187 197 91187 0.00000E+00 4.11124E+11 241 210 + 90006 0.00000E+00 3.78752E+11 181 196 91188 0.00000E+00 4.13293E+11 226 211 + 90007 0.00000E+00 3.74974E+11 177 195 91189 0.00000E+00 4.12759E+11 211 211 + 90008 0.00000E+00 3.82531E+11 171 194 91190 0.00000E+00 4.07600E+11 201 212 + 90009 0.00000E+00 3.56081E+11 161 194 91191 0.00000E+00 4.01423E+11 200 213 + 90010 0.00000E+00 3.63638E+11 167 193 91192 0.00000E+00 3.97645E+11 202 214 + 90011 0.00000E+00 3.71195E+11 170 193 91193 0.00000E+00 3.93866E+11 210 215 + 90012 0.00000E+00 3.71870E+11 170 192 91194 0.00000E+00 3.86733E+11 202 215 + 90013 0.00000E+00 3.70691E+11 167 193 91195 0.00000E+00 3.77281E+11 195 216 + 90014 0.00000E+00 3.71195E+11 166 193 91196 0.00000E+00 3.67149E+11 192 216 + 90015 0.00000E+00 3.76115E+11 185 193 91197 0.00000E+00 3.57738E+11 173 216 + 90016 0.00000E+00 3.84071E+11 188 193 91198 0.00000E+00 3.50702E+11 164 215 + 90017 0.00000E+00 3.93358E+11 187 193 91199 0.00000E+00 3.48525E+11 195 215 + 90018 0.00000E+00 4.02736E+11 217 193 91200 0.00000E+00 3.53607E+11 184 214 + 90019 0.00000E+00 4.10996E+11 233 194 91201 0.00000E+00 3.63638E+11 205 214 + 90020 0.00000E+00 4.16537E+11 238 194 91202 0.00000E+00 3.74974E+11 222 213 + 90021 0.00000E+00 4.17905E+11 251 194 91203 0.00000E+00 3.82531E+11 230 212 + 90022 0.00000E+00 4.16640E+11 234 194 91204 0.00000E+00 3.90088E+11 234 212 + 90023 0.00000E+00 4.14459E+11 234 194 91205 0.00000E+00 3.93866E+11 241 211 + 90024 0.00000E+00 4.12759E+11 240 194 91206 0.00000E+00 3.93866E+11 238 211 + 90025 0.00000E+00 4.12759E+11 235 194 91207 0.00000E+00 4.20315E+11 227 210 + 90026 0.00000E+00 4.14476E+11 239 194 91208 0.00000E+00 4.12759E+11 220 210 + 90027 0.00000E+00 4.16537E+11 232 194 91209 0.00000E+00 4.01979E+11 219 210 + 90028 0.00000E+00 4.16537E+11 230 194 91210 0.00000E+00 3.97382E+11 227 210 + 90029 0.00000E+00 4.10621E+11 228 193 91211 0.00000E+00 3.96135E+11 228 210 + 90030 0.00000E+00 4.01423E+11 211 193 91212 0.00000E+00 3.96579E+11 226 210 + 90031 0.00000E+00 3.92092E+11 209 192 91213 0.00000E+00 3.97645E+11 232 211 + 90032 0.00000E+00 3.83206E+11 201 191 91214 0.00000E+00 3.97645E+11 213 211 + 90033 0.00000E+00 3.74878E+11 178 191 91215 0.00000E+00 3.93563E+11 219 211 + 90034 0.00000E+00 3.67417E+11 158 190 91216 0.00000E+00 3.90088E+11 199 211 + 90035 0.00000E+00 3.59860E+11 155 189 91217 0.00000E+00 3.91356E+11 179 211 + 90036 0.00000E+00 3.48525E+11 151 188 91218 0.00000E+00 3.90088E+11 171 211 + 90037 0.00000E+00 3.40968E+11 148 187 91219 0.00000E+00 3.82531E+11 170 211 + 90038 0.00000E+00 3.42742E+11 144 187 91220 0.00000E+00 3.82531E+11 164 210 + 90039 0.00000E+00 3.49554E+11 142 187 91221 0.00000E+00 3.75564E+11 155 210 + 90040 0.00000E+00 3.55892E+11 142 186 91222 0.00000E+00 3.62349E+11 146 209 + 90041 0.00000E+00 3.56081E+11 149 186 91223 0.00000E+00 3.48525E+11 142 208 + 90042 0.00000E+00 3.48525E+11 135 187 91224 0.00000E+00 3.40968E+11 151 207 + 90043 0.00000E+00 3.48276E+11 140 187 91225 0.00000E+00 3.52303E+11 160 206 + 90044 0.00000E+00 3.54861E+11 143 187 91226 0.00000E+00 3.82531E+11 180 205 + 90045 0.00000E+00 3.64217E+11 150 188 91227 0.00000E+00 4.01407E+11 221 204 + 90046 0.00000E+00 3.73249E+11 149 188 91228 0.00000E+00 4.08211E+11 271 203 + 90047 0.00000E+00 3.78752E+11 149 188 91229 0.00000E+00 4.08980E+11 278 203 + 90048 0.00000E+00 3.78752E+11 152 189 91230 0.00000E+00 4.07829E+11 291 203 + 90049 0.00000E+00 3.78752E+11 161 189 91231 0.00000E+00 4.08980E+11 297 202 + 90050 0.00000E+00 3.82330E+11 180 189 91232 0.00000E+00 4.15623E+11 293 202 + 90051 0.00000E+00 3.86309E+11 190 189 91233 0.00000E+00 4.24622E+11 292 202 + 90052 0.00000E+00 3.87165E+11 212 189 91234 0.00000E+00 4.31642E+11 292 202 + 90053 0.00000E+00 3.85655E+11 216 188 91235 0.00000E+00 4.31651E+11 277 203 + 90054 0.00000E+00 3.83028E+11 217 188 91236 0.00000E+00 4.20564E+11 255 203 + 90055 0.00000E+00 3.80145E+11 232 188 91237 0.00000E+00 4.04237E+11 243 203 + 90056 0.00000E+00 3.77775E+11 225 188 91238 0.00000E+00 3.90088E+11 215 203 + 90057 0.00000E+00 3.76868E+11 213 187 91239 0.00000E+00 3.83637E+11 200 203 + 90058 0.00000E+00 3.78885E+11 224 187 91240 0.00000E+00 3.82279E+11 194 203 + 90059 0.00000E+00 3.86309E+11 222 186 91241 0.00000E+00 3.82531E+11 199 203 + 90060 0.00000E+00 3.97645E+11 200 185 91242 0.00000E+00 3.82191E+11 199 203 + 90061 0.00000E+00 3.96115E+11 193 184 91243 0.00000E+00 3.81785E+11 185 202 + 90062 0.00000E+00 3.84059E+11 176 183 91244 0.00000E+00 3.82531E+11 179 202 + 90063 0.00000E+00 3.67381E+11 169 182 91245 0.00000E+00 3.85027E+11 184 201 + 90064 0.00000E+00 3.50368E+11 162 182 91246 0.00000E+00 3.86309E+11 178 200 + 90065 0.00000E+00 3.37189E+11 164 182 91247 0.00000E+00 3.83403E+11 174 200 + 90066 0.00000E+00 3.31341E+11 168 182 91248 0.00000E+00 3.77732E+11 166 199 + 90067 0.00000E+00 3.30681E+11 157 182 91249 0.00000E+00 3.71195E+11 179 199 + 90068 0.00000E+00 3.32868E+11 151 182 91250 0.00000E+00 3.63638E+11 177 198 + 90069 0.00000E+00 3.36557E+11 149 182 91251 0.00000E+00 3.52303E+11 199 197 + 90070 0.00000E+00 3.40928E+11 143 183 91252 0.00000E+00 3.47212E+11 183 196 + 90071 0.00000E+00 3.45399E+11 146 183 91253 0.00000E+00 3.49280E+11 187 195 + 90072 0.00000E+00 3.49425E+11 146 183 91254 0.00000E+00 3.57949E+11 180 195 + 90073 0.00000E+00 3.52303E+11 150 184 91255 0.00000E+00 3.74974E+11 185 194 + 90074 0.00000E+00 3.56081E+11 164 184 91256 0.00000E+00 3.97645E+11 187 194 + 90075 0.00000E+00 3.67417E+11 178 184 91257 0.00000E+00 4.04779E+11 183 194 + 90076 0.00000E+00 3.71325E+11 182 185 91258 0.00000E+00 4.01423E+11 182 195 + 90077 0.00000E+00 3.71195E+11 196 185 91259 0.00000E+00 3.96792E+11 176 196 + 90078 0.00000E+00 3.74336E+11 216 185 91260 0.00000E+00 3.92489E+11 179 197 + 90079 0.00000E+00 3.81388E+11 224 185 91261 0.00000E+00 3.88474E+11 183 198 + 90080 0.00000E+00 3.92439E+11 228 185 91262 0.00000E+00 3.84807E+11 174 200 + 90081 0.00000E+00 4.08980E+11 243 185 91263 0.00000E+00 3.81668E+11 171 201 + 90082 0.00000E+00 4.24094E+11 245 185 91264 0.00000E+00 3.79423E+11 178 202 + 90083 0.00000E+00 4.16537E+11 231 185 91265 0.00000E+00 3.78752E+11 189 203 + 90084 0.00000E+00 4.31651E+11 224 184 91266 0.00000E+00 3.80277E+11 186 204 + 90085 0.00000E+00 4.42689E+11 227 184 91267 0.00000E+00 3.82918E+11 181 204 + 90086 0.00000E+00 4.44117E+11 215 184 91268 0.00000E+00 3.85382E+11 182 203 + 90087 0.00000E+00 4.39917E+11 206 184 91269 0.00000E+00 3.86309E+11 202 202 + 90088 0.00000E+00 4.32100E+11 184 185 91270 0.00000E+00 3.85176E+11 179 201 + 90089 0.00000E+00 4.21415E+11 187 185 91271 0.00000E+00 3.86309E+11 176 200 + 90090 0.00000E+00 4.07604E+11 173 185 91272 0.00000E+00 3.90088E+11 195 198 + 90091 0.00000E+00 3.89317E+11 159 186 91273 0.00000E+00 3.82531E+11 200 197 + 90092 0.00000E+00 3.63638E+11 153 186 91274 0.00000E+00 3.74974E+11 208 196 + 90093 0.00000E+00 3.33411E+11 152 186 91275 0.00000E+00 3.74974E+11 221 195 + 90094 0.00000E+00 3.23073E+11 149 186 91276 0.00000E+00 3.82531E+11 212 194 + 90095 0.00000E+00 3.28565E+11 157 187 91277 0.00000E+00 3.71195E+11 213 193 + 90096 0.00000E+00 3.40594E+11 150 187 91278 0.00000E+00 3.56081E+11 193 192 + 90097 0.00000E+00 3.52155E+11 155 187 91279 0.00000E+00 3.56081E+11 182 191 + 90098 0.00000E+00 3.56081E+11 152 188 91280 0.00000E+00 3.48525E+11 180 191 + 90099 0.00000E+00 3.52303E+11 147 189 91281 0.00000E+00 3.48525E+11 179 190 + 90100 0.00000E+00 3.59860E+11 149 189 91282 0.00000E+00 3.64202E+11 184 190 + 90101 0.00000E+00 3.53810E+11 161 190 91283 0.00000E+00 3.78752E+11 179 189 + 90102 0.00000E+00 3.48525E+11 170 191 91284 0.00000E+00 3.78752E+11 178 189 + 90103 0.00000E+00 3.67417E+11 196 191 91285 0.00000E+00 3.80262E+11 187 188 + 90104 0.00000E+00 3.97645E+11 216 192 91286 0.00000E+00 3.82531E+11 183 188 + 90105 0.00000E+00 3.86309E+11 223 192 91287 0.00000E+00 3.82531E+11 186 187 + 90106 0.00000E+00 3.80141E+11 226 192 91288 0.00000E+00 3.90088E+11 178 187 + 90107 0.00000E+00 3.87397E+11 237 192 91289 0.00000E+00 3.97645E+11 180 186 + 90108 0.00000E+00 4.01972E+11 243 192 91290 0.00000E+00 3.82531E+11 168 186 + 90109 0.00000E+00 4.20315E+11 244 192 91291 0.00000E+00 3.86309E+11 157 185 + 90110 0.00000E+00 4.31651E+11 257 192 91292 0.00000E+00 3.71195E+11 153 185 + 90111 0.00000E+00 4.16537E+11 240 192 91293 0.00000E+00 3.60890E+11 156 184 + 90112 0.00000E+00 4.16537E+11 233 192 91294 0.00000E+00 3.59899E+11 167 184 + 90113 0.00000E+00 3.90088E+11 226 192 91295 0.00000E+00 3.63880E+11 183 184 + 90114 0.00000E+00 3.74142E+11 217 192 91296 0.00000E+00 3.70232E+11 192 184 + 90115 0.00000E+00 3.70577E+11 198 192 91297 0.00000E+00 3.77185E+11 228 184 + 90116 0.00000E+00 3.67417E+11 189 192 91298 0.00000E+00 3.83176E+11 237 184 + 90117 0.00000E+00 3.56081E+11 170 191 91299 0.00000E+00 3.86309E+11 248 184 + 90118 0.00000E+00 3.40968E+11 153 191 91300 0.00000E+00 3.86025E+11 246 184 + 90119 0.00000E+00 3.33411E+11 141 191 91301 0.00000E+00 3.90088E+11 268 184 + 90120 0.00000E+00 3.29598E+11 137 191 91302 0.00000E+00 4.01423E+11 269 185 + 90121 0.00000E+00 3.29632E+11 129 190 91303 0.00000E+00 3.99672E+11 258 186 + 90122 0.00000E+00 3.34734E+11 129 190 91304 0.00000E+00 3.90088E+11 228 187 + 90123 0.00000E+00 3.38861E+11 125 190 91305 0.00000E+00 3.82531E+11 227 187 + 90124 0.00000E+00 3.33411E+11 124 190 91306 0.00000E+00 3.74974E+11 215 188 + 90125 0.00000E+00 3.18297E+11 131 189 91307 0.00000E+00 3.57824E+11 183 189 + 90126 0.00000E+00 3.22075E+11 151 189 91308 0.00000E+00 3.52303E+11 174 189 + 90127 0.00000E+00 3.29632E+11 156 189 91309 0.00000E+00 3.71195E+11 173 190 + 90128 0.00000E+00 3.33411E+11 171 188 91310 0.00000E+00 3.71195E+11 183 190 + 90129 0.00000E+00 3.44746E+11 175 188 91311 0.00000E+00 3.69604E+11 190 190 + 90130 0.00000E+00 3.53330E+11 195 188 91312 0.00000E+00 3.71879E+11 197 190 + 90131 0.00000E+00 3.63638E+11 205 188 91313 0.00000E+00 3.76153E+11 194 190 + 90132 0.00000E+00 3.78752E+11 215 188 91314 0.00000E+00 3.81255E+11 192 190 + 90133 0.00000E+00 3.82531E+11 226 188 91315 0.00000E+00 3.86309E+11 194 190 + 90134 0.00000E+00 3.88433E+11 224 188 91316 0.00000E+00 3.90088E+11 189 190 + 90135 0.00000E+00 3.93866E+11 247 187 91317 0.00000E+00 3.90542E+11 177 190 + 90136 0.00000E+00 3.93866E+11 252 187 91318 0.00000E+00 3.88082E+11 180 190 + 90137 0.00000E+00 3.97385E+11 249 187 91319 0.00000E+00 3.83070E+11 169 190 + 90138 0.00000E+00 4.03343E+11 272 188 91320 0.00000E+00 3.74974E+11 162 191 + 90139 0.00000E+00 4.07549E+11 280 188 91321 0.00000E+00 3.63413E+11 161 192 + 90140 0.00000E+00 4.05202E+11 273 189 91322 0.00000E+00 3.51797E+11 160 193 + 90141 0.00000E+00 3.93866E+11 259 190 91323 0.00000E+00 3.44746E+11 155 194 + 90142 0.00000E+00 3.83487E+11 250 191 91324 0.00000E+00 3.48525E+11 150 195 + 90143 0.00000E+00 3.74974E+11 240 192 91325 0.00000E+00 3.63638E+11 142 196 + 90144 0.00000E+00 3.67417E+11 209 193 91326 0.00000E+00 3.63638E+11 136 196 + 90145 0.00000E+00 3.59860E+11 189 193 91327 0.00000E+00 3.52303E+11 133 197 + 90146 0.00000E+00 3.44746E+11 186 193 91328 0.00000E+00 3.56081E+11 128 197 + 90147 0.00000E+00 3.40968E+11 165 193 91329 0.00000E+00 3.48525E+11 131 198 + 90148 0.00000E+00 3.44746E+11 159 193 91330 0.00000E+00 3.52303E+11 140 199 + 90149 0.00000E+00 3.35904E+11 145 192 91331 0.00000E+00 3.48525E+11 149 200 + 90150 0.00000E+00 3.25854E+11 143 191 91332 0.00000E+00 3.45162E+11 150 201 + 90151 0.00000E+00 3.25854E+11 143 190 91333 0.00000E+00 3.44746E+11 157 202 + 90152 0.00000E+00 3.22075E+11 141 189 91334 0.00000E+00 3.45902E+11 163 203 + 90153 0.00000E+00 3.25854E+11 141 188 91335 0.00000E+00 3.46684E+11 168 203 + 90154 0.00000E+00 3.29632E+11 146 188 91336 0.00000E+00 3.44746E+11 166 204 + 90155 0.00000E+00 3.44746E+11 148 187 91337 0.00000E+00 3.40968E+11 178 205 + 90156 0.00000E+00 3.48525E+11 154 186 91338 0.00000E+00 3.47005E+11 185 205 + 90157 0.00000E+00 3.44746E+11 161 186 91339 0.00000E+00 3.59370E+11 186 205 + 90158 0.00000E+00 3.56081E+11 184 185 91340 0.00000E+00 3.71195E+11 192 205 + 90159 0.00000E+00 3.70707E+11 196 185 91341 0.00000E+00 3.78752E+11 203 204 + 90160 0.00000E+00 3.82030E+11 204 185 91342 0.00000E+00 3.87925E+11 220 204 + 90161 0.00000E+00 3.86309E+11 208 186 91343 0.00000E+00 3.98610E+11 250 204 + 90162 0.00000E+00 3.86309E+11 217 186 91344 0.00000E+00 4.08806E+11 253 203 + 90163 0.00000E+00 3.97645E+11 222 186 91345 0.00000E+00 4.16339E+11 238 203 + 90164 0.00000E+00 3.90088E+11 209 187 91346 0.00000E+00 4.18105E+11 236 204 + 90165 0.00000E+00 4.01423E+11 207 188 91347 0.00000E+00 4.08980E+11 247 204 + 90166 0.00000E+00 4.00827E+11 196 189 91348 0.00000E+00 3.90088E+11 222 204 + 90167 0.00000E+00 3.93866E+11 190 190 91349 0.00000E+00 3.86309E+11 207 205 + 90168 0.00000E+00 3.93866E+11 188 190 91350 0.00000E+00 3.86634E+11 225 206 + 90169 0.00000E+00 3.86309E+11 170 190 91351 0.00000E+00 3.86647E+11 192 207 + 90170 0.00000E+00 3.63638E+11 164 190 91352 0.00000E+00 3.86469E+11 189 207 + 90171 0.00000E+00 3.59860E+11 161 190 91353 0.00000E+00 3.86156E+11 182 208 + 90172 0.00000E+00 3.56081E+11 156 190 91354 0.00000E+00 3.85714E+11 192 208 + 90173 0.00000E+00 3.44746E+11 145 190 91355 0.00000E+00 3.85106E+11 186 209 + 90174 0.00000E+00 3.30176E+11 139 190 91356 0.00000E+00 3.84236E+11 216 209 + 90175 0.00000E+00 3.22075E+11 144 189 91357 0.00000E+00 3.82916E+11 219 210 + 90176 0.00000E+00 3.25854E+11 149 189 91358 0.00000E+00 3.80801E+11 222 210 + 90177 0.00000E+00 3.33411E+11 155 188 91359 0.00000E+00 3.77267E+11 251 211 + 90178 0.00000E+00 3.59860E+11 173 187 91360 0.00000E+00 3.71195E+11 252 212 + 90179 0.00000E+00 3.59860E+11 188 186 91361 0.00000E+00 3.63638E+11 244 213 + 90180 0.00000E+00 3.63088E+11 211 184 91362 0.00000E+00 3.63638E+11 263 214 + 90181 0.00000E+00 3.71195E+11 227 183 91363 0.00000E+00 0.00000E+00 246 215 + 90182 0.00000E+00 3.75318E+11 248 182 91364 0.00000E+00 0.00000E+00 263 216 diff --git a/EUV/euv91/euv91ix3_old.dat b/EUV/euv91/euv91ix3_old.dat new file mode 100755 index 0000000..26b7f21 --- /dev/null +++ b/EUV/euv91/euv91ix3_old.dat @@ -0,0 +1,367 @@ + Date Lyman-a He I 10830 F10 F81 Date Lyman-a He I 10830 F10 F81 + + 89001 0.00000E+00 3.46006E+11 180 202 90001 0.00000E+00 4.05202E+11 209 201 + 89002 0.00000E+00 3.46635E+11 194 203 90002 0.00000E+00 3.91827E+11 209 200 + 89003 0.00000E+00 3.47265E+11 189 204 90003 0.00000E+00 3.78835E+11 193 199 + 89004 0.00000E+00 3.47895E+11 196 205 90004 0.00000E+00 3.74974E+11 189 198 + 89005 0.00000E+00 3.48525E+11 202 206 90005 0.00000E+00 3.82531E+11 187 197 + 89006 0.00000E+00 3.65147E+11 199 207 90006 0.00000E+00 3.78752E+11 181 196 + 89007 0.00000E+00 3.79976E+11 240 207 90007 0.00000E+00 3.74974E+11 177 195 + 89008 0.00000E+00 3.93866E+11 260 208 90008 0.00000E+00 3.82531E+11 171 194 + 89009 0.00000E+00 4.05202E+11 251 208 90009 0.00000E+00 3.56081E+11 161 194 + 89010 0.00000E+00 4.08980E+11 250 209 90010 0.00000E+00 3.63638E+11 167 193 + 89011 0.00000E+00 4.08980E+11 255 209 90011 0.00000E+00 3.71195E+11 170 193 + 89012 0.00000E+00 3.93866E+11 263 210 90012 0.00000E+00 3.71866E+11 170 192 + 89013 0.00000E+00 4.08980E+11 292 210 90013 0.00000E+00 3.70686E+11 167 193 + 89014 0.00000E+00 4.08980E+11 275 210 90014 0.00000E+00 3.71195E+11 166 193 + 89015 0.00000E+00 3.97645E+11 280 211 90015 0.00000E+00 3.76135E+11 185 193 + 89016 0.00000E+00 3.93866E+11 292 211 90016 0.00000E+00 3.84098E+11 188 193 + 89017 0.00000E+00 3.92085E+11 267 211 90017 0.00000E+00 3.93374E+11 187 193 + 89018 0.00000E+00 3.90088E+11 271 211 90018 0.00000E+00 4.02736E+11 217 193 + 89019 0.00000E+00 3.86309E+11 242 211 90019 0.00000E+00 4.10992E+11 233 194 + 89020 0.00000E+00 3.75394E+11 222 211 90020 0.00000E+00 4.16537E+11 238 194 + 89021 0.00000E+00 3.64216E+11 198 211 90021 0.00000E+00 4.17894E+11 251 194 + 89022 0.00000E+00 3.63638E+11 204 211 90022 0.00000E+00 4.16627E+11 234 194 + 89023 0.00000E+00 3.78752E+11 206 210 90023 0.00000E+00 4.14453E+11 234 194 + 89024 0.00000E+00 3.88554E+11 211 210 90024 0.00000E+00 4.12759E+11 240 194 + 89025 0.00000E+00 3.91183E+11 227 211 90025 0.00000E+00 4.12759E+11 235 194 + 89026 0.00000E+00 3.89691E+11 206 211 90026 0.00000E+00 4.14476E+11 239 194 + 89027 0.00000E+00 3.85606E+11 211 211 90027 0.00000E+00 4.16537E+11 232 194 + 89028 0.00000E+00 3.79499E+11 207 211 90028 0.00000E+00 4.16537E+11 230 194 + 89029 0.00000E+00 3.71195E+11 201 212 90029 0.00000E+00 4.10615E+11 228 193 + 89030 0.00000E+00 3.59860E+11 187 213 90030 0.00000E+00 4.01423E+11 211 193 + 89031 0.00000E+00 3.45691E+11 188 213 90031 0.00000E+00 3.92101E+11 209 192 + 89032 0.00000E+00 3.34199E+11 185 214 90032 0.00000E+00 3.83219E+11 201 191 + 89033 0.00000E+00 3.33411E+11 171 215 90033 0.00000E+00 3.74886E+11 178 191 + 89034 0.00000E+00 3.44746E+11 186 216 90034 0.00000E+00 3.67417E+11 158 190 + 89035 0.00000E+00 3.44746E+11 183 217 90035 0.00000E+00 3.59860E+11 155 189 + 89036 0.00000E+00 3.45177E+11 195 218 90036 0.00000E+00 3.48525E+11 151 188 + 89037 0.00000E+00 3.49042E+11 205 219 90037 0.00000E+00 3.40968E+11 148 187 + 89038 0.00000E+00 3.55071E+11 211 219 90038 0.00000E+00 3.42748E+11 144 187 + 89039 0.00000E+00 3.62795E+11 244 220 90039 0.00000E+00 3.49549E+11 142 187 + 89040 0.00000E+00 3.72369E+11 259 220 90040 0.00000E+00 3.55881E+11 142 186 + 89041 0.00000E+00 3.84634E+11 270 221 90041 0.00000E+00 3.56081E+11 149 186 + 89042 0.00000E+00 4.01423E+11 257 221 90042 0.00000E+00 3.48525E+11 135 187 + 89043 0.00000E+00 4.16537E+11 257 221 90043 0.00000E+00 3.48313E+11 140 187 + 89044 0.00000E+00 4.05202E+11 258 221 90044 0.00000E+00 3.54912E+11 143 187 + 89045 0.00000E+00 3.98182E+11 261 221 90045 0.00000E+00 3.64246E+11 150 188 + 89046 0.00000E+00 3.97304E+11 241 220 90046 0.00000E+00 3.73254E+11 149 188 + 89047 0.00000E+00 3.93866E+11 241 220 90047 0.00000E+00 3.78752E+11 149 188 + 89048 0.00000E+00 3.82531E+11 234 219 90048 0.00000E+00 3.78752E+11 152 189 + 89049 0.00000E+00 3.71195E+11 214 217 90049 0.00000E+00 3.78752E+11 161 189 + 89050 0.00000E+00 3.65416E+11 214 216 90050 0.00000E+00 3.82331E+11 180 189 + 89051 0.00000E+00 3.67417E+11 202 215 90051 0.00000E+00 3.86309E+11 190 189 + 89052 0.00000E+00 3.74974E+11 218 215 90052 0.00000E+00 3.87165E+11 212 189 + 89053 0.00000E+00 3.71195E+11 214 214 90053 0.00000E+00 3.85674E+11 216 188 + 89054 0.00000E+00 3.63289E+11 215 212 90054 0.00000E+00 3.83086E+11 217 188 + 89055 0.00000E+00 3.56102E+11 213 211 90055 0.00000E+00 3.80243E+11 232 188 + 89056 0.00000E+00 3.52303E+11 204 210 90056 0.00000E+00 3.77895E+11 225 188 + 89057 0.00000E+00 3.52303E+11 190 209 90057 0.00000E+00 3.76973E+11 213 187 + 89058 0.00000E+00 3.48525E+11 169 208 90058 0.00000E+00 3.78936E+11 224 187 + 89059 0.00000E+00 3.45953E+11 164 208 90059 0.00000E+00 3.86309E+11 222 186 + 89060 0.00000E+00 3.44746E+11 169 207 90060 0.00000E+00 3.97645E+11 200 185 + 89061 0.00000E+00 3.43440E+11 174 206 90061 0.00000E+00 3.96038E+11 193 184 + 89062 0.00000E+00 3.42058E+11 169 206 90062 0.00000E+00 3.83928E+11 176 183 + 89063 0.00000E+00 3.40968E+11 164 206 90063 0.00000E+00 3.67259E+11 169 182 + 89064 0.00000E+00 3.40968E+11 184 206 90064 0.00000E+00 3.50295E+11 162 182 + 89065 0.00000E+00 3.43693E+11 201 206 90065 0.00000E+00 3.37189E+11 164 182 + 89066 0.00000E+00 3.48525E+11 190 205 90066 0.00000E+00 3.31449E+11 168 182 + 89067 0.00000E+00 3.59860E+11 203 205 90067 0.00000E+00 3.30870E+11 157 182 + 89068 0.00000E+00 3.86309E+11 204 205 90068 0.00000E+00 3.33082E+11 151 182 + 89069 0.00000E+00 3.86309E+11 212 205 90069 0.00000E+00 3.36747E+11 149 182 + 89070 0.00000E+00 3.71195E+11 232 205 90070 0.00000E+00 3.41065E+11 143 183 + 89071 0.00000E+00 3.90088E+11 238 205 90071 0.00000E+00 3.45474E+11 146 183 + 89072 0.00000E+00 4.07046E+11 253 205 90072 0.00000E+00 3.49449E+11 146 183 + 89073 0.00000E+00 4.05202E+11 264 205 90073 0.00000E+00 3.52303E+11 150 184 + 89074 0.00000E+00 3.90088E+11 256 206 90074 0.00000E+00 3.56081E+11 164 184 + 89075 0.00000E+00 4.01423E+11 262 206 90075 0.00000E+00 3.67417E+11 178 184 + 89076 0.00000E+00 4.01423E+11 241 205 90076 0.00000E+00 3.71309E+11 182 185 + 89077 0.00000E+00 3.91913E+11 234 205 90077 0.00000E+00 3.71195E+11 196 185 + 89078 0.00000E+00 3.82531E+11 221 205 90078 0.00000E+00 3.74388E+11 216 185 + 89079 0.00000E+00 3.78821E+11 218 205 90079 0.00000E+00 3.81465E+11 224 185 + 89080 0.00000E+00 3.78844E+11 214 204 90080 0.00000E+00 3.92489E+11 228 185 + 89081 0.00000E+00 3.79690E+11 223 203 90081 0.00000E+00 4.08980E+11 243 185 + 89082 0.00000E+00 3.78752E+11 216 202 90082 0.00000E+00 4.24094E+11 245 185 + 89083 0.00000E+00 3.71195E+11 193 201 90083 0.00000E+00 4.16537E+11 231 185 + 89084 0.00000E+00 3.52303E+11 186 200 90084 0.00000E+00 4.31651E+11 224 184 + 89085 0.00000E+00 3.40482E+11 172 200 90085 0.00000E+00 4.42499E+11 227 184 + 89086 0.00000E+00 3.34936E+11 163 199 90086 0.00000E+00 4.43701E+11 215 184 + 89087 0.00000E+00 3.29632E+11 157 198 90087 0.00000E+00 4.39350E+11 206 184 + 89088 0.00000E+00 3.25854E+11 156 198 90088 0.00000E+00 4.31492E+11 184 185 + 89089 0.00000E+00 3.37189E+11 160 198 90089 0.00000E+00 4.20874E+11 187 185 + 89090 0.00000E+00 3.37189E+11 168 197 90090 0.00000E+00 4.07226E+11 173 185 + 89091 0.00000E+00 3.44746E+11 174 197 90091 0.00000E+00 3.89156E+11 159 186 + 89092 0.00000E+00 3.52303E+11 184 197 90092 0.00000E+00 3.63638E+11 153 186 + 89093 0.00000E+00 3.44746E+11 197 197 90093 0.00000E+00 3.33411E+11 152 186 + 89094 0.00000E+00 3.59860E+11 189 197 90094 0.00000E+00 3.23146E+11 149 186 + 89095 0.00000E+00 3.63638E+11 191 196 90095 0.00000E+00 3.28670E+11 157 187 + 89096 0.00000E+00 3.74974E+11 197 196 90096 0.00000E+00 3.40656E+11 150 187 + 89097 0.00000E+00 3.90088E+11 200 196 90097 0.00000E+00 3.52165E+11 155 187 + 89098 0.00000E+00 3.86309E+11 207 196 90098 0.00000E+00 3.56081E+11 152 188 + 89099 0.00000E+00 3.90088E+11 194 196 90099 0.00000E+00 3.52303E+11 147 189 + 89100 0.00000E+00 3.78752E+11 182 197 90100 0.00000E+00 3.59860E+11 149 189 + 89101 0.00000E+00 3.79573E+11 181 197 90101 0.00000E+00 3.53809E+11 161 190 + 89102 0.00000E+00 3.86309E+11 181 198 90102 0.00000E+00 3.48525E+11 170 191 + 89103 0.00000E+00 3.84459E+11 185 198 90103 0.00000E+00 3.67417E+11 196 191 + 89104 0.00000E+00 3.74974E+11 198 199 90104 0.00000E+00 3.97645E+11 216 192 + 89105 0.00000E+00 3.63638E+11 200 199 90105 0.00000E+00 3.86309E+11 223 192 + 89106 0.00000E+00 3.63638E+11 204 199 90106 0.00000E+00 3.80232E+11 226 192 + 89107 0.00000E+00 3.71195E+11 211 198 90107 0.00000E+00 3.87526E+11 237 192 + 89108 0.00000E+00 3.67417E+11 204 198 90108 0.00000E+00 4.02045E+11 243 192 + 89109 0.00000E+00 3.67417E+11 210 198 90109 0.00000E+00 4.20315E+11 244 192 + 89110 0.00000E+00 3.78752E+11 193 197 90110 0.00000E+00 4.31651E+11 257 192 + 89111 0.00000E+00 3.74974E+11 196 197 90111 0.00000E+00 4.16537E+11 240 192 + 89112 0.00000E+00 3.63638E+11 194 196 90112 0.00000E+00 4.16537E+11 233 192 + 89113 0.00000E+00 3.58260E+11 183 196 90113 0.00000E+00 3.90088E+11 226 192 + 89114 0.00000E+00 3.52303E+11 189 195 90114 0.00000E+00 3.74179E+11 217 192 + 89115 0.00000E+00 3.40968E+11 180 195 90115 0.00000E+00 3.70604E+11 198 192 + 89116 0.00000E+00 3.37189E+11 177 194 90116 0.00000E+00 3.67417E+11 189 192 + 89117 0.00000E+00 3.33411E+11 177 194 90117 0.00000E+00 3.56081E+11 170 191 + 89118 0.00000E+00 3.44746E+11 183 193 90118 0.00000E+00 3.40968E+11 153 191 + 89119 0.00000E+00 3.40968E+11 190 193 90119 0.00000E+00 3.33411E+11 141 191 + 89120 0.00000E+00 3.44746E+11 181 194 90120 0.00000E+00 3.29608E+11 137 191 + 89121 0.00000E+00 3.44746E+11 181 194 90121 0.00000E+00 3.29632E+11 129 190 + 89122 0.00000E+00 3.44385E+11 185 195 90122 0.00000E+00 3.34707E+11 129 190 + 89123 0.00000E+00 3.52303E+11 191 195 90123 0.00000E+00 3.38829E+11 125 190 + 89124 0.00000E+00 3.71195E+11 198 197 90124 0.00000E+00 3.33411E+11 124 190 + 89125 0.00000E+00 3.78752E+11 194 199 90125 0.00000E+00 3.18297E+11 131 189 + 89126 0.00000E+00 3.71195E+11 196 201 90126 0.00000E+00 3.22075E+11 151 189 + 89127 0.00000E+00 3.78752E+11 201 203 90127 0.00000E+00 3.29632E+11 156 189 + 89128 0.00000E+00 3.90088E+11 212 205 90128 0.00000E+00 3.33411E+11 171 188 + 89129 0.00000E+00 3.90088E+11 205 206 90129 0.00000E+00 3.44746E+11 175 188 + 89130 0.00000E+00 4.05202E+11 209 207 90130 0.00000E+00 3.53332E+11 195 188 + 89131 0.00000E+00 4.01423E+11 199 208 90131 0.00000E+00 3.63638E+11 205 188 + 89132 0.00000E+00 4.12759E+11 197 209 90132 0.00000E+00 3.78752E+11 215 188 + 89133 0.00000E+00 4.12759E+11 198 210 90133 0.00000E+00 3.82531E+11 226 188 + 89134 0.00000E+00 4.12759E+11 193 210 90134 0.00000E+00 3.88432E+11 224 188 + 89135 0.00000E+00 3.78752E+11 196 211 90135 0.00000E+00 3.93866E+11 247 187 + 89136 0.00000E+00 3.75953E+11 189 211 90136 0.00000E+00 3.93866E+11 252 187 + 89137 0.00000E+00 3.90088E+11 187 212 90137 0.00000E+00 3.97375E+11 249 187 + 89138 0.00000E+00 3.90088E+11 185 212 90138 0.00000E+00 4.03315E+11 272 188 + 89139 0.00000E+00 3.78752E+11 189 212 90139 0.00000E+00 4.07523E+11 280 188 + 89140 0.00000E+00 3.67417E+11 203 213 90140 0.00000E+00 4.05202E+11 273 189 + 89141 0.00000E+00 3.67417E+11 212 213 90141 0.00000E+00 3.93866E+11 259 190 + 89142 0.00000E+00 3.48525E+11 204 213 90142 0.00000E+00 3.83488E+11 250 191 + 89143 0.00000E+00 3.37189E+11 212 213 90143 0.00000E+00 3.74974E+11 240 192 + 89144 0.00000E+00 3.52303E+11 210 214 90144 0.00000E+00 3.67417E+11 209 193 + 89145 0.00000E+00 3.52303E+11 195 213 90145 0.00000E+00 3.59860E+11 189 193 + 89146 0.00000E+00 3.48525E+11 188 213 90146 0.00000E+00 3.44746E+11 186 193 + 89147 0.00000E+00 3.52303E+11 177 213 90147 0.00000E+00 3.40968E+11 165 193 + 89148 0.00000E+00 3.48525E+11 174 213 90148 0.00000E+00 3.44746E+11 159 193 + 89149 0.00000E+00 3.46900E+11 174 213 90149 0.00000E+00 3.35903E+11 145 192 + 89150 0.00000E+00 3.48525E+11 183 212 90150 0.00000E+00 3.25854E+11 143 191 + 89151 0.00000E+00 3.56081E+11 194 212 90151 0.00000E+00 3.25854E+11 143 190 + 89152 0.00000E+00 3.78752E+11 192 212 90152 0.00000E+00 3.22075E+11 141 189 + 89153 0.00000E+00 3.82531E+11 208 212 90153 0.00000E+00 3.25854E+11 141 188 + 89154 0.00000E+00 3.74974E+11 203 212 90154 0.00000E+00 3.29632E+11 146 188 + 89155 0.00000E+00 3.82531E+11 221 212 90155 0.00000E+00 3.44746E+11 148 187 + 89156 0.00000E+00 3.91457E+11 213 212 90156 0.00000E+00 3.48525E+11 154 186 + 89157 0.00000E+00 3.97645E+11 212 212 90157 0.00000E+00 3.44746E+11 161 186 + 89158 0.00000E+00 4.01423E+11 205 212 90158 0.00000E+00 3.56081E+11 184 185 + 89159 0.00000E+00 4.01423E+11 223 213 90159 0.00000E+00 3.70682E+11 196 185 + 89160 0.00000E+00 4.01423E+11 242 213 90160 0.00000E+00 3.82002E+11 204 185 + 89161 0.00000E+00 4.12759E+11 251 213 90161 0.00000E+00 3.86309E+11 208 186 + 89162 0.00000E+00 4.05202E+11 270 213 90162 0.00000E+00 3.86309E+11 217 186 + 89163 0.00000E+00 4.01423E+11 286 213 90163 0.00000E+00 3.97645E+11 222 186 + 89164 0.00000E+00 4.05202E+11 319 213 90164 0.00000E+00 3.90088E+11 209 187 + 89165 0.00000E+00 4.01423E+11 327 213 90165 0.00000E+00 4.01423E+11 207 188 + 89166 0.00000E+00 4.05202E+11 335 213 90166 0.00000E+00 4.00817E+11 196 189 + 89167 0.00000E+00 4.01423E+11 321 213 90167 0.00000E+00 3.93866E+11 190 190 + 89168 0.00000E+00 3.97645E+11 304 212 90168 0.00000E+00 3.93866E+11 188 190 + 89169 0.00000E+00 4.05202E+11 272 212 90169 0.00000E+00 3.86309E+11 170 190 + 89170 0.00000E+00 3.82531E+11 271 211 90170 0.00000E+00 3.63638E+11 164 190 + 89171 0.00000E+00 3.73481E+11 249 211 90171 0.00000E+00 3.59860E+11 161 190 + 89172 0.00000E+00 3.71195E+11 243 211 90172 0.00000E+00 3.56081E+11 156 190 + 89173 0.00000E+00 3.63638E+11 233 211 90173 0.00000E+00 3.44746E+11 145 190 + 89174 0.00000E+00 3.74974E+11 239 211 90174 0.00000E+00 3.30185E+11 139 190 + 89175 0.00000E+00 3.78752E+11 228 211 90175 0.00000E+00 3.22075E+11 144 189 + 89176 0.00000E+00 3.78752E+11 222 212 90176 0.00000E+00 3.25854E+11 149 189 + 89177 0.00000E+00 3.74974E+11 233 212 90177 0.00000E+00 3.33411E+11 155 188 + 89178 0.00000E+00 3.77915E+11 228 213 90178 0.00000E+00 3.59860E+11 173 187 + 89179 0.00000E+00 3.78752E+11 227 214 90179 0.00000E+00 3.59860E+11 188 186 + 89180 0.00000E+00 3.71195E+11 223 214 90180 0.00000E+00 3.63109E+11 211 184 + 89181 0.00000E+00 3.71195E+11 217 215 90181 0.00000E+00 3.71195E+11 227 183 + 89182 0.00000E+00 3.59860E+11 204 215 90182 0.00000E+00 3.75248E+11 248 182 + 89183 0.00000E+00 3.56081E+11 193 216 90183 0.00000E+00 3.75643E+11 268 182 + 89184 0.00000E+00 3.56081E+11 193 216 90184 0.00000E+00 3.74043E+11 254 181 + 89185 0.00000E+00 3.63638E+11 190 217 90185 0.00000E+00 3.71373E+11 238 181 + 89186 0.00000E+00 3.71195E+11 183 218 90186 0.00000E+00 3.68160E+11 232 181 + 89187 0.00000E+00 3.86309E+11 192 219 90187 0.00000E+00 3.64736E+11 222 181 + 89188 0.00000E+00 3.90088E+11 194 220 90188 0.00000E+00 3.61349E+11 216 182 + 89189 0.00000E+00 3.82531E+11 189 221 90189 0.00000E+00 3.58265E+11 190 182 + 89190 0.00000E+00 3.86401E+11 188 222 90190 0.00000E+00 3.55861E+11 171 184 + 89191 0.00000E+00 3.93866E+11 184 223 90191 0.00000E+00 3.54763E+11 164 185 + 89192 0.00000E+00 3.93866E+11 193 223 90192 0.00000E+00 3.56081E+11 160 187 + 89193 0.00000E+00 3.90088E+11 191 224 90193 0.00000E+00 3.59860E+11 161 189 + 89194 0.00000E+00 3.74974E+11 184 224 90194 0.00000E+00 3.61033E+11 162 191 + 89195 0.00000E+00 3.64961E+11 184 224 90195 0.00000E+00 3.59621E+11 155 193 + 89196 0.00000E+00 3.61439E+11 186 223 90196 0.00000E+00 3.56654E+11 149 196 + 89197 0.00000E+00 3.61552E+11 184 223 90197 0.00000E+00 3.52587E+11 147 197 + 89198 0.00000E+00 3.63787E+11 184 222 90198 0.00000E+00 3.47471E+11 148 199 + 89199 0.00000E+00 3.67417E+11 189 221 90199 0.00000E+00 3.40968E+11 145 200 + 89200 0.00000E+00 3.72074E+11 194 221 90200 0.00000E+00 3.33411E+11 145 201 + 89201 0.00000E+00 3.77142E+11 192 220 90201 0.00000E+00 3.29632E+11 154 201 + 89202 0.00000E+00 3.82002E+11 195 219 90202 0.00000E+00 3.34051E+11 159 201 + 89203 0.00000E+00 3.85956E+11 201 218 90203 0.00000E+00 3.40968E+11 166 201 + 89204 0.00000E+00 3.87974E+11 197 218 90204 0.00000E+00 3.44582E+11 180 200 + 89205 0.00000E+00 3.86309E+11 191 217 90205 0.00000E+00 3.46909E+11 187 199 + 89206 0.00000E+00 3.78752E+11 180 216 90206 0.00000E+00 3.51704E+11 214 199 + 89207 0.00000E+00 3.67417E+11 170 214 90207 0.00000E+00 3.63638E+11 210 198 + 89208 0.00000E+00 3.61801E+11 173 214 90208 0.00000E+00 3.78752E+11 197 198 + 89209 0.00000E+00 3.61312E+11 171 214 90209 0.00000E+00 3.71195E+11 193 198 + 89210 0.00000E+00 3.63555E+11 181 214 90210 0.00000E+00 3.71195E+11 180 198 + 89211 0.00000E+00 3.67143E+11 185 214 90211 0.00000E+00 3.71195E+11 188 198 + 89212 0.00000E+00 3.71189E+11 188 215 90212 0.00000E+00 3.71195E+11 183 198 + 89213 0.00000E+00 3.74974E+11 199 216 90213 0.00000E+00 3.72297E+11 199 198 + 89214 0.00000E+00 3.77944E+11 202 217 90214 0.00000E+00 3.73820E+11 209 198 + 89215 0.00000E+00 3.80318E+11 220 217 90215 0.00000E+00 3.75006E+11 192 199 + 89216 0.00000E+00 3.82356E+11 226 218 90216 0.00000E+00 3.74974E+11 191 200 + 89217 0.00000E+00 3.84195E+11 242 218 90217 0.00000E+00 3.73002E+11 181 200 + 89218 0.00000E+00 3.85898E+11 240 218 90218 0.00000E+00 3.70150E+11 175 201 + 89219 0.00000E+00 3.87479E+11 241 218 90219 0.00000E+00 3.67763E+11 172 201 + 89220 0.00000E+00 3.88906E+11 234 218 90220 0.00000E+00 3.67361E+11 185 202 + 89221 0.00000E+00 3.90088E+11 234 218 90221 0.00000E+00 3.71195E+11 183 202 + 89222 0.00000E+00 3.90945E+11 233 217 90222 0.00000E+00 3.80746E+11 186 202 + 89223 0.00000E+00 3.91681E+11 244 217 90223 0.00000E+00 3.90088E+11 187 201 + 89224 0.00000E+00 3.92553E+11 256 217 90224 0.00000E+00 3.93321E+11 188 200 + 89225 0.00000E+00 3.93866E+11 264 216 90225 0.00000E+00 3.92212E+11 193 200 + 89226 0.00000E+00 3.93866E+11 271 216 90226 0.00000E+00 3.89358E+11 188 199 + 89227 0.00000E+00 3.86544E+11 282 216 90227 0.00000E+00 3.86713E+11 200 198 + 89228 0.00000E+00 3.82531E+11 260 215 90228 0.00000E+00 3.86309E+11 211 198 + 89229 0.00000E+00 3.90088E+11 263 215 90229 0.00000E+00 3.90088E+11 228 197 + 89230 0.00000E+00 3.92895E+11 265 215 90230 0.00000E+00 3.97645E+11 246 196 + 89231 0.00000E+00 3.93866E+11 249 215 90231 0.00000E+00 4.01423E+11 268 196 + 89232 0.00000E+00 3.97645E+11 236 216 90232 0.00000E+00 3.90088E+11 289 196 + 89233 0.00000E+00 3.93866E+11 226 216 90233 0.00000E+00 4.08980E+11 298 196 + 89234 0.00000E+00 3.82531E+11 205 216 90234 0.00000E+00 4.12759E+11 323 196 + 89235 0.00000E+00 3.71195E+11 191 216 90235 0.00000E+00 4.08980E+11 323 196 + 89236 0.00000E+00 3.63638E+11 182 217 90236 0.00000E+00 4.05981E+11 329 196 + 89237 0.00000E+00 3.56081E+11 160 217 90237 0.00000E+00 4.01423E+11 304 197 + 89238 0.00000E+00 3.52303E+11 161 218 90238 0.00000E+00 3.92870E+11 285 197 + 89239 0.00000E+00 3.44746E+11 160 218 90239 0.00000E+00 3.84496E+11 269 197 + 89240 0.00000E+00 3.49271E+11 174 219 90240 0.00000E+00 3.82531E+11 250 198 + 89241 0.00000E+00 3.61449E+11 180 219 90241 0.00000E+00 3.90088E+11 225 198 + 89242 0.00000E+00 3.71195E+11 192 219 90242 0.00000E+00 3.93866E+11 210 198 + 89243 0.00000E+00 3.74974E+11 209 219 90243 0.00000E+00 3.86960E+11 183 199 + 89244 0.00000E+00 3.86309E+11 224 219 90244 0.00000E+00 3.75478E+11 171 199 + 89245 0.00000E+00 3.91019E+11 233 219 90245 0.00000E+00 3.67417E+11 169 199 + 89246 0.00000E+00 3.90088E+11 243 219 90246 0.00000E+00 3.68790E+11 163 200 + 89247 0.00000E+00 3.90088E+11 245 220 90247 0.00000E+00 3.75870E+11 158 200 + 89248 0.00000E+00 3.97645E+11 273 220 90248 0.00000E+00 3.83788E+11 158 200 + 89249 0.00000E+00 4.10343E+11 288 221 90249 0.00000E+00 3.87986E+11 158 200 + 89250 0.00000E+00 4.21724E+11 303 222 90250 0.00000E+00 3.82531E+11 165 200 + 89251 0.00000E+00 4.24094E+11 302 222 90251 0.00000E+00 3.67417E+11 164 201 + 89252 0.00000E+00 4.12759E+11 312 223 90252 0.00000E+00 3.67417E+11 170 201 + 89253 0.00000E+00 4.01423E+11 303 223 90253 0.00000E+00 3.74974E+11 171 201 + 89254 0.00000E+00 3.97645E+11 299 223 90254 0.00000E+00 3.71195E+11 181 201 + 89255 0.00000E+00 3.97176E+11 292 223 90255 0.00000E+00 3.82531E+11 193 201 + 89256 0.00000E+00 3.93866E+11 249 223 90256 0.00000E+00 3.90088E+11 198 200 + 89257 0.00000E+00 3.86309E+11 245 223 90257 0.00000E+00 3.93866E+11 209 200 + 89258 0.00000E+00 3.86309E+11 226 222 90258 0.00000E+00 3.93334E+11 207 200 + 89259 0.00000E+00 3.82896E+11 234 221 90259 0.00000E+00 3.89817E+11 205 199 + 89260 0.00000E+00 3.75061E+11 216 221 90260 0.00000E+00 3.85057E+11 211 199 + 89261 0.00000E+00 3.65111E+11 209 220 90261 0.00000E+00 3.80337E+11 208 199 + 89262 0.00000E+00 3.54570E+11 197 219 90262 0.00000E+00 3.76956E+11 214 198 + 89263 0.00000E+00 3.44746E+11 173 219 90263 0.00000E+00 3.76704E+11 204 198 + 89264 0.00000E+00 3.40968E+11 162 218 90264 0.00000E+00 3.82531E+11 203 197 + 89265 0.00000E+00 3.52303E+11 159 218 90265 0.00000E+00 3.95935E+11 195 197 + 89266 0.00000E+00 3.52324E+11 158 217 90266 0.00000E+00 4.06176E+11 185 196 + 89267 0.00000E+00 3.42796E+11 157 216 90267 0.00000E+00 3.97645E+11 179 196 + 89268 0.00000E+00 3.33296E+11 167 216 90268 0.00000E+00 3.67417E+11 167 195 + 89269 0.00000E+00 3.33411E+11 182 215 90269 0.00000E+00 3.63638E+11 160 195 + 89270 0.00000E+00 3.44746E+11 199 215 90270 0.00000E+00 3.74974E+11 153 194 + 89271 0.00000E+00 3.48525E+11 194 214 90271 0.00000E+00 3.71195E+11 152 194 + 89272 0.00000E+00 3.71195E+11 205 215 90272 0.00000E+00 3.63195E+11 150 193 + 89273 0.00000E+00 3.71195E+11 202 215 90273 0.00000E+00 3.55764E+11 158 192 + 89274 0.00000E+00 3.78752E+11 198 215 90274 0.00000E+00 3.49448E+11 161 191 + 89275 0.00000E+00 3.88044E+11 209 216 90275 0.00000E+00 3.45201E+11 163 189 + 89276 0.00000E+00 3.95179E+11 222 217 90276 0.00000E+00 3.44746E+11 177 188 + 89277 0.00000E+00 4.00360E+11 234 217 90277 0.00000E+00 3.48525E+11 187 186 + 89278 0.00000E+00 4.03065E+11 223 218 90278 0.00000E+00 3.52303E+11 170 184 + 89279 0.00000E+00 4.01861E+11 221 219 90279 0.00000E+00 3.59860E+11 170 184 + 89280 0.00000E+00 3.93866E+11 226 220 90280 0.00000E+00 3.59860E+11 169 183 + 89281 0.00000E+00 3.78752E+11 210 220 90281 0.00000E+00 3.67417E+11 176 182 + 89282 0.00000E+00 3.71195E+11 202 221 90282 0.00000E+00 3.63638E+11 184 182 + 89283 0.00000E+00 3.76711E+11 196 221 90283 0.00000E+00 3.56081E+11 195 182 + 89284 0.00000E+00 3.82531E+11 192 221 90284 0.00000E+00 3.74974E+11 205 182 + 89285 0.00000E+00 3.78752E+11 203 221 90285 0.00000E+00 3.67417E+11 201 182 + 89286 0.00000E+00 3.78752E+11 224 221 90286 0.00000E+00 3.74974E+11 209 182 + 89287 0.00000E+00 3.82531E+11 226 221 90287 0.00000E+00 3.82531E+11 221 182 + 89288 0.00000E+00 3.78752E+11 225 220 90288 0.00000E+00 3.86309E+11 232 182 + 89289 0.00000E+00 3.71195E+11 237 220 90289 0.00000E+00 3.82531E+11 225 182 + 89290 0.00000E+00 3.44746E+11 225 219 90290 0.00000E+00 3.90744E+11 194 182 + 89291 0.00000E+00 3.25567E+11 221 218 90291 0.00000E+00 4.01423E+11 198 182 + 89292 0.00000E+00 3.16274E+11 215 217 90292 0.00000E+00 3.93866E+11 214 182 + 89293 0.00000E+00 3.12514E+11 205 216 90293 0.00000E+00 3.67417E+11 202 182 + 89294 0.00000E+00 3.11977E+11 206 215 90294 0.00000E+00 3.86309E+11 189 182 + 89295 0.00000E+00 3.13543E+11 218 215 90295 0.00000E+00 3.78752E+11 168 182 + 89296 0.00000E+00 3.16871E+11 210 214 90296 0.00000E+00 3.82531E+11 164 182 + 89297 0.00000E+00 3.22271E+11 214 213 90297 0.00000E+00 3.78752E+11 158 182 + 89298 0.00000E+00 3.30817E+11 183 213 90298 0.00000E+00 3.78752E+11 162 182 + 89299 0.00000E+00 3.44746E+11 172 212 90299 0.00000E+00 3.50929E+11 154 182 + 89300 0.00000E+00 3.59860E+11 177 212 90300 0.00000E+00 3.33411E+11 163 182 + 89301 0.00000E+00 3.56081E+11 173 212 90301 0.00000E+00 3.52303E+11 151 182 + 89302 0.00000E+00 3.59860E+11 172 212 90302 0.00000E+00 3.33411E+11 156 182 + 89303 0.00000E+00 3.71195E+11 186 212 90303 0.00000E+00 3.29632E+11 151 182 + 89304 0.00000E+00 3.79465E+11 202 212 90304 0.00000E+00 3.24935E+11 142 183 + 89305 0.00000E+00 3.83297E+11 211 212 90305 0.00000E+00 3.16377E+11 142 183 + 89306 0.00000E+00 3.82531E+11 216 212 90306 0.00000E+00 3.11292E+11 139 183 + 89307 0.00000E+00 3.78752E+11 218 212 90307 0.00000E+00 3.18297E+11 150 184 + 89308 0.00000E+00 3.81546E+11 224 212 90308 0.00000E+00 3.40968E+11 155 184 + 89309 0.00000E+00 3.86309E+11 235 212 90309 0.00000E+00 3.57747E+11 170 184 + 89310 0.00000E+00 3.86528E+11 255 212 90310 0.00000E+00 3.67086E+11 196 185 + 89311 0.00000E+00 3.83340E+11 207 212 90311 0.00000E+00 3.72469E+11 214 185 + 89312 0.00000E+00 3.78917E+11 271 212 90312 0.00000E+00 3.75921E+11 212 186 + 89313 0.00000E+00 3.74974E+11 257 212 90313 0.00000E+00 3.78752E+11 201 186 + 89314 0.00000E+00 3.74974E+11 246 211 90314 0.00000E+00 3.78752E+11 191 187 + 89315 0.00000E+00 3.82531E+11 249 211 90315 0.00000E+00 3.71195E+11 195 187 + 89316 0.00000E+00 3.82006E+11 254 211 90316 0.00000E+00 3.78752E+11 191 187 + 89317 0.00000E+00 3.78752E+11 240 211 90317 0.00000E+00 3.86309E+11 182 187 + 89318 0.00000E+00 3.81583E+11 243 211 90318 0.00000E+00 3.82531E+11 198 187 + 89319 0.00000E+00 3.88080E+11 217 211 90319 0.00000E+00 3.59860E+11 207 187 + 89320 0.00000E+00 3.93866E+11 216 212 90320 0.00000E+00 3.67417E+11 207 188 + 89321 0.00000E+00 3.96066E+11 215 212 90321 0.00000E+00 3.59860E+11 217 188 + 89322 0.00000E+00 3.97645E+11 222 213 90322 0.00000E+00 3.59860E+11 199 188 + 89323 0.00000E+00 4.01847E+11 229 213 90323 0.00000E+00 3.63638E+11 191 188 + 89324 0.00000E+00 4.07780E+11 224 214 90324 0.00000E+00 3.51539E+11 187 188 + 89325 0.00000E+00 4.13935E+11 229 215 90325 0.00000E+00 3.40968E+11 178 188 + 89326 0.00000E+00 4.18883E+11 222 215 90326 0.00000E+00 3.48525E+11 177 185 + 89327 0.00000E+00 4.20754E+11 213 215 90327 0.00000E+00 3.52884E+11 172 185 + 89328 0.00000E+00 4.16537E+11 209 214 90328 0.00000E+00 3.49211E+11 167 184 + 89329 0.00000E+00 4.05202E+11 216 214 90329 0.00000E+00 3.37189E+11 162 184 + 89330 0.00000E+00 3.96722E+11 234 213 90330 0.00000E+00 3.19120E+11 153 183 + 89331 0.00000E+00 3.91778E+11 239 213 90331 0.00000E+00 3.18297E+11 155 183 + 89332 0.00000E+00 3.88774E+11 231 212 90332 0.00000E+00 3.44746E+11 167 183 + 89333 0.00000E+00 3.86830E+11 215 211 90333 0.00000E+00 3.44746E+11 163 183 + 89334 0.00000E+00 3.85459E+11 241 211 90334 0.00000E+00 3.40968E+11 170 182 + 89335 0.00000E+00 3.84388E+11 224 210 90335 0.00000E+00 3.48525E+11 173 182 + 89336 0.00000E+00 3.83450E+11 214 210 90336 0.00000E+00 3.63638E+11 178 182 + 89337 0.00000E+00 3.82531E+11 206 209 90337 0.00000E+00 3.71066E+11 188 183 + 89338 0.00000E+00 3.81527E+11 213 209 90338 0.00000E+00 3.74974E+11 199 183 + 89339 0.00000E+00 3.80328E+11 210 209 90339 0.00000E+00 3.82531E+11 207 183 + 89340 0.00000E+00 3.78752E+11 210 209 90340 0.00000E+00 3.90088E+11 221 183 + 89341 0.00000E+00 3.78752E+11 222 209 90341 0.00000E+00 3.90088E+11 222 184 + 89342 0.00000E+00 3.86309E+11 204 209 90342 0.00000E+00 3.97645E+11 224 184 + 89343 0.00000E+00 3.90088E+11 195 210 90343 0.00000E+00 3.93866E+11 230 184 + 89344 0.00000E+00 3.82187E+11 177 210 90344 0.00000E+00 8.40317E+10 233 185 + 89345 0.00000E+00 3.74974E+11 172 211 90345 0.00000E+00 8.40317E+10 233 185 + 89346 0.00000E+00 3.78752E+11 165 211 90346 0.00000E+00 8.40317E+10 228 186 + 89347 0.00000E+00 3.80193E+11 163 211 90347 0.00000E+00 8.40317E+10 220 186 + 89348 0.00000E+00 3.77931E+11 162 212 90348 0.00000E+00 8.40317E+10 195 186 + 89349 0.00000E+00 3.74363E+11 166 212 90349 0.00000E+00 8.40317E+10 193 187 + 89350 0.00000E+00 3.71404E+11 164 212 90350 0.00000E+00 8.40317E+10 186 187 + 89351 0.00000E+00 3.71195E+11 176 212 90351 0.00000E+00 8.40317E+10 193 187 + 89352 0.00000E+00 3.75562E+11 186 212 90352 0.00000E+00 8.40317E+10 202 186 + 89353 0.00000E+00 3.82606E+11 188 211 90353 0.00000E+00 8.40317E+10 191 186 + 89354 0.00000E+00 3.90088E+11 189 211 90354 0.00000E+00 8.40317E+10 182 186 + 89355 0.00000E+00 3.96400E+11 190 211 90355 0.00000E+00 8.40317E+10 186 186 + 89356 0.00000E+00 4.01423E+11 200 210 90356 0.00000E+00 8.40317E+10 178 185 + 89357 0.00000E+00 4.05226E+11 214 209 90357 0.00000E+00 8.40317E+10 186 185 + 89358 0.00000E+00 4.08226E+11 231 209 90358 0.00000E+00 8.40317E+10 185 185 + 89359 0.00000E+00 4.10739E+11 248 208 90359 0.00000E+00 8.40317E+10 185 185 + 89360 0.00000E+00 4.12900E+11 253 207 90360 0.00000E+00 8.40317E+10 188 185 + 89361 0.00000E+00 4.14717E+11 275 206 90361 0.00000E+00 8.40317E+10 192 184 + 89362 0.00000E+00 4.16066E+11 246 205 90362 0.00000E+00 8.40317E+10 192 184 + 89363 0.00000E+00 4.16655E+11 243 204 90363 0.00000E+00 8.40317E+10 196 184 + 89364 0.00000E+00 4.15909E+11 258 203 90364 0.00000E+00 8.40317E+10 190 184 + 89365 0.00000E+00 4.12759E+11 237 202 90365 0.00000E+00 8.40317E+10 181 183 diff --git a/EUV/euv91/euv91sub.for b/EUV/euv91/euv91sub.for new file mode 100755 index 0000000..acc02a0 --- /dev/null +++ b/EUV/euv91/euv91sub.for @@ -0,0 +1,392 @@ +C EUV91SUB.FOR ------------------------------------------------ Feb 6, 1992 +C +C Includes subroutines euv91, rddata, flux, getind and block data +C + subroutine euv91 +C********1*********2*********3*********4*********5*********6*********7** +C This program creates the solar EUV irradiance for 18-1050 A based +C on a multiple linear regression model for solar EUV flux. +C Reference: Tobiska, W.K., Revised solar extreme ultraviolet flux +C model, JATP, (accepted) 1991. The preprint was XXVIII +C COSPAR, The Hague, paper STP I.2-P1, 1990. (See accompanying file +C EUV91.TXT) +C Files required for model to run: +C euv91coef.txt = ASCII file of model coefficients +C euv91index2.dat = ASCII file of proxy values +C The model values produced in this program include: energy and +C photon flux for 39 EUV wavelength intervals or lines +C Files created by running this model: fyyddd.dat (ASCII) +C Note: DEC equipment requires IDINT function to be JINT +C +C W. Kent Tobiska Baseline version: 10-16-90 Rev: 4-30-91 +C ______________________________________________________________________ +C NSSDC --- NSSDC --- NSSDC --- NSSDC --- NSSDC --- NSSDC --- NSSDC ---- +C +C Adopted for NSSDC and distribution / Dieter Bilitza / NSSDC-Id: MS-13D +C 6/2/92 COMMON before DATA statements +C 6/2/92 units and dates in output file +C 6/2/92 get fname without do loop +C 6/2/92 BLOCK DATA statement for coefficients in RDDATA +C ______________________________________________________________________ +C********1*********2*********3*********4*********5*********6*********7** +C VARIABLES AND DEFINITIONS +C********1*********2*********3*********4*********5*********6*********7** +C i,j,num,sign loop and index control +C frcnum,frcsin decade counter +C expont flag for 2 digit ASCII exponent characters +C expsin,expnum sign and number of exponent (ASCII chars) +C yyddd date in YYDDD format +C numday number of days for calculating flux +C fname filename for flux data file +C c floating point array (12,52) of model coefficients +C number temporary number constructed from ASCII coef file +C indice floating point array (10,3750) of proxy values +C sumflx temporary variable for summing photon flux +C Eflux energy flux vector (39) +C Pflux photon flux vector (39) +C date date +C model model photon flux vector (52) +C W missing data scaling function vector (52) +C S missing data step function vector (4) +C line1 character string for ASCII line +C line2 character string for ASCII line +C w1 beginning wavelengths vector (39) +C w2 ending wavelengths vector (39) +C wave average wavelengths vector (39) +C itemp temporary vector (6) +C temp temporary vector (6) +C row loop control for indices row number on a date +C colum loop control for indices column number on a date +C********1*********2*********3*********4*********5*********6*********7** +C implicit none + integer yyddd,i,j,numday,num + real c(12,52),indice(10,3750),S(4),w1(39),w2(39) + real date,Eflux(39),Pflux(39),wave(39) + character*10 fname + common /coeff/ c,indice,date,wave,w1,w2,S,Eflux,Pflux + data numday /1/ +C data fname(1:1),fname(7:10) /'f','.dat'/ + +C********1*********2*********3*********4*********5*********6*********7** +C Initialize variables +C********1*********2*********3*********4*********5*********6*********7** + write (*,*) ' Reading the coefficient and indices tables' + call rddata + write (*,'(A,$)') ' Enter YYDDD date between 68172 - 88366: ' + read (*,'(I5)') yyddd + write (*,'(A,I5,A,$)') ' Enter # of days including ',yyddd,': ' + read (*,'(I)') numday + date = real(yyddd) + +C********1*********2*********3*********4*********5*********6*********7** +C Calculate the flux for each day by first determining the date +C and proxy values for that date then calculating the flux. +C********1*********2*********3*********4*********5*********6*********7** + do 10 i=0,numday-1 + date = real(yyddd+i) + call getind + call flux + write(fname,1041) yyddd+i +1041 format('f',i5,'.dat') +c do 20 j=1,5 +c num = jint(date*(10.**(j-5)))-jint(date*(10.**(j-6)))*10 +c fname(j+1:j+1) = char(num+ichar('0')) +c20 continue + +C********1*********2*********3*********4*********5*********6*********7** +C Write the results to an output file +C********1*********2*********3*********4*********5*********6*********7** + + open(unit=3,file=fname,status='unknown',form='formatted') + do 30 io=3,6,3 + write (io,*) ' EUV 91 (4/30/91) Date:',yyddd+i + write (io,*) ' Wavelength Photon flux Energy flux' + write (io,*) ' Angstrom cm-2 s-1 erg cm-2 s-1' + do 30 j=1,39 + write(io,'(x,2(F7.2,x),2x,2(E9.3,8x))') + 1 w1(j),w2(j),Pflux(j),Eflux(j) +30 continue + close(unit=3) +10 continue + end +C +C + subroutine rddata +C********1*********2*********3*********4*********5*********6*********7** +C This subroutine reads in the coefficients and indices into the +C common block COEFF. It may seem awkward; however, it is useful +C to keep the coefficient and indices ASCII files in their +C present format for easy transfer to other users. +C********1*********2*********3*********4*********5*********6*********7** +C implicit none + integer i,j,num,sign,itemp(6) + integer expsin,expnum,frcsin,frcnum + real c(12,52),indice(10,3750),S(4),temp(6),number + real date,Eflux(39),Pflux(39) + real w1(39),w2(39),wave(39) + character*1 expont + character*80 line1,line2 + common /coeff/ c,indice,date,wave,w1,w2,S,Eflux,Pflux +C********1*********2*********3*********4*********5*********6*********7** +C Get average wavelength and read in the coefficients +C********1*********2*********3*********4*********5*********6*********7** + do 10 i = 1,39 + wave(i) = (w1(i)+w2(i))/2. +10 continue + + open (unit=1,file='euv91coe.txt',status='old',form='formatted') + do 20 i = 1,3 + read(1,'(A)') line1 +20 continue +C + do 30 i = 1,52 + frcnum = 0 + frcsin = 1 + expont = 'n' + expnum = 0 + expsin = 1 + num = 0 + number = 0. + sign = 1 + read (1,3311) itemp(1),itemp(2),itemp(3),c(4,i),line2 +3311 format(I4,1x,I4,1x,I1,1x,G12.5E4,1x,A51) + c(1,i) = dble(itemp(1)) + c(2,i) = dble(itemp(2)) + c(3,i) = dble(itemp(3)) + do 40 j = 1,51 + if (line2(j:j) .ne. ' ') then + if (line2(j:j) .eq. '-') then + if (j .eq. 1) then + sign = -1 + else if (line2(j-1:j-1) .eq. ' ') then + sign = -1 + else if (expont .eq. 'y') then + expsin = -1 + endif + else if (line2(j:j) .eq. '.') then + frcsin = -1 + frcnum = 1 + else if (expont .eq. 'y') then + if (line2(j:j) .eq. '+') then + expsin = 1 + else if (line2(j:j) .eq. '0') then + continue + else if (line2(j:j) .ne. '-') then + expnum = ichar(line2(j:j))-ichar('0') + endif + else if (line2(j:j) .eq. 'e') then + expont = 'y' + else + if (frcsin .eq. -1) then + number = (ichar(line2(j:j))-ichar('0')) * + 1 (10.**(frcsin*frcnum)) + number + frcnum = frcnum+1 + else if (frcsin .eq. 1) then + number = (ichar(line2(j:j))-ichar('0')) + + 1 (10.**(frcsin*frcnum)) * number + frcnum = 1 + endif + endif + else + c(5+num,i) = sign*number*(10.**(expsin*expnum)) + num = num+1 + frcnum = 0 + frcsin = 1 + number = 0. + sign = 1 + expont = 'n' + expnum = 0 + expsin = 1 + if (num .eq. 8) goto 30 + endif +40 continue +30 continue + close (unit=1) +C +C********1*********2*********3*********4*********5*********6*********7** +C Read in the indices +C********1*********2*********3*********4*********5*********6*********7** + open(unit=2,file='euv91ix2.dat',status='old',form='formatted') + do 50 i = 1,2 + read(2,'(A)') line1 +50 continue + do 60 i = 1,3750 + read (2,4455) itemp(1),indice(2,i),indice(3,i),itemp(2), + 3 itemp(3),itemp(4),indice(7,i),indice(8,i),itemp(5),itemp(6) +4455 format(1x,I5,2(1x,G11.5E4),2I4,3x,I5,2(1x,G11.5E4),2I4) + indice( 1,i) = dble(itemp(1)) + indice( 4,i) = dble(itemp(2)) + indice( 5,i) = dble(itemp(3)) + indice( 6,i) = dble(itemp(4)) + indice( 9,i) = dble(itemp(5)) + indice(10,i) = dble(itemp(6)) +60 continue + close (unit=2) + + return + end +C +C + subroutine flux +C********1*********2*********3*********4*********5*********6*********7** +C This subroutine uses the coefficients and indices in the +C common block COEFF to calculate the EUV energy flux for a date. +C For mid 1968 through early 1977 when neither Lyman alpha nor +C He I 10830 were present, the model calculates the chromospheric +C emission using F10.7 linear relationship with Lyman alpha based +C upon Barth et al., GRL, 17, 571-574, 1990. +C********1*********2*********3*********4*********5*********6*********7** +C implicit none + integer i,j + real c(12,52),indice(10,3750),sumflx,Eflux(39) + real Pflux(39),wave(39),w1(39),w2(39) + real date,model(52),W(52),S(4),near0 + common /coeff/ c,indice,date,wave,w1,w2,S,Eflux,Pflux + data W,model,sumflx,near0 /52*1.,52*0.,0.,1.e-5/ + +C********1*********2*********3*********4*********5*********6*********7** +C Replace the missing proxies on a date with surrogate value +C********1*********2*********3*********4*********5*********6*********7** + if ((S(1) .lt. near0).and.(S(2) .gt. near0)) S(1) = S(2) + if (S(1) .lt. near0) S(1) = (8.7e8)*S(3) + 1.9e11 + if (S(2) .lt. near0) S(2) = S(1) + +C********1*********2*********3*********4*********5*********6*********7** +C Create the empirically modeled flux from Equations 3, 4, 5 in +C JATP paper. Note that the "W" scaling function is now unused +C and all elements are set to 1. in this version. +C********1*********2*********3*********4*********5*********6*********7** + argmax=88.0 + do 10 j=1,52 + sumflx = 0. + do 20 i=1,4 + if (i .le. 2) exparg = -S(i)*1.e-10 + if (i .gt. 2) exparg = -S(i)*.7 + if (exparg .lt. -argmax) exparg=-argmax + W(j) = (1.+c(8+i,j)*exp(exparg))*W(j) + sumflx = c(i+4,j)*S(i) + sumflx +20 continue + model(j) = (c(4,j) + sumflx) * W(j) +10 continue +C +C********1*********2*********3*********4*********5*********6*********7** +C Combine the chromospheric and coronal flux into intervals +C********1*********2*********3*********4*********5*********6*********7** + Pflux( 1)=model( 1) + Pflux( 2)=model( 2)+model( 3) + Pflux( 3)=model( 4)+model( 5) + Pflux( 4)=model( 6)+model( 7) + Pflux( 5)=model( 8)+model( 9) + Pflux( 6)=model(10)+model(11) + Pflux( 7)=model(12) + Pflux( 8)=model(13) + Pflux( 9)=model(14)+model(15) + Pflux(10)=model(16) + Pflux(11)=model(17) + Pflux(12)=model(18) + Pflux(13)=model(19) + Pflux(14)=model(20)+model(21) + Pflux(15)=model(22)+model(23) + Pflux(16)=model(24) + Pflux(17)=model(25)+model(26) + Pflux(18)=model(27)+model(28) + Pflux(19)=model(29) + Pflux(20)=model(30) + Pflux(21)=model(31) + Pflux(22)=model(32) + Pflux(23)=model(33) + Pflux(24)=model(34)+model(35) + Pflux(25)=model(36)+model(37) + Pflux(26)=model(38) + Pflux(27)=model(39) + Pflux(28)=model(40) + Pflux(29)=model(41) + Pflux(30)=model(42) + Pflux(31)=model(43)+model(44) + Pflux(32)=model(45) + Pflux(33)=model(46) + Pflux(34)=model(47) + Pflux(35)=model(48) + Pflux(36)=model(49) + Pflux(37)=model(50) + Pflux(38)=model(51) + Pflux(39)=model(52) + +C********1*********2*********3*********4*********5*********6*********7** +C Make an energy flux from the photon flux +C********1*********2*********3*********4*********5*********6*********7** + do 30 i=1,39 + Eflux(i) = Pflux(i)*(12400.*1.6022e-12)/wave(i) +30 continue + + return + end +C +C + subroutine getind +C********1*********2*********3*********4*********5*********6*********7** +C This subroutine gets the row and column indicators for a given +C date. +C********1*********2*********3*********4*********5*********6*********7** +C implicit none + integer i,row,colum + real c(12,52),indice(10,3750),Eflux(39) + real Pflux(39),wave(39),w1(39),w2(39),date,S(4) + common /coeff/ c,indice,date,wave,w1,w2,S,Eflux,Pflux + +C********1*********2*********3*********4*********5*********6*********7** +C Find the row and column numbers for indices on a given date then +C place the proxy values for that date into "S" variable. Stop on +C invalid date. +C********1*********2*********3*********4*********5*********6*********7** + do 10 i=1,3750 + if (ifix(date) .eq. ifix(indice(1,i))) then + row = i + colum = 1 + goto 20 + else if (ifix(date) .eq. ifix(indice(6,i))) then + row = i + colum = 6 + goto 20 + endif +10 continue + +20 continue + S(1) = indice(colum+1,row) + S(2) = indice(colum+2,row) + S(3) = indice(colum+3,row) + S(4) = indice(colum+4,row) + + if (ifix(date) .ne. ifix(indice(colum,row))) then + write(*,*) ' Invalid date - program terminated' + stop + endif + + return + end +C +C + BLOCK DATA + real c(12,52),indice(10,3750),S(4) + real date,Eflux(39),Pflux(39) + real w1(39),w2(39),wave(39) + common /coeff/ c,indice,date,wave,w1,w2,S,Eflux,Pflux +C********1*********2*********3*********4*********5*********6*********7** +C Default wavelength lines and intervals +C********1*********2*********3*********4*********5*********6*********7** + data w1 /18.62,30.02,50.52,100.54,150.10,200.02, + 1 256.32,284.15,251.10,303.31,303.78,303.31, + 2 368.07,356.01,401.14,465.22,453.00,500.00, + 3 554.37,584.33,554.37,609.76,629.73,609.76, + 4 650.30,703.36,701.00,765.15,770.41,787.71, + 5 750.01,801.00,851.00,901.00,977.02,951.00, + 6 1025.72,1031.91,1001.00/ + data w2 /29.52,49.22,99.99,148.40,198.58,249.18, + 1 256.32,284.15,299.50,303.31,303.78,349.85, + 2 368.07,399.82,436.70,465.22,499.37,550.00, + 3 554.37,584.33,599.60,609.76,629.73,644.10, + 4 700.00,703.36,750.00,765.15,770.41,790.15, + 5 800.00,850.00,900.00,950.00,977.02,1000.00, + 6 1025.72,1031.91,1050.00/ + + end diff --git a/EUV/euv91/f80183.dat b/EUV/euv91/f80183.dat new file mode 100755 index 0000000..5e56eb9 --- /dev/null +++ b/EUV/euv91/f80183.dat @@ -0,0 +1,43 @@ + + EUV 91 (4/30/91) Date: 80183 + Wavelength Photon flux Energy flux + Angstrom cm-2 s-1 erg cm-2 s-1 + 18.62 29.52 0.539E+08 0.445E-01 + 30.02 49.22 0.117E+09 0.588E-01 + 50.52 99.99 0.131E+10 0.346E+00 + 100.54 148.40 0.379E+09 0.605E-01 + 150.10 198.58 0.588E+10 0.670E+00 + 200.02 249.18 0.455E+10 0.402E+00 + 256.32 256.32 0.608E+09 0.471E-01 + 284.15 284.15 0.255E+10 0.178E+00 + 251.10 299.50 0.673E+10 0.486E+00 + 303.31 303.31 0.197E+10 0.129E+00 + 303.78 303.78 0.896E+10 0.586E+00 + 303.31 349.85 0.821E+10 0.500E+00 + 368.07 368.07 0.107E+10 0.579E-01 + 356.01 399.82 0.422E+10 0.222E+00 + 401.14 436.70 0.117E+10 0.555E-01 + 465.22 465.22 0.297E+09 0.127E-01 + 453.00 499.37 0.255E+10 0.106E+00 + 500.00 550.00 0.192E+10 0.728E-01 + 554.37 554.37 0.662E+09 0.237E-01 + 584.33 584.33 0.354E+10 0.120E+00 + 554.37 599.60 0.298E+10 0.103E+00 + 609.76 609.76 0.115E+10 0.374E-01 + 629.73 629.73 0.235E+10 0.740E-01 + 609.76 644.10 0.252E+10 0.798E-01 + 650.30 700.00 0.575E+09 0.169E-01 + 703.36 703.36 0.468E+09 0.132E-01 + 701.00 750.00 0.312E+09 0.856E-02 + 765.15 765.15 0.338E+09 0.878E-02 + 770.41 770.41 0.470E+09 0.121E-01 + 787.71 790.15 0.117E+10 0.296E-01 + 750.01 800.00 0.210E+10 0.538E-01 + 801.00 850.00 0.368E+10 0.885E-01 + 851.00 900.00 0.944E+10 0.214E+00 + 901.00 950.00 0.862E+10 0.185E+00 + 977.02 977.02 0.107E+11 0.218E+00 + 951.00 1000.00 0.327E+10 0.666E-01 +1025.72 1025.72 0.123E+11 0.239E+00 +1031.91 1031.91 0.800E+10 0.154E+00 +1001.00 1050.00 0.677E+10 0.131E+00 \ No newline at end of file diff --git a/EUV/euv91/serfd.for b/EUV/euv91/serfd.for new file mode 100755 index 0000000..a9aed8b --- /dev/null +++ b/EUV/euv91/serfd.for @@ -0,0 +1,87 @@ +C SERFD.FOR -------------------------------------------- Feb 92 +C +C ******************************************************************* +C +C interactive driver for SERF2 EUV model program EUV91 +C calls subroutines rddata, getind, and flux +C +C ******************************************************************* +C + integer*4 yyddd,i,j,iselect,io,istatus + real*4 c(12,52),indices(10,3750),S(4),w1(39),w2(39) + real*4 date,Eflux(39),Pflux(39),wave(39) + real*4 aunit(5),unit,outa(39) + character*10 fname + character*11 tab1(5),ttab1 + character*12 tab2(5),ttab2 + common /coeff/ c,indices,date,wave,w1,w2,S,Eflux,Pflux + data fname(1:1),fname(7:10) /'f','.dat'/ + data aunit /1.,1.e-4,1.,1.e+3,1.6022E-12/ + data tab1 /'Photon flux','Photon flux','Energy flux', + 1 'Energy flux','Energy flux'/ + data tab2 /' cm-2 s-1 ',' m-2 s-1 ', + 1 'erg cm-2 s-1',' J m-2 s-1 ',' eV cm-2 s-1'/ + + write (*,*) ' Reading the coefficient and indices tables' + call rddata + idbeg=int(indices(1,1)) + idend=int(indices(6,3750)) +1234 write (6,7789) idbeg,idend +7789 format(' Enter YYDDD date between',I6,' -',I6,' > ') + read (*,'(I5)') yyddd + if((yyddd.lt.idbeg).or.(yyddd.gt.idend)) then + write(6,6677) +6677 format(1x,'Unvalid entry, please try again'/) + goto 1234 + endif + date = real(yyddd) + + write (*,*) ' EUV/Dec/91: Calculating the flux' + date = real(yyddd) + call getind + call flux +1235 write (*,*) ' Output options: enter selection number' + write (*,*) ' 1 = photon flux [cm-2 s-1] 2 = [m-2 s-1]' + write (*,*) ' 3 = energy flux [erg cm-2 s-1] 4 = [J m-2 s-1]' + write (*,*) ' 5 = energy flux [eV cm-2 s-1]' + write (*,*) '>' + read (*,*) iselect + unit=1./aunit(iselect) + ttab1=tab1(iselect) + ttab2=tab2(iselect) + do 2331 i=1,39 + if(iselect.lt.3) then + outa(i) = Pflux(i) * unit + else + outa(i) = Eflux(i) * unit + endif +2331 continue + io=6 + write (io,1000) ttab1,ttab1,ttab2,ttab2 +1000 format(4x,'Wavelength',4x,a11,7x,'Wavelength',4x,a11/ + 1 4x,' Angstrom ',3x,a12,7x,' Angstrom ',3x,a12) + do 1122 j=1,19 +1122 write(io,5566) w1(j),w2(j),outa(j),w1(j+20),w2(j+20), + 1 outa(j+20) +5566 format(1x,2(F7.2,1x),2x,E9.3,5x,2(F7.2,1x),2x,E9.3) + write(io,2001) w1(20),w2(20),outa(20),yyddd +2001 format(1x,2(F7.2,1x),2x,E9.3,3x,'<<< EUV91 >>>', + 1 4x,'Date:',i5) + if(io.eq.3) then + close(unit=3) + io=6 + endif +1236 write(*,*) 'Change - 1 Store - 2 New date - 3 Exit - 4 >' + read(*,*) istatus + if(istatus.eq.1) goto 1235 + if(istatus.eq.2) then + write(fname,1041) yyddd+i +1041 format('f',i5,'.dat') + open(unit=3,file=fname,status='unknown',form='formatted') + io=3 + write(6,1001) fname +1001 format(' Storing last output table in file ',a10) + goto 1236 + endif + if(istatus.eq.3) goto 1234 + end diff --git a/EUV/euv91/update.log b/EUV/euv91/update.log new file mode 100755 index 0000000..613418e --- /dev/null +++ b/EUV/euv91/update.log @@ -0,0 +1,148 @@ +________________________________________________________________________ + +From: Kent Tobiska (ktobiska@gllsvc.jpl.nasa.gov) 11-AUG-1995 + +RE: EUV94X model + +A revised version EUV95X is preparation but has not been officially +released yet. Please contact the model author directly to get more +information and updated files. + +________________________________________________________________________ + +From: Kent Tobiska 11 Jun 91 12:19:56 PDT + + 8 files for the solar EUV91 model: + +1) EUV91.DOC (this file), +2) EUV91.TXT (text file which is the same as the JATP journal article), +3) EUV91COEF.TXT (table of coefficients for the model), +4) EUV91.FOR (FORTRAN 77 code), +5) EUV91.PRO (IDL code), +6) EUV91INDEX1.DAT (data file: date, Lyman-alpha, He I 10,830, F10.7, + F10.7 81-day mean values for 47001-68172). +7) EUV91INDEX2.DAT (data file: date, Lyman-alpha, He I 10,830, F10.7, + F10.7 81-day mean values for 68173-88366). +8) EUV91INDEX3.DAT (data file: date, Lyman-alpha, He I 10,830, F10.7, + F10.7 81-day mean values for 89001-90365). + + The fortran version works identically with the IDL version +and has been tested on maximum, moderate, and minimum solar condition +cases (79050, 83138, 86190). The cases of no Lyman-alpha or He I data +(where F10.7 proxy is substituted, eg 74001) and the case of column change +for consecutive dates in the index file (78268 to 78269) has also been tested. +The fortran version generates some floating point underflow errors +on some occasions (ignore these) when it takes exponents of very small +numbers (used in the W scaling function). In these cases, the result +is still valid - i.e. the number "0" is obtained. If these are worrisome +to the user, the 2 lines of code using this exponentiation in SUBROUTINE +FLUX "do 20" loop, "W(j) = ..." can be commented out since W(j) is +set to 1.0 by default. + + Single date fluxes or consecutive date fluxes can be generated. +For each day, a file using that day (in YYDDD format) in the filename is +created in the default directory. + + Best wishes for successful modeling using this empirical EUV! +Contact for questions: + + W. Kent Tobiska + Space Sciences Laboratory + University of California + Berkeley, CA 94720 + (415) 642-3645 (FAX) (415) 643-7629 + (SPAN) UCBSP::KENT or (BITNET) kent@ssl.berkeley.edu +___________________________________________________________________________ + +Revision history: + 1) The originally revised SERF2 model was completed on June 6, 1990. + The model as it exists in the JATP preprint reflects this + version of the model. + 2) Three minor revisions were incorporated into the model on + April 18, 1991. They are: a) inclusion of the June 20, 1989 LASP + rocket flight data into the model as released by Tom Woods + (private communication); b) elimination of the use of the "W(i)" + scaling function and replacement of it by creating a missing + daily value of a proxy with the linear relationship to another + similar solar source region proxy; and c) removal of the + "discontinuity" in chromospheric model values on day 281, + 1981 (October 8, 1981) which corresponds to the date that two + proxies (Lyman-alpha and He I 10830) were jointly used in the + model (prior to this date, there was a scaling of He I with the + "W" function). The net effect of these revisions is to change + the coefficients in the table EUV91COEF.TXT. The model was + slightly improved with the elimination of the day 81281 + "discontinuity" and slightly different (generally higher) model + flux values from the June 1990 version. The model as it exists + in the JATP published article reflects this version of the model. + 3) Revisions to the EUV91.FOR code for use on PCs include: + a) all subroutine and variable names 6 characters maximum + b) machine-dependent default variable declarations used + c) "if" statements no longer test real-valued equalities + d) "do" loops now use labeled "continue" and not "end do" + e) once the number of coefficients totals 8 from a line read + in, the loop is exited in SUBROUTINE RDDATA to avoid + any trailing blank problems. +_____________________________________________________________________________ + +From: STAR::"@nettlerash.berkeley.edu:kent@ssl.Berkeley.Edu" + 19-DEC-1991 06:58:30.69 + +Dear Colleague, + + The next E-mail message contains the updated table of +model coefficients for the empirical solar EUV model, EUV91, which +you have. If you need a new Fortran 77 or IDL version of the model, +please let me know. + + These coefficients have been slightly revised from the +published version in JATP (1991). Particularly, the Lyman-beta and +C III lines have higher absolute intensities than the previous model +version and will affect E-region ionization modeling. These new model +results were presented at the fall '91 AGU meeting and a paper summary +of those results are available if you are interested. + + The FUV irradiances in the model are being developed and +some preliminary results were shown at AGU. However, these values +are still being studied for consistency with published data and +are not yet available for release. Over the next year I hope to +have several of the important lines and intervals available (eg +1304) and, additionally, hope to have made improvements in the +estimation of the soft x-rays based on some new datasets now +becoming available. + + Finally, I will be leaving the University of California at +Berkeley on December 31, 1991 and will be going to JPL to work +with the Galileo UVS science team on a permanent basis. My mail +and e-mail addresses will both change. However, e-mail which +is sent to ZODIAC::TOBISKA will be forwarded to me. + + Seasons greetings! + + Kent Tobiska + + +ref: Tobiska, W.K., Revised Solar Extreme Ultraviolet Flux Model, + JATP, in press, 1991. Also given as poster paper I.2-P1 at the + XXVIII COSPAR, The Hague, 1990. Preprints available from author + at Space Sciences Lab, Univ. of Cal., Berkeley, CA 94720, USA. + + +Changes in EUV91COEF.TXT file: + +b1 through b4 are set to 0 in this revision (Apr 12 1991) + +The following intervals and lines have been slightly revised due to +reprocessing of the LASP 1989 data and incorporation of the smaller, +"nonstandard" lines into the wavelength range flux (Sep 4 1991): + 356-400(2), 401-437(2), 453-499(2), 500-550(1,2), 701-750(1), + 750-800(1,2), 801-850(1), 901-950(1), 977(1), 951-1000(1), + 1026(1), 1001-1050(1) +Far UV lines and intervals were added solely based on the SME data. +_______________________________________________________________________ + +Dieter Bilitza March 5, 1992 + +Several changes were made to produce a version which can run on a +IBM compatible PC. +_______________________________________________________________________ diff --git a/EUV/euv91/update.log.bak b/EUV/euv91/update.log.bak new file mode 100755 index 0000000..a90d9f3 --- /dev/null +++ b/EUV/euv91/update.log.bak @@ -0,0 +1,136 @@ +From: Kent Tobiska 11 Jun 91 12:19:56 PDT + + 8 files for the solar EUV91 model: + +1) EUV91.DOC (this file), +2) EUV91.TXT (text file which is the same as the JATP journal article), +3) EUV91COEF.TXT (table of coefficients for the model), +4) EUV91.FOR (FORTRAN 77 code), +5) EUV91.PRO (IDL code), +6) EUV91INDEX1.DAT (data file: date, Lyman-alpha, He I 10,830, F10.7, + F10.7 81-day mean values for 47001-68172). +7) EUV91INDEX2.DAT (data file: date, Lyman-alpha, He I 10,830, F10.7, + F10.7 81-day mean values for 68173-88366). +8) EUV91INDEX3.DAT (data file: date, Lyman-alpha, He I 10,830, F10.7, + F10.7 81-day mean values for 89001-90365). + + The fortran version works identically with the IDL version +and has been tested on maximum, moderate, and minimum solar condition +cases (79050, 83138, 86190). The cases of no Lyman-alpha or He I data +(where F10.7 proxy is substituted, eg 74001) and the case of column change +for consecutive dates in the index file (78268 to 78269) has also been tested. +The fortran version generates some floating point underflow errors +on some occasions (ignore these) when it takes exponents of very small +numbers (used in the W scaling function). In these cases, the result +is still valid - i.e. the number "0" is obtained. If these are worrisome +to the user, the 2 lines of code using this exponentiation in SUBROUTINE +FLUX "do 20" loop, "W(j) = ..." can be commented out since W(j) is +set to 1.0 by default. + + Single date fluxes or consecutive date fluxes can be generated. +For each day, a file using that day (in YYDDD format) in the filename is +created in the default directory. + + Best wishes for successful modeling using this empirical EUV! +Contact for questions: + + W. Kent Tobiska + Space Sciences Laboratory + University of California + Berkeley, CA 94720 + (415) 642-3645 (FAX) (415) 643-7629 + (SPAN) UCBSP::KENT or (BITNET) kent@ssl.berkeley.edu +___________________________________________________________________________ + +Revision history: + 1) The originally revised SERF2 model was completed on June 6, 1990. + The model as it exists in the JATP preprint reflects this + version of the model. + 2) Three minor revisions were incorporated into the model on + April 18, 1991. They are: a) inclusion of the June 20, 1989 LASP + rocket flight data into the model as released by Tom Woods + (private communication); b) elimination of the use of the "W(i)" + scaling function and replacement of it by creating a missing + daily value of a proxy with the linear relationship to another + similar solar source region proxy; and c) removal of the + "discontinuity" in chromospheric model values on day 281, + 1981 (October 8, 1981) which corresponds to the date that two + proxies (Lyman-alpha and He I 10830) were jointly used in the + model (prior to this date, there was a scaling of He I with the + "W" function). The net effect of these revisions is to change + the coefficients in the table EUV91COEF.TXT. The model was + slightly improved with the elimination of the day 81281 + "discontinuity" and slightly different (generally higher) model + flux values from the June 1990 version. The model as it exists + in the JATP published article reflects this version of the model. + 3) Revisions to the EUV91.FOR code for use on PCs include: + a) all subroutine and variable names 6 characters maximum + b) machine-dependent default variable declarations used + c) "if" statements no longer test real-valued equalities + d) "do" loops now use labeled "continue" and not "end do" + e) once the number of coefficients totals 8 from a line read + in, the loop is exited in SUBROUTINE RDDATA to avoid + any trailing blank problems. +_____________________________________________________________________________ + +From: STAR::"@nettlerash.berkeley.edu:kent@ssl.Berkeley.Edu" + 19-DEC-1991 06:58:30.69 + +Dear Colleague, + + The next E-mail message contains the updated table of +model coefficients for the empirical solar EUV model, EUV91, which +you have. If you need a new Fortran 77 or IDL version of the model, +please let me know. + + These coefficients have been slightly revised from the +published version in JATP (1991). Particularly, the Lyman-beta and +C III lines have higher absolute intensities than the previous model +version and will affect E-region ionization modeling. These new model +results were presented at the fall '91 AGU meeting and a paper summary +of those results are available if you are interested. + + The FUV irradiances in the model are being developed and +some preliminary results were shown at AGU. However, these values +are still being studied for consistency with published data and +are not yet available for release. Over the next year I hope to +have several of the important lines and intervals available (eg +1304) and, additionally, hope to have made improvements in the +estimation of the soft x-rays based on some new datasets now +becoming available. + + Finally, I will be leaving the University of California at +Berkeley on December 31, 1991 and will be going to JPL to work +with the Galileo UVS science team on a permanent basis. My mail +and e-mail addresses will both change. However, e-mail which +is sent to ZODIAC::TOBISKA will be forwarded to me. + + Seasons greetings! + + Kent Tobiska + + +ref: Tobiska, W.K., Revised Solar Extreme Ultraviolet Flux Model, + JATP, in press, 1991. Also given as poster paper I.2-P1 at the + XXVIII COSPAR, The Hague, 1990. Preprints available from author + at Space Sciences Lab, Univ. of Cal., Berkeley, CA 94720, USA. + + +Changes in EUV91COEF.TXT file: + +b1 through b4 are set to 0 in this revision (Apr 12 1991) + +The following intervals and lines have been slightly revised due to +reprocessing of the LASP 1989 data and incorporation of the smaller, +"nonstandard" lines into the wavelength range flux (Sep 4 1991): + 356-400(2), 401-437(2), 453-499(2), 500-550(1,2), 701-750(1), + 750-800(1,2), 801-850(1), 901-950(1), 977(1), 951-1000(1), + 1026(1), 1001-1050(1) +Far UV lines and intervals were added solely based on the SME data. +_______________________________________________________________________ + +Dieter Bilitza March 5, 1992 + +Several changes were made to produce a version which can run on a +IBM compatible PC. +_______________________________________________________________________ diff --git a/EUV/euvac/aareadme.doc b/EUV/euvac/aareadme.doc new file mode 100755 index 0000000..5eb1129 --- /dev/null +++ b/EUV/euvac/aareadme.doc @@ -0,0 +1,36 @@ +Model Name: EUVAC + +Model Author: P.G. Richards, + Computer Sciences Department and Center for Space + Plasma and Aeronomic Research + University of Alabama + Huntsville, AL 35899 + (richards@cs.uah.edu) + +Parameter: Solar EUV photon fluxes + +Brief Description: + +EUVAC is a solar EUV flux model for aeronomic calculations +developed by P.G. Richards and colleagues at the University +of Alabama in Huntsville. The model is based on the F74113 +solar EUV reference spectrum (see AE-EUV directory). It uses +the F10.7 index for modeling the solar flux variation in the 37 +wavelength groups that are most important for aeronomic computations. +Photoelectron fluxes calculated with the EUVAC model and a +set of recommended cross sections agreed well with measured +photoelectron fluxes from AE-E and DE-2. EUVAC is well suited +for aeronomic calculations but is not designed to accurately +predict the solar flux variability for individual lines. + +References: + +P.G. Richards, J.A. Fennelly, and D.G. Torr, EUVAC: A solar EUV +flux model for aeronomic calculations, JGR 99, 8981-8992, 1994. +[and correction in JGR 99, 13283, 1994] + +Directory contents: EUVAC.FOR, AAREADME.DOC (this file) + +NSSDC contact: Dieter Bilitza (bilitza@nssdca.gsfc.nasa.gov) + +Date: July 12, 1995 diff --git a/EUV/euvac/euvac.for b/EUV/euvac/euvac.for new file mode 100755 index 0000000..4e202f9 --- /dev/null +++ b/EUV/euvac/euvac.for @@ -0,0 +1,122 @@ +From: NCF::BILITZA "Dieter Bilitza, 301-441-4193" 9-DEC-1994 10:28:04.66 +To: STPMODELS +CC: BILITZA +Subj: euvac.for + +From: CSPAR::UAHOAL::RICHARDS 24-OCT-1994 15:48:58.11 +To: CSPARC::NCF::BILITZA +CC: RICHARDS +Subj: EUVAC model - let me know if it need more documentation + +C............................ EUVAC.FOR .......................... +C--- Test driver for the EUVAC solar EUV flux model +C--- See Richards et al. [1994] J. Geophys. Res. p8981 for details. + INTEGER I + REAL F107,F107A,EUVFLX(37) +C----- Input F10.7 + WRITE(6,*) ' Input daily F10.7 (e.g. 74)' + READ(5,*) F107 + WRITE(6,*) ' Input 81 day average F10.7 (F10.7A) (e.g. 86)' + READ(5,*) F107A +C +C----- Now get EUV fluxes + CALL EUVAC(F107,F107A,EUVFLX) +C + WRITE(6,*) ' The wavelength bins are same as Torr et al. [1979]' +C------ write out the first 36 solar fluxes by 1.0E-9 + WRITE(6,*) ' F10.7=',F107, ' F10.7A=', F107A + WRITE(6,*) ' I FLUX I FLUX I FLUX' + DO 20 I=1,12 + WRITE(6,91) I,EUVFLX(I)/1.0E9,I+12,EUVFLX(I+12)/1.0E9 + > ,I+24,EUVFLX(I+24)/1.0E9 + 20 CONTINUE +C------ write out last wavelength bin + I=37 + WRITE(6,91) I,EUVFLX(I)/1.0E9 +C + 91 FORMAT(1X,I4,F10.3,4X,I4,F10.3,4X,I4,F10.3) + END + +C:::::::::::::::::::::::::::::::: EUVAC ::::::::::::::::::::::: +C------ This EUV flux model uses the F74113 solar reference spectrum and +C------ ratios determined from Hinteregger's SERF1 model. It uses the daily +C------ F10.7 flux (F107) and the 81 day mean (F107A) as a proxy for scaling +C------ The fluxes are returned in EUVFLX and correspond to the 37 wavelength +C------ bins of Torr et al. [1979] Geophys. Res. Lett. p771. +C------ See Richards et al. [1994] J. Geophys. Res. p8981 for details. +C +C...... F107 = input daily 10.7 cm flux index. +C...... F107A = input 81 day average of daily F10.7 centered on current day +C...... EUVFLX = output array for EUV flux in units of photons/cm2/sec. + SUBROUTINE EUVAC(F107,F107A,EUVFLX) + INTEGER I + REAL F107,F107A,EUVFLX(37),AFAC(37),F74113(37),FLXFAC +C +C------ F74113 reference spectrum (doubled below 150-250 A, tripled <150) +C------ Will be multiplied by 1.0E9 later + DATA F74113/1.20,0.450,4.800,3.100,0.460,0.210,1.679,0.8 + > ,6.900,0.965,0.650,0.314,0.383,0.290,0.285,0.452,0.720 + > ,1.270,0.357,0.530,1.590,0.342,0.230,0.360,0.141,0.170 + > ,0.260,0.702,0.758,1.625,3.537,3.000,4.400,1.475,3.500 + > ,2.100,2.467/ +C +C--- Scaling factors(Ai) for the EUV flux + DATA AFAC/1.0017E-02,7.1250E-03,1.3375E-02,1.9450E-02,2.7750E-03 + > ,1.3768E-01,2.6467E-02,2.5000E-02,3.3333E-03,2.2450E-02 + > ,6.5917E-03,3.6542E-02,7.4083E-03,7.4917E-03,2.0225E-02 + > ,8.7583E-03,3.2667E-03,5.1583E-03,3.6583E-03,1.6175E-02 + > ,3.3250E-03,1.1800E-02,4.2667E-03,3.0417E-03,4.7500E-03 + > ,3.8500E-03,1.2808E-02,3.2750E-03,4.7667E-03,4.8167E-03 + > ,5.6750E-03,4.9833E-03,3.9417E-03,4.4167E-03,5.1833E-03 + > ,5.2833E-03,4.3750E-03/ +C +C----- loop through the wavelengths calculating the scaling factors and +C----- the resulting solar flux. +C----- The scaling factors are restricted to be greater than 0.8 + DO 50 I=1,37 + FLXFAC=(1.0 + AFAC(I) * (0.5*(F107+F107A) - 80.0)) + IF(FLXFAC.LT.0.8) FLXFAC=0.8 + EUVFLX(I)=F74113(I) * FLXFAC * 1.0E9 + 50 CONTINUE + RETURN + END +C +C---------------- Sample OUTPUT for solar minimum F74113 spectrum --------- +C +C---- Note that the fluxes in bins 1 and 2 are triple the F74113 fluxes +C---- and bins 3 and 4 are double the F74113 fluxes. The other fluxes +C---- are the same as F74113. +C +C The wavelength bins are same as Torr et al. [1979] +C F10.7= 74.00000 F10.7A= 86.00000 +C I FLUX I FLUX I FLUX +C 1 1.200 13 0.383 25 0.141 +C 2 0.450 14 0.290 26 0.170 +C 3 4.800 15 0.285 27 0.260 +C 4 3.100 16 0.452 28 0.702 +C 5 0.460 17 0.720 29 0.758 +C 6 0.210 18 1.270 30 1.625 +C 7 1.679 19 0.357 31 3.537 +C 8 0.800 20 0.530 32 3.000 +C 9 6.900 21 1.590 33 4.400 +C 10 0.965 22 0.342 34 1.475 +C 11 0.650 23 0.230 35 3.500 +C 12 0.314 24 0.360 36 2.100 +C 37 2.467 +C------------------ Sample OUTPUT for solar max ---------------------- +C The wavelength bins are same as Torr et al. [1979] +C F10.7= 200.0000 F10.7A= 200.0000 +C I FLUX I FLUX I FLUX +C 1 2.642 13 0.723 25 0.221 +C 2 0.835 14 0.551 26 0.249 +C 3 12.504 15 0.977 27 0.660 +C 4 10.335 16 0.927 28 0.978 +C 5 0.613 17 1.002 29 1.192 +C 6 3.680 18 2.056 30 2.564 +C 7 7.012 19 0.514 31 5.946 +C 8 3.200 20 1.559 32 4.794 +C 9 9.660 21 2.224 33 6.481 +C 10 3.565 22 0.826 34 2.257 +C 11 1.164 23 0.348 35 5.677 +C 12 1.691 24 0.491 36 3.431 +C 37 3.762 diff --git a/EUV/solar2000/aareadme.doc b/EUV/solar2000/aareadme.doc new file mode 100644 index 0000000..5b8ea84 --- /dev/null +++ b/EUV/solar2000/aareadme.doc @@ -0,0 +1,20 @@ +NAME: Solar2000 + +SCIENTIFIC CONTACT: +W. Kent Tobiska + President and Chief Scientist + Space Environment Technologies/SpaceWx + http://SpaceWx.com + 310-663-1415 (cell phone) + 707-281-2517 (fax) + ktobiska@spacenvironment.net + +NSSDC CONTACT: +D. Bilitza, GSFC/NSSDC code 633/STX, + Greenbelt, MD 20771, USA + Telephone: (301) 286-0190 + bilitza@mail630gsfc.nasa.gov + +Parameters: Solar EUV Flux Model + +Availability: http://SpaceWx.com web site. diff --git a/HWM93/AAREADME.TXT b/HWM93/AAREADME.TXT new file mode 100755 index 0000000..026a2de --- /dev/null +++ b/HWM93/AAREADME.TXT @@ -0,0 +1,37 @@ +HORIZONTAL NEUTRAL WIND model +----------------------------- + +The HWM is an empirical model of the horizontal neutral wind in the upper +thermosphere. It is based on wind data obtained from the AE-E and DE 2 +satellites. A limited set of vector spherical harmonics is used to describe the +zonal and meridional wind components. The first edition of the model released +in 1987 (HWM87) was intended for winds above 220 km. With the inclusion of +wind data from ground-based incoherent scatter radar and Fabry-Perot optical +interferometers, HWM90 was extended down to 100 km and using MF/Meteor data +HWM93 was extended down to the ground. Solar cycle variations are included +(since HWM90), but they are found to be small and not always very clearly +delineated be the current data. Variations with magnetic activity (Ap) are +included. Mid- and low-latitude data are reproduced quite well by the model. +The polar vortices are present, but not to full detail. The model describes the +transition from predominately diurnal variations in the upper thermosphere to +semidiurnal variations in the lower thermosphere and a transition from summer +to winter flow above 140 km to winter to summer flow below. Significant alti- +tude gradients in the wind extend up to 300 km at some local times. The model +software is provided as one file HWM93.TXT; earlier versions (HWM87, HWM90) +are also available from NSSDC on request. The software provides zonal and +meridional winds for specified latitude, longitude, time, and Ap index. + +The model is described in the following publications: + +A. E. Hedin, N. W. Spencer, and T. L. Killeen, Empirical Global Model of +Upper Thermosphere Winds Based on Atmosphere and Dynamics Explorer Satellite +Data, J. Geophys. Res. 93, 9959-9978, 1988. + +A. E. Hedin, et al., Revised Global Model of Thermosphere Winds Using +Satellite and Ground-Based Observations, J. Geophys. Res. 96, 7657-7688, 1991. + +A.E. Hedin, E.L. Fleming, A.H. Manson, F.J. Schmidlin, S.K. Avery, R.R. Clark, +S.J. Franke, G.J. Fraser, T. Tsuda, F. Vial and R.A. Vincent, Empirical +wind model for the upper,middle and lower atmosphere, J. Atmos. Terr. Phys. +58, 1421-1447, 1996. + diff --git a/HWM93/hwm93.txt b/HWM93/hwm93.txt new file mode 100755 index 0000000..bcebbe1 --- /dev/null +++ b/HWM93/hwm93.txt @@ -0,0 +1,2876 @@ +Subj: New wind model - HWM93 + +Enclosed is the latest wind model - HWM93 -. +This extends the HWM90 wind model from 100 km to the ground +and is thus a companion in a sense for MSISE90. The thermosphere +portion is unchanged +from HWM90. The extension is primarily based on MF/Meteor radar, +rocket data, and gradient winds from CIRA86. + + +Contents: FORTRAN SUBROUTINE GWS5 + FORTRAN TEST DRIVER + OUTPUT OF TEST + +************************************************************************* + SUBROUTINE GWS5(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,W) +C Horizontal wind model HWM93 covering all altitude regions +C A. E. HEDIN (1/25/93) (4/9/93) +C Calling argument list made similar to GTS5 subroutine for +C MSIS-86 density model and GWS4 for thermospheric winds. +C IYD - YEAR AND DAY AS YYDDD +C SEC - UT(SEC) (Not important in lower atmosphere) +C ALT - ALTITUDE(KM) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS) +C F107A - 3 MONTH AVERAGE OF F10.7 FLUX (Use 150 in lower atmos.) +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY ( " ) +C AP - Two element array with +C AP(1) = MAGNETIC INDEX(DAILY) (use 4 in lower atmos.) +C AP(2)=CURRENT 3HR ap INDEX (used only when SW(9)=-1.) +C Note: Ut, Local Time, and Longitude are used independently in the +C model and are not of equal importance for every situation. +C For the most physically realistic calculation these three +C variables should be consistent. +C OUTPUT +C W(1) = MERIDIONAL (m/sec + Northward) +C W(2) = ZONAL (m/sec + Eastward) +C ADDITIONAL COMMENTS +C TO TURN ON AND OFF PARTICULAR VARIATIONS CALL TSELEC(SW) +C WHERE SW IS A 25 ELEMENT ARRAY CONTAINING 0. FOR OFF, 1. +C FOR ON, OR 2. FOR MAIN EFFECTS OFF BUT CROSS TERMS ON +C FOR THE FOLLOWING VARIATIONS +C 1 - F10.7 EFFECT ON MEAN 2 - TIME INDEPENDENT +C 3 - SYMMETRICAL ANNUAL 4 - SYMMETRICAL SEMIANNUAL +C 5 - ASYMMETRICAL ANNUAL 6 - ASYMMETRICAL SEMIANNUAL +C 7 - DIURNAL 8 - SEMIDIURNAL +C 9 - DAILY AP 10 - ALL UT/LONG EFFECTS +C 11 - LONGITUDINAL 12 - UT AND MIXED UT/LONG +C 13 - MIXED AP/UT/LONG 14 - TERDIURNAL +C 16 - ALL WINDF VAR 17 - ALL WZL VAR +C 18 - ALL UN1 VAR 19 - ALL WDZL VAR +C 24 - ALL B FIELDS (DIV) 25 - ALL C FIELDS (CURL) +C +C To get current values of SW: CALL TRETRV(SW) +C +C For example, to get zonal averages (no diurnal or +C longitudinal variations) set SW(7),SW(8), SW(14), +C and SW(10) equal to 0. To just remove tidal variations +C set SW(7),SW(8), and SW(14) equal to 0. + PARAMETER (MN1=5,MN2=14) + DIMENSION AP(1),W(2),WINDF(2),WW(2),SV(25) + DIMENSION WZL(2),WDZL(2) + DIMENSION ZN1(MN1),UN1(MN1,2),UGN1(2,2) + DIMENSION ZN2(MN2),UN2(MN2,2),UGN2(2,2) + COMMON/PARMW5/PWB(200),PWC(200),PWBL(150),PWCL(150),PWBLD(150), + $ PWCLD(150),PB12(150),PC12(150),PB13(150),PC13(150), + $ PB14(150),PC14(150),PB15(150),PC15(150), + $ PB15D(150),PC15D(150),PWP(100,26) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/HWMC/WBT(2),WCT(2) + COMMON/DATW/ISD(3),IST(2),NAM(2) + COMMON/DATIME/ISDATE(3),ISTIME(2),NAME(2) + SAVE + EXTERNAL INITW5,GWSBK5 + DATA S/.016/,ZL/200./,SV/25*1./,NNN/3/,MN2S/1/,MN2M/1/ + DATA ZN1/200.,150.,130.,115.,100./ + DATA ZN2/100.,90.,82.5,75.,67.5,60.,52.5,45.,37.5,30.,22.5, + $ 15.,7.5,0/ +C Put identification data into common/datime/ + DO 1 I=1,3 + ISDATE(I)=ISD(I) + 1 CONTINUE + DO 2 I=1,2 + ISTIME(I)=IST(I) + NAME(I)=NAM(I) + 2 CONTINUE + IF(ISW.NE.64999) CALL TSELEC(SV) + YRD=IYD + WW(1)=W(1) + WW(2)=W(2) +C + IF(ALT.LE.ZN1(MN1)) GOTO 50 +C +C EXOSPHERE WIND + CALL GLBW5E(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PWB,PWC,WINDF) + WINDF(1)=SW(16)*WINDF(1) + WINDF(2)=SW(16)*WINDF(2) +C WIND AT ZL + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PWBL,PWCL,WW) + WZL(1)=(PWBL(1)*WINDF(1)+WW(1))*SW(17)*SW(18) + WZL(2)=(PWBL(1)*WINDF(2)+WW(2))*SW(17)*SW(18) + UN1(1,1)=WZL(1) + UN1(1,2)=WZL(2) +C WIND DERIVATIVE AT ZL + WW(1)=0 + WW(2)=0 + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PWBLD,PWCLD,WW) + WDZL(1)=(PWBLD(1)*WINDF(1)+WW(1))*SW(19)*SW(18) + WDZL(2)=(PWBLD(1)*WINDF(2)+WW(2))*SW(19)*SW(18) + UGN1(1,1)=WDZL(1)*S + UGN1(1,2)=WDZL(2)*S +C + IF(ALT.GE.ZL) GOTO 90 +C +C WIND AT ZN1(2) (150) + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PB12,PC12,WW) + UN1(2,1)=(PB12(1)*WINDF(1)+WW(1))*SW(18) + UN1(2,2)=(PB12(1)*WINDF(2)+WW(2))*SW(18) +C WIND AT ZN1(3) (130) + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PB13,PC13,WW) + UN1(3,1)=WW(1)*SW(18) + UN1(3,2)=WW(2)*SW(18) +C WIND AT ZN1(4) (115) + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PB14,PC14,WW) + UN1(4,1)=WW(1)*SW(18) + UN1(4,2)=WW(2)*SW(18) +C + 50 CONTINUE + MNN=MAX(1,MIN(MN2,NNN+1)) + IF(ALT.LT.ZN2(MNN)) GOTO 40 +C +C WIND AT ZN1(5) (100) + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PB15,PC15,WW) + UN1(5,1)=WW(1)*SW(18) + UN1(5,2)=WW(2)*SW(18) +C WIND DERIVATIVE AT ZN1(5) (100) + CALL GLBW5M(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PB15D,PC15D,WW) + UGN1(2,1)=WW(1)*SW(18) + UGN1(2,2)=WW(2)*SW(18) +C + IF(ALT.GE.ZN1(MN1)) GOTO 90 +C + UGN2(1,1)=UGN1(2,1) + UGN2(1,2)=UGN1(2,2) + UN2(1,1)=UN1(5,1) + UN2(1,2)=UN1(5,2) + GOTO 45 + 40 CONTINUE + UGN2(1,1)=1.E30 + UGN2(1,2)=1.E30 + UN2(1,1)=0 + UN2(1,2)=0 + 45 CONTINUE +C + DO 10 I=1,MN2 + IF(ALT.GT.ZN2(I)) GOTO 12 + 10 CONTINUE + I=MN2 + 12 IZ=I + MN2S=MAX(1,MIN(IZ-1,IZ-NNN)) + MN2E=MIN(MN2,MAX(MN2S+1,IZ-1+NNN)) + DO 20 I=MN2S,MN2E + II=2*(I-2)+1 + IF(I.GT.1) THEN + CALL GLBW5S(IYD,GLAT,GLONG,STL,PWP(1,II),PWP(1,II+1),WW) + UN2(I,1)=WW(1)*SW(20) + UN2(I,2)=WW(2)*SW(20) + ENDIF + 20 CONTINUE + MN2M=MN2E-MN2S+1 + UGN2(2,1)=1.E30 + UGN2(2,2)=1.E30 + 90 CONTINUE +C WIND AT ALTITUDE + IF(W(1).NE.9898) + $ W(1)= WPROF(ALT,ZL,S,WINDF(1),WZL(1),WDZL(1), + $ MN1,ZN1,UN1(1,1),UGN1(1,1),MN2M,ZN2(MN2S),UN2(MN2S,1),UGN2(1,1)) + IF(W(2).NE.9898) + $ W(2)= WPROF(ALT,ZL,S,WINDF(2),WZL(2),WDZL(2), + $ MN1,ZN1,UN1(1,2),UGN1(1,2),MN2M,ZN2(MN2S),UN2(MN2S,2),UGN2(1,2)) + RETURN +C Set number of nodes calculated each side of required altitude +C to adjust profile accuracy vs efficiency + ENTRY SETNW5(NNW) + NNN=NNW + END +C----------------------------------------------------------------------- + FUNCTION WPROF(Z,ZL,S,UINF,ULB,ULBD,MN1,ZN1,UN1,UGN1, + $ MN2,ZN2,UN2,UGN2) + DIMENSION ZN1(MN1),UN1(MN1),UGN1(2),XS(15),YS(15),Y2OUT(15) + DIMENSION ZN2(MN2),UN2(MN2),UGN2(2) + SAVE + IF(Z.GE.ZL) THEN + X=S*(Z-ZL) + F=EXP(-X) + WPROF=UINF+(ULB-UINF)*F+(ULB-UINF+ULBD)*X*F + RETURN + ENDIF + IF(Z.GE.ZN1(MN1).AND.Z.LT.ZN1(1)) THEN + MN=MN1 + Z1=ZN1(1) + Z2=ZN1(MN) + ZDIF=Z2-Z1 + DO 10 K=1,MN + XS(K)=(ZN1(K)-Z1)/ZDIF + YS(K)=UN1(K) + 10 CONTINUE + YD1=UGN1(1)*ZDIF + YD2=UGN1(2)*ZDIF + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) +C Eq. + X=(Z-Z1)/ZDIF +C Eq. + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) + WPROF=Y + RETURN + ENDIF + IF(Z.LT.ZN2(1)) THEN + MN=MN2 + Z1=ZN2(1) + Z2=ZN2(MN) + ZDIF=Z2-Z1 + DO 20 K=1,MN + XS(K)=(ZN2(K)-Z1)/ZDIF + YS(K)=UN2(K) + 20 CONTINUE + YD1=UGN2(1) + IF(UGN2(1).LT.1.E30) YD1=UGN2(1)*ZDIF + YD2=UGN2(2) + IF(UGN2(2).LT.1.E30) YD2=UGN2(2)*ZDIF + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) +C Eq. + X=(Z-Z1)/ZDIF +C Eq. + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) + WPROF=Y + RETURN + ENDIF + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GLBW5E(YRD,SEC,LAT,LONG,STL,F107A,F107,AP,PB,PC,WW) + REAL LAT,LONG + DIMENSION WB(2,15),WC(2,15),PB(1),PC(1),WW(2) + DIMENSION AP(1) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/HWMC/WBT(2),WCT(2) +C COMMON/VPOLY/BT(20,20),BP(20,20),CSTL,SSTL,C2STL,S2STL, +C $ C3STL,S3STL,IYR,DAY,DF,DFA,DFC,APD,APDF,APDFC,APT,SLT + COMMON/VPOLY2/XVL,LVL,MVL,CLAT,SLAT,BT(20,20),BP(20,20) + COMMON/LTCOMP/TLL,NSVL,CSTL,SSTL,C2STL,S2STL,C3STL,S3STL + COMMON/LGCOMP/XLL,NGVL,CLONG,SLONG,C2LONG,S2LONG + SAVE + DATA DGTR/.017453/,SR/7.2722E-5/,HR/.2618/,DR/1.72142E-2/ + DATA NSW/14/,WB/30*0/,WC/30*0/ + DATA PB14/-1./,PB18/-1./ + DATA SW9/1./,LV/12/,MV/3/,NSV/3/,NGV/2/,PSET/3./ + G0(A)=(A-4.+(PB(26)-1.)*(A-4.+(EXP(-ABS(PB(25))*(A-4.))-1.)/ + * ABS(PB(25)))) +C CONFIRM PARAMETER SET + IF(PB(100).EQ.0) PB(100)=PSET + IF(PB(100).NE.PSET) THEN + WRITE(6,900) PB(100),PC(100) + 900 FORMAT(1X,'WRONG PARAMETER SET FOR GLBW5E',3F10.1) + STOP + ENDIF +C + DO 10 J=1,NSW + WB(1,J)=0 + WB(2,J)=0 + WC(1,J)=0 + WC(2,J)=0 + 10 CONTINUE + IF(SW(9).GT.0) SW9=1. + IF(SW(9).LT.0) SW9=-1. + IYR = YRD/1000. + DAY = YRD - IYR*1000. + IF(XVL.NE.LAT.OR.LV.GT.LVL.OR.MV.GT.MVL) THEN + SLAT=SIN(DGTR*LAT) + CLAT=COS(DGTR*LAT) + CALL VSPHR1(SLAT,CLAT,LV,MV,BT,BP,20) + XVL=LAT + LVL=LV + MVL=MV + ENDIF + IF(TLL.NE.STL.OR.NSV.GT.NSVL) THEN + SSTL = SIN(HR*STL) + CSTL = COS(HR*STL) + S2STL = SIN(2.*HR*STL) + C2STL = COS(2.*HR*STL) + S3STL = SIN(3.*HR*STL) + C3STL = COS(3.*HR*STL) + TLL = STL + NSVL=NSV + ENDIF + IF(DAY.NE.DAYL.OR.PB(14).NE.PB14) THEN + CD14=COS(DR*(DAY-PB(14))) +C SD14=SIN(DR*(DAY-PB(14))) + ENDIF + IF(DAY.NE.DAYL.OR.PB(18).NE.PB18) CD18=COS(2.*DR*(DAY-PB(18))) + DAYL=DAY + PB14=PB(14) + PB18=PB(18) + IF(XLL.NE.LONG) THEN + SLONG=SIN(DGTR*LONG) + CLONG=COS(DGTR*LONG) + S2LONG=SIN(2.*DGTR*LONG) + C2LONG=COS(2.*DGTR*LONG) + XLL=LONG + NGVL=2 + ENDIF +C F10.7 EFFECT + DF=F107-F107A + DFA=F107A-150. + DFC=DFA+PB(20)*DF +C TIME INDEPENDENT + F1B=1.+PB(22)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WB(1,2)=(PB(2)*BT(3,1)+PB(3)*BT(5,1)+PB(23)*BT(7,1))*F1B + ENDIF + WB(2,2)=0. + F1C=1.+PC(22)*DFC*SWC(1) + WC(1,2)=0. + IF(WW(2).NE.9898) THEN + WC(2,2)=-(PC(2)*BT(2,1)+PC(3)*BT(4,1)+PC(23)*BT(6,1))*F1C + $ -(PC(27)*BT(3,1)+PC(15)*BT(5,1)+PC(60)*BT(7,1) + $ +PC(161)*BT(9,1)+PC(162)*BT(11,1)+PC(163)*BT(13,1))*F1C + ENDIF +C SYMMETRICAL ANNUAL +C SYMMETRICAL SEMIANNUAL + IF(WW(1).NE.9898) THEN + WB(1,4)=(PB(17)*BT(3,1)+PB(31)*BT(5,1))*CD18 + ENDIF + WB(2,4)=0 + WC(1,4)=0 + IF(WW(2).NE.9898) THEN + WC(2,4)=-(PC(17)*BT(2,1)+PC(31)*BT(4,1))*CD18 + ENDIF +C ASYMMETRICAL ANNUAL + F5B=1.+PB(48)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WB(1,5)=(PB(10)*BT(2,1)+PB(11)*BT(4,1))*CD14*F5B + ENDIF + WB(2,5)=0 + F5C=1.+PC(48)*DFC*SWC(1) + WC(1,5)=0 + IF(WW(2).NE.9898) THEN + WC(2,5)=-(PC(10)*BT(3,1)+PC(11)*BT(5,1))*CD14*F5C + ENDIF +C ASYMMETRICAL SEMIANNUAL +C none +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + F7B=1.+PB(50)*DFC*SWC(1) + F75B=1.+PB(83)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WB(1,7)=(PB(7)*BT(2,2)+PB(8)*BT(4,2)+PB(29)*BT(6,2) + $ +PB(142)*BT(8,2)+PB(144)*BT(10,2) + $ +PB(182)*BT(3,2)+PB(184)*BT(5,2) + $ )*SSTL*F7B + $ +(PB(13)*BT(3,2)+PB(146)*BT(5,2)) + $ *CD14*SSTL*F75B*SWC(5) + $ +(PB(171)*BT(2,2)+PB(173)*BT(4,2)) + $ *CD18*SSTL*F75B*SWC(4) + $ + (PB(4)*BT(2,2)+PB(5)*BT(4,2)+PB(28)*BT(6,2) + $ +PB(141)*BT(8,2)+PB(143)*BT(10,2) + $ +PB(181)*BT(3,2)+PB(183)*BT(5,2) + $ )*CSTL*F7B + $ +(PB(12)*BT(3,2)+PB(145)*BT(5,2)) + $ *CD14*CSTL*F75B*SWC(5) + $ +(PB(170)*BT(2,2)+PB(172)*BT(4,2)) + $ *CD18*CSTL*F75B*SWC(4) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,7)=-(PB(4)*BP(2,2)+PB(5)*BP(4,2)+PB(28)*BP(6,2) + $ +PB(141)*BP(8,2)+PB(143)*BP(10,2) + $ +PB(181)*BP(3,2)+PB(183)*BP(5,2) + $ )*SSTL*F7B + $ -(PB(12)*BP(3,2)+PB(145)*BP(5,2)) + $ *CD14*SSTL*F75B*SWC(5) + $ -(PB(170)*BP(2,2)+PB(172)*BP(4,2)) + $ *CD18*SSTL*F75B*SWC(4) + $ + (PB(7)*BP(2,2)+PB(8)*BP(4,2)+PB(29)*BP(6,2) + $ +PB(142)*BP(8,2)+PB(144)*BP(10,2) + $ +PB(182)*BP(3,2)+PB(184)*BP(5,2) + $ )*CSTL*F7B + $ +(PB(13)*BP(3,2)+PB(146)*BP(5,2)) + $ *CD14*CSTL*F75B*SWC(5) + $ +(PB(171)*BP(2,2)+PB(173)*BP(4,2)) + $ *CD18*CSTL*F75B*SWC(4) + ENDIF + F7C=1.+PC(50)*DFC*SWC(1) + F75C=1.+PC(83)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WC(1,7)=-(PC(4)*BP(3,2)+PC(5)*BP(5,2)+PC(28)*BP(7,2) + $ +PC(141)*BP(9,2)+PC(143)*BP(11,2) + $ +PC(181)*BP(2,2)+PC(183)*BP(4,2)+PC(185)*BP(6,2) + $ +PC(187)*BP(8,2)+PC(189)*BP(10,2) + $ )*SSTL*F7C + $ -(PC(12)*BP(2,2)+PC(145)*BP(4,2)) + $ *CD14*SSTL*F75C*SWC(5) + $ -(PC(170)*BP(3,2)+PC(172)*BP(5,2)) + $ *CD18*SSTL*F75C*SWC(4) + $ +(PC(7)*BP(3,2)+PC(8)*BP(5,2)+PC(29)*BP(7,2) + $ +PC(142)*BP(9,2)+PC(144)*BP(11,2) + $ +PC(182)*BP(2,2)+PC(184)*BP(4,2)+PC(186)*BP(6,2) + $ +PC(188)*BP(8,2)+PC(190)*BP(10,2) + $ )*CSTL*F7C + $ +(PC(13)*BP(2,2)+PC(146)*BP(4,2)) + $ *CD14*CSTL*F75C*SWC(5) + $ +(PC(171)*BP(3,2)+PC(173)*BP(5,2)) + $ *CD18*CSTL*F75C*SWC(4) + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,7)=-(PC(7)*BT(3,2)+PC(8)*BT(5,2)+PC(29)*BT(7,2) + $ +PC(142)*BT(9,2)+PC(144)*BT(11,2) + $ +PC(182)*BT(2,2)+PC(184)*BT(4,2)+PC(186)*BT(6,2) + $ +PC(188)*BT(8,2)+PC(190)*BT(10,2) + $ )*SSTL*F7C + $ -(PC(13)*BT(2,2)+PC(146)*BT(4,2)) + $ *CD14*SSTL*F75C*SWC(5) + $ -(PC(171)*BT(3,2)+PC(173)*BT(5,2)) + $ *CD18*SSTL*F75C*SWC(4) + $ -(PC(4)*BT(3,2)+PC(5)*BT(5,2)+PC(28)*BT(7,2) + $ +PC(141)*BT(9,2)+PC(143)*BT(11,2) + $ +PC(181)*BT(2,2)+PC(183)*BT(4,2)+PC(185)*BT(6,2) + $ +PC(187)*BT(8,2)+PC(189)*BT(10,2) + $ )*CSTL*F7C + $ -(PC(12)*BT(2,2)+PC(145)*BT(4,2)) + $ *CD14*CSTL*F75C*SWC(5) + $ -(PC(170)*BT(3,2)+PC(172)*BT(5,2)) + $ *CD18*CSTL*F75C*SWC(4) + ENDIF + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + F8B=1.+PB(90)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WB(1,8)=(PB(9)*BT(3,3)+PB(43)*BT(5,3) + $ +PB(111)*BT(7,3) + $ +(PB(34)*BT(4,3)+PB(148)*BT(6,3))*CD14*SWC(5) + $ +(PB(134)*BT(3,3))*CD18*SWC(4) + $ +PB(152)*BT(4,3)+PB(154)*BT(6,3)+PB(156)*BT(8,3) + $ +PB(158)*BT(10,3) + $ )*S2STL*F8B + $ +(PB(6)*BT(3,3)+PB(42)*BT(5,3) + $ +PB(110)*BT(7,3) + $ +(PB(24)*BT(4,3)+PB(147)*BT(6,3))*CD14*SWC(5) + $ +(PB(135)*BT(3,3))*CD18*SWC(4) + $ +PB(151)*BT(4,3)+PB(153)*BT(6,3)+PB(155)*BT(8,3) + $ +PB(157)*BT(10,3) + $ )*C2STL*F8B + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,8)=-(PB(6)*BP(3,3)+PB(42)*BP(5,3) + $ +PB(110)*BP(7,3) + $ +(PB(24)*BP(4,3)+PB(147)*BP(6,3))*CD14*SWC(5) + $ +(PB(135)*BP(3,3))*CD18*SWC(4) + $ +PB(151)*BP(4,3)+PB(153)*BP(6,3)+PB(155)*BP(8,3) + $ +PB(157)*BP(10,3) + $ )*S2STL*F8B + $ + (PB(9)*BP(3,3)+PB(43)*BP(5,3) + $ +PB(111)*BP(7,3) + $ +(PB(34)*BP(4,3)+PB(148)*BP(6,3))*CD14*SWC(5) + $ +(PB(134)*BP(3,3))*CD18*SWC(4) + $ +PB(152)*BP(4,3)+PB(154)*BP(6,3)+PB(156)*BP(8,3) + $ +PB(158)*BP(10,3) + $ )*C2STL*F8B + ENDIF + F8C=1.+PC(90)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WC(1,8)=-(PC(6)*BP(4,3)+PC(42)*BP(6,3) + $ +PC(110)*BP(8,3) + $ +(PC(24)*BP(3,3)+PC(147)*BP(5,3))*CD14*SWC(5) + $ +(PC(135)*BP(4,3))*CD18*SWC(4) + $ +PC(151)*BP(3,3)+PC(153)*BP(5,3)+PC(155)*BP(7,3) + $ +PC(157)*BP(9,3) + $ )*S2STL*F8C + $ +(PC(9)*BP(4,3)+PC(43)*BP(6,3) + $ +PC(111)*BP(8,3) + $ +(PC(34)*BP(3,3)+PC(148)*BP(5,3))*CD14*SWC(5) + $ +(PC(134)*BP(4,3))*CD18*SWC(4) + $ +PC(152)*BP(3,3)+PC(154)*BP(5,3)+PC(156)*BP(7,3) + $ +PC(158)*BP(9,3) + $ )*C2STL*F8C + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,8)=-(PC(9)*BT(4,3)+PC(43)*BT(6,3) + $ +PC(111)*BT(8,3) + $ +(PC(34)*BT(3,3)+PC(148)*BT(5,3))*CD14*SWC(5) + $ +(PC(134)*BT(4,3))*CD18*SWC(4) + $ +PC(152)*BT(3,3)+PC(154)*BT(5,3)+PC(156)*BT(7,3) + $ +PC(158)*BT(9,3) + $ )*S2STL*F8C + $ - (PC(6)*BT(4,3)+PC(42)*BT(6,3) + $ +PC(110)*BT(8,3) + $ +(PC(24)*BT(3,3)+PC(147)*BT(5,3))*CD14*SWC(5) + $ +(PC(135)*BT(4,3))*CD18*SWC(4) + $ +PC(151)*BT(3,3)+PC(153)*BT(5,3)+PC(155)*BT(7,3) + $ +PC(157)*BT(9,3) + $ )*C2STL*F8C + ENDIF + 210 CONTINUE +C TERDIURNAL + IF(SW(14).EQ.0) GOTO 220 + F14B=1. + IF(WW(1).NE.9898) THEN + WB(1,14)=(PB(40)*BT(4,4)+PB(149)*BT(6,4) + $ +PB(114)*BT(8,4) + $ +(PB(94)*BT(5,4)+PB(47)*BT(7,4))*CD14*SWC(5) + $ )*S3STL*F14B + $ + (PB(41)*BT(4,4)+PB(150)*BT(6,4) + $ +PB(115)*BT(8,4) + $ +(PB(95)*BT(5,4)+PB(49)*BT(7,4))*CD14*SWC(5) + $ )*C3STL*F14B + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,14)=-(PB(41)*BP(4,4)+PB(150)*BP(6,4) + $ +PB(115)*BP(8,4) + $ +(PB(95)*BP(5,4)+PB(49)*BP(7,4))*CD14*SWC(5) + $ )*S3STL*F14B + $ + (PB(40)*BP(4,4)+PB(149)*BP(6,4) + $ +PB(114)*BP(8,4) + $ +(PB(94)*BP(5,4)+PB(47)*BP(7,4))*CD14*SWC(5) + $ )*C3STL*F14B + ENDIF + F14C=1. + IF(WW(1).NE.9898) THEN + WC(1,14)=-(PC(41)*BP(5,4)+PC(150)*BP(7,4) + $ +PC(115)*BP(9,4) + $ +(PC(95)*BP(4,4)+PC(49)*BP(6,4))*CD14*SWC(5) + $ )*S3STL*F14C + $ + (PC(40)*BP(5,4)+PC(149)*BP(7,4) + $ +PC(114)*BP(9,4) + $ +(PC(94)*BP(4,4)+PC(47)*BP(6,4))*CD14*SWC(5) + $ )*C3STL*F14C + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,14)=-(PC(40)*BT(5,4)+PC(149)*BT(7,4) + $ +PC(114)*BT(9,4) + $ +(PC(94)*BT(4,4)+PC(47)*BT(6,4))*CD14*SWC(5) + $ )*S3STL*F14C + $ - (PC(41)*BT(5,4)+PC(150)*BT(7,4) + $ +PC(115)*BT(9,4) + $ +(PC(95)*BT(4,4)+PC(49)*BT(6,4))*CD14*SWC(5) + $ )*C3STL*F14C + ENDIF + 220 CONTINUE +C MAGNETIC ACTIVITY + IF(SW(9).EQ.0.) GOTO 40 + IF(SW9.EQ.-1.) GOTO 30 +C daily AP + APD=AP(1)-4. + APDF=(APD+(PB(45)-1.)*(APD+(EXP(-PB(44)*APD)-1.)/PB(44))) +C APDFC=(APD+(PC(45)-1.)*(APD+(EXP(-PC(44)*APD)-1.)/PC(44))) + APDFC=APDF + IF(APD.EQ.0.) GOTO 40 + IF(WW(1).NE.9898) THEN + WB(1,9)=(PB(46)*BT(3,1)+PB(35)*BT(5,1)+PB(33)*BT(7,1))*APDF + $ +(PB(175)*BT(3,3)+PB(177)*BT(5,3))*S2STL*APDF + $ +(PB(174)*BT(3,3)+PB(176)*BT(5,3))*C2STL*APDF + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,9)=0 + $ -(PB(174)*BP(3,3)+PB(176)*BP(5,3))*S2STL*APDF + $ +(PB(175)*BP(3,3)+PB(177)*BP(5,3))*C2STL*APDF + ENDIF + IF(WW(1).NE.9898) THEN + WC(1,9)=SWC(7)*WC(1,7)*PC(122)*APDFC + $ -(PC(174)*BP(4,3)+PC(176)*BP(6,3))*S2STL*APDFC + $ +(PC(175)*BP(4,3)+PC(177)*BP(6,3))*C2STL*APDFC + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,9)=-(PC(46)*BT(2,1)+PC(35)*BT(4,1)+PC(33)*BT(6,1))*APDFC + $ +SWC(7)*WC(2,7)*PC(122)*APDFC + $ -(PC(175)*BT(4,3)+PC(177)*BT(6,3))*S2STL*APDFC + $ -(PC(174)*BT(4,3)+PC(176)*BT(6,3))*C2STL*APDFC + ENDIF + GO TO 40 + 30 CONTINUE + IF(PB(25).LT.1.E-4) PB(25)=1.E-4 + APT=G0(AP(2)) + IF(APT.EQ.0) GOTO 40 + IF(WW(1).NE.9898) THEN + WB(1,9)=(PB(97)*BT(3,1)+PB(55)*BT(5,1)+PB(51)*BT(7,1))*APT + $ +(PB(160)*BT(3,3)+PB(179)*BT(5,3))*S2STL*APT + $ +(PB(159)*BT(3,3)+PB(178)*BT(5,3))*C2STL*APT + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,9)=0 + $ -(PB(159)*BP(3,3)+PB(178)*BP(5,3))*S2STL*APT + $ +(PB(160)*BP(3,3)+PB(179)*BP(5,3))*C2STL*APT + ENDIF + IF(WW(1).NE.9898) THEN + WC(1,9)=SWC(7)*WC(1,7)*PC(129)*APT + $ -(PC(159)*BP(4,3)+PC(178)*BP(6,3))*S2STL*APT + $ +(PC(160)*BP(4,3)+PC(179)*BP(6,3))*C2STL*APT + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,9)=-(PC(97)*BT(2,1)+PC(55)*BT(4,1)+PC(51)*BT(6,1))*APT + $ +SWC(7)*WC(2,7)*PC(129)*APT + $ -(PC(160)*BT(4,3)+PC(179)*BT(6,3))*S2STL*APT + $ -(PC(159)*BT(4,3)+PC(178)*BT(6,3))*C2STL*APT + ENDIF + 40 CONTINUE + IF(SW(10).EQ.0) GOTO 49 +C LONGITUDINAL + DBASY1=1.+PB(199)*SLAT + DBASY2=1.+PB(200)*SLAT + F11B=1.+PB(81)*DFC*SWC(1) + IF(SW(11).EQ.0) GOTO 230 + IF(WW(1).NE.9898) THEN + WB(1,11)=(PB(91)*BT(3,2)+PB(92)*BT(5,2)+PB(93)*BT(7,2)) + $ *SLONG*DBASY1*F11B + $ + (PB(65)*BT(3,2)+PB(66)*BT(5,2)+PB(67)*BT(7,2)) + $ *CLONG*DBASY1*F11B + $ +(PB(191)*BT(3,3)+PB(193)*BT(5,3)+PB(195)*BT(7,3) + $ +PB(197)*BT(9,3) + $ )*S2LONG*DBASY2*F11B + $ + (PB(192)*BT(3,3)+PB(194)*BT(5,3)+PB(196)*BT(7,3) + $ +PB(198)*BT(9,3) + $ )*C2LONG*DBASY2*F11B + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,11)=-(PB(65)*BP(3,2)+PB(66)*BP(5,2)+PB(67)*BP(7,2)) + $ *SLONG*DBASY1*F11B + $ + (PB(91)*BP(3,2)+PB(92)*BP(5,2)+PB(93)*BP(7,2)) + $ *CLONG*DBASY1*F11B + $ -(PB(192)*BP(3,3)+PB(194)*BP(5,3)+PB(196)*BP(7,3) + $ +PB(198)*BP(9,3) + $ )*S2LONG*DBASY2*F11B + $ + (PB(191)*BP(3,3)+PB(193)*BP(5,3)+PB(195)*BP(7,3) + $ +PB(197)*BP(9,3) + $ )*C2LONG*DBASY2*F11B + ENDIF + DCASY1=1.+PC(199)*SLAT + DCASY2=1.+PC(200)*SLAT + F11C=1.+PC(81)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WC(1,11)=-(PC(65)*BP(2,2)+PC(66)*BP(4,2)+PC(67)*BP(6,2) + $ +PC(73)*BP(8,2)+PC(74)*BP(10,2) + $ )*SLONG*DCASY1*F11C + $ + (PC(91)*BP(2,2)+PC(92)*BP(4,2)+PC(93)*BP(6,2) + $ +PC(87)*BP(8,2)+PC(88)*BP(10,2) + $ )*CLONG*DCASY1*F11C + $ -(PC(192)*BP(4,3)+PC(194)*BP(6,3)+PC(196)*BP(8,3) + $ +PC(198)*BP(10,3) + $ )*S2LONG*DCASY2*F11C + $ + (PC(191)*BP(4,3)+PC(193)*BP(6,3)+PC(195)*BP(8,3) + $ +PC(197)*BP(10,3) + $ )*C2LONG*DCASY2*F11C + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,11)=-(PC(91)*BT(2,2)+PC(92)*BT(4,2)+PC(93)*BT(6,2) + $ +PC(87)*BT(8,2)+PC(88)*BT(10,2) + $ )*SLONG*DCASY1*F11C + $ - (PC(65)*BT(2,2)+PC(66)*BT(4,2)+PC(67)*BT(6,2) + $ +PC(73)*BT(8,2)+PC(74)*BT(10,2) + $ )*CLONG*DCASY1*F11C + $ -(PC(191)*BT(4,3)+PC(193)*BT(6,3)+PC(195)*BT(8,3) + $ +PC(197)*BT(10,3) + $ )*S2LONG*DCASY2*F11C + $ - (PC(192)*BT(4,3)+PC(194)*BT(6,3)+PC(196)*BT(8,3) + $ +PC(198)*BT(10,3) + $ )*C2LONG*DCASY2*F11C + ENDIF + 230 CONTINUE +C UT & MIXED UT/LONG + UTBASY=1. + F12B=1.+PB(82)*DFC*SWC(1) + IF(SW(12).EQ.0) GOTO 240 + IF(WW(1).NE.9898) THEN + WB(1,12)=(PB(69)*BT(2,1)+PB(70)*BT(4,1)+PB(71)*BT(6,1) + $ +PB(116)*BT(8,1)+PB(117)*BT(10,1)+PB(118)*BT(12,1) + $ )*COS(SR*(SEC-PB(72)))*UTBASY*F12B + $ + (PB(77)*BT(4,3)+PB(78)*BT(6,3)+PB(79)*BT(8,3)) + $ *COS(SR*(SEC-PB(80))+2.*DGTR*LONG)*UTBASY*F12B*SWC(11) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,12)=(PB(77)*BP(4,3)+PB(78)*BP(6,3)+PB(79)*BP(8,3)) + $ *COS(SR*(SEC-PB(80)+21600.)+2.*DGTR*LONG) + $ *UTBASY*F12B*SWC(11) + ENDIF + UTCASY=1. + F12C=1.+PC(82)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WC(1,12)=(PC(77)*BP(3,3)+PC(78)*BP(5,3)+PC(79)*BP(7,3) + $ +PC(165)*BP(9,3)+PC(166)*BP(11,3)+PC(167)*BP(13,3) + $ )*COS(SR*(SEC-PC(80))+2.*DGTR*LONG)*UTCASY*F12C*SWC(11) + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,12)=-(PC(69)*BT(3,1)+PC(70)*BT(5,1)+PC(71)*BT(7,1) + $ +PC(116)*BT(9,1)+PC(117)*BT(11,1)+PC(118)*BT(13,1) + $ )*COS(SR*(SEC-PC(72)))*UTCASY*F12C + $ + (PC(77)*BT(3,3)+PC(78)*BT(5,3)+PC(79)*BT(7,3) + $ +PC(165)*BT(9,3)+PC(166)*BT(11,3)+PC(167)*BT(13,3) + $ )*COS(SR*(SEC-PC(80)+21600.)+2.*DGTR*LONG) + $ *UTCASY*F12C*SWC(11) + ENDIF + 240 CONTINUE +C MIXED LONG,UT,AP + IF(SW(13).EQ.0) GOTO 48 + IF(SW9.EQ.-1.) GO TO 45 + IF(APD.EQ.0) GOTO 48 + IF(WW(1).NE.9898) THEN + WB(1,13)= + $ (PB(61)*BT(3,2)+PB(62)*BT(5,2)+PB(63)*BT(7,2)) + $ *COS(DGTR*(LONG-PB(64)))*APDF*SWC(11)+ + $ (PB(84)*BT(2,1)+PB(85)*BT(4,1)+PB(86)*BT(6,1)) + $ *COS(SR*(SEC-PB(76)))*APDF*SWC(12) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,13)=(PB(61)*BP(3,2)+PB(62)*BP(5,2)+PB(63)*BP(7,2)) + $ *COS(DGTR*(LONG-PB(64)+90.))*APDF*SWC(11) + ENDIF + IF(WW(1).NE.9898) THEN + WC(1,13)=SWC(11)*WC(1,11)*PC(61)*APDFC + $ +SWC(12)*WC(1,12)*PC(84)*APDFC + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,13)=SWC(11)*WC(2,11)*PC(61)*APDFC + $ +SWC(12)*WC(2,12)*PC(84)*APDFC + ENDIF + GOTO 48 + 45 CONTINUE + IF(APT.EQ.0) GOTO 48 + IF(WW(1).NE.9898) THEN + WB(1,13)= + $ (PB(53)*BT(3,2)+PB(99)*BT(5,2)+PB(68)*BT(7,2)) + $ *COS(DGTR*(LONG-PB(98)))*APT*SWC(11)+ + $ (PB(56)*BT(2,1)+PB(57)*BT(4,1)+PB(58)*BT(6,1)) + $ *COS(SR*(SEC-PB(59)))*APT*SWC(12) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,13)=(PB(53)*BP(3,2)+PB(99)*BP(5,2)+PB(68)*BP(7,2)) + $ *COS(DGTR*(LONG-PB(98)+90.))*APT*SWC(11) + ENDIF + IF(WW(1).NE.9898) THEN + WC(1,13)=SWC(11)*WC(1,11)*PC(53)*APT + $ +SWC(12)*WC(1,12)*PC(56)*APT + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,13)=SWC(11)*WC(2,11)*PC(53)*APT + $ +SWC(12)*WC(2,12)*PC(56)*APT + ENDIF + 48 CONTINUE + 49 CONTINUE + WBT(1)=0 + WBT(2)=0 + WCT(1)=0 + WCT(2)=0 +C SUM WINDS AND CHANGE MERIDIONAL SIGN TO + NORTH + DO 50 K=1,NSW + WBT(1)=WBT(1)-ABS(SW(K))*WB(1,K) + WCT(1)=WCT(1)-ABS(SW(K))*WC(1,K) + WBT(2)=WBT(2)+ABS(SW(K))*WB(2,K) + WCT(2)=WCT(2)+ABS(SW(K))*WC(2,K) + 50 CONTINUE + IF(WW(1).NE.9898) WW(1)=WBT(1)*SW(24)+WCT(1)*SW(25) + IF(WW(2).NE.9898) WW(2)=WBT(2)*SW(24)+WCT(2)*SW(25) + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GLBW5M(YRD,SEC,LAT,LONG,STL,F107A,F107,AP,PB,PC,WW) + REAL LAT,LONG + DIMENSION WB(2,15),WC(2,15),PB(1),PC(1),WW(2) + DIMENSION AP(1) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/HWMC/WBT(2),WCT(2) +C COMMON/VPOLY/BT(20,20),BP(20,20),CSTL,SSTL,C2STL,S2STL, +C $ C3STL,S3STL,IYR,DAY,DF,DFA,DFC,APD,APDF,APDFC,APT,STL + COMMON/VPOLY2/XVL,LVL,MVL,CLAT,SLAT,BT(20,20),BP(20,20) + COMMON/LTCOMP/TLL,NSVL,CSTL,SSTL,C2STL,S2STL,C3STL,S3STL + COMMON/LGCOMP/XLL,NGVL,CLONG,SLONG,C2LONG,S2LONG + SAVE + DATA DGTR/.017453/,SR/7.2722E-5/,HR/.2618/,DR/1.72142E-2/ + DATA PB14/-1./,PB18/-1./ + DATA NSW/14/,WB/30*0/,WC/30*0/ + DATA SW9/1./,LV/10/,MV/2/,NSV/2/,PSET/4./ + G0(A)=(A-4.+(PB(26)-1.)*(A-4.+(EXP(-ABS(PB(25))*(A-4.))-1.)/ + * ABS(PB(25)))) +C CONFIRM PARAMETER SET + IF(PB(100).EQ.0) PB(100)=PSET + IF(PB(100).NE.PSET) THEN + WRITE(6,900) PSET,PB(100),PC(100) + 900 FORMAT(1X,'WRONG PARAMETER SET FOR GLBW5M',3F10.1) + STOP + ENDIF +C + DO 10 J=1,NSW + WB(1,J)=0 + WB(2,J)=0 + WC(1,J)=0 + WC(2,J)=0 + 10 CONTINUE + IF(SW(9).GT.0) SW9=1. + IF(SW(9).LT.0) SW9=-1. + IYR = YRD/1000. + DAY = YRD - IYR*1000. + IF(XVL.NE.LAT.OR.LV.GT.LVL.OR.MV.GT.MVL) THEN + SLAT=SIN(DGTR*LAT) + CLAT=COS(DGTR*LAT) + CALL VSPHR1(SLAT,CLAT,LV,MV,BT,BP,20) + XVL=LAT + LVL=LV + MVL=MV + ENDIF + IF(TLL.NE.STL.OR.NSV.GT.NSVL) THEN + SSTL = SIN(HR*STL) + CSTL = COS(HR*STL) + S2STL = SIN(2.*HR*STL) + C2STL = COS(2.*HR*STL) + TLL = STL + NSVL=NSV + ENDIF + IF(DAY.NE.DAYL.OR.PB(14).NE.PB14) CD14=COS(DR*(DAY-PB(14))) + IF(DAY.NE.DAYL.OR.PB(18).NE.PB18) CD18=COS(2.*DR*(DAY-PB(18))) + IF(DAY.NE.DAYL.OR.PB(19).NE.PB19) CD19B=COS(2.*DR*(DAY-PB(19))) + DAYL=DAY + PB14=PB(14) + PB18=PB(18) + PB19=PB(19) +C F10.7 EFFECT + DF=F107-F107A + DFA=F107A-150. + DFC=DFA+PB(20)*DF +C TIME INDEPENDENT + F1B=1. + IF(WW(1).NE.9898) THEN + WB(1,2)=(PB(2)*BT(3,1)+PB(3)*BT(5,1)+PB(23)*BT(7,1))*F1B + ENDIF + WB(2,2)=0. + F1C=1. + WC(1,2)=0. + IF(WW(2).NE.9898) THEN + WC(2,2)=-(PC(2)*BT(2,1)+PC(3)*BT(4,1)+PC(23)*BT(6,1))*F1C + $ -(PC(27)*BT(3,1)+PC(15)*BT(5,1)+PC(60)*BT(7,1))*F1C + ENDIF +C SYMMETRICAL ANNUAL +C SYMMETRICAL SEMIANNUAL + IF(WW(1).NE.9898) THEN + WB(1,4)=(PB(17)*BT(3,1)+PB(31)*BT(5,1))*CD18 + ENDIF + WB(2,4)=0 + WC(1,4)=0 + IF(WW(2).NE.9898) THEN + WC(2,4)=-(PC(17)*BT(2,1)+PC(31)*BT(4,1))*CD18 + ENDIF +C ASYMMETRICAL ANNUAL + F5B=1. + IF(WW(1).NE.9898) THEN + WB(1,5)=(PB(10)*BT(2,1)+PB(11)*BT(4,1))*CD14*F5B + ENDIF + WB(2,5)=0 + F5C=1. + WC(1,5)=0 + IF(WW(2).NE.9898) THEN + WC(2,5)=-(PC(10)*BT(3,1)+PC(11)*BT(5,1))*CD14*F5C + ENDIF +C ASYMMETRICAL SEMIANNUAL +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + F7B=1. + F75B=1. + IF(WW(1).NE.9898) THEN + WB(1,7)=(PB(7)*BT(2,2)+PB(8)*BT(4,2)+PB(29)*BT(6,2) + $ +PB(89)*BT(3,2) + $ )*SSTL*F7B + $ +(PB(13)*BT(3,2)+PB(146)*BT(5,2)) + $ *CD14*SSTL*F75B*SWC(5) + $ + (PB(4)*BT(2,2)+PB(5)*BT(4,2)+PB(28)*BT(6,2) + $ +PB(88)*BT(3,2) + $ )*CSTL*F7B + $ +(PB(12)*BT(3,2)+PB(145)*BT(5,2)) + $ *CD14*CSTL*F75B*SWC(5) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,7)=-(PB(4)*BP(2,2)+PB(5)*BP(4,2)+PB(28)*BP(6,2) + $ +PB(88)*BP(3,2) + $ )*SSTL*F7B + $ -(PB(12)*BP(3,2)+PB(145)*BP(5,2)) + $ *CD14*SSTL*F75B*SWC(5) + $ + (PB(7)*BP(2,2)+PB(8)*BP(4,2)+PB(29)*BP(6,2) + $ +PB(89)*BP(3,2) + $ )*CSTL*F7B + $ +(PB(13)*BP(3,2)+PB(146)*BP(5,2)) + $ *CD14*CSTL*F75B*SWC(5) + ENDIF + F7C=1. + F75C=1. + IF(WW(1).NE.9898) THEN + WC(1,7)=-(PC(4)*BP(3,2)+PC(5)*BP(5,2)+PC(28)*BP(7,2) + $ +PC(88)*BP(2,2) + $ +PC(141)*BP(9,2)+PC(143)*BP(11,2) + $ )*SSTL*F7C + $ -(PC(12)*BP(2,2)+PC(145)*BP(4,2)) + $ *CD14*SSTL + $ *F75C*SWC(5) + $ +(PC(7)*BP(3,2)+PC(8)*BP(5,2)+PC(29)*BP(7,2) + $ +PC(89)*BP(2,2) + $ +PC(142)*BP(9,2)+PC(144)*BP(11,2) + $ )*CSTL*F7C + $ +(PC(13)*BP(2,2)+PC(146)*BP(4,2)) + $ *CD14*CSTL + $ *F75C*SWC(5) + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,7)=-(PC(7)*BT(3,2)+PC(8)*BT(5,2)+PC(29)*BT(7,2) + $ +PC(89)*BT(2,2) + $ +PC(142)*BT(9,2)+PC(144)*BT(11,2) + $ )*SSTL*F7C + $ -(PC(13)*BT(2,2)+PC(146)*BT(4,2)) + $ *CD14*SSTL + $ *F75C*SWC(5) + $ -(PC(4)*BT(3,2)+PC(5)*BT(5,2)+PC(28)*BT(7,2) + $ +PC(88)*BT(2,2) + $ +PC(141)*BT(9,2)+PC(143)*BT(11,2) + $ )*CSTL*F7C + $ -(PC(12)*BT(2,2)+PC(145)*BT(4,2)) + $ *CD14*CSTL + $ *F75C*SWC(5) + ENDIF + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + F8B=1.+PB(90)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WB(1,8)=(PB(9)*BT(3,3)+PB(43)*BT(5,3)+PB(111)*BT(7,3) + $ +PB(98)*BT(4,3) + $ +(PB(34)*BT(4,3)+PB(148)*BT(6,3))*CD14*SWC(5) + $ +(PB(37)*BT(4,3))*CD19B*SWC(6) + $ )*S2STL*F8B + $ +(PB(6)*BT(3,3)+PB(42)*BT(5,3)+PB(110)*BT(7,3) + $ +PB(96)*BT(4,3) + $ +(PB(24)*BT(4,3)+PB(147)*BT(6,3))*CD14*SWC(5) + $ +(PB(36)*BT(4,3))*CD19B*SWC(6) + $ )*C2STL*F8B + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,8)=-(PB(6)*BP(3,3)+PB(42)*BP(5,3)+PB(110)*BP(7,3) + $ +PB(96)*BP(4,3) + $ +(PB(24)*BP(4,3)+PB(147)*BP(6,3))*CD14*SWC(5) + $ +(PB(36)*BP(4,3))*CD19B*SWC(6) + $ )*S2STL*F8B + $ + (PB(9)*BP(3,3)+PB(43)*BP(5,3)+PB(111)*BP(7,3) + $ +PB(98)*BP(4,3) + $ +(PB(34)*BP(4,3)+PB(148)*BP(6,3))*CD14*SWC(5) + $ +(PB(37)*BP(4,3))*CD19B*SWC(6) + $ )*C2STL*F8B + ENDIF + F8C=1.+PC(90)*DFC*SWC(1) + IF(WW(1).NE.9898) THEN + WC(1,8)=-(PC(6)*BP(4,3)+PC(42)*BP(6,3)+PC(110)*BP(8,3) + $ +PC(96)*BP(3,3) + $ +(PC(24)*BP(3,3)+PC(147)*BP(5,3))*CD14*SWC(5) + $ +(PC(36)*BP(3,3))*CD19B*SWC(6) + $ )*S2STL*F8C + $ +(PC(9)*BP(4,3)+PC(43)*BP(6,3)+PC(111)*BP(8,3) + $ +PC(98)*BP(3,3) + $ +(PC(34)*BP(3,3)+PC(148)*BP(5,3))*CD14*SWC(5) + $ +(PC(37)*BP(3,3))*CD19B*SWC(6) + $ )*C2STL*F8C + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,8)=-(PC(9)*BT(4,3)+PC(43)*BT(6,3)+PC(111)*BT(8,3) + $ +PC(98)*BT(3,3) + $ +(PC(34)*BT(3,3)+PC(148)*BT(5,3))*CD14*SWC(5) + $ +(PC(37)*BT(3,3))*CD19B*SWC(6) + $ )*S2STL*F8C + $ - (PC(6)*BT(4,3)+PC(42)*BT(6,3) + $ +PC(96)*BT(3,3) + $ +PC(110)*BT(8,3) + $ +(PC(24)*BT(3,3)+PC(147)*BT(5,3))*CD14*SWC(5) + $ +(PC(36)*BT(3,3))*CD19B*SWC(6) + $ )*C2STL*F8C + ENDIF + 210 CONTINUE +C TERDIURNAL +C MAGNETIC ACTIVITY + IF(SW(9).EQ.0) GOTO 40 + IF(SW9.EQ.-1.) GOTO 30 +C daily AP + APD=AP(1)-4. + APDF=(APD+(PB(45)-1.)*(APD+(EXP(-PB(44)*APD)-1.)/PB(44))) +C APDFC=(APD+(PC(45)-1.)*(APD+(EXP(-PC(44)*APD)-1.)/PC(44))) + APDFC=APDF + IF(APD.EQ.0) GOTO 40 + IF(WW(1).NE.9898) THEN + WB(1,9)=(PB(46)*BT(3,1)+PB(35)*BT(5,1))*APDF + $ +(PB(122)*BT(2,2)+PB(123)*BT(4,2)+PB(124)*BT(6,2) + $ )*COS(HR*(STL-PB(125)))*APDF*SWC(7) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,9)= + $ (PB(122)*BP(2,2)+PB(123)*BP(4,2)+PB(124)*BP(6,2) + $ )*COS(HR*(STL-PB(125)+6.))*APDF*SWC(7) + ENDIF + IF(WW(1).NE.9898) THEN + WC(1,9)= + $ (PC(122)*BP(3,2)+PC(123)*BP(5,2)+PC(124)*BP(7,2) + $ )*COS(HR*(STL-PC(125)))*APDFC*SWC(7) + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,9)=-(PC(46)*BT(2,1)+PC(35)*BT(4,1))*APDFC + $ +(PC(122)*BT(3,2)+PC(123)*BT(5,2)+PC(124)*BT(7,2) + $ )*COS(HR*(STL-PC(125)+6.))*APDFC*SWC(7) + ENDIF + GO TO 40 + 30 CONTINUE + IF(PB(25).LT.1.E-4) PB(25)=1.E-4 + APT=G0(AP(2)) + IF(APT.EQ.0) GOTO 40 + IF(WW(1).NE.9898) THEN + WB(1,9)=(PB(97)*BT(3,1)+PB(55)*BT(5,1))*APT + $ +(PB(129)*BT(2,2)+PB(130)*BT(4,2)+PB(131)*BT(6,2) + $ )*COS(HR*(STL-PB(132)))*APT*SWC(7) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,9)= + $ (PB(129)*BP(2,2)+PB(130)*BP(4,2)+PB(131)*BP(6,2) + $ )*COS(HR*(STL-PB(132)+6.))*APT*SWC(7) + ENDIF + IF(WW(1).NE.9898) THEN + WC(1,9)= + $ (PC(129)*BP(3,2)+PC(130)*BP(5,2)+PC(131)*BP(7,2) + $ )*COS(HR*(STL-PC(132)))*APT*SWC(7) + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,9)=-(PC(97)*BT(2,1)+PC(55)*BT(4,1))*APT + $ +(PC(129)*BT(3,2)+PC(130)*BT(5,2)+PC(131)*BT(7,2) + $ )*COS(HR*(STL-PC(132)+6.))*APT*SWC(7) + ENDIF + 40 CONTINUE + WBT(1)=0 + WBT(2)=0 + WCT(1)=0 + WCT(2)=0 +C SUM WINDS AND CHANGE MERIDIONAL SIGN TO + NORTH + DO 50 K=1,NSW + WBT(1)=WBT(1)-ABS(SW(K))*WB(1,K) + WCT(1)=WCT(1)-ABS(SW(K))*WC(1,K) + WBT(2)=WBT(2)+ABS(SW(K))*WB(2,K) + WCT(2)=WCT(2)+ABS(SW(K))*WC(2,K) + 50 CONTINUE + IF(WW(1).NE.9898) WW(1)=WBT(1)*SW(24)+WCT(1)*SW(25) + IF(WW(2).NE.9898) WW(2)=WBT(2)*SW(24)+WCT(2)*SW(25) + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GLBW5S(IYD,LAT,LONG,STL,PB,PC,WW) + REAL LAT,LONG + DIMENSION WB(2,15),WC(2,15),PB(1),PC(1),WW(2) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/HWMC/WBT(2),WCT(2) + COMMON/VPOLY2/XVL,LVL,MVL,CLAT,SLAT,BT(20,20),BP(20,20) + COMMON/LTCOMP/TLL,NSVL,CSTL,SSTL,C2STL,S2STL,C3STL,S3STL + COMMON/LGCOMP/XLL,NGVL,CLONG,SLONG,C2LONG,S2LONG + SAVE + DATA DGTR/.017453/,SR/7.2722E-5/,HR/.2618/,DR/1.72142E-2/ + DATA PB14/-1./,PB18/-1./,PC14/-1./,PC18/-1./,PSET/5./ + DATA NSW/14/,WB/30*0/,WC/30*0/ +C CONFIRM PARAMETER SET + IF(PB(100).EQ.0) PB(100)=PSET + IF(PB(100).NE.PSET) THEN + WRITE(6,900) PSET,PB(100),PC(100) + 900 FORMAT(1X,'WRONG PARAMETER SET FOR GLBW5S',3F10.1) + STOP + ENDIF +C + DO 10 J=1,NSW + WB(1,J)=0 + WB(2,J)=0 + WC(1,J)=0 + WC(2,J)=0 + 10 CONTINUE + IYR = IYD/1000 + DAY = IYD - IYR*1000 +C + LV=7 + MV=2 + IF(XVL.NE.LAT.OR.LV.GT.LVL.OR.MV.GT.MVL) THEN + SLAT=SIN(DGTR*LAT) + CLAT=COS(DGTR*LAT) + CALL VSPHR1(SLAT,CLAT,LV,MV,BT,BP,20) + PLG10=SLAT + PLG30=(5.*SLAT*SLAT-3.)*SLAT/2. + XVL=LAT + LVL=LV + MVL=MV + ENDIF +C + NSV=2 + IF(TLL.NE.STL.OR.NSV.GT.NSVL) THEN + SSTL = SIN(HR*STL) + CSTL = COS(HR*STL) + S2STL = SIN(2.*HR*STL) + C2STL = COS(2.*HR*STL) + TLL = STL + NSVL=NSV + ENDIF + IF(DAY.NE.DAYL.OR.PB(14).NE.PB14) CD14B=COS(DR*(DAY-PB(14))) + IF(DAY.NE.DAYL.OR.PC(14).NE.PC14) CD14C=COS(DR*(DAY-PC(14))) + IF(DAY.NE.DAYL.OR.PB(18).NE.PB18) CD18B=COS(2.*DR*(DAY-PB(18))) + IF(DAY.NE.DAYL.OR.PC(18).NE.PC18) CD18C=COS(2.*DR*(DAY-PC(18))) + IF(DAY.NE.DAYL.OR.PB(19).NE.PB19) CD19B=COS(2.*DR*(DAY-PB(19))) + IF(DAY.NE.DAYL.OR.PB(25).NE.PB25) CD25B=COS(DR*(DAY-PB(25))) +C IF(DAY.NE.DAYL.OR.PC(25).NE.PC25) CD25C=COS(DR*(DAY-PC(25))) + IF(DAY.NE.DAYL.OR.PB(26).NE.PB26) CD26B=COS(DR*(DAY-PB(26))) +C IF(DAY.NE.DAYL.OR.PC(26).NE.PC26) CD26C=COS(DR*(DAY-PC(26))) + IF(DAY.NE.DAYL.OR.PC(32).NE.PC32) CD32C=COS(DR*(DAY-PC(32))) + IF(DAY.NE.DAYL.OR.PC(39).NE.PC39) CD39C=COS(2.*DR*(DAY-PC(39))) + IF(DAY.NE.DAYL.OR.PC(64).NE.PC64) CD64C=COS(DR*(DAY-PC(64))) + IF(DAY.NE.DAYL.OR.PC(87).NE.PC87) CD87C=COS(2.*DR*(DAY-PC(87))) + DAYL=DAY + PB14=PB(14) + PC14=PC(14) + PB18=PB(18) + PC18=PC(18) + PB19=PB(19) + PB25=PB(25) + PC25=PC(25) + PB26=PB(26) + PC26=PC(26) + PC32=PC(32) + PC39=PC(39) + PC64=PC(64) + PC87=PC(87) +C + NGV=1 + IF(XLL.NE.LONG.OR.NGV.GT.NGVL) THEN + SLONG=SIN(DGTR*LONG) + CLONG=COS(DGTR*LONG) + XLL=LONG + NGVL=NGV + ENDIF +C TIME INDEPENDENT + F1B=1. + IF(WW(1).NE.9898) THEN + WB(1,2)=(PB(2)*BT(3,1)+PB(3)*BT(5,1)+PB(23)*BT(7,1))*F1B + ENDIF + WB(2,2)=0. + F1C=1. + WC(1,2)=0. + IF(WW(2).NE.9898) THEN + WC(2,2)=-(PC(2)*BT(2,1)+PC(3)*BT(4,1)+PC(23)*BT(6,1))*F1C + $ -(PC(27)*BT(3,1)+PC(15)*BT(5,1)+PC(60)*BT(7,1))*F1C + ENDIF +C SYMMETRICAL ANNUAL + IF(WW(2).NE.9898) THEN + WC(2,3)=-(PC(48)*BT(2,1)+PC(30)*BT(4,1))*CD32C + ENDIF +C SYMMETRICAL SEMIANNUAL + IF(WW(1).NE.9898) THEN + WB(1,4)=(PB(17)*BT(3,1)+PB(31)*BT(5,1))*CD18B + ENDIF + WB(2,4)=0 + WC(1,4)=0 + IF(WW(2).NE.9898) THEN + WC(2,4)=-(PC(17)*BT(2,1)+PC(31)*BT(4,1)+PC(50)*BT(6,1))*CD18C + ENDIF +C ASYMMETRICAL ANNUAL + F5B=1. + IF(WW(1).NE.9898) THEN + WB(1,5)=(PB(10)*BT(2,1)+PB(11)*BT(4,1))*CD14B*F5B + ENDIF + WB(2,5)=0 + F5C=1. + WC(1,5)=0 + IF(WW(2).NE.9898) THEN + WC(2,5)=-(PC(10)*BT(3,1)+PC(11)*BT(5,1)+PC(21)*BT(7,1))*CD14C*F5C + ENDIF +C ASYMMETRICAL SEMIANNUAL + IF(WW(2).NE.9898) THEN + WC(2,6)=-(PC(38)*BT(3,1)+PC(99)*BT(5,1))*CD39C + ENDIF +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + F7B=1. + F75B=1. + IF(WW(1).NE.9898) THEN + WB(1,7)=(PB(7)*BT(2,2)+PB(8)*BT(4,2)+PB(29)*BT(6,2) + $ +PB(89)*BT(3,2) + $ )*SSTL*F7B + $ +(PB(13)*BT(3,2)) + $ *CD25B*SSTL*F75B*SWC(5) + $ + (PB(4)*BT(2,2)+PB(5)*BT(4,2)+PB(28)*BT(6,2) + $ +PB(88)*BT(3,2) + $ )*CSTL*F7B + $ +(PB(12)*BT(3,2)) + $ *CD25B*CSTL*F75B*SWC(5) + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,7)=-(PB(4)*BP(2,2)+PB(5)*BP(4,2)+PB(28)*BP(6,2) + $ +PB(88)*BP(3,2) + $ )*SSTL*F7B + $ -(PB(12)*BP(3,2)) + $ *CD25B*SSTL*F75B*SWC(5) + $ + (PB(7)*BP(2,2)+PB(8)*BP(4,2)+PB(29)*BP(6,2) + $ +PB(89)*BP(3,2) + $ )*CSTL*F7B + $ +(PB(13)*BP(3,2)) + $ *CD25B*CSTL*F75B*SWC(5) + ENDIF + F7C=1. + F75C=1. + IF(WW(1).NE.9898) THEN + WC(1,7)=-(PC(4)*BP(3,2)+PC(5)*BP(5,2)+PC(28)*BP(7,2) + $ +PC(88)*BP(2,2) + $ )*SSTL*F7C + $ -(PC(12)*BP(2,2)) + $ *CD25B*SSTL + $ *F75C*SWC(5) + $ +(PC(7)*BP(3,2)+PC(8)*BP(5,2)+PC(29)*BP(7,2) + $ +PC(89)*BP(2,2) + $ )*CSTL*F7C + $ +(PC(13)*BP(2,2)) + $ *CD25B*CSTL + $ *F75C*SWC(5) + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,7)=-(PC(7)*BT(3,2)+PC(8)*BT(5,2)+PC(29)*BT(7,2) + $ +PC(89)*BT(2,2) + $ )*SSTL*F7C + $ -(PC(13)*BT(2,2)) + $ *CD25B*SSTL + $ *F75C*SWC(5) + $ -(PC(4)*BT(3,2)+PC(5)*BT(5,2)+PC(28)*BT(7,2) + $ +PC(88)*BT(2,2) + $ )*CSTL*F7C + $ -(PC(12)*BT(2,2)) + $ *CD25B*CSTL + $ *F75C*SWC(5) + ENDIF + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + F8B=1. + IF(WW(1).NE.9898) THEN + WB(1,8)=(PB(9)*BT(3,3)+PB(43)*BT(5,3)+PB(35)*BT(7,3) + $ +PB(98)*BT(4,3) + $ +(PB(34)*BT(4,3))*CD26B*SWC(5) + $ +(PB(37)*BT(4,3))*CD19B*SWC(6) + $ )*S2STL*F8B + $ +(PB(6)*BT(3,3)+PB(42)*BT(5,3)+PB(33)*BT(7,3) + $ +PB(96)*BT(4,3) + $ +(PB(24)*BT(4,3))*CD26B*SWC(5) + $ +(PB(36)*BT(4,3))*CD19B*SWC(6) + $ )*C2STL*F8B + ENDIF + IF(WW(2).NE.9898) THEN + WB(2,8)=-(PB(6)*BP(3,3)+PB(42)*BP(5,3)+PB(33)*BP(7,3) + $ +PB(96)*BP(4,3) + $ +(PB(24)*BP(4,3))*CD26B*SWC(5) + $ +(PB(36)*BP(4,3))*CD19B*SWC(6) + $ )*S2STL*F8B + $ + (PB(9)*BP(3,3)+PB(43)*BP(5,3)+PB(35)*BP(7,3) + $ +PB(98)*BP(4,3) + $ +(PB(34)*BP(4,3))*CD26B*SWC(5) + $ +(PB(37)*BP(4,3))*CD19B*SWC(6) + $ )*C2STL*F8B + ENDIF + F8C=1. + IF(WW(1).NE.9898) THEN + WC(1,8)=-(PC(6)*BP(4,3)+PC(42)*BP(6,3)+PC(33)*BP(8,3) + $ +PC(96)*BP(3,3) + $ +(PC(24)*BP(3,3))*CD26B*SWC(5) + $ +(PC(36)*BP(3,3))*CD19B*SWC(6) + $ )*S2STL*F8C + $ +(PC(9)*BP(4,3)+PC(43)*BP(6,3)+PC(35)*BP(8,3) + $ +PC(98)*BP(3,3) + $ +(PC(34)*BP(3,3))*CD26B*SWC(5) + $ +(PC(37)*BP(3,3))*CD19B*SWC(6) + $ )*C2STL*F8C + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,8)=-(PC(9)*BT(4,3)+PC(43)*BT(6,3)+PC(35)*BT(8,3) + $ +PC(98)*BT(3,3) + $ +(PC(34)*BT(3,3))*CD26B*SWC(5) + $ +(PC(37)*BT(3,3))*CD19B*SWC(6) + $ )*S2STL*F8C + $ - (PC(6)*BT(4,3)+PC(42)*BT(6,3)+PC(33)*BT(8,3) + $ +PC(96)*BT(3,3) + $ +(PC(24)*BT(3,3))*CD26B*SWC(5) + $ +(PC(36)*BT(3,3))*CD19B*SWC(6) + $ )*C2STL*F8C + ENDIF + 210 CONTINUE +C LONGITUDINAL + IF(SW(10).EQ.0.OR.SW(11).EQ.0) GOTO 230 + IF(WW(1).NE.9898) THEN + WC(1,11)= + $ - (PC(65)*BP(2,2)+PC(66)*BP(4,2)+PC(67)*BP(6,2) + $ +PC(75)*BP(3,2)+PC(76)*BP(5,2)+ PC(77)*BP(7,2) + $ +(PC(57)*BP(2,2)+PC(59)*BP(4,2)+PC(62)*BP(6,2) + $ +PC(51)*BP(3,2)+PC(53)*BP(5,2)+PC(55)*BP(7,2)) + $ *CD64C*SWC(3) + $ +(PC(74)*BP(2,2)+PC(82)*BP(4,2)+PC(85)*BP(6,2) + $ +PC(68)*BP(3,2)+PC(70)*BP(5,2)+PC(72)*BP(7,2)) + $ *CD87C*SWC(4) + $ )*SLONG + $ + (PC(91)*BP(2,2)+PC(92)*BP(4,2)+PC(93)*BP(6,2) + $ +PC(78)*BP(3,2)+PC(79)*BP(5,2)+PC(80)*BP(7,2) + $ +(PC(58)*BP(2,2)+PC(61)*BP(4,2)+PC(63)*BP(6,2) + $ +PC(52)*BP(3,2)+PC(54)*BP(5,2)+PC(56)*BP(7,2)) + $ *CD64C*SWC(3) + $ +(PC(81)*BP(2,2)+PC(84)*BP(4,2)+PC(86)*BP(6,2) + $ +PC(69)*BP(3,2)+PC(71)*BP(5,2)+PC(73)*BP(7,2)) + $ *CD87C*SWC(4) + $ )*CLONG + ENDIF + IF(WW(2).NE.9898) THEN + WC(2,11)= + $ - (PC(91)*BT(2,2)+PC(92)*BT(4,2)+PC(93)*BT(6,2) + $ +PC(78)*BT(3,2)+PC(79)*BT(5,2)+PC(80)*BT(7,2) + $ +(PC(58)*BT(2,2)+PC(61)*BT(4,2)+PC(63)*BT(6,2) + $ +PC(52)*BT(3,2)+PC(54)*BT(5,2)+PC(56)*BT(7,2)) + $ *CD64C*SWC(3) + $ +(PC(81)*BT(2,2)+PC(84)*BT(4,2)+PC(86)*BT(6,2) + $ +PC(69)*BT(3,2)+PC(71)*BT(5,2)+PC(73)*BT(7,2)) + $ *CD87C*SWC(4) + $ )*SLONG + $ - (PC(65)*BT(2,2)+PC(66)*BT(4,2)+PC(67)*BT(6,2) + $ +PC(75)*BT(3,2)+PC(76)*BT(5,2)+PC(77)*BT(7,2) + $ +(PC(57)*BT(2,2)+PC(59)*BT(4,2)+PC(62)*BT(6,2) + $ +PC(51)*BT(3,2)+PC(53)*BT(5,2)+PC(55)*BT(7,2)) + $ *CD64C*SWC(3) + $ +(PC(74)*BT(2,2)+PC(82)*BT(4,2)+PC(85)*BT(6,2) + $ +PC(68)*BT(3,2)+PC(70)*BT(5,2)+PC(72)*BT(7,2)) + $ *CD87C*SWC(4) + $ )*CLONG + ENDIF + 230 CONTINUE + WBT(1)=0 + WBT(2)=0 + WCT(1)=0 + WCT(2)=0 +C SUM WINDS AND CHANGE MERIDIONAL SIGN TO + NORTH + DO 50 K=1,NSW + WBT(1)=WBT(1)-ABS(SW(K))*WB(1,K) + WCT(1)=WCT(1)-ABS(SW(K))*WC(1,K) + WBT(2)=WBT(2)+ABS(SW(K))*WB(2,K) + WCT(2)=WCT(2)+ABS(SW(K))*WC(2,K) + 50 CONTINUE + IF(WW(1).NE.9898) WW(1)=WBT(1)*SW(24)+WCT(1)*SW(25) + IF(WW(2).NE.9898) WW(2)=WBT(2)*SW(24)+WCT(2)*SW(25) + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE TSELEC(SV) +C SET SWITCHES +C SW FOR MAIN TERMS, SWC FOR CROSS TERMS + DIMENSION SV(1),SAV(25),SVV(1) + COMMON/CSW/SW(25),ISW,SWC(25) + DO 100 I = 1,25 + SAV(I)=SV(I) + SW(I)=AMOD(SV(I),2.) + IF(ABS(SV(I)).EQ.1.OR.ABS(SV(I)).EQ.2.) THEN + SWC(I)=1. + ELSE + SWC(I)=0. + ENDIF + 100 CONTINUE + ISW=64999 + RETURN + ENTRY TRETRV(SVV) + DO 200 I=1,25 + SVV(I)=SAV(I) + 200 CONTINUE + END +C----------------------------------------------------------------------- + SUBROUTINE VSPHR1(C,S,L,M,BT,BP,LMAX) +C CALCULATE VECTOR SPHERICAL HARMONIC B FIELD THETA AND PHI +C FUNCTIONS BT,BP THROUGH ORDER L,M FOR COLATITUDE (THETA) +C WITH COSINE C AND SINE S OF COLATITUDE +C BT(L+1,M+1)= [(L-M+1) P(L+1,M) - (L+1) P(L,M) COS(THETA)] / +C [SQRT(L(L+1)) SIN(THETA)] +C BP(L+1,M+1)= M P(L,M) /[SQRT(L(L+1)) SIN(THETA)] +C RESULT FOR GIVEN L,M SAVED IN BT AND BP AT ONE HIGHER INDEX NUM + DIMENSION BT(LMAX,1),BP(LMAX,1),PLG(20,20) + SAVE + DATA DGTR/1.74533E-2/ + IF(M.GT.L.OR.L.GT.LMAX-1) THEN + WRITE(6,100) L,M,LMAX + 100 FORMAT('ILLEGAL INDICIES TO VSPHER',3I6) + RETURN + ENDIF + BT(1,1)=0 + BP(1,1)=0 + IF(L.EQ.0.AND.M.EQ.0) RETURN + CALL LEGPL1(C,S,L+1,M,PLG,20) + IF(ABS(S).LT.1.E-5) THEN + IC=SIGN(1.,S) + S=0 + ENDIF + DO 20 LL=1,L + SQT=SQRT(FLOAT(LL)*(FLOAT(LL)+1)) + LMX=MIN(LL,M) + DO 15 MM=0,LMX + IF(S.EQ.0) THEN + IF(MM.NE.1) THEN + BT(LL+1,MM+1)=0 + BP(LL+1,MM+1)=0 + ELSE + BT(LL+1,MM+1)=(LL*(LL+1)*(LL+2)*.5*(IC)**(LL+2) + $ -(LL+1)*C*LL*(LL+1)*.5*(IC)**(LL+1))/SQT + BP(LL+1,MM+1)=MM*LL*(LL+1)*.5*(IC)**(LL+1)/SQT + ENDIF + ELSE + BT(LL+1,MM+1)=((LL-MM+1)*PLG(LL+2,MM+1) + $ -(LL+1)*C*PLG(LL+1,MM+1))/(S*SQT) + BP(LL+1,MM+1)=MM*PLG(LL+1,MM+1)/(S*SQT) + ENDIF + 15 CONTINUE + 20 CONTINUE + END +C----------------------------------------------------------------------- + SUBROUTINE LEGPL1(C,S,L,M,PLG,LMAX) +C CALCULATE LEGENDRE POLYNOMIALS PLG(L+1,M+1) THROUGH ORDER L,M +C FOR COSINE C AND SINE S OF COLATITUDE + DIMENSION PLG(LMAX,1) + SAVE + DATA DGTR/1.74533E-2/ + IF(M.GT.L.OR.L.GT.LMAX-1) THEN + WRITE(6,99) L,M,LMAX + 99 FORMAT(1X,'ILLEGAL INDICIES TO LEGPOL',3I5) + RETURN + ENDIF + PLG(1,1)=1. + IF(L.EQ.0.AND.M.EQ.0) RETURN +C CALCULATE L=M CASE AND L=M+1 + DO 10 MM=0,M + IF(MM.GT.0) PLG(MM+1,MM+1)=PLG(MM,MM)*(2.*MM-1.)*S + IF(L.GT.MM) PLG(MM+2,MM+1)=PLG(MM+1,MM+1)*(2.*MM+1)*C + 10 CONTINUE + IF(L.EQ.1) RETURN + MMX=MIN(M,L-2) + DO 30 MM=0,MMX + DO 20 LL=MM+2,L + PLG(LL+1,MM+1)=((2.*LL-1.)*C*PLG(LL,MM+1)- + $ (LL+MM-1.)*PLG(LL-1,MM+1))/(LL-MM) + 20 CONTINUE + 30 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINE(X,Y,N,YP1,YPN,Y2) +C CALCULATE 2ND DERIVATIVES OF CUBIC SPLINE INTERP FUNCTION +C X,Y: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C N: SIZE OF ARRAYS X,Y +C YP1,YPN: SPECIFIED DERIVATIVES AT X(1) AND X(N); VALUES +C >= 1E30 SIGNAL SIGNAL SECOND DERIVATIVE ZERO +C Y2: OUTPUT ARRAY OF SECOND DERIVATIVES + PARAMETER (NMAX=100) + DIMENSION X(N),Y(N),Y2(N),U(NMAX) + SAVE + IF(YP1.GT..99E30) THEN + Y2(1)=0 + U(1)=0 + ELSE + Y2(1)=-.5 + U(1)=(3./(X(2)-X(1)))*((Y(2)-Y(1))/(X(2)-X(1))-YP1) + ENDIF + DO 11 I=2,N-1 + SIG=(X(I)-X(I-1))/(X(I+1)-X(I-1)) + P=SIG*Y2(I-1)+2. + Y2(I)=(SIG-1.)/P + U(I)=(6.*((Y(I+1)-Y(I))/(X(I+1)-X(I))-(Y(I)-Y(I-1)) + $ /(X(I)-X(I-1)))/(X(I+1)-X(I-1))-SIG*U(I-1))/P + 11 CONTINUE + IF(YPN.GT..99E30) THEN + QN=0 + UN=0 + ELSE + QN=.5 + UN=(3./(X(N)-X(N-1)))*(YPN-(Y(N)-Y(N-1))/(X(N)-X(N-1))) + ENDIF + Y2(N)=(UN-QN*U(N-1))/(QN*Y2(N-1)+1.) + DO 12 K=N-1,1,-1 + Y2(K)=Y2(K)*Y2(K+1)+U(K) + 12 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINT(XA,YA,Y2A,N,X,Y) +C CALCULATE CUBIC SPLINE INTERP VALUE +C XA,YA: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C Y2A: ARRAY OF SECOND DERIVATIVES +C N: SIZE OF ARRAYS XA,YA,Y2A +C X: ABSCISSA FOR INTERPOLATION +C Y: OUTPUT VALUE + DIMENSION XA(N),YA(N),Y2A(N) + SAVE + KLO=1 + KHI=N + 1 CONTINUE + IF(KHI-KLO.GT.1) THEN + K=(KHI+KLO)/2 + IF(XA(K).GT.X) THEN + KHI=K + ELSE + KLO=K + ENDIF + GOTO 1 + ENDIF + H=XA(KHI)-XA(KLO) + IF(H.EQ.0) WRITE(6,*) 'BAD XA INPUT TO SPLINT' + A=(XA(KHI)-X)/H + B=(X-XA(KLO))/H + Y=A*YA(KLO)+B*YA(KHI)+ + $ ((A*A*A-A)*Y2A(KLO)+(B*B*B-B)*Y2A(KHI))*H*H/6. + RETURN + END +C----------------------------------------------------------------------- + BLOCK DATA INITW5 +C For wind model GWS + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/VPOLY2/XVL,LVL,MVL,CLAT,SLAT,BT(20,20),BP(20,20) + COMMON/LTCOMP/TLL,NSVL,CSTL,SSTL,C2STL,S2STL,C3STL,S3STL + COMMON/LGCOMP/XLL,NGVL,CLONG,SLONG,C2LONG,S2LONG + DATA ISW/0/ + DATA XVL/-999./,LVL/-1/,MVL/-1/ + DATA TLL/-999./,NSVL/-1/ + DATA XLL/-999./,NGVL/-1/ + END +C----------------------------------------------------------------------- + BLOCK DATA GWSBK5 +C HWM93 28-JAN-93 + COMMON/PARMW5/PBA1(50),PBA2(50),PBA3(50),PBA4(50), + $PCA1(50),PCA2(50),PCA3(50),PCA4(50), + $PBB1(50),PBB2(50),PBB3(50),PCB1(50),PCB2(50),PCB3(50), + $PBC1(50),PBC2(50),PBC3(50),PCC1(50),PCC2(50),PCC3(50), + $PBD1(50),PBD2(50),PBD3(50),PCD1(50),PCD2(50),PCD3(50), + $PBE1(50),PBE2(50),PBE3(50),PCE1(50),PCE2(50),PCE3(50), + $PBF1(50),PBF2(50),PBF3(50),PCF1(50),PCF2(50),PCF3(50), + $PBG1(50),PBG2(50),PBG3(50),PCG1(50),PCG2(50),PCG3(50), + $PBH1(50),PBH2(50),PBH3(50),PCH1(50),PCH2(50),PCH3(50), + $PBI1(50),PBI2(50),PCI1(50),PCI2(50),PBJ1(50),PBJ2(50), + $PCJ1(50),PCJ2(50),PBK1(50),PBK2(50),PCK1(50),PCK2(50), + $PBL1(50),PBL2(50),PCL1(50),PCL2(50),PBM1(50),PBM2(50), + $PCM1(50),PCM2(50),PBN1(50),PBN2(50),PCN1(50),PCN2(50), + $PBO1(50),PBO2(50),PCO1(50),PCO2(50),PBP1(50),PBP2(50), + $PCP1(50),PCP2(50),PBQ1(50),PBQ2(50),PCQ1(50),PCQ2(50), + $PBR1(50),PBR2(50),PCR1(50),PCR2(50),PBS1(50),PBS2(50), + $PCS1(50),PCS2(50),PBT1(50),PBT2(50),PCT1(50),PCT2(50), + $PBU1(50),PBU2(50),PCU1(50),PCU2(50) + COMMON/DATW/ISDATE(3),ISTIME(2),NAME(2) + DATA ISDATE/'28-J','AN-9','3 '/,ISTIME/'20:3','5:39'/ + DATA NAME/'HWM9','3 '/ +C WINF + DATA PBA1/ + * 0.00000E+00,-1.31640E+01,-1.52352E+01, 1.00718E+02, 3.94962E+00, + * 2.19452E-01, 8.03296E+01,-1.02032E+00,-2.02149E-01, 5.67263E+01, + * 0.00000E+00,-6.05459E+00, 6.68106E+00,-8.49486E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 8.39399E+01, 0.00000E+00, 9.96285E-02, + * 0.00000E+00,-2.66243E-02, 0.00000E+00,-1.32373E+00, 1.39396E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 3.36523E+01,-7.42795E-01,-3.89352E+00,-7.81354E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.76631E+00,-1.22024E+00, + * -5.47580E-01, 1.09146E+00, 9.06245E-01, 2.21119E-02, 0.00000E+00, + * 7.73919E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBA2/ + * -3.82415E-01, 0.00000E+00, 1.76202E-01, 0.00000E+00,-6.77651E-01, + * 1.10357E+00, 2.25732E+00, 0.00000E+00, 1.54237E+04, 0.00000E+00, + * 1.27411E-01,-2.84314E-03, 4.62562E-01,-5.34596E+01,-7.23808E+00, + * 0.00000E+00, 0.00000E+00, 4.52770E-01,-8.50922E+00,-2.85389E-01, + * 2.12000E+01, 6.80171E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -2.72552E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.64109E+03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.47320E+00,-2.98179E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.05412E-02, + * 4.93452E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 7.98332E-02,-5.30954E+01, 2.10211E-02, 3.00000E+00/ + DATA PBA3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.79843E-01, + * 1.81152E-01, 0.00000E+00, 0.00000E+00,-6.24673E-02,-5.37589E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.94418E-02, 3.70413E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.84645E+00, + * 4.24178E-01, 0.00000E+00, 0.00000E+00, 1.86494E-01,-9.56931E-02/ + DATA PBA4/ + * 2.08426E+00, 1.53714E+00,-2.87496E-01, 4.06380E-01,-3.59788E-01, + * -1.87814E-01, 0.00000E+00, 0.00000E+00, 2.01362E-01,-1.21604E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 7.86304E+00, + * 2.51878E+00, 2.91455E+00, 4.32308E+00, 6.77054E-02,-2.39125E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.57976E+00,-5.44598E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -5.30593E-01,-5.02237E-01,-2.05258E-01, 2.62263E-01,-2.50195E-01, + * 4.28151E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C WINF + DATA PCA1/ + * 0.00000E+00, 1.31026E+01,-4.93171E+01, 2.51045E+01,-1.30531E+01, + * 6.56421E-01, 2.75633E+01, 4.36433E+00, 1.04638E+00, 5.77365E+01, + * 0.00000E+00,-6.27766E+00, 2.33010E+00,-1.41351E+01, 2.49653E-01, + * 0.00000E+00, 0.00000E+00, 8.00000E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.03817E-02,-1.70950E+01,-1.92295E+00, 0.00000E+00, + * 0.00000E+00,-1.17490E+01,-7.14788E-01, 6.72649E+00, 0.00000E+00, + * 0.00000E+00,-1.57793E+02,-1.70815E+00,-7.92416E+00,-1.67372E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.87973E-01, + * -1.61602E-01,-1.13832E-01,-7.22447E-01, 2.21119E-02, 0.00000E+00, + * -3.01967E+00,-1.72798E-01,-5.15055E-03,-1.23477E-02, 3.60805E-03/ + DATA PCA2/ + * -1.36730E+00, 0.00000E+00, 1.24390E-02, 0.00000E+00,-1.36577E+00, + * 3.18101E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.39334E+01, + * 1.42088E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.72219E+00, + * -7.47970E+00,-4.96528E+00, 0.00000E+00, 1.24712E+00,-2.56833E+01, + * -4.26630E+01, 3.92431E+04,-2.57155E+00,-4.35589E-02, 0.00000E+00, + * 0.00000E+00, 2.02425E+00,-1.48131E+00,-7.72242E-01, 2.99008E+04, + * 4.50148E-03, 5.29718E-03,-1.26697E-02, 3.20909E-02, 0.00000E+00, + * 0.00000E+00, 7.01739E+00, 3.11204E+00, 0.00000E+00, 0.00000E+00, + * -2.13088E+00, 1.32789E+01, 5.07958E+00, 7.26537E-02, 2.87495E-01, + * 9.97311E-03,-2.56440E+00, 0.00000E+00, 0.00000E+00, 3.00000E+00/ + DATA PCA3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-9.90073E-03,-3.27333E-02, + * -4.30379E+01,-2.87643E+01,-5.91793E+00,-1.50460E+02, 0.00000E+00, + * 0.00000E+00, 6.55038E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.18051E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.40484E+00, 5.54554E+00, 0.00000E+00, 0.00000E+00, 7.93810E+00, + * 1.57192E+00, 1.03971E+00, 9.88279E-01,-4.37662E-02,-2.15763E-02/ + DATA PCA4/ + * -2.31583E+00, 4.32633E+00,-1.12716E+00, 3.38459E-01, 4.66956E-01, + * 7.18403E-01, 5.80836E-02, 4.12653E-01, 1.04111E-01,-8.30672E-02, + * -5.55541E+00,-4.97473E+00,-2.03007E+01, 0.00000E+00,-6.06235E-01, + * -1.73121E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 9.29850E-02,-6.38131E-02, + * 3.93037E-02, 5.21942E-02, 2.26578E-02, 4.13157E-02, 0.00000E+00, + * 6.28524E+00, 4.43721E+00,-4.31270E+00, 2.32787E+00, 2.55591E-01, + * 1.60098E+00,-1.20649E+00, 3.05042E+00,-1.88944E+00, 5.35561E+00, + * 2.02391E-01, 4.62950E-02, 3.39155E-01, 7.94007E-02, 6.30345E-01, + * 1.93554E-01, 3.93238E-01, 1.76254E-01,-2.51359E-01,-7.06879E-01/ +C UGN1(1) + DATA PBB1/ + * 6.22831E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 5.90566E+00, 0.00000E+00, 0.00000E+00,-3.20571E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.30368E-01, 1.39396E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.40657E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-4.80790E+00,-1.62744E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBB2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PBB3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.10531E-01, + * -8.94829E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UGN1(1) + DATA PCB1/ + * 5.45009E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -3.60304E+00, 0.00000E+00, 0.00000E+00,-5.04071E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.62113E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.14657E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 4.65483E-01, 1.73636E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCB2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PCB3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.30769E-01, + * 7.73649E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(1) + DATA PBC1/ + * 6.09940E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.39396E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBC2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PBC3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(1) + DATA PCC1/ + * 5.46739E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCC2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PCC3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(2) + DATA PBD1/ + * 4.99007E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 2.59994E+00, 0.00000E+00, 0.00000E+00,-1.78418E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.24986E+00, 1.39396E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.77918E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBD2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PBD3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.68996E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(2) + DATA PCD1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -7.26156E+00, 0.00000E+00, 0.00000E+00,-4.12416E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.88934E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.65720E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCD2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PCD3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.01835E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(3) + DATA PBE1/ + * 0.00000E+00,-1.37217E+01, 0.00000E+00, 2.38712E-01,-3.92230E+00, + * 6.11035E+00,-1.57794E+00,-5.87709E-01, 1.21178E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.23202E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.22836E+03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.94006E+00, 1.39396E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.99844E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.38936E+00, 2.22534E+00, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBE2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PBE3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 4.35518E-01, 8.40051E-01, 0.00000E+00,-8.88181E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.81729E-01, 9.67536E-01, + * 0.00000E+00,-9.67836E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(3) + DATA PCE1/ + * 0.00000E+00,-2.75655E+01,-6.61134E+00, 4.85118E+00, 8.15375E-01, + * -2.62856E+00, 2.99508E-02,-2.00532E-01,-9.35618E+00, 1.17196E+01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.43848E+00, 1.90065E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-3.37525E-01, 1.76471E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCE2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PCE3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-9.23682E-01,-8.84150E-02, 0.00000E+00,-9.88578E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.00747E+00,-1.07468E-02, + * 0.00000E+00,-3.66376E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(4) + DATA PBF1/ + * 0.00000E+00, 1.02709E+01, 0.00000E+00,-1.42016E+00,-4.90438E+00, + * -9.11544E+00,-3.80570E+00,-2.09013E+00, 1.32939E+01,-1.28062E+01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.23024E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 3.92126E+02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.39396E-02, + * 0.00000E+00, 0.00000E+00,-5.56532E+00,-1.27046E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-3.03553E+00,-9.09832E-01, 2.21119E-02, 0.00000E+00, + * 8.89965E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBF2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 9.19210E-01, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PBF3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.46693E-01, 7.44650E-02, 3.84661E-01, 9.44052E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.25083E-01, 1.54206E-01, + * 4.41303E-01, 8.74742E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(4) + DATA PCF1/ + * 0.00000E+00, 3.61143E+00,-8.24679E+00, 1.70751E+00, 1.16676E+00, + * 6.24821E+00,-5.68968E-01, 8.53046E-01,-6.94168E+00, 1.04152E+01, + * -3.70861E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.23336E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.33958E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-6.43682E-01,-1.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.00000E+00, 0.00000E+00,-5.47300E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-8.58764E-01, 4.72310E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCF2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PCF3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 3.37325E-01,-3.57698E-02,-6.97393E-01, 1.35387E+01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.78162E-01,-2.33383E-01, + * -7.12994E-01, 1.29234E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(5) + DATA PBG1/ + * 0.00000E+00,-1.71856E+00, 5.32877E+00, 5.33548E-01,-2.66034E+00, + * 6.76192E-01, 2.25618E+00,-5.78954E-01,-2.69685E+00, 1.21933E+00, + * -6.13650E+00, 7.79531E-01, 1.63652E+00, 3.63835E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 7.51539E+00,-5.27337E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.06625E-01, 1.39396E-02, + * 0.00000E+00, 0.00000E+00,-1.07240E+00,-8.31257E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 7.04016E-01, 0.00000E+00, + * 7.56158E-01,-4.21268E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.02843E+00, 5.21034E-01, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBG2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.12504E+00, 1.08459E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -3.16261E-01, 0.00000E+00,-1.44288E-01, 0.00000E+00, 4.00000E+00/ + DATA PBG3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.36181E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN1(5) + DATA PCG1/ + * 0.00000E+00, 3.47155E+00, 1.76102E+01, 2.80371E+00,-2.08556E+00, + * 1.10473E+00, 6.74582E+00,-5.75988E-01, 1.02708E+00,-2.23381E+01, + * 8.60171E+00, 5.12046E-01,-8.12861E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 9.11036E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 3.89742E+00, 2.01725E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 5.06308E-01, 2.04596E-01, 0.00000E+00, + * 4.40377E+00, 0.00000E+00, 0.00000E+00, 2.20760E+00, 0.00000E+00, + * -1.36478E+00, 2.38097E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-7.08949E-02,-1.61277E-01, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCG2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.16898E+00,-5.31596E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 2.53060E+00, 0.00000E+00,-7.17287E-01, 0.00000E+00, 4.00000E+00/ + DATA PCG3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.91762E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UGN1(2 + DATA PBH1/ + * 0.00000E+00,-7.70936E-01, 1.58158E+00, 3.61790E+00,-1.51748E+00, + * -5.66098E-01, 1.69393E+00,-4.60489E-01,-8.31527E-01,-4.66437E-01, + * -1.21750E+00, 0.00000E+00, 0.00000E+00, 1.56505E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-5.19321E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.39396E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 3.09223E-01, 1.33715E-01, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBH2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PBH3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UGN1(2) + DATA PCH1/ + * 0.00000E+00, 1.72324E-01, 3.08033E-01, 4.55771E-01, 1.46516E-01, + * 1.97176E-01,-1.53329E-01, 6.91877E-02,-3.07184E-01, 2.65686E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.24369E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.04079E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 4.99627E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-7.83317E-03,-6.88967E-02, 2.21119E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCH2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.00000E+00/ + DATA PCH3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C UN2(2) + DATA PBI1/ + * 0.00000E+00,-7.99767E-01,-3.24774E-01, 7.70975E-01, 6.71796E-01, + * 5.65483E-01,-2.99727E+00, 3.32448E+00,-9.15018E-01, 5.97656E+00, + * 0.00000E+00,-1.19515E+00,-8.30457E-01, 3.26074E+00, 0.00000E+00, + * 0.00000E+00,-1.58365E+00, 7.44825E-02, 5.91372E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.41511E-01,-3.01048E+00, + * 2.35960E+01, 0.00000E+00,-1.70352E+00,-2.39746E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.30488E+00, 0.00000E+00, + * 5.95132E-01, 5.64301E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 5.30317E-01, 5.66569E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBI2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 5.72367E+00, 1.58411E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.04557E-01, 0.00000E+00,-2.04710E-01, 0.00000E+00, 5.00000E+00/ +C UN2(2) + DATA PCI1/ + * 0.00000E+00, 6.34487E+00, 9.84162E+00, 3.42136E+00,-5.10607E+00, + * -8.58745E-02, 3.11501E+00, 5.34570E-01, 1.18027E+00, 4.28027E+00, + * 4.75123E+00, 6.40947E-01,-4.15165E+00,-1.38154E+01, 0.00000E+00, + * 0.00000E+00, 1.13145E+01,-5.15954E+00, 0.00000E+00, 0.00000E+00, + * 1.35576E+01, 0.00000E+00,-5.78982E+00,-2.22043E+00, 3.36776E+00, + * 3.04791E+01, 0.00000E+00, 2.94709E+00,-4.17536E-01,-1.59855E+00, + * -2.18320E+00, 1.68269E+01, 0.00000E+00, 1.00829E+00, 0.00000E+00, + * -6.85096E-01, 2.07822E-01, 3.50168E-01,-3.03662E+01, 0.00000E+00, + * 0.00000E+00,-1.65726E-01,-8.97831E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-5.24159E+00, 0.00000E+00,-3.52218E+00/ + DATA PCI2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 5.69093E-01,-7.44918E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 2.10865E+00, 0.00000E+00, 1.76776E-01, 1.54755E+00, 5.00000E+00/ +C UN2(3) + DATA PBJ1/ + * 0.00000E+00, 2.28657E+00, 4.96548E-01, 6.99915E+00,-2.31540E+00, + * -1.82163E-01,-5.00779E-01, 3.18199E-01,-6.14645E-01, 6.34816E+00, + * 0.00000E+00, 7.94635E-01,-5.55565E-01, 3.85494E+00, 0.00000E+00, + * 0.00000E+00,-3.96109E+00, 1.90775E-01, 4.51396E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.04618E-01,-4.14385E+00, + * 2.30244E+01, 0.00000E+00, 1.00689E+00, 5.75680E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.56741E-01, 0.00000E+00, + * 9.54921E-02, 5.56659E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.38503E-01, 4.50415E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBJ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.22813E-01,-8.63549E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.37970E-01, 0.00000E+00,-3.25612E-01, 0.00000E+00, 5.00000E+00/ +C UN2(3) + DATA PCJ1/ + * 0.00000E+00, 5.07608E+00, 3.31479E+00, 3.01548E-01,-1.12100E+00, + * -7.63711E-02, 2.29748E+00,-1.36699E+00, 7.53433E-01, 3.60702E+01, + * -1.55266E+00, 1.47382E+00,-2.53895E+00,-1.47720E+01, 0.00000E+00, + * 0.00000E+00, 1.11787E+01,-1.06256E+01, 0.00000E+00, 0.00000E+00, + * 7.86391E+00, 0.00000E+00,-8.61020E+00,-1.59313E+00,-5.17013E+00, + * 1.20468E+00, 0.00000E+00, 5.76509E-01, 9.96195E-01,-1.45539E+00, + * -1.79950E+01, 8.76957E+00, 0.00000E+00,-1.22863E+00, 0.00000E+00, + * -6.19019E-01,-1.09571E-01,-4.31325E-02,-4.21981E+01, 0.00000E+00, + * 0.00000E+00,-1.51519E-01,-1.24067E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-6.39248E+00, 0.00000E+00, 6.64508E-01/ + DATA PCJ2/ + * -7.33184E-01,-9.72031E-03, 1.36789E+00,-8.62311E-01,-3.06395E-03, + * 2.53354E-01,-2.40918E-01,-4.06932E-02,-5.82223E-01, 0.00000E+00, + * -8.70285E-01, 7.72318E-01,-6.54213E-01,-2.19231E+01,-1.56509E-01, + * 2.71745E-01, 5.93538E-01, 2.27757E-01,-5.98215E-01, 3.96457E-01, + * 2.98705E-01, 1.78618E-01,-5.24538E-01, 1.16439E-01, 7.56829E-02, + * -4.26809E-01, 5.77187E-01, 8.65450E-01,-7.53614E-01, 1.38381E-01, + * -1.82265E-01, 2.85263E-01, 4.51322E-01, 1.02775E-01, 3.55731E-01, + * -4.60896E-01,-3.13037E+01,-2.70818E+00,-7.84847E-01, 0.00000E+00, + * -1.03473E-01,-3.87649E-01,-1.22613E-01, 0.00000E+00, 0.00000E+00, + * 8.91325E-01, 0.00000E+00, 1.06189E-01, 9.13030E-02, 5.00000E+00/ +C UN2(4) + DATA PBK1/ + * 0.00000E+00, 2.94921E+00, 2.79238E+00, 2.58949E+00, 3.56459E-01, + * 3.12952E-01, 3.34337E+00,-2.83209E+00,-1.05979E+00, 3.92313E+00, + * 0.00000E+00, 1.73703E-01,-3.23441E-01, 4.15836E+00, 0.00000E+00, + * 0.00000E+00,-1.77156E+00, 6.44113E-01, 1.88743E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.64778E-01,-4.23560E+00, + * 2.27271E+01, 0.00000E+00,-4.89468E-01, 1.82689E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.38217E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 8.62449E-02, 4.46041E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBK2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.40393E-01, 1.01821E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(4) + DATA PCK1/ + * 0.00000E+00, 6.04465E+00, 4.50924E+00, 3.84425E-02,-8.70772E-01, + * -9.55408E-02, 2.28287E+00,-4.37834E-01, 3.57839E-01, 7.20721E+01, + * -4.41757E+00,-9.13648E-01,-8.71866E-01,-6.26173E+00, 0.00000E+00, + * 0.00000E+00, 5.92817E+00, 6.15853E+00, 0.00000E+00, 0.00000E+00, + * -4.89060E+00, 0.00000E+00,-8.30378E+00, 1.07462E-01, 1.08471E+02, + * 3.39150E+01,-4.57863E+00,-7.18349E-02,-2.71703E-01,-8.96297E+00, + * -2.37986E+01, 4.11880E+00, 0.00000E+00,-9.95820E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-8.91622E+00,-6.85950E+01, 0.00000E+00, + * 0.00000E+00,-3.62769E-02,-1.65893E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.94563E+00, 0.00000E+00, 1.23581E+00/ + DATA PCK2/ + * -6.06026E-01,-6.50229E-01, 1.91330E+00,-1.00314E+00, 1.13346E-01, + * 4.21885E-01,-3.97688E-01,-2.77437E-01,-6.65893E-01, 0.00000E+00, + * -1.37646E+00, 1.35171E+00,-9.55595E-01,-1.96450E+01,-2.50039E-01, + * 5.93389E-01, 9.87131E-01, 5.43559E-01,-1.04322E+00, 6.32546E-01, + * 3.73259E-01, 5.22657E-01,-5.81400E-01,-1.26425E-01,-1.29843E-01, + * -5.36598E-01, 8.02402E-01, 9.04347E-01,-1.10799E+00, 1.24800E-01, + * 1.62487E-02, 2.84237E-01,-1.68866E+00, 5.07723E-01, 5.14161E-01, + * -4.71292E-01,-3.03487E+01, 4.17455E-01,-1.12591E+00, 0.00000E+00, + * -3.03544E-01,-6.60313E-01,-1.48606E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.00607E+01, 5.00000E+00/ +C UN2(5) + DATA PBL1/ + * 0.00000E+00, 2.52207E+00, 3.84550E+00, 1.68023E+00, 7.93489E-01, + * 3.93725E-02,-2.79707E+00,-4.76621E-01,-1.19972E-01, 3.20454E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.17146E+00, 0.00000E+00, + * 0.00000E+00,-5.30699E-01, 9.14373E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-4.84434E-02, 1.85902E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBL2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(5) + DATA PCL1/ + * 0.00000E+00, 1.55386E+01, 4.21418E+00,-9.70151E-01,-8.77326E-01, + * 2.65813E-02, 1.40164E+00,-9.03874E-01, 3.17281E-03, 9.26891E+01, + * -4.96004E+00, 0.00000E+00, 0.00000E+00,-4.17851E+00, 0.00000E+00, + * 0.00000E+00,-1.14760E+01, 2.67744E+00, 0.00000E+00, 0.00000E+00, + * -1.60056E+01, 0.00000E+00,-7.14647E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.89639E+00, 0.00000E+00, 0.00000E+00,-3.88601E+00, + * -1.65784E+01, 8.44796E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-3.75324E+00,-6.24047E+01, 0.00000E+00, + * 0.00000E+00,-2.86808E-02,-1.95891E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-3.10534E-01, 0.00000E+00,-3.37448E+00/ + DATA PCL2/ + * 1.63964E-02,-1.45191E+00, 1.85618E+00,-9.61979E-01, 3.93783E-01, + * 4.21681E-01,-5.30254E-01,-2.96232E-01,-7.55211E-01, 0.00000E+00, + * -1.85443E+00, 1.88047E+00,-1.07818E+00,-1.35373E+01,-3.05785E-01, + * 7.82159E-01, 1.32586E+00, 2.34413E-01,-7.47152E-01, 9.92893E-01, + * -2.80110E-02, 3.61747E-01,-4.16280E-01,-3.46427E-01,-5.76431E-01, + * -2.13906E-01, 9.51184E-01, 3.69403E-01,-1.35563E+00, 6.59534E-02, + * 1.39764E-01, 4.50687E-01,-1.22025E+00, 5.73280E-02, 7.49303E-01, + * -8.37947E-01,-3.01332E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -4.36697E-01,-7.76068E-01,-1.41680E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.21958E+01, 5.00000E+00/ +C UN2(6) + DATA PBM1/ + * 0.00000E+00, 3.13842E+00,-8.20417E-01, 3.72282E+00,-5.20477E-01, + * -3.61867E-01,-2.92604E+00, 3.13013E-01,-1.38865E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.30060E+01, 0.00000E+00, + * 0.00000E+00, 1.67696E+00, 9.85990E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-8.46922E-02, 5.59429E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBM2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(6) + DATA PCM1/ + * 0.00000E+00, 1.78539E+01, 1.07314E+01,-1.13212E+00, 1.59867E-02, + * 1.53736E-01, 2.25710E+00,-9.39080E-01,-9.72620E-02, 9.89789E+01, + * -5.17469E+00, 0.00000E+00, 0.00000E+00,-2.98597E+00, 0.00000E+00, + * 0.00000E+00,-2.04707E+01, 4.92899E+00, 0.00000E+00, 0.00000E+00, + * -1.44316E+01, 0.00000E+00,-3.31557E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-6.22743E+00, 0.00000E+00, 0.00000E+00,-4.34344E+00, + * -8.29640E+00,-3.03800E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.79387E+00,-5.23752E+01, 0.00000E+00, + * 0.00000E+00,-2.59963E-02,-1.73426E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-5.37220E+00, 0.00000E+00,-6.53478E-01/ + DATA PCM2/ + * 3.48181E-01,-1.88980E+00, 1.47787E+00,-7.92670E-01, 6.49224E-01, + * 5.96079E-01,-1.04901E+00,-5.24003E-01,-6.77311E-01, 0.00000E+00, + * -2.26873E+00, 2.80910E+00,-9.84994E-01,-6.79661E+00,-3.71975E-01, + * 1.13310E+00, 1.57164E+00, 2.15176E-01,-5.58583E-01, 1.16045E+00, + * 2.05395E-02, 2.27714E-01, 1.41203E-01,-3.92231E-01,-8.82859E-01, + * 4.90400E-01, 1.14013E+00,-2.25250E-01,-1.64930E+00, 5.73434E-02, + * 1.89857E-01, 4.31221E-01,-1.35345E+00,-2.94189E-01, 6.87530E-01, + * -7.78284E-01,-2.88975E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -3.98115E-01,-7.40699E-01,-8.28264E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.02069E+00, 5.00000E+00/ +C UN2(7) + DATA PBN1/ + * 0.00000E+00, 2.08818E+00,-1.96235E+00, 4.55317E+00,-1.76012E+00, + * -4.75258E-01,-1.44220E+00,-3.28566E-01,-1.41177E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.49146E+01, 0.00000E+00, + * 0.00000E+00, 1.73222E+00, 9.91286E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.35468E-01, 1.91833E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBN2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(7) + DATA PCN1/ + * 0.00000E+00, 1.25645E+01, 2.43937E+01,-4.89691E-01,-5.46437E-01, + * 1.22200E-01, 2.89309E+00,-2.85509E-01,-2.27122E-01, 9.54192E+01, + * -4.07394E+00, 0.00000E+00, 0.00000E+00,-3.04354E+00, 0.00000E+00, + * 0.00000E+00,-2.36547E+01, 1.04903E+01, 0.00000E+00, 0.00000E+00, + * -8.32274E+00, 0.00000E+00,-3.34712E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-7.95953E+00, 0.00000E+00, 0.00000E+00,-5.83474E+00, + * -1.48074E+00, 1.02268E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 6.19470E+00,-3.90767E+01, 0.00000E+00, + * 0.00000E+00,-3.58136E-03, 1.22289E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-8.49787E+00, 0.00000E+00,-3.97498E+00/ + DATA PCN2/ + * 3.79580E-01,-1.93595E+00, 2.89114E+00,-4.73457E-01, 7.67548E-01, + * 5.66859E-01,-1.28683E+00,-8.37174E-01,-3.48022E-01, 0.00000E+00, + * -2.62865E+00, 3.50575E+00,-7.93257E-01,-8.10692E-01,-4.99450E-01, + * 1.56654E+00, 1.63039E+00, 7.58900E-02,-4.30952E-01, 1.23068E+00, + * 1.06404E-01, 4.73870E-02, 5.50559E-01,-4.11375E-01,-9.94162E-01, + * 1.35025E+00, 1.26053E+00,-7.34502E-01,-2.01952E+00, 2.05398E-01, + * -4.77248E-02, 2.41549E-01,-9.32522E-01,-5.63663E-01, 5.34833E-01, + * -5.77563E-01,-2.65033E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -2.42317E-01,-7.33679E-01,-7.85537E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.56842E-01, 5.00000E+00/ +C UN2(8) + DATA PBO1/ + * 0.00000E+00, 7.00409E-01,-4.17017E-01, 3.24757E+00,-1.28352E+00, + * -4.23875E-01, 1.64346E+00,-1.20855E+00,-7.65316E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.39417E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.68534E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.56444E-01,-4.60043E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBO2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(8) + DATA PCO1/ + * 0.00000E+00, 7.30129E+00, 3.14811E+01,-7.06834E-02,-2.96193E-01, + * 1.73817E-01, 1.62127E+00,-2.71556E-01,-2.05844E-01, 8.02088E+01, + * -1.86956E-01, 0.00000E+00, 0.00000E+00,-9.43641E-01,-3.24716E+00, + * 0.00000E+00,-2.32748E+01, 1.96724E+01, 0.00000E+00, 0.00000E+00, + * -3.95949E+00, 0.00000E+00, 5.44787E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.00161E+01, 0.00000E+00, 0.00000E+00,-4.57422E+00, + * 4.31304E+00, 1.49868E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 5.99489E+00,-2.82120E+01, 0.00000E+00, + * 0.00000E+00, 4.03624E-02, 1.19463E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.39050E+01, 0.00000E+00,-2.65634E+00/ + DATA PCO2/ + * 6.37036E-01,-1.77461E+00, 3.03103E+00,-1.49839E-01, 7.02027E-01, + * 6.08841E-01,-9.27289E-01,-8.52362E-01, 5.61723E-01, 0.00000E+00, + * -2.72061E+00, 3.66183E+00,-2.54943E-01, 2.94668E+00,-3.57898E-01, + * 1.71858E+00, 1.58782E+00,-2.42995E-01,-3.57783E-01, 1.20157E+00, + * 2.58895E-01,-1.05773E-01, 5.79397E-01,-3.30395E-01,-4.03569E-01, + * 1.99175E+00, 1.21688E+00,-8.64350E-01,-1.95569E+00, 4.61136E-01, + * -8.61382E-02, 3.38859E-01, 0.00000E+00,-5.78864E-01, 4.46659E-01, + * -4.57428E-01,-1.99920E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -1.19841E-01,-4.56968E-01, 2.00180E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.07368E+00, 5.00000E+00/ +C UN2(9) + DATA PBP1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.75863E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 3.18522E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBP2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(9) + DATA PCP1/ + * 0.00000E+00, 4.61019E-02, 3.50615E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.15349E+01, + * 4.28634E+00, 0.00000E+00, 0.00000E+00, 6.03982E+00,-4.72305E+00, + * 0.00000E+00,-1.43678E+01, 3.62580E+01, 0.00000E+00, 0.00000E+00, + * 1.26574E+00, 0.00000E+00,-2.77285E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.14802E+01, 0.00000E+00, 0.00000E+00,-1.11940E+01, + * -1.39535E+00, 2.63070E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.53024E+00,-2.14609E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.26956E+01, 0.00000E+00, 5.49926E+00/ + DATA PCP2/ + * 9.80142E-01,-1.19016E+00, 2.75110E+00, 4.23423E-01, 5.89893E-01, + * 4.94288E-01,-5.25954E-01,-8.51760E-01, 1.62676E+00, 0.00000E+00, + * -1.90027E+00, 3.19950E+00, 4.72739E-01, 7.04179E+00,-1.43685E-03, + * 1.43219E+00, 1.32136E+00,-2.92744E-03,-3.43680E-01, 7.75735E-01, + * 6.92202E-01,-1.45519E-01, 6.97813E-02,-3.11588E-01, 6.65750E-01, + * 2.33809E+00, 1.06694E+00,-5.77590E-01,-1.33717E+00, 8.13367E-01, + * -5.05737E-01, 5.99169E-01,-8.83386E-01,-4.38123E-01, 2.63649E-01, + * -3.03448E-01,-1.28190E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.45478E-02, 1.45491E-01, 2.40080E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.86910E+00, 5.00000E+00/ +C UN2(10) + DATA PBQ1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.10647E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 3.13252E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBQ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(10) + DATA PCQ1/ + * 0.00000E+00,-3.03260E+00, 3.15488E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.42798E+01, + * 7.08849E+00, 0.00000E+00, 0.00000E+00, 1.64773E+01,-6.86505E+00, + * 0.00000E+00,-6.27112E+00, 3.78373E+01, 0.00000E+00, 0.00000E+00, + * 2.97763E+00, 0.00000E+00,-3.44134E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.19424E+01, 0.00000E+00, 0.00000E+00,-1.64645E+01, + * -2.27053E+00, 3.82330E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.33140E-01,-2.08131E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-7.04687E+00, 0.00000E+00, 6.52184E+00/ + DATA PCQ2/ + * 7.31799E-01,-2.75395E-01, 1.92467E+00, 8.71269E-01, 3.72836E-01, + * 3.04967E-01, 7.72480E-02,-5.08596E-01, 1.99828E+00, 0.00000E+00, + * -5.51169E-01, 2.12420E+00, 8.96069E-01, 1.12092E+01,-4.30438E-02, + * 7.38391E-01, 6.12050E-01, 3.62981E-02,-1.02054E-01, 1.82404E-01, + * 3.70643E-01,-1.68899E-01,-1.79628E-01,-1.21117E-01, 1.45823E+00, + * 2.04352E+00, 7.83711E-01,-3.42979E-02,-2.31363E-01, 7.11253E-01, + * -3.16353E-01, 6.21069E-01,-1.05676E+00,-4.03488E-01, 4.11595E-01, + * -2.12535E-01,-6.51453E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.48238E-01, 6.38716E-01, 2.99311E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.01846E+00, 5.00000E+00/ +C UN2(11) + DATA PBR1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.21764E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 6.77475E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBR2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(11) + DATA PCR1/ + * 0.00000E+00,-1.74115E+00, 2.66621E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.13017E+01, + * 6.86985E+00, 0.00000E+00, 0.00000E+00, 2.08835E+01,-7.86030E+00, + * 0.00000E+00,-3.77141E+00, 3.87788E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.31580E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-9.98927E+00, 0.00000E+00, 0.00000E+00,-1.71002E+01, + * -9.88358E-01, 4.47756E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 5.95029E-01,-2.11313E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-3.84164E+00, 0.00000E+00, 0.00000E+00/ + DATA PCR2/ + * 3.07191E-01, 4.79094E-02, 6.72159E-01, 5.54185E-01, 1.82847E-01, + * -1.23768E-02, 1.91637E-01,-2.89429E-02, 1.18297E+00, 0.00000E+00, + * 2.37450E-01, 9.23551E-01, 6.05670E-01, 1.35990E+01,-1.64210E-01, + * 5.38355E-03,-4.91246E-02,-1.06966E-01,-2.09635E-01,-3.23023E-02, + * -3.41663E-02,-3.48871E-02,-2.62450E-01, 2.21492E-01, 1.43749E+00, + * 1.08677E+00, 3.97778E-01, 3.61526E-01, 5.55950E-01, 3.53058E-01, + * -5.93339E-02, 4.14203E-01,-6.05024E-01,-1.38714E-01, 2.78897E-01, + * -8.92889E-02,-3.59033E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 9.90623E-02, 4.36170E-01, 7.95418E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.11426E+00, 5.00000E+00/ +C UN2(12) + DATA PBS1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.07320E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.60738E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBS2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(12) + DATA PCS1/ + * 0.00000E+00, 1.26217E+01, 2.30787E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00029E+01, + * -2.88682E+00, 0.00000E+00, 0.00000E+00, 2.09439E+01,-4.56923E+00, + * 0.00000E+00,-2.15929E+00, 3.87149E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-7.98039E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-6.63423E+00, 0.00000E+00, 0.00000E+00,-5.84850E+00, + * 3.72111E+00, 4.52300E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 3.21872E-01, 0.00000E+00, 0.00000E+00/ + DATA PCS2/ + * 1.09405E-02,-4.35341E-02, 8.00586E-02, 1.48577E-01, 1.01602E-01, + * -1.01104E-01,-1.98993E-02, 3.51174E-02, 2.41112E-01, 0.00000E+00, + * 2.76479E-01, 1.97043E-01, 2.68708E-01, 1.39832E+01,-1.56638E-01, + * -2.39101E-01,-1.50605E-01,-2.17139E-01,-2.59057E-01,-4.36362E-01, + * -1.43496E-01, 7.51305E-02,-2.40850E-01, 1.34858E-01, 7.59193E-01, + * 3.52708E-01, 1.29922E-01, 3.27957E-01, 5.35491E-01, 1.19120E-01, + * -2.94029E-02, 1.76113E-01,-6.51597E-01, 3.61575E-02, 4.26836E-02, + * -2.29297E-02,-4.27373E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -2.78548E-02, 5.77322E-02,-1.02411E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(13) + DATA PBT1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.69447E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.34073E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBT2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(13) + DATA PCT1/ + * 0.00000E+00, 1.22096E+01, 1.92342E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.13667E+00, + * -6.19078E+00, 0.00000E+00, 0.00000E+00, 2.37009E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-7.87365E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.12371E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.76047E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.85864E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCT2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(14) + DATA PBU1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.01008E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.21469E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PBU2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ +C UN2(14) + DATA PCU1/ + * 0.00000E+00,-1.40697E+00, 6.88709E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.67624E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.58312E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.46486E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.90327E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.13248E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PCU2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.00000E+00/ + END + +************************************************************************* +C TEST DRIVER FOR GWS5 (HWM93 HORIZONTAL WIND MODEL) + DIMENSION W(2,20) + DIMENSION IDAY(20),UT(20),ALT(20),XLAT(20),XLONG(20),XLST(20), + $ F107A(20),F107(20),AP(20) + COMMON/HWMC/WBT(2),WCT(2) + DATA IDAY/172,81,8*172,3*81.,7*182./ + DATA UT/29000.,29000.,75000.,17*29000./ + DATA ALT/400.,400.,400.,200.,6*400.,5*100.,80.,60.,40.,20.,0/ + DATA XLAT/4*60.,0.,5*60.,4*45.,0,45.,45.,-45.,45.,45./ + DATA XLONG/5*-70.,0.,4*-70.,5*0,90.,90.,0,-90.,-90./ + DATA XLST/6*16.,4.,3*16.,0.,6.,9.,12.,0,5*0/ + DATA F107A/7*150.,70.,150.,150.,10*150./ + DATA F107/8*150.,180.,150.,10*150./ + DATA AP/9*4.,40.,4.,40.,8*4./ + DO 10 I=1,20 + CALL GWS5(IDAY(I),UT(I),ALT(I),XLAT(I),XLONG(I),XLST(I), + $ F107A(I),F107(I),AP(I),W(1,I)) + WRITE(6,100) W(1,I),WBT(1),WCT(1),W(2,I),WBT(2),WCT(2) + 10 CONTINUE + WRITE(6,200) (IDAY(I),I=1,5) + WRITE(6,201) (UT(I),I=1,5) + WRITE(6,202) (ALT(I),I=1,5) + WRITE(6,203) (XLAT(I),I=1,5) + WRITE(6,204) (XLONG(I),I=1,5) + WRITE(6,205) (XLST(I),I=1,5) + WRITE(6,206) (F107A(I),I=1,5) + WRITE(6,207) (F107(I),I=1,5) + WRITE(6,210) (AP(I),I=1,5) + WRITE(6,208) (W(1,I),I=1,5) + WRITE(6,209) (W(2,I),I=1,5) + WRITE(6,200) (IDAY(I),I=6,10) + WRITE(6,201) (UT(I),I=6,10) + WRITE(6,202) (ALT(I),I=6,10) + WRITE(6,203) (XLAT(I),I=6,10) + WRITE(6,204) (XLONG(I),I=6,10) + WRITE(6,205) (XLST(I),I=6,10) + WRITE(6,206) (F107A(I),I=6,10) + WRITE(6,207) (F107(I),I=6,10) + WRITE(6,210) (AP(I),I=6,10) + WRITE(6,208) (W(1,I),I=6,10) + WRITE(6,209) (W(2,I),I=6,10) + WRITE(6,200) (IDAY(I),I=11,15) + WRITE(6,201) (UT(I),I=11,15) + WRITE(6,202) (ALT(I),I=11,15) + WRITE(6,203) (XLAT(I),I=11,15) + WRITE(6,204) (XLONG(I),I=11,15) + WRITE(6,205) (XLST(I),I=11,15) + WRITE(6,206) (F107A(I),I=11,15) + WRITE(6,207) (F107(I),I=11,15) + WRITE(6,210) (AP(I),I=11,15) + WRITE(6,208) (W(1,I),I=11,15) + WRITE(6,209) (W(2,I),I=11,15) + WRITE(6,200) (IDAY(I),I=16,20) + WRITE(6,201) (UT(I),I=16,20) + WRITE(6,202) (ALT(I),I=16,20) + WRITE(6,203) (XLAT(I),I=16,20) + WRITE(6,204) (XLONG(I),I=16,20) + WRITE(6,205) (XLST(I),I=16,20) + WRITE(6,206) (F107A(I),I=16,20) + WRITE(6,207) (F107(I),I=16,20) + WRITE(6,210) (AP(I),I=16,20) + WRITE(6,208) (W(1,I),I=16,20) + WRITE(6,209) (W(2,I),I=16,20) + 100 FORMAT(1X,6F10.2) + 200 FORMAT(//' DAY ',5I12) + 201 FORMAT(' UT ',5F12.0) + 202 FORMAT(' ALT ',5F12.0) + 203 FORMAT(' LAT ',5F12.0) + 204 FORMAT(' LONG ',5F12.0) + 205 FORMAT(' LST ',5F12.0) + 206 FORMAT(' F107A',5F12.0) + 207 FORMAT(' F107 ',5F12.0) + 210 FORMAT(' AP ',5F12.0) + 208 FORMAT(/' MERID',5F12.2) + 209 FORMAT(' ZONAL',5F12.2) + STOP + END +************************************************************************* +test output + + 23.58 0.00 0.00 -66.62 0.00 0.00 + 76.31 0.00 0.00 -33.88 0.00 0.00 + 62.25 0.00 0.00 -90.75 0.00 0.00 + 2.78 0.00 0.00 16.13 0.00 0.00 + -5.15 0.00 0.00 -7.74 0.00 0.00 + 37.71 0.00 0.00 -50.67 0.00 0.00 + -129.73 0.00 0.00 -141.08 0.00 0.00 + 5.70 0.00 0.00 -24.94 0.00 0.00 + 24.32 0.00 0.00 -68.35 0.00 0.00 + 90.77 0.00 0.00 -132.60 0.00 0.00 + -3.47 -2.69 1.78 -8.45 0.25 -0.31 + -6.82 -3.02 -1.24 9.08 -0.93 0.27 + -14.19 -0.22 -0.60 4.24 -0.89 -0.22 + 12.27 3.68 1.54 21.31 -1.55 0.08 + 1.38 0.18 0.00 7.15 -1.09 3.36 + -13.39 0.71 -0.74 -22.08 -2.07 -63.90 + -0.02 0.00 0.44 -65.97 0.00 -23.50 + -0.68 0.00 -0.21 75.78 0.00 46.29 + -0.45 0.00 0.00 -3.81 0.00 1.74 + 0.00 0.00 0.00 1.74 0.00 1.74 + + + DAY 172 81 172 172 172 + UT 29000. 29000. 75000. 29000. 29000. + ALT 400. 400. 400. 200. 400. + LAT 60. 60. 60. 60. 0. + LONG -70. -70. -70. -70. -70. + LST 16. 16. 16. 16. 16. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + AP 4. 4. 4. 4. 4. + + MERID 23.58 76.31 62.25 2.78 -5.15 + ZONAL -66.62 -33.88 -90.75 16.13 -7.74 + + + DAY 172 172 172 172 172 + UT 29000. 29000. 29000. 29000. 29000. + ALT 400. 400. 400. 400. 400. + LAT 60. 60. 60. 60. 60. + LONG 0. -70. -70. -70. -70. + LST 16. 4. 16. 16. 16. + F107A 150. 150. 70. 150. 150. + F107 150. 150. 150. 180. 150. + AP 4. 4. 4. 4. 40. + + MERID 37.71 -129.73 5.70 24.32 90.77 + ZONAL -50.67 -141.08 -24.94 -68.35 -132.60 + + + DAY 81 81 81 182 182 + UT 29000. 29000. 29000. 29000. 29000. + ALT 100. 100. 100. 100. 100. + LAT 45. 45. 45. 45. 0. + LONG 0. 0. 0. 0. 0. + LST 0. 6. 9. 12. 0. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + AP 4. 40. 4. 4. 4. + + MERID -3.47 -6.82 -14.19 12.27 1.38 + ZONAL -8.45 9.08 4.24 21.31 7.15 + + + DAY 182 182 182 182 182 + UT 29000. 29000. 29000. 29000. 29000. + ALT 80. 60. 40. 20. 0. + LAT 45. 45. -45. 45. 45. + LONG 90. 90. 0. -90. -90. + LST 0. 0. 0. 0. 0. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + AP 4. 4. 4. 4. 4. + + MERID -13.39 -0.02 -0.68 -0.45 0.00 + ZONAL -22.08 -65.97 75.78 -3.81 1.74 +*********************************************************** +end of file +Please acknowledge receipt. + diff --git a/IGRF/data_files_for_Matlab/README b/IGRF/data_files_for_Matlab/README new file mode 100644 index 0000000..dfe8a8d --- /dev/null +++ b/IGRF/data_files_for_Matlab/README @@ -0,0 +1,8 @@ +These files are iGRF-13 data files in the format that the Matlab implementation of IGRF is using. + +Drew Compston (2021). International Geomagnetic Reference Field (IGRF) Model (https://www.mathworks.com/matlabcentral/fileexchange/34388-international-geomagnetic-reference-field-igrf-model), MATLAB Central File Exchange. + +https://www.mathworks.com/matlabcentral/fileexchange/34388-international-geomagnetic-reference-field-igrf-model?s_tid=FX_rc2_behav + +A separate developer has made updates: +https://github.com/wb-bgs/m_IGRF. diff --git a/IGRF/data_files_for_Matlab/dgrf1945.dat b/IGRF/data_files_for_Matlab/dgrf1945.dat new file mode 100644 index 0000000..2bd6fa2 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1945.dat @@ -0,0 +1,122 @@ + dgrf1945 + 10 6371.2 1945.0 +-30594 +-2285 +5810 +-1244 +2990 +-1702 +1578 +477 +1282 +-1834 +-499 +1255 +186 +913 +-11 +944 +776 +144 +544 +-276 +-421 +-55 +304 +-178 +-253 +346 +-12 +194 +95 +-20 +-67 +-142 +-119 +-82 +82 +59 +57 +6 +6 +100 +-246 +16 +-25 +-9 +21 +-16 +-104 +-39 +70 +-40 +-45 +0 +-18 +0 +2 +-29 +6 +-10 +28 +15 +-17 +29 +-22 +13 +7 +12 +-8 +-21 +-5 +-12 +9 +-7 +7 +2 +-10 +18 +7 +3 +2 +-11 +5 +-21 +-27 +1 +17 +-11 +29 +3 +-9 +16 +4 +-3 +9 +-4 +6 +-3 +1 +-4 +8 +-3 +11 +5 +1 +1 +2 +-20 +-5 +-1 +-1 +-6 +8 +6 +-1 +-4 +-3 +-2 +5 +0 +-2 +-2 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1950.dat b/IGRF/data_files_for_Matlab/dgrf1950.dat new file mode 100644 index 0000000..588b7f4 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1950.dat @@ -0,0 +1,122 @@ + dgrf1950 + 10 6371.2 1950.0 +-30554 +-2250 +5815 +-1341 +2998 +-1810 +1576 +381 +1297 +-1889 +-476 +1274 +206 +896 +-46 +954 +792 +136 +528 +-278 +-408 +-37 +303 +-210 +-240 +349 +3 +211 +103 +-20 +-87 +-147 +-122 +-76 +80 +54 +57 +-1 +4 +99 +-247 +33 +-16 +-12 +12 +-12 +-105 +-30 +65 +-55 +-35 +2 +-17 +1 +0 +-40 +10 +-7 +36 +5 +-18 +19 +-16 +22 +15 +5 +-4 +-22 +-1 +0 +11 +-21 +15 +-8 +-13 +17 +5 +-4 +-1 +-17 +3 +-7 +-24 +-1 +19 +-25 +12 +10 +2 +5 +2 +-5 +8 +-2 +8 +3 +-11 +8 +-7 +-8 +4 +13 +-1 +-2 +13 +-10 +-4 +2 +4 +-3 +12 +6 +3 +-3 +2 +6 +10 +11 +3 +8 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1955.dat b/IGRF/data_files_for_Matlab/dgrf1955.dat new file mode 100644 index 0000000..5c12568 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1955.dat @@ -0,0 +1,122 @@ + dgrf1955 + 10 6371.2 1955.0 +-30500 +-2215 +5820 +-1440 +3003 +-1898 +1581 +291 +1302 +-1944 +-462 +1288 +216 +882 +-83 +958 +796 +133 +510 +-274 +-397 +-23 +290 +-230 +-229 +360 +15 +230 +110 +-23 +-98 +-152 +-121 +-69 +78 +47 +57 +-9 +3 +96 +-247 +48 +-8 +-16 +7 +-12 +-107 +-24 +65 +-56 +-50 +2 +-24 +10 +-4 +-32 +8 +-11 +28 +9 +-20 +18 +-18 +11 +9 +10 +-6 +-15 +-14 +5 +6 +-23 +10 +3 +-7 +23 +6 +-4 +9 +-13 +4 +9 +-11 +-4 +12 +-5 +7 +2 +6 +4 +-2 +1 +10 +2 +7 +2 +-6 +5 +5 +-3 +-5 +-4 +-1 +0 +2 +-8 +-3 +-2 +7 +-4 +4 +1 +-2 +-3 +6 +7 +-2 +-1 +0 +-3 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1960.dat b/IGRF/data_files_for_Matlab/dgrf1960.dat new file mode 100644 index 0000000..e11c817 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1960.dat @@ -0,0 +1,122 @@ + dgrf1960 + 10 6371.2 1960.0 +-30421 +-2169 +5791 +-1555 +3002 +-1967 +1590 +206 +1302 +-1992 +-414 +1289 +224 +878 +-130 +957 +800 +135 +504 +-278 +-394 +3 +269 +-255 +-222 +362 +16 +242 +125 +-26 +-117 +-156 +-114 +-63 +81 +46 +58 +-10 +1 +99 +-237 +60 +-1 +-20 +-2 +-11 +-113 +-17 +67 +-56 +-55 +5 +-28 +15 +-6 +-32 +7 +-7 +23 +17 +-18 +8 +-17 +15 +6 +11 +-4 +-14 +-11 +7 +2 +-18 +10 +4 +-5 +23 +10 +1 +8 +-20 +4 +6 +-18 +0 +12 +-9 +2 +1 +0 +4 +-3 +-1 +9 +-2 +8 +3 +0 +-1 +5 +1 +-3 +4 +4 +1 +0 +0 +-1 +2 +4 +-5 +6 +1 +1 +-1 +-1 +6 +2 +0 +0 +-7 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1965.dat b/IGRF/data_files_for_Matlab/dgrf1965.dat new file mode 100644 index 0000000..bde175d --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1965.dat @@ -0,0 +1,122 @@ + dgrf1965 + 10 6371.2 1965.0 +-30334 +-2119 +5776 +-1662 +2997 +-2016 +1594 +114 +1297 +-2038 +-404 +1292 +240 +856 +-165 +957 +804 +148 +479 +-269 +-390 +13 +252 +-269 +-219 +358 +19 +254 +128 +-31 +-126 +-157 +-97 +-62 +81 +45 +61 +-11 +8 +100 +-228 +68 +4 +-32 +1 +-8 +-111 +-7 +75 +-57 +-61 +4 +-27 +13 +-2 +-26 +6 +-6 +26 +13 +-23 +1 +-12 +13 +5 +7 +-4 +-12 +-14 +9 +0 +-16 +8 +4 +-1 +24 +11 +-3 +4 +-17 +8 +10 +-22 +2 +15 +-13 +7 +10 +-4 +-1 +-5 +-1 +10 +5 +10 +1 +-4 +-2 +1 +-2 +-3 +2 +2 +1 +-5 +2 +-2 +6 +4 +-4 +4 +0 +0 +-2 +2 +3 +2 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1970.dat b/IGRF/data_files_for_Matlab/dgrf1970.dat new file mode 100644 index 0000000..64bda89 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1970.dat @@ -0,0 +1,122 @@ + dgrf1970 + 10 6371.2 1970.0 +-30220 +-2068 +5737 +-1781 +3000 +-2047 +1611 +25 +1287 +-2091 +-366 +1278 +251 +838 +-196 +952 +800 +167 +461 +-266 +-395 +26 +234 +-279 +-216 +359 +26 +262 +139 +-42 +-139 +-160 +-91 +-56 +83 +43 +64 +-12 +15 +100 +-212 +72 +2 +-37 +3 +-6 +-112 +1 +72 +-57 +-70 +1 +-27 +14 +-4 +-22 +8 +-2 +23 +13 +-23 +-2 +-11 +14 +6 +7 +-2 +-15 +-13 +6 +-3 +-17 +5 +6 +0 +21 +11 +-6 +3 +-16 +8 +10 +-21 +2 +16 +-12 +6 +10 +-4 +-1 +-5 +0 +10 +3 +11 +1 +-2 +-1 +1 +-3 +-3 +1 +2 +1 +-5 +3 +-1 +4 +6 +-4 +4 +0 +1 +-1 +0 +3 +3 +1 +-1 +-4 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1975.dat b/IGRF/data_files_for_Matlab/dgrf1975.dat new file mode 100644 index 0000000..afd6b97 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1975.dat @@ -0,0 +1,122 @@ + dgrf1975 + 10 6371.2 1975.0 +-30100 +-2013 +5675 +-1902 +3010 +-2067 +1632 +-68 +1276 +-2144 +-333 +1260 +262 +830 +-223 +946 +791 +191 +438 +-265 +-405 +39 +216 +-288 +-218 +356 +31 +264 +148 +-59 +-152 +-159 +-83 +-49 +88 +45 +66 +-13 +28 +99 +-198 +75 +1 +-41 +6 +-4 +-111 +11 +71 +-56 +-77 +1 +-26 +16 +-5 +-14 +10 +0 +22 +12 +-23 +-5 +-12 +14 +6 +6 +-1 +-16 +-12 +4 +-8 +-19 +4 +6 +0 +18 +10 +-10 +1 +-17 +7 +10 +-21 +2 +16 +-12 +7 +10 +-4 +-1 +-5 +-1 +10 +4 +11 +1 +-3 +-2 +1 +-3 +-3 +1 +2 +1 +-5 +3 +-2 +4 +5 +-4 +4 +-1 +1 +-1 +0 +3 +3 +1 +-1 +-5 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1980.dat b/IGRF/data_files_for_Matlab/dgrf1980.dat new file mode 100644 index 0000000..43b9026 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1980.dat @@ -0,0 +1,122 @@ + dgrf1980 + 10 6371.2 1980.0 +-29992 +-1956 +5604 +-1997 +3027 +-2129 +1663 +-200 +1281 +-2180 +-336 +1251 +271 +833 +-252 +938 +782 +212 +398 +-257 +-419 +53 +199 +-297 +-218 +357 +46 +261 +150 +-74 +-151 +-162 +-78 +-48 +92 +48 +66 +-15 +42 +93 +-192 +71 +4 +-43 +14 +-2 +-108 +17 +72 +-59 +-82 +2 +-27 +21 +-5 +-12 +16 +1 +18 +11 +-23 +-2 +-10 +18 +6 +7 +0 +-18 +-11 +4 +-7 +-22 +4 +9 +3 +16 +6 +-13 +-1 +-15 +5 +10 +-21 +1 +16 +-12 +9 +9 +-5 +-3 +-6 +-1 +9 +7 +10 +2 +-6 +-5 +2 +-4 +-4 +1 +2 +0 +-5 +3 +-2 +6 +5 +-4 +3 +0 +1 +-1 +2 +4 +3 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1985.dat b/IGRF/data_files_for_Matlab/dgrf1985.dat new file mode 100644 index 0000000..554a842 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1985.dat @@ -0,0 +1,122 @@ + dgrf1985 + 10 6371.2 1985.0 +-29873 +-1905 +5500 +-2072 +3044 +-2197 +1687 +-306 +1296 +-2208 +-310 +1247 +284 +829 +-297 +936 +780 +232 +361 +-249 +-424 +69 +170 +-297 +-214 +355 +47 +253 +150 +-93 +-154 +-164 +-75 +-46 +95 +53 +65 +-16 +51 +88 +-185 +69 +4 +-48 +16 +-1 +-102 +21 +74 +-62 +-83 +3 +-27 +24 +-2 +-6 +20 +4 +17 +10 +-23 +0 +-7 +21 +6 +8 +0 +-19 +-11 +5 +-9 +-23 +4 +11 +4 +14 +4 +-15 +-4 +-11 +5 +10 +-21 +1 +15 +-12 +9 +9 +-6 +-3 +-6 +-1 +9 +7 +9 +1 +-7 +-5 +2 +-4 +-4 +1 +3 +0 +-5 +3 +-2 +6 +5 +-4 +3 +0 +1 +-1 +2 +4 +3 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1990.dat b/IGRF/data_files_for_Matlab/dgrf1990.dat new file mode 100644 index 0000000..3458545 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1990.dat @@ -0,0 +1,122 @@ + dgrf1990 + 10 6371.2 1990.0 +-29775 +-1848 +5406 +-2131 +3059 +-2279 +1686 +-373 +1314 +-2239 +-284 +1248 +293 +802 +-352 +939 +780 +247 +325 +-240 +-423 +84 +141 +-299 +-214 +353 +46 +245 +154 +-109 +-153 +-165 +-69 +-36 +97 +61 +65 +-16 +59 +82 +-178 +69 +3 +-52 +18 +1 +-96 +24 +77 +-64 +-80 +2 +-26 +26 +0 +-1 +21 +5 +17 +9 +-23 +0 +-4 +23 +5 +10 +-1 +-19 +-10 +6 +-12 +-22 +3 +12 +4 +12 +2 +-16 +-6 +-10 +4 +9 +-20 +1 +15 +-12 +11 +9 +-7 +-4 +-7 +-2 +9 +7 +8 +1 +-7 +-6 +2 +-3 +-4 +2 +2 +1 +-5 +3 +-2 +6 +4 +-4 +3 +0 +1 +-2 +3 +3 +3 +-1 +0 +-6 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf1995.dat b/IGRF/data_files_for_Matlab/dgrf1995.dat new file mode 100644 index 0000000..f3f142e --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf1995.dat @@ -0,0 +1,122 @@ + dgrf1995 + 10 6371.2 1995.0 +-29692 +-1784 +5306 +-2200 +3070 +-2366 +1681 +-413 +1335 +-2267 +-262 +1249 +302 +759 +-427 +940 +780 +262 +290 +-236 +-418 +97 +122 +-306 +-214 +352 +46 +235 +165 +-118 +-143 +-166 +-55 +-17 +107 +68 +67 +-17 +68 +72 +-170 +67 +-1 +-58 +19 +1 +-93 +36 +77 +-72 +-69 +1 +-25 +28 +4 +5 +24 +4 +17 +8 +-24 +-2 +-6 +25 +6 +11 +-6 +-21 +-9 +8 +-14 +-23 +9 +15 +6 +11 +-5 +-16 +-7 +-4 +4 +9 +-20 +3 +15 +-10 +12 +8 +-6 +-8 +-8 +-1 +8 +10 +5 +-2 +-8 +-8 +3 +-3 +-6 +1 +2 +0 +-4 +4 +-1 +5 +4 +-5 +2 +-1 +2 +-2 +5 +1 +1 +-2 +0 +-7 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf2000.dat b/IGRF/data_files_for_Matlab/dgrf2000.dat new file mode 100644 index 0000000..a4ad108 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf2000.dat @@ -0,0 +1,197 @@ + dgrf2000 + 13 6371.2 2000.0 +-29619.4 +-1728.2 +5186.1 +-2267.7 +3068.4 +-2481.6 +1670.9 +-458.0 +1339.6 +-2288.0 +-227.6 +1252.1 +293.4 +714.5 +-491.1 +932.3 +786.8 +272.6 +250.0 +-231.9 +-403.0 +119.8 +111.3 +-303.8 +-218.8 +351.4 +43.8 +222.3 +171.9 +-130.4 +-133.1 +-168.6 +-39.3 +-12.9 +106.3 +72.3 +68.2 +-17.4 +74.2 +63.7 +-160.9 +65.1 +-5.9 +-61.2 +16.9 +0.7 +-90.4 +43.8 +79.0 +-74.0 +-64.6 +0.0 +-24.2 +33.3 +6.2 +9.1 +24.0 +6.9 +14.8 +7.3 +-25.4 +-1.2 +-5.8 +24.4 +6.6 +11.9 +-9.2 +-21.5 +-7.9 +8.5 +-16.6 +-21.5 +9.1 +15.5 +7.0 +8.9 +-7.9 +-14.9 +-7.0 +-2.1 +5.0 +9.4 +-19.7 +3.0 +13.4 +-8.4 +12.5 +6.3 +-6.2 +-8.9 +-8.4 +-1.5 +8.4 +9.3 +3.8 +-4.3 +-8.2 +-8.2 +4.8 +-2.6 +-6.0 +1.7 +1.7 +0.0 +-3.1 +4.0 +-0.5 +4.9 +3.7 +-5.9 +1.0 +-1.2 +2.0 +-2.9 +4.2 +0.2 +0.3 +-2.2 +-1.1 +-7.4 +2.7 +-1.7 +0.1 +-1.9 +1.3 +1.5 +-0.9 +-0.1 +-2.6 +0.1 +0.9 +-0.7 +-0.7 +0.7 +-2.8 +1.7 +-0.9 +0.1 +-1.2 +1.2 +-1.9 +4.0 +-0.9 +-2.2 +-0.3 +-0.4 +0.2 +0.3 +0.9 +2.5 +-0.2 +-2.6 +0.9 +0.7 +-0.5 +0.3 +0.3 +0.0 +-0.3 +0.0 +-0.4 +0.3 +-0.1 +-0.9 +-0.2 +-0.4 +-0.4 +0.8 +-0.2 +-0.9 +-0.9 +0.3 +0.2 +0.1 +1.8 +-0.4 +-0.4 +1.3 +-1.0 +-0.4 +-0.1 +0.7 +0.7 +-0.4 +0.3 +0.3 +0.6 +-0.1 +0.3 +0.4 +-0.2 +0.0 +-0.5 +0.1 +-0.9 diff --git a/IGRF/data_files_for_Matlab/dgrf2005.dat b/IGRF/data_files_for_Matlab/dgrf2005.dat new file mode 100644 index 0000000..86021b9 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf2005.dat @@ -0,0 +1,197 @@ + dgrf2005 + 13 6371.2 2005.0 +-29554.63 +-1669.05 +5077.99 +-2337.24 +3047.69 +-2594.50 +1657.76 +-515.43 +1336.30 +-2305.83 +-198.86 +1246.39 +269.72 +672.51 +-524.72 +920.55 +797.96 +282.07 +210.65 +-225.23 +-379.86 +145.15 +100.00 +-305.36 +-227.00 +354.41 +42.72 +208.95 +180.25 +-136.54 +-123.45 +-168.05 +-19.57 +-13.55 +103.85 +73.60 +69.56 +-20.33 +76.74 +54.75 +-151.34 +63.63 +-14.58 +-63.53 +14.58 +0.24 +-86.36 +50.94 +79.88 +-74.46 +-61.14 +-1.65 +-22.57 +38.73 +6.82 +12.30 +25.35 +9.37 +10.93 +5.42 +-26.32 +1.94 +-4.64 +24.80 +7.62 +11.20 +-11.73 +-20.88 +-6.88 +9.83 +-18.11 +-19.71 +10.17 +16.22 +9.36 +7.61 +-11.25 +-12.76 +-4.87 +-0.06 +5.58 +9.76 +-20.11 +3.58 +12.69 +-6.94 +12.67 +5.01 +-6.72 +-10.76 +-8.16 +-1.25 +8.10 +8.76 +2.92 +-6.66 +-7.73 +-9.22 +6.01 +-2.17 +-6.12 +2.19 +1.42 +0.10 +-2.35 +4.46 +-0.15 +4.76 +3.06 +-6.58 +0.29 +-1.01 +2.06 +-3.47 +3.77 +-0.86 +-0.21 +-2.31 +-2.09 +-7.93 +2.95 +-1.60 +0.26 +-1.88 +1.44 +1.44 +-0.77 +-0.31 +-2.27 +0.29 +0.90 +-0.79 +-0.58 +0.53 +-2.69 +1.80 +-1.08 +0.16 +-1.58 +0.96 +-1.90 +3.99 +-1.39 +-2.15 +-0.29 +-0.55 +0.21 +0.23 +0.89 +2.38 +-0.38 +-2.63 +0.96 +0.61 +-0.30 +0.40 +0.46 +0.01 +-0.35 +0.02 +-0.36 +0.28 +0.08 +-0.87 +-0.49 +-0.34 +-0.08 +0.88 +-0.16 +-0.88 +-0.76 +0.30 +0.33 +0.28 +1.72 +-0.43 +-0.54 +1.18 +-1.07 +-0.37 +-0.04 +0.75 +0.63 +-0.26 +0.21 +0.35 +0.53 +-0.05 +0.38 +0.41 +-0.22 +-0.10 +-0.57 +-0.18 +-0.82 \ No newline at end of file diff --git a/IGRF/data_files_for_Matlab/dgrf2010.dat b/IGRF/data_files_for_Matlab/dgrf2010.dat new file mode 100644 index 0000000..81147b0 --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf2010.dat @@ -0,0 +1,197 @@ + dgrf2010 + 13 6371.2 2010.0 +-29496.57 +-1586.42 +4944.26 +-2396.06 +3026.34 +-2708.54 +1668.17 +-575.73 +1339.85 +-2326.54 +-160.40 +1232.10 +251.75 +633.73 +-537.03 +912.66 +808.97 +286.48 +166.58 +-211.03 +-356.83 +164.46 +89.40 +-309.72 +-230.87 +357.29 +44.58 +200.26 +189.01 +-141.05 +-118.06 +-163.17 +-0.01 +-8.03 +101.04 +72.78 +68.69 +-20.90 +75.92 +44.18 +-141.40 +61.54 +-22.83 +-66.26 +13.10 +3.02 +-78.09 +55.40 +80.44 +-75.00 +-57.80 +-4.55 +-21.20 +45.24 +6.54 +14.00 +24.96 +10.46 +7.03 +1.64 +-27.61 +4.92 +-3.28 +24.41 +8.21 +10.84 +-14.50 +-20.03 +-5.59 +11.83 +-19.34 +-17.41 +11.61 +16.71 +10.85 +6.96 +-14.05 +-10.74 +-3.54 +1.64 +5.50 +9.45 +-20.54 +3.45 +11.51 +-5.27 +12.75 +3.13 +-7.14 +-12.38 +-7.42 +-0.76 +7.97 +8.43 +2.14 +-8.42 +-6.08 +-10.08 +7.01 +-1.94 +-6.24 +2.73 +0.89 +-0.10 +-1.07 +4.71 +-0.16 +4.44 +2.45 +-7.22 +-0.33 +-0.96 +2.13 +-3.95 +3.09 +-1.99 +-1.03 +-1.97 +-2.80 +-8.31 +3.05 +-1.48 +0.13 +-2.03 +1.67 +1.65 +-0.66 +-0.51 +-1.76 +0.54 +0.85 +-0.79 +-0.39 +0.37 +-2.51 +1.79 +-1.27 +0.12 +-2.11 +0.75 +-1.94 +3.75 +-1.86 +-2.12 +-0.21 +-0.87 +0.30 +0.27 +1.04 +2.13 +-0.63 +-2.49 +0.95 +0.49 +-0.11 +0.59 +0.52 +0.00 +-0.39 +0.13 +-0.37 +0.27 +0.21 +-0.86 +-0.77 +-0.23 +0.04 +0.87 +-0.09 +-0.89 +-0.87 +0.31 +0.30 +0.42 +1.66 +-0.45 +-0.59 +1.08 +-1.14 +-0.31 +-0.07 +0.78 +0.54 +-0.18 +0.10 +0.38 +0.49 +0.02 +0.44 +0.42 +-0.25 +-0.26 +-0.53 +-0.26 +-0.79 diff --git a/IGRF/data_files_for_Matlab/dgrf2015.dat b/IGRF/data_files_for_Matlab/dgrf2015.dat new file mode 100644 index 0000000..f5002aa --- /dev/null +++ b/IGRF/data_files_for_Matlab/dgrf2015.dat @@ -0,0 +1,197 @@ + dgrf2015 + 13 6371.2 2015.0 +-29441.46 +-1501.77 +4795.99 +-2445.88 +3012.20 +-2845.41 +1676.35 +-642.17 +1350.33 +-2352.26 +-115.29 +1225.85 +245.04 +581.69 +-538.70 +907.42 +813.68 +283.54 +120.49 +-188.43 +-334.85 +180.95 +70.38 +-329.23 +-232.91 +360.14 +46.98 +192.35 +196.98 +-140.94 +-119.14 +-157.40 +15.98 +4.30 +100.12 +69.55 +67.57 +-20.61 +72.79 +33.30 +-129.85 +58.74 +-28.93 +-66.64 +13.14 +7.35 +-70.85 +62.41 +81.29 +-75.99 +-54.27 +-6.79 +-19.53 +51.82 +5.59 +15.07 +24.45 +9.32 +3.27 +-2.88 +-27.50 +6.61 +-2.32 +23.98 +8.89 +10.04 +-16.78 +-18.26 +-3.16 +13.18 +-20.56 +-14.60 +13.33 +16.16 +11.76 +5.69 +-15.98 +-9.10 +-2.02 +2.26 +5.33 +8.83 +-21.77 +3.02 +10.76 +-3.22 +11.74 +0.67 +-6.74 +-13.20 +-6.88 +-0.10 +7.79 +8.68 +1.04 +-9.06 +-3.89 +-10.54 +8.44 +-2.01 +-6.26 +3.28 +0.17 +-0.40 +0.55 +4.55 +-0.55 +4.40 +1.70 +-7.92 +-0.67 +-0.61 +2.13 +-4.16 +2.33 +-2.85 +-1.80 +-1.12 +-3.59 +-8.72 +3.00 +-1.40 +0.00 +-2.30 +2.11 +2.08 +-0.60 +-0.79 +-1.05 +0.58 +0.76 +-0.70 +-0.20 +0.14 +-2.12 +1.70 +-1.44 +-0.22 +-2.57 +0.44 +-2.01 +3.49 +-2.34 +-2.09 +-0.16 +-1.08 +0.46 +0.37 +1.23 +1.75 +-0.89 +-2.19 +0.85 +0.27 +0.10 +0.72 +0.54 +-0.09 +-0.37 +0.29 +-0.43 +0.23 +0.22 +-0.89 +-0.94 +-0.16 +-0.03 +0.72 +-0.02 +-0.92 +-0.88 +0.42 +0.49 +0.63 +1.56 +-0.42 +-0.50 +0.96 +-1.24 +-0.19 +-0.10 +0.81 +0.42 +-0.13 +-0.04 +0.38 +0.48 +0.08 +0.48 +0.46 +-0.30 +-0.35 +-0.43 +-0.36 +-0.71 diff --git a/IGRF/data_files_for_Matlab/igrf2020.dat b/IGRF/data_files_for_Matlab/igrf2020.dat new file mode 100644 index 0000000..c023166 --- /dev/null +++ b/IGRF/data_files_for_Matlab/igrf2020.dat @@ -0,0 +1,197 @@ + igrf2020 + 13 6371.2 2020.0 +-29404.8 +-1450.9 +4652.5 +-2499.6 +2982.0 +-2991.6 +1677.0 +-734.6 +1363.2 +-2381.2 +-82.1 +1236.2 +241.9 +525.7 +-543.4 +903.0 +809.5 +281.9 +86.3 +-158.4 +-309.4 +199.7 +48.0 +-349.7 +-234.3 +363.2 +47.7 +187.8 +208.3 +-140.7 +-121.2 +-151.2 +32.3 +13.5 +98.9 +66.0 +65.5 +-19.1 +72.9 +25.1 +-121.5 +52.8 +-36.2 +-64.5 +13.5 +8.9 +-64.7 +68.1 +80.6 +-76.7 +-51.5 +-8.2 +-16.9 +56.5 +2.2 +15.8 +23.5 +6.4 +-2.2 +-7.2 +-27.2 +9.8 +-1.8 +23.7 +9.7 +8.4 +-17.6 +-15.3 +-0.5 +12.8 +-21.1 +-11.7 +15.3 +14.9 +13.7 +3.6 +-16.5 +-6.9 +-0.3 +2.8 +5.0 +8.4 +-23.4 +2.9 +11.0 +-1.5 +9.8 +-1.1 +-5.1 +-13.2 +-6.3 +1.1 +7.8 +8.8 +0.4 +-9.3 +-1.4 +-11.9 +9.6 +-1.9 +-6.2 +3.4 +-0.1 +-0.2 +1.7 +3.6 +-0.9 +4.8 +0.7 +-8.6 +-0.9 +-0.1 +1.9 +-4.3 +1.4 +-3.4 +-2.4 +-0.1 +-3.8 +-8.8 +3.0 +-1.4 +0.0 +-2.5 +2.5 +2.3 +-0.6 +-0.9 +-0.4 +0.3 +0.6 +-0.7 +-0.2 +-0.1 +-1.7 +1.4 +-1.6 +-0.6 +-3.0 +0.2 +-2.0 +3.1 +-2.6 +-2.0 +-0.1 +-1.2 +0.5 +0.5 +1.3 +1.4 +-1.2 +-1.8 +0.7 +0.1 +0.3 +0.8 +0.5 +-0.2 +-0.3 +0.6 +-0.5 +0.2 +0.1 +-0.9 +-1.1 +0.0 +-0.3 +0.5 +0.1 +-0.9 +-0.9 +0.5 +0.6 +0.7 +1.4 +-0.3 +-0.4 +0.8 +-1.3 +0.0 +-0.1 +0.8 +0.3 +0.0 +-0.1 +0.4 +0.5 +0.1 +0.5 +0.5 +-0.4 +-0.5 +-0.4 +-0.4 +-0.6 diff --git a/IGRF/data_files_for_Matlab/igrf2020s.dat b/IGRF/data_files_for_Matlab/igrf2020s.dat new file mode 100644 index 0000000..e8d5e52 --- /dev/null +++ b/IGRF/data_files_for_Matlab/igrf2020s.dat @@ -0,0 +1,197 @@ + igrf2020s + 13 6371.2 2025.0 +5.7 +7.4 +-25.9 +-11.0 +-7.0 +-30.2 +-2.1 +-22.4 +2.2 +-5.9 +6.0 +3.1 +-1.1 +-12.0 +0.5 +-1.2 +-1.6 +-0.1 +-5.9 +6.5 +5.2 +3.6 +-5.1 +-5.0 +-0.3 +0.5 +0.0 +-0.6 +2.5 +0.2 +-0.6 +1.3 +3.0 +0.9 +0.3 +-0.5 +-0.3 +0.0 +0.4 +-1.6 +1.3 +-1.3 +-1.4 +0.8 +0.0 +0.0 +0.9 +1.0 +-0.1 +-0.2 +0.6 +0.0 +0.6 +0.7 +-0.8 +0.1 +-0.2 +-0.5 +-1.1 +-0.8 +0.1 +0.8 +0.3 +0.0 +0.1 +-0.2 +-0.1 +0.6 +0.4 +-0.2 +-0.1 +0.5 +0.4 +-0.3 +0.3 +-0.4 +-0.1 +0.5 +0.4 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 diff --git a/IGRF/fortran_code/README b/IGRF/fortran_code/README new file mode 100644 index 0000000..c5b632a --- /dev/null +++ b/IGRF/fortran_code/README @@ -0,0 +1,20 @@ +Updated and corrected IGRF-13 coeffi ient files issued July 6, 2020 by Lutz Rastaetter: + +The file format is now the same as in the old (IGRF-10) in olf_fortran_code. +The files are named with teh full 4-digit year to ensure that ciefficient files in teh 1900s are not named the same as in the 2000s. dgrf45.dat is now dgrf1945.dat, etc. so they are named different from dgrf2045.dat in the (not so far?) future. +The updated subroutine feldg now uses the longer file names. + +Thanks to Tamir Zharaspayev who pointed out that I had posted the dgrf*.dat and igrf*.dat files in the wrong format (used by the International Reference Ionosphere's 2016 version). + +IGRF table with all years' coefficients: https://www.ngdc.noaa.gov/IAGA/vmod/igrf.html + +GitHub repositries: + +Temir Zharaspayev, assistant at NRNU MEPhI (https://eng.mephi.ru/) +https://github.com/masscry/igrf-fortran. + +There is a Python wrapper of IGRF with Fortran sources (GETSHC subroutine) that uses a modified file format with a single column with only nonzero G and H coefficients extracted from the coefficient table from NOAA: + +https://github.com/rilma/pyIGRF + + diff --git a/IGRF/fortran_code/bilcal.for b/IGRF/fortran_code/bilcal.for new file mode 100755 index 0000000..48e9797 --- /dev/null +++ b/IGRF/fortran_code/bilcal.for @@ -0,0 +1,315 @@ +C BILCAL, VERSION 3.0, AUGUST 1995 +C +Cmm/dd/yy +C 1/25/92-DKB-Modified for use with the IGRF-91 coefficients, which +C were provided by R. Langel, GSFC. +C 2/ 5/92-DKB-Reduce variable-name: INITI(ALI)ZE +C 3/25/96-DKB-Modified for use with the IGRF-95 coefficients, which +C were provided by R. Langel, GSFC. +C 6/ 6/00-DKB-Modified for use with IGRF-2000 coefficients. +C11/14/01-DKB-Add IMIN=0 above 4927 READ(...) [Rui Pereira] +C04/25/05-DKB-IBBB instead of IBB in data statem. [Alexey Petrov] +C +C***************************************************************** +C**************** IGRF MAGNETIC FIELD MODEL ********************* +C**************** SHELLG L-VALUE CALCULATION ********************* +C***************************************************************** +C***************************************************************** +C*** THIS PROGRAM PRODUCES PROFILES OF: *** +C*** GEOMAGNETIC FIELD STRENGTH (GAUSS) *** +C*** L-VALUE *** +C***************************************************************** +C*** FOR SPECIFIED: *** +C*** YEAR (DECIMAL YEAR, E.G., 1995.5 FOR MID 1995) *** +C*** GEODATIC LATITUDE AND LONGITUDE (DEGREE) *** +C*** ALTITUDE (KM) *** +C***************************************************************** +C***************************************************************** +C* --------------------ADDRESS-------------------------- * +C* I DR. DIETER BILITZA (301)513-1664 I * +C* I GSFC, NSSDC, CODE 933, GREENBELT, MD 20771, USA I * +C* I SPAN: NSSDCA::BILITZA, NSSDC::BILITZA I * +C* I BITNET: BILITZA%NSSDCA.SPAN@DFTNIC.BITNET I * +C* ----------------------------------------------------- * +C***************************************************************** +C***************************************************************** +C***************************************************************** + INTEGER EGNR,AGNR,OGNR + REAL LATI,LONGI,MLAT,MLONG + CHARACTER*4 ITEXT(4),LTEX + CHARACTER*7 ITB + CHARACTER*11 NAME + LOGICAL NOTBEG,VAL + DIMENSION DEN(8),TEMP(2),XVAR(4),VARE(4),VARB(4) + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C + DATA ITEXT /'LATI','LONG','H/km','YEAR'/ + DATA LATI,LONGI,HEIGHT,YEAR,IVAR,BVAR,EVAR,SVAR,IBBB,JAGNR + & /45.1,293.1,100,1985.5,3,100,1000,100,0,2/ +c### year limit modified + DATA VARB /-90.0,-360.0,0.00000,1940.0/ + DATA VARE /+90.0,+360.0,30000.0,2010.0/ +C + CALL INITIZE + ALOG2=ALOG(2.) + ISTART=1 +C +C FIRST SPECIFY YOUR COMPUTERS CHANNEL NUMBERS .................... +C EGNR=INPUT, MONITO=MONITOR, KONSOL=MESSAGES...................... +C AGNR=DISPLAY, OGNR=FILE OUTPUT................................... +C + EGNR=5 + MONITO=6 + AGNR=6 + OGNR=16 + WRITE(MONITO,5100) +5100 FORMAT(1X/////4X,54('*')/4X, + & '****** IGRF GEOMAGNETIC FIELD MODEL 1945 - 2005 ******'/4X, + & '*********** SHELLG L-VALUE CALCULATION *************'/1X, + & 60('*')/' This program allows you to produce B and L ', + & 'profiles in '/' latitude, longitude, year or altitude.'/ + & ' In each of the following windows you will be ', + & 'asked to enter'/' one or more values, defining the conditions', + & ' for your tables.'/' In each window the current value(s) is', + & ' (are) shown in the right'/' upper corner (#...#). You can ', + & 'choose the current values by'/' entering / at the prompt.'/ + & ' If you enter a wrong character or a value outside the ', + & 'allowed'/' parameter range, the program will ask you for a', + & ' new entry.'/' After your tables are displayed, you can ', + & 'change any parameter'/' you wish to change and create a ', + & 'new profile.'/' You can leave the program at any point ', + & 'by entering Ctrl Z.'/1X,25('*'),' GOOD LUCK ',25('*')) + NOTBEG=.FALSE. + GOTO 5508 +C---------------START ENTERING PARAMETERS---------------------------- +3293 CONTINUE + ISTART=ISTART+1 +C---------------WINDOW 1: WHICH PARAMETER CHANGE ?------------------- + WRITE(MONITO,5602) LATI,LONGI,ITEXT(IVAR),HEIGHT,YEAR,BVAR, + & EVAR,SVAR +5602 FORMAT(1X//' **** WHICH PARAMETER DO YOU WANT TO CHANGE?'/ + & 1X,60('-')/' 0 NO FURTHER CHANGES, CALCULATE PROFILE'/ + & ' 1 LATITUDE #',F6.1,'#',7X,'5 DISPLAY OR STORE'/ + & ' 2 LONGITUDE #',F6.1,'#',7X,'6 SELECTION OF VARIABLE #', + & A4,'#'/' 3 ALTITUDE #',F8.1,'#',5X,'7 VARIABLE RANGE'/ + & ' 4 YEAR #',F6.1,'#',11X,'#',F8.1,',',F8.1,',', + & F8.1,'#'/29X,'8 B OR B/B0'/1X,60('-')/' ENTER NUMBER') + IMIN=0 + IMAX=8 +4925 READ(EGNR,*,ERR=8600,END=6666) ISWIT + IF((ISWIT.GE.IMIN).AND.(ISWIT.LE.IMAX)) GOTO 8601 +8600 WRITE(MONITO,4924) IMIN,IMAX +4924 FORMAT(' Your input is outside the value range:', + & I2,' to',I2/' try again') + GOTO 4925 +8601 GOTO (5505,3329,3339,5502,6780,5508,5503,5504,9138) ISWIT+1 +C--------------WINDOW 2: DISPLAY OPTIONS-------------------------- +5508 WRITE(MONITO,5123) JAGNR +5123 FORMAT(/' DO YOU WANT YOUR PROFILES',32X,'#',I1,'#'/5X, + & 'DISPLAYED ON YOUR MONITOR: ENTER 0 AT PROMPT'/5X, + & 'STORED IN FILE OUTPUT.IGR: ENTER 1 AT PROMPT'/5X, + & 'DISPLAYED AND STORED: ENTER 2 AT PROMPT') + WRITE(MONITO,8630) + IMAX=2 + IMIN=0 +4927 READ(EGNR,*,ERR=8603,END=6666) JAGNR + IF((JAGNR.GE.IMIN).AND.(JAGNR.LE.IMAX)) GOTO 8602 +8603 WRITE(MONITO,4924) IMIN,IMAX + GOTO 4927 +8602 IVARNR=0 + IF(JAGNR.GT.0) + & OPEN(UNIT=OGNR,FILE='OUTPUT.IGR',STATUS='NEW',FORM='FORMATTED') + IF(JAGNR.EQ.1) AGNR=OGNR + IF(NOTBEG) GOTO 3293 +C---------------WINDOW 3: SELECT VARIABLE------------------------ +5503 WRITE(MONITO,5040) IVAR +5040 FORMAT(1X//' SELECT YOUR VARIABLE:',31X,'#LAST:',I1,'#'// + & ' 1 LATITUDE 3 ALTITUDE'/ + & ' 2 LONGITUDE 4 YEAR') + WRITE(MONITO,8630) +8630 FORMAT(1X,60('-')/' Enter / to use previous value(s) ', + & '(see # .. #); Ctrl Z to exit') + IMIN=1 + IMAX=4 +4929 READ(EGNR,*,ERR=8605,END=6666) IVAR + IF((IVAR.GE.IMIN).AND.(IVAR.LE.IMAX)) GOTO 5504 +8605 WRITE(MONITO,4924) IMIN,IMAX + GOTO 4929 +C--------------WINDOW 4: SELECT VARIABLE RANGE--------------------- +5504 WRITE(MONITO,5044) BVAR,EVAR,SVAR +5044 FORMAT(1X//' CHOOSE YOUR VARIABLE RANGE:',5X,' BEGIN, END, ', + & 'STEPWIDTH ?'/32X,'#',F8.1,',',F8.1,',',F8.1,'#') + WRITE(MONITO,8630) + VAMIN=VARB(IVAR) + VAMAX=VARE(IVAR) +4931 READ(EGNR,*,ERR=8606,END=6666) BVAR,EVAR,SVAR + IF((BVAR.GE.VAMIN).AND.(EVAR.LE.VAMAX)) GOTO 8607 +8606 WRITE(MONITO,4930) VAMIN,VAMAX +4930 FORMAT(' Your input is outside the value range:', + & F8.1,' to',F8.1/' try again') + GOTO 4931 +8607 LANZ=INT((EVAR-BVAR)/SVAR)+1 + IF(NOTBEG) GOTO 3293 + IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7339 +C--------------WINDOW 5: LATITUDE----------------------------------- +3329 WRITE(MONITO,5000) LATI +5000 FORMAT(1X//1X,'GEOD LATITUDE ? !NORTH! [DEGREE,DECIMAL]', + & 8X,'#',F5.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(1) + XMIN=VARB(1) +4933 READ(EGNR,*,ERR=8608,END=6666) LATI + IF((LATI.GE.XMIN).AND.(LATI.LE.XMAX)) GOTO 8609 +8608 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4933 +8609 IF(NOTBEG) GOTO 3293 +7339 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7500 +C---------------WINDOW 6: LONGITUDE--------------------------------- +3339 WRITE(MONITO,6001) LONGI +6001 FORMAT(1X//1X,'GEOD LONGITUDE ? !EAST! [DEGREE,DECIMAL]', + & 7X,'#',F6.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(2) + XMIN=VARB(2) +4934 READ(EGNR,*,ERR=8610,END=6666) LONGI + IF((LONGI.GE.XMIN).AND.(LONGI.LE.XMAX)) GOTO 8611 +8610 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4934 +8611 IF(NOTBEG) GOTO 3293 +7500 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 5551 +C---------------WINDOW 7: ALTITUDE--------------------------------- +5502 WRITE(MONITO,6002) HEIGHT +6002 FORMAT(1X//1X,'ALTITUDE ? [KM]',33X,'#',F7.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(3) + XMIN=VARB(3) +4936 READ(EGNR,*,ERR=8615,END=6666) HEIGHT + IF((HEIGHT.GE.XMIN).AND.(HEIGHT.LE.XMAX)) GOTO 8616 +8615 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4936 +8616 IF(NOTBEG) GOTO 3293 +5551 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 9138 +C----------------WINDOW 8: YEAR------------------------------------ +6780 WRITE(MONITO,6004) YEAR +6004 FORMAT(1X//' YEAR(EPOCH) ?',9X,'*decimal*',9X,'#',F6.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(4) + XMIN=VARB(4) +4938 READ(EGNR,*,ERR=8617,END=6666) YEAR + IF((YEAR.GE.XMIN).AND.(YEAR.LE.XMAX)) GOTO 8618 +8617 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4938 +8618 IF(NOTBEG) GOTO 3293 +C----------------WINDOW 9: ABSOLUTE OR NORMALIZED B-------------- +9138 WRITE(MONITO,6204) IBBB +6204 FORMAT(1X//' OUTPUT OPTION: B OR B/B0 ?',19X,'#',I1,'#'// + & 4X,'if you enter 0, the absolute magnetic field strength'/ + & 4X,'will be listed, otherwise the field strength normalized'/ + & 4X,'to the field strength at the magnetic equator is listed') + WRITE(MONITO,8630) +4738 READ(EGNR,*,ERR=8717,END=6666) IBBB + IF(IBBB.NE.0) THEN + ITB=' B/B0 ' + ELSE + ITB='B/Gauss' + ENDIF + GOTO 8718 +8717 WRITE(MONITO,4630) +4630 FORMAT(' Your input should be a integer value'/' try again') + GOTO 4738 +8718 IF(NOTBEG) GOTO 3293 +C----------------CALCULATE PROFILES----------------------------------- +5505 WRITE(AGNR,3910) ITEXT(IVAR),ITB + IF(JAGNR.EQ.2) WRITE(OGNR,3910) ITEXT(IVAR),ITB +3910 FORMAT(1X//////////// + & 5X,A4,' DIMO ',A7,' B-NORTH B-EAST B-DOWN ', + & ' DIP DEC L-VALUE C') + XVAR(1)=LATI + XVAR(2)=LONGI + XVAR(3)=HEIGHT + XVAR(4)=YEAR + LFD=0 + XVAR(IVAR)=BVAR-SVAR +2123 XVAR(IVAR)=XVAR(IVAR)+SVAR + LFD=LFD+1 + LATI=XVAR(1) + LONGI=XVAR(2) + HEIGHT=XVAR(3) + YEAR=XVAR(4) + IF((IVAR.LT.4).AND.(LFD.GT.1)) GOTO 2910 + CALL FELDCOF(YEAR,DIMO) +2910 CALL FELDG(LATI,LONGI,HEIGHT,BNORTH,BEAST,BDOWN,BABS) + CALL SHELLG(LATI,LONGI,HEIGHT,DIMO,XL,ICODE,BAB1) + IF(IABS(ICODE).GT.9) THEN + WRITE(MONITO,7227) ICODE +7227 FORMAT(' ICODE=',I10,' is set to 2') + ICODE=2 + ENDIF + IF(IBBB.EQ.0) GOTO 2299 + BEQU=DIMO/(XL*XL*XL) + IF(ICODE.EQ.1) THEN + BDEL=1.E-3 + CALL FINDB0(0.05,BDEL,VAL,BEQ,RR0) + IF(VAL) BEQU=BEQ + ENDIF +2299 DIP=ASIN(BDOWN/BABS)/UMR + DEC=ASIN(BEAST/SQRT(BEAST*BEAST+BNORTH*BNORTH))/UMR + XCOR=XVAR(IVAR) + IF(IBBB.EQ.0) THEN + WRITE(AGNR,7117) XCOR,DIMO,BABS,BNORTH,BEAST,BDOWN, + & DIP,DEC,XL,ICODE + IF(JAGNR.EQ.2) WRITE(OGNR,7117) XCOR,DIMO,BABS,BNORTH, + & BEAST,BDOWN,DIP,DEC,XL,ICODE +7117 FORMAT(1X,F8.2,F8.4,4(1X,F7.5),2F7.1,F8.3,I3) + ELSE + BBX=BABS/BEQU + IF(BBX.GT.9999.999) BBX=9999.999 + WRITE(AGNR,7177) XCOR,DIMO,BBX,BNORTH,BEAST,BDOWN, + & DIP,DEC,XL,ICODE + IF(JAGNR.EQ.2) WRITE(OGNR,7177) XCOR,DIMO,BBX,BNORTH, + & BEAST,BDOWN,DIP,DEC,XL,ICODE +7177 FORMAT(1X,F8.2,F8.4,F8.3,3(1X,F7.5),2F7.1,F8.3,I3) + ENDIF + IF(XCOR.LT.EVAR) GOTO 2123 + WRITE(AGNR,2193) LATI,LONGI,HEIGHT,YEAR + IF(JAGNR.EQ.2) WRITE(OGNR,2193) LATI,LONGI,HEIGHT,YEAR +C ### edition date corrected +2193 FORMAT(1X,'------- International Geomagnetic Reference Field', + & ' --- Edition 2000 -------'/' LATI=',F7.1,' LONGI=',F6.1, + & ' I DIMO is Dipol I C=1 L and B0 correct'/ + & ' ALT=',F7.1,' YEAR=',F6.1,' I Moment in Gauss', + & ' I =2 wrong, =3 approx.'/1X,74('-')) + IF(HEIGHT.GT.5000.0) THEN + WRITE(AGNR,5611) + IF(JAGNR.EQ.2) WRITE(OGNR,5611) + ENDIF +5611 FORMAT(' !! REMINDER: this field model does not', + & ' include external sources !!') +C ### year limits corrected + IF((YEAR.LT.1945.0).OR.(YEAR.GT.2005.0)) THEN + WRITE(AGNR,5612) + IF(JAGNR.EQ.2) WRITE(OGNR,5612) + ENDIF +C ### timeperiod corrected +5612 FORMAT(' !! REMINDER: Recommended time period is 1945', + & ' to 2005 !!') +C-----------------LAST WINDOW: CONTINUE ?----------------------- +918 WRITE(MONITO,5600) +5600 FORMAT(1X/' **** DO YOU WANT TO CONTINUE?'/1X,60('-')/ + & ' "0" QUIT AND EXIT "1" NEW PARAMETERS'/ + & 1X,60('-')) + IMIN=0 + IMAX=1 +8651 READ(EGNR,*,ERR=8652,END=6666) IALL + IF((IALL.GE.IMIN).AND.(IALL.LE.IMAX)) GOTO 8653 +8652 WRITE(MONITO,4924) IMIN,IMAX + GOTO 8651 +8653 NOTBEG=.TRUE. + IF(IALL.EQ.1) GOTO 3293 +6666 CONTINUE + STOP + END diff --git a/IGRF/fortran_code/dgrf1945.dat b/IGRF/fortran_code/dgrf1945.dat new file mode 100644 index 0000000..cead48b --- /dev/null +++ b/IGRF/fortran_code/dgrf1945.dat @@ -0,0 +1,67 @@ + dgrf45 + 10 6371.2 1945.0 + 1 0 -30594. 0. + 1 1 -2285. 5810. + 2 0 -1244. 0. + 2 1 2990. -1702. + 2 2 1578. 477. + 3 0 1282. 0. + 3 1 -1834. -499. + 3 2 1255. 186. + 3 3 913. -11. + 4 0 944. 0. + 4 1 776. 144. + 4 2 544. -276. + 4 3 -421. -55. + 4 4 304. -178. + 5 0 -253. 0. + 5 1 346. -12. + 5 2 194. 95. + 5 3 -20. -67. + 5 4 -142. -119. + 5 5 -82. 82. + 6 0 59. 0. + 6 1 57. 6. + 6 2 6. 100. + 6 3 -246. 16. + 6 4 -25. -9. + 6 5 21. -16. + 6 6 -104. -39. + 7 0 70. 0. + 7 1 -40. -45. + 7 2 0. -18. + 7 3 0. 2. + 7 4 -29. 6. + 7 5 -10. 28. + 7 6 15. -17. + 7 7 29. -22. + 8 0 13. 0. + 8 1 7. 12. + 8 2 -8. -21. + 8 3 -5. -12. + 8 4 9. -7. + 8 5 7. 2. + 8 6 -10. 18. + 8 7 7. 3. + 8 8 2. -11. + 9 0 5. 0. + 9 1 -21. -27. + 9 2 1. 17. + 9 3 -11. 29. + 9 4 3. -9. + 9 5 16. 4. + 9 6 -3. 9. + 9 7 -4. 6. + 9 8 -3. 1. + 9 9 -4. 8. + 10 0 -3. 0. + 10 1 11. 5. + 10 2 1. 1. + 10 3 2. -20. + 10 4 -5. -1. + 10 5 -1. -6. + 10 6 8. 6. + 10 7 -1. -4. + 10 8 -3. -2. + 10 9 5. 0. + 10 10 -2. -2. diff --git a/IGRF/fortran_code/dgrf1950.dat b/IGRF/fortran_code/dgrf1950.dat new file mode 100644 index 0000000..b8971b7 --- /dev/null +++ b/IGRF/fortran_code/dgrf1950.dat @@ -0,0 +1,67 @@ + dgrf50 + 10 6371.2 1950.0 + 1 0 -30554. 0. + 1 1 -2250. 5815. + 2 0 -1341. 0. + 2 1 2998. -1810. + 2 2 1576. 381. + 3 0 1297. 0. + 3 1 -1889. -476. + 3 2 1274. 206. + 3 3 896. -46. + 4 0 954. 0. + 4 1 792. 136. + 4 2 528. -278. + 4 3 -408. -37. + 4 4 303. -210. + 5 0 -240. 0. + 5 1 349. 3. + 5 2 211. 103. + 5 3 -20. -87. + 5 4 -147. -122. + 5 5 -76. 80. + 6 0 54. 0. + 6 1 57. -1. + 6 2 4. 99. + 6 3 -247. 33. + 6 4 -16. -12. + 6 5 12. -12. + 6 6 -105. -30. + 7 0 65. 0. + 7 1 -55. -35. + 7 2 2. -17. + 7 3 1. 0. + 7 4 -40. 10. + 7 5 -7. 36. + 7 6 5. -18. + 7 7 19. -16. + 8 0 22. 0. + 8 1 15. 5. + 8 2 -4. -22. + 8 3 -1. 0. + 8 4 11. -21. + 8 5 15. -8. + 8 6 -13. 17. + 8 7 5. -4. + 8 8 -1. -17. + 9 0 3. 0. + 9 1 -7. -24. + 9 2 -1. 19. + 9 3 -25. 12. + 9 4 10. 2. + 9 5 5. 2. + 9 6 -5. 8. + 9 7 -2. 8. + 9 8 3. -11. + 9 9 8. -7. + 10 0 -8. 0. + 10 1 4. 13. + 10 2 -1. -2. + 10 3 13. -10. + 10 4 -4. 2. + 10 5 4. -3. + 10 6 12. 6. + 10 7 3. -3. + 10 8 2. 6. + 10 9 10. 11. + 10 10 3. 8. diff --git a/IGRF/fortran_code/dgrf1955.dat b/IGRF/fortran_code/dgrf1955.dat new file mode 100644 index 0000000..68807d8 --- /dev/null +++ b/IGRF/fortran_code/dgrf1955.dat @@ -0,0 +1,67 @@ + dgrf55 + 10 6371.2 1955.0 + 1 0 -30500. 0. + 1 1 -2215. 5820. + 2 0 -1440. 0. + 2 1 3003. -1898. + 2 2 1581. 291. + 3 0 1302. 0. + 3 1 -1944. -462. + 3 2 1288. 216. + 3 3 882. -83. + 4 0 958. 0. + 4 1 796. 133. + 4 2 510. -274. + 4 3 -397. -23. + 4 4 290. -230. + 5 0 -229. 0. + 5 1 360. 15. + 5 2 230. 110. + 5 3 -23. -98. + 5 4 -152. -121. + 5 5 -69. 78. + 6 0 47. 0. + 6 1 57. -9. + 6 2 3. 96. + 6 3 -247. 48. + 6 4 -8. -16. + 6 5 7. -12. + 6 6 -107. -24. + 7 0 65. 0. + 7 1 -56. -50. + 7 2 2. -24. + 7 3 10. -4. + 7 4 -32. 8. + 7 5 -11. 28. + 7 6 9. -20. + 7 7 18. -18. + 8 0 11. 0. + 8 1 9. 10. + 8 2 -6. -15. + 8 3 -14. 5. + 8 4 6. -23. + 8 5 10. 3. + 8 6 -7. 23. + 8 7 6. -4. + 8 8 9. -13. + 9 0 4. 0. + 9 1 9. -11. + 9 2 -4. 12. + 9 3 -5. 7. + 9 4 2. 6. + 9 5 4. -2. + 9 6 1. 10. + 9 7 2. 7. + 9 8 2. -6. + 9 9 5. 5. + 10 0 -3. 0. + 10 1 -5. -4. + 10 2 -1. 0. + 10 3 2. -8. + 10 4 -3. -2. + 10 5 7. -4. + 10 6 4. 1. + 10 7 -2. -3. + 10 8 6. 7. + 10 9 -2. -1. + 10 10 0. -3. diff --git a/IGRF/fortran_code/dgrf1960.dat b/IGRF/fortran_code/dgrf1960.dat new file mode 100644 index 0000000..3eade82 --- /dev/null +++ b/IGRF/fortran_code/dgrf1960.dat @@ -0,0 +1,67 @@ + dgrf60 + 10 6371.2 1960.0 + 1 0 -30421. 0. + 1 1 -2169. 5791. + 2 0 -1555. 0. + 2 1 3002. -1967. + 2 2 1590. 206. + 3 0 1302. 0. + 3 1 -1992. -414. + 3 2 1289. 224. + 3 3 878. -130. + 4 0 957. 0. + 4 1 800. 135. + 4 2 504. -278. + 4 3 -394. 3. + 4 4 269. -255. + 5 0 -222. 0. + 5 1 362. 16. + 5 2 242. 125. + 5 3 -26. -117. + 5 4 -156. -114. + 5 5 -63. 81. + 6 0 46. 0. + 6 1 58. -10. + 6 2 1. 99. + 6 3 -237. 60. + 6 4 -1. -20. + 6 5 -2. -11. + 6 6 -113. -17. + 7 0 67. 0. + 7 1 -56. -55. + 7 2 5. -28. + 7 3 15. -6. + 7 4 -32. 7. + 7 5 -7. 23. + 7 6 17. -18. + 7 7 8. -17. + 8 0 15. 0. + 8 1 6. 11. + 8 2 -4. -14. + 8 3 -11. 7. + 8 4 2. -18. + 8 5 10. 4. + 8 6 -5. 23. + 8 7 10. 1. + 8 8 8. -20. + 9 0 4. 0. + 9 1 6. -18. + 9 2 0. 12. + 9 3 -9. 2. + 9 4 1. 0. + 9 5 4. -3. + 9 6 -1. 9. + 9 7 -2. 8. + 9 8 3. 0. + 9 9 -1. 5. + 10 0 1. 0. + 10 1 -3. 4. + 10 2 4. 1. + 10 3 0. 0. + 10 4 -1. 2. + 10 5 4. -5. + 10 6 6. 1. + 10 7 1. -1. + 10 8 -1. 6. + 10 9 2. 0. + 10 10 0. -7. diff --git a/IGRF/fortran_code/dgrf1965.dat b/IGRF/fortran_code/dgrf1965.dat new file mode 100644 index 0000000..dfed431 --- /dev/null +++ b/IGRF/fortran_code/dgrf1965.dat @@ -0,0 +1,67 @@ + dgrf65 + 10 6371.2 1965.0 + 1 0 -30334. 0. + 1 1 -2119. 5776. + 2 0 -1662. 0. + 2 1 2997. -2016. + 2 2 1594. 114. + 3 0 1297. 0. + 3 1 -2038. -404. + 3 2 1292. 240. + 3 3 856. -165. + 4 0 957. 0. + 4 1 804. 148. + 4 2 479. -269. + 4 3 -390. 13. + 4 4 252. -269. + 5 0 -219. 0. + 5 1 358. 19. + 5 2 254. 128. + 5 3 -31. -126. + 5 4 -157. -97. + 5 5 -62. 81. + 6 0 45. 0. + 6 1 61. -11. + 6 2 8. 100. + 6 3 -228. 68. + 6 4 4. -32. + 6 5 1. -8. + 6 6 -111. -7. + 7 0 75. 0. + 7 1 -57. -61. + 7 2 4. -27. + 7 3 13. -2. + 7 4 -26. 6. + 7 5 -6. 26. + 7 6 13. -23. + 7 7 1. -12. + 8 0 13. 0. + 8 1 5. 7. + 8 2 -4. -12. + 8 3 -14. 9. + 8 4 0. -16. + 8 5 8. 4. + 8 6 -1. 24. + 8 7 11. -3. + 8 8 4. -17. + 9 0 8. 0. + 9 1 10. -22. + 9 2 2. 15. + 9 3 -13. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 5. 10. + 9 8 1. -4. + 9 9 -2. 1. + 10 0 -2. 0. + 10 1 -3. 2. + 10 2 2. 1. + 10 3 -5. 2. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 4. 0. + 10 7 0. -2. + 10 8 2. 3. + 10 9 2. 0. + 10 10 0. -6. diff --git a/IGRF/fortran_code/dgrf1970.dat b/IGRF/fortran_code/dgrf1970.dat new file mode 100644 index 0000000..45c3192 --- /dev/null +++ b/IGRF/fortran_code/dgrf1970.dat @@ -0,0 +1,67 @@ + dgrf70 + 10 6371.2 1970.0 + 1 0 -30220. 0. + 1 1 -2068. 5737. + 2 0 -1781. 0. + 2 1 3000. -2047. + 2 2 1611. 25. + 3 0 1287. 0. + 3 1 -2091. -366. + 3 2 1278. 251. + 3 3 838. -196. + 4 0 952. 0. + 4 1 800. 167. + 4 2 461. -266. + 4 3 -395. 26. + 4 4 234. -279. + 5 0 -216. 0. + 5 1 359. 26. + 5 2 262. 139. + 5 3 -42. -139. + 5 4 -160. -91. + 5 5 -56. 83. + 6 0 43. 0. + 6 1 64. -12. + 6 2 15. 100. + 6 3 -212. 72. + 6 4 2. -37. + 6 5 3. -6. + 6 6 -112. 1. + 7 0 72. 0. + 7 1 -57. -70. + 7 2 1. -27. + 7 3 14. -4. + 7 4 -22. 8. + 7 5 -2. 23. + 7 6 13. -23. + 7 7 -2. -11. + 8 0 14. 0. + 8 1 6. 7. + 8 2 -2. -15. + 8 3 -13. 6. + 8 4 -3. -17. + 8 5 5. 6. + 8 6 0. 21. + 8 7 11. -6. + 8 8 3. -16. + 9 0 8. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 6. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 0. 10. + 9 7 3. 11. + 9 8 1. -2. + 9 9 -1. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -1. 4. + 10 5 6. -4. + 10 6 4. 0. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -4. diff --git a/IGRF/fortran_code/dgrf1975.dat b/IGRF/fortran_code/dgrf1975.dat new file mode 100644 index 0000000..fe001d9 --- /dev/null +++ b/IGRF/fortran_code/dgrf1975.dat @@ -0,0 +1,67 @@ + dgrf75 + 10 6371.2 1975.0 + 1 0 -30100. 0. + 1 1 -2013. 5675. + 2 0 -1902. 0. + 2 1 3010. -2067. + 2 2 1632. -68. + 3 0 1276. 0. + 3 1 -2144. -333. + 3 2 1260. 262. + 3 3 830. -223. + 4 0 946. 0. + 4 1 791. 191. + 4 2 438. -265. + 4 3 -405. 39. + 4 4 216. -288. + 5 0 -218. 0. + 5 1 356. 31. + 5 2 264. 148. + 5 3 -59. -152. + 5 4 -159. -83. + 5 5 -49. 88. + 6 0 45. 0. + 6 1 66. -13. + 6 2 28. 99. + 6 3 -198. 75. + 6 4 1. -41. + 6 5 6. -4. + 6 6 -111. 11. + 7 0 71. 0. + 7 1 -56. -77. + 7 2 1. -26. + 7 3 16. -5. + 7 4 -14. 10. + 7 5 0. 22. + 7 6 12. -23. + 7 7 -5. -12. + 8 0 14. 0. + 8 1 6. 6. + 8 2 -1. -16. + 8 3 -12. 4. + 8 4 -8. -19. + 8 5 4. 6. + 8 6 0. 18. + 8 7 10. -10. + 8 8 1. -17. + 9 0 7. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 4. 11. + 9 8 1. -3. + 9 9 -2. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 4. + 10 5 5. -4. + 10 6 4. -1. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -5. diff --git a/IGRF/fortran_code/dgrf1980.dat b/IGRF/fortran_code/dgrf1980.dat new file mode 100644 index 0000000..29ef9c1 --- /dev/null +++ b/IGRF/fortran_code/dgrf1980.dat @@ -0,0 +1,67 @@ + dgrf80 + 10 6371.2 1980.0 + 1 0 -29992. 0. + 1 1 -1956. 5604. + 2 0 -1997. 0. + 2 1 3027. -2129. + 2 2 1663. -200. + 3 0 1281. 0. + 3 1 -2180. -336. + 3 2 1251. 271. + 3 3 833. -252. + 4 0 938. 0. + 4 1 782. 212. + 4 2 398. -257. + 4 3 -419. 53. + 4 4 199. -297. + 5 0 -218. 0. + 5 1 357. 46. + 5 2 261. 150. + 5 3 -74. -151. + 5 4 -162. -78. + 5 5 -48. 92. + 6 0 48. 0. + 6 1 66. -15. + 6 2 42. 93. + 6 3 -192. 71. + 6 4 4. -43. + 6 5 14. -2. + 6 6 -108. 17. + 7 0 72. 0. + 7 1 -59. -82. + 7 2 2. -27. + 7 3 21. -5. + 7 4 -12. 16. + 7 5 1. 18. + 7 6 11. -23. + 7 7 -2. -10. + 8 0 18. 0. + 8 1 6. 7. + 8 2 0. -18. + 8 3 -11. 4. + 8 4 -7. -22. + 8 5 4. 9. + 8 6 3. 16. + 8 7 6. -13. + 8 8 -1. -15. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 16. + 9 3 -12. 9. + 9 4 9. -5. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 10. + 9 8 2. -6. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 2. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/fortran_code/dgrf1985.dat b/IGRF/fortran_code/dgrf1985.dat new file mode 100644 index 0000000..d771bcf --- /dev/null +++ b/IGRF/fortran_code/dgrf1985.dat @@ -0,0 +1,67 @@ + dgrf85 + 10 6371.2 1985.0 + 1 0 -29873. 0. + 1 1 -1905. 5500. + 2 0 -2072. 0. + 2 1 3044. -2197. + 2 2 1687. -306. + 3 0 1296. 0. + 3 1 -2208. -310. + 3 2 1247. 284. + 3 3 829. -297. + 4 0 936. 0. + 4 1 780. 232. + 4 2 361. -249. + 4 3 -424. 69. + 4 4 170. -297. + 5 0 -214. 0. + 5 1 355. 47. + 5 2 253. 150. + 5 3 -93. -154. + 5 4 -164. -75. + 5 5 -46. 95. + 6 0 53. 0. + 6 1 65. -16. + 6 2 51. 88. + 6 3 -185. 69. + 6 4 4. -48. + 6 5 16. -1. + 6 6 -102. 21. + 7 0 74. 0. + 7 1 -62. -83. + 7 2 3. -27. + 7 3 24. -2. + 7 4 -6. 20. + 7 5 4. 17. + 7 6 10. -23. + 7 7 0. -7. + 8 0 21. 0. + 8 1 6. 8. + 8 2 0. -19. + 8 3 -11. 5. + 8 4 -9. -23. + 8 5 4. 11. + 8 6 4. 14. + 8 7 4. -15. + 8 8 -4. -11. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 15. + 9 3 -12. 9. + 9 4 9. -6. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 9. + 9 8 1. -7. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 3. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/fortran_code/dgrf1990.dat b/IGRF/fortran_code/dgrf1990.dat new file mode 100644 index 0000000..f431fa4 --- /dev/null +++ b/IGRF/fortran_code/dgrf1990.dat @@ -0,0 +1,67 @@ + dgrf90 + 10 6371.2 1990.0 + 1 0 -29775. 0. + 1 1 -1848. 5406. + 2 0 -2131. 0. + 2 1 3059. -2279. + 2 2 1686. -373. + 3 0 1314. 0. + 3 1 -2239. -284. + 3 2 1248. 293. + 3 3 802. -352. + 4 0 939. 0. + 4 1 780. 247. + 4 2 325. -240. + 4 3 -423. 84. + 4 4 141. -299. + 5 0 -214. 0. + 5 1 353. 46. + 5 2 245. 154. + 5 3 -109. -153. + 5 4 -165. -69. + 5 5 -36. 97. + 6 0 61. 0. + 6 1 65. -16. + 6 2 59. 82. + 6 3 -178. 69. + 6 4 3. -52. + 6 5 18. 1. + 6 6 -96. 24. + 7 0 77. 0. + 7 1 -64. -80. + 7 2 2. -26. + 7 3 26. 0. + 7 4 -1. 21. + 7 5 5. 17. + 7 6 9. -23. + 7 7 0. -4. + 8 0 23. 0. + 8 1 5. 10. + 8 2 -1. -19. + 8 3 -10. 6. + 8 4 -12. -22. + 8 5 3. 12. + 8 6 4. 12. + 8 7 2. -16. + 8 8 -6. -10. + 9 0 4. 0. + 9 1 9. -20. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 8. + 9 8 1. -7. + 9 9 -6. 2. + 10 0 -3. 0. + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/fortran_code/dgrf1995.dat b/IGRF/fortran_code/dgrf1995.dat new file mode 100644 index 0000000..5e0fd4e --- /dev/null +++ b/IGRF/fortran_code/dgrf1995.dat @@ -0,0 +1,67 @@ + dgrf95 + 10 6371.2 1995.0 + 1 0 -29692. 0. + 1 1 -1784. 5306. + 2 0 -2200. 0. + 2 1 3070. -2366. + 2 2 1681. -413. + 3 0 1335. 0. + 3 1 -2267. -262. + 3 2 1249. 302. + 3 3 759. -427. + 4 0 940. 0. + 4 1 780. 262. + 4 2 290. -236. + 4 3 -418. 97. + 4 4 122. -306. + 5 0 -214. 0. + 5 1 352. 46. + 5 2 235. 165. + 5 3 -118. -143. + 5 4 -166. -55. + 5 5 -17. 107. + 6 0 68. 0. + 6 1 67. -17. + 6 2 68. 72. + 6 3 -170. 67. + 6 4 -1. -58. + 6 5 19. 1. + 6 6 -93. 36. + 7 0 77. 0. + 7 1 -72. -69. + 7 2 1. -25. + 7 3 28. 4. + 7 4 5. 24. + 7 5 4. 17. + 7 6 8. -24. + 7 7 -2. -6. + 8 0 25. 0. + 8 1 6. 11. + 8 2 -6. -21. + 8 3 -9. 8. + 8 4 -14. -23. + 8 5 9. 15. + 8 6 6. 11. + 8 7 -5. -16. + 8 8 -7. -4. + 9 0 4. 0. + 9 1 9. -20. + 9 2 3. 15. + 9 3 -10. 12. + 9 4 8. -6. + 9 5 -8. -8. + 9 6 -1. 8. + 9 7 10. 5. + 9 8 -2. -8. + 9 9 -8. 3. + 10 0 -3. 0. + 10 1 -6. 1. + 10 2 2. 0. + 10 3 -4. 4. + 10 4 -1. 5. + 10 5 4. -5. + 10 6 2. -1. + 10 7 2. -2. + 10 8 5. 1. + 10 9 1. -2. + 10 10 0. -7. \ No newline at end of file diff --git a/IGRF/fortran_code/dgrf2000.dat b/IGRF/fortran_code/dgrf2000.dat new file mode 100644 index 0000000..e0c42b1 --- /dev/null +++ b/IGRF/fortran_code/dgrf2000.dat @@ -0,0 +1,67 @@ + igrf00 + 10 6371.2 2000.0 + 1 0 -29619.4 0.0 + 1 1 -1728.2 5186.1 + 2 0 -2267.7 0.0 + 2 1 3068.4 -2481.6 + 2 2 1670.9 -458. + 3 0 1339.6 0.0 + 3 1 -2288. -227.6 + 3 2 1252.1 293.4 + 3 3 714.5 -491.1 + 4 0 932.3 .0 + 4 1 786.8 272.6 + 4 2 250. -231.9 + 4 3 -403. 119.8 + 4 4 111.3 -303.8 + 5 0 -218.8 .0 + 5 1 351.4 43.8 + 5 2 222.3 171.9 + 5 3 -130.4 -133.1 + 5 4 -168.6 -39.3 + 5 5 -12.9 106.3 + 6 0 72.3 .0 + 6 1 68.2 -17.4 + 6 2 74.2 63.7 + 6 3 -160.9 65.1 + 6 4 -5.9 -61.2 + 6 5 16.9 0.7 + 6 6 -90.4 43.8 + 7 0 79. .0 + 7 1 -74. -64.6 + 7 2 0. -24.2 + 7 3 33.3 6.2 + 7 4 9.1 24. + 7 5 6.9 14.8 + 7 6 7.3 -25.4 + 7 7 -1.2 -5.8 + 8 0 24.4 .0 + 8 1 6.6 11.9 + 8 2 -9.2 -21.5 + 8 3 -7.9 8.5 + 8 4 -16.6 -21.5 + 8 5 9.1 15.5 + 8 6 7. 8.9 + 8 7 -7.9 -14.9 + 8 8 -7. -2.1 + 9 0 5. .0 + 9 1 9.4 -19.7 + 9 2 3. 13.4 + 9 3 -8.4 12.5 + 9 4 6.3 -6.2 + 9 5 -8.9 -8.4 + 9 6 -1.5 8.4 + 9 7 9.3 3.8 + 9 8 -4.3 -8.2 + 9 9 -8.2 4.8 + 10 0 -2.6 .0 + 10 1 -6. 1.7 + 10 2 1.7 0. + 10 3 -3.1 4. + 10 4 -0.5 4.9 + 10 5 3.7 -5.9 + 10 6 1. -1.2 + 10 7 2. -2.9 + 10 8 4.2 0.2 + 10 9 0.3 -2.2 + 10 10 -1.1 -7.4 diff --git a/IGRF/fortran_code/dgrf2005.dat b/IGRF/fortran_code/dgrf2005.dat new file mode 100644 index 0000000..92704ac --- /dev/null +++ b/IGRF/fortran_code/dgrf2005.dat @@ -0,0 +1,67 @@ + igrf05 + 10 6371.2 2005.0 + 1 0 -29554.63 0.00 + 1 1 -1669.05 5077.99 + 2 0 -2337.24 0.00 + 2 1 3047.69 -2594.50 + 2 2 1657.76 -515.43 + 3 0 1336.30 0.00 + 3 1 -2305.83 -198.86 + 3 2 1246.39 269.72 + 3 3 672.51 -524.72 + 4 0 920.55 0.00 + 4 1 797.96 282.07 + 4 2 210.65 -225.23 + 4 3 -379.86 145.15 + 4 4 100.00 -305.36 + 5 0 -227.00 0.00 + 5 1 354.41 42.72 + 5 2 208.95 180.25 + 5 3 -136.54 -123.45 + 5 4 -168.05 -19.57 + 5 5 -13.55 103.85 + 6 0 73.60 0.00 + 6 1 69.56 -20.33 + 6 2 76.74 54.75 + 6 3 -151.34 63.63 + 6 4 -14.58 -63.53 + 6 5 14.58 0.24 + 6 6 -86.36 50.94 + 7 0 79.88 0.00 + 7 1 -74.46 -61.14 + 7 2 -1.65 -22.57 + 7 3 38.73 6.82 + 7 4 12.30 25.35 + 7 5 9.37 10.93 + 7 6 5.42 -26.32 + 7 7 1.94 -4.64 + 8 0 24.80 0.00 + 8 1 7.62 11.20 + 8 2 -11.73 -20.88 + 8 3 -6.88 9.83 + 8 4 -18.11 -19.71 + 8 5 10.17 16.22 + 8 6 9.36 7.61 + 8 7 -11.25 -12.76 + 8 8 -4.87 -0.06 + 9 0 5.58 0.00 + 9 1 9.76 -20.11 + 9 2 3.58 12.69 + 9 3 -6.94 12.67 + 9 4 5.01 -6.72 + 9 5 -10.76 -8.16 + 9 6 -1.25 8.10 + 9 7 8.76 2.92 + 9 8 -6.66 -7.73 + 9 9 -9.22 6.01 + 10 0 -2.17 0.00 + 10 1 -6.12 2.19 + 10 2 1.42 0.10 + 10 3 -2.35 4.46 + 10 4 -0.15 4.76 + 10 5 3.06 -6.58 + 10 6 0.29 -1.01 + 10 7 2.06 -3.47 + 10 8 3.77 -0.86 + 10 9 -0.21 -2.31 + 10 10 -2.09 -7.93 diff --git a/IGRF/fortran_code/dgrf2010.dat b/IGRF/fortran_code/dgrf2010.dat new file mode 100644 index 0000000..d028590 --- /dev/null +++ b/IGRF/fortran_code/dgrf2010.dat @@ -0,0 +1,67 @@ + igrf10 + 10 6371.2 2010.0 + 1 0 -29496.57 0.00 + 1 1 -1586.42 4944.26 + 2 0 -2396.06 0.00 + 2 1 3026.34 -2708.54 + 2 2 1668.17 -575.73 + 3 0 1339.85 0.00 + 3 1 -2326.54 -160.40 + 3 2 1232.10 251.75 + 3 3 633.73 -537.03 + 4 0 912.66 0.00 + 4 1 808.97 286.48 + 4 2 166.58 -211.03 + 4 3 -356.83 164.46 + 4 4 89.40 -309.72 + 5 0 -230.87 0.00 + 5 1 357.29 44.58 + 5 2 200.26 189.01 + 5 3 -141.05 -118.06 + 5 4 -163.17 -0.01 + 5 5 -8.03 101.04 + 6 0 72.78 0.00 + 6 1 68.69 -20.90 + 6 2 75.92 44.18 + 6 3 -141.40 61.54 + 6 4 -22.83 -66.26 + 6 5 13.10 3.02 + 6 6 -78.09 55.40 + 7 0 80.44 0.00 + 7 1 -75.00 -57.80 + 7 2 -4.55 -21.20 + 7 3 45.24 6.54 + 7 4 14.00 24.96 + 7 5 10.46 7.03 + 7 6 1.64 -27.61 + 7 7 4.92 -3.28 + 8 0 24.41 0.00 + 8 1 8.21 10.84 + 8 2 -14.50 -20.03 + 8 3 -5.59 11.83 + 8 4 -19.34 -17.41 + 8 5 11.61 16.71 + 8 6 10.85 6.96 + 8 7 -14.05 -10.74 + 8 8 -3.54 1.64 + 9 0 5.50 0.00 + 9 1 9.45 -20.54 + 9 2 3.45 11.51 + 9 3 -5.27 12.75 + 9 4 3.13 -7.14 + 9 5 -12.38 -7.42 + 9 6 -0.76 7.97 + 9 7 8.43 2.14 + 9 8 -8.42 -6.08 + 9 9 -10.08 7.01 + 10 0 -1.94 0.00 + 10 1 -6.24 2.73 + 10 2 0.89 -0.10 + 10 3 -1.07 4.71 + 10 4 -0.16 4.44 + 10 5 2.45 -7.22 + 10 6 -0.33 -0.96 + 10 7 2.13 -3.95 + 10 8 3.09 -1.99 + 10 9 -1.03 -1.97 + 10 10 -2.80 -8.31 diff --git a/IGRF/fortran_code/dgrf2015.dat b/IGRF/fortran_code/dgrf2015.dat new file mode 100644 index 0000000..82b4016 --- /dev/null +++ b/IGRF/fortran_code/dgrf2015.dat @@ -0,0 +1,67 @@ + dgrf15 + 10 6371.2 2015.0 + 1 0 -29441.46 0.00 + 1 1 -1501.77 4795.99 + 2 0 -2445.88 0.00 + 2 1 3012.20 -2845.41 + 2 2 1676.35 -642.17 + 3 0 1350.33 0.00 + 3 1 -2352.26 -115.29 + 3 2 1225.85 245.04 + 3 3 581.69 -538.70 + 4 0 907.42 0.00 + 4 1 813.68 283.54 + 4 2 120.49 -188.43 + 4 3 -334.85 180.95 + 4 4 70.38 -329.23 + 5 0 -232.91 0.00 + 5 1 360.14 46.98 + 5 2 192.35 196.98 + 5 3 -140.94 -119.14 + 5 4 -157.40 15.98 + 5 5 4.30 100.12 + 6 0 69.55 0.00 + 6 1 67.57 -20.61 + 6 2 72.79 33.30 + 6 3 -129.85 58.74 + 6 4 -28.93 -66.64 + 6 5 13.14 7.35 + 6 6 -70.85 62.41 + 7 0 81.29 0.00 + 7 1 -75.99 -54.27 + 7 2 -6.79 -19.53 + 7 3 51.82 5.59 + 7 4 15.07 24.45 + 7 5 9.32 3.27 + 7 6 -2.88 -27.50 + 7 7 6.61 -2.32 + 8 0 23.98 0.00 + 8 1 8.89 10.04 + 8 2 -16.78 -18.26 + 8 3 -3.16 13.18 + 8 4 -20.56 -14.60 + 8 5 13.33 16.16 + 8 6 11.76 5.69 + 8 7 -15.98 -9.10 + 8 8 -2.02 2.26 + 9 0 5.33 0.00 + 9 1 8.83 -21.77 + 9 2 3.02 10.76 + 9 3 -3.22 11.74 + 9 4 0.67 -6.74 + 9 5 -13.20 -6.88 + 9 6 -0.10 7.79 + 9 7 8.68 1.04 + 9 8 -9.06 -3.89 + 9 9 -10.54 8.44 + 10 0 -2.01 0.00 + 10 1 -6.26 3.28 + 10 2 0.17 -0.40 + 10 3 0.55 4.55 + 10 4 -0.55 4.40 + 10 5 1.70 -7.92 + 10 6 -0.67 -0.61 + 10 7 2.13 -4.16 + 10 8 2.33 -2.85 + 10 9 -1.80 -1.12 + 10 10 -3.59 -8.72 diff --git a/IGRF/fortran_code/igrf2020.dat b/IGRF/fortran_code/igrf2020.dat new file mode 100644 index 0000000..2035551 --- /dev/null +++ b/IGRF/fortran_code/igrf2020.dat @@ -0,0 +1,67 @@ + igrf20 + 10 6371.2 2020.0 + 1 0 -29404.80 0.00 + 1 1 -1450.90 4652.50 + 2 0 -2499.60 0.00 + 2 1 2982.00 -2991.60 + 2 2 1677.00 -734.60 + 3 0 1363.20 0.00 + 3 1 -2381.20 -82.10 + 3 2 1236.20 241.90 + 3 3 525.70 -543.40 + 4 0 903.00 0.00 + 4 1 809.50 281.90 + 4 2 86.30 -158.40 + 4 3 -309.40 199.70 + 4 4 48.00 -349.70 + 5 0 -234.30 0.00 + 5 1 363.20 47.70 + 5 2 187.80 208.30 + 5 3 -140.70 -121.20 + 5 4 -151.20 32.30 + 5 5 13.50 98.90 + 6 0 66.00 0.00 + 6 1 65.50 -19.10 + 6 2 72.90 25.10 + 6 3 -121.50 52.80 + 6 4 -36.20 -64.50 + 6 5 13.50 8.90 + 6 6 -64.70 68.10 + 7 0 80.60 0.00 + 7 1 -76.70 -51.50 + 7 2 -8.20 -16.90 + 7 3 56.50 2.20 + 7 4 15.80 23.50 + 7 5 6.40 -2.20 + 7 6 -7.20 -27.20 + 7 7 9.80 -1.80 + 8 0 23.70 0.00 + 8 1 9.70 8.40 + 8 2 -17.60 -15.30 + 8 3 -0.50 12.80 + 8 4 -21.10 -11.70 + 8 5 15.30 14.90 + 8 6 13.70 3.60 + 8 7 -16.50 -6.90 + 8 8 -0.30 2.80 + 9 0 5.00 0.00 + 9 1 8.40 -23.40 + 9 2 2.90 11.00 + 9 3 -1.50 9.80 + 9 4 -1.10 -5.10 + 9 5 -13.20 -6.30 + 9 6 1.10 7.80 + 9 7 8.80 0.40 + 9 8 -9.30 -1.40 + 9 9 -11.90 9.60 + 10 0 -1.90 0.00 + 10 1 -6.20 3.40 + 10 2 -0.10 -0.20 + 10 3 1.70 3.60 + 10 4 -0.90 4.80 + 10 5 0.70 -8.60 + 10 6 -0.90 -0.10 + 10 7 1.90 -4.30 + 10 8 1.40 -3.40 + 10 9 -2.40 -0.10 + 10 10 -3.80 -8.80 diff --git a/IGRF/fortran_code/igrf2020s.dat b/IGRF/fortran_code/igrf2020s.dat new file mode 100644 index 0000000..8c04684 --- /dev/null +++ b/IGRF/fortran_code/igrf2020s.dat @@ -0,0 +1,67 @@ + igrf20s + 10 6371.2 2025.0 + 1 0 5.70 0.00 + 1 1 7.40 -25.90 + 2 0 -11.00 0.00 + 2 1 -7.00 -30.20 + 2 2 -2.10 -22.40 + 3 0 2.20 0.00 + 3 1 -5.90 6.00 + 3 2 3.10 -1.10 + 3 3 -12.00 0.50 + 4 0 -1.20 0.00 + 4 1 -1.60 -0.10 + 4 2 -5.90 6.50 + 4 3 5.20 3.60 + 4 4 -5.10 -5.00 + 5 0 -0.30 0.00 + 5 1 0.50 0.00 + 5 2 -0.60 2.50 + 5 3 0.20 -0.60 + 5 4 1.30 3.00 + 5 5 0.90 0.30 + 6 0 -0.50 0.00 + 6 1 -0.30 0.00 + 6 2 0.40 -1.60 + 6 3 1.30 -1.30 + 6 4 -1.40 0.80 + 6 5 0.00 0.00 + 6 6 0.90 1.00 + 7 0 -0.10 0.00 + 7 1 -0.20 0.60 + 7 2 0.00 0.60 + 7 3 0.70 -0.80 + 7 4 0.10 -0.20 + 7 5 -0.50 -1.10 + 7 6 -0.80 0.10 + 7 7 0.80 0.30 + 8 0 0.00 0.00 + 8 1 0.10 -0.20 + 8 2 -0.10 0.60 + 8 3 0.40 -0.20 + 8 4 -0.10 0.50 + 8 5 0.40 -0.30 + 8 6 0.30 -0.40 + 8 7 -0.10 0.50 + 8 8 0.40 0.00 + 9 0 0.00 0.00 + 9 1 0.00 0.00 + 9 2 0.00 0.00 + 9 3 0.00 0.00 + 9 4 0.00 0.00 + 9 5 0.00 0.00 + 9 6 0.00 0.00 + 9 7 0.00 0.00 + 9 8 0.00 0.00 + 9 9 0.00 0.00 + 10 0 0.00 0.00 + 10 1 0.00 0.00 + 10 2 0.00 0.00 + 10 3 0.00 0.00 + 10 4 0.00 0.00 + 10 5 0.00 0.00 + 10 6 0.00 0.00 + 10 7 0.00 0.00 + 10 8 0.00 0.00 + 10 9 0.00 0.00 + 10 10 0.00 0.00 diff --git a/IGRF/fortran_code/igrf_sub.for b/IGRF/fortran_code/igrf_sub.for new file mode 100755 index 0000000..f37b9b5 --- /dev/null +++ b/IGRF/fortran_code/igrf_sub.for @@ -0,0 +1,910 @@ +C IGRF_SUB.FOR +C********************************************************************* +C SUBROUTINES igrf_sub plus SHELLIG.FOR (see below) * +C********************************************************************* +C********************************************************************* +C +C 11/01/91 SHELLG: lowest starting point for B0 search is 2 +C 1/27/92 Adopted to IGRF-91 coeffcients model +C 2/05/92 Reduce variable names: INTER(P)SHC,EXTRA(P)SHC,INITI(ALI)ZE +C 8/08/95 Updated to IGRF-45-95; new coeff. DGRF90, IGRF95, IGRF95S +C 5/31/00 Updated to IGRF-45-00; new coeff.: IGRF00, IGRF00s +C-Version-mm/dd/yy-Description (Person reporting the correction) +C 2000.01 05/07/01 initial version +C 2000.02 07/11/01 replace feldi(xi,h) by feldi (P. Wilkinson) +C 2000.02 07/11/01 variables EGNR, AGNR,OGNR not used (P. Wilkinson) +c 2000.01 10/28/02 replace TAB/6 blanks, enforce 72/line (D. Simpson) +C 2000.02 11/08/02 change unit for coefficients to 14 +C 2000.03 06/05/03 correct DIPL computation (V. Truhlik) +C 2005.00 04/25/05 CALL FELDI and DO 1111 I=1,7 (Alexey Petrov) +C 2005.01 11/10/05 added igrf_dip and geodip (MLAT) +C 2005.02 11/10/05 updated to IGRF-10 version +C 2006.00 12/21/06 GH2(120) -> GH2(144) +C +C********************************************************************* + + subroutine igrf_sub(xlat,xlong,year,height, + & xl,icode,dip,dec) +c---------------------------------------------------------------- +c INPUT: +c xlat geodatic latitude in degrees +c xlong geodatic longitude in degrees +c year decimal year (year+month/12.0-0.5 or year+day-of-year/365 +c or 366 if leap year) +c height height in km +c OUTPUT: +c xl L value +c icode =1 L is correct; =2 L is not correct; +c =3 an approximation is used +c dip geomagnetic inclination in degrees +c dec geomagnetic declination in degress +c---------------------------------------------------------------- + + INTEGER EGNR,AGNR,OGNR + REAL LATI,LONGI + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C + CALL INITIZE + ibbb=0 + ALOG2=ALOG(2.) + ISTART=1 + lati=xlat + longi=xlong +c +C----------------CALCULATE PROFILES----------------------------------- +c + CALL FELDCOF(YEAR,DIMO) + CALL FELDG(LATI,LONGI,HEIGHT,BNORTH,BEAST,BDOWN,BABS) + CALL SHELLG(LATI,LONGI,HEIGHT,DIMO,XL,ICODE,BAB1) + DIP=ASIN(BDOWN/BABS)/UMR + DEC=ASIN(BEAST/SQRT(BEAST*BEAST+BNORTH*BNORTH))/UMR + RETURN + END +C +C +C SHELLIG.FOR +C +C********************************************************************* +C SUBROUTINES FINDB0, SHELLG, STOER, FELDG, FELDCOF, GETSHC, * +C INTERSHC, EXTRASHC, INITIZE * +C********************************************************************* +C********************************************************************* +C +C + SUBROUTINE FINDB0(STPS,BDEL,VALUE,BEQU,RR0) +C-------------------------------------------------------------------- +C FINDS SMALLEST MAGNETIC FIELD STRENGTH ON FIELD LINE +C +C INPUT: STPS STEP SIZE FOR FIELD LINE TRACING +C COMMON/FIDB0/ +C SP DIPOLE ORIENTED COORDINATES FORM SHELLG; P(1,*), +C P(2,*), P(3,*) CLOSEST TO MAGNETIC EQUATOR +C BDEL REQUIRED ACCURACY = [ B(LAST) - BEQU ] / BEQU +C B(LAST) IS FIELD STRENGTH BEFORE BEQU +C +C OUTPUT: VALUE =.FALSE., IF BEQU IS NOT MINIMAL VALUE ON FIELD LINE +C BEQU MAGNETIC FIELD STRENGTH AT MAGNETIC EQUATOR +C RR0 EQUATORIAL RADIUS NORMALIZED TO EARTH RADIUS +C BDEL FINAL ACHIEVED ACCURACY +C-------------------------------------------------------------------- + DIMENSION P(8,4),SP(3) + LOGICAL VALUE + COMMON/FIDB0/ SP +C + STEP=STPS + IRUN=0 +7777 IRUN=IRUN+1 + IF(IRUN.GT.5) THEN + VALUE=.FALSE. + GOTO 8888 + ENDIF +C*********************FIRST THREE POINTS + P(1,2)=SP(1) + P(2,2)=SP(2) + P(3,2)=SP(3) + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C******************INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1) GOTO 2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,5 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C******************INITIALIZATION +2 STEP12=STEP/12. + VALUE=.TRUE. + BMIN=1.E4 + BOLD=1.E4 +C******************CORRECTOR (FIELD LINE TRACING) + N=0 +5555 P(1,3)=P(1,2)+STEP12*(5.*P(4,3)+8.*P(4,2)-P(4,1)) + N=N+1 + P(2,3)=P(2,2)+STEP12*(5.*P(5,3)+8.*P(5,2)-P(5,1)) +C******************PREDICTOR (FIELD LINE TRACING) + P(1,4)=P(1,3)+STEP12*(23.*P(4,3)-16.*P(4,2)+5.*P(4,1)) + P(2,4)=P(2,3)+STEP12*(23.*P(5,3)-16.*P(5,2)+5.*P(5,1)) + P(3,4)=P(3,3)+STEP + CALL STOER(P(1,4),BQ3,R3) + DO 1111 J=1,3 +C DO 1111 I=1,8 + DO 1111 I=1,7 +1111 P(I,J)=P(I,J+1) + B=SQRT(BQ3) + IF(B.LT.BMIN) BMIN=B + IF(B.LE.BOLD) THEN + BOLD=B + ROLD=1./R3 + SP(1)=P(1,4) + SP(2)=P(2,4) + SP(3)=P(3,4) + GOTO 5555 + ENDIF + IF(BOLD.NE.BMIN) THEN + VALUE=.FALSE. + ENDIF + BDELTA=(B-BOLD)/BOLD + IF(BDELTA.GT.BDEL) THEN + STEP=STEP/10. + GOTO 7777 + ENDIF +8888 RR0=ROLD + BEQU=BOLD + BDEL=BDELTA + RETURN + END +C +C + SUBROUTINE SHELLG(GLAT,GLON,ALT,DIMO,FL,ICODE,B0) +C-------------------------------------------------------------------- +C CALCULATES L-VALUE FOR SPECIFIED GEODAETIC COORDINATES, ALTITUDE +C AND GEMAGNETIC FIELD MODEL. +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTER, INTERNAL NOTE +C NO. 67, 1970. +C G. KLUGE, COMPUTER PHYSICS COMMUNICATIONS 3, 31-35, 1972 +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - USING CORRECT DIPOL MOMENT I.E.,DIFFERENT COMMON/MODEL/ +C - USING IGRF EARTH MAGNETIC FIELD MODELS FROM 1945 TO 1990 +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT SHELLG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT SHELLC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C DIMO DIPOL MOMENT IN GAUSS (NORMALIZED TO EARTH RADIUS) +C +C COMMON +C X(3) NOT USED +C H(144) FIELD MODEL COEFFICIENTS ADJUSTED FOR SHELLG +C----------------------------------------------------------------------- +C OUTPUT: FL L-VALUE +C ICODE =1 NORMAL COMPLETION +C =2 UNPHYSICAL CONJUGATE POINT (FL MEANINGLESS) +C =3 SHELL PARAMETER GREATER THAN LIMIT UP TO +C WHICH ACCURATE CALCULATION IS REQUIRED; +C APPROXIMATION IS USED. +C B0 MAGNETIC FIELD STRENGTH IN GAUSS +C----------------------------------------------------------------------- + DIMENSION V(3),U(3,3),P(8,100),SP(3) + COMMON X(3),H(144) + COMMON/FIDB0/ SP + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- RMIN, RMAX ARE BOUNDARIES FOR IDENTIFICATION OF ICODE=2 AND 3 +C-- STEP IS STEP SIZE FOR FIELD LINE TRACING +C-- STEQ IS STEP SIZE FOR INTEGRATION +C + DATA RMIN,RMAX /0.05,1.01/ + DATA STEP,STEQ /0.20,0.03/ + BEQU=1.E10 +C*****ENTRY POINT SHELLG TO BE USED WITH GEODETIC CO-ORDINATES + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + X(1)=(ALT+AQUAD/D)*ST/ERA + X(3)=(ALT+BQUAD/D)*CT/ERA + RLON=GLON*UMR + X(2)=X(1)*SIN(RLON) + X(1)=X(1)*COS(RLON) + GOTO9 + ENTRY SHELLC(V,FL,B0) +C*****ENTRY POINT SHELLC TO BE USED WITH CARTESIAN CO-ORDINATES + X(1)=V(1) + X(2)=V(2) + X(3)=V(3) +C*****CONVERT TO DIPOL-ORIENTED CO-ORDINATES + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ +9 RQ=1./(X(1)*X(1)+X(2)*X(2)+X(3)*X(3)) + R3H=SQRT(RQ*SQRT(RQ)) + P(1,2)=(X(1)*U(1,1)+X(2)*U(2,1)+X(3)*U(3,1))*R3H + P(2,2)=(X(1)*U(1,2)+X(2)*U(2,2) )*R3H + P(3,2)=(X(1)*U(1,3)+X(2)*U(2,3)+X(3)*U(3,3))*RQ +C*****FIRST THREE POINTS OF FIELD LINE + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + B0=SQRT(BQ2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C*****INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1)GOTO2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,7 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH +2 IF(BQ1.LT.BEQU) THEN + BEQU=BQ1 + IEQU=1 + ENDIF + IF(BQ2.LT.BEQU) THEN + BEQU=BQ2 + IEQU=2 + ENDIF + IF(BQ3.LT.BEQU) THEN + BEQU=BQ3 + IEQU=3 + ENDIF +C*****INITIALIZATION OF INTEGRATION LOOPS + STEP12=STEP/12. + STEP2=STEP+STEP + STEQ=SIGN(STEQ,STEP) + FI=0. + ICODE=1 + ORADIK=0. + OTERM=0. + STP=R2*STEQ + Z=P(3,2)+STP + STP=STP/0.75 + P(8,1)=STEP2*(P(1,1)*P(4,1)+P(2,1)*P(5,1)) + P(8,2)=STEP2*(P(1,2)*P(4,2)+P(2,2)*P(5,2)) +C*****MAIN LOOP (FIELD LINE TRACING) + DO 3 N=3,3333 +C*****CORRECTOR (FIELD LINE TRACING) + P(1,N)=P(1,N-1)+STEP12*(5.*P(4,N)+8.*P(4,N-1)-P(4,N-2)) + P(2,N)=P(2,N-1)+STEP12*(5.*P(5,N)+8.*P(5,N-1)-P(5,N-2)) +C*****PREPARE EXPANSION COEFFICIENTS FOR INTERPOLATION +C*****OF SLOWLY VARYING QUANTITIES + P(8,N)=STEP2*(P(1,N)*P(4,N)+P(2,N)*P(5,N)) + C0=P(1,N-1)**2+P(2,N-1)**2 + C1=P(8,N-1) + C2=(P(8,N)-P(8,N-2))*0.25 + C3=(P(8,N)+P(8,N-2)-C1-C1)/6.0 + D0=P(6,N-1) + D1=(P(6,N)-P(6,N-2))*0.5 + D2=(P(6,N)+P(6,N-2)-D0-D0)*0.5 + E0=P(7,N-1) + E1=(P(7,N)-P(7,N-2))*0.5 + E2=(P(7,N)+P(7,N-2)-E0-E0)*0.5 +C*****INNER LOOP (FOR QUADRATURE) +4 T=(Z-P(3,N-1))/STEP + IF(T.GT.1.)GOTO5 + HLI=0.5*(((C3*T+C2)*T+C1)*T+C0) + ZQ=Z*Z + R=HLI+SQRT(HLI*HLI+ZQ) + IF(R.LE.RMIN)GOTO30 + RQ=R*R + FF=SQRT(1.+3.*ZQ/RQ) + RADIK=B0-((D2*T+D1)*T+D0)*R*RQ*FF + IF(R-RMAX)44,44,45 +45 ICODE=2 + RADIK=RADIK-12.*(R-RMAX)**2 +44 IF(RADIK+RADIK.LE.ORADIK) GOTO 10 + TERM=SQRT(RADIK)*FF*((E2*T+E1)*T+E0)/(RQ+ZQ) + FI=FI+STP*(OTERM+TERM) + ORADIK=RADIK + OTERM=TERM + STP=R*STEQ + Z=Z+STP + GOTO4 +C*****PREDICTOR (FIELD LINE TRACING) +5 P(1,N+1)=P(1,N)+STEP12*(23.*P(4,N)-16.*P(4,N-1)+5.*P(4,N-2)) + P(2,N+1)=P(2,N)+STEP12*(23.*P(5,N)-16.*P(5,N-1)+5.*P(5,N-2)) + P(3,N+1)=P(3,N)+STEP + CALL STOER(P(1,N+1),BQ3,R3) +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH + IF(BQ3.LT.BEQU) THEN + IEQU=N+1 + BEQU=BQ3 + ENDIF +3 CONTINUE +10 IF(IEQU.lt.2) IEQU=2 + SP(1)=P(1,IEQU-1) + SP(2)=P(2,IEQU-1) + SP(3)=P(3,IEQU-1) + IF(ORADIK.LT.1E-15)GOTO11 + FI=FI+STP/0.75*OTERM*ORADIK/(ORADIK-RADIK) +C +C-- The minimal allowable value of FI was changed from 1E-15 to 1E-12, +C-- because 1E-38 is the minimal allowable arg. for ALOG in our envir. +C-- D. Bilitza, Nov 87. +C +11 FI=0.5*ABS(FI)/SQRT(B0)+1E-12 +C +C*****COMPUTE L FROM B AND I. SAME AS CARMEL IN INVAR. +C +C-- Correct dipole moment is used here. D. Bilitza, Nov 87. +C + DIMOB0=DIMO/B0 + arg1=alog(FI) + arg2=alog(DIMOB0) +c arg = FI*FI*FI/DIMOB0 +c if(abs(arg).gt.88.0) arg=88.0 + XX=3*arg1-arg2 + IF(XX.GT.23.0) GOTO 776 + IF(XX.GT.11.7) GOTO 775 + IF(XX.GT.+3.0) GOTO 774 + IF(XX.GT.-3.0) GOTO 773 + IF(XX.GT.-22.) GOTO 772 + 771 GG=3.33338E-1*XX+3.0062102E-1 + GOTO777 + 772 GG=((((((((-8.1537735E-14*XX+8.3232531E-13)*XX+1.0066362E-9)*XX+ + 18.1048663E-8)*XX+3.2916354E-6)*XX+8.2711096E-5)*XX+1.3714667E-3)* + 2XX+1.5017245E-2)*XX+4.3432642E-1)*XX+6.2337691E-1 + GOTO777 + 773 GG=((((((((2.6047023E-10*XX+2.3028767E-9)*XX-2.1997983E-8)*XX- + 15.3977642E-7)*XX-3.3408822E-6)*XX+3.8379917E-5)*XX+1.1784234E-3)* + 2XX+1.4492441E-2)*XX+4.3352788E-1)*XX+6.228644E-1 + GOTO777 + 774 GG=((((((((6.3271665E-10*XX-3.958306E-8)*XX+9.9766148E-07)*XX- + 11.2531932E-5)*XX+7.9451313E-5)*XX-3.2077032E-4)*XX+2.1680398E-3)* + 2XX+1.2817956E-2)*XX+4.3510529E-1)*XX+6.222355E-1 + GOTO777 + 775 GG=(((((2.8212095E-8*XX-3.8049276E-6)*XX+2.170224E-4)*XX-6.7310339 + 1E-3)*XX+1.2038224E-1)*XX-1.8461796E-1)*XX+2.0007187E0 + GOTO777 + 776 GG=XX-3.0460681E0 + 777 FL=EXP(ALOG((1.+EXP(GG))*DIMOB0)/3.0) + RETURN +C*****APPROXIMATION FOR HIGH VALUES OF L. +30 ICODE=3 + T=-P(3,N-1)/STEP + FL=1./(ABS(((C3*T+C2)*T+C1)*T+C0)+1E-15) + RETURN + END +C +C + SUBROUTINE STOER(P,BQ,R) +C******************************************************************* +C* SUBROUTINE USED FOR FIELD LINE TRACING IN SHELLG * +C* CALLS ENTRY POINT FELDI IN GEOMAGNETIC FIELD SUBROUTINE FELDG * +C******************************************************************* + DIMENSION P(7),U(3,3) + COMMON XI(3),H(144) +C*****XM,YM,ZM ARE GEOMAGNETIC CARTESIAN INVERSE CO-ORDINATES + ZM=P(3) + FLI=P(1)*P(1)+P(2)*P(2)+1E-15 + R=0.5*(FLI+SQRT(FLI*FLI+(ZM+ZM)**2)) + RQ=R*R + WR=SQRT(R) + XM=P(1)*WR + YM=P(2)*WR +C*****TRANSFORM TO GEOGRAPHIC CO-ORDINATE SYSTEM + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ + XI(1)=XM*U(1,1)+YM*U(1,2)+ZM*U(1,3) + XI(2)=XM*U(2,1)+YM*U(2,2)+ZM*U(2,3) + XI(3)=XM*U(3,1) +ZM*U(3,3) +C*****COMPUTE DERIVATIVES +C CALL FELDI(XI,H) + CALL FELDI + Q=H(1)/RQ + DX=H(3)+H(3)+Q*XI(1) + DY=H(4)+H(4)+Q*XI(2) + DZ=H(2)+H(2)+Q*XI(3) +C*****TRANSFORM BACK TO GEOMAGNETIC CO-ORDINATE SYSTEM + DXM=U(1,1)*DX+U(2,1)*DY+U(3,1)*DZ + DYM=U(1,2)*DX+U(2,2)*DY + DZM=U(1,3)*DX+U(2,3)*DY+U(3,3)*DZ + DR=(XM*DXM+YM*DYM+ZM*DZM)/R +C*****FORM SLOWLY VARYING EXPRESSIONS + P(4)=(WR*DXM-0.5*P(1)*DR)/(R*DZM) + P(5)=(WR*DYM-0.5*P(2)*DR)/(R*DZM) + DSQ=RQ*(DXM*DXM+DYM*DYM+DZM*DZM) + BQ=DSQ*RQ*RQ + P(6)=SQRT(DSQ/(RQ+3.*ZM*ZM)) + P(7)=P(6)*(RQ+ZM*ZM)/(RQ*DZM) + RETURN + END +C +C + SUBROUTINE FELDG(GLAT,GLON,ALT,BNORTH,BEAST,BDOWN,BABS) +C------------------------------------------------------------------- +C CALCULATES EARTH MAGNETIC FIELD FROM SPHERICAL HARMONICS MODEL +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTRE, INTERNAL NOTE 61, +C 1970. +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - FIELD COEFFICIENTS IN BINARY DATA FILES INSTEAD OF BLOCK DATA +C - CALCULATES DIPOL MOMENT +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT FELDG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT FELDC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C COMMON BLANK AND ENTRY POINT FELDI ARE NEEDED WHEN USED +C IN CONNECTION WITH L-CALCULATION PROGRAM SHELLG. +C +C COMMON /MODEL/ AND /GENER/ +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C AQUAD, BQUAD SQUARE OF MAJOR AND MINOR HALF AXIS FOR +C EARTH ELLIPSOID AS RECOMMENDED BY INTERNATIONAL +C ASTRONOMICAL UNION (6378.160, 6356.775 KM). +C NMAX MAXIMUM ORDER OF SPHERICAL HARMONICS +C TIME YEAR (DECIMAL: 1973.5) FOR WHICH MAGNETIC +C FIELD IS TO BE CALCULATED +C G(M) NORMALIZED FIELD COEFFICIENTS (SEE FELDCOF) +C M=NMAX*(NMAX+2) +C------------------------------------------------------------------------ +C OUTPUT: BABS MAGNETIC FIELD STRENGTH IN GAUSS +C BNORTH, BEAST, BDOWN COMPONENTS OF THE FIELD WITH RESPECT +C TO THE LOCAL GEODETIC COORDINATE SYSTEM, WITH AXIS +C POINTING IN THE TANGENTIAL PLANE TO THE NORTH, EAST +C AND DOWNWARD. +C----------------------------------------------------------------------- + DIMENSION V(3),B(3) + CHARACTER*12 NAME + COMMON XI(3),H(144) + COMMON/MODEL/ NAME,NMAX,TIME,G(144) + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- IS RECORDS ENTRY POINT +C +C*****ENTRY POINT FELDG TO BE USED WITH GEODETIC CO-ORDINATES + IS=1 + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + RLON=GLON*UMR + CP=COS(RLON) + SP=SIN(RLON) + ZZZ=(ALT+BQUAD/D)*CT/ERA + RHO=(ALT+AQUAD/D)*ST/ERA + XXX=RHO*CP + YYY=RHO*SP + GOTO10 + ENTRY FELDC(V,B) +C*****ENTRY POINT FELDC TO BE USED WITH CARTESIAN CO-ORDINATES + IS=2 + XXX=V(1) + YYY=V(2) + ZZZ=V(3) +10 RQ=1./(XXX*XXX+YYY*YYY+ZZZ*ZZZ) + XI(1)=XXX*RQ + XI(2)=YYY*RQ + XI(3)=ZZZ*RQ + GOTO20 + ENTRY FELDI +C*****ENTRY POINT FELDI USED FOR L COMPUTATION + IS=3 +20 IHMAX=NMAX*NMAX+1 + LAST=IHMAX+NMAX+NMAX + IMAX=NMAX+NMAX-1 + DO 8 I=IHMAX,LAST +8 H(I)=G(I) + DO 6 K=1,3,2 + I=IMAX + IH=IHMAX +1 IL=IH-I + F=2./FLOAT(I-K+2) + X=XI(1)*F + Y=XI(2)*F + Z=XI(3)*(F+F) + I=I-2 + IF(I-1)5,4,2 +2 DO 3 M=3,I,2 + H(IL+M+1)=G(IL+M+1)+Z*H(IH+M+1)+X*(H(IH+M+3)-H(IH+M-1)) + A -Y*(H(IH+M+2)+H(IH+M-2)) +3 H(IL+M)=G(IL+M)+Z*H(IH+M)+X*(H(IH+M+2)-H(IH+M-2)) + A +Y*(H(IH+M+3)+H(IH+M-1)) +4 H(IL+2)=G(IL+2)+Z*H(IH+2)+X*H(IH+4)-Y*(H(IH+3)+H(IH)) + H(IL+1)=G(IL+1)+Z*H(IH+1)+Y*H(IH+4)+X*(H(IH+3)-H(IH)) +5 H(IL)=G(IL)+Z*H(IH)+2.*(X*H(IH+1)+Y*H(IH+2)) + IH=IL + IF(I.GE.K)GOTO1 +6 CONTINUE + IF(IS.EQ.3)RETURN + S=.5*H(1)+2.*(H(2)*XI(3)+H(3)*XI(1)+H(4)*XI(2)) + T=(RQ+RQ)*SQRT(RQ) + BXXX=T*(H(3)-S*XXX) + BYYY=T*(H(4)-S*YYY) + BZZZ=T*(H(2)-S*ZZZ) + IF(IS.EQ.2)GOTO7 + BABS=SQRT(BXXX*BXXX+BYYY*BYYY+BZZZ*BZZZ) + BEAST=BYYY*CP-BXXX*SP + BRHO=BYYY*SP+BXXX*CP + BNORTH=BZZZ*ST-BRHO*CT + BDOWN=-BZZZ*CT-BRHO*ST + RETURN +7 B(1)=BXXX + B(2)=BYYY + B(3)=BZZZ + RETURN + END +C +C + SUBROUTINE FELDCOF(YEAR,DIMO) +C------------------------------------------------------------------------ +C DETERMINES COEFFICIENTS AND DIPOL MOMENT FROM IGRF MODELS +C +C INPUT: YEAR DECIMAL YEAR FOR WHICH GEOMAGNETIC FIELD IS TO +C BE CALCULATED +C OUTPUT: DIMO GEOMAGNETIC DIPOL MOMENT IN GAUSS (NORMALIZED +C TO EARTH'S RADIUS) AT THE TIME (YEAR) +C D. BILITZA, NSSDC, GSFC, CODE 633, GREENBELT, MD 20771, +C (301)286-9536 NOV 1987. +C ### updated to IGRF-2000 version -dkb- 5/31/2000 +C ### updated to IGRF-2005 version -dkb- 3/24/2005 +C----------------------------------------------------------------------- + CHARACTER*14 FILMOD, FIL1, FIL2 +C ### FILMOD, DTEMOD arrays +1 + DIMENSION GH1(144),GH2(144),GHA(144),FILMOD(17),DTEMOD(17) + DOUBLE PRECISION X,F0,F + COMMON/MODEL/ FIL1,NMAX,TIME,GH1 + COMMON/GENER/ UMR,ERAD,AQUAD,BQUAD +C ### updated to IGRF-13 (dgrf until 2015, igrf2020, igrf2020s) + DATA FILMOD /'dgrf45.dat', 'dgrf1950.dat', + 1 'dgrf1955.dat','dgrf1960.dat','dgrf1965.dat', + 2 'dgrf1970.dat','dgrf1975.dat','dgrf1980.dat', + 3 'dgrf1985.dat','dgrf1990.dat','dgrf1995.dat', + 4 'dgrf2000.dat','dgrf2005.dat','dgrf2010.dat', + 5 'drgf2015.dat','igrf2020.dat','igrf2020s.dat'/ + DATA DTEMOD / 1945., 1950., 1955., 1960., 1965., 1970., + 1 1975., 1980., 1985., 1990., 1995., 2000., 2005., 2010., + 2 2015., 2020., 2025./ +C +C ### numye = numye + 1 ; is number of years represented by IGRF +C + NUMYE=16 +C +C IS=0 FOR SCHMIDT NORMALIZATION IS=1 GAUSS NORMALIZATION +C IU IS INPUT UNIT NUMBER FOR IGRF COEFFICIENT SETS +C + IU = 10 + IS = 0 +C-- DETERMINE IGRF-YEARS FOR INPUT-YEAR + TIME = YEAR + IYEA = INT(YEAR/5.)*5 + L = (IYEA - 1945)/5 + 1 + IF(L.LT.1) L=1 + IF(L.GT.NUMYE) L=NUMYE + DTE1 = DTEMOD(L) + FIL1 = FILMOD(L) + DTE2 = DTEMOD(L+1) + FIL2 = FILMOD(L+1) +C-- GET IGRF COEFFICIENTS FOR THE BOUNDARY YEARS + CALL GETSHC (IU, FIL1, NMAX1, ERAD, GH1, IER) + IF (IER .NE. 0) STOP + CALL GETSHC (IU, FIL2, NMAX2, ERAD, GH2, IER) + IF (IER .NE. 0) STOP +C-- DETERMINE IGRF COEFFICIENTS FOR YEAR + IF (L .LE. NUMYE-1) THEN + CALL INTERSHC (YEAR, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GHA) + ELSE + CALL EXTRASHC (YEAR, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GHA) + ENDIF +C-- DETERMINE MAGNETIC DIPOL MOMENT AND COEFFIECIENTS G + F0=0.D0 + DO 1234 J=1,3 + F = GHA(J) * 1.D-5 + F0 = F0 + F * F +1234 CONTINUE + DIMO = DSQRT(F0) + + GH1(1) = 0.0 + I=2 + F0=1.D-5 + IF(IS.EQ.0) F0=-F0 + SQRT2=SQRT(2.) + + DO 9 N=1,NMAX + X = N + F0 = F0 * X * X / (4.D0 * X - 2.D0) + IF(IS.EQ.0) F0 = F0 * (2.D0 * X - 1.D0) / X + F = F0 * 0.5D0 + IF(IS.EQ.0) F = F * SQRT2 + GH1(I) = GHA(I-1) * F0 + I = I+1 + DO 9 M=1,N + F = F * (X + M) / (X - M + 1.D0) + IF(IS.EQ.0) F = F * DSQRT((X - M + 1.D0) / (X + M)) + GH1(I) = GHA(I-1) * F + GH1(I+1) = GHA(I) * F + I=I+2 +9 CONTINUE + RETURN + END +C +C + SUBROUTINE GETSHC (IU, FSPEC, NMAX, ERAD, GH, IER) + +C =============================================================== +C +C Version 1.01 +C +C Reads spherical harmonic coefficients from the specified +C file into an array. +C +C Input: +C IU - Logical unit number +C FSPEC - File specification +C +C Output: +C NMAX - Maximum degree and order of model +C ERAD - Earth's radius associated with the spherical +C harmonic coefficients, in the same units as +C elevation +C GH - Schmidt quasi-normal internal spherical +C harmonic coefficients +C IER - Error number: = 0, no error +C = -2, records out of order +C = FORTRAN run-time error number +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + CHARACTER FSPEC*(*), FOUT*55 + DIMENSION GH(*) +C --------------------------------------------------------------- +C Open coefficient file. Read past first header record. +C Read degree and order of model and Earth's radius. +C --------------------------------------------------------------- + WRITE(FOUT,667) FSPEC +c 667 FORMAT('/usr/local/etc/httpd/cgi-bin/natasha/IRI/',A12) + 667 FORMAT(A12) + OPEN (IU, FILE=FOUT, STATUS='OLD', IOSTAT=IER, ERR=999) + + READ (IU, *, IOSTAT=IER, ERR=999) + READ (IU, *, IOSTAT=IER, ERR=999) NMAX, ERAD +C --------------------------------------------------------------- +C Read the coefficient file, arranged as follows: +C +C N M G H +C ---------------------- +C / 1 0 GH(1) - +C / 1 1 GH(2) GH(3) +C / 2 0 GH(4) - +C / 2 1 GH(5) GH(6) +C NMAX*(NMAX+3)/2 / 2 2 GH(7) GH(8) +C records \ 3 0 GH(9) - +C \ . . . . +C \ . . . . +C NMAX*(NMAX+2) \ . . . . +C elements in GH \ NMAX NMAX . . +C +C N and M are, respectively, the degree and order of the +C coefficient. +C --------------------------------------------------------------- + + I = 0 + DO 2211 NN = 1, NMAX + DO 2233 MM = 0, NN + READ (IU, *, IOSTAT=IER, ERR=999) N, M, G, H + IF (NN .NE. N .OR. MM .NE. M) THEN + IER = -2 + GOTO 999 + ENDIF + I = I + 1 + GH(I) = G + IF (M .NE. 0) THEN + I = I + 1 + GH(I) = H + ENDIF +2233 CONTINUE +2211 CONTINUE + +999 CLOSE (IU) + + RETURN + END +C +C + SUBROUTINE INTERSHC (DATE, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Interpolates linearly, in time, between two spherical +C harmonic models. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of earlier model +C NMAX1 - Maximum degree and order of earlier model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of earlier model +C DTE2 - Date of later model +C NMAX2 - Maximum degree and order of later model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of later model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly interpolating between the +C coefficients of the earlier model (GH1), at date DTE1, +C and those of the later model (GH2), at date DTE2. If one +C model is smaller than the other, the interpolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) / (DTE2 - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1122 I = K + 1, L +1122 GH(I) = GH1(I) + FACTOR * (-GH1(I)) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1133 I = K + 1, L +1133 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1144 I = 1, K +1144 GH(I) = GH1(I) + FACTOR * (GH2(I) - GH1(I)) + + RETURN + END +C +C + SUBROUTINE EXTRASHC (DATE, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Extrapolates linearly a spherical harmonic model with a +C rate-of-change model. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of base model +C NMAX1 - Maximum degree and order of base model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of base model +C NMAX2 - Maximum degree and order of rate-of-change +C model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of rate-of-change model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly extrapolating the coef- +C ficients of the base model (GH1), at date DTE1, using +C those of the rate-of-change model (GH2), at date DTE2. If +C one model is smaller than the other, the extrapolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1155 I = K + 1, L +1155 GH(I) = GH1(I) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1166 I = K + 1, L +1166 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1177 I = 1, K +1177 GH(I) = GH1(I) + FACTOR * GH2(I) + + RETURN + END +C +C + SUBROUTINE INITIZE +C---------------------------------------------------------------- +C Initializes the parameters in COMMON/GENER/ +C +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C EREQU MAJOR HALF AXIS FOR EARTH ELLIPSOID (6378.160 KM) +C ERPOL MINOR HALF AXIS FOR EARTH ELLIPSOID (6356.775 KM) +C AQUAD SQUARE OF MAJOR HALF AXIS FOR EARTH ELLIPSOID +C BQUAD SQUARE OF MINOR HALF AXIS FOR EARTH ELLIPSOID +C +C ERA, EREQU and ERPOL as recommended by the INTERNATIONAL +C ASTRONOMICAL UNION . +C----------------------------------------------------------------- + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD + ERA=6371.2 + EREQU=6378.16 + ERPOL=6356.775 + AQUAD=EREQU*EREQU + BQUAD=ERPOL*ERPOL + UMR=ATAN(1.0)*4./180. + RETURN + END diff --git a/IGRF/fortran_code/shellig.for b/IGRF/fortran_code/shellig.for new file mode 100755 index 0000000..72f635f --- /dev/null +++ b/IGRF/fortran_code/shellig.for @@ -0,0 +1,852 @@ +C SHELLIG.FOR, Version 2.0, January 1992 +C +C 11/01/91-DKB- SHELLG: lowest starting point for B0 search is 2 +C 1/27/92-DKB- Adopted to IGRF-91 coeffcients model +C 2/05/92-DKB- Reduce variable-names: INTER(P)SHC,EXTRA(P)SHC,INITI(ALI)ZE +C 8/08/95-DKB- Updated to IGRF-45-95; new coeff. DGRF90, IGRF95, IGRF95S +C 5/31/00-DKB- Updated to IGRF-45-00; new coeff.: IGRF00, IGRF00s +C 3/24/05-DKB- Updated to IGRF-45-10; new coeff.: IGRF05, IGRF05s +C +C********************************************************************* +C SUBROUTINES FINDB0, SHELLG, STOER, FELDG, FELDCOF, GETSHC, * +C INTERSHC, EXTRASHC, INITIZE * +C********************************************************************* +C********************************************************************* +C +C + SUBROUTINE FINDB0(STPS,BDEL,VALUE,BEQU,RR0) +C-------------------------------------------------------------------- +C FINDS SMALLEST MAGNETIC FIELD STRENGTH ON FIELD LINE +C +C INPUT: STPS STEP SIZE FOR FIELD LINE TRACING +C COMMON/FIDB0/ +C SP DIPOLE ORIENTED COORDINATES FORM SHELLG; P(1,*), +C P(2,*), P(3,*) CLOSEST TO MAGNETIC EQUATOR +C BDEL REQUIRED ACCURACY = [ B(LAST) - BEQU ] / BEQU +C B(LAST) IS FIELD STRENGTH BEFORE BEQU +C +C OUTPUT: VALUE =.FALSE., IF BEQU IS NOT MINIMAL VALUE ON FIELD LINE +C BEQU MAGNETIC FIELD STRENGTH AT MAGNETIC EQUATOR +C RR0 EQUATORIAL RADIUS NORMALIZED TO EARTH RADIUS +C BDEL FINAL ACHIEVED ACCURACY +C-------------------------------------------------------------------- + DIMENSION P(8,4),SP(3) + LOGICAL VALUE + COMMON/FIDB0/ SP +C + STEP=STPS + IRUN=0 +7777 IRUN=IRUN+1 + IF(IRUN.GT.5) THEN + VALUE=.FALSE. + GOTO 8888 + ENDIF +C*********************FIRST THREE POINTS + P(1,2)=SP(1) + P(2,2)=SP(2) + P(3,2)=SP(3) + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C******************INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1) GOTO 2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,5 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C******************INITIALIZATION +2 STEP12=STEP/12. + VALUE=.TRUE. + BMIN=1.E4 + BOLD=1.E4 +C******************CORRECTOR (FIELD LINE TRACING) + N=0 +5555 P(1,3)=P(1,2)+STEP12*(5.*P(4,3)+8.*P(4,2)-P(4,1)) + N=N+1 + P(2,3)=P(2,2)+STEP12*(5.*P(5,3)+8.*P(5,2)-P(5,1)) +C******************PREDICTOR (FIELD LINE TRACING) + P(1,4)=P(1,3)+STEP12*(23.*P(4,3)-16.*P(4,2)+5.*P(4,1)) + P(2,4)=P(2,3)+STEP12*(23.*P(5,3)-16.*P(5,2)+5.*P(5,1)) + P(3,4)=P(3,3)+STEP + CALL STOER(P(1,4),BQ3,R3) + DO 1111 J=1,3 + DO 1111 I=1,8 +1111 P(I,J)=P(I,J+1) + B=SQRT(BQ3) + IF(B.LT.BMIN) BMIN=B + IF(B.LE.BOLD) THEN + BOLD=B + ROLD=1./R3 + SP(1)=P(1,4) + SP(2)=P(2,4) + SP(3)=P(3,4) + GOTO 5555 + ENDIF + IF(BOLD.NE.BMIN) THEN + VALUE=.FALSE. + ENDIF + BDELTA=(B-BOLD)/BOLD + IF(BDELTA.GT.BDEL) THEN + STEP=STEP/10. + GOTO 7777 + ENDIF +8888 RR0=ROLD + BEQU=BOLD + BDEL=BDELTA + RETURN + END +C +C + SUBROUTINE SHELLG(GLAT,GLON,ALT,DIMO,FL,ICODE,B0) +C-------------------------------------------------------------------- +C CALCULATES L-VALUE FOR SPECIFIED GEODAETIC COORDINATES, ALTITUDE +C AND GEMAGNETIC FIELD MODEL. +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTER, INTERNAL NOTE +C NO. 67, 1970. +C G. KLUGE, COMPUTER PHYSICS COMMUNICATIONS 3, 31-35, 1972 +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - USING CORRECT DIPOL MOMENT I.E.,DIFFERENT COMMON/MODEL/ +C - USING IGRF EARTH MAGNETIC FIELD MODELS FROM 1945 TO 1990 +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT SHELLG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT SHELLC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C DIMO DIPOL MOMENT IN GAUSS (NORMALIZED TO EARTH RADIUS) +C +C COMMON +C X(3) NOT USED +C H(144) FIELD MODEL COEFFICIENTS ADJUSTED FOR SHELLG +C----------------------------------------------------------------------- +C OUTPUT: FL L-VALUE +C ICODE =1 NORMAL COMPLETION +C =2 UNPHYSICAL CONJUGATE POINT (FL MEANINGLESS) +C =3 SHELL PARAMETER GREATER THAN LIMIT UP TO +C WHICH ACCURATE CALCULATION IS REQUIRED; +C APPROXIMATION IS USED. +C B0 MAGNETIC FIELD STRENGTH IN GAUSS +C----------------------------------------------------------------------- + DIMENSION V(3),U(3,3),P(8,100),SP(3) + COMMON X(3),H(144) + COMMON/FIDB0/ SP + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- RMIN, RMAX ARE BOUNDARIES FOR IDENTIFICATION OF ICODE=2 AND 3 +C-- STEP IS STEP SIZE FOR FIELD LINE TRACING +C-- STEQ IS STEP SIZE FOR INTEGRATION +C + DATA RMIN,RMAX /0.05,1.01/ + DATA STEP,STEQ /0.20,0.03/ + BEQU=1.E10 +C +C*****ENTRY POINT SHELLG TO BE USED WITH GEODETIC CO-ORDINATES + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + X(1)=(ALT+AQUAD/D)*ST/ERA + X(3)=(ALT+BQUAD/D)*CT/ERA + RLON=GLON*UMR + X(2)=X(1)*SIN(RLON) + X(1)=X(1)*COS(RLON) + GOTO9 +C +C*****ENTRY POINT SHELLC TO BE USED WITH CARTESIAN CO-ORDINATES + ENTRY SHELLC(V,FL,B0) + X(1)=V(1) + X(2)=V(2) + X(3)=V(3) +C*****CONVERT TO DIPOL-ORIENTED CO-ORDINATES + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ +9 RQ=1./(X(1)*X(1)+X(2)*X(2)+X(3)*X(3)) + R3H=SQRT(RQ*SQRT(RQ)) + P(1,2)=(X(1)*U(1,1)+X(2)*U(2,1)+X(3)*U(3,1))*R3H + P(2,2)=(X(1)*U(1,2)+X(2)*U(2,2) )*R3H + P(3,2)=(X(1)*U(1,3)+X(2)*U(2,3)+X(3)*U(3,3))*RQ +C*****FIRST THREE POINTS OF FIELD LINE + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + B0=SQRT(BQ2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C*****INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1)GOTO2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,7 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH +2 IF(BQ1.LT.BEQU) THEN + BEQU=BQ1 + IEQU=1 + ENDIF + IF(BQ2.LT.BEQU) THEN + BEQU=BQ2 + IEQU=2 + ENDIF + IF(BQ3.LT.BEQU) THEN + BEQU=BQ3 + IEQU=3 + ENDIF +C*****INITIALIZATION OF INTEGRATION LOOPS + STEP12=STEP/12. + STEP2=STEP+STEP + STEQ=SIGN(STEQ,STEP) + FI=0. + ICODE=1 + ORADIK=0. + OTERM=0. + STP=R2*STEQ + Z=P(3,2)+STP + STP=STP/0.75 + P(8,1)=STEP2*(P(1,1)*P(4,1)+P(2,1)*P(5,1)) + P(8,2)=STEP2*(P(1,2)*P(4,2)+P(2,2)*P(5,2)) +C*****MAIN LOOP (FIELD LINE TRACING) + DO 3 N=3,3333 +C*****CORRECTOR (FIELD LINE TRACING) + P(1,N)=P(1,N-1)+STEP12*(5.*P(4,N)+8.*P(4,N-1)-P(4,N-2)) + P(2,N)=P(2,N-1)+STEP12*(5.*P(5,N)+8.*P(5,N-1)-P(5,N-2)) +C*****PREPARE EXPANSION COEFFICIENTS FOR INTERPOLATION +C*****OF SLOWLY VARYING QUANTITIES + P(8,N)=STEP2*(P(1,N)*P(4,N)+P(2,N)*P(5,N)) + C0=P(1,N-1)**2+P(2,N-1)**2 + C1=P(8,N-1) + C2=(P(8,N)-P(8,N-2))*0.25 + C3=(P(8,N)+P(8,N-2)-C1-C1)/6.0 + D0=P(6,N-1) + D1=(P(6,N)-P(6,N-2))*0.5 + D2=(P(6,N)+P(6,N-2)-D0-D0)*0.5 + E0=P(7,N-1) + E1=(P(7,N)-P(7,N-2))*0.5 + E2=(P(7,N)+P(7,N-2)-E0-E0)*0.5 +C*****INNER LOOP (FOR QUADRATURE) +4 T=(Z-P(3,N-1))/STEP + IF(T.GT.1.)GOTO5 + HLI=0.5*(((C3*T+C2)*T+C1)*T+C0) + ZQ=Z*Z + R=HLI+SQRT(HLI*HLI+ZQ) + IF(R.LE.RMIN)GOTO30 + RQ=R*R + FF=SQRT(1.+3.*ZQ/RQ) + RADIK=B0-((D2*T+D1)*T+D0)*R*RQ*FF + IF(R-RMAX)44,44,45 +45 ICODE=2 + RADIK=RADIK-12.*(R-RMAX)**2 +44 IF(RADIK+RADIK.LE.ORADIK) GOTO 10 + TERM=SQRT(RADIK)*FF*((E2*T+E1)*T+E0)/(RQ+ZQ) + FI=FI+STP*(OTERM+TERM) + ORADIK=RADIK + OTERM=TERM + STP=R*STEQ + Z=Z+STP + GOTO4 +C*****PREDICTOR (FIELD LINE TRACING) +5 P(1,N+1)=P(1,N)+STEP12*(23.*P(4,N)-16.*P(4,N-1)+5.*P(4,N-2)) + P(2,N+1)=P(2,N)+STEP12*(23.*P(5,N)-16.*P(5,N-1)+5.*P(5,N-2)) + P(3,N+1)=P(3,N)+STEP + CALL STOER(P(1,N+1),BQ3,R3) +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH + IF(BQ3.LT.BEQU) THEN + IEQU=N+1 + BEQU=BQ3 + ENDIF +3 CONTINUE +10 IF(IEQU.lt.2) IEQU=2 + SP(1)=P(1,IEQU-1) + SP(2)=P(2,IEQU-1) + SP(3)=P(3,IEQU-1) + IF(ORADIK.LT.1E-15)GOTO11 + FI=FI+STP/0.75*OTERM*ORADIK/(ORADIK-RADIK) +C +C-- The minimal allowable value of FI was changed from 1E-15 to 1E-12, +C-- because 1E-38 is the minimal allowable arg. for ALOG in our envir. +C-- D. Bilitza, Nov 87. +C +11 FI=0.5*ABS(FI)/SQRT(B0)+1E-12 +C*****COMPUTE L FROM B AND I. SAME AS CARMEL IN INVAR. +C +C-- Correct dipole moment is used here. D. Bilitza, Nov 87. +C + DIMOB0=DIMO/B0 + arg1=alog(FI) + arg2=alog(DIMOB0) +c arg = FI*FI*FI/DIMOB0 +c if(abs(arg).gt.88.0) arg=88.0 + XX=3*arg1-arg2 + IF(XX.GT.23.0) GOTO 776 + IF(XX.GT.11.7) GOTO 775 + IF(XX.GT.+3.0) GOTO 774 + IF(XX.GT.-3.0) GOTO 773 + IF(XX.GT.-22.) GOTO 772 + 771 GG=3.33338E-1*XX+3.0062102E-1 + GOTO777 + 772 GG=((((((((-8.1537735E-14*XX+8.3232531E-13)*XX+1.0066362E-9)*XX+ + 18.1048663E-8)*XX+3.2916354E-6)*XX+8.2711096E-5)*XX+1.3714667E-3)* + 2XX+1.5017245E-2)*XX+4.3432642E-1)*XX+6.2337691E-1 + GOTO777 + 773 GG=((((((((2.6047023E-10*XX+2.3028767E-9)*XX-2.1997983E-8)*XX- + 15.3977642E-7)*XX-3.3408822E-6)*XX+3.8379917E-5)*XX+1.1784234E-3)* + 2XX+1.4492441E-2)*XX+4.3352788E-1)*XX+6.228644E-1 + GOTO777 + 774 GG=((((((((6.3271665E-10*XX-3.958306E-8)*XX+9.9766148E-07)*XX- + 11.2531932E-5)*XX+7.9451313E-5)*XX-3.2077032E-4)*XX+2.1680398E-3)* + 2XX+1.2817956E-2)*XX+4.3510529E-1)*XX+6.222355E-1 + GOTO777 + 775 GG=(((((2.8212095E-8*XX-3.8049276E-6)*XX+2.170224E-4)*XX-6.7310339 + 1E-3)*XX+1.2038224E-1)*XX-1.8461796E-1)*XX+2.0007187E0 + GOTO777 + 776 GG=XX-3.0460681E0 + 777 FL=EXP(ALOG((1.+EXP(GG))*DIMOB0)/3.0) + RETURN +C*****APPROXIMATION FOR HIGH VALUES OF L. +30 ICODE=3 + T=-P(3,N-1)/STEP + FL=1./(ABS(((C3*T+C2)*T+C1)*T+C0)+1E-15) + RETURN + END +C +C + SUBROUTINE STOER(P,BQ,R) +C******************************************************************* +C* SUBROUTINE USED FOR FIELD LINE TRACING IN SHELLG * +C* CALLS ENTRY POINT FELDI IN GEOMAGNETIC FIELD SUBROUTINE FELDG * +C******************************************************************* + DIMENSION P(7),U(3,3) + COMMON XI(3),H(144) +C*****XM,YM,ZM ARE GEOMAGNETIC CARTESIAN INVERSE CO-ORDINATES + ZM=P(3) + FLI=P(1)*P(1)+P(2)*P(2)+1E-15 + R=0.5*(FLI+SQRT(FLI*FLI+(ZM+ZM)**2)) + RQ=R*R + WR=SQRT(R) + XM=P(1)*WR + YM=P(2)*WR +C*****TRANSFORM TO GEOGRAPHIC CO-ORDINATE SYSTEM + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ + XI(1)=XM*U(1,1)+YM*U(1,2)+ZM*U(1,3) + XI(2)=XM*U(2,1)+YM*U(2,2)+ZM*U(2,3) + XI(3)=XM*U(3,1) +ZM*U(3,3) +C*****COMPUTE DERIVATIVES +c Changed from CALL FELDI(XI,H); XI, H are in COMMON block; results +c are the same; dkb Feb 1998 + CALL FELDI + Q=H(1)/RQ + DX=H(3)+H(3)+Q*XI(1) + DY=H(4)+H(4)+Q*XI(2) + DZ=H(2)+H(2)+Q*XI(3) +C*****TRANSFORM BACK TO GEOMAGNETIC CO-ORDINATE SYSTEM + DXM=U(1,1)*DX+U(2,1)*DY+U(3,1)*DZ + DYM=U(1,2)*DX+U(2,2)*DY + DZM=U(1,3)*DX+U(2,3)*DY+U(3,3)*DZ + DR=(XM*DXM+YM*DYM+ZM*DZM)/R +C*****FORM SLOWLY VARYING EXPRESSIONS + P(4)=(WR*DXM-0.5*P(1)*DR)/(R*DZM) + P(5)=(WR*DYM-0.5*P(2)*DR)/(R*DZM) + DSQ=RQ*(DXM*DXM+DYM*DYM+DZM*DZM) + BQ=DSQ*RQ*RQ + P(6)=SQRT(DSQ/(RQ+3.*ZM*ZM)) + P(7)=P(6)*(RQ+ZM*ZM)/(RQ*DZM) + RETURN + END +C +C + SUBROUTINE FELDG(GLAT,GLON,ALT,BNORTH,BEAST,BDOWN,BABS) +C------------------------------------------------------------------- +C CALCULATES EARTH MAGNETIC FIELD FROM SPHERICAL HARMONICS MODEL +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTRE, INTERNAL NOTE 61, +C 1970. +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - FIELD COEFFICIENTS IN BINARY DATA FILES INSTEAD OF BLOCK DATA +C - CALCULATES DIPOL MOMENT +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT FELDG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT FELDC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C COMMON BLANK AND ENTRY POINT FELDI ARE NEEDED WHEN USED +C IN CONNECTION WITH L-CALCULATION PROGRAM SHELLG. +C +C COMMON /MODEL/ AND /GENER/ +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C AQUAD, BQUAD SQUARE OF MAJOR AND MINOR HALF AXIS FOR +C EARTH ELLIPSOID AS RECOMMENDED BY INTERNATIONAL +C ASTRONOMICAL UNION (6378.160, 6356.775 KM). +C NMAX MAXIMUM ORDER OF SPHERICAL HARMONICS +C TIME YEAR (DECIMAL: 1973.5) FOR WHICH MAGNETIC +C FIELD IS TO BE CALCULATED +C G(M) NORMALIZED FIELD COEFFICIENTS (SEE FELDCOF) +C M=NMAX*(NMAX+2) +C------------------------------------------------------------------------ +C OUTPUT: BABS MAGNETIC FIELD STRENGTH IN GAUSS +C BNORTH, BEAST, BDOWN COMPONENTS OF THE FIELD WITH RESPECT +C TO THE LOCAL GEODETIC COORDINATE SYSTEM, WITH AXIS +C POINTING IN THE TANGENTIAL PLANE TO THE NORTH, EAST +C AND DOWNWARD. +C----------------------------------------------------------------------- + DIMENSION V(3),B(3) + CHARACTER*12 NAME + COMMON XI(3),H(144) + COMMON/MODEL/ NAME,NMAX,TIME,G(144) + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- IS RECORDS ENTRY POINT +C +C*****ENTRY POINT FELDG TO BE USED WITH GEODETIC CO-ORDINATES + IS=1 + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + RLON=GLON*UMR + CP=COS(RLON) + SP=SIN(RLON) + ZZZ=(ALT+BQUAD/D)*CT/ERA + RHO=(ALT+AQUAD/D)*ST/ERA + XXX=RHO*CP + YYY=RHO*SP + GOTO10 +C +C*****ENTRY POINT FELDC TO BE USED WITH CARTESIAN CO-ORDINATES + ENTRY FELDC(V,B) + IS=2 + XXX=V(1) + YYY=V(2) + ZZZ=V(3) +10 RQ=1./(XXX*XXX+YYY*YYY+ZZZ*ZZZ) + XI(1)=XXX*RQ + XI(2)=YYY*RQ + XI(3)=ZZZ*RQ + GOTO20 +C +C*****ENTRY POINT FELDI USED FOR L COMPUTATION + ENTRY FELDI + IS=3 +20 IHMAX=NMAX*NMAX+1 + LAST=IHMAX+NMAX+NMAX + IMAX=NMAX+NMAX-1 + DO 8 I=IHMAX,LAST +8 H(I)=G(I) + DO 6 K=1,3,2 + I=IMAX + IH=IHMAX +1 IL=IH-I + F=2./FLOAT(I-K+2) + X=XI(1)*F + Y=XI(2)*F + Z=XI(3)*(F+F) + I=I-2 + IF(I-1)5,4,2 +2 DO 3 M=3,I,2 + H(IL+M+1)=G(IL+M+1)+Z*H(IH+M+1)+X*(H(IH+M+3)-H(IH+M-1)) + A -Y*(H(IH+M+2)+H(IH+M-2)) +3 H(IL+M)=G(IL+M)+Z*H(IH+M)+X*(H(IH+M+2)-H(IH+M-2)) + A +Y*(H(IH+M+3)+H(IH+M-1)) +4 H(IL+2)=G(IL+2)+Z*H(IH+2)+X*H(IH+4)-Y*(H(IH+3)+H(IH)) + H(IL+1)=G(IL+1)+Z*H(IH+1)+Y*H(IH+4)+X*(H(IH+3)-H(IH)) +5 H(IL)=G(IL)+Z*H(IH)+2.*(X*H(IH+1)+Y*H(IH+2)) + IH=IL + IF(I.GE.K)GOTO1 +6 CONTINUE + IF(IS.EQ.3)RETURN + S=.5*H(1)+2.*(H(2)*XI(3)+H(3)*XI(1)+H(4)*XI(2)) + T=(RQ+RQ)*SQRT(RQ) + BXXX=T*(H(3)-S*XXX) + BYYY=T*(H(4)-S*YYY) + BZZZ=T*(H(2)-S*ZZZ) + IF(IS.EQ.2)GOTO7 + BABS=SQRT(BXXX*BXXX+BYYY*BYYY+BZZZ*BZZZ) + BEAST=BYYY*CP-BXXX*SP + BRHO=BYYY*SP+BXXX*CP + BNORTH=BZZZ*ST-BRHO*CT + BDOWN=-BZZZ*CT-BRHO*ST + RETURN +7 B(1)=BXXX + B(2)=BYYY + B(3)=BZZZ + RETURN + END +C +C + SUBROUTINE FELDCOF(YEAR,DIMO) +C------------------------------------------------------------------------ +C DETERMINES COEFFICIENTS AND DIPOL MOMENT FROM IGRF MODELS +C +C INPUT: YEAR DECIMAL YEAR FOR WHICH GEOMAGNETIC FIELD IS TO +C BE CALCULATED (e.g.:1995.5 for day 185 of 1995) +C OUTPUT: DIMO GEOMAGNETIC DIPOL MOMENT IN GAUSS (NORMALIZED +C TO EARTH'S RADIUS) AT THE TIME (YEAR) +C D. BILITZA, NSSDC, GSFC, CODE 633, GREENBELT, MD 20771, +C (301)286-9536 NOV 1987. +C -corrected for 2000 update - dkb- 5/31/2000 +C ### updated to IGRF-2000 version -dkb- 5/31/2000 +C ### updated to IGRF-2005 version -dkb- 3/24/2000 +C----------------------------------------------------------------------- + CHARACTER*12 FILMOD, FIL1, FIL2 +C ### FILMOD, DTEMOD arrays +1 + DIMENSION GH1(144),GH2(120),GHA(144),FILMOD(14),DTEMOD(14) + DOUBLE PRECISION X,F0,F + COMMON/MODEL/ FIL1,NMAX,TIME,GH1 + COMMON/GENER/ UMR,ERAD,AQUAD,BQUAD +C ### changed to conform with IGRF 45-95, also FILMOD, DTEMOD arrays +1 + DATA FILMOD /'dgrf45.dat', 'dgrf50.dat', + 1 'dgrf55.dat', 'dgrf60.dat', 'dgrf65.dat', + 2 'dgrf70.dat', 'dgrf75.dat', 'dgrf80.dat', + 3 'dgrf85.dat', 'dgrf90.dat', 'dgrf95.dat', + 4 'dgrf00.dat','igrf05.dat','igrf05s.dat'/ + DATA DTEMOD / 1945., 1950., 1955., 1960., 1965., 1970., + 1 1975., 1980., 1985., 1990., 1995., 2000.,2005.,2010./ +C +C ### numye is number of 5-year priods represented by IGRF +C + NUMYE=13 +C +C IS=0 FOR SCHMIDT NORMALIZATION IS=1 GAUSS NORMALIZATION +C IU IS INPUT UNIT NUMBER FOR IGRF COEFFICIENT SETS +C + IU = 10 + IS = 0 +C-- DETERMINE IGRF-YEARS FOR INPUT-YEAR + TIME = YEAR + IYEA = INT(YEAR/5.)*5 + L = (IYEA - 1945)/5 + 1 + IF(L.LT.1) L=1 + IF(L.GT.NUMYE) L=NUMYE + DTE1 = DTEMOD(L) + FIL1 = FILMOD(L) + DTE2 = DTEMOD(L+1) + FIL2 = FILMOD(L+1) +C-- GET IGRF COEFFICIENTS FOR THE BOUNDARY YEARS + CALL GETSHC (IU, FIL1, NMAX1, ERAD, GH1, IER) + IF (IER .NE. 0) STOP + CALL GETSHC (IU, FIL2, NMAX2, ERAD, GH2, IER) + IF (IER .NE. 0) STOP +C-- DETERMINE IGRF COEFFICIENTS FOR YEAR + IF (L .LE. NUMYE-1) THEN + CALL INTERSHC (YEAR, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GHA) + ELSE + CALL EXTRASHC (YEAR, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GHA) + ENDIF +C-- DETERMINE MAGNETIC DIPOL MOMENT AND COEFFIECIENTS G + F0=0.D0 + DO 1234 J=1,3 + F = GHA(J) * 1.D-5 + F0 = F0 + F * F +1234 CONTINUE + DIMO = DSQRT(F0) + + GH1(1) = 0.0 + I=2 + F0=1.D-5 + IF(IS.EQ.0) F0=-F0 + SQRT2=SQRT(2.) + + DO 9 N=1,NMAX + X = N + F0 = F0 * X * X / (4.D0 * X - 2.D0) + IF(IS.EQ.0) F0 = F0 * (2.D0 * X - 1.D0) / X + F = F0 * 0.5D0 + IF(IS.EQ.0) F = F * SQRT2 + GH1(I) = GHA(I-1) * F0 + I = I+1 + DO 9 M=1,N + F = F * (X + M) / (X - M + 1.D0) + IF(IS.EQ.0) F = F * DSQRT((X - M + 1.D0) / (X + M)) + GH1(I) = GHA(I-1) * F + GH1(I+1) = GHA(I) * F + I=I+2 +9 CONTINUE + RETURN + END +C +C + SUBROUTINE GETSHC (IU, FSPEC, NMAX, ERAD, GH, IER) + +C =============================================================== +C +C Version 1.01 +C +C Reads spherical harmonic coefficients from the specified +C file into an array. +C +C Input: +C IU - Logical unit number +C FSPEC - File specification +C +C Output: +C NMAX - Maximum degree and order of model +C ERAD - Earth's radius associated with the spherical +C harmonic coefficients, in the same units as +C elevation +C GH - Schmidt quasi-normal internal spherical +C harmonic coefficients +C IER - Error number: = 0, no error +C = -2, records out of order +C = FORTRAN run-time error number +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + CHARACTER FSPEC*(*) + DIMENSION GH(*) + +C --------------------------------------------------------------- +C Open coefficient file. Read past first header record. +C Read degree and order of model and Earth's radius. +C --------------------------------------------------------------- + OPEN (IU, FILE=FSPEC, STATUS='OLD', IOSTAT=IER, ERR=999) + READ (IU, *, IOSTAT=IER, ERR=999) + READ (IU, *, IOSTAT=IER, ERR=999) NMAX, ERAD +C --------------------------------------------------------------- +C Read the coefficient file, arranged as follows: +C +C N M G H +C ---------------------- +C / 1 0 GH(1) - +C / 1 1 GH(2) GH(3) +C / 2 0 GH(4) - +C / 2 1 GH(5) GH(6) +C NMAX*(NMAX+3)/2 / 2 2 GH(7) GH(8) +C records \ 3 0 GH(9) - +C \ . . . . +C \ . . . . +C NMAX*(NMAX+2) \ . . . . +C elements in GH \ NMAX NMAX . . +C +C N and M are, respectively, the degree and order of the +C coefficient. +C --------------------------------------------------------------- + + I = 0 + DO 2211 NN = 1, NMAX + DO 2233 MM = 0, NN + READ (IU, *, IOSTAT=IER, ERR=999) N, M, G, H + IF (NN .NE. N .OR. MM .NE. M) THEN + IER = -2 + GOTO 999 + ENDIF + I = I + 1 + GH(I) = G + IF (M .NE. 0) THEN + I = I + 1 + GH(I) = H + ENDIF +2233 CONTINUE +2211 CONTINUE + +999 CLOSE (IU) + + RETURN + END +C +C + SUBROUTINE INTERSHC (DATE, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Interpolates linearly, in time, between two spherical +C harmonic models. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of earlier model +C NMAX1 - Maximum degree and order of earlier model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of earlier model +C DTE2 - Date of later model +C NMAX2 - Maximum degree and order of later model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of later model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly interpolating between the +C coefficients of the earlier model (GH1), at date DTE1, +C and those of the later model (GH2), at date DTE2. If one +C model is smaller than the other, the interpolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) / (DTE2 - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1122 I = K + 1, L +1122 GH(I) = GH1(I) + FACTOR * (-GH1(I)) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1133 I = K + 1, L +1133 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1144 I = 1, K +1144 GH(I) = GH1(I) + FACTOR * (GH2(I) - GH1(I)) + + RETURN + END +C +C + SUBROUTINE EXTRASHC (DATE, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Extrapolates linearly a spherical harmonic model with a +C rate-of-change model. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of base model +C NMAX1 - Maximum degree and order of base model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of base model +C NMAX2 - Maximum degree and order of rate-of-change +C model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of rate-of-change model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly extrapolating the coef- +C ficients of the base model (GH1), at date DTE1, using +C those of the rate-of-change model (GH2), at date DTE2. If +C one model is smaller than the other, the extrapolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1155 I = K + 1, L +1155 GH(I) = GH1(I) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1166 I = K + 1, L +1166 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1177 I = 1, K +1177 GH(I) = GH1(I) + FACTOR * GH2(I) + + RETURN + END +C +C + SUBROUTINE INITIZE +C---------------------------------------------------------------- +C Initializes the parameters in COMMON/GENER/ +C +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C EREQU MAJOR HALF AXIS FOR EARTH ELLIPSOID (6378.160 KM) +C ERPOL MINOR HALF AXIS FOR EARTH ELLIPSOID (6356.775 KM) +C AQUAD SQUARE OF MAJOR HALF AXIS FOR EARTH ELLIPSOID +C BQUAD SQUARE OF MINOR HALF AXIS FOR EARTH ELLIPSOID +C +C ERA, EREQU and ERPOL as recommended by the INTERNATIONAL +C ASTRONOMICAL UNION . +C----------------------------------------------------------------- + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD + ERA=6371.2 + EREQU=6378.16 + ERPOL=6356.775 + AQUAD=EREQU*EREQU + BQUAD=ERPOL*ERPOL + UMR=ATAN(1.0)*4./180. + RETURN + END diff --git a/IGRF/old_coefficients/10th-generation/dgrf00.dat b/IGRF/old_coefficients/10th-generation/dgrf00.dat new file mode 100644 index 0000000..e0c42b1 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf00.dat @@ -0,0 +1,67 @@ + igrf00 + 10 6371.2 2000.0 + 1 0 -29619.4 0.0 + 1 1 -1728.2 5186.1 + 2 0 -2267.7 0.0 + 2 1 3068.4 -2481.6 + 2 2 1670.9 -458. + 3 0 1339.6 0.0 + 3 1 -2288. -227.6 + 3 2 1252.1 293.4 + 3 3 714.5 -491.1 + 4 0 932.3 .0 + 4 1 786.8 272.6 + 4 2 250. -231.9 + 4 3 -403. 119.8 + 4 4 111.3 -303.8 + 5 0 -218.8 .0 + 5 1 351.4 43.8 + 5 2 222.3 171.9 + 5 3 -130.4 -133.1 + 5 4 -168.6 -39.3 + 5 5 -12.9 106.3 + 6 0 72.3 .0 + 6 1 68.2 -17.4 + 6 2 74.2 63.7 + 6 3 -160.9 65.1 + 6 4 -5.9 -61.2 + 6 5 16.9 0.7 + 6 6 -90.4 43.8 + 7 0 79. .0 + 7 1 -74. -64.6 + 7 2 0. -24.2 + 7 3 33.3 6.2 + 7 4 9.1 24. + 7 5 6.9 14.8 + 7 6 7.3 -25.4 + 7 7 -1.2 -5.8 + 8 0 24.4 .0 + 8 1 6.6 11.9 + 8 2 -9.2 -21.5 + 8 3 -7.9 8.5 + 8 4 -16.6 -21.5 + 8 5 9.1 15.5 + 8 6 7. 8.9 + 8 7 -7.9 -14.9 + 8 8 -7. -2.1 + 9 0 5. .0 + 9 1 9.4 -19.7 + 9 2 3. 13.4 + 9 3 -8.4 12.5 + 9 4 6.3 -6.2 + 9 5 -8.9 -8.4 + 9 6 -1.5 8.4 + 9 7 9.3 3.8 + 9 8 -4.3 -8.2 + 9 9 -8.2 4.8 + 10 0 -2.6 .0 + 10 1 -6. 1.7 + 10 2 1.7 0. + 10 3 -3.1 4. + 10 4 -0.5 4.9 + 10 5 3.7 -5.9 + 10 6 1. -1.2 + 10 7 2. -2.9 + 10 8 4.2 0.2 + 10 9 0.3 -2.2 + 10 10 -1.1 -7.4 diff --git a/IGRF/old_coefficients/10th-generation/dgrf45.dat b/IGRF/old_coefficients/10th-generation/dgrf45.dat new file mode 100644 index 0000000..cead48b --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf45.dat @@ -0,0 +1,67 @@ + dgrf45 + 10 6371.2 1945.0 + 1 0 -30594. 0. + 1 1 -2285. 5810. + 2 0 -1244. 0. + 2 1 2990. -1702. + 2 2 1578. 477. + 3 0 1282. 0. + 3 1 -1834. -499. + 3 2 1255. 186. + 3 3 913. -11. + 4 0 944. 0. + 4 1 776. 144. + 4 2 544. -276. + 4 3 -421. -55. + 4 4 304. -178. + 5 0 -253. 0. + 5 1 346. -12. + 5 2 194. 95. + 5 3 -20. -67. + 5 4 -142. -119. + 5 5 -82. 82. + 6 0 59. 0. + 6 1 57. 6. + 6 2 6. 100. + 6 3 -246. 16. + 6 4 -25. -9. + 6 5 21. -16. + 6 6 -104. -39. + 7 0 70. 0. + 7 1 -40. -45. + 7 2 0. -18. + 7 3 0. 2. + 7 4 -29. 6. + 7 5 -10. 28. + 7 6 15. -17. + 7 7 29. -22. + 8 0 13. 0. + 8 1 7. 12. + 8 2 -8. -21. + 8 3 -5. -12. + 8 4 9. -7. + 8 5 7. 2. + 8 6 -10. 18. + 8 7 7. 3. + 8 8 2. -11. + 9 0 5. 0. + 9 1 -21. -27. + 9 2 1. 17. + 9 3 -11. 29. + 9 4 3. -9. + 9 5 16. 4. + 9 6 -3. 9. + 9 7 -4. 6. + 9 8 -3. 1. + 9 9 -4. 8. + 10 0 -3. 0. + 10 1 11. 5. + 10 2 1. 1. + 10 3 2. -20. + 10 4 -5. -1. + 10 5 -1. -6. + 10 6 8. 6. + 10 7 -1. -4. + 10 8 -3. -2. + 10 9 5. 0. + 10 10 -2. -2. diff --git a/IGRF/old_coefficients/10th-generation/dgrf50.dat b/IGRF/old_coefficients/10th-generation/dgrf50.dat new file mode 100644 index 0000000..b8971b7 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf50.dat @@ -0,0 +1,67 @@ + dgrf50 + 10 6371.2 1950.0 + 1 0 -30554. 0. + 1 1 -2250. 5815. + 2 0 -1341. 0. + 2 1 2998. -1810. + 2 2 1576. 381. + 3 0 1297. 0. + 3 1 -1889. -476. + 3 2 1274. 206. + 3 3 896. -46. + 4 0 954. 0. + 4 1 792. 136. + 4 2 528. -278. + 4 3 -408. -37. + 4 4 303. -210. + 5 0 -240. 0. + 5 1 349. 3. + 5 2 211. 103. + 5 3 -20. -87. + 5 4 -147. -122. + 5 5 -76. 80. + 6 0 54. 0. + 6 1 57. -1. + 6 2 4. 99. + 6 3 -247. 33. + 6 4 -16. -12. + 6 5 12. -12. + 6 6 -105. -30. + 7 0 65. 0. + 7 1 -55. -35. + 7 2 2. -17. + 7 3 1. 0. + 7 4 -40. 10. + 7 5 -7. 36. + 7 6 5. -18. + 7 7 19. -16. + 8 0 22. 0. + 8 1 15. 5. + 8 2 -4. -22. + 8 3 -1. 0. + 8 4 11. -21. + 8 5 15. -8. + 8 6 -13. 17. + 8 7 5. -4. + 8 8 -1. -17. + 9 0 3. 0. + 9 1 -7. -24. + 9 2 -1. 19. + 9 3 -25. 12. + 9 4 10. 2. + 9 5 5. 2. + 9 6 -5. 8. + 9 7 -2. 8. + 9 8 3. -11. + 9 9 8. -7. + 10 0 -8. 0. + 10 1 4. 13. + 10 2 -1. -2. + 10 3 13. -10. + 10 4 -4. 2. + 10 5 4. -3. + 10 6 12. 6. + 10 7 3. -3. + 10 8 2. 6. + 10 9 10. 11. + 10 10 3. 8. diff --git a/IGRF/old_coefficients/10th-generation/dgrf55.dat b/IGRF/old_coefficients/10th-generation/dgrf55.dat new file mode 100644 index 0000000..68807d8 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf55.dat @@ -0,0 +1,67 @@ + dgrf55 + 10 6371.2 1955.0 + 1 0 -30500. 0. + 1 1 -2215. 5820. + 2 0 -1440. 0. + 2 1 3003. -1898. + 2 2 1581. 291. + 3 0 1302. 0. + 3 1 -1944. -462. + 3 2 1288. 216. + 3 3 882. -83. + 4 0 958. 0. + 4 1 796. 133. + 4 2 510. -274. + 4 3 -397. -23. + 4 4 290. -230. + 5 0 -229. 0. + 5 1 360. 15. + 5 2 230. 110. + 5 3 -23. -98. + 5 4 -152. -121. + 5 5 -69. 78. + 6 0 47. 0. + 6 1 57. -9. + 6 2 3. 96. + 6 3 -247. 48. + 6 4 -8. -16. + 6 5 7. -12. + 6 6 -107. -24. + 7 0 65. 0. + 7 1 -56. -50. + 7 2 2. -24. + 7 3 10. -4. + 7 4 -32. 8. + 7 5 -11. 28. + 7 6 9. -20. + 7 7 18. -18. + 8 0 11. 0. + 8 1 9. 10. + 8 2 -6. -15. + 8 3 -14. 5. + 8 4 6. -23. + 8 5 10. 3. + 8 6 -7. 23. + 8 7 6. -4. + 8 8 9. -13. + 9 0 4. 0. + 9 1 9. -11. + 9 2 -4. 12. + 9 3 -5. 7. + 9 4 2. 6. + 9 5 4. -2. + 9 6 1. 10. + 9 7 2. 7. + 9 8 2. -6. + 9 9 5. 5. + 10 0 -3. 0. + 10 1 -5. -4. + 10 2 -1. 0. + 10 3 2. -8. + 10 4 -3. -2. + 10 5 7. -4. + 10 6 4. 1. + 10 7 -2. -3. + 10 8 6. 7. + 10 9 -2. -1. + 10 10 0. -3. diff --git a/IGRF/old_coefficients/10th-generation/dgrf60.dat b/IGRF/old_coefficients/10th-generation/dgrf60.dat new file mode 100644 index 0000000..3eade82 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf60.dat @@ -0,0 +1,67 @@ + dgrf60 + 10 6371.2 1960.0 + 1 0 -30421. 0. + 1 1 -2169. 5791. + 2 0 -1555. 0. + 2 1 3002. -1967. + 2 2 1590. 206. + 3 0 1302. 0. + 3 1 -1992. -414. + 3 2 1289. 224. + 3 3 878. -130. + 4 0 957. 0. + 4 1 800. 135. + 4 2 504. -278. + 4 3 -394. 3. + 4 4 269. -255. + 5 0 -222. 0. + 5 1 362. 16. + 5 2 242. 125. + 5 3 -26. -117. + 5 4 -156. -114. + 5 5 -63. 81. + 6 0 46. 0. + 6 1 58. -10. + 6 2 1. 99. + 6 3 -237. 60. + 6 4 -1. -20. + 6 5 -2. -11. + 6 6 -113. -17. + 7 0 67. 0. + 7 1 -56. -55. + 7 2 5. -28. + 7 3 15. -6. + 7 4 -32. 7. + 7 5 -7. 23. + 7 6 17. -18. + 7 7 8. -17. + 8 0 15. 0. + 8 1 6. 11. + 8 2 -4. -14. + 8 3 -11. 7. + 8 4 2. -18. + 8 5 10. 4. + 8 6 -5. 23. + 8 7 10. 1. + 8 8 8. -20. + 9 0 4. 0. + 9 1 6. -18. + 9 2 0. 12. + 9 3 -9. 2. + 9 4 1. 0. + 9 5 4. -3. + 9 6 -1. 9. + 9 7 -2. 8. + 9 8 3. 0. + 9 9 -1. 5. + 10 0 1. 0. + 10 1 -3. 4. + 10 2 4. 1. + 10 3 0. 0. + 10 4 -1. 2. + 10 5 4. -5. + 10 6 6. 1. + 10 7 1. -1. + 10 8 -1. 6. + 10 9 2. 0. + 10 10 0. -7. diff --git a/IGRF/old_coefficients/10th-generation/dgrf65.dat b/IGRF/old_coefficients/10th-generation/dgrf65.dat new file mode 100644 index 0000000..dfed431 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf65.dat @@ -0,0 +1,67 @@ + dgrf65 + 10 6371.2 1965.0 + 1 0 -30334. 0. + 1 1 -2119. 5776. + 2 0 -1662. 0. + 2 1 2997. -2016. + 2 2 1594. 114. + 3 0 1297. 0. + 3 1 -2038. -404. + 3 2 1292. 240. + 3 3 856. -165. + 4 0 957. 0. + 4 1 804. 148. + 4 2 479. -269. + 4 3 -390. 13. + 4 4 252. -269. + 5 0 -219. 0. + 5 1 358. 19. + 5 2 254. 128. + 5 3 -31. -126. + 5 4 -157. -97. + 5 5 -62. 81. + 6 0 45. 0. + 6 1 61. -11. + 6 2 8. 100. + 6 3 -228. 68. + 6 4 4. -32. + 6 5 1. -8. + 6 6 -111. -7. + 7 0 75. 0. + 7 1 -57. -61. + 7 2 4. -27. + 7 3 13. -2. + 7 4 -26. 6. + 7 5 -6. 26. + 7 6 13. -23. + 7 7 1. -12. + 8 0 13. 0. + 8 1 5. 7. + 8 2 -4. -12. + 8 3 -14. 9. + 8 4 0. -16. + 8 5 8. 4. + 8 6 -1. 24. + 8 7 11. -3. + 8 8 4. -17. + 9 0 8. 0. + 9 1 10. -22. + 9 2 2. 15. + 9 3 -13. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 5. 10. + 9 8 1. -4. + 9 9 -2. 1. + 10 0 -2. 0. + 10 1 -3. 2. + 10 2 2. 1. + 10 3 -5. 2. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 4. 0. + 10 7 0. -2. + 10 8 2. 3. + 10 9 2. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/10th-generation/dgrf70.dat b/IGRF/old_coefficients/10th-generation/dgrf70.dat new file mode 100644 index 0000000..45c3192 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf70.dat @@ -0,0 +1,67 @@ + dgrf70 + 10 6371.2 1970.0 + 1 0 -30220. 0. + 1 1 -2068. 5737. + 2 0 -1781. 0. + 2 1 3000. -2047. + 2 2 1611. 25. + 3 0 1287. 0. + 3 1 -2091. -366. + 3 2 1278. 251. + 3 3 838. -196. + 4 0 952. 0. + 4 1 800. 167. + 4 2 461. -266. + 4 3 -395. 26. + 4 4 234. -279. + 5 0 -216. 0. + 5 1 359. 26. + 5 2 262. 139. + 5 3 -42. -139. + 5 4 -160. -91. + 5 5 -56. 83. + 6 0 43. 0. + 6 1 64. -12. + 6 2 15. 100. + 6 3 -212. 72. + 6 4 2. -37. + 6 5 3. -6. + 6 6 -112. 1. + 7 0 72. 0. + 7 1 -57. -70. + 7 2 1. -27. + 7 3 14. -4. + 7 4 -22. 8. + 7 5 -2. 23. + 7 6 13. -23. + 7 7 -2. -11. + 8 0 14. 0. + 8 1 6. 7. + 8 2 -2. -15. + 8 3 -13. 6. + 8 4 -3. -17. + 8 5 5. 6. + 8 6 0. 21. + 8 7 11. -6. + 8 8 3. -16. + 9 0 8. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 6. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 0. 10. + 9 7 3. 11. + 9 8 1. -2. + 9 9 -1. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -1. 4. + 10 5 6. -4. + 10 6 4. 0. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -4. diff --git a/IGRF/old_coefficients/10th-generation/dgrf75.dat b/IGRF/old_coefficients/10th-generation/dgrf75.dat new file mode 100644 index 0000000..fe001d9 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf75.dat @@ -0,0 +1,67 @@ + dgrf75 + 10 6371.2 1975.0 + 1 0 -30100. 0. + 1 1 -2013. 5675. + 2 0 -1902. 0. + 2 1 3010. -2067. + 2 2 1632. -68. + 3 0 1276. 0. + 3 1 -2144. -333. + 3 2 1260. 262. + 3 3 830. -223. + 4 0 946. 0. + 4 1 791. 191. + 4 2 438. -265. + 4 3 -405. 39. + 4 4 216. -288. + 5 0 -218. 0. + 5 1 356. 31. + 5 2 264. 148. + 5 3 -59. -152. + 5 4 -159. -83. + 5 5 -49. 88. + 6 0 45. 0. + 6 1 66. -13. + 6 2 28. 99. + 6 3 -198. 75. + 6 4 1. -41. + 6 5 6. -4. + 6 6 -111. 11. + 7 0 71. 0. + 7 1 -56. -77. + 7 2 1. -26. + 7 3 16. -5. + 7 4 -14. 10. + 7 5 0. 22. + 7 6 12. -23. + 7 7 -5. -12. + 8 0 14. 0. + 8 1 6. 6. + 8 2 -1. -16. + 8 3 -12. 4. + 8 4 -8. -19. + 8 5 4. 6. + 8 6 0. 18. + 8 7 10. -10. + 8 8 1. -17. + 9 0 7. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 4. 11. + 9 8 1. -3. + 9 9 -2. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 4. + 10 5 5. -4. + 10 6 4. -1. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -5. diff --git a/IGRF/old_coefficients/10th-generation/dgrf80.dat b/IGRF/old_coefficients/10th-generation/dgrf80.dat new file mode 100644 index 0000000..29ef9c1 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf80.dat @@ -0,0 +1,67 @@ + dgrf80 + 10 6371.2 1980.0 + 1 0 -29992. 0. + 1 1 -1956. 5604. + 2 0 -1997. 0. + 2 1 3027. -2129. + 2 2 1663. -200. + 3 0 1281. 0. + 3 1 -2180. -336. + 3 2 1251. 271. + 3 3 833. -252. + 4 0 938. 0. + 4 1 782. 212. + 4 2 398. -257. + 4 3 -419. 53. + 4 4 199. -297. + 5 0 -218. 0. + 5 1 357. 46. + 5 2 261. 150. + 5 3 -74. -151. + 5 4 -162. -78. + 5 5 -48. 92. + 6 0 48. 0. + 6 1 66. -15. + 6 2 42. 93. + 6 3 -192. 71. + 6 4 4. -43. + 6 5 14. -2. + 6 6 -108. 17. + 7 0 72. 0. + 7 1 -59. -82. + 7 2 2. -27. + 7 3 21. -5. + 7 4 -12. 16. + 7 5 1. 18. + 7 6 11. -23. + 7 7 -2. -10. + 8 0 18. 0. + 8 1 6. 7. + 8 2 0. -18. + 8 3 -11. 4. + 8 4 -7. -22. + 8 5 4. 9. + 8 6 3. 16. + 8 7 6. -13. + 8 8 -1. -15. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 16. + 9 3 -12. 9. + 9 4 9. -5. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 10. + 9 8 2. -6. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 2. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/10th-generation/dgrf85.dat b/IGRF/old_coefficients/10th-generation/dgrf85.dat new file mode 100644 index 0000000..d771bcf --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf85.dat @@ -0,0 +1,67 @@ + dgrf85 + 10 6371.2 1985.0 + 1 0 -29873. 0. + 1 1 -1905. 5500. + 2 0 -2072. 0. + 2 1 3044. -2197. + 2 2 1687. -306. + 3 0 1296. 0. + 3 1 -2208. -310. + 3 2 1247. 284. + 3 3 829. -297. + 4 0 936. 0. + 4 1 780. 232. + 4 2 361. -249. + 4 3 -424. 69. + 4 4 170. -297. + 5 0 -214. 0. + 5 1 355. 47. + 5 2 253. 150. + 5 3 -93. -154. + 5 4 -164. -75. + 5 5 -46. 95. + 6 0 53. 0. + 6 1 65. -16. + 6 2 51. 88. + 6 3 -185. 69. + 6 4 4. -48. + 6 5 16. -1. + 6 6 -102. 21. + 7 0 74. 0. + 7 1 -62. -83. + 7 2 3. -27. + 7 3 24. -2. + 7 4 -6. 20. + 7 5 4. 17. + 7 6 10. -23. + 7 7 0. -7. + 8 0 21. 0. + 8 1 6. 8. + 8 2 0. -19. + 8 3 -11. 5. + 8 4 -9. -23. + 8 5 4. 11. + 8 6 4. 14. + 8 7 4. -15. + 8 8 -4. -11. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 15. + 9 3 -12. 9. + 9 4 9. -6. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 9. + 9 8 1. -7. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 3. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/10th-generation/dgrf90.dat b/IGRF/old_coefficients/10th-generation/dgrf90.dat new file mode 100644 index 0000000..f431fa4 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf90.dat @@ -0,0 +1,67 @@ + dgrf90 + 10 6371.2 1990.0 + 1 0 -29775. 0. + 1 1 -1848. 5406. + 2 0 -2131. 0. + 2 1 3059. -2279. + 2 2 1686. -373. + 3 0 1314. 0. + 3 1 -2239. -284. + 3 2 1248. 293. + 3 3 802. -352. + 4 0 939. 0. + 4 1 780. 247. + 4 2 325. -240. + 4 3 -423. 84. + 4 4 141. -299. + 5 0 -214. 0. + 5 1 353. 46. + 5 2 245. 154. + 5 3 -109. -153. + 5 4 -165. -69. + 5 5 -36. 97. + 6 0 61. 0. + 6 1 65. -16. + 6 2 59. 82. + 6 3 -178. 69. + 6 4 3. -52. + 6 5 18. 1. + 6 6 -96. 24. + 7 0 77. 0. + 7 1 -64. -80. + 7 2 2. -26. + 7 3 26. 0. + 7 4 -1. 21. + 7 5 5. 17. + 7 6 9. -23. + 7 7 0. -4. + 8 0 23. 0. + 8 1 5. 10. + 8 2 -1. -19. + 8 3 -10. 6. + 8 4 -12. -22. + 8 5 3. 12. + 8 6 4. 12. + 8 7 2. -16. + 8 8 -6. -10. + 9 0 4. 0. + 9 1 9. -20. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 8. + 9 8 1. -7. + 9 9 -6. 2. + 10 0 -3. 0. + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/10th-generation/dgrf95.dat b/IGRF/old_coefficients/10th-generation/dgrf95.dat new file mode 100644 index 0000000..5e0fd4e --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/dgrf95.dat @@ -0,0 +1,67 @@ + dgrf95 + 10 6371.2 1995.0 + 1 0 -29692. 0. + 1 1 -1784. 5306. + 2 0 -2200. 0. + 2 1 3070. -2366. + 2 2 1681. -413. + 3 0 1335. 0. + 3 1 -2267. -262. + 3 2 1249. 302. + 3 3 759. -427. + 4 0 940. 0. + 4 1 780. 262. + 4 2 290. -236. + 4 3 -418. 97. + 4 4 122. -306. + 5 0 -214. 0. + 5 1 352. 46. + 5 2 235. 165. + 5 3 -118. -143. + 5 4 -166. -55. + 5 5 -17. 107. + 6 0 68. 0. + 6 1 67. -17. + 6 2 68. 72. + 6 3 -170. 67. + 6 4 -1. -58. + 6 5 19. 1. + 6 6 -93. 36. + 7 0 77. 0. + 7 1 -72. -69. + 7 2 1. -25. + 7 3 28. 4. + 7 4 5. 24. + 7 5 4. 17. + 7 6 8. -24. + 7 7 -2. -6. + 8 0 25. 0. + 8 1 6. 11. + 8 2 -6. -21. + 8 3 -9. 8. + 8 4 -14. -23. + 8 5 9. 15. + 8 6 6. 11. + 8 7 -5. -16. + 8 8 -7. -4. + 9 0 4. 0. + 9 1 9. -20. + 9 2 3. 15. + 9 3 -10. 12. + 9 4 8. -6. + 9 5 -8. -8. + 9 6 -1. 8. + 9 7 10. 5. + 9 8 -2. -8. + 9 9 -8. 3. + 10 0 -3. 0. + 10 1 -6. 1. + 10 2 2. 0. + 10 3 -4. 4. + 10 4 -1. 5. + 10 5 4. -5. + 10 6 2. -1. + 10 7 2. -2. + 10 8 5. 1. + 10 9 1. -2. + 10 10 0. -7. \ No newline at end of file diff --git a/IGRF/old_coefficients/10th-generation/igrf05.dat b/IGRF/old_coefficients/10th-generation/igrf05.dat new file mode 100644 index 0000000..4555ae1 --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/igrf05.dat @@ -0,0 +1,67 @@ + igrf05 + 10 6371.2 2005.0 + 1 0 -29556.8 0.0 + 1 1 -1671.8 5080.0 + 2 0 -2340.5 0.0 + 2 1 3047.0 -2594.9 + 2 2 1656.9 -516.7 + 3 0 1335.7 0.0 + 3 1 -2305.3 -200.4 + 3 2 1246.8 269.3 + 3 3 674.4 -524.5 + 4 0 919.8 0.0 + 4 1 798.2 281.4 + 4 2 211.5 -225.8 + 4 3 -379.5 145.7 + 4 4 100.2 -304.7 + 5 0 -227.6 0.0 + 5 1 354.4 42.7 + 5 2 208.8 179.8 + 5 3 -136.6 -123.0 + 5 4 -168.3 -19.5 + 5 5 -14.1 103.6 + 6 0 72.9 0.0 + 6 1 69.6 -20.2 + 6 2 76.6 54.7 + 6 3 -151.1 63.7 + 6 4 -15.0 -63.4 + 6 5 14.7 0.0 + 6 6 -86.4 50.3 + 7 0 79.8 0.0 + 7 1 -74.4 -61.4 + 7 2 -1.4 -22.5 + 7 3 38.6 6.9 + 7 4 12.3 25.4 + 7 5 9.4 10.9 + 7 6 5.5 -26.4 + 7 7 2.0 -4.8 + 8 0 24.8 0.0 + 8 1 7.7 11.2 + 8 2 -11.4 -21.0 + 8 3 -6.8 9.7 + 8 4 -18.0 -19.8 + 8 5 10.0 16.1 + 8 6 9.4 7.7 + 8 7 -11.4 -12.8 + 8 8 -5.0 -0.1 + 9 0 5.6 0.0 + 9 1 9.8 -20.1 + 9 2 3.6 12.9 + 9 3 -7.0 12.7 + 9 4 5.0 -6.7 + 9 5 -10.8 -8.1 + 9 6 -1.3 8.1 + 9 7 8.7 2.9 + 9 8 -6.7 -7.9 + 9 9 -9.2 5.9 + 10 0 -2.2 0.0 + 10 1 -6.3 2.4 + 10 2 1.6 0.2 + 10 3 -2.5 4.4 + 10 4 -0.1 4.7 + 10 5 3.0 -6.5 + 10 6 0.3 -1.0 + 10 7 2.1 -3.4 + 10 8 3.9 -0.9 + 10 9 -0.1 -2.3 + 10 10 -2.2 -8.0 diff --git a/IGRF/old_coefficients/10th-generation/igrf05s.dat b/IGRF/old_coefficients/10th-generation/igrf05s.dat new file mode 100644 index 0000000..96e432e --- /dev/null +++ b/IGRF/old_coefficients/10th-generation/igrf05s.dat @@ -0,0 +1,46 @@ + igrf05s + 8 6371.2 2010.0 + 1 0 8.8 0. + 1 1 10.8 -21.3 + 2 0 -15.0 0. + 2 1 -6.9 -23.3 + 2 2 -1.0 -14.0 + 3 0 -0.3 0.0 + 3 1 -3.1 5.4 + 3 2 -0.9 -6.5 + 3 3 -6.8 -2.0 + 4 0 -2.5 0. + 4 1 2.8 2.0 + 4 2 -7.1 1.8 + 4 3 5.9 5.6 + 4 4 -3.2 0.0 + 5 0 -2.6 0.0 + 5 1 0.4 0.1 + 5 2 -3.0 1.8 + 5 3 -1.2 2.0 + 5 4 0.2 4.5 + 5 5 -0.6 -1.0 + 6 0 -0.8 0.0 + 6 1 0.2 -0.4 + 6 2 -0.2 -1.9 + 6 3 2.1 -0.4 + 6 4 -2.1 -0.4 + 6 5 -0.4 -0.2 + 6 6 1.3 0.9 + 7 0 -0.4 0.0 + 7 1 0.0 0.8 + 7 2 -0.2 0.4 + 7 3 1.1 0.1 + 7 4 0.6 0.2 + 7 5 0.4 -0.9 + 7 6 -0.5 -0.3 + 7 7 0.9 0.3 + 8 0 -0.2 0.0 + 8 1 0.2 -0.2 + 8 2 -0.2 0.2 + 8 3 0.2 0.2 + 8 4 -0.2 0.4 + 8 5 0.2 0.2 + 8 6 0.5 -0.3 + 8 7 -0.7 0.5 + 8 8 0.5 0.4 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1945.dat b/IGRF/old_coefficients/11th-generation/dgrf1945.dat new file mode 100644 index 0000000..2bd6fa2 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1945.dat @@ -0,0 +1,122 @@ + dgrf1945 + 10 6371.2 1945.0 +-30594 +-2285 +5810 +-1244 +2990 +-1702 +1578 +477 +1282 +-1834 +-499 +1255 +186 +913 +-11 +944 +776 +144 +544 +-276 +-421 +-55 +304 +-178 +-253 +346 +-12 +194 +95 +-20 +-67 +-142 +-119 +-82 +82 +59 +57 +6 +6 +100 +-246 +16 +-25 +-9 +21 +-16 +-104 +-39 +70 +-40 +-45 +0 +-18 +0 +2 +-29 +6 +-10 +28 +15 +-17 +29 +-22 +13 +7 +12 +-8 +-21 +-5 +-12 +9 +-7 +7 +2 +-10 +18 +7 +3 +2 +-11 +5 +-21 +-27 +1 +17 +-11 +29 +3 +-9 +16 +4 +-3 +9 +-4 +6 +-3 +1 +-4 +8 +-3 +11 +5 +1 +1 +2 +-20 +-5 +-1 +-1 +-6 +8 +6 +-1 +-4 +-3 +-2 +5 +0 +-2 +-2 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1950.dat b/IGRF/old_coefficients/11th-generation/dgrf1950.dat new file mode 100644 index 0000000..588b7f4 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1950.dat @@ -0,0 +1,122 @@ + dgrf1950 + 10 6371.2 1950.0 +-30554 +-2250 +5815 +-1341 +2998 +-1810 +1576 +381 +1297 +-1889 +-476 +1274 +206 +896 +-46 +954 +792 +136 +528 +-278 +-408 +-37 +303 +-210 +-240 +349 +3 +211 +103 +-20 +-87 +-147 +-122 +-76 +80 +54 +57 +-1 +4 +99 +-247 +33 +-16 +-12 +12 +-12 +-105 +-30 +65 +-55 +-35 +2 +-17 +1 +0 +-40 +10 +-7 +36 +5 +-18 +19 +-16 +22 +15 +5 +-4 +-22 +-1 +0 +11 +-21 +15 +-8 +-13 +17 +5 +-4 +-1 +-17 +3 +-7 +-24 +-1 +19 +-25 +12 +10 +2 +5 +2 +-5 +8 +-2 +8 +3 +-11 +8 +-7 +-8 +4 +13 +-1 +-2 +13 +-10 +-4 +2 +4 +-3 +12 +6 +3 +-3 +2 +6 +10 +11 +3 +8 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1955.dat b/IGRF/old_coefficients/11th-generation/dgrf1955.dat new file mode 100644 index 0000000..5c12568 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1955.dat @@ -0,0 +1,122 @@ + dgrf1955 + 10 6371.2 1955.0 +-30500 +-2215 +5820 +-1440 +3003 +-1898 +1581 +291 +1302 +-1944 +-462 +1288 +216 +882 +-83 +958 +796 +133 +510 +-274 +-397 +-23 +290 +-230 +-229 +360 +15 +230 +110 +-23 +-98 +-152 +-121 +-69 +78 +47 +57 +-9 +3 +96 +-247 +48 +-8 +-16 +7 +-12 +-107 +-24 +65 +-56 +-50 +2 +-24 +10 +-4 +-32 +8 +-11 +28 +9 +-20 +18 +-18 +11 +9 +10 +-6 +-15 +-14 +5 +6 +-23 +10 +3 +-7 +23 +6 +-4 +9 +-13 +4 +9 +-11 +-4 +12 +-5 +7 +2 +6 +4 +-2 +1 +10 +2 +7 +2 +-6 +5 +5 +-3 +-5 +-4 +-1 +0 +2 +-8 +-3 +-2 +7 +-4 +4 +1 +-2 +-3 +6 +7 +-2 +-1 +0 +-3 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1960.dat b/IGRF/old_coefficients/11th-generation/dgrf1960.dat new file mode 100644 index 0000000..e11c817 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1960.dat @@ -0,0 +1,122 @@ + dgrf1960 + 10 6371.2 1960.0 +-30421 +-2169 +5791 +-1555 +3002 +-1967 +1590 +206 +1302 +-1992 +-414 +1289 +224 +878 +-130 +957 +800 +135 +504 +-278 +-394 +3 +269 +-255 +-222 +362 +16 +242 +125 +-26 +-117 +-156 +-114 +-63 +81 +46 +58 +-10 +1 +99 +-237 +60 +-1 +-20 +-2 +-11 +-113 +-17 +67 +-56 +-55 +5 +-28 +15 +-6 +-32 +7 +-7 +23 +17 +-18 +8 +-17 +15 +6 +11 +-4 +-14 +-11 +7 +2 +-18 +10 +4 +-5 +23 +10 +1 +8 +-20 +4 +6 +-18 +0 +12 +-9 +2 +1 +0 +4 +-3 +-1 +9 +-2 +8 +3 +0 +-1 +5 +1 +-3 +4 +4 +1 +0 +0 +-1 +2 +4 +-5 +6 +1 +1 +-1 +-1 +6 +2 +0 +0 +-7 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1965.dat b/IGRF/old_coefficients/11th-generation/dgrf1965.dat new file mode 100644 index 0000000..bde175d --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1965.dat @@ -0,0 +1,122 @@ + dgrf1965 + 10 6371.2 1965.0 +-30334 +-2119 +5776 +-1662 +2997 +-2016 +1594 +114 +1297 +-2038 +-404 +1292 +240 +856 +-165 +957 +804 +148 +479 +-269 +-390 +13 +252 +-269 +-219 +358 +19 +254 +128 +-31 +-126 +-157 +-97 +-62 +81 +45 +61 +-11 +8 +100 +-228 +68 +4 +-32 +1 +-8 +-111 +-7 +75 +-57 +-61 +4 +-27 +13 +-2 +-26 +6 +-6 +26 +13 +-23 +1 +-12 +13 +5 +7 +-4 +-12 +-14 +9 +0 +-16 +8 +4 +-1 +24 +11 +-3 +4 +-17 +8 +10 +-22 +2 +15 +-13 +7 +10 +-4 +-1 +-5 +-1 +10 +5 +10 +1 +-4 +-2 +1 +-2 +-3 +2 +2 +1 +-5 +2 +-2 +6 +4 +-4 +4 +0 +0 +-2 +2 +3 +2 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1970.dat b/IGRF/old_coefficients/11th-generation/dgrf1970.dat new file mode 100644 index 0000000..64bda89 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1970.dat @@ -0,0 +1,122 @@ + dgrf1970 + 10 6371.2 1970.0 +-30220 +-2068 +5737 +-1781 +3000 +-2047 +1611 +25 +1287 +-2091 +-366 +1278 +251 +838 +-196 +952 +800 +167 +461 +-266 +-395 +26 +234 +-279 +-216 +359 +26 +262 +139 +-42 +-139 +-160 +-91 +-56 +83 +43 +64 +-12 +15 +100 +-212 +72 +2 +-37 +3 +-6 +-112 +1 +72 +-57 +-70 +1 +-27 +14 +-4 +-22 +8 +-2 +23 +13 +-23 +-2 +-11 +14 +6 +7 +-2 +-15 +-13 +6 +-3 +-17 +5 +6 +0 +21 +11 +-6 +3 +-16 +8 +10 +-21 +2 +16 +-12 +6 +10 +-4 +-1 +-5 +0 +10 +3 +11 +1 +-2 +-1 +1 +-3 +-3 +1 +2 +1 +-5 +3 +-1 +4 +6 +-4 +4 +0 +1 +-1 +0 +3 +3 +1 +-1 +-4 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1975.dat b/IGRF/old_coefficients/11th-generation/dgrf1975.dat new file mode 100644 index 0000000..afd6b97 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1975.dat @@ -0,0 +1,122 @@ + dgrf1975 + 10 6371.2 1975.0 +-30100 +-2013 +5675 +-1902 +3010 +-2067 +1632 +-68 +1276 +-2144 +-333 +1260 +262 +830 +-223 +946 +791 +191 +438 +-265 +-405 +39 +216 +-288 +-218 +356 +31 +264 +148 +-59 +-152 +-159 +-83 +-49 +88 +45 +66 +-13 +28 +99 +-198 +75 +1 +-41 +6 +-4 +-111 +11 +71 +-56 +-77 +1 +-26 +16 +-5 +-14 +10 +0 +22 +12 +-23 +-5 +-12 +14 +6 +6 +-1 +-16 +-12 +4 +-8 +-19 +4 +6 +0 +18 +10 +-10 +1 +-17 +7 +10 +-21 +2 +16 +-12 +7 +10 +-4 +-1 +-5 +-1 +10 +4 +11 +1 +-3 +-2 +1 +-3 +-3 +1 +2 +1 +-5 +3 +-2 +4 +5 +-4 +4 +-1 +1 +-1 +0 +3 +3 +1 +-1 +-5 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1980.dat b/IGRF/old_coefficients/11th-generation/dgrf1980.dat new file mode 100644 index 0000000..43b9026 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1980.dat @@ -0,0 +1,122 @@ + dgrf1980 + 10 6371.2 1980.0 +-29992 +-1956 +5604 +-1997 +3027 +-2129 +1663 +-200 +1281 +-2180 +-336 +1251 +271 +833 +-252 +938 +782 +212 +398 +-257 +-419 +53 +199 +-297 +-218 +357 +46 +261 +150 +-74 +-151 +-162 +-78 +-48 +92 +48 +66 +-15 +42 +93 +-192 +71 +4 +-43 +14 +-2 +-108 +17 +72 +-59 +-82 +2 +-27 +21 +-5 +-12 +16 +1 +18 +11 +-23 +-2 +-10 +18 +6 +7 +0 +-18 +-11 +4 +-7 +-22 +4 +9 +3 +16 +6 +-13 +-1 +-15 +5 +10 +-21 +1 +16 +-12 +9 +9 +-5 +-3 +-6 +-1 +9 +7 +10 +2 +-6 +-5 +2 +-4 +-4 +1 +2 +0 +-5 +3 +-2 +6 +5 +-4 +3 +0 +1 +-1 +2 +4 +3 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1985.dat b/IGRF/old_coefficients/11th-generation/dgrf1985.dat new file mode 100644 index 0000000..554a842 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1985.dat @@ -0,0 +1,122 @@ + dgrf1985 + 10 6371.2 1985.0 +-29873 +-1905 +5500 +-2072 +3044 +-2197 +1687 +-306 +1296 +-2208 +-310 +1247 +284 +829 +-297 +936 +780 +232 +361 +-249 +-424 +69 +170 +-297 +-214 +355 +47 +253 +150 +-93 +-154 +-164 +-75 +-46 +95 +53 +65 +-16 +51 +88 +-185 +69 +4 +-48 +16 +-1 +-102 +21 +74 +-62 +-83 +3 +-27 +24 +-2 +-6 +20 +4 +17 +10 +-23 +0 +-7 +21 +6 +8 +0 +-19 +-11 +5 +-9 +-23 +4 +11 +4 +14 +4 +-15 +-4 +-11 +5 +10 +-21 +1 +15 +-12 +9 +9 +-6 +-3 +-6 +-1 +9 +7 +9 +1 +-7 +-5 +2 +-4 +-4 +1 +3 +0 +-5 +3 +-2 +6 +5 +-4 +3 +0 +1 +-1 +2 +4 +3 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1990.dat b/IGRF/old_coefficients/11th-generation/dgrf1990.dat new file mode 100644 index 0000000..3458545 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1990.dat @@ -0,0 +1,122 @@ + dgrf1990 + 10 6371.2 1990.0 +-29775 +-1848 +5406 +-2131 +3059 +-2279 +1686 +-373 +1314 +-2239 +-284 +1248 +293 +802 +-352 +939 +780 +247 +325 +-240 +-423 +84 +141 +-299 +-214 +353 +46 +245 +154 +-109 +-153 +-165 +-69 +-36 +97 +61 +65 +-16 +59 +82 +-178 +69 +3 +-52 +18 +1 +-96 +24 +77 +-64 +-80 +2 +-26 +26 +0 +-1 +21 +5 +17 +9 +-23 +0 +-4 +23 +5 +10 +-1 +-19 +-10 +6 +-12 +-22 +3 +12 +4 +12 +2 +-16 +-6 +-10 +4 +9 +-20 +1 +15 +-12 +11 +9 +-7 +-4 +-7 +-2 +9 +7 +8 +1 +-7 +-6 +2 +-3 +-4 +2 +2 +1 +-5 +3 +-2 +6 +4 +-4 +3 +0 +1 +-2 +3 +3 +3 +-1 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf1995.dat b/IGRF/old_coefficients/11th-generation/dgrf1995.dat new file mode 100644 index 0000000..f3f142e --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf1995.dat @@ -0,0 +1,122 @@ + dgrf1995 + 10 6371.2 1995.0 +-29692 +-1784 +5306 +-2200 +3070 +-2366 +1681 +-413 +1335 +-2267 +-262 +1249 +302 +759 +-427 +940 +780 +262 +290 +-236 +-418 +97 +122 +-306 +-214 +352 +46 +235 +165 +-118 +-143 +-166 +-55 +-17 +107 +68 +67 +-17 +68 +72 +-170 +67 +-1 +-58 +19 +1 +-93 +36 +77 +-72 +-69 +1 +-25 +28 +4 +5 +24 +4 +17 +8 +-24 +-2 +-6 +25 +6 +11 +-6 +-21 +-9 +8 +-14 +-23 +9 +15 +6 +11 +-5 +-16 +-7 +-4 +4 +9 +-20 +3 +15 +-10 +12 +8 +-6 +-8 +-8 +-1 +8 +10 +5 +-2 +-8 +-8 +3 +-3 +-6 +1 +2 +0 +-4 +4 +-1 +5 +4 +-5 +2 +-1 +2 +-2 +5 +1 +1 +-2 +0 +-7 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf2000.dat b/IGRF/old_coefficients/11th-generation/dgrf2000.dat new file mode 100644 index 0000000..a4ad108 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf2000.dat @@ -0,0 +1,197 @@ + dgrf2000 + 13 6371.2 2000.0 +-29619.4 +-1728.2 +5186.1 +-2267.7 +3068.4 +-2481.6 +1670.9 +-458.0 +1339.6 +-2288.0 +-227.6 +1252.1 +293.4 +714.5 +-491.1 +932.3 +786.8 +272.6 +250.0 +-231.9 +-403.0 +119.8 +111.3 +-303.8 +-218.8 +351.4 +43.8 +222.3 +171.9 +-130.4 +-133.1 +-168.6 +-39.3 +-12.9 +106.3 +72.3 +68.2 +-17.4 +74.2 +63.7 +-160.9 +65.1 +-5.9 +-61.2 +16.9 +0.7 +-90.4 +43.8 +79.0 +-74.0 +-64.6 +0.0 +-24.2 +33.3 +6.2 +9.1 +24.0 +6.9 +14.8 +7.3 +-25.4 +-1.2 +-5.8 +24.4 +6.6 +11.9 +-9.2 +-21.5 +-7.9 +8.5 +-16.6 +-21.5 +9.1 +15.5 +7.0 +8.9 +-7.9 +-14.9 +-7.0 +-2.1 +5.0 +9.4 +-19.7 +3.0 +13.4 +-8.4 +12.5 +6.3 +-6.2 +-8.9 +-8.4 +-1.5 +8.4 +9.3 +3.8 +-4.3 +-8.2 +-8.2 +4.8 +-2.6 +-6.0 +1.7 +1.7 +0.0 +-3.1 +4.0 +-0.5 +4.9 +3.7 +-5.9 +1.0 +-1.2 +2.0 +-2.9 +4.2 +0.2 +0.3 +-2.2 +-1.1 +-7.4 +2.7 +-1.7 +0.1 +-1.9 +1.3 +1.5 +-0.9 +-0.1 +-2.6 +0.1 +0.9 +-0.7 +-0.7 +0.7 +-2.8 +1.7 +-0.9 +0.1 +-1.2 +1.2 +-1.9 +4.0 +-0.9 +-2.2 +-0.3 +-0.4 +0.2 +0.3 +0.9 +2.5 +-0.2 +-2.6 +0.9 +0.7 +-0.5 +0.3 +0.3 +0.0 +-0.3 +0.0 +-0.4 +0.3 +-0.1 +-0.9 +-0.2 +-0.4 +-0.4 +0.8 +-0.2 +-0.9 +-0.9 +0.3 +0.2 +0.1 +1.8 +-0.4 +-0.4 +1.3 +-1.0 +-0.4 +-0.1 +0.7 +0.7 +-0.4 +0.3 +0.3 +0.6 +-0.1 +0.3 +0.4 +-0.2 +0.0 +-0.5 +0.1 +-0.9 diff --git a/IGRF/old_coefficients/11th-generation/dgrf2005.dat b/IGRF/old_coefficients/11th-generation/dgrf2005.dat new file mode 100644 index 0000000..86021b9 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf2005.dat @@ -0,0 +1,197 @@ + dgrf2005 + 13 6371.2 2005.0 +-29554.63 +-1669.05 +5077.99 +-2337.24 +3047.69 +-2594.50 +1657.76 +-515.43 +1336.30 +-2305.83 +-198.86 +1246.39 +269.72 +672.51 +-524.72 +920.55 +797.96 +282.07 +210.65 +-225.23 +-379.86 +145.15 +100.00 +-305.36 +-227.00 +354.41 +42.72 +208.95 +180.25 +-136.54 +-123.45 +-168.05 +-19.57 +-13.55 +103.85 +73.60 +69.56 +-20.33 +76.74 +54.75 +-151.34 +63.63 +-14.58 +-63.53 +14.58 +0.24 +-86.36 +50.94 +79.88 +-74.46 +-61.14 +-1.65 +-22.57 +38.73 +6.82 +12.30 +25.35 +9.37 +10.93 +5.42 +-26.32 +1.94 +-4.64 +24.80 +7.62 +11.20 +-11.73 +-20.88 +-6.88 +9.83 +-18.11 +-19.71 +10.17 +16.22 +9.36 +7.61 +-11.25 +-12.76 +-4.87 +-0.06 +5.58 +9.76 +-20.11 +3.58 +12.69 +-6.94 +12.67 +5.01 +-6.72 +-10.76 +-8.16 +-1.25 +8.10 +8.76 +2.92 +-6.66 +-7.73 +-9.22 +6.01 +-2.17 +-6.12 +2.19 +1.42 +0.10 +-2.35 +4.46 +-0.15 +4.76 +3.06 +-6.58 +0.29 +-1.01 +2.06 +-3.47 +3.77 +-0.86 +-0.21 +-2.31 +-2.09 +-7.93 +2.95 +-1.60 +0.26 +-1.88 +1.44 +1.44 +-0.77 +-0.31 +-2.27 +0.29 +0.90 +-0.79 +-0.58 +0.53 +-2.69 +1.80 +-1.08 +0.16 +-1.58 +0.96 +-1.90 +3.99 +-1.39 +-2.15 +-0.29 +-0.55 +0.21 +0.23 +0.89 +2.38 +-0.38 +-2.63 +0.96 +0.61 +-0.30 +0.40 +0.46 +0.01 +-0.35 +0.02 +-0.36 +0.28 +0.08 +-0.87 +-0.49 +-0.34 +-0.08 +0.88 +-0.16 +-0.88 +-0.76 +0.30 +0.33 +0.28 +1.72 +-0.43 +-0.54 +1.18 +-1.07 +-0.37 +-0.04 +0.75 +0.63 +-0.26 +0.21 +0.35 +0.53 +-0.05 +0.38 +0.41 +-0.22 +-0.10 +-0.57 +-0.18 +-0.82 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/dgrf2010.dat b/IGRF/old_coefficients/11th-generation/dgrf2010.dat new file mode 100644 index 0000000..81147b0 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/dgrf2010.dat @@ -0,0 +1,197 @@ + dgrf2010 + 13 6371.2 2010.0 +-29496.57 +-1586.42 +4944.26 +-2396.06 +3026.34 +-2708.54 +1668.17 +-575.73 +1339.85 +-2326.54 +-160.40 +1232.10 +251.75 +633.73 +-537.03 +912.66 +808.97 +286.48 +166.58 +-211.03 +-356.83 +164.46 +89.40 +-309.72 +-230.87 +357.29 +44.58 +200.26 +189.01 +-141.05 +-118.06 +-163.17 +-0.01 +-8.03 +101.04 +72.78 +68.69 +-20.90 +75.92 +44.18 +-141.40 +61.54 +-22.83 +-66.26 +13.10 +3.02 +-78.09 +55.40 +80.44 +-75.00 +-57.80 +-4.55 +-21.20 +45.24 +6.54 +14.00 +24.96 +10.46 +7.03 +1.64 +-27.61 +4.92 +-3.28 +24.41 +8.21 +10.84 +-14.50 +-20.03 +-5.59 +11.83 +-19.34 +-17.41 +11.61 +16.71 +10.85 +6.96 +-14.05 +-10.74 +-3.54 +1.64 +5.50 +9.45 +-20.54 +3.45 +11.51 +-5.27 +12.75 +3.13 +-7.14 +-12.38 +-7.42 +-0.76 +7.97 +8.43 +2.14 +-8.42 +-6.08 +-10.08 +7.01 +-1.94 +-6.24 +2.73 +0.89 +-0.10 +-1.07 +4.71 +-0.16 +4.44 +2.45 +-7.22 +-0.33 +-0.96 +2.13 +-3.95 +3.09 +-1.99 +-1.03 +-1.97 +-2.80 +-8.31 +3.05 +-1.48 +0.13 +-2.03 +1.67 +1.65 +-0.66 +-0.51 +-1.76 +0.54 +0.85 +-0.79 +-0.39 +0.37 +-2.51 +1.79 +-1.27 +0.12 +-2.11 +0.75 +-1.94 +3.75 +-1.86 +-2.12 +-0.21 +-0.87 +0.30 +0.27 +1.04 +2.13 +-0.63 +-2.49 +0.95 +0.49 +-0.11 +0.59 +0.52 +0.00 +-0.39 +0.13 +-0.37 +0.27 +0.21 +-0.86 +-0.77 +-0.23 +0.04 +0.87 +-0.09 +-0.89 +-0.87 +0.31 +0.30 +0.42 +1.66 +-0.45 +-0.59 +1.08 +-1.14 +-0.31 +-0.07 +0.78 +0.54 +-0.18 +0.10 +0.38 +0.49 +0.02 +0.44 +0.42 +-0.25 +-0.26 +-0.53 +-0.26 +-0.79 diff --git a/IGRF/old_coefficients/11th-generation/igrf2010.dat b/IGRF/old_coefficients/11th-generation/igrf2010.dat new file mode 100644 index 0000000..a952599 --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/igrf2010.dat @@ -0,0 +1,197 @@ + igrf2010 + 13 6371.2 2010.0 +-29496.5 +-1585.9 +4945.1 +-2396.6 +3026.0 +-2707.7 +1668.6 +-575.4 +1339.7 +-2326.3 +-160.5 +1231.7 +251.7 +634.2 +-536.8 +912.6 +809.0 +286.4 +166.6 +-211.2 +-357.1 +164.4 +89.7 +-309.2 +-231.1 +357.2 +44.7 +200.3 +188.9 +-141.2 +-118.1 +-163.1 +0.1 +-7.7 +100.9 +72.8 +68.6 +-20.8 +76.0 +44.2 +-141.4 +61.5 +-22.9 +-66.3 +13.1 +3.1 +-77.9 +54.9 +80.4 +-75.0 +-57.8 +-4.7 +-21.2 +45.3 +6.6 +14.0 +24.9 +10.4 +7.0 +1.6 +-27.7 +4.9 +-3.4 +24.3 +8.2 +10.9 +-14.5 +-20.0 +-5.7 +11.9 +-19.3 +-17.4 +11.6 +16.7 +10.9 +7.1 +-14.1 +-10.8 +-3.7 +1.7 +5.4 +9.4 +-20.5 +3.4 +11.6 +-5.3 +12.8 +3.1 +-7.2 +-12.4 +-7.4 +-0.8 +8.0 +8.4 +2.2 +-8.4 +-6.1 +-10.1 +7.0 +-2.0 +-6.3 +2.8 +0.9 +-0.1 +-1.1 +4.7 +-0.2 +4.4 +2.5 +-7.2 +-0.3 +-1.0 +2.2 +-4.0 +3.1 +-2.0 +-1.0 +-2.0 +-2.8 +-8.3 +3.0 +-1.5 +0.1 +-2.1 +1.7 +1.6 +-0.6 +-0.5 +-1.8 +0.5 +0.9 +-0.8 +-0.4 +0.4 +-2.5 +1.8 +-1.3 +0.2 +-2.1 +0.8 +-1.9 +3.8 +-1.8 +-2.1 +-0.2 +-0.8 +0.3 +0.3 +1.0 +2.2 +-0.7 +-2.5 +0.9 +0.5 +-0.1 +0.6 +0.5 +0.0 +-0.4 +0.1 +-0.4 +0.3 +0.2 +-0.9 +-0.8 +-0.2 +0.0 +0.8 +-0.2 +-0.9 +-0.8 +0.3 +0.3 +0.4 +1.7 +-0.4 +-0.6 +1.1 +-1.2 +-0.3 +-0.1 +0.8 +0.5 +-0.2 +0.1 +0.4 +0.5 +0.0 +0.4 +0.4 +-0.2 +-0.3 +-0.5 +-0.3 +-0.8 \ No newline at end of file diff --git a/IGRF/old_coefficients/11th-generation/igrf2010s.dat b/IGRF/old_coefficients/11th-generation/igrf2010s.dat new file mode 100644 index 0000000..ce835eb --- /dev/null +++ b/IGRF/old_coefficients/11th-generation/igrf2010s.dat @@ -0,0 +1,82 @@ + igrf2010s + 8 6371.2 2015.0 +11.4 +16.7 +-28.8 +-11.3 +-3.9 +-23.0 +2.7 +-12.9 +1.3 +-3.9 +8.6 +-2.9 +-2.9 +-8.1 +-2.1 +-1.4 +2.0 +0.4 +-8.9 +3.2 +4.4 +3.6 +-2.3 +-0.8 +-0.5 +0.5 +0.5 +-1.5 +1.5 +-0.7 +0.9 +1.3 +3.7 +1.4 +-0.6 +-0.3 +-0.3 +-0.1 +-0.3 +-2.1 +1.9 +-0.4 +-1.6 +-0.5 +-0.2 +0.8 +1.8 +0.5 +0.2 +-0.1 +0.6 +-0.6 +0.3 +1.4 +-0.2 +0.3 +-0.1 +0.1 +-0.8 +-0.8 +-0.3 +0.4 +0.2 +-0.1 +0.1 +0.0 +-0.5 +0.2 +0.3 +0.5 +-0.3 +0.4 +0.3 +0.1 +0.2 +-0.1 +-0.5 +0.4 +0.2 +0.4 diff --git a/IGRF/old_coefficients/12th-generation/dgrf1945.dat b/IGRF/old_coefficients/12th-generation/dgrf1945.dat new file mode 100644 index 0000000..2bd6fa2 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1945.dat @@ -0,0 +1,122 @@ + dgrf1945 + 10 6371.2 1945.0 +-30594 +-2285 +5810 +-1244 +2990 +-1702 +1578 +477 +1282 +-1834 +-499 +1255 +186 +913 +-11 +944 +776 +144 +544 +-276 +-421 +-55 +304 +-178 +-253 +346 +-12 +194 +95 +-20 +-67 +-142 +-119 +-82 +82 +59 +57 +6 +6 +100 +-246 +16 +-25 +-9 +21 +-16 +-104 +-39 +70 +-40 +-45 +0 +-18 +0 +2 +-29 +6 +-10 +28 +15 +-17 +29 +-22 +13 +7 +12 +-8 +-21 +-5 +-12 +9 +-7 +7 +2 +-10 +18 +7 +3 +2 +-11 +5 +-21 +-27 +1 +17 +-11 +29 +3 +-9 +16 +4 +-3 +9 +-4 +6 +-3 +1 +-4 +8 +-3 +11 +5 +1 +1 +2 +-20 +-5 +-1 +-1 +-6 +8 +6 +-1 +-4 +-3 +-2 +5 +0 +-2 +-2 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1950.dat b/IGRF/old_coefficients/12th-generation/dgrf1950.dat new file mode 100644 index 0000000..588b7f4 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1950.dat @@ -0,0 +1,122 @@ + dgrf1950 + 10 6371.2 1950.0 +-30554 +-2250 +5815 +-1341 +2998 +-1810 +1576 +381 +1297 +-1889 +-476 +1274 +206 +896 +-46 +954 +792 +136 +528 +-278 +-408 +-37 +303 +-210 +-240 +349 +3 +211 +103 +-20 +-87 +-147 +-122 +-76 +80 +54 +57 +-1 +4 +99 +-247 +33 +-16 +-12 +12 +-12 +-105 +-30 +65 +-55 +-35 +2 +-17 +1 +0 +-40 +10 +-7 +36 +5 +-18 +19 +-16 +22 +15 +5 +-4 +-22 +-1 +0 +11 +-21 +15 +-8 +-13 +17 +5 +-4 +-1 +-17 +3 +-7 +-24 +-1 +19 +-25 +12 +10 +2 +5 +2 +-5 +8 +-2 +8 +3 +-11 +8 +-7 +-8 +4 +13 +-1 +-2 +13 +-10 +-4 +2 +4 +-3 +12 +6 +3 +-3 +2 +6 +10 +11 +3 +8 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1955.dat b/IGRF/old_coefficients/12th-generation/dgrf1955.dat new file mode 100644 index 0000000..5c12568 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1955.dat @@ -0,0 +1,122 @@ + dgrf1955 + 10 6371.2 1955.0 +-30500 +-2215 +5820 +-1440 +3003 +-1898 +1581 +291 +1302 +-1944 +-462 +1288 +216 +882 +-83 +958 +796 +133 +510 +-274 +-397 +-23 +290 +-230 +-229 +360 +15 +230 +110 +-23 +-98 +-152 +-121 +-69 +78 +47 +57 +-9 +3 +96 +-247 +48 +-8 +-16 +7 +-12 +-107 +-24 +65 +-56 +-50 +2 +-24 +10 +-4 +-32 +8 +-11 +28 +9 +-20 +18 +-18 +11 +9 +10 +-6 +-15 +-14 +5 +6 +-23 +10 +3 +-7 +23 +6 +-4 +9 +-13 +4 +9 +-11 +-4 +12 +-5 +7 +2 +6 +4 +-2 +1 +10 +2 +7 +2 +-6 +5 +5 +-3 +-5 +-4 +-1 +0 +2 +-8 +-3 +-2 +7 +-4 +4 +1 +-2 +-3 +6 +7 +-2 +-1 +0 +-3 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1960.dat b/IGRF/old_coefficients/12th-generation/dgrf1960.dat new file mode 100644 index 0000000..e11c817 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1960.dat @@ -0,0 +1,122 @@ + dgrf1960 + 10 6371.2 1960.0 +-30421 +-2169 +5791 +-1555 +3002 +-1967 +1590 +206 +1302 +-1992 +-414 +1289 +224 +878 +-130 +957 +800 +135 +504 +-278 +-394 +3 +269 +-255 +-222 +362 +16 +242 +125 +-26 +-117 +-156 +-114 +-63 +81 +46 +58 +-10 +1 +99 +-237 +60 +-1 +-20 +-2 +-11 +-113 +-17 +67 +-56 +-55 +5 +-28 +15 +-6 +-32 +7 +-7 +23 +17 +-18 +8 +-17 +15 +6 +11 +-4 +-14 +-11 +7 +2 +-18 +10 +4 +-5 +23 +10 +1 +8 +-20 +4 +6 +-18 +0 +12 +-9 +2 +1 +0 +4 +-3 +-1 +9 +-2 +8 +3 +0 +-1 +5 +1 +-3 +4 +4 +1 +0 +0 +-1 +2 +4 +-5 +6 +1 +1 +-1 +-1 +6 +2 +0 +0 +-7 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1965.dat b/IGRF/old_coefficients/12th-generation/dgrf1965.dat new file mode 100644 index 0000000..bde175d --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1965.dat @@ -0,0 +1,122 @@ + dgrf1965 + 10 6371.2 1965.0 +-30334 +-2119 +5776 +-1662 +2997 +-2016 +1594 +114 +1297 +-2038 +-404 +1292 +240 +856 +-165 +957 +804 +148 +479 +-269 +-390 +13 +252 +-269 +-219 +358 +19 +254 +128 +-31 +-126 +-157 +-97 +-62 +81 +45 +61 +-11 +8 +100 +-228 +68 +4 +-32 +1 +-8 +-111 +-7 +75 +-57 +-61 +4 +-27 +13 +-2 +-26 +6 +-6 +26 +13 +-23 +1 +-12 +13 +5 +7 +-4 +-12 +-14 +9 +0 +-16 +8 +4 +-1 +24 +11 +-3 +4 +-17 +8 +10 +-22 +2 +15 +-13 +7 +10 +-4 +-1 +-5 +-1 +10 +5 +10 +1 +-4 +-2 +1 +-2 +-3 +2 +2 +1 +-5 +2 +-2 +6 +4 +-4 +4 +0 +0 +-2 +2 +3 +2 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1970.dat b/IGRF/old_coefficients/12th-generation/dgrf1970.dat new file mode 100644 index 0000000..64bda89 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1970.dat @@ -0,0 +1,122 @@ + dgrf1970 + 10 6371.2 1970.0 +-30220 +-2068 +5737 +-1781 +3000 +-2047 +1611 +25 +1287 +-2091 +-366 +1278 +251 +838 +-196 +952 +800 +167 +461 +-266 +-395 +26 +234 +-279 +-216 +359 +26 +262 +139 +-42 +-139 +-160 +-91 +-56 +83 +43 +64 +-12 +15 +100 +-212 +72 +2 +-37 +3 +-6 +-112 +1 +72 +-57 +-70 +1 +-27 +14 +-4 +-22 +8 +-2 +23 +13 +-23 +-2 +-11 +14 +6 +7 +-2 +-15 +-13 +6 +-3 +-17 +5 +6 +0 +21 +11 +-6 +3 +-16 +8 +10 +-21 +2 +16 +-12 +6 +10 +-4 +-1 +-5 +0 +10 +3 +11 +1 +-2 +-1 +1 +-3 +-3 +1 +2 +1 +-5 +3 +-1 +4 +6 +-4 +4 +0 +1 +-1 +0 +3 +3 +1 +-1 +-4 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1975.dat b/IGRF/old_coefficients/12th-generation/dgrf1975.dat new file mode 100644 index 0000000..afd6b97 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1975.dat @@ -0,0 +1,122 @@ + dgrf1975 + 10 6371.2 1975.0 +-30100 +-2013 +5675 +-1902 +3010 +-2067 +1632 +-68 +1276 +-2144 +-333 +1260 +262 +830 +-223 +946 +791 +191 +438 +-265 +-405 +39 +216 +-288 +-218 +356 +31 +264 +148 +-59 +-152 +-159 +-83 +-49 +88 +45 +66 +-13 +28 +99 +-198 +75 +1 +-41 +6 +-4 +-111 +11 +71 +-56 +-77 +1 +-26 +16 +-5 +-14 +10 +0 +22 +12 +-23 +-5 +-12 +14 +6 +6 +-1 +-16 +-12 +4 +-8 +-19 +4 +6 +0 +18 +10 +-10 +1 +-17 +7 +10 +-21 +2 +16 +-12 +7 +10 +-4 +-1 +-5 +-1 +10 +4 +11 +1 +-3 +-2 +1 +-3 +-3 +1 +2 +1 +-5 +3 +-2 +4 +5 +-4 +4 +-1 +1 +-1 +0 +3 +3 +1 +-1 +-5 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1980.dat b/IGRF/old_coefficients/12th-generation/dgrf1980.dat new file mode 100644 index 0000000..43b9026 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1980.dat @@ -0,0 +1,122 @@ + dgrf1980 + 10 6371.2 1980.0 +-29992 +-1956 +5604 +-1997 +3027 +-2129 +1663 +-200 +1281 +-2180 +-336 +1251 +271 +833 +-252 +938 +782 +212 +398 +-257 +-419 +53 +199 +-297 +-218 +357 +46 +261 +150 +-74 +-151 +-162 +-78 +-48 +92 +48 +66 +-15 +42 +93 +-192 +71 +4 +-43 +14 +-2 +-108 +17 +72 +-59 +-82 +2 +-27 +21 +-5 +-12 +16 +1 +18 +11 +-23 +-2 +-10 +18 +6 +7 +0 +-18 +-11 +4 +-7 +-22 +4 +9 +3 +16 +6 +-13 +-1 +-15 +5 +10 +-21 +1 +16 +-12 +9 +9 +-5 +-3 +-6 +-1 +9 +7 +10 +2 +-6 +-5 +2 +-4 +-4 +1 +2 +0 +-5 +3 +-2 +6 +5 +-4 +3 +0 +1 +-1 +2 +4 +3 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1985.dat b/IGRF/old_coefficients/12th-generation/dgrf1985.dat new file mode 100644 index 0000000..554a842 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1985.dat @@ -0,0 +1,122 @@ + dgrf1985 + 10 6371.2 1985.0 +-29873 +-1905 +5500 +-2072 +3044 +-2197 +1687 +-306 +1296 +-2208 +-310 +1247 +284 +829 +-297 +936 +780 +232 +361 +-249 +-424 +69 +170 +-297 +-214 +355 +47 +253 +150 +-93 +-154 +-164 +-75 +-46 +95 +53 +65 +-16 +51 +88 +-185 +69 +4 +-48 +16 +-1 +-102 +21 +74 +-62 +-83 +3 +-27 +24 +-2 +-6 +20 +4 +17 +10 +-23 +0 +-7 +21 +6 +8 +0 +-19 +-11 +5 +-9 +-23 +4 +11 +4 +14 +4 +-15 +-4 +-11 +5 +10 +-21 +1 +15 +-12 +9 +9 +-6 +-3 +-6 +-1 +9 +7 +9 +1 +-7 +-5 +2 +-4 +-4 +1 +3 +0 +-5 +3 +-2 +6 +5 +-4 +3 +0 +1 +-1 +2 +4 +3 +0 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1990.dat b/IGRF/old_coefficients/12th-generation/dgrf1990.dat new file mode 100644 index 0000000..3458545 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1990.dat @@ -0,0 +1,122 @@ + dgrf1990 + 10 6371.2 1990.0 +-29775 +-1848 +5406 +-2131 +3059 +-2279 +1686 +-373 +1314 +-2239 +-284 +1248 +293 +802 +-352 +939 +780 +247 +325 +-240 +-423 +84 +141 +-299 +-214 +353 +46 +245 +154 +-109 +-153 +-165 +-69 +-36 +97 +61 +65 +-16 +59 +82 +-178 +69 +3 +-52 +18 +1 +-96 +24 +77 +-64 +-80 +2 +-26 +26 +0 +-1 +21 +5 +17 +9 +-23 +0 +-4 +23 +5 +10 +-1 +-19 +-10 +6 +-12 +-22 +3 +12 +4 +12 +2 +-16 +-6 +-10 +4 +9 +-20 +1 +15 +-12 +11 +9 +-7 +-4 +-7 +-2 +9 +7 +8 +1 +-7 +-6 +2 +-3 +-4 +2 +2 +1 +-5 +3 +-2 +6 +4 +-4 +3 +0 +1 +-2 +3 +3 +3 +-1 +0 +-6 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf1995.dat b/IGRF/old_coefficients/12th-generation/dgrf1995.dat new file mode 100644 index 0000000..f3f142e --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf1995.dat @@ -0,0 +1,122 @@ + dgrf1995 + 10 6371.2 1995.0 +-29692 +-1784 +5306 +-2200 +3070 +-2366 +1681 +-413 +1335 +-2267 +-262 +1249 +302 +759 +-427 +940 +780 +262 +290 +-236 +-418 +97 +122 +-306 +-214 +352 +46 +235 +165 +-118 +-143 +-166 +-55 +-17 +107 +68 +67 +-17 +68 +72 +-170 +67 +-1 +-58 +19 +1 +-93 +36 +77 +-72 +-69 +1 +-25 +28 +4 +5 +24 +4 +17 +8 +-24 +-2 +-6 +25 +6 +11 +-6 +-21 +-9 +8 +-14 +-23 +9 +15 +6 +11 +-5 +-16 +-7 +-4 +4 +9 +-20 +3 +15 +-10 +12 +8 +-6 +-8 +-8 +-1 +8 +10 +5 +-2 +-8 +-8 +3 +-3 +-6 +1 +2 +0 +-4 +4 +-1 +5 +4 +-5 +2 +-1 +2 +-2 +5 +1 +1 +-2 +0 +-7 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf2000.dat b/IGRF/old_coefficients/12th-generation/dgrf2000.dat new file mode 100644 index 0000000..a4ad108 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf2000.dat @@ -0,0 +1,197 @@ + dgrf2000 + 13 6371.2 2000.0 +-29619.4 +-1728.2 +5186.1 +-2267.7 +3068.4 +-2481.6 +1670.9 +-458.0 +1339.6 +-2288.0 +-227.6 +1252.1 +293.4 +714.5 +-491.1 +932.3 +786.8 +272.6 +250.0 +-231.9 +-403.0 +119.8 +111.3 +-303.8 +-218.8 +351.4 +43.8 +222.3 +171.9 +-130.4 +-133.1 +-168.6 +-39.3 +-12.9 +106.3 +72.3 +68.2 +-17.4 +74.2 +63.7 +-160.9 +65.1 +-5.9 +-61.2 +16.9 +0.7 +-90.4 +43.8 +79.0 +-74.0 +-64.6 +0.0 +-24.2 +33.3 +6.2 +9.1 +24.0 +6.9 +14.8 +7.3 +-25.4 +-1.2 +-5.8 +24.4 +6.6 +11.9 +-9.2 +-21.5 +-7.9 +8.5 +-16.6 +-21.5 +9.1 +15.5 +7.0 +8.9 +-7.9 +-14.9 +-7.0 +-2.1 +5.0 +9.4 +-19.7 +3.0 +13.4 +-8.4 +12.5 +6.3 +-6.2 +-8.9 +-8.4 +-1.5 +8.4 +9.3 +3.8 +-4.3 +-8.2 +-8.2 +4.8 +-2.6 +-6.0 +1.7 +1.7 +0.0 +-3.1 +4.0 +-0.5 +4.9 +3.7 +-5.9 +1.0 +-1.2 +2.0 +-2.9 +4.2 +0.2 +0.3 +-2.2 +-1.1 +-7.4 +2.7 +-1.7 +0.1 +-1.9 +1.3 +1.5 +-0.9 +-0.1 +-2.6 +0.1 +0.9 +-0.7 +-0.7 +0.7 +-2.8 +1.7 +-0.9 +0.1 +-1.2 +1.2 +-1.9 +4.0 +-0.9 +-2.2 +-0.3 +-0.4 +0.2 +0.3 +0.9 +2.5 +-0.2 +-2.6 +0.9 +0.7 +-0.5 +0.3 +0.3 +0.0 +-0.3 +0.0 +-0.4 +0.3 +-0.1 +-0.9 +-0.2 +-0.4 +-0.4 +0.8 +-0.2 +-0.9 +-0.9 +0.3 +0.2 +0.1 +1.8 +-0.4 +-0.4 +1.3 +-1.0 +-0.4 +-0.1 +0.7 +0.7 +-0.4 +0.3 +0.3 +0.6 +-0.1 +0.3 +0.4 +-0.2 +0.0 +-0.5 +0.1 +-0.9 diff --git a/IGRF/old_coefficients/12th-generation/dgrf2005.dat b/IGRF/old_coefficients/12th-generation/dgrf2005.dat new file mode 100644 index 0000000..86021b9 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf2005.dat @@ -0,0 +1,197 @@ + dgrf2005 + 13 6371.2 2005.0 +-29554.63 +-1669.05 +5077.99 +-2337.24 +3047.69 +-2594.50 +1657.76 +-515.43 +1336.30 +-2305.83 +-198.86 +1246.39 +269.72 +672.51 +-524.72 +920.55 +797.96 +282.07 +210.65 +-225.23 +-379.86 +145.15 +100.00 +-305.36 +-227.00 +354.41 +42.72 +208.95 +180.25 +-136.54 +-123.45 +-168.05 +-19.57 +-13.55 +103.85 +73.60 +69.56 +-20.33 +76.74 +54.75 +-151.34 +63.63 +-14.58 +-63.53 +14.58 +0.24 +-86.36 +50.94 +79.88 +-74.46 +-61.14 +-1.65 +-22.57 +38.73 +6.82 +12.30 +25.35 +9.37 +10.93 +5.42 +-26.32 +1.94 +-4.64 +24.80 +7.62 +11.20 +-11.73 +-20.88 +-6.88 +9.83 +-18.11 +-19.71 +10.17 +16.22 +9.36 +7.61 +-11.25 +-12.76 +-4.87 +-0.06 +5.58 +9.76 +-20.11 +3.58 +12.69 +-6.94 +12.67 +5.01 +-6.72 +-10.76 +-8.16 +-1.25 +8.10 +8.76 +2.92 +-6.66 +-7.73 +-9.22 +6.01 +-2.17 +-6.12 +2.19 +1.42 +0.10 +-2.35 +4.46 +-0.15 +4.76 +3.06 +-6.58 +0.29 +-1.01 +2.06 +-3.47 +3.77 +-0.86 +-0.21 +-2.31 +-2.09 +-7.93 +2.95 +-1.60 +0.26 +-1.88 +1.44 +1.44 +-0.77 +-0.31 +-2.27 +0.29 +0.90 +-0.79 +-0.58 +0.53 +-2.69 +1.80 +-1.08 +0.16 +-1.58 +0.96 +-1.90 +3.99 +-1.39 +-2.15 +-0.29 +-0.55 +0.21 +0.23 +0.89 +2.38 +-0.38 +-2.63 +0.96 +0.61 +-0.30 +0.40 +0.46 +0.01 +-0.35 +0.02 +-0.36 +0.28 +0.08 +-0.87 +-0.49 +-0.34 +-0.08 +0.88 +-0.16 +-0.88 +-0.76 +0.30 +0.33 +0.28 +1.72 +-0.43 +-0.54 +1.18 +-1.07 +-0.37 +-0.04 +0.75 +0.63 +-0.26 +0.21 +0.35 +0.53 +-0.05 +0.38 +0.41 +-0.22 +-0.10 +-0.57 +-0.18 +-0.82 \ No newline at end of file diff --git a/IGRF/old_coefficients/12th-generation/dgrf2010.dat b/IGRF/old_coefficients/12th-generation/dgrf2010.dat new file mode 100644 index 0000000..81147b0 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/dgrf2010.dat @@ -0,0 +1,197 @@ + dgrf2010 + 13 6371.2 2010.0 +-29496.57 +-1586.42 +4944.26 +-2396.06 +3026.34 +-2708.54 +1668.17 +-575.73 +1339.85 +-2326.54 +-160.40 +1232.10 +251.75 +633.73 +-537.03 +912.66 +808.97 +286.48 +166.58 +-211.03 +-356.83 +164.46 +89.40 +-309.72 +-230.87 +357.29 +44.58 +200.26 +189.01 +-141.05 +-118.06 +-163.17 +-0.01 +-8.03 +101.04 +72.78 +68.69 +-20.90 +75.92 +44.18 +-141.40 +61.54 +-22.83 +-66.26 +13.10 +3.02 +-78.09 +55.40 +80.44 +-75.00 +-57.80 +-4.55 +-21.20 +45.24 +6.54 +14.00 +24.96 +10.46 +7.03 +1.64 +-27.61 +4.92 +-3.28 +24.41 +8.21 +10.84 +-14.50 +-20.03 +-5.59 +11.83 +-19.34 +-17.41 +11.61 +16.71 +10.85 +6.96 +-14.05 +-10.74 +-3.54 +1.64 +5.50 +9.45 +-20.54 +3.45 +11.51 +-5.27 +12.75 +3.13 +-7.14 +-12.38 +-7.42 +-0.76 +7.97 +8.43 +2.14 +-8.42 +-6.08 +-10.08 +7.01 +-1.94 +-6.24 +2.73 +0.89 +-0.10 +-1.07 +4.71 +-0.16 +4.44 +2.45 +-7.22 +-0.33 +-0.96 +2.13 +-3.95 +3.09 +-1.99 +-1.03 +-1.97 +-2.80 +-8.31 +3.05 +-1.48 +0.13 +-2.03 +1.67 +1.65 +-0.66 +-0.51 +-1.76 +0.54 +0.85 +-0.79 +-0.39 +0.37 +-2.51 +1.79 +-1.27 +0.12 +-2.11 +0.75 +-1.94 +3.75 +-1.86 +-2.12 +-0.21 +-0.87 +0.30 +0.27 +1.04 +2.13 +-0.63 +-2.49 +0.95 +0.49 +-0.11 +0.59 +0.52 +0.00 +-0.39 +0.13 +-0.37 +0.27 +0.21 +-0.86 +-0.77 +-0.23 +0.04 +0.87 +-0.09 +-0.89 +-0.87 +0.31 +0.30 +0.42 +1.66 +-0.45 +-0.59 +1.08 +-1.14 +-0.31 +-0.07 +0.78 +0.54 +-0.18 +0.10 +0.38 +0.49 +0.02 +0.44 +0.42 +-0.25 +-0.26 +-0.53 +-0.26 +-0.79 diff --git a/IGRF/old_coefficients/12th-generation/igrf2015.dat b/IGRF/old_coefficients/12th-generation/igrf2015.dat new file mode 100644 index 0000000..8c3a6e5 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/igrf2015.dat @@ -0,0 +1,197 @@ + igrf2015 + 13 6371.2 2015.0 +-29442.0 +-1501.0 +4797.1 +-2445.1 +3012.9 +-2845.6 +1676.7 +-641.9 +1350.7 +-2352.3 +-115.3 +1225.6 +244.9 +582.0 +-538.4 +907.6 +813.7 +283.3 +120.4 +-188.7 +-334.9 +180.9 +70.4 +-329.5 +-232.6 +360.1 +47.3 +192.4 +197.0 +-140.9 +-119.3 +-157.5 +16.0 +4.1 +100.2 +70.0 +67.7 +-20.8 +72.7 +33.2 +-129.9 +58.9 +-28.9 +-66.7 +13.2 +7.3 +-70.9 +62.6 +81.6 +-76.1 +-54.1 +-6.8 +-19.5 +51.8 +5.7 +15.0 +24.4 +9.4 +3.4 +-2.8 +-27.4 +6.8 +-2.2 +24.2 +8.8 +10.1 +-16.9 +-18.3 +-3.2 +13.3 +-20.6 +-14.6 +13.4 +16.2 +11.7 +5.7 +-15.9 +-9.1 +-2.0 +2.1 +5.4 +8.8 +-21.6 +3.1 +10.8 +-3.3 +11.8 +0.7 +-6.8 +-13.3 +-6.9 +-0.1 +7.8 +8.7 +1.0 +-9.1 +-4.0 +-10.5 +8.4 +-1.9 +-6.3 +3.2 +0.1 +-0.4 +0.5 +4.6 +-0.5 +4.4 +1.8 +-7.9 +-0.7 +-0.6 +2.1 +-4.2 +2.4 +-2.8 +-1.8 +-1.2 +-3.6 +-8.7 +3.1 +-1.5 +-0.1 +-2.3 +2.0 +2.0 +-0.7 +-0.8 +-1.1 +0.6 +0.8 +-0.7 +-0.2 +0.2 +-2.2 +1.7 +-1.4 +-0.2 +-2.5 +0.4 +-2.0 +3.5 +-2.4 +-1.9 +-0.2 +-1.1 +0.4 +0.4 +1.2 +1.9 +-0.8 +-2.2 +0.9 +0.3 +0.1 +0.7 +0.5 +-0.1 +-0.3 +0.3 +-0.4 +0.2 +0.2 +-0.9 +-0.9 +-0.1 +0.0 +0.7 +0.0 +-0.9 +-0.9 +0.4 +0.4 +0.5 +1.6 +-0.5 +-0.5 +1.0 +-1.2 +-0.2 +-0.1 +0.8 +0.4 +-0.1 +-0.1 +0.3 +0.4 +0.1 +0.5 +0.5 +-0.3 +-0.4 +-0.4 +-0.3 +-0.8 diff --git a/IGRF/old_coefficients/12th-generation/igrf2015s.dat b/IGRF/old_coefficients/12th-generation/igrf2015s.dat new file mode 100644 index 0000000..b0297e6 --- /dev/null +++ b/IGRF/old_coefficients/12th-generation/igrf2015s.dat @@ -0,0 +1,197 @@ + igrf2015s + 8 6371.2 2020.0 +10.3 +18.1 +-26.6 +-8.7 +-3.3 +-27.4 +2.1 +-14.1 +3.4 +-5.5 +8.2 +-0.7 +-0.4 +-10.1 +1.8 +-0.7 +0.2 +-1.3 +-9.1 +5.3 +4.1 +2.9 +-4.3 +-5.2 +-0.2 +0.5 +0.6 +-1.3 +1.7 +-0.1 +-1.2 +1.4 +3.4 +3.9 +0.0 +-0.3 +-0.1 +0.0 +-0.7 +-2.1 +2.1 +-0.7 +-1.2 +0.2 +0.3 +0.9 +1.6 +1.0 +0.3 +-0.2 +0.8 +-0.5 +0.4 +1.3 +-0.2 +0.1 +-0.3 +-0.6 +-0.6 +-0.8 +0.1 +0.2 +-0.2 +0.2 +0.0 +-0.3 +-0.6 +0.3 +0.5 +0.1 +-0.2 +0.5 +0.4 +-0.2 +0.1 +-0.3 +-0.4 +0.3 +0.3 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 +0.0 diff --git a/IGRF/old_coefficients/7th-generation/dgrf45.dat b/IGRF/old_coefficients/7th-generation/dgrf45.dat new file mode 100644 index 0000000..cead48b --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf45.dat @@ -0,0 +1,67 @@ + dgrf45 + 10 6371.2 1945.0 + 1 0 -30594. 0. + 1 1 -2285. 5810. + 2 0 -1244. 0. + 2 1 2990. -1702. + 2 2 1578. 477. + 3 0 1282. 0. + 3 1 -1834. -499. + 3 2 1255. 186. + 3 3 913. -11. + 4 0 944. 0. + 4 1 776. 144. + 4 2 544. -276. + 4 3 -421. -55. + 4 4 304. -178. + 5 0 -253. 0. + 5 1 346. -12. + 5 2 194. 95. + 5 3 -20. -67. + 5 4 -142. -119. + 5 5 -82. 82. + 6 0 59. 0. + 6 1 57. 6. + 6 2 6. 100. + 6 3 -246. 16. + 6 4 -25. -9. + 6 5 21. -16. + 6 6 -104. -39. + 7 0 70. 0. + 7 1 -40. -45. + 7 2 0. -18. + 7 3 0. 2. + 7 4 -29. 6. + 7 5 -10. 28. + 7 6 15. -17. + 7 7 29. -22. + 8 0 13. 0. + 8 1 7. 12. + 8 2 -8. -21. + 8 3 -5. -12. + 8 4 9. -7. + 8 5 7. 2. + 8 6 -10. 18. + 8 7 7. 3. + 8 8 2. -11. + 9 0 5. 0. + 9 1 -21. -27. + 9 2 1. 17. + 9 3 -11. 29. + 9 4 3. -9. + 9 5 16. 4. + 9 6 -3. 9. + 9 7 -4. 6. + 9 8 -3. 1. + 9 9 -4. 8. + 10 0 -3. 0. + 10 1 11. 5. + 10 2 1. 1. + 10 3 2. -20. + 10 4 -5. -1. + 10 5 -1. -6. + 10 6 8. 6. + 10 7 -1. -4. + 10 8 -3. -2. + 10 9 5. 0. + 10 10 -2. -2. diff --git a/IGRF/old_coefficients/7th-generation/dgrf50.dat b/IGRF/old_coefficients/7th-generation/dgrf50.dat new file mode 100644 index 0000000..b8971b7 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf50.dat @@ -0,0 +1,67 @@ + dgrf50 + 10 6371.2 1950.0 + 1 0 -30554. 0. + 1 1 -2250. 5815. + 2 0 -1341. 0. + 2 1 2998. -1810. + 2 2 1576. 381. + 3 0 1297. 0. + 3 1 -1889. -476. + 3 2 1274. 206. + 3 3 896. -46. + 4 0 954. 0. + 4 1 792. 136. + 4 2 528. -278. + 4 3 -408. -37. + 4 4 303. -210. + 5 0 -240. 0. + 5 1 349. 3. + 5 2 211. 103. + 5 3 -20. -87. + 5 4 -147. -122. + 5 5 -76. 80. + 6 0 54. 0. + 6 1 57. -1. + 6 2 4. 99. + 6 3 -247. 33. + 6 4 -16. -12. + 6 5 12. -12. + 6 6 -105. -30. + 7 0 65. 0. + 7 1 -55. -35. + 7 2 2. -17. + 7 3 1. 0. + 7 4 -40. 10. + 7 5 -7. 36. + 7 6 5. -18. + 7 7 19. -16. + 8 0 22. 0. + 8 1 15. 5. + 8 2 -4. -22. + 8 3 -1. 0. + 8 4 11. -21. + 8 5 15. -8. + 8 6 -13. 17. + 8 7 5. -4. + 8 8 -1. -17. + 9 0 3. 0. + 9 1 -7. -24. + 9 2 -1. 19. + 9 3 -25. 12. + 9 4 10. 2. + 9 5 5. 2. + 9 6 -5. 8. + 9 7 -2. 8. + 9 8 3. -11. + 9 9 8. -7. + 10 0 -8. 0. + 10 1 4. 13. + 10 2 -1. -2. + 10 3 13. -10. + 10 4 -4. 2. + 10 5 4. -3. + 10 6 12. 6. + 10 7 3. -3. + 10 8 2. 6. + 10 9 10. 11. + 10 10 3. 8. diff --git a/IGRF/old_coefficients/7th-generation/dgrf55.dat b/IGRF/old_coefficients/7th-generation/dgrf55.dat new file mode 100644 index 0000000..68807d8 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf55.dat @@ -0,0 +1,67 @@ + dgrf55 + 10 6371.2 1955.0 + 1 0 -30500. 0. + 1 1 -2215. 5820. + 2 0 -1440. 0. + 2 1 3003. -1898. + 2 2 1581. 291. + 3 0 1302. 0. + 3 1 -1944. -462. + 3 2 1288. 216. + 3 3 882. -83. + 4 0 958. 0. + 4 1 796. 133. + 4 2 510. -274. + 4 3 -397. -23. + 4 4 290. -230. + 5 0 -229. 0. + 5 1 360. 15. + 5 2 230. 110. + 5 3 -23. -98. + 5 4 -152. -121. + 5 5 -69. 78. + 6 0 47. 0. + 6 1 57. -9. + 6 2 3. 96. + 6 3 -247. 48. + 6 4 -8. -16. + 6 5 7. -12. + 6 6 -107. -24. + 7 0 65. 0. + 7 1 -56. -50. + 7 2 2. -24. + 7 3 10. -4. + 7 4 -32. 8. + 7 5 -11. 28. + 7 6 9. -20. + 7 7 18. -18. + 8 0 11. 0. + 8 1 9. 10. + 8 2 -6. -15. + 8 3 -14. 5. + 8 4 6. -23. + 8 5 10. 3. + 8 6 -7. 23. + 8 7 6. -4. + 8 8 9. -13. + 9 0 4. 0. + 9 1 9. -11. + 9 2 -4. 12. + 9 3 -5. 7. + 9 4 2. 6. + 9 5 4. -2. + 9 6 1. 10. + 9 7 2. 7. + 9 8 2. -6. + 9 9 5. 5. + 10 0 -3. 0. + 10 1 -5. -4. + 10 2 -1. 0. + 10 3 2. -8. + 10 4 -3. -2. + 10 5 7. -4. + 10 6 4. 1. + 10 7 -2. -3. + 10 8 6. 7. + 10 9 -2. -1. + 10 10 0. -3. diff --git a/IGRF/old_coefficients/7th-generation/dgrf60.dat b/IGRF/old_coefficients/7th-generation/dgrf60.dat new file mode 100644 index 0000000..3eade82 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf60.dat @@ -0,0 +1,67 @@ + dgrf60 + 10 6371.2 1960.0 + 1 0 -30421. 0. + 1 1 -2169. 5791. + 2 0 -1555. 0. + 2 1 3002. -1967. + 2 2 1590. 206. + 3 0 1302. 0. + 3 1 -1992. -414. + 3 2 1289. 224. + 3 3 878. -130. + 4 0 957. 0. + 4 1 800. 135. + 4 2 504. -278. + 4 3 -394. 3. + 4 4 269. -255. + 5 0 -222. 0. + 5 1 362. 16. + 5 2 242. 125. + 5 3 -26. -117. + 5 4 -156. -114. + 5 5 -63. 81. + 6 0 46. 0. + 6 1 58. -10. + 6 2 1. 99. + 6 3 -237. 60. + 6 4 -1. -20. + 6 5 -2. -11. + 6 6 -113. -17. + 7 0 67. 0. + 7 1 -56. -55. + 7 2 5. -28. + 7 3 15. -6. + 7 4 -32. 7. + 7 5 -7. 23. + 7 6 17. -18. + 7 7 8. -17. + 8 0 15. 0. + 8 1 6. 11. + 8 2 -4. -14. + 8 3 -11. 7. + 8 4 2. -18. + 8 5 10. 4. + 8 6 -5. 23. + 8 7 10. 1. + 8 8 8. -20. + 9 0 4. 0. + 9 1 6. -18. + 9 2 0. 12. + 9 3 -9. 2. + 9 4 1. 0. + 9 5 4. -3. + 9 6 -1. 9. + 9 7 -2. 8. + 9 8 3. 0. + 9 9 -1. 5. + 10 0 1. 0. + 10 1 -3. 4. + 10 2 4. 1. + 10 3 0. 0. + 10 4 -1. 2. + 10 5 4. -5. + 10 6 6. 1. + 10 7 1. -1. + 10 8 -1. 6. + 10 9 2. 0. + 10 10 0. -7. diff --git a/IGRF/old_coefficients/7th-generation/dgrf65.dat b/IGRF/old_coefficients/7th-generation/dgrf65.dat new file mode 100644 index 0000000..dfed431 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf65.dat @@ -0,0 +1,67 @@ + dgrf65 + 10 6371.2 1965.0 + 1 0 -30334. 0. + 1 1 -2119. 5776. + 2 0 -1662. 0. + 2 1 2997. -2016. + 2 2 1594. 114. + 3 0 1297. 0. + 3 1 -2038. -404. + 3 2 1292. 240. + 3 3 856. -165. + 4 0 957. 0. + 4 1 804. 148. + 4 2 479. -269. + 4 3 -390. 13. + 4 4 252. -269. + 5 0 -219. 0. + 5 1 358. 19. + 5 2 254. 128. + 5 3 -31. -126. + 5 4 -157. -97. + 5 5 -62. 81. + 6 0 45. 0. + 6 1 61. -11. + 6 2 8. 100. + 6 3 -228. 68. + 6 4 4. -32. + 6 5 1. -8. + 6 6 -111. -7. + 7 0 75. 0. + 7 1 -57. -61. + 7 2 4. -27. + 7 3 13. -2. + 7 4 -26. 6. + 7 5 -6. 26. + 7 6 13. -23. + 7 7 1. -12. + 8 0 13. 0. + 8 1 5. 7. + 8 2 -4. -12. + 8 3 -14. 9. + 8 4 0. -16. + 8 5 8. 4. + 8 6 -1. 24. + 8 7 11. -3. + 8 8 4. -17. + 9 0 8. 0. + 9 1 10. -22. + 9 2 2. 15. + 9 3 -13. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 5. 10. + 9 8 1. -4. + 9 9 -2. 1. + 10 0 -2. 0. + 10 1 -3. 2. + 10 2 2. 1. + 10 3 -5. 2. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 4. 0. + 10 7 0. -2. + 10 8 2. 3. + 10 9 2. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/7th-generation/dgrf70.dat b/IGRF/old_coefficients/7th-generation/dgrf70.dat new file mode 100644 index 0000000..45c3192 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf70.dat @@ -0,0 +1,67 @@ + dgrf70 + 10 6371.2 1970.0 + 1 0 -30220. 0. + 1 1 -2068. 5737. + 2 0 -1781. 0. + 2 1 3000. -2047. + 2 2 1611. 25. + 3 0 1287. 0. + 3 1 -2091. -366. + 3 2 1278. 251. + 3 3 838. -196. + 4 0 952. 0. + 4 1 800. 167. + 4 2 461. -266. + 4 3 -395. 26. + 4 4 234. -279. + 5 0 -216. 0. + 5 1 359. 26. + 5 2 262. 139. + 5 3 -42. -139. + 5 4 -160. -91. + 5 5 -56. 83. + 6 0 43. 0. + 6 1 64. -12. + 6 2 15. 100. + 6 3 -212. 72. + 6 4 2. -37. + 6 5 3. -6. + 6 6 -112. 1. + 7 0 72. 0. + 7 1 -57. -70. + 7 2 1. -27. + 7 3 14. -4. + 7 4 -22. 8. + 7 5 -2. 23. + 7 6 13. -23. + 7 7 -2. -11. + 8 0 14. 0. + 8 1 6. 7. + 8 2 -2. -15. + 8 3 -13. 6. + 8 4 -3. -17. + 8 5 5. 6. + 8 6 0. 21. + 8 7 11. -6. + 8 8 3. -16. + 9 0 8. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 6. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 0. 10. + 9 7 3. 11. + 9 8 1. -2. + 9 9 -1. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -1. 4. + 10 5 6. -4. + 10 6 4. 0. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -4. diff --git a/IGRF/old_coefficients/7th-generation/dgrf75.dat b/IGRF/old_coefficients/7th-generation/dgrf75.dat new file mode 100644 index 0000000..fe001d9 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf75.dat @@ -0,0 +1,67 @@ + dgrf75 + 10 6371.2 1975.0 + 1 0 -30100. 0. + 1 1 -2013. 5675. + 2 0 -1902. 0. + 2 1 3010. -2067. + 2 2 1632. -68. + 3 0 1276. 0. + 3 1 -2144. -333. + 3 2 1260. 262. + 3 3 830. -223. + 4 0 946. 0. + 4 1 791. 191. + 4 2 438. -265. + 4 3 -405. 39. + 4 4 216. -288. + 5 0 -218. 0. + 5 1 356. 31. + 5 2 264. 148. + 5 3 -59. -152. + 5 4 -159. -83. + 5 5 -49. 88. + 6 0 45. 0. + 6 1 66. -13. + 6 2 28. 99. + 6 3 -198. 75. + 6 4 1. -41. + 6 5 6. -4. + 6 6 -111. 11. + 7 0 71. 0. + 7 1 -56. -77. + 7 2 1. -26. + 7 3 16. -5. + 7 4 -14. 10. + 7 5 0. 22. + 7 6 12. -23. + 7 7 -5. -12. + 8 0 14. 0. + 8 1 6. 6. + 8 2 -1. -16. + 8 3 -12. 4. + 8 4 -8. -19. + 8 5 4. 6. + 8 6 0. 18. + 8 7 10. -10. + 8 8 1. -17. + 9 0 7. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 4. 11. + 9 8 1. -3. + 9 9 -2. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 4. + 10 5 5. -4. + 10 6 4. -1. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -5. diff --git a/IGRF/old_coefficients/7th-generation/dgrf80.dat b/IGRF/old_coefficients/7th-generation/dgrf80.dat new file mode 100644 index 0000000..29ef9c1 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf80.dat @@ -0,0 +1,67 @@ + dgrf80 + 10 6371.2 1980.0 + 1 0 -29992. 0. + 1 1 -1956. 5604. + 2 0 -1997. 0. + 2 1 3027. -2129. + 2 2 1663. -200. + 3 0 1281. 0. + 3 1 -2180. -336. + 3 2 1251. 271. + 3 3 833. -252. + 4 0 938. 0. + 4 1 782. 212. + 4 2 398. -257. + 4 3 -419. 53. + 4 4 199. -297. + 5 0 -218. 0. + 5 1 357. 46. + 5 2 261. 150. + 5 3 -74. -151. + 5 4 -162. -78. + 5 5 -48. 92. + 6 0 48. 0. + 6 1 66. -15. + 6 2 42. 93. + 6 3 -192. 71. + 6 4 4. -43. + 6 5 14. -2. + 6 6 -108. 17. + 7 0 72. 0. + 7 1 -59. -82. + 7 2 2. -27. + 7 3 21. -5. + 7 4 -12. 16. + 7 5 1. 18. + 7 6 11. -23. + 7 7 -2. -10. + 8 0 18. 0. + 8 1 6. 7. + 8 2 0. -18. + 8 3 -11. 4. + 8 4 -7. -22. + 8 5 4. 9. + 8 6 3. 16. + 8 7 6. -13. + 8 8 -1. -15. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 16. + 9 3 -12. 9. + 9 4 9. -5. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 10. + 9 8 2. -6. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 2. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/7th-generation/dgrf85.dat b/IGRF/old_coefficients/7th-generation/dgrf85.dat new file mode 100644 index 0000000..d771bcf --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf85.dat @@ -0,0 +1,67 @@ + dgrf85 + 10 6371.2 1985.0 + 1 0 -29873. 0. + 1 1 -1905. 5500. + 2 0 -2072. 0. + 2 1 3044. -2197. + 2 2 1687. -306. + 3 0 1296. 0. + 3 1 -2208. -310. + 3 2 1247. 284. + 3 3 829. -297. + 4 0 936. 0. + 4 1 780. 232. + 4 2 361. -249. + 4 3 -424. 69. + 4 4 170. -297. + 5 0 -214. 0. + 5 1 355. 47. + 5 2 253. 150. + 5 3 -93. -154. + 5 4 -164. -75. + 5 5 -46. 95. + 6 0 53. 0. + 6 1 65. -16. + 6 2 51. 88. + 6 3 -185. 69. + 6 4 4. -48. + 6 5 16. -1. + 6 6 -102. 21. + 7 0 74. 0. + 7 1 -62. -83. + 7 2 3. -27. + 7 3 24. -2. + 7 4 -6. 20. + 7 5 4. 17. + 7 6 10. -23. + 7 7 0. -7. + 8 0 21. 0. + 8 1 6. 8. + 8 2 0. -19. + 8 3 -11. 5. + 8 4 -9. -23. + 8 5 4. 11. + 8 6 4. 14. + 8 7 4. -15. + 8 8 -4. -11. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 15. + 9 3 -12. 9. + 9 4 9. -6. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 9. + 9 8 1. -7. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 3. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/7th-generation/dgrf90.dat b/IGRF/old_coefficients/7th-generation/dgrf90.dat new file mode 100644 index 0000000..f431fa4 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/dgrf90.dat @@ -0,0 +1,67 @@ + dgrf90 + 10 6371.2 1990.0 + 1 0 -29775. 0. + 1 1 -1848. 5406. + 2 0 -2131. 0. + 2 1 3059. -2279. + 2 2 1686. -373. + 3 0 1314. 0. + 3 1 -2239. -284. + 3 2 1248. 293. + 3 3 802. -352. + 4 0 939. 0. + 4 1 780. 247. + 4 2 325. -240. + 4 3 -423. 84. + 4 4 141. -299. + 5 0 -214. 0. + 5 1 353. 46. + 5 2 245. 154. + 5 3 -109. -153. + 5 4 -165. -69. + 5 5 -36. 97. + 6 0 61. 0. + 6 1 65. -16. + 6 2 59. 82. + 6 3 -178. 69. + 6 4 3. -52. + 6 5 18. 1. + 6 6 -96. 24. + 7 0 77. 0. + 7 1 -64. -80. + 7 2 2. -26. + 7 3 26. 0. + 7 4 -1. 21. + 7 5 5. 17. + 7 6 9. -23. + 7 7 0. -4. + 8 0 23. 0. + 8 1 5. 10. + 8 2 -1. -19. + 8 3 -10. 6. + 8 4 -12. -22. + 8 5 3. 12. + 8 6 4. 12. + 8 7 2. -16. + 8 8 -6. -10. + 9 0 4. 0. + 9 1 9. -20. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 8. + 9 8 1. -7. + 9 9 -6. 2. + 10 0 -3. 0. + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/7th-generation/igrf95.dat b/IGRF/old_coefficients/7th-generation/igrf95.dat new file mode 100755 index 0000000..fd9ee60 --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/igrf95.dat @@ -0,0 +1,67 @@ + igrf95 + 10 6371.2 1995.0 + 1 0 -29682. 0.0 + 1 1 -1789. 5318. + 2 0 -2197. 0.0 + 2 1 3074. -2356. + 2 2 1685. -425. + 3 0 1329. 0.0 + 3 1 -2268. -263. + 3 2 1249. 302. + 3 3 769. -406. + 4 0 941. .0 + 4 1 782. 262. + 4 2 291. -232. + 4 3 -421. 98. + 4 4 116. -301. + 5 0 -210. .0 + 5 1 352. 44. + 5 2 237. 157. + 5 3 -122. -152. + 5 4 -167. -64. + 5 5 -26. 99. + 6 0 66. .0 + 6 1 64. -16. + 6 2 65. 77. + 6 3 -172. 67. + 6 4 2. -57. + 6 5 17. 4. + 6 6 -94. 28. + 7 0 78. -.0 + 7 1 -67. -77. + 7 2 1. -25. + 7 3 29. 3. + 7 4 4. 22. + 7 5 8. 16. + 7 6 10. -23. + 7 7 -2. -3. + 8 0 24. .0 + 8 1 4. 12. + 8 2 -1. -20. + 8 3 -9. 7. + 8 4 -14. -21. + 8 5 4. 12. + 8 6 5. 10. + 8 7 0. -17. + 8 8 -7. -10. + 9 0 4. .0 + 9 1 9. -19. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 7. + 9 8 0. -8. + 9 9 -6. 1. + 10 0 -3. .0 + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/7th-generation/igrf95s.dat b/IGRF/old_coefficients/7th-generation/igrf95s.dat new file mode 100755 index 0000000..a9e453e --- /dev/null +++ b/IGRF/old_coefficients/7th-generation/igrf95s.dat @@ -0,0 +1,46 @@ + igrf95s + 8 6371.2 2000.0 + 1 0 17.6 0. + 1 1 13.0 -18.3 + 2 0 -13.2 0. + 2 1 3.7 -15.0 + 2 2 -0.8 -8.8 + 3 0 1.5 0. + 3 1 -6.4 4.1 + 3 2 -0.2 2.2 + 3 3 -8.1 -12.1 + 4 0 0.8 0. + 4 1 0.9 1.8 + 4 2 -6.9 1.2 + 4 3 0.5 2.7 + 4 4 -4.6 -1.0 + 5 0 0.8 0. + 5 1 0.1 0.2 + 5 2 -1.5 1.2 + 5 3 -2.0 0.3 + 5 4 -0.1 1.8 + 5 5 2.3 0.9 + 6 0 0.5 0. + 6 1 -0.4 0.3 + 6 2 0.6 -1.6 + 6 3 1.9 -0.2 + 6 4 -0.2 -0.9 + 6 5 -0.2 1.0 + 6 6 .0 2.2 + 7 0 -0.2 0. + 7 1 -0.8 0.8 + 7 2 -0.6 0.2 + 7 3 0.6 0.6 + 7 4 1.2 -0.4 + 7 5 0.1 0.0 + 7 6 0.2 -0.3 + 7 7 -0.6 0. + 8 0 0.3 0. + 8 1 -0.2 0.4 + 8 2 0.1 -0.2 + 8 3 0.4 0.2 + 8 4 -1.1 0.7 + 8 5 0.3 0.0 + 8 6 0.2 -1.2 + 8 7 -0.9 -0.7 + 8 8 -0.3 -0.6 diff --git a/IGRF/old_coefficients/8th-generation/dgrf45.dat b/IGRF/old_coefficients/8th-generation/dgrf45.dat new file mode 100644 index 0000000..cead48b --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf45.dat @@ -0,0 +1,67 @@ + dgrf45 + 10 6371.2 1945.0 + 1 0 -30594. 0. + 1 1 -2285. 5810. + 2 0 -1244. 0. + 2 1 2990. -1702. + 2 2 1578. 477. + 3 0 1282. 0. + 3 1 -1834. -499. + 3 2 1255. 186. + 3 3 913. -11. + 4 0 944. 0. + 4 1 776. 144. + 4 2 544. -276. + 4 3 -421. -55. + 4 4 304. -178. + 5 0 -253. 0. + 5 1 346. -12. + 5 2 194. 95. + 5 3 -20. -67. + 5 4 -142. -119. + 5 5 -82. 82. + 6 0 59. 0. + 6 1 57. 6. + 6 2 6. 100. + 6 3 -246. 16. + 6 4 -25. -9. + 6 5 21. -16. + 6 6 -104. -39. + 7 0 70. 0. + 7 1 -40. -45. + 7 2 0. -18. + 7 3 0. 2. + 7 4 -29. 6. + 7 5 -10. 28. + 7 6 15. -17. + 7 7 29. -22. + 8 0 13. 0. + 8 1 7. 12. + 8 2 -8. -21. + 8 3 -5. -12. + 8 4 9. -7. + 8 5 7. 2. + 8 6 -10. 18. + 8 7 7. 3. + 8 8 2. -11. + 9 0 5. 0. + 9 1 -21. -27. + 9 2 1. 17. + 9 3 -11. 29. + 9 4 3. -9. + 9 5 16. 4. + 9 6 -3. 9. + 9 7 -4. 6. + 9 8 -3. 1. + 9 9 -4. 8. + 10 0 -3. 0. + 10 1 11. 5. + 10 2 1. 1. + 10 3 2. -20. + 10 4 -5. -1. + 10 5 -1. -6. + 10 6 8. 6. + 10 7 -1. -4. + 10 8 -3. -2. + 10 9 5. 0. + 10 10 -2. -2. diff --git a/IGRF/old_coefficients/8th-generation/dgrf50.dat b/IGRF/old_coefficients/8th-generation/dgrf50.dat new file mode 100644 index 0000000..b8971b7 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf50.dat @@ -0,0 +1,67 @@ + dgrf50 + 10 6371.2 1950.0 + 1 0 -30554. 0. + 1 1 -2250. 5815. + 2 0 -1341. 0. + 2 1 2998. -1810. + 2 2 1576. 381. + 3 0 1297. 0. + 3 1 -1889. -476. + 3 2 1274. 206. + 3 3 896. -46. + 4 0 954. 0. + 4 1 792. 136. + 4 2 528. -278. + 4 3 -408. -37. + 4 4 303. -210. + 5 0 -240. 0. + 5 1 349. 3. + 5 2 211. 103. + 5 3 -20. -87. + 5 4 -147. -122. + 5 5 -76. 80. + 6 0 54. 0. + 6 1 57. -1. + 6 2 4. 99. + 6 3 -247. 33. + 6 4 -16. -12. + 6 5 12. -12. + 6 6 -105. -30. + 7 0 65. 0. + 7 1 -55. -35. + 7 2 2. -17. + 7 3 1. 0. + 7 4 -40. 10. + 7 5 -7. 36. + 7 6 5. -18. + 7 7 19. -16. + 8 0 22. 0. + 8 1 15. 5. + 8 2 -4. -22. + 8 3 -1. 0. + 8 4 11. -21. + 8 5 15. -8. + 8 6 -13. 17. + 8 7 5. -4. + 8 8 -1. -17. + 9 0 3. 0. + 9 1 -7. -24. + 9 2 -1. 19. + 9 3 -25. 12. + 9 4 10. 2. + 9 5 5. 2. + 9 6 -5. 8. + 9 7 -2. 8. + 9 8 3. -11. + 9 9 8. -7. + 10 0 -8. 0. + 10 1 4. 13. + 10 2 -1. -2. + 10 3 13. -10. + 10 4 -4. 2. + 10 5 4. -3. + 10 6 12. 6. + 10 7 3. -3. + 10 8 2. 6. + 10 9 10. 11. + 10 10 3. 8. diff --git a/IGRF/old_coefficients/8th-generation/dgrf55.dat b/IGRF/old_coefficients/8th-generation/dgrf55.dat new file mode 100644 index 0000000..68807d8 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf55.dat @@ -0,0 +1,67 @@ + dgrf55 + 10 6371.2 1955.0 + 1 0 -30500. 0. + 1 1 -2215. 5820. + 2 0 -1440. 0. + 2 1 3003. -1898. + 2 2 1581. 291. + 3 0 1302. 0. + 3 1 -1944. -462. + 3 2 1288. 216. + 3 3 882. -83. + 4 0 958. 0. + 4 1 796. 133. + 4 2 510. -274. + 4 3 -397. -23. + 4 4 290. -230. + 5 0 -229. 0. + 5 1 360. 15. + 5 2 230. 110. + 5 3 -23. -98. + 5 4 -152. -121. + 5 5 -69. 78. + 6 0 47. 0. + 6 1 57. -9. + 6 2 3. 96. + 6 3 -247. 48. + 6 4 -8. -16. + 6 5 7. -12. + 6 6 -107. -24. + 7 0 65. 0. + 7 1 -56. -50. + 7 2 2. -24. + 7 3 10. -4. + 7 4 -32. 8. + 7 5 -11. 28. + 7 6 9. -20. + 7 7 18. -18. + 8 0 11. 0. + 8 1 9. 10. + 8 2 -6. -15. + 8 3 -14. 5. + 8 4 6. -23. + 8 5 10. 3. + 8 6 -7. 23. + 8 7 6. -4. + 8 8 9. -13. + 9 0 4. 0. + 9 1 9. -11. + 9 2 -4. 12. + 9 3 -5. 7. + 9 4 2. 6. + 9 5 4. -2. + 9 6 1. 10. + 9 7 2. 7. + 9 8 2. -6. + 9 9 5. 5. + 10 0 -3. 0. + 10 1 -5. -4. + 10 2 -1. 0. + 10 3 2. -8. + 10 4 -3. -2. + 10 5 7. -4. + 10 6 4. 1. + 10 7 -2. -3. + 10 8 6. 7. + 10 9 -2. -1. + 10 10 0. -3. diff --git a/IGRF/old_coefficients/8th-generation/dgrf60.dat b/IGRF/old_coefficients/8th-generation/dgrf60.dat new file mode 100644 index 0000000..3eade82 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf60.dat @@ -0,0 +1,67 @@ + dgrf60 + 10 6371.2 1960.0 + 1 0 -30421. 0. + 1 1 -2169. 5791. + 2 0 -1555. 0. + 2 1 3002. -1967. + 2 2 1590. 206. + 3 0 1302. 0. + 3 1 -1992. -414. + 3 2 1289. 224. + 3 3 878. -130. + 4 0 957. 0. + 4 1 800. 135. + 4 2 504. -278. + 4 3 -394. 3. + 4 4 269. -255. + 5 0 -222. 0. + 5 1 362. 16. + 5 2 242. 125. + 5 3 -26. -117. + 5 4 -156. -114. + 5 5 -63. 81. + 6 0 46. 0. + 6 1 58. -10. + 6 2 1. 99. + 6 3 -237. 60. + 6 4 -1. -20. + 6 5 -2. -11. + 6 6 -113. -17. + 7 0 67. 0. + 7 1 -56. -55. + 7 2 5. -28. + 7 3 15. -6. + 7 4 -32. 7. + 7 5 -7. 23. + 7 6 17. -18. + 7 7 8. -17. + 8 0 15. 0. + 8 1 6. 11. + 8 2 -4. -14. + 8 3 -11. 7. + 8 4 2. -18. + 8 5 10. 4. + 8 6 -5. 23. + 8 7 10. 1. + 8 8 8. -20. + 9 0 4. 0. + 9 1 6. -18. + 9 2 0. 12. + 9 3 -9. 2. + 9 4 1. 0. + 9 5 4. -3. + 9 6 -1. 9. + 9 7 -2. 8. + 9 8 3. 0. + 9 9 -1. 5. + 10 0 1. 0. + 10 1 -3. 4. + 10 2 4. 1. + 10 3 0. 0. + 10 4 -1. 2. + 10 5 4. -5. + 10 6 6. 1. + 10 7 1. -1. + 10 8 -1. 6. + 10 9 2. 0. + 10 10 0. -7. diff --git a/IGRF/old_coefficients/8th-generation/dgrf65.dat b/IGRF/old_coefficients/8th-generation/dgrf65.dat new file mode 100644 index 0000000..dfed431 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf65.dat @@ -0,0 +1,67 @@ + dgrf65 + 10 6371.2 1965.0 + 1 0 -30334. 0. + 1 1 -2119. 5776. + 2 0 -1662. 0. + 2 1 2997. -2016. + 2 2 1594. 114. + 3 0 1297. 0. + 3 1 -2038. -404. + 3 2 1292. 240. + 3 3 856. -165. + 4 0 957. 0. + 4 1 804. 148. + 4 2 479. -269. + 4 3 -390. 13. + 4 4 252. -269. + 5 0 -219. 0. + 5 1 358. 19. + 5 2 254. 128. + 5 3 -31. -126. + 5 4 -157. -97. + 5 5 -62. 81. + 6 0 45. 0. + 6 1 61. -11. + 6 2 8. 100. + 6 3 -228. 68. + 6 4 4. -32. + 6 5 1. -8. + 6 6 -111. -7. + 7 0 75. 0. + 7 1 -57. -61. + 7 2 4. -27. + 7 3 13. -2. + 7 4 -26. 6. + 7 5 -6. 26. + 7 6 13. -23. + 7 7 1. -12. + 8 0 13. 0. + 8 1 5. 7. + 8 2 -4. -12. + 8 3 -14. 9. + 8 4 0. -16. + 8 5 8. 4. + 8 6 -1. 24. + 8 7 11. -3. + 8 8 4. -17. + 9 0 8. 0. + 9 1 10. -22. + 9 2 2. 15. + 9 3 -13. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 5. 10. + 9 8 1. -4. + 9 9 -2. 1. + 10 0 -2. 0. + 10 1 -3. 2. + 10 2 2. 1. + 10 3 -5. 2. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 4. 0. + 10 7 0. -2. + 10 8 2. 3. + 10 9 2. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/8th-generation/dgrf70.dat b/IGRF/old_coefficients/8th-generation/dgrf70.dat new file mode 100644 index 0000000..45c3192 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf70.dat @@ -0,0 +1,67 @@ + dgrf70 + 10 6371.2 1970.0 + 1 0 -30220. 0. + 1 1 -2068. 5737. + 2 0 -1781. 0. + 2 1 3000. -2047. + 2 2 1611. 25. + 3 0 1287. 0. + 3 1 -2091. -366. + 3 2 1278. 251. + 3 3 838. -196. + 4 0 952. 0. + 4 1 800. 167. + 4 2 461. -266. + 4 3 -395. 26. + 4 4 234. -279. + 5 0 -216. 0. + 5 1 359. 26. + 5 2 262. 139. + 5 3 -42. -139. + 5 4 -160. -91. + 5 5 -56. 83. + 6 0 43. 0. + 6 1 64. -12. + 6 2 15. 100. + 6 3 -212. 72. + 6 4 2. -37. + 6 5 3. -6. + 6 6 -112. 1. + 7 0 72. 0. + 7 1 -57. -70. + 7 2 1. -27. + 7 3 14. -4. + 7 4 -22. 8. + 7 5 -2. 23. + 7 6 13. -23. + 7 7 -2. -11. + 8 0 14. 0. + 8 1 6. 7. + 8 2 -2. -15. + 8 3 -13. 6. + 8 4 -3. -17. + 8 5 5. 6. + 8 6 0. 21. + 8 7 11. -6. + 8 8 3. -16. + 9 0 8. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 6. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 0. 10. + 9 7 3. 11. + 9 8 1. -2. + 9 9 -1. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -1. 4. + 10 5 6. -4. + 10 6 4. 0. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -4. diff --git a/IGRF/old_coefficients/8th-generation/dgrf75.dat b/IGRF/old_coefficients/8th-generation/dgrf75.dat new file mode 100644 index 0000000..fe001d9 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf75.dat @@ -0,0 +1,67 @@ + dgrf75 + 10 6371.2 1975.0 + 1 0 -30100. 0. + 1 1 -2013. 5675. + 2 0 -1902. 0. + 2 1 3010. -2067. + 2 2 1632. -68. + 3 0 1276. 0. + 3 1 -2144. -333. + 3 2 1260. 262. + 3 3 830. -223. + 4 0 946. 0. + 4 1 791. 191. + 4 2 438. -265. + 4 3 -405. 39. + 4 4 216. -288. + 5 0 -218. 0. + 5 1 356. 31. + 5 2 264. 148. + 5 3 -59. -152. + 5 4 -159. -83. + 5 5 -49. 88. + 6 0 45. 0. + 6 1 66. -13. + 6 2 28. 99. + 6 3 -198. 75. + 6 4 1. -41. + 6 5 6. -4. + 6 6 -111. 11. + 7 0 71. 0. + 7 1 -56. -77. + 7 2 1. -26. + 7 3 16. -5. + 7 4 -14. 10. + 7 5 0. 22. + 7 6 12. -23. + 7 7 -5. -12. + 8 0 14. 0. + 8 1 6. 6. + 8 2 -1. -16. + 8 3 -12. 4. + 8 4 -8. -19. + 8 5 4. 6. + 8 6 0. 18. + 8 7 10. -10. + 8 8 1. -17. + 9 0 7. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 4. 11. + 9 8 1. -3. + 9 9 -2. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 4. + 10 5 5. -4. + 10 6 4. -1. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -5. diff --git a/IGRF/old_coefficients/8th-generation/dgrf80.dat b/IGRF/old_coefficients/8th-generation/dgrf80.dat new file mode 100644 index 0000000..29ef9c1 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf80.dat @@ -0,0 +1,67 @@ + dgrf80 + 10 6371.2 1980.0 + 1 0 -29992. 0. + 1 1 -1956. 5604. + 2 0 -1997. 0. + 2 1 3027. -2129. + 2 2 1663. -200. + 3 0 1281. 0. + 3 1 -2180. -336. + 3 2 1251. 271. + 3 3 833. -252. + 4 0 938. 0. + 4 1 782. 212. + 4 2 398. -257. + 4 3 -419. 53. + 4 4 199. -297. + 5 0 -218. 0. + 5 1 357. 46. + 5 2 261. 150. + 5 3 -74. -151. + 5 4 -162. -78. + 5 5 -48. 92. + 6 0 48. 0. + 6 1 66. -15. + 6 2 42. 93. + 6 3 -192. 71. + 6 4 4. -43. + 6 5 14. -2. + 6 6 -108. 17. + 7 0 72. 0. + 7 1 -59. -82. + 7 2 2. -27. + 7 3 21. -5. + 7 4 -12. 16. + 7 5 1. 18. + 7 6 11. -23. + 7 7 -2. -10. + 8 0 18. 0. + 8 1 6. 7. + 8 2 0. -18. + 8 3 -11. 4. + 8 4 -7. -22. + 8 5 4. 9. + 8 6 3. 16. + 8 7 6. -13. + 8 8 -1. -15. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 16. + 9 3 -12. 9. + 9 4 9. -5. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 10. + 9 8 2. -6. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 2. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/8th-generation/dgrf85.dat b/IGRF/old_coefficients/8th-generation/dgrf85.dat new file mode 100644 index 0000000..d771bcf --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf85.dat @@ -0,0 +1,67 @@ + dgrf85 + 10 6371.2 1985.0 + 1 0 -29873. 0. + 1 1 -1905. 5500. + 2 0 -2072. 0. + 2 1 3044. -2197. + 2 2 1687. -306. + 3 0 1296. 0. + 3 1 -2208. -310. + 3 2 1247. 284. + 3 3 829. -297. + 4 0 936. 0. + 4 1 780. 232. + 4 2 361. -249. + 4 3 -424. 69. + 4 4 170. -297. + 5 0 -214. 0. + 5 1 355. 47. + 5 2 253. 150. + 5 3 -93. -154. + 5 4 -164. -75. + 5 5 -46. 95. + 6 0 53. 0. + 6 1 65. -16. + 6 2 51. 88. + 6 3 -185. 69. + 6 4 4. -48. + 6 5 16. -1. + 6 6 -102. 21. + 7 0 74. 0. + 7 1 -62. -83. + 7 2 3. -27. + 7 3 24. -2. + 7 4 -6. 20. + 7 5 4. 17. + 7 6 10. -23. + 7 7 0. -7. + 8 0 21. 0. + 8 1 6. 8. + 8 2 0. -19. + 8 3 -11. 5. + 8 4 -9. -23. + 8 5 4. 11. + 8 6 4. 14. + 8 7 4. -15. + 8 8 -4. -11. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 15. + 9 3 -12. 9. + 9 4 9. -6. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 9. + 9 8 1. -7. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 3. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/8th-generation/dgrf90.dat b/IGRF/old_coefficients/8th-generation/dgrf90.dat new file mode 100644 index 0000000..f431fa4 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf90.dat @@ -0,0 +1,67 @@ + dgrf90 + 10 6371.2 1990.0 + 1 0 -29775. 0. + 1 1 -1848. 5406. + 2 0 -2131. 0. + 2 1 3059. -2279. + 2 2 1686. -373. + 3 0 1314. 0. + 3 1 -2239. -284. + 3 2 1248. 293. + 3 3 802. -352. + 4 0 939. 0. + 4 1 780. 247. + 4 2 325. -240. + 4 3 -423. 84. + 4 4 141. -299. + 5 0 -214. 0. + 5 1 353. 46. + 5 2 245. 154. + 5 3 -109. -153. + 5 4 -165. -69. + 5 5 -36. 97. + 6 0 61. 0. + 6 1 65. -16. + 6 2 59. 82. + 6 3 -178. 69. + 6 4 3. -52. + 6 5 18. 1. + 6 6 -96. 24. + 7 0 77. 0. + 7 1 -64. -80. + 7 2 2. -26. + 7 3 26. 0. + 7 4 -1. 21. + 7 5 5. 17. + 7 6 9. -23. + 7 7 0. -4. + 8 0 23. 0. + 8 1 5. 10. + 8 2 -1. -19. + 8 3 -10. 6. + 8 4 -12. -22. + 8 5 3. 12. + 8 6 4. 12. + 8 7 2. -16. + 8 8 -6. -10. + 9 0 4. 0. + 9 1 9. -20. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 8. + 9 8 1. -7. + 9 9 -6. 2. + 10 0 -3. 0. + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/8th-generation/dgrf95.dat b/IGRF/old_coefficients/8th-generation/dgrf95.dat new file mode 100644 index 0000000..fd9ee60 --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/dgrf95.dat @@ -0,0 +1,67 @@ + igrf95 + 10 6371.2 1995.0 + 1 0 -29682. 0.0 + 1 1 -1789. 5318. + 2 0 -2197. 0.0 + 2 1 3074. -2356. + 2 2 1685. -425. + 3 0 1329. 0.0 + 3 1 -2268. -263. + 3 2 1249. 302. + 3 3 769. -406. + 4 0 941. .0 + 4 1 782. 262. + 4 2 291. -232. + 4 3 -421. 98. + 4 4 116. -301. + 5 0 -210. .0 + 5 1 352. 44. + 5 2 237. 157. + 5 3 -122. -152. + 5 4 -167. -64. + 5 5 -26. 99. + 6 0 66. .0 + 6 1 64. -16. + 6 2 65. 77. + 6 3 -172. 67. + 6 4 2. -57. + 6 5 17. 4. + 6 6 -94. 28. + 7 0 78. -.0 + 7 1 -67. -77. + 7 2 1. -25. + 7 3 29. 3. + 7 4 4. 22. + 7 5 8. 16. + 7 6 10. -23. + 7 7 -2. -3. + 8 0 24. .0 + 8 1 4. 12. + 8 2 -1. -20. + 8 3 -9. 7. + 8 4 -14. -21. + 8 5 4. 12. + 8 6 5. 10. + 8 7 0. -17. + 8 8 -7. -10. + 9 0 4. .0 + 9 1 9. -19. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 7. + 9 8 0. -8. + 9 9 -6. 1. + 10 0 -3. .0 + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/8th-generation/igrf00.dat b/IGRF/old_coefficients/8th-generation/igrf00.dat new file mode 100644 index 0000000..4fd1d4c --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/igrf00.dat @@ -0,0 +1,67 @@ + igrf00 + 10 6371.2 2000.0 + 1 0 -29615. 0.0 + 1 1 -1728. 5186. + 2 0 -2267. 0.0 + 2 1 3072. -2478. + 2 2 1672. -458. + 3 0 1341. 0.0 + 3 1 -2290. -227. + 3 2 1253. 296. + 3 3 715. -492. + 4 0 935. .0 + 4 1 787. 272. + 4 2 251. -232. + 4 3 -405. 119. + 4 4 110. -304. + 5 0 -217. .0 + 5 1 351. 44. + 5 2 222. 172. + 5 3 -131. -134. + 5 4 -169. -40. + 5 5 -12. 107. + 6 0 72. .0 + 6 1 68. -17. + 6 2 74. 64. + 6 3 -161. 65. + 6 4 -5. -61. + 6 5 17. 1. + 6 6 -91. 44. + 7 0 79. .0 + 7 1 -74. -65. + 7 2 0. -24. + 7 3 33. 6. + 7 4 9. 24. + 7 5 7. 15. + 7 6 8. -25. + 7 7 -2. -6. + 8 0 25. .0 + 8 1 6. 12. + 8 2 -9. -22. + 8 3 -8. 8. + 8 4 -17. -21. + 8 5 9. 15. + 8 6 7. 9. + 8 7 -8. -16. + 8 8 -7. -3. + 9 0 5. .0 + 9 1 9. -20. + 9 2 3. 13. + 9 3 -8. 12. + 9 4 6. -6. + 9 5 -9. -8. + 9 6 -2. 9. + 9 7 9. 4. + 9 8 -4. -8. + 9 9 -8. 5. + 10 0 -2. .0 + 10 1 -6. 1. + 10 2 2. 0. + 10 3 -3. 4. + 10 4 0. 5. + 10 5 4. -6. + 10 6 1. -1. + 10 7 2. -3. + 10 8 4. 0. + 10 9 0. -2. + 10 10 -1. -8. diff --git a/IGRF/old_coefficients/8th-generation/igrf00s.dat b/IGRF/old_coefficients/8th-generation/igrf00s.dat new file mode 100644 index 0000000..fca343a --- /dev/null +++ b/IGRF/old_coefficients/8th-generation/igrf00s.dat @@ -0,0 +1,46 @@ + igrf00s + 8 6371.2 2005.0 + 1 0 14.6 0. + 1 1 10.7 -22.5 + 2 0 -12.4 0. + 2 1 1.1 -20.6 + 2 2 -1.1 -9.6 + 3 0 0.7 0. + 3 1 -5.4 6.0 + 3 2 0.9 -0.1 + 3 3 -7.7 -14.2 + 4 0 -1.3 0. + 4 1 1.6 2.1 + 4 2 -7.3 1.3 + 4 3 2.9 5.0 + 4 4 -3.2 0.3 + 5 0 0.0 0. + 5 1 -0.7 -0.1 + 5 2 -2.1 0.6 + 5 3 -2.8 1.7 + 5 4 -0.8 1.9 + 5 5 2.5 0.1 + 6 0 1.0 0. + 6 1 -0.4 -0.2 + 6 2 0.9 -1.4 + 6 3 2.0 0.0 + 6 4 -0.6 -0.8 + 6 5 -0.3 0.0 + 6 6 1.2 0.9 + 7 0 -0.4 0. + 7 1 -0.4 1.1 + 7 2 -0.3 0.0 + 7 3 1.1 0.3 + 7 4 1.1 -0.1 + 7 5 -0.2 -0.6 + 7 6 0.6 -0.7 + 7 7 -0.9 0.2 + 8 0 -0.3 0. + 8 1 0.2 0.1 + 8 2 -0.3 0.0 + 8 3 0.4 0.0 + 8 4 -1.0 0.3 + 8 5 0.3 0.6 + 8 6 -0.5 -0.4 + 8 7 -0.7 0.3 + 8 8 -0.4 0.7 diff --git a/IGRF/old_coefficients/9th-generation/dgrf45.dat b/IGRF/old_coefficients/9th-generation/dgrf45.dat new file mode 100644 index 0000000..cead48b --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf45.dat @@ -0,0 +1,67 @@ + dgrf45 + 10 6371.2 1945.0 + 1 0 -30594. 0. + 1 1 -2285. 5810. + 2 0 -1244. 0. + 2 1 2990. -1702. + 2 2 1578. 477. + 3 0 1282. 0. + 3 1 -1834. -499. + 3 2 1255. 186. + 3 3 913. -11. + 4 0 944. 0. + 4 1 776. 144. + 4 2 544. -276. + 4 3 -421. -55. + 4 4 304. -178. + 5 0 -253. 0. + 5 1 346. -12. + 5 2 194. 95. + 5 3 -20. -67. + 5 4 -142. -119. + 5 5 -82. 82. + 6 0 59. 0. + 6 1 57. 6. + 6 2 6. 100. + 6 3 -246. 16. + 6 4 -25. -9. + 6 5 21. -16. + 6 6 -104. -39. + 7 0 70. 0. + 7 1 -40. -45. + 7 2 0. -18. + 7 3 0. 2. + 7 4 -29. 6. + 7 5 -10. 28. + 7 6 15. -17. + 7 7 29. -22. + 8 0 13. 0. + 8 1 7. 12. + 8 2 -8. -21. + 8 3 -5. -12. + 8 4 9. -7. + 8 5 7. 2. + 8 6 -10. 18. + 8 7 7. 3. + 8 8 2. -11. + 9 0 5. 0. + 9 1 -21. -27. + 9 2 1. 17. + 9 3 -11. 29. + 9 4 3. -9. + 9 5 16. 4. + 9 6 -3. 9. + 9 7 -4. 6. + 9 8 -3. 1. + 9 9 -4. 8. + 10 0 -3. 0. + 10 1 11. 5. + 10 2 1. 1. + 10 3 2. -20. + 10 4 -5. -1. + 10 5 -1. -6. + 10 6 8. 6. + 10 7 -1. -4. + 10 8 -3. -2. + 10 9 5. 0. + 10 10 -2. -2. diff --git a/IGRF/old_coefficients/9th-generation/dgrf50.dat b/IGRF/old_coefficients/9th-generation/dgrf50.dat new file mode 100644 index 0000000..b8971b7 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf50.dat @@ -0,0 +1,67 @@ + dgrf50 + 10 6371.2 1950.0 + 1 0 -30554. 0. + 1 1 -2250. 5815. + 2 0 -1341. 0. + 2 1 2998. -1810. + 2 2 1576. 381. + 3 0 1297. 0. + 3 1 -1889. -476. + 3 2 1274. 206. + 3 3 896. -46. + 4 0 954. 0. + 4 1 792. 136. + 4 2 528. -278. + 4 3 -408. -37. + 4 4 303. -210. + 5 0 -240. 0. + 5 1 349. 3. + 5 2 211. 103. + 5 3 -20. -87. + 5 4 -147. -122. + 5 5 -76. 80. + 6 0 54. 0. + 6 1 57. -1. + 6 2 4. 99. + 6 3 -247. 33. + 6 4 -16. -12. + 6 5 12. -12. + 6 6 -105. -30. + 7 0 65. 0. + 7 1 -55. -35. + 7 2 2. -17. + 7 3 1. 0. + 7 4 -40. 10. + 7 5 -7. 36. + 7 6 5. -18. + 7 7 19. -16. + 8 0 22. 0. + 8 1 15. 5. + 8 2 -4. -22. + 8 3 -1. 0. + 8 4 11. -21. + 8 5 15. -8. + 8 6 -13. 17. + 8 7 5. -4. + 8 8 -1. -17. + 9 0 3. 0. + 9 1 -7. -24. + 9 2 -1. 19. + 9 3 -25. 12. + 9 4 10. 2. + 9 5 5. 2. + 9 6 -5. 8. + 9 7 -2. 8. + 9 8 3. -11. + 9 9 8. -7. + 10 0 -8. 0. + 10 1 4. 13. + 10 2 -1. -2. + 10 3 13. -10. + 10 4 -4. 2. + 10 5 4. -3. + 10 6 12. 6. + 10 7 3. -3. + 10 8 2. 6. + 10 9 10. 11. + 10 10 3. 8. diff --git a/IGRF/old_coefficients/9th-generation/dgrf55.dat b/IGRF/old_coefficients/9th-generation/dgrf55.dat new file mode 100644 index 0000000..68807d8 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf55.dat @@ -0,0 +1,67 @@ + dgrf55 + 10 6371.2 1955.0 + 1 0 -30500. 0. + 1 1 -2215. 5820. + 2 0 -1440. 0. + 2 1 3003. -1898. + 2 2 1581. 291. + 3 0 1302. 0. + 3 1 -1944. -462. + 3 2 1288. 216. + 3 3 882. -83. + 4 0 958. 0. + 4 1 796. 133. + 4 2 510. -274. + 4 3 -397. -23. + 4 4 290. -230. + 5 0 -229. 0. + 5 1 360. 15. + 5 2 230. 110. + 5 3 -23. -98. + 5 4 -152. -121. + 5 5 -69. 78. + 6 0 47. 0. + 6 1 57. -9. + 6 2 3. 96. + 6 3 -247. 48. + 6 4 -8. -16. + 6 5 7. -12. + 6 6 -107. -24. + 7 0 65. 0. + 7 1 -56. -50. + 7 2 2. -24. + 7 3 10. -4. + 7 4 -32. 8. + 7 5 -11. 28. + 7 6 9. -20. + 7 7 18. -18. + 8 0 11. 0. + 8 1 9. 10. + 8 2 -6. -15. + 8 3 -14. 5. + 8 4 6. -23. + 8 5 10. 3. + 8 6 -7. 23. + 8 7 6. -4. + 8 8 9. -13. + 9 0 4. 0. + 9 1 9. -11. + 9 2 -4. 12. + 9 3 -5. 7. + 9 4 2. 6. + 9 5 4. -2. + 9 6 1. 10. + 9 7 2. 7. + 9 8 2. -6. + 9 9 5. 5. + 10 0 -3. 0. + 10 1 -5. -4. + 10 2 -1. 0. + 10 3 2. -8. + 10 4 -3. -2. + 10 5 7. -4. + 10 6 4. 1. + 10 7 -2. -3. + 10 8 6. 7. + 10 9 -2. -1. + 10 10 0. -3. diff --git a/IGRF/old_coefficients/9th-generation/dgrf60.dat b/IGRF/old_coefficients/9th-generation/dgrf60.dat new file mode 100644 index 0000000..3eade82 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf60.dat @@ -0,0 +1,67 @@ + dgrf60 + 10 6371.2 1960.0 + 1 0 -30421. 0. + 1 1 -2169. 5791. + 2 0 -1555. 0. + 2 1 3002. -1967. + 2 2 1590. 206. + 3 0 1302. 0. + 3 1 -1992. -414. + 3 2 1289. 224. + 3 3 878. -130. + 4 0 957. 0. + 4 1 800. 135. + 4 2 504. -278. + 4 3 -394. 3. + 4 4 269. -255. + 5 0 -222. 0. + 5 1 362. 16. + 5 2 242. 125. + 5 3 -26. -117. + 5 4 -156. -114. + 5 5 -63. 81. + 6 0 46. 0. + 6 1 58. -10. + 6 2 1. 99. + 6 3 -237. 60. + 6 4 -1. -20. + 6 5 -2. -11. + 6 6 -113. -17. + 7 0 67. 0. + 7 1 -56. -55. + 7 2 5. -28. + 7 3 15. -6. + 7 4 -32. 7. + 7 5 -7. 23. + 7 6 17. -18. + 7 7 8. -17. + 8 0 15. 0. + 8 1 6. 11. + 8 2 -4. -14. + 8 3 -11. 7. + 8 4 2. -18. + 8 5 10. 4. + 8 6 -5. 23. + 8 7 10. 1. + 8 8 8. -20. + 9 0 4. 0. + 9 1 6. -18. + 9 2 0. 12. + 9 3 -9. 2. + 9 4 1. 0. + 9 5 4. -3. + 9 6 -1. 9. + 9 7 -2. 8. + 9 8 3. 0. + 9 9 -1. 5. + 10 0 1. 0. + 10 1 -3. 4. + 10 2 4. 1. + 10 3 0. 0. + 10 4 -1. 2. + 10 5 4. -5. + 10 6 6. 1. + 10 7 1. -1. + 10 8 -1. 6. + 10 9 2. 0. + 10 10 0. -7. diff --git a/IGRF/old_coefficients/9th-generation/dgrf65.dat b/IGRF/old_coefficients/9th-generation/dgrf65.dat new file mode 100644 index 0000000..dfed431 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf65.dat @@ -0,0 +1,67 @@ + dgrf65 + 10 6371.2 1965.0 + 1 0 -30334. 0. + 1 1 -2119. 5776. + 2 0 -1662. 0. + 2 1 2997. -2016. + 2 2 1594. 114. + 3 0 1297. 0. + 3 1 -2038. -404. + 3 2 1292. 240. + 3 3 856. -165. + 4 0 957. 0. + 4 1 804. 148. + 4 2 479. -269. + 4 3 -390. 13. + 4 4 252. -269. + 5 0 -219. 0. + 5 1 358. 19. + 5 2 254. 128. + 5 3 -31. -126. + 5 4 -157. -97. + 5 5 -62. 81. + 6 0 45. 0. + 6 1 61. -11. + 6 2 8. 100. + 6 3 -228. 68. + 6 4 4. -32. + 6 5 1. -8. + 6 6 -111. -7. + 7 0 75. 0. + 7 1 -57. -61. + 7 2 4. -27. + 7 3 13. -2. + 7 4 -26. 6. + 7 5 -6. 26. + 7 6 13. -23. + 7 7 1. -12. + 8 0 13. 0. + 8 1 5. 7. + 8 2 -4. -12. + 8 3 -14. 9. + 8 4 0. -16. + 8 5 8. 4. + 8 6 -1. 24. + 8 7 11. -3. + 8 8 4. -17. + 9 0 8. 0. + 9 1 10. -22. + 9 2 2. 15. + 9 3 -13. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 5. 10. + 9 8 1. -4. + 9 9 -2. 1. + 10 0 -2. 0. + 10 1 -3. 2. + 10 2 2. 1. + 10 3 -5. 2. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 4. 0. + 10 7 0. -2. + 10 8 2. 3. + 10 9 2. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/9th-generation/dgrf70.dat b/IGRF/old_coefficients/9th-generation/dgrf70.dat new file mode 100644 index 0000000..45c3192 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf70.dat @@ -0,0 +1,67 @@ + dgrf70 + 10 6371.2 1970.0 + 1 0 -30220. 0. + 1 1 -2068. 5737. + 2 0 -1781. 0. + 2 1 3000. -2047. + 2 2 1611. 25. + 3 0 1287. 0. + 3 1 -2091. -366. + 3 2 1278. 251. + 3 3 838. -196. + 4 0 952. 0. + 4 1 800. 167. + 4 2 461. -266. + 4 3 -395. 26. + 4 4 234. -279. + 5 0 -216. 0. + 5 1 359. 26. + 5 2 262. 139. + 5 3 -42. -139. + 5 4 -160. -91. + 5 5 -56. 83. + 6 0 43. 0. + 6 1 64. -12. + 6 2 15. 100. + 6 3 -212. 72. + 6 4 2. -37. + 6 5 3. -6. + 6 6 -112. 1. + 7 0 72. 0. + 7 1 -57. -70. + 7 2 1. -27. + 7 3 14. -4. + 7 4 -22. 8. + 7 5 -2. 23. + 7 6 13. -23. + 7 7 -2. -11. + 8 0 14. 0. + 8 1 6. 7. + 8 2 -2. -15. + 8 3 -13. 6. + 8 4 -3. -17. + 8 5 5. 6. + 8 6 0. 21. + 8 7 11. -6. + 8 8 3. -16. + 9 0 8. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 6. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 0. 10. + 9 7 3. 11. + 9 8 1. -2. + 9 9 -1. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -1. 4. + 10 5 6. -4. + 10 6 4. 0. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -4. diff --git a/IGRF/old_coefficients/9th-generation/dgrf75.dat b/IGRF/old_coefficients/9th-generation/dgrf75.dat new file mode 100644 index 0000000..fe001d9 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf75.dat @@ -0,0 +1,67 @@ + dgrf75 + 10 6371.2 1975.0 + 1 0 -30100. 0. + 1 1 -2013. 5675. + 2 0 -1902. 0. + 2 1 3010. -2067. + 2 2 1632. -68. + 3 0 1276. 0. + 3 1 -2144. -333. + 3 2 1260. 262. + 3 3 830. -223. + 4 0 946. 0. + 4 1 791. 191. + 4 2 438. -265. + 4 3 -405. 39. + 4 4 216. -288. + 5 0 -218. 0. + 5 1 356. 31. + 5 2 264. 148. + 5 3 -59. -152. + 5 4 -159. -83. + 5 5 -49. 88. + 6 0 45. 0. + 6 1 66. -13. + 6 2 28. 99. + 6 3 -198. 75. + 6 4 1. -41. + 6 5 6. -4. + 6 6 -111. 11. + 7 0 71. 0. + 7 1 -56. -77. + 7 2 1. -26. + 7 3 16. -5. + 7 4 -14. 10. + 7 5 0. 22. + 7 6 12. -23. + 7 7 -5. -12. + 8 0 14. 0. + 8 1 6. 6. + 8 2 -1. -16. + 8 3 -12. 4. + 8 4 -8. -19. + 8 5 4. 6. + 8 6 0. 18. + 8 7 10. -10. + 8 8 1. -17. + 9 0 7. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 4. 11. + 9 8 1. -3. + 9 9 -2. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 4. + 10 5 5. -4. + 10 6 4. -1. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -5. diff --git a/IGRF/old_coefficients/9th-generation/dgrf80.dat b/IGRF/old_coefficients/9th-generation/dgrf80.dat new file mode 100644 index 0000000..29ef9c1 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf80.dat @@ -0,0 +1,67 @@ + dgrf80 + 10 6371.2 1980.0 + 1 0 -29992. 0. + 1 1 -1956. 5604. + 2 0 -1997. 0. + 2 1 3027. -2129. + 2 2 1663. -200. + 3 0 1281. 0. + 3 1 -2180. -336. + 3 2 1251. 271. + 3 3 833. -252. + 4 0 938. 0. + 4 1 782. 212. + 4 2 398. -257. + 4 3 -419. 53. + 4 4 199. -297. + 5 0 -218. 0. + 5 1 357. 46. + 5 2 261. 150. + 5 3 -74. -151. + 5 4 -162. -78. + 5 5 -48. 92. + 6 0 48. 0. + 6 1 66. -15. + 6 2 42. 93. + 6 3 -192. 71. + 6 4 4. -43. + 6 5 14. -2. + 6 6 -108. 17. + 7 0 72. 0. + 7 1 -59. -82. + 7 2 2. -27. + 7 3 21. -5. + 7 4 -12. 16. + 7 5 1. 18. + 7 6 11. -23. + 7 7 -2. -10. + 8 0 18. 0. + 8 1 6. 7. + 8 2 0. -18. + 8 3 -11. 4. + 8 4 -7. -22. + 8 5 4. 9. + 8 6 3. 16. + 8 7 6. -13. + 8 8 -1. -15. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 16. + 9 3 -12. 9. + 9 4 9. -5. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 10. + 9 8 2. -6. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 2. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/9th-generation/dgrf85.dat b/IGRF/old_coefficients/9th-generation/dgrf85.dat new file mode 100644 index 0000000..d771bcf --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf85.dat @@ -0,0 +1,67 @@ + dgrf85 + 10 6371.2 1985.0 + 1 0 -29873. 0. + 1 1 -1905. 5500. + 2 0 -2072. 0. + 2 1 3044. -2197. + 2 2 1687. -306. + 3 0 1296. 0. + 3 1 -2208. -310. + 3 2 1247. 284. + 3 3 829. -297. + 4 0 936. 0. + 4 1 780. 232. + 4 2 361. -249. + 4 3 -424. 69. + 4 4 170. -297. + 5 0 -214. 0. + 5 1 355. 47. + 5 2 253. 150. + 5 3 -93. -154. + 5 4 -164. -75. + 5 5 -46. 95. + 6 0 53. 0. + 6 1 65. -16. + 6 2 51. 88. + 6 3 -185. 69. + 6 4 4. -48. + 6 5 16. -1. + 6 6 -102. 21. + 7 0 74. 0. + 7 1 -62. -83. + 7 2 3. -27. + 7 3 24. -2. + 7 4 -6. 20. + 7 5 4. 17. + 7 6 10. -23. + 7 7 0. -7. + 8 0 21. 0. + 8 1 6. 8. + 8 2 0. -19. + 8 3 -11. 5. + 8 4 -9. -23. + 8 5 4. 11. + 8 6 4. 14. + 8 7 4. -15. + 8 8 -4. -11. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 15. + 9 3 -12. 9. + 9 4 9. -6. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 9. + 9 8 1. -7. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 3. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/9th-generation/dgrf90.dat b/IGRF/old_coefficients/9th-generation/dgrf90.dat new file mode 100644 index 0000000..f431fa4 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf90.dat @@ -0,0 +1,67 @@ + dgrf90 + 10 6371.2 1990.0 + 1 0 -29775. 0. + 1 1 -1848. 5406. + 2 0 -2131. 0. + 2 1 3059. -2279. + 2 2 1686. -373. + 3 0 1314. 0. + 3 1 -2239. -284. + 3 2 1248. 293. + 3 3 802. -352. + 4 0 939. 0. + 4 1 780. 247. + 4 2 325. -240. + 4 3 -423. 84. + 4 4 141. -299. + 5 0 -214. 0. + 5 1 353. 46. + 5 2 245. 154. + 5 3 -109. -153. + 5 4 -165. -69. + 5 5 -36. 97. + 6 0 61. 0. + 6 1 65. -16. + 6 2 59. 82. + 6 3 -178. 69. + 6 4 3. -52. + 6 5 18. 1. + 6 6 -96. 24. + 7 0 77. 0. + 7 1 -64. -80. + 7 2 2. -26. + 7 3 26. 0. + 7 4 -1. 21. + 7 5 5. 17. + 7 6 9. -23. + 7 7 0. -4. + 8 0 23. 0. + 8 1 5. 10. + 8 2 -1. -19. + 8 3 -10. 6. + 8 4 -12. -22. + 8 5 3. 12. + 8 6 4. 12. + 8 7 2. -16. + 8 8 -6. -10. + 9 0 4. 0. + 9 1 9. -20. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 8. + 9 8 1. -7. + 9 9 -6. 2. + 10 0 -3. 0. + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_coefficients/9th-generation/dgrf95.dat b/IGRF/old_coefficients/9th-generation/dgrf95.dat new file mode 100644 index 0000000..5e0fd4e --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/dgrf95.dat @@ -0,0 +1,67 @@ + dgrf95 + 10 6371.2 1995.0 + 1 0 -29692. 0. + 1 1 -1784. 5306. + 2 0 -2200. 0. + 2 1 3070. -2366. + 2 2 1681. -413. + 3 0 1335. 0. + 3 1 -2267. -262. + 3 2 1249. 302. + 3 3 759. -427. + 4 0 940. 0. + 4 1 780. 262. + 4 2 290. -236. + 4 3 -418. 97. + 4 4 122. -306. + 5 0 -214. 0. + 5 1 352. 46. + 5 2 235. 165. + 5 3 -118. -143. + 5 4 -166. -55. + 5 5 -17. 107. + 6 0 68. 0. + 6 1 67. -17. + 6 2 68. 72. + 6 3 -170. 67. + 6 4 -1. -58. + 6 5 19. 1. + 6 6 -93. 36. + 7 0 77. 0. + 7 1 -72. -69. + 7 2 1. -25. + 7 3 28. 4. + 7 4 5. 24. + 7 5 4. 17. + 7 6 8. -24. + 7 7 -2. -6. + 8 0 25. 0. + 8 1 6. 11. + 8 2 -6. -21. + 8 3 -9. 8. + 8 4 -14. -23. + 8 5 9. 15. + 8 6 6. 11. + 8 7 -5. -16. + 8 8 -7. -4. + 9 0 4. 0. + 9 1 9. -20. + 9 2 3. 15. + 9 3 -10. 12. + 9 4 8. -6. + 9 5 -8. -8. + 9 6 -1. 8. + 9 7 10. 5. + 9 8 -2. -8. + 9 9 -8. 3. + 10 0 -3. 0. + 10 1 -6. 1. + 10 2 2. 0. + 10 3 -4. 4. + 10 4 -1. 5. + 10 5 4. -5. + 10 6 2. -1. + 10 7 2. -2. + 10 8 5. 1. + 10 9 1. -2. + 10 10 0. -7. \ No newline at end of file diff --git a/IGRF/old_coefficients/9th-generation/igrf00.dat b/IGRF/old_coefficients/9th-generation/igrf00.dat new file mode 100644 index 0000000..e0c42b1 --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/igrf00.dat @@ -0,0 +1,67 @@ + igrf00 + 10 6371.2 2000.0 + 1 0 -29619.4 0.0 + 1 1 -1728.2 5186.1 + 2 0 -2267.7 0.0 + 2 1 3068.4 -2481.6 + 2 2 1670.9 -458. + 3 0 1339.6 0.0 + 3 1 -2288. -227.6 + 3 2 1252.1 293.4 + 3 3 714.5 -491.1 + 4 0 932.3 .0 + 4 1 786.8 272.6 + 4 2 250. -231.9 + 4 3 -403. 119.8 + 4 4 111.3 -303.8 + 5 0 -218.8 .0 + 5 1 351.4 43.8 + 5 2 222.3 171.9 + 5 3 -130.4 -133.1 + 5 4 -168.6 -39.3 + 5 5 -12.9 106.3 + 6 0 72.3 .0 + 6 1 68.2 -17.4 + 6 2 74.2 63.7 + 6 3 -160.9 65.1 + 6 4 -5.9 -61.2 + 6 5 16.9 0.7 + 6 6 -90.4 43.8 + 7 0 79. .0 + 7 1 -74. -64.6 + 7 2 0. -24.2 + 7 3 33.3 6.2 + 7 4 9.1 24. + 7 5 6.9 14.8 + 7 6 7.3 -25.4 + 7 7 -1.2 -5.8 + 8 0 24.4 .0 + 8 1 6.6 11.9 + 8 2 -9.2 -21.5 + 8 3 -7.9 8.5 + 8 4 -16.6 -21.5 + 8 5 9.1 15.5 + 8 6 7. 8.9 + 8 7 -7.9 -14.9 + 8 8 -7. -2.1 + 9 0 5. .0 + 9 1 9.4 -19.7 + 9 2 3. 13.4 + 9 3 -8.4 12.5 + 9 4 6.3 -6.2 + 9 5 -8.9 -8.4 + 9 6 -1.5 8.4 + 9 7 9.3 3.8 + 9 8 -4.3 -8.2 + 9 9 -8.2 4.8 + 10 0 -2.6 .0 + 10 1 -6. 1.7 + 10 2 1.7 0. + 10 3 -3.1 4. + 10 4 -0.5 4.9 + 10 5 3.7 -5.9 + 10 6 1. -1.2 + 10 7 2. -2.9 + 10 8 4.2 0.2 + 10 9 0.3 -2.2 + 10 10 -1.1 -7.4 diff --git a/IGRF/old_coefficients/9th-generation/igrf00s.dat b/IGRF/old_coefficients/9th-generation/igrf00s.dat new file mode 100644 index 0000000..608b26b --- /dev/null +++ b/IGRF/old_coefficients/9th-generation/igrf00s.dat @@ -0,0 +1,46 @@ + igrf00s + 8 6371.2 2005.0 + 1 0 13.3 0. + 1 1 11.6 -21.2 + 2 0 -14.4 0. + 2 1 -3.7 -22.7 + 2 2 -3.6 -11.1 + 3 0 -1.1 0. + 3 1 -3.5 5.6 + 3 2 -1.2 -4.5 + 3 3 -8.5 -8 + 4 0 -2.7 0. + 4 1 2.2 1.7 + 4 2 -8. 1 + 4 3 4.5 5.1 + 4 4 -1.9 -0.3 + 5 0 -1.4 0. + 5 1 0.7 -0.3 + 5 2 -2.6 1.5 + 5 3 -1.2 2. + 5 4 0. 3.8 + 5 5 -0.2 -0.5 + 6 0 0.4 0. + 6 1 0.3 -0.7 + 6 2 0.7 -1.8 + 6 3 1.9 -0.2 + 6 4 -1.7 -0.4 + 6 5 -0.5 -0.2 + 6 6 0.7 1.5 + 7 0 0.2 0. + 7 1 -0.1 0.7 + 7 2 -0.3 0.3 + 7 3 1.1 0.1 + 7 4 0.7 0.3 + 7 5 0.5 -0.8 + 7 6 -0.3 -0.1 + 7 7 0.5 0.2 + 8 0 0.1 0. + 8 1 0.2 -0.2 + 8 2 -0.5 0.1 + 8 3 0.2 0.3 + 8 4 -0.4 0.4 + 8 5 0.2 0.1 + 8 6 0.5 -0.3 + 8 7 -0.7 0.4 + 8 8 0.4 0.4 \ No newline at end of file diff --git a/IGRF/old_coefficients/update.txt b/IGRF/old_coefficients/update.txt new file mode 100755 index 0000000..94e4ac4 --- /dev/null +++ b/IGRF/old_coefficients/update.txt @@ -0,0 +1,28 @@ +10th, 11th and 12th gerneration IGRF coefficients have been uploaded on 2018/09/17 by Lutz Rastetter. + +IGRF coefficients for the 10th generation have 2-digit year numbers (45-95,00,05), +11th-generation and newer coefficient files have 4-digit year numbers. + +Sources suporting the new file names will be posted soon. + + +The IGRF95 coefficients on geomag were updated on Sept 21, 1995. +Through correspondence with Charlie Barton at the Australian +Geological Survey it was discovered that a difference in precision +caused a rounding difference for the G 7 6 term, and a misplaced +decimal point caused an error in the H 8 7 term. The correct +values for these coefficients are: + G 7 6 10. [rather than 9.] + H 8 7 -17. [rather than -11.] +as reflected on the geomag coefficient set. + + -Joy Conrad + conrad@geomag.gsfc.nasa.gov + +------------------------------------------------------ + +The IGRF95 coefficient file at this site was updated on Nov 13, 1995. + + -Dieter Bilitza + bilitza@nssdca.gsfc.nasa.gov + diff --git a/IGRF/old_fortran_code/bilcal.for b/IGRF/old_fortran_code/bilcal.for new file mode 100755 index 0000000..48e9797 --- /dev/null +++ b/IGRF/old_fortran_code/bilcal.for @@ -0,0 +1,315 @@ +C BILCAL, VERSION 3.0, AUGUST 1995 +C +Cmm/dd/yy +C 1/25/92-DKB-Modified for use with the IGRF-91 coefficients, which +C were provided by R. Langel, GSFC. +C 2/ 5/92-DKB-Reduce variable-name: INITI(ALI)ZE +C 3/25/96-DKB-Modified for use with the IGRF-95 coefficients, which +C were provided by R. Langel, GSFC. +C 6/ 6/00-DKB-Modified for use with IGRF-2000 coefficients. +C11/14/01-DKB-Add IMIN=0 above 4927 READ(...) [Rui Pereira] +C04/25/05-DKB-IBBB instead of IBB in data statem. [Alexey Petrov] +C +C***************************************************************** +C**************** IGRF MAGNETIC FIELD MODEL ********************* +C**************** SHELLG L-VALUE CALCULATION ********************* +C***************************************************************** +C***************************************************************** +C*** THIS PROGRAM PRODUCES PROFILES OF: *** +C*** GEOMAGNETIC FIELD STRENGTH (GAUSS) *** +C*** L-VALUE *** +C***************************************************************** +C*** FOR SPECIFIED: *** +C*** YEAR (DECIMAL YEAR, E.G., 1995.5 FOR MID 1995) *** +C*** GEODATIC LATITUDE AND LONGITUDE (DEGREE) *** +C*** ALTITUDE (KM) *** +C***************************************************************** +C***************************************************************** +C* --------------------ADDRESS-------------------------- * +C* I DR. DIETER BILITZA (301)513-1664 I * +C* I GSFC, NSSDC, CODE 933, GREENBELT, MD 20771, USA I * +C* I SPAN: NSSDCA::BILITZA, NSSDC::BILITZA I * +C* I BITNET: BILITZA%NSSDCA.SPAN@DFTNIC.BITNET I * +C* ----------------------------------------------------- * +C***************************************************************** +C***************************************************************** +C***************************************************************** + INTEGER EGNR,AGNR,OGNR + REAL LATI,LONGI,MLAT,MLONG + CHARACTER*4 ITEXT(4),LTEX + CHARACTER*7 ITB + CHARACTER*11 NAME + LOGICAL NOTBEG,VAL + DIMENSION DEN(8),TEMP(2),XVAR(4),VARE(4),VARB(4) + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C + DATA ITEXT /'LATI','LONG','H/km','YEAR'/ + DATA LATI,LONGI,HEIGHT,YEAR,IVAR,BVAR,EVAR,SVAR,IBBB,JAGNR + & /45.1,293.1,100,1985.5,3,100,1000,100,0,2/ +c### year limit modified + DATA VARB /-90.0,-360.0,0.00000,1940.0/ + DATA VARE /+90.0,+360.0,30000.0,2010.0/ +C + CALL INITIZE + ALOG2=ALOG(2.) + ISTART=1 +C +C FIRST SPECIFY YOUR COMPUTERS CHANNEL NUMBERS .................... +C EGNR=INPUT, MONITO=MONITOR, KONSOL=MESSAGES...................... +C AGNR=DISPLAY, OGNR=FILE OUTPUT................................... +C + EGNR=5 + MONITO=6 + AGNR=6 + OGNR=16 + WRITE(MONITO,5100) +5100 FORMAT(1X/////4X,54('*')/4X, + & '****** IGRF GEOMAGNETIC FIELD MODEL 1945 - 2005 ******'/4X, + & '*********** SHELLG L-VALUE CALCULATION *************'/1X, + & 60('*')/' This program allows you to produce B and L ', + & 'profiles in '/' latitude, longitude, year or altitude.'/ + & ' In each of the following windows you will be ', + & 'asked to enter'/' one or more values, defining the conditions', + & ' for your tables.'/' In each window the current value(s) is', + & ' (are) shown in the right'/' upper corner (#...#). You can ', + & 'choose the current values by'/' entering / at the prompt.'/ + & ' If you enter a wrong character or a value outside the ', + & 'allowed'/' parameter range, the program will ask you for a', + & ' new entry.'/' After your tables are displayed, you can ', + & 'change any parameter'/' you wish to change and create a ', + & 'new profile.'/' You can leave the program at any point ', + & 'by entering Ctrl Z.'/1X,25('*'),' GOOD LUCK ',25('*')) + NOTBEG=.FALSE. + GOTO 5508 +C---------------START ENTERING PARAMETERS---------------------------- +3293 CONTINUE + ISTART=ISTART+1 +C---------------WINDOW 1: WHICH PARAMETER CHANGE ?------------------- + WRITE(MONITO,5602) LATI,LONGI,ITEXT(IVAR),HEIGHT,YEAR,BVAR, + & EVAR,SVAR +5602 FORMAT(1X//' **** WHICH PARAMETER DO YOU WANT TO CHANGE?'/ + & 1X,60('-')/' 0 NO FURTHER CHANGES, CALCULATE PROFILE'/ + & ' 1 LATITUDE #',F6.1,'#',7X,'5 DISPLAY OR STORE'/ + & ' 2 LONGITUDE #',F6.1,'#',7X,'6 SELECTION OF VARIABLE #', + & A4,'#'/' 3 ALTITUDE #',F8.1,'#',5X,'7 VARIABLE RANGE'/ + & ' 4 YEAR #',F6.1,'#',11X,'#',F8.1,',',F8.1,',', + & F8.1,'#'/29X,'8 B OR B/B0'/1X,60('-')/' ENTER NUMBER') + IMIN=0 + IMAX=8 +4925 READ(EGNR,*,ERR=8600,END=6666) ISWIT + IF((ISWIT.GE.IMIN).AND.(ISWIT.LE.IMAX)) GOTO 8601 +8600 WRITE(MONITO,4924) IMIN,IMAX +4924 FORMAT(' Your input is outside the value range:', + & I2,' to',I2/' try again') + GOTO 4925 +8601 GOTO (5505,3329,3339,5502,6780,5508,5503,5504,9138) ISWIT+1 +C--------------WINDOW 2: DISPLAY OPTIONS-------------------------- +5508 WRITE(MONITO,5123) JAGNR +5123 FORMAT(/' DO YOU WANT YOUR PROFILES',32X,'#',I1,'#'/5X, + & 'DISPLAYED ON YOUR MONITOR: ENTER 0 AT PROMPT'/5X, + & 'STORED IN FILE OUTPUT.IGR: ENTER 1 AT PROMPT'/5X, + & 'DISPLAYED AND STORED: ENTER 2 AT PROMPT') + WRITE(MONITO,8630) + IMAX=2 + IMIN=0 +4927 READ(EGNR,*,ERR=8603,END=6666) JAGNR + IF((JAGNR.GE.IMIN).AND.(JAGNR.LE.IMAX)) GOTO 8602 +8603 WRITE(MONITO,4924) IMIN,IMAX + GOTO 4927 +8602 IVARNR=0 + IF(JAGNR.GT.0) + & OPEN(UNIT=OGNR,FILE='OUTPUT.IGR',STATUS='NEW',FORM='FORMATTED') + IF(JAGNR.EQ.1) AGNR=OGNR + IF(NOTBEG) GOTO 3293 +C---------------WINDOW 3: SELECT VARIABLE------------------------ +5503 WRITE(MONITO,5040) IVAR +5040 FORMAT(1X//' SELECT YOUR VARIABLE:',31X,'#LAST:',I1,'#'// + & ' 1 LATITUDE 3 ALTITUDE'/ + & ' 2 LONGITUDE 4 YEAR') + WRITE(MONITO,8630) +8630 FORMAT(1X,60('-')/' Enter / to use previous value(s) ', + & '(see # .. #); Ctrl Z to exit') + IMIN=1 + IMAX=4 +4929 READ(EGNR,*,ERR=8605,END=6666) IVAR + IF((IVAR.GE.IMIN).AND.(IVAR.LE.IMAX)) GOTO 5504 +8605 WRITE(MONITO,4924) IMIN,IMAX + GOTO 4929 +C--------------WINDOW 4: SELECT VARIABLE RANGE--------------------- +5504 WRITE(MONITO,5044) BVAR,EVAR,SVAR +5044 FORMAT(1X//' CHOOSE YOUR VARIABLE RANGE:',5X,' BEGIN, END, ', + & 'STEPWIDTH ?'/32X,'#',F8.1,',',F8.1,',',F8.1,'#') + WRITE(MONITO,8630) + VAMIN=VARB(IVAR) + VAMAX=VARE(IVAR) +4931 READ(EGNR,*,ERR=8606,END=6666) BVAR,EVAR,SVAR + IF((BVAR.GE.VAMIN).AND.(EVAR.LE.VAMAX)) GOTO 8607 +8606 WRITE(MONITO,4930) VAMIN,VAMAX +4930 FORMAT(' Your input is outside the value range:', + & F8.1,' to',F8.1/' try again') + GOTO 4931 +8607 LANZ=INT((EVAR-BVAR)/SVAR)+1 + IF(NOTBEG) GOTO 3293 + IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7339 +C--------------WINDOW 5: LATITUDE----------------------------------- +3329 WRITE(MONITO,5000) LATI +5000 FORMAT(1X//1X,'GEOD LATITUDE ? !NORTH! [DEGREE,DECIMAL]', + & 8X,'#',F5.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(1) + XMIN=VARB(1) +4933 READ(EGNR,*,ERR=8608,END=6666) LATI + IF((LATI.GE.XMIN).AND.(LATI.LE.XMAX)) GOTO 8609 +8608 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4933 +8609 IF(NOTBEG) GOTO 3293 +7339 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7500 +C---------------WINDOW 6: LONGITUDE--------------------------------- +3339 WRITE(MONITO,6001) LONGI +6001 FORMAT(1X//1X,'GEOD LONGITUDE ? !EAST! [DEGREE,DECIMAL]', + & 7X,'#',F6.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(2) + XMIN=VARB(2) +4934 READ(EGNR,*,ERR=8610,END=6666) LONGI + IF((LONGI.GE.XMIN).AND.(LONGI.LE.XMAX)) GOTO 8611 +8610 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4934 +8611 IF(NOTBEG) GOTO 3293 +7500 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 5551 +C---------------WINDOW 7: ALTITUDE--------------------------------- +5502 WRITE(MONITO,6002) HEIGHT +6002 FORMAT(1X//1X,'ALTITUDE ? [KM]',33X,'#',F7.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(3) + XMIN=VARB(3) +4936 READ(EGNR,*,ERR=8615,END=6666) HEIGHT + IF((HEIGHT.GE.XMIN).AND.(HEIGHT.LE.XMAX)) GOTO 8616 +8615 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4936 +8616 IF(NOTBEG) GOTO 3293 +5551 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 9138 +C----------------WINDOW 8: YEAR------------------------------------ +6780 WRITE(MONITO,6004) YEAR +6004 FORMAT(1X//' YEAR(EPOCH) ?',9X,'*decimal*',9X,'#',F6.1,'#') + WRITE(MONITO,8630) + XMAX=VARE(4) + XMIN=VARB(4) +4938 READ(EGNR,*,ERR=8617,END=6666) YEAR + IF((YEAR.GE.XMIN).AND.(YEAR.LE.XMAX)) GOTO 8618 +8617 WRITE(MONITO,4930) XMIN,XMAX + GOTO 4938 +8618 IF(NOTBEG) GOTO 3293 +C----------------WINDOW 9: ABSOLUTE OR NORMALIZED B-------------- +9138 WRITE(MONITO,6204) IBBB +6204 FORMAT(1X//' OUTPUT OPTION: B OR B/B0 ?',19X,'#',I1,'#'// + & 4X,'if you enter 0, the absolute magnetic field strength'/ + & 4X,'will be listed, otherwise the field strength normalized'/ + & 4X,'to the field strength at the magnetic equator is listed') + WRITE(MONITO,8630) +4738 READ(EGNR,*,ERR=8717,END=6666) IBBB + IF(IBBB.NE.0) THEN + ITB=' B/B0 ' + ELSE + ITB='B/Gauss' + ENDIF + GOTO 8718 +8717 WRITE(MONITO,4630) +4630 FORMAT(' Your input should be a integer value'/' try again') + GOTO 4738 +8718 IF(NOTBEG) GOTO 3293 +C----------------CALCULATE PROFILES----------------------------------- +5505 WRITE(AGNR,3910) ITEXT(IVAR),ITB + IF(JAGNR.EQ.2) WRITE(OGNR,3910) ITEXT(IVAR),ITB +3910 FORMAT(1X//////////// + & 5X,A4,' DIMO ',A7,' B-NORTH B-EAST B-DOWN ', + & ' DIP DEC L-VALUE C') + XVAR(1)=LATI + XVAR(2)=LONGI + XVAR(3)=HEIGHT + XVAR(4)=YEAR + LFD=0 + XVAR(IVAR)=BVAR-SVAR +2123 XVAR(IVAR)=XVAR(IVAR)+SVAR + LFD=LFD+1 + LATI=XVAR(1) + LONGI=XVAR(2) + HEIGHT=XVAR(3) + YEAR=XVAR(4) + IF((IVAR.LT.4).AND.(LFD.GT.1)) GOTO 2910 + CALL FELDCOF(YEAR,DIMO) +2910 CALL FELDG(LATI,LONGI,HEIGHT,BNORTH,BEAST,BDOWN,BABS) + CALL SHELLG(LATI,LONGI,HEIGHT,DIMO,XL,ICODE,BAB1) + IF(IABS(ICODE).GT.9) THEN + WRITE(MONITO,7227) ICODE +7227 FORMAT(' ICODE=',I10,' is set to 2') + ICODE=2 + ENDIF + IF(IBBB.EQ.0) GOTO 2299 + BEQU=DIMO/(XL*XL*XL) + IF(ICODE.EQ.1) THEN + BDEL=1.E-3 + CALL FINDB0(0.05,BDEL,VAL,BEQ,RR0) + IF(VAL) BEQU=BEQ + ENDIF +2299 DIP=ASIN(BDOWN/BABS)/UMR + DEC=ASIN(BEAST/SQRT(BEAST*BEAST+BNORTH*BNORTH))/UMR + XCOR=XVAR(IVAR) + IF(IBBB.EQ.0) THEN + WRITE(AGNR,7117) XCOR,DIMO,BABS,BNORTH,BEAST,BDOWN, + & DIP,DEC,XL,ICODE + IF(JAGNR.EQ.2) WRITE(OGNR,7117) XCOR,DIMO,BABS,BNORTH, + & BEAST,BDOWN,DIP,DEC,XL,ICODE +7117 FORMAT(1X,F8.2,F8.4,4(1X,F7.5),2F7.1,F8.3,I3) + ELSE + BBX=BABS/BEQU + IF(BBX.GT.9999.999) BBX=9999.999 + WRITE(AGNR,7177) XCOR,DIMO,BBX,BNORTH,BEAST,BDOWN, + & DIP,DEC,XL,ICODE + IF(JAGNR.EQ.2) WRITE(OGNR,7177) XCOR,DIMO,BBX,BNORTH, + & BEAST,BDOWN,DIP,DEC,XL,ICODE +7177 FORMAT(1X,F8.2,F8.4,F8.3,3(1X,F7.5),2F7.1,F8.3,I3) + ENDIF + IF(XCOR.LT.EVAR) GOTO 2123 + WRITE(AGNR,2193) LATI,LONGI,HEIGHT,YEAR + IF(JAGNR.EQ.2) WRITE(OGNR,2193) LATI,LONGI,HEIGHT,YEAR +C ### edition date corrected +2193 FORMAT(1X,'------- International Geomagnetic Reference Field', + & ' --- Edition 2000 -------'/' LATI=',F7.1,' LONGI=',F6.1, + & ' I DIMO is Dipol I C=1 L and B0 correct'/ + & ' ALT=',F7.1,' YEAR=',F6.1,' I Moment in Gauss', + & ' I =2 wrong, =3 approx.'/1X,74('-')) + IF(HEIGHT.GT.5000.0) THEN + WRITE(AGNR,5611) + IF(JAGNR.EQ.2) WRITE(OGNR,5611) + ENDIF +5611 FORMAT(' !! REMINDER: this field model does not', + & ' include external sources !!') +C ### year limits corrected + IF((YEAR.LT.1945.0).OR.(YEAR.GT.2005.0)) THEN + WRITE(AGNR,5612) + IF(JAGNR.EQ.2) WRITE(OGNR,5612) + ENDIF +C ### timeperiod corrected +5612 FORMAT(' !! REMINDER: Recommended time period is 1945', + & ' to 2005 !!') +C-----------------LAST WINDOW: CONTINUE ?----------------------- +918 WRITE(MONITO,5600) +5600 FORMAT(1X/' **** DO YOU WANT TO CONTINUE?'/1X,60('-')/ + & ' "0" QUIT AND EXIT "1" NEW PARAMETERS'/ + & 1X,60('-')) + IMIN=0 + IMAX=1 +8651 READ(EGNR,*,ERR=8652,END=6666) IALL + IF((IALL.GE.IMIN).AND.(IALL.LE.IMAX)) GOTO 8653 +8652 WRITE(MONITO,4924) IMIN,IMAX + GOTO 8651 +8653 NOTBEG=.TRUE. + IF(IALL.EQ.1) GOTO 3293 +6666 CONTINUE + STOP + END diff --git a/IGRF/old_fortran_code/bilcal.log b/IGRF/old_fortran_code/bilcal.log new file mode 100755 index 0000000..de4f160 --- /dev/null +++ b/IGRF/old_fortran_code/bilcal.log @@ -0,0 +1,403 @@ + + ****************************************************** + ****** IGRF GEOMAGNETIC FIELD MODEL 1945 - 2000 ****** + *********** SHELLG L-VALUE CALCULATION ************* +************************************************************ + This program allows you to produce B and L profiles in + latitude, longitude, year or altitude. + In each of the following windows you will be asked to enter + one or more values, defining the conditions for your tables. + In each window the current value(s) is (are) shown in the right + upper corner (#...#). You can choose the current values by + entering / at the prompt. + If you enter a wrong character or a value outside the allowed + parameter range, the program will ask you for a new entry. + After your tables are displayed, you can change any parameter + you wish to change and create a new profile. + You can leave the program at any point by entering Ctrl Z. +************************* GOOD LUCK ************************* + +DO YOU WANT YOUR PROFILES #2# + DISPLAYED ON YOUR MONITOR: ENTER 0 AT PROMPT + STORED IN FILE OUTPUT.IGR: ENTER 1 AT PROMPT + DISPLAYED AND STORED: ENTER 2 AT PROMPT +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + +SELECT YOUR VARIABLE: #LAST:3# + +1 LATITUDE 3 ALTITUDE +2 LONGITUDE 4 YEAR +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 100.0, 1000.0, 100.0# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + +GEOD LATITUDE ? !NORTH! [DEGREE,DECIMAL] # 45.1# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + +GEOD LONGITUDE ? !EAST! [DEGREE,DECIMAL] # 293.1# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + +YEAR(EPOCH) ? *decimal* #1985.5# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + +OUTPUT OPTION: B OR B/B0 ? #0# + + if you enter 0, the absolute magnetic field strength + will be listed, otherwise the field strength normalized + to the field strength at the magnetic equator is listed +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +/ + + + + + + + + + + + + + H/km DIMO B/Gauss B-NORTH B-EAST B-DOWN DIP DEC L-VALUE C + 100.00 0.3042 0.52942 0.16107 -.05615 0.50118 71.2 -19.2 3.216 2 + 200.00 0.3042 0.50404 0.15406 -.05222 0.47707 71.2 -18.7 3.264 2 + 300.00 0.3042 0.48030 0.14745 -.04865 0.45451 71.1 -18.3 3.313 1 + 400.00 0.3042 0.45808 0.14122 -.04539 0.43340 71.1 -17.8 3.361 1 + 500.00 0.3042 0.43724 0.13534 -.04241 0.41360 71.1 -17.4 3.409 1 + 600.00 0.3042 0.41769 0.12978 -.03968 0.39503 71.0 -17.0 3.457 1 + 700.00 0.3042 0.39931 0.12453 -.03717 0.37757 71.0 -16.6 3.505 1 + 800.00 0.3042 0.38202 0.11955 -.03487 0.36115 71.0 -16.3 3.553 1 + 900.00 0.3042 0.36574 0.11483 -.03275 0.34570 70.9 -15.9 3.601 1 + 1000.00 0.3042 0.35039 0.11036 -.03080 0.33113 70.9 -15.6 3.649 1 +------- International Geomagnetic Reference Field --- Edition 1995 ------- +LATI= 45.1 LONGI= 293.1 I DIMO is Dipol I C=1 L and B0 correct + ALT= 1000.0 YEAR=1985.5 I Moment in Gauss I =2 wrong, =3 approx. +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +------------------------------------------------------------ +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #H/km# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 100.0, 1000.0, 100.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +7 + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 100.0, 1000.0, 100.0# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +1000,10000,1000 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #H/km# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 1000.0, 10000.0, 1000.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +0 + + + + + + + + + + + + + H/km DIMO B/Gauss B-NORTH B-EAST B-DOWN DIP DEC L-VALUE C + 1000.00 0.3042 0.35039 0.11036 -.03080 0.33113 70.9 -15.6 3.649 1 + 2000.00 0.3042 0.23588 0.07614 -.01761 0.22256 70.7 -13.0 4.134 1 + 3000.00 0.3042 0.16675 0.05465 -.01091 0.15716 70.5 -11.3 4.622 1 + 4000.00 0.3042 0.12239 0.04049 -.00718 0.11528 70.4 -10.1 5.107 1 + 5000.00 0.3042 0.09256 0.03080 -.00494 0.08715 70.3 -9.1 5.596 1 + 6000.00 0.3042 0.07174 0.02396 -.00353 0.06753 70.3 -8.4 6.092 1 + 7000.00 0.3042 0.05675 0.01899 -.00260 0.05341 70.3 -7.8 6.593 1 + 8000.00 0.3042 0.04567 0.01530 -.00196 0.04299 70.3 -7.3 7.093 1 + 9000.00 0.3042 0.03731 0.01250 -.00151 0.03512 70.3 -6.9 7.590 1 +10000.00 0.3042 0.03088 0.01034 -.00118 0.02907 70.3 -6.5 8.084 1 +------- International Geomagnetic Reference Field --- Edition 1995 ------- +LATI= 45.1 LONGI= 293.1 I DIMO is Dipol I C=1 L and B0 correct + ALT=10000.0 YEAR=1985.5 I Moment in Gauss I =2 wrong, =3 approx. +-------------------------------------------------------------------------- +!! REMINDER: this field model does not include external sources !! + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +------------------------------------------------------------ +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #H/km# +3 ALTITUDE # 10000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 1000.0, 10000.0, 1000.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +3 + + +ALTITUDE ? [KM] #10000.0# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +1000 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #H/km# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 1000.0, 10000.0, 1000.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +1 + + +GEOD LATITUDE ? !NORTH! [DEGREE,DECIMAL] # 45.1# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +30 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 30.0# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #H/km# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 1000.0, 10000.0, 1000.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +6 + + +SELECT YOUR VARIABLE: #LAST:3# + +1 LATITUDE 3 ALTITUDE +2 LONGITUDE 4 YEAR +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +4 + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 1000.0, 10000.0, 1000.0# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +1945,2000,5 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 30.0# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #YEAR# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 1945.0, 2000.0, 5.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +8 + + +OUTPUT OPTION: B OR B/B0 ? #0# + + if you enter 0, the absolute magnetic field strength + will be listed, otherwise the field strength normalized + to the field strength at the magnetic equator is listed +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 30.0# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #YEAR# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1985.5# # 1945.0, 2000.0, 5.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +0 + + + + + + + + + + + + + YEAR DIMO B/B0 B-NORTH B-EAST B-DOWN DIP DEC L-VALUE C + 1945.00 0.3122 11.336 0.14421 -.02172 0.28536 62.9 -8.6 2.220 1 + 1950.00 0.3118 11.153 0.14491 -.02244 0.28389 62.7 -8.8 2.209 1 + 1955.00 0.3113 10.966 0.14586 -.02342 0.28222 62.4 -9.1 2.199 1 + 1960.00 0.3104 10.696 0.14713 -.02436 0.27977 61.9 -9.4 2.183 1 + 1965.00 0.3095 10.430 0.14811 -.02543 0.27705 61.5 -9.7 2.167 1 + 1970.00 0.3083 10.109 0.14947 -.02637 0.27367 61.0 -10.0 2.148 1 + 1975.00 0.3070 9.753 0.15071 -.02735 0.26975 60.4 -10.3 2.127 1 + 1980.00 0.3057 9.407 0.15096 -.02849 0.26521 59.9 -10.7 2.108 1 + 1985.00 0.3043 9.059 0.15128 -.02957 0.26104 59.4 -11.1 2.087 1 + 1990.00 0.3032 8.736 0.15164 -.03045 0.25712 59.0 -11.4 2.068 1 + 1995.00 0.3021 8.438 0.15201 -.03129 0.25348 58.5 -11.6 2.049 1 + 2000.00 0.3010 8.136 0.15245 -.03213 0.24982 58.1 -11.9 2.029 1 +------- International Geomagnetic Reference Field --- Edition 1995 ------- +LATI= 30.0 LONGI= 293.1 I DIMO is Dipol I C=1 L and B0 correct + ALT= 1000.0 YEAR=2000.0 I Moment in Gauss I =2 wrong, =3 approx. +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +------------------------------------------------------------ +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 30.0# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #YEAR# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #2000.0# # 1945.0, 2000.0, 5.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +4 + + +YEAR(EPOCH) ? *decimal* #2000.0# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +1995 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 30.0# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #YEAR# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1995.0# # 1945.0, 2000.0, 5.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +6 + + +SELECT YOUR VARIABLE: #LAST:4# + +1 LATITUDE 3 ALTITUDE +2 LONGITUDE 4 YEAR +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +1 + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 1945.0, 2000.0, 5.0# +------------------------------------------------------------ +Enter / to use previous value(s) (see # .. #); Ctrl Z to exit +-80,80,20 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +------------------------------------------------------------ +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 30.0# 5 DISPLAY OR STORE +2 LONGITUDE # 293.1# 6 SELECTION OF VARIABLE #LATI# +3 ALTITUDE # 1000.0# 7 VARIABLE RANGE +4 YEAR #1995.0# # -80.0, 80.0, 20.0# + 8 B OR B/B0 +------------------------------------------------------------ +ENTER NUMBER +0 + + + + + + + + + + + + + LATI DIMO B/B0 B-NORTH B-EAST B-DOWN DIP DEC L-VALUE C + -80.00 0.3021 310.936 0.10062 0.04627 -.30864 -70.3 24.7 6.596 1 + -60.00 0.3021 11.854 0.13016 0.02925 -.21172 -57.8 12.7 2.425 1 + -40.00 0.3021 2.105 0.13885 0.00865 -.12325 -41.5 3.6 1.509 1 + -20.00 0.3021 1.022 0.15771 -.00938 -.03933 -14.0 -3.4 1.241 1 + 0.00 0.3021 1.300 0.17571 -.02240 0.07077 21.8 -7.3 1.274 1 + 20.00 0.3021 3.697 0.16803 -.02961 0.19495 48.8 -10.0 1.633 1 + 40.00 0.3021 24.795 0.12767 -.03161 0.30420 66.6 -13.9 2.843 1 + 60.00 0.3021 966.671 0.06388 -.02775 0.36494 79.2 -23.5 9.204 1 + 80.00 0.30219999.999 0.01140 -.01756 0.37588 86.8 -57.0 509.552 3 +------- International Geomagnetic Reference Field --- Edition 1995 ------- +LATI= 80.0 LONGI= 293.1 I DIMO is Dipol I C=1 L and B0 correct + ALT= 1000.0 YEAR=1995.0 I Moment in Gauss I =2 wrong, =3 approx. +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +------------------------------------------------------------ +0 +FORTRAN STOP + diff --git a/IGRF/old_fortran_code/dgrf00.dat b/IGRF/old_fortran_code/dgrf00.dat new file mode 100644 index 0000000..6f039f1 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf00.dat @@ -0,0 +1,67 @@ + dgrf00 + 10 6371.2 2000.0 + 1 0 -29619.4 0.0 + 1 1 -1728.2 5186.1 + 2 0 -2267.7 0.0 + 2 1 3068.4 -2481.6 + 2 2 1670.9 -458. + 3 0 1339.6 0.0 + 3 1 -2288. -227.6 + 3 2 1252.1 293.4 + 3 3 714.5 -491.1 + 4 0 932.3 .0 + 4 1 786.8 272.6 + 4 2 250. -231.9 + 4 3 -403. 119.8 + 4 4 111.3 -303.8 + 5 0 -218.8 .0 + 5 1 351.4 43.8 + 5 2 222.3 171.9 + 5 3 -130.4 -133.1 + 5 4 -168.6 -39.3 + 5 5 -12.9 106.3 + 6 0 72.3 .0 + 6 1 68.2 -17.4 + 6 2 74.2 63.7 + 6 3 -160.9 65.1 + 6 4 -5.9 -61.2 + 6 5 16.9 0.7 + 6 6 -90.4 43.8 + 7 0 79. .0 + 7 1 -74. -64.6 + 7 2 0. -24.2 + 7 3 33.3 6.2 + 7 4 9.1 24. + 7 5 6.9 14.8 + 7 6 7.3 -25.4 + 7 7 -1.2 -5.8 + 8 0 24.4 .0 + 8 1 6.6 11.9 + 8 2 -9.2 -21.5 + 8 3 -7.9 8.5 + 8 4 -16.6 -21.5 + 8 5 9.1 15.5 + 8 6 7. 8.9 + 8 7 -7.9 -14.9 + 8 8 -7. -2.1 + 9 0 5. .0 + 9 1 9.4 -19.7 + 9 2 3. 13.4 + 9 3 -8.4 12.5 + 9 4 6.3 -6.2 + 9 5 -8.9 -8.4 + 9 6 -1.5 8.4 + 9 7 9.3 3.8 + 9 8 -4.3 -8.2 + 9 9 -8.2 4.8 + 10 0 -2.6 .0 + 10 1 -6. 1.7 + 10 2 1.7 0. + 10 3 -3.1 4. + 10 4 -0.5 4.9 + 10 5 3.7 -5.9 + 10 6 1. -1.2 + 10 7 2. -2.9 + 10 8 4.2 0.2 + 10 9 0.3 -2.2 + 10 10 -1.1 -7.4 diff --git a/IGRF/old_fortran_code/dgrf45.dat b/IGRF/old_fortran_code/dgrf45.dat new file mode 100755 index 0000000..cead48b --- /dev/null +++ b/IGRF/old_fortran_code/dgrf45.dat @@ -0,0 +1,67 @@ + dgrf45 + 10 6371.2 1945.0 + 1 0 -30594. 0. + 1 1 -2285. 5810. + 2 0 -1244. 0. + 2 1 2990. -1702. + 2 2 1578. 477. + 3 0 1282. 0. + 3 1 -1834. -499. + 3 2 1255. 186. + 3 3 913. -11. + 4 0 944. 0. + 4 1 776. 144. + 4 2 544. -276. + 4 3 -421. -55. + 4 4 304. -178. + 5 0 -253. 0. + 5 1 346. -12. + 5 2 194. 95. + 5 3 -20. -67. + 5 4 -142. -119. + 5 5 -82. 82. + 6 0 59. 0. + 6 1 57. 6. + 6 2 6. 100. + 6 3 -246. 16. + 6 4 -25. -9. + 6 5 21. -16. + 6 6 -104. -39. + 7 0 70. 0. + 7 1 -40. -45. + 7 2 0. -18. + 7 3 0. 2. + 7 4 -29. 6. + 7 5 -10. 28. + 7 6 15. -17. + 7 7 29. -22. + 8 0 13. 0. + 8 1 7. 12. + 8 2 -8. -21. + 8 3 -5. -12. + 8 4 9. -7. + 8 5 7. 2. + 8 6 -10. 18. + 8 7 7. 3. + 8 8 2. -11. + 9 0 5. 0. + 9 1 -21. -27. + 9 2 1. 17. + 9 3 -11. 29. + 9 4 3. -9. + 9 5 16. 4. + 9 6 -3. 9. + 9 7 -4. 6. + 9 8 -3. 1. + 9 9 -4. 8. + 10 0 -3. 0. + 10 1 11. 5. + 10 2 1. 1. + 10 3 2. -20. + 10 4 -5. -1. + 10 5 -1. -6. + 10 6 8. 6. + 10 7 -1. -4. + 10 8 -3. -2. + 10 9 5. 0. + 10 10 -2. -2. diff --git a/IGRF/old_fortran_code/dgrf50.dat b/IGRF/old_fortran_code/dgrf50.dat new file mode 100755 index 0000000..b8971b7 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf50.dat @@ -0,0 +1,67 @@ + dgrf50 + 10 6371.2 1950.0 + 1 0 -30554. 0. + 1 1 -2250. 5815. + 2 0 -1341. 0. + 2 1 2998. -1810. + 2 2 1576. 381. + 3 0 1297. 0. + 3 1 -1889. -476. + 3 2 1274. 206. + 3 3 896. -46. + 4 0 954. 0. + 4 1 792. 136. + 4 2 528. -278. + 4 3 -408. -37. + 4 4 303. -210. + 5 0 -240. 0. + 5 1 349. 3. + 5 2 211. 103. + 5 3 -20. -87. + 5 4 -147. -122. + 5 5 -76. 80. + 6 0 54. 0. + 6 1 57. -1. + 6 2 4. 99. + 6 3 -247. 33. + 6 4 -16. -12. + 6 5 12. -12. + 6 6 -105. -30. + 7 0 65. 0. + 7 1 -55. -35. + 7 2 2. -17. + 7 3 1. 0. + 7 4 -40. 10. + 7 5 -7. 36. + 7 6 5. -18. + 7 7 19. -16. + 8 0 22. 0. + 8 1 15. 5. + 8 2 -4. -22. + 8 3 -1. 0. + 8 4 11. -21. + 8 5 15. -8. + 8 6 -13. 17. + 8 7 5. -4. + 8 8 -1. -17. + 9 0 3. 0. + 9 1 -7. -24. + 9 2 -1. 19. + 9 3 -25. 12. + 9 4 10. 2. + 9 5 5. 2. + 9 6 -5. 8. + 9 7 -2. 8. + 9 8 3. -11. + 9 9 8. -7. + 10 0 -8. 0. + 10 1 4. 13. + 10 2 -1. -2. + 10 3 13. -10. + 10 4 -4. 2. + 10 5 4. -3. + 10 6 12. 6. + 10 7 3. -3. + 10 8 2. 6. + 10 9 10. 11. + 10 10 3. 8. diff --git a/IGRF/old_fortran_code/dgrf55.dat b/IGRF/old_fortran_code/dgrf55.dat new file mode 100755 index 0000000..68807d8 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf55.dat @@ -0,0 +1,67 @@ + dgrf55 + 10 6371.2 1955.0 + 1 0 -30500. 0. + 1 1 -2215. 5820. + 2 0 -1440. 0. + 2 1 3003. -1898. + 2 2 1581. 291. + 3 0 1302. 0. + 3 1 -1944. -462. + 3 2 1288. 216. + 3 3 882. -83. + 4 0 958. 0. + 4 1 796. 133. + 4 2 510. -274. + 4 3 -397. -23. + 4 4 290. -230. + 5 0 -229. 0. + 5 1 360. 15. + 5 2 230. 110. + 5 3 -23. -98. + 5 4 -152. -121. + 5 5 -69. 78. + 6 0 47. 0. + 6 1 57. -9. + 6 2 3. 96. + 6 3 -247. 48. + 6 4 -8. -16. + 6 5 7. -12. + 6 6 -107. -24. + 7 0 65. 0. + 7 1 -56. -50. + 7 2 2. -24. + 7 3 10. -4. + 7 4 -32. 8. + 7 5 -11. 28. + 7 6 9. -20. + 7 7 18. -18. + 8 0 11. 0. + 8 1 9. 10. + 8 2 -6. -15. + 8 3 -14. 5. + 8 4 6. -23. + 8 5 10. 3. + 8 6 -7. 23. + 8 7 6. -4. + 8 8 9. -13. + 9 0 4. 0. + 9 1 9. -11. + 9 2 -4. 12. + 9 3 -5. 7. + 9 4 2. 6. + 9 5 4. -2. + 9 6 1. 10. + 9 7 2. 7. + 9 8 2. -6. + 9 9 5. 5. + 10 0 -3. 0. + 10 1 -5. -4. + 10 2 -1. 0. + 10 3 2. -8. + 10 4 -3. -2. + 10 5 7. -4. + 10 6 4. 1. + 10 7 -2. -3. + 10 8 6. 7. + 10 9 -2. -1. + 10 10 0. -3. diff --git a/IGRF/old_fortran_code/dgrf60.dat b/IGRF/old_fortran_code/dgrf60.dat new file mode 100755 index 0000000..3eade82 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf60.dat @@ -0,0 +1,67 @@ + dgrf60 + 10 6371.2 1960.0 + 1 0 -30421. 0. + 1 1 -2169. 5791. + 2 0 -1555. 0. + 2 1 3002. -1967. + 2 2 1590. 206. + 3 0 1302. 0. + 3 1 -1992. -414. + 3 2 1289. 224. + 3 3 878. -130. + 4 0 957. 0. + 4 1 800. 135. + 4 2 504. -278. + 4 3 -394. 3. + 4 4 269. -255. + 5 0 -222. 0. + 5 1 362. 16. + 5 2 242. 125. + 5 3 -26. -117. + 5 4 -156. -114. + 5 5 -63. 81. + 6 0 46. 0. + 6 1 58. -10. + 6 2 1. 99. + 6 3 -237. 60. + 6 4 -1. -20. + 6 5 -2. -11. + 6 6 -113. -17. + 7 0 67. 0. + 7 1 -56. -55. + 7 2 5. -28. + 7 3 15. -6. + 7 4 -32. 7. + 7 5 -7. 23. + 7 6 17. -18. + 7 7 8. -17. + 8 0 15. 0. + 8 1 6. 11. + 8 2 -4. -14. + 8 3 -11. 7. + 8 4 2. -18. + 8 5 10. 4. + 8 6 -5. 23. + 8 7 10. 1. + 8 8 8. -20. + 9 0 4. 0. + 9 1 6. -18. + 9 2 0. 12. + 9 3 -9. 2. + 9 4 1. 0. + 9 5 4. -3. + 9 6 -1. 9. + 9 7 -2. 8. + 9 8 3. 0. + 9 9 -1. 5. + 10 0 1. 0. + 10 1 -3. 4. + 10 2 4. 1. + 10 3 0. 0. + 10 4 -1. 2. + 10 5 4. -5. + 10 6 6. 1. + 10 7 1. -1. + 10 8 -1. 6. + 10 9 2. 0. + 10 10 0. -7. diff --git a/IGRF/old_fortran_code/dgrf65.dat b/IGRF/old_fortran_code/dgrf65.dat new file mode 100755 index 0000000..dfed431 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf65.dat @@ -0,0 +1,67 @@ + dgrf65 + 10 6371.2 1965.0 + 1 0 -30334. 0. + 1 1 -2119. 5776. + 2 0 -1662. 0. + 2 1 2997. -2016. + 2 2 1594. 114. + 3 0 1297. 0. + 3 1 -2038. -404. + 3 2 1292. 240. + 3 3 856. -165. + 4 0 957. 0. + 4 1 804. 148. + 4 2 479. -269. + 4 3 -390. 13. + 4 4 252. -269. + 5 0 -219. 0. + 5 1 358. 19. + 5 2 254. 128. + 5 3 -31. -126. + 5 4 -157. -97. + 5 5 -62. 81. + 6 0 45. 0. + 6 1 61. -11. + 6 2 8. 100. + 6 3 -228. 68. + 6 4 4. -32. + 6 5 1. -8. + 6 6 -111. -7. + 7 0 75. 0. + 7 1 -57. -61. + 7 2 4. -27. + 7 3 13. -2. + 7 4 -26. 6. + 7 5 -6. 26. + 7 6 13. -23. + 7 7 1. -12. + 8 0 13. 0. + 8 1 5. 7. + 8 2 -4. -12. + 8 3 -14. 9. + 8 4 0. -16. + 8 5 8. 4. + 8 6 -1. 24. + 8 7 11. -3. + 8 8 4. -17. + 9 0 8. 0. + 9 1 10. -22. + 9 2 2. 15. + 9 3 -13. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 5. 10. + 9 8 1. -4. + 9 9 -2. 1. + 10 0 -2. 0. + 10 1 -3. 2. + 10 2 2. 1. + 10 3 -5. 2. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 4. 0. + 10 7 0. -2. + 10 8 2. 3. + 10 9 2. 0. + 10 10 0. -6. diff --git a/IGRF/old_fortran_code/dgrf70.dat b/IGRF/old_fortran_code/dgrf70.dat new file mode 100755 index 0000000..45c3192 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf70.dat @@ -0,0 +1,67 @@ + dgrf70 + 10 6371.2 1970.0 + 1 0 -30220. 0. + 1 1 -2068. 5737. + 2 0 -1781. 0. + 2 1 3000. -2047. + 2 2 1611. 25. + 3 0 1287. 0. + 3 1 -2091. -366. + 3 2 1278. 251. + 3 3 838. -196. + 4 0 952. 0. + 4 1 800. 167. + 4 2 461. -266. + 4 3 -395. 26. + 4 4 234. -279. + 5 0 -216. 0. + 5 1 359. 26. + 5 2 262. 139. + 5 3 -42. -139. + 5 4 -160. -91. + 5 5 -56. 83. + 6 0 43. 0. + 6 1 64. -12. + 6 2 15. 100. + 6 3 -212. 72. + 6 4 2. -37. + 6 5 3. -6. + 6 6 -112. 1. + 7 0 72. 0. + 7 1 -57. -70. + 7 2 1. -27. + 7 3 14. -4. + 7 4 -22. 8. + 7 5 -2. 23. + 7 6 13. -23. + 7 7 -2. -11. + 8 0 14. 0. + 8 1 6. 7. + 8 2 -2. -15. + 8 3 -13. 6. + 8 4 -3. -17. + 8 5 5. 6. + 8 6 0. 21. + 8 7 11. -6. + 8 8 3. -16. + 9 0 8. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 6. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 0. 10. + 9 7 3. 11. + 9 8 1. -2. + 9 9 -1. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -1. 4. + 10 5 6. -4. + 10 6 4. 0. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -4. diff --git a/IGRF/old_fortran_code/dgrf75.dat b/IGRF/old_fortran_code/dgrf75.dat new file mode 100755 index 0000000..fe001d9 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf75.dat @@ -0,0 +1,67 @@ + dgrf75 + 10 6371.2 1975.0 + 1 0 -30100. 0. + 1 1 -2013. 5675. + 2 0 -1902. 0. + 2 1 3010. -2067. + 2 2 1632. -68. + 3 0 1276. 0. + 3 1 -2144. -333. + 3 2 1260. 262. + 3 3 830. -223. + 4 0 946. 0. + 4 1 791. 191. + 4 2 438. -265. + 4 3 -405. 39. + 4 4 216. -288. + 5 0 -218. 0. + 5 1 356. 31. + 5 2 264. 148. + 5 3 -59. -152. + 5 4 -159. -83. + 5 5 -49. 88. + 6 0 45. 0. + 6 1 66. -13. + 6 2 28. 99. + 6 3 -198. 75. + 6 4 1. -41. + 6 5 6. -4. + 6 6 -111. 11. + 7 0 71. 0. + 7 1 -56. -77. + 7 2 1. -26. + 7 3 16. -5. + 7 4 -14. 10. + 7 5 0. 22. + 7 6 12. -23. + 7 7 -5. -12. + 8 0 14. 0. + 8 1 6. 6. + 8 2 -1. -16. + 8 3 -12. 4. + 8 4 -8. -19. + 8 5 4. 6. + 8 6 0. 18. + 8 7 10. -10. + 8 8 1. -17. + 9 0 7. 0. + 9 1 10. -21. + 9 2 2. 16. + 9 3 -12. 7. + 9 4 10. -4. + 9 5 -1. -5. + 9 6 -1. 10. + 9 7 4. 11. + 9 8 1. -3. + 9 9 -2. 1. + 10 0 -3. 0. + 10 1 -3. 1. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 4. + 10 5 5. -4. + 10 6 4. -1. + 10 7 1. -1. + 10 8 0. 3. + 10 9 3. 1. + 10 10 -1. -5. diff --git a/IGRF/old_fortran_code/dgrf80.dat b/IGRF/old_fortran_code/dgrf80.dat new file mode 100755 index 0000000..29ef9c1 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf80.dat @@ -0,0 +1,67 @@ + dgrf80 + 10 6371.2 1980.0 + 1 0 -29992. 0. + 1 1 -1956. 5604. + 2 0 -1997. 0. + 2 1 3027. -2129. + 2 2 1663. -200. + 3 0 1281. 0. + 3 1 -2180. -336. + 3 2 1251. 271. + 3 3 833. -252. + 4 0 938. 0. + 4 1 782. 212. + 4 2 398. -257. + 4 3 -419. 53. + 4 4 199. -297. + 5 0 -218. 0. + 5 1 357. 46. + 5 2 261. 150. + 5 3 -74. -151. + 5 4 -162. -78. + 5 5 -48. 92. + 6 0 48. 0. + 6 1 66. -15. + 6 2 42. 93. + 6 3 -192. 71. + 6 4 4. -43. + 6 5 14. -2. + 6 6 -108. 17. + 7 0 72. 0. + 7 1 -59. -82. + 7 2 2. -27. + 7 3 21. -5. + 7 4 -12. 16. + 7 5 1. 18. + 7 6 11. -23. + 7 7 -2. -10. + 8 0 18. 0. + 8 1 6. 7. + 8 2 0. -18. + 8 3 -11. 4. + 8 4 -7. -22. + 8 5 4. 9. + 8 6 3. 16. + 8 7 6. -13. + 8 8 -1. -15. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 16. + 9 3 -12. 9. + 9 4 9. -5. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 10. + 9 8 2. -6. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 2. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_fortran_code/dgrf85.dat b/IGRF/old_fortran_code/dgrf85.dat new file mode 100755 index 0000000..d771bcf --- /dev/null +++ b/IGRF/old_fortran_code/dgrf85.dat @@ -0,0 +1,67 @@ + dgrf85 + 10 6371.2 1985.0 + 1 0 -29873. 0. + 1 1 -1905. 5500. + 2 0 -2072. 0. + 2 1 3044. -2197. + 2 2 1687. -306. + 3 0 1296. 0. + 3 1 -2208. -310. + 3 2 1247. 284. + 3 3 829. -297. + 4 0 936. 0. + 4 1 780. 232. + 4 2 361. -249. + 4 3 -424. 69. + 4 4 170. -297. + 5 0 -214. 0. + 5 1 355. 47. + 5 2 253. 150. + 5 3 -93. -154. + 5 4 -164. -75. + 5 5 -46. 95. + 6 0 53. 0. + 6 1 65. -16. + 6 2 51. 88. + 6 3 -185. 69. + 6 4 4. -48. + 6 5 16. -1. + 6 6 -102. 21. + 7 0 74. 0. + 7 1 -62. -83. + 7 2 3. -27. + 7 3 24. -2. + 7 4 -6. 20. + 7 5 4. 17. + 7 6 10. -23. + 7 7 0. -7. + 8 0 21. 0. + 8 1 6. 8. + 8 2 0. -19. + 8 3 -11. 5. + 8 4 -9. -23. + 8 5 4. 11. + 8 6 4. 14. + 8 7 4. -15. + 8 8 -4. -11. + 9 0 5. 0. + 9 1 10. -21. + 9 2 1. 15. + 9 3 -12. 9. + 9 4 9. -6. + 9 5 -3. -6. + 9 6 -1. 9. + 9 7 7. 9. + 9 8 1. -7. + 9 9 -5. 2. + 10 0 -4. 0. + 10 1 -4. 1. + 10 2 3. 0. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 5. -4. + 10 6 3. 0. + 10 7 1. -1. + 10 8 2. 4. + 10 9 3. 0. + 10 10 0. -6. diff --git a/IGRF/old_fortran_code/dgrf90.dat b/IGRF/old_fortran_code/dgrf90.dat new file mode 100755 index 0000000..f431fa4 --- /dev/null +++ b/IGRF/old_fortran_code/dgrf90.dat @@ -0,0 +1,67 @@ + dgrf90 + 10 6371.2 1990.0 + 1 0 -29775. 0. + 1 1 -1848. 5406. + 2 0 -2131. 0. + 2 1 3059. -2279. + 2 2 1686. -373. + 3 0 1314. 0. + 3 1 -2239. -284. + 3 2 1248. 293. + 3 3 802. -352. + 4 0 939. 0. + 4 1 780. 247. + 4 2 325. -240. + 4 3 -423. 84. + 4 4 141. -299. + 5 0 -214. 0. + 5 1 353. 46. + 5 2 245. 154. + 5 3 -109. -153. + 5 4 -165. -69. + 5 5 -36. 97. + 6 0 61. 0. + 6 1 65. -16. + 6 2 59. 82. + 6 3 -178. 69. + 6 4 3. -52. + 6 5 18. 1. + 6 6 -96. 24. + 7 0 77. 0. + 7 1 -64. -80. + 7 2 2. -26. + 7 3 26. 0. + 7 4 -1. 21. + 7 5 5. 17. + 7 6 9. -23. + 7 7 0. -4. + 8 0 23. 0. + 8 1 5. 10. + 8 2 -1. -19. + 8 3 -10. 6. + 8 4 -12. -22. + 8 5 3. 12. + 8 6 4. 12. + 8 7 2. -16. + 8 8 -6. -10. + 9 0 4. 0. + 9 1 9. -20. + 9 2 1. 15. + 9 3 -12. 11. + 9 4 9. -7. + 9 5 -4. -7. + 9 6 -2. 9. + 9 7 7. 8. + 9 8 1. -7. + 9 9 -6. 2. + 10 0 -3. 0. + 10 1 -4. 2. + 10 2 2. 1. + 10 3 -5. 3. + 10 4 -2. 6. + 10 5 4. -4. + 10 6 3. 0. + 10 7 1. -2. + 10 8 3. 3. + 10 9 3. -1. + 10 10 0. -6. diff --git a/IGRF/old_fortran_code/dgrf95.dat b/IGRF/old_fortran_code/dgrf95.dat new file mode 100755 index 0000000..5e0fd4e --- /dev/null +++ b/IGRF/old_fortran_code/dgrf95.dat @@ -0,0 +1,67 @@ + dgrf95 + 10 6371.2 1995.0 + 1 0 -29692. 0. + 1 1 -1784. 5306. + 2 0 -2200. 0. + 2 1 3070. -2366. + 2 2 1681. -413. + 3 0 1335. 0. + 3 1 -2267. -262. + 3 2 1249. 302. + 3 3 759. -427. + 4 0 940. 0. + 4 1 780. 262. + 4 2 290. -236. + 4 3 -418. 97. + 4 4 122. -306. + 5 0 -214. 0. + 5 1 352. 46. + 5 2 235. 165. + 5 3 -118. -143. + 5 4 -166. -55. + 5 5 -17. 107. + 6 0 68. 0. + 6 1 67. -17. + 6 2 68. 72. + 6 3 -170. 67. + 6 4 -1. -58. + 6 5 19. 1. + 6 6 -93. 36. + 7 0 77. 0. + 7 1 -72. -69. + 7 2 1. -25. + 7 3 28. 4. + 7 4 5. 24. + 7 5 4. 17. + 7 6 8. -24. + 7 7 -2. -6. + 8 0 25. 0. + 8 1 6. 11. + 8 2 -6. -21. + 8 3 -9. 8. + 8 4 -14. -23. + 8 5 9. 15. + 8 6 6. 11. + 8 7 -5. -16. + 8 8 -7. -4. + 9 0 4. 0. + 9 1 9. -20. + 9 2 3. 15. + 9 3 -10. 12. + 9 4 8. -6. + 9 5 -8. -8. + 9 6 -1. 8. + 9 7 10. 5. + 9 8 -2. -8. + 9 9 -8. 3. + 10 0 -3. 0. + 10 1 -6. 1. + 10 2 2. 0. + 10 3 -4. 4. + 10 4 -1. 5. + 10 5 4. -5. + 10 6 2. -1. + 10 7 2. -2. + 10 8 5. 1. + 10 9 1. -2. + 10 10 0. -7. \ No newline at end of file diff --git a/IGRF/old_fortran_code/igrf05.dat b/IGRF/old_fortran_code/igrf05.dat new file mode 100644 index 0000000..f2c6731 --- /dev/null +++ b/IGRF/old_fortran_code/igrf05.dat @@ -0,0 +1,68 @@ + igrf05 + 10 6371.2 2005.0 + 1 0 -29556.8 0.0 + 1 1 -1671.8 5080.0 + 2 0 -2340.5 0.0 + 2 1 3047.0 -2594.9 + 2 2 1656.9 -516.7 + 3 0 1335.7 0.0 + 3 1 -2305.3 -200.4 + 3 2 1246.8 269.3 + 3 3 674.4 -524.5 + 4 0 919.8 0.0 + 4 1 798.2 281.4 + 4 2 211.5 -225.8 + 4 3 -379.5 145.7 + 4 4 100.2 -304.7 + 5 0 -227.6 0.0 + 5 1 354.4 42.7 + 5 2 208.8 179.8 + 5 3 -136.6 -123.0 + 5 4 -168.3 -19.5 + 5 5 -14.1 103.6 + 6 0 72.9 0.0 + 6 1 69.6 -20.2 + 6 2 76.6 54.7 + 6 3 -151.1 63.7 + 6 4 -15.0 -63.4 + 6 5 14.7 0.0 + 6 6 -86.4 50.3 + 7 0 79.8 0.0 + 7 1 -74.4 -61.4 + 7 2 -1.4 -22.5 + 7 3 38.6 6.9 + 7 4 12.3 25.4 + 7 5 9.4 10.9 + 7 6 5.5 -26.4 + 7 7 2.0 -4.8 + 8 0 24.8 0.0 + 8 1 7.7 11.2 + 8 2 -11.4 -21.0 + 8 3 -6.8 9.7 + 8 4 -18.0 -19.8 + 8 5 10.0 16.1 + 8 6 9.4 7.7 + 8 7 -11.4 -12.8 + 8 8 -5.0 -0.1 + 9 0 5.6 0.0 + 9 1 9.8 -20.1 + 9 2 3.6 12.9 + 9 3 -7.0 12.7 + 9 4 5.0 -6.7 + 9 5 -10.8 -8.1 + 9 6 -1.3 8.1 + 9 7 8.7 2.9 + 9 8 -6.7 -7.9 + 9 9 -9.2 5.9 + 10 0 -2.2 0.0 + 10 1 -6.3 2.4 + 10 2 1.6 0.2 + 10 3 -2.5 4.4 + 10 4 -0.1 4.7 + 10 5 3.0 -6.5 + 10 6 0.3 -1.0 + 10 7 2.1 -3.4 + 10 8 3.9 -0.9 + 10 9 -0.1 -2.3 + 10 10 -2.2 -8.0 + \ No newline at end of file diff --git a/IGRF/old_fortran_code/igrf05full.dat b/IGRF/old_fortran_code/igrf05full.dat new file mode 100644 index 0000000..55299e0 --- /dev/null +++ b/IGRF/old_fortran_code/igrf05full.dat @@ -0,0 +1,106 @@ + igrf05 + 10 6371.2 2005.0 + 1 0 -29556.8 0.0 + 1 1 -1671.8 5080.0 + 2 0 -2340.5 0.0 + 2 1 3047.0 -2594.9 + 2 2 1656.9 -516.7 + 3 0 1335.7 0.0 + 3 1 -2305.3 -200.4 + 3 2 1246.8 269.3 + 3 3 674.4 -524.5 + 4 0 919.8 0.0 + 4 1 798.2 281.4 + 4 2 211.5 - 225.8 + 4 3 -379.5 145.7 + 4 4 100.2 -304.7 + 5 0 -227.6 0.0 + 5 1 354.4 42.7 + 5 2 208.8 179.8 + 5 3 -136.6 -123.0 + 5 4 -168.3 -19.5 + 5 5 -14.1 103.6 + 6 0 72.9 0.0 + 6 1 69.6 -20.2 + 6 2 76.6 54.7 + 6 3 -151.1 63.7 + 6 4 -15.0 -63.4 + 6 5 14.7 0.0 + 6 6 -86.4 50.3 + 7 0 79.8 0.0 + 7 1 -74.4 -61.4 + 7 2 -1.4 -22.5 + 7 3 38.6 6.9 + 7 4 12.3 25.4 + 7 5 9.4 10.9 + 7 6 5.5 -26.4 + 7 7 2.0 -4.8 + 8 0 24.8 0.0 + 8 1 7.7 11.2 + 8 2 -11.4 -21.0 + 8 3 -6.8 9.7 + 8 4 -18.0 -19.8 + 8 5 10.0 16.1 + 8 6 9.4 7.7 + 8 7 -11.4 -12.8 + 8 8 -5.0 -0.1 + 9 0 5.6 0.0 + 9 1 9.8 -20.1 + 9 2 3.6 12.9 + 9 3 -7.0 12.7 + 9 4 5.0 -6.7 + 9 5 -10.8 -8.1 + 9 6 -1.3 8.1 + 9 7 8.7 2.9 + 9 8 -6.7 -7.9 + 9 9 -9.2 5.9 + 10 0 -2.2 0.0 + 10 1 -6.3 2.4 + 10 2 1.6 0.2 + 10 3 -2.5 4.4 + 10 4 -0.1 4.7 + 10 5 3.0 -6.5 + 10 6 0.3 -1.0 + 10 7 2.1 -3.4 + 10 8 3.9 -0.9 + 10 9 -0.1 -2.3 + 10 10 -2.2 -8.0 + 11 0 2.9 0.0 + 11 1 -1.6 0.3 + 11 2 -1.7 1.4 + 11 3 1.5 -0.7 + 11 4 -0.2 -2.4 + 11 5 0.2 0.9 + 11 6 -0.7 -0.6 + 11 7 0.5 -2.7 + 11 8 1.8 -1.0 + 11 9 0.1 -1.5 + 11 10 1.0 -2.0 + 11 11 4.1 -1.4 + 12 0 -2.2 0.0 + 12 1 -0.3 -0.5 + 12 2 0.3 0.3 + 12 3 0.9 2.3 + 12 4 -0.4 -2.7 + 12 5 1.0 0.6 + 12 6 -0.4 0.4 + 12 7 0.5 0.0 + 12 8 -0.3 0.0 + 12 9 -0.4 0.3 + 12 10 0.0 -0.8 + 12 11 -0.4 -0.4 + 12 12 0.0 1.0 + 13 0 -0.2 0.0 + 13 1 -0.9 -0.7 + 13 2 0.3 0.3 + 13 3 0.3 1.7 + 13 4 -0.4 -0.5 + 13 5 1.2 -1.0 + 13 6 -0.4 0.0 + 13 7 0.7 0.7 + 13 8 -0.3 0.2 + 13 9 0.4 0.6 + 13 10 -0.1 0.4 + 13 11 0.4 -0.2 + 13 12 -0.1 -0.5 + 13 13 -0.3 -1.0 \ No newline at end of file diff --git a/IGRF/old_fortran_code/igrf05s.dat b/IGRF/old_fortran_code/igrf05s.dat new file mode 100644 index 0000000..96e432e --- /dev/null +++ b/IGRF/old_fortran_code/igrf05s.dat @@ -0,0 +1,46 @@ + igrf05s + 8 6371.2 2010.0 + 1 0 8.8 0. + 1 1 10.8 -21.3 + 2 0 -15.0 0. + 2 1 -6.9 -23.3 + 2 2 -1.0 -14.0 + 3 0 -0.3 0.0 + 3 1 -3.1 5.4 + 3 2 -0.9 -6.5 + 3 3 -6.8 -2.0 + 4 0 -2.5 0. + 4 1 2.8 2.0 + 4 2 -7.1 1.8 + 4 3 5.9 5.6 + 4 4 -3.2 0.0 + 5 0 -2.6 0.0 + 5 1 0.4 0.1 + 5 2 -3.0 1.8 + 5 3 -1.2 2.0 + 5 4 0.2 4.5 + 5 5 -0.6 -1.0 + 6 0 -0.8 0.0 + 6 1 0.2 -0.4 + 6 2 -0.2 -1.9 + 6 3 2.1 -0.4 + 6 4 -2.1 -0.4 + 6 5 -0.4 -0.2 + 6 6 1.3 0.9 + 7 0 -0.4 0.0 + 7 1 0.0 0.8 + 7 2 -0.2 0.4 + 7 3 1.1 0.1 + 7 4 0.6 0.2 + 7 5 0.4 -0.9 + 7 6 -0.5 -0.3 + 7 7 0.9 0.3 + 8 0 -0.2 0.0 + 8 1 0.2 -0.2 + 8 2 -0.2 0.2 + 8 3 0.2 0.2 + 8 4 -0.2 0.4 + 8 5 0.2 0.2 + 8 6 0.5 -0.3 + 8 7 -0.7 0.5 + 8 8 0.5 0.4 \ No newline at end of file diff --git a/IGRF/old_fortran_code/igrf_sub.for b/IGRF/old_fortran_code/igrf_sub.for new file mode 100755 index 0000000..71216df --- /dev/null +++ b/IGRF/old_fortran_code/igrf_sub.for @@ -0,0 +1,908 @@ +C IGRF_SUB.FOR +C********************************************************************* +C SUBROUTINES igrf_sub plus SHELLIG.FOR (see below) * +C********************************************************************* +C********************************************************************* +C +C 11/01/91 SHELLG: lowest starting point for B0 search is 2 +C 1/27/92 Adopted to IGRF-91 coeffcients model +C 2/05/92 Reduce variable names: INTER(P)SHC,EXTRA(P)SHC,INITI(ALI)ZE +C 8/08/95 Updated to IGRF-45-95; new coeff. DGRF90, IGRF95, IGRF95S +C 5/31/00 Updated to IGRF-45-00; new coeff.: IGRF00, IGRF00s +C-Version-mm/dd/yy-Description (Person reporting the correction) +C 2000.01 05/07/01 initial version +C 2000.02 07/11/01 replace feldi(xi,h) by feldi (P. Wilkinson) +C 2000.02 07/11/01 variables EGNR, AGNR,OGNR not used (P. Wilkinson) +c 2000.01 10/28/02 replace TAB/6 blanks, enforce 72/line (D. Simpson) +C 2000.02 11/08/02 change unit for coefficients to 14 +C 2000.03 06/05/03 correct DIPL computation (V. Truhlik) +C 2005.00 04/25/05 CALL FELDI and DO 1111 I=1,7 (Alexey Petrov) +C 2005.01 11/10/05 added igrf_dip and geodip (MLAT) +C 2005.02 11/10/05 updated to IGRF-10 version +C 2006.00 12/21/06 GH2(120) -> GH2(144) +C +C********************************************************************* + + subroutine igrf_sub(xlat,xlong,year,height, + & xl,icode,dip,dec) +c---------------------------------------------------------------- +c INPUT: +c xlat geodatic latitude in degrees +c xlong geodatic longitude in degrees +c year decimal year (year+month/12.0-0.5 or year+day-of-year/365 +c or 366 if leap year) +c height height in km +c OUTPUT: +c xl L value +c icode =1 L is correct; =2 L is not correct; +c =3 an approximation is used +c dip geomagnetic inclination in degrees +c dec geomagnetic declination in degress +c---------------------------------------------------------------- + + INTEGER EGNR,AGNR,OGNR + REAL LATI,LONGI + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C + CALL INITIZE + ibbb=0 + ALOG2=ALOG(2.) + ISTART=1 + lati=xlat + longi=xlong +c +C----------------CALCULATE PROFILES----------------------------------- +c + CALL FELDCOF(YEAR,DIMO) + CALL FELDG(LATI,LONGI,HEIGHT,BNORTH,BEAST,BDOWN,BABS) + CALL SHELLG(LATI,LONGI,HEIGHT,DIMO,XL,ICODE,BAB1) + DIP=ASIN(BDOWN/BABS)/UMR + DEC=ASIN(BEAST/SQRT(BEAST*BEAST+BNORTH*BNORTH))/UMR + RETURN + END +C +C +C SHELLIG.FOR +C +C********************************************************************* +C SUBROUTINES FINDB0, SHELLG, STOER, FELDG, FELDCOF, GETSHC, * +C INTERSHC, EXTRASHC, INITIZE * +C********************************************************************* +C********************************************************************* +C +C + SUBROUTINE FINDB0(STPS,BDEL,VALUE,BEQU,RR0) +C-------------------------------------------------------------------- +C FINDS SMALLEST MAGNETIC FIELD STRENGTH ON FIELD LINE +C +C INPUT: STPS STEP SIZE FOR FIELD LINE TRACING +C COMMON/FIDB0/ +C SP DIPOLE ORIENTED COORDINATES FORM SHELLG; P(1,*), +C P(2,*), P(3,*) CLOSEST TO MAGNETIC EQUATOR +C BDEL REQUIRED ACCURACY = [ B(LAST) - BEQU ] / BEQU +C B(LAST) IS FIELD STRENGTH BEFORE BEQU +C +C OUTPUT: VALUE =.FALSE., IF BEQU IS NOT MINIMAL VALUE ON FIELD LINE +C BEQU MAGNETIC FIELD STRENGTH AT MAGNETIC EQUATOR +C RR0 EQUATORIAL RADIUS NORMALIZED TO EARTH RADIUS +C BDEL FINAL ACHIEVED ACCURACY +C-------------------------------------------------------------------- + DIMENSION P(8,4),SP(3) + LOGICAL VALUE + COMMON/FIDB0/ SP +C + STEP=STPS + IRUN=0 +7777 IRUN=IRUN+1 + IF(IRUN.GT.5) THEN + VALUE=.FALSE. + GOTO 8888 + ENDIF +C*********************FIRST THREE POINTS + P(1,2)=SP(1) + P(2,2)=SP(2) + P(3,2)=SP(3) + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C******************INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1) GOTO 2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,5 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C******************INITIALIZATION +2 STEP12=STEP/12. + VALUE=.TRUE. + BMIN=1.E4 + BOLD=1.E4 +C******************CORRECTOR (FIELD LINE TRACING) + N=0 +5555 P(1,3)=P(1,2)+STEP12*(5.*P(4,3)+8.*P(4,2)-P(4,1)) + N=N+1 + P(2,3)=P(2,2)+STEP12*(5.*P(5,3)+8.*P(5,2)-P(5,1)) +C******************PREDICTOR (FIELD LINE TRACING) + P(1,4)=P(1,3)+STEP12*(23.*P(4,3)-16.*P(4,2)+5.*P(4,1)) + P(2,4)=P(2,3)+STEP12*(23.*P(5,3)-16.*P(5,2)+5.*P(5,1)) + P(3,4)=P(3,3)+STEP + CALL STOER(P(1,4),BQ3,R3) + DO 1111 J=1,3 +C DO 1111 I=1,8 + DO 1111 I=1,7 +1111 P(I,J)=P(I,J+1) + B=SQRT(BQ3) + IF(B.LT.BMIN) BMIN=B + IF(B.LE.BOLD) THEN + BOLD=B + ROLD=1./R3 + SP(1)=P(1,4) + SP(2)=P(2,4) + SP(3)=P(3,4) + GOTO 5555 + ENDIF + IF(BOLD.NE.BMIN) THEN + VALUE=.FALSE. + ENDIF + BDELTA=(B-BOLD)/BOLD + IF(BDELTA.GT.BDEL) THEN + STEP=STEP/10. + GOTO 7777 + ENDIF +8888 RR0=ROLD + BEQU=BOLD + BDEL=BDELTA + RETURN + END +C +C + SUBROUTINE SHELLG(GLAT,GLON,ALT,DIMO,FL,ICODE,B0) +C-------------------------------------------------------------------- +C CALCULATES L-VALUE FOR SPECIFIED GEODAETIC COORDINATES, ALTITUDE +C AND GEMAGNETIC FIELD MODEL. +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTER, INTERNAL NOTE +C NO. 67, 1970. +C G. KLUGE, COMPUTER PHYSICS COMMUNICATIONS 3, 31-35, 1972 +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - USING CORRECT DIPOL MOMENT I.E.,DIFFERENT COMMON/MODEL/ +C - USING IGRF EARTH MAGNETIC FIELD MODELS FROM 1945 TO 1990 +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT SHELLG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT SHELLC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C DIMO DIPOL MOMENT IN GAUSS (NORMALIZED TO EARTH RADIUS) +C +C COMMON +C X(3) NOT USED +C H(144) FIELD MODEL COEFFICIENTS ADJUSTED FOR SHELLG +C----------------------------------------------------------------------- +C OUTPUT: FL L-VALUE +C ICODE =1 NORMAL COMPLETION +C =2 UNPHYSICAL CONJUGATE POINT (FL MEANINGLESS) +C =3 SHELL PARAMETER GREATER THAN LIMIT UP TO +C WHICH ACCURATE CALCULATION IS REQUIRED; +C APPROXIMATION IS USED. +C B0 MAGNETIC FIELD STRENGTH IN GAUSS +C----------------------------------------------------------------------- + DIMENSION V(3),U(3,3),P(8,100),SP(3) + COMMON X(3),H(144) + COMMON/FIDB0/ SP + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- RMIN, RMAX ARE BOUNDARIES FOR IDENTIFICATION OF ICODE=2 AND 3 +C-- STEP IS STEP SIZE FOR FIELD LINE TRACING +C-- STEQ IS STEP SIZE FOR INTEGRATION +C + DATA RMIN,RMAX /0.05,1.01/ + DATA STEP,STEQ /0.20,0.03/ + BEQU=1.E10 +C*****ENTRY POINT SHELLG TO BE USED WITH GEODETIC CO-ORDINATES + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + X(1)=(ALT+AQUAD/D)*ST/ERA + X(3)=(ALT+BQUAD/D)*CT/ERA + RLON=GLON*UMR + X(2)=X(1)*SIN(RLON) + X(1)=X(1)*COS(RLON) + GOTO9 + ENTRY SHELLC(V,FL,B0) +C*****ENTRY POINT SHELLC TO BE USED WITH CARTESIAN CO-ORDINATES + X(1)=V(1) + X(2)=V(2) + X(3)=V(3) +C*****CONVERT TO DIPOL-ORIENTED CO-ORDINATES + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ +9 RQ=1./(X(1)*X(1)+X(2)*X(2)+X(3)*X(3)) + R3H=SQRT(RQ*SQRT(RQ)) + P(1,2)=(X(1)*U(1,1)+X(2)*U(2,1)+X(3)*U(3,1))*R3H + P(2,2)=(X(1)*U(1,2)+X(2)*U(2,2) )*R3H + P(3,2)=(X(1)*U(1,3)+X(2)*U(2,3)+X(3)*U(3,3))*RQ +C*****FIRST THREE POINTS OF FIELD LINE + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + B0=SQRT(BQ2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C*****INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1)GOTO2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,7 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH +2 IF(BQ1.LT.BEQU) THEN + BEQU=BQ1 + IEQU=1 + ENDIF + IF(BQ2.LT.BEQU) THEN + BEQU=BQ2 + IEQU=2 + ENDIF + IF(BQ3.LT.BEQU) THEN + BEQU=BQ3 + IEQU=3 + ENDIF +C*****INITIALIZATION OF INTEGRATION LOOPS + STEP12=STEP/12. + STEP2=STEP+STEP + STEQ=SIGN(STEQ,STEP) + FI=0. + ICODE=1 + ORADIK=0. + OTERM=0. + STP=R2*STEQ + Z=P(3,2)+STP + STP=STP/0.75 + P(8,1)=STEP2*(P(1,1)*P(4,1)+P(2,1)*P(5,1)) + P(8,2)=STEP2*(P(1,2)*P(4,2)+P(2,2)*P(5,2)) +C*****MAIN LOOP (FIELD LINE TRACING) + DO 3 N=3,3333 +C*****CORRECTOR (FIELD LINE TRACING) + P(1,N)=P(1,N-1)+STEP12*(5.*P(4,N)+8.*P(4,N-1)-P(4,N-2)) + P(2,N)=P(2,N-1)+STEP12*(5.*P(5,N)+8.*P(5,N-1)-P(5,N-2)) +C*****PREPARE EXPANSION COEFFICIENTS FOR INTERPOLATION +C*****OF SLOWLY VARYING QUANTITIES + P(8,N)=STEP2*(P(1,N)*P(4,N)+P(2,N)*P(5,N)) + C0=P(1,N-1)**2+P(2,N-1)**2 + C1=P(8,N-1) + C2=(P(8,N)-P(8,N-2))*0.25 + C3=(P(8,N)+P(8,N-2)-C1-C1)/6.0 + D0=P(6,N-1) + D1=(P(6,N)-P(6,N-2))*0.5 + D2=(P(6,N)+P(6,N-2)-D0-D0)*0.5 + E0=P(7,N-1) + E1=(P(7,N)-P(7,N-2))*0.5 + E2=(P(7,N)+P(7,N-2)-E0-E0)*0.5 +C*****INNER LOOP (FOR QUADRATURE) +4 T=(Z-P(3,N-1))/STEP + IF(T.GT.1.)GOTO5 + HLI=0.5*(((C3*T+C2)*T+C1)*T+C0) + ZQ=Z*Z + R=HLI+SQRT(HLI*HLI+ZQ) + IF(R.LE.RMIN)GOTO30 + RQ=R*R + FF=SQRT(1.+3.*ZQ/RQ) + RADIK=B0-((D2*T+D1)*T+D0)*R*RQ*FF + IF(R-RMAX)44,44,45 +45 ICODE=2 + RADIK=RADIK-12.*(R-RMAX)**2 +44 IF(RADIK+RADIK.LE.ORADIK) GOTO 10 + TERM=SQRT(RADIK)*FF*((E2*T+E1)*T+E0)/(RQ+ZQ) + FI=FI+STP*(OTERM+TERM) + ORADIK=RADIK + OTERM=TERM + STP=R*STEQ + Z=Z+STP + GOTO4 +C*****PREDICTOR (FIELD LINE TRACING) +5 P(1,N+1)=P(1,N)+STEP12*(23.*P(4,N)-16.*P(4,N-1)+5.*P(4,N-2)) + P(2,N+1)=P(2,N)+STEP12*(23.*P(5,N)-16.*P(5,N-1)+5.*P(5,N-2)) + P(3,N+1)=P(3,N)+STEP + CALL STOER(P(1,N+1),BQ3,R3) +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH + IF(BQ3.LT.BEQU) THEN + IEQU=N+1 + BEQU=BQ3 + ENDIF +3 CONTINUE +10 IF(IEQU.lt.2) IEQU=2 + SP(1)=P(1,IEQU-1) + SP(2)=P(2,IEQU-1) + SP(3)=P(3,IEQU-1) + IF(ORADIK.LT.1E-15)GOTO11 + FI=FI+STP/0.75*OTERM*ORADIK/(ORADIK-RADIK) +C +C-- The minimal allowable value of FI was changed from 1E-15 to 1E-12, +C-- because 1E-38 is the minimal allowable arg. for ALOG in our envir. +C-- D. Bilitza, Nov 87. +C +11 FI=0.5*ABS(FI)/SQRT(B0)+1E-12 +C +C*****COMPUTE L FROM B AND I. SAME AS CARMEL IN INVAR. +C +C-- Correct dipole moment is used here. D. Bilitza, Nov 87. +C + DIMOB0=DIMO/B0 + arg1=alog(FI) + arg2=alog(DIMOB0) +c arg = FI*FI*FI/DIMOB0 +c if(abs(arg).gt.88.0) arg=88.0 + XX=3*arg1-arg2 + IF(XX.GT.23.0) GOTO 776 + IF(XX.GT.11.7) GOTO 775 + IF(XX.GT.+3.0) GOTO 774 + IF(XX.GT.-3.0) GOTO 773 + IF(XX.GT.-22.) GOTO 772 + 771 GG=3.33338E-1*XX+3.0062102E-1 + GOTO777 + 772 GG=((((((((-8.1537735E-14*XX+8.3232531E-13)*XX+1.0066362E-9)*XX+ + 18.1048663E-8)*XX+3.2916354E-6)*XX+8.2711096E-5)*XX+1.3714667E-3)* + 2XX+1.5017245E-2)*XX+4.3432642E-1)*XX+6.2337691E-1 + GOTO777 + 773 GG=((((((((2.6047023E-10*XX+2.3028767E-9)*XX-2.1997983E-8)*XX- + 15.3977642E-7)*XX-3.3408822E-6)*XX+3.8379917E-5)*XX+1.1784234E-3)* + 2XX+1.4492441E-2)*XX+4.3352788E-1)*XX+6.228644E-1 + GOTO777 + 774 GG=((((((((6.3271665E-10*XX-3.958306E-8)*XX+9.9766148E-07)*XX- + 11.2531932E-5)*XX+7.9451313E-5)*XX-3.2077032E-4)*XX+2.1680398E-3)* + 2XX+1.2817956E-2)*XX+4.3510529E-1)*XX+6.222355E-1 + GOTO777 + 775 GG=(((((2.8212095E-8*XX-3.8049276E-6)*XX+2.170224E-4)*XX-6.7310339 + 1E-3)*XX+1.2038224E-1)*XX-1.8461796E-1)*XX+2.0007187E0 + GOTO777 + 776 GG=XX-3.0460681E0 + 777 FL=EXP(ALOG((1.+EXP(GG))*DIMOB0)/3.0) + RETURN +C*****APPROXIMATION FOR HIGH VALUES OF L. +30 ICODE=3 + T=-P(3,N-1)/STEP + FL=1./(ABS(((C3*T+C2)*T+C1)*T+C0)+1E-15) + RETURN + END +C +C + SUBROUTINE STOER(P,BQ,R) +C******************************************************************* +C* SUBROUTINE USED FOR FIELD LINE TRACING IN SHELLG * +C* CALLS ENTRY POINT FELDI IN GEOMAGNETIC FIELD SUBROUTINE FELDG * +C******************************************************************* + DIMENSION P(7),U(3,3) + COMMON XI(3),H(144) +C*****XM,YM,ZM ARE GEOMAGNETIC CARTESIAN INVERSE CO-ORDINATES + ZM=P(3) + FLI=P(1)*P(1)+P(2)*P(2)+1E-15 + R=0.5*(FLI+SQRT(FLI*FLI+(ZM+ZM)**2)) + RQ=R*R + WR=SQRT(R) + XM=P(1)*WR + YM=P(2)*WR +C*****TRANSFORM TO GEOGRAPHIC CO-ORDINATE SYSTEM + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ + XI(1)=XM*U(1,1)+YM*U(1,2)+ZM*U(1,3) + XI(2)=XM*U(2,1)+YM*U(2,2)+ZM*U(2,3) + XI(3)=XM*U(3,1) +ZM*U(3,3) +C*****COMPUTE DERIVATIVES +C CALL FELDI(XI,H) + CALL FELDI + Q=H(1)/RQ + DX=H(3)+H(3)+Q*XI(1) + DY=H(4)+H(4)+Q*XI(2) + DZ=H(2)+H(2)+Q*XI(3) +C*****TRANSFORM BACK TO GEOMAGNETIC CO-ORDINATE SYSTEM + DXM=U(1,1)*DX+U(2,1)*DY+U(3,1)*DZ + DYM=U(1,2)*DX+U(2,2)*DY + DZM=U(1,3)*DX+U(2,3)*DY+U(3,3)*DZ + DR=(XM*DXM+YM*DYM+ZM*DZM)/R +C*****FORM SLOWLY VARYING EXPRESSIONS + P(4)=(WR*DXM-0.5*P(1)*DR)/(R*DZM) + P(5)=(WR*DYM-0.5*P(2)*DR)/(R*DZM) + DSQ=RQ*(DXM*DXM+DYM*DYM+DZM*DZM) + BQ=DSQ*RQ*RQ + P(6)=SQRT(DSQ/(RQ+3.*ZM*ZM)) + P(7)=P(6)*(RQ+ZM*ZM)/(RQ*DZM) + RETURN + END +C +C + SUBROUTINE FELDG(GLAT,GLON,ALT,BNORTH,BEAST,BDOWN,BABS) +C------------------------------------------------------------------- +C CALCULATES EARTH MAGNETIC FIELD FROM SPHERICAL HARMONICS MODEL +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTRE, INTERNAL NOTE 61, +C 1970. +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - FIELD COEFFICIENTS IN BINARY DATA FILES INSTEAD OF BLOCK DATA +C - CALCULATES DIPOL MOMENT +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT FELDG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT FELDC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C COMMON BLANK AND ENTRY POINT FELDI ARE NEEDED WHEN USED +C IN CONNECTION WITH L-CALCULATION PROGRAM SHELLG. +C +C COMMON /MODEL/ AND /GENER/ +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C AQUAD, BQUAD SQUARE OF MAJOR AND MINOR HALF AXIS FOR +C EARTH ELLIPSOID AS RECOMMENDED BY INTERNATIONAL +C ASTRONOMICAL UNION (6378.160, 6356.775 KM). +C NMAX MAXIMUM ORDER OF SPHERICAL HARMONICS +C TIME YEAR (DECIMAL: 1973.5) FOR WHICH MAGNETIC +C FIELD IS TO BE CALCULATED +C G(M) NORMALIZED FIELD COEFFICIENTS (SEE FELDCOF) +C M=NMAX*(NMAX+2) +C------------------------------------------------------------------------ +C OUTPUT: BABS MAGNETIC FIELD STRENGTH IN GAUSS +C BNORTH, BEAST, BDOWN COMPONENTS OF THE FIELD WITH RESPECT +C TO THE LOCAL GEODETIC COORDINATE SYSTEM, WITH AXIS +C POINTING IN THE TANGENTIAL PLANE TO THE NORTH, EAST +C AND DOWNWARD. +C----------------------------------------------------------------------- + DIMENSION V(3),B(3) + CHARACTER*12 NAME + COMMON XI(3),H(144) + COMMON/MODEL/ NAME,NMAX,TIME,G(144) + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- IS RECORDS ENTRY POINT +C +C*****ENTRY POINT FELDG TO BE USED WITH GEODETIC CO-ORDINATES + IS=1 + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + RLON=GLON*UMR + CP=COS(RLON) + SP=SIN(RLON) + ZZZ=(ALT+BQUAD/D)*CT/ERA + RHO=(ALT+AQUAD/D)*ST/ERA + XXX=RHO*CP + YYY=RHO*SP + GOTO10 + ENTRY FELDC(V,B) +C*****ENTRY POINT FELDC TO BE USED WITH CARTESIAN CO-ORDINATES + IS=2 + XXX=V(1) + YYY=V(2) + ZZZ=V(3) +10 RQ=1./(XXX*XXX+YYY*YYY+ZZZ*ZZZ) + XI(1)=XXX*RQ + XI(2)=YYY*RQ + XI(3)=ZZZ*RQ + GOTO20 + ENTRY FELDI +C*****ENTRY POINT FELDI USED FOR L COMPUTATION + IS=3 +20 IHMAX=NMAX*NMAX+1 + LAST=IHMAX+NMAX+NMAX + IMAX=NMAX+NMAX-1 + DO 8 I=IHMAX,LAST +8 H(I)=G(I) + DO 6 K=1,3,2 + I=IMAX + IH=IHMAX +1 IL=IH-I + F=2./FLOAT(I-K+2) + X=XI(1)*F + Y=XI(2)*F + Z=XI(3)*(F+F) + I=I-2 + IF(I-1)5,4,2 +2 DO 3 M=3,I,2 + H(IL+M+1)=G(IL+M+1)+Z*H(IH+M+1)+X*(H(IH+M+3)-H(IH+M-1)) + A -Y*(H(IH+M+2)+H(IH+M-2)) +3 H(IL+M)=G(IL+M)+Z*H(IH+M)+X*(H(IH+M+2)-H(IH+M-2)) + A +Y*(H(IH+M+3)+H(IH+M-1)) +4 H(IL+2)=G(IL+2)+Z*H(IH+2)+X*H(IH+4)-Y*(H(IH+3)+H(IH)) + H(IL+1)=G(IL+1)+Z*H(IH+1)+Y*H(IH+4)+X*(H(IH+3)-H(IH)) +5 H(IL)=G(IL)+Z*H(IH)+2.*(X*H(IH+1)+Y*H(IH+2)) + IH=IL + IF(I.GE.K)GOTO1 +6 CONTINUE + IF(IS.EQ.3)RETURN + S=.5*H(1)+2.*(H(2)*XI(3)+H(3)*XI(1)+H(4)*XI(2)) + T=(RQ+RQ)*SQRT(RQ) + BXXX=T*(H(3)-S*XXX) + BYYY=T*(H(4)-S*YYY) + BZZZ=T*(H(2)-S*ZZZ) + IF(IS.EQ.2)GOTO7 + BABS=SQRT(BXXX*BXXX+BYYY*BYYY+BZZZ*BZZZ) + BEAST=BYYY*CP-BXXX*SP + BRHO=BYYY*SP+BXXX*CP + BNORTH=BZZZ*ST-BRHO*CT + BDOWN=-BZZZ*CT-BRHO*ST + RETURN +7 B(1)=BXXX + B(2)=BYYY + B(3)=BZZZ + RETURN + END +C +C + SUBROUTINE FELDCOF(YEAR,DIMO) +C------------------------------------------------------------------------ +C DETERMINES COEFFICIENTS AND DIPOL MOMENT FROM IGRF MODELS +C +C INPUT: YEAR DECIMAL YEAR FOR WHICH GEOMAGNETIC FIELD IS TO +C BE CALCULATED +C OUTPUT: DIMO GEOMAGNETIC DIPOL MOMENT IN GAUSS (NORMALIZED +C TO EARTH'S RADIUS) AT THE TIME (YEAR) +C D. BILITZA, NSSDC, GSFC, CODE 633, GREENBELT, MD 20771, +C (301)286-9536 NOV 1987. +C ### updated to IGRF-2000 version -dkb- 5/31/2000 +C ### updated to IGRF-2005 version -dkb- 3/24/2005 +C----------------------------------------------------------------------- + CHARACTER*12 FILMOD, FIL1, FIL2 +C ### FILMOD, DTEMOD arrays +1 + DIMENSION GH1(144),GH2(144),GHA(144),FILMOD(14),DTEMOD(14) + DOUBLE PRECISION X,F0,F + COMMON/MODEL/ FIL1,NMAX,TIME,GH1 + COMMON/GENER/ UMR,ERAD,AQUAD,BQUAD +C ### updated to 2005 + DATA FILMOD /'dgrf45.dat', 'dgrf50.dat', + 1 'dgrf55.dat', 'dgrf60.dat', 'dgrf65.dat', + 2 'dgrf70.dat', 'dgrf75.dat', 'dgrf80.dat', + 3 'dgrf85.dat', 'dgrf90.dat', 'dgrf95.dat', + 4 'dgrf00.dat','igrf05.dat','igrf05s.dat'/ + DATA DTEMOD / 1945., 1950., 1955., 1960., 1965., 1970., + 1 1975., 1980., 1985., 1990., 1995., 2000.,2005.,2010./ +C +C ### numye = numye + 1 ; is number of years represented by IGRF +C + NUMYE=13 +C +C IS=0 FOR SCHMIDT NORMALIZATION IS=1 GAUSS NORMALIZATION +C IU IS INPUT UNIT NUMBER FOR IGRF COEFFICIENT SETS +C + IU = 10 + IS = 0 +C-- DETERMINE IGRF-YEARS FOR INPUT-YEAR + TIME = YEAR + IYEA = INT(YEAR/5.)*5 + L = (IYEA - 1945)/5 + 1 + IF(L.LT.1) L=1 + IF(L.GT.NUMYE) L=NUMYE + DTE1 = DTEMOD(L) + FIL1 = FILMOD(L) + DTE2 = DTEMOD(L+1) + FIL2 = FILMOD(L+1) +C-- GET IGRF COEFFICIENTS FOR THE BOUNDARY YEARS + CALL GETSHC (IU, FIL1, NMAX1, ERAD, GH1, IER) + IF (IER .NE. 0) STOP + CALL GETSHC (IU, FIL2, NMAX2, ERAD, GH2, IER) + IF (IER .NE. 0) STOP +C-- DETERMINE IGRF COEFFICIENTS FOR YEAR + IF (L .LE. NUMYE-1) THEN + CALL INTERSHC (YEAR, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GHA) + ELSE + CALL EXTRASHC (YEAR, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GHA) + ENDIF +C-- DETERMINE MAGNETIC DIPOL MOMENT AND COEFFIECIENTS G + F0=0.D0 + DO 1234 J=1,3 + F = GHA(J) * 1.D-5 + F0 = F0 + F * F +1234 CONTINUE + DIMO = DSQRT(F0) + + GH1(1) = 0.0 + I=2 + F0=1.D-5 + IF(IS.EQ.0) F0=-F0 + SQRT2=SQRT(2.) + + DO 9 N=1,NMAX + X = N + F0 = F0 * X * X / (4.D0 * X - 2.D0) + IF(IS.EQ.0) F0 = F0 * (2.D0 * X - 1.D0) / X + F = F0 * 0.5D0 + IF(IS.EQ.0) F = F * SQRT2 + GH1(I) = GHA(I-1) * F0 + I = I+1 + DO 9 M=1,N + F = F * (X + M) / (X - M + 1.D0) + IF(IS.EQ.0) F = F * DSQRT((X - M + 1.D0) / (X + M)) + GH1(I) = GHA(I-1) * F + GH1(I+1) = GHA(I) * F + I=I+2 +9 CONTINUE + RETURN + END +C +C + SUBROUTINE GETSHC (IU, FSPEC, NMAX, ERAD, GH, IER) + +C =============================================================== +C +C Version 1.01 +C +C Reads spherical harmonic coefficients from the specified +C file into an array. +C +C Input: +C IU - Logical unit number +C FSPEC - File specification +C +C Output: +C NMAX - Maximum degree and order of model +C ERAD - Earth's radius associated with the spherical +C harmonic coefficients, in the same units as +C elevation +C GH - Schmidt quasi-normal internal spherical +C harmonic coefficients +C IER - Error number: = 0, no error +C = -2, records out of order +C = FORTRAN run-time error number +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + CHARACTER FSPEC*(*), FOUT*55 + DIMENSION GH(*) +C --------------------------------------------------------------- +C Open coefficient file. Read past first header record. +C Read degree and order of model and Earth's radius. +C --------------------------------------------------------------- + WRITE(FOUT,667) FSPEC +c 667 FORMAT('/usr/local/etc/httpd/cgi-bin/natasha/IRI/',A12) + 667 FORMAT(A12) + OPEN (IU, FILE=FOUT, STATUS='OLD', IOSTAT=IER, ERR=999) + + READ (IU, *, IOSTAT=IER, ERR=999) + READ (IU, *, IOSTAT=IER, ERR=999) NMAX, ERAD +C --------------------------------------------------------------- +C Read the coefficient file, arranged as follows: +C +C N M G H +C ---------------------- +C / 1 0 GH(1) - +C / 1 1 GH(2) GH(3) +C / 2 0 GH(4) - +C / 2 1 GH(5) GH(6) +C NMAX*(NMAX+3)/2 / 2 2 GH(7) GH(8) +C records \ 3 0 GH(9) - +C \ . . . . +C \ . . . . +C NMAX*(NMAX+2) \ . . . . +C elements in GH \ NMAX NMAX . . +C +C N and M are, respectively, the degree and order of the +C coefficient. +C --------------------------------------------------------------- + + I = 0 + DO 2211 NN = 1, NMAX + DO 2233 MM = 0, NN + READ (IU, *, IOSTAT=IER, ERR=999) N, M, G, H + IF (NN .NE. N .OR. MM .NE. M) THEN + IER = -2 + GOTO 999 + ENDIF + I = I + 1 + GH(I) = G + IF (M .NE. 0) THEN + I = I + 1 + GH(I) = H + ENDIF +2233 CONTINUE +2211 CONTINUE + +999 CLOSE (IU) + + RETURN + END +C +C + SUBROUTINE INTERSHC (DATE, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Interpolates linearly, in time, between two spherical +C harmonic models. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of earlier model +C NMAX1 - Maximum degree and order of earlier model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of earlier model +C DTE2 - Date of later model +C NMAX2 - Maximum degree and order of later model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of later model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly interpolating between the +C coefficients of the earlier model (GH1), at date DTE1, +C and those of the later model (GH2), at date DTE2. If one +C model is smaller than the other, the interpolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) / (DTE2 - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1122 I = K + 1, L +1122 GH(I) = GH1(I) + FACTOR * (-GH1(I)) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1133 I = K + 1, L +1133 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1144 I = 1, K +1144 GH(I) = GH1(I) + FACTOR * (GH2(I) - GH1(I)) + + RETURN + END +C +C + SUBROUTINE EXTRASHC (DATE, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Extrapolates linearly a spherical harmonic model with a +C rate-of-change model. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of base model +C NMAX1 - Maximum degree and order of base model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of base model +C NMAX2 - Maximum degree and order of rate-of-change +C model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of rate-of-change model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly extrapolating the coef- +C ficients of the base model (GH1), at date DTE1, using +C those of the rate-of-change model (GH2), at date DTE2. If +C one model is smaller than the other, the extrapolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1155 I = K + 1, L +1155 GH(I) = GH1(I) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1166 I = K + 1, L +1166 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1177 I = 1, K +1177 GH(I) = GH1(I) + FACTOR * GH2(I) + + RETURN + END +C +C + SUBROUTINE INITIZE +C---------------------------------------------------------------- +C Initializes the parameters in COMMON/GENER/ +C +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C EREQU MAJOR HALF AXIS FOR EARTH ELLIPSOID (6378.160 KM) +C ERPOL MINOR HALF AXIS FOR EARTH ELLIPSOID (6356.775 KM) +C AQUAD SQUARE OF MAJOR HALF AXIS FOR EARTH ELLIPSOID +C BQUAD SQUARE OF MINOR HALF AXIS FOR EARTH ELLIPSOID +C +C ERA, EREQU and ERPOL as recommended by the INTERNATIONAL +C ASTRONOMICAL UNION . +C----------------------------------------------------------------- + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD + ERA=6371.2 + EREQU=6378.16 + ERPOL=6356.775 + AQUAD=EREQU*EREQU + BQUAD=ERPOL*ERPOL + UMR=ATAN(1.0)*4./180. + RETURN + END diff --git a/IGRF/old_fortran_code/shellig.for b/IGRF/old_fortran_code/shellig.for new file mode 100755 index 0000000..72f635f --- /dev/null +++ b/IGRF/old_fortran_code/shellig.for @@ -0,0 +1,852 @@ +C SHELLIG.FOR, Version 2.0, January 1992 +C +C 11/01/91-DKB- SHELLG: lowest starting point for B0 search is 2 +C 1/27/92-DKB- Adopted to IGRF-91 coeffcients model +C 2/05/92-DKB- Reduce variable-names: INTER(P)SHC,EXTRA(P)SHC,INITI(ALI)ZE +C 8/08/95-DKB- Updated to IGRF-45-95; new coeff. DGRF90, IGRF95, IGRF95S +C 5/31/00-DKB- Updated to IGRF-45-00; new coeff.: IGRF00, IGRF00s +C 3/24/05-DKB- Updated to IGRF-45-10; new coeff.: IGRF05, IGRF05s +C +C********************************************************************* +C SUBROUTINES FINDB0, SHELLG, STOER, FELDG, FELDCOF, GETSHC, * +C INTERSHC, EXTRASHC, INITIZE * +C********************************************************************* +C********************************************************************* +C +C + SUBROUTINE FINDB0(STPS,BDEL,VALUE,BEQU,RR0) +C-------------------------------------------------------------------- +C FINDS SMALLEST MAGNETIC FIELD STRENGTH ON FIELD LINE +C +C INPUT: STPS STEP SIZE FOR FIELD LINE TRACING +C COMMON/FIDB0/ +C SP DIPOLE ORIENTED COORDINATES FORM SHELLG; P(1,*), +C P(2,*), P(3,*) CLOSEST TO MAGNETIC EQUATOR +C BDEL REQUIRED ACCURACY = [ B(LAST) - BEQU ] / BEQU +C B(LAST) IS FIELD STRENGTH BEFORE BEQU +C +C OUTPUT: VALUE =.FALSE., IF BEQU IS NOT MINIMAL VALUE ON FIELD LINE +C BEQU MAGNETIC FIELD STRENGTH AT MAGNETIC EQUATOR +C RR0 EQUATORIAL RADIUS NORMALIZED TO EARTH RADIUS +C BDEL FINAL ACHIEVED ACCURACY +C-------------------------------------------------------------------- + DIMENSION P(8,4),SP(3) + LOGICAL VALUE + COMMON/FIDB0/ SP +C + STEP=STPS + IRUN=0 +7777 IRUN=IRUN+1 + IF(IRUN.GT.5) THEN + VALUE=.FALSE. + GOTO 8888 + ENDIF +C*********************FIRST THREE POINTS + P(1,2)=SP(1) + P(2,2)=SP(2) + P(3,2)=SP(3) + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C******************INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1) GOTO 2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,5 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C******************INITIALIZATION +2 STEP12=STEP/12. + VALUE=.TRUE. + BMIN=1.E4 + BOLD=1.E4 +C******************CORRECTOR (FIELD LINE TRACING) + N=0 +5555 P(1,3)=P(1,2)+STEP12*(5.*P(4,3)+8.*P(4,2)-P(4,1)) + N=N+1 + P(2,3)=P(2,2)+STEP12*(5.*P(5,3)+8.*P(5,2)-P(5,1)) +C******************PREDICTOR (FIELD LINE TRACING) + P(1,4)=P(1,3)+STEP12*(23.*P(4,3)-16.*P(4,2)+5.*P(4,1)) + P(2,4)=P(2,3)+STEP12*(23.*P(5,3)-16.*P(5,2)+5.*P(5,1)) + P(3,4)=P(3,3)+STEP + CALL STOER(P(1,4),BQ3,R3) + DO 1111 J=1,3 + DO 1111 I=1,8 +1111 P(I,J)=P(I,J+1) + B=SQRT(BQ3) + IF(B.LT.BMIN) BMIN=B + IF(B.LE.BOLD) THEN + BOLD=B + ROLD=1./R3 + SP(1)=P(1,4) + SP(2)=P(2,4) + SP(3)=P(3,4) + GOTO 5555 + ENDIF + IF(BOLD.NE.BMIN) THEN + VALUE=.FALSE. + ENDIF + BDELTA=(B-BOLD)/BOLD + IF(BDELTA.GT.BDEL) THEN + STEP=STEP/10. + GOTO 7777 + ENDIF +8888 RR0=ROLD + BEQU=BOLD + BDEL=BDELTA + RETURN + END +C +C + SUBROUTINE SHELLG(GLAT,GLON,ALT,DIMO,FL,ICODE,B0) +C-------------------------------------------------------------------- +C CALCULATES L-VALUE FOR SPECIFIED GEODAETIC COORDINATES, ALTITUDE +C AND GEMAGNETIC FIELD MODEL. +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTER, INTERNAL NOTE +C NO. 67, 1970. +C G. KLUGE, COMPUTER PHYSICS COMMUNICATIONS 3, 31-35, 1972 +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - USING CORRECT DIPOL MOMENT I.E.,DIFFERENT COMMON/MODEL/ +C - USING IGRF EARTH MAGNETIC FIELD MODELS FROM 1945 TO 1990 +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT SHELLG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT SHELLC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C DIMO DIPOL MOMENT IN GAUSS (NORMALIZED TO EARTH RADIUS) +C +C COMMON +C X(3) NOT USED +C H(144) FIELD MODEL COEFFICIENTS ADJUSTED FOR SHELLG +C----------------------------------------------------------------------- +C OUTPUT: FL L-VALUE +C ICODE =1 NORMAL COMPLETION +C =2 UNPHYSICAL CONJUGATE POINT (FL MEANINGLESS) +C =3 SHELL PARAMETER GREATER THAN LIMIT UP TO +C WHICH ACCURATE CALCULATION IS REQUIRED; +C APPROXIMATION IS USED. +C B0 MAGNETIC FIELD STRENGTH IN GAUSS +C----------------------------------------------------------------------- + DIMENSION V(3),U(3,3),P(8,100),SP(3) + COMMON X(3),H(144) + COMMON/FIDB0/ SP + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- RMIN, RMAX ARE BOUNDARIES FOR IDENTIFICATION OF ICODE=2 AND 3 +C-- STEP IS STEP SIZE FOR FIELD LINE TRACING +C-- STEQ IS STEP SIZE FOR INTEGRATION +C + DATA RMIN,RMAX /0.05,1.01/ + DATA STEP,STEQ /0.20,0.03/ + BEQU=1.E10 +C +C*****ENTRY POINT SHELLG TO BE USED WITH GEODETIC CO-ORDINATES + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + X(1)=(ALT+AQUAD/D)*ST/ERA + X(3)=(ALT+BQUAD/D)*CT/ERA + RLON=GLON*UMR + X(2)=X(1)*SIN(RLON) + X(1)=X(1)*COS(RLON) + GOTO9 +C +C*****ENTRY POINT SHELLC TO BE USED WITH CARTESIAN CO-ORDINATES + ENTRY SHELLC(V,FL,B0) + X(1)=V(1) + X(2)=V(2) + X(3)=V(3) +C*****CONVERT TO DIPOL-ORIENTED CO-ORDINATES + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ +9 RQ=1./(X(1)*X(1)+X(2)*X(2)+X(3)*X(3)) + R3H=SQRT(RQ*SQRT(RQ)) + P(1,2)=(X(1)*U(1,1)+X(2)*U(2,1)+X(3)*U(3,1))*R3H + P(2,2)=(X(1)*U(1,2)+X(2)*U(2,2) )*R3H + P(3,2)=(X(1)*U(1,3)+X(2)*U(2,3)+X(3)*U(3,3))*RQ +C*****FIRST THREE POINTS OF FIELD LINE + STEP=-SIGN(STEP,P(3,2)) + CALL STOER(P(1,2),BQ2,R2) + B0=SQRT(BQ2) + P(1,3)=P(1,2)+0.5*STEP*P(4,2) + P(2,3)=P(2,2)+0.5*STEP*P(5,2) + P(3,3)=P(3,2)+0.5*STEP + CALL STOER(P(1,3),BQ3,R3) + P(1,1)=P(1,2)-STEP*(2.*P(4,2)-P(4,3)) + P(2,1)=P(2,2)-STEP*(2.*P(5,2)-P(5,3)) + P(3,1)=P(3,2)-STEP + CALL STOER(P(1,1),BQ1,R1) + P(1,3)=P(1,2)+STEP*(20.*P(4,3)-3.*P(4,2)+P(4,1))/18. + P(2,3)=P(2,2)+STEP*(20.*P(5,3)-3.*P(5,2)+P(5,1))/18. + P(3,3)=P(3,2)+STEP + CALL STOER(P(1,3),BQ3,R3) +C*****INVERT SENSE IF REQUIRED + IF(BQ3.LE.BQ1)GOTO2 + STEP=-STEP + R3=R1 + BQ3=BQ1 + DO 1 I=1,7 + ZZ=P(I,1) + P(I,1)=P(I,3) +1 P(I,3)=ZZ +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH +2 IF(BQ1.LT.BEQU) THEN + BEQU=BQ1 + IEQU=1 + ENDIF + IF(BQ2.LT.BEQU) THEN + BEQU=BQ2 + IEQU=2 + ENDIF + IF(BQ3.LT.BEQU) THEN + BEQU=BQ3 + IEQU=3 + ENDIF +C*****INITIALIZATION OF INTEGRATION LOOPS + STEP12=STEP/12. + STEP2=STEP+STEP + STEQ=SIGN(STEQ,STEP) + FI=0. + ICODE=1 + ORADIK=0. + OTERM=0. + STP=R2*STEQ + Z=P(3,2)+STP + STP=STP/0.75 + P(8,1)=STEP2*(P(1,1)*P(4,1)+P(2,1)*P(5,1)) + P(8,2)=STEP2*(P(1,2)*P(4,2)+P(2,2)*P(5,2)) +C*****MAIN LOOP (FIELD LINE TRACING) + DO 3 N=3,3333 +C*****CORRECTOR (FIELD LINE TRACING) + P(1,N)=P(1,N-1)+STEP12*(5.*P(4,N)+8.*P(4,N-1)-P(4,N-2)) + P(2,N)=P(2,N-1)+STEP12*(5.*P(5,N)+8.*P(5,N-1)-P(5,N-2)) +C*****PREPARE EXPANSION COEFFICIENTS FOR INTERPOLATION +C*****OF SLOWLY VARYING QUANTITIES + P(8,N)=STEP2*(P(1,N)*P(4,N)+P(2,N)*P(5,N)) + C0=P(1,N-1)**2+P(2,N-1)**2 + C1=P(8,N-1) + C2=(P(8,N)-P(8,N-2))*0.25 + C3=(P(8,N)+P(8,N-2)-C1-C1)/6.0 + D0=P(6,N-1) + D1=(P(6,N)-P(6,N-2))*0.5 + D2=(P(6,N)+P(6,N-2)-D0-D0)*0.5 + E0=P(7,N-1) + E1=(P(7,N)-P(7,N-2))*0.5 + E2=(P(7,N)+P(7,N-2)-E0-E0)*0.5 +C*****INNER LOOP (FOR QUADRATURE) +4 T=(Z-P(3,N-1))/STEP + IF(T.GT.1.)GOTO5 + HLI=0.5*(((C3*T+C2)*T+C1)*T+C0) + ZQ=Z*Z + R=HLI+SQRT(HLI*HLI+ZQ) + IF(R.LE.RMIN)GOTO30 + RQ=R*R + FF=SQRT(1.+3.*ZQ/RQ) + RADIK=B0-((D2*T+D1)*T+D0)*R*RQ*FF + IF(R-RMAX)44,44,45 +45 ICODE=2 + RADIK=RADIK-12.*(R-RMAX)**2 +44 IF(RADIK+RADIK.LE.ORADIK) GOTO 10 + TERM=SQRT(RADIK)*FF*((E2*T+E1)*T+E0)/(RQ+ZQ) + FI=FI+STP*(OTERM+TERM) + ORADIK=RADIK + OTERM=TERM + STP=R*STEQ + Z=Z+STP + GOTO4 +C*****PREDICTOR (FIELD LINE TRACING) +5 P(1,N+1)=P(1,N)+STEP12*(23.*P(4,N)-16.*P(4,N-1)+5.*P(4,N-2)) + P(2,N+1)=P(2,N)+STEP12*(23.*P(5,N)-16.*P(5,N-1)+5.*P(5,N-2)) + P(3,N+1)=P(3,N)+STEP + CALL STOER(P(1,N+1),BQ3,R3) +C*****SEARCH FOR LOWEST MAGNETIC FIELD STRENGTH + IF(BQ3.LT.BEQU) THEN + IEQU=N+1 + BEQU=BQ3 + ENDIF +3 CONTINUE +10 IF(IEQU.lt.2) IEQU=2 + SP(1)=P(1,IEQU-1) + SP(2)=P(2,IEQU-1) + SP(3)=P(3,IEQU-1) + IF(ORADIK.LT.1E-15)GOTO11 + FI=FI+STP/0.75*OTERM*ORADIK/(ORADIK-RADIK) +C +C-- The minimal allowable value of FI was changed from 1E-15 to 1E-12, +C-- because 1E-38 is the minimal allowable arg. for ALOG in our envir. +C-- D. Bilitza, Nov 87. +C +11 FI=0.5*ABS(FI)/SQRT(B0)+1E-12 +C*****COMPUTE L FROM B AND I. SAME AS CARMEL IN INVAR. +C +C-- Correct dipole moment is used here. D. Bilitza, Nov 87. +C + DIMOB0=DIMO/B0 + arg1=alog(FI) + arg2=alog(DIMOB0) +c arg = FI*FI*FI/DIMOB0 +c if(abs(arg).gt.88.0) arg=88.0 + XX=3*arg1-arg2 + IF(XX.GT.23.0) GOTO 776 + IF(XX.GT.11.7) GOTO 775 + IF(XX.GT.+3.0) GOTO 774 + IF(XX.GT.-3.0) GOTO 773 + IF(XX.GT.-22.) GOTO 772 + 771 GG=3.33338E-1*XX+3.0062102E-1 + GOTO777 + 772 GG=((((((((-8.1537735E-14*XX+8.3232531E-13)*XX+1.0066362E-9)*XX+ + 18.1048663E-8)*XX+3.2916354E-6)*XX+8.2711096E-5)*XX+1.3714667E-3)* + 2XX+1.5017245E-2)*XX+4.3432642E-1)*XX+6.2337691E-1 + GOTO777 + 773 GG=((((((((2.6047023E-10*XX+2.3028767E-9)*XX-2.1997983E-8)*XX- + 15.3977642E-7)*XX-3.3408822E-6)*XX+3.8379917E-5)*XX+1.1784234E-3)* + 2XX+1.4492441E-2)*XX+4.3352788E-1)*XX+6.228644E-1 + GOTO777 + 774 GG=((((((((6.3271665E-10*XX-3.958306E-8)*XX+9.9766148E-07)*XX- + 11.2531932E-5)*XX+7.9451313E-5)*XX-3.2077032E-4)*XX+2.1680398E-3)* + 2XX+1.2817956E-2)*XX+4.3510529E-1)*XX+6.222355E-1 + GOTO777 + 775 GG=(((((2.8212095E-8*XX-3.8049276E-6)*XX+2.170224E-4)*XX-6.7310339 + 1E-3)*XX+1.2038224E-1)*XX-1.8461796E-1)*XX+2.0007187E0 + GOTO777 + 776 GG=XX-3.0460681E0 + 777 FL=EXP(ALOG((1.+EXP(GG))*DIMOB0)/3.0) + RETURN +C*****APPROXIMATION FOR HIGH VALUES OF L. +30 ICODE=3 + T=-P(3,N-1)/STEP + FL=1./(ABS(((C3*T+C2)*T+C1)*T+C0)+1E-15) + RETURN + END +C +C + SUBROUTINE STOER(P,BQ,R) +C******************************************************************* +C* SUBROUTINE USED FOR FIELD LINE TRACING IN SHELLG * +C* CALLS ENTRY POINT FELDI IN GEOMAGNETIC FIELD SUBROUTINE FELDG * +C******************************************************************* + DIMENSION P(7),U(3,3) + COMMON XI(3),H(144) +C*****XM,YM,ZM ARE GEOMAGNETIC CARTESIAN INVERSE CO-ORDINATES + ZM=P(3) + FLI=P(1)*P(1)+P(2)*P(2)+1E-15 + R=0.5*(FLI+SQRT(FLI*FLI+(ZM+ZM)**2)) + RQ=R*R + WR=SQRT(R) + XM=P(1)*WR + YM=P(2)*WR +C*****TRANSFORM TO GEOGRAPHIC CO-ORDINATE SYSTEM + DATA U/ +0.3511737,-0.9148385,-0.1993679, + A +0.9335804,+0.3583680,+0.0000000, + B +0.0714471,-0.1861260,+0.9799247/ + XI(1)=XM*U(1,1)+YM*U(1,2)+ZM*U(1,3) + XI(2)=XM*U(2,1)+YM*U(2,2)+ZM*U(2,3) + XI(3)=XM*U(3,1) +ZM*U(3,3) +C*****COMPUTE DERIVATIVES +c Changed from CALL FELDI(XI,H); XI, H are in COMMON block; results +c are the same; dkb Feb 1998 + CALL FELDI + Q=H(1)/RQ + DX=H(3)+H(3)+Q*XI(1) + DY=H(4)+H(4)+Q*XI(2) + DZ=H(2)+H(2)+Q*XI(3) +C*****TRANSFORM BACK TO GEOMAGNETIC CO-ORDINATE SYSTEM + DXM=U(1,1)*DX+U(2,1)*DY+U(3,1)*DZ + DYM=U(1,2)*DX+U(2,2)*DY + DZM=U(1,3)*DX+U(2,3)*DY+U(3,3)*DZ + DR=(XM*DXM+YM*DYM+ZM*DZM)/R +C*****FORM SLOWLY VARYING EXPRESSIONS + P(4)=(WR*DXM-0.5*P(1)*DR)/(R*DZM) + P(5)=(WR*DYM-0.5*P(2)*DR)/(R*DZM) + DSQ=RQ*(DXM*DXM+DYM*DYM+DZM*DZM) + BQ=DSQ*RQ*RQ + P(6)=SQRT(DSQ/(RQ+3.*ZM*ZM)) + P(7)=P(6)*(RQ+ZM*ZM)/(RQ*DZM) + RETURN + END +C +C + SUBROUTINE FELDG(GLAT,GLON,ALT,BNORTH,BEAST,BDOWN,BABS) +C------------------------------------------------------------------- +C CALCULATES EARTH MAGNETIC FIELD FROM SPHERICAL HARMONICS MODEL +C REF: G. KLUGE, EUROPEAN SPACE OPERATIONS CENTRE, INTERNAL NOTE 61, +C 1970. +C-------------------------------------------------------------------- +C CHANGES (D. BILITZA, NOV 87): +C - FIELD COEFFICIENTS IN BINARY DATA FILES INSTEAD OF BLOCK DATA +C - CALCULATES DIPOL MOMENT +C-------------------------------------------------------------------- +C INPUT: ENTRY POINT FELDG +C GLAT GEODETIC LATITUDE IN DEGREES (NORTH) +C GLON GEODETIC LONGITUDE IN DEGREES (EAST) +C ALT ALTITUDE IN KM ABOVE SEA LEVEL +C +C ENTRY POINT FELDC +C V(3) CARTESIAN COORDINATES IN EARTH RADII (6371.2 KM) +C X-AXIS POINTING TO EQUATOR AT 0 LONGITUDE +C Y-AXIS POINTING TO EQUATOR AT 90 LONG. +C Z-AXIS POINTING TO NORTH POLE +C +C COMMON BLANK AND ENTRY POINT FELDI ARE NEEDED WHEN USED +C IN CONNECTION WITH L-CALCULATION PROGRAM SHELLG. +C +C COMMON /MODEL/ AND /GENER/ +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C AQUAD, BQUAD SQUARE OF MAJOR AND MINOR HALF AXIS FOR +C EARTH ELLIPSOID AS RECOMMENDED BY INTERNATIONAL +C ASTRONOMICAL UNION (6378.160, 6356.775 KM). +C NMAX MAXIMUM ORDER OF SPHERICAL HARMONICS +C TIME YEAR (DECIMAL: 1973.5) FOR WHICH MAGNETIC +C FIELD IS TO BE CALCULATED +C G(M) NORMALIZED FIELD COEFFICIENTS (SEE FELDCOF) +C M=NMAX*(NMAX+2) +C------------------------------------------------------------------------ +C OUTPUT: BABS MAGNETIC FIELD STRENGTH IN GAUSS +C BNORTH, BEAST, BDOWN COMPONENTS OF THE FIELD WITH RESPECT +C TO THE LOCAL GEODETIC COORDINATE SYSTEM, WITH AXIS +C POINTING IN THE TANGENTIAL PLANE TO THE NORTH, EAST +C AND DOWNWARD. +C----------------------------------------------------------------------- + DIMENSION V(3),B(3) + CHARACTER*12 NAME + COMMON XI(3),H(144) + COMMON/MODEL/ NAME,NMAX,TIME,G(144) + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD +C +C-- IS RECORDS ENTRY POINT +C +C*****ENTRY POINT FELDG TO BE USED WITH GEODETIC CO-ORDINATES + IS=1 + RLAT=GLAT*UMR + CT=SIN(RLAT) + ST=COS(RLAT) + D=SQRT(AQUAD-(AQUAD-BQUAD)*CT*CT) + RLON=GLON*UMR + CP=COS(RLON) + SP=SIN(RLON) + ZZZ=(ALT+BQUAD/D)*CT/ERA + RHO=(ALT+AQUAD/D)*ST/ERA + XXX=RHO*CP + YYY=RHO*SP + GOTO10 +C +C*****ENTRY POINT FELDC TO BE USED WITH CARTESIAN CO-ORDINATES + ENTRY FELDC(V,B) + IS=2 + XXX=V(1) + YYY=V(2) + ZZZ=V(3) +10 RQ=1./(XXX*XXX+YYY*YYY+ZZZ*ZZZ) + XI(1)=XXX*RQ + XI(2)=YYY*RQ + XI(3)=ZZZ*RQ + GOTO20 +C +C*****ENTRY POINT FELDI USED FOR L COMPUTATION + ENTRY FELDI + IS=3 +20 IHMAX=NMAX*NMAX+1 + LAST=IHMAX+NMAX+NMAX + IMAX=NMAX+NMAX-1 + DO 8 I=IHMAX,LAST +8 H(I)=G(I) + DO 6 K=1,3,2 + I=IMAX + IH=IHMAX +1 IL=IH-I + F=2./FLOAT(I-K+2) + X=XI(1)*F + Y=XI(2)*F + Z=XI(3)*(F+F) + I=I-2 + IF(I-1)5,4,2 +2 DO 3 M=3,I,2 + H(IL+M+1)=G(IL+M+1)+Z*H(IH+M+1)+X*(H(IH+M+3)-H(IH+M-1)) + A -Y*(H(IH+M+2)+H(IH+M-2)) +3 H(IL+M)=G(IL+M)+Z*H(IH+M)+X*(H(IH+M+2)-H(IH+M-2)) + A +Y*(H(IH+M+3)+H(IH+M-1)) +4 H(IL+2)=G(IL+2)+Z*H(IH+2)+X*H(IH+4)-Y*(H(IH+3)+H(IH)) + H(IL+1)=G(IL+1)+Z*H(IH+1)+Y*H(IH+4)+X*(H(IH+3)-H(IH)) +5 H(IL)=G(IL)+Z*H(IH)+2.*(X*H(IH+1)+Y*H(IH+2)) + IH=IL + IF(I.GE.K)GOTO1 +6 CONTINUE + IF(IS.EQ.3)RETURN + S=.5*H(1)+2.*(H(2)*XI(3)+H(3)*XI(1)+H(4)*XI(2)) + T=(RQ+RQ)*SQRT(RQ) + BXXX=T*(H(3)-S*XXX) + BYYY=T*(H(4)-S*YYY) + BZZZ=T*(H(2)-S*ZZZ) + IF(IS.EQ.2)GOTO7 + BABS=SQRT(BXXX*BXXX+BYYY*BYYY+BZZZ*BZZZ) + BEAST=BYYY*CP-BXXX*SP + BRHO=BYYY*SP+BXXX*CP + BNORTH=BZZZ*ST-BRHO*CT + BDOWN=-BZZZ*CT-BRHO*ST + RETURN +7 B(1)=BXXX + B(2)=BYYY + B(3)=BZZZ + RETURN + END +C +C + SUBROUTINE FELDCOF(YEAR,DIMO) +C------------------------------------------------------------------------ +C DETERMINES COEFFICIENTS AND DIPOL MOMENT FROM IGRF MODELS +C +C INPUT: YEAR DECIMAL YEAR FOR WHICH GEOMAGNETIC FIELD IS TO +C BE CALCULATED (e.g.:1995.5 for day 185 of 1995) +C OUTPUT: DIMO GEOMAGNETIC DIPOL MOMENT IN GAUSS (NORMALIZED +C TO EARTH'S RADIUS) AT THE TIME (YEAR) +C D. BILITZA, NSSDC, GSFC, CODE 633, GREENBELT, MD 20771, +C (301)286-9536 NOV 1987. +C -corrected for 2000 update - dkb- 5/31/2000 +C ### updated to IGRF-2000 version -dkb- 5/31/2000 +C ### updated to IGRF-2005 version -dkb- 3/24/2000 +C----------------------------------------------------------------------- + CHARACTER*12 FILMOD, FIL1, FIL2 +C ### FILMOD, DTEMOD arrays +1 + DIMENSION GH1(144),GH2(120),GHA(144),FILMOD(14),DTEMOD(14) + DOUBLE PRECISION X,F0,F + COMMON/MODEL/ FIL1,NMAX,TIME,GH1 + COMMON/GENER/ UMR,ERAD,AQUAD,BQUAD +C ### changed to conform with IGRF 45-95, also FILMOD, DTEMOD arrays +1 + DATA FILMOD /'dgrf45.dat', 'dgrf50.dat', + 1 'dgrf55.dat', 'dgrf60.dat', 'dgrf65.dat', + 2 'dgrf70.dat', 'dgrf75.dat', 'dgrf80.dat', + 3 'dgrf85.dat', 'dgrf90.dat', 'dgrf95.dat', + 4 'dgrf00.dat','igrf05.dat','igrf05s.dat'/ + DATA DTEMOD / 1945., 1950., 1955., 1960., 1965., 1970., + 1 1975., 1980., 1985., 1990., 1995., 2000.,2005.,2010./ +C +C ### numye is number of 5-year priods represented by IGRF +C + NUMYE=13 +C +C IS=0 FOR SCHMIDT NORMALIZATION IS=1 GAUSS NORMALIZATION +C IU IS INPUT UNIT NUMBER FOR IGRF COEFFICIENT SETS +C + IU = 10 + IS = 0 +C-- DETERMINE IGRF-YEARS FOR INPUT-YEAR + TIME = YEAR + IYEA = INT(YEAR/5.)*5 + L = (IYEA - 1945)/5 + 1 + IF(L.LT.1) L=1 + IF(L.GT.NUMYE) L=NUMYE + DTE1 = DTEMOD(L) + FIL1 = FILMOD(L) + DTE2 = DTEMOD(L+1) + FIL2 = FILMOD(L+1) +C-- GET IGRF COEFFICIENTS FOR THE BOUNDARY YEARS + CALL GETSHC (IU, FIL1, NMAX1, ERAD, GH1, IER) + IF (IER .NE. 0) STOP + CALL GETSHC (IU, FIL2, NMAX2, ERAD, GH2, IER) + IF (IER .NE. 0) STOP +C-- DETERMINE IGRF COEFFICIENTS FOR YEAR + IF (L .LE. NUMYE-1) THEN + CALL INTERSHC (YEAR, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GHA) + ELSE + CALL EXTRASHC (YEAR, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GHA) + ENDIF +C-- DETERMINE MAGNETIC DIPOL MOMENT AND COEFFIECIENTS G + F0=0.D0 + DO 1234 J=1,3 + F = GHA(J) * 1.D-5 + F0 = F0 + F * F +1234 CONTINUE + DIMO = DSQRT(F0) + + GH1(1) = 0.0 + I=2 + F0=1.D-5 + IF(IS.EQ.0) F0=-F0 + SQRT2=SQRT(2.) + + DO 9 N=1,NMAX + X = N + F0 = F0 * X * X / (4.D0 * X - 2.D0) + IF(IS.EQ.0) F0 = F0 * (2.D0 * X - 1.D0) / X + F = F0 * 0.5D0 + IF(IS.EQ.0) F = F * SQRT2 + GH1(I) = GHA(I-1) * F0 + I = I+1 + DO 9 M=1,N + F = F * (X + M) / (X - M + 1.D0) + IF(IS.EQ.0) F = F * DSQRT((X - M + 1.D0) / (X + M)) + GH1(I) = GHA(I-1) * F + GH1(I+1) = GHA(I) * F + I=I+2 +9 CONTINUE + RETURN + END +C +C + SUBROUTINE GETSHC (IU, FSPEC, NMAX, ERAD, GH, IER) + +C =============================================================== +C +C Version 1.01 +C +C Reads spherical harmonic coefficients from the specified +C file into an array. +C +C Input: +C IU - Logical unit number +C FSPEC - File specification +C +C Output: +C NMAX - Maximum degree and order of model +C ERAD - Earth's radius associated with the spherical +C harmonic coefficients, in the same units as +C elevation +C GH - Schmidt quasi-normal internal spherical +C harmonic coefficients +C IER - Error number: = 0, no error +C = -2, records out of order +C = FORTRAN run-time error number +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + CHARACTER FSPEC*(*) + DIMENSION GH(*) + +C --------------------------------------------------------------- +C Open coefficient file. Read past first header record. +C Read degree and order of model and Earth's radius. +C --------------------------------------------------------------- + OPEN (IU, FILE=FSPEC, STATUS='OLD', IOSTAT=IER, ERR=999) + READ (IU, *, IOSTAT=IER, ERR=999) + READ (IU, *, IOSTAT=IER, ERR=999) NMAX, ERAD +C --------------------------------------------------------------- +C Read the coefficient file, arranged as follows: +C +C N M G H +C ---------------------- +C / 1 0 GH(1) - +C / 1 1 GH(2) GH(3) +C / 2 0 GH(4) - +C / 2 1 GH(5) GH(6) +C NMAX*(NMAX+3)/2 / 2 2 GH(7) GH(8) +C records \ 3 0 GH(9) - +C \ . . . . +C \ . . . . +C NMAX*(NMAX+2) \ . . . . +C elements in GH \ NMAX NMAX . . +C +C N and M are, respectively, the degree and order of the +C coefficient. +C --------------------------------------------------------------- + + I = 0 + DO 2211 NN = 1, NMAX + DO 2233 MM = 0, NN + READ (IU, *, IOSTAT=IER, ERR=999) N, M, G, H + IF (NN .NE. N .OR. MM .NE. M) THEN + IER = -2 + GOTO 999 + ENDIF + I = I + 1 + GH(I) = G + IF (M .NE. 0) THEN + I = I + 1 + GH(I) = H + ENDIF +2233 CONTINUE +2211 CONTINUE + +999 CLOSE (IU) + + RETURN + END +C +C + SUBROUTINE INTERSHC (DATE, DTE1, NMAX1, GH1, DTE2, + 1 NMAX2, GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Interpolates linearly, in time, between two spherical +C harmonic models. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of earlier model +C NMAX1 - Maximum degree and order of earlier model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of earlier model +C DTE2 - Date of later model +C NMAX2 - Maximum degree and order of later model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of later model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly interpolating between the +C coefficients of the earlier model (GH1), at date DTE1, +C and those of the later model (GH2), at date DTE2. If one +C model is smaller than the other, the interpolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) / (DTE2 - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1122 I = K + 1, L +1122 GH(I) = GH1(I) + FACTOR * (-GH1(I)) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1133 I = K + 1, L +1133 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1144 I = 1, K +1144 GH(I) = GH1(I) + FACTOR * (GH2(I) - GH1(I)) + + RETURN + END +C +C + SUBROUTINE EXTRASHC (DATE, DTE1, NMAX1, GH1, NMAX2, + 1 GH2, NMAX, GH) + +C =============================================================== +C +C Version 1.01 +C +C Extrapolates linearly a spherical harmonic model with a +C rate-of-change model. +C +C Input: +C DATE - Date of resulting model (in decimal year) +C DTE1 - Date of base model +C NMAX1 - Maximum degree and order of base model +C GH1 - Schmidt quasi-normal internal spherical +C harmonic coefficients of base model +C NMAX2 - Maximum degree and order of rate-of-change +C model +C GH2 - Schmidt quasi-normal internal spherical +C harmonic coefficients of rate-of-change model +C +C Output: +C GH - Coefficients of resulting model +C NMAX - Maximum degree and order of resulting model +C +C A. Zunde +C USGS, MS 964, Box 25046 Federal Center, Denver, CO 80225 +C +C =============================================================== + + DIMENSION GH1(*), GH2(*), GH(*) + +C --------------------------------------------------------------- +C The coefficients (GH) of the resulting model, at date +C DATE, are computed by linearly extrapolating the coef- +C ficients of the base model (GH1), at date DTE1, using +C those of the rate-of-change model (GH2), at date DTE2. If +C one model is smaller than the other, the extrapolation is +C performed with the missing coefficients assumed to be 0. +C --------------------------------------------------------------- + + FACTOR = (DATE - DTE1) + + IF (NMAX1 .EQ. NMAX2) THEN + K = NMAX1 * (NMAX1 + 2) + NMAX = NMAX1 + ELSE IF (NMAX1 .GT. NMAX2) THEN + K = NMAX2 * (NMAX2 + 2) + L = NMAX1 * (NMAX1 + 2) + DO 1155 I = K + 1, L +1155 GH(I) = GH1(I) + NMAX = NMAX1 + ELSE + K = NMAX1 * (NMAX1 + 2) + L = NMAX2 * (NMAX2 + 2) + DO 1166 I = K + 1, L +1166 GH(I) = FACTOR * GH2(I) + NMAX = NMAX2 + ENDIF + + DO 1177 I = 1, K +1177 GH(I) = GH1(I) + FACTOR * GH2(I) + + RETURN + END +C +C + SUBROUTINE INITIZE +C---------------------------------------------------------------- +C Initializes the parameters in COMMON/GENER/ +C +C UMR = ATAN(1.0)*4./180. *UMR= +C ERA EARTH RADIUS FOR NORMALIZATION OF CARTESIAN +C COORDINATES (6371.2 KM) +C EREQU MAJOR HALF AXIS FOR EARTH ELLIPSOID (6378.160 KM) +C ERPOL MINOR HALF AXIS FOR EARTH ELLIPSOID (6356.775 KM) +C AQUAD SQUARE OF MAJOR HALF AXIS FOR EARTH ELLIPSOID +C BQUAD SQUARE OF MINOR HALF AXIS FOR EARTH ELLIPSOID +C +C ERA, EREQU and ERPOL as recommended by the INTERNATIONAL +C ASTRONOMICAL UNION . +C----------------------------------------------------------------- + COMMON/GENER/ UMR,ERA,AQUAD,BQUAD + ERA=6371.2 + EREQU=6378.16 + ERPOL=6356.775 + AQUAD=EREQU*EREQU + BQUAD=ERPOL*ERPOL + UMR=ATAN(1.0)*4./180. + RETURN + END diff --git a/IGRF/old_fortran_code/update.txt b/IGRF/old_fortran_code/update.txt new file mode 100644 index 0000000..c9fb794 --- /dev/null +++ b/IGRF/old_fortran_code/update.txt @@ -0,0 +1,4 @@ +This is the source code of the 10th generation IGRF model (from 2005) +more recent generation models will be posted separately. + +Lutz Rastaetter - Community Coordinated Modeling Center (2018/09/17) diff --git a/IGRF/old_matlab_igrf/Contributions.pdf b/IGRF/old_matlab_igrf/Contributions.pdf new file mode 100644 index 0000000000000000000000000000000000000000..59d1de34506d897efc5670ee4b1308a1638dafed GIT binary patch literal 424614 zcmY!laB^%&OEB1w#d1eSZZ* zQ!@o#eGi3b1w&&?a|J^~a|?x7kU|9$BO_xYkff`EnYp=zr2?JB%$14basYTNtB8NGS)jSa#L(OT-7O|YhNkFYZ(?L@iS8B?V>68KGchr+#Bhs=ktKS1 zF)=kYL>DtNF)&8A*UZ$=5Zyd8Q$u6)I5IOcGC~g*GczL-4D-y4jnMsTW@ci5uGavZ z`_R(8k*O(?x{{*A%$(FBUK<-;{ou^1R0TszV_tpFytI4;LlX-H1BD<3Uj3l_{1OF2 zQ1pPg0Y#~0;LK_a%E+EB(KePz1}SF7CdO$7X32@Erbz~7CI+S^$!1BWh6bid=B9Qw zX-1Z&X=X;LX-1Z5sYVvY#%TtYDTc`@=84G`W)=qKcCoy6cD%(UiA5#g{A<9gs_N?R z#tX{-yb!BFkFe56_B}u{1 z!~`5N`W~q{WeSF%_)!Q_u(MOpcg;)APsz+n2dfQmadXK}h6@>j$`*(^kmdR=jtUwO z6ATnW(i997(iJq3%RWO;dV>|R`oRhomL>}NVW7g)QbFG>Gp8iANI~B%C$S{eB{exe zB~?M+Cp9m&IN=?k=^NcO6O~uy4cXzt||Dh7U@AU6|=YQ|X|FoBZL5<-};sHj6Os1(1@_U3|;`VnQ$DT^IgUoLjnn)_(PTu^>C$f7Um&r@6HImiOL|ym(xT?n3d@`xH?^D+53(KPx_?EnR`ATYE!@;CYmbxFb zL}DsmpFPc~=5C@^qr4_GyW@KD#1%#s1||{*?#Auc7wJ2)sKrh9N|#Mv+{&wJ8+ZTu z{lsYb(L0wrdXKcb>uc8jYY5l-oY5?`(8Jb1LaNAXjTz4^-MwY)TW()THE;@2dh_b_ z@w;A1GM%eTl@^8_f8F!)Vq=2hfjb?MRZlj>xgSV^UJHQmU=6XWNkmWz~92@$RdMFNzWF} zwc2}0Rz}8Rim`}VLi(0h0y;-C-yPhwn@25q@sYIBFSnLXTeSVY@P}Vh__Tf4ZmaRi zsWtpD%5bTy+kRZSS*LLY|28h;#~bW7gx@{(Syo(s#gwB(*5~4PtO%M{^>3-T-}bHZ zrg)q`m3n?&_1m3o;*(UB5nle4JV}bJ@$BY0ETc)v?QY7G|Ry_v_D}XKu0F>o95ZlW*Ue+4txEFDfwj`OwK~u5!5N zq@aM!CnHZdJ#J;)xO=zzq|>_#?%$og&zkr1J>Q2vzI^%ecII!1wzCP_(|;U`;k#F4 z$#eSd{$P$!@Y-TNge$y}zq7J8@$~&D;7K(H%z`6lXM5%f>uDDqqB7)2T9X zZrAIlFIT!;E|+PT62vfP26F;W!#2$Z8B68~ydPNRALmzN65c+;Typ-E<7#t+Yc3q~ zR%l?b{%XH6DAePyINLRu@b(`P{eB;2i~5@HXPO_oHi7Mn%g?I;ZdTLT;@JY86_zb? zE4K<iQpY9~>Rk`HbkK99Sc^l=5uvD)6#w(dV$u4UvQu`?*}@Q&rXuFsnG^PcyggIlMD6y?>- zTlI56VlL~N{ygSY_ab+PU994&nHD784hv?v)= zLYtaH#hml=N>cMmK!vQK8Kf*VG&2KB8k#|B9Yb>i2;bZYLR&!9fm%QcK?;VTnp`0W zTuA$-rer2M?Dj1-&Hx0o~1bG--(*zXd zCkLmNC`2ph2e`N?=!c|Mlz@$e*9UHf3WjDNOM?{j-Ha3rEg-JdcQaNnG`9r199-DD zR+P90gDnJAC+@+93WgRCX?^!#kUog7L25x57XGFnVW@LpWq!1RzGJYnr>BJ}tlUSg z1Y+UUfU%`1s7``c0T$Mw*3Pk}?!NY_I?g^>TAJy_4jCnmhSpBODkiFhuAydW?v`mL zI#$Idp5dzc-YE$I+WLm2$-0Gpo;t4fso7j<9_qI7URJur0j5SdkxmZE3C0021y1%M z2{{>wrpek_iDtGjc}mfV#@?o}d5OV3S;i`wxyoJvc^TfRnyKd2T$*X7W+sl>PT^Up zUU_<^u_c+w1)dQu$zHMErl}q}zOL40PJX$D&MHY(u|esn20^|Sw(7?DVOi;F1@SH= zd9hr&F zN{X%qA%?y|(K^abnk5CnTy_y*>3)8BAw>qxsR54G?uBN>$!=-hdA6A)#g@k54mLTl zj#g@3Vcu>wiJm5kz8Ti8%Fgl5DVf%)F^=BGDtcVb>1wf&4!ZUkie|a0773|-{<%5o zN?B>~;nsF3PFdmlKCuqTv6<1nC9zr#i3vujy1r_qiE4_*2|Drl33YZ@GMXtUF+d}l zS09q2K#9yHwK%ybv!EouNP$=1u{ar&x6BPq6?pZX6AL_2Gt)Cl6hIAoUVV^CkgTqe zv9SU#s9}&^tN?1DfsAp2fX z3^1`YPyk_G5P^(gE&_?c*!XB(P!|rL0(3bGOLGNeJ@7CvH8D{zH!xQ~*FcC5_5w(e ziLt2y$Pf?>=35$o`5-n3n;M!c7?~R>SQwgt#bI8AxWK{?Vl#|3G9%hG5Ce?NAO;wj zfkPH#Be5960Ae-5)QuWorZBK!02*FGbhXT2tq-Tf;#5%4q@eE%E!;pnP+18rRSm%< zFQ}Irk{_Cv3GPT4f~(yi)RqC*NVF0RZXvI}OJ-VHYEfz)sG$?BU~HtIUtExwoT^}A zuApC>lUSUgpkI|*l&_$lpO>njUs9g0pkI4qhK803`sE6S#>NWzsd*_N2gRa!5L9eK zJxFR>12iaOsGuK=Qj|NRH9x|G44pE)l+`pW!>qGYBEkxad}0zbv^8Ax%o1&*V~lfh z{L*ao^rG|=3KNwq!}Sb&bYgNNLyf{x)3Qu0bGdYa4Sh|toxQEHoWim^O6+3X3Ic;d zjT}6)>=N?xd?K7R!*e~=Q#9>$Y+Q5Av}5yw-Lw*HbVKw@6V$^~+|<*#3d2(hGcwhT zlv9<{tUV)qRkG4zqnuJa0@PentiqkFN)3#C@=LXYHFYh547}WQT#dr=wLOgTY~v!` z4IK)KW4K~fA|lg$w4I$2lAN-wlnU*=!V3rw}lJo6$={B+{=tusBjbPI}o?1HlVRjf5s)s3UV9MpWYQhY1}Rb6~^jdILY z?1PeZ^z-B6v@}CK?E-=$a=a6*RP|Nk)AizYywd`*1G!A|HMO0!9bJ86Ra|1NRK0b~ z3@z1ClAP1^ilamA42@G#tu@V4ob4Q(e650Ytu3;Bm2Gv^V->B^^$mj3O^SlJOat9Q zGZf7=^0XB#RIOAM!y|k>g0cgOGE9Sv(jvT^tz5Lsb&74Qm2@5L=ZS%91Rphe4LXMwH;g?oC0&Al{DPKgDq6_ zio)_@tgjr4L#f^vdV&E4Fz3>;JRogzX*vhCw?V*LWu zQ?v@R9XvdeRT83YO`?kO6EefitgJNLG+iCtRjtbT!S<ER2|dJJ@TXUBiy|+qih26f~+DPi%gYM zbV?PuR3o)@v%P}MLhQ|gQ`3`zqmptXywhDW!?OIHQ#74?EMoHAoWdMJY|=}jv$XWB z0$g%*oII7hl>!PJea$nhBDkV`)iOO2QuIPRvrKYLRXsAbjS>=yi|mu_i?hg8eOBvWo+?6U;oljQy3uO>ND%G>fcqL!!)7QjL?+BF%#x9bF2e zjr8Ku4MPol9Aa{G-BU7?eM=&=oRmx4qT_v%%)`CH%vGit=LPjB@fL0!vboqD(A& zjf33Xqs{%D^KBwBqKb0eOdPDzLL*b1%>xXq+{4_X0-YSS^R!Yz9g2MY>@%`b^tke3 zlT}@GbWNj;GLt-%%yr$IgCoMd(~LsBgNx$4{i2NX%zV-nJrYti(jzm?LjBS-&5UCc zRl|JzL%ei6?DRvp{FJ@ojAAS@3|!&@i~^i<{gnfg1C^pYRGqy1HMR57qa%H75?!(a z;)CpiTvQChLsfFzP5liFRGfoNvn;~Z)wn`cyt6GWQWET(!##qG?2QWS@)dQ=BfR}w z{ZdN2{gsrBLyUB_ZBlF_EmBpSb!;t_?6Ng;Rb%o@k{#01({r7;GCe&COf1};jaAcq zGeUe~qy2N-6je&CL(No8v~!~))KhYE3*2(E>{7#H(xW}I^9&LS5~89!?A)?TZLLe4 zthw~;5^VHCRT5oIqFka4JaXObLcQXAT`j{5{Y-3qJ#C6S)3tn@L#+KYU0gGYLOrsI zqEwS?tgMZlqtpWwfdlT7vO4Y=%+6|+s!m9vvM_)-HWusBcokC zT;2Q)RXoy)ynMXUJpywA^IeU#HA6#Pe5|~awcJd-!c#3%%`M}@O4QA{bYg7n9sFa8 zazgyG6Z|4oN|ka-3iA^qHM4w^&D=c-Ts&RWO)}#RbQ1m2^3`NZdl!}W>ql*kn{Zy5Tth7u#GVHU>(;Wg-Oe50$Tzu0qLt~w6 z)h!|u!c**0v{LN#y-d}UY^-&;@`E#SW37$!b1Y+W^YSgzj7r=xbD{%uVp4K*v}}_7 z^zA~DHNuO1^D;F`Yz?FB{dE1c3rgIz(+yKx)e{v%Lb+T+w3ID;HSK+(^Nb8_6^(TQ zGF)Sdw7k*{qc!pj3WFkD98^8RvpfyG^gM#hyb?0ABMsCe3%&FUtla{Yl?u$cqMX8% z3vKf3^xZ8(Q|+|^G~FXZEK)OLB7@Ch3i3lrf>Z+ZqZE^3lp=lIqxG_5G#&LV?9%hi z6Z4f4oYY-ZJ-EW`9bE(Tl}kd4^(-`^;^Net9KzD{veR;6;m`(bJfj_i?lRCJdB;P9i0@TEV3M9 zgRE4vG|Xc&t?aeZTuSs)^fLYZRGbQIbkxm?wX@RPT+DR~jJXU#!|lx!os9E}^NS-) zB7B@<{Zk_1%=7(JGF%*T9UZc@O00eC3hj&&%hE)B9t-;^ukJ=?6LyWQ!NbhY!hOYgcH2gJ;v;(~|wUc6({)Vp;tia2@~m^+9Jw4!v_pKgtPQN4 zo#Ub-L!IM{%~ka^QVlYFjFr+9^R2Qi^>UI7EizTLbK})REe#^oLoD_6RIQ>*?e){b z9ZiF|3N&3c@^tN!UE@uiyi0;?lrnRpGh$-&to+qtUHzRxi*-Xi)s=$7Orx~ZlZbs(=2@5T#KSh_0-*rO1bj%+*5M=3-S$>ysYAsa|{)AOatPwUA67>f;6mL)k0&` z3N2DI3N74y5_R)pvm$iToa{`kl#>H3W8B@$gCae-Oe~CxybEGN+|1m40vwbRopbX7 z3)MrT+>FE2VsmWmRXtPPoE!>`vn<_pv@)H1v^8`z9ZMs;Q>|lE(%nsU6Sxv=3;j)! zQr*L|gMHndlJbpo3R86ogLU%_tOBBq4BT~7Tum&p5-n0v%q>$bY*Snk!*Ysrw6k4( zopMz}4WeDS46-zmGo7uh{KLZoOj6ukbyKudRMiR$G_4)Nb2OFQOY&m03ql+Vjf-L( zO%2i`Go3Wdl43PgQk~qQ&Apur+_|EPN;R|Xbkd_E(gI8Uo%2gFl)b~Piu2QBGF(gy z%oUY%b(IUUvt9h1jdOL9>;la~+|^@Z!wOw(wKMZebv+%qy#2$ReKSo=?NqW;N{n<| zl|8f6v&{<);%#FcOXH1`^Slf-3LJ{l!aZG;LW7J$inTIJ;<5~~qs^3Zbqi99Lb%*A zHSN{)HPYO5-9qDCv-0e$N-Zr40y34t{GDwy98Ci)U1AJ;OVna)jLoerG9vALbX`*{ z6kSryl+5#rBZBj}(tIuB^0MtpBlRPliw(m34KyN((_IafqAj&-4 zj67BRO`Vgo60Ayc<72H<5`yz1f_2la)6|1Q6Edw84FZFF)C`P`?38rXbqlleRIt|M9lV146EzZ5lN{X) z4E;5fOf%G+BYYG53$^0)oRk!G6AcR-^$N0G)VTDDtTeJ6d~&VL)3hvO?Fy0$&68sF z0%A+`?6c#Htuj1q<2{WHQsWh!igVpfB6M@z!<{4j+@q4bY&DbP^o$I+>}}l*l`S>g z!c+~+lr=Kb!%9?=A`?CAl60+A6SV!}B9r`8EZySLBhsu~opY^%91S!wy}g3e^@^1Y zZ4;fXjk%odGkkT-eWHv5Ro(LS)NJ!Z^s_TV{k-h*jctk|e3i}p@|B#`G(+s14YUlh ztYS*sBlGfu@&k3FlNEF0E#gbKvI8v59W_&wiV6&hi%g?ZEpuIqT>^u`6I?x2O*P|O zT~ZPva$S<+0z!?0V$wnaJoK$B)tx*;!(8q3Jbd+%{kSZh&5FFeH0>e^LX?yO-C|UW zON&fWjBRXO4V^5aLW2V}3nDZV&FrJJ%~SF%vmK4XU9@wYT@sVyGfU%4BP_$X@(h&} zlN=1gLyS`$jGe9Xb4*IJvfNCIyt8ur!VSXQQ=-j1O{3ysHB5}vY`hIKoeVUKqayS? zm4ZtWqwW1uJh*hd<4fG!RUGu3{ezN>w46e`9W`=eE#nMLbCeA7oU`4E{0)_C!`#dw z4a1zmbzG9&iZWCcRWtmw!=ejIBOQ*(QwO=@-L9k>EKJiT)~L%egsoRz~3LyYueLk)}z)9p0e72|T<989(K z)MG>3m2ACL?PKE%JRI%Pjf`xvd@MC|(;{**vwb7EbkqyneXV@8LJE9+o!tF0J)?_L zbyEV}0~}JkO+&mgZ8E$p^nK$(3o=l#pf=qNR3|-7^JR-DJt=)qYQn*}f5|yoW z^Gl3Oy%KX3OO*?}3sSOE)$?t1G;AGBZ1q%9Y}E@2ZIZ$@-BdL)6P-eh;u2!>b8;;; z3*3`@Og+813@u6x&GRz!LNxNd-3v9;46kfD%#9KwG*hxIQ#JCl zT(nJc)RGIlw2ieBf?N}V)k9UXY)bS>!hEu|^u5$n(^9Ot3XEgjl{NE=iX)ShqI6vY z_0yJ;qv9MAO|#6b-Ezzy|lHn9df)4Y=R;z_0?3eGnI?NV&aUHVk~vFJdG2%bd0iW?b5v?BUR(# z6XSwaHT+b}wUkqxq63nGebOUR!!uIM_5IA;Lv;MJeHES6ymeF)qe~qNd^{qR^j-3u zRkT6lM;0Uy&@glU44wA zbaZ09{f(7^v!kp6eN|$)VhVMwGa|$Ff^%H$Y%Hw;a}Clx679pBoFbA^3q4iilAJ>A z40Vfr?Tb_L^sH=499+$F6SMu(GShXGVhbz{g1D5E9Eu`My_Nhk6SVWa{d^MD5{)7Q zP10j^0+fTiG&DlPqt&!5wY($jO?@Kbi}Urv97>`y3mpx-id_QSi?d6(baLb3og%|6 zy^=E&ot!)Bg)iX@J+`^R{ikwt6%}dn`-J_LrR8oxnG74=n3i7gy;%u#b{dG!W zUGhxR!z04u^(>X$wT%rl)YN0RVjWydeBx9Rf}L_~lv2VJU6u26ikyNnvh-3sY$El7 z(v>wswJakPLjw|neY`^g%3!# zqXGlHv>eTHZBlYAj8h^L+?@goHO=yUymGU11Jyl3L!2YcbMtlLi+r?G5;PpROdUgP z?7|~b-Gid6%+oY7oo$tKy%ICk+ykSNt*vwv&4Pl$3c~{YBh@@zi!H;HEYlLR?LCt$ zZ1wz&>_hDBJ-Kv~3yn$(!!=Su)SPwnt(1Ku?DWDz4GXPQ^V1!z?6L!j4H7MKj6D-m z98(m7^7QnQ+=B|zL+ldV6f?9;Bcs*0LgI5$y>q-HW0eD=^a~R_!;5mWjja9bodUzu zvXyf3b)93a{e5+!3%t!Vt@4c0HQb!kEJ8!#oRjkP6Z7ptvbj8qjYHfWlJh+r>|;$7 z!$U2?LrRVGtc=b5wBrq9b!~IAB6a)&obudtbe#%ZJTd}J^J4<_ZLEBJ0uwEhRbz^| zl$G;J6FpRvlC0ts4ctPttaD0S^TLePQr!I0ievOt9IW-Sw4Ab?4AbH@lP!b&6MT(~ zm3>lN{R1P4LQS)S&AChzz2m&n3RBgTLyclel*96sQ_@WQy=@b8V@({Q{Jf3B%>DEN zoUN5oGu=u;Y+UT31ConvBBQkwlbp3vf_+N4VqDVoQ$wu^a*XY~eUo+E91Ja-EKFPj zlH>gCqvNw3-80>iyv@UmTpji83sdYfjXku2;!O3kbki*i@>LyTY`8Szl!6_M;?1;_ z(#?y^{0cL?9YS->VheI~5(+(1!c4PmeF9Po@?6z?GTidavhzX=Gc&E-A?{dCpMEn~y-i*;?&^}Vvp0t`&^ z1N^BBS!$Z1nVlOSlrOHBv); zOjQDnRs15oGV_x4GEM#cEX|S~^HfX=bzRMpQj_8xGmPU*+>=zTOUw$=6_quuaEMvwc034XhIqePW`6jEsV_b99Y@ZM7}9!Yow{R4t1OOpRmW^mUSL z3xZVqwVgDT!>pa%9DO1~l8r)443ncwa_!u`i+o(XEDdwwGXrz&@{|ibbG>qcqqqX| zLJTwVTnc=PRZ_hjW3zKD+*2b%G-LgPGW=Czj3X2DW0U;+om^eLQuLgRGfMmwBUAic zH4PlHi&VqZZNogdl00mp9JF&yQWdRqjgs;cqb&5pBH}Z0?IQzC{1YuyRf_ZNBeJaB z^1Z^XBQm``yo#(sq7A&W%o8+xl}eN}Rk$?#O?1Q4Lo&RK3Uc*T40An;Et4%WQ$h_K z0}UcvjRTeS!{U7M)e^!YbgWWCtPLGJ^tFt_baT~ItV1(gO|_l5f?Yyw+^tJ|l424{ zGaW-Lvx_}UeN;1|G&KD}+`?=ljdTpMi`;YER21C{-86Fa!ZhQuGZKT{BTGypBZ|_E zgSiUhi;}X8BVtv|Epl@MjeH`LGQHDPb+rN$e9Y{8GW|@HVvO?KQZtR+bUaG~&Ag(G z)D-P4@~z_2!h@AE^aE|U@}pe?bM(VaG@Tud^OR!>++3A&9a2+$wIkAtQ*)z}BlNV5 z6fI2*!qh^N+!B=xo%D)~^3+mO5=t|aRI>^b)3}`6V(oN|OuY&so%5Bm4YE`<3X1fC z-J`T)741^&U2>!HGWAu{98`nj^W1{GQ=>~G3=))8i&I=eV=SU$yh>uZ>}*T@v(5Zn z^z*}&3RR0NtO`v1vrUWb3-ojhqFfSlY*LJpl2Q_EZgUz$;eQkm){R;xj^a70YG<1Ul{f!e;qa79f)QW8l zLiO#GQ^S<9V$_Wz?S0h@jBRqc64J8MOq0XIy`7Y_GyNUYbJQc%eZo={wF{&Dbj-8j z3yT7Cb1d|1jZ=(NOk=#vG=tQ=)RWAt^|O7mElQoOjJaGA++7TUZ3_a5yuDMkGHkUH za%^m3)qSFzt<<73(zD~#6B83l3=4dHHGTCw)pXR&vV!dMl2w!SLrpD;15I7H!cx*> z4Z_VL(iDB8?Mn6BZQOG;!fkxa?enZl69X)KZd_4DK0bFCE%9GnYc64N}j!abw7 zv<(zpJW>^71A~jKEmIAOO11oL%pyusyu&miOhXI;%+f9Wtuur56aC|o3L;ArgX3Kt zQ?qTe6y1{)Qxme{w7DG8Ox2Y{TL*as%Dd ziXuGx3lmdItxa51L!$zt1D#Szt!(m(V)gR81Cv~BjqL4|JR`Fs?YVpk?7Tc;vTRJ< z)GS@hGL-`yv`cN=!?i-9R4n|mjY{LJwNwg>i_F|&v^Db8d@S;cGptoo9aIC|libX* zvm(>D%-js)!(BAIjEx);+`X+mLM+34Y}3=zOH-0H9KsDkJ-s4>tc~4tlJbJA!UIhT zbv!gI6+L5|)iiVMgZx~Ty}0tc{hd8^qMZ~Ab&|rJGGk+GWA%LE!aYMZb)2nj(%sce zLcN_s!u(ZTa+F;(Vlwn{T+9?x?Uln6bt7z@!xMA3l9DwPBXxDtRm=+W(iG$M6g5qqMS;N zJbl!n%pCoT^rJI!byf6rjrGjEqfBB7%nG9uwY0+XtZc2FlHyf#qOFZ0V=|3Y(gRi9 z3XClk4f7MZEKEwH{KDhaZH>aS;-WP&+>~NUoeG?EG~->&e4-*e%o6k6{gn%x(=4^k zV+t*FP4d-K(_;*u1N(}uqG>WpkRE>%h z!&8mD^zs5Vbk%*Vy_m!*aD1J>s;}^E@=|g0j7X&2tsqeIl|la*G0uW4ScV zOw4U<{G9T=BQ#9|jBOGU%vF>e3z7@GT@8w@d|dPOwDWuvZ5-^v-R+b7^8+H%l#>Is zRh{QaYbUYnXtbG#=6|;h@ z^$YV|!%RKn!ZN(lBQ=c7Jd71{LsUbO5^Qo4)g8Txi*hs)TnnNN-EE^2i(TB!l??Md z)48&vt zb3;AC@=QDol=MuTjVu#OWAwAk{Z%bP)r=xtRJjV{ij+LGEOX+DZGys8^&Qk*Gz$}g zm3&OHlid8%jDtgUO|o5VlM=N(^4%PbRT8b$Qq{dojM6i`L)BB&Lz6wY(##ArJOXUh z4HMl9;GJW8FFe65{4^|EavQv%Ih^uj_j3gY7Z?F`dB^342`(yVPX-L-se-5uis z0#cPsy^4~vT>^|s%>DFDa*X}CG$K_!bK_%G%q@MR<3knQw7i{zz0;hN%=4TAvo-8> zQc|NLJiHP;QzBE%ViP?*Y)xGf%#1QDO^YqPJoD0GgSk|UQ~W&&OMOk_e2s0Kwe3w) zvO*K$%=}Ucf{mOU%)@k)e2X0OGaTZJb96PMgUnRj3Y4rgGP6re+|!axvJE1*@&asa zqg8x0eKe9Ivtz?NVlzUElO6LkgUpK*4UEHm13lub15Is84BSIiEp0N)b&WGM!t&jM zm9#SaQX~ESa<~$_ZPHbp)BQvI^%K&dDqtcBtoIKt092`tNJX{R4jH3g%;*)gTgDib5G`)>n1MCaz?2LnpRrABl?egrM z4c%fgRD$A@{H)?F6Vo#Nl>NifG-49G0yT5Y9Xuk{wKEI!(zv1wm6EbkHSLtG!b{_9 zqV*!Ii>Sjk z^s_vb^z1_oqkTie{7g+;ViOWeGD~wb;_X!vv=cpT74=lYbW2P%a@0*!bIekWH2idn z5)ADf%#HO5Bg`E2leqi>($W<({ndPIbF?gttdc@9wS3*uoHU(nGj-jRg55nbO+)=l zay(T$lwG}S?Nq(vTnvIzEv&N=<7|?Ra#cOK(qg$KGRZLvW0)1?i z5_Mg;a-H+TT#QRB6g{2Q9MV%#BQ4bm5{pfYOA{QdO@p#6!i+s#1C8=s4OHw)m93l{ zY!d9#qmzT&%sstzQ+;FO3b``%{SCsrt!d+%nvP6T+f1?bJ;|^~}@NGc7!fY`ydB!`yYb3QWC&vO_%+j4ZMXik#hIgR*ng z4N{a`OHxdIJ$$u%eFJr3Y$B7Kf)oo>j2w%iRbmR%?9H-@5@P*q6|GXza=G%{6VqZ+ zJgro0qf+9%V{?7t?Xpzub5u$-V)R|&Q|#T+{p_7W60@~6)4WVFlpS5O!gTaf<1%x! zT|*0_{H+YRY_)8CR5Pvf1N92LLNao-k~6J>TwSw#Y|Qcl4bwtZHGB)wLhK72axIi| zb<_>x^PSA1{WMLr64Mf0Z5@3AEVvAPY+Jk(d~%(gwT&|@4bn^${Sy?EGGbg+)U}*4Y=aZIv{SV#aw5H*{E}2- zEn-!p!$TarObb%-QWdjGBHdDbyrbL=QVrA73hj+8<0I0;+~R^gj9qM#G6Iq;w0%^H z)VWM;B22Um!kzOxgH5#(Omo}}(#)+(d{qn#w3A&_)yG>{avfO#)3VTnYoC3RCmB6tz9f>{3EQ za||3!+|y#54b#=rlky5x<7`7bObP>v(gOlD{NqitbTd=Kef6@`+|2C@wJc&&?M!2H zbo3RqJ-NbzwT=BP^E^!w^NX}xRGi|iHHz#rl{EZy5=}fJ)GgeSBZ71?BZ@q1GqaNm zjZKyHoE76DoRbWU9K+4CoQ+kvl2onZf_!p9-7Ne9N@LRP)j}05A`=w7QbYAiygZUZ zLW&~I@*=JMLxa2$N=#Bi3=KVEA|jm?1FS4dbIkN&3%LSx{i92xw9>s*J+v|ngA*gd zz2ehSGWGHjQaoIItwt?j)dJT(1NBZHECgR~6uEIkUi0vy$J zjr9_eBP@d~ZB$&nY@?M@)h#_sb!?-&!{QuE{WUcmauRAchOf?T7G3u8hvY;7|Pv<-6- z>=ca+EPbLZjcl^BT&;bh!d2DGVhdcjto02deau{o+^jsD5-p4UbwiVqTtky%vz>gD zd`*jWjlIJSvIC=XoI}iGJ>&Iavz(nB)YSC~6g5(n!+bT;e7GWt-4YBO{eAo*LR2E0 zV>P1;l#E?Mv|`oc62b~YoxKyh;&YOGbQ6qoOk8vIU7SO6)U_Oq{bC*Ue6(HELzMNn zth9<;H8V5|1CliYl{14AvK^H)+}r~S()FBdq7;p+tW;y1trgXci)@WN!(H;d?Q#n> zeGARv0-_T$l7oy4Qn{4$!=ttQyi=mX?1BSqv?FsOGyR;E@;vQ>4J~|&0< zpm>{*aF^nA(+E{3n;1XWpo~=4f=u;%6N?<1%*-syU>hd`Ek|!pTeUc?;8bs za}6$wG>5E`@X#QyKyN)?Q#GZ8Y-b;f6gyL6mBeiGxNs#^PmO5X2sKNkBzLEf0Eei= zl#Jk9OT!3%XA>Rcv;hBPF7ucm&Eg!@e5Z7G+gvSooqTntP%B-nbaj0jCEqxok}%UK z6HAo>vqFzJL(igI?U;Q1%miHx&2Yu|lDK?7b001n2mhStELEd~QkPsmdsmf0_hc8F zO#evjoD{?0^f)CI9}ml5d#f0u0z;+9_(zwdHOM~<%zktlNQeR)K z;G*P^$n>}Yd!ZwdpGkaLkne<1iySsr7R;gE}sB> zM_=WLsC@sZti%Y-cz5Th0_BwW`~+Jo6F)P{P!Ba7L;E-rMKgb;BqL{cD?1Neuh_%{ zuM{^EHy^iDb001f?M$-(GvlI?Y`+C*3eh zwW!2A<4_&7NXvjQJ%c1a3#II69YcR5E{_bS+!FUpUn9SQuuxA8!z>FAHy1x`>q6_2 zcyn)?fQ%ByR8PxDGebl3OeY;ZC98bDjQHf>LQQ3RhaB@5HFK^=byHovh|K&)<3`kHP{wukfHur8GySg3vs(R8NCYwX~o}>wLxVSY`E8 zE?XrdE4{FELwnN#r^sS2`$*TK+`RPse48Z298G^u4c`(M-?#|lBnLaSsH~XaSZfRK z5=(OxtKcYWI~~(_Fcnt=7lYL7^gNwR^*D#Plo+L0U$Zzp zH_up;FgF(+Z^!hIV1E~1yKn=2duwm&l7u)*E?0Y#D66mt6-QkS%|LA&ya^z$7P?EDuX{`+{IgFLzsGEq(p8>=a-9SU)e%$PhR8EFCUoH4~!{cl|g6 zRl9t%V28*Ehk$h5XcY%FH)}WFOrPjHODju1{cO*C-!wBT`(!NxE3+(hXYCA+D1C1| zKdquPu5j&S$5QwBz&NGA3}bEOLQNfK^@LngcdNL9OvfN)_cV*xWHTR+Vi%(n!>E)% z`^cmKpNPn~oYWM%Tm!8V^>nV3{FHnPt3po$_vHLU2eX{yMB7k{z(_sAfKq=wbt^k- zZ%r4+JZ(j5trV5w0_z+r4X=z~-w2<~)}ed92%Fw5w4|A5%SEKN5TN0;ohoP@a0tdPRA%)+l2h^xI71Kw`kR16)S5OmtsrzR4qHVxIlArcQ04Z%w#Ve zU6V|mL`|I#uH-BYgRCNrh0 zZR?;kmw1E7KzH|8+lYJ(ql`@dkUXv|b!`KkfB>D`fHadZRb!1@JNHP_&>)>4&EOD~ z2*V(YTqD1HFT+yn9A`!C0=)uH=d^q!{gNV=2+L#_S4A^xt~mWzD_xHe|7@FJwS4oO z&}jYK_`p=#jG{!vG&^@4$MAF$Z};?QTXR#(l7LiAcXh28pU6COeeFUcJ7c#@yEHCK zhuG{OLrrtL7;lqk#bAH0!eR|Kvs`PN%p~J<<6_ei4PPf$H=W2hPc`STE#H7#maD z7+qUSA7gF3;zX6~bWcYOvsjZ1BRgNGViPVeC3R~}7gfV#_axn1ZA0yF4O{PkyZ~$e z;0%+5IA2|#guoD6Z)In_*hFJ5O(tb|A-1GijD??PKE7jNG{14oY{OLrePm#{b&Wy4&HVBctU z6Ll`T$dVAFDDw>G0M7`6EYC2Tq9|P-&-`57D4$rb(3mLw%&_cirJ!OXBg2x+jEtg$ zD61&_a5FpYa4S2d&`je{u6P$yr93CE#3UpC9G_?vzpxw)V^tl$;`nqERkQevd@Xlh zb=3gvoFYR*^90{uV;g7l60IoRB6~mOjJ$lOWGk*f6{}o-Q->fQU)_>8y95o746EQm zOQ+ye?@;9^7fnB1=X~3u0Hwqfr{Gc@UxR}DB4h1%@5I1pTOIXqMN2~yu2_F>+i+E5 zlQ2I+)o@2uADtM7F!P}F=qNqcyf8Nnd%yH#rIKVlRegtab9K!q_c$Fji$a$~UtLcN z6UR_nA5$*>!dzv`&}`e39EXIw*g`*p6g&4k73I?4f@oj6IFAhfoP;n}4RsB>R9Aod z6iXL}NWJK!Bo8g!bRTs7S78lad^3Ws}VKphSN?HIK}E zXB}Ht4|36x{?xcVm5{2#?H?kaVwz@IoUGt{9aJ z-GcDs#Qb1)7gL823s=o-Z$H0ibMr{=+~frNpe#-E#8MkIeVZcR1ReciV><&Uo#?Fi zSTl1iwpY+tSkizKng4ocgEL9!7%-{$Y`wX2Vu8`y`6({o~!$1So0F8j?2q#Sky##liEc1j6 zw~(;ZQV$IW1OGxpuhc@%qEH8wxB{nO16!2>?>sBZ*rHhD499pihcxBj^n6E;%p7&AxL7ZBrJ_=E)htJ&Sj&urq5=b#{Gf!0jI?x}EE6p! zE*mXFD+_-c6BRq#Xbn|=Z$C>f&w`v_%yJRM_;jNoAN z2;2h5C2m8=*%o7J=Y+U;{2ra*aXE$w?tEtaOj$cx62kZA~@%P*)Yp{D2TM8&ki0F57|}BMnE3DD80PLdy(Cn}lTR z#Qbc%Ag5xJ+>AhP_0odKIK|?^xMZumG`k3U51XtES4A&%P5qSgaCI*S4Yg zbZdRxq8yWCF7*;$12-G9AU~C~$gF(t@Dgn+CC!+4y9~oPPdoig?PTQ;y#NipFehzY z!;qK&PahpqZT0wo&=lQ*q+Bh%1S>8lPwn&~SHDPi)ok0`{KE7Ace^wr(-M{3WNrNv z%_NIpf7Nhx&0sG}?a(AG6FsZkaJNYR==?}G^$07Q7%K-Gt{_7bBU?4662IJp?DVj7 z?UFnXBNZzp4ek73-6-$SoSfKTUA01!*pTodw=gHA;IQ!EcsHxWoOqWcPnF1+97V23 zm(ZvXZ5u=1?3`%-5RaI|6f-|NZ4=#+P){pAt8}HvXk)do1f%SXf)YP3TMgSdV{_#| zwSoXcV^`-0rG!jZmr$;RI6dQVYg-FHdmks~1ohl_r$qJWSO){w zK))PM6Zc$yb4$0ivk1HOhxx}O(oAP z2V1TTj{s{EMcepdC-Y=Gr)cwJAI*~VY`ttp`;d5-sA$6s(-d8e%=BFUut4PyB^7%W zm7wCBMCWu>(1KYXzd{|ZyetEyl6c1mTg^c8WUtULz2blZM;8MfZ~Jg-o5I9MXAK8U zuOOockB|T}H=6`s4O8pP%;0$CXs1F4lf=|Ce=h$-XZ6$sUz;ecn3TvU9ZSbzFSWuz zKR36aVzZP&QyXJ_D|N?kr$W!T{0z%rZJk^r$9P{YbJHSQHHX5KfG};YTz79D7YD^4 z3q?Z*k3z0;zu-cB3sud~RC}Y4 z2&3dIBjZ91y|ny@81*2?atQ5u?>;UhiTz?Pi;7FD5gecoIWkXx@xVUIf z_c)39s{Yd2dnZ#4%lmxxp|x6Je?om9(!I8{}%aBCg=LZe8Z2t{4{ zQb)~FtcO&X!A|`%G_bHhoCaeCI+-OOau}e#8@_|7zy<`NYzy}2j0v;uQ#I$YX?(Zf zf}e@f*M%bM7;jIU`)0Qz^X?4~J7s>bROgEyy|!Hb+2>^zDWaNFulzlIy7rITyg#pJ zFO~^f_eOc&v-?f&C77RgOz{{0TmJpy@9AsyEK5M!ZoENz8w5?j~ zxO(xjBJNIUH|@qGrge=gDzZe9TEY%$tX*B@-5C6NYmkSo;^Ni_5$_D98_uCliUK`b zGbE>Ugz&A*s5Vr|nYHb-tdK&N=%k&kS)wzY)-UjpePlFE!98S&jL|{%jVups*mQyd zE@rBPJ!|+V)xyzor6HkLWX0_ZrW4nFFBbiG@YezDK8NYi(rb(Tc3HWrY|7ixAZgGx z?RLY)<*gTY=1sezytwU_e^YPhA+0o(`(aWnEouIoho?u|zG=CcwC-Om+udpl+YNf* zx{ar2WV;r<;0--sIIVH%tETS?$^E>mv-l&gzd4amk#DGzBNb+-eE8U8hHCcDd7Ou* z-}b#D>3-YmgITL@+g1mTWmmHweCC-TcV>w?gMe?Bla8L3de~X6=+nx|p_UwGVXUiX z2tIsg?tIYkReRgR(`(hz4rN_@C9mAGQex(-G?^Z?+#dz*A0CTlZ+x^SU0}zGW4-GG z7q-7XbK!A?k?t|UFVjjs8oXW8Y=6G@0ZZhVfWYVm5x68A}LKKmalEQWzPMg3)MVq zZ*A`EV7?K*-rzRpg=}}lr+YSZsp(9Sk>qSG63AJ@6_zL%bA9davkT1AtW9|0^Gr7i zyLE5=XLx7^*LIC{1$RSbGZncO?PKcu_-(44l&8RZZs!SKCOva^d!>H(NKN{E4TC#7 zRu?W`y4oQ%iPm`=|JzN1c~z}q-QVN zU}NNEC#hz}yL!gNGuNgXo(Y{PRed*2+&KArF3)+(GmVB%3e!G%CT~+d6u3UorpA-+ z`QhWs-yggcb?ZO-v>D}p8$%Cjr7cl=oo&>!HInQ5Em_$!|IhQe|Gmv~xp@)4?Vi>x z_wwY=dE};O+pUYOar>O=RhoF4aZz0gN7$c~8xf{wy2W08)7v6Z@cv6phQz+|%94%7 zYfhgnIA@sFeRoda2eY7KlGaLVw1vKYlQMX;MtjL5@oU?CXFQ+CC|Ro-%_5y%-D;yG zDt`Z@!M$j{-rr}_%ngOp`rSUvIaJ1bPRB~OY|qq<+15@K2ZLo?#zAc&XkR zZLaVq?oR8}4<6G>WHk1cDrIKE#PmeA2L|7*yR*>nH;=QAyRAzi9IiBluU z&R)rD=jY2R%kAV^T~8#OetO8}NoD>2zZ&OFI7PBD&;9%pJI(F@(>tBE=(NL5$&ar~ z%z61~L6Nr38pAmcr_JNqsxDIXD6(IoZ|=j$miBZ>u5{Tj>8CE2=1;T!lo541QE=9| zq~obpd5pF>XTKIL2-I(EH9ZnOE7I-MquCF+l&8iiwK%I+@XbGb?xXOJc+t8n)3b}r zwlV*=)=}lX_;xnxu^%=OQ_r@n1oP6qdN00Tm++oSnLC=Jl=44qrTa-1a3(9G~ z^?$I&Nqe^P*0$s`DX#xp6_*>nWL&dVD(9}k*L@Fv&z8*TcsnQo|o~uH(PBI91E7iY7utfNn@x|@Z3Nq`2KJSd$ zx?9|QLDuZwMq3=ur*XU3r~b`0tqzIq?CB{@&vA9|*t5DyF3LsX)fR`X)zb|hF;8=o zj*7ck_BMLDNfdXPLuh-oMB2pk&6a_7S7fWM*3NmYy}iHoS>DrtS$lu2>zXRu7B^8~ zsoiYHgN009^QHH_I=6PtYm*--`YT>Nd&f2>YI^!+)s0sI$}`@{)vmA3n_c_tU2=lT zv0h2QcsWzsciy`sa_zPdOg^ z`0L7bTG^jzZ z_7$Gp@w_Ygwm@QH#N%4aDQeRX9FjUDdD^IOw$nlNk9-^1il1zdQF0gGv3kQPucJ0w z#nvv7UwSy;Lr!4C(Q1q7Njo;={E<>jmOsoKdBr)wnRmgz+ZT4&sn;g-&0}oiy=C0` z^keD{mOidEE4s>$&)D$rxBs<{_Ey6V5q_hHE$j?OXC3>P&GPQ=rv;XJjjgknS4J2} zIy3y8`CRbOMq!=yf(XsJKbzTBdw0nz#O;1lDmyJ^;xvI18H{_@wB3_WxH$blyP&Ap zxthw9+AFeL+`rr3ZFz94z2V%K%9esREdEKAE|b&>!XK))1>X9jd2`m+hlwjIZa&U! z_?z)@8q2$H$8N6ojc_^j^x)sHh=}Ap|5+p$l$8^>uoMuWbLc<~7E916R`3GCg6IMQ zq#wP2NC`VF_{55%=YXXJ)6@(6nsVWL_nvuDAG^Sv?XC4rDd*3kmudqahwQwoeBLB| zx9Imcmi1HIP0u9n{bAT`>V9EHr&~&a4O{oodht@P?3KMY()R6dcbOt;#JtU^tvXJ> z?#zNMMHx?mln=JOVq}}(VZ*~Ka3&<2TdyIpQ6Yxe(8~GDA*1TeYdeoTlU7mHowxn^ zYLz(c5D^Jc*R!$AwuNj7KPuK~WV$TOHvRhIP{Ny=@AtFwem3UZlCx~h(FL=@=3g_K zzCmP?)$*Oo9By>`fFj}vy&S({%T-V@%6fwpPsSun^+CQVWz;GUfHK< z7M~sRjCOfx314Vm`i<*UOq%iPgEkDNe|qJ$T_bBU4s;6VtdX0i?UlB2yYZAMYejCe z8|b9*a^-hyun*d>#?8N2fbZU>K331wm(mX|W)x?-*B<{dSxjZ|TPa_@uRJ_`SKFg@ zq`Y*jkqldOvzb5Phl9wvjf?N_81~!tuJ)OIA+YZ74p!a8^DgDKE?w|??=|tobEY0! z=s1PX3&l2jOpN+-UvrlAvwghVQVMs@b-46a#D>9sdiw@b8yAB)o(db^wl4WSZ94ag z@Z#XrlhPDlwynI-eRXZl?K@3vInRY8Wy1eS<~Yu;v2Hx!Uc%TDrND9hhGWyi6HJ{i zXB|8keOb-W!)e@=Yh=)v2!{Z?D}sOZ;ShJgKui8jK~+;0H(&r+rHoC zFV5Y5`}CpHr)3!qF)IDgY~kpAaNJf znmjwPukyR<&rM%-JyyL7I#?TeIC9#`M@pi1BL2L}Rl0q^^oiL-^-0DSVe%UqT%NDK zdrl$tp=b?*{dD(-QXNIcb1F0PB5Ur{KXJYGW~srcE6-ntZ#FCRk2DX8{AP3E`I3-5 zt6g4g`SsVZQ_f(jf%B!{{JU$Gh5Y|)Kd;|5^#9Yk#fg?#RqmHJsDJ$aNU^b-`&Cio zr?W=$H$UW6P0}ke+E`oi&`$hxi#W#?zWMu^co=4ICSJnUsDK^NXJ}+*g6R8zPpJeI zC4^fQAOp|~jhL|88?`M#g@zA{RwIMw#~oSUpWkCJ`~8;fX8N<5-h)E@%NS$VzdZYu zOEOny|FfKFiymfQzmwa?cyadG*MEOK-&*MR{b}^ZDakfCshz}pnqp!eea)tl@FQT|Ljux;8V<%xmB|;w|UaBrIGg~8)lfs{^p9+ zm1y9}+^erqC4Dz>l9X^8@9mc^Jb8x;)3zCYK6CkueAK>wwVv(&O&4z4W^%UPlp*W% z*QxDW#%pb?YO{1ZSDamrr(xw0+lgHR3_Oi2J`|o!os@|CcmP>Jja~GjD?G6tM-2>p5Rc zGH_a)c7dg1qaUk>Wz?q?vp80Tq~|cc3e@qC{3Bc=EO2K-;(}%cKY!^5+7-&qANlDAvG98b?j|gCxG6VXqPF6cvzOd#38i1Y zeaqF-7VVm%9x&ZQ@SVO?$;3&^mvJw!^Ip8b=rR`*<4p#$=6PPzf4tjca3JSf<`!FF z-)Dt4lC6V`CmO$O&bJS|z>(tGd(^G?^CKps`t;s5M%|k$>^5w?TT-2tme4Mt<67GE zV&{h1wCI;hxbtJf%&vA6ZFCBbOP0$B+pg1bt|@8LBiW592b24j@TQ>{Pj*#NVf0 zomr#5;e5}O4USyflkZ6?nMjvye!unyL(97Rd(Jc}E&1V7;L5(U>(BFkrhr9!_a5I{ z(^AX(I#=X7L) zZYpy&alTi67peGB^Pl%+N%<4@+iOjN?h4HRP-1U7=gzzttBx_M7v1_dM=|x$^|jWo zEKO?~{<$viD+%EI{z}En}!(e4Y<1F@tZe|?8X<|R{S|^U6Z@}chalHQZF_3xGH}9xaTe7%FUMY z6Rcj%?0yl=A@MP$=*8u~jqmvk6W=FjhRc`PFAo(c7I>Q9wo)eKh2N!xYWL5SvE`q5 zAG1fsU|w=(^Wl!RXB(b-al2iyJg=9hygv2ao4h@$OrQI^__XFM-Ldn%`Ki7}=Wi2# zDcGp%%AA|JexjtM@0?;o;d>ko)2``kZ|!aQyU`%_#$S#9W^42Q-&k-o#^=TDb?Gm@ z_AtGiC1xIDzt`5S_fn)x^{k(E@*5UfvAZTrT30j2;b145YsOjw+fSEnWz0D#V(4(c zQgKF+&z?D2GJo7Jee|hO+r2^W!Wr9Qt!bY3O_kfHpG|zdM%-@xiivysS`$l`b<6Y` zEoRsee90?am{rrn=n^YWa9Fj=sqK#}Cf<@NO?z=sgOky>#8Z22bXQ#2)BC%_WRmCf z?wf9(RGTm>pqc-2mu2zO6K!dY-8It}B`$ftB+V}PW6+{Cb@SG4bzCSpTm8oZ-*<^; z%hxJz>~G7D$YSZ|;Cp1}k+AmuZl)7c^F;yT&z@rX&avsl>Ay#o6rJO-KCSTif%XhH#(n>G(iv1$%Fs1HH*PtO5MjV8@W6#^aUtHbQe7-s)1WtN$rQopj{ zPziG{`_~^crcL*>t68I+YHxRXbLhjF;YZ${?D%%(?+m+jJNM?y5BxSMa$AMXzZ#$U z*SWOM&+_Cswx&;VQ(wAN<*}{Bwp~ZlZ`y5nW4kyfSozh-t48{Fi;RR%_iZe-DPHTw zcz?@^T^YxxY)UTIWq#vwH~dG<*{OybPc7c?U+H=&>xWvs1-~D!w&~2MV%h04JzMVf zol|PMKJHdiT=b-QCY;_osXbkJY1hox6_oX=iY z4;?VKJiR&h{=BP(W_yFYUvfl7Zac15UAgaRmsskYGbyge-_+VX{?H*L+SKD_*tyC1 zclX}UJgz6IPJfNPHfh!`o+~*&_)P1!vI||F>>-{urL&)Dkk{i?S7uWxzuC3! z(zB$!DyuplerYy*bY#g?_NT8L3)gKU@PgfsXIEssSwsd<=hJNa;)gzDU_t8-Q*zq>7bTk8^nu9MYYNb z3dWN{%b$G~_v^i@pY!8{=I>kgrk`1)!qoigi0C1v4NlEwAq;DcpBPN#P4<&%-qm(s z!veR*L2f#C^zQ^}Z4lCpm1&;$Ao1#eig&M|A&)me8o&!2LZz2&>GNCuDj zMmfD&X;YC<-AREHRv?(P+HRxpA={_pRx>({o(snw-$O*3TZlzVBh-+c2ryY}W(OH)(a zquPI~uIFFTSjhcXw5^Aq-BzfzXU3E2{`F`!zO>ulM!!EJI zyK*0XO;NnsJ72^6uwumHl%C~lIoFigey}<7{`X}brT^hipGp==#3k}EZ~O97`|+|H zs=`Yy{C@B0wtCICSW$ni(^fq1OT`cG34L^brQc6IC4;qJbpHPnF8z>m`~0T7uJ9SN zljOR7JwG<(_kAHd`Dafj?)blB>bo5|_vd=bIfgB5e<=FYpeK4+hHuy%mh93EFBLC* zHfp)^U$pY(t`)TsaRIX$!oS?)yq@cL$dbSLP2aJTRt@WH*X?m$zN&In*X~u}b7m*Y z_L;spw^MVCpUS!8f~@sCM^;Z%&gZfYy?gm9Q_+XReEa&^4$sZ4krTYJGw(-F+}GXj zzso$Ww7GA(+`-YzI#sRIKh4X=)H^@eFv&)#Zgt;-7-=`T`9#&&)Y>$gUdcM zD$`7{#Lmn>NzL0QPs_$q+g{H*FflYKxHQMx&p0es!zDmVH_^+sEIA=B zEZWpa$4x6H!PJaP#XCN%z{@DW%~dl!!7k3%KO;&p*;zBiJTX`)ILp<|Tv01INk3RO zSIdH9aCfi7V2_JU_*=G%--i%eK(nG0HDGD%(jT$2&~P zM%P6vDO@jJufVoMB|=NZG}=@(Fv?TeQ`IHe!yrD*z{k~0CsC8j&fC$(Hb|+o)KFbJ z#M8_^#Y8>aOGDc>RVhCv*E7H)y&%M+P&LClz&W8nJ*>#wEU8E@ETl+3NJHJ)Jww+% zo+~q6r$omrBEV12JIhW>Th-PgT2H;$JXcR6TU#^9HBDI~AuvEK)m0@d$g|MJ(ksf& z(=XYBrHg!G{IWYRL9!T$TrK$pGzaTAU!a&ATcr5AXGCn*2LP>%*NMT z$4Avo-PqY$C#Enr(JMN_#5T*VK;P3Qt<=~y#liMnyeeBPW2%(WN*kHrFFP+|XaiBqz{2Cnws@Ak;e7KQda)$}um% zNXsKM!r0ix(<4&XKGq~P-P2V$z(hSYC@U?+GCV!TnoHj%KRemdAv((^*e1g+%E>)6 zqadd=yeP@cCQ~CuDbl?lE+yDXFTgP>&!aHHRVgVoGS9@z&&5F9J0i*6+{%4rUNhdCG_crGIm+80UpdrV(Znji zB-zJODL6^dr6@r&)5+XIRaadrJ35NX-#p33#>&MlKT%&hI=eteEmA{0FCa8CC{xMa z!qeR?E5s};-`G#xR>eI%zra~5C(=9KR@c?T(nU2oD=5&ziz}?uDlIoB**4r;*Uv04 zD=;=Orbx@v%G5i=+|0YwB{DqFE!9#bI@eJnKvUB_Al*SXN8Lox&mbhj*4@}4D$tF~ zS1&X)+{(bvtH>}g*1;ts&Lu9uDptqWA|Ws_($vc}qbNYz!m3oo!YW!RD99$yE-%F+ zIWHfKf=*AGQ=bzTi>U|OV5QXR4XwvBvCy#yx7XcINBhvAl}X(T{Az@ z)-tQuSJ^be#Lz-b&B4&gIo`}8DnLUu%2vxX!y(+nJ<~kBNGl@VhRer3HY_(J+Q{3$ zHD1v&*Uwu!C@sJs!O-5^L_4J&(PV_%GlGh zz{)E=Bp@QpGBwuP*q|UPj>}FzDn&Oyw=~z@(l^pCCn7D&&CNEVz`@Zc6ADoV{j z$;T=>%2L(LR8>E}*xn*q+0iXO*}^LzDLN>k*gly{JIvTa$JRF?L(8eKI9bKi&R5en zPd&p*BdgfG#KADdNy9fW-8m_)s6@#(Rmt1Z+c8NsLp$5VML#daD$d8fm@7RX-X|wP zFUnpoFw557IL0-}&P7Sj&dkopRozm{#@RJANIx^MuvoD~IjTU%Al*6K+bhdG+bJp1 z)!a8m)69@7BgM~EwV*iL!Cfc7CQdy*%|pdNIV&r~&BMe$H_|sY)j`cVIX5;U&O0$! zIaw>h)+I>EQQ22ZJ%`n!~E73N`H(Sj^*FCw&Lp|C#FEB;hT*=heEzpiD!^0*mFT%?)#?8?yEg?25 z%{js)CD+O>JlZkeASFV@TiesiF3F)dGBh$Sra-GS)gr|qz92)>(O1P>&sQ}jipwX( zu+%Fu-z_>mStp@bCEQjo%`Qw;NiRrM$1F_C-J{elK-oJt&BwtmtEAA|KEc1lKhixe zzsSoZGgiyUUB8se%qv+p*GSzgH#XHKDm1~})ydT~BFNDpSH(WUz}CkuUBxdc#W2}D z(>6ReS4&$hBs$D2y~s<&wIE*0%`4NGr`W^w8$XOQd8McInpxN#?K&K(>Bw_!b&G5&?qoA&bL6Z=|H7CI- zxg;w)KB&|^B2q6hTf>zrJvhR{)KAwj*)>kpAjHPh#Y5dGBiP#{IX*rhG0ogh&)?O~ z&fZ1aFvTNU&Dpvr%PgzdAxbMpIiXZ5K2p~{fGecXA}QV9#N0hDQBTv?BRVC$)Wq2* zJjJ-s#Zk?}&Ri)o)hR4BR5K#QAV1rqI5;FH)5tR>G$%eH!q=lHTRD=;MoT@*Bvsol zTV2y9+SfQo#n;76F*r5NMBO96Rw>%TCafqV%t19KGsi+FMBCdh+b%xbz`;4nJT1o3 z%*!o3oXa;YR@F?^IMCcjQ`6lu+FVQ5DkU)AJuy@_+`}Rw)zQ*1QA1x{&(+e;F}i_0R;ur$=cE8jH4P{ljZQZLN7 zpg=D#IL#qaFU-fNFwe`=ShpZ0E-%T-**rYWS1r>l+TY$-)hJELR@quN$WDjLDK*JH z+|1skAk8&(1wNJ;lu^ zKEW?auQ*KGiYqS5#?;%)!X`&6F3G_^-APZq$Uj0iDY+!uS<%bb-YP52H#)#tSwB-b zQAN)*z~91OBhJWAEzUnsEiTK-*2JGHQCmY_)ic>8xHO~KC85OFEY{vXFWS~nOE1k` zBS*tBFvmPMPs7}yAW^l*$|S;5-y`0|%qmUEO2;foHOe&1pDW8-BhFvb)IK^_*Q(Sn zJ4-b?IXTv&$UN96tH{b-OV3eFBitj+#KzD+G{ipNG*&y!CO*Zm&_b_J$2cd)Bwmjz z-`ra>Jv2beG^|+LBGDn+J~g>SH!d-qFE3q{PY~&oRT%QAyp?)6*x*E4s)yEj%S8(znDu zFjG%2#z;L!Jucl)zeFvnL@7Z}GbBLE%{`kd$JR1Z*`qW(*f^!2Ff}2_E7d#4P{TgS zp~$aTJ$7#B-!5EJVYhBz&6Rl-`+1Q%S%ZqmdiNENmnaDQ!%7i zDLy_hI9Mgb$0{dB$t}iF+05CLlj$t<_Pn#;kWRLM2XIKn?k+f*}CBPClgJ1QjKwNyDV$tobh!YRW( z+Q2eCzBEz|u4)JTJDiI4v(PL^DZO(RYNa8&&(j+g)2zW z-@rUp&nP5GJK9XkEYr#}wJ0eqHabZqwZPTKUnATxI6o@cJJK^bJ3d`CAl)ykAfv$B z+r~9E#NQ`5&R?I)!_Ox?UdtpkFVxW2B|XqCyTmy@-qY7HJ|N8|Hr7ALNzo_H(mg}n z$2i{0N7G5!Ej~3PF3C$R(7`Uy&(WgPjLXl?R4>~s&)dk|R5dcuDkj1rLM_QFRYNl& zH7~|Z#lt_PAkZ^)>FHv$iy=sMnBBi zHs09R!OS_vrZ7#@%e6qoH`~P_)g?63H>g0%g3H_7&L<|#AzDK#(>lZ=Eylvm&?3{{ zP1oB!PuJYj$JtXmDpglcJ29m+Aw)0JCd0%sB3{|uEY3B?Gep%|HA0aqz}F$mMLomG z)4(&t$<4<&L($K~#x*oVvmmfQGu%DODp%jt!l*PR*eX{uP$S$V$HKZ)M=Lho$}b{S zM@7w8l`E~--`zbkI?UTTDMBmG*2~J<(b3ya)m2p^$H+TC(@iZ+&!ot~G(a`L#LUst zA}Tye!_pv6M_Vx~E<8oW-b9ZpH$geo!qq0;*j-PlD4^Ip&|TeHE5O9dQ883C)ze(p zHBu)hx-h{dBu~vMJRv4bsl+`o$lS$4JwPYO+sjBTo69#S$3)dU*tR&?&dyiQE!Q*5 zCNHTdO5Y-|$kjqW&qr4&&BVGmz&6v^Sz9Z`SJgGhKgv!wz|f>L$2QnDQ8kAv)!#`+ zIZ|80)GyvtGtb4$-(5K?CqF*NFw46%(aX-q%EKVk%*ol`BsN`3EyvB(UdvZk(>UKT zL(x>**t5_moXaRACC<&t$}`n0QYX*N$v`JpKPN!h(AGF!%i1A3syM~YJ3D%4sh%Gt!y+RlwD**7QCsxUPq+CSOb$xyv0t=J&k-o+!qGRDH) zFEZWP$~@i8*T*TuF0j-h$kx*|!8qC4KwU4?Q#n;5C^SVQj4Q-KJt0RqEHT0{vM|@H zSSi*nEy&4Mt-w7f)Xqr5ImSB9Bq}a7KQq`WAaGB1tzd+B7HA#3L-i$XTDu zTqQhG%TYJm#9ckvxlqj|!d=tCC@(S3IX^klK07MK$STypL@`z`Bi%60E6GSTJ*g-w z-Y>)7TQ}IxyHMLxmn%8kD?B#c%EsB)C%H7y+RZvRHOZ{R#>Pt{I5{WN$X7|(&m>$m zGAAV<-mOq6*uJ31%hw~%H#Ew?IYm1t-aed5Tg^KvM^nwoHZ4vy-nGEQLf0bOL@g%3 z-`T-7EiWxKRwFZ7+aw`SKStfaI65LR+C?R*&^RI|CfX>#&C<#%n#)7kOW)HvI3ZFs zJ6$;|C&b>!%}vit$FAB$KK0XEj6H2O?$IK}*CQHxFOW!3jKs(Pl+1$avlPlIdCSB7y zEznBUS5wzKTG!6YKh4*}B)CY|G21dIAyOmOMJY5vD@ZZgLf<~o$lTH*C|uFGP~WpC z$XG*9(YTn)Hdf8j)FiGX%GB6JCD_2jF+a`S&ekknTT3MaAhXm^IoZfY-!!JsKiOH)(aXfV)Y~VyKuz6PD_o7sHY3!>N?BdaBE#M~$1lak zGCIM+QrT9+#K6-xR@GI-r`Ws5#m+A+H_FJ%TFEjlIz~B8&)vz+($dQ`EF#;_>fGg~v*Al6zlG|nkH%H7J?z$P*{*Cg8@H&!jE&^}NvE>)#iGc7$qElkr` zmCI1wJI6MyBs4)!-8v>9&OJRg#x~Y7R4YE*#a+EvLq$i|(>B!4$0a#ZF|;Vm*2zxK z(KKGkKSn(|)gUXtrznm~C(0=x$iga6-^;+sz%eBz&fGaDBr-0vFep^rAlACT(Mm5M z$}7-5xg_5pKQ%1IEHoz7F*v}_-M}s|Tr(xZjmy!+RW;m3)jBuP!=|`I!_gtd+tk;~fIR?joaz|7mqCq|{%OW)B`*FQrwEiu8zz{e;n%B?iOTwm8QL_JwQ zRnf^VOEol5Db*y{NiDQ6)>_rp$~2BEJS8f}KGxgZOC>TqSvMrnNG+z+FriRUEg;A= zEKgfAASu^HOHcge${8GQ>aBFU8L!!O12( zy3i!c-pxH!RWZv{$;lwXT-U(PPCq24*fCeh*gnZHBsINM*EP;Z&D!3**ho*Opd^sX zFQmXi+bBNU-a<<~$Wkpe&rCVdNY_=(&m_{z)y*qZJ zQKKj#D=|7XDo0BxLD|i}I3=+t&^5@^&^L)orAQ^IAk@cKC(*)9)7>+~+*sYwRNv4k zNLMw?(M8A2H!VIoD%IRLG1#rMuEbM6UOU(=D?Z54E~LmmUCkstF~%k$*f=mO*Tu^#(Z{7!IVd#6 zR=t=jIXzIrF3>G0D%UIC*U{80JI2T*)hyMw$jw;Y$3rcv#4aMw+(p$sPt(l8AX-y7 zEG;NM(O)&*HAl_ZO*=I=mrFf9x40xz(J9Q&E~+?IL(eJLI65>zD@McEEix`O#mvJc zL9fKbEypuR&nYo3)Gt0V)>}`n(9_8>+N?0$E?lH#LX^C-^ef2!9T^*$TrL=Q!~&>H^L}3*u^>}E6&d#z`$BHl`At$NlQ;R zEhWv~-&!fx-YPyKNHaamC)-2atFXjH-_$(cx*$E?KhQP7J}N)YBr4iVU&&u5!8zX6 zInvonEv}HuEJ)Q+%fQf5#ke5NAY0$dR?8>A$K6dY#=|8u-7>w z%F{SAOwZOnQrSK!T*WrR!A`@?%fd{#R8`YF*wWoBIyz0MIK;CDcAsBPuj3-&0S^Ik&_kM=i=ojZ0tG+8`v^KQGZ)Pg^C@#o9mDz{xYz(a_pO zz1YPnP%AP;%{afnNjp0+UQffxBhb*o*2po%#iBSNARse7*Cvw7&m|#0+um8dG&;jL zBQwFnE5o?R-dWuuH`hziJx5p9$;K$awos)&JwMjn)G1WmIMOKDq|`jtG2bn#z|7Fr zfh#O8EVtBOJzOUx*G600*48mNCe2gV)yc{?COuO(&%eYw(KNJBJ0>DF!pqhrI5$ek zJ<8ZDDyc%-z~9x!595t0+C!S2@@-EiKX4OD9h^B0=3Q#XBl9S<%kIBV1LnP|rNV!cwa+ zPg~JAh0Dv$S0`LIuE0Mt-83v9Gd{-KBEuucUpXfyP%Wb{#xEf+(mhNy!oXfJB~CA@ zz(6%FRMkc!AUa(y)Yma1%qE8`Ni#FJ#5*QZy!NAYmz0^ZZBg)myH`qKZ+~34D!p23z&^yY&H#ki(BiU9X#-zl} zGbgAhGS^tonae9lJ=xvQ%`7rhJ=IU!*r`Z6$0py*J~KMY$2&Ve!acJj#K7M*%f_YqCD*~iE~3;i+9yjRDYn4akjqZL#97bV#U$J>DO=av z)-TgkDN29 z*dxbV-!mXqHNZSq-OL~)#V6iK*+t(uG1k>a)7LW4M%TpG+9WC_)}TLG#8W3K-Z#P8#>6AfR3*bVFDZe`BGcW+&EH-r!Qa!^&E6};QQOKlSJy2f zwm@Ac)4)B?BR48J%f=@uB{NXnLd(!FH6z?OB)d3C$x1OMpeQ;bh$}GP#MQt$+tAc7 zKTx?a#Vy=Dp(H6eSU&}Hym@lIRcT~kVO)}5TvSPrt4@@2mTihxOlFQvVvdV;sk)(w zni-e5Qlg?uqKZzWZ=6A%tyy-8ky&=EfrD?6v72#nT!6Z=hN7LJMz%>xT#Ao|Z@OBr zXHKHNyOyR;db*2daFR66PlT7ZYifR>OR8Ieic*YMZe&1opuU!Qk^xt=fpvOVkfn!*iA`XlgPXc`l&*zQ zR-T8OZGK*AL}ps1Q%Jgbq@q@wdS0lFy@64_l9qWuw!2P2iAtW2jk>2Xm%Fx+tBJWi z=+NJs)L{P*JJY0)e04uJCogSJS2O)!{rIBP5?6DFoUAm9h|F+HFUxejD8FEPD+f1q zl}P<;D=vN2NXHzFXaj2>J8$=h2yMeyC5<>GM;Eukz*N6t!xE!B{dgVMXpi*p9Q#NO zW&MIke@(w+UEQ$A4C`F8*nmVX(+Gp8(Cly}RdWx6cyE6j&0-gwfCQH;JyZ2O`yds| zpfK$M&9FGlcxPRU{4`5DN8O-|L~S3toUk+vb6X8JcdmG)=%geAS6gQdm8?SllmZ=1 z6Axee!V=dAISXGDA zj38~>z!W!6O|8WA(ggQp?;OL_1Y;L2JyS&^m6&wBINQL?;*?}xTlZvBzub7OAe&^v zXbbZM6QkTTKM%Dct4w#V4EIRAY{TpTD@(hC+>it%OC4iZZ7%&BKkWp62j?UY3*#(( zZAW`8TRj7f65n9Ul(@7~JwsLJ(BJ?))1ai1bj7H&{9<48oG2CdjJ%AT_(1nmWo2is zn8fsA!y;Y3P<^c+f0Mi-3&XUCe2+rsQddg{zsz)FUk{r+y`*5hBxAR1oum-eSc^En z1n*dvBuj745E~5>53WoPYm+Rar2HIh=NwI^+z^{!8`W$dJH29qlJq1!ZEdw^7v&h^ zJRda=bCpyZ+fuVa6Lkwa7ptTk$Mh5{7avnDcS}2cf8P{?{NTjAz-Ucvqi`2pw;)Yj zmo!D?2%{7mPuEg|L`5wf%kcOh?U$s!*_#BPG+?djQeTPI}Jy!$Gv_K`z+^|rC+(M`HY-Kma zY^yvjrA&97oLCLBV)G~+^CE8x#iD$V;F3HQLsL^V^HMc)x5W5NWp|^Pl%$d%?W__N zv#9)l@cgI*Z;uSSh)5;td@e_Iw=A{bLPI|rTg$?%C=V0!j7&8nIhkqG)@a zoR}~-+v3Rl#B|l7_&iky`&f@;eT`^+J*C1tV=qH4tvEX^MXS;z8=cS)Z?j-UGb3}S z96f&n-@LT2xO96BFK7MGa7!!iJf*M@Bhz?;z!d9X>l9Bvtpo>UZEX)7UoLICShtAO zbRA_~6&s~szkJ8ED7|P^uf!C?#9UW{VC7gFLz_(RDBtXiC=Cx?Q;oF9JeO>*Fe`&3 zop|d)Q_Vas6=$CSqXJvsNNqz+=g7QRM~CF(pxB6<_^e_ZQ$4lffW+YJ1Xpz%llV|2 zW34zHlkgyI#l(E|aLq!4$O1pNOfEAuV>_RqQmbqii%gf2kN~&*P@klb0B`Svkn}*S z;N$=;>(FA8Af3>Z(%e9O``GjVo#^B!6?LDWXhZc_UE2t*f-uK|wD1fyKTD6qXzi42 zGrJ6xFo$qeEe}^Wb0{3;PiG_TNMln2-&kwkKrKbDNE@3}GsR4;e5VraEG2iH zWaUy%l^_%K_(b0#+k|-Qz~a0Z|6)&Tb*``+H-kiFl`L&D)zCzbI9;<8?PPmJ;{eq( zPxX{oYrj;t01N9dH{%4IM02;$L?d%g!_Yii6P2PQUnOH_TVpLQ6ZaJFpv=OO;G~c+ zb*Dh%j9^u_fXsMxC%yc*0B_?&i-_XDi1=tD6>Db$tHNZ90*y>h6B{!<%fb*FA2-w3 za4r=SmncQuJiSm0WwnSn4Z!EK{eDP&EUKz|?Th zOuO(xEtlvN)r3&B0#|*mAnzcns0ai9Fqg0*t6W1PwX6U=Z346X#LVz+eng8Urkxa9aK4WFb??HHZ( zBIjrwonp75fB;=z*W?HXhm2$uyEG*oJ&myJVx##Wepo{m?X9 zXUnLP*l;B!3lDvZC|jpsL(3FbKgFojFMEA6}h>kuEyphDA7TkB9R?Go!^H~k<>Z=>9xF#8MxPumQ03nguHJ2R64Q-eY? z8{0(ZM7L-s4;x+of)Hg#J!LI>hom4K{VY?HLM;^&Wv+-!}dwt9JfMR2Z%pyAn z3+sdk=jfnJ(~>ynI2#9LWnDLY)9{!;Qw=X41G@-gZ);_zB7KVjuNdWEQ&m$gOWz_5 zBlqYek4UA!%naW&#R7FdT`ezX4ILW|C--7gtHPi{qYU5hXiaSu`$%6aP3>Tf;E+7s zY-MHb!fbE#D6SywP_^6yZF7BX>ok2esvLWz{eXtDu;0=McRB+rR`P72gy)(?Gi@&j=Mom)M-FG+#R| zePfki!z7&~!%|OmQ$NitZCk~3J9SO#f}9WogH$g)Z5OwI{K6PF9mV1lU*%v+`^-RR zN2Ta^CqI{DO*Okzcdn?+pl~l&3*+p}#8M9fPrp1vPhTznKr==AXs57<47=>m2tS>o z#Nw>r)MPzR=NJo(!gSAq@VICfJ#{zrh`cN=TcyYli^Ql53&YS78`r|@KyBOHU`uU7 zm28Xj)EHNL%fx`__>4SPKMf^)H$MY^?T8Rhw*YNlpG-evbrYLxWiB)0g#1Fa#KasQ zw=jz&PfaJw*u>;KC1*YR*!&2MNE;0o)hNH*m<0Ryc%Rq=y{MQHRY&JUvxKxfvs_J` z&{SsZ=JS9^mq<&O;?hiw z?A#nj<4m=%7?WHtYxNNI#Ee2e!yt=-O!cJn;zBpWz}!TK2=hE2ckSfTOs*(T=Ug4@ zT-)%ZJZ;0EA~k1?++>sB@W3o{9g8II^i=;Cr!ZX;6Rm)>e2aLEc-?$8Kcj3jl`wsk zERBMU(6BTv9a|rtjOctXZ4(o94|Ss$hsfY~*9<3v*jR1-q>RKA?UD#}r9!2&q(V0r zXD#!fg6QPv%ydO(RVOW@xX9AnNG|srJ2gMm+yLdYIK_yh$ZY$-A}t@#wZ6%kn%?>< zg@t~>n%;^|p{h|<8Y)HRMPVjZIZ;`9nzkOnksgLFq2XNVYK5T=b`ct(f!6A3er7g) zj*5YynkFH+R{HifMMQ3f1rY>AQHt7Z#w$T<*Hc1Yyo=F}l`YzhRf!exG1__!j(OSL+IY#EHrS`EJ z>4ADWKA}lkma6H2G3xe_da=36>M1b+T*~&o7Vepj38_|ArsiRW1y)HRnqL0NYW7-M zc9F(;$yVw<>e_ya4(itW4nISBsO2(G9!G)S3fu#Y_9>p=9 zDiPWF>OM+lY2gv>LDpP(Ui!-Ekp|vHdO7Oh2`>H_d3Nfy9v=CHVR3HxYQ@Hx8rDvh zMV?k+DTWzt?zxICc4mrdX1*b65iy!sni^WgT(-K#37)ok_P)^`CHhI8{yv7;sm1}$ zW(mgDUMXtI2AYOm5e134VS3>y-VO#XR>9h_&iRosrUhCSkxG6V-r-#KLHWAoMjG}m zIhJ9{`H@D(M%uY{QKfEPe#X8rj?Upuv3VZ8PRY8C-f5;;hH)k?;VI66nVO28QEBc$ zA-X|vT*d}E`ti}02B`%xnGT^U`f3>(X`${~@g8_>;{>j#Q;aY|{+0HhaTJfR5dagyP5r)|+ zW?6y$2FadLkr5fLewM|qo@s6+rHVmOdRaOa=@yC}T3NDKp2=Chu9h(xd0Eb>Sq8-x0pXUau9harc_t2dex}BSzBbyvTH(Pyq46== zdakP0G2XF>T!lu)!S31l;cjXcrU7orX;GH(DW*;(=B}EBi3P?6R>mGK{#F(`1raIc zu1a2^YT-Jux6S&s4n8I-#*Sw3 znHjcTv3}NBK|#f)K8otr8FBiW1r{+H?$H)S`I;61HY)bHhW_p;xltMh*}10P*(zM> zNtWsfv4v{xo>{gfB?&H3+G;uux@nPtS^DOF5jsAFCT5By#gQrMZYfcEAsI17mS%QY zhEe(!E>R{9`Yxe%Tm^Bur4Am!?nP-){>46pL8)5Fu{zE5|+>Uw4lhCb$Q9wvo0ih4eVLCHb7Tz2jSX5l$Wd4Z*N z!9@Ye=COIH#d@(yPQ_~3Aw?SI_QugkDTUTC#(BBMg-!{!%IT&Bn$a4iQHjw8x)Bbs z4uM?Gsd0vdMw%W`MzQ*;(QZ+`R-Uo30r{~mnNF!*nLgP$@xH1ydY%cv?vat|nYx7* zw&9V{IgZx$#TIEXu6e4dTv6(oMlp#>ZkC}%!LhEkZjM@!MR~E|1$r3)s!{p*nXdk& zhW^_2YSxw+s!nRfc{%AW7O^(!p^3qH)=n0tp&ncje(4_Jn$b=fQHD{su|XH z+7ShA>Ls>CDrwqIs%nNd;aTxInvUkWK_;;g{{FV^@d5c(J{gvwMR}Gvp4LvjYS9I$ z+6D$Ld6rz>1tIb2Sw^Pzo@ws6g{tZ9rt!}H*?CziYMNT{CE;oYX?~u0+F>TPkuDMW z8lK+izG{kwNwMM45w;o$K{~OKTzPqp+IBWt@qR{j7Abm$4%)V{MXuHlh{ zxtd1lW(gXOg$2RtrkTD;`I#YxnFZN-5oT&WK5ns2rXeAEu3@gFd77%OrX@PAT!v1; z#a8YKk);`GS<%X+cKO)>5%#)4iTWnih8BtH*%_7*alu*YDp4*0Chn1??uvoQk(y~q zg$X&KG42JLXk9=hJyF7B!7sj+6h$pv9HruilwAq8GhDxPjy9@!~M zSy>wT(N;wnIu3=|?hZz3nm!ReF1q@zT+SL^sbOjP*6GP+R*|Z4S&@N8F$Nl`!3Mg< znO4aJm1PL`g*S?USV4xY;4`q3s42_a5NS}~SB8lJYLb}s6wB_5#;=9vjjwmLbQ z`F2^lT=tex{)Ks2F{O#_-U%jpMP@~I)@oWgrtVh0o_3ZR#)ZkbZkox)#tt?v7U@~4 z+A)eMZbiOEe#ZXBS_Ub0mc?AgE?P=z`R2LdiebuXx-KzA_Qi<~cIp8hIhmOe*{P-G zCO(z{?s*~p`i^?4N(DOJ79oM2ra`&U5ot>4`TiN9TzPtFMNY}l8YW8iX$EeAF|me* zh8k{0@$Pn+b^$6es$RM3CNWw{QNd{m8ZJ3GI=+!sIhheU;od=+4k;$;`9544ak-iH z&W@o8zHyYr2@ZytkqOz+J}!~g1%}Qh=|MhStb(fRqs zF}guv_9`kyCE8JXRyM|AiEfsvar#_^KDzNv>UnmW4vA5rz830<)>c9J?xFUfDd8r@ z206|#AsOmMiZ;%cu>l2|ai0E$ipJJ4s>$izHhCuYzPV~ST=4~#ISwhBo=MrU?$%-P zAvW;^(Z(9F3GTW2fw8f1I>u@y9=ckw#x~he(V3ZE&H+i0A+}y&kuf=O>Uu>HcF|n= zAz2Bj)+s7hc4;YzfqKd+`Z;;Zsm4W)30hu;#_`^|R)I-&u2G?xmMO&rhBoG@i=2`LWBTq(|`(ZxB+S@FrPs_Kzp$iHhl8E#gNy4g`yAqmcw z1=^}fN{*Sz#a0w0yddlIN#kQq}r8-wjOql zy0J-#NpVhgjzM__#h!UsPf|1o9Wj;8X8+Fn420X#6lJLCFZ6o=sWv5MHm_>@alV(B<5r$ zJLaY5q$+^S2rfy@4O1{QuvFmHkAT{30y;2BA0*?UU;?%`Kd;0sGbhzp!O$GE(=(PpQxapq@bUypr4|kpQ@mrrogM8 zuArZxpr5H=XkekBpQE6ktDv8!pr5axU!Y)UXriEBq@Z7{pkJb(U#g&A1_}xk=YkG) zf<_DMBuip9%Nm=2DasoowUbYvyj}7L{e6t(=jn zQQ~4^uc_~t;GB?Y=47uHX%VRGYvYmYm|GlX&*i46YHH~f6PRZionxPn7VN2NX<_N0 zRTz`2mXsf;s2v$=9+9mQmYkTMsBGjBuauas8D?3Ot!tp|sbUyyb9YwaHq5UZu8 z;-``osN#|q8Xs0*<(lVbT$q~crIM_cWRmR_lj3Am=wTCPXr%7qWK~#XSEBB(W>o0n zQBsl-&lT*DYmpj|Ws#rbA8X^66snf*p;%PvZ|0fc>#LHb7iXg6o8%s?RgzVrXkF-@ zWb2vX5UpZulV_l3tD=z=suIAJm6l**tQ`}k>7V3cl%pLQZ>=6-;+<%pSD+i1sv8y- zqmrMQ;G-0(>!@OwW964)Zf&R(8{_L?oUfN`XK0ol!{w{v;A9w`p{AzkuM`#NQDhUK z5v~_umh6Q+Yat!u1xs=`vz8Hh)&eDVtXa#<0-9@J*~-`qmaPnov1Y3fPmFA(YiOcp zU<}@$4bDVi3TB{8ge`X&fm{M|H#B!yfOdDI=PuBZLeS)j>{SI`{ovB15^$*kDq9Re zPR}eVE^*FCECT0kpF}9f$P^R;;h8BV8Q?5vYM@|DA?Bs80R~VP!)Q?XM>Q9iBbf>_ z)ZEA%C5+4rjTJ1+QN_SvU~XuPq7Ypp%s^~3uPM}K6KHH8(_lHMJV>*Vseyupfq{al zseuAW4urujFflY%FaaqvGDUF-NRx>%E7vn8BrVM_qo5!@#kJVXOkdmC)>S!G$xF>y$3IC+ zJ4_=k*(%4yEK2GIo;4(Sv5&JE>$Br zCp#zA*Q_wX+Pc^>tXRj%Fi^QPI?g&W!_dmQAi^RuJlkrPANevS~t{@%el}b zwZPaqG(ycOCOkPQ$)M0uKd;2z!l1x0#xhbryu=_Y&Rjz`*r}kfz{x1M&_7K*D8n=| zwJ6>x*Cit|+LkLQC)3@)AwWCY#w{$)(IZMJP{}YqJ;ER_Da*&wQYXf+(89XZxiBQs zuE-@%#XMErL9ZY@McqHlFvL|aFE-SPD=9C`-(Sxsq&UvNzQEQ@wItOn(8$9#Cet+3 z$lg*TG1ogj*C?VSBVEHF*)7po$vZwS)+W^?Fgh4(l?+Ze&`5^WQ}ATPtM7uN6=-6j zpr4$do13U$Vy2*9kXn?Pp8{(X8iAXGW(xW~;1;2gf_{*Kg_(kW7^q#ytDmS~X$fi= z8X6daT84%O#tKBY3=NGy^<^b`+t32(NGg~oK&hUB$`(`tQ;2zuhrR(8peoMXRKWsN zUqZcOZeXrpVPT?RVPT+v?nOfbGjkL{cp#X8>N%(h=(_Onc}-2s6+oInH7A$`ImN_8 z!PLwcEN%?q!wfbwRelp=wIp+q@-=GonOM0tLWsP<6)4Lr=OQn>Y8Pfmg<|Aom!HWA7`tQ;Hr~Ul$7G4 z7ox8loMap75E^D^r&i=(>tW)rtm~MO?Q2q!z~z}-5UQA)s}OtLxL zW@nla$E9SZryOJ%Xj7=~s+FUr7-MIa9ORN~8=w`aVy~qUu3@E|Yj2a66cS#TA6ICZ zUg%YSk}7QW9vF9jfo{5^kbo zsjCubYG?1B>S?2s9-5QmV3!bQtZQIuYvEKBo*7u+%T-jM8Renqty>hPWaMsD;E@^X zWa)1inV4f5s%xdAp6+Lms~8@U8jxs_mmX>w?v?JPs9993WuUHPkfm*u>SE4iZ6D7|=uZ>VVK=9#1Dtea)09;~L}n&y%lqGO+BV(V!d9#fp7sBWlToDgAdW?@sHl5d}E z?quu`Xp>>7!{w0_muG30XzXp7m1Lo$kC=|S(@WsTI!J&qvq_G=&7d` ztYKkguW94qU}@!Np%V}nkgutsmB*DA=%SL5<)R;H;#uMum!N2q>5~+g7MqvnksX>^ zT%@J%QCO5_lxvfc7HyxJ;iwYt;%HeMpII0e7ik~qWNfO&*Po@=USXcgw{ znH^}YZ|db$qUf0Hl$qjg=INLhk*Ay<7H6&*6|L=@n-!B(q+Og76YZF-7!aZvX~Y%c z8mZ|R9*|I+5u9ig?&cC5l9!#~kfW016=RSanHa2F;H_g;T%zQY9B5{tS(0qvukW7h zY8P7)m#*PsYMGJ7m9F6zn`NS?A6Z(I73`229c>-tQkbD{qw1&QQmEsWo#gEr5gB2S zu9Kpk5TqNHtdtg@Y7pldnyZtbR&1Q=?!e_3>SC83nVVo99-?Wkt?i#-WSE|x=@O~p z>gg3>@8)l$5|Wwkl3@`Q6zpZL@8jp?XzF5|93QQo4k*4VzrJa}) zVq&k6!k)EVjY`=;i{b$6c?_g<6T^w zWWtpZ=%}n>9&PQQ8snMh6z;B`kl^i~YY`J>WULdDYo?{<@1|?(?XOvE;g+PSZlA5B znCX>~p{0?dosgbs?5df-rDd*c;OOdO?P%-aon`5(qVJ`sVPcS|tMBFLpA{Ju>*%Z# z;+K$?t&tsG>Zj>anvkmHX&0gv8Br4D5EGb@naHIUXQXPU?rLA;m)zA-d%r|zmkN0yciZM(mF%Bwqi;OA=Pmgp`i_Hkna0_ssEiD{?F@iBi%FGB7fYv^7nQ^C(R9OpW)>GK)8{ z&~&kKb8)hD%gze7OZBq$2rA_=2rji%3vhFfu`mn@NDtS~$v5`T&xpw`h*4H_vD4E@ z_Dph2^K*6ZPqxrbiOI(9G4*_0=~_;L-~V&~!+5OE2;dcZ|^2c5=>+ ziO*HFwk!yab=EBkv)9!ra19HHN-8qd%1ASdwFuA3w8+Q^2=~cT^9T!5PqgHURkKP0 zox@XToE~Ia6ya(SYT&INtrs4V6m3?j;~g5|U*hdzZ=UO#<{4$-ovNMbm#&#-?4IkC zu9sjLn3Ar>RS@82=p2$5s}igkA8w@PnQCH~;iXfUX5|x+uWn-R?Bo!bm!WMQ8f%xH z>5>pw}DUM9H{JK zYpic-q@7n(l4Fn;WuTs!YiHzP;E@~d@0*qo99W#4Ym%D4XBZxgFos$8U(Q0#4%FKGKYN->RTa*?O?Oveapqy7?@9Lpu zrIzKO9PUu865*f1r5BqM=&cv58|~_-5}0gnWgez&r<<1Ptzn!Mk)>wopXQ&DrEj2; znjLOctmGbRksg38J?w;lIb6!u3?^~=bxSG?dzu>9jRrPkr-f?Z%hEViI6w?(J_JsjeHJ7ww!K)j! zWSp0*>+P73=@#Q<9;8{wur*pr=FA^uVe0+rkI6C29l@qC_5}D#r zsuC5b5}cLd;2WLd@2%unYMiO2VPxXztWl6)qa0{d=6|os*+=!kWdnoqV{hvb z9;IdznqZh1;OAOslWe1%?d2O8;$p4s?3-L*ACzNY9>tZA>S0E;-jotkUq zWfT-s9PMtcZsTtdsif~xl5OSZVHpx<8)j@;=;M{385|v3sPAs)T#{7aYgQP`rK}Si zWKifDWEoOWkd~L~pBf$&sB2)U>}j8rq@LiYl;Y*%r|cYKADZmySn8zaovxa0sb^R^%WZ^EUMXq;x?l${u;lH%{QualgaWgZ%w>t=15rxYEm6l0+m zZ0nJ#ldJ1zVr3psnB(MJ5~dksl4Kpqm9G<-t!tDWsGRR-6B(PQl;@Oe;i9RTty*Ml z?OAMXlxM6F=A&vKYZMSuWbNqeZl##76_ZsMr*7e^9v=~*pT?!9=M$Hhujyi?6>V;# zS)7q(=$7Z_;h7y3>!|z#YZ{wDto}aH28s-y~XrixeS!CkvQEHmN z72xKUp>GG(*7@)1~7nWxg z?Wm;WndPn?lAfEAoXeH(;*(k$Y3HP+mtL5fW)|pc6ku2ws-mivZDpEc>Jgyfq3ms_ zrs3rpt>_e*r(LR+7h~yQ>ELEqsHPh3rWl{gWf84slkDJ_tLE&G@2c(ZtE?K7o*m!B8qtD?ucmL8ZX4jBXlCb` zTIA`YXKiE?XKLVUp_Q8Is?4QlYo?{?>*`VLZsz1|nxF2Sp6#d?rtX~SmJn#{pXO|; zW@)VnIy@y!GcC|KPAfA+J4h|TC^uDKHzv@b*w}{4Suw&iK`qNc$1E*BG%q;8Bihw9 zPB+-kDBQ@)(>u`BB`ZGH-B&SGBQIFPK1ngyD^NSgIXfW1C`-x9KUz0IkITj=R@cVL z#naUw-#@&>F*Y+MTrV-nJ}p1q$4EUTQQO_pF3na`CD15Z$3WXhL*KwI*do+3+(a+i zJUGrM$ljC7%s|U2)uPbLEz!xwLEAgIG(cV1%|Xj9)g;ABE88v2+%?75)yd2&!BeM1 zEu|_68-^SY2TFa*jh0zz_>)kUQ^pj$uB88D^Mjt(>mHK%+fyEP0dmxh07|$ z$iq)v)w#qmD#0bi&c-0Y&cQb;+Bn!H#Uek&+}$_BKGaFqKr_H0J=M!rF~lZ9U&}8} z*Fr<7&@e?SJy3%ySi_#>U$- z-ODIn&nZ;VPd%bAz+8u`z{?`W($-2hFg2+p&@wL~L&wZjJuqCu-8efw*r-^yxWF#k z%QQEXB-bb{u-MBxFvK|5g-a(n*2h*u(KyXGIz>stCnu#u-zz&; zGg`x6H>$|RC_BT|GF{U+HaN0CJ0{h~ODv{%)>L-RM9umsX#HvD%?6XMmf?h z(WubFMkmT9F~uvqz`(yWEJu+`-7h59Ho-{4E7Q$9&fZ?b)yT)iHbmblJu=WfI7>gu zxHK<0#!uNHP07_iEI1&^KRv+KFe)V|*xkX;U(H>^oGYxzHM!KuB(Ees-AFyyGutac z-z_=9K0G|#DJVESPc_TOz|PCWSu-{{#yKU#B1I`fEiKqh-&)JZ$1XI$#M6_@C`~=X z*UvQ1KruP1KwG~cHNf4dKtm_oJvk;IImp*I&dxnE*ELBuGpxWnJT|W|$HBVTA|Tx= zC_moDCOSe(nJdjDBqq$!NlVc?Dbpp(KiMtCUMWY@O(#9W!CP0`$j{FwGd#n{INZfi zLse5vJ=!+T+cQKrE+@d+&^;zA&Cs4JEycn)*upo_R@vGhFx56W-8)vZ$T2G|!zZ&? ztw`I~Fh15iCBsk6v&7jiJ*zmaz@{KaKhV}NBCbH$COk{okISSqFvZwA#Z|@HNmbuJ z$2DDBQ!m}yE+E}o*~Qj7OGDAoG(WM}At*mj-!Mu&FH@&TKh89zP){dUE73S5+BuNR z$~Z61sX*P(ugD_Yti)EcG%qpVJul8(TR*1QSl7+QHOgFHEmpJ0!z{-;t4P~k*TT-& zsK6=2#3wx0FZ=Qd=>~!cog4%+1_DE!{KQH{VD%!c#e=$V}T=o6F0|(j-|~H$zK3 z*D z*v8j4HC9_AB*HVc$jT$omdivxUESByzSPD)+0Cs)OG`z`Ce|uNsWjErEl4dPQztJk z#NM?yD=t1SOs&AHG|DjE(9+XR!z5ZG&?r$=)jf~PAyXwP+B85V(oiqf)5FXoA~VA^ zG}uJbFeund!#uh;&e+j8Q!TeBBE~$?D9ghjKE$mkIK($U#w|xX!`eL1hs)7CDNwC2 z!ra&;G&@Yi!Y3?K!zbU+Dbvi@#7j9UJ5SZnFWn%`JFGCz#V=h+-^ju?(k9N)OF3KB zF1X0QurQL#)HXLLF3jIa+aos0FDF$eO5fDhP9rlaMcFbqH^9%rJ*p%+Bvv!U!6`o_ zEiR)lA;>~2!8pPsN7czH!ZO6vmdjT)JS;~qSScs3&_3EH%0I|SKd>;%$R%1U+dMTW zCDOCh);`%T%)!k+H^;y+(JIB%+}kfB#V$9-Ju)*j!7Pi*J|QQ@DkV57&C@`~!Z<`z zCo4VAM=wt?Mkh$i${|rnJJLEaI$Fa-FV4%@QrRLbB|B8nJKWwV+F8#uOeID?m@73o zEy>;`D&H$uGs@H>)7#KEEj!86D?`()INaRCAtEq1%gQJq#Ue~U%{f(B&m~zk#Z@)N zFe25uFfuAf*;1QJKO{NdzgXQl%uyxNGsQKkNIh9YKS9gc*g(TZ(cjQV&8Q?lKrKqq z!$v71)7#G1JkUEhF+tTV**)9MH9RTGnaeFzTcuF9B*4N5d@#lKiz(KVhcG}zA4B}PBA(APRQ zBg8#CFelm2&eASBU(3=s-Brgd-#X69G&9mMURx(tU(Hv`R@F-{Ey+SHDIquCBhuV2 zgey2m)lOG2PtDfKQpYA#Gb1&{IXN>rLEqR&#lyl&*Ulp^Ilolb$E(1|%rVS1Mk^#M zTi?Mj+ReN)Eh{F(&Oex|z~8Vat*}(f$W_HSB|a_BSz9yP#?Y$3#oklfUdu+!!K}bL zB`_{dH8H)wIl(8+SV_s!)Y;hBQzc0y%GWk1kSi~)DBeBDSi>zL-745SDk;e}(AzUV zGP5v5FUhYkCC$Oz!z#!%Cf&x;G1Vr#DA_MZ(bm0KvoO`kt0Y*(!Bm^eDj+K`E-1y& z$DqJD(@tNjB*D5gQYFDJFtjKt!O+~zI>b)H#78SUH6q$ZBQnw0sMuJ^&MwzH-Z3TF z$RX3$iz`;sEjL&(wbV1(B}*;7IJwX?!Z+Vj*UHo1C^KI@I9D^tTPse>*U-m6$ud4l z-`yy{&cfHA)F(0BF~B1>DP50CH%rAL*(}RjDag@YNvTNP#NIMq(ayz6Csxh4s6@v# z%*oMOvryZ?R>wU~(=4OJIV;sHBPPqsOg}3&-73sBlq){6K)E2MSi?WfCB!=;G|fQW z!7f2PFC;6txJWmJs_Y|Nh3JYDKaZ7HMEG!$-E@n z$jd4zs324)J;2zf$T7;vJH*gL-^b0$E6hwK!cNONL`^5q+)*(rFEPTbI5bbsPut5i z-O|!G)FH*rl*>3MM>pRoOgFVaIn7HkGbuE>K*`r5Av)IE$383A!^I`L#3b51!^hFn zJgV3r+CwGTIWI*`OWn&wF~cW9Co_*LPD9VqF4#UpHz~=*w%EcfLO(e>#W~d>!?7ga zuAneQJ1xPgDAhPNT*E~p-8Mtb!6eg1%~8$OzQ{c}%RkPxgv-guIo-_Lz{|rs$ zPAwt8Hp@5K#U#%^Bg{6_$U!%;I8e{Ysl<)TNi*CcC&$iP&o|OH#7E0MP%$*CNZ%() zNkc=;N6E_5B*HQ|-cBbf#Hb`h*V{N=GbcRF*VH-6EK*k|+ce+aohvTdE-1n>saPrB zP&+xpF(p1t!%(?2#UxSHF*YMC+`+EMKrhTWQZ+4B(^Mr`%_J*JQ!my#p(wDx&?cm$ zRMnhI+b1_MnfsUz}nGT$s{a3LpL}?GbGnVDL+y@S2N1jy;Q?9G|t(>xGH?-#g4Y#KOu$$=*p-gUdZT(Ka_Z z$HyTlP0!EA#9hNG(#qQcCnVS2CPp#UTq_{N+aW4dMccx(MAb7nJIygKTQff)-P1wO z)5I{-qaeu0N5wrxCpx>4+&Zo#-9E@KLERxRIL<>o+dA1LFrlber6@NyGfzFzAU`nIEI7k5ol83+ z*e}k%M8!fy(KJ0$$=};Q&MGy=Em}RmJEqv*T{qkyGo>KKBGfhBCo4KlQ7JGe&oVhX z$TPlF-6bwJ&mxbj*epNa*1IU}7*&o9B>TFpZ#x>Q@o z%Q`W@(ALh;F(B61U)v!|IXN`n%gMtrFGx`%$V^+&#MU8PUrVvr#Jj{S$Rj8>sw6co zmn$t=+sxS}wkRvn+0RuqT+1jSNiQhX(@8lsFUTO>(=pM*C)~p+)F$8ECn`Na$-*nn z%A(Xs)7{iAFjY0(%gK)`$0Nhe&e=#$%Ox_x+#oe1#;DlG+*L8pCc-sI$uu}qEk8k9 z*VMwpM9tpUHq$BJIW0=pqQKwVq$oDU+oagrhfC8z*F3|iFj6hrJy6-Ds7PDU(OF5` z&@9JOJv%Nt$1gjq*elD>%*ZrT%}LA5FeW8V$umtQIzQe~%fn5@Db|9k$W6t=Mm10+ z%qy%=-NN1{H_bRw**7}QTrWG{R6E_tJSwcfA}==1#M9HyEi)uK`W|QIp2`WOg|#pI>9t8!Z^XsLCr$Z-r3vM-Y(TSGDXWZ+04vZ z)5syv$G$k*RVTgFKh;~^E;}hBPq)wID<@CcP-f*D#$c-CZL( z(Zaz_D?n90P&*}|(8}66+Q`r+#KJFLKT1a{E3G6n-8U!8FF#qez%M=3**75~JIBsE zN>@YK*-J;?kqb0`la?0iVr5m7tgKjS7^;*Ws;p_3;9C^wRG?*BT3DJ_7@npPALke5 zZx!Pkq^B61onez47gP{vZ$GJ9_11g=bEYOpP`p+maLqlVU!)1 zV3cL!>EWH1m135ZA7LKgoRVN_>8h5c<`U%Rm#AYEAED~bWe{(hVPkEfq{L;G zo}%bz?d+@R6_o3uA8ipHnV+7Ls$rTQpc$sFrIQ>IZ0GKls%W#i&(m|ZIY8=cuD%~lOCQKubu9$VwkF(u5T7@uWVSHY@+U`W8)kc9hws4>KLHpoDycJ8fu!7;BTU> z@93cxk``SY1Zr73g*eB1MkHuOB?b9L6^3QUaD@c~#O1kY`Maq*rJEXAnt6JcxE5II z7Mr>IyQ*jg7x-z$Du(47<>`94hS&vKm>PyADi;?9_~)8LsHNv6Dl2j&2SnQ%hh{40 zdS(}z=sVlHnWW|Gx&?Wa7HjHf##!rF=h!lspY8j^+$EEAJ+nIW#`9)f5 z2Ro&Cb14_whq(DimN*!z+ZOm2=c91!Cnb30Stc9%Is0(g z*;oe}`o)-M%j+2|`4Cxko1c>8l{7wTEM8k^`FI8`Dg07JI1P|r>SSgbE&ulD23X(=ohGK zs}+W)c2r&(x31-qn~r6y{7o0%6yDe0zKs0F3E=NLJ78Jb!-q=e}D zs%mg07X|CZ>PGq)#b+fcg$KB+Yk8;Gx@Sa|<`t-CIwX{sxF;KF8mW257iwh(y2M!; zM`+|LXJv#L>8q9G$NNQxaRp?k$9o2*gcSS4rUYC01$Y#jrK$vZdjw}#m)a&~8W?5y z`bMfaYZzJE2Ac$hID};6St9xo9dUncAtPCr1{gM3fkKrp5Z%IcJ+2o4Bfm`{^j^riB_?tCry3V0TC1mcdPn8w7-bvisivm~7siFUS|sOd8zja>1n2Adn)wD>`S=%k zd3(f1hZyU-1}UYxSvV*q1={QAahcnB_$g*Y2HM*zhZZL&X{P0?r`tOhSj2exWm+2M z>Km6hX}h^QSa>N}Dml5>SlSwRr)TNv**IG!CxwQYs9AHx`xxlkdnN?gm{>Z;=q9FQ z+BzwD8~CRvTcnmaxMdY5r~9NSC&pM>8tG+eyG3iH*sJ856zE5&B}D23rJCr(aYcB< zSvb4r*o9;#s%x7>sH-WO>$)j=n+3RdmBy(m##>ri#U&b8*`|jZsV8WbCfbA-n5Gq2 zTE!J>McL{brH65)xktyTr@MoS0BeT=75k7hWi26V13=xR2@A{tspl$3$yHuQUfawJ>`f%kC;3M^K=UbwH%#NC*1(9 zR5d+IL*vl+09At!owW1Qc0iaK`rnXbuR;pU3ohRR$)Sr*~yn(h_}5k+P`jw-JHK}9Y;dFlaq zj`3MJp&9WpX<7L?!5Rey9tj2MmdZ}Pj{cT9`qrkg`EJQx0a`hET#@k!0UfrK<5Mx|V7=noho6PTmO`$vMuZda#6sZiz5ehs!B%ORg&t0!*+wow!G@-mTn?pfiIH}e z(cwm#g=t|W`O%7bhT2xPh4zWg#sS`e;hqtBCIO1srsj&JacTO2C4RXP#wL0ZN}+Cf zMTY*_nc-ZX+4do&aq%IJfx46WoMx{+aCT$<)# zDN)uL0YQ3pC7Q~b;eLvaVcvy`QSLGJd2Ru^c^+17zHXK-C4nlcet~J}=><9I{z;hu zxiL{T8X;=ds*YSHHg^8Oe!e+TP9Dl`X6DJt)^36N=EiXmIvQsF#@PnB-o9Fe$tA@e zS$4r@cFJKf%1$=6u|*b+%7M4b7)3st1^Oe2w^ex?^ zd?ON4Qtchg(^L|ZymdTM>~n%LlP$ySl6``dEZvNP)MMQ=(hZZ;ZMgCbjY_O?672mv z@(tYM?1RH|;+@}`zo4Xx7)6+Q9`OFW#z9GvrWT+~dJEsV2*{1SZ9QXI3@oK*bOJql74 z^_{#m%#sz83WB}$W0Q4)^0*?x@@-YE^W)8RqjE!vbxiX!{3Fy&atb^h;#@WS&4aA- zG}EGrjI|3=5?uA{@-oxoGL+IaUG*c~GYvfpQ_R!3d_y!WBXd=fJRPGAT{QBvOH8cO zLfw;M{4@>KqOD!kL)@HfHI0>>l`{iNLL-ya6%C9WHHuvvosCVy%(bJ;?YV5Dbc!=w z{PHz2t+KQo67rq=)Kh#C!@_kmm9s*PLQ0%;-Q8>rZIaA%jNRgF?V~d6^i5L=L)23e zGWFB!4TDp;GHv7Hwc?b5^qsUdg91b2f>MKu5>@n!vtu%H(jC2Hb39TUij{(N^0Hji zV=YuNOH-8$aw9Y}%oCk5oKzC@w7DGJ6YWj3lA_#`)1t%mth_w)lr#*Z3@rmfL!-4z zL#+(_T>~_26m|TyoUL=S%#6axYxld>X|RO1|-lFTDQ z6OyA!warqB9kX3B)t&6P!b%*&LVYy-{o=i&1M@t?Geh$%4OE>{?M>`b43n}Q-HnTK zvOJ9pU4oRHl`MRG;zCSa3$5ea3sa3PB7^LToVXO-)Cxmv;_S?|%?!2UTr?u1!V=xh z6SB0N@^Wk~{oSp?i>(9vBV){c!z>LwvsCjkOf%z>yfQ3RjEc2mqto@dEX=$-RSOM* zR83T!(tL7Lk{ld#lu{h^eT{EY)(;!sC5R4Pte|oGtY9J#)g1^@6ODTrw@91H3d1Y_0ROQ@or_-3-z! z6LMm-!@cxVGQCq%Qi@ZG6+P{^;teevf}9PDvX$e*OQZbsqkQ%Cbe+SE(+k3KJ$$1y zL)AlL<82fp^NKQa3lx2_V-1p{3tcsm!j%#tQk?Db?YPoX3Q9Gc4ZX5`iuLV{a-$8> z!xXc$?KQ%63{s6#6GBz264cdgRU;Ctbj+-RbG%i;B0OEql)R0LLo*6fZFK^^5Wf8HA{889Q8b` zeC&c9jKYeeBe=qH-P27?)ogRs0`#n+lTFnM%pH|2-3m07O%x*)i?ySJgLD0DEG?sh zBBD&yl+1NgbK^n`GP5GmG86qQ+|(?&l!B5K6@4bCgXzb91b`GtF~!?6Q@d z{Q@)0ecUv)^)k|P&Ha^3^x{JN{Y)%O{le_I0zEU5ZSzxAv@?oS3sNHeL*v3+RBY7D zVD^NKB_EV;ZalFUqu3v6A@ z;vI|PV^dvRL!EV%b0f?xT=e6Dyb|@(ii3Pp-3_BN)m3#pLp0KIwBmG~T%vOnRkVzw zB2^Q)LNcs83yMq~%)_%YQ)5bUBONW(wB1Wwt*tdxA~S6Z6N|D!qO*O|0(A@v0}?bH zb)#e5{E}Q;HG};Nvz?Q(wYkh@-b$EDM!vqGKZqbCmQ`^zws4tW2VUl?%NzJ%ik$!UBDAlpOuk@|+aI z9b?l2;tDOe!VRJdbKP9C6V)tya}Cvla;z0?eIl*ZwZfGZ-3y~sExa?MH9h=tRlMB{ zk}YgX<1LEKGxdu!Tw=|gVnQ|4b-9uZEM1L_Lmf?Rt!#tCR8n*l3$$Z`EP_m?5-CwN2FAl^r5-&DHIcHBECZy{+Ti(i7~Ay>*jajm@=PeF8n5@^zF|G`V6j z)3OY8OB_5+?E^v;)p81htqiqG3^J8MOpUaHgDfmcJpwEY9efJ3;xnC+T+$N?v{hA; zBel&!)08{{3(QNnV(nEzld}rEirn&&qdbz7B7whO=C2@{5>NIGZO<84Rq`?twMa#wUvXt9Kvj(f>bQI?6p1ZqBZsW-HlB% zZT<5DJv1CLJuFQ_%=}b6?R~Q1(sh$Fi=(5xv(th@-J+wNolE02{Zn!*B3h{bIZeN(_C9LQH&g@-nTXGD}ke zEDAw~+gqe*Xe;Yj80B%fSSDp@I|aBK>8o1#IT*P)x&_&~Df#G_tHec`7rKS&S!No! z20EI!mBuF*>IMcng&4&6mqe+1t2&jsI)wQtap{x>IOpYsx@4sl87g|ks+NX0=x3=H zCk7k)X;>&ZTY6>Zr)uPBCs78ctSsCXtigeQ0=XKLDL7&@B;Slj41c;uJ|My90} zm88Yly101dn%adFhIn}gWodCKTKGgJ*jxGg*n0SRMV2N<>ty>ldFw}~#F{&&8RqzT zXQx^vM*3;#XcflidOG+S2PX$*q{U^VN81!8XIZ(sa78+3M`R``hg$er_!b71sG6nt z6cuTv`01MF7Dg(YJDR6?x$5R;CF(0VrIZ>ZnUs2FheQ|@C~7A8hh{3dWTkLrCFo~* z8b_H}D4Y1CrkQ9tn0WXqI{HNChnQw6+L$Hzc-xzMnmeZ2q*}!1Yb7`tm?kLs=)@Ey zyZMz^CfK>Ba=E$tW*P=Xg$D#{dD!GSWW+dYXN0H+g{yf4`?%(~L`9^gCAism<(ih5 zsd*OoW@p9}g}Ay#W|Rhp1zG7j6{~Tjd#Hu#c_d{9W~t<-gaj01$AwzksKwfwajDq3=9(ym#V6UCWCZG3 zD3mD-0`+dD@VyIDDzI0fm&CMTy@XnR}R7}`1n>y_A<=2!&i z+o+o)WoP?`#%pM6a>Z%s8Ms8HD;tOTC0Zm}ITaTa2WlHzgv2NMx&?cMsOtG?sVf$z z_{U|ZrX^_GTLed@t3@UnMWq;fg&78_$K`Sb6uM^zB^$bVTltl!yT?SEI0QsznK*bk zN5v`{8%3#`m_!(*W&~Sj#%cN(#oGE>6k0jtrP*m^*d|ycM5PD1bA?+QB<8snB>0); z>)P8S23lCCm6!+X`kT6iW`!iAs}(E7Mk!?#x_CHcM1|%k=cK6l>ZfK|`nlMrtA~1K zIr(t~Wonoh#VAJw8QS@!J7!uqdIuJy7kOHi>TAXosGDlXc*fbq=~}v|Sa@6HBx&i! zTSO=Nd-~YBBqhx$d6*SNC F#}#MjdiZ`3@CS}Fzr2AS$as}%;`bR3d z<_37GWGE#i>8J$yntR9lx_FoxsA@WBsTAZJSOx^Aqdz)JpYUE{WJE)r^yCga|CT9DV zI=DugnuNrt2Kc+HDF@}M+S?kdb45j&rr9PL7)RKKdL&xsry#C3xy2V>S}8HCP&z$=6HLB1;vLN8fhiPs|KkXyL&mBhno1>mXri&s0OL4apk4^ zq=#fGml#?`cqFNtC&g)J=XeE~hueon_?viU`gvx#8b^fWdBj`m*~S+p*%un675Uhv z$41$P$Jn~3#pQE3s}}mlr^o1773R6BD93x}rrEiNyV^%7n%Z01MY~$(Ih#1AS(({* zlqAHL7^<6vmt<<27bqvCm8gX$1(#?Ra~YMI`74@cq!@=r=tTMz=-RsGClq*_Dr#mW zXLwtNyXzV12djGMc*m%_M#Y7w*v2XgT{N*vsMLJBNBBehgZ9W*^P0-aQq1EakYB3!c#OoB>FGnIl(bh(s*wY(BC3^YBo zd^MHLbaK+QvIFcqV)f#33JP?Sa_tP%l>Kx{6Y~<%QbN763L_GIgEC9KHC>X@?IN9g zZFOw8bZt{hOzo6%4UJO_ij$&@Or4UFBZ^DH)s^C%9o%e_{B28}T--BKER5o^415BU z-Si!k%^d9viap{rvs6vuow=-yRn(Q0GfK0~&2rp*)C^S9f}&N6ts`>7vkP?sL-K6n zoukw=)NKOeRAM|+t<7QzGc;WE9b%L`tt?VA)Gb`Oj57>Xg7OoJL$d6RRCQwGJdAui z!W?bXG%XA>GfRs#G?SfG^gKhOz4eOpl43kG4Q+Mf%&Z)&O4PHBoYH;5Jh}3n^9l+I z+=@d=6bqfwi=5PQ+_KH014@Dt0}OPcT@^EeY^>dr)isJW^HY_Qb)6%V!i>EOqxIdi zEnU-%oGiV$ywVDsWBd~o^D~olbE68gvaBLKB1$d1{R?&Uv@;F+b6u=8ierLge3}cc?j2seuRE#20@{+u5Otr$ea+Aa2g0d3~3eppT^;Bal zl6BRUqK(4S!s5cM(u=&bts;sIU7eD`f;`j;QuRYZ90RosbM;+ARqSJv0`t<0Lb?21 z40J*ZUECZpyhF@OvegY^6SHiy{erdQ(~Od}Ogxffquiaevg{+>6}_^8lM_pg3hd2{ zz1>RP`~nIr(hU{4GOa9~t>f%;LQ*}n9YVc>1B#teb>d4*lpJh>Z1vQ%0@dOoYz=K} zY~4$;jU#=Fg97Z6Z5`D8jkF3J4Kw|%Y`9X)y$chRGwcJ3^op%4eDZ@5G>UzT)cqaI zZC#xcR5MeeVtkDJv`m!sR9#(CRXp{zEyCOi@|}#8opcPdEu6!-Jc85`;vJ)$!_!mK zOe|DlqY@1Dqm#0o)Los73^KBml^n7nl2lBrG@|u#EK+m59aU@+GM&5>RSOG?^OT&l z9w)wPWEvV4n7bOJO|tV)7%-F<9} zP2Hk>v$S=M6I|5vRW%efZNuX-d^A)oJWVp~)wz;9(oGb@Gh7Qbtx64bO?Dc(hG;=~?LoAI_6SS=ZGOVLRO4Xdb6O&xIe3Xro)hs-9 zEMna~qw_s%yxe^f+~RGMgF?+Uf{fi_V*GTBgLC}ye6&-862iO;l2qKy5{ul-4NC$Y zyt5qhGPt}GRgDbNO7o&Ea@8#YBLb5%eZ4fyRqd4x@)BKx!_~7A@+}oLf-+L#H3CXf z3U!<_a+I?yy`nUY3pJA6Y+NOX9Ts-GY66qqIzlGPx2>Q$1bGGxGv%!Y!1d3?p(> z!ky!SgY^S5&HW8h^-UeqO)QGMV~xz+RgLUjR3lAug0c+bO|q4&!mJ{61MOY8;?>+j zbdx=-(_I~M5>(G__+A-J-QUTmtp&oibHo+w2-AdBKJyiUX()EjNjP+gJ^pZ>qJnd}@6*VKHBGU~0>^XtTyzYqV&aXRvkJ08tPI?3ef>>LwDhx5Op>y= z!c8?b6C864>|z6BlJx^}W21e1{j$R2b*%Mb4Kv);%)PZTGMrsYR2^fjf};EalzcSw zk`jw`1N=>#@(RsOw7G25;&MImEc~nk(ySEqZB#6>to8DJbF3f~<|abe(hk{1Xhg@&c8#T+LE7Q;c;S^mPK2taR*EwVdpI zj9iK}!vgb-HB~k3^4v6)qO**XECO{sTw*A}lj4)N%@Ak{n}A^?Xz9%)IP<6Y?{%jI)w5t?YvWyj?8~ ztPLZwwN-KpjBV8PmHi_P0=V4FJW~n{15>@Ca{Th660;JVG_M1B$)4bbKO0wap^cJc4`@gObxNLUl`& zJ)(^@1KrJwqAUy?3o>(# z{1hV$owAbRoC_3v!!sRCv=V~V^3rwEEv$`;ebdd8{0vhAixRc-^c4LIy;T#UGP8Y5 zeO1+6+;wfZe6!s0Y{Kqa%#-5m3%TM7bxH$6L%jUF{jA)*;@pjlyj_jGOsq7GtbF_m z!z~@M0<<%86O~nUEs8RAvvM^vjErmwlC#n?ZSt+vRgCkwVthh<0`hc~GE5Q*N|kb5 zV;u|?Qq>davW>|b%K+F3e*Fl9k>FGqk{uHLQ`UNtV~jiLyR>nUGj1*om@g} zV+v!_?ZX1&?ecQm5)+f6lmhIt3kwr~#we?7ix&FpfmjT0h+@~v%hjUqB4VpX+lQj*Og)smfk)3Sp! zJyJu}-P|&xHPoFVeSQ2>^AYqKvHERJAhF1FXGlG&J-xViNV73QN3gV{OfRL-Pvs^F54W5=)J_GW`8j0utS_ z{Zh?5(=8o+++$pVv_kx1Y#sef9fE_kENxUB+%iq_HS{w*%uF@ZG~GPaH1*9D{qk~? zjP$}iUAas$qJ5OCeC+ZaJv~#@6LZph6ty*D{WAhxjWWX`(%kL+a}(n;G>v`S^#Y6Z zg5o?3Qwr>3%(P3h;~kPRP2(cCd>wQ${3Fu?+;a4t4HaE<)s^*>3?t19ePVMhg3U}k z!aPEQ3taP4Bh++~(|p|u%(Aj|GvX4BmDC)yi_P3ra=7#})#GBk@>I3*d{XUftc?wm zb)1}24HDceb3L=%9Bfj3Vk}Hj%&wC*mQbui&V z)YLCG5;Q`WUJ>a!H>u0cI%w)){koM63fwGVPUqepx?`Lar>CJ6Z<&Abc(~!2*@dr7 zm^tQ#I$w3$aW%5ys-?h_(kaPnw}rASXFa6L%w&GZXF{=3&Xdd2rlnt;GC#8MiwloG z-`{BFUz=Ayxjez(%i}GFntJlS2VB`W>EOk022=kEER!lcZPLW|Xp6b8%3Y2=e|E!m zrwd&Qf6v^slDqm@Zjv`Ei;%#%g49!mMy?k$j&~ZAo;qhNdiCYT(BLy$s=f4N4Guk2 zzjb>;@$L<-l7c30dSq-xuNVJX{v@?$p5f1nna5ZjU(wn8ENw^F(h_rK4)N?{u6Wy7 z+r0!;{{8)FyiNW2)a2>P0WC+lS;AI6O}@4-&G1~*uV4P`JoghS9-0bivv@|9mAvg) zyn3hXZTaXANB8>c%~UIy`%UklsVv8{UthnSyBVfCzw`23i65V14O|I(|e zCfpL6k~gSmZIkTMyRpaOZgS7*8Q(wNu}ZkX)_ifP^kLb*N=Ih|EkAfMIAX8eZOLml z*06r^UM|Vw)_2QuS8fH*-Ode00$VnSubh1*Td{EMg!)j13wl#LU;3H}e7h)oYMVAw zwrJMF5=mXrZEFO#`x!Sx#DykmyKLbObu!~^@=|?qZR+B zd06iWrzRQMP~YfKz35U?omWq*UpE}wnRQ-dXUI8~1df;=uQpZaD$MF%9d-9#$&Iy_ zSeO!@oe4STYT=$$q_!i*<4drjn#j+W%irF;zMW4Z_`n3M?)PpwPhIA?>AT!JmCjgM ze#6tg)>gLcWP<}=)2}siR{B>TK6*q}>+7b%Z|Cc`y^uWWy-YB6g=&!H@!x04za~GE zIsT66=pH$ziv<$X^!2PFGrcvrQGDeub16UYu)qEXqP+2BJSn?UzhpFE3cJP623SK{@L@` zGvc_{RdfG0ayL78M6%Y)ee+(%$jg%CBM_lD=QQhBq)WFmvS2F^WYJDUBY4X>SS}n)Ue}86a@z1WA^4xi&-Tla!PLVT17q~wbxhDK%_ow^o zKTde{T-(05`>&*}^WV?a;Xfjcxm|>-cI_|wlESHFVyf*8%85#xe|j>1UhH9L-0^S5 zRzcQ)z(4bY^JW*FJ9S@+fuq@AuT@;GV_M~ea3<3|xs~-jke7f>2<936dU+t`G z(~3N9i=ZrLteVVn$d%kNzK+@bv(aR;YMS3Q$dsB6PL(-8|o{=mPXO>Fbo7x$8 z^UVy9o%{b)i64G<^Yqbuy{VQ8Eyzj0zcqj621w(@A;yA9|iFxcgb6QL#n;e6>*=JfW)0$rVW$C`sS&T=t_8w$u zI&ir2*w1bD%2^Xny!oBF@06G&$8;VBFNF`6vMRT53ZLXkX8Wh}M)qAXUz>Jqa>Ypo z#ayQ?AJp4gKh$h_!aMW*`{bwlrdno+eqFaKbe4gmK}k>fxp@<<9psc7=TvN!;ka9t zTDsfMVgLWBjE#~lC(gX<^KFRO`R+UGlXo|Eh&_7HW^{0B(ee+M7@M=o-z?jkma$m! zxuEUT0FJ6Fwejn@54zP(u3v4E*tFr*rytxGYQ#&=uTB%-H{&$?|Jv)i^r3Lp233ZF zUR#b|c3$;uj`eH3EN3$cYz8v)L@7jfpt)Z{-?c%0h zYu}S)nzLigy!SW$Szb54d+z<}Q$pc)E`@|Xd-b~dHAAAU+WDi=EC0{s^_zKe#@6TC z7KI#H%9Q?mT}bM~V}Es-TciXYhWQpNYupdK{ol;#WYEVyI{*GDA7EIpCI29(Btb7z z%oPk2K!t~)A?SGX)Vvfh#{zUFF^FYjqX0X>)wQC;J-8&XBo%awtD{0mQ7M?^t6-pK z0J;<*B*;iX-z7CIu{5Vd0p)4~3rnaaxJ^q-%qb?;I7`ss$WX@-DDXhOLoe_`rrphx zcIRoG@9=(sH)n>Kb5ULXY%|WTXUhbOg1;oaKGDY&&6Tp%;oiPE4KN11~ocKeLY%2M;zJ>odm_F!V` zL+#YhM@4(K@<~iOpkb=~;)dieyWTV6sjdb|%MMPsaVNqk>x9Fa)P{ufA=)hqSUK|k zzFbvV=pt9Nao6g$Bc}S_qK+`$VYE$hJ95+Z$ip3eYwUbCiUgmTBpxoh&Zan9)%tWKkeu{nsqiM6Argc(OX1zwOWKJnJTQfabV@!qv0+3@25@W;W!y9 zqIe{S}yZy(kj{?+9s^o2kEYmfJ(;zi2;KWwS|{cv;HtIyBQ-`#z>Qs3m{yE5Cqf8W0? zv9y1G-@|kF>Akge|NgzLu)TY>zwBq>KD*d+%XdHj8{dBa%5&+t(;baVez+dZ6R&=8 z`A>n}J-_lY)A{>vP3OOUGvfc;ykhsAFMePC_;I!7zFPffjU^vcZ8>&v{$Hn;bnVZV zo$K^We*OGa@se@*hTkT==R3>l-+cX4w5zsyR(;I%!dGq=EXw!4=l}mg?*g;#svjLS zcJ?-M^?QUY?BstRuX+3b{XWSjcR$ux$JKvgw?F59KY#k>*!TP9towaWb9ejYpCF4{t@)TbA&&0z}BVX@;r5MI69|IE8LFHjUViD--8bedqf$~AA#rdU0$*IK(phLDn z2iZF3=ar=9l@u#L`ii{zzNsmhiI5v@KqaM_p^<{Qr4i_mZhhyX`~vJULHXdK-2kQJ z23Y|uXnFMmit>|#Q%e-074!pK+!XXfQY%WphJudRRRA|WO%zN(MSYNhzMH9nDadjV z(@X*CdOJG>UVTJ00@C6hY^Y!et{))9G)M`w5(0S#YB{VwY-Db33~%ESx@`tz6tuSE zvapVD^|3Uw$aGh;Qwu3A)^iR`_0`J?FHF+$4RAA3EDbM7REyQh3$u?e(ANodNDR>S z%F(j4chFQfD@s-}(%_2B@zBh*($y}?G*$|9^473c^9;-=_Ej#;2o2WC&(jV!unAEw zHg1HqrCsa!w5~jPuec3^mS+bvCn6N>@@dEDCW6 z)JzTZwbQWAF^N!1arVfuiOC7pbMa8L)X;QH(22G8)H2nI%_t0yDd4isi?)k0i!L;A z)Q$G^_0@3GGxto3bO}g^O>{Rava*j0cgu?L3rfgSHMMij$;$DvC~(cuR?kb$w0Cic z4pGhGa?eUs&kWNsbx@B=4lz$m*78WOE_974DRy;<(u`1xj10($*N8XIDc04~%}H_4 zGjXu=HOh?(OLw%f$kS0&&gTlxHP*4rwba%PwTjenjdF4gHMh#t@b`9!D-DlLFHkWK z_Kns`@{UL{aSqJZRg3mWRadcy^V2ibjZIH?OE=5oO34j#(F;-vH+QyHF)v9{Rv2b+a(hYFRP&JOw_O^{qP)kWO(KE|-vk5nJva~A+^>$Ts42X^~QOwS@i7^eb zQFHOqF);8^v<$XLOjPj*%(shk)Z{Yr%C)wP3{NYH^^Qr@OEdCtHVq2MvNy5JEeWy? zh$%LXNzW|_u?dZ^){BnN$;gVf3D*xVwKdI62vf81NHtF9ax)6Hb&K>)iBU9;@YG5V z)Qd>VHVX=fG6>GpG}dv7(A2O}Q`R!EQ#8|2(Ml*V_VHKNwy{ahx5)EIbW~4GR^xKh zGE>)zNHelC)6&dvG02H?%~tkFH}s3RYBe zOmp`S2vIhT&`$B=^3%u+GuHEVHTH{FR?Eyub&8Ak@ORU<^3YE!4b;u@4bIh5^vI4i z^NR8dQgg}*)sD?{wNoO zw^l0B)AK1wb#sl*(@aXxNm0{QDk}DJaaYaBGcvMN%W{fQ*7kGb@-L3`$hWdF4vdVl zP4bG2cL`H5G}X~faWaTDG>SKOwo432^9@kf3r`FW&CfLV(Tk3CQd162EQ$_Lv2=0Q zQsm0h*Edy;j80M0HY<&CQL#}>P%l(dOwMyrR1P!JH`X%CwGLLw$qu$Q_0SDl`fRDa}^Wv`F?b3e@#7iZDz_)l_y<4$6*5)sHOnD6vy@4pme)%rmi6Q3_X8 z@^dH*w&4oPP|*vI^w;xAQTJ0yG*wCVF<14;w^b<)i!pc1k5MvI@(Yg0_tABBHd9Nt zHu1@giT1TqOZN5AR#Xej)77%z(hDip3bWI33{s2@)6a|ZvrG@QjLS_A)k#ZMvq;ek zRrAbOOb7{f(~B~+ck(buF;Pwn)60qqOLxw3vCJqj3*pMwP-?qRrInmGO~|K@yZVj2=Pxf3HLHK%tV~a0*q+4@xl($}m<_weqqw zS8_|t3P~^twhcB^_w`A4a@32mO0ZOmip{df&a}x@im-Hz*5h&vH7fSdFv>G^G`28M z_eqZP^*0F!jxf%MRtygf%r;5XbWYUBH`k7{iYZL+)pga1@Yj#fvA0V!$ul#KNJ$9d z3M;WxPjgVq^oZB>@pQIGbIJG2&WdnP@JQ2lj17&;G%oRQP07}Gjq;8!Ey|D3^wx_o zkFvH(bxSfV$ukc1x8u?`Fb(z3H;>oQHL>vbO}F#WwaRxf$&a(rv`x(~vd)Xwi_r6M zNwxM0Hp>l+$PX^g^Gh-^Q1>$^N;L~|vJT1M3do3vu?$z$OR?57DK1cPa5pH3(?~7! zG%&PQFD;5Ni;a$o*2^+34$`rUFb%QtFE&l}a?8$%Psufnb4W{$aN_a_Q!Yqx^v=w* zw98Yq_l`6+cFnS}a1F6gbJvb`aS4e@%!&@TNDMZz)K)aG3^Fv0@`wm1bW6#%anFuW zSJKtv@>jQaFjbFm&R0}daW68;v9V3oQ%&D04zY0bwBXVT30HHm^2^WkR<$wn^Yl;(D^apY@i*1;i^$21O?6VS z4YWyhHZpS2GLLt#vMe@qF-h?nDN4;yk1JKvRw;5Yu&(_JbvrKTZ$V%05PjidT z4{=J?E_Nu2w+zhjP{S zi_-~Ak99PTbV*UP){fM&j}7p&QL!`)b5Ki6&`4Jc(9zUPGB3&watcx^i6}AkiRZFa z*DxrES539BHgqkFNKH0O4^7q!F|djAa?1)U2ncgA2oDX2FAa0GH`a~NS4vCE_SZ^u zaLkOzEO7QM4lFR_3h+%-35r(KwhN83(zEw=&(u~lb5zxJ@v$;i4l>Bp3v>%eD6!QF z3Goj0vkx~+*G*6g)C*8_vkCEx%yc#}h~o0{R<~7(vC=XN(hE{m)N#=%O!Q9Cv-C8~ zk1F)HC^m}?%gXmFjn{T?&v2f7VNyv{aaW>KP%vMtLQVej< z@a0nR&(G11OGz!z(@fFIGHPYDx-8GK*Px(0qS)lKvqCo@6H` zV4Vje1w#u^Hw4s?Fjg=$hxISuT@6q(A5W)3-#r*)1ZX@9qlW?VDb!uC9)_WTg`p{# zU5wD+Kua6%;6OjuESo?x|H48`PkjqJ&q(J8oqz&sH-~H`Q}rw>O&=?>Q1?uAzW|+x z99vscQymL8RTUT094>2nUH_nbhiu2lKrJK7sKO$b!T_U?44dFYt>UQAVD;=^cW)I< z7mHX;-#E=&3pLZQG)Irnw2bsPRg1V-{n!|;JeveHlfuXV!@{D%k|-kp%o3O|by~vo*5Yz*Nf@Cj$gBS;6qf*VB98)V@rxNEp|LjafKcmO%tRXp1AiZrz`zJa?X++k10S0(J(EaPi{wPllzio6 zeeXPHn<$rbyXXL;SO=?;crO3kv}_~85-(HzOkEcrlNdL{;C#aX^I}(rfPxZlLmR(5 zbMH`V?L^B0%K$qc^}N6gMIXh+=gUnbHZ?A|PpVCYX zb!QuOXNNG0=$J5T?a=6W9YYs4d&{)^QV;L&0B;NRVEdxnd?#JS)D*R_Ag;tzW7i~S z6>FzF+f?0X9dpw(PZv#1gIrJju%P@bZ|%rP!_+jhlH~OCgpANc)3E3iT|0YoO+9lJ zcij{NOAT`_Hw^=g9F;`(*zh!+V7p9fn*^)Wtgt){Uwgw)ZF_eUo#3QQ1FH-ZW4HWL zWs`)`bf<)n5_8=MC)eE4aFcY+G%kanc$*}hXnmt_FGnRi`!2WqC^r==dn*f9qcrU>Lr05%!UEEi0cOAM-S=_^4u)co(-27p^1|HC4Ctf_M)lZB>mh&rn-05B*%-WOL0t z4{H}|wTP(XL|e}U7w1&nTr)!-9Rnw24UOm&H>IFZf3+kFPpxFGNF%pm-NFRj;sCG0 zloFFj^P)5tH^*3)#I#JSaJ`Tq%K&qI&8WzPn4)4WZ>#WdD-TygMbEszI4i>v|BM{P zIIgIiL?>+)1$V#XQr}lB7&y%artNO%sdTk z_54IvyF?e`WJ5!1O?x#nYePF1-K1v(4q9qj}q%P7_0nAj+;Y)!3V{e-|$ zZ?gzjJ3k$*z;GWUKd)eCBUKeOD`V%th*VA6T)jY(JT2#RYc=ECR6T2Rj|?q0cY6by zY%PbpP_9s)08?BtUV^=$6 z11H@q-{`Q&P$iqlV&yCqC$&Vb1m}PdO$|GrWDm#UXgk|1{dgbm81L*DWp%5h!bs1= za7~{8WusgNE!FVQlJF#3H9I4x+}Jo*r{b6_mAuHnd@e?+7zn6{~cOBppv9T@Q~q)rdlO^Q;tIgOY-PsO%iBf;_zx zs{qH47>CH{0IeX0kZkwdG~=wybTxPF40i|1!jedfxOh_+FV8HEOgDX9T?a2GZ;Ke! z6la$_Q?tS_UoOwIY;!}`(6lU7wSs81G($zDoQxC`w>WEm%g|^wYt3}ad?nu)?*w}t zUt4EYGgWKnJX=3S*Qi|geE)!ySnoWpX#LdE663Jg@GSMxA}eo43r&>*uL#F*a|gpL zPk&YKklYX*FJ+|yMK3!$WtB{8Ep^)%EnSx)=j33wfUv^Y5-$C$z(Bd zKhx+qqY%?nzbNypbaf})==8`Ci^5p1RO{S`91kO9PnSr)%vg6#unb&BUl=Lq(q=LoMU9K-m8KkKY$J#B9@Kchga5M{S) z4_jRoW49v5gi#L}w*o!Akbsy>6D6G zG%dH>SZ6~m{e0I5lQdU<4KFW^d@oB)vkkNH;=OV`<5V^CLU-?+Xv?e&4LuXL{Fo?vUswOk7~3LWb1sblx3EA} zb=Q(yO*iXcGs6&{VwE&C-FzKSBW-2Vj4a(CjE}B`zQB zQmf=_Rr?s*xO9Ch8)a`bHEScQ7?t<{?L_Z5O+^!Pb)BMY*Gz5uB%KJ2a0@*fHM=~Q z0KEhy!{A(BZ`~ZOOqIA$`_$Zsh+@ll|BU#^5a*Zziv+VEjbvw)AhR58|M-*~`)nso z4K1fU>%?foMBT`&2$zIBWAFG-^U!FcFfN_^fWRbI^H_DK9Q_0X&Co)X2#bKgG<%IS zpKPmyFdr*DB^#5dl41+DtV{>R)L5VFwA7e<^T>!;T?>6jn=C~x-&6z5Aax5v-4OFI z2fygpz-Wyk7ayy{45cFDK-=VK72BM64|j{g1P}FqBqQ?xl_=9lKMT7wYn>#^$Qb_; z6)t^;7@xd?Xw`TZGd;T`H6@?a6km0}>}(~aRBMk!M<@RrwG_MPEI z&om=dLlaNGbgO~@lL&W{V!t4Rpr|6h@JywUH2-4VOrKOIP4)PAtJGvJ4RhNlSMvnJ z0&TCD)UXsaJ=+WiW3L3aY(|ik`v=S%t3|BSx z{DO2>W3E8=z`~+JH>2om*F0nUD9vDPT?4NKLp61msE9~&D=i0ATjemH0?&}t2z7n$ zY@ZMlWhcd$1ap@pb$i=nWp`VyP?w-0KOMI$#S+!HxV$J;*93h#m$1O}+}s@d^wJR3 z;xz9lZ?j@`CA%1{xJ*5(809?AU}s~qAj?1_<$_}KEG}15dkb~dl7tZJm{K=W3nx2Y zJv(FL@B)kU2%og5nEdcqE58C4brs8KUl)yFolLD9yF3?l{TvHD=X4)+D}8k?n^J8r z^>p=AUvGPxa6^AXJ1c#a0Ns=*b8D-JBRjWvlfr;x8@(8VP*3Gh zC8Kza5=DKj0{i>|``E(xu&nSjS3jE=BR%^}eNRo}z*5HyW3FO7$GChGUFRGF2P1pq z7{{0_m9!k&ydaYdWt~Xd$c%IkRcn8(Xzf_z)Id)?eOs?MZ;c4cj3|Fcov@U!lEiE- z9WM_(ZARC)G?xw|MJV%_1}VOy8U$Ups#cHRl$*@2Gwg{5hZX`0!YNlKR9c?Dc?4t7o^IvzI89@-v}q4~ZBimEyp zC7uO-nYsoc8XktZ#d#*Sxt5Nurm7hl8tGYD?zZ{C2C2q=j+t31PI;a#Tv4wk;U=9V$ay7q=yT(N55 zPT{VR5!wdPc2RC#T7dx(js_N{0l6NU$(eDnDz=%yCib5BW|`J*uK6L^Dw%q2;mSIp z_G(HFdBu9sj#^w9AbY5~gGCGkb+8OFhS&e?^Y!6v1FTslR`*~&3SZdvXQ0h-Z9$psnCS?<0DspgvD z4#BQbj(SmQF0NMQ`etq(35o$`DH#dQ#hD&j5lS8w1^!C$@kLxwW(jE};jXSp5#}0N zr6$^*xe0*@UfFKJ8YM!f_SwbxCDx^e9A=lu2CN5Md3=0iCRTImSF~_7PfkUT)E~}rDpL7=9<=?!8&gKc14Lvu|W>* z?z(X*Nq))ME~Odfwqe=n1^QMNNh#qr_6bTRQ8BLiYKaco0bZIJim_aA0Y&;j`o?*I z#kx_7X5Ox98mUFug_;gtff3H??rH@wx%z=#T55i}q52Wd7N-8@#r{qz20^xZVLr;4 zni`H;Tsn?vCWSc(DXIP$s+mp!PGM0F=Jr9Vw(k0F;a2KS*}mR>)?q$TCYo-c#(`co zo@$Xk9*KUAo?a&ISuP2wmPTA5Ch1x}ZYEKBcA4>JDwd%}=>f_?g~_2Bx}Iq{UY6!z z*@iyW)<)Wq@g*hx-pTpFVcMx4jyirGrAomOX+93QTn_1$+NnmNb|xXg?pmeZs_~_M z?ooyTA%UuXhA9Tl8QLm77Cs(2_L*kR4kfm6Q9j{XAQ?h0#tn9?qU2x&9IMx|ZRE*@_;P;f7Xz+75v!)@o{wFg6IvA*H@>gvj_`FVm(mv4Jj z|CkI7HE#_i`yzuVgAgmjSQS_8f_!~{H?D|WJx|9h*O-EQ3u9xCP%n!Tr^rN4YeW0k z2(57a05i8-tH>bLR81Rww+IKFIBVmGh^Vx9T`vpupjhoF$9M-Wr{YK(ufkHt$WV35 z@KQZ<|B^tJVBG*GmqORLKrdg%hv=lp07)1b)QU<)_fC|4ubOjA9_ zC=b`HQ0r9Bz$klfGnYKC6yLNY?IfR4hj0hO1TMSMEDbGJjWqLuf*c2vh#Vg^H?Le* z?~s%PpAe-q>(J1kL}xuik65QTEwjL^0$1~*P;;fM+$4W(%V5KhL<=3Re1nKcD_hUd z+|u9_6Mb#7Z1o81@Qes6MIFP;)Ho-rAd|2-(0NHF9uDcjZeAs}1$ox?p(U2VI_k-) zy2&m!T>7SVMroNE0j9aSd9k_yhE6^@nSrJe`N5{n-ldum)`7-x{{D7(`QCv+DW>5b z239Uv#-@J3#Z&^SrT*!@>A^8-k;S2^j!qVZ zF}}%hvDxXaO0Jrr%0_xRO5xES*+J2cQT7Gup4xWiTuweFiGBtpo-rXV_Ie4L;VG7d z*}e|S4&iE9n$aHF#mTvD>B&wG`MS;-&cO~^?zU?Aj@H4tnwl0Ks`jY{(ZO5=QSolZ zg=uc_1?mo_3FaCRy2Tmc!G4MPMm~;y)`^bJs_{YYr6B?CieV8h#m2s_zJ(qMS-~pq zNueed&KXuZT=80A1=fZkHfjX{ipJi0dTDuSg=y9yzUittW=_tbVK!R!R`G?oY1aB$ z>CR5dnm+b^+O7c>b~&ngDUl9=5!zh#ss^^U309tp)=I?%rfzsSIjNpnDyr(a(Y{KWYN|!b#W~JSiJ^%xo(cNe4!PbgTuQka4!Rl{u4&P_#*v1) zmU)>;wu!c;j$yv}F)mTc+1~m_K3NX-iV^vFHi3@%VX2Ansm9&`@dciiChj@KUTItb z8L@WW;WqjyI&OX{j>%SWPWcv@YWdD~>9Hlg@%oyfK5mZT+Ww)5*$&wuM!K5L4vEeh z!4W>uHUausI?+~XTt(TTskZTPxqdzlNe-S`YBohFy1r@pzWF}tdBK`a8RibDTFPlf zahm?RR$-=*KB^IFaW>9cK4FoLCMl)*ZUtPq#Tn+FiWZ59T7gbkYRSPl>Pp&5EUPe?LB5Kf#U|m&MOsODsR8jG;TpjzA=$omde*@@kvb-N9#JY0Ue=z9&LJkTMXLEa zsgYb6x{emU#@>$BPDbVtA*Lyj)``Blp<$tBx~BQ=F&PQQVeW2@j>_sL8fgWohGw=A z!D$h>?oryIh5l~-rivE&TVd_Pq1w^vg?{>xp4tg^Zi)Uu*5L&~nfa-HTy`psZvGaY z{t=;0>Dei!S~ekhc`?!cu1>Bov4)0r3AviiX1YIUIj{;45uX+eb^Dqh(UNfwEDTrP^n=4zQH!5*O*aq)TjvGJ)f>cKH3YPmW-c}iYh z8j9-SE~YLnhR)$`zJXDm?%o<+KFYdU?oqypw*D5`fhJs`vF5sJf#wDUaq)S%iE$}r zelYP!KpDtVXnbJ0g-AEs=mHnxys(=`F25?<}oU&YUxg4T&AX4 zVHp}F9&y?^=DC*P0Tvb>naTy;PN}|Wrk;u#u1=b!xyG4AhH4giR#A~kM&3Hv?hYZj zei1Rr>Tda7DoR|2HV!!k(Gj`%!C3{_@&3NKAzG@we%bz^{?_@^Cfu{L-Ns+m+zF{5-D*B0~TfTzumfr5ZE(X^5+4fnw z>Ss0Ty-|DXLBx8OB`N&ar+ju4Zv5DhaN( zNsehr>c*x8DhWY>PI)%oIR(m|F*)(hhMLv}vDqo90fBl^<`x!SHuhn5X_*?~whpBk zTye(Q#%XchW-%%@#V+<9rXHbw7TN~kRyxVXZtk&hNzwWV-umvD9x>(~$_B}%0X80P zA*H&yYF>UOC7Cwr;aOa2cCl9JN(GUw;XYp8PHu*Y+A2nRx%sM&3C^bB>REAy-Vy#m zSz*Q@ib1+gz6l0KF*!!oI;Mu^>4m|{QTfJJTzcvG@llZlYVo0kK_NPs(M9pDj+W7e zeg;kj2I{2_;So+sj%ilrnF;CPS)u7ghECD;Hcq+G_HMbl`7SZx>G@n%E(XQEI*vNJ zx=9uqn)yCv#>ycc&UOxN38wjq#%j@p_KL=(1zNhgw$bViQCga6@oG_u>WR+&0jas! z8BU2oTmcp~iF#QPW=`p9QNf``1?d?f#cIA0-nJeIMK%Vi9?3dMF(ulWo*uehF-FEo zMh+g%u{pWcUTM+hrn$7l6> zdA?o_KI-`vo|f+Fg|YVPVaj2NmNv#(7P+eW3C7+DE-@w1DgGKB33`q>mb#ijF*yc_ z_E~CXCjLccT$=jEzLvJOiHc!vneh&#+Uhx`VFqbF=FUNyf%Y*;&LPQao^d9DUXf0E zp^5MmZf{%MBFdd5+{=3ai*YB531>82{m0jZH(SxRBXs?j;&1uFW+=59_7 z+DRG7g&K}2xppR=Nt$LkidiOV4p!;0c`A7>MNxs?YT?j?>%mRzZ6 zSsIRxZkp-Q7A9&=O4+7isyg9D9(hSVYHt3;J`t8`uDS(2T27|c1qL~arA|)4k%2`9 zNsfBTc2)t2`FSB+CTRx2q1wSN@kz0P-r7-#IoTeCI;z2TI$0{3A=w31N-A+#KGCY~ zPL5Xo&MCnKA^Az>K84Oc1?Jg)5v5vYwp^xaZsAdh$;Mi`DcK1L)~3n+hAEC=DM4AO zdI?5Jp8C151%A;!E>Zd+1-T{u*(C`{;VEfWMd3PDn*M=d<|Tz(D%$bNZl+24YW~?8 z#fo_e%8`y?sd1($rD{4c205yQfk~PP>h>vGnJT`)K3TEx8lJZK zpnnjt#j`p$Es&O7}G0Hlz zR#EziYJvXQns(tKnbwX@QK6b4Mmc$o`X;Ku##~OC=H}`i`2qeV`d)!P#>Rzi+J^Q; z;ejsx&W1^z?hc9xkqMTXNkOI->UL>%Rz}J}PRSX829DO=9=g7YfkydU?x9(l?#>4J zp(&=}i3N_4nZb%KK7mQvrmp%<>3XRiDcY`%`gRt@>ZM6qc^cMnndw$a5q_bu2A*+o zPEMsEdR&^S9wCO>p>g4QfvUl}vHBSW0cz1DA(<92+Ge?i&guDn;W}DH;no>S;W{Dl zMg{soevUbQ_CZGZmT}Qp=3Yfy(H71TAvT&idG?8E!9L1XdTt?hK3R4;X<8}i8EQcu zF2xpsig7v44snio(c$stCcXvN_P&PtN;c*( z>Mkx$hCWXDcGk{WMwv!QX67-uF$TJt%KBajnW+W#w%&^VMLGrAHsPjLZdS@%d7er| zmboEbPKg$oR@#0A9>qD{Mmm|^>7Ew8`ZnqQc7aaHR;9Yx399;e7Qw*=&id-+ihALphI-MdVcK!JI+-56zF9>&ZUHf>foZ`Rc}ZRY{_+0B zIu2oRrfO!k8Lp)Xjw%|i3CXF(ac;$2#wl5T3Be9lhH54WI_}A8Ms_hd;Q=m6&Wc%q z$x+F=1*U3g>LFQ5`PSN@!J!TTHtAt1eyRzMYW}&A*;*xP9$W_cNd~srik^CrRw||u z#V#I>(UCFg9%&)2=80JWiK%J^u`a4f=5D#Exkgdu)_%&lo@!bySwSk!mMNLOj`^`% zUX}qm2E|GVX_gvEdG5AJc6lX%eqk9wdKzYl$(qJR37~VuGK~`RN_~s$gRP@tw9HKW z!gYg#QUWxRt)ff3xZ(pW-Qq*Ebljcd)ZOgjl`K_E&5{Eh)0FKBBk~JuB9cO#QVL9U z^|Yg-6t&b#T|?b6a?@Rk&0SN1qRsRyyu!Hjjlu(hBb0JL=bbx-Dr?8Osb(nVr1@n8 z>zakcIx9Qa=7eeb`lUxF*vFVTSqJ&1C@GaVW(Ajq>gW6Edb@>lDI2Q9YWXM!rkiDUO*oG=9YH1j!+1aVbC;9t^D682inWv_uMft|rxh6(O*cYcJ zlDi2IxC;MHeMTgr$Te1ljA^JDDXUWh8|q2d6u@6lLfs=_DIytJoz5 zc!ft>=VZisDw-AR#HEMXI$OJE#D}Y!xx|(vT65(YMFiP9#T68qMFrV9X(q*|I(XW6 zIVW4`m}(^z=!XTUs9LCpsoN-r#G0h*`GnNLZg=>VWspc8l zYANPA=)0+D$Gd5nnHQM3hQvA8WoKxp#Ae471X$&UdiqBO6{}{Kc$+7wB&P=Elq#F0 ztA-kBs&cvJq-IUenS>MG_cd+KZY8EUFWIO(W38wD4sX1RNs=DV7N7jUWjc$ip47=*eTrst;y>YE$t zXy<6gcv>bzc%-^|C&Z@t+C@Z^1czItc`GIcxdkM7+W6<#W~l0ErKq~b$Eq1}`K6hd zr<-Z37zHcqhv;ain&ySLB^BzpD|?q{L?*h2D`#63XzE0y+WIP5sb%`4ndb#(rMu(@ z>uYD~N16nATXXrU+Ii+jE5&N*hwHc%yB7Kd+UTl!l)7jJgeSy!MI{%;mMDfeXS;Zo z6#Il}d8!1*XlLiS6o)B$d3j|SNBf&|`Ni977wK6Ux_V}qdKC?WqP}(<@(vgro?2YL?@^C*m|nvYO6R}g*s{$$8l-oCIwkKrhDjxc$@pU zha}tE<|-OGs>I~lBt^z)y2J)4Tjkhf>w6f7rDW?n7(1HfXJ=^S8@pOWmOA<+niT|c z1zRTt1o^ortC*;#scI*sI)yrVTWI?RyIH2ECkH2c7CR)X7-k!o#{|Wgl?JM&+7`GJ z>!_+~d6cRZ85Ehin{j!%`KlJhXL&0J61}8aKmD(ufhbVdatC%Gh*xD<_ zDJ5!{rw2ROxfmN8Ihb1*_-e1QiyIYlIJ1!rl+_$L^aDEo&;`4oGGq$@@i`y`vi z+9Vo!*%qtiJDIpg*d+!U`nl;^`Fh4#YpPmW`-Vq(+1TbKB< z+LYKEX{2R(mbk>Id-&<(hpSjA>gt<>o8>u1*=LvrT3S0Phj^x2Sb6z6mZ%rI`{soh zCF>h<1*LhpStlliT7)J#YdMA#1-UyFN5tiM1!hM2r)b!RJGdL@s;GrH#U%!Xy8GB? zn&>-uDrROES-E?t1jT9>*>e?TmBt#oCu-$thnf~;2jxc>Mr8Y@h6gI@MyL6^8Wg){ z#=Dw1`S@ieIw_kd+J*Y2g@&nHs5`2Ls^qB}=%x5_>BM>H$C}s&=Nbmtn%~O+X$54NCTUs+r<$c_8gs=s zWd|v#DcY!6M(cW7Yk28LM1>{>d!^*&>Vzr9h86op>%`cpxrTVSr>L5y>AUKAm>a9b z#Hk0mc`N0GdD_QtB^fGNhC1k(8)g{T=0?S3I49(o=-68ZX*qf)`G#ltnyO|7X(^|8 z`h?kKnc7%-D4D9pCm6(d+gNERndF986mta|$9o%?$JwT4yBb89X6Iz4M(BCD<$F2n zYvvjoI+j`m>IHg~hHL01+h!=KDw$fEdN{;n*{VjkhnRX=o4WXMMLC<~1iFOT7bv-B z+F1s;21Mz4IHw!O_=Xl**!ToxDwjrt+JqaGs_UeiCZ)JJ<$D_jnS^3n%nRDO3|*W` z{9<0nGFM)G_?|$>a#>z|-_#T;?Fj@~0e2S>djgRc^P0f+2NGDc3z7z5=uSY8C!kis z*6Es?8Irk5H%u?i&N0)_N6k3E-#EnAH`ql}E7U#4+1j);*D^WM-rZVN%Py)gQLWTP zKhPniFhJEfAkb7XE-O6Rs>n}|%UL}(FDKc@K+)aRFe@!J#ywU!Rnsv(A|oN)EzQ6? zA=6XavCvyx)xT8Vxxh!;&@so>KiWRRDBmQ{(NAA7&6q1q*})_vUER_m%04tXBwkfN zTir9(Auz&=eQG&|GYKGRrFOC!tJJu0j;P}?ZN z#5Tj;-YGB5JW1a-(lo?q(>2e+TiMdd%3eLeRyEJW!aCU`+Fr@eFxVhHK{Y%*T1_u4Q8~gbPtP?bD@G}X zOC!g{(?824R4>QYCN9z4S>G$hA}Tm1Mlmfz-6F(0I?~oW*22&%IU=?=)5R{a#4X4n z$|cz~#NRGFJjN<8A%H76Qq4V8J;cq?Kvy>_*FecCuPDOWph!2`(^=OcCp|dW#LC3i zEz3GAB-2(aGTkszJxI$+%Rba4D>FUZEHOTn%gA3VA=F4SF)%sIFf=V$J)s~u$E#G= z*3eT!D@8Ll&?4BNz}~FD#Z}Ek#l|hiUCl-@Oif2I*xV+lATL5)$AYUs$1cG}yU;r? zUok2%Eiu!=B(Ts(FHt8mLO(0TFyF;KE7RJ+%skyrH6bO%!&X07UCGSQ(ZS5gCd@A- zDy%e`E7Q)^&QT}QD@{e+F4@IUyU;1gGcz`@AW+dHKeNa>3S0SN2wGte%~iw~Fov*w z$nX-z&`7~Rfx7zzz?Q(BMqC+V3@Ri*n*@v$42?kx`$24D1w$hk+eE<<;&xEMf@Q-1 z(&0ED70{vw>^rDaU}cYyi7B~T1j6DBlU$wi3L|n$eRGs8!_^Ja{Cz`!{T?`Zpe2a4;^Gvku!-5Lq(j5)FBlI(Z3)H+4 zL-WGT(o3RELPC`My`1yiLW4YfQXLDOtThU)N{ekZi+pn|xlFWD%-j?0O)U&mBb@U> z{6icf)O~_eQ}y&i%`)P(G#wSQi#*Ko!@~`-jPxu_yaPP#d?F)l^{q;xOG47zm7=*+ z{L@R)gLI0uOl?!F0+jrWZIUu=jdE1ol$1RDGs1%+5^bGrjeWD#J=H8Nj0{|TgA#0w ze2PPqooqEC41A2OxeTJRb)tRK0-X!3RZSez;tG5XwcLG@N>#1>d@|f)&6P^DRf{dd zOBKzX^lX$ei~>!f6Joq_KCBjS~uB7HK` z9d-SJ?NYLXEOa6*gEIYdioN1X!xYt2jj}^clVysIF!$Xx+Qq|41LrnZkO)WB1ytD$X&73ry%rkNdihSKe z&0@LSH6sGd0@RJNqjW7CEzCoGQXGrCW4%?feSN)jY_v6PeN+rAlNF=fO>Hd_0<|@R zlD$&%y)*NyEIo}1)Ge~}xQxBCOmz*7OoK`?trPM!HIvP}qg4Xb)S^wytbz+uvrF}? z12SXm;q{bQZfb={SHxe}x8vn>jv z+@o~u!W8xWZG2Un?bBitqLkyjycONeQrsOqG7Uo%^$QAY>j;)eVwhGtx_f3R8^@jI#9O3tbD1eF9R#Jk=E)LbSL{V)6q+Q zonu{7^HMdOasqs#^xczG6wN$+^Dmy)|7Fla0*cRN~Vk zY;v?)T$9vXa--c6la-CU zG|k+t3hblJ;{9@C%+lgLwc)G(B{*o$Uk6 z!nIu05(54Fozv5bQ|v-YiZl}n93A{43Y83^xm2`6)olD6y^MRV+g^v|?Pf^@<|lTs8l3v4w4 z!fiBS4BcGQUE=&AbiK@ULY36=j6$3<^YXI_{j&T_Ji;QBl{4bAgFQ9E3Ou=z61|n} z^_-HG;tivUOatuHoRTdP?95bMY%DcnldX-7gDv$GgIu%J;iq$ErRr{a!j=CeD!@|O0&51!wu~$;?;fK!i`nEO*0c5EFv9?HR3#@Q?pFm zN)4@pl?(KBGkmks(gRG29kP{6Y@&mbEaRiqBK%|G4HLX0xzdab(jy!#t%7niOw^+? zRI}YwU5jq^_JqxnpQ`7R?6B3N9!?Fs)GrfzoGGn+r z?KP8PK*MCpM#%w|F3Dt<*?MkSio)&=I;+WBEd zd1`7Is){N8I>~Wdv2H$U`D)>XzN+cLzR3>3KK_MaA&QPA-bDo(#c8g(ifO8<8mSSP zL53!wagiAo9+nB7@#z+Z{`od>ie3fz>0GYX)<&-Ss_u%RxfZ6m8HI5wwm~Yn`gXo~ zehE2FnenN1AsLpwMmfPzQOP;m4vq<`{&9s|h0d0x?y-t)an2Db zRso?!5r!H$nNd#u2C*KVkp>AC1yMzT9@#mXg?b5rDvGgTHYG~BnqHb7(FV?bS!Rh^ zAzUuTDrPAv0kIkmT6&>rI%YvGrB3-Nrlt9Q0WryzvGK}|PI`G^MJ{?qad8IP0m{zF zp@vx{kw&`KHi04fUIm(5Mx}{q#Xi|V>SF{LH7ARr7=m4rOpxR#ReWm zMX_1FSxSy}7J6~6=HaGleu2u?F%D^JSz5lC`9(^)fkx(vN=}Xj1=)6~!CA=;p+Q_( zu3EN=!MZMrIVy!YSqXu9fkwu$&L*iAZpLXA;hw3Q*=|va2|lq&=E){e{+9R$2`+`DIfa&LiN-k^8F5M30lC5c2|7M* zCE3oV!5Vr>rdf*C`Pvrt(V=QtSuP$~!LD3hs`j=8YNja`rP2Dj$>z=$rMiih%IcP; zsj<1m@kL=4Q7M6erVc3ynkGR$_BuYLg_fq~`F5&yUV3WTJ~0;FT>hmwHinV;hPg3u ze%>0YrcQBsktTs*w!WbT)~@L;LGcE@UV1TJDt@JDO181SYKlf`PSzUU$xhLF+SXZ_ zQBhn80l^lkso8$1NyeqwuJMZAdD)>pPOfg+x{)4EE(MvTK54E7*3la7k&yxF8Rmw1 zPWfhP3F?u~9?F_3MtOQcT(;>-DaCGTNjfHlx=F1na*cDarzc^WAJD@zQ##vg?d&YF-crSk(#ci9{D;6S$byf>NbYf*2X#k z1==1;LD~VC8CnizR%ubX@%BcJ5z3`Hd65Zu_6b_<1)f=@VVRzRUN+8tTt=CO8R>DKvLg$_>2 zCdS2X`f6MTo|>VF*2zkS>WYOiW(Gzv!Imzrsb6>HrGr7Dh?6(_O|}n@yd2Zg%MniUOskSUe2bWF^1}130ekz zUdExRI+<~5_S(S)(U$IhZW^K4;rRhR+3ESd8o3#kv4N_}p7wc>R+g@Y*&aa-TnWla zY39yaF&sUcjEjxNcrMz$e_`da4tIR)Wqs%b?QMgAG8Q93Eg4!)W$R{F^qc?lls z{v{>$#`&tMrZIY9W+@3JaTbO-mic)(Tpqq&ab5*EF*;GMIw_I93Gqc~p7Bu$!PbUu zim`fzb{PgAq18rT$z&dfpCt#$H8wNs2CR zX+D90ntsWlL0JaTRw-e+Q7Q?#+TnKkQCU&h{u;Uo8gYtI)|SdCHlXEL-X?MW8jiMH zp0dNEpYL2CA;(fT<$X|BoP&cQk1wgEoIx`p8(HZktL;qJ;Y zNuDL{QTdUs(JHx_ps0cm+IQReo#O8QwrYEEWaD(S}V zN;+17j|gr0q`q>r*@rtV6Ixc#?`Nb}IQN9}KIynXInJOOP_A1tK z9ubaQ2}*wU%8G%S&K6cBA$m40!Fg6e;lY-vy80PKC7}jNDkl1tzKOw>7S>*RY95hV zVYY5*rls-frOBEh37&;cUR=qc>LHN->2_KA{1QzQ(zcq58^P9s%Z=xk=_p;Rb5y@yUAT{@QxM zKDm*FX?p&dN|p&~MLvaDVde#C7Pe~MhNiBr>58cth1NNKC1FY4W-i%Lid?>aYANaY z&UzXCS(zp}sWFbl9;vQj`gs;^nn4-Pdf^G0j()m+mdV+6R>8W_1(wA{4pH$AmTtz% zy2<$tfzGB}rV&|%hK@Gb$>D{GdWHJ_#y*8sLHflyIZ*{lQ9imk$}u4+rV%kZ4r*yd z@kQodhKgRMni(a&N%~M*0as@kWN)CIwbT zR(Yk~Q4vZiM!w-z?uk}~_Wq^*1@=ki_PKfP?kRCe_W9xV$$38EJ}GL-f%%aEwp>nX z@nN3sYMIeGss_fT-uc#^TKR#IX3h~Q?y1(v8fI?Ec8UR3S*hNx`ZiGo+I9ujx<)>R z5nev&DiJyvs_6+_{>mw8rK#poF&R#FDQ>FnY8GjQ5yk16iPfY&^QKotx5dleg;TlE0;l4`Rwp>Q$u~r^Vx_PPjrhzerCFz+~0qH(^Iu=gZ zW*UKd39-2bZhA^~wrLuF)9HWZgF}6cG=$HfgXXGv8EZu<^?Ls0h&RUYK}%>-pNjx>CsBz zs$B6pR`D?@`BA~zo{Bd5Db~uWx~jU0#t8|w366g58A*DniDBlR1u5CidB(ZgI(Avs zu}Xmj$~hV8VSc$rnE@JH+Q!MIc?n8|+Pco+amGradhs@wQZ`8IJy zv610kYM~i6Npa3W>M6#dVSZ{{j=teV8HL(Lnyz`CN{N2i8v52*wgF0k;l6%eF4kdQ z`krPg5rry2v9Trg_O2O)>S?wyIpIbr1qG^VK_wabgbX=8p_ehdBq9gPVqrD<|Q7UA;n3t zO6G<-IhNr88eG;IZXvnk7c*Svdw=HvSfw2JY5bT1pXxnvoU(`N5_oZiR_HX(1sN zihf>h))tZZ+HMi{(MjGJih62A&KBX(g*xgwc8O+Lra{?RmR$OV0czIjA+{dQnc+H4 z-l{qNmcGgA`mr(U$_d(GL7pk@`g-=NZtfncN`{s?&RSt+;aWkiscG8jx+%`4sou$4 z&e0CuPO8!IcDC-x>4DBlMmffDs%Flvaajg_(N>8ho=SsGeJYLUk7$|cS=&f4j!+WA?T zzNOX))&W-OAz8+HHcqPPsYX$D*6ATuHZBQVxo*nIVL=J$v8i!7N%<;93EE*ws^(^K zo@N>DnMGNuIf`bfiGd{rwnkwN2Kpf$Izc8H=7q|3;VK2%Dn{`UN?gX-i8fyL+PN-? zStUC94yKW|IX<=~k!iW+!TGKcDnXjwrfOCO-kC~{rtTVn1tx}iL27p9DZWM~IX*ew zMP7kis)nhC_OaTTA*J4G1?~kd#-6U$=Bb|c>RPEO9%e}aCeDg6iJqxBL1tdXrD;0) zW~PA!DqfyOdb!bBc`gPXrCc7Ciq`Rt`T<$FY1$U*_WAx^;hF_S$wpx|W_gk7uC8Iu zR!IqFhHi;z9>!i-ivGTZ0j0rSQNaLz~3AuU79x4&x@qr$e8A{ga!38-< ze!4zMF{+tdR%Y>q?umBF){5cg(Kc>AYK5i#L7KWMkzr}3n&zPyAz6wZiQy*E5#ff0 z2^O~MrqKp^&U*1VhEcBJ8X9VOid>5RHmVkmMuw5<9*!1q2AY;x!CBd%fkDZIiB=9p z!LEsMg=wLFi5cmcB}!I#PI-3r#wluX#qOq-MhW3b(YE?rA!=3;$tu2H$~KY71*P7W zx{3uJp>D?hHmW|V*(Jfro-Qtl=~@w<9=0AjdX5=3R&nw1G08re+0nlKVWvLm5nOqZ zC7H>Qx@O8Irn$kpD^=0$-ziRnRpex;61>gEalPTm^X{uzN$YB9>X%I@xlMTRjx z$4^^6mhn28@pfK?83n=CN|x#Yc?NND%GTy8v1V%F>3;FyK{}2F z+4?y}(T=JfnGT6zT4}y%KDN%fns$k?fn27s`Yy`u9wrX?$=Uff`2qeGv093Wxmsz- z1_pZOMt*vc$-bdMg}#p21rf29x(30~_R+B^_7Q2xnfiVO@oMf|(OE_oI(|wS_VzJ~ zM(!a2u93d+)>`r5X}QjY1=biD??&+b0`I-?H{sx74F&6eNh8Bgo z_FO7i?nQC=#vzJ15qciZX6{C2nyGF%HflbmcK(IwN`VGZ5ytvv+Ugn(rAA)r$tmiJ z2B8rV&Ph3n%F0SE;i36l?!i{ZLGI~FskW(_+9esu0a_{^?lA>{>ORroVRqIwN-BzK zv0?V^s)eDZM)^ga*7KSX;BerTIng?rok5Z zIsv6QK3s0<&d#N7Mt1o|Suw`Riat82Ve0zHX{Ch*iKRxG8rrd58X55(5xM66@qxK% zCBf;z_O7b7>7ik2_CB^Hg(enUi5g~l>7hFDIhpDzDz4hj9&x6z?soB-5za|wX35bW zIw^6cNh%RJDgJpn5#jkNp~`m3x#331rM?j^0a0p&W?WV_1}a%PE`bKQIqpe8d4UlL zjwy~lS^8#5rS?`T>G9g>YT7wErddfYDtW#|;i`Im+Q|_m8fIPw+79~01>PlGdci)H z!P;i7TAp4J?z+i7fkqw$naTx`YT0@=ncnVN>5j<}%1RL>I*utxF7C=1UeWrlX>Ja7 zIUzbGeqP?1PF${@@&2hsjuzUH?jCuHUX~dS+0I%j+PWGMX%1R$&f0MyLCTii`i^?~ z9*+4I!RFqYPDZxss-Y#R%Eie_ArW?5ZW(3;PN5|R#-@HM&dH(X#fecK>Q=gnv9?a$ zfo3M=NoraC#ziH*D*E=N#aUjF0U>S%7Un7%j^W8+-Y&tGv0M?Fu7wT`j%n(8-lmpn z#ZlT>{(wlg~}mZ z*7^FTL5abU#^G@~5svv0IeXmZjP{cIhGd{+fn4f!T&h8bMK|dMUm!S>7fAk;;ihj*)6Q z{zYMdI$@?^ZYHKmUO|4D5z0}zreXR@TE41Wj((BOR%UVL{?<;q@gcUZ>K-~q7CO%6 z0p@0j(dHp`IU#9YmU%87x&B5ap6NyIR@qt_QF=k9u~9)DNlN*Vnp}}Sw#nLs1{&Fh z5os=F@#a3Z@pc)mwn@sqTIK~hE@4Hf4o2?T36{C3-u}KS2BGGfKA92Orm2QnHU*gm zYLW3=DGmX_v5KK)>EVIVs!7`ZMS1=Pj%mJW#@-3)VI~oA@x@_LE?EUZu|YY`Hae=| zuAy;hd1+pX+G&>NG0L$ zW`ZlUQ$!5P*%$$?6Sq4ueY)&(w(iK(s$**-32PKn`4dL@qPalZBeTDAo~p+%*k z(W^b~$>cNjm1b?s|z?p+0G5scMD=Ats(0#<9^JR;ro?PR5#niRx+* z`kCq~!8$?8zV?MS#%7l4I)Mc)UR*({>Lu2$sdnk{vF3r=#oh^-J{DT;4kaai{%Sq} zQI=tv`9}JFu@><~UOMLCnkhkPi6H?V{`!8lP9-J|sb&RSQR=x?elE(1&Th7mUQR(N z+BT+Hks4iQ;8C+q? z_8!s3Rt6E)=AL1t$*I0>Y5HNF>HfhHCW@s&K?x>$YMCl(dDfvZ(OE`WiuUdasd2eJ zvFU!+(Sh+1(Ym@^7UBA8MfnkVd8q~_kx2$AE(LL6>PdlCb}7IEmj#{3&mf9J4 zzQy)hf!>Ce24Q~QG4?*r0VxS!Rwp8O7?+5r+15HZe|GZf3@c(Xk<_QJOI(>VcuQg<3XdO3~gqinba>ac+ji z-a76kF0M*iK8{8K4u*DIiE(ze*2XcV#qJhrhN>!F-hn1&G0LT3Sstdbeh#_eDa!uV z+OB#UF1c!|!38Ob8T#qDO0MRbk P?y>H!zFa1@+UA8}E?&-dq4@#n`i5Fzu^t7g zK4HctxoWz`UYe@$K{ka(J|z~0;kl`Hxgpkt_L>&qr5a`is*XN6%83qK0e<01UJ=m| z8R0n&K|1b^HZeA_`Y8_j2Kr%PX&P=NUal&-F-{t}&d%A|_72%@ImTgTS$b}MK6$!< z-uAYIVO+lXCP^h(IjI_6#>$q4#&$)eDjBA>szsWLE+r9)&gnU+KDjCZB?&4nx}l08 zrm8x=M%Ez#p1z@a;UT$(VcMBoTCs(xv6f-pnkqhuHi5oM!77$c<}MM@u_1xl$=NY3 zY6bR2PSNQxF0s}Qp{WI)c_!|$p{`CI4sL!CYFe6V-du6I@uk^z;knk%dfGZ^Mz)$B zk@m)^iRqeoQArjKTGqv}2^qoh*=A`)#?h9hHYyo@MZW4PdOool!5K~k;lSZ7E;^99hsdlF_yKx-O7 zvk8b964?9#6=z65mcX4x#Nr{^&yW}?Sb`h{Ie(P+2@+7)Ks}-ly%5mM+<@G5j}fIY zNiMnmaq4+R#bK(TaY}WaTqCt2Ki`6aKr@dRr(7kEq#!57RMP;h_&iNR%g}f)?|e6< z4DCDzbqhl-lT@!HyBw!PFAqaaYZpiBAe)k~0>31+f=GwNz*5g>B|GI1HDwnUU9}Qr z*RV*Bh=7RjQf+@Ds}%2iC*=@jbuLXShmwr^7%$5r=fYs`I1g! zj1(umG~?uGuVMr3*r2$e{5*#u8^sJuCokt53peGo3={1Ft1QiQWo4T{HN}8vBd#bN zCHr_Eo%n!43k}CCSHE}_!vb4JO%t_zTaWxu=dAD`kHRFEv?2%FlH#JU*t`%kO@oMR zPgl3_fE-;Nzf1=%dwu6zwPa`YJU1nc5R)QHC9^OcWow(*@Yr~DCmmNWMHA~#(}ckW0#OTbwfY*d@EB6>vSt+B|pVPcaQuS zlW3!Ys2mk1y*%qEYyC(rR|os(7!})?cpGoSpnPkKgh&S;U)50CTu(m@3%6J&?{ou8|LjPwl1N{N z#PmqZRK1YcP#<%fxWZx!MKk*h+r)&l=oCY3n{2l%mv}|jIO}v@4ZjesD7Bn`0uz^P z@2G$n|CGpRlQb3O04qyZcSXHOy_g(Vn?Pmj>{!cq!+14MV>6QscL%eQm^7!P1d|{q z3tPn;KQ2ROlel>2Xk9Hohe$VHmw*CmD?gi%KwHlcJ9`tq=#)HPAKQ`;_nbn5Y%Lo* zwS;`#ShFIBQ2Q853rD+LGaX+pSBu!}V!ML;m}om+=j0fxM6LWpw}=EA$GDPk0~-Tx z^)!>r0!7s{Co?mZ_*_kQGn)*PWNj6v@Vpp*>l`1oR4z@Gj1*s2Uqd}bEyHjVS9LEx zdl%mnW7km26Ui6r&hZ zJq=aI^la@2E{kC6QU@!=(x`N!gp_0>gVY4QtQf-t{kZrdEoHaRSUo!<9XI+C(BdG?l5o9rYdxPrGgAk?P1Kn)16eAB~w<0SwWmT8bK)vV;jlxV-YX>uDFEfAdC|A{h5RIe|V_h{bt2{1O zqbNl~YjbAL=FEuC0*B4e|=xe^c=%%+Z2OfZJoS$HPxahWvx_4 zWwlr{+w>T7TOTcl3@g{-1ou!=Z_5<3L=P_8hzQq0|6q$qOUpttuUspOXeHka&A4=r z%-FQ7_-KRZOhYyGsOV@#6YErK!<>}7m?Uj0SH*-B<6_5jC0#31t_WvmUpHe5ZzpdX zU6(}dG=un%G!KJp1ADiWhzx(TRGsWR6GO{rqudlv!@R6K zNN43#Q%5~}$4p0MAIG!^uEJvHz(75NG&c{!Jo^l1(|8qCy*v}8yaIJS8@qhRDCYzR zZzIJ}EmtK6rxL%++!#M6Wpzits60I*n>fv4jVLY^o!|(s;1s{ORQ1>_gF;iS*ywoo zV71ghrC3|X5~qlOY^?w@eXVr$99IiJb&Dh$XQL1`llWl040C6Fn+$hPF0%w1!*Dmf zl&D}M54|F#6gU4gqXG-dKtCTP4gH|ZOn(!z)P&MtWk+@Qk~}pZH-l6+CnINlRWl#E zXqD_@Yb&k@-6Zu$OB*L0UFR@E^(5nTRi8rrR3%@Bw9wolOS@!ak9?2hguGl=GoRud zgA`r8s3J9e9Ua>Y^};YsmE2epF0~MI>%`dT*v#xye}R|7L=oy-LDqL5@Q zC%xPp4c}BZZ|D31MWsyp%uqE?=SVB1LJzH6EghTi5952NkPyZ(r>UHN$Aryo4O%QX~B!MT>M_Q$^bl_f&@j6%{U}*f3+|q}&8U6O&T2 z(rjC2-#C{b^Bl#{koY+7v>ewsb5$o#n+y*v7nj0h6HTAo;DB@`W2GED-SBkf>_S~f zE-h_sk6`aDT4gqMRf{kE|m5QfHG;S3PrsJpbqjr9?A55C5=WJ1-CI5)%zA z+c2ZNFeO9n$Vk0p!z8C@ha_7YRVTG%Jr@&wE`L>(ktpW-~bbikdmN$^Js0?WW#XRbY~L> zCx2(ZAY*UKpu$oERR^cAWK}MU$Y4iD^DI|CFV+0gqBKWW)6BSlRDG8~%k-$YF#RYe z$HXGbLVF7%)!=kXPZiaqxZr5*2=nm#pePl4Rb@LcavDZ++eGiP)kcUiy#vVmrQl@+!DW3yIdD%V;^&) zVApg@$0)NvE-Up6WgA}`MdfTC4PSrdXdAnL95rVPMYB*FM`aJ4$UuL?44<&9kOWgj zlL9{#gVcnAjPPRTyg;{z$jlhkP*1L`(y(lOtq4PP74K5e#vc!37mHj=KVN^V;#3Pq zcSi$nqkuwdtIz^{rMOtz@Cc2V5C;=4 zo0KFo!_s6URV}L^m$2LbT`PO5>=H8*?HpfKl~|{=u(-V9LVIJb7>|tbAY+R#^-`aL zi0G2^e3$fa(^UIX1I2s|R}D2~laiu9XA^^T_keUqBl9FZE4O4F{rH4*KlP*pS5G~! zbgo1XUw_@$q=2mSEJY2s1U(aX%^;n$u%HMVU;P+Y-T3eVf8~r)l~}b>ReLXeN5$mg zr~hz}V1OHH%^`OKWRA8zWB#%K)=LlelaH|7e|X&+sTEw=hHhDAPbL?L;^2(mX#i zGSff~-Xsaxb%&-v86g7X1 zv|t@2pI9edKZ6txtr*=13!``?mvn<9jc}Eayj)d%8?G$7hs4C7=k z%h-6W#IzE9)j-W4!(1JMY$FqGH+L%okNBeakX#o_^Xx#KP%qOsNB?v+KdlHZL*Lwt zVt31=Ag^G(c=O;wcl#(+Ev-;*Cyy+vAlD#&Z^hE=l0aJnN2h32FManC&l0~<)m;BX zRdaLG)KYi-2rk#C0t;hb6N^mcJPq4?eU$*OQ148$XvI9w6cx?fu%rU*2%W$rZt?7X;`^u&ZzD?c-nIK||+I8_fdZT&)xNb_h_FZaS2uB0HhxIB{}>tL@WdmZoa zRFlHw>^yC+NDE7=67#6Qh>#+EGj~OeG*zEmGZmvyGrM@RSW`V{;dugy3Su;Fv-;YdsYon}ldhD^q>dun3=^AW!#F?U2X-M-4?CHyanNQ0)RI zyP!nHIIH~B;uK28$0bn zU)OL)HIL#*8(#ypWRrAX>liEdh@_|@uMis-`&a{wP{(vT4{J*Ua|^o|J^%dRyimtb zj|?vBXr0hB?;sr$`$F}MBzIfOL@!+jW6k)04DDP!Yd062AV0SV{X%Oew-`I0qG*F; zbHCyomm`>L1ymXBaORqS)Q2!Fs;zXZ(Lp7~J!=j?7BwenE;&dg|EM>LAA`N@f6t`q|^8kxX z*TRGnWw&6}aQ~#Jw2Tx*OJy&Qe7AtStT+QRlK_1Kujp*=ARj~ZBA0YGuEaE*aIG*? zYhP8hfJ{@p6ptW(A5B-EA{$42i*$Wm6&**_tZ)NcwWOe2w}iB$C=(xNlX#y}eT@)D z!$?(EH$^U6!`wszZ!HVEBx7f{LZ5THk0`e!E^A|T9glSL=y2aG3+wDm-x$9bx9srD>{1Qe>>RTq z=R%9Dq~a(y6^&9)^HdG@pja=@*fh`F!q{NHA`LZz(jcyo=mhgXo8kheLiMl^8(VX? zJYO~4I2|V+rJ^+b63bvcyC~m0|!HxRaY0IA~!n=t_)L? z5@mP)C`IR3Rlf`~HFb|{o0NnU+u+#HV!KGki0Dx3AoC0hU!B5uV{M1<DhsnAzV=fX=+(UmRTmw&h}aE zK1Ct+g)X51xe*q{h89U7DlTSQ?F(zJFdhU@~fq}+`-o`~9$@)e~I^nj4nrgXR z5!(8>xdoPCPR>3tp*q&t`8FlqF;V&{$?1-U@yTh*=Eb>g88$&WAtsg%cE-Log}Et~ zo|cA&n#R%DCfZuYj$FxhMv1NkUQQ{_e$i>Mc|oz-CfQa6ia`;!mI?lb4sJ0;z7|fg z(N1BJ8S&AH>AC8W`brUTaba$;iZ&6UVQKbUPWe9SDxvW)PAWdRIR-AVIlj4mmgd10 zrV$Z^KB|UJZmwpk$&n^nfi5|*skWBtVOrKPaap#R9xf4H32CYpx?HaD`C8!xMJk52 zE(Tet9_sq8Zl%R)fhuW6F&TQXS_$DXZl-yk zw))vzfo58IMeZsoQNh`c_J)OS)-Hw0IkvWz7RqMPaVkj;b|%)zc|N)J>iIrO8m{hX z?s=)!hDJ#~!6Ev_O18zZ8eINXSw+Tn5jmPgJ`URHfj&7YraCT~LAH^aX;HzpYGLV4 zx?XC=nWYAaX^GA*u_dWts&>Y%S_wvlx{h9fidtD*&ML0P&KgEmu8A4ZLAgb`nYx}H z*;>WbF zZnjp@K4F%Tv6g;T$^pg7IvP?S$Ek$!&48No@$N-m)x zF%|*#`I!Y=Mn(Q6k!j8mL7M4B23pEi5s5yAwke^m?$+8xagOoY76I|$j_MBDKB2je zhMKCHVFsz`CLzI^#%}SB$);YpQCxmTMHYT87JAvf+IGgVO4+4;CK?50!C% zIv%dk&f2A(%7q%mns%vHmOcqe;jXUg4n~0yA$dNAA?B8G*~&&amKrIZc`15Y30y{M zJ~`@<#WDF>xhZDF8mi`orMd2*{uw!X1!hIzd7i4;nnl?ec}ZD5Dk(uWsv)sCIf_xm zdFDFW9!Unik*?`nNpaz3fnI(-_9`KP+4d<)*3Q}KeyU!vnkK%b*-nZE2{E}kR`G5= z@jAv?iowdh=_v*#(f-bPb_J^baXDsTo?OP67Cw2FKEZ;b6Nk(bud4^em>0aLH z3BiHx=J{I1%9=^hHX6QRfytgB+S(yW9>IQwZiOZK{z`7q9x>Tmk%k&JK8Y~~T9yXR zuIg6qia~K%p~}T>I%X!x-Z{SBn!#4489MGdE-|6nfo2&Fx;|MN87@)!8g{lC`TogS zL0lUCiN2QU8HI*!=Ac`pv>byBOdM=dBRzdfG-7lz5{-2YOaqObTy!SQ?;DKf)aG?!`-vAbR+%j6P+{y4RgN#l5{OyXZxzts>1HDvz)it~vQ-kxgwR8+3y?s^u zGPCSbT}*AQqfHV6OkFgMG7U|f4dV3D(_#`FwNrBS9FyZbVj_(rty8&Ta{?VKHFeAr z+>L^ijXd=dmA$i!iu4LIgPd)%O7+5Ayo*eO!kiR?g4GTE0`rvu4IDiRbDdmFOJc%{ zg5z|uxpegtT`dEPqP%sZ^*pUL)r>S!&0X@1(ruN^N=<_TG-FbO)x4F8@}eA!)t$UD z3!MwB<8|Gv3v6?>N`sAj^7FYexaf1HvOUQtjPJ<8$?Wpi;c{*BlD9i zUA&zf91Qe|xHRG;yh>8M0+jsBgEONt-I7%z)J-#k(~WeUEF;wXf@y{*&J z)UzENB4UlhtfOqA;`}unlB1n1Qf;_ww3SsILc=qQ3v~URN)l9c-SSI=%#!2M<1Iop zO*B)~^$dzs>~qcYBYcDH6Ey>k4P3(v%#)&noo#aTa=gOQxYYBkor8S?+_F*~?ei^^ z^Fn+*i!$OBEu)hIyrT^ZO_c&H+zo=F)eKV-{9{5rJslmD(&JRpv{Nlqt>QdfmCU%z z{lguS++!7sgH%Hj&Ggj6O5BtaO4Cxj6)p2hH1rIxPWM?7zMvekABa~U>4I|52?Ie2 zNT-n)LG}spQt>zvBakJ~S+YU0A<9_6(gb`a0!jO!z+nUR2yD8~#MGSZ={{GVB$pDq zQuWdVt5ip4pCEsoVuRq&@G$f6bPf0L{AAOFWM_luC^u6Zl?Xj06P4VUcpFO%O%t`G z&|uwME@PuOP0w)66zvE#17)jpn=FTbFb_jD<02>h)C4cx+|0yekHlObPvzw3@W9NJ zXp15pAAM_`6x$**w*0_~9a0*^p@r2vOW3tywiuox$oXdf^4!UCPxA|GvA zbIT(4sPv>FjluwZAMa%Q6n%AT{UD<#8r?|u@R}G5*8z=KLb>Bb_M~A|6->?$P;+&#Wnf9rr+M z_3*;rqI};hcN?R$WF?dADEmmI7&k?=Q01s%{d8SDZNDTJu871~WiOlHJQdv{_gsgZ z91G9flmabvI}e+}0G(Jv!!Qqn0t2OJzgWXUHG_Pe#E>*IQ^gQf{Ya|_-ym)O7#}W= zuuwY}r_{W-Fg+#pBxe`R;yf$syufTdL#?ogVh=a3q*S#$+amR>7#l0q@I<{7v*dVH zGecL?7?T9mY`?5xt{7({BRk!^a2-AS1eee}8>`rW3_I_PbVs|O(xmvXM5ol)G@WGa zpb!_|0@YkQH60<#bPScr$0CP&3aMgYY6nH+|KNbWIOsuMA6TrC4oy zr@RuMH2WZR+qf_@3*R{3*Z{S_c-IJfZIyz!=nO7rjR@8FAhkj@?^K->uT003WY4^? zOw-W9A}d>)aBEG~xWsf#HH(ahXqD_D^-#MAlY-d55>3bOI8{Z{fS96qt{e;Vf^ZAV zTxIWQck39dkTlKUpx`iH1I7Fx|2)^MAYUg7J0%B44SyZI$YkpfV?A}{z?eJ@qteK{ zLZ?`#tOTx9b>CzIbtNzTRAZfRJqKT((ySDlLetD7KSytOAJupZA5X1p`#eh*UwwN! z&k)ZnT_@e3SU>;djC?z5+h9{KF24*dHCv0QY`sjqa5qO!%ji(GP;Zy8*subp5X0p3 zWdG1)=imgVK*s=Q3mYqAFD=iQkkq(Bjf6~Fb4$$t=LoJMA1j-pyb^Vf0DFUgLaTVS zEKP59o2Y^y8?DqtWphWPq9Vmq-^5~#gwRA472{|nRiD5Rj~v$+8$WgJ5@U4_F1?~y zYta2zmYx}FIeMAzr1%9@(b)-de7p0}9OTEX@sF z9km?vQgjNUxYQkdY>aj7e0+7xLo5Sqz1_^+^Ag;QQ*yM;qkT*CN}^l>Ev@sMlN|~o zRFraZ{5_H~^qsvk)SV2?wGvaE(!;n+VzrcF!<3W?tci1v!VIl6y-JM3qOJYX%#91|y!7Jy zH3MU93o{Bc(kxO8xe|5k{Y+e=wE{wHT@>TheRGV0y!@QqBa$pqL!Aoav`ZaKt({Uz zylid5V?9zG(X!w7vavi@a zoB~3OGTe+~!;4}<0*w+&vP-PZd?JDjA}y4PGfXnKA`8Py zwQaewqH^P0j6IWF!z`5S)bo@g6KpdqBNJ27EJ7Sr0-e303quQ195nUw-R+euqO23$ zGhKs}^%I?AO4Y*?t<&t4xD1Vw?K0F8vXY#g1O1aUqSI|6Ba_3OB2|1%ee4{9QcUul zd@cP_BD5{Ttkl z4UJW8ldS#J3Oz##T%2rTRFgfD>`anFQ=M$J%u7Q`eY{h(bE6yrjbqd7tz7lIR1NjQ z%}lbaGr261{ZbS&)ID_l6IBYblk+`Iyj3zBl$7;~QZ2npf`XL{G~@Ns!;CYd)C;_f zy^Fk)T$0iXJ;L?u3iUlKRg6=)V%?$*6C*W@lypN2>_Z~8v&=Ge{i2NBT$DUg%(YyS zLUr{_ij;y93lg(D?L701LrQh^y<#;BGZPDvR1?jjJ-7;@^D+zkv&_9iv`WL%-HY_Y zqwF+%g55&WlPqH*3KCrOEi6s*GW^1lqT;hW)Xbx^{cST7Z9SAr(v)JNY%B}8>|(V7 zGvoauvNPgh>`e`P1C5O=gYq51jDzEJRZ?P|UG+_4l}rM?%{A5CqtiSKY)nJVa~zct z@_Y;o-1JrKb-9%6ic1TeOOvxSGP8}M^Am%!9eg|-d^J-oz4L86{fZO=jPw0674tIu z4LxE#)QuA?(_OL)qEbv$?3AK1610@Kw44lM^Yu$YB5fVjofNGU!&1x*Lw#Ib1HJ9y zl(T|;Z1qZY?9;VMlKni*m6Y}3q6$KE>_Q@}ik0(|w3A~??6^E_lZ&G~96jAU)U%CC z3r#Z9N-h0ULY-`_!}X%0{h}3Pog8x&GtwLbH3E!GO-v#a>`fw~i!E&2Vsg|1!u%q* zBGQyB^3^;uQdEr{Vsu_5<@dmk_=PR-3zRB(v=IeGh&0> zv*YsveU3*!uR ztkpw|t(nVfa*K3wOH92@)uIy( zw3UmwJY$S~O!eY31M>Ud zP24=AGV-(a)#GgA^Q;4$4e~QJiq#SVy(6@(-JSKhiZ#7FBmFWJ<30Ss+&z?&m5qy| zqoSj86O+>uOYnVz>f)LiKg5 zV@#ElwCtkH{G&7zG-JYZB0UXt;}l&SHJyyIU8D4hBAqq$920{SwRQ4Rb(LIFtc+sK zLft%-L$yP>QgVZwbNr%xLd+9N(`|K?wWCyXl^twsl#`1cL-pOW1M@VMLm~_Uy~FeT z9USaZY+TJ$Obw&0Ed%p?Bi+(O1xZr!Zf^Moh?gsT+-|`f|Tu&l5^Aai_Dd?y(9HQ{Q?ZLRAP$?jZD1~++rdv zjE$YrQuM+UVp}Z4dNp*iwkn>5~GXtLw)V_Rg;u_vaAe~bi=&#Lew=~ z6J64^Jp)4%1HDyL?23HyG~==j4C8I|EVz^+G(9u5Tw@K=qdlw(vu&dD!VP0`3zgLj zl$6X39Mrtc)fE%;)FSOeG81x(Q`JkAytTv9iWTF6 z{ZoQG^|Xpzec}rO;v+3G)%3M>T(TW=)jbOe1G!SXJYv#xlp^B7V@+)I)6`SVl|9XE zZ88%K!wuqf%uD?>iVcFJRqc%OOaras1A}wi)v}z^T%FZpZSveKjdR_(lC&Jdbz-s; zVqLX!3pJ9g45Q)_G;-s-l7f7^Lvsr~9F5I%44k#2BkZ+xwVYxTRrDRqP3`lNGAx6Y zf)ku4%nS@oU34wI?9?OdbM$h;1565xl%3NYO=B`L z3;i|R3gfk0jUuAd&6SK*3Jv|ZJYy_^ON&yRqODR3?X~Oz!_5lxLvnIMR0I4Jl`}(K zw6&DgVl-3>RT4wf^mR;Qi~Llq)GZ>@Rh(m;j6yVAQn`GUQj&7*?Gtnh<4j9DP2$un zU7b_&a`H-5Ou|f5REk~wV)IJX!j{8N7RCP^V%yctVlA}_&60B0x0~|~>)E(oCG}UbqLb6R0Lei4rVok#I zJQWM0)T123^HU8Cl0sFJjZ{ngi-QX_GJVnv-3;SZyc1MYi@7{=6s=P4@gT0Ca9U}5G^@Ag{Jv4LElAQ8N((RKSVwE#Jt&21=-CV+zRlKwu z@*PsstbG!U)h)w};<=Q(+=F9X!ZYm+J&dm9fF;VR1F<;!ny1c-HW_p)l`ctBV7F>>g;$^^HPdSic%AEK`hXCkr8O* z4aBgqQNXnpAEX2{5{EQ62Rh>jBm`fJZv+{%qUzur$P&2I2E|%@Lj~ArMfz@r{Sd3gE9+ZECWnRbk&ocgA$D* zw2KvOf&)#|@|2Wwy>hgQW8-xSLh`v{Lmk4Ra$~(U;(PlWlk>ug(^GAY6Oy=sOX4FUlk}9VEfV$Z-3(ky{8U{Ho$YgN zlB4{iv~r>hJPHH7JpEPU0t?a%lEX{Qvs7Yz)WgFfy`A&i67x(_x#HCmvJ@SSHT;yF z^`hMU^v!gvifsanQ#JDP_2R9g9i07>L+q8ZiZm^wi-U6$5-p0;lr>}W<8-Vd6*JX+ zlgzntY;`QmGDDqmbDUjOJtG~9y|rRpjO;8lL)Eh~J+&R7(yW4& z-PMc>^NmcL^fQ%$^R#r$EX-ou;_SnW0~6g!qQZ>ao!tWyV{Ov4b<#78xFVD-y?xx% zl%2c_q6$3>5>r%4b<~Qq(o*cR0tyPEyuyQvywY=$d;-z}%_6N#JOh;jbo0_eEFzS% zlfBZTJ)F354KmEbeRW)XY-4l_GGokgqLj@Ia^2m-%z`4)^IX%5N|T(T9863sRAZuD zj3S()a^lkS3_MH>4MTJ^<5ElAxpX~(G!3kyay=b#BUG&H{K8!|3ap}SR2>cd&71;L z44nN<3`(r60+pjQ%#t$Hatz(W%wyHkQ&I}`O|3IC-Qu}?1LI;0!n1+`4KkHILVSE8 z0*tMLD?42~T3sa)Jk_+@h&AfDcy$c*;xxDhs zEu*XrlkC!6LbMz_m2A!9;>>g{{lkrd3kp=@HM~mH@^sX5lr@qQ@^qZ@WBr`Xi_`Lz zjDoxrwWCc-Le#lDl;VRdRf?lZBJ|9IJxhu#(hCdiRP5E0Gzvq*@&m23liX5OW7A?a zV?*Qo<1!;Wwal`dl08k8jn$*$a@9QoxfHGAZK8{;N-i(`KDaT{TrRaufWDl$HIR9F+}J4ANse0%9yp)g02a zxwQSQ)SVS`?TSNkRjt&N>@qF#U7g%i>@9+_&Fl&TgZJtG4%12ghcT@1PG9n7rUebe>)B0O^}H8cw1f-~dXO{1gY)tpU2gWUB}LS14@ zt!zwUt<7~xRl|$abCq@c6fgGL;X|KGK`cx)imOAgH!#LgF%(H_PEnLhqlC|?A+#TY*QsNQ=A{^YJ z;)AsUxjcL`%~b4^9HQOhA`@~m+@11cle3+IblsACwUqPyyi2?^A~dv}?9z18GL+5K zJaxmO)%{$ob8{_ILfxI>(~7wwoWlzI!VMy9QuADkwF+|cRa6U2-Hl62Qe71+J zZFBsMQzLBDjSa1feBzBY!=p^n;+69?Vgl{+Bcfu=xYV?A<2AEXat!rt-JSh|Y{IS0 zEDdwRGGg>IZCy>&eN@#`l|qzDol}CHg6%D1GcbQEj`t&jN=^jl*0moQXR8{e6lqP)J@}}^DH!Ud>uR#9sEpU%@Vye0tF>b4whwxD1T_yd8s7g1sXPOoKBDHPt;8Q=?N|J?yh{^p(B6jiX}&W1Jn_3R8k~ z^1K3K69V#LY&AIVa&$c7Qu4h^)l!X;a>7;A{oR}$ii_+Exr|cn^o)EweQnJw156Bk z43!;JEsBf`{roaLQj*2cRP*&R3oVR1Q)2YvOw=-C)P1ZIy)(Gd zy`0=lO*QqsqV4UBV+`!=olV>{%)%m+?Mpm0BNAi$L(=`M!UCLZeRVyp4ZZCHlH-)Z za#Xz?bX{Tsl`VZTxwJFfbPMxRBhicPaE!b^-Y)kB@4!fc(LOG{LBom5OzxzfXPQUY~7TujtW z^0Tttg2Up&3cb}`ovjQ?k!aR+<3ccL)9Acb3 zH4V6u-1BX9ef1m?4LpN$(k;SlL!*l_GV{!ebW43z3j>Udb>fqq3iNb!($g)2>-jg=!UJ@ty+3f*idBq#y*!m7Kxrg>{H@(^a`V_HHt$EOLNS)v|MykjYF)J zycNA8g3}A_gZ$M)VlpgKqXHvT!?n~Movc%e!puw(3QHVwRhr6S z4Ydmml(;;#Z1OVotZnqnjJ%31&3!`cOr!MNU99s0Jt6{C{0g*P4ULRkBke8RG*dF- z0*wO_qLn?}G*mNliVOT*y_0ph3XF7ZJ!1=e)I+p1)uNKD(%rpc9c-)%+{~;@vK<55 zyrT;eyrS~m5;cQzHDmlDqw+oVwRExy72^%OyrZr2BDoaxocvU*Ox)vKL!v#E<2B6V z^{jF&^inJXY?6v&EiBwkHB$_%^*s`za#AgoLv%we?D9jCy~8y1qBJbh%v9C60uo(R zyu4CP4Hb<_ZM`D1G>Q^!tRr+ik}~zvL;VX9(?b%?GW7yNbAw}*O7xV{tUOhm-K-Pz z(=0U1%_5Ql?YPXfZ1hU>y-Si)e8NgK{B83ylbxbni}K7(v+}hIjp8%Hvdrz%qrDu} z12eS4vkG;+Le+zly^Rc%gLKTS3^PKx?DE2MLd<=`Gz)#SwF*paB0N1pq6*?IqY_;W z!!&c_OkxyOi|tIq)fBCClHGK@4E+sqU7US7ja*W7UAfflt@UHFOB53{y$zHN z)f{s*d>wOhbX6j915~Y4^D;C;w88^|oWcuoZK5<1yv)2(O%gNhA~WKO`~r3IV(bjK z5;OE;^R%p8lGCG#TwP+4UE?g(mGesd{k>C5bmOeTmHe!Hift^l9gQ>M;~k=`<8-~9 zi(L$L!V?Sw1LKW6w79a9l-+Xl6jL<9(t_PJbz<^BT{Z)KgD~wVe`AMquS~so=b{kT zeA{@RNaYkYKNTItH2uKf^d#Nr1k*I_7!%NicA5qGF{xPCaSSo`5DgEo^k%FCVrW2_MSe4?z*K~A!c4_Hv0Zy&MN*~DLz>dPVspOS!yX^ zZuTC2swuwdX>kdORtZ)*85YTI>GsAMkw%t^k)kmM!J^1 zURJ-xYDLbuKJjUR&Ne9)9zIG|S~dxu zhG98LzDk-lCKg3$A{?V>+=>f_bg+WfGnf@XEF`ve+8RpXnmVrWmU$L#zG?=x#_kce=DwPd$+_m<%7$JM=@}MWN#-#@p8hI{ zE@}liev!`Z#_IV&_F3VI35I$pc?L-)dV1~wsgd^jVS1s#0SbC91*pB~ke? zVFAhB5nPdmM$R72&dO?b1tmfGs(!JG-u7DIi8iK5sp=lC2KiQA#-Z_!o+Z9Tmiex_ zj@D73PX6W*IVw6T#cDxOLAL5#{!yytCO-b*VWxJD4%Ti_W`0SYnn6}MCicEMzK$9i zUdo=~PO5fprcRE&b}oUQO8y~Q$r@4d{%P^%cA<6!mR!-{E=4in0g(m4K9Q>SzQK+j zcAD1Co+0+yvC%n2L2fxJ@g9~**6Fq}A(~c7(Te#Y+16eO)+uVHi9sDairJo;r>hg(`)`Mghr@32r{V zF?z-N$=VivFZ@mj7CMX9C{ zM)3{~e&PD6A!-(Zb|$GIo{7264(g6!rK)y`jwu#a8k*iZwp=Ebc9s_Ejw!i5F^U;h z!6vz>HVG+4hDoKSdht=NDfTf&hS?$M#R1xhMdpd|&RQ;^vC)c=s*y$-i3Ooiie7$P zdfIjYQBej~Iu2Qm(J9H+s{RQYj#j1d_GUVMx{2zRIf}V%VQM<2TH5(~DGnwo3DL4sYQ`u3%!2C?Rm)AKeO7Ft%$${u#UzFa0zxtYpQk@2CCseuKm4p9c4W@?6s#bNpCKB>9ZF(w{% zUd~~5s`}=MMLK%cel7+&ULiS2LHU~A9_eABQHs`FNglE01<}f-L5W88mJxC0%I>ME z1sb-|KB>mVzFP6B*&f>YO4$ZU)>hf^YKH1Q_Nl=E!A5?ng--VFTJb8Sc3i2!c^+xH zMefdOY7zdRt8_C;(z60Qe4<0F0t`&DRTK1$gPk+t!p&5*)l6L@>_W6v^Ic2a{j{yK zRn!YhOES5PJq=7@@9rl{c`ieZId11Y`j8BbqeDPVv98M{ZqMARRVL2m27l;J#&gnt<{Vz zlrw`IjDvg&0umfl;ytwdOPzvD3}dogEOYWaV=aA?QmnN~lZ-+%%>q>{N|GFcxcuzG zP3>LGY@>=b!ff2_v($Zalyr5{!kj{l4D&6WvkVj?%;NJxB6A|r3bV5f3X;qcib6we z3RDaX!?iUnGNZU$?KP7_%tLdOb%F~*t+K5mJxVilqr#Q7eUoyulUxdQTpdD_y_Jo< z9g>Ze!%c$1G6RdEv?2m7LUrBjfbUZGv>v3iJxYT?Z$-F(uN zBZ|zT)S?{B^c7Prd@Wo}V*?5cvXx?jO46+S{8U5JH0|ue{e9H~qkVkr{R=F!B78kF z9F+4_xIFXROapC`;ynu^1I!}y>=fPIt&+?VqtgAgGkjHp)Saxe<5dmvto`is^NM_Y zicRd)Y&9|xvci3|Oe_;E4a~UwLetf(mGhMqEex$N|%d=pf?oqfED?M)SR z+%waa@_bwk9TStZlI?>%@;!?*tqej;Lp@TmeEgI3GQx`W;w-%!qU^1FvR%1+(>0Zx z0t~Hmw0%M%Y+M2~t>Xe!!%V}Hj1_IdlA@D6Vj>;#!u@lSODugYe7!RZ9Q1Pxic4ZO zQ;XdEqfOGnxe7fkOLg>}ZQ^}QgH%IxJ4Rg)B;}ZRhR7_oh{7jRTl5Nve zT}_{8ikvimbKFt>d{=6}3%+4KkcnJo1ZkJ$=;-!?gl~)16e+mBNb? zG%}n#Tz%Ay?G3&40`n~#bmPJbj4d^t92G-D3i48v19XiuxqJ-u4GYsX!XunD;{s!x zR8w8TTuiis1MT925)Bjs!>t^(GrjUc1NA)=3$iq0)PkJtOvCgt^vse>vkM(n)V#Ue z%ws|gvl2b5)h)CPUHvqJvXnJ_b$k;X<5NssESz1vOyctr74!1UOH!OQb#k*qW1?(a zk_?TE(iQXFQe5N1xoo1dY;|+fRUE@zG#x^N{SAzr0)n*z+|}ar@-zZmOw5W+i=rYl zv(54Y^1V}?Ts#b-qP6`CG~?2YEMg+9{1Uiga{QF?tdk5}LyJOF{1g*hot+YjNqceS!-MtL`Q*`5ttRgcF9o#LG0}|7GN>h9z z^#Ztx)bp~FQ*xEn9W;|o?X!$bjh(WTO&m3XtR0*(0t{ok6P<(8RElGDO>II8LexrJ z)grUC%nh}}O`O9F4N5IMxI!&Gi~^0_wY-%LEebPIVx#@k3YBxyQ`J)(oOO$|J#Adn z+#?-S)wBXbd=fKCG^`y%!a@>*OtTYH4b)t8%#^uwG=fvpf_$x#RCF>U45Bq6t%Fn4 z0s;&C()5G9l9F94Rh(i?4K!5T403|v^1Z@+y-YN<&5{(=?8Ax^L$J=mAYErb!Yqs# zc%d-z5^2auK~$ZE0a*f_ub{;eX$$y05&B5iMDU{D69J!W(RVW>bBQ!4Y@i;2O}vK-W zguqzK!URo|Kvngi5*?3ll}IafUrirt5525p4O1>d4?lGSk4!7wkaXpckjR2kD;3>> zC^M7zI5myr?CcT`)ojbaoD7%D)JQ#xqKJ&}G}kCYv*hTw46{r%9s8(kt}H{761C)z z=-_xgGiAfD5Q`uSRox^dYq#`5m8kr}v|#5%4V6saXy4F)g3Me?-?TJ+&0O8+XlK{r zycm1M3>z+!u#7NgKMP+SZHJKbf&gu0#V|)B&oo_)h~n@ftpH`kcmw5pW3}KIOCuF? zFTDWmm^2Hwq;%g1Qw`hr>;Ov_t{6)@BVAhy7gw$P?DV`$!^nU_Zw)U^NA&`qsPJS1 zSKVx19W~d2tjt*7Fpt2HbWO$Vkf79bKNlsVK@U zBoDRh0v9)p1P4VAGw%qqtP)c%wL&!$(~{T-2P4yT2lWDLCl^24K$Qr)Tr*{JuH?{2 zrw~>B(jXW2R3F2Tn9?w#C^HMoVgvUQgW#a}qA35wB#prIJTEP0O(&JajHGZM9bI>O zb^CZtt=vep=m;*&ECVg2WYd&PE8Fxm-@+tqr}P+Ior3gq4{N35+z2}zFMCT1FO@`Z zJw+`ecmFUKEmuY3AS)GvQrjYrY(*t~E-M2|Eo+qsRa14v5N&fGd#l_mB~^8Mw?Z>>!y*%<+>`_z{oq3X0;Parbwd}`nBr(( zF2|Tq{lXx7Q~RWF_e>Qhiy&jW(0uE>oG@RPd~a2acn^nYdu4MsySzLX%V-Vd81GVT z+hRw}ygXHZA1(W+(p)Z^K;1z^{7@@J3j^1P?BuZAbPubNB6E!pPtOu3U27Fbt6a;d7&lM9Xtlyj z)1;DUu7D(G?`X}C{M_`|VxMRoRcjCB@F2Iq$V3hIjFi$s^(f!4WIazSm7=WBFg{i1avRHIo$e9P1RzR2M%rPpkY4PoE4m^(cSaAQu-S&3JG7B(+G> ztc+l9E3ahti@9Jufd)Lyb_E(nPL6M-#Q=yaTF7qNUbtkXr{8*=aMT7K` z=&Z;De`{mA*kA|aRHH&48}qOdYh%sOpd?Q#%>YYN^-$fMVjUH=L=zv+Y(tZqZC6IQ_aw% zXbmpI1dDW=LVqXEXg%NXQVUx=l?0}HPx+pzqk{Ny0*kX)ZsYiFZ8 zyEtXTRQ)jh2n*j5uMA7OoJ0-ZgqV!=;u+r3|k; zMF(}`KqammbBzMmlxSBM51S$tV?(7_MSab9hms&ei`29j`w)!`{|FBoQ)7EWuT)Qe zd*^g550k8TU1#&ycw+;LIN#_fE^qHRrH~*MT^Ds@?If${$Wk5WIMXyI6`jaTgEXc1 zK+gojuz*0-k^(#ZL`AydU&3v6AKNY8Z=dcoYf7QIyklg$ND<}PsCgd zbfrXxxBx#h3nP~jMLqXey9{kVi{hLFpLnB!NON_!^a5S`JiX*#+tMIU=X`(PcvF>9 zt~5Q{AZPuEqIA7b107GhTuYzibQ{mGaGP|$=v;UG;+P_zVQ{8;^SRc!zQt#v-13NC?VAn9u_>k=2 zkZ8?N4ZQ-5IJ2OP*bpnv%vgUly`R8PxH)gWta74t$J zEj4F#^St=%n1E2d?7|35we&1Q%jl3GkKz2x~=+_++(w6Ga_A4O^~!2g4L|tHk`A{30jq7;Q!SJQXEN1GV5}Gm9Xf z;ynG_T&vs!^9U`!R9hc=2iJtslwjkMfM8cY|JYy)8#n7hE^DQDQw<9hk345Z{aj@| z_dut7lVXh+y<)e}$j|_D4J#YnpfGc@;v(M&{~|S8jnWjO>_khK!fbV$yf`~^LqjfA ze?PrUZ^uL%U+dt6OozfaKP#^wBegisJPj4kWEb5GO~2?6v$%BMC=+KT9|OC9xNs{g zmB3&Z3)5_E^Q1git|T`%)hsO=E9W4ku)OfZLX#9LCBqEcTpuGZRePUsS9evP$PAn0 zqGVn5AWLl{i(FfiTrDkoqvALNCpAxxU`4Lvn9#yl?eM@-|1@{YVnq`h%arJhSRbXJ z@btK}xESk9&9DgfFy(Z&Qj6~%;nH&>rrC%?peBWDA9-JGm&{a9}uTi=)>bHxY^PcJWf z(@_7Y68|6*)!6VrUGJQz&{&m1t|0I5WIqEFSBs=bb(35*vphF<&jRZbZ@XltltSH{ zG$mgxHB-gFxBy2p3!_Xkb^EByP_4p5dm{_`f?Vft{SYqa4123$V`rOOSG6qNAiMm~ zVo!Z{W&g-5e-BePZ$qPa^-Nc-SSK@62MdiTZ4V8N()29zd}GVB#Hf%Y>%b6euC$_P z>s%enM4MQ>93xldD3h=dCtpu@<7D;Bq$o!l<$&B6<;wz7 zkNi0IWG(-szydB;l|m;gSI5%m=wSbdQZ1!;cNeD=>#QOZ>kzeMj{-Zb;K(q;LyDw`kiy16@t+ynIC?OLGU8#3Dcc0^5`@XB(4r zuEHc^`{;rgtzxxY@5oXQn~>ymi}0w@f}HG7Lsih#FG0$Yo~nAqh4wi%DgMdEsmAd^ z`8lyc?q0^)0i{8Od0d5lre<+@VaYaLK1zx)CO-bj$+4H)=Beku7j z1}Z5*PNkN{d0rXjb|vOo%8v17*~#8<=GkUkfhNv@ei<1$X{8Zr>XyC+T7_x>Ho6g7 z<~Eio&QaDX9#;8g!5T)MuHjb7J{jJY9v+#_TG<&Idj4r@ZcZt2FqMzE;*= zQFh68`KAU%=HaUP$(|8Gnh8EGkxC^oI{CV}su5nL#mer6n!1Yd+8Mce+OgL8iAu>f z1(pR|-bEUbdD+^<>017gj_T3j@m{JHnjw}3jv>j>c^Up{21;t)<{nRR@tNkvvU0al6@dYXpT@lLVfNjc#` z#c_q&p*dcmMLJ&U*6t?C?z);PL6(Kamcgoao}qeN(Iz(9sXj3}D%tr(@mhw~`pzYO z28ICzT57?D_KptjuI}y{C54vJnwpt0YH@}JHY%3RxwiU|%IPYOE>^1EzFdY$hI%eR z9%dz(z9B)W`RcK1=}MOBh9*VXwt?Zn;XV#l4z6Jq!9|Md0nsrg`B=yQkWT9+Vf+tt zutE^>5edcy&=EoEorrD(vIIJ8MvL)3bJFjOC2#x>95zsoz{mg04b90N|I>AWTp61h zynG7V58L<`$T( z&sF4_n{90#X>T9k?`fp3ZsQi5q^ND^6R#L-siu~Y9HATP;$&iztR0-<8ttN5XcOpd zU}@!-p&e2js%xdA5gE?qT$rGh7nR`brs!FsRuW^Y6y~0wlph|EQDCWUm}#e*lAxQN z=O5x`VquW0pA(#zZW5H0SFD~MRuJcw6datL#uXZn=VBQXV{PnV;2i2@pRK8z;*}eh zqMH$Hq+Dv2lct!K7#$LpV(Ovo93B{+Q=*!n5tSC|Z5*6n5fH4duNlG>=%DGW?3tIJ zq@!h>n&j;1k&@(MovxP=Zk?;`VwjX;V_Il$oROOx>=dt&o@khCqwJ&1vl}>gMcgn5^m%9pF}MY-QoCnB!4ks-2M;osk~kkYVep;%pl0 zVeVxTm~X6VqVJS#TjZ>2A85yArIc@>7nfjiYm}O+0%%x|hUr-q1m{$;MqLq}LtLx*U7pxH+9TJnFRgj}^Z|$UCY+~u8p`{m_ zubG^r@2=uv6rZs_W0m6)7gXSE&86t&X6tL~VWe(h5FekJ zmZ4%B9ByWnXp)hcnU|p*uOFALVWO-WW9npAT9}dSsHs?LWSID>*r8h7!s>*@06hErsxx!>Zq9<<(KJbs;}YeQjo4( z>K~u%Ra$73W8~~+#1)pM?-{CMnPr@zk&qFZ>7|%tXJzJLU~C-gp;w%mrWNAlZjs?x zRBEf7YNV5p9IoSMo$FSb;1O98lozBI5ERX2q@ii4S{P{H9;4-88k`g7=A2{XuAWoi z7aQRf7?Gl1tfUl`@1^9Z=^NzckrtO*Vy*4%s~@J5?NU_a=j*Rz$)&EF;22$~t*##t zWaHxLU{GWgs}b**V_&3e8ttKE6(8&yt(p<(WEY%j5vyxuoS0G+W@(aX=z-`xWuzDw?WkqsSKyj&WMyt;8mSj#9}(@D zZ>yYbqim?HZx?3b9qVhC#FZEs>+5G7TcGCRZ{!xF*VXZKE8T9;&Au?2%I( z8SJ55l%AhplpyB8fV5RFGl<4dloS$wVovOr@=#mx`>Y$8yORak1_!lfSV7hoEs zZDVMtm=hUXl453>=AUYyq2`roV;<(3l{UYO=(9OxA7q3W3K zq~T>~6zj*8oTZi-r{NZ%6|LlCVW}POZD?ZSo)?%Jlb-FIW0_m3;+oX+^6 z6%wXvobME_n^tTWtekCa<6fxc!DZtUc~sF|0m=cXK_8suT_q@m&Io~dk}U+R}= z>1kc$Z|k3&Z110+?P*-B7glT>?-3nQ6cTThnWLtdWv0cY?v}07MNvrl@R_p%kna=4PcGt~SSYU-2dlICq^5)zXeqNnT~?U<4j7Z;;#3CWLj)&m>BM88y6XBuNvx+ z8t3Tgnq#eGn3!IuoZzcv9++(sqvLIF6&2#4te+C^SLmZ`qgBG?S?r^#o1&VpWn`3> zmz3&an(e5mo#B!g5gnVVZ|WNnR;pOw?xn16@19a%tz#V;rQ{u}9A%Z`9c`~3Qfla+ z%%$d*nU$4X9PL^d?;oP=tQV{m=ogag9~q})s~4iCp_FBwAD3378DJ2l926PhrWoet z7;2nh>KU9FUZSTHk`~ORlbLCrrR0&8pR1SQs*(_rp%vh%Q(%#jqMK~&WN06$s_7GB zpyK1`Y41?vsNt7mYN&4Gq!w+Ro26x8pjjLq!If|A?WmF#=<6Jt?jK&1;~r)g7-XE5 zoN6Dg937UY=p3J~nv!6ZmZ)u#SY%<5mg^a)oTXu{7NX&-9GKvtl&r>OtYV#-;O3?q z?B}48V(k!AoNVb}?ib*tVeP8#6#d(!5})a)s_z$StLy8a zqH5~m!ljd&n_`t6TxzOit)*eBpB!RP5aDhZ<7{N?;+vl7oT}v)AF3GRk(HTQ6k(FD zUThrVksa<4Y-OeIuCJ_CSg6Ql7;F{hs_(AsWucd1qw25dmKv+A?Q4^g5qZAjWViS{QS>l%vlB(jHm|>*K@~oUUva zWu;zFoDfwQ8xiPgm>1xrlM^10m*^bjs}rr6X=WZCgZw>p_${Y7o3xo5Tll?>z?aj>=Paop5m07sOA-+TjCq(8Xes7iV_y>I=TR8t>7F0$6&07}q#dS~S(K{d zpJ3x|pOfPosOMvy$d!<3oZ%mmZ|LK%s-+&5lcg1@VHTlW>XaUlr(2k3s^{vQ6QioB z>gj4~ljElmukY*_lbUKB;!uGBiV(6it z5T2uy>8%)<8{y}y>=_Uj?4Ohtov&=7>8etqsbgm8ZsM<=6{4GG!IfI%r|%gS?Oha_ zpQ|RHYo)?ytpA`|5tY=~6Z0R3k8RqRD6&a&bpz7;j zWE0Aj7hdX899>`>VC<>xVXT;t=WMAFo@Z!om!j#BSgK~@=8+iU}Oo6?-c2qt!!Ns5w4tG z;*=g{V-=pFm!heas}|y;SX5%+X&!A*6r`2sk)gqrW0vR~oDi8Ek{pz*?5-b|>z`d{ zshX@>sAHFu9GPX}mK~jC7GDtWT5ZdRC6=%=M+7L#G%7#C$7$>pr$lth>c7GQ2@TomH&7?~d95vmmu8lj%3Z>;DaY?PlKlIK>ctKkx- z6sBmY@2~4>ZXDohm*HX(ofMxQ?h+njlVap)>Xzl;W0tCDY;B*PXj|e@tdroV!WENi zZ0eotTjZ^8pkftP?319am9A}UR}ybtV4dx5;uh+iq8#R%qo(Ck;_GRw=cKCT7pLN; zU6@v!?-Cj3XQ#{M6Rnz_uJ5KE9TFSq>|q#S7Gaz2>X@Idg-vlXJ4uk8|B;YaW$iuT-Gv5aej;UZkC^VPYPlm8+i|Xq*i>KWys=49)xnvY~xp`YNMax;TVu^5}f6pm6s5iXYL-Ml@Mhe zo?4t?7H#I2>J{yfZW83FogUBSRT!!m;p0@2r)24Gr&VHT9jO;=l4g+XsG1Y1=#`U~ zln`LzsTole=IE6aX|EfeWfr2QWK|TQ?q{8vkx`gv!etkj?UG`s8lIvR;gKDnr<`qR zXKfl0qMW9d<>_P^p=n?21eykRh&6M}vnW!r_0@Gtc5n_#O-|5FbapDtP37{|P}a=% zw+{%7F*MPQOS8|{@rugHGO>&|&r;Pa40f>74fEHv*YpW-wsZ53^mR&cH7~R&ve1lF zN_Wli%(IE(%6C;Nv`k4gbxbO<)JQML_bZ9BOwpv3XIZr_AFIY_9(H-DD*b) zFZ9!M%kfsuN%Hc{O$t%hGK|dB%gj$RNw7?}wR5-1^+~bbuM&LH}|y4 zE=@8}_f%1J)eDRW%}KR#$TIN{*9rAZ3^p;>wGOi{@ijIqj`fO&3=457boEpVcjB@x zaq$b%^VACov5yPz(ojjX$?&wW_s~+j&LYi{iv;pv)JVxb%y5gOoE=x6K{t>m8R+EQtm|(A?omS{Pj7U@}-7o_W!pBb2Cs~5o)vLSxuD4)8-8j6o+XfCdnKQ&Tb% zo$@Obq7^_Rh-QXH3g(tZ3b6{j`p!l91=wYR@=Fp+QWXpoctJ;%rsk!9Tm-fR!~mZs z5m1z$9GqIB5Urpe;NqsBACg*80yfnxKd(f=#zsNkjgA*6lD%{g98OSA!G;b^Elf?5PH#ABva7zlZvWoFZ(bQGXP_c_JH`O=G zwT_KZRMt%h&r1#p)8n$UFEnrnwleh5Hpth>jI`4(EcOX5PO*(mv$Y8f(M_{-@>5oI zvQjpVbja1sjW3S3vJY`K&X0|^kB^RU*3Zx7a!|~*wNdspw2$#ja}V*h3v<@6u?km> z3Db@ADbaFw%uMx4S26Z5vGdNz@(j>6cghb>NYx3BO7QgduupWdQ00pC2y=-su?li9 zk4cQMwDQ+Y-RCOz~D|T~EH^@?U%g-!M3Qe)ywk8QZiB3 z4$#c?G;mT((DL`TPR!Ac2}rdF$Vy5H(DKzcamYb>lM7@+}Q; zQwk1sQ#Nxc&djw5a5wQ)HS<*t%`S?F(9O@%$_$J(Ha2uqOiW7%54A{4P4P>!DK*U3 zHFwJLh)ne43b0Ad4)@44&NNXB(RMe?&Q(t|%q&((&~y(suvH20Fvv5@GF2>c3J%D% zGSe$V_)v<|B4^Oo# zjdu%m5Aw54%CXk=)b)vrR&z)XOR=ywighn4a?I2*R1Hhx(p6J64$pLqOVIYyR?iOB zjMfc`w6-^ka}AI3jdQcGws6skbk%k#$Wb-V3h~j<&PnjI4)Zc}^epkucF`-0@#0c9 zc2oAT_jS_GQ3+GbNi$JQu*r|GOGt|})Y3`IQ&RM@(X=!+wQ@5F3XLrA^R*~S%61C0 zvk7$eQML2eNbpqR@-gv?%`*wK%ghheHPKSCiHa>qRI>9mam))fQ#UY(&^Js`PK-4+ z@i+6#(KRjd&CmBw3{5WZu@2A44^1%B(%}lpwN%Z}Gu28kGSxAU_c4sJO31L%w(?bT z(YDpejBzuM3iEJ`bW+RJ&&V}X3`+G?k5CUQHpmF}%PY>-RZa`w3MteLC=5?74lM~) zi40E8b&B@a_3}zJ){a)SjmizwQVohpv2_bi)XXV}@iIv<)^>?9@G(@f){oB&k537( z@#b4N(@D>W(Tob$HStWg^vEd=%W-kmcMEj12{8#zRx!8citx1c^oX$y zQ!WfqvGt6LFtPL0vI+I|F|u;B_batAjMC9JaP`!8w#d&_(RJ~1a&gd%Nz3pLH`27s z^mcVfcjF4pvR6_n)^l{XR8vi~(DrtW%2tf=vx`3J+4WPc!yQwJ}Su$p}`p%HYy74)XD`iPcmqa*a~XC=QM> z)%385j#X0$%qz8wkJL^uQc^Tb_f=nV~;Tx!DU}7I{XY87}nhklADrbVyx#-n3!mjl$@gH=NlhUSgIK9qLOS_kmBtb!R2pU>h5Z9o#5x9@0VK; zn^u&X>F-eBWf&G*7~*N9kzwHwm7n7ns-tVKlwOkLQ|z0f9H;MP6{F?l?CYDF<)X=D zW$O`dt(_OIZtrL8XP6sf!aeVt(0n&9`BzL z?WkrFlAB)`pJA1t>l~%8nChdQn4=qGXJNoqkmMbgXIENaqnl%?6%p)Wp5`1Cmy~5^ z>fqs_V-%Wbs-mJ3knWO`pb@K+zo;!9TaI*kfLF1V4?49U}vmtX_f3A?4PEapKR=vB78GEYoUWay<*9AxQXJvp?;opc=WLl}8J(?bt{biI6_plk7L%W18fvZ{ zlAju7k{A>fldBw<;~l1v!WE`ym8%()P*m)%;TmmiY89H2niZ7d=~dv7SX>$uYF4bH z6yulXo9dR9QJAM~U0~xEWMrXl=dG%eSd^uloUg&9s~)D~6mH_7mys109paxC66ssw z;P0X3>7#F8X=oYeVquh!lJ4&8o}s4d=I&qYlV%WUoTeQZ;j5Zqs+j1T#AT+PQ)ugJ zXQ<|=8<`!H>Y^2-ZD|pgSDa{Xr4{cNk{G0>Z<*|_m#0#gq@CvIqoruX5qz^WKd*elN_U;78z+!tYQ;pYMK@iVx(1^{$>M zlxH4e8l)8#;bQM(s%C8M<_wm2Di5 zo}8@fQJkolUKpsOp%EIIQ)=VjoRJ=tlVKND2Z0+Z75NjQ)Wud8`#pR>q zZ{ic-l@+7m;p*<15tFLo6Xud^XX+JYZ=2_4<>+syo#<7P9pqzIppsfx8W-eiteKD# zVPRS56I>K&8E3}j?BSwhl<)56sA?Ep6dN98X&7J_P?8^Pkzs71o1E%urmhy|uj6fF zRA8Bq=9XTdZXKYg?C7T(ZRW0P;+>X|#-;5Z>tdDV?2zoIqY>rqr|MYj;GLnW9aNB& zWfbTi9uaBbnx!3X?HL}KnClZ#Xcwhu9Bu7d5EJL^q#IqLAEL*Vshe1=tZkZ~@2*;! z>ZM+&Y+UFZWUdic?5^mOrskp@U>V>O;%2C=s+Q*LnyFUc>t0}^r4$>Uqhx5Ro|2fX z&E=TjP#TvLXq}nnRAe3>Wf0FR9ot0y1;%cYpnxW&Z z7i<}5;iMa^rJG!6np(o;l9H2{YNb>ZY2je$TIinXlbw>~=$7UdoTsiF?V6?6VUTEp4qm&(y5fSE6;^t_V?VA>_<{43<%4J(>P#C3Ut?%cl9A;w}>8j+N8L#UU z=W1!<5Ug$Kn^K|@92^~CkgpP>8Rue=mEclP7@Fx}p6TzYm!D;B8IjHvmSvJ;QV^w| zR+=B?nC6?E8j~KC6K9kXZR>66uIB2R?Qake6XfbuU}zOw;OL;C7no?A=%*Z(mYEft zqNbKGhv8Xc!$91@ym z8l#?Jlc$v%;_X{vlx>$65R;)F8K@MHt`?aRVxj0`!)4~Go?#nkooQfStR10Ys^b#FeXPW?Gu3u41I?7!Z=+8mtoL?4?m`9+7AmVB(OK9d4lKlb&a88=;zK z5$}@a7^`odtnC=>?;oY*8f|427!=8ss1uhT;+UJI?rrLr7?Y=*o8V|^oMq%^;aX6l z8RVj*78z+CpQ9IPnG_bD5Er5tXJW1w6rr7$kz?SL7wQ@A$d%++YOkYa@0o3yViOtf z=&z>lVqKt}?4A@*=;>hX8n0y#9^h=LnQLM0nHdn{pO|6h=@*~k1Zs@u+1jRA$8(v6 z*~bTJcsgpkMHUukN2DsL8d@aTCx-YYMfhrFB?sk~1ehf{=Hz7s1p8*_dE}(U+PMa+ zBt)lcYPqOu=%}i3`G+T~>jpXmY1tYU>zVl|8Ea*j#RuCJ#H;$p<~S(j+j|&Al=!A4 zr^n_-mll{u+i3(xE87=j>)FN!Wf?eRBy!oBxrV6NJ1aVeIGg1d$2e(5SZOQSTbC&7 z#u_Kv###Cr7a1hEc^9Rd20Fx>#@l)YC79V~xcaFYcxI+Y+Q-Il8JSx8*;^@UBsi;t zmfG0HWEF*2`New{M(C;PYloZam^#GkXUAt+YT9ZzSz0J(=j!A;`FJQ9Bv|HUm_@o3 z7;&XID<*iyo0i&^2E`cLMdg_XrswLr#+NwypL2!g`1QlYWaHjN2?Tb#f4fby9B6t>8Gldm=;+&Ddn4Khv>VMWapb^#UbV_7N{#{nfTx28E~iTKkz573mpg zrYc*h8fzNm<;A+i7FcN{85c*o<){TZ=|qOA7^$eGt0~%+dgPe;8D^Pt*_otydB(ar zo95eS`07|{Sfr<`D~4#<1{-UX=Gz)*xo0^S2CAFco7o$iStffpX%+?$_+cCEIA{s(I(+BuAAdnfa#} z+Xs0?I9eL|nk3t6qdRcqr$8jmLsbAMETgcMWlOql$xtLE4yZxn>q)n zB-mK^>w4;hTXH3Mnz|^37pXgEDJC0e#iV&As(2P9`l#q=S@=e3*}LV&73zd~>%|tj z`-cTst7m#>tEQ-VCMV~sTX^`Y>!gQqCFUsESgPl0L_7H!s#uwN#CydSrf8dK$9kn{ z=NRe6XBzrjr9|BY>Y6!*s)X3*xoCOoMwhBvYWXBsjYiesGD?2JX_-EP|s%N^zI;;76hlE5rgcp0}s2UfU zn>ctH6nVt@6`3eHn_4&;Dxu?xp+E68>V=;rFba@`i3c{ z+Pa$RSa`)ZVvnWg8|b6&r_oCTSXFdnW~DDix|}dPEy%*{Z4pIBCUt2d1m% zM)=1TY3KWgr&^mB1^R~u2XHy(7?h?OS*RB0CHOj6+r}no6}lGLq~@8ZN4YxWs9Ni4 z20Q3x+7_sqn*})7C3|a{IGHM!7&tjvxrIbqT06OMDTTWy6^6QNI~#g9*@s0MY8E+J zskm4cIOaQt6~*Z(>)P7;C@R~zc$$`mlq5yvr>A;a`=aIOrNF*?W0;DCwD)ChKde8|xPa*jpFm+#|POI8phkjhQ=o6rfG%v$Eu`xSlRn|ghfR}d-?}x z=thKT`Gq)M#L3)BpK^wIB-R&m|JLvxfy2I$7dz`#oMSUMk|@PgxdNAW+`Q4 zSXrlg=jxY~7U!61gg9Dgt7SXe#YSek=Vr7EjB1_xyO=Xr%#YiSib>gZY~`dH?f#OCG{7APggnnndDm<4I1WpQ~p zCB+me`B-Mg>e1|`o4Z;&<~X~mYv%g; zStf=CdT1wkB=~r9#fE1j1*^CwCdDOM*#?^?6oe!g=-8TB=fzr^CIzYHYH6k`24|F- zm_%EKhDX|)>6;d5 znR3Nigec{!YlP_eg=i(JYgnlV#CbYKXou)#*!!kN8(I}c`Dn*y`{t-vI%_*w=(zh? z7TG!k``TxD+L}40n?$B_`FUkTX2od7Di-LZc{m$H+xr_EC`ViQ7A7VK*n4Z|6~`Lb zM7jHEhvwO*WSfSXSY~7wdi#0ghNN10X_h)A_;UH>_!@dfMW)0h1UPBwxa5U7nTEy3 z8MvgzD;0!!m@r5Z;Vl$2)alxCE0dB#|VsfOqk z1xLH(7aCcmX{l)0xu|Am*r<~WTyW$5Ucs<_2+DSD}!2WsYe#Y9Fc+Sw-Sn40_8X{Kpsd0G3GL@R1) zxyL1B2gRnCC2QEbXcf2_jHU=Go01`sXP=HP!0Etj> zh5}>>+-ZY%hC<)X&_uxk;(yQti@s|`iF+`3$^|rW;vQ_MU;*+Ow0_(ovjGaNsQ05chOKZNX*Leurjnx@XSxmkJF5@h)DK}$a7M+%d>J)QjW~@ zvGGn;i%csh^v-q9j4;+vD$GdE=Za3t@w1POu}I7Ebx+X@PbjudbB*-SEel+N=b82ve$_6GcWXw^RU*; zunyEOHn%r6(o!tWGO$i^^>B~$%a3x@vsO(BN=piM(~U^hv`S9WP19G6P1ex1;8JyR zjP*>iwKevQiOwnT&9qJPaWq%XF>tdrh*L8zO0gbX8%FHx&j<+mHbjdP)pOxcQ4A#*H8)3b4*l^ z$nr#bkd6Uu{F_G(#^3j_J|Ml&B*dojtq8=)Nr+RONnsQ zY&6u**`n3|1_$kIJ%3bn(py4|Iq$2O!Y3v&a(5-)K0Sxj`DL=Owe}@Dvh%9w~LDp(sR>IEsf=hGq%un_q4Q6 zQ*~8M47QC3bj*yg)9_4Aat{nE($&Y)@z;vVj4ZUxcT6o%N>R(Q&T!R_3JG!7FbZ)(ooLxwJCB|%&;+Z(^0Vq(27k-OR(e8G0qED zPqtQ1FwhH)aB+={&d67bQp+rj*VRzXEe+4hPW4Pov9!-mPmVVYj!W0GbyU^yGINX! zNzu;pi_1tbg?qOHvL{vJJBLRtpPsRta!O$OPKi!XG1H37P_(yCFbr}C&QH|HC=CdV3h;<>Fi!Rf)Jb(# z&2lg`QL|A^_IAxTkIJ(&u!vQ(^|4Gg3)kiHF*Wdw4vF(MHn%r%H851MP0b3*RCQGj zkFl}~boH=Gc24kDEYgZpOmlDuGs|+&D@skvSC4jAHdONQPgOUx;4<;^Qx1+wN>bCv zi1teI2np5!ZDBPpGWBi*-*e4s}oV zi{vV>D$b8qvdndG&WN^&sD_c94pbo7o=&I^rE&kWE>@QN)|@$rj_FLH_3@r?`d z%<+hKiqH$oi%~N7NOI9GbO_K0iSbS_w05%$i{Ns0&2)G6@l^^_3CKz_EYvk{j}7#W zSMOpNRL$U)(W%9QA;n(3n~aHjn=UOQ$TG9FP&3rh&(-zt&rerM)YtHeF%L2Ij`0rl zc1>4zQrA{1%2RYPQ%`oz*3XLNij30@iPu+7&P@+W(#!EtGj&wUwM&UnGE&sGh)%Zg zH7qJ|&CPbVh|gA4PV#WoQ&S1j_Kor?$V@ZKipelFEa39jaPha-3r)%JHL;F1i?erk z@H8@UD2Y@xPFD5FibyI}bkWlC(8$vbPqk07w)DzUv(}Dxa>`Z9(}>nf_VYL43h+_Y z%h9mV4>0v946#d1^s-KK2nj3ER|&ESh*HwbDK^y4jZgN{&~+$^4=M}{Rdx1IN-oTf zbu4mAh_!Rm4Cb=3)A7^HcQH*0i}3MN^3zfAw=**ev((p#jCat|a!HQJOi#~9u+_^_ zv~jdIFi9$~_0>?+OH6kQHp#QL3D7a)aiI=h_}{HGq88{ zPtp!3aMst>b+vOXDsWB=@HHrPc1XyL@zXRk1^I$DN1$9H7U&sN%AcT57BUmu`I|6bu^7EP>eGPa?{B1RL?O@Gg5Uj(b2cH zveF8-(DQW5(M#~Q^5!yAa}869_lPkuveNWT(@-}s3pdU7^VUuF$<+6-ax=5bH%@pJT5jE%L6@bk?MD2=yNFVc46QVcRS$TjnHPg2S=(2BLOwFyy-&vdfU zwpL9xNO9LJR(4Fa%vLllRaSS>$;!$twy?#GE+7Tj15RhH#TulNzTwwR&&q}_Epx(w{cR9Rdw`K%q;ab zNb&aN$_fh!^-(Ewu=Ov9v2}7%G6Su%bQqNR%3rJ4#3De0m&$3M}b&1mo@-$3}j7c;M%`r%H zG&fgCFv`)5&M=R4iAwX%&`q~ANl|rj(oHPQaq;5Pbg(c|w$<_sj4RT&&$Wz;idOgZ zwbzYu2)7H&PjJ-J&-Bl<)Q&UCHdl&?DaZ`Ai*vEe$D9 zPff_N@hc4pu#d=d$;-6Li11WScT_Z1^YtmUOt!HKEl`azQwg*!aM0AwwhwaEQb~1B zkBBym*YV+sjP}tDwM-81a#9a0QHfH{v2yi~Hq_N~R@P4RbvAUhh%zrKNVY9e&QFg| zk5ezUH;yZI@zTyPGIuKpF0gb9;z|lED#(n_(9dx&)w9ehu{8~J&a|;tSItkgiH@_g z54KUsj}A5~HjUBuDo%+EQI54q^33#0Db`cYQSvd2b5Z8fj&&#vi!Vq@O|*(Nu?y9- zFjkI;HZs&S(aBHq&`?P;%S`lFPImOP(eu+NiOtsaNGeh`*Hzcj(lD^Ju(UGJ;?i@- zR<^ZQ4=*URSG4n0HPY6~(lw4!3~_Zxv(L&7a1SxIRx8m?i%`if@W@gRawtu8Gj&eO zaxE~oH8;16x6R@TchGjXjq){h(^F0Latw|#H1~83^DQlMj*al}aZ1 zHZXDuEmX@=Pqxv|Fiy;ONQifh@yLrw3`&gGC{%W{cMG;OEVb87vT`a? zOjA)xOHuK5%yobxV%Ziiu4Q3QSb9Rkqf3 zQPKAGNzIAZvX5}IGg7h&bkgUt@GI7j^|AKTidV~2akUS%@ij7zi!4o6SG12Z2y#tw zO3?Puu+b{93kVF=2v5`t^maE)*DA^Pi%Zk74A=E`;IgpD^fS=P@KX=-N=isdR5XcK zvdlG($O{RGN%eE~&xuhhR8sXe)d;ZE4Y2hvOAArSv-UI22@a0%v9`-pDKO?L@beGI zRCh{@(lbddOv+SJ33iY5C^2&LD9rM5Fn3Fcw#sxdGO-Oy&Ng!?bySM7vQF|dOn0;i z_tf|FD2cZT;!^R~jLJ2NOU$%Q42aWER&mKuOwDvq^7nU7a7lC0^^8bRGfDS$&R12> zGO=?HcE~q~OU&>q@DB-$N_GhfiBjfL(^AvPPW5-qj8N6jh*k}>SB=R}_Am-?%1F^L z2=UV`QnJj5OD#%wcQWw}w2RkHD~ZpsOHDBLS5=PB@z&8b;|eK?36Jqq_6f`LDX_^- z47N;gRdFwH3AfI6i7`tJ^^Nq*vW@ppQFBgrRy0WWO3U+93ylo+GqZB{Qnl2Mv5VpI zPY6x0v)48CRdn>#vQc$U2?>f$iPO%~w@5P2$ zN_TWJiq^9?%X7&q;4+Q%wMk6Z^oljIO$y9&S4=nb%`-FBcZ;<1bcrtZ%gT4~HgOJe zQV-4vPzi8Sv@v{Nl8t!^fA#5vB`E-E3nDRQ7UwevC!j+&Cf3}_RS2;){01v%(4!PNc6MO zOLC6&jMYrA4|32>^9~5rx6aKpb53?rN^_6!P4-GPE=)`-Nw;@*&khV!w6yUn46yby_4M{}RCWut$xBc-(ROxJc2&bViiUJ#B?+Tw zpu+?}V`hj^G|(P?kO&n=(Lk2uCuQ*xyUy1{!4kA;IY@#0aV?N9pjPVpq~@iUWGGk~ zle>RETuCwAOFza*%|p*5(k$LI#mFqn#b4E5+ts(&#v#-xCM3~AwK&%|!O1JiF(Su2 zATCBFFU?HPRolkSzQ}_sBO*B6JlR>>#MPtJ-y_<`H@HYiBPrQB+&I=IP2bX?Bqqcn zRo~n?EyyU1QeIX2EACO9V5%+u5>K+i?rHNwF(G+w{d(p2BcsK715uE3N_NzKk$&B4*j zQa#-wUQfwBP}L;GMMYI9s6Zn!-OSuf-6tX5s4%s-(A+FjMO!!A&(7F2GAhE*SU+6D zGea@Qo+}|CAT!=N-k~VLF-0T6C{E2FBO|~lP%~O5($vyHz1X-k+9%3O)6hIdSvxBs zBGNlDT&YkoDAqqAKg7*YBO;v3H$62k+bY8#&&^rKL?zTYvPiEe*Dp&mD^M{u!#=?< zOUKB?-M_#fFfK{Qy--mpCBivJ*~%uz-pNg&I5pGFIVsUKJH#R|FC{0()YHjA&sZ%p#x};$Rb7$G&eH{S z3WG<2XJW8UiHb#9hP#!gZme@sc&=%>Q?hr8Nsfn?nT@%Fnr=~^ims2UYka;&R%VDt zfw`weesXdkS5%3iqph!}zqfT-kd3cjfSQtvS9G4KZ)CQmYEE2Kf|h|nm|~`qlAVXQ zWl2n~sdku=vYNTOeqcz5TA-m zo3d$uiB7g>o|lECa%6s~N2ZlYK$fCOoUfsps%46ew^6>guUDhdLHO1(}Wb)__#POPdy{s=sZ
n^1 zq6ui)09pzVUnZJB${wVnl1*T{A*fd-f-QkNjfj~A3k6e%D?mpdn?g2YfDb-41x=rT zi%LTUQ^+8{KIp?ORsB!=m>LDQ}3Z|gq7%~%pWuCy$0#tNDq>&~H zz(D|YFRVZ{wJ;#NM9s3vi3+puR4X)fcT-YHHn4QaGm6o(&G#uOaZQg)N>z3%bT$w0 zS4&L_c8vA(j!HJyD%94{cTWs4^R$cLijPxI*K+YTb9A;bDzVD5u}{;ri^|Y2vB)*k zaW;#w4$slFG*Hb;3Gz}&if~l&N%c0@NmnWI2=hvfO0~`OOX143FA6RRb4~XRP%%pi zQ}#7>GPd)zQHxgeiz`i1)yc|m%S}`biZt{|%E>bh32_ch@J`Dp@O26gGD`@FG1G%)sbH&e@VDo%*;4pa3u z@l#I^SIjr})Xd7(E#Y!a&nmIjHZigYckP*l$5Qc6uL3{B3CHjl6|RkVsX%MLRPcP;d= zHA^hDQcCnqNr-nbvduM%v@!I|&(}^icl8MKaJMqmjty5=Obk>kN$0Z4O>z$O$y3e@ zjQ7sWw^Q=dOvuSr(vQqji7mCZQ&v$d$&InfNcXcgR@VCkcRZ@(!c2DQZbPCMNN={KS$TiaSv&gYdP&T#6 zwb#pbbq_KRNQ^8AEsECnP7XBpD$dE!cS{L3@;8t1iFXOoh|Wn-D$y=9<#JCi%CJ=n z%dm*IP_-$}$oERHuu_fnj*s{DHS&$Nu*wPa&{0Z@(y~gASM+eT^$!bEc2o5CchR*7 zEHn#CFv;ceQ;Kl0@h=QYv{X#6iqguqPVx>hOO5fcPIWGd3bHVF%TvmU_fLq_H8%6J z%1e&P$qv+2bkfQ+@^NzTwogba;tKZ9^KdiLOv_G6Q8838QZ9(}N^&vRPWLN}3(hc) z)pl1@@l6XhEC|l>bSlscQ_N3_Qi=++3i1xH%1=`djrHWpO4o2nwh48M548%-QPxy( zbxl^+FV2YwQE?8jFw2hCuyFTL(TvcGbo7ZTPB%){*Gsp}jI^{$@G`UXPmc`B&s7S`R`<=a43CcRD{<1Wa?J`TNc4_3j!xFLvGoiNQ4Gn5wJg;#j@L2u zQgw2+G0sY{af&rok8|R(R`T^#)XXc64oz?|*Nn9F(RFezOg9R24>HTO_s9$Jc1cpt zb4W-wv~u-JGt<<~byAPlh|7z1i%Il157SP|Kw@lT5Lk5P_PF)lJGQ7_cj(e?7M z&sU8rN>z{Y4atZPi_y!;Qq9y)GjuigQC5mlR@Cvf@=eP3RF5|>4ff;mGmCYyNiNoP zNjEk$QB9B1@d>kziBAso(zMY~GfK8f3Ji+KPS(+;;v*V8Rl zQc_d&;qowwaaId*DTvK*E^u_qON!EPRC9|>w=9T>cSD( z&el%Mw8&R6Q!h=@)68^qur1ceGB1u-P6!UP3QQ`oNmsJbO$}2|4JuSDFiqkzG|lvK z@(zqv%y!nx2{nv&j?`5tjP?&T(RD0Li?MSF)^<0GDRL{&NOTU#R#7re%QDn+aMW^f z2}=mlHwm;!;)+(&%vH%S@Cx@*2`a!m3lGEs3-i}TV7wv7+XNlT3@ zEwD}U^m6b_&y9)n47O1TF|c+r@=pp2_3=vA4o)>xiBd1s;0lS-vez>@C>v`57RO;%d*W2)p2(7)Xj1%;)?UqQqne3*7mc~ zbO`r}Nmo=(ONsPKc65t%cUN?`_EJ?%@=-TWOp5SuPz!L6_Erh-&J5Kp)pIOy&r^@c zD~aY(FR)V!*2*ak3&{?5EQ~Eo^H$Ob33GP0EUZ~P|l2u2vSj13o|pwh&G5bh|`GG(~Z(Cwa-X!jw{ZwEJ<{;FVXZd;yl6R!h*=HP(&NOiS}KO7+o-)>Joij196$ zO*J$O3--^;RZq^2ck#4Nj#RhG<^)74N+a`Z~d2ylzH$;j0)=1Na5 z_Oj84OtDDU_14Q!*0!`sidW3AO7qN!w9vIvv31r6(R4{jQ1;Z$&?t4&_A4+l4)Ab~ z(bRDWHcg4lw0GfhvnnwUP4G2WPjU2h)C|`)^Vjw<)pIvj*2&V*ijT-uQO{7))=1Nd zbPtS+jE>K@PD!zjRdzRY3`x&OO;B@9;mXMHQ;v7=F*LMGwNE#()z=I6D0Yv_cQXnM zvG=uc&yCddElNq!i_8zUbdB){(T_2=uuj!U3oO+0R&z88(KqFCR4>)gGEi6b*H`n) zxAgb+arSmpR?2s`@lLl6)=5eYwAYE#bJWU@OU*0@^D-;d@=;Us@XSoNH*+nGadeLM z;EK>Iw$G2YP%+NP$qUcSj4z4vO-+i(u(DCsj1M&M@C#B+_0%89j44YgNxQi_R;Oje7`^i|7=wGRk1Q?YW@$n;6^Ot#^Q%M3N~GSNxT zb_!6>&n(ndRV;E(FE+5!PmI;J4GPn6^fb#*cF;=?k2F#WHZpU}@lDZHa#mDLR?GGD z&Gj{i=5i0$C~=I)$#GA%$q4mIH%vFxchE^TvJ8&T)i*56%+@lu^wxJ#j!#YsF-a&^ za`MgfbM|mBGmeWlOOFe7D@x|F4tF+*h)8sGF?BGu4UW+_iqKB*P%{d$GtLP%v9`|f zOH9!*)=vu2%S+1jii-6wjP^=Q4|a@6()U%=@b|UXVMG&vWq4%Z!Z7PqN^0vJ8qS zjnLO}DJW8m@zu?XQM2=R4J&apc6L)&HVP_nw=`6@)A5foD)P6AD{_l3O}BPeHL^5H za@Y1q(sFSO4>R+()G_sn(J2lLFv=+{ zP_@cd)o{o)(=-dTiSzO)GW8EA2~OuSvk%a=PKxo&^ayh?wn<1d_X@MHOE6K_PS8~i zwM)+RjL*w6u}*d>$Wif(4Y3dO@JNgZ)QR!8G}7|$S2YPP z4Dc{YGmMVZ_3_WLwhi$Qum}ls@U+r$&oxleh%i>OGqzAQcW@8!2#&FK^v-k0DfQ*D z305kxi`R(`QZ+1%HE?oHHB_@y42<^7vWm1)Gmj|t57pE!Ehw-`@`wyfjJL6KH#F7^ zv-Hka^Y!<3aF0(l-_)%ZYO}RgTooh>DHyD>h6@QFIH{ zN;i)-3Mh8VvMN+jE{@OF_OaCQRdNVUjV|Ky&9JsDN{9-M&dIT}_BG2)4~b6pEH+Qo z^tVjNv$_-FbcXx304RG}{;L`C<*U|U&^3V-R z%QDF|@ix)W2n)^kHwB%Cl#pC zV#$>d6lLchke^`SlB%m1lpUp+KurZ0n#ItD={v?Bg97sA7_!<`Y?z=@zA|s;XJ2W}%^#pQxUi>}?sIm5^X+qN|sX zW@%vU?9HX9Y7-x66sM?dY3!F`m>3`l@RP%kepJgl%`>C8&&A#qZyh;_g|ZQRt+bq3NA(6r~ei zvQ5RpJyJ9#E=o5|k68A8zAcke1{VY@`;!rDGQ2 zlNA%>Wp3~2QyQY^qh)LsuWwr5sjB4_98(mm7Umr6r&pAwWujJ`=Ex28yD`Sm7D72Vv>-MW*lo4TI}H+=jz8DaMZxvymlw_R} zq#0ppuj(FPotjgsQW{elp_1xrq+F0ytZx;c6dRnYm#7)xl#rDl>cM4Z=jmMHqGs;p zqaAOWqv%?yVPK)}m>rhn9;K455gJzFo@kqo|A)6&S4)Zkl3}<=_}+qL$zvqUjTE98{Q@P^zuwq!H-j7NB7p@2ipR7wv2AtZotD zrKK7W8|SB`nG>p>6%r8U?98PZk59cE?j zT4J75q-L%X9uTXhrJ9hJn^}t&OW=a!tV9ipaH zA$CnW|~3o$Z|(WM5q57o?|>72p|><(QlhlIW7I92gpJ9HBWu%yxm~It+V{a1U;AoU&5pQA7rDYMSmgVZKW)vKl7-pju zmt(JI?P(UQk?Rs9`2)-t!=9muA-EuX{c%!Uy!4z>RhTDXAqT{ZycrQ6Uk-i zk{f5DsNtyUs_hYCXrNM%<5Lo0tfAs&s%aCQVdxd7uV`dr8LX0$?OF8|`6_FpwRaok6>R%LKp<|yNXOm(dtX&kMqheQ_qM>Hv9hQ{s5*%pd6Q>qp z6t1mN8mE*SV(L>6k!+`)V-Oo-qvjKzq041$rm7iYX6oo@s+?gMte9h$8e(VcsP68mXIT5tZ#1?PnLK7F6JF zn8jt1Y2cjUsje8QW$fo&5SeXmVP~SNXcv>MpKfLr8ByfzYnY#FXsD7I>ZY6*ujp#w zs_v3+o0eUuV(p#lY#M0BRp^|R;~t&h9-keUt!wRQEcH6W2xid ztnRIrVp9^K9-*b-8{(njP~;w>1 zY?mHr=n!n}XsTjT9Fl2lo|+copJGuISzv0Mnr-7%s;8)G5vrnOiFIB9H2e-73@2e; z0WwgJJg)#5uBYY|j3yvU;7&uESBOP9e#r!6J5(ubNZ-(m%$5H^PC*8))*69|idtAh z3^W-5wTpxhgH2n&XQxdda~D(%F_0y2r(uQ|33DVM$3abk1*n-RnE@K2S!&@LO)9A@NLA1esVqn}RN&Qj%PcA`an49A0v*_;?~@4S7@3+X z@al(Wrj%q9D?}?88yhQF7#k~?S{Q@bAU>&>msAbt>hT+3VX0sY!p0C68kt*wT?(U3 z4Ga``K?ETT(g4Efwws$SSXkq87Y{XnJAc97%G^V8Y`Gvm@0tejLi%c zObt!IHk%olDp(qtgT+CbL2AKXFgG?+Ff}!U7y>fT)Ih<|zzE`AbZgQ15I>ljDVUg; zfK36>#s+2zV1JpKDS+J$;u~3j+2Ck1Mac7-f^4!hQZTkO0f!jKDIhVBpFlJSgAIj- zB!&yn1wb~Vi{avfTn7#WkOGj+AevMRH-J=)F!iGb7%NZ|2A~rFUGtLjQ!?|?70f|Z zBxuIjDX};eT+Zk_`vw^rfJ&GAyb_nx;^d;tf|C3q1yfML1X3B2ADWk$oS%}aU=FIp zf>0_eQ!G>YU}NzXUxr2&3cQE{48nyMV4yUL>S$1n2yzOtqk|){x!Mf2NC3&zpgIoC z)gV<=Ep$x`O%y1_yaQr@F{r$;Gz7bzC>MY<;BqNZ2H?^R5~th%Q>b4+rXgcfVG~z6f7)E6+kq(n3r6QFnxFpFflY%0AZM7 zBTI;DLA0r{p#li=f(SwwqydCs1|ieD=9XsQFfcbWSFkWNR4_L(Rxq;!wWv)Lz;d8g zwW$eMjhUH=f~C1JL>wvx_JX+usH`zi02u<(1j2>}mWE(m$kt(FL;PTApkQJSF$F{$ z8<~PVXliMo0CqcwZ)ON)gQ5*24)(VtsOfA5Db7s{Ex{oMmNYX2JI55%>IKQ08{u>f z*bm4~1DTA>C&Y#u0J52oVr=qo1F%UFBQ|P)i2_AofLemV+JeXpupm$y4%F5|YBZX` zT55>W%L3FwL@T{OWgK-&FC6_JSSNxQnxaNF$bwM=$mpq9niwdUnV5om;iG{F84npv zNMs}=P~w4Ml)}pb)Y(ICe))Q0E4^S1HKfuD)X+jJy+FNSs+L}$>XlLqX*EEbLF5=V zYJj1_Xc&x!0VwYbY&t+Ky+Cax^wKLN1Y79^YosBSUZA21t@Hx5(156;hA}k zdBvG<0bYGXOVA@Vr!2K3GdWS$KPe}(urw8QfDknLMkD*2@^ezK+6gMh3E5dxnhKg% z0S$b@r&WxNP=+N<%#i0*K*Qmnwk!g}svDRHNCgOk#>%l_UUWf_0Wi%V8Z@krjLpo< z70f`LP;qI6qP_%=h4RyTQ99qpI zZH@x(sG>qTFak}!!H1_o&W3mZMuGwigh70eEQk%FK^PRU=op+1AVCL{0x1P)hhb1; zfv^F1<_RJSidv95(D*nw81cux0aDx>fFlrM41@%`0c^Vg!X;qSLF2)oxhW$f1tTL+ z^9MwNtOBcs%7WP7W-7=raBT(<=YqsQn2gB960aa9pp{{uk`7C}B6UQ0^&N|oQ}ap` z%nd=4qt1y19;un>86^s4mY|{&q!J{nYh-K;vN9(zy;uR1+d=(VC&*n%x<;mk3c5z% z2|oi%1xqta1(1h8D*O_2Qx)J7C!QsVIho0hdFeUeo0Rl}OHy;g6wE9Yc=aQowwjom zDDZ+MJQR#UsR?9?TV_tGv4R;WK2ZG!7J~Xu-z_tzB((^1{gPv_v!|zpsY@z&GDhDm zC$S_I%86BgO>7&Qnpv1Apv@gSgU=T%E-6Y)%;n{>uny0%@(4?baMEH;6ZPjx#D$ zNsMy{)A8bpi%d-Qh)`E{O;@zaTq^zd~w zwKLaujmrs44OEX;ba0Lj^D5HN@(GUcb@lO3i|~xp(2n5>atKL_32?QK*G+Z|_jON6 z4GK+D%1$Vbb5AaHNVKp?Rq-^lw+k^ZG*0(SQi@hL&vJLm2rl$84u}cS(=v$HDQQV;V?*LU&_HnEIMS8`LyGKz8X)rzo>v5Uxv*Yoo%j83)E zvkh_5wRX@|O)cP3RBfSGK|k~ z;)-^T(@06ow%bl3CpS61fA)$w%7&dpcT(@r$VvQ5(nj@Glau(prX%J57rj?s3tGqqGn zina@J$hS6*igU}fNbyvR@dyskaV`qhkJogI=h8QJRd#gq@{Cf=P|-5e%T3G*iPcJU zOVaWy2@mt|R0|9aGKtSMHq2M`a}Cb()>PJua`#D6cZ@VjQgVqj@iO7kPYN{&EecXA zwoOj9EY7k|3d!}$C`gTt_E&cCj7m`~j*Kg?_jW3D)D6`NOLkXE3^fbz3{y$9aP!OxNiEHePBt=g z_KUH1QI1JgiVw_JQP+-e$<4`(b2nF34NKQlG*h-xv~@DJiU`Rmh}E}qwv6C1&ali1 zF!Tw{EX?)DEi|`C)=7zpH;c+pwllO0$_erh_tdlYb?~#*w)9E0)HSn?v#`rGw^P>9 zRn5saO-YW|;|dNhP0Kfo)>V#AR|*d|P}lUzDh>-(RY?el&rj3S^~})Ha9Ht zO>{_#*NeAv%L+@6QE^dFX4vaTQOG^pKRq?mg2`-MY zO3Sng&?_)8O)@P^_RzP{*UpS`Np!%W^ir}>4RH1KuyIS*$u|wibuLVciPtMmNJ|e7cZ-hn%W`unvNz^R zG;_60EQrr6F)PwH$t-cT*D&)A_YO2k_Ad1a4YgNtchofwD)z|H@wRm-Q8r1^(oie0 z@d-AHEcVSZinOq^;|d5WPIB-|2#ks`HVAU|&Co5-F;Vk&bk)l>3rPyL^;5R>IbV$(hipw-l^GsE-bSyATGz#_%({SbT)$|Yc42twL)eh9N$hS(y z_RCMric!k6w6u@UE>ZS&=ZaJgu`UQIb&NOCR?hbeF3`};3CwX<&2$S3&rvqe3yv?) ziSaSf3{uwCF-%Q0FpILzu(mcSc1gD@O7<%9b}Qgg4K7L2bSliT(uhe3NYgNj&(Mv` z2u?FkNHnqyx5zBByEV2t$F)2_ovGdOg zcMP}DkBN-Wic~jpj?hyx_STG4PqRt$EzFJg&W_D+HcsbCH?mf846xLW%y8DQchCwn zP1eZ^&<=9*$PbN5_DhJfRu9T`$c?e_4=7T%_E3v<3DWe_jMPuhPgAyu%Jj$%;wrF- zHVZMyO-eCx%<#014=D01P)yHOvviLy4YZ9=$qCSkHqeZ)GD=9(EAcW6EX?vx%7}={ zb%~EpiqExm%<iAYm4S21zT)OAg@i4XKhb?}H*OLI)~ z;j(dYv+(fqPS;hW z(^L)$ax#hzkIAq$D>CB>H_>-5G*8nFPqFb0DRec6HBEK%b5nD7j*in#HSxB!&+y7K zR*&&fwzap*DpX0%a#V@84@uKg&J55^_BPNo=d$!MSI#WTwk^@oSIUi6(ll0ci_7sz zR`-mxv9~se@lq*CQT20m*Ul>RPBk#qNyyE1^$E94Q?YXli%;=Lcd_Dfca75bcGeA4 z30F!`3our))-~};h_Lil^ojNfH}s5Ai!QWM3rkVc$a8az56KQRO|{Ms2nY^H3=h$Z zRCX{g($tRCFH}#;@z%303N-NX4$yYbFz`@U_0O=;3XaRS z^e=J9&~x*MNhu1?*9b_}bS~l2vUJMO%nT}0(^Zbs$qOko^HB7Q)bYtMEz0qB%rOsC zwoS6ub4YYCjwy{*3oWsVR7r`@^H+*?S25M`HcT)`=gQ19%g;~o^z;fck1+F$(hez( zFb}ZEH!w~tvQ^PkR8G!w)hV>HPPHx2vy5>H2+C462vIGyPf-omPf`ihN{HZcGYIiA zNQ;iJ&q>oyNYpBD)KbbS%rJ@&vW3i@hor($yTyR&ha!#vdzzoj!jK73CqZJNHmSK zS2xSmi?%X14Gv6KD^5#QGfH&uEl4tQFfuc6$`33y2=vtO;ws28RPm4T3Jyq7&UY&f zx5>(}_BMBq@Quv$iYkiHFUrvJ&kM6p)lP}evP;oZG4o4`3v$vl(=3SciO98xE{WyJ z_jgYX@K(#uQuU7vPATz^PBtw~Rn#l7P4f&lO}5t5(hZ3*^N0)Abqmi+4lB~tP))G2 zHHeByiBR^pwsi7v;Yv%&PFKvbi?WE(OSa3k%d~JV3Ucnx;|ew~jZBZt^mER2 z&(d{Dw$C(EFHQ@#(=9O3NeKvv^sqN`*Rl<9OH9cwRxD2S^)E>GG*!`0E;6xAjZ@6k zGWX*O2sc+!3{)-*u(mVKa&vPtk1KX}w227}$@2KE%i3c2=`O8w9`}y&Pg+{$qI*YeU#wDL={k8^W3i8II#@>Wg?h){LbFElYoQ?pcaR`fH} z4b^lla{;iM4kQ4vMxeigXQ5S57oHiwjH+4mZ^*4bS8ebJI@K zb4qcIEU?wKP!EW4v&qvc^mMYavNz5)bX2l8vItUkcTNwqvx_!!)e6tlQjW59b?^xE z;EMDKQ#33zEr}}*F4D}`%W~24&PZ~}QPnWj^HmMB_qHfi3Nz2ku-Dd%iZ6)Fv`sTI zN=VPwQ?XM_QO|KzGI!uo^pB2rGxAFE@yke8w{p%&ELKx=2n@~633qaE@wYO|_p{N{ zF38S_&dl&~wRTUp%C`%wKG!63i3)y|c&u`hKF&(gV@$`2pH1xAlveOUr@H8vdbXT*?w@nHy^~`Z}D-Cps zPsq_w=Soiu)liQPiZ%7j(TQ}|O|_47w@LLka5POY$+h*;Rdvg^iS*I13D#FH&@1)x z%F@ZQEi^66EO5~>Q!hL7L}r>o~0RM>74166rYyvsGJ-U6u=c6rx9e~ z>JVm=6_y@uX&sTSVwapA6%cEsni&^t=HhB#V{4)1V-}YjVd8I?lck>)Z4&2~6y)lh zrx)Q8*E#|6{#ATpIPi=tE#E*t{qVn>S$qZ;N=>Z<)7=T8S7r46yW6$ zrSE0vX5*P0VV>`zn3mzAV`ZMFk--(6l@S%JAFLT>s1xdzS>TlB>g1Cg;_v3~u5RU` zF?^1u4JUiWmuS?rKg*enwcM^m8zZX zqnqND9%k!r5v-D9plPA4TH=_ku4HLp<>RbjV_;>G8lo4cr<73aq!HuouUi~zk;G*a zpIU6=VwhVLrDz_NkY{eGl4#>=S85e+qwA697-*hnof_`voR^oH>R%G*WszuZ zZ0wt4pRB19=+y1T^it(o~GfaRvc>P zAE@n;uC7|@WE5IxZQYM8j5u)s%=;9r!XsV-^6kro? z7iJdk@0zS{ZtbgTWb3M~ZxW|jtfuU$Z58C1To9@65N}tcT%xMNWmV!^;H7A97N?_; zX=A73?qsQ#?dNFc8s})@7w?-C5mJzq=b{u>;_aQKt{EL|5o+OVU}s}BO2rCj8gJ)5bpJ9^i zVyxrk?c-o;@9z+jrsQnvQxd8YniLeBo@7{3tQ1`w?#30DWK!zpl4fpX6d72WVyJIx z>fsgQ6Hppv9+Rx;78)EHmmFaoW1kRenpNPIZ{;3gU|i&HqGn)}pC4uAXj53sWgMdJ z7M`4umLE_Us}`IQ?~{|39h0kSrRw8jY7%CY;1U(@W1pxLpls-Alje|UUK|+{k?yJE zW?K?sVdrmUAI()5Q)(CGX5o+$;NfHKl^kO2tfX(E=;>^s=96!q<6stU>S~mpS*)pN z9B!R%oTi_d;%#Q)=t9^r8s=u>nyO`JW?N_w zuBzmn8xmvY@2HnutRCVOV&<==ZXX`vY?B_ZZV?cg8l)6kRLo`Wrd^sIqi&m?=wNG| z;^L&_@1Gf|s28WL=3Ww;8Ll zm8zw$WLe~u9Oj*yWo+P|q3x<2mZYK=?P0I&WLDy@tE#V~8{!_}TVxvSqN44umG7Ty zubu1>RqNr1v9<5v&pc59AA88#GV;ig&SY)Efl~`yT8R=&07wV)J7Nt|*66Eg?=3C&S zpXnBq9P3|{p5>Eh8R=kZ=2WPnWay@!8|#(qJ8LVwbHHZ>Jd=9BOB( z>>ui9tL<-R>gr#doatJs?8;?cU}0SvnVC}L8EoChU+CfCo};C0XJ)HcP-1SDm>3)tp5YQ3lv|pt;=|>w>!25H zWRv9KyoJ;+*cBtznU4Q=DrR;u&WaXk1d9ZkCfD zm1VD0=%7);m1=Eb?5(bv<6&tL;pOcT6z*+P5D*m-lo91ulw%R+8K7;F;u{qkmE@kQ zk)^7bkQg3mUg{E35b2+!6B@4{n98N87E$Dz=c`zvqUw`hXrdXb1L-{ z;N=+PS&(g`9cE~uq!$}&pB89XplaZ0YHFnHofKuB;+GM@rR}a(=%ZNTlxF1~m>#Tes^^;NtD$9;7UvV8=jR+4Yp!jcq#Em;n4O-j zZ=Gjc5ETx(i==?dKGo79+}|z6J3Uj)Hr6pjwa7-hAT7`*OGzhGCnq#L-aA0E#MDU9 zFxEFDyFghj(A}}f#JD6RT*)&?&(uHJoGZS>)4)3|%-&5$Cp}2rIWa=dzR*XjAj3O8 zH_X}HrKrF!SVvLYQO`mOaZ)jgO?G27Lw#K_4dG{IiO z%PU$(FT~$6G%8Th$e_^4NmB|S~IXuV6A|l&D$6wLU#5FU_$SgV6M=#vZCMK{bAXz!pCnYpJ&OFJ* z+RZ!0kxN5gJ17uz50zzHP`ICUUXh=PuW4$$vwo_frh}hbWJqL=wQr7&a$uIKc}8AR zw0&u&d#r|Wk%?N8k&}m&qXAczhjoF9cT!+zo|cB2cbs==ft5p0lva{1XiZmyqos$*1|g{hWHx}tZqZHb<-cdUtRC9gFpa!iO>o}O)j zhJ~d?ZemW6rmLlqab9+us;_~Ttyi?Il^d6-yI#1uvyDo$jj@J>NuaKqnp$?WQ?#XL za-yxaS-5ISPPCD?vvY~Lb53Bskw%i1g-vEuaj0sdewtaBlefAfSDIRMq;Zg8qK%Pf zl$CQ~jJtJVT7tG^mWHZodU#%Nl(MgeuCc$RjdM}5pSe|-T8x{svbtABL1tubN@kv# zasgL*zJsBPQ)-rLP++dUR)kZmjf+cysj|A2zJ_0_S6+@yzE!lcQ)!V$h;xdON}6I+ zL}944OL4Sss(VUsdP!a~S4L)0k+DySbB?Erbwp@MT1jeLcvMWhs!48=o1>?_mbFX1 zt$DDGpRH+zZkm&IVW^W+Vs4_PU$|CmfKQB)LpYaaUcQEtsz<6*NVru%f>}UDs;7OX zp+~lZZ%lf;v0iF$p+=0Ymvg+YcTRC>ylJ|NZ9%R>wwASeU}S=^nYz6Nm%4*zd~$}i zyP{5Tl)ZJ1nUY_)r>cu{bfKABq=8~;VS$OEv7N4?vPzb*Uq*tCSC*ZvSCFw@zOAiJ zaHgAouo+iilAUElPKd5nyqjxwNV=+zYeuA2aHglVf0lEspGk;qwtJL|yLyV6dA5yj zkXNLNmWrN#Qmj*!iJD8UUT~xxSD3L$Vp5i$l4ZPYj&XigPO4#&s(+z>u!BKqvYkeV zYF?U^R-s>jZee76X-u@Kmrra)WT1|fhfQ#yhDDI2S{9dGxY`n8twrz2UT3&35 zvq4&ZPEweYPkL!!Np4_tN-$_nKS;ySOxGz&(b+fO!#*lK$K6CLH_$iN(J_z9Ce13# z$W}9}u*9|~T~$wC+h4!bUpv7dIK#ouUneoM#KKuk(Xv3>!X(Nf-z-;8BS6u|EY>B- zDzY>(Ey7sGi7P@|(;`B{zCcYeIUw0nLp#7XTQkVk*eWwOFg!k^(9+98G2hBI)!ZaI z(mPno)HKLWHCa_X%iqUa$=)tJGh2r%+cGEJrr1n9$2>AJ%vUe6STn~zJWew;NHkHO$s2%QnHoT{F;8Gr+}0N5{cHH%Y_C!8|9>Btc&@fh*VB+QB|TIYGlx#VX!J zKgC?hSI1s8!y!B`!b>^bS~XNfHz3SH$tNeb*vm(^#G)uPOFub9Cn?LHPGKQRz=M&#oak5Bf&;BP~9jcBrhx?T{$r**ezc>BqP2! zzu4DT#a2H$+Qv#bp35gJI>ARX#UL@pOC#9XD9}?e&&WJJ+rv7`Dmx)9+QKW>D@?^i zJ1#ld%hSh1J3d0sE!RgQ%r3%R%Qw}?Jky)YMprd4GsoM@DLYg@+O^cB*vP~JufCcHaI3zoy)_`Dcm7D#wS}f z$6Qs<-PyPx!ct!|*ehDc!Z0*EGgV77C&n^9za&sgB_Y~KGsh*zCpg)qL^V)L$uGy* z*4mUSuGl&gba`5Qm_>1vmYKI!sYkA=t+BpcmZ@b{dZCMwpSgjOiFb*Qs;ixfn{Gr* zdZxLHzrV7hr=3ZxmsU&~mw{SAPOhJQL4lX4xrTjqMw+5SbeM8!h`CBeq>n{{X{^7m zqM4Vkvx%`;R6byq(hjEvafksYH+xpda0IPjBjvJet?CtgL0;oPLXzKYF>dqmu+H^ub*R_ zk-1ika+trBo4bQbK$N?;mAQMaX=agUiKVlrl109sijPK!uXc7?riym1RjjX$V`hm> zae9z_aVS@TvQ1o!LuP@Aiocptn2nuNWSW1XM?i{xfUL131T zR&tcz}#nt_IsPhpN)nyyi1o~5!*aJHU#W}g%ZjpAeQ;26)xT%U$ zsHuIXMUZM}W-gaayt{vnrjxE}k)4uOkg1z$tiHRdOG1*aim6+ct-g)7a*(E)WlWr7 zbbxApcygetU3iFMq_2Nmp|eV8s&TOn9oMzB>#pt*fYmU)I>QGi!Ux{{uQ zT1>cqXpwfJORTDciHUDyyt_%1ZK0bimR<*v`Uxam0YN(~HXG)lvYg}Sss#c7@QHF(?vPFuCd5KbLs!F0a zm$ARCTB$*rOGKVpuAhffuA;tSY`jZyR)k%shoz^#skT~{j!#~&V^oGtL5z2#vtO1| zY(hzpRjPYofQ?>Cwhx!7y04O*iEB|oepG~cP?U9ILO{Nric+AKikF{NvPGPWp=D93 zx{Fn&S)g@zMrlHdt!GwIq?Vm>kgrC1mRnXRmu|3OP<&>og=3QU; za*#!|l}eyqj)hLLrc0uWhNg?VTAo{qd%9CWj*X^!VOl|uNuhIsb0Jqjn2x@ir*lwB zs)M(Kwr-4;i>0$eymn5pO=Lz?p;3{)e{i%}NQRqUQogloieia-f^U&QLR?CgpRJ3Z zs!v0-wY zL4Kr?idTTKLqVcdT9LA2t`=8a8yxBN@A=!SG&c&GZhB~JVML%^xPg9HRH~wv zf0j;CmWydTSDv}Af3B{-qefA&YNl?QpLVvLX@rV(uu*tohGV#6ZiH`;VNj~GhCynE zkFmN+vWAkUYM8EZUQ~3BuD3&RWCT}efMa@LNRnnznp%RlL3miHBi;TBwT+mxGV3PmV!Of>u~zhC_x! zzLjo@s*Qa?oN8pCrLInXQj(3bNv3;tWNxmrzGb4RwPuE4nr4xrbH0V6zh=0BuN9YV ze4badseYJJah7qIL$ITRU!Jd-ho!ZiiFsIVMv;zlQF5GFfuDYXyPjG`NP4M7W>Qi_ zfRA^aMYLLBx@%A}m$R-xqJyfVU4mJRmq&3yVx)n7L1ApEZ%T|$NL*l|yK|*bx5#rfp@HXiHA#phP8&avvrzX zzJ_ydxL$5il)AfKM4F1dx3{%hVoaJ#WQ0$as<~rqn6r0Aq+)mgS45m!OqzD7pL>K# zh^Df=W>~InuyK%AteS>PN`aqcVZOhqhPsu9e^OG3WoWvZkBfa&h<=o3l$l=_hMx2vHxU-c?xUQ>XxJ9sHl$~*uua>=SP;#J2 zinFOfx^1RQu7;+jZE2Q8rn*yRetuY(m4=ObVj-87W^8(#L4=a6g-f_%iIHtco>PcY zsI5bRTBePzZd8hGYJ#r5NvU^gf|HN6g{p%~mbRUvW3jVERGzVyYf*wDmxraXrJA92 zpmSuAQ@Wl$m|Hf4Y;8PjazVesPkyk*8L1YJsV(rd3XCR8Xl`l0|H4mP33{ zT7mu_ZAyqklKQn8(TmZwglOwNX0EMIyn3cxnyt2uj%7%qMOcz| zL8NP9l9jSSn6IodSW%3IQ^yUI@1*cj zmr^yG!qN~6%k+YX6s~XsdowGY@Hpp?)JV%*1G}_*wM4yOyHYiSWDhrWTLT+^&Ftj# z5-qEg+%zq#aKA!xi$q5|zhJK%2VY%pn_@*S4HK`>$n-!1cRN+vEQe%MXXiqDKi8BJ z9j}}iKb6c3zd&c>0QbPq@az(GU0Vl7*WlE^v{+ReEA41|%{&vO7_M~PF!j)s~9=R1cTvz`XGENHarsMVADNQu~B3J$ujm zwB$stXl=v16zvfG95a)YEYARAw?tQ6!*D~NTz#8l&zu-r+kjY`5{LW)LDOTBz2|?EOks+G)rmDu#skt`kp-x7LX}M9pTnTZy(eYkE zPMW2<-Z}B5UgB5jcJc9EHpYoLPP&$=38tF<;RabAPCEWNE=74cZi+r7Sutsj8Gh=Xj)q|x z=GhLmj^-*3-kRBo8P-~%R!JdgT)|Q5NjhOA(Q4MAR(iIs(Jpbm_O6*h`Gv_AMI|nJ zQC8vkDTb=frnye40cM_>;eKjiDaD35szt$mCZ4`3B@SH5PFaT9K1#MK9)<>vg=*gF zmO){T8cF6EhPhE;nhCzPo+Zu&sR>1X9*&v;1~E1v`o=nHJ}wc?(V7uX`2mViT;93% z%F5xsKK|~xR{mC4%SLeS|*_$F&c#?@m`+38CDi4Iwnb~wtjXo>MANJ zS|LUT=DBI+rU6`$Ny@2(Ue30`D(1df;qhi>_I}~s8j)7!S{`|U-s-VAK_wbS0pZrs zW*(_d-bsb-$=W)h`kt9i<{5#iiB2I2Tq!n5Zq7kb`kLVy1zFKWX6k0zHg-WJUI|Kh z#t9BZHk$FFh7rC6QOQ~P5t$wtk#=FBiJFQUrj|;+IYF+mMs{2VA;G!XUWO^Ispg6K ziY1u=NqPQp@kvEyc^=_Wfo8dxYVKxgHa0en*1@`lsd09NxdAaHDpA=+7Ebw|+HS7S zT+W{6VVNm~;kmvxzS@>9raox~HXce2dRfXgnjT@w2Dyb{@pih-iV24Hr5S!{nsG`2 zCMHV3&X#^=`LP0v>! zj^1&R8G7M5I{5}UMS4b=YECJtiF&Dlp3%+$Tn75N7Rqi;sX0oTk^Wis8UY%Pk=d#- ziJGaYS?P|-(LqI_0bZebUMd>uQDH{*`Xx3gVJeY&J{pc`DdyfWHi=w@;n9iy`FZvc zdhWJ)`UT37UPei}cBK|c5t)(ZiP0G`p~0Ft+JW}5?y+t@3F?6ffx78IIR?Q2CP~)m zUIkuRT@cJ4;WF>byAwz-MgB{@04xv_agCc)aCCJttyg|^FnT$&y(K5oiBnclHsIp&tW*(M$y zQH8z^S*1p{erom^8Nr#FM)umJg|W7-2KjcnF@C;AX+Ft@xheKa>V>{RIgwocnJO{5 zx~VZvT88Pydgi&&>4|=-#pY(_aTz|Aah^q49-eMRuG-f&7 zF@C!dTOca(Uwuc!I|+v zdCCSVM!7+SiIz!e(Xnyywia3jwjNe71qNY$30{7ldAY8pT=5!d`Px2FrRMtnjzKC} zu@>&O7Qsah7KTACo=z5#8c~^UMa8~(As+c2?kSqdN~R@l9(n$5eyNVpY1T#|>DpY* z0cOd@)=GL_W={4tc?H_~y2Y_}ItC8fndTuXCPw+rW~oU=X{GK?=8l?iEQPxb*#Ua_imq86T3K9?o{4@XT3R;#i2>e@UM7hV%HHOQj!6*~ zp1zhYNxG$u5x&Nr{`rxv*`e_Xc6sS(v8t}_x;jo?={l)Op2@K}TuwPgs>Ojtt~TyD zxk2fn`aXUhuEG8uO5XNSI^IFCxtfL1$;BzwDHb*vDY-dX;W^2P`A+UpMNz?uDk}cL zzII%p9yZA?p8A0?0Wp3i2{DC=6Qws4gsN&zLu$Z%C_42rMB65IVQT= zrWWbh-r4qv4(8!bVUA{2!LcUAIhi4vs^%^w>V91Inqg_4AzBX3mT?A!syf=vil#~h zNeK=bDUq%=S#d_01v#3YfdM)?Zox?r_Jy8)eg@e-xsHwjrE1e;Ct2~k|xK5nrQt`S9bZpmu?eNVcCiM@IWd+R*0HMbUh1K?0kL|CxeldzdghTSAzo1q_Hn`P>V~?RW+8U5 z4qhb*1qR0czB*i)j&8}W=7zaeg)Z8$X@>rK*&d1s=C107PP(2sDlW=ldFcTT>6#9S zITl`8uHN~EcJ{vJiS|i0M)A>lr9~03Txq&)4iQoMA*Nbs&dLr!5o*c7Ua@|mPO%nl zn(F>~NvgKd>LG@CDqgW(Zl=a6v8uNI#R2&$W|kTT?uzO9R#{w%86_6}KHhqP0U=pR zp4wq4nML}xPMIa4sal39I;usc{z>VMvB662zL|C*?tU?au`Y=^Hi_0bYX08NZhi$x zTq$WrUO91z?mXwG78exi&{+5xMF?n1?o^i(M25OGs{(g#Co<$n!#hxB9=6?S9h6xU-c6v&-eo6@m z0oe)G=_>k3Y3bUU>JbiUHj%;6r5d_vY1%6GT=_b=zA*-hsio2Ct`<%zO7_;8Sy65V zrKa&7NycG1n%RLF%8Id(1|9~gS}}#1Vd`-z{;J`o2Bt>2B@VH<-Z@;hX|Yj-&KfQn z7Kzq2+R7>BZU#04=E8CHp={)JAV8G6C0_PKGo5k`uMrFn^p$-de?K^nz5 zrB*5qT*{fL>IsR#?lDnmfi6}t?ipq#i4nTmQ5ktb>8>I9aRy%QrmpH)w)V~jRzZHn z-UeC8h0evrIxg;BrZy2)>ZM#kT2|hkftgvx9?GG5*6x9pR*?zOej!eo9>q@f7MZCw zr6#G_K>_vw3HmVw!G4kP7AA=~ss&c=h5<@`Nwy_^TqZi<>OR@Qh6Mrc?x87B8k)9_ z1yPBPUfPB!i2)%ANyfo?>fydox*-XE?kRpr1wjU>5t%-QE_sSs#u_P3p`l!E3C<~6 zN_krGVJ-$q$$8$^Dg_S3%2uH^y5{MQ2F6ZqHa=m#<}Qv-N@*JT?zt9uy0&Th@w$;_ zzRI~qDF(TgT&k8HegP_$ar)XBE^1~O9;P}aY3@pzv8q9e$teN)#fn+Ub_O}_I!Xm0 zUhZ~U=J9&!o|?MBx(1FJ;m+>yO6pv;PEO7?1^J$uhS_?t;SmuLrJ<>w#a8xuekLA9 zCLY<&5iuT`4yMJq>iX_lrd|aWQEr+Brjg$9dVxW49$}>+T#hzQap_sUg^mt|L9v!L z8o`>@{=T+~rFI^{>CtKVO5Wc2Q5IgMZnp8+dd|8fc}dYx$+qg=dNImTh9;pt38q~7 zzVYe$8d|YVI%yf^+CIu&K}kyKhPHX8p2Y!neiqh>v5`K7=3ym~`GtkbfkmN3j*d>j zp1RrLUS6Tf-Z6fZb5q9 z))rYsmTrY^UiO8lI@%hJMHXo~E_uaCu_fkiaXDHEIf+46H3i4NvAN?tJ*!9E5iR@O1air!9b~e5dB{?Yxrdnz-Tv_p+E_wy|PFjwNfohJiCVE=2HYSm3+D4idNx?=b zae8s7YED5;+3JY}A=dV>@v5cnw!X=BR)Iy)rnyQw>RDW>CCW-R5&i*+ZiWE~s@ndx z>0UYN4u)Co_U@4x;Zd3Kp$-OauFf8Q>B-um`ccWg#_=A?YNooGY0i5fjWp@FJq zIf16ifmtSjIT>6Laf+!q)`6O4df`US8v2pC3GuNOsV2HUKK_1D=~3x{>RM@${&7mF zdA?>IwniFCHoi$NW&v)l>MB<5iT>UyTpo&n#@3kz$>|>6p*ETEs_HqB5#fd|@x_5E z{_Z8#7D|>`?nY)wNy!e{rdk$yk?!#kW-)H+vDqpr*(vd!0sdS8Ha^iF21$|ndU^p- zp;kT_rB*rKdJev-4$5J{MXnK!(M5^+YA)eP>Q+t>npV20Mrui>Hs%GMc0O+Ex;FMP zTyBYR0eN9Mjw$JZS~1y4~aMLFr3N}+y{DM3nxszyc*5t=#9B}(CXra`6} zrdildQa3Ziej+1ir#bXQUHG1K&}qAf9qHyKpq=6%b)X&TAUQY4c6882b_l&Kq85o-?KsKL;DOkXm9ttL4tMcnMJ9hxo&cnVR&hJlxez-O|XYzaJ;{zX{oBSr+tQ1UMg2nfU2QdfnT7y zhjM&QVw#z=ZD~%CccPM0zIJr5TauTnier36N{WqDVXTs3PMULsZ$fOQby!ZJu7!Vk zdTxXcm$zQNy>VJVYEoFDqN`d|qH1)YmVZjAN{LR2d0~{7ja5-hrgE05pO=?QplO<` zqO+c2go~24ldHK;fOV0Ri4~Wko~Bz)o~})vxrwEro1R97o?EJAu&#%NYM`RJVT@jm zmU6JBqd|$6ZiuH-zISAJxQ~OjcU+!sqNl69qoQXtm%2_&T!x0JXKqG9VnTw2U6x;F zmPLkDs;QTop|Pr;X?#wyx{GpTxUF@mt7@#dolSzhj!!_QRj6`=rj=Pnm?D>rW>i|b zjhUBORJfXRoNu^FrgLbNOPph2h;_D>j;l|iQf#QRv7)J-dYY+)wst{)yPs!HfTLA> zgr>Q#YEohWmzI54zG+alu2n!-rj5T|mcET@p_ZLZN?LNTzO9czuxm=Xjzh9vPKa5I zg;}1SUap^2foZ6(zL8IUzK(fngff>~vUNg&pPfNiU~-;Hii)1Hx_3x~o3DLlu%nHi zX>^pQk#(Gofx3;guY*CJhGLGkt&Wb3hptLcpjohnw~&Rx?gx?f=W?>hMIAV zhrMA+Lb9E@TYS13myeN^Wt>I6Zk&y|u70MLxkHwjg{qHlv6h3Yva6GweZGp5aYj@| zq*H`SjE0qAu5(ICw2ym)O=`YhOh8_2i3L}vetLA8y?KVVa$LHKV~%l=TY!^qx|KeR*A80d~mjokGhK$m!VI-iShhvPVrd5t(hQFF-dW5g4W?@Ehs&0y6cDQ+*O0ltvmU>dSL6&`Cf@);0 zibHZzn2w#JimSbCsF9u`mwH&VvZtC=Sb}x5uCYsiuWFG}x{0cfd6;jgTa;^rolQ(o zKun;ATbQM*s-mHrxprcJVnJH8c}z}NT%x{dp&nPLzO9F2m`+Tww`GuxuDx@Dc2u0I zN>HhihmM(Zfq6n&OlClIgu0P;ZmzC|x}joLUPOYam$F*Eg?CzBvbnV{mwj%sriP-r zdu~!zh3qe=t|9cZ7#|aFkI%K}ME}byQkf zzG;DXu$x|rowt9!d6Hd#k8NhAQCeU|QfOg_k#o4WVUT}HO0u4Frc<^>vR|4GSG;Yc zk)Cgr>U8lV}7)jiG^WIh-P|fSiXgwn?|5ll98dmQ9)Xgg|cTu zccO#2sb_$Hj+uj>qq2@^jJA!2OKM~)SFDzLd}&mgqg`@ZnvS`FzF)DnQBk@@fq8VK zy@9H7UY@6-dw#G-YJ`7@wpwJVQ%Pz;jA^VxoPn{Cb$(2~ttMAda7mzQiibm_s&lNq zUTjd3xm~zra-zCMYG|x+NU~$TpN>|Vx`S3`l5euTSD0U6NKn43wVA$ALZDJ%l(JR` zS8Qr=dXAExp1QYB5 zeX5axtC>-*XP|?DvZHl?MNC}2pILrhs#$oFYN>g!d9uG-p|@U&o(@+*fUAyYx{0y2 zTcDb|TC{(JZ=zY8uZ2cRx`R@bS*%T7ylRSNnq7&Zv4e|Gda#pHa)O?_ubI6`fOk-= zt&)=(mzF`aR#BRxZlS)PdssrWrBg|Mk$X&LKwhY_vZ=OjfM;%=r&(gLO1il4V-rkb*9LVJTvC*;o@u^+ScqdZSCmyujG}F%qg%3{cB-yp zm|?n=k-e|KQ+{TNs@RNriJimxF_jZfKyZjaEQF zka@nHa(Z5jakf*azmsijv9X0yXi8Rup?*qActMD(Qd~@kN3NoxMXa{2lA5`Vi&LIy zkRn%+Zk}gYxL>SWmb#&Lq>sBxjB=cXX=09&Yo@-JdSXnHPO*}EQhIek)4X2n~#GnmqUC>xI> zeu=BIO@gsgtW#mKfn7nWvT24+XsKeJT5_g!xO#kqzjv%@VVItiLqSR$S3$IKUaY@? zwza)ip^;0Pk%qFdVw7rffwqfwx_Uu?d!$WXZmhX+sewU+R#A|Ro^MQ{rDLvDZoIBj zZl1Q8Yd)7{R6%^IjgzjKfmf21V^OYJT4`ZKqDxdxv2LbLd{T zo4u~Fv9*eYxs6S%ldG|wZ*;mYmv?knsG*O(k&aS&vQAWdVt$%sOsckZu8F;_t6rjJ zfK#YnfR0CKer!r$dY+1VvWl^pv#WogqJu@DX0o=qlM0u1o9+JmzAT5 zSEfZsRIzT7fsJ>RVQiqYdA@FblB=eRinp(CQI3yYyp@-cS9XD2bgH^xaZtFKcY$U| zes-2)xSg%Kw-T30TCA3)R*15pYoJY9T9%GgYIL!=vRaO+N_MGrjGvo&LULHJwyJTO zQ(jc0y_dgXp_O^8x}s4+lvSyLZ(dOdSFC?tQfZpEietK4L|%@SrAbf%Ya zY_O|MRIF00d6IEnfRjl?K}4F0R!n3{D zS5lI(c7AlCr&556eN2?Mfw7N=iITIPadLdFdQwVgf{}epib0ICj-Q@ap>Bb;azdVx zlB08Ka6pEWQd+obj2>5*qP~k}YCxR2y0UMOM}~f+vZjx{t&N{)vZ|fFgGRo8o@c(6 ze?*CCfL3;{yGmY$UYc&MMtD$YzKWM}vbvW&S8$pNbF_X^YN$!Ho`!LjMuMGVvaW4Zh^dB+lY>sYs-tb3Pl}wTY8F(OQCvcba7;;y}l1<<(YlHt%tIPua2Q* zO1!mxioTAPS7=^fYNAd+AeU~Iv5}&dy^Fd|q>q||m$!RPTAZ_4Xn*! zc4WFnp^KZIXJM9EV4zNksf~9=M1F`%l&MRaiB%F;jFMGmtbL}xr*dvdN@`SMYLsfR zLuqM(Z;G|9X?9V*S4Lu*MS6*vZGc94a)z~OMs9AAnqQh@wu@6jvSLD9Dpy{lS#f-R zP^xB$no@L3vAvwDTE1OPa2hVnC8%uCbSqUTBnGva?Z4k$IY0Y<6^{Q?Q4B zT(FI*mA+GCWJNYj9CvtVWPw7MGT1 zp>dMFqgJw#d45q)K!RbZidn36zDIleS{A zPK3EzX>w>vNni?BL5izsgm=1kL9VZLzG9+bV6H}_iHb&~fw68vh`WusTXvDJLyT>F zhIXmFN~Te2Sag!Ep{l*JpPHeojiPT>7MF&)PJUikV!owPXo8DxfxlO2qMMeDVo9)F zbZlOcQ?jm-fst0CO{tBiX>nngqL)#Ig=J2Po|#{vQ$k*Bgl!^Mq)le* zUWl<%fmvjTo26PohJ$K`LqwpfYd}d*SeTA#V6vC1inWQCe?h#fQ?{XnbF!a~qG_CK z09S!wSYeWbWm2H8vbvE?LXt{KVv4_Nltrd@ex8fBmrs~dT6UVXgGNqxbYw|tiiTCT zmR^Kke5__lPKryBlYc0eOP-rbn!TEli+`4Ol%2DZMM{i`V@#fHzLjElTBv4dfUl{J zT0*p)U1+d#dU8-{roO+kmz$QJTa=cYZ@5NGHkYbmfuTmOrh!eUrFm*nLZX_hvr$r@ zs*AmKmX3z9v6Y2sik)g)rm=&$Nm8U|P)UqQP?D3it6`pXfkjkeq>ma`oSl!NlZ9DM zu2p)mWp1u+Nk&Lmkd0+fik`Q?Rcj;e{Zj<#E7qLYuko0X!srEX|$dR&6Bm$PGFRECK~p_*M- zbc$PczNLy=RzPluvZktCLYygAQfR1ZvWbCZPNJ2av2kjCfst2QYMQN!s&lZhsgb3U zrn85hn^|zFww;rPNxDy=u8&QelZ#`aMzm{qMy_#yE|-UqQMN@?gu1_mwU%9>S8RH& zt6zwpZ*0DKMvktjacqd2O`(^HpR%*DxrU;ZWtL4|P>H*JQiO3#LAJi1L98v8xtXI& zkZq)yUUYa#Oms-NbA(O2dXQ0csewaaK!R6+wYhz?ot zx~8M6vAL~Zn5uq`vY&ONo{f#6b)*TGuYr<-K|rWRVWC&7W~OREdXP?(uU1f^ezang zj$eXZyt|#PgHD=hNO(*@yslA>x`}F_hgxZ#2qy0vYrrFMa#r@ES3c%(y?zGktfmyNHZrh8yQu9sz^S&o%) zcA>dnsh_P!RF+$*CRdV`kGoTVVxUQ~R#sH5k*S`!dPHJ|zg4t_cCt-UNSu*_ZJtk- zt-nQvu0woKQb1&ZNl0RWr;R~iq=$jJe~>0uVwPe-Xke0~m2Z+#a;}eNl9^USq>6KF zo=tp0u&#b^o`$-;l9F+RQ9^F2u5)IJPo9RNzqM&fkZyF2lUtrr2v>ZtW>|D=s!Oz+ zZbXi8o~^2beqx$gZm^n~KWgIAJ|R*_+_yRKziigvh?O>lC7OOTmoN}gpv ztYT`khFeZ>P)t&$rLIq6Bv+7^PN|t*a7MJDMNnasWo|@rq?U5FXQ_>wPhy^-Yj9+E zrmAbGLxQhbL4uF2Znl1qMV5|+WvHKlVWhTAs$M3ST1tVNtBPBuU4nAFN1|VBN=bs6 zN2Gaxxw}b@S#YAWt7?c=cuJ;yUTTPuYe-47XQ@}FrFvADgJXe5LVCDcFjttlsj5nj zMZAi3VPUdMm{E2}kZD0^nw`D7wx*N2ZJK&uPHI6xn0B$IU15-uxqZHos#{1&RJKE5 zNK}zVw7M3TT1l9HV63u3LAm}RqG=SDy>n^4nQM}RySGtPj$*OC zvr9s_Z;V&EhOJFWkXLeyhNiM_wpnbRp?Q*}U!JW-T(P>TYmsx1x1(*6j=!BrDOYY* zSh9(pLxN7Un}bE1xt~seL8_*;qRDn~n zpP!bOm9IytqJ5aENkpc%dXl?OiBE85l1qA~b%dfzf~CHjbFO26fw5s&NpiSvP;iK2 z1XqG_n6`FmiET-sPGORkMVfDFqK}4dNT83eVVIwnu91I{L8g;QXrxw=YMNHCrkc8I zXl$uTv0{jUrE!9@cepE;OOmULrf)%PwyBr7Uv7v=c)C}%dXT9~RIIDHd0>%#fq|=c za$$IuV`QScTeL%Rpp!?URgiC#j(efEigtjL4VS7>bb6tpi?@NnRA+_adD1| zQJ_YMr(aS~j=EluLqTb9oOh6OeyO{St4m%&L|T%ov5v1sN@9ePR=6jZvb$>dyoT{^qUYK*bYLth5d|0BMN^+`Eptog$V~}fBbbdrs ze1N8tvXOP7XKH3qLXo>}Mt&%lUbcNfqN|~wPL__Jsj8o)YjlA|P-M8ik4CntL%z0U zN}zR7cyXkumx)G%c2=Bfcw~{KcCu2ujj2vnzG+ds3zw0SlUGPwe2h_4j6;G+P*#qf zL#VE0uDOevwXaK9k+!CRzpij(@(Q zk4jR6ny*GsRA8RDU1(O6Z=situXm!FYmRMfoR&_sM^0{O8ke`Xb+$*OXQr8rLuj_W zfm&(0zoLFfwv&aouD(;Tg;r`{j=ir>Oh}rer;DYPV{CX@V5nDQinXD2xNl%lvS$pJ zXO@PNZ$O-4p*UtPe!0tjH$7X zMUh#&w?&$An6hKEi%&tgW_Yxre@0=LO1wcynx?I5c(6lUnwMpcmQHkdpr)@)T#|{Z zdS(chhkjaiP@+y|QLcZwigjSPa=4MLZGd}#j(?!5QMgOIU0QLbVy?5lT8dSkcVM(p zsAFohg}Yvor)o-(YN?&JEmw4alSi;)VyT6hfp0;Mm61}giltSInU9&Jb#O_xnwpk& zNk(*9kdLm9cCe*skhgi3xkb8mfwpCmYeK4uVZI7iK$va1lUZ7xYN?llv$<-1NkE>V zvy!@HR$7U_p|X*wdT3rmakG^tnn3cA(n{%<5ZknTeYKd2ZdwyVgK!I6FWm#Lavkc*m8sI69F zjFYuVYHXaneu$2-XKZP*wuWhJESIZ&Kx9c;UX)FoRlKvFYo>vAuC`CHMQTEvlVgmV zrc1JgeMCf5vXQm3ah$(iw6$%ieYB^Ze?dfQdX~MrlT|F2Wpt^vu2yJjijhf}aiE23 zw!XEaQAVl1i*a6oiAA86MM0rkR&I2GxmiG5idJ}HvTtEvu)SwszJI2&g>^(k2A980 zc66w}nWwW?sD7b`XG)l(cf5a?SEz4jbU<{GlAEetLRP*-VM%d1cR8&m7ML>dktiG?7yFpC0p>e8TtWrdTy{3(2Tv(=tm9n*6oHJK}t&^&UQ?5sG zYJ{R|VqRKQPP|>QS%7y$M5J9nTDqyPzmrjXNs)VSZhT2%VrZIvmWqjyv87_RmQsA4 zMz&=Rmx)obeNNua%)wUO={Qwq9VQlSQFTseXo=Vs?S4yLFJ3o`XkP zil?uIiHWCsLbi>gicgMqa59%#nwzG#wN6@UY+ACqhQ7UbdP-(ScyO?#kCA_Hj=7P& zQL1j9t#3@GxmBcEl9Il!j=Gt4s-dA~c#vbNtxd5LS9p@HzPV*=OukX9uZN0iaEPm} zSFweEY@n5GQLK`+rIJTTTAo&Ex=NwHa+I#KyGLZIQFf56MVwh+uDzOnb_$ncm_eqZ zv4ef7T|$(GwR>PhNP?xBMtYo^dT?%3c%G6)TwF?&wRe!Yg`0|tZ$x0Qhq|$Gf~}#y zQ;Aw^M6`i1mqv-Fr-8GTqrSCvdc0RkL6~cix0=31aIukpK}o2!ret8I~z zXL_-(kCSmxh;@{=V`*x!nSG$UUs14*LxQ=Zb#hp7sH#IjSW#k_Us!miw~~gox)oP~ zy-%!jp^1}SM50!oU2~Cy`QUTo|ZvCptX@r zeq3~Dbbz5|PF{v5S58imO@^;Wl4h|*fpdJQsf}8yg@c(%sHu@xlxd`Xh^nU&=wP-| zjVRBooLGz8Ff%p35F?F@WXm|)Ff}I|TdoY1Y)uPKv+Ojtuo&$y^?auYV;lGMKyURJ zy_^DrAdM{VR6Q#L4GpINx9o5yGw(dTEbmfNR|oenE5B&lB$Ze$jnpJ#XNM3?S62%? z8&78&H$`L3xa3?$sm4dY55H2;}V0#-4(~QuBjFbrH9Je^*xHO-_ zP@7cka4QR4%_NKP;DAJxLXVtaPyN^oJ4;LF%*1G;9JAs;cem&i9nhXW-Fz!s4>x=mxhh$UJ1pCAYKa1j6ADyU3 z$5?xJL%&iDbt4lUD+48`f&{JzElWT54BwP^hy18wt9&aPKgX;rcZV=H^IVM*?@*0U zS7$dhcjMAr9cx_+<;dXRups+9cRO_l(-_mJbUR&tt}tyYC3PQH{Q!4ew@?ceeZ|tm zNb5XjXNP1LJL3?`FfS{YXp0i7I1gRl3}>tZ9VkTA{Yf)d}tlKhYyYn?(x6WdasF!%Ui{iHChAeW31-#~9w zmtv=A=O}L#E_>rR^9)bp>~P0WzrX>KxKXa2fQ>Cz+ zs64N9lZ-qI@1g=z`yjXUe6?K1)Eq85BU8^XJ6)4pH-{pt^eAipyc`QxeM?Q3cynuI zFO6Jvn^5;Cdo9}(*OEf(h+^Bk5L@L?r{H+Q;E34Nq5@Y{E>{g_m$L!W#T7b~}zaKi{+=K@3X+~`EtQazujB>z%Pu2_AgByAsWSI_j& z#QcCDeH}wJ<3!sK>jW=-m2i8P+#qi?trS1Se9w3-bxXsrC^a8TU!$ZGZDZOMi8Zl#*CQ)8ZV1#L`eV4bAijN3YN{cfb57uiO9|bu;Y< z>$DQrqBxa&_ZVl31br1BE|r3a7(3r6Uv)#J49y%nqu4lKZ`C;OEPGSskaQO_rD!dG zH4{@CZ_mO2^LXk-naJQ(C@ItM) zq)@#=PhS;X3;nSC*o5%#BxB8VM@26UKS!S|Q`PtgyV4X5+aL{hPkqHmE|vK3WF>3c zSY<2gESunvWM}JAALH!&!Y~W1-~x-Zh=?33r-Il#4Sj7VO~(wKu+TsqZGFRZ&9odl z^cZ7sV544R8@1$SVa#{6~}C!K&3cywb%@su#{-q;2=|HT@#(Cw4xAq?Qq|e9Ah;XuAETQ zh%~hlZ7p9T{}OB6us99f1eJ`i=wx-BWc^ItXm9U)+k)tlNSy*tUo9WS3oO0~;f?6k{D5du=0Q4@+g`5U1jjD2u=xZ;hCs;4rQj4|BgbkNoIT z^J4SRcpZ1`tYp1dV=dDVjpQ)@n7H_S)8b_JKy@##V0GJAb#vbm-{3+G)0hH-D06Qk z^I%_nE)^$#AGdTpy8@G3^Z00gebu1U>`3zv*97kj|7>41^d=IXCZ?7;Tr<{B*GaVP}MC;V_SjE%`Uwsw*d^5Z7 z+_>BTHJ_9s8$(;~Ox=h~Wmgj$&FrE~6SsJS@Zt<#f6oXXu2fy$kcbc~9apu)bPo@` z)MVcRFI9sCgMh$-)KZI>0_OtV1RIxR{}?wT4J9QNHxo;*pj4BTFqPP%6ji@C_YAIZ zWw#{vXrC-a#{dt#@VLY@Q`Iotl9a$uJ;h=zyF3Fu^Ze{kpHeM*Go|E`WCJzTVs))- z+u)+O=xnnj{is3*E=NmsPuD0LKhJQ7#E=BzpnNq|;~4WG1FJN9|FB$pb3Jp59L<8l zU}r54!>~{*@7(0D(1I|dAjbkPLuV)Z6n!qoY|FGP%^U|)n}VV+9b?15RA(y<&!`e* z{V2U;M->kX$8e)O>(cnp5=*yOgJ{!yH;2gJl60T+?3fU*tlX#wE^h;q^f(u-RLgi< zEuARU;M6pG3l%**9e*pGh*In5G);S5V|7z&R~3y6Gh>@9C6Ca^gj7X`w2X*6KleiA zxIC`FI6Xg&gfuOuFe`iC#1zd!$6Pf_ho}e@6I(CGV5LmgtboiS<9IKZpu7k(kK*vq zIJXjgFH;X29bdDk41YgIE?=K$N3~d`EY}E2hZGm>v>e-_w7{Tr74;(DoG3fzSXF&<8)vTEq7nyBgWxz<_k1n?!cg1Dusr|l zG}jOZTVt;RbwgF>NK=2Ok^qZzpU{L@7thSnVC%HBFeh7OTfdSNr@W+aE)R#Kj2LgL zqEKybZ`Z^CFKYvhC_{}X*Q~r0E9+#t*b-H57h}cn+#;>~l;8s89F1uAC~YhKBHiEw z-_Rmu69=yN1hcfnU}MXKM7Q(+Pp<$6$BYaspZJ`Rs8}O|Ov4aO=S&@~EH4#TB{RLE z6oVvnlOV55M{5Ih<&Z+t5ckk{E_X%$pcDs9hb$}g^pqk+m)xv;2VZSNWlL*^97{zt zLtVp&{GveP;86ACv_vhfNF&EQ%a|lHQgfrEfc!9R_h5A=b8Ev4-8eOq6!Wln`_TAeu3Rs_ z#6+)%)DokJm^2H^yu>6Qx3I!APy1lA44v%kBsEKOJ7<*?eeYZcyEx~-5*y9vFo)u- z*jz__6KjVcGdHf}BA<{%hg4g|0+-0}v~OA#H2wU*pghMMR~ya52t};h{odzUP)3{TD6^mL`@WVb}E;ApqtTnjEEkI3N6yv*dx zyoiF_6s3gVyqHW!57iJg_gp7Eos1NFi=>25z1XCvjL^9F0xv@Ye>L}%sDe-*yAprp z5cQ%kE=%21SN$9dvj_{D#6-(L1Jl65wEWcE!~~6W)8KFiB?m=C)fg|Ua7Q&IJH6m= zjWh?Blz5XY-xxEW!Z5d@JO{1}OW!!R%pgshO!FvL^8lMPmxxj)UoFqjFvVmI505B& z+jLDgC0qUIT)zTqHRrgL#2_zY#XO^uyxjaqBjuxU?9jgrw*k4PSS?EVX>4sAwe{L)F}Zc;6Invmj@CeLwvo_c$)cY%go? zNd0h669?T)|Kzm%e7k^@kRWTDw4e~vU=xd+h_w9tc>4f{A_w10LxT)oKXo+&11r1W zqS$!dNKKn0E+gk~=aMwr;6ejy?ffWrr}(@qyFjOCKbI6m^FUt<8!K<8G>5Q&IPdfr z2W9mfRi7}oym*5=ZEb_B$YkxHtW2(AV>^HUoW!D>C%N(B^F0DkP6o+J$R3nX~zyN(e zm#~6(Jr8BoOhfO2RCU#SV+|F5-I7q%T-}0vo0wG3(yTE3XfwamBr`?r7)v+%yhtux zA2(NfOGoGMNHd@CkR0C_qsT;~VvnLCUtJw9Tko(8r>rbHeZ2xR$NW^igk0NbbDJW& z4BZq1O`p8HEdR7vu9zIfxH!|e&~#1jlpKAJKrK6m67}E&7rW$e#T+;LcsFwsWqX6f zs3N0`m^3pxSH*x-!$3Flp?OIz*vt|Yn>v`3>yuDB5m~yQ&nHB ztWc$tNR{kh-Kd1b9Pbb{!!UbAeJhJ%E0-XB?N~({d&2?^H*eF#SQ{^2uBap>jTl|s zVzrc@6f-ZE41<&$rz~5Y?2-)CL>G6DB!?7ZuP6g&rO2QZ8x@ZdwLo3n1Z7V%qf)~R z&^p<0EiMmz8~+?lizMZ+^b);LXVsD*C)EIJ@5BK2EQdmCqkwSdOxGxH6`gd&5P$W2 zZ@Wxma3jXGFvK-C-z3#Kfh)%%CtW9})LS=HGbBenB}P*%tiUG9#ltW&Ju1gU-_yp% z$t)+x*w?l&P(|Cs+A5(a(N{Ak)j-8n)6F_Q#95n5F(h3n*QqGhz$nl|*)d4Z+F3ir z#Zo!mAv{aVHN)4&CN4fMywuyqH%MJ6&Mhi9&L}rJ*df(8MAD*g7mAHB2oyH(c2_Bgn?w zTT#_I!y?{KNy8}6SS8UhGRr3-G{jIpHNnjWbYfw;VK|q0kd=#yt$v(AdZC)RZcMJR zZA_4jsab|vREV8&L`bB4sGdcRrDI-UX{^1Ur-znjO1xiImUD7$U}~OMimrDEmz8z6 zj*>=>k6~oIev(6sYq)o^v6D-Da6m?Jn1*+zW2$1DRX~Yfyl07$VMdOlufMWZXq2jr zO>($vaA3HavlEx2lU8hSftiDHQCgOcf3m8xzkZHwOt5o_Q-(u^k&~KrN@9MTslK9# zlDVx_l4FE(vXyZCMUrxybxNRhu1c_{ zMOtjEZEi$qmbbRQMUIV0dTzdbka1~pXi$)bb)1orWpY7apb1x0s-lCssjInFkeR=4 zo~>=Vj#-#So{~;UXq3KzkwvLtv0+qcMxM65N?~lOQ%;FpkXeasf?2djzG6yzQk07i zms3cob7{P3VS=fCsg6ZdLSB4Qw!Usqv_)`6PO7GAT$rL~kcFyMzLIy5qIXI_p}C=T zK$wABQeJ|VzE_~Xsxw!Rl8(7`bU|)NvY(x!t9nLesHU}9K#4_3xQbUvL8_B`gj;r8 zkc)k8fwoRzc9yW>He8wvn+`ykBXd zaj2(Hm|L+~Y+opMo%yRKJ;ccGnyi;stQW`1Z8myUWwk(*D1cZjQ!x1NV}PH|AY zr+-FCK(K96fpeaTrni+rZnCAJVve$|T7q(BNvyNCSH53tZc<>PajvJSWj0riUQlGA zp;3ZOzH5kyv%f=OQD#<&r;4JQs=sHLeL!S@L9&yYs|uHA za&(HByP=|ANSc>MnzKQorL~QRen_aDi9@h$ysn30c8r#iijl5aN|2>dXrWeuPpnme zldp=ck+rS8l6rzFm%FL9p`A)zvV&JfREoZFj9aQzc3@<#v68ZrvPVu#Mp0y;Z$`Rn zUXf<7dboO~rjAy=Ye-I-x=yHpic*4SLIIbqm0CuceQvagfx5D~R=U5tnrDEbPpoo? zMPhD*o2ieMVuZG3l9``-RHCXr!qN|0vhOuL@Nuj2`W3W!1 za(a+UhDCaIful-oupNfcLrL9vZ*KwMmUp<-%Ap;1DKcW98K zUT%bXKG}SV@a}uO-QbJRF-SLt7(Xyi9w2?d!|_cmyTLiim!IK zvw^oyf}={Fa+-s7s-|63UVgltpO#g0x^J|lhL)>Yo?Ea{L4JToLY!8dOR%+JQL#<9 zW?Yc6PCl23Pg1OnRkpvTk!6XKXRt<;i(P4ol8t7LnMtsDZd|^*VU(tGuD45uT}phS zTS#73si8%FoUun{wsu^+qd{OASCVsdP*QG*Ymix(b)>0LQD(HSt(Q)!zlxHFMVx_N zp>9q_RC=hHVydr-eNjQ8QBG1+gq3qrp{;q2n_X&>wK12cr(Irreqf4TfMt$h2)YnFDAtD!-%X^B~ywq|TJSA=Cr zKtgOup`v$=wS$q3n}K6dY@BkuU7<&slAUk1t)ixKL8f~~a$HeKl)jR8yk?50hNqT?nQx$Zf|`n#uX#+qetMRPQb2%9 zbc(x;U8J|ViGGAekwuoXV~%B#Q%Ok{mq)xtl$lAYVX0$WwyjHyr-^52P)3GVppj}u zym66+wuy7Nsa1iVQf84)ZZv3hN`Qt>a9m14jFW+xx2>_49+y*6wqdfbYhgrGj8}%K zzfP!wi%V>wXhe8wW@kfj*-8nuZpLwU3OM_UZ{bIdb&ZORY-cC zt51QmK~!S8s;z5GAeUKIx>{6Vm_~AGL`tz%V4Rz}wrW_4udzvnVz642qgPmvN~*P2 zT)b(FnN4P#vP+;#qG_yqSf*;RrlxCpsE!*~jCzK;c7SuDqKb~Lc64ltQfQt_Qj(K? zzE4T1eu$G#w0~(_LUeJiYIL-de?p)`iIsz1zGjA3sD5#Zwn}VvI+tcbilvu%s#b|x zxN}Zesexxes8w=?fvTOlg{g*qLcWQfS44oGzI$PALR?IMvW8l`iK26{W@dJHahP>v zskbv%hKqT6w2E_bgjtTgwO66Jt-7hYi$`pXX;@fMv7(!wQNEvncYLb3iL;kyjCWQv)2PP%nrW~f7y2A5HaZ%lAVs)k)jLXt;JwvA?}i%*iKpLw8 zM093ye5{jdk)5YfiBhSet4(BqT5dv?Q$(6YuyU-TNuGL`rLRh`Rivk(Ay<*BQDlma zZ(&KCLrj{bwR*0pQ>>AWQ*@3|UXgy9iLsW7zGjT6w{g0eVUCZDQ(A;=fvK^+Mu?F? zexj~!L7E{~o{N#9zn8wNYJy*}zmAoDplN!xiGgCebF5;%WvPd?l3r*;c6@ePoQF+R zXmE67seNdOd8}_*R9uc-R*-3KFjsU@aExo7x3Ye8wx5xWt5#sBQBF}Uv5T5pNs@_YSWJT41PZ30Fd3 zaDrn(eppPlVp5iwo1b=kY-(1Ni-SwBR*{9TSCVm7zQ0#cl1WIcqLXc+hMI3dwrQw$ zQK*i#PFAi;nr#$UsE>o1qMehSo<^*rfl5hSsE?mgv{Q+?sfBZ#Pf)N%tVx2SdT~N= zgmq!Din~&(dX}+=O|rF9QE8fXfS+|@GM8tlvvaYVNt}UKK$c>jX_lgYk*T7SiJz5{ zmqUt1P*!+CPKI@KuCA?{MQToAp=W`mrbnrZtCx$aMt)ITl)gPzR$^F6iBn*yTCl5O zT4_*XzJ6A`bH0{oW`I?0s*zEKvUa9UQEYHTo=R|Rft8_!ie9uqf@y?atXFbQVYr&B zJ(sOTtf_ucV6IkZn3-dOpNDynxs9uCtfh;6PIi<=a)yttU0RU0wTFhUM|@snShA5# zph2#+qLH12Tb5;ZmWmNqc&J;XeV(FvPC=rpbEsRUTTXsXc8tAgL6Dnbah|=QrmAB? zuA`NgmZq7rn~Rm5m7bNVlDD>TsEuW?cA}?2G?#{LtXgQOs-|6xdW2U_QJSW2Tui8{ zYhbZ$j#+q?XP9x0RYYEZhO0wJSb=7qn@XvHVWfXpeOh&d+R=A_1 zpLL#oJeN^ghMs+ft67}Cg^H!GW^ANtuyLAcR+^onqK!$On`M??ogHs#UP^IEQEFl? zhy^;6!_1iY14qmaLC1a|jvO(w1o2@UB;8XFNhj3hkB$SG4b!ALXM*Dzd7F~lcY z+f2<+Z2)gvIlU)|b0(?c)TD!#mDXg?O-N8$zSlu-y)xs$&&N(D1)k4e8$2ic|F)50xz{JpZ zA~G=2B_}P>u+TI+;Ft5Dn0GC#w}FWtks&^{ISi@I4LRBj; z+RH;rJ;u)^%hD#sF~=-5I#jh#NmWs$IL1*)G0G~#flFE4BF-RKFFjC6FFZd=H#$1P z-6%XEqaY$#GsMm^J18nEuh6W-Ra+-rF<3RqCo&{mH`BB*EL$-x)}^piInR^JBh1qz zzR2A;KP1{E)Ui|}*~K}@HY_AQ%qSsNUrRf@MBgyOB|Ioa)g#tR&#>4yOgk>gK0Q6b z)i2mQUR_-~fy>-qLsQ4oQPamTIx)(^-qE2zG1kU1**3}~DIq=9z^y3PIy%=U*Gkvc z%g{^FPgB<_$je&8DIw0LR4Fgn#nO;VQ_t7NG)B)w&&Db?%cnTp&m_pyqQodOKSN*L zK0(hYTs6c!%v&{D%Tm|FD_%R_RV&Fcp*SQ>Q`yunE8I9zmn$$Y#>XpG)5AZcu+&7= zP%$N@AVSkN)H*UbDl5g-A;%>lSXnvU+RnMSM8nWoBQx2--8DDbFfGnG!6QT2)xDIf z$V^MeJKVlFS}nZ5GtAREEIYu|&09xB#mOp1BSksFr7$qvG}k}U$Rp3PI3X}7&m>Z- zsMt%tG)^(!D4^7%fXlD6AlxO^H6kT6JjB^1+#)tt*H%4KJ>D%^)i$}*H^n|ZH_|^Y zO4-LF!^tw-&L_7tQ6tRX#vsm6J<+SgJ1~qZ(#pfoSWC?}Cp%bECC^&h)gm=LD$Fah z)Fw(zCh2+GRr{M#67;qJSacf)G;T|!b(@&A>AM~ z%`{X?Uro#0$S5w(LM`1!mn*u^Fj_gv$Hp@_z$VJ}Fhh-C9G-I!-M>Ls^TQ+#dtqU$NxVj+nx3Uv zypNlIa#5grkX1&hRdQ62R$inBS4@6Ferc|swMl?kTDq;iaYj+8y@6FxL7I(6ti6kq zovllFs%}mqi(iC|hMIDOg_)kJvagbpNdcFhqHAuTcYvX;nuTGJYP7Xk zuv@OLv1?#dYQAzoVQ562pF_5vg_>Vbx|xHTuUAgAMo>h2a;T4LSfNINnp?0Vmu8H= zkyfmwdXAo6R8ELSs%dUSpr3P6mT9<}k8XNsO00&mzICR)kDHE(WxAo3l~0Lcu704g zlZJP(YqYygbRbtuv8TO*L7G!cNQ$;+prMtouZm}oQb?h?ccO)-VV0Y{Pi{fDl6gvm ztBz_xWI$42riO8lky%!ZXGBbxxmsopmt#~=XlkmGu1$fRtG~O3o33T9zkg_|af+^{ zd!mkqYpJb^Jfs0RZc1&ooi6vK7j7e}#mY$JkP=K9h zwx+XTjB~VKc9FYXptH40v5u>im$P?%+dZ2l(Z&E@8 zSCEsnTcWv!frhcUTY98NQM8Z0l7^+9rhZg{xj}KBmw|U?p_*}`ajZo~gqc%zsCrnW zXQ8`sP@a;1TDY;3iz%07Y>snjL7-1$p|*x zYOt!7o1I>wtw~9WVo{kjMTw$rRFJ(QSGvDna%OULR;jM4UqY&piD{5dn6-wl zrM_NRQel#thmnqdW~RAgVnl&qazc`ZiDzk|mYuSCOsTJlo>zj8uO63+i@REQK$2E| zN_3vJQlgPsQIM)yw0Dw6Vv>)eO`v96e0qdNY+-tSq*JhkvX6;NsG(UC0$u2n>ex1o)`qqlETh_$by ze@d=~gNCkKuy3xvy1tu7ZWdQ|Mo4(1hf79exVCRjfsL=BO@3syvQn0dQ?go0x`TR- zzKMyce}Y4_msYlprI~B2nTC~%dr7L7p^CG$XGTOQmy)$zVWM}aLuQJZualvByhFNm zly*pXf?;}Kij}=uuug7FsCAs8k5+<8kcnS@ka|?QwNY|LoJ~fNR*+GQjR9A(vuk0l zn?+HML7}x_R&GX7R%)q>U8Guom62;&Qdp9Xb5^Q)ZeWR$zKO1lrEN&Ks*!J&p_Qpy zoO@b8Vx*ZhSCW0PuS1lzgPT=Ynx>Ciyt}oxLAX+~Yff}RM!18&o^PUosg7GnT0(+K zmY0f(X_RxMX^wViPG(Aav9YD4QVds-N1&y@j+0@4hMSvqVy?1^Zi2mAj(S>-shPGz zVrY)9k!`$cw62kruTNT>k$rYbc!pD6Otwk9pPH|dQieexS45PbiN2Fga&dCDmvf!|s-dEqadup=U5L4# zvtv-YwSIC!xUr6@g;`3eVQ6ltvS(UCY!H`kx~5WkjBi$CdVXq2uDwNEp-;GZl!c%F}sakQzIYhsX(mWxZUl25E!Zh^h2x4pJ{ znh95cPOgz|s;-(4JoQ<_|luwkmgP)gDP=c~{u5o%&n7xmSflj(|d~SkM zo@0WKw^yNZp<{k_v00Emm!_XXV1kv0Z=A7Fsf%&3j<>p&v$svYx{Fzfx}Akaf`+?8 zfkvLAy<@zZr>$*qfv3BFu7|!~hDM0DgMn44r2&^xNMdoJab8@$a*$S*wOdh4VxUK^ zbE>;lyqmd>Pl98-gI|8Uv6pIUk)ox#Rg7Y6yj!}FtA(D0NpfC6fn!<`m#;-uTuQD+ zkw&bZqPM1+eUgi%Q-Xb1p1-56UxsOVfVzpHTCu8Grf0H}i@BOlR;j09Lb$3yR9dXD zr)rp|kpY*cc4)Sni=L^!Vwj1Uk77u=UV^)iWo|%}s-la&nQwq?On`Q2Kw*J~XQ_jZ zwN0UovU_nrmbajI#cah^kzeX^T}pPEsWx>uA+ zYK*SGRiby1YgClCrCFv$k*T?MtaE^7u6dzpfkmLVS~^#XM^b@js8(URs(q+_hEtAT zNLZ$dkA7)xO0He7YPw^Ft7WFLzkYC5sgikdXjn+HvzxbCfLEHiqJ>AIcDO|hSGd2v zy}MhIzecH!b(W8Zma5ij7Hu ze^!8rVzFL zl8%=~X`zRbnx&b&M!1<`imSDTzd@{vt(#Slu~~3-gr!ZGgQ1(RcAlepv6GgbMtVRP zmxWS+gQ~rl+YS5|JIXGW5LaDcC;y=j6*j=xd5qGP^; zg}sHTPP%z?hPOwIbwshHnZ99`SF)CdL$Y~HWSoX~N=k63X@IGYdk&XmXzs(V^-sDq7_L7+xKq;auEXoQYWa=2-{mQtRTooYd>c}cpt zuZNXCmx-dbuS%hsf4G0BdRAhDudPF{qq|g3St)GgCqJgJ_ft`;=q^q7=w3Tj#xo3uNZjM1xZlXqXUaEI`R4kWiUS@!! zor8^XeuhSdzp7TOVqS>8g^Q`0OH^@Mv1*Q%yLpIbakRgBak!(pk)o5IsamwIiod>< zk%@JdslG=vmsO}ykYlobX^DA`T~WSHhJ%$xp;B&oaJrdMjInKOT7Xt=WM)7{u%cd& zv6q**zq*Q}zfVT6rL{qhazL1ciUXHLc(}QXL4;yfiCVg*Q)r;KdQwz+hNDG^gSxG9 zU{i&6v2s9!oiUeo zyq#-QjIyI;qGouenWwsgl6976uwj(3zoTNQm63y2j*mxX+dnTdY*ZxlD0#T;?LvDVQuAYfrX>_oXa98ysA6HDTfDNO zqY_t+kB7aFzDm5Kn^H+qV4;aYeu1Zzey~oOi>p#%u5(zpyK1CUu6=BQReoB8p|iKS zahR&Diiu5jTAI6$wz{G{S7K?hL7qWmPIgAIZn#yRR+5)Nsz-*goq0@5bGlMtK%reyQDJaMU_hx#o=Q<^l51(aj-quTmujM^imIZb zR;rGcSwfDrx_Pihp^v>riF!(yu9mmAxo=^5yk}5gnoF|3r-x>CfqsIkesEs2r=6Z! zT1JAibr6?Yv{gZ|r?YdiuCIN5yqAZ&b9}N9KJa!7WOcXEENeRi&gvVp#lj)qRCqD8WMPOgP* zMtYWUfxCZ5aspR`SD=!Xow}d8zMZCBcvw<;ie_Q5SB6(YuwJ;TQ%XWmq1zns#zjQg%#Krd3jwo_bz#wxgm^ zbdYnNx3imPxTmGHVlJ0~b4;dLOmR-6y0d|;uU}|sR;*rLo}Oo*Prj0`Rk}@SphJv< zqOMCsie7lMYp_N_YJ#V+Zmzbja)P~qrCvlXmzR62ew1Qtl6G8BP>6?pNP&B(o3mP` zfv-h@dbUQfYFw0uty4i*dc3QBjDfekp{t&urn!@kQE73qv$k5amKRrSPGop!QiflW znzxdoLz@hLd(_iVat!kE@b{ zp-+0Ksj-2Yi+Y-Unx~C_Xk=WBmZ585NSKY2t&OT%gjZU!jX{Q=rcJbyt7V{aUWj{+ zqK~4Ul|xuMSBiU4wylR>s+NtNm6oH0f3!t-W>8*e zuC`{NM_5RBP^!L$iN2AaS!8T@MhsV?Uz~4RqmVUC$Umwk-BmSRLsLRO4>uvxx= zx@|y=jiW(+c#3?r6a+XVQs(z4CY@tSKh(@TYfs>oEt8PMquVc7n zgnwqKvSW0nihFdtm4>o$ma=lPv5H+`K&p+mh6z`Ku8UduFtEaYkA}gpy@ga*&E^QlP7wwvvl+kamueZh?wpL~34I zZkUz2zBN}&c5Y^@w_lE`UPP3VH)v$jOvOgaJ0Lqj(bvf|MaA7OJ3?7G$1zMR+|0`* zGTK)$K|d?4#5=(>B+(<;+~1VTLpj~UtXNY!r%2Bt*k4)CD9b)pGs`F|D%v(MG%z6} z+umB&FD}$1#Uaby$<;8xEnLZ^FkDC9tTf0uL|dgKjLSPS%0V+eBv&oLRZA(>Nh8-s zIVCL9O*c_J(p<+_HK@4MGbTQ+)H6&q(A(L`Ge_Cg&nzp%uFyCk+$q_@-OP#0)4DWV z#kJ5W!_d>P)LbX5)HcG>P%%;`!8FP!TFoWNJj_2()!N@YNxPsZEMC`JuQV-GD>_`? z*}NbiN!Kefjw>rN-#0YPIy){tCOlCwOC_QtSkEOrBQ?)g%gn>X#6Bv^Un|llHp4%{ zJ=rn7&?z7$qR>`XUDw1UH$BcI*4%)rAShEW&a6;3STCy7Ag#bBDK^kDStm^^INMg& zR#DfwG|!N5Jx(@e|BTGuks)h{yGfGaCqJx0sV!^_FpGo!>_ zQQy(Kq}Wzb)u|v>Kg7x|-M2VBJiN%tFF4m&Bf&$zFwxw>CfdfqK+iJLIKPsb= zAWfyf-ql%2M=7h&oGUq^SXaqk$Iac-Q7_L(-zuy$(mXoF*Hb;%AU-lG(OomuUCU7= zP1W8aE#Ea?!zColyU;CA)6ys2U(q5!-NBa2(JjwJHLoDVPsOFk&(zgDCDJEIIX1=K z#>`AN$4o8E$2;6H)l)BBxg^0NK3zH4E;-ygDqqz_GdWeoJ~hKAk1NgCT1h3q#WGnZ zBFI}+S;g8TM^~pb#IGnSG0VQ)hHk#AWxIa%{HsR&qhnlPsK1x**C!2N6X8^ zC8OA}B*fRH&|NDa)6dA-Pv1Ypz9iPq(jdz+*S#=2LRl%s(k0l|IJYF$nM+wYzCgz? zR@p|^CDu*L+$XXy$w}4Gq1YhV-lNDfMl;bw(IeN@xhN*gH&Wd+DM?+=#XLF4+00ng zrqImT+|-N9&)U;o-M&;kThB8h*-X#N+b+YXFfFDqDkjP{H7La;w6Hi{%R0w2JYLT* zGCEwfINvwYFvm0~y1>Id)wNKqgv-t%LOmqcJ=9e$HP2V!#dO^PDeZ3H_Xe%H#RK5OwE13Gs7W3)xp%#!NVXn%h=RI&q%jK&B@-EZ582 zEX7}4EiokBKggfUF2KJRQ&^tFdO|#U_BRaY;%SG8lugEjlD$FuKFE%y8!rM0> z(=N?dHzhg1BgZ+cB+r>ETut94Dl#|2A}A(MODVFz+&16AUr*7=-^Vz~+SW@mIY-?% zFgV9L(96NwR3*``NG&C!B*xOk+gR7gF3%{Wgv&O;x5&ZIGT6>7(LXKO&dI>QtiY+L zz)(HiJ1V6lIl>_)D^<_c#@s5%TG2Yf$jsH&OeZfY$w}8EJl`cGD=~%3FgHm#JkUQ) zQO7?kIibYL)+RjG$u);KfOLDyHMAUa7g*d#Q*Fe^1DF03HK(I7qCqe#Qp zDL5xg#ivl))z-l}I4&TuG$_%}*2X=;Euu(M**`Nmk4q~|*+wtP!_3?>$Tmwg(nTlU zF5Wmj!^vGcL0K!sz|1J-bAu zBqmMUAGFd0mAtKW$F-|GhC{W2PI4n)iD8)b9Av44y%rw)k)H;G2F*7Dy}3rCDAh7#6vqyD!KH1e=FDxuUFVQ1G zJ4`dOC{0zLCk1HwIM$ymTO;IB%Q!OejK-1dBrzA%QI44J=wd&-rIo7FDxrU*+Dtfrzj~SOkc}7J72@cCd)oH z!7jnfr^G)yFVou2Tf5jQHz`5ONVz!3Hpn|B!b3kg%OXxaRL#)Kh|5wjT+KAq&>+xU zU0=sACO;>zIKw+MGeXTT(mU5GCC|3R#MdU-Q8_pyE?O-JziZqk1IFdpdi;#y}&E4C{8uZAkH-1Fjglo)zscy(Kucy)Vx4D zAtffjDHTSdp*DaW`-OEn_QAk@MtC&LUh-Y`@#G|5>d$xzib z)Y8q@#5&K?D^SBY&CeqyP2E({H7(aQ%OSuxKUFC~!>l+YM%kgrJJrBOiObyD*jPVF zImA5CHqtCk#XCDEPQ|!5UoqcHPbE=1(Wlt5R6Ex*$2(dr&P^w@pfESUBhuC0!#~~7 zCfMJ?I!BqyDAUthBUw=;+1S-kRmD5QAk0hKE7jY{EX>0z-7Gy`H&D%4G0VDG-7Yu1 zI3idnAR;y)AkRBYKhoOKUezQ$m&>HEDBV0OG0R9lG{##!ORF$4P%%DRRo}@aJuNv* zJw`uEO)pSOE7T_6PEpk(#3H>wKfbsqCPvLp!zj2UrzDmu&>-H^FH6TQ%`h>h*i|RK zpfJE#LpQ_7HPb%Wsxa0#(l*8+B}ma)#Uv@#NjoGkSkp@1+af14!dxp& z+s3FUMNM5jQ7Mnh(Lgbyz|SMWAuu^Ms32HBILgd8!Cf&kRV~$}#Kt!^Brz~A+FmOp zE7I80GSDNmRMRFfE8oJfNZmG~K+C((ipxtU%PCbQCM?O$JTKJPK3qLED6PQWJHSub zHaRX&y+B39B;PW~tRT}cHPgj2ttc%k*)`iPIl(AQ$1_~ZRw;zbFVj5N!A_^BDAdl= zAX7OrJ*qHJH%wdI*IOwmBs4HI)}~ZhEjK(l)hj>7%f#E#Hq#)%$yndUB-1(BK|ey% ziYw4VMY}*VOT{TA(lWv5BFx;^G&PSap*T9+DbqN> zAT=#4q|_k7z(qCO$}-c%)+Nr~L@7GjQpYel+c{Y|J=99mA(z!U!%rzj<*G1LcEWRWqTPr6dE3-8Ra>S}`%%SSiaZIxjLZ%`Yu1*gPvNFTldbLfu>4C|1WmHAlzISv9OU(oe@d zKE*9HCL%YwgiFoc+DAQ4Gr>35$l9wQB_TH0Ji{YB(_PQQI#$iX-N8yLAj3>KIms|0 z-cL8$CnY^eQO(gaE-op?I>5xXG}DSJ%O}^(Q$1NZBQW01Kg2sB-_g>;IW;!IFeWD; zB)!*T5h%I3U43BRopcDAmGD z%P%NDQb##8z|6rWk;@`5!OC4FJ4;Q?J3`ab!Z|K2%gew~E7-=sO2xn-P03u#Bf&32 zB`w-NDcD9QGQiDRRkK9JF~K*$$Xe0a(;$({!9>y0Of4(9*uvk&-##)qG*2oy#X7R!_4? z$IvoS!#%@1GNiyOEka!<-8IH9!8g4$JjXKI*Ty|vDK5z&Bf#5N+u7OA#k#;-Nh?L$ zC@~`|+RKhhQMJ%MMN!|pP*vSAB;7kO+eABD!(Oe}Nh!kAEHk(yI7{0hJ10ELFHqMj zB0omU*Hp#ZE!Qv1TQkqhTq7tefh#)1(<;#0I>5!oL03OVFWk#FQ!z9+E>O+LBq`54 zD>ytf%{Mv3ZTQ%C;*HOpL&%>o4P|2)NP1#P}A}hf)J;Km3&(R~?Ju4;JU$r11nJYmf z#>z0#SJgkq+}1kMS|`#^(<;j}%fin^Mc+W#&^XF0-YqUsBh4|!E=DU{GegnDT06`z z%P1kh$tm2zCd81-NKZ}6FG^caGs40r+a=Z~yTIDZ#3Ix{KQ^UE*TlIvT1hKk*S|2_ z$U!YSwaCpwH$N-KC&4nv)5g^-SH&U1gv+_uI5Q(G#nDzJCsy6dF~ZlVMBAu1(akv^ z$KJC*FP^-Il(up*eOmgG1N80 zjms_|$JRKc*gVhAC@t63GgUo3Bq}I5$Tlyk(8A0qQCZV4HXtr5K-)PdDOWQg&oaj* zs6frnCNsn}(ca!nJtmS%L%ld4!n`y!FFn#!!z0l%EUW0ldH%qOUus5Ikqst(^^f@Q{6y2Uf(1~ zQ#HrgIy%%QBs$tQ+#;knxG=)gBH2ADNXfJy**`nW#4|5EqtxHPQb~(TBhw}&Cr{HY z(@je|*xpaQ*e)n5F3`!iRL3wqBQ`y~K+DHDA=oD?r_@%}BU{za#974HJxtX#(9|VA)!Dho&&AC;Aj{jqF*3f$A}P3_A03?K=4_ebXcOY0?_rVel4IklpAws4 zooX9nm>gZg6_%-=n5z-xW9<-{;b0eQ=;)f}maS`+sBNR~Wb0t#nw_ndQ><$5?VpsM zT&V05=VNV{9T{Y39_5o@sAe2%}{E)9^`1B=Wc6YY3{4!l51d@rL2*mr+lw_XeQIcmAm#44on;Dg1 z7_X}q5~c1MA8P62tfQXeTBKyH=;mgol*;9*rJwGft87?emG2am66|W97U3S~8t>;@ zWE$b28}4bDp<6l1SK{U7Q{->Wm8qVq9}$=otgUXN z9HNpEYMZCyky;euWuNYvR+{ajVjr8Kl#&vxmSB?Zq->IHlM`g5ROD+EXPu#LobPK{ zq|4=Hm*uLNr52(eV`FSm>TTm)6crv96dDm09jIsQqUVsB9AKmt?Pd`YZs)C{8&jlY zl;x6>=a(86rKFh|?V9ApWn1VT6kr-3uJ0D1rIHbo?Bx(p6riN*Qn_tmSFys_m^G>Fe#TpXL`}qiLI$Y!Q+i=D`)NsF9K%>!V?5sOIIasjZg~t(csZ zr4(hM9&MAO;T)iBZR}ueROIVnZKPTfu3}&t?Ozb%ma7?^XQ*r9U7#DzrRNrzVd9+> zq*IjPm1Lw6qOWJ4saBBh9^vJz z9A6M*smv9h;205M8=;=*ky@yq7v!j9ZJy>7?QCJKUtnMxV3{8ulNX#4pl(!TnP`}r z><|}bZC()Ur(v6!Xr`Eup=prJ6g|=8Wa96cYM1P8sGFdkVPfW} z?`EWD?3<#Np&jc|n5GvHqne)@6s2rw=iwjZZ4_f?k;`S5XOxxhAK~NUl4D~N>t>ao z?4RYHk+1Hf5~&mDnXl?rXquiM5oO`6Y_Am=AD3$x>8zdVs;OdSno(eDlkIBGm1`C1 zo~09%6ryS1AD$DMotYRPY^PM3nrH25n(F6g;^h_Uo2O?U6lHIg=p3nC91@lgl57za z;t-JTp~STEf^DB4Xq$kK}| z$2=&~H`qPXURfzTBBCfiE zI?>fR(nXGt|tXP`@}PA~C=% zCqge<*)$?YJ;*W6JV!m(#M(DE)jKySEG1VrCRL-r(Oo@7(NQfUl1pFL-!RKNI4IUT z%rq+0!Lq1O-9gtmG(k05J;$xU&Ob}pDmWr1%*Z{`)l<1J-!U}D%{VjCHp3RQl+?^R zz?jQ7qtwzxF(x5d$4WiZ+#)L`K`+vw&?nN|)-fR`Q8&!hM@QS&M>V9tD&HXAQ#oA2 zt582rD$uu!9CqctbO;(i*N7`C&MMbS$xE>yOjX&;Fg@6+K+iHP z+ay{q!(Y=OH9St$Dk`NUQ_0NVNypkk%~?0VA=KT)G1n+QRz1VYAh6hjD>x)Z)zd96 zvM@{0S=(RJ!C70~U(Yt%OvPN)C^XF{THQm<*IX;qF3ZV2GAlkaOfS?u*(@TQs33p zQ^~VP*&@}$A~-@_Biy{mH^eHuus~fsM9EPzDAnDlI9=b_C*3Dbz1Z5+*ViSKt3X#b z-zMM9%ShkbBwfeN+bh7j#1&LN_#5X%7>0)=XxO9$mj>k-1}SFSB}Hc|rE6P-1)CS8 z=ZASX*d!HMaz#dk2Lz^P_*k21sif)|=IUpq*myezMU>hV7w9Snlz7E@soN)H7o{XP z1Qiryx>-2;##jVd2N}BrDtUOO<;HSZWqP`&_*y$h*mwmdTcoABBpCacoBOF-nft~? z6sMZm=O)H08W#G;r{#r5CWR{L+v~@Jx+KLOrN$b`K?NFI&V`}rX`x!-c}m`;1$x2C z{+S8xo*EIsn)-z?rmB{vKG|7ezOmlLR;hlVl~{JFM%j^WfsRGCF1jkl-tGm#Tn;LU zzWIiZ5h|`OZVp)?*5+Qhnirz5yOaxvHK~+Fn_fiYdk^ z4#pX!dR9?k%BEaNX3C!Ke%^-m_L(K#?$$n@C3b$HVRq`tncATVrE%&Sg|WV_IyqWa zrqRg>u8}5z#*tpJZdL_ZrY25i32sG^TyC~GnkJ6f%3j(*aVcq520__cVG+sM0jkah zfo>*t-uiYvmOeJhb~zz|{)NhBA^A}@W~PZj;prNtLBR!KI^kUIMP?Q;)>)OKX2uJIWL zzNLnFMUnCD?wNYN;Z8}K?#@YO$_9aHuBJxDTp23Pe$o0S8gA*XPFkM!emXJfK{lp( zG5OYkmT}Ix!Db~UFRA*S}FI+@WH zN`a=%8oG`-w$WP3K{3h6Zn}j&Dh81;5jGKFPO2d>S)k2sZbjj`LGf9^8HsukMn+17 zMS3n=hH0@S_PI7nAxU`!mN`+OO8So3CJBKB#{S8cDPHb&pq-=zg=tz=nOWf~_F=KP z{uV`MRyj7>r3rqn!Dc1~T(NF$<^}pGachjX=W*5e!ePk=GJB&IT;pVYC2qTZbdfsX(jf4dD=?hX8ATciKf=Z z>8ZLwYAVj&S{8As;pysH`33n!g|W%*w#jx{>T0%`8vYu#`6>R1w)!?MT!wxgS}`d` z`r2_`**-Cbx*?HjMg>9M-mX@9{<-ni7J=&4dbXx!-q9*C0lp^j&M|66t{(Owc^>iB z?ygqqu~A$RAvRj60TI5@Rsk8MITp!2N<}_yuHMOhc9DM8A-d6a_Td&esli$C1>w3$ z>2?Nz_Gun&mL}@SPClLiW?HckTsFF;HbD`g(Lt(O(fQiJdhQ0L24UgJX?99_T3Pl{ z-fjVgb`jBbs+rDiwptD;#+oX*M(NsVsX?kq9tplG4nbThYT6dA;lA05ArV>H`8q|> z-ocq!ajI%M25S25Dd`@{*`-DWnJT`9ULjiA*2Q0epbaA@tJyY1{y)39*zmxwl?l6uCYp1 zT-M%+MMlOcc}B{SrLM_wX7;M;$~j8;{?1_~{)+Lj+8IW9W;scw=6aqbPS)mTMRqRH z+5y&ix{iLu8s^SXe*Rp>@!?tpZkhI4;c+Pi8F_y8MK)T>Nf{nFu`U_v$pwz))|UCD zb}@=U5oX%9!38lE;VFfInmU%6>46$rfu1VyT-Jrw@%|Q>M&9A!xrP~Og>fa`fvK5! z@d1hknW46Nf##8J-VP;UI_eI&P9BjN+6Ki+MhWg35vHZN@p=})N}6154i>pZ_LhZ? z)}i{T21-%6zAmms8oD;>x-K#KhG|aLZc*8>h6Xxm@%c%Xxw=L%5k>_$C5CnpC5}EB z(XMVKT!m4^S*nVO2DXJUsiCn&NqSK!midJ)HW|vL@o_OW2}-FZ=|+K>F5dpB&i+O& zCH~$)exV-m9%k{GfgS;g@g-cwPX2CL>DhrH8Lolq(MB#F`JS0Eit0*Pg59#>Tn1#kx6$M#c_dYLnIZmWTG4u;(b`U$wz^z_g~?i~7KY)f>6!-KC7$U%`nlOA7TIPV2`=FY zS&G`pp-vGV0miX9K`A-r1(905j``a9R)!`KDRxDE`kH1oTrpW;dNv7`kvL&Wm;V#ADIjO-;Tt4|R1zFaSZnn0biPrAv@uu0DLH-H(PG(V&*1@VyevwfwDG4eb zb^-3CMJk@A$pK#BUZqNIe)dIbNzO`oG1^=z{@w*S;fZ-(#pYopYHr%8{^>D_e%baB zu8zuz(Ro_=IX2-wK2F93i6+MCRz8U_20q4?c~t=DtSuMNwLo-cBLYTjzr$<`T}TyZLno*Fjk&Lze=juCp+da=sBxhYCk2`OHN#^HJCx(V5q z8R79!wnesyp+1FH0Y0j(CN`xR;pPSoW~y!(7BO6D)(QEh-cAvvUU8YaUbf1K39*K1 zZU(-waY04VE-KL(8mWa!I?-O9x&fwsQF;D~SxMm;o-V-#$*Cc_%B8MZTrr*n4wm+j z5&AYk`iZ%|T8=R;&RX8KKJj5icFCH_Zm9;biuU2z`W_ik8sH1ubArY=AX=;IPp$Vz(W|U8Ue5XXRzbmGo`KH6sm|J& z8BsauI>r|Ms`>8biGjJc7G7o%Hlamkb{>wUd3mmi0UlgMripnDzDcgJX?f0GxjwGS zRz?Y4E|CUN*(t?d`L3as%DKMDrlGc0nW?#j;Rb<)QBk3G0mW(&&V`8u`j#p&T+V@o zDF(KM{zc9as<~=5f!037ni?AVF7}S;`u2K(J^_06g=#vfwszUMmcB-5j#jZAv7V{L zD%Mfj5r$DVsS?K}6>UuF|ni1*+ zN^X9Z;f8s-Dk(aSaXQ&iZq~-}kr`RqT&n55={h=QdZs?MYMN2LS_%09_JJAxcDmud zM(U+14v9*^F&_T$zN)%;se1N#D*pCPDmn314iPH)IevQKxmsL`p#_CmnYOVi1rdG@ z5q`OODt0;c_IkeBCixo0iQeXgx!R^`<~9Za3C_uCVaCzP7N+451$u=(O2y9Zo<`{j zT;2hpfi78Ex^@~WZvMtDsfC70f$0&xzCIyEi2;TNN+H4Fnn9(0{!aQCx!Oe$S?Xzd zdcoO2#=)xY_R&5erS4q0X<^ApQ8^YmdIk2mW_b~I#Zfv@DM21KF22ff0S1syeX0gt;dDbCXG0tJmk+EEQ+RC~1J^`L; zrT*q7p3dox1t}SN4#i=`#!gXs`nJj$UhytPN_j3y8c|_EPVvFU22sW4C55q}DmH4m z=Bg2jTv47Xin>ujhKhb#_7Pzbxf(v!ZYqU^%0(KQwob_w(LoW30SSgKHcs}+$$_R( z={bqowts8Fq#7dCvA$&U*1-rP&s~2Ckm2$@USYT)9Q+-d;ND#(Ea14(`gv8D0gY z`R10^MJ|y+nTh%O(e{?MalU3gw)W;eQ7*B%T9GdK>gooiCfd%bP8RmTX$D*&fpMw9 zkzu7qF2?#LncnGXhFVHVE(z%Y{?0}!TDAdkT3TrVZk7p(N&24d+Tkwl4qh(Cd456G zuJQgwenEa-T>g$J0m(XkY5sc7(Iv)e*6yy6hMD@wX4aND8PUq>p3eHA7KOnoiUBEZ zRtb?=u^JkxfiddEy0)GXDpAgcTIpOqzIm#usa^?&Ikq;XQR$BPftqH@8LmzaL6)A; z`uYWhx?y>y_L|Yo&gr3!{w_L7rAp@3O5PDxk?A2`ndzn>T+Xh>sp_H15r(0fimGnW z8oDvrDmL*3F;?o9`5}tdR;AHiDcVKGMY(>K#eo4HKFRta#j0+xLDAXaYPs35o+ezu z-uAxUiWbiHNoM{I%G&w{I%aD5{#F5=N%}6DcJ{eurRf^pZdS>~N?OKx83k7QHUatt zrTIxFIboKG8ZJ5BT*1C6W{SZvrQxCGF>qrF3uLF$`0->L55r!nugw~Nv6?-v9Zb}=^3^z!TMoACUIsd z7Vb(BS>EosvF_>W$$t9rp&^mBzUh$(F+Pz#DzO1Z!NJOrE-JpkT;5^c_AXlKO6qDw z(Lq5@c4^sh2D%Yxnu@M@+8&X%`idz@zHX`p(OSMfDNY_G>YffR)>>i8DlT~;j+tf_ z(P3P1{;5teVZKJ5_D-RB38fD9$zkSJuBPT*rqPZjg%;5f5wW%g>N)-@ngJGB4msW# zL8=bQ#=0v0sp_`AD)w<6Tya{~{$Z|4X`ux=rp|u8D%zo?5%GEH)~4Pu+Hs!2T1mM! z$u4PTx=x`1j`_xVCQ3SiQ3aV^E}kLI5x!oU8opd}}Vc9u4tp$R^w32x!G<|)Au z8R?d(?t#kY8m>iF&gm+dxoNIuW>Hwr)H0>yOf547UVWF;;^fr45(ShqwLlV}v#nsq zX&IX-=z@>aGB7t#FgG<&KtE0^$U=cv-?Jn!Co|bGFFhw!0d%xha7k)zn1VUTFl;Ai zLC)~X&ntnRpk=0Dpb&(5f)+@K+!M4+4NVLQo}gu=>Flj-YNnwZqoJX$<&_X&pkkFB z;F9cEQtIoI>r-r#W~En>nX2mSooXDJ6X)xe>5!_fY#n6krRSUMz@-zIr=Js-qMDmw z>)_(yW^9{dV`1T(7m#J{U}Tu-WMisrAL{Fw?ds&H<7k(t6Po5*Y^)cQX=j??mv3qs zp=ZVwk?xRe6zA;Y=A)mSkmBsA8(nOe=jvvctz({-@9F018E@=io97sooT{v5mFF0o zTAG_|qgs*~9vYVumy+qB$W@pa=%uabXq)5c;gOV=Y?iN-q91P(?_rbU9j=;flkORt zuUiym8E;~nIE5T4>H?Xcg<|9OP#f60D`F8JL|Irlyyb zs#I7|=pU!k*xIZRqPCZCPO8Q><7JnxIka8LE_Llj^CPTbLGNYG@hn@1IsuHW15$6*i;#<>Bk0 zr;==^5o4bjVdbN!Z)9nusOhhi#-*H7tghkYY7*n1s1omErKnk~mZzkzoTZ)YYv5#V ztdXmyk{c739cXADYMY~`RqUH!P@-&@ubS+klboO9Qy9&qn(P*)s%hb(SD5XcprM(q z;;E7yTo{;@=VEG_tr6j#ZXFyGYi;G^p>3h>?hzjDqUxTkoaPc#oR$}!99b0T!If>7 zo@kqJVY7;ZWqBo~@DKY!shmT@q!UA61Z{Zs=iWXr32n z>k}Lj?5vYoVB*IWu4HJL?HK8irEjGgd>y_^BVQQi2lA7U{qG1r3o2qSKq@L~L zq3xdGlA~{t<(TB1R-j)P?dK9#l&O=e!=>o0QyLs-;-=%GnxU4csP32Ss-okh<5j5Y z>sV+P;qI)g=#duV5vL!ksNzu=Qxap4W~pqem=a=U8&v42AELq)SW;r2;^3Jc8DtRT z>!}i%Y~Zb!rWRh1A7NeMZ4~3CXBd@hTcTxWlwgyr5#p+3tfL>IrRN!!VsBTfp%K~tK7;d4GuN!Y0V`^*|ggDnY-r$A zoaGX2V_=nJ?CTL5mZ4%05m2nH8s;C8t*WM~&E;2U?`!U76XKb#TAXTBU>XqblbWcU zp=a)2U>Fn>Z;_W4?k(y>~=Tgl%{TI5ttHbpO~%b;he0l7Hnrk>!_EYGvsfnB|?WnD;5$>uO?4FY7m5^j^ ztQZxTV^Wmk7T}c~s}!K>r)kNhoNtz(kznYZqG}Kyk)>MT8KM|xt5@vr9GahFmmI0D zmX~MXpP}omk`QjHXOycPm~WGy=@b!=;o=dXV(DsG$dwkR;qRNCV(*@vlI5A;uAQ7& z;2xn8;uMl)5maQBVx(o8pzm#F5M`F>7NzCsQQ(slp=s}FW|EdqlB%x~TdI^2t7vbUpKIyj7oZ-clUM4kX)db<(H@wWTc+&Zf{|qR-_o|6{e)CSem7up;M}u5Stzx zpB5JGZCqfdoUCYSR;2A>)?;Xfx9Ic||ovBi2XX;cEVV0h%6sfLmX`N82pPH_y zYwqf(8S9;yWvGu>9o zpz4*Ukrk_Km}+a4X`!j@s%&NB>73wH66cq%t89~5uxc_V&$5vm7AcIrc~%_Sdwp`6W~x-SP-CQ=jY_(?qjALX{hOMs^y)bm7*W7 znIEl{oRh4Yt7{&UW91%Up5^A7pki8>t&!>; zq@CjCU=@-d;aXIXm!FbdVBqf(=&qSkXcih~Ym?>}ZLVf%8>-@)#pN67q8RRGrjeFn zWnYqLl^$Uk9v!dYoRXcSqT!pHvgisFvqx?4+8JrETn|Vv!x9XKGVm9u@0ST2jPirs8L4UF4@+TpXHe?5CY$73`}U znx0ltTxg=65~in=t>o`-ndD#+lxOQ@YOAj4mLKipU|^Y*o3G&$To~h{$(81>qZ_T0 zqg$An;FRniXK5M}ucK!k=@jLwW0jSXm=SH{kdfsXWtAQf=wany9ATKJn&y?0s;prh ztMBLT8>!Bvr{(5dnyBVqlByc6Tj-Y;7ZVy7mZhOypq{L&ref`Bq?=-%U|LdW>r@o& zZ0)XI7?K&J?HBE%7Z&Z2YnJ1x$K@X5lc1mA;#X*)>#As!R1~8WuI+3Pt7H~w?T}!v zr>>z99_^9hYOWvcXKq_qSgPxjRg~o);}@By8x@z8;9krXU##w2QH zp{$o+sZro!9+OxU=-}XPV4@rlQ5X{K6_t>ys~za?AC{cyU>{VJ9v2*!uNoGYkY?){ zoE8a=mSG>4XJg~)7gmxKog8Il>u&EDYg??WXp-rdr>v9d zt(s*S z8D;0`lOLv%r=OSWuBpQn6`^P1W|Wmy;83iu<)R#)9bg)gonB~B7*mpH9u#M5qNHpY zsu$(xlVDbutg4jaQxIyGr4peQR#;l7qm-#!$d%|`lAPz}nyj1dQHVH~fjrW#~j;2MzZ?rR+rmv7)1?4=b@kmHdaWf;U29O7IYV3(g8 zSL|V*6l@(76rYf8U7BF(pJwWp6zgkb>!9ZASRA74Wv*)Ao}yIjl;#zhla~^#Yn10~ z7#yQ$%@t&lY^0NJY!qjpYL%$0ZCYZb=B=S&oDpsn?rmS_tYZ-t>h7BrubAwq6`7pv znxE&Wp|9!U?vxj+;vbps7vjj}X<}t$ks0aYsT7x!splIpQmgb6cg&8?P}`m?`&J>9cW+_t7xW?9_>_YX&>jI zrsw6Kt?Q+qz@@39@0XJ7R8m-~pOsJ;qNx#X9~2ds7iH(2?CWo$9ubr55S+ke;+0YmSCD3D8x&=krmf;_Vx^W9ud1Y8=w%V3 zX_RA??`u)y>g1bfQlJ`~>Y|gBo8p!bYh-PnRA6NvT4ZUJ$EEJ(shVTpp5YmxXJh7M zmf)xsVx17Jt*PlAYVMlqSDcuYYa64V;}B#M@2zL-W1dhNnrCE};TV`z66aNHoan(7 zo03*!8Li>$;1!}(TvVEq>!jwLny=?mqLrg=8e*YiY?Y)F=I5xLl@g?^lo@62T9TdR zoTBLEtQVAM>1u1I#bv9JR}$$L2Bl^6=kg*oNQy5+671qw9A@Jes~N87sH*Pno9j{(%%$h!Zef>Wl4BN> zqF-X9o{?%BRFGR_Q>@{Zt85$Zlp7Nh@8o3>6PXcPpq{6x<`tP0m0xNU>lK_5S`e<6 z5gX0r8sV*!8|oDnm2P09tY__Jsuon>Xqm0*Zyw>C=Hw8d9jt2Mkfda885(b2oZyz8 z8*f^wUg)opYm~37sODT8!WHUQl$4{aZ)}<3VjPyGrx<1C5M-QEnpx;$tK}DIldW42 zXd337;%2AmX&RPcsv93~A6M*PF-r>big@9UYDui_Y~ zo2;uIY7mrBY@6=qlV2Penh~90ot2?tWo;Cw7i*oD>||$=qm`!?qwHUp#^sTs>z)>o z?x3n}pQ>MM6{cfurmkxq9~;_0aG?V}l)Zk4DX z5@>AgpO(($WKdX~?`Nmyubf>Hr|6w)RjM2i9qbzFt>veu9v5X|9T;z(65(JP<*MXo zp;Drf9hYb2>gAN9VVtjN<)iOa!lk2>q;8m?Zke3z67QH19p#i3pqi|irRt>=8>#G{ ztelutz&QCZ4?%o;9KAvn5Z2dU>~g%8EDO=XXX~>8=09N8LOh?p`U0R zl&%qMUF;Yh7wr-l>1nQCl$%_XQeq!#YN(p4KN%3Yg?dbq!i&{5RzIFQmhtd7Nn$Y?C%%t=$D=0=@_Gz5^oS?ovW0j>sM$VZk+0$ z7i^lL>1JeZsHntcm!z7Us}mCEVjGZ^Uyy8>sPE^Y6c-d>8=c`;Z0H^lSgI109`5LD zP*7B?q+RG&tX+`hk>+Vo7+;d&t`u*X#T8NPS>R)qsUKt>?Qg89Xp)$xoDyQ5Y!;oZ ztQDo0V44+aY@ruzZIP7W?Q9)j8K#sJrRQlA=2o0s zW}D%krkSXio0=ByrLEy>n~)Z*W9nd(sS@w0o8+&PX`vMwtfpbC5)-Rp9q1Zrl$&H` z$fagypjPN%ua+3=q+O7#X6@nY<{G1_sTmaPoNQYZ>7<*jWohr2rI%{wteon{vAqHSiBn4@Oq%*G9_A8h_$!ljWL6RwgM;p469oR=9;Xq@4fkQWkE=pJE~mt&TfQD~nOYMT*}S{j_?>z-BQ zRiLbrR;b|{uj3NyqT!I~kdnuhW9u8LS)daYW~b_#>6{heRTP-wp`2vxp`)c2Y?Wmk z?vQ7pnOf}X6_sM7oL^+7otEbu=N+S|sbo@+U7(kp##NYR=ajD#9hjt^SZb1Dq7j$s zsBD;S?`7az8Xa%uUTmXb6_;wDW$LV`?57wQVqx!_pc3RCYT}WgVP|IUXQ0SsZLArT zs1sytteCEu?xtgH?+}!)7H8?5r){C8QXFsOkggrz>!hp^6Jp~MrdHtQW9^q}6`84= zn_nCjVii&3!xbCs;+_<)1d{IYGE6%WvyiuZ>kq&mFOGg;^m#~nxr3H zm|^XlqY<6!Ynf9JX%U`Wnr@nB>A8v1zo|GKoNUQ`rW;+zww;#!jK7#F(^D7M`eG5O3_I zUSyK#pK6ukoMaNFWS5qgsb!n5rWKl6loQRRY3rrsY_9E_Vqq2=8l@QSqok5i7?+-F zk?*J);*soa?PFk|<*99@t*xbP%%$U`>3ae9Tu$bnqn8K73rO;>7tsc?iZin7Ug8_Q&3CGP~xuatC$d=>l7KF>Fwt4WbK_3s1hBhrQ>Mhl@Xp~r0SuV z=&G$@?HFmHoR%0?km?(q&t(=rRx}I z?3e8wrD$)H;o+TSqMBiE>z$dbXJ}-v=4Y*y?w-u$=V0ZjrDvp6SP~hku3{ALkf9u@ zZE5XSs%_(@oEl*p>uwjWtF4`2o>!b^>u#LmrRHSltf8LdRFtCT78q*i$mJ5@8t9j= zn`j>r7wr+Mo0X^>@1CWhlIa{5tr)48Z*H08m9A;%?~>r2=$33~;9==p=n!vhs1%ZJ zn_5)llxE506=7kOoR*ns?qlnfYo+C38y%$>9UC8)s+Hzhq-|&)l49!Rnc=AwuIy)$ z6`SH0qU2CulbCAfoK=u)q*mmZ$rWi)=&t6ZqY)ZrsBfblYGPs@A7YiFujgv*plqq; zu9N4f@1$#Kf&N*<`-(O9O+Szo0c16m6q%ltg96gVH29B8lo5B z5u+97Zj~CB5S5j!rsJp?n`i3oZWor}&!w&DVW4Ic8kZg$7Mq-8Z=W7*t``*Nsa_JH zuVfHm=xS^i6O*ZwmEsr|=4xf_m~0wt7Mt(y>yqZ85*}$9mg>osALgl^RA6l3=x-5Q zl;h#1tZoqL6d3H4o9vO0V4v-3lwzTr>1&zoW)tCA6yqCVplNCBVj7+0pAoC9W9zH0 z&6So`T2i2E6J(reqibuHV38bV9dDZHt5J}q8R+Jkm=K`n>Yi+`ADNI`pqm+-tC=3E zX_Dxg84#kFp6OfaWER9_5ujnJ7MWpXs-CJ*P#ooAlWeW)YhvK$W29tn5T6oe=T+<# znP{$F7^rCw66I*GpX(m#A6(+(l^LrSrlwzL!=+(iZ;=w>q-JJp;+ACW6ych$6QysW z;;b0#6Buj@0P7^ zqMc+D$K|1>6z*=Pmtvut?UQNYuHlhV=n&{`XON&4YNo2;P^x1Tt)Cudl4hl8of?wn zlB=PmQ<#`yuNq`ttZY~kUlhd^=ccc(ucEE&nxblCtec^1W9*cWsaaCum**7YXX@mc z8E564tQX>Kpl6|zZ>AF(UmBQMXlre%7hW2!8si+H!ljcQYL-Kx`5 z7p9?YZ)UD}*|Nm>3e4ovxqkX5*0Vmu?qS zsuimq?rvTfk)rGyl9R2isivFj<`S%I7;PWp6r|^GT^gTg!{zExP-3W*;hX9mr{|;X zWu=lEl^A7IoN4dqX>OsU;g;ZJ7h;tir0DKsWn`V>Ft7=aL^}8ysD#q!D2dm>kBHouI80;u7uZr!xn1XryWr$K~W3ZxI_*lA>p> zmF!ulVU?xp>JuHClbMo|kzo^+T2zn(iZmmC9rH{#H?25zbI15tE0>_atZWl=4}0Bg zW3D)jSRKD`C5sGiE3*P`!$fDhXg3=lw^VaQH+3V89BX$6MbjiD+jwIgQ#b8^@NBDs z03X}%OeO!40IL9%c%ytSmn?s$$OI?5IAv=uwOp-8KMyli{V3a*1f^U(P3H(d&q4zg z)yOETFqe{&(7;l~p!k%cY#+~DV^e2+%{)`17_M}?uzcsDOkY1QTcu+A0Mi1!z(8jc zbsGzBJ8##(D09WkqO3v#yYRRuW1EQ7BLB>S81*FObTuoVlDH_(sN!%gTUSFBt#}QU z2(!qNRQDux%PbcQPv2n0Amhl$Xm532{g{wc%Lpr-l!zh^9Y=#C^LWiXm8?KBkDyFl zRr9QLXD)C1MDId#Yl}pcU?cBfjR+k}&w>oiG++Ig+?4bWACEiG%oA>+)!(~7$-*yPhIVt$N=R+ zlgRYwpcrL)mwb5ro9Ij}BV%=&(4v&&4C{QG zkm6kL#4tn0JTCVLCkNe7PtQQhboH#Hq|C&qWc4`vFq1Gt+ej-5Uk}Gb8>g&Pw_M|B zy9m1i_2~30lQ`ofry{4)xI`6aebo>y^T;$EOJ|)l>%v$&?V=D%Z9CR~LIN3q{4^1RdYZES)f=9Bcao`*g1$b^WAxZ&wvR#V9ZP!lWQB z8v`{jkGKFoL&Z3)^xOm?N z*h1ep+x(1}V0|-d=fE_r2qzoue21hga}6uQI9pf!a6i|qG>gJ8%}|q4_h4%qD<6}1 zPb+0EEko;|%t#kgRVS}(TN@L_kZ|Wj!#r)Kdz+sm`t5OmjE}LBEMACTw7ap6)#K23?tPjS4&eH=Y*6% z<(Lv(7fV++V?{+%qredT(CA>ZxSRq9du@+Y^RP57Q{RwOe?#{or{YwD$Wnhldp*NQ z6;;hB#Z*)01Z(voQxyvp$0Wm8Th9Vlw6v^`f9G`(jgLD`$;Z#h3`qP`{GW2uEKVtt{`XL=zul)2P5$6E3&d zEYBQoCq45t)j~%*WqW6XY=1|qLVHa!R|8L7s}%QmJ3Tdjt$c4CU3+&&FU!#4+yeD% zkI>l2)RF{mcTHU`A5(`|>%w$8Ti;N7r z6g{J8onV;7|&_iTIRc+=o~YvWjbWiGoYb(4f>4_zY-oq!0FoI)?laEH8fEq$-- zBqhzf5N8XksCZrLtZ+9c6E$693vaiiWbKmZBGWKki$Wij((n+jOkWmll0U;149kNaOKowEftS=tK^(i&7xAxV(aJ-)l|J4wYV5Z zb-kiI-*|7E7$5z79rs+WB(IWa>$Mg4{Iw;e=VPM zb^lNsmGE@?B!gTv|6(t%qBM8COi#ZO>-Vs3L<{J0}a}f@o9Qf{-A`XtOwj zyu93GdnZjLH&?|x59>gifSe*tT^(gFCnM)1hk&#qWlg(ugJ?5-ZCg7oTL-VgC_C5i zoDw|?PshZZ;@If4Y@5vRq6n)}&m?D8XFqj&2Zv-^Kf}VD+zcb99IMC-^WqFoKP7*? z>~K$QM=qE2w5;qvrN97pwXkFZ3m5eyFXc2{8)f5y;85d?4F3?_z$9BAa|_#G3%6Kz z4<++xJ>y`PJa6TY%y7pjui!u~O=E8tJ59%cctt1WL~S*T5R(X{IA_f~_Z*)HQ-h=w zU8@)!y+ot@0HspX5_4B8odOdhP18tyrCehhcR$@QLoU}u|I*AHdw1WWf*gNir3@vf z5MxU#tw`mJBr8AHq_DU|n>@=Rjzzz0|%2JYwu8%q|l7e zDC^AFfFx%f{dkkaxMDjeI|EazWW9W?sFGw|Hv{)*b7Pm-aI0uZsTW>E5e+~5jH+Ab2!%XA&guo(y%Y?*a z&p2m2?=bD+0GonL6E1bzOqWE*peV&0?L;ewh~Okm!;AvG01utCw2;IQlV~$%Yt4da zAJ14v{p8ZnY@L__7fW4VGdBa*6iX-VQpI2{^FrIgFhgf84};v$bRA7=Lw(gyZ^h6; zdxv00U4PHqz#?0#m;hVbpzs2#5}Q1e;?fxPNaL_Xb3f}+mwcbh7%tnAbfrRFhtRM< zql_>ILk<04EnUyT+zj(VUu`ENjfh~?6qoQ^hoUqiOOIsJG>Z`Zd>tiso7@Ob7hBJi z67v8qMeEd{C=W;H5<|6|;6x`6cgvhio%}+5O=bJS2$QIEOZS|>tSI%&5I2*;Xqy!G zd@ak6bdLy+yu<`eZEf4&7%n|Ml~5(u6068C7tNe_W!GR!|J)QqZ71h^-{{B)`wY`! z;|%|FlXQy`qd+@lhXiluLc5>@A3c9h8*goujN%|JGb^Pi&+t4?#~fwb6npiwpxB%u zMYkx&f<#yI+@MS=%@F-iKQo`=C<7%udxsQvLj$i=UF%%OlGNN{b3fb6ST4U5w^U!x z@T3g2=%Tz-8=J*nsFzpP0gQwMZY& za0gSB$j~G;r94fe#H^e`dzUPOv}AMhNbTa7Y<+9j;Jjq62t8j*Jtqe<2NkV zWW$7P4;z~hP3zE9L%sMQrx0zWTt7`G_b>}zwdfperyQSjJE!mj4?Pd%n82I_Yu^Z8 zE2|{c!oWPAltg!~2;)3APt^?j6est{V0*j3(1>hnGqvFSXdBn?xPpMpK!5lA5}PD@ zOUL+<98WFJVl(y34BeO{-H5#GL?316crLG?U<(iR9A6ckG$p&#w5(7+_1Hvxck3h# zHM?-P;1Z=olkC_)W3}8c-CSM&BolYdtkB5FB$I^X9G?Uy!<=-k#H3Oa9S#480xd^# zi_jtqElaEHSeHB(jlwkBNJVAGOiSlnqay8C7gfu|Ot+voOCuLk8!JyItuQ~Ij4XRs zPp&W>rznFMRg>%zWA9iET_+V)Q&*StB8}qMpaA!*m@r$_plHjObYl}WU*&*EYx|;z ze7)G9q%4oHBo%XIJH1@41h04_)07xZ8;7{~NdF)eQ=ejERow`U5))-TAN3qJmuL(3 z!ona^n`nbnQ!7tLZ=(?780Qi-=bXIcbPc_N5U!|T^$cbuTY4R>qpB&%3k zm0$xWO|B3JgLr+rEOQmFd|fSP1CqU6Ok-Pn#lol*l|p}) zATJ~HghCw?9Y-ytO!a_NdruWEE3@DNb9HwOJ2k7c0pn!bUj!9++uGHyO6BB0L_vtCoW6-IE^%a^Sl%vM=xauRK4EqGZ3+ zU|;39NF5VvJ>@jzQWtx!q8P1^G_5>~SltB2q=YO-=M zEo=2+!zj;irM#FNx3p9j<;={&_&6IY*IW&?P}^W9o8pjSb1wgq$dsr&YjsasTW5o! z1hXuC!>s&brO^E7AeU%$fAx@f?Yz)1PopF~v&2C60BbK#W$yqpWfK)+OPy@PY+HS< zLK8DL+c-N99d|u@S6fZ>6p!S1W$WxLJ=XvgdrzY*Q^Q#A(xlM1L>n6o54}tcQ(vQm z)Y41?_X3jwo#2?@1g==SpjZ{16pb9sSX+xQ_sC*vgQ67oC`*qBgJe}Vbt@y2Fr|>v z7^jE?%akbFJPWu7%&!l9o$dZx>T{oXpy^?^SQoqz_9Ul*+d@FAg zO;b--FXv)In-WirKx^kXGgJ4__%MgWNTn?QSd@ie`6m9d6m>>tY0;@ES*f^iK@ECuu7_9#Hlw7}LGaYODl3=HpAoWsjryS2zTVHb*Upq@K?UV%nbRE?&r=+NKwN&5GDCZLO zR1J4WN40#VM9(Obp!A#qb;ooKZ_`3Ir;upPAR9OB-1HDFU8fioEsKOyM=tAJr)*a@ zTP15nuLwiiAUg+>QvXQ9!Wi8It0W`yFx?V0BQJM1H^%}k@1O{E(~|VaOnV>q+@c6A zHy_oAn7~*rEj?Es=M?+GRC5o@j5wblZQt++KSf*p5SvJcToaE7PuHTH7z5RUJd->} zS6$OYM;~Xq)MB$xrSKqcy?mPpRW7|)uTnPy>omi#lp+t!AaAee3`M=Dcr`_r5F=kl zzeGoGU7tX218)tpQj?t2v=n7;&(uQgv@q@Xh-gQB0}V$mJx}W>E!Aj8YZI?%dpq3% zUkz77yCCO)Ojm!u5EWyKK&4VG7ehBUlkkk`L~ld;lG391IO}+`fH;36V@J)9NUJ!FXuF_%Tgyc2TraDX zOg|5k$iSo&`y3T6L+b#26-%pF+kAtRPHAR(>z<3+?IA>?|NGrPnTLbqjuf$k~ z44 z9mm)#C)=plC~e2IVk_Tt#pqBg9e?+zEQ3f5-wa=ybgwXP_fYc;J2fY+0ym{p>k#cy z$NbQO7|U#b{d}tkBjrRLdsR7GwU$NFdwsQ zL(@W^^kQ4v&@_L;qG*#M4@*-nC38m`?NHCa94igiFlD_6qlhp)b>HkXHE-**Tnq1F z^W3nQh~$_Q9i^lI|1=YSe>-Q#Y!k199M^C?Z98MdVlIm;rGT)ASbL}B9CtN8`|RW- z6^%q||ESnP9~J9F(;(+)n`q;Z)L=Ioy`VU4PjB6`k<(C>2XX<1j_8c;8?r zMNgv?x2Sky`^=b_AQdYO>l_mc9Z&7x(9|$9JvF^T)AZ=L{P0vo4~^XXECVk`zl@0F zSS_2xc>fS%TQ1$qcwLK#v`l^LBK1@?*L)Q(8~2p(O#O8ClEhf$)DqWhZA)cchpcRE zpLnadJVP~CkCG^r>_S^RrF5kjPdg1RZHHVdJv|F8l>&2{%-rNazpxYoCqqZC0E^6! z0taJjgHl}$)vTg)gY4AAWWx;SeAA3ri(=EvAm@1V@Pg7n6E5GN+#Jiug7iGQFcYQh zA{*DFd{-6y1fRmFQl&`6lmxA;AZNd<;6iWLK)eL(R~XyjbJRVttn=`(W?1a1A5%5-S5k zuc88f4UOU$WfQeh8@qgyn23`2lpy<5bGvXZJ--+=vv4=HM0MSi{M=lNAk}!gd?zoZ z!hG*sSBH=k2OsMQ4O4e>ooG)RoiHVn#85?t@D#t8eACpTTs;z|8_?%daqL^Gqbq|ePD~k+&7iIOR^kf|_|AZVn6VJp#onpHz=P<9NV1rUm zS3Qd`-H^cC)M4Xt>t)Tn5i&@6RxD`S1t)TktF%M=rJCwDCkb7yBwl}zh6XJ3_Q-EieXBUiUj zP5YuKv-E<}6eE9~C^e51OQ#qgQ?A5VU3+)4VmDnMb)#gL{P-dtGrb5s3+F74l45fo z4}XuW+{nlXugJUz=fI52;Dk&)7uOsO?Ern11fO_QuOKZhMXhvWcXfN;qHJfg%rt!` zr9{8Lm`L*yA3f9J@boA(gfc^TX&zJ$P9N=byF*gR7>+r zhp2c@vxG$FR395I598$clsHvY7kxDcPaCVSph5?mgai%CoWMZ;B>$)wkARHec+UtG z*Vw4=+;BZ_t<>~H8|Aq0fFKneEp5%1c&>nS-Gt=8WLF(i{TwBaG+h-lUnQjwr9^#w z&1mItGb8|NxM-hDXA_U$__%l-k3iE{vkVK{EN@lIyi`kTcgNt8h$uBX zZJk_?;K&TER9k!3d_A9#ES&=XqPXCou!K-uU9Qy9C==gswRC+8$LN6MteC`@JQtIQ za7ShTV83kBL?>sTP}7XO5Rk0OO+gD?>JwN?AY{-;?QViTjQW?<2cpalz2VkH19A!XRl;+MW-}3H=V3R7fmax zuq;(4BQAB%L_c5eRG-*<7dK<8FjZ}bQq#0-Q^!#4V&{UKNVoVf>mmou>@XMIXmb_g zw9;a8|MVaOZKYC^ASHF}G&N-|yZme?pJeq=bpss}4NuLi1W)@^r2v(%kcc!_)og1& zN3S3~V@oeHcZ2BC)I#@^WHraaLZeU>ca<2&NL2^(Vy;N&cAuKV-7x1w?eLT|6(i?l$1D%qWF;@IBtr`)4HK1&kW?czGfgAA2_R- zM<0g(pX``G8v|bli&B#ied|D{polaxS7&7}7iTlg2rug>Z!YgtZ6oVEtzd6Y590)D zO*=g=w=6>^RV5Wwr_k7F*^ia>_ z62p)TTfHnNWd{Qv-8^57h}bL-Q#W5N(~MwMLmy>#qeOcHXAkvQ8!n4rC6f?`*wVmE zrHq_#{S2pQb6^mrOoNSeFlhSN1SJeVT8)Gf?_zW&95P!WOBa@&^)2OVBh@wJY6<6ax z$Gn0#T~kjkgLr*)m;4NMoBXu6T-74Qhoc=a72n~Kd1jTCtGof8W@QZv&tN)*g2L7Ra=DlxYlTPW~?&4KMX zHZpv8AP@0h)J^@~#da=dcrB->V@rJIx7MAK>{wfYhI+3w? zO6KW44$dz2RwbHTYR-kK7G_1Z@o`Cdnr4CKei~W&sW#!+g*oXOp~i*&k-0^|+6lgi zRz6M{R*A+Q85!B829eo?*~)p^E_qR*hFoFMs__XPRsp4X5l#^$zF7r1W(j6#p;pOW z%0*5&x$bF&dhv0NR$77D@xjh!KDyox32OdHsj-PB+QDjxX`#AYS!Sko+6L*CTJaXe zae>a>My?6jN|s)w*716lNulOSp0-h{+CBxo0r85;Ny@>R-iFDU(JBQ7289_WN*UQ^ zmR#``iYYpI`W_*Xieb+AX0B=}-foJH?wYPvagOdOn)-#trmCt+*~JE~!7fIcMFDm; z>ZN(=h6WxXk(LfYMOhkLHtJypIo{UM5rN)WmMOXx5n9E0VQ!I@`D#Tf30WzAK3aA< zN;>-LiB9o4nm%43p2<2Y$$qJhX}YFLmMU82L0nG7t`-(y$qpGs`JU;HDe4*)xw-23 zzQwv}`bB<0p%zLJR_dXt$`6j+6m4vfx#Z8N{UVydP$MqN}f3;QMwkH-ifMqP9>p1 zzKVLW)PmS=#mPQ; zky^<)QL0`(0qIfksv#+M>3WU{X zVdh1-$;yt_SzK|Y?nxnjDe79bd4Bfh77=RM+Ab-vR#yJLcB-28Zb9CmAzp>a`hiZ) z(TYVr&hfhOI%<*jCjPk=>iRlPT8=SXg~c{S1%BxXY6THNPR5=-{@x*O7CM=palvXK z>G`HXX6h+Hnfb}l-a&cxsgB`+34z`gX|{Ti>Au=N?rBNk$y_R$v3mY$nI2v?9(fw- zS<&A9aT+m&HhLwh`HIm-g+9h!)>(m0UMgWFy0PwI5thlWd0KiUCOHu~QK5ylp&0>O zwn>U=F~J$xIgY8((JrBp-r>e!u?B9cVdfgi1>s)V9^M%mu7U9(b{Q)E0gk1f0eNob zUNP3iYWc?IDbd01c3gqUs)bGw>3J5aj#}#OzIKU$IhtukaluYL${x;6A&SYmF=nRb zY3X|Q)~ccTS+2=iNrkSN;c5D5;X&qcdB&w&=IZW-E*_cIN>8l~Bu3FgTuD#m&F z9wBzl4q*Y=?uI!gISFQ27KRpX2~ou%nLgpkDJ20ac9||JAu16bkz9#|PC-e5J_e=1 z@wv$!W*HIYj$s~Y9vKPtx{fhX21P|7`MQQVzQ%f1x<(mJHoDFQ_KDG zUiN`%Ci;m!O8Lq52}wcW9$dcmMcUcLCNWkzX~xb$VZlbeNy%}JdC5uP?&;}S;a)EK zo^Ccuxy5aJ#tE91ii#G- z_R99LM%MmTAwj9>USYXfhCwBnszxSmjwU9dNeQm;!8t1F$thOKrWSswmRtcrj!IVg zPHIk${;BRck(S}cN*RR-1_m0|X(sv!S*G5)iJqSN*50WGTDmF$DT<1gkq)Mz1&Qv# zHl}_C!QmlXZZUdpF>dxD=5gM6N|6OVnQ8WUR;F%|ah^%BQSNDG-tk%5j)8WDQ5ss= zrrMFA#U?r>X`Th%iGIcL8R5k)`CQTdcHza=j@EV&dUlB^Hr95ft|n<3#YH97IVv$u zsX6v)Y6hmcscO-ok&&M6-YPEP8tMAUraGBTb>#%{$P4yrzZreS_+aduJe#twm*o*sUh#ioJAYM~L1UWVR9`6XGFx;b{n zC5k0+o?+&iCAP6#SxQdMie|AHuEjxix#l5Z2AWD)I)-T;MK&3#-kwqZ*|BLpW+|B( zo=NF3mIYdcy2@T*N=YdOIZ25+Ay$b6)?B$s!5O95X$8(vc53EvnqKLVX2I$@R$h_T z8LDA!R_~mKNs5nd;ewjv;xPMaqHN4mpm2wh6A;$!}6 zrokq*F|nzhO5P4iDY@o42AQF$+L@Wj+FH2*##}-6Y2NB?K^nID)}diuNsj7T&Z;K5 z&L)K!g<6iGMg>_0rK-vK$uWg7_TK&>7DnC$Io#Xe>ZhSnNkmeHBcX&$K-1p$!;g_i2hnubb|MLLNV`nn;}uCAHcPR^cL zZo#>s`COhZy6VQJy1~UEQ97YssydOuE(IyJ&VE_G4n_t!8n&70zV?=WKDPFzMe06z zA(1IXE-`LCP9ZVsmZ=_omJzC4hQ?00`97h=xo#=3dTLoJRw>0g+Nnxv?it#47MaF6 z#^yR67Dh!GdJ)M*Rw`*ZPNptV29CM59tm0M;YHa=C0rSHKF;}RMfNJ%#%f7w1rk1&(rFt$|!TRQwT23k+YN}BgZvL^lq4{y~j{aU*g&_`H?xvQ3 zF-7^F>e)GNQ6b8?!OrFdu0<&pfp#9Ig%N(P5lO~A#c7(Bdf6#aPEM`~I`JXV_5p=D z&hb9J0bVisUR;6dfqFU0F?j(Y;pt)FR?1G1u?Z%&xf!Z%VJgPq?)KTaR_VDpjzw`k zMQS=K3EF09S#kQRI(|N?nWjdu7O~D;`5NjzNx?dniG@YF;eqKE-Y&6zj=`}$v56k4 z*2eik`swjemg)f+2|3B}z7Z)w#W`;NY9--Lo^eSTF7W|L@m$_%ekB2M<|c8mj>=A! zrO8Us$sRctxg~lzN%1BgktJ!42JXqFhS?4UcJ4-@S^tX`S$dj2KGvC07A8t+$_W~ZQF(qr zu{n`;agId=zF8`n8C*fG8KybOac(Z^+3MPXMumAUz8PK`%DRTSjw(f3ZdoCT)|pN| zg*ka~Rw<5|%Bckzk@+qz#`%GH=E3<<(PkxF*;?KPuBl$O1wlcnCW%IBL2;h>x|t5P zxqdMzIj(B1IcgdfS+?2<{>f=NJ~?TwZW_*B+Uild8ZLoK1>vD?Azab_A$<;K^ZF91_s_G=6QDhF|px}UIFPrfxhbgS;<*0 zae1m-0a=#Hv6^O@MnQ%-N%k6+c}~8urtU#mSwX4A5y8sADTNxrYW~4ic13DQhKdE| z_QgtBG5*e`;hO%Q=8m!9v0T<(=H7X!(HhoS=}xM;DKQ=;PGJE~X&IT>u`&92DYk~* z3C>!P>TwoDG2S+|O2)n^aru$8e_42?lC9xdEzS`I@=09-e`UiJ7Ij zN)Z~7Mc$!YIx(50ei8l#jz)@+sV1o!0lqpu-Z`OGirE?(20@X&s@{s3B}!iQAz3+= z?uA-G8YN!gwrSZ`Mux?uu38bgzFd}p>gsv^83jdg+EMC-aXNa+*3RaUF^P%+*-DD$ znyE2`uAy0RDxSe=aZb7!(Xsh1Mz%p|k$%Q`kp}*1rOKvUx}YsiMef0&4$k3u(fY|& z#yQ4%Io7!a$#$vU`mq`X_Q~1mT1rXIsa^(VmLcYOL5iswHbL3BZVB%3dRaOCT*}$j znmU2%iY0oQ`AT|OPKw!i`KhsiB{|xT?iv0TY4PS6Ng83w87d_?C53qzSz)@qj*iYL zn&D=Fwx$I|R&HGWp+@00fq|Bm8JRg+rQrqMN{;R!I*9?%`nH*l_7SB{aS?h!hE5jQ zMG>)ao~c@jNdf**c7=IX&N&WgB`T`PToI;)MmDx;rQT8QA+c&6_J(?{1u-r<_Bm-< z5ovkpp6=!b;VBt@C7#ZXy2|E(0Y#qH*(DnG1tm@aE>`+_aRyv^VFr02(LqK!PVv!7 z1-UlLQ9ec4rrO#O`YEbDdS(UYxw(M`;eMK$7M@-7n}0x?xs%o>>m= zp(&cWTJ|n(${Fgu0YzNSaXE!ag}M5v+LqcS-XUT6xoTP&zJ}4oF~OP!&OyPE8Hsv{ zzRKDrv7z>6vC1jhX|^#gX}0-E#f4ts`LQ`gTrRExAj;UeV$!?)}cIvSzfhA_vi7|%hxhi2Pp=PELg~nXQ8etBZ`T_C9 zaS6#Ou8P^Q7A7$cB_<`RX-;Z|uF-ZnCBZs&X<4~>1uo zVOjB}#h%(pr4EtixoUPwF0pxL77@8xwmA_x?ygozTG=`)5k(d%VI{_95#CBhMrpA=YEi+4j)_V3QF^5=u|5`_-u{lNMJ{Hx z>e=aTahZv_T(RCp8rJa{j>8hL&h zsj-eup*e*nCC2GRwrQD$dIh@9woY8$P7WpZ$x145v584R5l*rG1(sGB8LobMTK1l1 zPFe;zJ_R-|S{9ZOUO8GS{)uWTf$C9l>gEZaZa!Wrfmzn2TtT|p-d@gLo*@x|8a}07 zp(UEuilHTTM(*~yx^W4Kfw^{$4jGXV+Ah|i{#x##t|12Lo@zeE10YJbwjQBc z23C1VcG*!5f%-ZgTp=ZnK^}qTPDWO72_<#`fi8Zf(VmLQI*R7%0j5bxxdDE8>3(s6 z?xDrS$re5(sTpaewk1j-TD}Roo)KwYg&AD_Cf4bexiMOr=?0EzMjBCe=E-U)s*y1n zxtSs1`H`UxDJotmd08Q5sp?VQ3FfNtdYQ_quI2#-`8ulhnL(DxTxQ9R8qqq|>dBFD z`bs&0IWcO^uI@!qiB_T3S-#$03CV66nR*`H$${GO`GrPl(Wdc6xgN^t1_q(-p|&Z> zHnChv2^xMLxp_|RC4S1vkr^gVF@~B+*;d+)MnSo186JiqVM%G0HlFEDD*6VRrgplD z`T-X1QLZj#(KZ&LX=bk0T#?C<26~DGW{!#`YSuXpdRg&G29Y}1ky=igF`oI}Nox9u zTADVlsXBV5DYi<+juCnBiHVU}86{SwEBr$-!2p8e0CQS&?3L5m{ED%87{@5s?XLS&BBkR{FX|ib`?0 zP8PAj+FZ%;-pamu{_z&suC7r^d9KQd`5I~l%2_Iok(pLj)(M$j$>~<1N~-!cwwlp; z{?4XRs!m1*rdoe)@iKt}!WLHl9Alx>;^US{kLwrk*kGiec{B>J|>hnMJl*0U;S&0nR~6 z8a6JGCYB+lj%NPGYM~Ah9(F~UF+LIMX==U&;ZDgJ@p?KArb=qLDsg(|TE0mdxp8LM z>iLeADVm0^zFbDJ*|~*U{(ANv25BMT?!nRFxuFHos-`|B{$Zxcj_T%0VX^7{I&qek zrMiWA=C+a1ky;L}fqJpQ>Y)yPHj3d~k=AOZHlF!TF%~HnHhF2rDjq6|Ub<1J9}7D(b5;MNs^;be zNzQ5RnvS8`E(sRFR`EXhhAA=br9sjDzL9A$A;#&cZaLw$`jNRBj{eHYPWgsWrJmkg z8MYdxnQ@V+$(Cx7nJETYZmDk0Sq7S=$wd|(S?~tS|Ne{ z_Gzk7ikX&$dI_l!fzgSjUe-}XPVrH}Mf#as(IN5rIhM}GVZOm(9+tl0#tC7z`d*G1 zsR`3RCrTHdBkX(~oK<_6AsA^KK+8bJo>MXHH*7XF?kxt_sMaa;~2u{x>F&KhiJ4xo>2)VhN(vC z2|h7F86`@2zD02%CdL}x4qUlf%1Vlnv9YQ}CRW+G2}a@eHl@nxQHsgtQCX3m`lib1 z%30>g#adryQjwVS#+KTZyetu?Le%98m*4gnU9vV97ewHy|MK%TI z>EUq+wyI_xq50aS9;sHA`97%;vC4)S$*~dM9`3ry5jwg>hK}J;x!(SYrd-7;o+i;@ z?m?O1K3Unu{>fSX_9gM*@e#)P$uYWNSy?eYM(zpOzNN;cX6cGS=~-cMHrCO>HgSf5 z8qOwG>e;DWg+7M)A&J?}@j*U`S;?{C#(LTDiQ2A(r9pYEGfvp1#GZd7dRk_T~<`9)<~A$;Kt2$}XYWae+pbg-ITM zW`-6a7RvfAHc5#(%02;^er}qMx=KzCwx!;t0U6nTKB*cp`RVELmKF|XuAy0>pMmL?&L%FYUWx^o{!xW4np}y|`boA4J_cFYhL#0E)@h#EI-x$AYGy_{ z#Su!TW;v0CzS=?Y@%HZ4KBl^Qx?bLa-kDZ5-npKh8LQ*JXDjBM&M*7i4zEQqhSuRl--ib=?QIWR*HJwAu1LciWbpE z0gj$Nv1*n&#sQI~QMMr-VfN~NDj_DuxfWSAnp`%eMP6pH$syt9p>c-#iAIH%-tNX8 zI-a`TrB3-4-hpAI`LVuU*}f?m_PK%XMxp7BNh-D}zFCIpp2jL}sb0oh{z*#t+RE03 z0hV!gN=kvoCDyuO*=hL&xrU{tLHhZc;VD`%YWhXWcFOko8k+tQk$Qd_Ho<0Eg&F#` zX7RyMj$Eq6nO2I)Chor85o(E{URJremg@O#;hA=hIZ7cZdO^Bc4xS;!-oDyaD$y!# z8YRI&_MS$HaVb#&NiIf_wrNFNzWTuhC0Y)4TIR9JF{bM3=4O#4dWFfwI_?E-aitkn zcFtb9);i%urg?FCmWA2|E=39IF_{ke>JC9cx~7gc5nL95W_h7e;aR~sDcZ_u8qvju zhMDKRsf(T*kwI)SN*&T4x48X*QghAyE&X?`k3zL|Lj=3$|6S@|IvK0&cuE`DJ; zK_1bXiPi~L!J0V^A+}+TK_M2|N-2JY`bp_oHo98LLC&U{(ay2zs`(DK(FTQfs@Cqd zMk)o~VQGe1MqHN8sYUi#xn4zynTc_}SvgsOK5llw(J{_xA)0zFSvi)TaV8d#9!0A0 zroriY#z`usrurVn$ttP2(dxF2-bu<_>YjF%RxX)Yj;bzhX(^`GnHs)TDb<^c3R2q+FlOPN|An1nMrOXzR7OJ@sWCAnSSAc(Oj{H0a^~$7JlCG zxtVU}y6#$8KH2$BrS>Xn;cDqd{)YNWN*N|*X@yp1u8AgUZs}h3v0euDZd!>3#_r*! z0a1xug+6%(ZhGdrk@`^?S+ObUw*J}{@foFRc}9*=cG||tg@)>dL7Dyrg+T?j4k<+j z=|*N2igsz%W^o42PPP^?gn51&SqkNf~P4v6=oxp0*(d1-TyH z5ix3--b%)q(LVNG$|_bSmUc$*O5y4jAtgB~{@Q+AD!D${9!ZJm)^4UzmR31BS?-D| zc^U~hS-E+xY94+DcAA#z4xyn1!PyRRv08Z^UPd~JHaW?mI*DN}>V>(c%3MjI`r)c! zf#ylEu|ZM6I_eogE(TiaZhqEA*1m<7dLC*iNlM`+E*Y8n9_o6^(QYB3=@yC3XN{TkR4w3pvCPf~hxm>1N@t)ppj`sRtiUqMAQBf(uMIILV%BIoQxjOpp zo;jh}#o^{T-Z9on#!>q5g*FzB1&KzX{*K-zMiJSehANR<`G$#hc}|(?(b=|Pp02Kr z8Xn#jriw*c$!5WB395I#EhRmZkbi8j;3{`LSu9(Uw{vdVyKN*7`~*Q5N~pu9hY0>d7Jg z`5vB8s#$)~rV++mt~s_=PL`?m!7+i}mI(;~x`BQ`Cc)R zI_8b4PXW_en{?s3-HNhP7VihiD4Uiw~Hr7DhgrB+({ zrVg&wUh!I5T585A=Fw5^8cxO;0hW51r9K8GwwVE8mLWQpx#@AqYH^9W**@xCA&E9I zxm?PwX@T}iYDUiCflg`q;Zb>t%HCn_X#v_P1#aQC8R?O>`ROr*+7_1DdEVN#5m^qg zw)zD&UWTf^5gs`~%G!!t+Df)X#^DKeW)WVgrNyzCrFNc0TGq*yX({oxYPJy}E(waU zj>+N5p89DqnmU<9I&PW;UZq-DDWNWzdHPXd30x5|UJ3dsxv7x>9=e6jf%?Wa_GT_- zDdrBbg;9=%iA4!P_FjJK@n*&5fyx%f!6j<`ffl~m0hSIip*|W`#(I8SDXx}j_F4u3 z<~dr5wh20RzNxuJi9V)|-UXVD2}VYaNtVXRdAUi+HkJ;-2H6gt?v_fr`VKkSzJ?yD zwvOILDO@%IA?aE+_Bu8?I@$h-`M$pCO3u+*@rh{;ik1Z)7GZjR?&_9tAqK(mv58)8 zxhf{b38tD^mKuhhieA?F5t%Vu#wJmI%C@$}x$Xfjk-^c{X2td%{^rR=(a}ZLHg>tm zwmt^Fu1fm3PSJ{ian^3?@qW57rYY9;aXEUK7HY-n*<6}gYTC-K7PjWG?#`)6@s>6! zhS~uRffg2ifvS1N=BX}f?wYPU`u;w}cA>hliYk8orYedN5lJp8dRC>z!FplV z7LfraCHWfBc1|H-S;fW{D$ZG%xoTNl$y#}4YOWNxD9cx?CwafksK*%IZdz8Wx6D zg^G@L!I~+~I{CgaB^endCMps6k*3AwzA=U2mi~G%CP|s4CiaOD8d1^yv9<-;A-WD+ z0V(;#;aMul*-<_T@n%XYu3=GOS?Q*+T3%|osaAP*ss3vDwk}5I#(G-n>bkj6b{Q_# z`i3@Emga5+I;m!1YFvTY&ibV~zNVr6S#}|w+Exh>fr$m0W~$bD5gF0033{4QK51U+ zs`{?F1tGQtcA0v%79|F%(aM2QTFSaw)-nEEHfkpMUb#g+fiY@n2HtUwwn6T8fwnf8 z1!m#8j;<-nelam&)=7!JS-$zI`Kf-M_F7u$xslGPY4+B^x`wfV8C-To7U_!Fxz<5$ zxyIoU*}h(Gn(3K7KAy(;B`J3L>Yk=1Q3iTOS}L~Ds-_`+CHk7dY8FYxJ|TvsMNZ+q zMIjbk8DSw|widaezQ!Tx1tIR1HgUO{>B@OdnaWXIC35IStfuTh{Vd+UqMWMa{x-m9R!8!5z@m~7Qg~?f5rpgH^F%c;)nX390DyI73 zZiO+9+DazAsmY~gfhMsTZpupW`p%hIcAnvBCQeok&bdh;v8geIngxy)0X}|No?OA6 z{vkF#87iU4S?Uf2F)X6fm+(R!uHhFMuYO3DFRnepM7;nAuN2Kgq= znHt3!CO%Q-$~lHyaX|^inP!pM#^J`A#umnf8UeW(DJE{tCAPj%ie9k>s%eo1nE}x; z>0w^l!TP3A1qqr-LF$D@zQqb;kL@gn!4(d8i^XVu8Ma4Ht{K`NkOS`QOf#UZb_CNIq62u#zs-* zSuusGzTx2ko|FMFl zpl65F0K(OnMzjL z#)ZXsx~V1xrrN%GJ|!Vs=9(7q#d^L533;l1>h8f_Uh$>Ds!E#bMOir}rdf(%h6yg- zO6J+d${~3L7J2$5nN~`9#p&tBv6@!CSsF1qIb2a%@s>eehQ2Od`T5>OJ|4b7>G1(R z7Loadnx&4q@iC>I(Z;IoB}(SDk>ME{>6t+emKiR#iQ0iizIn#FhMB5dMV6t?E`}*N z&P8s;Sw^|qwgCxV%Jzy5>Y>hgN$~}x>Y4Udir!(mdgeyDF22D*9>J!CVTI9pY1%1a zc>yUFaa^%ke!+0 z8950Cdd1$cE-I?-fsxuld3FU#PJTwNwjt&*DJ4dkYAzAJI?3slA$c(#`HBUWQ8tAd z!FGvhrcR04AzbNtW+la8nW548DIUSvi6&ZVrG{FrC7$*McBP&kg$Z#McHydq_R(<> znHDNiP7!ua+NF94299n2CHciFk;z_; zsp+wfy2+7l0XYVq8o@5=&M}D|E;$}{szxcgIwgtr-rkBO=^1)9*<4W?Stf~AiYA2t z?mpgG5jx?@iOR~c2Dz?|VLr~*7TV@6#s#qS-Mup_^Q!?c-tUp6^kr?V6I|o1d(mWgTwrWKw9M z?CGAEYFZGcVqKbKpdMk&m9MU5#1cEnPy-ZniW!L z6jT!AmZ6=j=@}RnoTp=AR%n)$pr;ZMl5Q7}?#fl@XloeaAD*l1rElk2pyHhrrEi^B zqMmJ=P-vv)obKV4<{c2~l@*hi<`5R8s1fJu6qaD3q~;J+ni!~4r03($m71?-tsfri z6l_%#V3DnFUgVe(7i#8EZ0DDekm(+z7GvcVlo{&hROqA@6|Uo6oT_b69GQ}08>3f{ zplRl3Yr>VUnB?pj?yr#>mYt^UW)xg%X=QrLtU=XjLW1d~0kq{G?uN0o@ z9F*nmoe|~iq^@P?9&H>GS{mZZWuK65rtYDlZRzJ8SYqLwWaH~?n3`%CV`lH;pqUxs zW#gA(rW=u&T#yy!k`QZ`nc{43V-{?YVq;)r8(|lh>&_LZn;#HWq+zd;p=K8z8oLy7nB^6?&hKzuaO_*W~yW7?`jlemF<_BljBpsWgC&6 z6qJ{oR+^RR=B*i(pp{*ush4k>?V%a%q3;%-m}rw{tD|b}mE~-qpK0XhoD}12 zZ;;{2P@ouNZBwF`VH%bc zmadYL5aLp*k*1j%?3wACU~E^UmY0%VplPGw5uj|N9j)h=?aCGD9+_#N?47Nzl&a?+ z78T~=tZJ%kT;yGBr{WnA;g{{>5f!hYmFO6n>uYb}TB`4^>+KWdV-Vq!7+aF47+@X6 z6=0xU8X03~;Hi>P>aSO7kgM)yWo(}3rRN$}l$D|9T@q;=E~;cW9Jc>RT!J* zsZ$ajlp5if7@q5E6Ox+hjY08>w!nlVz70nx7tSrj=%$l^SGc z5M~)38ex>+lV_pq6{?}&fVWu#@9Y#VQHSLjik;lgF*WFKOu;qDY| zscGa~SR53t=ct)yotok8ZtCu)f>x>l49fH z6m6o&zSq*6cQeip{gA16JZ~hukW6ltLBmJTi_9Iqf?aN5}@U% z6YlRCtgfaVZkDgBs1|0S@5AL6Wb2t0X{xOkte6~Omt$|9W|){@;2DzWQIctv;;n9F z8K0*VoaU`$oUD?bWu0oB7U1uy5}OjMr&JQ`Vq4y>18DgcArjs9(kZ13xs~Hk%t(WKE;p(oRVat``>T0i9 z;Fce&W1O$-9I0xrYo#3@Xcre3vQ>Yae>7cI??P!z{ZmV7380TzX80)4H z7ab9qo0MJ1WgBX&6dPq>l~L+bU|Qm4P?+yvubi2ep_-!aZDN$+VDGNstPK zWRzIy6dzS&siks70D=%Ev>X73$ulOM_=cAF~?&MSI?`hy2?&F*kXzm!FljiJ^q84ZsTx1-l9_<-uqGB49rW$V%Rm`R1 z5?}0T8c`VRs9WTv>tYaYs23KH?WSd9s%;k+ZRqZ%9PX)8QlhS=otBfD8|mesk&&em zmT&72W9$;G<*HN6m6BhqW16X678F zZfqBm5MvhR@2Z;{?;2HNofK5$YnJYo5zb|p=im{Uo?_^unrEOYiwt1 z;#lBr6_Oc{X=W9W;%^<5Wf5v&AFo@Kt{9Q;Wv1)k>#H2+t{EBR7nD|*X=Z5Wn5d?n zq05y9x`-yTNINRAFgePkG~7GIH9j*WH$B_ZMq54FIX%k3IL10A-aOOPKf=05IWgN? z-`GD;$tuXhTFD{bE>@GvwnWp#HrUG9!P_JwOEtGpH(V_{PcJklN6k>V*fTXCFfHBK z*tgg!-q<)ZDLczoDLum8U(Y4jJ=ZzL$*9mbkt-;~tSHGUH8a39(L2Q>y}-%BRy8kH z)zMH#!_Zbot3W;6)J)MfT2nbgJ3A+_Alu3&(ndR0IXosK#?&BK%O!^^EJ4LXRZG`M z-&e~=!%9cDK-E28OC!e5$JaR^Iw&SOCplBP{mu!XBzwn>n>o~=`EX_lv7u$7uSm$kZ^RiaOJSa4#LhgpVMVRo=X zVS<;vjjCpRVoZFPUx;Exn6-_zPIQTlvYxwkiJw`5WuR)Znss(qxN%a5OB9!ruV=Q2 zw~cFuRuAQnem#(6lN0OzoMWBI+lT%WrVWF9gp?ajRL3*BIQH)PQj=pNXrCFL` zoVL5Fb78h)h+1T}W1dk!Se{mdcYu42MT;=qKc+nx~6lsf4*v{XN#ZIPz4MR1{VT(L*Esgi9-x(QccZcdQ7RdjH$i_r zpS5aAK%ud=ibH&yqpg{nm1DdgS4v5)M}ebzrlz)SqPdk#s)lipdziXGWKw~Xosx5G zPIz>PXS%X+Om4bjLA17Gtd)vKpq*vBN@}o!Qc!7Dlm%CYqJd?4NJL?(wW4ZHerAkK zX}*zerNqC@gj9YpEsMq3Q>z?C~u9g@WkdYN1YNfAhky~V>?q-t`lWEVD=jxJf zqE%|BrJJYj?v<4v@0q7>t!1Y?3pP8VSQj`_ssjp#ascT(i?pfjzZ(x-gWSWrd7!a$hmTsW0ZWF`h z>+h+T9S~@%tefXmXjbB%Qmk(ft>&d1?C7eTYM-B?ooNwh7?bK9k{sl&>Ex~EWf+kk ztLUDZlAxKZm~Cof!IkA`oS_?_Rhr^h5UA{vsi~oEX`CIMo#Nyeo$jY;mJ{d}>uhbE z@1bfRrj(hiYMZ5I5FQ_6k{qoQXCCXR6R5^z73>-s5}0U~s;-spZX1(s9vKl}@8;&= zn^qiY;1ca%W~`=OXsN0nA7J6=VBq3ekfNb%Z>+Da=Mo#FS)`tC%N3iXTjEj_s-75^ zmh6>jRVKlm71&VV&&%Ls8gU3>*uJXYnSAk5fYkUZ|PtZ6lrIZuM`yL zpqt87Y!RxJ9%Swklbn+09qSyfW?r0TTwew66Rv$svhg1Wouw&60Txz!j*4b9Ib7V>g%4KkY*p`9-bSn8@V>87M_5u_FwtL^BOC3*loe{DXP=gC zpR877ml{*3>|v9XknR#1kQHFBVV4|ck&*2fWtML2tF2Sut7TY}U>E0T5^a&|z?Exj zY^Kx6=1EBtfLjCk!Yoz7igOAmgJk1ZLb@oS?Xt`=inY1Q7RH9;EQW}`* zWf7EE>)ypq5>j%9WpMTwt3QXX2Uc6KSm!;p3GY>}i~B9$2JP z5^3pSWNm5?svB>wAL&t``p6yX@*pAy?BJ+Vq~Tbo z6>MYZUTB%9m07Ir;T0Zhp&gp8rl@CST&h@*lop_wW##M=?h|fmWRb6{7LcWBt7oB> z%wWkY%pr937Tn80%u7XW|gAT<$9jdQx5Mdjb#pUhes-5m@YgbTe6rOMD@1x|e6Kkul zYGkIGrl_2uT~unHY^|%}7gUfPZ69KgqaUed>zr3y;+>-%8}1wHrK-)P;;E4v=$B&^ zYU6Dg9PaIvVWg+xmmlEhnr*9X8sL*2mhWU78mFO|8Io;WXpt9?;*nRVo#K|SoM91f zWgTf3!Ihh*pOzA66l9sH9O9uLk`rcV6%dpV=%#CJViT?tZl3OvlOC*U9vkFPVxW~~ zt)}5)66T*C8JMW6ma3kmo0`HEnpYf`sHz!Q;^V648LOsKk{9Hu>`=wV?Q?ctHCU#gZ`sA-v65a1JT5fsA}Z|Veen+>zC^pWS!sZ=NXl3K>nPrphs*|Boq-_$Jm@Y5#*SgY?W)~9hKy)7H_Mgo|m0a>YJZyY+9@w>EU8z7@?mR zoS>+xlJ6X<&82D?6mI5{60e_? z9pw^|Z=hzN>K|p}6=&m{Zk=nKrLS!1UQisQ5}IU~VHl}w8(iX48DQ<`5nODgWT<6mr)p!oFEmsx0&XJVbFW1bP`ndA`Rk!TWa;#{oa?h_vF%axI6nOqVW z9_|ya>Kt!X;GnIqr5>Cd?h_s!=@OR}ov-7Y=;fVctQ{C^QQ~b@X#6u!5R}zvO zXCCEir0!i1n{97skr19<>X4`97*JrGny(g@8fg;eYh>!A=;#%tT7+;^&%coRFsNs+eML=;>aht63bM5Fe-E z5Us2hl&c>dP~yUsWT}>JYNHvF;hAj|<(L*~WS44Lkdb6=qmiGjZf_cy zt7>DGX=yn=z%H?LKoEU3SnjDc9SY(!|6zFed=@O=EX=M|s zWNhWGWv^UfnH8L`qm}36>82N?Wf>P0qi?Bgu5A<%nG#hP<7CU_6A|tg6sBVBn3=C` z9_XN}=@}L67?>XHYOYWEJ9V8=X@aRBGeqADN}2n3q># z&z0hDQkv_YtCW%!>KYLgndKI*oTp?G7+vb5n{5*jS&-nV4bXQn(tN+ ztYVVx>Z0Y75TlB};=%k?^5qZXW-k`t(C;22P%sAuIHo9`UwY@`^h7oe=1 z6rZSD%w^(WnX?XB+b5~=MO;BORap&O~{ZfO&kYguHZ6yV`(WK_VV8{zF4 zVwPs?pBEcm;AW(vm0ql+VjUVE5NvF#;vM6YrKy}@6O>bI5|(V19UiOU8>N!$Xy;vI zrcoTK>7VGG$mI}e74PYsXki?!m>p*ws%Yutkg5~y?PnR3;_4KvVU?>tDB6CdlE>YSsZ>SgKXqhp-u8)d1dR*-C%=C7?= zT%_vbtf`f+X5itHkr%4%r)I2Q=oRK_VWbxr;Sz6K80(`I%N3)SlIIbrXOUKt7m^le z7_O;QtmCI|9+Dp8>7=Nym>Xs5lbCK$V6N|DAC_F?psF67nNyG#5uIwTpQY`c8x_eF zVw;^|7i6g9>tn3v?xC6+>1SD>7-UeAW?~fUn3JQVZIz@|?44rf9h9dX7^9P?r={wr zWa^!2YM~Kt>Fb{s$>r|rXP<1Q=8&{NXub-Qe z5+0gV6k!{b7@wP97p>%FZy1-U8xUp_8(zSrUZSIAuWl8kSm>CUo1tq`;u4W%z>tAT(lvt=1!)0!zrkZ6M9v>fS zXBnU9vA#Vi@R`Ti|aH6YCP9WvWtYV5gXp8{?*vlBTU|q&M6dSLmW@H>>ACv6t!80{Mqt(LFsm0M(CT@a@2RiJL`>y+zI66Tp>njfU>#}#dm z?NyZEZeW~IsBh&J9O`bX=#Ze}?r7nnlou499%hprlo@FkVVo6W6>H+7ZJ=wKR+?^? z8K;^NsAZ`anO@4}ZlRi@V``Wh8=|OeZX6kE9#rh)Wu+96=4h#;;u)Hjujr~B8{uaV zuWhENlB=9(p`4np9~POORce!!o^J0^%oUw#Vy|x;rQ(zn8RD9em0MaAmKI`I5|XIx ztE(NDtF04b@1~O*svMOXVH1>QX=rKUXW;EsV(C#*V5{U~7nsbIn{Vu3l~a=FpPg%$ zsF>^KuW26>T43Yplk4c~ALkNn;OU(2UYOzJVvy>VW0PoIY+tAx8KUD`us2#9j{?(9IKZQqZ1IS zuUzC673yx|svBryT9V17>KWi%5SpTu2;$v->;bfogtK*$$p`+v&qUM(6P+AmW z6sQrIm{F+jrJmyJr0n2h8|h)?uWD4FXJ+nW&1LJa5v1bdXrYnrtFL5i803>}VPq8$ zlIfHXY2hAV66KVWmu#xz5bI%YVyl^G>J}GdSKx1{9O-3Vk`eFfl32(UmKGf!<6<0U zp_Akq7iZ(@5s;Oy7wZt{5gb=&ouwR-YOSW6<*lj|=3(O;WN96rQfw1tm>28rnH1;i zmK2ef&E=OBmYb!n5*x1;>{{fMo8uQ~YpScEq2=xvsB4<0YpWmX?B(fdksBEjVxVWI zVsEakq#tY$m=Wrfm#42{;_JrcpIM-nm2YA0rf#gJsiEQ@rkLd#9cHcK7Ne?Zq8RI* z?whO=SCkbTVxMW9Y7*iWoave9sH)=X8Y1DsoRb!+q+w^NtmCci8|NBlp5(7xs#hEr;u)xwnxp6Ll;s=bVC2XZU}Rlt z8LgSCq^GWvQ4;B*YLn++k?WW2q~u{*qHZ1&Z{=Z;P^j$WXRPK`P>>cJq~#kM7L%6e zXltTnkZzW$!j-I+X003OYOCv~ViM}4s23Eh=$Y^AU8I?v=VDlFNZD|#m=AFZp9;T-r7U=EnuWJ@=AMTV<=p3V4tYKOdtdd-q zm8N8C@0u3pYGxZ?>m26j?3xf{p5YSZUf>m}6JZpdAMTV8$CVY~A8(Q5qoW_??;U63 zW18#g<&$SxWRMtRZ=-In;q4L;o}=s+qi7eYnCa$|l&q1E9P3i*t7Q|bn{Ah77;eX9 z6zF0R5NlwYot`t>_$~mQ`%wYoQz*85fk~mzory z6q#$0TWVop?4RNv$>kiI>F8@%no$~{oa+*S3>xXKh!go0I5ap_Z9wkZWO>8(_etlkXUi5MZvOt(g^S9is1M;OQJ~m~NLJ zW|1Es;v8>pq@*6Ap=Fb&kz^en5gDdYqT}Ie>ysF2Sz=*i;G!C$!)0t1m+ofi7SObt!nHVXkZi-Xyjz#kf>*%>KvBq;g)XUo)c|puNGG5 zY-z|9q*Cau?ChGUm}afz7^A=bUPv6Jn88YUW+wmF6B384_LKlAYmQ zoD!!WX;@I0m}YM7U>c~bRN(EV=%5{9Uz}xc5E9K5Z>esj5|HK@X=3cBWEbaK5MXcV z=WT8qlMs+U&i5|$94?yC{&Y;WgguaX%S>X2m_YV1|2la%NXl;Yuu|p z=be?RW>>(K=B(jfQluQ0ZQl<8@s1%=G7-#RC%H^DHu94}b6kKF(tr@23<+F=M|-&s1v1cRcsjJm#$}O73RgInvol+USyTw7!c=X7-EuU zu9RdM85n2lucGCr?yM86Wor^;Rut_X8aD;_jtpk*J;TUXYa#$)z1u zpylYJW117Aof?>JlI0!{5SJ5Wsi{$9=&l}L;H+U4=*ApAW#*Zfuk59r z>7%QasS|1977=Ub;b`V-6dT~0Y@wx=?qiqlWuKK~ zoNR09kXB;v=3*P<;_Mt8ToS4k7MYmh>6eu56XfOWo*z>ho$kPua?`iF48||i_Z)oePnwRB~S>kA%=#=ZI>Zxg$ z#%1r~6KHN}-Cnl&n~2 z787AgGov7mMX=#vmuYVB+qo$q6!6rgTml^zqB zXpvNB$D5j$Qe0A$nwSe>>CmSIu{c8=tu(v_>qyIBPy{S8EFQR09gV#GSb{Y z!9XEMf!EGX0p>Zd5XhG{HVUL38EI&2Vqs3`$jC6aG>>q@$Y{*~izE;2_#BtuOh*+D z6Lt5HNb3|&ZBIR$wD?RLn-WDshuF*_dpD)ROqEzeEl(3)mCztAG^Y?d6T^h47*FkNomf5FOclqtKwo`L?_?95 zfSedDbN`6EOuL9YyI?I#4=#sf`(*pTY&~~>jR*^m3@!bH1nBwQzOAQkOVm)f`XP2oE=7t0*-?mna>lB>x;oYsH{g9aTFuC6^G@ zAanI>chg)huXOvMLNlKt+eB^a^gz>uBHO$o+vG$$AJrh&e0!w;0#Si@9rbvG~b0wte_bS`C$^kCCO%lxFIl(ZC|aC2)bHTwWd*W}Wu+>{b8 zLvNE@buRJL6odGX02K`-L)VD>BIANc<**d(Ag#za=WJKy41aa+G_FJy z{g|-ye9%2Ug=+R`$r1V?Y59I?8K#-Vfkp=DDav++IbK0_>h@uZ*&fCretur2wzeLn zff_0KrKTCa#Wq|aiY9^48Yu>jVd|FJ!Jy`Nk*9KsNpw_vN};oxR+_D9L`Gt~kCR4v zN@-5Gj4Ea*S1aY*0e9L4kQ_cBs2*aF~&4WMG7%mA7lQo{qA6v}TsEu5pBhSzNKHWmciB zv74rrk-Dmfe{z0NGFNz1u5OO6tDb6hdO}8ISXOAJpHoblwU<^-rbB{(X?jAkk)D5C zP-;|KNrGBxKwNlnmUoP+vYlFFq=!;~gOVXvRD_AIlZA%5QK-L`zk6z`T|}s}pFaN_L2{zG;AirMrHxQiflEy`rAAO;Tt=V4=0GrGJX2 zj+w5tnsu?Jby##nsCwo^<-l!KFLDxq75}kV=GJp^K}It4fBieY9Sdkzb*6d{j}SVsxp$QAA;UsBx6Ny-%!iq)wKf zQEH@BW`??BL~tBeR<1!vdQO0*s*;y(bgoLIiIZ_alB0iGjJckQrKgT@ph2p-UUaCI zcDim(fT@2;NJL_BK~b!mho4ijvq7m{2v?Mnor9%PV5v>1db+=Rrb=m+qNcrCP_mO| zp-)bMV}xF5xT=$_cCL$oPnbt$X`W7eeyobBqo!M|Nxp54eVh|lgh#Gwsj61CVMd_2 zVrZ$cN4Se`Xi0voy|z(tSh%)oc!Zg$dRDq!va_m%S3#6jUUs%+x_gAXnxwHm%kI2t*u*uzPG2LhFffrqm_TEZ+KLad!S=No^x(uT&#Uuu&Qpd zMv#WLt*WPUOoXX^xJzn)NpgCSZ$WU0hE<5SGgp3Qyir)Hg+;bUYG6o&cS>fdsfk0d zt$SX&v2uQ@u2YzuyS{0#Wr3Ylh@MugRk3HfsH)XjH0c1sFqoNo_%PrU9d?)Nn%*4 zNlHeh6IZ5_MWAW1lDTVsn1^bDrjn|=UyfpyTS$tdky@ZuP^_v`Y*u=Jg|e%nyRVi- zfnGtNiA|24NrH`+g^`(Yd_*#rwoQ~}fM-;gox4eit9^)tU2vSPZh=pzyM9)YLyARa zT6}Dbo|=B5VT8G=N@%fev3ibLMqprskC8#4t-Wb%B$rBTW|U8sakyoIyK`W1PGFRB zW_X~kXF-v6p_@~@N`7&!u5OB*x3`6nn_`BtvTc5Xrm~(#Ms|EjW};es+N?34qkwa>+laqUPL5WeEYi5XJh-P3~ zjIEJXa8zc9i-mQdovyE@X@rG_vyon4vQt2`d%mKhn|X4ICs#m}dRUfvj=x)wMu3vO znxb=_Pf2uJkiB1Nx|+GJwUTLOXpCQ&v2$`@YKfDZa=d%7l}1W#mV6sl!~L9hm*Z!th$w&L$+zLcDhoIzoueQKxTv}r7tNrawFVy3Bqx2aFOzMivpx>Z`BX^@p- zrh$2sRYttFsga{fP)c@)Z%A}>jDcE^b*x*7qmf}ml#4}7cu1V82bY1qd!VnIOQNe{ zvP*iJj+?n|sIF(SdR}q9l2KH?yQgouUWBuOqrRbAqOQGlps|IUb9$CaxR#@NQbf3` zpSveltfy&miHC=aeO_ReXO^00np=8_U8Z5FU!k|IX_j|ULVRqxu3mnLo~Kc`ji;rq zb&kC@Xf!1^H89XN+9$4r%RZveJkBT~HQhkjO(&-`vLwXc+04%{JTEsQ!Qap;C(Bn! z(Lu*2#6B*lBq7GCIJY1@&B5Hv*TLG^*UUphDV@t8Iy_z{F3&_SE5Xd&y1*?oJR&{q*HER{(=5%x+PB!4ODoDvDJL@| zH999PDlXU7H6S3X#6`U@!rC}3*2L5x%h*syCEwh}&o)*=D>^hSF|o)k#WX4~IxWLi zBhK7ZKZ7eL$uff+s-~EOwTn&Jv+V7Doax@ z)-7KzvQ)>zI!F zNIBCY(8V(`#!M$G(b&Z%!Nu4!Ju*H}N3kHzQ#~k5&C1g&AXziiMqR_mKQLIGOFvO5 zD<(rDuE}(A zJH{y6F+0}K*q1BX&sQTP$+aje#80U(J=8g~B+kwvDzh*+FhAH-F(gXeJv-Ae#8ERl z%Sv4>I^VCL$ipSUUNtJx#l%d<(^)-(D>%e6E!{%HBFr~7(k;x`JSf#ouOMAj-7&<^ zMmN^e#yc*!C?lpI*t0}eBQe9=GsCnn-rUSAJs@01$s2p7BFsnA+e<0UwZJSO*FiTx*(gIZ$jHaaT{p@rI^8(kIn_+V!ZX$_**Q8?&C0^f zwA9?yGgc>{C@VJ5#hWXnP^m;eEiE)Cy+GO7%RH*sKHe+cHPyo*UoXfzBse6iL^s1F zBR?jyz}Chp*u^o+Q`aKY-ZL>&Eh{i4$Vfk*%fenmJ1jgbT*Ju4TgxFN)!t9jNzF)C z&nr4!F+VCqP1`Wt+)vRUQ8_u+UNu!GTgx~vyHG9O$Jf;~K-beWOpVLQK_}Z>PdQ1$ z%`!79+uT>vD_GSm*-$wsLd`qb%gN0q#62>j$lJu;HO@KBvDn$gFiOchwIDmhF~K*& zP1Q?}OHnsH!_Cq!($Y9GHCN5uTroD*F)7kiE7!~0&)Uk-JSyJYSv@Z_T2m=rKT0n% zIl)J>&?hY=$JHk=z|>aX+L_D7UeQk5I3mtK)5tAIEm70N&N|05)LW-GAtSXQ-XJ=_ z)i1TsINdd`I9)fyA~roOIkw0nD$zMw!_i#BHAGp9E6vI)*wrZ0Qr%3^D?lyYHORyy z(akj=$kfNiOEWps*wD`-swBiaDmcz9Gs?)^TG7bBBD2&Y)ZAX%I;X_gN`=ecq{Lp= zIz-)5+akqAQQyp{K+nWR(IUnyJl{MoUo$1xGcL~1ThHClU)fa6%gQMr%p)l#+gDq~ zG19=!&??lCD=FC2DBeLiG0ZbRz}h)HH^SC6%*jJrEl@K$-AP5m-#^Q?f?9p1!WJzDK%` zNmfLZs%oT8l4pvkdswuSx>}Zrv$M96T6ADox>sC`QVLhLb7+i@RI5y_KgL!y~#NU3&GVoY9;g@dbioJ~}Ij(@ODuA_rPK#+5u zQlw=}ZmLIIq83-Wzp9^gU`~=%XtJHIOH{UsrjN0oV}wd!W_Yfxeo<0vq*sZPj(eJqx`j!Up_igr zZkl<7Q&Cv3j-8d8Q-*phuoomVRWAsfClKiiw+zmsyy;QlL^?vO#Q;S5agn zmtSnQxq-i1L|TEXcebi+s(wJYmZ7P4P^4}`sZ)YSX|S`6R$gSOb$WzaURYwdwOUY8 za=w+hhqAt^d7!zMohO&Jk*~5wQb>%MS$LpxLXl^RimQrKiet2IyoO(TvbkMhNKr;) zcxbwbqi#%GdT^L`Tv%aIVxgP2Z-ix*hLxK=mrAa$Qc;q9rj1fqbflY4xS^tjiDFc4 zl##1>Nn(k4NpPxXO0lhlZkA6@zOJQTP*Frsj(56WF=zzeHbB=(k;~k(IMpGzNXIWk zB``=yDb6Wc%QH08CdFEdlu-P1QG zGC-9pFIg?r-CZxC)Z5s}&O61;F)vVEUC+a)FsoQSzr-xAC@{}Wy(l5k&ekMa$Jb25 z$Xd(9#=gKk!&osP*jUe@fXgr0CEnFN)iTvn*GxOjUn|i&R9D5yTrJ7N(_1-P-%>AC zDat!b$ulg#B+M%|z&Or7FF8A3DLFMXI4Vdj!PbOJDOknNPcz8fDk0V=GdHb3G0)vf zOpA}#V^uOL)Y5h-M`RFMOQN{gUeP$Io;aXIwQZ>*i6mQ*vj0;(Az&MHOMZ=FD=+6 z*;`dTF2lxDDb>f;GF#U?Q_)e;-#R@*U(KOF%_vqyBO{zk+f60XOh+Y9(NsAkI8Q4% zB`aOuAS*f9$jMM6UM1JwCqqv!El}55M=wMzT{F%n$I@QY*t(B$T7iJ(>X##DIioiKQ`St*Dly2J<-ig#j!{;+Ob&OUDwUo zIWNXEE5kISuZfd%snInN|3z*0$7Jw@HzrX)MwS1HO_DKR1~G&S1EJU2HYzQ{@` z*|E^aw@}}yFi|btG$fTPDa$|8u_(m8ATQ2AFC@Xl%qQI{&M&0I$2n6|u_)YIDJ0b> zA|^pA(={+n%|6;ADJRfB&>%Q1$xg%A*Wb$|kt@hrMb+0yE!0Wb*EQ6?)h!{%Gcm(CUB}-d-X_LT-#9rp$KTaH&eGjL+si%F)j_97CCS-OSI0FlQ$r;q z%~3Bhmn%CmG2G4C#zNIJH`gF0*e5YODl*@|G$X+`Qpv$UuP8q=ePCC59?%GWu;H$5gl$udT%NKx6@(mlsC#VFa* zyU^M^PPM48*f1p|+|?`~D&9ELEUnPO$Js+g%Qw}*fJ-sXJFY<8LqpLZC^l6o(@3|- z(!$X%O3g#vpeQ0Du|&--LDx|)U&A-sHPO?&)FCm_Ey>U~)5BdoCCoCzLDfkuEUq9V)T@-s z-7Ll`UCS;z#@jj3!YsxD_Q!Oo_AVMvy zG(1N$PT9M}DEHFG(p`H&;Dh z-_e&VHrgS@IVf03)7~db(Lvcf&^cczS1Ca)BRfd7G~3SD&CSy~-738}U0vHm(=%Mx zL*K>3%FIi!0R4JI7VWJy1tIDak3&#?If%+$JeFB_klJz|YLMAVf9G z(a$sA(7iAqBf%mhTf@`PDZr^HTQ?=uH9AT;J;a;KGSbd6-6hF7GcYA1Lp#pTL)qFP zEX&&}!Y;wSDBeFK%H7V_E!W#L&e1$N#JRvdy(CN}wJ;*dLM^bQz|g?lk1NzNR6RUA zJuf9Z#4s~6!%f2>J~!Cf+{sBhC(yCjRK3*H+$kvBCo^9?)zQE`Jw#JK#XHT+$U!Gd zRWGC{!!4A{);cRRTO}gdMbjeJB&{gbLnW)k)F{K)p`bKNQ{BzI$WK4k#@sC4*4-v0 zKC~dl#>70NFfPe7q%c7x%sR+5hRet$#LgqJB&)>9&o8vp*xEz4q%hRNT~|5MC|n~= zJ)5lWL!CPG?G%-sz-#*V(DWQ+%QNrCd0Z| z(NIqC_*PZ zJVmcKp~T-bz*;{+KQS@hJj>nHBC5!{Fv&bk%f`?r#ym2?)gzcIU0W%})Zf-jRXf$) z!J$;q$R|WcH@MJCCo$Sh(;+e?JXkZ+!95}{$;!w;GhQVzyC^ctE#J&7%Gf(Hrywpk zlPfY((Zfkq%PS%`O-(7;A}=;U(@EFgtF)vjM$6ODOI620-!(QOqcq6K(KkaW!PQtd zL^IgH+d)%TPe;{IGqi-uBr!2p(OJvdt2oFy*FGU3HrUE1LETQ*-#{@XJ5@c{TvxH z+uTjhkIUP%&|W!1zd&8vC(jC^ITZH_T1Ry+AYD-`q1aGdx*cGu$Ih zEjUyw$~qxX#UN18%`wokC@z32H{aRFSKBBg+C)u9)7!@*!zI()(ll7nH!dzjEkV~L zD$6<|J)}S_JImR^JvY$X#4*ms(AL`~Dcn3>IW@({o+~TMD__SsD7!RTS6eSy)e~eu zk&RzgxQStSO0rL|lA)!Ii=uLAzI$MSskf3xVz60!YM6slymn-Mx<#m=3s;PTj!UM6 zUv!>+Oq_47eX^&rpI<hK`Afx{Gs0P^??9m2s%QL2_nHadCEVRCH*j zxkEshWrUq;Mv0!PcZ7LDv{QnYI+vMOT#0KzfL2PJiB_U{ZWR zu)cq~g@u!niirzXvX636Vn()|wvm^XyGC|$T#BKWYlNeUg^re+UQTwBpNEcnNl1~4 zp}A$ASCmbNd8VaBQmU7KW_Grwy-$9u5tmoKU6!(Qc8FGCjG|A3R;asyWw1s;o`;{R zy|PKZVs4a!c~X>_rgD^Sj*pM7iKmjIXQ7!(N`YgfLu5*zx{(f-sb8Lbs)~naPMmvC zyrrRfnzn&^wx+#$a#WzXhFNS(R+fHNp-F;8uwGV4WTAGtb6T)_ypM;TNwST%epXOq zIG4U#Y`#fcrhh_$mqkQIfwzBdq>6uLKu$t zs)}L0my&Z@T2WqBNOXXody%76nsTYRa%Ng?8dsE|g|T61tVN7RenzT$u#=;mU8=5% zMzBtDdXiy$q-UnHu9d%Yv`un?R)%S$a)Pg4cu7{0sj#O;mJpMp~v_c7UCRR(!ZaX{=jhmbzP{rA?u_d1+~Is8Vr$iJqflPI7#) zdAgBTeyp3TyP8HysZES;OtBZ2c}9eCj#q?Yrh`eiZl;O9y{%%RfpN5BsB5Zmh@o0^ zkYRkbj!A-wr;@r+f~kpFU|^(ouC0x+rJrR+V0?6m8CRBbsGgZ^ozW?ZqJj*6Fcw2`|{V0ICgze;hTs=Jl4m1<&&eROz?kB3r`p?|7lmZq_$ zre>sKak5c*RfK7@j$V{=LV=#5va-9mVOG9vgkHLluZ@O^XOMA%m0rF>sa=MHeU>hl zr+u_pfw8ZqM{ufUkco+hg+rE0j9s{|ZepgEkAAYLc3N?~W?XbZu9`+{yoQsKucxl5 zlCo#0MwqpGa74PH7MG{3Q)!WsK~9c(zDuOOj-^GKRcwSyp1HS4zDk6bR%l^~hl#yf zSgNOfR*GF))^PLhG1SBy<^v3sVbR)BVpL6VbNnzD_#g{7vh9#@1zhMBdwa)@zY zVX{HIUT{>br-!zINqAPgy{dPCzmJJ-d{mHnykdw|L5QifZko21xna0-TC$C{v9nQn zXml)>Qk=E5M@)vbzm2(WK|o1?icNxXeo>6IXJJgDg^xo)ypq1XZK9H) zt8#p(ySZAlpJ9e(zEf6Yf>K&QvXZKHWN3s-SXLyLwXThylcq&(UaGN zj+cRfXM~!YrdL)`bbxbGj<%7WS6-f(k&Sk|nv0uxfQDy$x`A$rZ;X?MJy&FIR&1_c zP)59qlUsyesiA?Mw~?2JUyNCHd}Og^Xh?#JqlR)?l(&jioSSa4Re*|*lV3tcR*e}SV?wuWhld3pj@vY&E{y^3o@c!W}xp?#Kh zykTUvlS;aSqqb#2ux)~RXrhyrSx~y4zNfx_oS{peS%^+pbZm~XdSOP1R$+0PAD5zS zl(&^_woQVSdw@^0Yf(vDe2Rfbs#%GBiiMv|dPrDKLRyG{O@^;QXncBnO1711fq_+v1_1pVX3)$lD12#Mxc$3 zPH=vdVW_QLREfHBoK2ELs=s4`tyfY~E|pTmxX6Wn1`0SzJIAr z7FUs~u5)RcW0sM-i9w{IMviYxl&^VkLTYTHv2|RogT88xrFCLNv5tOTs!Eojs-tRj za7aQ{YOY^IfnJiYt&0X%xSei*Ub2UWLvfm4q?fO;gPESLVz!TNRE|-0P=K9nN=$U7 zQDCu!YqYMnWqPr#YP4@rP-cj-rLTjQWt4wVG*^O~S3r@Dv7u&~Z+?hHvAVB!u#vr? zg{4hcX_84%f@^qKw1s1IWTA;pppRxuyqTf4rgyBLu9JJ3Rgh{_f^$BXnzw$WX1=OM zX<$U4b4p>6YNn@EdPYofPOwq9XF;mAO+to?Ux8(^Ur|X`oVB5fwt;_Xkh-~TaY~4v zsdHjtHkZ3&u)j-WQDlrtXuL{LNtm;BuD(}bsA^oIS)!j=bdGvxgi2wNt(Remv28-8 za%gO7eujIDlarIbOL(}aevvy@tdUxQiiK5*m9e^+b#Ab_qLGH1bGCi5S){v%k7l-+ zp|*!kT1=9ypRa?TouOYsps{I)N=llVS!6)EkEx1BE?1Ffc5J?Bo~E&}w_Rz3iK|sa zzJI2BVv@UurM+&5Rg|e$flr#PUr?5(vW-_pLavfVTw<`Xr$?}ZnMa6jPLvf_VQy(+oRUeDglAoz%ZhnMj zN=QzqgGPx_MrmlIwTpj_Nm{O*PlTtNN4la;h_{cTR;p{3OMruUT8xTIR(7F{gNav^ zS&=!Hv67*hZmg?|xk;Q>WNx6XN?f6CaH>+Ma-5ldp1FyqcD!4%hDVUEmRmtYYKB&7 zRCsi(ZK9*Gm5;AcYP?ml2bY&tiiLHGj*Fq8X{KAML5i7SoN92kR(?*AQ>=4zyuF`# zw!XKzxn;DUn^Cm7eny(9X0n!MMsQGYp}vJ-o{ma4@kPEf04R|~U(2xE1NG;NP`E88TE%pzSoon+7C%(PU`~O=lTr01bxKtDS=&;)l^(dv#09~Wx z0JG>KAA@2yGuHz9Tq`qI4V}o~K-JV3uDDDMCH6wntbpqWIE0BX?^%Z%YmTC>!4(rzl5<2w!#WqM-alv$XgOLsMf@gMb1pJzcl(kWh1X zE`J}3;uJ^Qgs6!0?0DOfsQg@8Pdk5GuVk&1G$$)vgM1zT5Rd4<*bu)GTVpddV~OEv_exO z&mwC11T%ms96vp_=!E<1-X9n(~ED`Uq5`#cR-=b!{9)o`O+Q}qa=l9Ci-BNI!rKrQnik9?;@ zk5u&xvy!9~Z^y9WOdmttc+(_DXAdr~P-T?>UGD_@C_81h;*eY$Qy-HY6IY|q>_|6r zTMG?uFXI@^z#M0_z$nWct9(;uN0)H*qEdCMK;4{h_bB%yF2CGTE0qFO8_)D8xBP;D z_+T%4tr+vb6!#D(Jv*aJ2RFZrXw$ST8>&L-`#k3)+eqi407Fe5GjHd_ zh)hEZ53Ml07}ZR5E;Y??8@nJ42N%y^Emc#~0Nr9=8$%0Q)#4z{ z0)wa|73G)`j}i}8t@t8U+j!U9JU2xpjT{$cbI(u@4JY@&REv-#E+vaZD`iiw&=Nhp zLQ7{ClUNT$`&?ZO^%6TXM^m-HL`9ceErZmMn1HlIYY%g;ga~t6M^~2s-B`_H>r68b zUv(}mcT?5S_z`@4N!{2tQLdZ7*ZP?7T>|I4^hgJU8zY zi%=i045vghtt7upO)V1(E;GH@pg0%xK)(V5=hULeDDCXb5-%O|?C9v!kdUN;@IsgL z{KDi?wJ=Y`$Q(uIyeQ}FA|->ckZ3Qf0=>-SOg*k5mlV@tRqYbzc-s(FO@|`Wbc={+ zduQ#!#DbW@)nl{huEG$s2Ot1yp{+;|-?uMj62%Q*kg)Id-D z^eo><=P;{OKizx_Eq`r|P*cqSt|E6=#}w@-O+70;Ll^IqK$Xl?J5@#1QnwUy{orh+ zL>IdVTg`lHSLMXOj9^bI{Vdm5JFDn|%wQvZx7;LO7d0*|4_(ht9pf}hS5;jb+jK7v zodi7(53Q6)70Y5(*RLH)F3Vs$ zqa>A-kRp4}oT3DOZ#_Nx&_E|&?VuP7Ywcn~yQD%J8-2sjEDH;jNaF%GGv$DQ(y%Zs z|72Isk_3AXO*xdxYsJ7+Be#rjJsnqPP1|^9n;@MuyO5v^FOwimL%rC- zOv?x@Tdll&8#hZ6jSz2RyNoPzTNgJjPkW7`=s3I5tepI44Hq4A*Zcr~pM(Nm2Q@7% z9RnAOoPu;4-9X*+phEwE2wP>dz$}x3bf=8CXe2*wU zYg3J=xKw@hoaj=A*usbiLlcug#cbPLoy2?>HwSl>i1c)y*hmATOjCzw^%N)nKhbH0%6gOJ#p|4R32@twg`*$YSqYr9f*(t+dcsr9Pi8!H7*@>rBuxbb9L9eNYm6v%?QH;-wR)yKXW%+T0afma{48_d+$2)a$o zL&4C*Kmld%mk~`o2euKk=?v~MGc%CKOhFzqP_Q&M#N{!ZezE|CB-~3zAP)wYq~>}k zfFzK2vl(Oh$TcrHKP59SU4d8MB{MB8wJ0?&Iki|JTES33KP@d2L?{>=Dd-m$BqpaS zm>4MN7bF&?=H;ZOl|Y$A;OI0lQP5A$&&^F#(9ftW$Vkmo;MFfkEy~PKQ82Mk(634@ z%2&|O&r4O%FDcJg&@ag-N=;SJPs=YYQqWJ!EK60;FV3t`&@WCcOU+Zzha?eR{k%+& zj^zBD{5+6cZYG3jW}={t zDd?vw=w~SCXDaaOXDR4sE9mDa=;tcv=PBstE9e&}=oc#J7b)l$E9jRf=$9(!mnrC% zE9h4!=vOM}S1Ewfn0{(rN@8(_f}sg$Cu3o0en~1MpbSmSK|TgWGIG?IAfkrUjfTdS z<_aLAp!+hpEUZJVos%4W3sck_&2zE}%;GbXG)w%QeKK>cB2$g6it=>}?DMSh%}oNW zO|m@nbfeP@^UbWhjJ#Z|lEPF>eYnyL%%Vc=;tiryZ4>pJat%V$v%?L|OSE;2EtMkl z{T*V0wPLgEA}mvF9E^fui%X)l^zyZg5*(U5phC{qj>afA315~2Y;yv9G z%ro7+l+x7QT&**>bc~g}6*VJVLmUgWRCAT{)#6pXQ$w_E%=O|ey=`s7JRH2!0#hSX zll+q-bOW;UilQ719d+}x9SWl@eKj@AL%0kx(k+zZJv~C>^WEbewbdhv96gn+o%1xZ zQi|+MP0V~vwUf+>g7X4&l(VxuQ+$e)jjhA1j1(1ZOpUFxJlwICnWl)C=G70WEJ#(* z$DIj{EEM#UN^^2jOVAUH8NwJ+6O56$8AgI}ic-ojHd58`$tu0Q1nRDbkeg7Pj=Eta}5sA)z?eTjB+o`i-=b$$Q-9qUHBaa8AS+!PHx*T5J3rra6|HEl5LGWjEv39T+kCeG>*!o#gQVaH#ZawK z+49idlqip9yD=wROJv$#i#UOQe zJEL%24aF#*BxAqaLSuie{Guowov;#nH7$M3{IrBHrAQ0glvIm!e@Ab3rHoQ@M`JxJ zT{kT*8)uusNR6}<^H3+VAYT)+Ty689^lW{VBSHr=?Des^nSws7E{4>?yd+h_SZiTk zQmSEWwXOwd$A5lO7B3mw`;9G3F$z)VB*y?_do@S%5Fd{)m!h1s@MO(sGs|dG?a%}# zQ{8|7LscE)tc-$U@6c=?gE*@YZ?znw_=K>u%vgg!E_c&>6U8E1HM3|xtHR_6H(w+7 z94mWmdn<3(B-3PXJ>S%n7;W45NGAi`LWclN%M>f8(ufe>m{cRHq`X2sH(xGeH|65u z@Y1xDyhI--KdtPHK>wITvjmq=pCa=DXRXqr$bgVAeUI1#7ZYDc-x96Tc+-S5bJv8@ zz_eiPBOp#jrpd~-jtL&VwvMSLW=T$_>Xs@=N&dE65i!o{jxpL%DXwvW0ggJ# zjz(5mR=J@ODh{Cq9#MH(1-6Essg}BSYTCXA$%=+Xu{!Dr*s_)dmfi`@tc57C4Gk=z zZ9UYY)&i+NKx$EIWQmzroJ=$mRHIdOLQ@K~vTQT;6GO9I6O+^;TwDwtRjt(0%`I&5 z%&o1{;vJo=eQkBZ)qJ!~b9^(EqB7$3UAWx*6&=l7ijvh-)jahA3^GFso%EIC%q_CK zt@Cw~-6A#BQ*uJ%Eo~CBBQzWmjDpe)m90Yk?X9Bxd<=Y)l;fkgthG!s^>kI!5)+k^ zo%5CQB24nbRP=Mw{oJflBjfeG@;zKlZE{R(Lbc+Q&0P$gjY3onHN$mn^qN!gOp6&q9c-{RkEG6J>1Pyt!#5+joduLBa^~&%tMuYRn!etbXA<4lN|L^ z-3;AA^a?|Cq5?y8EOSb^g8Yk|Rh^Q9Eqqi$jl+Wq%?t}2mGVm+wB1rIutq5pYbU9iWZ0(Z1!X4$=VpcLYuLMM1sY|!dfSJYI2iirMJsW+ z<=L90MfvIY_yjmcI%a2t7U-Ipc!w332V10@l=>IO76$}I2im)NSZ6z$8JYVU#>boa zSh^^==*0OdTe@g@am9tj6lSU=Wm^;!QMWm*Bg(w%NWELpL+ogm>hC6em=IA*XTF2VhhbXD4xtgk2YkMerIoR22 zCM4#$78b<#gnIZUnAyjhIjO2C`YJgD>zNj&I>&_DhUyk+64UA7L}Mf`39 z5Rf8LFt4ehA=q>iGXn(>8$=r$m@9y25Ff;b8E9l`reI-cp#ZWBBnQG^7nm3sDVP{o zDj0)~H8O^1hG{afFauivR@=}( zsi?>~+rZ60CEeZJ+uPYW!#lzuAjculSS!{)CoIw^$=EC-NXy+UAB`-7U8uQ7PRzFR9oo*v(q0AWt($FUu#+IM_zt+{;1TH#Mom z-Yr5^J2;gqCc@HN!#6uMN6*{LImgh(D?`c9!%NLFs<6~L+Aho8Bga3^STWJrI@%_| zTh~{!#46mjpg_mhv@ktHDa|h3iA&R$X_=rQ`IReP2W!|Ji(8=TOp+zUVTT%SiQL+s9HjdQKd-Np*K zMy3V|hK43)3YKP;pkXb2kP7%oZjeNaJbJHdXrgCeY-tIaApi|*hbe%~g^hTdn1hB` zK@uJc#^CBSKd%IGq?-k(ca4^?K|*9EY(q;U6GH|4V3hjX87-}c2N}7S1|=0}TDX{H zn}q2l=oy-NXJ>l&1;s^&+9>(CrWzDzC;IA`_*$9hTBn(6WO$hb=HxkRn?xm9rmAu| z7}+Y9Dl2K5g=?vX$Ju#XDF$R)X2b`1*eM$Y>PLGi#i>T5ml!!a2ZRQh2fG&(=oXkJ z26?!^@}t3+mMWNJlZlp1Lo8l{G6 zB$_6grDez4Dq30QtLH^(CZu@;Svlw!7u$20=XxY373CM%TSR+h1%&u$gj;5N`D+A4 z+vK>q1tn;k#+#U=+IeTEhuL{KXB%Y{C`D+w2e~;|Sth0gWoA1hbLm*Q=@;asM{7h! zIR={qTf6Co+C@gisw!vNDck1+rsw+F#ukQ_*d!JgCE8iL=V-g=6l$2bW^2TzsJd!f z`s8z|+a~Mzc}8nn`A53>YH36$`FT5f=sBsSXlmwps`+bMh2*I@>Dd?QYnGU$Ih#5; z2YO_?>Es34s#_WQmPTk;b151XC|PKE7I=jDq?jaIDJlkpsVG|b6l*GKn>$A8d$?xi zSQx5=X)7uxWvMEfSgBb#n79@OtN8iaYkDY|gcWi{M!FlO8WhIFTdFu@nnfvvn)yVy zSt`c_#>K`Os4J@b*!d{x+FPi3*~fbr=UPSvBq|!Z>Z^Ep6q}W5xcl11bLsmkYv^Zq zq?tG>g=Yrj>1ZT{nTDFXSy-C{8yQ&}TP6mnJGm;k_}jbLYUai!YQ={n8@c3#I4T8M z28Bkb7o~A|CB_zHg}Aut7MY})7P=JcS(>LS1|<|kM3z`PCaLL$W)@o|_~^&GxhBWy zdne`ESU4FLCI)3{sK)E**{M1Qae3MmDf#4i`iGdM$EoGG>3fE1C3?mcWc#JK_!$*O zruwFMM0;8IBPf(82P)qJ4B}&huf#e<-5k^+9en2coaD2r=&*4+ZhF>ryJ@_~++_dE45nS^H|cTlhu$7HH;_Y6kkJdnzgW zsJN%*>l=DxI^=6cDTNs%yM*N$>08-bas@}lSs7%PWJKAgW=0z8r+Wul>uY-D8=K_0 zI>aO=nPhpm#9I66=cj9^+uArd#ThEuD%xc`SQq%|CFp9n#rkliq~r%{+3BhJd4~rj z1jQ)3yP6yO7;DCBWEK^t8d$2>7ui@OMtMX!7P&YS1f?Z}CnkAm=%-lby$XC2ZviLn%NY^=|)*7`6#O7=B1<=r&?S_k$dirRq2E=EpxkPDcIQjaT8ki)f*=1OT>Zy9?L}h2jyC-oOTl(m$JNYPS z+Qc|Uo4GnFYb$9fsraP^MB4e7I9Zz~g(X@9=xY^a`&kuvm=q~S$5~n%`C7#4qly~61tpm%t6Au!W`)?~yF@C624*BW2SwXkCIx7g z6#FZ=`e}z|`MKDt<|mqEo8+B>J0c>nkd%1nQ@_SjKAxWJF}?+3FeQtC(shDd{*H8aYMAxodJ2S~_Zl zrxlbY=*DYhc-lCY1}AAd=M)BdtHkL#m%7@=#$+pd+p76yczRitnk#E5+NoGuyB8N& zhWJ}Jm=>lwavAzqTBOG0CZ-!Wg+?eFyC)k28Ajwes^=7X<$8wsdmGuSSbIh$W&0_o zdBvqU>stnx$N6R!S>`8(I;r~R<~eiaX}D%5c@$;%>Zt1)spMrQg{e5^|?% zn`UN(#OB&(ho__kMcJnZ6?wQS`er96YHA1B+IU9ASXc*#Sd`j&c_v0{q&OAD>-ckp zhGckZW#(FiDCukHhZ(2`c^gE!gnLGW#~Pa08++szI~95<`y{*CWyD3fTBT{^+B@VJ z*myYPrm7eO8!MUxbEPY4Bsx1;Tc)bTnuG?qWye~Zn5DR8h1y4id+S6ctH;G=CZ-vw zDf>m5CYw7)s2IhChm{s<6dL+vcse>J#F=pg$Eo=FMMv8^S?Xp4WM!tRITVGuIvZN$ z7isAPn7bBRIjcE3==j-$M%W~p*qFIw#3Z>ycp3TYrbPQ0>*j>2aTRNYX(WU?#Oj7e zg=j0PxM=1S+A4YLyBpfusOPyE=(y_Uc=~0B=DR2v>IJ7M`Kzdv zrWYHBg~dARXli>}6kDq38n^_T+32|XJEvsDYe#Td>igTdTa=WTyJ@P1`{^mAxawr3 zMrj%qm?^uK6#AQ#I>sp46k4SgI;#h#_!T;;+DC@FyE!NLIk@TtIt6+aa;24oJH>{n zsU!sk_;^{lq?rU2mSkC{YvjiTm}dvLdKLH^rKd)lI2VQH$J+&zD0ybPgvLcB_?tzW zC)WRpsN1Re7$rDn`)dXUd%C)ZXnL3?xLaE% z`5Hx;>m_DrnE1t(gy{Hb$ErqYahZ6>$0Vp{ggM#1Y_ zYw5%~D7uxT7<+NWsurp`Y7{Hkc&6lru7}(a%riU2Wk051Q!Ol*p?>y#wLYYxfn(&n>yH7 zrMu@xM7gLYMrs(Tq$~Mpx~6#*20DiXYo;1#szjJ1=4e~nxtnq6=;~;B=LAGVMWrUE z1t$bMM4B491#1?@hIxB=soSU68Kj1K6{?mN=@*71W%*=9sbmzTStZ8Bn%Ek~gI(j2l`ptd*(!>Wg3KfWcn64*aRo&Yk2B;Wv4sDhI+?GtLJJN8=B^) zmiVPwB*wXTsw=wY#u;*jd&Fkh*~Nz&D#tl`mzJ1mD@OU6L?;%7WMnFPJEv$^`ze`Q zxo8)uyX9oY+dCMV=|*K_78Hc#XcgufgeYm6bLmAX>ZK*>*=Sp3dLjZlR8!7tgsOxz7hFL}h z7<&7sC>iIaLuCgB)D1{=y~TUYMCd- z`8!)i82TngM{0-Yd&I`2m)aQR`WuBrhgl>kW@_mKa;dvHM~CY9M`iitsfO6(t2sL< zDHiCdlxPLG``NnX80h#0T4?9HMaBE8xyBi)DcSjD#&{W~Cx=Exr+FrZMmlk&spSXT zY8q%7>xY-5xMiq>26;Q!Sr|HbMV17+_{Rq&W@k8?B)aA#s$~|XMc7(8TPVjA=c=Yh zha0$t#02DOa%uY+nWwor1v@ClxEea8YI&CwCk1HdDCdW}x$B$Sg!!1|`x=G%B%7P+ z*_af@yXCprYe(4UYX++6+PdUsr{r-(c{n@A1^K9XSR1-%=xM1~JDckk8O8Xj+Sogn zI$A|1dS&G+W$TBUrG%$wnrXzEC~4@#s1$gpM0u;`dK+a~ai#j{M~7M@x+WC*nV5#T z*l2o1$EKU8rP@RVgytwFXyq2V>1Id8xoBFXYNmMEIz*@xWCm&~$2kTn#hV+2@&Dd|}0D5iuu zY3u2yrX^&hWca$4a2X~?rdUSWq$Gx9XGEAky zMi$07Y3K(yW%^sDCPtQO*u@w6SviLLWchLhdPMmc1eE$~Mtf@O+UBQwS%;}whB?Q0 zC0RN8SUUO#`FJFhq`O+X+C&$os(b0`#bo-1r^Lr=CFhtcxj87taH(l&q*=w;Wb2z~ zJ8Efa1czJe#T$D>MyiJ!oA~MK=C}m;MOuf)B}Lk+mYVu`C1slXrCY0J7$k=1W$PHI zSf+60r{ol+=#~WOX=$jrTj<+l7DlKg+UJ@EIy%S4xj1QB`Pr+a+WEyLD|^N(8M)_L z<(v4J1tlBmmFOk9c-y#GaTywf*sAI)dnH?FrWQCl_=co-MLSw*I%;H_+xvxU`{-*2 zx`!K>l?FJQyC(Q&d0NM4o7p(n$0_ML=;yhq1SfJu8mj6TXcwv|#bqdZ$CL&ZB^c@W zC735BDkf|A+r%XLL|eP)Xz05er56}E*%UYx1?t4)+Nu_5DH`O5L}}VbawUaoxP*IU zN2h8QSa=jC6{@BbhX#1*78Up#I3@cRl-d-V#QSUO#Cm4r7%N*@ge$wMMJxMwD>>Li zyX5AnX2)|CsTuj3Bt#i2s=0Y6y12U=`KHbJ;k17dZM^8hS<ogsBBe(8T10y#I$2}{7dgaP z*xFcmg@wkd6?nPl+p8L-+UGe3`lJ`Q6^j_ za1|wb`-a9S=4U3SX@?aVc!lLUMuxeNr=)nOCcEc( znkie@`FLw3`grOY8mMzAIolX&ny6}~nd?}m=M@<{7%8TPl{%-z78)mImRiLmx+j|& zC8%2`I42dRC2HEIr|XnD2bMaUWu#l%I2fd=aK$U8yW}RjX+-NdScXI>hUKV-XLzM$ ztJtIm>gXsb>m=o>M=B;31}U4mhMK#W*{j+W<^~1$goQ*n$A#pTnkI3DdgQ3u>PLm@ z**KSkx6DauI(X~Ggym*Ag~S9Tr=;1r6($+k#iywHs^nW}=;Z5KDHj*ygxeMC zSZahsak=M3goc`E+bFAh#T&%BY1^9lg%~CJ=_D5gW~y81yQicDda4@f_$CL$g?oe<$47;z zhiU{n>U(*s+v+OW8faQ)WT_-)8^;&7C9KYr}+9NWR+Ou`I?qm z#D;sCYKCU`I~tg1`gw$Dh6cLY6c$Dnq-e)0A7a8JzgTBL?KM4G!As>g+f8C$sJ6{;&{d1-q%xy1%q z>M3O?XS!sTdPc+*MVjea`XqX#X{RXLm|N+%_&MggIcd0La_NV~g{e7eSR^~!IYwEe zIhiV|g;;s!1*_+~>81sl>Xy1VhZLr`h4{vKSSk5N=%#6?1v#mzC~CSD=o=KII_Yv{ z+7<-4x|$cblqT3Is~UM57pcZ3Y4{qLc`K&a=p~ywr)DJk=>nHhmni~WfhN_#y`UfSL8DwVzTg1i`Bs)hWhh`L| zxw&#>n}xf_=_T73COZWNs;gUO+J|`tnOT*(C20DaIe2ATg&7$txw~1!xMo|}sAq=9 z#b=~>DEX+z=Eg_IhMHxiaHSd~8|ozJ$Ev&e+C-S98s`-`IojmAdIY8>II3Ajs`^`* zYia5#1qCEJ2N{@IhuH;c#@j?CM3@*^rJDJB$K`YB_*>_Phv?=;80eXvG#tGIY)8D*%1I;AKZ73k%-*hlN?9W*6EUbLAz)BzZ;V zB$wF6E9a%8C1+)-XKH$Sn_I@^WT=Ja1qdv zigXPU9Za&*!?*$y^px$q;%zMKtRhQtt(7D7Ts2(uirww9)Ppm^4Gf))3YviY>!pRWfY-ElmRx+?3_#qU_9V zb)1}avb8l_ErSgc&AAHm9rHqRRioTBeZ6C{)d~!X!)**qoI~AJ((F_-0zH)zLh_x} zv=N=^9E>x(46{s%{q@%I5LsWb$Qw(%;UA64IH2n+IqO3#Xa*84>3?jTu5=w*9OG1sK41FxJtc)@X za}AX8%+=k46EmHIwMs+6wYah()q_0U(!B#?O|0zl49wiz0}~Cyb==jAeDr-Y1A@G@ z<5V;9l9Pf|^FrN<93q_pvb0JP3{`T~^);PrT}mUlBJ?!Pg0ei*Tx@-mN=yt>GQ!O4 zJi|-!TGb40tQqmHAJZ)WlG%Yi-G<*V+Oat<>lNCe5v=fU|<873~+_=2rJza8~ z0yIkkqvO;(i+pw5itTekgB&x{byEZLl~a^WN{w^lLemWsER}3b6N2O7jq(e9^c{^$ ze9i4seM1enoHN{@Aec13f~*OwC(aRrCtHeDkylGm|yKolWfuJpEJj3qzf`3PQ3piV~yp+%sGg zjP24rqcTd{Tpm)C_IS4GrV0Q@vEVk}Yi=-29?d-OZi!Q-hSURTSf5i&UZ%3u5wYyj)Uke00si z)T8r@@(Sau9h|KUEJB@a9ZQw1lCr}iG(6IL^SRtKiw$&>J$$3{Ol;x`91|523sb`k z)8cg$4U09?!wj->GV+2#w6uJZoRqV2ywWT(Tw=p?ETY}Be6-`zjZ0#=^z#cc?PD!{ zoRor%ti9CY%}df!18tR6tU^mti`;@0&6Q1TOYK||Ox#_AtXxP@wbktOvy0qS zLnEThgEAsA;!KpY+~OQ{vpfT}E$vDzV?f7eI|kTCaw&Rh7nwUH>gA>t_@|^Mdi%L# z6@*$9IH_tl<;8}m$Ljdzna8CT#%si9X=JKI+vU1h=c>nOra72-_^af5B@~#u+iAxq`#S{{ z+T>@)*r_Oards6aduUmvrQ};1M-+3pn<}a(7nrGdrRRrfDO>BihR0>3sW_Wx`9~Of zT4ZHpWyU+lMMvf)6}x1G6{Hy2r$iZrXjs|l*=yvQg$Jsna|K%21ZNtVxEjS7>uG2E zy5$;p>L+C?`(_uIr5i-)IHY^KXc_CI$La)FdKH>PgodbRmnO!Vs`{Cm>A59Zx`uNV z<~pl~XxV5L>A30Sn`Ol57Femd+60-Ixp}zR6dSo}>l=ruSlE}Q<@?7eS~+++=foDI zCg|tssFcJcXlwhqaH&}7gj%N9M{6V$8(0{7Ck3l`7r0x;g=xkVMdwCjpJDy+9j1bhnNIf+Z$`n-#jHMTHe5+FLq#X2tvIn3)?onI@`a z`e_uzm>6a{sTZYK7X^j{Dyr*y=;`D;`r9O_IooRaTiWZpDXWI-bD2d&IfrIvSgU!3 zY9y!yS^L_T=<4XJCa46f+UF*E+xpo=Xl84<6(@O?M!AHBnED1qCP!MBx#%VuM|%6_ z80m0j=WCXj>IGZbM7f5Vm?ml`N1KM_MY|Rh#6=r~rn(#FX4?dZ897CIswfpWc=_Ze zs3$4rr<>g8(s<)p`} zsbvHv1i2L_8LEa^>6hpR6ql%~+dBst7Dk!}=4XVa#asF$Cn-jnIA>^haCvI!DjV1p zh9|4qD|@9zhO7Ii>)D0nM(FyL`sCL7KYmCCK|eDc$gVxI)vD!S^Dclxp`Y8J32=tYTK50WhkoXXe;R%7KYes zgd0V8+vWJGn%IYX*aao1#HEG!bA`tlr)1>ot6QfTTi8XJX&O7HMWh$`rWKobSQNzN z`up42+2&-Ks@f@MTN#-r8H9Q}SolS%#g(VcYdzotL<>eTg z7$lm6=UJGztH$T*8Wp$)nglwU>$xf==PMgn={qE4ct&TtTP6m∋F;1?8wHaw)lo z1*>c8SUUx0+lTx4+NR|>l_nYJxZ5i^<=95*n)wDKge#R=c-f?RtLZqK2bmT6Wfb^$ z`8&JV#TX{0s@ijTDu;Nw`-bNS8e0cACF&SEgxlwaXvOIH zMivIE#T2UQ1u2$BBpW3p_?W6|Yv^g~6!~Q2IOGIo+h`@FIRtPe$NIRW`W6|*7>9fN z7g?!jr|2XETkFIb=qZ8Xxu+%AW=4jF#v19RML8*D7y7to1-m*X6*`A# z`*~@mY6j<;+vLUh`ROX@SsA(K#TMly#F}}Oa214_d)ldJIu<3Gdjtilg+)3#IXY*n zn`i4eM`i1p7neBuyQ(It8)bVI$410NtA_>K1X%``W;ol%x_X)wBpPsOyM;t}c*p1) z8zz`or>DlNI#?H%I( zv5C6t2-*@;=HX@;7Lf$kZuS%w~_R_eY+VLpMHN}dK8uCZ1|QAUQLE@r-#`eDHVzDbtG zrCt$Hg&~$oIl(UGS;cn#_Q5GR7F=H8h3@h0t|5T|*?u}fDsG11xz<@aVGi~wQBihL znjQ%O@!qQT_SSxeS$+{3fdTHi+UaJtxlWPp9tO_3ZYB;~S@xC*0s0q(Vlsc5nNGm z&c%L#4qm=4_7O>ONd_6Vxh7tzevW>o4i6R9X;Yr>(!8*b2esOLAQT}%7MSi~erWPL2F_wY0$q6Qwp0UYX*6PLS$-Xg>5!p#j zMe#AQr9mdqddB+c;gQNNi8{)m*|sY2E`iqhg`W0Gr7F1^E{Ym?Ia*;pmWApnR`~^` zVO*9z5%C#e=|=v+Q5JqhZmG`kxdo~&8g6dB+L6XO-a&@(`Bp0GE(UsGxjFeNj>!hO zPG-4|o?cPGY61CKX6Y$h0q*u1F3HZ`k&X!|B}S!*ahjIi4jL+X-iBs{g<-LY9+9Sw zE?Fvet|iu{4hCknKIsnDs%}=kj?tEGpBa`O zzAnWDwp{+9-bwEHaXJN>dGXnLdOlYA=Jpz@Hd=m$_E9;WR$*zy{+^ks*2zlhx~Zu_ z>dGGKexX`Ax(WJmS;49586h5As`<*rNy>JS8R}|Q*}55OLCXH2N}lOSHmOG5dHI@N zxen=?F4+k|#o7s`$zcxenptM?p~Y&2VVMbzdC`V?X% z@dlad*}?Wj8rfR$`nryV?zZM>X@<7N1(wn3&X%Pmp0QzJ{?TFDzWTOCex`a{mc=H1 z@&56t8QFHlR!Rj{#)-~8VXlgn(Fxgp>VXb1Db|{Hf!_8?fiC`@iW)WsfzAPHrP|TC zmWg(`enu&oAzbNk0eVS+8qTFLfuX4-ib=i!B?&32_R3lXsRibi2KqYw(FN%N*&2r4 zu9?L)=IPq0)&@FG&Q6Y2CLY#?DsiD)dhu%UB|4tIp4riUrA3y`&ZRNdInFj_%6f^~ zMmYwGv6hN~dalLph0*FE8p=s}$%rfx<0MQS!l{;v8Nxeoe10U1uknHr&PfwrMRE)iN> z;cAYGRvOk(o;eXI+A1#bg~iSuF=?h*#c?La0ijAZ%HiorAqE~=o?gKP4ypxC-s*{Q zh1%8{$yREG%BhB~rCestI{Mi~p`r28kc5w;m>W0zTNktK!?r{Y+8M^vhp$>-TML{LTA&ORkfx&(nn)-%?s!maP zB^Ji1HbI%7(_?cz^Ssg=VhlB-`~!`(a+4yQO=7f_QgsUpt<{sQxneY(QxXi7Tun;# zgVZ$ba#M@!6?4;-bHlO=98>hvgF~%iZTzkMqRc#!RD6OH4AYd9eM;gARZK%n10yZ$ zbXB-wGu2eABb9P(Tw=mf67phFJ*|{n3Ubo2W2~LE?6Wj;O_h?;?Q$JsOd=w~oNV1R z16}ns z@xOpQ(4on!nwtxGhGT-CBda`J;>!&O3yVsv8Fvu$$HRm`%2tqp_x4GLoN zJZ)4QbpyH7W1YQ16H=X0^FtlntnD0BtRvJ5vy8nwom`xheYBI6Y+WPORr7Uoqij9n zEqucA?5(`BG!yhyBlEQ*we9Q-xm;9I-K>K(G;{pzERED-Q{!_26@#3T-9xi7o!s=D z^)yS&3v-gyOFhFfJUmU)ZA{FP^YrqqQUcuUEMs#FlRdf2EWDEQGjyWUy)xYmLRInu zGPO;EB4V{Oysd5WibA3^j0&x?eZze1>}_*`obB?Jtvq9kQrwawN;O<`<8n3pxeP<2 z;`A+(6oVo)v@~qoz?DW+OxPqJu5)0$Ql|zg3^j%yFG)UV zxYUg^6N>{~v_tdV)#JQk&0=&t^Ig1ceUdG`^pteeRE@LDqcWT$+&#_R)14C&w6cx; zJrk7td=$;2T;oJ-QZ zlS1uXN)!E}RMcJaoPvtYyrL~KBdvp6j9i0bxDw6WV&Z+x4P#tFOdK@bW0b57GGk41 z9Nl${O%np_^`k8HqEg)~P5q-|bF(~36Y^{dGt>-|a}zY;ZM=+pGb6a{jlF~OjFKI4 zTpd&*j7t5&^SzUE{BtbK-4rctT`qewe*S# zozz|2xEz9%TwJYe!gOOS^X&{$-7?fu1I!#XGVQHOJc4y~BD`~Q?BeuHJ)?cY;_N(4 zyhEd6eXI%tiqz90lq_^jv-G%>bz{@RRRjHFGqNI*eEfsWQ}b2gLQMkA3$ zGs5hn3j-{&RCTOEZ6iYrRYDCi?3H|?3f!YTvr3F3xs=pY;+>o=O;TO#G@RoCoWqnt zRHO8>%r%tU^-^PFEz@mXJQ5XyjB?zJjf&KgLJU(h!&D3%Bh<~Dm4b7;OXImhJxoF~ zO+!?3V?q)v)bc!2Lk!Xk+=~56l0g@in1{uuYs70tn;UAx=11r_m}^*D#j1o`>ey?> zYpHoeyT(Rx8D*$zhvy|Kg=Z=isCXM1WCi&9TX;n#n1&@MmM9ekTIt#a>E-9>rFm;= zrr7I-7W!qHnC80W6&R$rn8y^w7jp$##$_nw7KYm-C~G?Enr8SqS|+5Mn`cHvm$>KY zxh6XMco^GcdS|$MM5d`5gqYbX86*^knRsWJrX_^s1&8Kv6~u&V#JGF;XvF#3>m{4I zqz8rghC9Zo8!20+#Ra%4+6JgQScXKJ7erfUd6-${7@I2v`KkDOSOf)yYE0dKnwVM?@#31(y0oMP%5iMmkvLIC7cCyJQF1sd$^k+JuDZxTK_%gQ#IT3QDw21G{(sk^IbCh4oCSw%VPXxWweX-BEVWyb_^c}0XNW~S(cs>OvF znJcA61|=l9nd&6CCTM4PmxN|TXJ(s6>x6k1<|hUF7HTKyS!ZkLh50B&dlnm61^7Ay zhH-i1TX^fLhInQvhxr-j#H!>Z8LGG&8HXjBWvdvbW}7F*SQWas8l*ahuZ46<;5B}XRE|VxSQnU1UTlFq^DY7^m+Is1$WjF>Kr|LME6jFY)n71?VBxkNbG#akA0*&Ew< zY3dp~>AN@=sq5$Icob_S1ljqS!@4BDi=A#d6cARWgBEB zCM$(TnxvW+7jo&?WG33gTlmJChnx9(nIxM9MmyWbhilmzL}sbG#s-wC>ew0@#~Rvs zIBO``>ey&F#h5xrrDhsNTf}(=CB+tVMfxU`7Nj~`*f^^NX+&z~7X+0$n50_=Xz2Rn zrfXVj_^PJ`Yv<>LXuGGmy5!n;h8m@~8|cPcn0vbv*u?pS_;Tr3I@#xkE9>YNMd>9v zCZ|W`W~OJFWCkcEXQbyP#+cca82KjKI+{8Z*$3n%1>1WU*<~ndXs6}}SQM#hC+BH$ z1^8;0=y+!urYoftWQ4j0nLBzVc-fjdn#7x_B)DeyC zJNmoFD;ftGrNmqKJ8*gU_-i|7*%-R#d07`}=;ak^M3}i2+9X8A7p2)5yXe@*E1SCn zXuIkJ1*-?Bswo>A`CEFKI$0EkxEUI$1u2?wDLcj%6xio!8zyUo>e?tP1t&yg2Ac)s z>Br|7saphO8D)p7<+z90Y8x0TnHXBB=UWx}+qq>q7wY)Bs^>(Nx^UTqhiJM+sD{U< zTNx!dX*i^6oBO$I>pHn=SXp~%WSbcztEERfI=B@^=qd*~+qlQu`y@tKr^N+ixw+U! z=$d+S*#{f%o+ZoxYnrbA(_{13N=(>bkn7hTeMi(2U1R59y=q0En z#zyLyWfv=ECApaTszh5DlzOG+Y55j9 zmqf>VyBQ_e_+~0O#oH(4X$CrLD(0JIYsVyn+h*taC^<)HdD^DLsA;5Uas^rFx&#)R zrP&%3_**OI7p8j_89E!-6#B&!7A09H_-pFh_^11&1St6=nP_AOM>;7ftEm>mn|XTJ z1Sy;Ndq#1&D%&{5L?)=Zc^By`Ya3WtnQLnnX=w+V>8SdoMmpPRdq<{5D+ikxMaLGF zDtcJyo4Dl`nS}&rTjiyA1wYjanCsA*T1V<@l|*H0JFEHXW;^T0C@UBEturs3%&xhxmGG7wMD~+lQzo z=X)4f7F(&Q7AA$;<;Ga1dwAZawV+N5xK2Wk35hJ|DV>$vFo zX*!xjc}94vxJTOSW&4^GM&x>!sHj^9rYd^`>IB%k#dzx2W(Bz<#6}nuLjflhDeG&fd4;7Z+6Fu2+9ieMc&pmwI47CgIr}|Qdng`(1o#xD=NhLK+J^btMEM!|=Ol#tWd?9r``Me6 zrk0i{MQJIg_$jOV=jDVOn)zianpl}-1|>SEs9D%*tHpR~Dciei=ZD7?yQ{_(7n|8e zq-%v4TbRXKapl`uxn(&=*k%`|XzA-Z8-_XBM=5K^=V&_XXXPr|7(_&6gxMOznW-e1 zl$3f!=h$cHX=I0mq+5k07HQa9>e+E=XLtoEs~b4xsK-Zn`J1bG=R~GB_^1{snS}-? zdt@4B85<_V=X%Bas}&bz1m>pXdgq$^7UUOsMr#&_x$78ta4B0jXGW_h8G9M)=%l5@ z>1A1k6j?^uyTyjP+9hU3JJ{Q~#5g9KyBT=fT1C4g>$t`yXU8RlICvVxYuiO=o2hXb znj1#v#rfOY`DnQX>*W_|sHi6AgjkVW(F8oI)&ug`NcUajE*jpJYn!0DYc_u~p1?rb3xchPG+M0OfdAPeKd1A=B1?GC`I4e18x+r^_8W{xWX%=|vTW021tEEJHczfxFSr@9lcpKTOd1q*wINPQaaOL|X6l<7jI@n|y`Wa}1`e%jaxfey4+uMcu=vi9jXS#SL z8hcuMn49V7L`A5DIcKZ+`32iXI_i03CORf2_#1QS7%4^u zSwt5adt_#M`fC=Ny4c!>dX(D5*r+(AX8XIO>ZGZdE4n8{`}+nMm>HL9IRtB28)|#o zSY{d;XeDv!`=n;X8S9oty1Iv0KX=^#;6CB8u|pesrjdRBo~@08hWM_#5m=; zq-d&SDyPO|duOEvo4M$ynCZA#a}{_h`)b8`Xe!3rdnJ?>I2)#z1Z1lRd#RX5dD~bT zrMTNi+A#@TxYDw=7UDy3%^#d}A%hv%D^WP5tq>Esmaa#`fL z1Sz@eYvpEyW!QQ-7G#4rbO#z`9uVJqG zYIzmv`UJ*l1o?3JhQ;~iyIGhd`UiNa1vsV$I(a9@85#$~c_|sj>RM_U=tKt@IQjUv z6?>WMq$=BFIR@%z71}EMsD|5RCdEZ1aTPf`#+VwaWk%=Nt45f(`8nzrm>Y(eRrrQ+-8|XL}s`@xbC&X|CI7c|7Yxo%@I3&3# zTV*CFdnGCcS!IO;=#~b>m}X?hDrH9}Bqi(lhZvaY7MgpenyMCN+PWA;rbfqSX`4nm zaHVI*1S|Sl``Fm|=9mPj`X_kW=la`v8d*DAct<6>=;^!YDmkX+W<`Pk|^ z#hWMEY1jm-nro}*`8smthg)XagjgHI>*(e9YL?`iBw2W=#bu_a`{yT_huE1pW@rUF zm?XI>8H8Jy8fbEb=!GWcn*{3W zXND=7rNvtny145Y#%LM^n#Y@}ntPTMc?MeKWU6_^7DQ!hr)LDjI-3=E zMHS@b*k#+r_?Z`!8W`p~J11}@6&M)$#`^0N2Sxdrxv4wZnx$xJB$@^q+a)MEB-$j$ zTW05^c=;Bg!D>SSqoI(XUX#-%y>dU$!Md6nAd`luCnD96MorKoXbC)#Bj zDEeu+#QKNWl^W;8IQr!Tq(`Od+bG$V1ZAZ=Wk*@YsKy576y$08ION3!7g{*DxM`$@ z`ljUO>1ZYebH&DF+J-v2>ZWO@q?cqRSmgy+cpD|B=9w9%=7ne4r8}x+8su0OJLDC4 z7`hfErlzTqx1!m}*2qhMEd&V*atXTB$>O|h51=qm3n78+m&*u z=US<&xI5bxWT*#v6ee5yDyBy$>xZ}+7aRL{WqUhCB8H79>bt}!8JY(=Wd~Ym`DofjnLEd21z9A;SOw^% z=6WbPg{!K%`S@i<#^&ec#5gM>C#)TJTD;cOq z2WfC=>WBNg$9VYIMJL5+SsKM!w!`si6@IT&yS7n(chDaNPy#`;EP+NtDD-{ zdltrqlq6>6WEUkSnOZ~{ss>pFmBi{RE5`=Jc*K>usX17=IHwuvYFG!PMtVp2MQFxk z=vn8Nmb!996eZilt9$#a*hePD1!>rr+ZzY!M`oC(JD6$*$7^}!sq3obX*^VqxOr>j>3F5P1|>vha@nZ_8wLA$IIAZ6MP|DDJ3Co;2WEH_S(|F+#p=gr z1jaaeWVn)P3h#>eW}7#eEkaiuF} zy5#5Qxd$bMBpJF``h_ay6#6DvWcv9Qx<(tjxu&Z6nt7|nghc5_=KDCSJJ_d&g~vKZ z8D{0#hodFnyW?XCC0is1qI{;S%jF{Wrrnaa)q0vXBoNJg_T+a#Cj@*7HiommE=VvTe><# zCFnWng_RnbC75TcCm990nYgBExu$p~`bP!1x$0!AYAIOi9>+WN9d-MQCQZ zaH*GCD;fqVhUG>U#oMc?E1JipnfVqtX}K19srtEPhZ^YSD;H{cs%B}c<%LHX7wVe_ zCTRMFlqhD>zL#!IoY_Y7N!=& z=p`h(7KK?x#K)<7=R_qW<@)&P=f@Q3dn&rwbH({2>SqS{x)cSO#F?pD7bdy;Wvh7_ zl*D?NC3^-X8uzVG+PcKrc&B=1tN8`GWvOczrrBld z=qS6pa;dncsoAIIhZ`rSn3rlf}0*r-}N+Z!c0c_!vLTSw)a`lh<8 z6&S=sC;NKFXKRKzM2946CaQA9jaq8k7dWdwL?D|v@x zWUGaQx~eLv*@k7iS|lp@C_5HAsv6k_*xII8=-H}ghlS*3Ybm?O1_cGWMJaL>_`4Tc zXXF=oWMr!OdFEv$`PdgY2AfzJsah7M6bI`?xT$z~7-pvVTRLg$IccPYdN@bK ztEPDe*Z*wMrmba6bF`Oc_(q@>&2&;r5H!r+NAo&dZz2eTBxcg$7mXu+S;aO z8`E$>Ii*_p=^CZyL~1*z+N8$0YT75pb6JKJg}8*N#~Tr3HGp$Hy8Jr5Q!pIfNQ18>Tp!gt^7UsposBqwI(SY&&fhlB;H8Keb=Sw@t4q!|V!`zV#fYR5zc#^fm(mY5c%sJev~TIKk~ z+Ue%SriK+7>T87Oa2dxaYO6*&_}eIH<~jwa$Hj-M6?sHw`o}m2CuhXCD3|CLsrXw( zhbo3SGi4nfr!&MS61Sr+UOB#TylQn;R>dndh0PMJ0v?>lvHq zD`f@PrlhMWI_p?^nHktd1?Fgbcm%0OXohFm=vf46dALQ{sq4nNa@iO~rlu%cTI-Z( z6^E-v_$M1@8Mx`#g%sOsCMv0#Yi6VcdAS)Bhr|WCSs2+FI>cBRTf}LFnTHvMYe!{y zc|>tJS(thz$GRv*6(!o5IJ#OSB}OYNI;m=8MyfmLhb3iOTdG*OIeBQ>d4>8Vr3czY zrK*>tc{+F)c^Vnno2w;cbH!@86nLu}yZb6T=-HdNN0j<#h9)}u#d>CYscCxp#CvPy zIqSHk*hea+Mi?h%Y9x3Vmg;$jyXV?@d#J{Rm&S1!8pOpW>1F4cdKMNZ`(;=LN5qC{ zITWYFdFtC++eRe&J4EXxC)fwuhx>%ZYZTc9YA9(a4 z+a<^8W@eb>6edJ@>W9Vo>Z`aV8Y#u+B&55!rs}G=q0D z=j1z^swZ*<6((u~XX`8Z>BZ}XBsqnqg(W!XSeRPryZI$(Bo`DHr&%Z$mwJV!n`I=W z1xBaGWh9tHMc5f=$K`t2N5%)LbGfK#d1giU>3fE2n1|ZtxTpH+hh>K9WJUX{dz5-9 znJb3acxE}}WLVi)7nH>0_*8ESBg$70F<|U^Tx%jL2y4wf1g_kN?TSbM%x?nqk%o22j9rR!>*b!tz9M@|Czjy+1 zu(}!Ev#3FLLzpY@qFfANtN=NV8geeIr6u;uAPfz_XTw5ng5ZT*1z~7tf_@i-p^+iz zCI~~2(+J-DV2S0FVz>Of5(>@SSXkq87Y{XnJAc9 z7%G6z3AHd)0LdAf87i0>nkaxYni-iYSQ?sx#ld_FLj|xG%#FO z1n~#h6k}ry_k)}R!Vo{0nkkr=n1D?I(Z&X53SfVknn5&z_(qUG00k1rHkdrGDaa;E zBL!ni6L5%uC5<3{0?C0e*ifjaLAD}eupeLoh6V-(V5?yQ*l4iT(1-;EE!+f<)z~x; z5`!B+NFgryQ3H%2X%SZd5fVo|DHL>sHu_1SLD&uoH3glN2vUhSDAW>k26~VJubrI& zZ)#o&sI&$Pff!_*p$|&AAfu3OuCdX#G);52QdJ5{cLg65Y8qtY>aC(&=#UqtmTw=P z?hs=V?&c63?&{_379Hkfucxi18ef!?72sWJT+HQ`?GUGDYHMd|mXM#IVd~~<J_=s+{T< zY#wFhTw?C0VNjA48yRkA;^w54A6A@NkQ`~?n4<6Mt6UgolVa;@V;T`{l%L~npy?A> zlIv@soy_Hy9#HHV9jICCZ>Fg3uWjaHrJdsIZf+YMlvQ0@eG7L9xa`4RY3f4~y&DV+uG|KcV3Neoh*D}+|#af?(5*jpN5UkG) zK{s1~aHfKhnSy?DW>Io!Zdy)ig#zLfcVlw}{esjY@O@$WiMa)-Ma7AEDGI1}Qt|2+ zfbOS)+_hw4te{_zQ(6qVa3vS%YATR1nfdr`rs5@VH5KF<3@o=`7%J$e7M3RFDDXlW zA$TsR()UK(iGlTgDqhG1RTh>C`jHBjh6?&gMTyDTsU_gcw=9j}e28ZuO&5LCd#rfj z7g_0(bB~pg0cK8BF|`CYoJ@=@z%DQawSmk{6+koy<8uYr0DKAv$&DIdsxZXE z0JYfzx{d+Vm_a@u-6_HlRKkIZ9nkUBMVa6O(hbc)7eRp3A~k%VLZH?Ptlnz5nT&MsVq9tNhC%BDfieyQ>4S&lBb(Jn=?-Wt(K@%oCz##Xwi0qOSk$<6^j zwxLC;uKxPA1*&n`{#m+(NeK=)$~Ib_T#6aSI+3PIW@=jY@#@hwLD_1y%6YL`iW$ke zw#6}8=06wMTB^g}#MVdL55z$r=dV0BO z5jpAwfieDyv6jg}L2eoG@nJeXiR$Xs=7zRT9tk!UrskzaUWq1A!37#Iik8a$iB8GU zT-re?nK=bfnQ=;b+O~lXDG5o*TDr#Bx#~I@LH2oSD!K02nyT4hX?aFAY0kd!F$Gp} z4kfA%0VZmzUI9i2d{;^8$sbaa9jGCYB0bOL&boS~5c^sdTS z)RsKx763GVg0co>BN2o;Cxqljdw&%6{y+gd8i+IvL_^RmE`$f$MtUruRLF(~pn*?N zEsIhk2S;KXim=2o6al)i0&OS)Bm^zMNUf2LEG*G$WE)+R1V@t?HEVb0hy<^K%m^cxB=0~E+hRqX*n(j5yprfV zBUf`{cdkMWeeJZkK<8pD&qy6FyFxohrxed9n`|{F=NxZS-7G7|u!Q&^r|d|l%;=&( zBdcQf=*U2Ios41!(1qq{7XDme%627r79|!_O@gWqq?Q%@3K0VZUVX#`BIYKRpzEihSAm1%Ah(AYnHd?u8)&c_ zM2yT8bS+H`6bwQ4CRrGnDu7ZI$R5}QB2LgGgn5Gq=-QItlGNNV1q&F{Ljiop7Dzwj z#t=gT&@=>Ux`K#7y+&%nGBgJb>Jqp!BtqBGBit}DS~ED#OWDlI*}g!@t~A#{Iodc& zIkKRz(9GJ}P|ZHU$<-v(!ot(J0ruz|Sz;EyuvX+EraQ$u%L^BT&`bOS?ed$(6OT3<`UNG;k>JyqM>z^%kI zO+`sN&|cBb)6~u+P{qPGQ_VF-#iYPaMV-q?Q`u9;+s02lB;LR#TFoHY(83}l$u3eo zO4->!SJ5OSMK{l~&@9U~D=5O>!6ZW`)l@ymIm^qz%`2`T&Lt#{D>f-Fz$&sZD9+F~ z-&ZX+SjAGsQ#D*kBh%MC(!|>~-Ow~&*(Ap-GR@T|)Z48fGt$@7t|-c~&{j1$SWC;= zFo!G8OV`RMP9wrPPE9k_)GJflP9sg*C{r^^OGnWsI6GU}TFKwovDnYNC@?g-$SFYA z#LzJ(GTJrHsYEfapu{?XE5#_fI5l0@!QIZh&`UE~*D1i*Mk7hz+%qn@INaAk$v09b zHdfOk%uB_rFxB4OF+I^TwAd%XT{S@~&rn-U*^bL9Sv%4wD$!QQN~73R+gmX{#N5j( zG9aZOIMUqN)iBQ}AuUHED=^;BO+Q3M+tJ%6%&;KdGA+|-^5ZW*-EJ(!A>>K+AmaH+gUL)#v#5?FH6_M zN;gd_A)U)0)GtBbu_&N4RyD#sFEpXV)+-=eIUy#;DpxDeN-;;pU(3&2InE}@*}^d_ zB{(c2-BP!}NiQy|&?qb>H8Ql2D>OFM!#&c{U&$rV+e9}r(jq)TD^@Yi*k4P-$|xYw z!8pZDH_AObO|8_y*)>tgSkopn)l%KWG1=BIIKn?A%bqJLswg!lCMHuO)XqCI$S5T- zJw3@$-BH`lGTE^tM=L%#J~1RH&A~4(!XQLFGt9CiRn;^;JKi!sz$Yig!79#)tH7xs zE+iqtzR=v)EXZ8nB-PZ`G~B&3K3y?9MkCoZ(@HHrLfI^$P~FniE+SYnJ=WLDKPt?& zD9trJR4dRbCzC7OG&oIB-9S}GGbGp4)zc)-RWnY-#9t#n)Xya$N5wALCsb1ZyHMNSFw80~(u^y`-b=+bEKEP$J}5LL zTPaP~CB)q>T;I*FAU#e=Gtkb$DMvBO%^=5IE8X2bRM|`^(4@f1!CJ{Zs<=3=Fu}!+ z%QMT=$VAc5BrjFb-oZiL#@Eo&NHtO~E7{b{Gax4}BfKzNNx7h;NXgR1F~!T>AurWl zBRkJo(a%u1M9IcH+=MGrO+CsiTO}=CPfsI5S54g^I;m7e)z&ptN4-SL$;Z1uJuc8N zw-_Os{rN|^**EucJ#MMP9BquA#)Zafh)m9@x zBPY#7SwA?&$T=v(vcNqlCn7k|Akxb`EG#3#D=(Q#H`yc9EZ9LOyf7@w-J?`nPe&`j z)wiJ3(aE9M(%;)l&nMq9-@({0GdWo!H6q+9JI~G`-OoJG$TCYQLR-hlgG)ceJfpxZ z$}q`R%SYcl#m-2*Brw*|Eg;Y(&E74?ShLXFKE=|iz%1J>s>sNp#2`*1N+UVlOf5cB z-!UlB#l)E_&M-nLA>Cam*tA%w*vdP~$S=bzDO5kiEkD}F+|!K_fvA=AGoPe(O3 zFx)pMKOiI}!^0^$(7;gF(n%#fjLR!N!pg|n-^9UO!_wc-E7H!UG%eiTP$MNT%ex@c zKHb+_uUOk6yV%D<)m7g}QzJ3TR=LF2JIyK3Dk2~+G0clALdna_MmtH##6H9<(#kPC zHN!qU)hCMP+h|` z-6JKg)FK>omL->sN3dU!RcM~Jno+n#f?`obsFST`pmRZbV487ObW(tkmtA5&P(r?y zj-f-ox=&TL7|7E zx4nyDse5RWszXVlMOLn@hM$jdu3@frp=&W$o@ar6maTTWlbN=Pie8L~1Nt9_qsk&c?wq0kOV zQ9-s-u1#oYsJ*X=gJZt3TX2$5c!8cvgt2#;XShjvY>Z)wVu+<~s=HE&H8*u}T=1ezZz#h=!`7cf7f?sfvzsA?U!)EEE4|Z6i(XY(v%LJT2F7o!k&dWu=rH z=Kx>(>_nr~oVfU4E2Uh$#5mhRE|)}AV?76Jv(iu}ZF|222md&IO%IjQs9dewLSLH% zw=j?5>@1HgyMkE%6!&yBZ!_B%k0eF&tONsf4|Qu7e;+Qp)BshRjEE3-XE&z^_Yk+D zBz>1~TfanoJ6$s$PkrkU#Q;wW4@>hLvvfVnAB)3E5kffUHgnU&A1{TFJ+g47!#kk zNPVqBHN8lam;kOKjVNWUQ5C=aGo0u3aKjkb}@A$Z)+#n^b z{G@__)Lh-r9G^IMPea4xkiy91tROGzEPdo`p#N2Bm;ryNT+#T1P+Lqjj`xS(_^Yg=EdAaAFT()1Wtw^X$lwPbrG zE}I}*Lk)Kw7elj1doN2pZHJWX7&ik=e{+4;cs)HW+jxt3^P)m873I<>Z`IKJfDpGd zTe~8+d_5!GzyMVX&v>pNN2^4ah=8E*tVnk~AG`EyHLrxiECVGqE$wt=e}@1~TRkni zcc;(!X{E)(& zL^qex;IPDKO(Vmkc;~_d+d}<-Y%TQ!%K}SXOW*vgSbP0Yr)WLhY(K7`M3+oMW5Z$x z)hJg(gFO4N^nxf2efQW<2Qv*VXX`)>v$Kd&i&@AH{&I;Is(O#LP%HRbAE4WbHz&guGnOJi}~%ceQj)d+qo* zhcs<-l_*nNw-lA4^uQ#uU=1!CKX-eFu&`3iP^}a<(-f2Jz!=3ae{c2l=tM7Ni_9<^ zZPkPftq|1|d+qQ7J8gYq)qsSg_$;4Ddk`t+G*c}v!=hM6WfzN>*c2Q0_-vbe2NPvo z`@(#ENAuFmJQWu^S4&TQcW?7>PYbRDPrEdKW#2^Ks4$HJYxkTWvk=QX-FPLJaOI?6 zm3W(&V#W9nUvC}bLKmNsh}gV@E9;aAo5Z_e_@{+knVqJ6p35d!0D1jCgxZV>OouUte8M zV?}j`a0l18O#2K?F1HX>7a!N8tcY~iQX>_Ajj+UkJm0YR6m|FT^so~BWc_4ywG8vr zfZ$l0A`N>T6%EZWt(@QxjYK0WyPQnTz!a`T2R;3gEKRHQJdOCsEZfZRu(S*l#VFr& z4I6#WtUNDeb6s^s*VquR9Lu5z_287ibd~Ia(j0@(Xs?7wmn2;ku8_bS-LM4j0`CZ4 z#gcSquXvpx6~&xPT{qi^xHv1d6szzg1O3b#ca01+L$w6&j95c8)4&8Jjp)44Ov_-+ zRA(+Nb0zcifI!O--NfXO97m0uqQU};TwSM_{9u!mOmppMeFw9w2+bs|k|>R2yV68Q zOT7T4P(yX|0438XH&+uau2lU9Ti2ZUXcY^K0B@rl<3fL<$Y4)RFO!HuKW}xDl9Wp&lMy|g6#yx?%>bUS}tHB|$jpafTS(-;dauTtH7F1MnPoWcwZ zMSCx=Jc~kK<@{v(cr`b}H1!Dgkdm;(M2FIngp!zGU6a5t2h+?1Gjk`4K%-0t7rl5r zJslIn+$65#Fe5V;CvWvI7gen!#iVd0b9*a|i2OWLZwqf9^{mqT@ZCSW!F&K6pPqkJx4ty3iH(9eqxNb_=b zN(*<(N%S}H(e}1gceS!IPD;1&D7E5px3RT13{wn9*R@x5@H14jj*9YE3My3fFpAYx zH?|KbB~G5wo#2N3C%FqRnc@Z*6=knG%*g( zj8eCX&5RGW(F^x3pP_b6=h{?(d$+Gb-&%bRaQAdKi!AYv z%q;X&ElmoFGggoCkIZmU=kkd5&JWEfGE346jJ0#{G>&kI(26T8_KHz+*4MLg&rNWN zv~;&BHu4U(PB8aR)C~*^3Dt|YQVG;|H1o30u}|ev*0$Er40loVQVLgBj!BJ7P_y%O zQ4h0*RnFy z$u=~KclPlN@YF7FF3Hn1O-xQRG7EP#i_26?b&A$Y%(Ha$2q}&8OY_cfEXcJ|P0TGY zFO5#Nx6t8A_sL5Pi%Ux{@peqkNHYyjH_k1|F!8a}u`WomPB4lO%E(O53e-tA_Ae^5 zcTRB1&vnc)a7%Gd&5qSbP6){I;wp43a0n{Wv-I?GO4oHQaM#E%56g2j&j|O6QL)PO zH}i5a^ewh=aEP(fHi`<0$xO7i^|dw%){V^2chCuQDGJ~+F3R^zkG9BGDvGu+*DZ~Y zP7KkDD^~I~P*n_bwRA8D@h@`BDGKrnSGCj&P)t^gaZ@x7Hr9<&)X0qtFtxSN;L_A` z)(p=r@O20**77$9iE~s`G|tme(oOV_2+!A0Rx5T$GgeWI)G0Qwag5U`Eb=ZY@=Y`M z@^v>4H856=agODR&-T<(b_mF^4ztWQH&f1X@<>WHuu#=fPE(1p&<{^eb1T*M z&`|SJb&ikBQOi=+Gzu)V2n|h1Qjd-)ba&J#^i;KS2#nBAj4S2RGBJqtiAhfI)<{j% zD)w=9wn?{CjfvE^jtb7p^~%#IEVTBt($G_~PYaIqN{O`2&at;KR8;ZGN%Af(Ov_9( z;z~3Kj8@(J(2_ zib{4&EVWB_R|>P&i}qFw@wAW3vrDz{wu-bY_Ea+TjPN!JEN}|8*7GyfOSN~2)(Ccv z36BfOmoLxf= za#GE#l^jbG>`W3e45QTo0=aYo?9;NM)J>vYlJX2pta5z)9V6mGH4`GtibH}*ZIa?M zBg|3~d_3&zGb8k}oQgtxBJINpog#E1yo*$=lg(_nJe2(s)WTFfbnRkdJQAG)oCEzd zQ;U>soFkJWT=WYR({dwCvMi#lGXskB93sqB^NWI26CGkry)E-R+}y2QEV)e0lOyBw zRUQ2_>|=ery_HmawbZnNbTTwtt=;|g?X~UojWm42iqecN9ZD>toYewCeAWFToC*^( zv^3KlBAg?+OcJ~l-IFt1B9$|=9ZL-IG6Ho{yaF`C%=E%t3Kg?Wj8eR!wXIyEa$VH@ z{PF@EjWjgX{nJ%qwE{IQLv6D?(z#NcBD_89OjQCRGp&m=)s6C_g&RL){}S%rxVS zg2K{VeF{o-4AYIXvopf-?E*9d^IUb3EcJq2102IrjV!(0v@J4S4U00|HLd*}Qn~U= zTrBbpii=|0HIu!yGgLJT4Gi70GBR^5y!`{>JQcm{vtl*Xg1j73w2QO~v`fMjV+w*} zvedHl^$N|*f;^15wBubOb+pV%;~dS>jQn)$vcgJot^Kv~E&LUetevA=^Ab`_46Q>7 z!-GB3^i`alN^)Inbrlo!OI-4G&GMphlexk?y>ort^^`M%EFu#vvWzu6P0|CEoLw>u zEdok10%CleB3ykUb*w$~+)B;-1MQ5wjRHI~ysT6sBCHIQ^orcM!u55`ilJts{%+0NAJk4BeLY<=ZWAtna z<5k1*67rN|qtc^oJY$N@;)@G4d~(f93zbts-MGwyv{iKDd<`SgZNv1^JyQ&fEG&X7 zO%l{??3_#eeM8eMd<(k%i^a*}LHG72-}4K&=jlv47Nv(h3p zJu*U_QnHLQ?b59^-SSgi(~|P?3nCJOqtha7oy99cOADf0Jl$L} zoV9eLqwQ@KlYO-HodTV;qBNDb!b-CuQuERhebd~0l`T_E^W2>Z!a_0%^y5=Z15-ki zN)w|3@~lHr)bjJ4^%X;l+zegZ44j?wZ9R>LZiYz=}UoDIS<^vokegUpM(lJs0cT)e$QGE#hl!;K9bl0!XW!mU)TOYB|4 z(^ULY!eZR*e7SVOY|RwY^IdgH97{q>vz;6QjY47^l#P?J!i!z3)52WB!(5Ve9n$Ud zgM9tWU9=;@?29z?6Ow$*eXQ+$3a$0H49zW_d<|?f^|O2(%u|e4-E-1S3$65u ztv!8m%#^*{{A{wK^8Nht^a@k54N~$#6Z2e)^wJ8$@_lu^G`Lc1@*I=(^K|tJ9hGww zLzNwp%%WAYRCHrhG!%2Ra^sXsvcrq?ylv7-jSGz(e9{z4-DBg6l`=|m;0{k6k=6-$&%yj5%xjI$H%v(@A6W9*Dv zGwqzUR8@6ijFplC%(=`m3^k&&OH=KNZKBhHd@{6)V#5n;^RuI(vUF@>4dbFr3cVFQ z>EOcCyOoNq8jI7O-RTA^UGOc4$Jh=i>18s}_iol3%E zY#db6{WM&CjB=9G)eD{CeYK2(qLk9q{gMl{(rgX=0@5SG6O^Ju(rv8@a=9WsL-Vt8 z@?&BPJ<@ZuQp3^;Jq+WclLB)>4Gi^sl5^cOVr{}za}talwDVjn%`}|iUHyuDV+?h| zvm*72Z3=a`jO=x^Q{6nwl48}o4C1_vwF`oiQVoigEmP9dJasiqJXEYS%#HJOy?pFK z6axcda=haFb+a=ZZ8Fm$b&b6A4Y*RhjV+>r!)%gWU4x?3lG9DHvkgr&+_lqfQk1Py zZ1hxp!cx=Y-F%(X{IYdI(h?#wl;fQW6O!Up^-~P}jjV&X%*_1qJuMs)0#(B`4g7MW zv^7-R^9xO_QzD{b<5KgpV=@c#Vl@my+)NF1Tw`=1vmA`WjN%gFl=V}?3jFoV!?}D? zy(3jMwJm~e!u?~Nij5Z8O!f{haf3Q?(t7^!#(3T)09qW8#WjN(=4M)y-6042=rnj18#n{Eww{ZT!S)9)SW^Sv@Be>QjMK$d|bne^wTu6 z+?>_TWA)VxHErz@y^V6sgMIVO(rj!q?A_JWa=kpvowTA;;|om;3awI8U40WGwW2&! zG`Wm)lk?pp!#yHGRTB%0gJbeDe2r~OjI^w>aw1Dg&9vjS3oNp7^1^ijUEM;0Oe1}K zls&>DyzO=L^t^0>GK12%46~wDtiyARQhcHujiUAJeAN8>LM=R1lr42j3U$q-T)1Mjv(oM3v(vLQRnp8=qU~~2 zqU_@mGVN@Y0{o)_Gn^c?V{^dqtpTeo&91X4U*K`^3ubdeH=AS3bOnQRr89> zQ<77hL#@p1TrvaVe3LWG()?T;!d!F}RXxq)EF7#oJfmI1W4RJav)mj_lk`)JvO{b= zwSpata}qpkZPcBVz0I6llgxt>+ye@{GD6H;g98i=_2V)_%u2$&wd@krf-(dBG+n~D zR8`}HJ(LyIQw^dM^6U*Gz0C6q&7)&A?VZf6!!)e@iXvjdg47LE!=n?69d-09@*<2~ zL;S2Gib~T1qist(Jh+TZqLXy9!@}J{T=UEelfzS#+#FTai%s3tZPZHrLlZrV6Y{dG ztsR{moNZO(99^?)G?Kg{Bb-u{!ZK4L&5G=~bW%g~GK>vkibKsk^h527wNz6avmC>e zl~X)Y5*7VzZ0*!?>@DK$+@c~Zbu+wEoO24b-7>wDb;5GuV*PY8{kaTdlytSDBeg^H zRQ=*SO>-QQOM*RP^ZlG7lAXN0a`fXJv!b)33f+S=+#FN1L-m5gOuWnuGNWPwtPHYa zomEY_astwnGu)J2JoAvTS2K+;dz~{KLZy%yf;zGmBDV3nDzi^HQAj zT{8=#H1eWCY&G(7qEiBs-M9jR9jpV2Qt~`p3_U%Hzu;sOG*V%-X~lwu7d(rk)M3`;C6Li2JQGmHY%3i9G|Ljq!a48uHi1KhGp zZC$Oky$dzC!a}s|v*SH8j0}UaQVZUPQZ%%z4C4F?!b{Cu@q zjC33v(md7Uweobb)Qs~}y&^)3Ex1xb6O!^(Z1pTPb8>AQRTK0w!?QA6OMTom^Foc& z%pFtA)v~n=?9Dw*QVU{=+>|p+G&6mRG=kOq^4wx$Ees2}?97zh!U~dt{7qFu!%Wf( zO!W;llkDtDU9HY>M&{<4pVmQ`~ZOBi++&45M;%6g4uV^;F%AVxlswBNH@&e9iPM zZ52yGQnlR;A~X}?9gHo4ObTO-$*G~%31vvky4Z6iyZ6k~(5ii`sT+_{R3N-bh7{VW1gv&{k${oSp!lg#{+ zEY*x+V%<~CRKmRt9D*Zb!*qiE@{?>MbnVr0++3WrOQH&+N_^E+T}|@143(3jloZpG zExnWy;)2{`3|%t|lC||iJkvBI1N^nza&w$j16`Ah19ObjG@|YFtV=y2tsU(QExlB2 zj0_EQ+_+*hef2F;oi%MeeO(Pp!;I8?b0YJ7f<2T|v3Dl5=c* zQ*-zlT580(mdTW4HH~a4Klrb3=HB7 z3teN3ienW`(u=h1GI9a}6Ft+_{FT+Y+)8uJqg>qdEaFwIofJ*fwNmusw0#pIG843u z3^G;xQ}iO7v)ycUlXP9fl3dISm2(4h^F#Hc{nNGmqm(RiL%9@PysR@6<8zEdl#&(o zLzSXqB3&(vjg@rG3!H-eZB2a~?DW;NJ^kIH0xjbrwBo~jJ$21BopJ+8HSLk{xF#sNa2feoxp@R+scX3z zCpyFy+L-vnIar1j6u3p0C@R|NrKWo(T5H&ZXyrJS>M8sA`ljgFWu@f$sVT=>*jgo; zI#_f0n1+O!Mg?g*2WS@*nz*ZI=GZ9}mL_|aL}og>B}bJi8yP3%r3E|qr|CsTWgDAW z>!oIST190RMtfwdYeXmKapgJ(Ci-Z)#zp&hCp($vXGRt0SSAH)q-f+B7pAN07MG~% zdul1`nmAdX&cGL=^hE z1nD_>TbOVqD=H@@W!eO&xcY}$#70M?#>eF8>gyV2>e!?x`5N1+IhxocXyxZPD5vVF znCm8Hxf=MHx>{<+MY=>~S|!-nbGgN+x;xvJxOfMs2ju6N`o@+fX~)SmspytwM0r~!<(MejXM1QDdY8nc1S`s76_*$4VLggFH%hi7CMC934R z$2gZ{Id~W+nQC)o`TF^)XoXpn_^V_pC3)JU+7)Ce#$@G2JCp=zYN{Fe$E5fb`S>I_ zWGkzvctxgY$EO=cdl&kc&Osm?pZp6`G}b+SmlfX?W_HsfI?SX6kZT*{E5j_{X_B+GYEP zd00o92fK#`h573G`&f8~hO3w;#)kz(q+7XpD4Ug77x`K{B^f2___$k^s)rWj`jl;pZNnCB{68-*2y z6{@P_EBPDe8z-ix1SN5WC*`PWDLO=C#e0-wC%CH{#1-bLYC1;7d#FYvg~#~^xEr`; zXz3g3hZ>e@CEKP2dnIOtdMcY0IRvI#n?__5bA_urYa6-bs)Q%n+62d?<+|i+q*-M| z`Q@eO2Py^Un5e2}YPxFaL}n!UW+*8~M)_H#hP%32WQXR3#VaWVIqRF~ zn0pqfa|Nmyn-;hSYXoTe>!sT``&)YZ7I=rLxTIk`G$K3aAhee7uxxnC;7Rlt5`;vCMelC z+1naqxtc|U#kq#~SfuEsM@1$iYNV+smN-~zy6Cv;6sY@p#wL{bggRKH>X>q+85I^J z*yJVXIp~|2`zJ(Yxw zdAa)JX9i}vb0r422PE4U*!l*gsRX&J`5X8tTbQV*Yq&*unt@*4az!{NZ-T2bStaS!kJOr207+swSD2 zT4bepCOKFn>10{t*(m!f<{2a=1$*WNM}~5_#V08`r04rPd8S9GB|FE58QJA}$Ao*w z*(W7vrWWg%15}bWftdqD@G|Q1?cNo=0>I%Wfr8^=-Sx1dXxkP#aZQ)+QsXd zXenC+SY>%@W@qNRW@;H~afKUO`+GV1hC~P3o2w_fS*OMLr6&4odio_Q$M~iu8^vn5 zX1a&RMJHItnOYi#nz{s~MH@RhMyV#MIv7Mmn*?)Ndig}eyCmiZIcRGIScD{HYbVF) zCYifs1{J$0m*{Dk<+^9;YFOvGg;>U_#1;gZc;&k}rKYMHdMTwuSS$K_aM|X1TV{u+ z>slLYl)Cyl>x6rH6c=Wg__;+SI@&vW+juFLWV(cCq{kRphB~Wfr5C%#`=l7EyZdT8 zCPEWh z6((xASf^QqrMcQDsRw1o=V#&99no7zMaD7!}a1gRF}YbSWAl&D+#aAg&z z2f1YHB}7z&raN*OsYj-oIq55zxMap!q^GB8sYKd_=9?AyXodw?ctlt_s%J$xsiqX0 zImer-#2Wf$yX)HJ#5w5LS^FBsq{n&MbD0@ML?yVZYK1zQ>4rFI+Z8(G`Y7fkhUS@@ z`o>rX$5`2$$C~LFn-)5_BxWe)Ihz-Gr>9t|xCX@AD#ls(xGQp{dWR~N#+b%uSp*xI z*d~QX#HAXV$415{+GV)77wTpuMtMeA1?tCXM`{HrDLEx4C|RZHC>k2Ndh56cM;U4+ zaA_I4lxUlm7R36e`ef(FWajAkrYEKvN4utE`q~&Jd7Bp+7o`}v=oT9W*{T=#=y+>+ z6vis&y8HR%hvn<0hoy2^_@--lx~a!UXt#MuzxkbiVMJFX` zdS(=QIwlnaD;L`bC8nZyf73nAYW_xFbI=j1tW#w=snj zD=_?C|bo?T14mDM0#i{tChyvrzM33 zXc=lnarwqt*_%dc`KJY21m#AkMcM@hs2Mstxw?jFrkCo*#3vl)?cglEJDg*u1&DVeE-B@`rwrY3UPYg)Rx zsB6Y0#XB3h2l!-!`jqG-sbSiUxd)OAZn0p5p=_RO{+T<#`nR~e8M8yOe zHLTKWd0+S{9jJ2*s!#%Jehm1M>H zl$bjD8YCFTh3Yz&n3jb2*#}wLm>P3sx>*O5Xc#y<>tts5Iw@P(CWIuU_~|I>c;=Ys z=UeCKdKX$1tH)ZWq?Ty9*~S`171_G@XQmp4shCG3yXcuYa20qad+SFBo4VyCJF5ok z8roYcS-K_`7Uep|IeOV<`DA)K1;=GrmKv)h*(b+4CF?raIOJuPCYYsV6zIgdL@ILm z>jvuC`(+1ZX2jbR#3lGR8XG37T9i7e=ev1kyT=7Y7Hg}=T1OU!270ObnJ2jFM;Hf} z+8f)11$rcC7R1H4bET^VY4{aJxt3(4g%&0F>gjuWyC)`Ss`eaxu<@)HGrG@3#c!q1I8Yy#m`8j0!=4FR?Wdz%1l`6Zrcw59-WE-n_ z>iY-8x+d7=2Py}pTDun%dKJZ%Bqu2<<;Q9`7N!K7t9si+8hd8=bEP`@*=2fWcobzi z+jyD!cm`(YYG@Q%`n$))`G-X0XW2NHxOo(3o7#C77^o{-=&Sf;J7?;+Wdx+;8s;WPMkg5S zIBD922L}{IWCvDd@sx#SurBo^sJB?jq)m;~wihZ=Kv$K*IBhbFn`8k)O1DXHrCxyQyD zgcezcxs)blCMP>57-aif7lxLGdu8PWd)t_~h5N;6nHoD31Z7yMhd5Xoa>c3?B;>>= zYAYs(B^G&l251?pndXFe6#Hc*N9&kJMdz1j`D-R>L~9hqh59*|s%hsaD`lky>ezd^ z#wW&UDyDO}C%L8=yW3dl7iZ`u>F3#7xQ5y3ri4VPyOg-Z*}0iV=a>YTr5EL9yQ}%Q z`3D*M21ZyU`6n60X-C<`B)KMgbNTxQdM3ssMH_qATG}P}8O3R+=c)Tg$Cai;X@{gb zWyj{{`ltKo>Fd}grfKFGYedC{y5&SA6>2FPMOnn;Mn-XI7$#^(1$!jBc-VSJnb=0e zsq4Eb$7aN4#3dxh6sqT#8HBoeW+!DhUO#D^s-1qMcj1m}eXd)V2zn0engzPqrJGtggcq2F zs2b_JC*oOKko11uBsr#oF zgoUPA>Z+uxm{!)dDx*6)las}I$SowygSr&$C>O}jwXL$K1x`pRQl@uGN z)B`&sM$q$h2p=$NbfS?6knn&%gL z6`FIM{rhlT5AM8s(NTB_SeDfy+@DH_N7=6e@;y9b)b zbGbR?Ci?nD8<>P|K*hgu2x;eO5XDjNtYZY0C7niCl7C9EV2YBVH8w4087pa>C zIRwTkS-8jhMY-lW>f3N>IO-~D82W}Ld#d_`xV!or2j`@lIBGeEnnmQ5W+bae*tj@& zC>iD$TiRuo>Ll4}$0Yj2TIHpx2j+Wdn&(Evaye`Hgq!E&1gcx>DVlhd<|@WUn-qnI zTLh@+1iLw_x)(ZT$GNL!IJ#x!S|r(rs^;1kKLkc zhXu#kWjMR#=ceeYrMY?}_^4PZhUl3GrG{GM=)@Nrt0)&l>#8aGdFo`UDXOX#c`B)E z#OsEsb47*4S{VkZ=d3YH4`x|=O`bOKNsD=Ea(*tLuao`P!=KD(B^E2c^4uaXD$E2d5}odF2Nb23zO37uaVy zTZe^&`=(i|CaOCZWXBZh+Z#q$W$RiMXlQ4}`J1bI`Dv>wS!)&9M(HUgn#Xf_l;mjy zXGIx@=foS>T9$gL8swP7>nFy0B&RFtspaeB8wC|O#`w8w6`7cNg%;+!TdHVy1ewP; zhgw-0ga!rcak<*(yBZtkM<&Kvq-*S<{!nt7!-`P!Rj8U(95_=OlK z2N$H6M#UO>XapKX=(&f6`szljTNiVw85&t8X9pFUn5P%}Sm>x^6nJZg=NZL^hQy>Q z`FU7|C6`9)_yu@m#ye=Z=@mr>+ol*QYq&<2YG@_v=sPMaaYcFtXX*HbL|W-ZSY&3H z8fxbF7dfSQgheIh<(enB*(D`qrDPen#Kq>A={RYcg=ktDxT))D2D|0v=4jhRI{I+w zI9bQ}W-D6iXt?`(=DKRyIck~}1zGv!_*p5rXq!|RpN0j;&=ZE+y`}=u@2Iafv z#wj~m<)(OB7h1$SyCtMpW;&*rMaB4B z$9t#b6}V|;=y=&DMFhpBdKY_VnkRb)<>ng4sQSjcI%*o4`Pmlva7DW+M+BRvs%Puj zh1j~sq^4UIhZp9inq?(8_}O~}ct+?%sd{JXSVSgSyPIg(g*n8#28I_VM61UbB)OO> zrUh~pnEBZ$TBRH2`KT7#2RS(BIM^zwBdZv{IB`d1A`y z`syeKlv=x)TWVyP8f2E*aJd<0Sr;gq_$a!n=q2O_8S6)C#Kc-D1;-m3c(kFD}{Uc>G?*O1sHN^yW4AfsTQUh1tu1UWcsO>*o4@I zD!HnJhGqF{XXmL|_$jMv1r%H58Cqvsm>CD?SgLy!y2qxanVPA&M5`xeaM`Klx%m{7 z+NOD!1cfU{1Ufm#Icw+mTbTu=m8bO-4c!g-` z8>%Fk7U>z=CTnPxL}dn>JEZ5Qa>eKC85g@pgep3?x_W9Pg*fHtWM`Kq+3A=&CMPAw z`{@~EBp5|1#RMB_>X;>ZCPeEyhGnJM=vgFLCq^YDdg^oedRk-|r|O&9nxt69M~0dC z7RBiKt9u9e>MHBz<>#0r>Dy&QIAm(4n_EN$=;fD2Bx%J4nB{o|`nv?j6{lGHapfBt z>4j$J#)T^@hv~TG8ygixo2SIN85-Fq1~~ianq(!pnQNu#M`acn#(3+b#;4}T8mKv_ zCnrXk#+f)JSjTcj2PcIn8s-K@`WdFX*#~GE8^<}Q*eVxf8MVbA?%!x~gedM+B&b8e}`DrzIN(xS7QJxZ3*a zY9%jcI}c%=9_$0fK#S?0RuW*F$X+4^%?hw6n`X!(Q{rzNPl z7ez*S+b8B2+ZOx8Tl!llI>))%nHJj{nL66rs;k@D+qlM=88}577MQ82DO<-o1;mCG zaV5Gb+8QKTTbEkL7h5=FCC5i5#@Lyq=({-><>dPtdZg>eyM>s#hUVsIhuYZ3$D~@@ z`S@h$X=f)Sn>!R`dg^hhX9k9tYWOCo=trv>m^;V#7eu(*TbNmwBzna}st4=mN82bF zCWY%~8|1p%<+?;_SVXF5rRchbtERc-*k;=Ma}}y*+M8rXt2j7Y<|V1=`b5|%t7fVt z7+Yk=dxeFXrMjuA8Y!iuW_nob2WW+-TDYku=tL;x+1ePpraL6qx~Xt^mF7D|d1VzU zX2b{O#|31%1ZbD$hFWO5+Zw6{>gszXl;ru^g&TNT82R`ITAO-mnP?QI>*~dMYUZn% zm>Y)WayhyBdE{!@E62q77%JMOTRAye$9Za$sD@Y-WGF?2r3I(j>DpV`>sy#*r<+G8 z$K)C5C3>2fXuCxO=a?%iM=5dXxtJ&yM|e9V#~8%N>#103o92fV`Fm>_=LT6iTIjf&`kH41>BM+taE00X+vyg$=xOQ1q?xI>xoFv` zswJcZ8M-JIr00byY8flVhg%mV_?Tw8`+BDtM%a3!IBBFAgl7iDgu6#N*#BHW%%njI7Xxf9-hq~lxrU#oC<@j^u6^3M}nc4drYXxUUc$%e}sU}An7W!;XE+yI>Y4@^78g2r+PQ=kaoIX$mWE{pW*H|0#i%Rm zs~hDdCYmG{s2jVh`=(n3xJD@I1?Orjn_Fh&Bsm2n78qpdn}=oV4Js^pre-2Om-u9F1(=vuf9)Wafx$AVv&N8p{W9|et2d|Nk*|kv;z3}Z*y}C@WJo~ z3Zz3`(zT%KKr+D82z1&Usx&Ik%m8%m9;z6U0jLth@j%Cs@1qyw1DU}tWHECg-Q5Di|7o z&S^$J@CYOZO?;#tcw}s1igA*bo{5@GinpqkzE-x1lXp>6UO`q^Zg`HGwqB0APD+%0 zk*bHAxtfx5bhbu}opD~NmP(*bj;>CSR=B60GFOggv0t&8mXUvHl$D*kvQbF3Vy0b^ zl98gTxptwhvU{Foa74O?MX;@nS8_>4vR!JFlU<39eN0+{hE0rRQiL*BrjNcxiHEU` zS)iVczooUST9T1(q;G0yNt&ixNJ>JuPeG2NSAepQm3FaLsjp*PsY9%HQm|%}Ur~&Q zbGAy79#@Q+mAblekxgQ7Kv<5IO?bF%v7?uAu8MhBbclVahGk@Yw6VL9PMm{kkY1{v zZb3&`&Q)O)N<*f*f6~pO=`Flc->3uAuL%04k}16%37_$4#e# zk9;;XGKHKzoeDYgnb*+RLP0+_Gq1E*0bAJyDv9)SOLIyx3vwzkN;;&2RAH_LrCSQl zoisI3Fs2amQfz>cr72EVm>3!>fH24s3nMcOb*9FK3cMf!8G{t#!{`Q4?gf0d5hFM1 z0uzPNFc|1CK&vi64G;9{GRQ)KS07a9AXk>4atWjmxv~VcNzf}xkQlVoCAqRRGRLSa zbz@E40}Rwme2StS60)N8yetYl0uoa_vZHkLB9r6tybD}{qEuZImAwN^OOjPHTy4D6 zJ#zdba>H_q0=d#Xb8NyCt&=jcQiE(2U2TJ$wTf&FTn%Ei43wh`y!8W2+^sDPgS54R z+%+uIol`ySb4}v%!_?eUJhUyH{c`NNg0s_9JycUHOWd*(RKgrxjg73+9F=knOAGV$ z3!@YjBa`hDQc8XGqM|&r9L!v_Bjb|nqt)W#GX0XhyiL*#Rk;Gpm6Z&2Y%Q%Vz3f7B z6;pJb!_(s(v=dcxtfD;p^Nfv@{1T$vowQBk;tiBc3tUs;QXMr4lMNg^z2ntGj3YC- z!h-YNqx|AE0`)wzQoXIx^fdBpt?W#+?Sm{mt&+kba+GXhG?QY?V&iPxO7u&V&6A51 zO-jP-wAC}Ru~&_tScgUutdb$3p{}1=k(`s5i+0Hb);lIlEEM#sQj78-M?LfEmz3u# z=$B*^rKT$Ar{$LxDVV|UhKN<*MQQ3=C>SW9xeb&SDX0LAjTOv{3=~W)%@jaq@q^9) zCKc27v|4awiFSz*eO-VpeCY22(9x!5pnDjgVS(2Lrj`~8rbea;CYC0Ud$pjNkiCM} z0Az)@*rNu}^z3LXQHCuhD2fHt3eXVLj|J6hPKm{-;BrRa+1J+-TMY;*G(jqnYd}i{ z0|oRN5F`dIz(}qEjWMr6aDp7X?2@8eY?Nb{W$#w(=nV#aWRb(BQooikis;%u` zXk+b>o|mGoty@%N9am_Qp5&Kpp6MGtYaTvq;0BLY~q<_>K{<-;O*t(mt5drs;R=| znxG$25*-w45w7MKreUY36>FPpUYZ`Clc$~)=jUHyY8vVqXPKTCDBm zkr5V~9UpC%>|yR2!KD?Lts3Iy>lJ3>lvA9mo}=yHVdImn9_Sn4p|0i{7h_;ykeTA@ zqaNg7lc}c}>lWdWTcl{38j@=g8KXe4HDg?(rG`0v%pmz zS3kHksRTTP1{z2M4Q07y7D30dK&L_@2DVI52DU)?#SnCtm^t)YJsy<1zCxVDaxK8gGLP)@}=x( zG(xUG7z9Zft-^zKo*9dGE4Hz1NMn2K1JVVe>JX)0p7K4^zq*i%GmKdErYo{n> zQxk7h9iO-qe=VmRzqsNk3kTaEpR5>H9mmj!46VqBq|lr^?Oav;B!6quWRJ9X|5Ph~ z>k#`8rBJSDXI0x+k050?ACI9lx!P=z~anMD_gfL zFVi@abY)vh-E5PvTw`~AC0BKCE@kJaTtAC6_Y4iSfK1KoET#0M+{_}4G$SWhKa&9G z2s@RKoKi2F408)xZM(#L3xCHP6Cc%-z>E@ubk{H&%OEZbzhG_EqJ(VCVE3RH`>0}* zh$ug8lfZ~T9W6io+&mxmG+pxyo1C0mLPaGL_oPr;L$%OIE+g9{ z&(!oNv-D&W@04sCtI(JjRZs6wuQY#U7o9-tbr~qSpwR%U%RrS0Qa2vQr30V}1*9r9 zuS5aFhFm#d0v!f`-Zo&MplfJiV4z@VYyoNtfsz%-bic&hR0Vx!UuYUazG(ntRB#FC zjsX*MQ2(tYHP=G{%mitK-Z5YZ8mC21P#`g=Pe@HrhK5F#CJJcPr!(5XLYP~IM_7`R zl2*REiMCo+h?Rk&PO4_HRgsUYj=isOq^Wh7Uqn`}jZ3^{w3?QhtCpQzyj!-SQ>=@h zonMLuSC)slmw}pfSVD40tbU9~u7iWSMR=Hjk9AmXLa}zXzq*ZoSawvbi%XDgXhu$| zhj(78S-OU6hEtYLn38FfMKD)fgl3d$p_aOZQ*M#EQn6LMO{Q05N`_ikk-wHls=0%v zc4CoxgkGkqL7aU^uv&(BP=ZE|vT0;dp;?5VU#y-ZSAbEHewL$quD83jtCG3DYmP^* zzLR%JVL`HLbflqenvG$$qE56!x^|Rms84=cac+rWgjbM;a;meRs#lChVgy&bdWK6} zpnF`tX0)fHcdDU}dQn__bbyV%iH5pfghsZOQh{=6dR(wibhuuOk5;~OkdCH~Nok5{ zew3bBc0s-sSGb09Qe1w%Qf7LFqrFa8zNeb1Q+Bv@c%+(-X{oPbfl@@8dbVSFu6Jsn zs#m;|uYQJ?LqU$Qd0??lfLW=Vi8GhKW2AasP?TL%f=WuBUShO|Z;^grT2ZLEQBJIr zuajqnnUZ3dgGPX2xUE@+x}Bv#Y^Z5zkcxAPMs8?CMsBPHmt|&Qkdn8)r$$Ipf{n40 zZlX(|ty!v%vU5gGeo;w$sH?YAoO+(4PFz5YlZ}l>L3DywL9|kOk(ygnYO!I7eG*qn zpozY6czUE$qK#&Lepr%$lBT_%L4r+yx0{|#Mns%xp{BmFwrNawM!Zj`pPzq{nV+dy zvbUX*i=nOU*D zeW03|L6BO8y0>?MQ&xVWPo9;%rBb|unH`sUs!u?&ua~>JnVwB)ezZrNo_b-Nk*!B* zmb^jkaDkp~ew<~AeQ-`;sclY}cD$lNQgm`Qmyw2IQJ7OvNSK#K zPGX=>gpPM)npvK`QK7n}fq8+Yjd^^Ojf$qdl|^A>tWi*+f0Sx~o>!E)qiQ}lgRx(ds$ZDBlS-bYznP1-v%Q~%N~X27gp}JCJfV#E4UZ9C$L5NdER*s2V zfOS!dk9&BWxu0{MU51vHil?bgu#a1@wX;R0or!-yVWDxLN=!nea;$|hmu_xWo{5D~ zWKKY;yM0n=zMfC2zm;yLPQH<|x`D2$MTUimucCTlj%Q+8c#3vRtY^G;gt@a@ZnS+; zfst{xb1YYQMsjL#fL>6rhMS{_hF4Iqva`BFh@o$~Wmcq4jH!8~YN3mfzfZB3nMZbx zvx-}$MwmmcuAg3ldZeX}u8DIjSGKKsfNgkin4OMgNI;sKYjTKNkgtE9Zn1TklYx11 zP->}jKxuYiyhUkZuxo-*LP%_Qx<^b&ylSAUy}qGajwY9_V}hEdory=7leR%jq?2`) zMS`NUu9B{1k)pkgd8DqHgQ}mUwsCBdy^C_VrCnZvOPY77xmcSD=f7tD=pgkFs`P zSh1~(ZA5``utAQMxnEkib!4i)iE4H{m!45dpnaNsOkSaCpoT_HvYUpnL$TdU8U5 zZCti`W{j(&YHoy^wx@b(SY}Fgfm4K&R-RU2u4%YROjxmxpJJGywojn8T7g@Zp^uFc zmzhUcLRwgqTE1nLTSmUWr%GZ{oSAD%UYx15v07-6agJ}0N}7vtvPPg~p_+cOjjdKx zyoq^csClZ7i>+^>K_r)(yGgQhYM8Npo@aqmgi2mewzr|Fw!XbmMwW3}USejJzQ12Y zgjck#o^8HGT%MOnq>heiR90GmW4^Joo)mz`Olx~r*~w`QTYZKj`Lppk}pQihU^ zn~h3pzE6saQd)s;Mw(l(VvJ>|hp}B?a8YPThMQrYdytuqMrLNZgECi)kBYKYw1bXu zqOW$mZjotTtiP#)O}Le=sbNfbu!EUbR zrh7~(myWS+npV1lgHef_yFql3tNzM6OY&T_TsNc21I|ZhDTnZnA-{lWlZTQD#D*wNkiGQej|hKv02I ziGHw8R-r*~wy~W~be@`4fvwlv7Aza+;f+vx{b^ zkzZ+=uew^YhKFvBUZB6SN_<#$l%rpWN_=5TwsT2AWL&VDi=B~nVQi^>aVnRQPmXJG zk-M|5xuu0_yqdO~iG5*~s$+tcqIGn%wwbP#Lr7wFf{99olVyOfYMPR*yOL?DubP3S zvyDq;p?Z=vmy%IIcBqTFkz2S@fpvzWU81v-hOMKucc_}JWsFUXj<348ZLCXRM3}Li zN@%QcfO1?ysIi%bb%wfWer{H3L=abMxQ}ybPNZkDRdBvyn4g=ocdm&~L1LIyKvHJ7 zo3&4bnX7(cq(QiMRzjRwWR8z(p>av6dYVm)pO&w$eNki_mzTPmVq~GcuYpmTvQ3Ox zk)MfDnzlz;d_+#7RiUYds+nPtyQ8~`jjx_{q`j6(xS3{ximghZN`$LVc(_)ycQThz zNOD$SlC`~if=jSUu4blRU_>^^7l{dmW-2z(>3LDg0hx{tF~K&0Q8Ae@Sx#xbYJqy; zCKfK%+94@Lk$GI++M4-=nt9n;@n(wFN;%p7(Ip`T;Xa{JI@!tE8u?1`d8yHfLBSpo zA&P#fc3u{iVSd3b{!vD`o_=A@e(BCBTxsgDg)S+D0p78>77is2ejctNx)x~;22ts% z#ctt+`K7M85eC_MVftFmt|~5SdC^J^(YgWV&OUAq#VOj!(b-(_zR3n!IvFWJ24)3@ z=_dAWin@t0nUPlNp_a}8<}N9YmL?%qK9*T##wj+A7Rp5~vEJE!A*JrwDVnC47H;8T zTrP2;`VlEHvB@4qwm}JwX3>exwtmTK-bF=L8Y%G+Va1llF41m<76m#c$tls{u__wr zcDdn+S*bzpmf04i%Jy8b25L?kIsuA0rTWE=_I_H%9(G0fSuUATo`t@FIvOsKCboI8 zLDnS^`ifRXd2Tu}UPjhRPS)ubKKc1Rky)lWT;^^bp&|A*u`%I!S_Td_%G$-529XZt zNgBD%nQrDO?)m{GO0flLuFj<fL51Nawl-YZnt95)dB#Z= z9@#~u`SxliPS&pJ5!%@q!2zCjg_*|QIR<8SsRq_bX7-+zwp!k?xoSm*;SOO%S+2p+ zHo>-`T)qjJ{^|z7DN3H%O7=G1p+1Tx0Wmsec3#S{zMkeOrJi;MiqWo~%9_c!?w)=& zwhp=(>Sp;W_J*qYN;=NTuHjr!Dqf0C2Ht*tna;85If0>ij!7{NK5E$xhL%n)QC2<{ z(V4l{ii*}r#i8+m>dM+)K4~rq=@tPcTCw4dA=bu0T=|McdGVTh8nG^UNfGg>ig`L- z)^1Lj=}8H`n$fW-R)!kIp?WUrwqB*BTCo~&hAQbQx{7+H=5|I|W?nvimOflzap~Hj zNkvZXkk-mI#~uzVR;z_83k4a-e#q_$%PI& zc`0Fj#m*|ZdPxaI>X}-h1(7y(7O|;*7J)V)rYQvpiSbIBT>17T=6(Ss8gZ7H-ocI` zDb6+)THZ;Cnu=pR$!T19 znmJaA{=Pb;%1(B{#tu$q#lGJD5fL##1unME308?7Y1&CHSw6*Tn!b9LfpIo2K}L4w zIf*8zzEOT^Ix$+NTzTOh>d~I1nmVDbc53FqDQZe48Gb3L26~~{o>^|eVZMez*?u9R zk=f4biB2gN=B4gAN)efPnqHQ^h8cl*w#HoQ2DvG^>Kds|nJKQhel89LVWlNrIsPie zQ6VvjiP{<#9tH`e;r4+ZF~NxmX=%!#X4+2P4vB`wwuMVMt+IbXd5Oe{P(scY>jY zBbSjN5MTBQcmRqKys*;+Tb#iukPE@?EfsYH9tD%LhuWgv6 zZlrOZg^OySnTxiAM}n=ZwVifiT2Wk%hl7#3g+ZW7fwfzLp@n;4f_Z_yqO*Omu~}G5 zOq^Cg9G9Dyo42oFiKn%yQRVPs;;F`Rz|G1rdxJIioL6~OMbSp zQG|28g}rUMxn*pgPDFa3hO&mWk%zfywx(sYdVrCh8keQ9YF?>a(Ez@RYiAs=BMr5{? zPf|pJnWd(^VR&hHaG-5|NVZO#ZIND%PkvHFK(3jWTZWZ&7MD^=L|##9K!&DOoTipT zPIiiAL|(R1wwigMX;_iEVT!X~x_3a3VQNlBQCxnKZJ+LW`L%BqLP=pVWLryqm6T^T1JFYp^a~me{_J4x>1-zTArqR zN=m4TX{4`xnxT_j9+#@FdTgqdhFzj!l%sWSskVNkmvV-FpiWv?vZ9Wso=vuQmSMW3 zqhhLdQFNM3kz%n=giU%*xQTIcZc>P2Nvac9X1=3Gkz=Njk+Pz*Z;q*ve@#XL>-qE?2m!nQE?!MnRgL zo0@B+Q9)jcroUsTOHf33k!z;0QF@80d9JdTOOkSev08YDzhQ!Ax|xk@er&9tqJgri zm30W0VzFh8k3+G8PN`*ZzlxW)Qi4&skH4KpjB{#{ zMZTp@SV~Hen`MxXX;PF)h>=~iL8z0TNrZQ-nX4w3j<;orhqg%ivbv6sg>`VWR;*jRhHr+esY9VrzOSXJXP#z)OGKiFyT7fQCRdDgQj~>? zl4qn_aFVe_QDmZ)QK7D~l7>q}p+=T*LbR!4T!vq;wRJ+YMVfJ5p_jLAsF7cRQCPND zQJzYou4fLHZ;_dSnoWeNMXHUdXL4A2dPGcKrgDI#s-KQqKyi+lwW3n0zj;i0tfzUJ zO|E;Kce=B$o0D3$ky=W$bDF!U6_;&FK~|}CYG{OIQbwGim4%m!*l7R)6da9*TR zQ$UG_v0ji#ypNu>p_8eOPJ*|wl2wGMK9{a?N0DlfkCCcDf@frs zbx@I>MW}<1g;{WLL~@pQfrW!dY-V9$WTRd|4^l0%SjsZT(=$cae!W?Pnxx@PQFV-af-gG zTTx+(qN!n`rIWr+T5P_yvsH|MjYE)dIT55u(ifeduq@A|2r@tYWiG#Dd zwO*`Uu8mTWwn465V3@r}n5LdjiM?WkZ*gdterT~*e7vPfd_b0RQL?k2W=KJpX|8Ry zo1>~@uv>zSC0DdYp=)qKu~)FRk%NAyt&g!?a$K~%r*X2nZ&GlKuSr@`Sb$?@qL*qy zlwyg4l5&W%qMmYsgLY9sY*D1LcC;#2kV%Y{x|&izQG|MQpn77ej=8smopqj?lBajD zk6A`qtg?@-o1t!st7(a~rMYHqh^vxvLSR~4TC{FyLRv~lF_(Utrh9==qPwD=qH;p1 zn|)4*U20^4YMhTpVStTUPDrG>NoHw;rgFHayK|g@U3$EmPEv%mnQx|DWRkV6j)^H( zfp$i*gPpN|sIiB;nw3_RvyY{%zNd$JiLQBJys@o?cd5CuPl`{XiJys=fr)COO=3<= zQnI~PgjZ03o33%ZJ(rV#vA?fjf>T6}sX<75jDCz|TvU>deZEn;fp@T;Z(dNIT~KLQ zOo&6apOa63uS;n{s*7sj*2`uB}~Skc+>8eS)2FW>#cgs#N4TPiYJrEPy0^Wjqf=~*ma?K+R!* zbaG&txstbEw!K+YerSM_0aun^igBn{R!MZSm!WQwMs`|3bdIT3Qi*mE@ zrK+2EZh?umx2|h=n7+1uas)tvgk%7O4pNn5! zq?JotNxqSrN_beIx~`MAo<*{!4p&e~uD+&snvbiBa;ip{nZ0jbLRfsdvaVTCLZN|w zWQKpRqLOn-o@r1)c7B|Zj(eevl8KwAWuBW+j=EW-WsxmckaA(Rd8$QvoJ&fex>tg$ zi-oCuK&iT4f}^{7o~DsiXT26?gO1Q6vYl^R< zzlVL4x0$<#QbGckb)vgNa=vDQilbt>QdYcywuPcainY0hzNK%9URt&g_f7TV_|lla;mDf zR$;nZa*}OEs8K?(nWBkNikgG6SzL6cZiYvpN|vfyW}=~chN>->N2Ftrre}7pS-e-0 zSxT5)o@KN}R*s@=P`FuWaFD-)i;}5Mh(TzWt(sG8gj;5yR&0WvjfK5aY_O}JU94eo zG?%u0a$sO`sC}N1o{es_r>mWlo~vGTs&<^ZcBXAcQnXfXxLvBEwVsW&wzWn~s7tnG zq+(%kgpa31jg}+UVYEe$6d$4Lkn5$QAK(KnSW=6D{n|nk+nq9W3SF*QJZjl>TzOJiJn1yS& zrfryQai&F9j(J$9ud{n_j=D{%UYvSnNv^w5x@vNsLy?7Pf>OAvS*~AZv3H@jv%g_+ zZlX`H2bXeUs)?GFg>Oizf1p#bT7bQ2rjBD!p=pqtn@Xf-poM$3jhQcz-{c7Bm_u5xygvbV2?X}CvBUZJ0bQi7tUucXBdzHYXsVo7e2txLLMVvwhtgEX@gp0LJK(w;IQgnf3Y)Y`3MWI!yy=h`d zabm7VNxYR-p1P%)8<&l-eQ}hht*uX3hF^-NhP6e$N>F@iq`Pl;n16t&NtUUvdO)74 zcZg4}tx}e!lC`akbFQHkX^Swn*NMV6VNK9t9UVcfein705fwH}SW>}6HzWdb+!gtA9#_MoLDU zYEYq_hN6MKv#OR#wsUNjk*brQrM9=0j-^wqOQv3&g{7vVo}r?(Sxl;hHCL)voVRUc zadA?dqNDYkEK&;fVsC>nyXoMXt1wZ ztdpyHSY{|!k+ZF*s&R&ua-x59er!=-Tuh2%p;17gS*EtVUP@7^rEjiBft{g|o>z*u zww*z7UWulbk*BLok+n^3WT;by1(#-eMyX<&Pk>HFUPzWwNk~FoR8Wy?j-G11hefVV zX0(Y~T#8esPOeXZNrbanak{O4rgE%Hu)A@wseXuqdY&JbW~_IJm1T~S4wJD9GA6e znwoP!kbY>4QkH6IaH@NfUx~AZyM}9$zLiz3o0efzVzj%ZjdM&yPF`R{N@-$Lw3A^( zth=5`o`G|yXJ`nQwYiHu9bzUPmW!@k*lGHnU7t7cackCfQi1NW>%Oi&=7>i)v`PlZT#>or-FLOOc0tN`P%fT3VR9Rcc07fm2ehTcD1UiH=7=mVuo{ zDwkVGVMv^jsegg5qPL~Cu}6GKqK2)xW>Jh%p<|M@cb0~7vQA!Licx^CwVz>*XP$Y! zXOLo^dbU2iB2Y0gid%tj9rO?eu0*{d76G|j+$ebp2rh1(&6fs;h&!lU9mSL|RUQTdG-rUYwml zX0oC~xN~w=WI(=AM4FbRgOa^&h@x_|saJA}T}qx;oQ6-RmxrNiRLxw21uYDP(ncVSY7hl-c6Zfdwgc)Vv}aI#K;lVXy7 zT&$m#F;}E*NS11bzKN4hNKQ$%hmO9Qe_*Cxk&dCNU5S0Xb5U4)zE)D8dO>7%QKX`g zb%<$Zs-9M`t(%j6kY$v*o@F7IhIK+zf|^QRx|VB^Pm-5kU}j-xPN{0BVMtnDM3zZH zLY8V`WO`y?kiN5_r(;NVMv|Las&gH>^kazX2A5*GnNdPSzG;|mYQDO4 zM6yX>nr&=?PhzH{c35tVmP&e9ig$vQQc|9griZSNZ(yudOsacExP^7Tr)^5MQb+<< zbd0uQh>>!xPjR?=s#m7Hzn-x}o|2o2x2r**N?3-bmWhF5Xk3g>NW70nPLW}jjjOYL zY-zfSr&5-Cl(}_mE>~#2qi4FlYiMkSfvHKhv1_(@a!8<_Zgiejd~AV^t8PM;RjjXH zrh!9AxO0fVW>8q3yREfmu5or@kW*;BZK^hxvq7qHgkEg2TDrTLc~o>^URu0eXzA|Zc0g%xs{5ywvw4wI+sJ9aIe?VN`-)tffkbu6tOTx4K1^rK^*%f0}QCXSjcodbV+5kf}*zhN*#viEgR0Lt;pl zRzVP#yN79ZUbJd>xT#*Ij+sefgk`u#fxlBph@N6VOlpviPkNz=Q>sB~UYcUEX@I(` zb(Behg{HHHl8UlJQcAvs6_-b-dxC0Sv72M6x2kc0xt~XpuWClJvRjUCv4Ne3sg`P7 zsjr=*t4V-Uri*K0xVl-4UucrEyMRM!s-t;ac0_=Sr*f`$XpmC6y1KKo zdzhV;8JBaCL%v3OkcoMag+Y3Xl~TMz zc21m4sGd$_h+l$+ind0ohC{rfQ(~IEb$(8?U!p;wn{^(SXMSjytGz*1gmHFavTs6I zq;7(rmcFZ!rCX_MNTz#EOnO?ToxYj2wSH-FXrz6FrjD1nbE0>yrnX){xPf9(B9~Qk znx(t0hmE~TxKoK+OpJ0tyGcrfyN^Lec9@c%x=oCCVMLL2Vwkys z8&__&X-cxbu5(FHPKjn%h@Z1-nt@xswU(udyQj6eZeWaOhOSOTT6%)HQC5hVXGC_Y zpG#C|v2|dKvAcz8X|NBMuDz>}`dWNE1T!FcrT5MjHwnad!g`1X3OlpBjq)JJl zNxq(zt(K>+iI<(bVWFRoo|%)9r=?ADnzwpM441zx==v;3WV1pckf>f_e zlk}9_Fjp&WBdu5i4Wm+9hg4--Wp#Vq81v}-aMQ#h&%oGR2M;x`NE0r#l29uTt(-J- zx4Z;36Hkxic-`U%Rd?sW;CNdnyW5?vQSWhb#k1W-EOB+)kJ!@}G7yXC;mB^T=h_lqI4rGV^u3h$K1du4IeG<^x)VcF1I)hOXbL@{IJq|O-+^XST7aj zVCNEb71zMD~^VLC^%>4ZPOmjtRyKFxd4UFSHrRK++iUELI2Cu5&r$9S`F^$>e6?TGlWa96La1RE1I zXXB^@U0-kA#FA7^E}hiq1glK{$N*O@O%qf1jD(=<=(vnxo#0p(lRV2*j{Vl)7sn*`JfE;qHFs?_2gk@9GcS#pVp}H_lY(G3F6C5L-3aUpt4%TY zq~hE!Yp9@KT$-DkSdy8amy%grkds)cpr2Hfm<&EGA}KRH9m)lt76IWGBo?LSfew=Z zb9wc_d?b0efhDOGB@pe|sU;u{PMJ{SvQtaI8bAWP2>VJ3Aj-j(=VqoL@sgk>fu)?# z+y&+%nUjQM56E6*KGl?uLj3UpKl%BetR#tNX5BP>l!6pSoDTaiKg1Bu5J9cKfwW>6ad3K`I{ ze|Xvl?QH{ZfYe9cO%fc5W&5O|At*G_HdB2Z@on_8;qJ5|ac+^H|Vkl6nIG23Yv=V3E zyl~w@H+7p}?_{nxYbEELTlW4P`Og(?gXeHG=-2|`1f(T2$ zEXBmaO!Zuc=-{}b5IbjgEwwOjyR^(?E^li`Pu1jnZR4=QZ0+dc7@bga!vga}-|%b| zHD4n)hdf0mz0lHd|15Q<$UM6^V^iM{MH@Fwr))cmM1$gZH#M&0484?6+frp66?<)A@3;BH8jyPFa~XSgzPJ^09gfMdMKEfLAR^G_LYG4 z;i9K4kQmfcB=0LRH?%Y*w67$>)zjHqqc~bK%F{hPt}xvp(b=N7)X!JFSl3O%M$IuN zJR>KpAX3jE(mKI4z{pKWC%;tH!6YNrz&<-5&66wGGgaHrE5$%R&8N`Z$-qvzlP1nLp&oezgJ_`L)|>iI7&&&+AJwDFe$}R zOGisb-zqM~P**u1)=ynYThTa}t02xc*ukVAq@>u#)g#W>SUEDl$sy1rT|Yi5u{1d; zUQ635A|}=#Khw#%P~YA@*&{DrKVLI3)=f#x1vHRkz~$|#WnpXKZ=2}lRGN`#X&k2L z7q4QIpr>r69PjOtq*>r@t`!@Tn5$!AA7PznWo{Iom+BK2sg`Y3ps%8t8eqa@UKkUc znd0W@mgHt{=NO`su9@!c$ z=%wlHRitMa!{ro_VGyro;gMRDqNt~2t?is1ou!kYW#<%M5}h4pQe+pVq!XzZ9#Ukc z5^7RVV4|YypJE$iT&R*zoTVOCsN%?#Y7~;7ujUo57MH1F=jEp7pc$d%RN$i#ZKI}c zVsC1$ZSNiL8>?HWo}T4tqpqZ(?h_eYlM9$^%mqG@H3=i`=WsIH^!6#p4oU6`d zqOVz8;FnnBo^PEL9Fk<9XJ;RmnGqKom=Nlg=xY#Q6r5t5;OG`>Sdd}tsFal#;9zBD zr59@E>EP||USbiM!j-R-A8hDcqGzk2r)m_FlA_`6m8_%`oZyqLofV^}uaV@PZEj>8 zZ{(C0tCtmKWm=FM5U;BdU>sd+6zH2)TByQhYNVSVn55>a?rEZ0>|mInnCTyB9inWM zon@JtXK&^jSQt~JW|S8g=Ny@$loXR@m6jQ#tZk9%;hO1gr)A?5&86g>o|K@O7?zW% zrf=h5?O&K}nrm*K>SX4T<>qIvQ5uwyn4)i{nKDQDm*`sOE2K>6Dl2=i_f>R~l6qs2Hg1@2wmYp=ar&AMWE_8j)6@=~rx!W#Evl z93HEk=cgT!r>383q@o*P$K{@H7OWK!=$?>gmTalwo>k;y7-FSo<(D1mt!)u!m*l7A z=ANya?yYH?tD6{Xt>UlfZ0D=(>s72}r)XK~VqwSS?VFYzZ={`45U;P2YLa3RsAZ8J zu9X+9<(^_>uNSFlV;EbI;2Nmm=&a$9YG>o_p{^FHZeW}4nB%D(m!^>#!=>z>72qFe zRBGa`q-tZVt{s;LP>t?QM6_=cmsHzy?tX~irXzZt?rlFY`lkS}B z5T+P!q-Vip|vbc?c}1S6db6Ws9|GanrIvn@9ORq9}yXAt(lgWmmBPx zq+%2muIv)vm=kK|ZLS*Vk{P6A#Z?%Qkf-ISX_*>sX`3FXZ4ncs7H{g97ZPX~6_6eq zVr5mJlIfpnWf&Zt5L9ex>tk>39-CYc6Pi*G9+eoC>yyZ38=_d?9q#L5=V1_=YU&i~ zmFQ9&XkwM0q??iMs%fgJ?B$`8XBMw+<&%+N8s=l=RZ?i`o@kd9;}jBGpqZDP&gEfQ z=p3D+T^be^TO4E&VxR025^R@mtDo%Xl%5=Am!xNDlkaSwVUUzynV%NtmXhKfWvOhH z@0e_6ksBQn9Hq{c?HyE>tbQ5zZr=)74k(uQa92aS1$mLR^Yn!E^qZ$)tm=&mz78b3WX_lC$WTYOd zq!tzKlw_Ff>tk%7mu9aMot35MYGG^OuAJqsY7+0_X%lB@W@F3cqGe;KksB2jn;+nw zVx_6>l4X}*sc5BXpBU(*=^LYBs%RRl78Rjw>z8kn8xogi=#^Shlo+fP6X0cSpr@1T z%%$vI9AK@O6_*>Otff?J?r83nWt$UdA8MQIqNkow;2u+;7-y>!lkJ*NkQke+RqCSU zs}me+kfG|I7gVBMkmeMdXsr{W7nmCpr0(ex7nC28samKS>=qpFo@T*i6jb7BrDd%f zQjij+Vw&!%qEk{>Y@uROFkr@=IZKgrf-^KqZz89;bEj1s~@eRm7HOu zr0k}e&lO=)Vw~?#q?nrHk{X&}pQGzwJk$bVCNngY2>P!mv0?!W96otYwhTq5UUaIp;VZu zrsm*Yq@=9omTeImt)HLl7o6ec6dDu}77$hxui=@R&y`kUTcm0mX%ZXnqH1dxl&)W7 z zq2b}HA7r4Er=}ijWff%+t&N1#8ng!u4nFD8XoAZUz(yC?W&fYs}kT57LaX}8f;%AYaecHmLBh*%N3NOAC}{2r|WOvk{RZc z7!y*c?v|*R3W@F&46RN7G5o@6ps}~dC9+~c+qU&U3ndqgJrs@~r@9kmZ8IZyi zW9V0yY^tZBWulw!Vr8c4Vjifc9_$-#U6|k&oSf_$>aHK8;+mWlm0s*)mFrlb8ylq^ zml)`(S)3K3?PY9W%avXnt7R2t>8O(I;;3j8tYxO5o8*yL>K>%)6lZT_6K$s$pQ>S{ zs%0K$6&@Du@9yDVV4PLxV(aGXQ&6ass;t44l4D>I7?GSFV`-sglxLKsY@d~AZkF%u z9FyVdpzfNQWtnAJTa=dW)QXBikD&E;w35N;G2QkbS@ z5?G{Tqnedr>S~#iAL6KCsgh}_8Dg*E5SH((YMT;g=IC0OnO10=>+E6YqLQtmToh~* z5m(F=P#o*&Q&?Q!Er>zwkXOM0Zm1yIt9IslOq-(Ea7m(v+t?uX?#ATQro@5>B z8y0G2Vrv#=pJo$nRjiT_7U<=qp_pqHm1$#??xh~AnV(VO8?K_5X;z|=VeGA>k)4rm zX{V{B=#$5lt7j1zrm5%TZekT0s;O?67*?vEn&uvolAIJ+66&0vVi0O-X;h$SrV0=yi>=xkR#Feb2T9D(C;_GM^9pmY$tEU}blp37?nx`zv@$<>| zc6E&j_Ycc(@wD?)aY{AOiL|xwbMg-H&CE3qNeU=5HsUh2wo;0Z_e=^@^N&(dPV!IC z_biGjP6#Z?k8lYI%gV?IayRmJ$S^O~R!+>fu!?r|&yG*mi*t`wN-juujLUW6O4bk7 zH1vs~(39&PB z&(1704K%UPRyPe*3r;Zh3e`{5h|y5v3i8tkOiwLRDRFnOFbFBhP1W=-a!hbG&nebX z%};SuGRe*`womZzu(eTfa5K)=uqxJ5R7-bMwsbRg2~IDvj^xTuOS8Al^bXgI4a_de zGP6!sw+xH6SMw-vbPFyiwDeGl@e7F7P&9N3vDA!;k2Uhp$%;$#Psxf6Rq_uCF>uV_ zvT}>I&Gv|O@JV#^%v5qL2+cJOwJOn#chK^33H6ND_ACI+HJa;2IFxF+ntElKXyxha z8>Ks1q-94bW?Gnrb0z1f6cng>dRV6<`6_#qIt6;9xHuJ>8F=X1>*T5h>pC0dr28s+ znd`@7Wyd+2xtQo{l=xYxDjNhkI+$o0`dD+t>Uza$XeH^J=)?zW`@7|&=jWz57#W2- zTgK@*dgZv~6l7(GM&?>&>SQ=1SvZ7PswQWJB^y}Bgt&Q|`I#A|aK(8i85pDon5Y+9 zxW_nHs=8&``^9D!1x1E?IHx+A+Sup#+Uf+@dFlnFWZ4u1=vdn*6^3YNYb2W`XZvIr z2c~d^25A?lxx3^=YsDH^1v>cV1P6P%q#8PB6?tT2c!WAQglmLFnigjo=_V(brD=Jk z7-wgiN1K~RnVNfQ7o~bSa~ZpPsq48$`RJ=Et9qu#+r(%F#ij(gImPOzrs%t6+h!$3 zBr7FZ+j(hQX*(q+I)_*|BoyS8BzmP~6zbZg<23uDdLP`#2TYg<5OHh9+keaD~RZIGUNK z`4t#i8=IC!x#nkj>I7>Vs1?S##)M=Asi!J=#(C*$IIB6U6vP-fZoL<$Eo`$8yILL72Ddnzr@MsdXezqqTNJ7$nZ}yuDi<24MC)jo zn;K}@_(p056~+2T24ux*JGiK;8Rcl2MJ8IsW;<$YYG!i9spT7{+FD1IBx@!q`-K~1 zsCZdh`KM=S#3cL0#~4MWx`bG18oBtTc?G#T1|(#v#HyGCMHV^aDr)-a>t%8d#|*s|UL&X{LlKMj87m zWyeN^>bcp3+d6VZIKGTbZi_dz;&bo zgj!gchT1#&q-y47qz9^}tH(vfS!#Nk+1a`T>PEWeYuKB3nx+*6WSa#fyQU`TdwctZ zaH*uk76clYxY%fhMr3&V=z7?gJBKDkMXS2U1u7L=*xS3A1!ky(SZc)>WxKdKC8bA3 z`DdkT1gF@?yL%a?d1iBY*e68iX!z+QX6QRP#;2s_r8p)U6j`|%TkE+6>jq>y#K#9` z>89vtCulpSX!_*1C79>fnd!QlszvH*t6TUxa~0{?7X=3-7uiPJ=4F{!#@JiOd1X3<={7DJS@yXOekz70%4U|asa&RtnV#wqDmIEG zVKJtGsurfkxlV?Ofwpmpp21P3N$&0@x;fEV1v7lwBR?6`SN^a=}5wT1ccYF=TMMo|Gd!M@sDf%a*ciYX4pZnhRC86nONT7ga( z{$>HrYI!N?g-S_2`ua(^iYA2_(J6`^&U$VoO1@4d$9IPF@yhN6ngMwxrg2`z zMY-Whu|Yvxk$N5_x%%qPc_v}HK}D`}9dReMk z*&Yr75xUlK@u4=_&c!*YCHe(PS!ww}nKtg}K8~pxajy36>FJu0x@nOqhUq4;>0BN@ z#in^h)=GNj3CT(J-r9;9*7?aPsy2nO`CiUZ{zeV~8G0pt5m^Nmo+^&2Dk)j|If{vy zKAuL-y4f+|-X=<1De3`HDqgxV(YdDT7WvxN*-^GJ0inJTMZQ*!W_pI^MdsS-F@>I) zw)xosfnGWKfo_iKY5tixO8HsQCNYH(rCi1y@s`o1YKZ}Q9%?S8Cb? zA<_Oiq4t?hUb*h}(K;Ubx!%UEp2|vD1y(V!=D8{fzTvLng?S}h_S$yN@p0MNhDxqh zntqzWfvUltDr&0cfx3y#sun82#;$q=Zf;S=A^Ju}88L;9scKd>hKl+5n#Mkn0XeR@ zCS0l!ih=glL00aL27$Id_SWt}w$5H|MGk?gc}iyfrYcdUdD@Qpv4Ig8YB4tEo`Ej0 zz7Cdpx!%eqIv#G$sWx_8LBTpYYLRIW2T=|+s7Eu<;I$GH#d5SvO;Te9WIXPjG znQ3|B-rhxFiJoZ%F%iyz>SVC9Yn15q|0>c2+q_Hc?S-E>0zu#*QlHInL$=NxAmcS^k+G zCQjkjS&CXJg+>v&&d%PF9I|fr@Gd zA-*OdUdgIP-a0Pof$nZ1|{LT_BP&m{#F+G+R6TQN(MT*>h4^bW^O?? z)<%Zrd07GZMt0WDRvIB1M#N%~RwK2gdl-a*-hT58^jI#J5r9zj_tHhQYjS;lczT#mje399yXJ{gWyzA;Mq zg;{A^ zE*f!J`u;Zgt_k`H_NLh?M%K~Jei4z5MkPvy4k<=DW-(F5Zuy!%-surZ_9lu+*6wcM z5&kji{y_yQI-12PT%iGmdWP}(2_AM?s`(MFfkv9%nrU`!0ipRS#>J^Q7W(ITa8mQjH=c3Ro`j-@eXQMyW*TwYG5F&TCy*{11* zr7m9SI)$aW?i!8`Nh#iW;V$mE=^?4sx=xB=HqmLW?kR4D*3oGuF_F1yw)Tn%I#CW$ z=Am33Id;~bO4+*M7S6Gzkq!|h5y56|xk&*^dIeVT_PHhMY2F@1K~Y(`cD5E7k-?^( z`gXzk!LBK3Nv?T8miA#9TzRIx!7-s;y7?L!7Dk0(KF&&N*=Byp&i)AnYU+WxNlK~4 zT6vLXwxPb!%0Vh#TEV8yQKnXfy7|e&UX5VTp=bJL2)i> zDwcks#fHg6Ho2J^xsfp@ZpFoBdfK-7@hYZHri$@SfrUOswhk%L3EoahE>53M4w%PGM=^4tQ!AS<8w(&-~*+DiX zxz;|qaS^3fUI_tKK}yNahDly&T!A{lhEZO*1xnVb79PHq1rhOX-ibjGF4oz;v7u>d zfo|!}$;F`tHVL`IPdnJQdH9!_yy4i?_&dKsP?y6K8x zRwe#^Hby3~an@O$ZVt}jMxLfcmQl8u+HN79Hr7QUda8Pw2C5!~iRro;MxNnLTuKF@ z-iaxxF>Xfc25AQNg^reP9+_c2hN?v&kq$tu3g+W&C%2BqFg;u8V zrnZq0St&^Y?m1k!O4{z~0X7klv0m{(A&x5QdLec}ii(l$c0nqxNdct}dN$@U>55j` z<^_uS;d$1%4%x|xhPi6#MoK2C4kwWVc}0N{;jWg7mYQiA)>@^i(MD!|$%WzRzFu68X4+Zamd<$w`hnp| zR*_lGelhVekxJ2uIsS@4fja(5#_FN5F-hJQQH3VXx;74Bx&cxC%Gn-~9wpk24!ZHl zTqbe(zTTOdrG-g;S=Le3I%&?fzAhFXY0=gOLEfp3G4|nkMj@F+&V@F1+4;e4#_?|U zMgB#Fn#!gcN-n{fMdn-uCaR8EF8&4qRwmXZs`>%?*-1KCinhkCN^yo!rXD2;mI1jD z)&Z^=emXW9`WD`y%2BBymI;w+8rqTe+4gA>Tp{WSrDi$V1~y*tnFjtr8hRFnVY(_R zUV*N@QGPBVnO?qj=FyH83Hk{}+3MzDPWF)&F{$2xiQb-$?$$w`d1+ieYIf>ry0I#n zjtNSh+5xGC>W)e28U@}yiMF8*+Fquyx+?DeO0nS@nhAxmS|w>=dS0n+b^!^|mTIBd zhOTC+T%n|#=~+=p0eKo$=7nCaB~i9nLB4wW!BzprM!~8o zaRniMF>yv}fp+F`iK^aVd461J<^=({_I_zm0lCIGE(r-*C5h3R+Kvu>Sthn7z9G@M z8bJw0r3D5$KI(cZ*_w%J{&{cK%MmT*0}nk!g0}hT3^riEgGEu{k!T z>F%zYImscJDp}E*0a|W`1tlKoaVm)+@&4Xw30B%}c9tG#VcxM>ex8{cu8v%$N}2i* z-fkhzF`hoIMWveVmbtF(>IOyXK0&G`vHI3wIvECT0S@X`%2BC7zJ75IUWuhC;hLH5 zk&4;L$_7C?T(QNO9?7;&RvAf&QJ&$tdgjTV%E=a4hH1W`uKEEsS=t%;ndX7Mik?={ zs)6odX*sqUN4og;_Q(naP&g z9(f-6IXW4>xhd`rQ6`ZguHHdjN!EGM&RM~ciaOSgCB_NyT!t3jadA2JCBde74qjm? zYRV>I391%eIR^SV9u^74M!JsLD#~8DnxQd)?u9l6g#jkYQT{q!o`&9eMMhcC{smkC zPENV1(E-XPS*|L27D4ugNm-$WI#w>)wh_ga+QuqrKAyQcijnp)Iz$DV9b~>K;noW(iydL1~t;g?6!qh7oZ&N|u&h9=XQx2^zjW zk#2qt;hDkC7N$BG78yx)CTYeFI$C~(Q6BDAww^J$(Yh|i(HT)eTt=w{{v|4|afZ5P zS*b=w2}WA+Cdv7w76#EpF3RdUh3dIJj@oVp5!uOF8K!~JI!TTp$N$pa;Ys#kX&zx3-X(c?hUR&3VNNRg%7qE31|`l`$!5uV zL3Y{6DrzojDsGX=TDn1+TsGOd?)rX3?$OqUPDa|nmazeOZhFZ&4h8{fDh8oRsTMY& zxehTQI@UIY{%Lj*M*h*}`IfFGiYBU-agp}cI$>On20k%S+Tm_W>ZTzXVF4C;F~+9J z7V*i7S;lFu$=P<{1qKmnUN%Zu`aZ$Y!ReuD)}he_MQO>tQL46?S}sM_T!rcO`hM9K zv4!?IiWVA?mf3MZzNwZm>3(MUsnLr1&f!^p*4d7^8LGuGYLP`5wywq@rJ))j{`%hO zxw%;uf%#ni`YyRS1?rhb{=V9!`o+4%TDFDuo?6zf<}o_Ov8uYtR=VI|=q z_UK3ks>1t-NKGA8;?zzt9Nhzv{(fM4iS@C+>u@P>8s{YYMVJdd+ z>8b&K`5B>cVJd2tTKZ8w=J}yTX+Bmaw#LCq7B-H>X2C9|_DK=S3ARdZSw)trTxyOM z!ImbDHr|=mRHGjt&+nh2AAfT(G2V+>RHO}O4d;}=9IShEzV5nC8FngGR<<76%E~4ocBVFAvA(_rT9$#X zdNx@BX)6BK#?e;UZqAyPC6Q_I1xildA$nTMTn=6)9_qdpI?;Cdu|b7lMPbn~k=i*q zx{9%Cs(Q*fu}RhrcA@sVg@!to!J0O@(Md&CQD*uPDyoX` z?*4g6*-CnJCDwVl8Rq65h02k(nJQuSVFh_wN+pS5 z7HTHiN@iY44!U-!8ES4xChA-c>N#fCeyX`%iIyhnrP0O#x@mdgdRhV6+F4q`9_cRj zLD`{J2F7NEimHl9F=npOPAd8VF_F4SfrdU#mO5rCT>8;gp`|WyL20^{23nr}?xDWf z>KYoRrA}cS8iMknqMc!Vxk355KAK4x_St69KE=whs_|}io{IVYNsc8c z)`4nX28oV^afRwhX?9tvu|dg!-odUKet8CgQFc}-7OpnhToD?E>8cK;swJ@w8opT> zp%FGISrJ-hzUID0+2PK)zRKx(UNKpI0l_7)c7X==(T+iRd8v^ug@&a*rFsPso*G<^ z{=xbt;np#R$tn?H%1J58F{P;<%ArcGi7xuNmWIjx1@5*QNyRoP9!07Kng%*fswz%F z#bHirX(0~TsmiJaTt)_l=|SEm#rX!wrrzdhemQ9ghFtUB z(LO0f-a1+Vy3Rof<^dT>T0z;WTDdu;L8V;&##x5inie)HD*mcz=25=crHZ2KmOrdMPRTl+4(S%!xqjxFP8xB}!KEQZF;PL$DsGVuQ5ibA z(c!wOA&Tmz3E3$zA-XYETy9Bjnb{Fx%Kq7^CL#Gz8pZy}#@cBGCZ_pO1raU=aTz|Y zj)h4!x*>sPg{5|B;pP^FuF8Q%p{{O8T3Tr~X0cpR*)fqtmX1ND=EYiGd0rW&ApwS7 zb_M3a!KuX#%JD%q9uAhO(b}%2B}O5sS?(d`;hF(jwo1N1-bRs8S$T$WTtVt~ZmJpP zruhb0p2=xNMb?2iMn)z@9`4D-YI#Ocr3P+Mnr0pb_DYGKDLFBZ)1(S91~271v^hEe(%zVXSq(T1QCIUT}H!U9XJ z+*H(!T+`F+oQh(cLW`oE@_kLYG`%(QG);W10t1|Kg3YayU5vvbOapX1yxrnVT!IS? z<1AbaY_fw5%_H>HZM8Ht1AKGL{nKM?tdol(&HNMe{kZ%+Gs06$9JJh%EG&!ywcT73 zGxMxcQ_Ko%?39w6JqlH=oV>CuL!zCnGDEU_RlJjoT}xHM{mqNjt&<}R{KCDtl8ro7 zgA!v^N(;;ryeypjvP>M!9kQ}=lf%^1lOj?J%zboBV;np(f-^IeQexDUaw4^r>;h8l z3L}DijXeu;3%Fdo-96$QJbYuk(+zT5qQg^De2l_!LZb4V^b@ReinKFbl*84GvrZ$mF*P+l$1O*12SCARYJUCJz{Jv_1z3i zEE3&{G(t<$lgzTLENvqqT#Za^4I?d8)k1=t^}UqMwW343J-IZJVr{}S!wj?Hb%N6Z zO*B>P6^&i;N+UCsTmxclSbAlWb4HAMv&4R2V zGPKizOq28clWo&WG`LLdl8g#c0|WhYtP)jS6V=mHOqHxu9W2~^3@!AX4PxS>LqalL zy(5$&!i)8ioOMlg9fP%1<1L*c)NGOy(j$wxf=%7C9V7k1aw7bEVzS+oQ-b}%T??~S zW6kr-ObV2X+)@=oQe(9f4gCVG%vDQ5O`d%RZ1OF4O6{sV^fV2tg@4%gS|5f%!3_L4c*OrLLz;f z97}TaW8%`%94&%lg3Y77^SMGJGV%ix42oP7)w2tNlrr^PH2pLk6{C&wta2O*W1aF! z9J6w*RSF9;Y~sSR!b3Bi)JoH`?fh&*ypjzv^z3c9qK#ZK>|Hdqm0S#iHA=1Z^I{Er z^)nnJ^gVNu)gyD`_0nQIlhs2VvjhBNElo7iQyrb$jj|21veI%x^b8c^47jqQb&L}- zgFRznJo92>HSC;x(^ajlv@;_eQmsw$_02M3gQ7Le?VQarobuBW)7>@IJd8Dr)KtvF zd@Tbt0GhOhPQOE!;hWd{r`1)clm9%`8(AQ(~07gM31?6#aanOYB38ymZ6j zl!NSTO5!su-AqmVl-xb7(zQ*EJh*(dQnZuRG)t2mvLka{Ep*d741z-pQ&SSWlDtwv zL;US^(&EF+LJRWUGgKmN@-(B8ax6T93^SEnot-QbgVKY!oRs{X6CJ#DoYFm_mDGzg z?X?_Zii#4aG6SqLQ<9yt{N3~Y1GAI3B8=PsMI zGtA8FLv56U!=g>iON=8mQsM%N5=>0e(~QGZ{J4T5G6Idvth{p^tg@VRi}bThEFD}d zLhOS*iX)5zk|W}k47A*n!);WGEh051^gV)X{T+OR^6axsT|M25-TlLKHRE-i4fE9O6AA-${rtU564T6$O>AsE za}%;6l(+)Jw7hac+)}*U0#lvRbBjD8)RdC_ea$Q^(lqp}tV|Q*OLC($>}>qQG;}gl zEQ(^>O^TvDogLLf16^XGwM>J!Vyyg~Vl$$>oQhP8{N007EE0T++{RsiT)0d^b2URPRU+J6EF;pARqXTq zw9J!?{8CE%6;%`M6%8z1vlWx0vQ)jDy|pqT-C}d2!yL1e68wDwJynb~QbN_ad_&Fk zq9aU7(zShz(ycAxJzPQ~6143N9sH9O?K6rp6HSc`vI3F=gWPg5R3fZ`L$V`dqfAvi zV@th@mF=Bethv17^Ih$-9HKLg;=SW@bF&P6RFj+?{0qEIT?!16EK^l8!?jZVbL~@$ zQuGR}^s|ffb;sV?))3Wl?oVa2XV|0{N;|l_k%#u?h zbz(D(^F7_vW7BjBBW%=6brk)wBcc>_3O#K#oWk=`b1bdX{Cx6VG;Jf3Ed7HugCpa( za!ccq;tW*%_5D4Q^`hU1M^Jqhhpl{UV&* zOBGGHih^vNG85C{GJG;hk^+oEBf_Ix)6%Dj zy>;ROqJyJ!vUC-Lit_E!RpLrC?feUs^x_>$LJK3fR4gnaj2zW6l}bESi_Ho$^|TW` z()`^#wKOfPg0cbwGYWznZ8KGrl+v<&lazuA<1=#t-PG*OEiyGM-2Ie`9l5-Ull?O_ zOG_0C(!J9?4MJQs)zgwPv~{dg+>Fw73f&?zoV@+?l|n+DP2A0ujg0+FJ-riEtRr1q zjkEI&vn-9doPwgmOI3}EQWcX6t!?we%u2${L;N(|EsgA5qe~1!-QzUW47{TJ)s+&` z^Wtp^eeDdRQq-)>BV5!oBVy9L3c0kM3o|nuykZl)RIGCyy_L*$qfC^|5;C(roD0%| z3N3^Dtx~*iL1l+7b@twZwsLkw&zBMZFql)_RnwM>-UmaSuwXRd#Cv{Op7 zQcH4T8?i{g1VKGWucC4a<*o= zqOn6jk$pzES#WTuWniL#ZLCINK(v9Kok}`aTB)(NetfK2mRpf>W`IkcYKl^1j=P_V zePBXJrc+9ahj(JQf00dqQEqIOpSM?Bgr=r%id(k1VT7Tcuc4KLE0>E>fSQwjWMGMV zs(xZdf>(TLwxx4wp{=)yvvpK}g^P2MnxBzVq*`v8qII#VnMaykSgfU%cR_-&k(Qo~ zTebyPl4@LVa)_5nUSN<;X|A`4hN*$CqlJT2o>IP>g?egXX_B)>g0{JnQ@WXpb6~NF zW}shSX0n<`u7gs5xud0lF;{X)q;Z5(iM4%feuk1yUVyh@p1G%4Zn#Z)s++BoOSqqv zw@IN@da8q$if+7%qKQ_JO>tqSMz(pejgo za=4nUyHZe+hi#Fvb4H*=u1;Q_I+ulwb-J&cle(K%bh3wGu9Llgez0wNyoI%{Qb<6$ zi%Ds*x1*o0yRoHjfrgK(k8@O*zrK2ajj@@9Z(Oc=M5+dtL%fHIxtX$ZVW?KAs=21N zvbUpOL6BiVV1$Z+OGsq0wQ@vkNr-WFn0<EIZi;YvNR=BQy9#?vt zu3C0_wnJvTifv4CbXbUwO?Xs6h_-{9xm~u4x?`kaMpl%rs&;x-Y*283pSP8wVW750 zoKduZeEUyn~Sb~RFb1hU}~(Rc|>YJqFG6> zMo_-GV^*-Izp{>_U9MiPWr}W*L0C|JY_xN}Nlvz-e@LNuR)#TGP+_dSZL+SSk)Ml= zkAF-=tfjS`kw=JCp0QD?Mns08j!}w=jh0!VN3=nTN_tVgRg`tCy<3KlafrH?UW#RS zDOXg1WmK+*otkD+gmeLm4TnRu9=g1fl_h4i<608 zrjBQ@VraNanx>_HLZn4}sj5q?zn6w)vZa!les+d-K(dUqJOZfnvq9fR<4O#kXu}^ zk%PUXEtju(qOxLsXnH`YOO!>DqepUKL1CC>Q9xXH zk$sGtZ$`GJc8r~xqD_%ya9Ajpa=v12pr3ANN@#LGs;QPjii>SXaC}s{V~9qM zPHs+`t4)AOtc{m*w3DHSW093(oVsytoJ+c*O-5p}7gxTascJ%uYobYjb9j(nxKf;! zs%Ctuy{%tRY+6{VbzDhdzFM}1lbLg%vASP~kyWW;Y)DXUX;QFfc!+C?O_UCoVt`$o zqo0zlhO(Vmkf(`{b&!!}fuftUt+kC^RGe;XRV6R$@?0j<=C*sb;!+V6aY> zy0d|`r@3QRG*?=diCTQRftN*QV18I^daRbBzk`yso^xDkgt=pcexRmbp!Fh>LYpzM2h}Vy3ZjL_w;GpK+pDY+9&Zc2ZbEs%wB+Y*2}{ zS*luwUO`%ruV$!SL27(}fq#ysr@5boZC*y2dZ}S(kd13ZD3@!Ax_7#6x~8G7qNS3T zrlLi1j zTtrrJSfst0Wmb@rnQy#{mri)Gg^f{3inG68fu=!{O@^vnq*YO|b#QWuR<=^OeS%Z5 zZm_AotFyVSx0{V|I9FC$nvJ_*VWgpBp=)Vygtm5=y0%7Qcyvxcgnx2Yp1EIyOObDG zM5sq@giTCBvQeg=u6L@7N4%?7VSuTRTWlehy05ECq)KRsWr}Kkeo=9RxpJ_6oUUD9 zzKwaPT8OQ^SFn$Fq^^FXZoH; zQAR1Hr1XrH1WnQpWf|7ZPu0@VdWW2k&N}z5=aISwrzIRA? zn7dBCU!-?bj;5c7zJ90M_!0cV2YcDO@>!+npcu>VX|3CI#+mt zt%^^yv%6xJZcw0wOR9mfsgHwpc9^DCs*Sg!VPuk7Xp((&iceOom!m8|yNO4JU4D$eX@X^WVv@E+gm->IqOX;6gld{?s-I_oSC*BMi*b@tkfBO; z0au`VtV*(tXP~iDT6mC#Zc?sFva-3FhMHP}o}-Rtrk1&vvq@~Elbvlwq?3k&afwHw zzGFg2zCmJ4lA4}_lVLtrk*;rHL7q!;f~tF*et?dKc6v6KzL%$+xvHv` zQe=d7K!B@PsJfS>lD39vbZ(k|NqmNLq<)&4u7`7~NxW^iuCYe2b$&sHkBx_(vuB`I zN`il&IajW0q@I?JL!ox2dT4}Ol&PzUm!3hPQ=mbCWo}l4eu;Fjt|cVnCRsvA2qIkg}<&eNett zZdQa^hP9H5s-2rlx@oGVjYf&4QMgC2LB6|Ebc9x+ilMW8X^6MAS%8g-vAPMDzrRJW zvs+hR zV6m3Fvuct?oQa*ShoVn*y0Tu9iBFnq&H&>B=k&CXqn_YZ> zbFxXKWoT$hwsU}XeyE4DrdMoYptZMEzLk1Nwz64Nbc(a1L4timUV2cvd!Ct(sj|Cg zioYILT(DVYfSE%~qPc#gj<#=sqjRE;Z*rJ_f{{mJibZ;`Q&47_Mo?5{Oq5|roU)6j zOT3SjX;hxBt8tchaI{fCELXC(TV$x6iF&AsQLcBUeo(4$QC@&$v3hVuilRqSoRPj} zRBMj%$2Kw1=v`uYS5$ahjE}Zm>QZBeQ!Gb@60wbhurE8qD>79z%C{0#%gn@L0~U{Zk`7*%neP!CW6=?Y;Iu& z=bM_EDp;6Ug87!_5Su}2%uI|Fc+D*h70gX770e8c!3sbUpn$bBF;TEEvQRL!FjO$J zK*)jQkuk5S5yWJWps5kUbQ5!P1ygf`D?sufY+-JpUsBlrshUqmzW!xDS+4} zmIewYW~kl+X@p@617H%w(u2?dGXvZqj?G(x&21v*0xbo>?aNm;(0 zSnpjo0$t<{QX7&VnwOcJpOUIzXk?@SK4}Z32m^^hi%e3FGcqwXRsfk*TvC*pn9Iv$ zVI69tZ<*sBX``xaV&<)4=Ic-#m!(wdtevi$X@!%W@qgk5MZMk#+4rFsgj&ftl<%B>K2ijZV+PQY3`nwTwYLu01k*s4|60V%AsTpP99i#1*m#G;R=&i1j zQ)t8GYZ`1>5bqycV&|M4s1l&1Xy=%epkD0ZYwfM4>8X-#nyBb%njT{BlBu3#udg0& z;_Ip&oe=L4U>O{qsqd2K#bxPQ7+n~i=%kYym7*EtVC0+Xq-~ZR=cH?w?c-n?V63L9 z8SWP7Z<(2rVpE`*oEMZH5$)&fV&mtnA7+y2>z2cn>=NytV;ijJ>{nFi=$jIqV-OQt z5aFd4YGkUbpB5i#?hqZB5fc*PsN)qMr5KT~t`w-HUx2+<1tleD5`opKpfmDZQj3#| zG7C!bixhbE9gCAeH@}0*YhHcl!~&1h%=C;B1v5*~iCrL-AX!}_V`BwgeaO}D=Ae2I zWDfi+FCztABU1wfLjw~F1yBV5O8p=Ou(Q0NN!_y~F()(G5nM$>4)e0Kv;-a42filW z+(>~}KLTpKi8<&3ddT5k#-LOCK*qUc=A;@c7#e{th(|lz3oHipDyg}_$N=P7{a}=1 z12Ha*clUQM4T=lV4Dt34Ov*J0)=bC`^|v=FiVajs3sW&pFgMJ!S5$NcQCcEu_;ya^042@E%r(dDNZ&~ z3b1n5=E~ELN{9DKy~<&2z|%4@q{`%u-Z$i3n1Ui}Fr))Ga9pOe!^SO|wW& zuuRWOur<-Q54F`)akSQTHB?E z3h`4{wo)rBjrR`?baA(EO3`-?jSE%s_Oyt0&L~ZA4~mYnjt;TU^VN2<%Z)WoDUQ#w z%!p49@eMHu=W;8tbdA<6i1&2Tb}aUcQ*jF`jQ3N@&sA2=_11_}vdu_ybymz*cUMue zbM!S+c8)Vt3or~wOi9v=(zLR$H}K^uGB7WQ_K9|J(X?~W^3T(Ab=7cm)HTS}_0BAD zi3mtAPz#8&*EH7&*9><&neE#@XEF}uyW>#bjo!M&+v)x^Uc#JQq9dWP&0SScXcU= z&x=S+inmM)P)thGi?p*$RJC={)5$81GxxMeN-goR@OBAFRyOgo=JK#B%(76?^VBfZ z3HD1UFb@fcDfLi}3=d37C~!>5G|5fKa`RO2&rH?u%gnG(agTG+Oi(rO^U%vkb5{yT z3ykOT)HDooFUm@cSIi91HOf=WPK{GG4fS(#%ZmsKw$wHW$#qb6whznnD$I{IvCXsc z^w7_aj*In7bInLg^ilSU;tI?(3sy~6RdKUR^hk77&yEgJ2{!Z2({#!Sw=gx-Fm(^f zO)_`$O0>)|cQ!0Y&MUSs)K$ugPPfnxPEJip&C}uXOOH#_by4;;b`DESHZ-<1G1PUm zwodi-)^jnmigU_K_4c!{axrlz$_uvkFbUK)iO%=;4>U2bO0r2y^C{6R<+5@yD@gQq zbh1`7iYbW1bRE6UFCw+ahSOEa|7(=pNsG756h*V8n2^K|mhcZxF# zw~g@i$uHoFFt-m64GJlA3)IasPW2A9uvYQ&vCE0FE;3f~4_0yVGA_1v%XYBO3@~?! zcl1>?Qc6gQj>*^049a&k4=gPV<#JB9)s3=A(e#Nev@>uB@$%J93vhE%a?XiJv+<0M z@=QsO$Pcpf@X1zl$kYt7%1d*J3(eP#^D{B9a5c}c@>k;uH8R(T(2X}SvCg)(3=XsR z&ok4riz~7;DA4fGj54%Nvh)fIa& z3o$qJ%a3<8Pxp2Uk2mtnh|5okRWpgq;c{_y&(Se;$__ErQ&B96@JlH)E3hbVh__AF zGtKk2$Tc>zEX=mHRZht_annyyG10e3veB|NvyM^MPtnJ-SJBkh)$lOS z_Qj73Q)=rAIHHj!Pw@r4; zNHH!AhzvF_DYS}HGA+u?P}lMdc6ZFocMMhWFmuQ@cTSHk4RlD+R#q-lERErEQg^d6 zFmlPuE6t8H&n@-U(J(K`N%42h$;r`IH!=^&byradx3X{z2~5dIObLm~3bQrvSB)@n z@No4F(=^Xd;0h^L(alIoNlfvH_sobfRo8d-jJFTb@iWto&54K!h)D}l%nXmwGq#C{ zNYOEKvd@nWa<(vc*6~P+DTs>6PW9q)@=7X-4Ue`~ijRqpQgyY6@OKQ$u*tLvbyO~l zRCX>>a??@|4m2|;DD*J1(MZ-w^@)m8(y_HLvd<{ZiwU$f<+3mgj?eZ~u}U#dF40X1 zO>on&jEPiL@pDzx$Tjk}$WgY5(pA*X39-yF$+B_s3dlD$v2*vxb=5CQ)hx7+$jaaf zQH;>Zbh7o!HBvWpi3v>#&ofeWwQ|umPSbZ!4~tLDGD!|rQZ2R!N>fWy%F;6Two7qS z(Fut$H#W{yPEK?8;_}TjH}?(qNlJy;V^(;wEQ8$l{ zj`1)!H%up&0_tOtm%hxopOb9N}wJWk$(s9&F@QTz)<1%wjw@B9Zv~<$7 zGu4arFt*YR3UYP~D)z9|Gz@dM4L8ozR8{uROmO$G(lE_+chJ>xH`4dD(+Ko6(+agH z$xq}`Ny+rjwTV#FwlmXrO|bUy)K7C)j&v?ac1a?-FWwDk1T zNY{09&9(Q@jg40>$ngn^Dsm0Uw8$<<$qh@hD-Gp}%&@hz$_w&Mbc=E`H_VE0EetoX zF*OS=b+vVM$x8LevQ7^V(JD-}@GtSp(k)OkGl)-C3QTm@(a2EI)wD8q;PQ{Nano}t zvi8@Ajx!2RNpP~$4aq6iRY~(qv(VDev4RO#7(6$QDiPSB~uy(gHj5it#Hd4Ub7SE_Cvb^vhQB4lN4KbMQAQ)^RaRvJ6aCOp8}C^G=Vo z)ACe{N(~5icQvpycD3<~agFm$al&Mz`IS9A3=cTP<&2yu7Kbq#YX z<Dpt<6Qi{;e3s6Z2@NhMB$O>~RE(uI2%CgIh zN{%wOQngSiGSl%<_AB7ZEsBfH$+QhujxEeL(AUdX%JDJ|PAD}^EKpCdG!F2J3pP_# zQVq`!v@Q(uPss4_04;xW$;pax4a+G^ELO7T3e>js4lQuib8|Kh*HiS5bW2sTj7iK= z3wO&_b1lg8*3z|bcJ#OKbO_H0iOEy;3NXpF)=rDdb1(IXN;cLp&fwCF&+-hnP1W}> zj!g3OF}H9EFUn0S$W6)Cw9@xgPqB2*4GH#5FiTeRiFGhb(^6N?QCG9~4$N{k@kvqj zQjb;Pate<%4>1gkvMkb$(@RXW(+e^y3=LO_h>9!7^$S-D2*@jT^$y5!NH2=cRJD$a zEj3aJP)-O?FSLv|vTzKy@Zbt4(1=U5u=OxC^s&xR^wG$Q*Go!Lj`Q=&^RUkf&vf-N zjn&FaO0cnYbujk|OiEMAN>;Xsv{Sb#$j=N?P0dT?QZ)=oPl-@4=?t!G168xh*48?^V79;ROE_@EJ=6N z&Qmj0^$AY5DfBk+iBgL-vDGtjGt~*Vam^{U2+}w9EXYVrG!HO#3ygO1P$^XlayQp> z&U4HxjP_OLGSaRCF@V$?&lXjWYC82`kbHS9DM;^w5vs^7haS^bCwQQ?gP`F9_92 zHMI#>&5th8iMCV=@zroK)i?F@H;*bY3rKab4z_T%Dlv@lN(+lIDRy;MiZ%1|4CD&% z3AE7lH&gV}j@BxSQT8#)OExz2atLy_jWl%5)AIFB&#=`kamuq(Em1T}&J2r*c2L*0 zwNX#7DYURM(6Ni*QnoeD$?{NAG0D?%)KYb|aRN;XX_?y^sA&1SyM-mD`Z%hDL=>uI zmDt&uCpxFBRCmNUqs790oyJ%Vm8(5izl_yB$hf`E2{ZLq~xX-W1Qq5b zXc$;zsw6lid*!L9MdsL*=%;7t288(J1_x*9TPk@4JKD!Ol_r{LXn1n@7i5GuIwpms zW$Iab2gMnOI%RmNW@%>z7J2C;xEEP_Cgf^anTM1bD#q(O6olL7<@*+x`$Z8X_D`?%z*1lh$YW)%ndCFD3oXj*w`6skCxJ0x>uczPPz zdF8mIrrG5A>X}3v#^w2#X$JU3Bo!9K=c>gx8JPKcIR=~O*km|*s=CB$XQbOkY8xk{ z7#Zq?8(0SUaoNQOsM#4g=@^81Tj!Ws=UAjTScIGCggWKv2V~@$Cpsy{Dy4?SJLqXe zTB?RQ#>WJ^$GL_m`GvT9=-L%T#AR|tB{?Yh__{h5CF;4ml*ZayySNx9MaJnD`4~G{ zxG35bMCDn#`zr-%T56@H1PA0=gccO4Yid{-TA3N!IvN+Nahc~u#90}uD8<@krBD|&G0 zIfe!3S}VteyXiy}7=`KhW#>j01cW3;*d%Bx`gkaN8Ae6=+h#?ls3rhTB>=sj8Z0XxN10 z`Mc<=nHwqj8Rdo~8O7@ACi!G)CjWyB``f+2@7nyCtW3rzU1Oq?vo9SUTkA+eQQ=n0RNH>uF@W=a{?uq{S-6+U2SHxu)nP z2Rq04*arrvs%Dyd*c598az(1-ni#qz`lrMi1^5@cD7ps}*jYrWX{LE(qy{_q<(X!> zX}Ne5xu#fX*cj=XnQOZQtNGf*DY{yzI)(XaTR3ys`v>Z}7{ptIrm1^5#^xznIa?(s zxoR3@6`ID!#;SYx6lYu5>S(0rYLtd*6_}Y?_-Ly5`KJ`dImg8s#+zj3aCvE}=i8=6 zm*|5ohEK5e&$RKhFVsr$%eM(n^f1VbiOLOfR7?p~H&V?pP|Y)Qbu}~B^^Y}H42k!R zvaweVDB^O@4e>B?^2&8m)_1ZBw^4G9h{-fIjZ#!j)-(<=v@b1S1c&h4)yX&wJyqxH&ylt({RXe_Rw^UjtK}TG3H8BO0|iw&2`DNw+Po%3yE{H zaSu(7^YhAeGV{%Ii3u{+bM9^q=P zshpvnA5h?A&6QIeVq)i(AD!nGY@`!wV{4|TuJ5R?8JVe^?v+_=9;vRF>78$D7o+KD zq^=oKQeqYEnBt$MrCJiNlBXYI=9<8zZ{`r2niwA8pOB}Vt>U6{uKa;2q$q#}yrtoRnsjl8_s1*-(@Vr6cUYVGY86kuuUoS*C;lO3SuuVtC0X^@{9?V)O;;-v2ypqQ9bWUbDn z;bIxDWe}{FtrldRX=&lB=dSEyt{_6jvH)Yo!qutQYT? zW0z~_oEN8_rmJXd#HFF(Vdt3S?cfoilxt&K7_Su)ujv@A?4sr3X=r2`>lT=*nV3 z>zHO}l6!1Rl3Ado9&2rqr|O(ytzw~<6km{#!DVUUR+<)&78V+t z9u{qB8|#*59O@k#;9IB>u4m?zmTD84r(_lymzEWvYLlvEtmYM6=%o^u8L5$$XYOJV z>~G6uuB{fEZc`BCW9}Rhsp4kmVVUow0(!`k)PyN z5~v%PkeBYB5~FEr;H~MD#+9QLr|4qsVeV9Faf!5)-bOq*ZL17FVJj8L#125MZRLlU`V)r)sHfo0Owy8WHN4!xd_*s8|vk z9jdC9shwa~5FM?lnH_Ct?Q7wz6X~Doo1pI$o9u2Jn{MI|YaOQ_P;8W|XHlHu;2V^Y zk(HKe>zl^q5~P}(prz&MYLIGUXQx}>qNWrO5Mb$M9P8?vo@3ybmF{U#qNtjnuIFW{ zW1y^D8W)w|Zj@!5mE`D|>g$%0#TAtwomAu=om5&77Vc{tXB@5>ts3bZY!?!5Y@Vc~ zVil6BZWiJhVwxRTs9~;W;Ax%XmtE@Q?UWj=t?rkanUTYl=v3gO931KHR_fvCVC5TY znCg(8h7GJ`KlVeV+^>#CSwuOIBVMho2gL{pqC$C z>YS_PY962A9N_K{ofe$t=@A^2SpUsvB!zr(~*OUYMrpl#rMf92#2apyc3_6&2!V7q6?Cte2_o7v^VZYht04Wt?IX zrDUQMYptT5>J?I$m0`k_r5);B=;3aX8RVelW9#RZma7?S@0enlk(BAlU8(=aZKe_tqG@6jSgID~ z8Iz)Ez~z(?#-{ry7`KXlG|`Qkaq# z;Gmiv7?JPe?_^_}qGA+nqmi2ClIo(N6B%s~p_AsG#AWB{=j@(c=;#n_Rb*#% zpB5cso9N&j6(8+ltgGx$q^j*0;^nR$9Ge*sRH$6)r<+xzs*#oHnQvw7lb_9HV(*ZV zo39m8U>e{P;b81v6liU(8s!u2hmTHjipO>!^X<=d&;;d7ktzx8Us;KQ?SCo>FWo~0_pX6;8 zkmqffsh??LmL2AY2b5nG@#Z7+suOkZu|h>0)Fak(r+1?G+rUt>F{n zm#pQO9~qOMost-8@070*mmKNjlxnK48jw~LSzxZ0rR1;Sz@?<=p6BFfq3fMxZn(t-f;qF#Ys_GdVVq~drmuXmPkz}cn=H{R56`Secn{BEe8(W;0k&~jSqiWBU zVVYl%7EqEMrR?J1rL5%aVHIs^lTfN+sBISSs2!!M?i=Wtn{8H@U8t;?5mXqb<>DIR z=cTV}8klMu=8>rX9Xr8K?l;r9is;-%%s_&6)m7&g+91>J$n-p&4;bWa0<)9N4oa7Q|937S7 z9GvG^T%2c}qvmE_8sckWq39IsXp?DetQ;L35EmPyR;*_ks&5qF&lTtzR2)&1p&p{G zsurD4VjdEZY8j(qk*50FQ-kYj11=H=>Ekgo4rsAlPy zl;_VC=BuNwXlSXXpRE|7Zc`9m6rmHLoE9CctQi{=Z53sfpkELZ9bDv}T9oak>JzA8 ztLJAHknE~%7Z7ajtD)x-z@@CDlIWWfpyw6iV6NyF=V%-gXcZ9}RODwEp&ynO=Wmk` zU*K;YqUD*AVrW#P5*}ye9jvNbk{4y0=8_(rkgdU`6s?{XTc~R7Y-$&8kn3iUo@t_^ zoMs!Fp=%LroD~`q?d%bv6KLz49Tnv77Mfyil3i%)@1*HxZWrd28j)ma&*hLAmQdsp z;hAHrr{<*^qZ$#Vp{3-end7e#6K)?B9N^@ntLmH<<)LE}ubQA59c5urXyTQr8XQpU zp5bnoUaHUK?OPn2m1tyIXdjxT7^P>Uo~)l(RSisi>768s?Fl z7T}VgT;x=2Z>;R9RW1`lJ8dR zu4|T~9-iatmz*7upA}~9m>S~X9^+}R;vH8QZ)sR$Y~jq6<{j>ns2-_pofVevnW#Y>;5@8u*;I3zsU}X~;Wt**KSsbKa>g-c!>u#Il zYv`G*o1&zaW#G)^rD<+#Riu@YUZfL|mtB-#VR9uki!liF)n-v-o7m=485aFAr9cEOdTg>SvN+9ulAJ5}u`Ltn1|&Wni!Gm#@m@5UZ1$lW&&bk{uA8 zm}-o1>j(sF#@-8>OPIqnYjN5?^Fyp=6_`Z5*i?5vXLV9BQHGt)rTg z#HAVGqmdP0Zk<`+pp|B=Y^ma7WfpE3P!N!m=cyi}W1eY~7iw-45p3h09jc|Jn{A>VlH(QQl%P|{m1J*Nq!b&R?c*Qd8)D;PTIik;rDtkw z9aP|uQ>kY^d#`l^mjOQS2M!8C+Nx6KtNY?_*}BoE+oiWssy4t81+49h4F4>K>yV zmEfAkrIwvz8I+Z*92FL(Xm6uol$oELVWX54XJuXzo9*RcTdHYesA>`!t!!4PXkca+ zn&#oGTN-DU=oX$95+75bq0W`$W|>-)q8;XFs^XWb65{CLY@ltRq*LgTVy9uQ=wy}P z=w%qBZQ!Twsa)vh7@^}Cog1H2q@8Z%=TzXGt(u+4WfT-<9Tt_Cs;H_FVv?NaU7TvF zrQ{gyl4O;yUK*)mmF{nA=;Z61W)Y#~nH!p%nW3Di9}=Hi zlwIHwrpy#TtZ|@LR66N9Im>rT-5)){aUXobIm652S5*coi*p4ttZk>A;p-D^kX)#ll4=njl9}ahsvoK!5RvVt>Svkg=VP0knW1m2?jBa`5W|&g z7pQLJ8Dr{isuU8EmuaeQZWykc<{2Mpo@i@W9HFj};;!rJ;~%E1WaO{r<*Ke|;1(94 z>SdZ2m+h^XYn__QWo(`q>R=jWo#7v;Xcz7um6a4^Tx@J;ZmjQSVUbtp;OXUPz}LUr>$?pc`` zkj9m2kQ)|}P?Q>`rs^GD;Oi3VVO^r>nCBmwTNqyAnVjIL5pH9w6&k0U?4nm#q^5W3EzMY!#}l=@c2omF5}fUSMjim=YVR?+|U3Yho9sY^7GDt{0qdQ;=jI=24QV zre3O{;^E*NmKLdR8*FT9k?P}7XrSur92BbRWyWO{735u%>lmA!s+DT3s1clRYH4gA z7?_q2VyPJFn`fe&o0DbX;#jDn-}Z>XfLd zZsBJaZ;=^h8sd=QU>xG;;in$tk)odNqh%XplcbZY>20eR8|_w*m7Z;AmlbBFrW|b^ zZfFteWXWY4?vt#V?+~sXW0z|drS4ncALwJ4r&b!MZyBqXub!xv5v*unVd5XArmmr; zpX(Ryq@S+m5Mq#$;pCd39i(N?Wt|ma7jEum6X;=Yl@)94WSf+jkQ$g|=N=ht9lx<>_8X%&73!wWrQseNl58BHnpa>F7q6J%V6K^FV-}cTp|25M zkQf!A>>J`6XYJ*a8EcS{?Gde`scso#ZCj#am!uq*pzm0mSi%(-UJ&T7kztvhpHk}Q z6X2W~6&xBDt?c3x?ChQwX|I$So|%(tU7YD^>t|->pz3Oyl;8 zr5|tWsp+DZZ)cL??3QKdoEqqv9GRD$7wVuNZ5d|gk>%+bk*lp|ply|6q7|&FT%uB- zVPs_=>80#r;+X1HQp^=rq-$6jZ&F}qTNv-|?VMua;b)%guWFr}3%ZLdE5xM0+d4Te zDN|L=F5ERNT;0V!EIZ%FPE*HNHOwyAzQB(w!AspLF*PT{(j!sB-%KSus@O9o&MHvH zGd##5Q&BB7HP6&qJvCN8&DY8|%GSZqLMJoS#MRbBT`SZ!!B9-vNYC9M(^W}5Uok*Q)yumu$iQ7M&db(0+Ree*$}c6(Fe%qAOE=oc zA=RBL%0^e$S1~Q$EI8QQUMDTj-!{NC#b2ky+RfjoI4M9SQc=Y+%hx5=FUK=7M_E5C zJTcnCAjm8>&&@8#A~rE9gv-rK-O9$nIxi*3!N$z8z)wFeFVR0fBgQ|_&9EfJB_vQI zAvHY6*3~yv$1^3%(#$7RSKObCDzr^SFHbc%%2_{0%_PfF z(N(3WC`BTIK$M+!ah>b z&)qmq-Ne?W)LY%b&%ra$AulplMLQtTCNDE0*Vin`C$E&tF0IJkJ}22jEj7&{I4{Y{ zUMbHiPTfI0*f-BpT~#Y5BhAbr#W~hDJ4`PzFI-<)#mmsr$UY_CKC&P(PA5Djf-6@e z)7#HOM$Zu#U?Ia+07<2KEcwjBr;P~FIzXm z#VjN(N=wzaP@|B`C(krF&dNtOL^n=5J}@@N%-b$SCp#@DDk0P$q#z+K+b1teEnM5$ zNZT|`GsiVZ%gHO+IyEvtNl)1&GsP-hktO$S%{+MBB~EQPbBv!$re9H99x7z%E0_EGgOC zjmyE%$|lGQiT_UDsO&G~SnxpQY%e?62qH;bU!Hq7-Zquj%eu z8XB)+mtEp!XzS%0(g5km_faWT2Crq!Q(pQDhSD9IhE| z6qjq|n62SkkPw^go1tBt9A>9xWtDHI8sccfm6DupuVWJJ=9TDek(udln(S}nqGOij zlbji6ryOP$6lj>KQyOjJZRO~ql;mRN;A>lCn4zJc6m9Dh7-g1d8^Yyp6=7;;5t(UI ztmc~%=#Um0=NeJyP>^Hpkfs})r5zWp>zk8TtncreYU`aD=iwd^9v^D#AF3V~7pvlI zRUGfbWndKJnQ3N~=49;=lIogj6KG_j1L#>1ph1;ce}atg9CjX`dIQXOs{Trh0%{ z=4YF(W1MZ1=4qarqgQBUQS74SsAj2>=#a0amZ70r>Y}0_ot~DHmJySc7snN8m7Qdy zrKM+*kdTxToSJLoqNZgY=Bw-E;HXwuqLgUnpyBW3q^y;tk`ffI>tXBYV4Ut6YNhK@ zlBE--6{a1>6|b1=mSd|FSsEMaWvpqVZI&CKkr{6_ulb33i<>4D{7-HdT660)`mz1iMosd+l zZ)=k2SKwn4Yv-As;U18z>ERcr5*3y26%>)2Tk7PVVQz28Rg@o~o@Y~Po}ulSUYwMf z73*Ib5S3IC?~|oi=n-cfo?#JH;1U|C;;xwLmu*^{rI%&u?Bx~Zr|p{H;a}uv6T%g5 z8Lb?pob4JNqvC2=tmU8Jpk|n$Q4pu$shDFDY^Y(Vp{S)^s8{Tytddirk(&|{r52H% zous2=q!|@&sFi5RmF*uJnwXTPALC_UTjZdtQmhw{tLzw>=j3i*s1~Fe5o)Ta?d=nu zSOAbq?s8PqG+uhnHO&9?XMrN=WV5Dkz$|b6qD-6rKIMmXKqtm=yhZ?X%dlVVxpPm93EuMWn$%-VUeF<>K3A&P~a7&8>Z%%8kQIw5)^K0oDvxt>*SuB zYZ9$ys;X3wm6PJGlB1WWrs-?r>S~{59;#TPs?Ft4kR2Iqo*xmXm6E9GqORzYYGsyb zniS+2X&hr?X6K+`lxG*L8kHZI5TRz3Vw2=y;%k-YYL^lao@kQ zY!jemZxW-Fk{KOutfW(_oNMS{Y-y!hY!nzDtE}S}Waj5r;;63{6Jz3UqpFtWY_I2L z;$>nV9L|-X>Q`)>=IIz(q+}RtouKKVp6g<4QmAB@8Q~M@qZSjMYMy1|7@}_LsZ-!@ zr;#7zl9S^Ym!)cx;SlT{8*Wg_6>aLN9-rY~>dcm!TG-p_LV2ALHwjW@P2>?xdM-8g?K5M~{msGOAJZ62;4sTfpb7MG+Po8_D9ovRn-k`w7_ zXyIq-o9>)x>6~Hf;$rF$8&|B79+PRt6_llE<>IgDrxN6m;O`${9+Q`@nUY(WY~k)` z8scxI9~ls$RhZ(V6Oj-bUutKo?in7at!HX$tE}jlTM!ZHXU65P5`pate=yr79L}vW1eR06XTW=Y3ZhvAD|ylnCF?! zrJt9nSD>#Rpsa0QYG58%tX7bxSrDd_=jf4OS{Ux=Wof9998s)a80K2+XcwcIr0c5T z;HqPo=UE(QZxO2*6~(2h804OuX=@po5}9TlXl9aX>E)lQlaQ*Okf0rDXsjEO85rcM z7-;9Hr>YiN6qKx0>S&?n=I(A2;H;f(WRu~~mFsU_oEo96uI;TA<*FKP72+4C z<{Xfe9a)s^mYAOx?w_kwsHLl(s2*eG=pC0}sBM`Ozom0pKY0tQBs_$W|OVwo9UMmn^)kZmK|^7uA^qDZtoE1QW_epU#yX=T%v9fuB)!) zZJZy)6>4G^VUe#DZ0GCXY?aC*Vp2n3JW2_kLA8U~q?VfC$8xyJF5nyBE5ozt39^$B7oTr{* zmF2DCSX2^joTwCI;iTm17Z;=Ak?N(HYi1r8>FgZ9m2Kf-6YZyz6_uM5>z=Qylj>uU zuB2gKgE=f6dRl7rdFgFl%`}J;*qH4 zrtW0q5bhqY9ikmt=;$Av8)mJXV9OP+sBCYQ=$4`wXdG@FSR7}Vm8GI?=V0q+tFB>M z=&TeSq-tsxmY?Ag<)NqMs^b?MtrQUD@1U8Lo}8_lVqj~;m8s^Dn_?JP6sE7|nwaEk zuAUVc=%8ws>h58el9}Y^rkfWX>7nbAo#P&$8mXCYXQ%3w;%Dj^5FX+h@2RY=XU3(i z7wR1A5SXIn;g;-Hs%Bym99Ceb;+>uy80@Z{;pbx)o)-`qn&;u^WS4H@;;ZFsml|i4 z5$J0jlj-H<=IExwm1bobTNt7l@0yfq7FZmUA8i$#<)fctrfBP-XPBZL5S^szU*H&R zY*V7=o?@I_V&@s>9)k;Ikk7G@k9m84;6lw0Vgs%Y>U5qG8~jlk4WAUFw{!Y?bPytY~iR zooi;~?`swwk)vN^W)HgC$=_aEC&6Y7MqjHm%{7n9J~hBTBT?JTBgWV<*ElFgMNiAa%E&J|+(=(H+|4+{ zJjuk+(IQ>dASl$`zpyk-*G$pE(YhqwGRZ{WJ=QZPl}p#XC^^c-B3aoa&_E+FIx4@& zJzYC8D@G~H(ZyHa&Q(!cF(N)dOHIks+eg>S&p6&CKQ28JVCe6M?E7&Ej7nQD@HTd*+nfrFGAH!(I%uwDKgi!#6LY! zFEQA_MBOb|naf1iEx}RCMMopJ(8VGnFW)f3(Jx9XRjtt7B+n>Qv((Tn(n8x()kx1- z)wv|m&&D#}F(5T1-Z;uDG)Tk1Jv@rbSS2RPMn&Dg+^Nvb$wx~)$~Y}v)z;EQ(>o$c zJ0-v^HA~N2#VtEI!Z*=0s~}s~*v2s{%01ON)W<2oMLW#UnM={iE21besL0qaIy))f zCLr8DC^#!TJTA}C(9|g~)Fs$7Kqb;G%rsI*Jt00k)l)M?-_$xiHD1lj!p}8Q$xMsO ztHdKYNXbDZ#@aW`IW;mYIzB?zQ%y6&$UQ2~O-0*3&pp$Q`tVUFedQ8)g-fpq*!C7m{S| zXyTCJVjWZ%VIC8!oEn#zZsk*`>kv|^KJHb=%tyep{|{uXq>K6 zpzEb$5ExQy=NXXT7#eS%VU!zaps!-)>s1(>lpO3F=%uG#lIrOjq8Jp#mFcFEshFga zs~v8p=VoB47oDn}7Zj_Ru3;LgS7PqvSmY6%?d1_V(nrU zq8{W@YRwfK5vEe?>+b87T#&7wt>hCQ7UW=Cpc(B`m=UU^rs*50uB?;gVQ6dUWs{g} z5aOTaYGGnx5o%?b8k9W zt>~d`lTm6=WNsFi>=Npq?49BsQyP$FSn3}eZ=jqJpvdKFu5YZGWuNS;;jL$1V&`M8 ztmvSfsAU?dnin3MmZYX{lk8-o=Mfi>P!eUC?3fd&ZJ$=^W9Fo*=%B3VsO00ql@b_| z7o(mLpX;gaU{P#g8LwunS&)*dYU7a`qw8yK8yBq=q^@jhVehO~Xk(kNUYwz;pQV(g z9~~T&7;Wqq?#Jb)6Rl-nnp={elo}KlsOjsa>>uIc6k?(3sb^s6t7({@mf>TakmjkR zm0+ps5aF5O92MXe>FZ>!fm8XF$wP-LfWtfx{Ct8U?!ooQgFq@Ng&q{C$zmzM4j7#nEdq~T_2 z8lhwt8EKRe6{=IJXsn_eov0e6VW_W>=cnnc=;;yYYHA&AQ{eCG5NPS{prYzx5R_cZ zrDdz0W$ha6lcySHm*^Q05$2bWt`Tlz=cQ++5ghDnnU_-(7?Wv~=3(NHA83$d;8C2e z65ti973u4j6&I4^=EG&L>Q!P9Zl>;UrK;v>rfsU8sA{gIZtEVWn37@wvduVQG-6_xDo6rQK8s#BDvk)Q6R7i?P;k`u1( zQCv{09F~;h>1=3jlQplB_lIf6M=xVP}_`7U~;ks;nRCui~5Klv^B7m>p*o<{Mh*rdr|{mX)g#>8NO!Wb9O=n`GjeV(RZ39~tCktsJ6gW*=acZR+4#kfy9- zpP-TBldM;em8=tKr*5v{ufvsZk{Ff|l>|Bn*vdP}udu+-+T2;ky~r{)!%f{QrZi94 zP&+}x+t$k~+s;(aOC>wkK1L_PPf@cVAu}pZFW-hMGEqg{TG8I9I3*$0HzU``B`7h; zF)=7wGejd^(cMMS)?djv)x0p(-mWCay1?4mK0sa9+dRT7OwGX3JEX`)hbt^CBt0%H z!cG@q)HX0c$v!h6-a{ua zK*cc4GQBh>Bg{$H)W9~|#Kt(4$h)Z2B zFv82%+{!CHUehz(G^VJuutX;#z_K(VFWb`4&{iidHYmf+)xAJ3+a)AiNk!dX%Q@cF z)>B3Br#GyFfG-~w%9_kSS85A ziA&!kq9iTfUNtFLD=aL~DXi2hJ1|N+JKDlHQ9r>}Nk_>o-d5EwE!M#~HbONqE5X6t zC?rwSI!8O(-8sT8EiZ>l%R0YA!&)WE$jL6rL@!V?MkmW4BtG22wlG9ZH8s{O$~@Dg zAlbqxLnk0MCMI4p#6Q+9Q_V&v%gEU%&LSwthbzEdIo&za-Z)=ZtH8g&!`>t=$RgRg zR8iY6MKPy9JHS^*H8@!_&Luj^P~A#BIm$FJ%iAHv(AO*|AVOVBNnMl6$WT$yHZa;F z%30gM!ALvGTHRJdDWEt!IV3b%*B~JvNXIa#P}fX1*2mhjt(jhxJ(#}*P zSvyZNmdo2a-NPutz{9&Vttdn*!B{a=(?2LY+rPxk!6i7)(KX&*%{9c(z$Vqp$kxHy zFW=Kw$u}(_Fvi(k&!-?zFVKf8G&TC`ifO#5Z5lF~QAM+u2Cj zIVd?a)xyKVTFFgSJ0{;TEXh;R*VKW_Ezr}nB)h;T$H~e!RZ}rn*IGT((J9K>+{z~> z*uf<|EI!06*w^1C-a4RE%~Z=-J=w6xz}YlTG0f3g&!E`Tg3HUB@FD{hJ zILyh*Ehs8UDb`RusvyoiDL%<1&p0VFGP=kiJ4@d@D%8YIJHXMPpw!AK(a>B~-61nf zT~p28$}Y)Uy*MZ#i_6?CP%omeBsaxMNi)eKHXCD?ZuIMZ?HHBse-;B_iI--NQ7&CdbIfDIn9;OgY>ygG*1@P+dPP$1T#y zG|DC1FecT@+}R{MNY^Y}DLX7aH7=&aM>E4JQpq6B+Ste@)1pKtFkU0g)i^m!S6d@3 z+{cB>)hE){K|M>;B_k@!*VQ^CH%C`hGb-8I(Ka$T*Dl*8+R!`Q-^?gJFx^GBBw8(7 z)z#X|EJQ=q+Ar6_D%`b8*vBbB$Ia8)H8(QZBHJu5Ia)o`)F`aTFg;VrD$^v-%h{!ONjp4UTi2pU&m`74!AvJy(Nd+0+cwdtM90q~JkM7pMcpRKUb{5WEkiZMC?}uGwA3x!G(1c_q9`@OA>PW- zCekEa)yyL=N;%vpsz^1#*se6*Ilm+|D?DCHUn$!(+c!>6M?Fw0(W*e*DKA;ajmzF4 zO(RPwL_JPB)F#$D+aNA1r8FwUDO}OY+1*&pI4rEhG}A!WF-5D;$SK4}CBVQnPPNpg zIMhl>+DR=xDj+l~NZBe^QzaxUTGh)yEj!ZQLN!=dMbkqm(kCF$zA(?pH`CZH zh|4*_D$m)-B_<^|sL;<)JI2V~BUe$`EHfcFF(cC=(a^Ib&mzsvFfJs`G*?SA*gCtw z*)!SED>p^QCBQpHBiNhE&`c?@&?mRBSXVzFA*Iwm!&=kc(l)}y*+ji4QOhVq(KIc! z#7Wb|)I2XKJ|NI4+B+e{Fg;6MBQsFRvQ#HIhATup-loLXCBZF7!!@Z;%gD;c(M~nc z)50RyAT!uEBv-dYCr{fbC^$qhHrUHrSIN@Y(k#^1Avr-YOv|+}THT&2*h)vqF~ZcP zAUMLtIV#%EUCY47QZX~WFg`9SHAvkwOU+X^MK7i>RHInkBQh(xAWzp<)v+ksGfvaL zz{btf8-qkibK0nY) z%h4t!AVk$Xr&KRKC*36~t|%-!&bKJrBPGBhrqs?{EhBR3{IB-%VRE5WDKEX2>(EUqvmLBD`2 zNh`tH$WhZL#nYw4x5O$KsB`lUJGFmM|$2l?EKGxDA!!jT=z0}vrvcw@L zFTy!IPff#C#a%5f$6n1p*fk(DNK4JvDl#Z4TO};axhOHiIU_b&g)2wP-P2slNYmUi z*E=D$DAC8pR7Jy7*;*+-Gax6#PD$UdUl%tzZU+1kQWM<>=Z-m%Eo zGTMi$K-p5w)7sQAwKO^2)IBrTD_&dM*T6H-G&?snz$qs^N+sUj$R|F=BgQ&OCEvjz zMcFJOPTw#)C@RI+I8@asfJ-Y?L(j)M#Wc3iKhQ4JKP@P(*hV`*$E(yT#6nG1FDO00 z(kectL@l8>-^@=f&b?I2Rmn`x#39kmNG~+C*jAOxG%HNUP}4R)TidPBLL*I6-@-=U z#UnU3QrFc?$;jQuC{r)mKP1W3z%(#OJ;L0~COR_B%Erahu*gI)!ZBGVn@e3ksU#(< z*jK|YCCuAPF)PZ!K-t66C_5#kP&d}j&o47P#xTZA-Ap&lB0pX)DKW)AIbK!0)L7fc zJx?*#KOl@NKOs2FHNi6>(>LC=Fg?gSE8Z&5D@aep(9%;g$RgB5Cm`QOC(I(-OE1x{ zFyEpe(oIRpSji%;Bt+F!JI^shm&?8+!ZO-UIoh`{)XFBxtjH`~Eyq>aSX0ZvUO&mt zCdnW~N4F?B!&cimI?c>JQ`<7vF}uVhSH(lqOerhcJ6n@0D_FzUD#Tqc-!a!vH@m5)YDEWA;y@?J|$bR*d!-3y;RXmw=^-`S=GVW+csU_+%QvFTRS5--Nhzfx!62e zJD@Z#E6q19$=xY3FH$KcR8=ol$=AEEn9ESpM6S#3sPQR>Rz>C_cr< zpUcC>&L&Bt)K57*EjrLIE<-2QQAs^8U)9Ri!q_oDH8IRN%QZSNt2EwO#naixDmcsD z#VD&J$tlVrDp!8n9ISXz|lM^*(@|g#Z)mXHzwPw*xSU$-#extB{tJSQKKX$J1GbIsgb4%1`5!l z6k(@E;ya5uCowlEB~d}YBqOyXQ9-{TBU3>?3Ct|Y$X75nQqV6hNK8&uFfmckPtMQH zO;j*3Q_wF+Ey~PKQP3~WNi5D#;59Q+&`&Q)O)N<*QZO@B(05cYGgr`eRxmeI(05lb zH&M{{QqcESFgI7w_f@bkP|y!h&<|A54^q$%RQ7|+xR?tsZ(9cjXG_X|A&sEURQ!q3%SI{q2Ff_DO&@WfeuTaphRN&RG zQZTeIRM5{Y#W*k83^PnXCsKkAuS7XE5_CvrW>Im8b4Fs30_dDfpF}7J{k&+<5yli^ zUgH5bz|`DS0U49(BCr=M3@sEaj13hmEQ}P)P0bX{jZ73Q4NMe3hM5?ffoTvMgbfWW zjZg$2CYTw+1uZO0;cSo&LYUXo)KbCB*iymN&=5i!nJXBZ8iM@=)@*2rFwoFa!P3+M zqR!kDOoLqjIs%C^ctLcZ?+nD4=`uj)cL|f&W1?p*qxLU+UC|McUx|pjg>$(PbCd3q! za9M?WMW;Afnybd7nnzl@B^r99+a?(#aJh$NIA@v1B<9-qc!dQAE5&=7C@Z=t zYZX{&s+Z)Z+Xv*t`sT+3X{xw*N4O~~tA_;m+8KnYB>P#G=o=g8s(5fk*!U`GhuFny zn5)@EWkn@Nhuass`6L->L=|X9+dEh!YZ&;r#@ZWtB%3+wsavE(Ddig}*=N}VDP~z% z2kQDqbGhj2+S+?5`g*G58^+}p1i1Ug#KvpJn`A{7n>gEO#wO^iSh}RC`6%iX+j~W) zVXv`4DF7O?uo@ebXh5eo7ZE(?*;Ij7AEXlFoM$65BSTYA9R@PX$tk}=AzDG#*uYQ$ za@ez>nTdj>i5aM>)CZ}69rg@Ork+TLJ%bDZo#h;+U}y+B*BRR>&nD)ex-&no1a``^ zC6*)%5`%h_)Ff)rHOSXD z)ipTM*WEZWNXcF=I$1j>R$nteR8!9>FV|DeI3>o&FsV2_*)l}KBqK}No~x+9+e}eK zDX7FiIo_vK!#qyeF+;^U!(Ao9*T5mrCC$#p#z-YmPbnwFKf==9!Mh~YUoX!;H95vQ z%OSATGgN~sQZXjQNK>;Q%va4o+gQig-pL~>Eg;cBFG*9;LESAbBR8c;PtQVCSFI#D z$$5hAA(KaGiMajm+F)TYJs>rFRP}NpP(>H`G%fq(FE(AF(Hp&&s!#XK>`NzX1yD@t88O)X9{BtA7c-X$b4EjcC5l}kG@ zA|cUF$vMW(R59H>Lnk7~NyE&_#UM&8TrU>1_fyk4pg>(K!#dF;!az+gxHL^gCoC<~ z$jHk`DO}H7$BRojIoQ!uM>)e#S6NfhDJ#`GM%CNj+EP)?%+lO1H8WBvG9flFBr>ir z+)~jX*W9yMC&AZ5#V#>Y&CVb(#Kqo|t1!VfEFh;O%B09ILZvV-DmF~T(Iil>z+WrB zNYy<*&Lt?#&Dc^cI6I~|H7Ul$KE_GMT{+w=C)FpzF)BJ*J%h_lD>>gfGd9pQJ67F4 z!Z*FHYdS53{qDbP>R$y(dTp-|h(z)R0IEH=o{&bS~{C)G};Aj2)!NY|qv$T=)1 zJ+f4%z}P3s%OxT~JDN+kG&j;A!PU*dB{?e8#lhbw-N8CH*UHh|J}%DD)IL5#&7`Q< zD@CK&FxlKHHqSLDG(WJ^J;5^3&c4*cJXR@Zi$#x2QI*VZ@M(#avf#mhY<%2Pev z!PY#9D_T7!KO{>dT;E?yJtj}bH9a#Z!64b$Hdfa$+R!>Ps@T}vJI5hiKT0h`(<3d& zAv(#eC^t(f)GEa!$wtj5)`81T!==PN#nZsD#MvRfz{bubOiM8_&PByPQa8&qD?Y0r zSt~L<(%mg1MpH2=D8?j6*UZB-#?`_s-L)XuH8#wKODA48RnOVoL_a&!$D%kdBG5xs zPt7RLA=NOqI9c7^G%8vrOHE0|CS2QFE7Kq|DJ;j?&qP<(T}5Bl+t|)iFM=!0t0>1U zEH&7mz);UM#K+LfJ5JNsD=psJ&oR5eQawM)#XHGUIYvLRz`ZEbUB_D8%sSE6EKEID zC(YkQM=i*ZOUX5^IIk$vGs06pOFcO%yU-}dB`7LQ-_6n3w;(W5GfU0YDB9FAI>SuI z-&QHzG|VSG)GaLs!k-)iB2(%Of?$-`CS4H_aO3}N(OV!KIu2@$|Kh)mU)y_*lG0V6}Grv?R zx+u)aM#mx1!ZxOm%fwyBrZB z)hW(2(p^8wE;Yo+CEd@W$TToi%R0!SYQ zGTJ{fw$vuQ*eW&HF2TlBEj-7`)gjLy&dMf7McdXtM=#P@J;2k-*2~paSve*mK2Rqh z(uOPDL&+$zsL091z{MjevrxrcNyorUE8HzT-z~jFH!&#RMkCuK*vcV5Pbb6O*DN8# zPAS?i$vf8DH73SZPuWb9E8nreD>5R`Cde@@JI<~&#l=4~+)vrY**wN3%q7X$Jv1W4 z-`35~J~&prAkHzzPc6bOTPZvs)7z}nHa<2W&YH_PBO*OMGcGA1+tollL)9-h!!0sC z(blHeAT6LI#4N?fKcKKMGd$NdB0DT3Og%C_sKCNIy)ZE`Gs`|+FH`7na)F48ID=^KkG%cwp#>mGs)hj>Nyg1a%CqF4k*Tvg6&oHq- zCEG7IJ}9JV^TP?~l zDOoW&J})>u-^EcmMoYsYEl9a2)5Oie$U4g|Bs$GLD@h|MHK{<`+t5o}-&rY(E6_|M zA}rh8#LCk=I51yJGtJE|P~XD4Aj3i_F-$2<$H_J>qEI!tG%VS>pd?Dq%`(e4H=-ma zs4(5w#n|7*)R4j(!J=qAfC?F|crNq)b-!{p^&de>|Cp^+lQ9oZh z(5f&>QCrnIH&I(>f-s*h$IS&N@FPLDja{Aw6GL(J3sf$Uv1V zDb!Ox$s{8xEh)%GDJdnv&?h#~QO&?4HpJDvFh52!FFM^>Q8h2bFw?`^tSHn?E6Fq4 z(Az1_Gc-Wmxx}+HlS?N(G}ApYMqSO=M8# zRNu!nQ`eSfy>k`#Unl@ zE;8B5G%m$UTO~nD!&fOmC&0)cU$-zm-ZwKU*dyCA&q+7RDNbF>+SD&3Qpuwr$KRva z*)>>IKRblWHaFNQTFc$K*ucubJjlKvSWn+oG1xyaBG1#ntT0z6z}e3zH{T(|(IwDZ zTRSX6F~Ba(Oj}DW-Pi_6L~Og$vaTq{&jM_Jd&JI6AoMAa@bz$iG@N;e=V zG{M``GCf99$KN#FOEJSe)67XdHZ;}1N>#Ho#;hp8(Yt^vUe!HACs8fIIVdH;PsPbw z+aO5IBt}!QD9%nZOvl10Tsb4x%+xMFPqQ?-$jUa))g~&+F54#B(jnZ-q1eaHoXb?p zxI|w!I6c?JT1_t|+{@3>(8$KK*gDMD!81z7#KSjL#njm#Ryjwt&{WAgHzLX@HNizU zDI_ws*vqfP$UTG0Jf+Y{$;q)e#9JvL#zn)%#8odLFf%qU$}&MmSwAHy$xSyiJ}1S? zF3&YcDaFyKFeBeAN!iA_v?$O?ODnv@hb!IHSi_;fF5NXfHP*|#z|hgpAUWG6PQzHm zBsa{~GEqB6Lo+MeJ47`<*3LpPE4|1zS1GheF)+r~+tIM7C^nia-cQvhH#{!avNWYo zE!izl(=#t4GA^n}C)Cr;(@0e%UfDXyC?hnsNGIAmPfb_FDOcY<#oW!w&mt=|N!hc= zk;_6cRy!^yIXE>#HPg~G!MMmIu_!GgUpv#-(KIJhSy3Y_!8JH8+h04?&??kD!Zl0D zC^9zP%UL(hA=6*e$-$e;I$upA%hM(?LOUeOLEk?zuh=3#D9JrA&pgh+MqRViAS^aM zCEX%cSvlX`A;r*JCp9}PCp|PmUEfD3C&NE2n=8P<-`Y_vDZ(#D%Qi--&_2eiz&tKl z#obCXK2*aX(q26~$lY1V(l6e(R6|?eEy~ke#Xmd7!9H21&^)NLz{rEk)Wxkh!pm0E zA=o)RAT=mbImjq6L&Mup(L6TDuQ0`0Nm)lPE+Jmu*3;C`E5lyX+##|=-OxZI$R|zL zCPFP$m#Z+R$S2s-Pbt$r(#OC>U*9V#*(=7xQPVxaF{vmnUqjp3-qJMAr&zgkju?mF+C|Q*u&5}Qa#MvHZ@q= z&^8*|pR?Aug@N$27qt)g~rI+apFR-&2FjK||dz z(=*CQKiS^isU%&^C^XP0%09m^-ptG|EY&vGJf}FfRKq1I+1@_PBQ`9-AtE9;y2L%+ z%}A+G%gHe;fy=%yHp0})U(-%K+FvI*-C5n#-d0^RCN3;k)yE>lF(b$~+u1EOE6&cO zSjAl>)~QG_$Iv?=z``X*Kgu;S&ryY|KwHJdA!z(Z)PES$K&DPq` zTSGglFghtYqd;5P(AOs;-CDE6)-cknG+ST0)J@4()k@9GqBKsmh)YM$$+$4BC{R&T zOI^=e-P+UKFFZp-S3S%-%|AXQ%RJUxIWOKW)iu(?+pk#3TT!_{DZs}esvxPS#W*9tKQ`GZ&N(>OP}RiUQ9Io>Iwe{=*h*K=AW+dN+A=6J(a9+; z$2KHQCnzi+IXWyb%S|W5hbz{`E-Nd^C^S8((B7%QKVHejIKkaF$iz6+RW;N>GsMLs zC%#nIyi_r|AloB9-6ToTKs!6e!Lm>-&RM@G)Xkd9C@9@bJF!!^aV*x669I49o9!oo@;SufwEz{DlM zIZZ!4##Ajb*WN!z$EP4PAT>YNm@7#s-P|EcMMvA%DLX4wIo&_gxY(*BJ3`6C(%&vZ zH8$8lCo@qeFD=MY(K#zMF)cjUA|<{w)I(WEPctmrQD2eEUp3DzJh#*~#j;qtG^@a> zBrxB=!pmFH-m)Z1$;TtsFxl7A)6_59+uST(MD>D(@NLE%~-EgM>Qtg$xg}K z$JsP3!luAOCqUcNQOhtz*)c0JJ;ylH-B>T)M#V2W&&MD(Tq%MpTdTBC%SSsU%-q1- zKHtel-L^nOE1@(oLpR+~S>40UKE^)HB+<~JNHxbq(OA{lIx5~P$W$v+Ia4jv)k)XD zipyEs(IHe*-`iQuTQSf@D>7IwUo+RsKi5Gi)G$BZTGy@6*(24{$H^i%)uc4FG%?;G zt0X%jAU;tsHY?fOCaZ|cHCo$5CDO-E-6O)s!qdc4+etA>*DcM!H$67aH7g+6LtD2n z&?`VEAv7(~&C4=d%QQCBRnyqEFyGrh!dc7Bg-ct_)!ACNG@)3>+r})+%PZd5#4065 zDLGQhB0gWq&&9Im%BRo^=$y;P|<(IcEoSIOMmNk=nV%QG~@GuS#a%U)kC$sohPE(2CQ+*>&fLR6 z&rVO>w>U$`oy#~)M_bDvG&V3;S2x+qLDeBkqtM#PFvch;Cn7G~LMJ#b(>gW6%~v%& zAk!_fP|3r>C)g{^F~Y;Z%stq|UCWM3Rn0FrHeb=gy->#|(aSL~JJUGCz|Y$_&Dg^! z&LGAlJ4`FnDJ0$@DKA`0*`d_av?wW6*Q&%VL&eh4C)go0n#hntKh7e+%g9YlRWVFk*FVqSKi0)sIUpm(F)vU@%`nWx$wWUwFGDGz z)J`iqTvOFjFGV}knoGmd(abM3!b8d5MkC78L)oan-%`sf%TYH+KT6Zr&%;bP%Qws` zEZjdcO|eAD%pz2yAj2oX$4t4@r8L4;E7poDEhi$&TPw@L+&Ce|)ygnmJIl{CUEM)3 zLftb+H91KqAtI*j2;G#n34t zBG->Ayud%uOx46NIKb4!AuFg*PbtMrT~9sCF4{T7rqIeVT)oI5Gd|5wF;X+w!`eXE z&&x_Zw;(V*%{w8+%v3WgoXbux#>ywd+aNY3B*enoElJ*sbS0&LW zL`%iLG(X1A&&oO4%Ox^I#mTJD*FP&iKET>VCCiJ;IoUQ*DZ$mf#LhTPEiTG7$g{*M zBG$FDV&@(MAE;-sLrzF=tE7P&aNXtQ~SgknO*jh8m+Dy^kJw#2{#4O$=MpHdJ zOi3-WR8^HrEhxz;)+EE-CC|gqAw?s?&B>`aEZ5#TE?=ua*Em*x!Jv&v~!Ok;V*FQr=IaJfp+(@g` z#Z5U+( z$HXq)+apz9)66I*%sef~SR>7_G&$eK-Lp8sB*rf~&dJWop~Tm~CN9|1!q?x`Im0)@eKTtI?PCFqW z#!53+MJ+3*(6k`Us#wuT$xt)Kwb;(c#6{E5JfhIYEV#%$-6x*Q#63LDD$~$B%__;Q zMA6C9IM6{k*iqM3$Es>Qr|sRFV#D?SU1c+)x|;IHYFrG-8~@6 zw#XsUGt50UJ=4N4*EUMW&DJkEFhF0`*(=)6jw{l^!>>5j$XU-SC@@ShCe2$jH?}ZI zGt%evCDh$PBh21E*U8ew+Q#4A*{`s`!?BRd%q23z*f-82 zEt=)k{m=S~JVVIVC4mRomQED?3$P zDJ&q-q9EI*#KSVzG0`d^Kf;o$Kry7q+Eq*0A}g-Q)TCI=(xk*UF<;-o)HtG4Bibxp z*VxUxFx5a`O-VmFKF-d?(;%}b*D%F2FxE#a-5|!zgDb+RG&DUs&os%|tym>3$jsBs z%H22A)>z5U$S*0**E!22E;UCx&riiSB;QJ3UEM6eJKixoJt#TbM$5!KzaW$=G`P^- z#M3syu)xO2u-L@XF48+)Co#y-y3jXIQ`a&#-_6-aHOMeE-N?}@u^`PW(nvo}PuJKg zCC5V3z}i4PpUcEoO*1spS6MqOK}jP?#okFb);UnoAU-rtDKI-ZUNu|ABE=;_QzJep ztu(+dE5$lUOVzi~(9kZ;UtQnTEy|M1-6_diF*YPN*GD(R#x_UYA~?}KGpsl#QA5w& zQ%~DfLnXr5Mz26mw?xU<+s@oM%rVt3Ay*|w**4QS+d;!6pDWSJH6ueKH#^!|*TBNY z(>FcSHZab_GDF`#HaFEjTPM%gDa23TS2n%rwnjIlwnOt02la%&)*MHPkUGLCs$& zL^m(o)wR$w*;&)m&)zCuk*hEzKQqy;z%<)cQN=hjUo%u)*<3LuL?zHmFFZImHOJe@ zImgh}KR?VO##Y5y-y=HMJxnpg!b98F$Uh}XCpw!e%RbMz)X*s0J|$n-CrR61FI+oV zPu0jGU)RbZw%8=muGrhvE;T^Uyf{QP(m5tiE!fLGQC&$ntH9V!RWVhykjo%FM>RpQ z)ZZ*KLL=NLI@HnMS}8DBRmVMAG0HGWNv}vv-7hXxB|XeAz)>&J+Q^_VSS80tuTWjt zG|tc6L{W#UDA~<2M=4&rFeTY1!{1LSS=mZm%Pv0EC9^QyOfT3eA;~f`OCuydILJWV z+EqVa-@`wqC|bil)yg9_Mcc(jm&;U1tDsmnSS3f-DI+j5Mc>OjRL9od+&j!FSIs@j z(Y`oV!`>>{(89pUOf^V7%EK;KJIdEO&LSn>*e=*9+1irJH#uCzGFL-CTFD{6EipV? z(=;%}s?aPvJu^T#-CS44Hr!e(G0h-BsW7y}F)Q3W!&A#%RV~!pD#x_Y*&r&-jVmm~ z&p9!{!#X1-F~ix{)Y;C{%SA6C*ix}rH$0`VFe2aBw;)U>AkMEKBfQA9L_5mW)Y2z0 z)HlnaFu%|+%E*JuN5@}DvnXE2$JRVCCN9$3#WboYy`<3C&#O4gKh`5DELX=Y-o!V| zH!aM|$=uj8Qa8xn(bdc=AhyIW+$qsDj?2d0(bB;+ExEwbKs~-B)LhdxxS-fD%O}`5 zJSa9TC*3Y9TFYF`$}rG7#?vj=#x=u9tJpO%IVd^K%ER8Zz_5hNRWr`i$TuQG&0gPM zyC6KruGB3(Gub>LAlI5}B8+b+$~#K$Bk+QA_qJwGtToGV$`(N3dKE2hLCGDE}6$~8RQ!6HAq zNGB#EFDY8lJ0v>BGgQw*Q%T1oT**zxvc%NbB+e{L$vi3EKh51FC)kL~AlcZ-$w zP|Lc&OUK$U&??h7#M&@UB`eS_Brd}>MI}4K*DSJ3_-u+dC}H#5g`T z(N`%=J55c^CSE1g)GLVLol7N7Nw*-tpeQ#$FWfXgDk?0+ zQP)5-%fnd5&cVjnSxZZ)q@dI^+0`Rm*(0ndy(Ga!$xXR1B3{#6C)h47&@`OOxui7K z**V=#Lo-n&!YL`uSSP^ATT$K5JkHC8hrF*-NaHXy_|(lpP{oy$$zPD9_z&&xJ0PdhR# zry$itOC{br-zLl?SYJ^uF5Jq_-qt2rSv%1@&M?AUKf^{jDNZBUKg7vD&&)bD%vhHz z*V|EFM>*79*`UZLz~9lw!aOw6#yUJ9%P%s|Ej~`qST8W8z|vFQvQ*zKOd~N#O-&~@ z)-)kDJ6F?3G1N@ck4q~pDp<|LFC#H7!ZubbFkC&)GA%eIKg!F)GAlvHQ7bw#L{(AW zM8((9&%q)$QbV;UFIv+`$21@}N!21lC&r#jGdLrnz{nuoM%ltQ#Jjj4LpLTq&^gIi zH_%TE)h)u-BP2RmOVcb`D_TV@IoH%E zDz${mA=@-m&rr8CFHyr;&&f$y*VWS^MbW}Q%d9w8RoBNcIVw@tB)T}qpwLjs(<|N1 zL_fznEmqM*+qT5bA=yYJh0C?r(L6oXF(J#&&)dT?#6`>2CfYkJz~0o;*}+>q-8RC+ z)z?D9HC0DD+¬T{X;Bzc|h+#xEtiP%pkP+#!d{%q=!MKRv-dDyqmWJSH@OI6(>qtrab(>J`Z$lXiZCdbApN5wNv*D@m6+1$%NAw4xf#Uaa8 zBgw%;*HoL!qR_X{*euf1)F{b6+$dbbJiye^)HE_C!!y9%JzOWWR5w5;QO(>r-?qdp z&;~RZ8ewd2ZI`54oM9HORiIoHW2>lc?-b*2XX0V4r|KK8 zrsoEuB)g>ZB3pVvvz$?3NX3>7<*KQ|uEH;O1lPQ4nn5tr+2~73XZIZ2YPTV(B`m0+l=?iQi%SL77v z?w)FFn~;~5VVoaplY|@%my)O!UzBg0q7@h%ADrZ=lAWKZ zp%rHt=Ij-(n;WE=uWn*rY7t@(rWfk2lVOpQsF;{#XyssTWW}XfVp6J@X&$BQXd0LA z8tdj@QD|mjnVMFRZeD7YmYo}6V4&p^8<1%m9jIrZ5^iZ58s(YhuB05CX%wdzYZRx? zWt?eJRAP{!=4FzeY-?rVS!kAG7HFhbqLgb=oRX?mP;91Trs$OCs}i85t*jei=%|$v zW>^yLl@OPhWn|}PY{ZolP@1hAl&q@mlI`Yh67QSf7@%zwXk1#Fq+J?qA8D$euan`e z7UyB@mFg25QfT8J8?S90qnsR|9hnwm8l;`Zm8@@CVC5C>V&$e4o1$*-85Nvv9-SQM z<6Ib&ZEl?wrlcL8;b0$U7iXDf;F|64s-x$gm+R)LtLCVtsh#a<6~JW{RFoDPq2-ch zr(*25U7>q8Jn6O7nbYl9_3KrkmaJ6T9A^O>8=?U=n=kKSRIKi2X6|986~`5A8L4Fzs}k)KALFd0t8X6So@}9+6qx629a5YhrXNsh zq-3U*ZWN!GuAgENYU5m-qN48T8KPcfVCChj<7RKimFbsWQmUm~nj9A5@9XAd=MWPR zoD*)7m*yX9s&DI~Z{*<-=&x_3Z=W9*7p52+8>ASV;^*wH8<-WFs>PL_7oMeN z5oTAEm|~*o5RqYEnPrn|m}wN?X6c#ZTwv?urWT`|Zef?}?ys5}AERaI;h2;9Bae5gVy$W}V>?=ad&@kX&e#lkA}vqM_`S zXJZ~=8KD{S(PM6;)~<>E&LK?~|Nlrl}r~pjMO^ zmuKi28=#UL7!hA=5ECEaY-MHduM%XXlI~~WnQrf7r5NPSrxk8ltQe`O7@4dc z8)M>;l@jQulbn>tW#eII6{Zp7nNS*{W04)DqhrxQ^c7_4Kc7v+_tonT$yYj3A+ zXAqDV9+%{x5o#4=Wn`wOTcQ=`WD}AV6w77q7M_}srRy4M9p)A9=@yn{Yh@c8sTfu0 zq-B}lYUJe^Ra97HYm}Cp5ozP&k>V2NnPw7ITCASoov!Jo8fK==m6ukS7;O-tu9}?a zlpP)u98i#!7@DZ)qm!1Is2gN#>Jw}hlHjJPm96UT9A%$v?viVetZk<4YiyM0p`+~; zmC5B|plKNrV5ga+7ox4?X%%1@Z)4)@SD0&|n--UnWSVQ|6_uG9X<-_#Yp!UZoa^oy zXYLtTsB2N+7jK&zk*wj(rJbPRljM_sjiN>u#A)7^{;N zq3UDiZCj|8>6nxo8WojWSQ_LT6quapY-#8b78V;8kRF*3Z58377;oXvjWbWyl zoD=G0V4S*s7 z=o3|1Xz%5oMN5gk!BDUsBWiYRKS&Kui@&I9TDxPrDxzDlH~4e z8thr%mZ%Z$ADR_v?UrL_qhg?$m+oX5;Gb!&q^_P3o1AIt;S}i>5@O}3?POodm2aI| z}hGOtnL(*7^V?n5n_~QpJr*N;T-0mZkeX%?HLp9A8MFYXlG)q7~o=OsbrFt z>8YEYVG*U|9LSXzpC7Lip_EsUnVp@VTpVg`t8P}9W0aw;>hI-Z>fq*>q2*Yjt*sZS zSz4^*tsiM&<(L-~8g62nVX3K9Y@_1Ml@b^0tCgCotf}QSC^?665XQA76@&W5NBnO9+{9DqgJeC@0S^+8mZ~0=V7N98OIfGq7kPZ6{Z&v6=9Q+ zr)O`OE#}ps+6b~tREk3ZmZ#8ZKh?PW2Tjx>ENuCq@Ed*X=d-19O#gg=U{DW=~I&7 zt72y0kd~sEP*`A_ZOG+ZsAC>hP*7^7W|P9jTS;5|eFgU*e&q6c%UCrJPh?rs7yB_8kS_H9qa5KZ{=VZ zX=h?$Y3dnZpsTA@6zOKJ>lc&h?_}s@7iJWYWbI>=>7woJs-0P4>CNR^Vx8d(=E*b4ZKgK^WE5kP!7V<@)Yrt?%s4bI%s$dP)FA`35Kbr4KQTbd&xcFX*SyfeO4BUDB`Va! zKr=Q}JJ#0OBg`o-xTQfPdL@&`NEFs_4RmICKBu!7%%PurH zB`D2LUoA8}#UfS7z=|t7Uo9gn#?PU^BrGf5N8MJ#HQYTbRyD#t)yu&;D91L@**L$% zTiGoxxiCuKUEe3dFFqyR%+A{!=5X%&^E$0CNMHp z)6vyKDaO~i$l5F*C^|*Iz{ob=(=yP-R7KG#F~vnSMKLZk*V8I4IyyeFIK;uvP0cYf z#5p;g%UnM&*HlZ>Io--Dz%C#(F-K3^C|ub+BUZz$Fjghp&lq%)Nm{V0Ww=v-qj`d} zeN=WqqDxqOY*?amZd_PF7*{~JuC1e{S$?>;ib`}~ltZdgjFxUdScI)sPOyf5fwpI< zMT&ZWL9n87Tw-8`rj~<}zPXZ7qF1)9wzGbKgS$Cbk!iGTYPgG1uwG$8u#2y{b*f5H zWI|Mtoq>{vw?>d{hQE$sp?ai;PmD%Nww9}xlYyyPh*m+id4!RTN3v<2HCLgEZdAN) zU`B>zqC<3{Yn)k*c2KCjl68==v#U>Wx{-5+bxcNJyi!13rgN;iSGuvgjhm;cR+6q& zV3c-AW_~!Am7}?~pM|BLYJ9A}lb64Sl}A=&LY79dm9u_Gp-E&ybc~Nnl$Mo7sI5wJ zzE`@dm03z?QK6foovx`tLAGav1y`hQa*}zpyN;)$L%vr)uyvl1YNnB8h^M-rCFk$ow&o|ijhxovS)F8N`#N8vu3hSP<&K!Or)z?gt}^~LA-H+ zdqjF@tgVM>g0sJOf?9Tjv8j=3W<* zw!1-!yLE}Db&`61xKEUUb&{ryuTnr^NV0B(rkS->iegE6yoFDKOR}#`wpS6CfuX;R zX^vi0h>}@|f1avtv6-<$x~o>PV^)H5sdKS;p`M9{Rf%swdVyAQR(NTEPHbwXn__}) zbXd4;VxD1%23K&1v0_@XSC+0>cA;vvVWv}hf{|v1xw5uPiHf44a*UEzlybIpQEH4& zhP^|QQ?jK`dZC4?y+^ERQ9)p+ccwL$YIb6wdWK zn3;*IQrT8L6eptGizp{{|3foE)NVyT&q8kd=(YpJ@XO}3V*Z?uDI zhKFUmwY!;OPEekUntr;iN?x+Bp}C$`vAwcmbZEY3w!U3Vgk^rAm$jpIn7fmApsya6 zyNjP+phv2@U6`9gp^KiQN=S0Fp@&(3k(Yy~nxA`-g>^!hQlz1Cd}M+_ltodLwY7$~ zf0(ISj#i9cT%oM-mquztQg)8DzmIyMa(1{@NOoF~zngKGVvMx3gxbX}*(pM2uZRxS3<1PN;vW zr&h4BVSYf7tFBFwezIa{G?#~oYMMq)QG{)wx~j6VgKA zeteLAwy~Oxc2HrWPg-t>MV?oXwN4418DZnS57 zYEgz=Oj=^Du4=T3w|)bmkNKc_Tq)&=VOz zr$a!`kuWqih8)X)eA%M&d zC9ZQpV95e@B#4m#>_iYtV+C_l15jOtav}&gAz?oc#KKsCS0CGPAjTl;L5_tU2V!i3 zC5?f^p#CE@jTxF6o0}`>6F3gUD$^q@CBjK7Cnq>C%h5H?*K>+s7d{*Tlxey*SufB{5Rp zCq5`n+046G)x*Iy-P241YaN+lpk%RJo0 zH_*w#-8VkQ+r+Xc)k(9&R9VL;*F7rI+cd>l-6U5vEXqpNyrjS}S=C2L(a|rStH8xw zBUw?YIL%ej+E+)&}D>unLFw)Q^KG85K)TJ~ZC4FgQWa z+R9yDKglJ@G0MZot02hQ-Z?MC-nJ-LB@MK%J}A~cUoXqsK*PGoN!3&(!7SffHJD4I zG{IBD(b&pAU*Dq0BRVZdBS14L**(VE%g9+XC)`aru%sw0AiE?gL`5q+Cs<9%(+A_g8MaerU zGGE`eP)EbcJ;A_5Ian$hb%^Us*YY%iSj^JR!O`)GsPm*T_;+HzUh1CBn0?Bt0cPO}`{QEip~g zPf0x^z^BwbsMIFdJ5$jpUOynsJ0mzSBgQ&CTc69;KflP?B1b8}OHb7@&D~C0$t56G zF(^*i#?vP>SQ;91(J2BA8)77G|q%bHUH(ax%z}Q1sQAI;BH#^HQMN2u>O2a2cUri-CP&3## z)YeH`%O+E^Fe56(*QYckO}jLeD>WcEqe$6U&)vjGUn|Jo)iFH8OEJydL8mY#Cpp$Y zM>Eo^K-14KRW&uuJ}D?KC7>Y4MmMP>Ixa86A~7o?L4!*tE7r~=IK$V+BRnR+ML8x+ z->6tA+&3xBBr#XlH`LxmB}pg9DmS>uLO0$(L*H51Ffd$4E6`Up(A&+mASWW6E4x_7 z&p<2Qz}X@<%URhd-9;tME;rZ6*50EuRLeTLI7K7XB+=8U#Kbhk%Gf{B*Fe|JHZ)q< z(I+uCz&+BfC^jkH)YCsNKiI)FA=D`_#?8VeKS@R3&q+H#*)qn))znKh z%q7~+%`C6LQpF{uR4F}1wM#(fJHB8IbFTdDWxFV)G^c8MPFSr$u%)L z$KEzY*R(XDNYOFI%T>`JC!VVyt|+<0UP~FYTQpoNG*I8s(m6EIG2hTI$2QQ(z)w>( z)*!&cR?X1Lrbx-zyd=U=M=zqtBG)fjB{n)XF2I^AR533q&ND44H#s~}-B>X-E~U^p z*F@V^%PT9;z||lkFgGM3UCAiQti;+(-992aSwp=*ODiM9-61~J#ninpi%ZiiD%jar zM_EcLI3!)eF2P07xi~dVIoHg_P2JNo z$UMxlI6XMkrjRQ&)2|@KUnxb?C@w46$XL@=+g{y9J=f96NK>~kFFruz-_9#EJUQDcI;q6IB;GhC z+$Yh`z}K=cOvy-9Ek4!F&@MN&*hNv#z{A?nrPRhRSl`Dc!iviv)IFeBS1X}dFGVd| z$;j5$!?svI#V^P-z}_}CNITy+COpT)Su-Id*|8v0(Ij8BG&46K(M%~+E6yb{E-)*Z zD?eE+GTcbn+dA9P+a*vl$WA9t*-+QlB{-qb(LXQN-cD0BAX(2nE=(sRBgI=Q*T`5$ zBQDj&Dpke8NXghS(3neAOGDjHOV!iL!M@1ICtX>|u*6g&P+KG1BGb(%&LAP*$0ycG zN6Ek}J4w;T(<(a5C$7lYQ9V2}Dab!ACfYKJ%R}EwBRe}FHZ9gsr^ve0GB6>h*gxLT zInUKA$}d69B-%_rD>FPcut2d`OFP_H)7UiC$T->9A|}^SIU`XoI)_Us**74=$V)NE z*;F~C*w4V%$TG{#B2C#e&nrVmBO)T*E663+CM4J|$F^8oy(p-_#V}DT(BI16+bldr z&pDk~()Nt-K8CC$hyMx(&hz{fp4$;ZYyNh3Er$uvCNGt$=6BqqZ( zA>7g-Mb{-T(8efDzu4U)P(RpS$4x0OKFm)~%iUIwE5zK!z}eZ*-pWo_BTP*<#n?A6 z(%dq`A|)zYLoeSwGQ~0?DAmZv#9i0bRK?iPPAy!^Qa36lA=BPbFCaH9OPwp%#KbE- zQ7OybB{4={F+|hYSJfvV&M`2&P(3Ek$k8)g!$?;#(#sg>-AFUSCp_9yBR1QyB*VtY+$i12RmDS3 zF+a+=)Il#b#NRcU%P8A2Qq#sSJ4PqY#yu^xFd{rN%EPfVsL;pUJJ&8QK|8=JKG-YM zxY#r`*v3vxDJd;bGdEG$#kM#oJ=Lf%*N@9E*fTmV&o3|}+1J6qAx23fsJKL1CoM0d zC`rxVz~3)Q#oN}wz9c2dz{4^;BPcW}Hpo8NNLjluEXpWRN6k-M$*wfo$W%2dM$sm_$WB?;HBL!aD<&?~H80r1CsWU)w9q8bE?Y6f-#N}Q z)Sk=NJ1r?aG04%aG*~A}(}ir#8lTMUol!E#3nQ^K3UyUBiAw9z|qs)Do-QMJ}%wL zB40DyI@8NNB{15`RWDdyG2bu4DZRkcBSqQ6zmO~6DZ@+Az&1ZEEzLnk)!NxTKEXIW zKQ<{^xy0EgpvWf6R9jg)J|M9$#9GbH+&9VGJK8qdqBuBLvnV9Tr&QULOW!WvCtS5u zCnGXJFU;IqH9p+M)ho;)-APHUAiBWY-N4H-+(|JmIy~5})FLt1+B#h`EiTp9OG{hL z(9FXt#*QmASItvNM?2O`FH$wh)4|?A)7#q5MNcI?QYY6YHYmtKHD4**FUc@6wa_-f z#j7|ZEHKH$A}TE|Dm61ROgG4ot0>#UH73$dHL%bz!6?qrD7Q!8IFFgG-+Ksz|w zPOGHI#??k&r@&RsC9qgq&sbl@Hri8@%h4x4!q`MxGt|J+AT}-ABsj`FK_e?qDcUQ? z&fCsgxhTpkDAwG}C`T!{xF|e2+DbD$+sw|%#K6(m&ObKECz8unBTF$TP0P^N$1T7v z*D2lIEz2f9y2!vxFDp4$$t_Pu)yOVVEv{5KFf~NcE+N}CCBag~qtvxT+0Vcx+@aK) zt5_}3&rHS5L_aOlDa|NM%{N$6GcG_s**eQl%{V>OCNv=>CDJt7Go{cW)>+FsG0EJ| z$}rR=LdhZBwZI@WRG%xv-?%6_)l*x~&c|QH$vD2i$tFF-HO0@s*e|6hD^DlbF)qQS z)I2gj*VWcrr?6O6B{tN>JJ?Y*IV(Y}G^4%uqYh(N@Dg+rTeU-JwL$KG-TY zB+A$)t578_x3n}(Kh8VA%q}X}C&M+&#KTiXQ!CCczr;OVF*L?CT$Rf=&D|t6GE`GJ z-$_X)&?hV`&C5b1%qdwdQ%74r&#%z z%{8Qi%gisSP)jo*+d3}Hw6rAMIIPGlHa5*Q+}qsRKUr5#SOPf%-K?@ zz|G&#JuINm%g0eM&CS)a*oG_2H`+|m(%DcmDLg?-B_%5;ve?k8z*OH@C)ZZh&DBB0 z)LbcACtc0bKg!dxP%m0V*(lmXJJUABF4e|T+uhZMOT*P%S=Ufo*rk)G^u5 zU0*fQ)XdP)Oi|Z9QzJ)TJJ}{*)jC=)*VWEKQPVZrGFabAvD7hB!^kbAG@HxWsX$B5 zSVgZW%_ZJ3HOsqLD>+%wN7X9F)}+)XHq*SiKC%a zP=2IcMqnyej;@AhUY?ghv~{$3l1Z*vmXAiNONpD2ja^WLXHjUZVTh@Nxr$bhfwz{q zN?2%EhJk^$N2rsrez0e0cxYyp6_-kCqDQ!0fKPl$Xo#18u7hc8K%9w@O0I!xVNsr$ zQ;<_~zEYk?ZdO2!nrmTfOp;luyT7Ngl~=NlVzH8sdwv{OdbYi;wy~#qft{m;hQFqM zXjGJswU@iDnysN~pjmWcYH>!0ol3Edb-Y2Qt)Zidmx@DXtc8!BQ?6@iiguhs9+#F* zkh^(Mp{r%QmbrFNw1I}DVQyedgk6ZapT2Xle~z-gzpss&jlV}`Opsc5xMxXptdmx_ zX;5I1OJt~JY)}YSc(FmGnqFaIUWj&bo@QQMYbfBxUbCgDGL{W;Be!7}o375H*ahylEL$<4dqM5&Qo~EyoYI=aNMU1ja zn693VpJI-sQc_$>UXiJ>jZ31NmREtMkzG)(T5fn~tfNYHV73;Qu7AF7YNWGynpLV* zh@PsAnQ^YRN_I+YY*ebVv7W78eojD?mU~>OO0a8AqFrIUTE1IpbhN3xVuF8>UX-U( zFju6pabTgXwpMPWyG6X2PLxNWYMhm^Q%bUNwwJfLZ;GLzhMk>Hl23%bpKF1$qoRAZ zxqYg>qnchuq?4I-sG=R0X-Hl|u#sP|ccO}Zo}a3jPO5!|jb4eCm9@2bv~{FaOqfb+ zp<#MfRz``TW=5u|Q)srcex9GbU6zV!kb|2}3Rj_dq>g`nT4;cthgYVVVzyOIP-;}9 zy^BFoqH;)zOO{Jwh_k+ynRmLfQmBq@bZ$tg>%lL8(@;x2}tNVPJr@zM-{qbZCNUxVE91t8+qFV609~RDzm= zQKWK7luNk2dPKfXwvkCrTxcGbmZ6`$v8jixYM8o3fMb}gjk8gRkAt5@hM%dUUbbh3 zM@nRJva+e4iD`I{il>u&pp_x;Z zRYtC+Q;M5rLZOD8p+&K?zjmSr-RV^pfC zkG^qQutP>ph@YZ!x{J4Cj$4qWv5%pOVRCdtj8ooL%W?)uYg1cpMcAUMcqkeQzc444qoL!*4 zvAUg>M!080s$-C&mqx5tlv-R|u6>TWLx@JCpI(Smu>N@SFio0FqijQtq zL2?3@zg0wq~WO_kvv`M(N ztDc^xn^(9`pkaxUhKf&ep=Cg>O{!W_Xk199l7=c*s)|EGM1gmlN=CGGfr~|I#TBg3OUs!}eP`IC#p{J#VcDP+)q<^r3VuDp*wxwa9Czoo5l2t~S zk4|Wgs-}*$s;+Wan0=Oen6ZXRp{9~nYEe``QkbTzicgNedvUaJk&Tw7b4GDQR#t#X znpvX0R=zt|pubC~Rkl~KVysG>L1IQoVyKmGbb(@=eQb)ePe`_kvuk9Ehqr%HYGg`q zNS;!Vvr$2oQ=Yr0d75psNuG{j99M|9U9nn1a%iMMK&*C5MvP;qfkA#~Vz`NWety1# zmbJI0jj^k5tX)D$ZjOVlYpg-KjkAWgw_U1Yl7Du#U2Za$eV&h2w!3|XbD@`imX>p< zL1|v5vYoSAVsNHGvZ-sXjaFQcmXVQ}Zi$LVR*+wUQ$e0ZdQM4!ieijvnx3bVC6|F( zlBKF$c3iHHv5T`-n7XH3Zfvw;kwburWvq{GVNj+~teT>tyPZk0c5zy~v71dolCe@w zjGw8Ihnru9PGKCEN3@c1VMeyUrLKLExvyiAW2vF1jcUBPpF^U%t&Y2+y<47TfWBHp zvZ1xBho60dOKEmMv3ayta*}3pc7{rL2A4%ha(Gx#ez96%et<)wa#p^Ut-47`QD#YQ zs$;rMShk6Ckd~8WXk5BpQjv~zP;rsHdQq%yNJxI5o05iVX@nP-x2m^`YldB>mV=FL zm~&x)w_|&VzHxGVVVq5@uAf<)vZbnrrK6sUVML0P8ke<7wyvLjRH%NWMSz!&XFzmLjJ8FA zM|z^OQF@F=vaX`Gv8PjFhK@&EjB>7Pc$%(*U7D+QXrY~7P>fx!uCF?mX_9kLUTk)( zqmQApy-}%+mYsV}e4<8>T5yhIY^i=!c5;fobAg4SUAl%@jE=sFNnU86m5zypLrJ_z zwxge&Czp0&oVjUmyt9*zQEINemA^@*ww`mAgO{#>gQHGCdV;1^sZvUyM^?I~x`ADE zfp?&zYJ!e|ze!eZPDFaTR!kz7t$UGbnx96lPi~U8O{u9>ew?+9x`wqyQIUCyt%0jS zj(<|1VXmWHYOan(N|<7hSxR_}f3lT|jeELtw7GMP7gu6IkdIPqQH)<)Qg*RxvV(7c zi(b5wf0|N(QE8!$rlXg(wpD?Zm7|-XV@ayLvRQaSq0m?0x!jMExiyEuXJx4E4%dkLJxbd!f+RtaIV0- z2xm3@c$aMB2(N6TAoZMlbvsMjj1Ysch`7x3aLar@b<-&A#GGtRue@vvJpcpKLRml#-NqBfUTa!+b>x3k^pNi-;)OBx56gBYS%% zv+(2~OB2uF09zG36;D?$i>RV}cf~OEXfDOrq^wLWV<#h(R22_5b4R1tl#+-f2k*!n z>tZW+rzEE&HIoE0)!5jyELV%f0E7JEkg$ki&mv=8)eIFi7v~f%9iu?Aj8IE=uc9JV zFB4Y>zZkn{op6uzI1Tq;^AvrnT$e-(y`s=O$4nDFUytmh@FdHOd>6&YFf$ExCFh{b z2re5Ndk6cR5KE`fC{IIQj{r~4oPrD^O;g=0m!!BngLs?#C^fqXN7IBjUBwU;w`_yx z0t3esy?`L?yePx0;L>O=LtiH+`7t+Z&D99P4r(vqN}Y`u8J+|>^L&aQpa3yX;_{JhdRL zbeG)JRIWTrpFq_FkElEqH6N3hxb&a|C1u~dgxrAaOf`>~Afr`j^$Y^)fRHGsr zcbl-tAh$59)KYB&lN^b!h{f=^q?4hAN>sX zwCvdQ+$;-kz36mBXXp5g>|k%D@bEwnV~@lHdvh0?#2k%4CpBMvWe*3P6id&9G$m^; zFFivOi-ed$bt7f#B5^7-N4gUC)4IW3IHgTnC4AQ=gKogkTTzOm(%WA|I9TP>nrNKH*KBR;yhOX;Y&$<|m$V3n{1it|vqD$foS;~1mx$CbCkKlJ_k_rJ_cR@?2wQuL zP+#4ARV6zYw;XdvYh$OZbgmc!9W#?44dWc0M3-16mFy@JFTY^3JV(9Am?Zl!WojIm|sQ6H?$Xv^CJH2T0I4@swy@Dcp zm8^t9jc7~jw7@7&M;+7PnDjg&M=raNbT5DZAdB1>b^G)r7nRZkFIQLh3`@sM)r6t~ zXZ=uf%>eV9JPXV0ypTkv!W^^c7%Pn+_ZZ!RAe92U933An+Y~c(o5a*0MSqo&(Bx=c zO=FG3AeA(iNVk%p{HP);bC<$^@YoWy+=3VlYcoe56+4xP5-r`h*r38957S}~e=d#W zc+Fxv4Y$x_&q%do4OM*$#{d;ipFmwFRo#+Y?f8HUZ%s8rpIlR;uo9J=e2pAa16_9| z1A7%)lOXeAB`s|(TOD^>jy9Cx>F~ zLd61;cn?=^?-adM>mn^bUkyKF^%V6SN4Mett>R+O2;I!s0L>x~=ZI3@$Rc~iaAWRtn@5BHUG#oKNok~OcMhy$At7OFD~u$%q$+gM{aPq$nX zzhG036s~w*4=blMP5ucg2u` zKqY-cYj=kn$Hao@S(!`8#r6`M7mqKML{jhL<&vXNACo|2! zaK&)_K;=9ieJ)p5yNJ@vgwXWlynMgxluUEe6mK)TltM>4?c6X`ElW4`Ocf(ry)c!u za8p;~WUZv|cwemokN84e`}i=W6i-Dib8j_=ID6krGmAW1UxPFkpQvCvr}$FSSR-%E z5~Wxr&m?=LbR+v<4W-yL&**T)1nt0x0LQ@i)a2ms%(UPb3oZi#O-*O_i~#Sngp?fT zB#k)dAjSL)C$A`zg3vrARihLgO)FzdzsPXMJpJrIoz&87)BIpdJDr%qG%L*Od>^!5eJRdi0Z_jYuBDbhy?+BH64R5~!7w=e$6t7fG!*oq;qwFlR3|kWo7gJA7 zZH7gqY|T>62D9vUp;GmW6R>8U=wv+U8fKSckL+C zL_a-0O^3{^P^BU>RWl2%QXgBDBwtl4t>h>!TP0U*#l#3hKXW59)kyUs!@PVY>!kRw z;LPwSMKc2%^Sq=`KW~lVoL~nP&&1RS6(@^g2cyJrmu!>#lmfpLWv=8DL)|bHA1hN| z59R1+TUCQ_TWb@`+!B`{t1uTMXB*d$r2LSWSRM0N2mK(AV%O9(w>V9e$rID}A*T6V?3Ua6i>x-%O1( z4-YT@Lj8Qj3`Y$edtF;^KdzKe6CIUA|9E4afFOUfv^f31$d~{v>j<+*yHcfa9qUlr z%xL9;&`gb@42MA5jJSOBr0`t*BF!Yf1XW#ocP&@0FpCJ+RKJ+i@R%G=wRBDMV8v{c zbfrYE$TDS1*-t zFK-76V{0w0ST76z{AeeWFh>im1cPY5belM1^%&;@3!6|gui|*^P`f-WPlsf?s8H`P zN2kafwFJe82!F>c*COpub!AV-ATH&2XLY@Vs4&O8tf^ukPLJGRO`T?LR)Klcdo2_ ze_h+Ss4&xX4OIvGLNyir9KEcV6sO=2fBPU6hd}2ndmRtOB73(eO%pR8?L-|_eTQ6Q z9fzDar>HE)e64)0JR2(=PZgh1!xUf5{BV<_4KCjhHBD2uBB#R4WW$UYLyrIt>jVe;sE`~t z|_U%PBB12eD8jOgP0^st0n zU-eiGOB*M5Km8mnOS9x?M;%v}wDeH>@Knoao2YoDgiIS(KV!uJQ^hpPtbnYvG@TT$ zB(6{!I}KxH$8>KOyHJ;yc%3u@9iPHd6}3VGlRWo=xa82HbOR+*R~7H@xCHkEUsosh z80)l{;PB``cZ;HUC&zFuyR;}z!z`}=i-LGpwSs6*zbNPAtWZmpq_`Y&2rrjlO$UpV2cawl1FFTJIzl0nwE2Vs^G^1#3m-v`i zKf4^GY%g!SLUWyX#hlzU-FT%`CAFX=Gd*87O+_U)EiT8%Gqzbi3HFl8}(V5)Y-QK*gZav>@HsSY6wMlyuWPO^x_$ zS91@|czgYDGp_v7Nc|i$>tgl1@Q_p^Z?6LFJeAP=h`3lcCnIMcr`WjUEH#gUlAI)O z9dFM9|GW&Fd{0+bJ5$R@^Wy9@og`l_Pm6S08`S_;C(WYB)O^=`jbe*DH{}Go;M4#g zUo&-AeRmC8W50OS%p5Jf+~mygXm>kXAFo1#;IM3;VqG(T1Fjr@C7U8ML;I*?1AUE@ zw6MS;lW<)pXZNJ+V8g7~1cMBv5|2O^59L_vywZIASOZ%l@2HTXVjn$s3wQUTl<-(C zYmaE{U}fbXGhOu}hh#TZ-MIJ+HJ^B`Je49(ElZ8qQng~ASat0b+b~D(WX(9gjDlQE zEoB$Aq`1i9>~ODAXRh>Ym3%Wxf1QYsc-Pc4gF>f(@Pq)596jsU)FQ8pP;IS(aDOk? z6c0@`r<4-)*z9aO_Y5DM*fiBxS6Ai4z_>iF93LxF&1{1}E2C^P_r$;`djt1m(|mp7 z9IXgN(_;G={a~fUROfs(bt+(_jonaU=6#dF!$&pn{2!22(Ii%XWh^|4Trem zFq>T4LaVd_Js)#T=b{89Bj-XdzaTp^m-wiBHQiW)*mOPnAh!fh4PCWlGrtVaV2^B* z02gI04U5FIq?GL70`*|490yMiyNCprXwAT+6o&+LQ+Lx+BW)Mof`}|{5BnS=XYWFr zOn(jQY*!N}rPx3X&tMzf3@!(23uPPUe0x<>S8Got)8ItIE3Hsxhl~6TzL!G3UM0JM{4~+=l6cddUr6jH53}ZVF8?&rX7wt@s(6l&pquekrYp&?< zXxluS!T<};SW8VGKQ#xNoLIy7bcdh_1Et&m^(;eOGYzvOyM#355KE1saPQ1mFU9=W zGz}B|Twf;@5BoqaOJ6VJD7Vl=TjMZy$1wHC%tD{!%%He@58ce-bmh1l6@7;grF_K{ zdn4`aU<;jaHJwa{3A~kKl(zw7_Gyl|xAYD^qTLaqwFLUoe)%1k8K-Cn70>wNo9UEuOsL+U9{}gMh z01cHST@N+$%;1y+6~A1|JSG2pkHjRu6k{FhFzb|nFq>eXuoO+pT*X|E^vKY7Hv`j9 z8!j7171uW4yUg%{@PHuGu!11(By|fVL$$EvC>KwSc)c+F^vERZ)FST~ExVX7N8@On&_I3D zFwF%2G%g=o%}g&FWlbejhX^fGlPIsiw1@)B!W1RfZ1XIg3|ot0)4+m=5@ip=!YDhH zQcE@6+|t-WCsQ9guOyYY9LqSa49^r*H&rvAlmJ!J6!qAG{EQeqtrB0QI8)0g9UD)_ zI6ZA+m4JYNeDzEvGmUVUY)1{txR8)w6)%%QOS6DnJ1#5zqG;{h$RG_Lha9IYvs`C$ zOY5W%|I{FZ@DziRc+KdX1c$&J<;)`gREzw`q=0;X9~+(Y1VdHBB41w*cRf=sGesB0 za8Ik?xDr*bI4>hlQ_Gkn`#jYYNA;v4?+8ofaDQ(b$9NlKrBcVj^n}t3{~&D@Yh67T zLnSN4*r*~U6|Rty1dG79V7*YcL<_AHbB(M#pQy}4MXLzwJj+-wkJ5A(zsO8mt60U- ztfFxLTtnq_&v=~xe+?HuYn>2V-S8x?NE26;5RU@$Anzmt%~<)cCvW|Db5&y#150l` z4QF2mAen)Lg$1{QzwXyWmK! zLUlLCRO65Wm)MYqY%}d>b&qJfc!L<-K$S#q?`S3C@JuVu1b;(o52vVz^uXBQ6m9(& zZEfvzqX1_!*Af*I2d;n|Ta~;_4SUn{)cl-K*W3(6qog1chvb5IyKoa5#q6k52X(uA z)xv0NEhA@V!*o|`{ghIBbDh}C(qKL77%v+xQ+1y>r>M}t2yfS1`|zarWM6-Mcg+ZE z6_1#bxZFG^^AyXlbbGZ@8v`Yse6MJuL}gto?+9&8e`QaHjQm1RZ>}O2>-12~5=BML zh$MS`9X(SO-BPc7O$X~J^K>Vp0QJaJeM`S&?@~K=o8li&VXM2PbnwB|od^&^+68hh#IQY&R7Z{j6}G zD0iD=x8wkad>zeP-Oy6CAg+|WOlyq{zevka{bW;zDd=-0r zUt|5OBtxU1bVDok(o#b|pZr{R*JwB0Qd`4Fy+{MDAm@mj#L%LATWkINpa^$s^C*Ag z-1wwK+X8cC7iXoc2m>1j$9QL-!YCDc^*9^DWaU)Tkf3xO-3&#Igphd8Y_4Q`l}sP& z&=@Bj_w=-+Bm-@Ciy&9OXdV9)jbtM=hYUkc^B{eLxQqygbmfdNo#ecrOph#ULyxdj zXOD;ilY&I9f5Ci8#8rZrHoS0M4^6=R+?^J zp1EUwtVei&Rl1j=hN7yiqiVV_myMx{qPcgBt)iJ}QnGbojGnP>hPAtjmQAE#R)I~t zK}k}IyoVumHp_-$qimsxaqmo)cWOlMfaunt!^b zwqcG&WU+6!jgG60lW&-fr(&)}fS$HVtf{G@pPsvtQF=&(j|NwQTDWsombXWgj=fPz zX?C=`dxBb+c}RANijH@hMzBVyPez)bszpMiO+<9Ev8kU!gle`|QkuQBiKCZGteR>F zm#de0eq5@0v7@iQhe}+sexzl3a)7c|j)!Tkg}G9;rjKq&ii)LMq`keaRg{HOn7y-a zMx?#7dT73vOR7s`f(chdWQt#|QMhBGS9DH-S)59Oy0?{0sF|OxUzoZ}oL*L(u4ATh zkZNLTma|orxnSAb2BuYaDmeqdy5hNe=HtFfvx}%$-MndOjJO8xNcaXR<1#qSEQPka+azYmr?0uty+#%u%U0EhnJ_HqCsAWmq`fr9oD7_1`5y} z$gmyOq@F+$tH6u0ao!BmNYFlL1zxnx%An2pnMK7V&KZeC3I+25nLX`wlIXm z8cZM91;!SJ3dR;@3Sb&7T1^e{dkta$nkJCbh{dA@m?;eLFhD!`!vb=yg1%E?aVof+ z(RcO@GBg5}F8O&SNJm8&np#4YhUAClWhUpRq$(I1n?uA*Vtyp4Q~bOSH`;?6{IjEwsYabP}UI!sCKGf*sUz(~Ir29SSlW0!!ljR8kWCi__iGB3uH3 z15MImwEUcvol^r-Y}IVEodPpMl^u1tVoeK65;K&;mAo{=@=`t1{PNWGtz7f`jMI%A zN+R9Uq5>jJV^lMviX1%c^0kywTulm#ENu+TO&s*1GBVW)ow%Z6OLEc;Q*_;Iqm1(c z?5#_43oMIuY)ry4^PC-$vP)A;3k(VZtW1qFGpr2?RZPuFatx9R1C8Q63ldei zybKHDbWOFLgN$rd0vrqSiejA-QcXORP1O@a9a4;QGCVXhON+GqgYqMb)6%p}thED_ z_0%KO{dDZr9aA0hBe+y`LQ9>4gTwuE3rY;bbrp-1g9?3O;;>h1phN+UK@zGpGjq_{ zSr$g1BeE>b74#Do3=K>a^fORT!!k59RM5{?Ff=q#fEct)s&-s>VN70}mc56It)+^2po?8>mPwFProXnIvqeI%lUjhIV}WbB6PHPbTB%#6 zWvO4wt*KyNa^AqDQE%O{%M-iIJ(AuTpZjN3c(tad>uV za*CH*x_M+^Y^H-tsiA*Pj8=%XR!O0|hJTKhYPP4nPizcVxR1MyUVu()oOVE7sCA)U zZmhqadcKZpba-l@tzBeEbV_cfn^%BGW?rDBiAhL;iltSwcCmG&rE`|AW~P5gI#-O7 zQM_wHj`2MvSkvmrOLVqmtBF_(XehfcnljYqCex}}zpxl*E$b75pon!ZO)M6gdt zhG9`?l)JZXzGH@lzfyWyp@UwsyH0?Ku9JOsu6wexn|&TvzLlMiZ?cJHk*8L8u$Q$> zj**J8ucA(zUYfgsl9z^Yu1mO+OI(g^pWauue#{Wr1RlqD87xpoYIoLPlIpMnYada$K>FX^CBmy=_)$ zpqF8BkfxQtlAAwQh_RiTQ&L)yqf0=Ta$ux}gSTabmZf1#o^P7BqJ4s6Np6BtsGgmP zPJy#>x?QM|TZw*xucv``T!BrILrk!~4VQxK&KuL0_g}1GLfqr^esJ@%EUQn(|T9ApQZn7~~T&7QSzM`U{hM$VD zsja@3XRe)tqGnNvqq1eBT4tfLr(M2PtiMf&x_L&Bo0^ffYOtDOQIVyxa!z)(tAT4kSe$8KvR{Ovind*}hk3k{qM}!Pq>7V{RbZq?Tz*Jl zbVRXhUXn^_v0YG6ki9uqMv1nggPx+QT~U&$jZdg?U~W>ecbaaReNv%AvA(gVO^QoW zxOsMJMqF~RK|qF{zPGEDsgj+gt(Ko>hK*i)5m&yEQmR3Es)|!doMuUwWwy3zNvx^8 zQ<{x^hD}6hh^C%mta5;vo35I&QE+ZjKzdGWT7;gBii2mEPONW2uvRdaWw3sDsa+p`Tfw_-;e4I~sthIKkTb^E)jdp3Cs+UqxkgIB}c9BhtexzAoPI_Q+ zkX4Cg2A6A6k)^F}Zf;Pvt#xQlLZMQDUZ{3TmbZ#oSc1Kms*a0)c#MI)tzCYBs;a(` zZ+KRAPIRzYqMc8eziEVdW^@i$VWEeOU8G{EW{``YvPEfuZi1jy{EfRv}2KbMs~KMk#UNfSx{bxX@pN~lDn>JB3DkSMNx!*T7izQL112fWUh&` zNt#YtkcLl!rK4kNU{R1woP$fAo~A>oM}&oCqJx8pL%c<>xm}p5qd}mGxvK`3i-}Kq zY_wZ|ldW!SzEO-uMzn=pu(qX2wxOk)hjy-seMw9}iH%c+vstXGp^>wCxp}@urh0;Pnzgs1NsOA2t-p7)2bX`Oi;G!kY_y7wzNxBb zhE8;mrG>7NUWB%iihs6lYOr#IM}(h}Mnb55x@K~6wr-lIlC_O)Y^Z5)e2IaBg-r&R zrMa>l#;i)iJ7i@u5(0caH3CPlxbXvK~S8#rlq>KMPP(qc5;?oq_38_lZJJn zUA&@uqN#CmT)2g*8JBThMp|}&qpp@?x}tuFbG(CLsEbEwroTa;XR%qTPmZdQVywD{ zucE7^uT_$-k7q$pL40yZM2cEmu~I}rO1LYRzfp;A;$ijQJOeu_tqrKWRQ4wre5mUXgoLcWE) zYGJ-jXryOOT1-lQNo;PRlcIWdQLw#Ebckk#UwVw0wxPB|YK~WNOsGkqYGi7%ZbE>y zwxbo7X`x1{ovCkTmZMQ|q=8|wk$Yg6uSUFjre>(6zrB65jc-njdvtV!l1WiuxN&Nc zkE60#T$ZMlYkX05cwDA`AeWt*op({7MT&!)o^E!8nNMb(hGv$hhDBU%n3K7GN=RBt zrbbkNXQYd%Zd7!5YF@FCK~b7sfqrbFeUg8OOR250rgNd6eNswfI#+1EnXRp| zt5%M2PO80~SER3MRBEV$o|3JacCd?&t)gyJiJ?ktc3^?IVXkMGl52@&g0HhtP@axX zzKe@iptlxRs!tA4Se2bZaFNmxo&u(FF*xPzB_p}V$!kcED#lB;=KkXCYr zZkror{lUdW61BsH>B!W0+owdU!CGvvGW8Y_N`}ifLSMNQS9z zxSL(Ly;WqsuY-$Mx_7KaNs@7PX_Qs6orzhTMtY8|uWo{#nMaU%QJz+SUSMIW1(%AC zmuX^rnwgfHSzwZ{pRtCXyP9#Fy1iqLy1sX8UbIH4r+;+3PMA}%g^9CMSdpEDVX9|N zjAdkib)06peq0e(zEVVziKn8aif*cHhL*p!Yo1-AubQrlPMoE(ZLmdAl!0Apu$E80 zX^2Ip@wl} zXoNNmZef8SU|O+ZXqj7eWwz9Tggm0v}x=D(M zm7Y~-u})&5sbPMkd5CAYfsY!OSD{WxhK0APk9DA{nYvDFezL25o?nhdT#=QLhn0Jv zN~o%@k(!BDf~9qYqrHkomO(+5zpqWKk(!OIlAEh@9#^!xQI31Mr)NrWUQ(%bjzfxP zSZS2KlUq)7bf$Hfm6pGwr(u40a9FmTyIPo+cD6-ANQj+QYDkb_ zQ=yrfzN?f=Omx zsJV)&r)ieHmy?aXzLIrmu4PWKt-YD2Yoe2OQdEhWy{^5I7MGn#UXqo4R!m@WoRhhI zhMBubabSRtg+s1|roO$0Q>Lv+daj>?x2La{uYXK|QnYnRx~;pSPJW(hN`OtGt6C&i zjI)blibtNlc8Y6uT0Us0zej?lubQ@+qgPs{ky)Ub}xVleT zT4{nsK~A2jZ)lD`mvMTMnO1H|T7IsJt*4@{S8_pyk9o14M}}FPuBN+7n0|_PMznEG zh@NkRa=f)yvb&>Nl)t-@j-6^^aAAaRY$}(wuS23sR$5++gQb3?rMc0_`jQ=wX5 ziA#!>c1m1Gsfx3ombOJsikqTFv71RwUPyMFouj*&qq&K7aekm#p?;}RT4KI^mY0jJ ze>_)!m71-qwQq`(M~+dpO02DVah`{bLt2VYu&bVFdaj;Xu%mN&v4N3JP>xczp=x%z zMWIJ&VX>``yH1LdgO6S&S8{Hwwpvkiex!3mvZrm1PlRe}l#OwiuC;oRN2;Grk#dw; zoU*T(t-pjdK8zDnrn7`bYxa;Mvjx0hh3zeshf_L zUUsyBcB*@-fxTCXUShhTooi}Dyj5a}dx@=YsdIQjp=px4V^Layo=u=Rmr9bev2kpW zdO*B|tyxk*qO-NJRjOf>eRgEFL0pu*uYOFbS!ukkMrdY=l1f~rkFLLien5h!Z>WJ= zu5VU^dkR;um2HHHLqxoKiDQ9ATxdjOq=lJfdXb`&lBbEke}jDcsmeL|dFv4*ya zTT-&Bj=iaqtBIvfTQMP$bBx|)uux~ZM3daQb2lDBc5 ziie_6o{>Rrd~lkgiiT;7ooc2_vA2Dgdxn>tX{?%Na73J+cCf8$wqKBDu$^BNmtJPJ zs+w78ymx?MT0}v(O15rPo{e*oPo}d`mZ4XIW3;Q2k&jD?bB?`9NxpKPg}R+}XjFJ< zRB)buNkE2sL^4-=LVcZ!>` zbA)M7QIt)LuaSv?uOnB1k%mrsvWrn%VWN?Wb&|emiB_npW1dA^wr8@9d8(PGPO`h6 zrc+3qk6Ug=cBYa+u)AJfzK^$QmX@||ev+{tS8%Lnq^Dkzmu{?$iCRE(oTXcagT0P< zp+Q1{zqXUJV|Ii`Sh9zXi=mdPZBb-^M|5hAR<37SoPS1XiG8wui7i)_L1|iIp`LrL zcagK5X|z|0MTxVcwVGR^L199%mtML_pq5u^cy3%`v|gyCL4jVhtwB&~bc}zHNt&gu znSYQQm#va&q;+hps*aLs~$HNw%Vke}PM>VIfyqykn4JytS!IShjy|Y;1gxkA`AFii(j+Xhxuqk&j}U zvYD1nSeRpsgT7j-n~9%8LP3I~hhM6>r?r=3pkkB(mrAyWOGHY6gKKF{eq=(hrKWpo zahQ%>R7Qk*TySZsr@BY7PpM0erm>rfzMXYOqcT$|W zfwxmcX114QfK{q(q=BV>X{xogR!M=5rk+Z;OJc6JvXi@teO9iWi;Y95u2YPkNkE91 zeMXj@ho(^`SD;#GVVZ|!hI^rIa%zmWeP&i#l18+?nx%n;uYIwBYk01Kt$}Z;`Nw!g}s<&B6sX=6tra^LAsgiemj#Z9cfQo^U zny$4+wn?E^fw7%VX;_YVW`={6Vy0!ho}q_Zf?bN5wW?kaSBhOiZcLs|W~QN2db)$X zX=G4dw5MB$dufJRfvT;VZCr4Ij)$9rL3nJKZ@872wNq|bkdn2sftN;sdVXG}n**0l ziH^OEPO^h*jFquYzIvd!X0&>6uDQQoR%&puR#cp`U5xn`_Epi^vYN`Y0ninE`e zsf}Z#otJ-zO<;JOqjjQNn5lkIYC@J~iArIiosY40Y<6h8l|@i6S7eHHd}>NisHeSS zNvvD6x}s;IgH2|-g@>76XtHrpVX>jJXGCOLw1KHXyo!&Dk9n$+tyZ|DO-8t}kDifP ziVIg#q_eqaYH&nYYG6uuVW@3fah|Dvq-9#HN_cLlnU#N0Y`#WdxUW}WoJmkbin&>` zk8@7Ga;j!wR-UD@NwRS+SG1LSgqo4If1;kBi<(EFvA?^iSDKE!esY|qX_~r!UPPL{ zyRmy-rc;EmtA4znzf(bkySYWQgO_2jtD|~>rZHD=W=U#noN-{fa$bCKa8SBQZc?#j zpk}s)MuNX*d~||;Y=Ex5Z>)}kf109sxVm*xT#klrVuDX}ikV4fh>pKMm$_zcp_X~3 zS7eU0R!)+JnrV=Ymxh(9PL{c{ZuOGYlu&{Pg;S$k++6kR)(U5s=2ar zVv&-Xw~1?th5?t7s*#4Fy`D`#US_JTmWjD{jz+PvlA)%eL!qyBu4lNXS(Hk?a-M5O zN{VHHiHC1Nflr~OijJRunwwgRn~t^_SCmzty+v$tpoUMntw(~db&{=yX;E&5nuAAD zta3?iafDV}VYF+SiHDANL5g;~lA61+pSzN?TSkbry|-ILsu!0@tWr@xp@UqrSacP)4}5d690WK}>;hQHsBhqGhRNVu)QtxVlbYvX*@y zmu8}SVL_~BLbATAakz#-ij}Teim$nSxSn6BNt~T|OlYX8PE0{zzH4BVXR@JYp_aFb zVq&OXZboFfyHS|Bw>_7)m1}X4V_}G9c44-Dpi)v^n!Z7-b$YU1go##oTxf}6m}81Y zQG%JNm!_&-n15`rhgV`&ad=>%mQ#+0otu^`mz!>=i-VF+R%m`oaFlnFLB3;&p}Mt( zuBmr$s<%#oO=@AjQc9t^k#~qva=cB7UW$iBLZGUxx0;Q2YC(jyeK=Q)U9Nq$vxk{` zaI&Mfk&l+Ieza9cs#CFhQlOH0q`OCML8PK;l6Qb@VvdthKyg&5saLRfwqj_omaU6P zK}@6pqaBxjqJOqpyp6q`M`D4ZX_ksxl0$xgyRWC6zk_mYWJ08M zkzPPZn0|nglT(mys#Cg#o~LS*rfy`uS+tIkYM7TUmrqoJslH=LX=;*wMvkjSkY_-l zx@D+}o32r@l3#G7jb@U1cD!w%YHC zt(~H~v9)8WU$&udfSs<7eym!7ZgG@Npp&jfsdAiBjz>zWe`b-tmxGd{i+6m0W3p{* zps}uIrjtP$mv@S8T#1sdR)(iWkZG|?K#Hqjphm8Jw6R%WYP_|Fo12evn7@a&rILM! zn!av?pL$|Oux+A`pL(oaq`rfxixF2ysELxBdWe!rZj!x0p-Y~Hp-z6XgGZpHaav|< zwuOy>Wxi{AV6jDJkdt4bmRCqpl7)_!OQKR-MrK5ENR(d=S42UGqE@J5kw%Jpx^`x9 zd~~#yjai13nToP`w!4Ozy1Scmo|jKVhDV5Ip}VfFZ$O}Lu%~X2YPP?=o^Eimi!oPJ zl7p6eex_HRPrO~eqm8#puxqe>eoRtZ{Ktw5pM%onLf-m%f3frAnHQy1GdkS9V-%kVjEzqNclB zo~L<ImW{5C zgBzE3oR`0Qu3n~|hl*`PQDTrsn1-@lK}11-yN*hTp{=W{ik3}IRHm(^Ly2Kjq>p|< zT&jIceng~}y`q)7PHsjKm%4G1L$OAbdwQ69sbYdncvx1FwTeozTdsY$Z9-y_u4!qM zseh1le1xKprB|kbT|s_ioNKzGvxjMnx?i5JmK|4`QoMnxk*!yeW42X-k&8>Ff0VPY zYp_vqM7Xo2w~cOqv$C6;kFK9)xTc13pq+iXsfu%sX0WoFNlCO{l9Qb|mq}!fg{^j0 zL5fG5t$m)6UT8vsiG!kAdVqeSk8W&SKuV^8m!^@PiIqx$vRjn3cWPdmSB95^u1REU zeuQnbasZcJN|2&kP*Fs2YIuO7p;@d~q?V;tm~FgXfJ1VKolUkymO+wYk*=YJS&>12QNuhm?Tds15SAm&DWJ<9?sdiyeu%?NbmQi+MOpu}~m!hI& zhLuiXMwqX$Rgk@VUPeYlu!WLiVVX-xu91zMyQ;FQQ?yD>w1c{?nY+4fo{gbOv}KIG zMYe^im$y|~q%D`1S4gmOVT_x#ou8vgNQ#|DvU`Z8nvr*wnWv+!vSpxwvWteLiLafF zenOO~a*C5lnuD50nsrf$Vv>fdN4QQjS5cIweO7cvp@xf#rm?cBzC&V)WwecNxUpV= zbwo<2l3I+Xt3jqtxL&c5gPp5$rd_y?zDclwe}zKwE`qLr0RNQkAgo_VOFo{?9)y`im7ifNLCtzxmNx1phfsjXY7Z;n!MbZml4 zo>QiBTB&w;LYi^9zBN~5WJpkKl#;ijs=sBHL8hytcCv1$WrVGYgI#o(fxDKnPE34& zV}xHuNK&4+r%|9{QgE)SU13O+S8!HrLXfEzm!^|(h_AJgrbnWNb-GKQW|Ep+fv1&G zzLQ;CP=;2TuCZRYpOuflVRW{Arc**lXhfv4u5O{CLy1*bk)39ew;ETVrIAXoZ=t58 zmwmQ#fQ4^nhLXL%m2;+^MTv`BZhWS#jYgKCvR$yQk-n~Zpl_g3zM^eGW>A1xiIba0 zT4-oGm%3JLx~IEgwsMF`k-ffVWI<6sbRKexRUsqQiTWnKwmEhYIw2O;5!yxJern3b zaY~xz#Tm)|M#i~{*6H!dW>JQ=uC^BG#^EMr24-R2>9z&tZhl-ger~afg}OE-c^Mgz zQBm$eZhk?&hRI55+J5oY>K^K9x#`}nnjryJvEl9k>Pdmxnr?B{Isqmok#52IAv$rk zTsbj`e#tS3S}~Eq#RXZ~(e8$^ddcSb8o|k4ak=K%PFaN!d763JF783GVJi8hdO3dX zI=UXk{_fUF9;yYYVd`Ak(FP$}2AL_AMp}_MUZt+8*7;@u3AqOT*^$Op(czIQ4zW(5 zMV3JhA-3MSv1Ud39!}|6s`im;zDD8hq58hbTqy~j`AK@QmO5TVCWWq9VKE8nB}S?? zidlIK$~2D(wcUhxUpaS0Y-+(QFfZX`9>=GK0}`WaCPZdP&OhW_aW8EI-pVTo!8`M$o!);b1Rz5yXh%7!|jK^m4?QF#ekT&Ag|YOVz?g*F}m#X*K1uE{D^ zX`U&iYVpPz8Q!Id_GwOP={Dhpaq$Mxipe%Uso}}SrFQNXN~KO_Nd;N{s)<|)1u3~{ z#vTb7!Qn1p&Y=N??%C>oUXiw?fyr5h*3nts5%H-RnwkCdnCh9&m1scw=cDBZ0*^VAgI)UDr8Oh;_hD8BZRyvxQI`)B9;kL@L z!EuQO`k5vkDQO0#$&uQA#YSqy>LFa2aRCY1M#he5;buj_p-Fnd_9jI(87gjyxxw1@ z4wm+cw$>TG32}*WbPU1NPz@{Ejh^m4S- zf_%J7mCfySRWen$%#)n6vehjuB8}~|!xHRtGqY6F_2O-_Bb^eGOfrko^!371Q*-r9 z)C}_C%-qa^a(yE*^9+)$m7rHvW-JMt&1(VyaO__6~ndF!@YFF z;w=l5?R+yb!>o*Ti-X-&1I+zwJrivslag{XG`%w%)pQDMGc7%=^6VWV5{%soRlLJ; zOSnuk3L+Bo9ZCv(^sI_QEwV#R6)obdJ)^bt^Fy>8{DaMMqOy~s zqt$dB15=C@L!6c3O#(f%qkO{j@?-OigDgsI1GyA~Tnao~Gt%;0&5f*_OzaDcjTNJG z{LIyZb**=(4YM4~vekVfigLqLgLSNfBXr`e^|U-o%)I@$994ClY}C9W zEtFi-++qvj3<`9d%u4e-tP&j@Y+N0!l$0$}TzuS9gYClnO3k#qbaK>^qYI+U9gFO8 zgKe`Me7Hhw9b=s>^v&Xn48vl4V-r1fRB}8F)oqJY(wt&)bCZG%BbD=A3v|7U9UOI{ zL$X7Z%u*99GyNj7{ZmbJ9K2Jx(qoE?V?x~{bzS_DvO;_U6O`-8GV9{cLlMf(z3%lwuRD3ykt?3lh!s{B`Uj)Qy52yc4szQf!rU z4Q#BfbiLG*HA{6l)0jP6IA@NbTxC#^}}-l3qp$ud@>`wlw*VPiq%7MBArc2oMZFy!cFot zBlInTa+7?OysWeAtV4Vf?R4{8&0IaX^lkFu0+O?B64aC2Q?!fSf<2vz3Jb!GbmF`$ zjdWwYB6Wg&oa3$ZJ=}fGZSvEy3p7n!JdMm<0%LNEJTr`~&AGDNBI4tUlryzMbqnLd z)1p;!^-?1uth5XD0}@q}eY}gzVxpbWHT5*z9S!qTTucm;H0*;za&;oDwKS6*)hr^o zvh%WxbiIAGOEqkqZ8F{UTs_SE;*=G=y^@0Mos%7NEu7Q~{Jj$+z0?!z%?pA8Jj~RS zj1}|s+%2o7|>BQ!EWa(L1c&eFXgyh)9Mgu5#j+XUnnB}D~0 zSUYkl6~x+yB&o)`8~Q8jrMecGcqqmD`zz`A1P5ri`dj41`?zX{L~8l!nns&xxF_Wq zWH@Ms*(+w37-vOh`(=A5ahXJFsmEG4o9o4Ex_aeWrm00lM49;Hg@$GtsU<~*tLZ4` zIs2Mfr=+Tt+G=^54(_c8T)Z1ItQrQ=s5(~7uiM`>+1y?*e6)3 z6r08y2fHMM$J^-?S?I*52kSVc=eox0_$K;!1X-!XMcHYm7P)8I=%o1MaQW!?sTY~p zX}bDZ8pe9*CORmUWVox@n)@m_sJdpDxI3%5Ifv_I7id^$#w+E<+lPfIIptXSc#p`>LCk>c*=YMA(FxXnI6NbE(E?#3q=l{2iaz-tCjd0MH$)`ItO|=J0^Gr zM`_s&Hgv z>tvXlW!U8u6~^d>7dp5lhey~YIC*;6*u>>zYeWXR=B8=nMuoc=o2F>HrbcQwaJd_l zB&jEw8zkw)>*)KrLxAl+r1>S-+C-#7=Elcxs0_1Q=%-IfSNq#zpu$#75}kI21+tY9|$X8wYb`nP(ZLWMxETI0ot( zx(3JEc&KPZ>!;cjI67$Sg%!$lB`K88%DmnUjd&lWJIfZ)~MZ3G}hUFT#d1xm& zW|&$f>X&-D*m(wp=lLagTYH*Y#3&gjTE&;7b9s5@WM^4sYHAi~Cq-)nS(Y04MFgbl z6vn%yW)vug6h}vdg?ei{`CDg26zLe11So|SDn~?Fm?ULqB&OtQMf!2Y`J4JWdg|#G z7A1$8CfOzHlq!e2nWh^A804x(W%^~Osl@1OXgLMhc!oGR+p8C9XGfQ)dYeY1goOmU zY6RFOaRrB(L}VH|nVBmFW&6i#B&4dF1?efL1c&+tWhh64Cg#Ujx;bZOxJ3jhJ82e_ zI47k$N4v$kMrhbrYe%_Rr>bxj=(!}6>Ln>TS|}9+#1|xH=;hfaI)@mC#W`!oE2_pT zYi1j3=|^U!Svh1n#>U#HSOmGnWtZ3)C^{x+o2Z9abH&7kf7ol z=f&nk=4M%{+3PwdE1E`yhN$N2r>lh;#5me&d0KmUg(;aSDn!) zy4d9<8kuW3afL=0>PDI7CMWs3y6dSpnx(`=rMtL!#HL$nMA_zOs3zMPn0v-}=7kw& znj@ShlM)ED`pnv`8yjaTe@>amE4f8Sm}*;uD}`&=r5i*kDF+3{ zMrOFGJ7y-UJL$)HYK79{6kn0P5>IT&jA=DGQ(MA@r3l{#ic zraRe2DS8|GXRA5}>YBRiM-^pddupZG=Xs|TEBR{2$43}y739ShbNLsU=V}|MS!c&5 zJDWyDs3s+<8(D=V+eNvmS)}+DcpI22n>ZCY*av$1CdODLs<_&P`UE(H>BQUV=-3q% z_}g=(m<4+&rUd%u=h}D%_~q$3nHjnTr8_5hr>a%p?y`$niZ`kL!G1iR^2xR{5SIR(Yp_-hwx>jxH_mFlLY z7bzJH6CwW%=btW(5`7Ij5y12gC*ysRePlxM{kC+NPz(B?P-G`Nf(C*|_Nh zMHc26h3gfi z>LeFt7kQMZre%d{Is|29x@FnL7wBqRx~V2wTY9AX7+aM%`560H=GZ10rsg^*IvAJ+ zX4vOiSh{f;`X^`yMjB@pl;|eg`0M#*D>-|ntB2XzXexWEDf+qS`UH`xe)WUXM5?Rmn_Ad=Y3aH6Bs$qR#^#z9x@2hQ2D@lFMnt6PCWaP9arv5? zX2lvC#VNXLDfucX>#AGihNS3f`zXie+NfLUMYt(hxTR@E$L9v8x)c|v=9F0LX__TF zD(l#2C>6M;WkztR`RRt1IJkLvMLJkH#=1v1DP_8Phv{nih59P`>7>V6n_Fq6xvLgt z*z0IoE5&FjWrkV$n?|JCCt13>D5*Mxa4F_{`1r&*S%(ywx|;{uxLajJnFW*@o26U% z=sKqPmgcJ3`kK3#I0tHY1^U@|m}z@NJKAXHdYEUVMH<-prnzuwX@mv^YiDE?=R`ym z=39kl*}ACMCC3I@ScjP#2D=snxkRRT+T?~urUizn>*+e?xmp$kc|~bO*(>`S#iW?# za9Lp8W?%21lxK>1lp(<<{0~E z#KbvimL_ZHNBV~QYdU!p8ONtsMU=RE zJ7j3NY1_NTC}~=|7w2nRl(DC&mU9>qeG%+s9akD5Y7bt7k+SCF=&+nrkZNI!3#yrD#}0 zco?KctNFU9IXT3|XGeMmT639dWcoU1`y{(Mnt7}0#zh7NxO(Zj8+hw#l}2Xz=%i+q zM0t7pnL~?4itQ#DpnEW)$kV=xgNKBqr$;=32!U2d0N7C~_4mds&6L z1-M7sm}hy#n0lla1gYjG>jZcvDrfj;duh1F8QZz(86<`2yMzVn#-zm;2igXjgcqu~ z*hM;Om}XgUnVA-ZW(E5ctLQlt<(AqhYO7~vWu*A3`$oCPy5{Knnq-F=8pRbQxf$qK zm88e3#(5i=>o}*GX&GmQ8{}j;1aL)~t2$=~gcs@?MVPuPdZuT3c`HUGT4)5>#yVMQ zMTf-X6r`C%sl|K6nArsc=y+)<>I4Urs7C48TU+U>>trNyDWzFvd4y_N*cBNWBxl$K zr>YsIYh`$3cxqaxNBE>?tLb`rDre=n8W)(xSomorMV5L-sm5A*N5q+^#Ct^*$8n|S zr6mWZ=IA1}8^&+vgX1DVMsc7HXFisV2BYDCU-O#TlnrMtMgoni{D@d7EXY`8outSgIDsDEfxDMHeRq7Nn&FWrtdq z=5a-4rDetDTI#1L+Q+*m`>LjE*yy>$WG00MS=*%+n+FzWfUaY-E3h}SGE5IkbxpC3 zE;aV{k1{OEaaYRL4v6H62rWq0QAtz|QFk-&&5KO6^VYJ~vo=fd2z9qM%{MPd5Alf9 zj7m`Uk4g;Aj47})4No)m3eQf;i|~o|@=nvY;j#z~(TcHAcMR}I^A0tP%C<$(p^4lN8c zOm2ZanAH~ip_RY4p576PmfFRiLxy542*FM3Rba;wl)dUS5>hLi^Mlk2Q%&N+}9V%gnS=$#8ej^E2Tpu(P-FcSsM<*GkD#4X{Wk(#bTp%q+H4aR|wd z)XH@6(6Nu!Rac6)vNg)_)Yox~4oh)#(X??(k5rGh_fAew<1$ON_i*vFh%QdZ4)xPe z3vvz*$w>3^^i9r4i;DGEwoHsSO^#7@Oi)kM$Z`vc*N<0rR<$TK^>I|z&~*qmHrC_{ zQ}lF5RQ8OFFVf7+47W`-&MES+wzJL4(=ZP6&Q2j_(liK8R`*m*^vq04H1qO^ zhz_=JE>iTjwM~pw((-msa#jv2(N*>8Xbcs>1Ox1EoPf=D>Qi_OlvbXlp zOLXV*Q3^4LFn5lyaMHF)D@;>$&5g6NDz?=1i!szw$q3Gli1W*`GB;P#jZ3%7cXQPD z%hJy^j5P`N(F!qju<>;<;8G29Fh~ptbn!OHa)~yKFf`KAOwo^zceFEhjET~Yb`ME* zwGWKS*9ucja&RtCwodiXSJ!seQz$p^2yCBR1b9tbSUxBQ}WUD(Y4O@NeQ)2c5_k5%=Yut=d#LEHE=dg z@(a|^3^h?sHjfIi@bGYSaq-D1R`W?NP*E-NwbD#3(Xcl&2udmR)i-d=$w)7WiZ$?2 z42w*QwXo*OOv{K2%5;wjh|e^%u+%ki^mFskOUO{qvb4>PxA0WUE-FnoFEG@#j&e{6 zQ?v{(w)S?#z8e^{I~=-O7PcFhh_jv`hhmr;DCoN>=({WEdnlNjE9m)n!&4|sbFYep`f3mpr5Otp9eZLL%#s&+zkB^1^rS5 z{W8#oVdPUYOiUCo4y6KZTUOxJ_e;!8RnU)0bV*X+MLO{%DzPBVB{MHQDY2v&%Q;gh zhGRML3dL}b)SNOD!$AV6C7H>ISWMQ32cV$|=-jIyv<=E2F=B(<$V5RusVKE9RY5;F zu_!-JK|eXOD7iE@Ehn`?K|dwGBr!QTHLpZLKch4+J+Y`XHz%>QL_t44JwGosTS31l zGcR3%SHC1PCnZ(E*iu2iur$9UwKx;J;o8znK|j4Hu`E@=(8xkTKdCe)C$&UDKP53e zJ+%l%rzGVl@am`LB*ry_U|1HevB zNy>rfhxh<2!wX>}i-YZj7*bM{n39^CSd^`xpO&ehpO&Mb?^B!ucDui;f_^Y0IC=FW zQ!-PFQo(+Uf{1~FH7B*WI8#AC2dX1KRYAWPDq97i4b2P`^j%Af@)dXu%}f;ZlS_+= zQuC546%5VHKyj9zotl@FSfpTRW}%>uup>FYpc3lh{Gyb!)ZEOx%)C?uUPE&u1^t}- z^vvYMoV@%J1%17|{F0Q^GzI;l)bz~alGLKq6b1d<#AI+HNJ&jEN=;SJFUTn^hJ+`t zeo1+LacMznQD%OTf__OxQEDoJo0wc$lB%GeTdH6P%A#OZDWHS{F*Z3hB{L@nl$P`J zkaXo2rQ{|SCzs}cTxe)vp`f3ims(hwSX2T^ANhHy8HqV*P`jYQ#R|NJmPQKtj*x_< z?+CTo5joj9LeitYBO+KF!6{YW(N#g;8Q~gNs41>cQ(TcvaYg9%gsSs|s`Err$E)v& zQ0Q8cp`h;vwca19%O9%CA4!+KKTHu^Gp~MbX--LIK~ANDzCScwghGu7g&GlxY(ywr zt9~Rzo>xC4Bflt5K|ejUC^s=LB`K#^K|c{{Mj}Lwej>6NiBM-G!p-8Ssa~W+E%hL?}!J1yvr@`h18k{d}mVd?Zc0`uQ+b z2;C`}Wtl0d3i|obfGUL=Pzp7m6vcp2gvLs!f)YqTRl;S^P82jjK94J;vLIDK-#4`+ zF(t7iQ2}wLV1%!ag1%2`UV2G}f}ydgp#rGXFD@xcP0Z!xvazoyNKDR7Em25HP0!4; zRaaNYOtDoDH}y5}EpSfF$n>ZxN)4{^3rViZPPR-@S4gTXNiDWj2N|SpZ^y-DQ+Qh=C(-H3veG<`!oV|}T@p)D?Ticz zOmq#5b&U-|49%=e46O`Jqipmsl)?1+=BHq2Gqf_Xv@$TzH88a@Fo5WVDT8SXD9TSM zO-?Pcb4)JEPf9FNaLFt#$;`<~EmAPmGte_tNXsu$@J&q4%qz(+&VZN!*8?-eu@sbg z?3@#ea`KB6g7PyscxIBo?O@g%@RlN;wM! z3q5l^Lx@(GTA1FD%#xf`JKx0gw9M3;ln`INlGF-_N{9@Xf{i{Xi6BKA1yNa%SO7^5 zuo$u{yusH{jVfJ9{~MvNdL5={}viy$H2{FKbJN(_ByF^Q%UrWqR4nDGEo z50!+eg=Jo%tb%5Auv(Y_upn1}WEIDp5|HPiyqru>Cb7y%%uBabuh30NO-n4zDN)CW zJ5X%pWP&w9q7G_|jXuc9Fe@NZWXEbjX;BWiWJpQYPt8fqP0cGQ);H8MM9QQo$?%B9 zts3M^o0Md$WKcHEFT#@Ekt9LEl#*;!f;Gv)C9tPhh<}4z-0YCb%+$OTTlFG!dpq9L zycB4WnwpmaYSccX*f(B6~gC?&&*xLLe1r7XJTa#BGk`xs*&=aaAuRb`+6*N%uxF*Wk zwkBB4^9x8!PX%>4yfafkht(RILQd8)G=&^kWM~RGRV!A3SKm3mG_OPfbQ%(qeL?#j2=hT_=LRGefw~HYU97N&*MTKN1le9gLqh{} zI}8mCjX>D|O`QoS&!UQ%8G+I`nwYUUnm-H;%}mYF-DhNIY=IWPhDL^_#%OV5Xk=)P z;T9uvGxYRlXk=~y8W}-xi;;za8Cp6uG&V9bLbuo0$lM&=USlH*^z>(FY;1|C*Teu* zuZfWxiMbKFe@#s+ z4A9CoBU4jDOSJefGBq_uFFTD)P0cMa++u2h5vHc*29{`Lj*+RksRf2x%q@)2@|Kag zxuH3_Tg=T(Fx6RL)Qv{wmRR&!VwA;376z7}b_+^aSs0q2r*R_-Lob1L1SYeA;>romT@#BNtjyf&GByey+Ck;NBRs53{1>mBZ9nKU^BpDg(gNupi8AdZAwFhJYFsnGh{u` zUZtTz8ZQ^9sSO=qGy(N~;T;2BE|6{$BT$nIHpm4N1C3fB#0*VMV5XZGnHVD4l)PM+ zZ5T^qUVYEJw0s4S#Reen=?CTKmneV?fp7zgQp*$!%|YQzWMe1I(7+_cEX6p{DA54C gao9Y`&?GI*D8 0) & (m <= mmax)) + +% ECF 1 component {Eq. (2), Ref. [2]} + b1(i,j) = -m*A(i,j)*(G(i,j)*ctilde(j-1) + H(i,j)*stilde(j-1)); + +% ECF 2 component {Eq. (2), Ref. [2]} + b2(i,j) = -m*A(i,j)*(H(i,j)*ctilde(j-1) - G(i,j)*stilde(j-1)); + +% Contribution of tesseral harmonic of degree n and order m to +% magnetic field. {Eq. (2), Ref. [2]} + bepe = bepe + scalar*K(i,j)*(b1(i,j)*e1 + b2(i,j)*e2); + end + + end +end + diff --git a/IGRF/old_matlab_igrf/igrf_example.m b/IGRF/old_matlab_igrf/igrf_example.m new file mode 100755 index 0000000..288070e --- /dev/null +++ b/IGRF/old_matlab_igrf/igrf_example.m @@ -0,0 +1,110 @@ +%+=====================================================================+ +% +% Programmers: Carlos Roithmayr Feb 1997 +% +% NASA Langley Research Center +% Spacecraft and Sensors Branch (CBC) +% 757 864 6778 +% c.m.roithmayr@larc.nasa.gov +% +%+---------------------------------------------------------------------+ +% +% Purpose: +% +% Calculate values of the geomagnetic field at 12 points spaced +% equally on a circle inclined 51.6 deg to Earth's equator, and +% 400 km above Earth's surface. The field is calculated with +% IGRF coefficients up to degree and order 10, for the year 1995.00. +% +% The results reported below list position vector "repe" (km) +% from Earth's center E* to a point P, expressed in a basis fixed +% in the Earth: unit vectors e1 and e2 lie in the equatorial plane +% with e1 in the plane containing the prime meridian, and e3 in the +% direction of the north pole. +% The magnetic field vector, "bepe" (Tesla), is also projected into +% the e1-e2-e3 basis. +%+---------------------------------------------------------------------+ +% repe_array = +% +% 1.0e+03 * +% +% 6.77813900000000 0 0 +% 5.87004056438205 2.10511299713392 2.65599159357255 +% 3.38906950000000 3.64616266670955 4.60031238454349 +% 0 4.21022599426785 5.31198318714511 +% -3.38906950000000 3.64616266670955 4.60031238454349 +% -5.87004056438205 2.10511299713392 2.65599159357256 +% -6.77813900000000 0 0 +% -5.87004056438205 -2.10511299713392 -2.65599159357255 +% -3.38906950000000 -3.64616266670955 -4.60031238454349 +% 0 -4.21022599426785 -5.31198318714511 +% 3.38906950000000 -3.64616266670955 -4.60031238454350 +% 5.87004056438205 -2.10511299713392 -2.65599159357256 +% 6.77813900000000 0 0 +%+---------------------------------------------------------------------+ +% bepe = +% +% 1.0e-04 * +% +% 0.10577006862061 -0.03280311340912 0.22622896453283 +% -0.23689849118264 -0.08381212188929 0.19012647353034 +% -0.28097149868399 -0.27932841208010 -0.09478661247316 +% -0.00993087024324 -0.40696658723490 -0.25516638287475 +% 0.30515405726843 -0.28406934448847 -0.08473891260811 +% 0.22227445395075 -0.09720240368498 0.17861064660414 +% -0.02802489095986 -0.05094783955262 0.27966635300835 +% -0.26857111543808 -0.16322087400994 0.13741460188272 +% -0.18857636914770 -0.32093878639814 -0.08330783529524 +% 0.07456603136381 -0.29449414094440 -0.09390302297815 +% 0.13261087563580 -0.17589319924929 -0.00159363090568 +% 0.17318903393474 -0.12129151029501 0.05449768902703 +% 0.10577006862061 -0.03280311340912 0.22622896453283 +% +%+=====================================================================+ + +global R_mean + +R_mean = 6371.2; % Mean radius for International Geomagnetic + % Reference Field (6371.2 km) + +[G,H] = IGRF95; % IGRF coefficients for 1995 + +nmax = 10; % max degree of geopotential +mmax = 10; % max order of geopotential + +Kschmidt = schmidt(nmax,mmax); + +R_E = 6378.139; % radius of Earth, km +R_km = R_E + 400.000; % radius of circular orbit, km + +i_rad=51.6*pi/180; % inclination of orbit plane + Si=sin(i_rad); + Ci=cos(i_rad); +arg_lat=0:pi/6:2*pi; % values of argument of latitude + +for k = 1:13 + +St=sin(arg_lat(k)); +Ct=cos(arg_lat(k)); + +% direction cosine matrix from E to LVLH, +% assuming longitude of ascending node = 0 + +D(1,1)=Ct; D(1,2)=-St; D(1,3)=0; +D(2,1)=Ci*St; D(2,2)=Ci*Ct; D(2,3)=-Si; +D(3,1)=Si*St; D(3,2)=Si*Ct; D(3,3)=Ci; + +% position vector from E* to P, E-basis + +repe = R_km*D(:,1)'; +repe_array(k,:) = repe; + +[A,ctilde,stilde] = recursion(repe,nmax,mmax); +bepe(k,:) = bfield(repe,nmax,mmax,Kschmidt,A,ctilde,stilde,G,H); + +end + +format long +repe_array +bepe + diff --git a/IGRF/old_matlab_igrf/recursion.m b/IGRF/old_matlab_igrf/recursion.m new file mode 100755 index 0000000..f5794ec --- /dev/null +++ b/IGRF/old_matlab_igrf/recursion.m @@ -0,0 +1,104 @@ +function [A,ctilde,stilde] = recursion(repe,nmax,mmax) + +%+=====================================================================+ +% +% Programmers: Carlos Roithmayr Dec 1995 +% +% NASA Langley Research Center +% Spacecraft and Sensors Branch (CBC) +% 757 864 6778 +% c.m.roithmayr@larc.nasa.gov +% +%+---------------------------------------------------------------------+ +% +% Purpose: +% +% Recursive calculations of derived Legendre polynomials and other +% quantities needed for gravitational and magnetic fields. +% +%+---------------------------------------------------------------------+ +% +% Argument definitions: +% +% repe (m?) Position vector from Earth's center, E*, to a +% point, P, expressed in a basis fixed in the +% Earth (ECF): 1 and 2 lie in equatorial plane +% with 1 in the plane containing the prime meridian, +% 3 in the direction of the north pole. +% The units of length are not terribly important, +% since repe is made into a unit vector. +% +% nmax Maximum degree of derived Legendre polynomials +% +% mmax Maximum order of derived Legendre polynomials +% +% A Derived Legendre polynomials +% +% ctilde See pp. 4--9 of Ref. [1] +% +% stilde See pp. 4--9 of Ref. [1] +% +%+---------------------------------------------------------------------+ +% +% References: +% +% 1. Mueller, A. C., "A Fast Recursive Algorithm for Calculating +% the Forces Due to the Geopotential", NASA JSC Internal Note +% No. 75-FM-42, June 9, 1975. +% +% 2. Lundberg, J. B., and Schutz, B. E., "Recursion Formulas of +% Legendre Functions for Use with Nonsingular Geopotential +% Models", Journal of Guidance, Control, and Dynamics, Vol. 11, +% Jan--Feb 1988, pp. 32--38. +% +%+=====================================================================+ + +% The number 1 is added to degree and order since MATLAB can't have an +% array index of 0. + +clear A; +A=zeros(nmax+3,nmax+3); % A(n,m) = 0, for m > n + +R_m = sqrt(repe*repe'); +rhat = repe/R_m; + +u = rhat(3); % sin of latitude + +A(1,1)=1; % "derived" Legendre polynomials +A(2,1)=u; +A(2,2)=1; + clear ctilde + clear stilde +ctilde(1) = 1; ctilde(2) = rhat(1); +stilde(1) = 0; stilde(2) = rhat(2); + +for n = 2:nmax + i=n+1; + +% Calculate derived Legendre polynomials and "tilde" letters +% required for gravitational and magnetic fields. + +% Eq. (4a), Ref. [2] + A(i,i) = prod(1:2:(2*n - 1)); + +% Eq. (4b), Ref. [2] + A(i,(i-1))= u*A(i,i); + + if n <= mmax +% p. 9, Ref. [1] + ctilde(i) = ctilde(2) * ctilde(i-1) - stilde(2) * stilde(i-1); + stilde(i) = stilde(2) * ctilde(i-1) + ctilde(2) * stilde(i-1); + end + + for m = 0:n + j=m+1; + + + if (m < (n-1)) & (m <= (mmax+1)) +% Eq. I, Table 1, Ref. [2] + A(i,j)=((2*n - 1)*u*A((i-1),j) - (n+m-1)*A((i-2),j))/(n-m); + end + + end +end + diff --git a/IGRF/old_matlab_igrf/schmidt.m b/IGRF/old_matlab_igrf/schmidt.m new file mode 100755 index 0000000..093e2b0 --- /dev/null +++ b/IGRF/old_matlab_igrf/schmidt.m @@ -0,0 +1,74 @@ +function K = schmidt(nmax,mmax) + +%+=====================================================================+ +% +% Programmers: Carlos Roithmayr Feb 1997 +% +% NASA Langley Research Center +% Spacecraft and Sensors Branch (CBC) +% 757 864 6778 +% c.m.roithmayr@larc.nasa.gov +% +%+---------------------------------------------------------------------+ +% +% Purpose: +% +% Compute coefficients that relate Schmidt functions to associated +% Legendre functions. +% +%+---------------------------------------------------------------------+ +% +% Argument definitions: +% +% nmax Maximum degree of contributing spherical harmonics +% +% mmax Maximum order of contributing spherical harmonics +% +% K coefficients that relate Schmidt functions to +% associated Legendre functions (Ref. [1]). +% +%+---------------------------------------------------------------------+ +% +% References: +% +% 1. Haymes, R. C., Introduction to Space Science, Wiley, New +% York, 1971. +% +% 2. Roithmayr, C., "Contributions of Spherical Harmonics to +% Magnetic and Gravitational Fields", EG2-96-02, NASA Johnson +% Space Center, Jan. 23, 1996. +% +%+=====================================================================+ + +% The number 1 is added to degree and order since MATLAB can't have an array +% index of 0. + + +% Seed for recursion formulae +K(2,2) = 1; + +% Recursion formulae + +for n = 1:nmax + i=n+1; + + for m = 0:n + j=m+1; + + if m == 0 + % Eq. (3), Ref. [2] + K(i,j) = 1; + + elseif ((m >= 1) & (n >= (m+1))) + % Eq. (4), Ref. [2] + K(i,j) = sqrt((n-m)/(n+m))*K(i-1,j); + + elseif ((m >= 2) & (n >= m)) + % Eq. (5), Ref. [2] + K(i,j) = K(i,j-1)/sqrt((n+m)*(n-m+1)); + end + + end +end + + diff --git a/MSIS/MSIS86/AAREADME.TXT b/MSIS/MSIS86/AAREADME.TXT new file mode 100755 index 0000000..a793c8d --- /dev/null +++ b/MSIS/MSIS86/AAREADME.TXT @@ -0,0 +1,64 @@ +========================================================================= +National Space Science Data Center Data set MN-61C April 1987 +========================================================================= + +NAME: Mass-Spectrometer-Incoherent-Scatter (MSIS) neutral + atmosphere model + +SCIENTIFIC CONTACT: A. Hedin, GSFC code 614, Greenbelt, MD 20771 + +NSSDC CONTACT: D. Bilitza, GSFC/NSSDC code 633, Greenbelt, + MD 20771, tel. (301) 441-4193 + SPAN: NCF::[BILITZA] + + bytes +FILES: (1) FORTRAN source code for msis86.for 28030 + MSIS-86 subroutines + (2) data file needed for (1) msis86.dat 19618 + (3) FORTRAN test program for (1) m86tes.for 2640 + (4) output of test program m86tes.dat 4958 + (5) FORTRAN driver program, allows m86dri.for 21616 + fast display of MSIS profiles + (6) user manual for older version of m86dri.doc 42802 + (7) test run of M86DRI with examples m86dri.log 25946 + (8) this file AAAREADME.DOC 3847 + +BRIEF DESCRIPTION: + +The Mass-Spectrometer-Incoherent-Scatter-1986 (MSIS-86) neutral atmosphere +model describes the neutral temperature and the densities of He, O, N2, O2, +Ar, H, and N. The MSIS model is based on the extensive data compilation and +analysis work of A. E. Hedin and his collaborators [A. E. Hedin et al., J. +Geophys. Res. 82, 2139-2156, 1977; A. E. Hedin, J. Geophys. Res. 88, 10170- +10188, 1983; A. E. Hedin, J. Geophys. Res. 92, 4649, 1987]. MSIS-86 +constitutes the upper part of the COSPAR International Reference Atmosphere +(CIRA-86). + +Data sources for the present model include temperature and density +measurements from several rockets, satellites (OGO-6, San Marco 3, Aeros-A, +AE-C, AE-D, AE-E, ESRO 4 and DE-2) and incoherent scatter radars (Millstone +Hill, St. Santin, Arecibo, Jicamarca, and Malvern). Since the MSIS-83 model, +terms were added or changed to better represent seasonal variations in the +polar regions under both quiet and magnetically disturbed conditions and +local time variations in the magnetic activity effect. In addition a new +species, atomic nitrogen, was added to the list of species covered by the +model. + +The model expects as input: year, day of year, universal time, altitude, +geodetic latitude and longitude, local apparent solar time, solar F10.7 flux +(for previous day and 3-month average) and magnetic Ap index (daily or Ap +history for last 59 hours). For this conditions the following output +parameters are calculated: number density of He, O, N2, O2, Ar, H and N, +total mass density, neutral temperature and exospheric temperature. For +diagnostic purposes the source code is equipped with 23 flags to turn on/off +particular variations. + +The software package includes a test program (M86TES) supplied by A. Hedin +and an interactive driver M86DRI developed at NSSDC. M86DRI produces tables +of temperature and densities. Any of the model input parameters can be chosen +as the variable for the table output. The model is also available on tape, +and on floppy disk for use on IBM compatible PCs. + +========================================================================= +National Space Science Data Center Data set MN-61C April 1987 +========================================================================= diff --git a/MSIS/MSIS86/m86dri.doc b/MSIS/MSIS86/m86dri.doc new file mode 100755 index 0000000..4904e2f --- /dev/null +++ b/MSIS/MSIS86/m86dri.doc @@ -0,0 +1,1337 @@ + **** **** ***** *** ***** + ***** ***** *** *** *** *** *** + *** ** ** *** *** *** *** + *** *** *** *** *** *** + *** * *** *** *** *** + *** *** *** *** *** + *** *** *** *** *** *** *** + *** *** ******* *** ******* + *** *** ***** *** ***** + ------------------------------------------------------------------- + ------------------------------------------------------------------- + *** *** + ** ** ** + ** ** ** + *** ***** + ** ** ** ** + ** ** ** ** + *** *** + ------------------------------------------------------------------- + ------------- MASS SPECTROMETER INCOHERENT SCATTER ---------------- + ------------------- Neutral Atmosphere Model ---------------------- + ---------------------------- 1986 --------------------------------- + --------------------------------------------------------- June 1987 + + + + + + ------------------------------------------------------------------- + ------------------------------------------------------------------- + ------------------------------------------------------------------- + --- This program represents the MSIS model as established by --- + --- A. Hedin and his co-workers. --- + ------------------------------------------------------------------- + --- REFERENCES: --- + --- A.E. Hedin et al., J. Geophys. Res. 82, 2139, 1977 --- + --- A.E. Hedin, J. Geophys. Res. 88,10170, 1983 --- + --- A.E. Hedin, J. Geophys. Res. 92, 4649, 1987 --- + ------------------------------------------------------------------- + ------------------------------------------------------------------- + ------------------------ Dieter Bilitza --------------------------- + ------ National Aeronautics and Space Administration (NASA) ------- + ----------- National Space Science Data Center (NSSDC) ------------ + -------------- Goddard Space Flight Center, Code 633 -------------- + ---------------- Greenbelt, Maryland 20771, U.S.A. ---------------- + ---------------------- tel. (301) 286-9536 ------------------------ + ------------------------------------------------------------------- + ------------------------------------------------------------------- + --------------------- NSSDC Data Set MN-61D ----------------------- + --------------------------------------------------------- June 1987 + + + + + + + !!!!!!!!!!!!!!!! USER MANUAL !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! + !!!!!!!!! USER MANUAL !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! + !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! USER MANUAL !!!!!!!!!!!!!!!!!! + + + + The manual will guide you through one session with + the MSIS front-end explaining the different windows + and options + + The YOU> prompt indicates the numbers you have + to enter. + + Note that in most cases you can enter either integer + or floating point numbers. The only exceptions are + DAY OF YEAR and the various flags; all of these have + to be integer. + + + !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! + + + + + + Dieter Bilitza July 1987 + + + + + + + + + + + + + + + ************************************************* + ********* MSIS THERMOSPHERE MODEL 1986 ********** + ************************************************* + + + + + THIS PROGRAM ALLOWS YOU TO PRODUCE MSIS-PROFILES IN LATITUDE, + LONGITUDE,SOLAR ACTIVITY,DAY,TIME,ALTITUDE OR MAGNETIC ACTIVITY. + + + + + + + + + + + 1111111111111111111111111111111111111111111111111111111111111 + first window + + You have an option to display your final profiles + on your screen or you can store them in the file + OUTPUT.MSI for later use e.g., plotting, etc. + + If you choose the storage option (i.e. you enter 1 + at the prompt) the program creates the file + OUTPUT.MSI in your present directory. Everytime + the program is started, old files with name + OUTPUT.MSI will be deleted to prevent your + directory from overflowing. + + + + DO YOU WANT YOUR MSIS-PROFILES + DISPLAYED ON YOUR MONITOR: TYPE "0" + STORED IN FILE OUTPUT.MSI: TYPE "1" + ------------------------------------------------------------ + YOU>0 + + + + + + + + + + + + + 222222222222222222222222222222222222222222222222222222222222222 + second window + + Now you choose the variable for your profiles. You + can produce profiles in latitude, longitude, solar + activity (either daily or monthly 10.7cm solar radio + flux index), day of year, hour, altitude, or magnetic + activity by entering the corresponding number at the + prompt below. + + The choice between geodetic or geomagnetic, and + between local or universal time will come later. + + If you select the monthly radio flux index F10.7M + as your variable, your daily index should, of course, + vary as well. But the program does not allow + simultaneous variation of two parameters, therefore + the program assumes that the both indices are equal. + + # ... # will be used throughout the program to + indicate the last value entered for the parameter + considered. + + + + SELECT YOUR VARIABLE: #LAST:6# + + Geodetic or geomagnetic cordinates + are assumed depending on your later + 1 LATITUDE 5 DAY OF YEAR selection of JMAG. + 2 LONGITUDE 6 HOUR Variation with Universal Time is chosen + 3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in + 4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. + ---------------------------------------------------------------------- + YOU>1 + + + + + + + + + + + + + + 333333333333333333333333333333333333333333333333333333333333 + third window + + Now you define your profile boundaries and + stepsize. In our example we want to produce + a latitudinal profile from 60 degree South + to 60 degree North with steps of 20 degree. + + The choice between geodetic and geomagnetic + coordinates will come later. + + If you had chosen hour as your variable in + the last window you would now choose between + local and universal time. To produce a profile + in universal time you have to add 25 to + your BEGIN value e.g., instead of 0,24,2 you + enter 25,24,2 to obtain profiles which start + at universal time 0. + + + + + CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 100.0, 1000.0, 100.0# + + !! if your variable is HOUR and you add "25" to your BEGIN + !! hour UNIVERSAL TIME is assumed, otherwise LOCAL TIME + ---------------------------------------------------------------------- + YOU>-60,60,20 + + + + + + + + + + + + 4444444444444444444444444444444444444444444444444444444444 + fourth window + + + Now you decide if you want to use geodetic + or geomagnetic coordinates + + + JMAG ? #0# + + !! "0" geodetic longitude and latitude + !! "1" geomagnetic ... + ------------------------------------------------------------ + YOU>0 + + + + + + + + + + + + 555555555555555555555555555555555555555555555555555555555555 + fifth window + + The fifth window allows you to choose the + latitude. But it does not appear in the + present run, because we chose latitude as + our profile variable earlier. + + + + + + + + + + + + + 666666666666666666666666666666666666666666666666666666666666 + sixth window + + + + GEOD LONGITUDE ? !EAST! [DEGREE,DECIMAL] #293.1# + ------------------------------------------------------------ + YOU>280 + + + + + + + + + + + + + 77777777777777777777777777777777777777777777777777777777777 + seventh window + + Now you enter the 10.7cm solar radio flux + index (covington index) for the day preceeding + the day for which you want to calculate your + profiles. + + + 10.7CM SOLAR RADIO FLUX ? * PREVIOUS DAY * #100.0# + ------------------------------------------------------------ + YOU>100 + + + + + + + + + + + + + + 8888888888888888888888888888888888888888888888888888888888 + eighth window + + + + + 10.7CM SOLAR RADIO FLUX ? * MONTHLY AVERAGE * #100.0# + ------------------------------------------------------------ + YOU>100 + + + + + + + + + + + + + 99999999999999999999999999999999999999999999999999999999999 + ninth window + + + DAY OF YEAR ? * DDD * #231# + ------------------------------------------------------------ + YOU>176 + + + + + + + + + + + 1111111111111111111111111111111111111111111111111111111111 + 0000000000000000000000000000000000000000000000000000000000 + tenth window + + Here you choose your daytime in decimal + hours. + + If you add 25 universal time will be + assumed otherwise local time. + + In case you have local as well as universal + time available, you can enter both times + after you enter -1 in this window. + + + LOCAL TIME ? [HOURS, DECIMAL] #12.5(LT)# + + !! Universal Time is assumed, if you add "25" to your HOUR + !! HOUR=-1 you provide LOCAL TIME as well as UNIVERSAL TIME + ------------------------------------------------------------ + YOU>12 + + + + + + + + + + + 1111111111111111111111111111111111111111111111111111111111 + 1111111111111111111111111111111111111111111111111111111111 + eleventh window + + This window allows you to enter local as + well as universal time. It does not appear + in our run, because we did not enter -1 + in the previous window. + + + + + + + + + + 11111111111111111111111111111111111111111111111111111111111 + 22222222222222222222222222222222222222222222222222222222222 + twelfth window + + + ALTITUDE ? [KM] #100.0# + ------------------------------------------------------------ + YOU>300 + + + + + + + + + + + + 11111111111111111111111111111111111111111111111111111111111 + 33333333333333333333333333333333333333333333333333333333333 + thirteenth window + + Now you enter the Ap index describing + the magnetic disturbance condition. + + If you enter -1 you will be able to + enter the magnetic disturbance conditions + prior to your observation time. + + + AP-INDEX ? * MAGNETIC ACTIVITY * # 0.0# + + !! "-1" enter detailed AP history for 59 hours + !! prior to current time + ------------------------------------------------------------ + YOU>-1 + + + + + + + + + + + + + 1111111111111111111111111111111111111111111111111111111111111 + 4444444444444444444444444444444444444444444444444444444444444 + fourteenth window + + Here you describe the magnetic disturbance + conditions prior to your chosen time. + + You can change the displayed Ap values (# .. #) + by entering the correspondig number. The + program will than prompt you for the value + you want to enter and return with the new + value to this window. + + To go to the next window you enter 0. + + + 1 DAILY AP #-1.0# + 2 3-H(OUR)-AP INDEX FOR CURRENT TIME # 0.0# + 3 3-H-AP INDEX FOR 3 HRS BEFORE CURRENT TIME # 0.0# + 4 3-H-AP INDEX FOR 6 HRS BEFORE CURRENT TIME # 0.0# + 5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME # 0.0# + 6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS BEFORE # 0.0# + 7 AVERAGE OF 3-H-AP INDICIES FROM 36 TO 59 HRS BEFORE # 0.0# + ---------------------------------------------------------------------- + ENTER: NUMBER (0 TO CONTINUE) + YOU>1 + + AP(1)= + YOU>4 + + + + 1 DAILY AP # 4.0# + 2 3-H(OUR)-AP INDEX FOR CURRENT TIME # 0.0# + 3 3-H-AP INDEX FOR 3 HRS BEFORE CURRENT TIME # 0.0# + 4 3-H-AP INDEX FOR 6 HRS BEFORE CURRENT TIME # 0.0# + 5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME # 0.0# + 6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS BEFORE # 0.0# + 7 AVERAGE OF 3-H-AP INDICIES FROM 36 TO 59 HRS BEFORE # 0.0# + ---------------------------------------------------------------------- + ENTER: NUMBER (0 TO CONTINUE) + YOU>2 + + AP(2)= + YOU>20 + + + + 1 DAILY AP # 4.0# + 2 3-H(OUR)-AP INDEX FOR CURRENT TIME #20.0# + 3 3-H-AP INDEX FOR 3 HRS BEFORE CURRENT TIME # 0.0# + 4 3-H-AP INDEX FOR 6 HRS BEFORE CURRENT TIME # 0.0# + 5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME # 0.0# + 6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS BEFORE # 0.0# + 7 AVERAGE OF 3-H-AP INDICIES FROM 36 TO 59 HRS BEFORE # 0.0# + ---------------------------------------------------------------------- + ENTER: NUMBER (0 TO CONTINUE) + YOU>0 + + + + + + + + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111111 + 5555555555555555555555555555555555555555555555555555555555555555555 + fifteenth window + + You have now the option to turn off certain + parameter variations either totally or partially. + + You always enter two integer numbers seperated + by a comma, namly the field number for which you + want to change the present flag setting and the new + flag setting. After each entry the program returns + to this window with the new setting, until you enter + 0,0 to proceed to the next window. + + These options allow you to investigate the effect + of certain variations on your calculated profiles. + They should be only used after you gained some + experience with the MSIS model. + + To explain the use of this window we will change + a flag and than reset it to its old value. + + Note that the flag of field 9 is set to -1 + indicating that we introduced a Ap history earlier. + + + SELECTION OF PARTICULAR VARIATIONS: "0" OFF "1" ON + "2" MAIN EFFECT OFF, BUT CROSS TERMS ON "-1" SPECIAL + ---------------------------------------------------------------------- + 1 F10.7 EFFECT ON MEAN #1# 2 TIME INDEPENDENT #1# + 3 SYMMETRICAL ANNUAL #1# 4 SYMMETRICAL SEMI-ANNUAL #1# + 5 ASYMMETRICAL ANNUAL #1# 6 ASYMMETRICAL SEMI-ANNUAL#1# + 7 DIURNAL #1# 8 SEMI-DIURNAL #1# + 9 DAILY AP (-1 HISTORY) #-1# 10 ALL UT/LONG EFFECTS #1# + 11 LONGITUDINAL #1# 12 UT AND MIXED UT/LONG #1# + 13 MIXED AP/UT/LONG #1# 14 TER-DIURNAL #1# + 15 DEPARTURES FROM DIFF. EQUIL. #1# 16 ALL TINF VARIATION #1# + 17 ALL TLB VARIATION #1# 18 ALL T0 VARIATION #1# + 19 ALL S VARIATION #1# 20 ALL Z0 VARIATION #1# + 21 ALL NLB VARIATION #1# 22 ALL TR12 VARIATION #1# + 23 TURBO SCALE HEIGHT VARIATION #1# + ---------------------------------------------------------------------- + ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE + YOU>2,0 + + + + + + + + SELECTION OF PARTICULAR VARIATIONS: "0" OFF "1" ON + "2" MAIN EFFECT OFF, BUT CROSS TERMS ON "-1" SPECIAL + ---------------------------------------------------------------------- + 1 F10.7 EFFECT ON MEAN #1# 2 TIME INDEPENDENT #0# + 3 SYMMETRICAL ANNUAL #1# 4 SYMMETRICAL SEMI-ANNUAL #1# + 5 ASYMMETRICAL ANNUAL #1# 6 ASYMMETRICAL SEMI-ANNUAL#1# + 7 DIURNAL #1# 8 SEMI-DIURNAL #1# + 9 DAILY AP (-1 HISTORY) #-1# 10 ALL UT/LONG EFFECTS #1# + 11 LONGITUDINAL #1# 12 UT AND MIXED UT/LONG #1# + 13 MIXED AP/UT/LONG #1# 14 TER-DIURNAL #1# + 15 DEPARTURES FROM DIFF. EQUIL. #1# 16 ALL TINF VARIATION #1# + 17 ALL TLB VARIATION #1# 18 ALL T0 VARIATION #1# + 19 ALL S VARIATION #1# 20 ALL Z0 VARIATION #1# + 21 ALL NLB VARIATION #1# 22 ALL TR12 VARIATION #1# + 23 TURBO SCALE HEIGHT VARIATION #1# + ---------------------------------------------------------------------- + ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE + YOU>2,1 + + + + + + + SELECTION OF PARTICULAR VARIATIONS: "0" OFF "1" ON + "2" MAIN EFFECT OFF, BUT CROSS TERMS ON "-1" SPECIAL + ---------------------------------------------------------------------- + 1 F10.7 EFFECT ON MEAN #1# 2 TIME INDEPENDENT #1# + 3 SYMMETRICAL ANNUAL #1# 4 SYMMETRICAL SEMI-ANNUAL #1# + 5 ASYMMETRICAL ANNUAL #1# 6 ASYMMETRICAL SEMI-ANNUAL#1# + 7 DIURNAL #1# 8 SEMI-DIURNAL #1# + 9 DAILY AP (-1 HISTORY) #-1# 10 ALL UT/LONG EFFECTS #1# + 11 LONGITUDINAL #1# 12 UT AND MIXED UT/LONG #1# + 13 MIXED AP/UT/LONG #1# 14 TER-DIURNAL #1# + 15 DEPARTURES FROM DIFF. EQUIL. #1# 16 ALL TINF VARIATION #1# + 17 ALL TLB VARIATION #1# 18 ALL T0 VARIATION #1# + 19 ALL S VARIATION #1# 20 ALL Z0 VARIATION #1# + 21 ALL NLB VARIATION #1# 22 ALL TR12 VARIATION #1# + 23 TURBO SCALE HEIGHT VARIATION #1# + ---------------------------------------------------------------------- + ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE + YOU>0,0 + + + + + + + + + + + + + 11111111111111111111111111111111111111111111111111111111111111111 + 66666666666666666666666666666666666666666666666666666666666666666 + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + sixteenth window (part A) + + Now part A of your final output window is + displayed showing the O, N2, O2 densities, + the total mass density, and the temperature. + To display part B (He, Ar, H, and N densities) + you enter 2 at the prompt. + + If you enter 1 you can change your present + parameter settings and calculate new MSIS + profiles. + + If you want to finish, you enter 0. + + + + LATI NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + GEOD O N2 O2 G*CM-3 TN TEXO + -60.0 3.222E+08 2.909E+07 9.649E+05 1.014E-14 784 787 + -40.0 3.576E+08 4.216E+07 1.435E+06 1.169E-14 853 861 + -20.0 3.675E+08 6.066E+07 2.251E+06 1.285E-14 900 908 + 0.0 3.678E+08 7.641E+07 2.735E+06 1.364E-14 908 912 + 20.0 3.707E+08 9.009E+07 3.006E+06 1.439E-14 918 921 + 40.0 3.563E+08 1.145E+08 4.193E+06 1.518E-14 971 977 + 60.0 3.056E+08 1.412E+08 6.186E+06 1.517E-14 1033 1042 + -------------------------------------------------------------------------- + LATI/LONG= 60.0/280.0 H= 300.0 F10.7 =100.0 DAY:176 LT:12.0 AP= 4.0 + MLAT/MLON= 71.1/344.1 F10.7M=100.0 UT:17.3 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>2 + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111 + 666666666666666666666666666666666666666666666666666666666666666 + BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB + sixteenth window (part B) + + This is part B of your final output + window showing the densities of Helium, + Argon, Hydrogen, and Nitrogen, and the + neutral temperature. If you enter 2 + at the prompt you will return to part A. + + If you enter 1 you can change your + present parameter settings and calculate + new MSIS profiles. + + If you want to finish the program you + enter 0. + + + + + LATI NUMBER DENSITIES/CM-3 TEMPERATURE/K + GEOD HE AR H N TN + -60.0 1.966E+07 2.914E+03 2.587E+05 1.938E+06 784 + -40.0 9.512E+06 4.776E+03 2.478E+05 3.814E+06 853 + -20.0 5.424E+06 8.224E+03 2.131E+05 4.917E+06 900 + 0.0 3.288E+06 1.241E+04 1.895E+05 6.386E+06 908 + 20.0 2.232E+06 1.674E+04 1.644E+05 7.618E+06 918 + 40.0 1.480E+06 2.804E+04 1.196E+05 6.744E+06 971 + 60.0 7.566E+05 5.769E+04 8.241E+04 6.385E+06 1033 + -------------------------------------------------------------------------- + LATI/LONG= 60.0/280.0 H= 300.0 F10.7 =100.0 DAY:176 LT:12.0 AP= 4.0 + MLAT/MLON= 71.1/344.1 F10.7M=100.0 UT:17.3 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>1 + + + + + + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111 + 777777777777777777777777777777777777777777777777777777777777777 + seventeenth window + + This window allows you to access the different + windows by entering the corresponding number. + Each time the program returns to this window + until you enter 0. + + You change the parameters you want to change + and then calculate a new profile by entering 0. + + # ... # indicates the present setting of the + parameters. + + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 60.0# 7 GEOD.(0) OR GEOM.(1) #0# + 2 LONGITUDE #280.0# 8 SELECTION OF VARIABLE # LATI# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # -60.0 60.0 20.0# + 4 F10.7 #100.0# 10 F10.7M #100.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>7 + + + + + + + + 444444444444444444444444444444444444444444444444444444444444 + + + JMAG ? #0# + + !! "0" geodetic longitude and latitude + !! "1" geomagnetic ... + ------------------------------------------------------------ + YOU>1 + + + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111 + 777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 71.1# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE # LATI# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # -60.0 60.0 20.0# + 4 F10.7 #100.0# 10 F10.7M #100.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>0 + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111 + 666666666666666666666666666666666666666666666666666666666666666 + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + + + LATI NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + GEOM O N2 O2 G*CM-3 TN TEXO + -60.0 3.027E+08 2.507E+07 8.837E+05 9.462E-15 755 757 + -40.0 3.388E+08 3.451E+07 1.126E+06 1.082E-14 817 823 + -20.0 3.635E+08 5.024E+07 1.788E+06 1.224E-14 880 889 + 0.0 3.656E+08 6.857E+07 2.548E+06 1.319E-14 907 913 + 20.0 3.685E+08 8.191E+07 2.810E+06 1.393E-14 908 912 + 40.0 3.673E+08 9.961E+07 3.386E+06 1.475E-14 937 941 + 60.0 3.369E+08 1.278E+08 5.107E+06 1.532E-14 1003 1010 + -------------------------------------------------------------------------- + LATI/LONG= 48.9/278.2 H= 300.0 F10.7 =100.0 DAY:176 LT:12.0 AP= 4.0 + MLAT/MLON= 60.0/344.1 F10.7M=100.0 UT:17.5 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>1 + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111111 + 7777777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 60.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE # LATI# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # -60.0 60.0 20.0# + 4 F10.7 #100.0# 10 F10.7M #100.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>8 + + + + + + 222222222222222222222222222222222222222222222222222222222222222222 + + + SELECT YOUR VARIABLE: #LAST:1# + + Geodetic or geomagnetic cordinates + are assumed depending on your later + 1 LATITUDE 5 DAY OF YEAR selection of JMAG. + 2 LONGITUDE 6 HOUR Variation with Universal Time is chosen + 3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in + 4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. + ---------------------------------------------------------------------- + YOU>4 + + + + + + + 33333333333333333333333333333333333333333333333333333333333333333 + + + CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # -60.0, 60.0, 20.0# + + !! if your variable is HOUR and you add "25" to your BEGIN + !! hour UNIVERSAL TIME is assumed, otherwise LOCAL TIME + ---------------------------------------------------------------------- + YOU>70,10,170 + + + + + + 111111111111111111111111111111111111111111111111111111111111111111111 + 777777777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 60.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE #F10.7# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 170.0 10.0# + 4 F10.7 #100.0# 10 F10.7M #100.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>1 + + + + + 5555555555555555555555555555555555555555555555555555555555555 + + GEOM LATITUDE ? !NORTH! [DEGREE,DECIMAL] # 60.0# + ------------------------------------------------------------ + YOU>30 + + + + + + + 11111111111111111111111111111111111111111111111111111111111111 + 77777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 30.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE #F10.7# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 170.0 10.0# + 4 F10.7 #100.0# 10 F10.7M #100.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>0 + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111111 + 6666666666666666666666666666666666666666666666666666666666666666666 + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + + + F10.7 NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + MON O N2 O2 G*CM-3 TN TEXO + 70.0 2.359E+08 4.210E+07 1.311E+06 8.402E-15 779 780 + 80.0 2.793E+08 5.608E+07 1.798E+06 1.025E-14 826 828 + 90.0 3.240E+08 7.183E+07 2.356E+06 1.223E-14 872 874 + 100.0 3.700E+08 8.920E+07 2.977E+06 1.432E-14 916 920 + 110.0 4.172E+08 1.080E+08 3.655E+06 1.653E-14 959 964 + 120.0 4.657E+08 1.282E+08 4.382E+06 1.883E-14 1000 1006 + 130.0 5.155E+08 1.496E+08 5.151E+06 2.123E-14 1040 1047 + 140.0 5.668E+08 1.722E+08 5.956E+06 2.374E-14 1078 1087 + 150.0 6.195E+08 1.957E+08 6.791E+06 2.634E-14 1115 1126 + 160.0 6.739E+08 2.203E+08 7.650E+06 2.903E-14 1150 1163 + 170.0 7.299E+08 2.457E+08 8.529E+06 3.182E-14 1184 1199 + -------------------------------------------------------------------------- + LATI/LONG= 19.0/275.7 H= 300.0 F10.7 =170.0 DAY:176 LT:12.0 AP= 4.0 + MLAT/MLON= 30.0/344.1 F10.7M=170.0 UT:17.6 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>2 + + + + + + + 111111111111111111111111111111111111111111111111111111111111111 + 666666666666666666666666666666666666666666666666666666666666666 + BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB + + + + F10.7 NUMBER DENSITIES/CM-3 TEMPERATURE/K + MON HE AR H N TN + 70.0 2.002E+06 5.392E+03 2.593E+05 4.133E+06 779 + 80.0 2.097E+06 8.263E+03 2.231E+05 5.144E+06 826 + 90.0 2.189E+06 1.195E+04 1.922E+05 6.294E+06 872 + 100.0 2.279E+06 1.650E+04 1.659E+05 7.600E+06 916 + 110.0 2.369E+06 2.194E+04 1.433E+05 9.079E+06 959 + 120.0 2.459E+06 2.831E+04 1.240E+05 1.076E+07 1000 + 130.0 2.549E+06 3.561E+04 1.073E+05 1.265E+07 1040 + 140.0 2.642E+06 4.384E+04 9.306E+04 1.480E+07 1078 + 150.0 2.735E+06 5.301E+04 8.075E+04 1.724E+07 1115 + 160.0 2.831E+06 6.311E+04 7.013E+04 1.999E+07 1150 + 170.0 2.930E+06 7.412E+04 6.096E+04 2.310E+07 1184 + -------------------------------------------------------------------------- + LATI/LONG= 19.0/275.7 H= 300.0 F10.7 =170.0 DAY:176 LT:12.0 AP= 4.0 + MLAT/MLON= 30.0/344.1 F10.7M=170.0 UT:17.6 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>1 + + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111111 + 7777777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 30.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE #F10.7# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 170.0 10.0# + 4 F10.7 #170.0# 10 F10.7M #170.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>8 + + + + + + 2222222222222222222222222222222222222222222222222222222222222222222 + + + SELECT YOUR VARIABLE: #LAST:4# + + Geodetic or geomagnetic cordinates + are assumed depending on your later + 1 LATITUDE 5 DAY OF YEAR selection of JMAG. + 2 LONGITUDE 6 HOUR Variation with Universal Time is chosen + 3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in + 4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. + ---------------------------------------------------------------------- + YOU>6 + + + + + + 33333333333333333333333333333333333333333333333333333333333333333 + + + CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 70.0, 170.0, 10.0# + + !! if your variable is HOUR and you add "25" to your BEGIN + !! hour UNIVERSAL TIME is assumed, otherwise LOCAL TIME + ---------------------------------------------------------------------- + YOU>0,24,4 + + + + + + + 111111111111111111111111111111111111111111111111111111111111111111 + 777777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 30.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE # HOUR# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# + 4 F10.7 #170.0# 10 F10.7M #170.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 4.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>13 + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111111 + 3333333333333333333333333333333333333333333333333333333333333333333 + + + AP-INDEX ? * MAGNETIC ACTIVITY * # 4.0# + + !! "-1" enter detailed AP history for 59 hours + !! prior to current time + ------------------------------------------------------------ + YOU>0 + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111111 + 7777777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 30.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE # HOUR# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# + 4 F10.7 #170.0# 10 F10.7M #170.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 0.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>0 + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111111111 + 666666666666666666666666666666666666666666666666666666666666666666666 + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + + + HOUR NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + L.T. O N2 O2 G*CM-3 TN TEXO + 0.0 4.974E+08 1.403E+08 4.375E+06 2.015E-14 992 995 + 4.0 4.827E+08 1.192E+08 4.179E+06 1.871E-14 945 947 + 8.0 6.014E+08 1.625E+08 6.249E+06 2.413E-14 1078 1090 + 12.0 7.299E+08 2.457E+08 8.529E+06 3.182E-14 1184 1199 + 16.0 7.261E+08 2.731E+08 1.001E+07 3.305E-14 1289 1323 + 20.0 5.288E+08 1.725E+08 5.963E+06 2.264E-14 1122 1140 + 24.0 4.974E+08 1.403E+08 4.375E+06 2.015E-14 992 995 + -------------------------------------------------------------------------- + LATI/LONG= 19.0/275.7 H= 300.0 F10.7 =170.0 DAY:176 LT:24.0 AP= 0.0 + MLAT/MLON= 30.0/344.1 F10.7M=170.0 UT: 5.6 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>2 + + + + + + + + + 11111111111111111111111111111111111111111111111111111111111111111 + 66666666666666666666666666666666666666666666666666666666666666666 + BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB + + + HOUR NUMBER DENSITIES/CM-3 TEMPERATURE/K + L.T. HE AR H N TN + 0.0 2.500E+06 2.874E+04 8.527E+04 7.320E+06 992 + 4.0 3.147E+06 2.227E+04 9.701E+04 4.343E+06 945 + 8.0 3.786E+06 3.769E+04 7.434E+04 1.045E+07 1078 + 12.0 2.930E+06 7.412E+04 6.096E+04 2.310E+07 1184 + 16.0 2.103E+06 1.032E+05 4.878E+04 2.247E+07 1289 + 20.0 1.761E+06 5.268E+04 6.041E+04 1.045E+07 1122 + 24.0 2.500E+06 2.874E+04 8.527E+04 7.320E+06 992 + -------------------------------------------------------------------------- + LATI/LONG= 19.0/275.7 H= 300.0 F10.7 =170.0 DAY:176 LT:24.0 AP= 0.0 + MLAT/MLON= 30.0/344.1 F10.7M=170.0 UT: 5.6 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>1 + + + + + + + 111111111111111111111111111111111111111111111111111111111111111111 + 777777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 30.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE # HOUR# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# + 4 F10.7 #170.0# 10 F10.7M #170.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (LT) # 24.0# 12 DISPLAY OR STORE + 13 AP # 0.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>9 + + + + + + + 3333333333333333333333333333333333333333333333333333333333333333333 + + + CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 0.0, 24.0, 4.0# + + !! if your variable is HOUR and you add "25" to your BEGIN + !! hour UNIVERSAL TIME is assumed, otherwise LOCAL TIME + ---------------------------------------------------------------------- + YOU>25,24,4 + + + + + + + 1111111111111111111111111111111111111111111111111111111111111111 + 7777777777777777777777777777777777777777777777777777777777777777 + + + **** WHICH PARAMETER DO YOU WANT TO CHANGE? + ---------------------------------------------------------------------- + 0 NO FURTHER CHANGES, CALCULATE PROFILE + 1 LATITUDE # 30.0# 7 GEOD.(0) OR GEOM.(1) #1# + 2 LONGITUDE #344.1# 8 SELECTION OF VARIABLE # HOUR# + 3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# + 4 F10.7 #170.0# 10 F10.7M #170.0# + 5 DAY #176# 11 ON/OFF FOR PARTICULAR VARIATIONS + 6 HOUR (UT) # 5.6# 12 DISPLAY OR STORE + 13 AP # 0.0# + ---------------------------------------------------------------------- + ENTER NUMBER + YOU>0 + + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111111111 + 666666666666666666666666666666666666666666666666666666666666666666666 + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + + HOUR NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + U.T. O N2 O2 G*CM-3 TN TEXO + 0.0 5.821E+08 2.126E+08 8.038E+06 2.613E-14 1230 1265 + 4.0 5.023E+08 1.410E+08 4.294E+06 2.032E-14 1006 1011 + 8.0 4.780E+08 1.307E+08 4.463E+06 1.915E-14 971 973 + 12.0 5.526E+08 1.335E+08 4.915E+06 2.131E-14 992 998 + 16.0 6.621E+08 2.114E+08 7.895E+06 2.831E-14 1163 1179 + 20.0 7.911E+08 2.841E+08 9.709E+06 3.532E-14 1247 1269 + 24.0 5.821E+08 2.126E+08 8.038E+06 2.613E-14 1230 1265 + -------------------------------------------------------------------------- + LATI/LONG= 19.0/275.7 H= 300.0 F10.7 =170.0 DAY:176 LT:18.4 AP= 0.0 + MLAT/MLON= 30.0/344.1 F10.7M=170.0 UT:24.0 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>2 + + + + + + + + 111111111111111111111111111111111111111111111111111111111111111111 + 666666666666666666666666666666666666666666666666666666666666666666 + BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB + + + HOUR NUMBER DENSITIES/CM-3 TEMPERATURE/K + U.T. HE AR H N TN + 0.0 1.706E+06 7.584E+04 5.221E+04 1.487E+07 1230 + 4.0 2.209E+06 3.232E+04 7.573E+04 7.908E+06 1006 + 8.0 2.790E+06 2.485E+04 9.604E+04 5.325E+06 971 + 12.0 3.788E+06 2.753E+04 8.477E+04 6.011E+06 992 + 16.0 3.237E+06 5.745E+04 6.538E+04 1.963E+07 1163 + 20.0 2.507E+06 1.006E+05 5.250E+04 2.437E+07 1247 + 24.0 1.706E+06 7.584E+04 5.221E+04 1.487E+07 1230 + -------------------------------------------------------------------------- + LATI/LONG= 19.0/275.7 H= 300.0 F10.7 =170.0 DAY:176 LT:18.4 AP= 0.0 + MLAT/MLON= 30.0/344.1 F10.7M=170.0 UT:24.0 + -------------------------------------------------------------------------- + + **** DO YOU WANT TO CONTINUE? + ------------------------------------------------------------ + "0" QUIT AND EXIT "1" NEW PARAMETERS + "2" OTHER OUTPUT WINDOW + ------------------------------------------------------------ + YOU>0 diff --git a/MSIS/MSIS86/m86dri.for b/MSIS/MSIS86/m86dri.for new file mode 100755 index 0000000..8ac0d21 --- /dev/null +++ b/MSIS/MSIS86/m86dri.for @@ -0,0 +1,556 @@ +C***************************************************************** +C**************** MSIS-86 THERMOSPHERE MODEL ********************* +C***************************************************************** +C****************** M86DRI.FOR, APRIL 1987 *********************** +C****************** DRIVER PROGRAM *********************** +C***************************************************************** +C*** THIS PROGRAM PRODUCES PROFILES OF *** +C*** NEUTRAL TEMPERATURE *** +C*** EXOSPHERIC TEMPERATURE *** +C*** NUMBER DENSITIES OF He, O, N2, O2, Ar, H and N *** +C*** TOTAL MASS DENSITY *** +C***************************************************************** +C*** FOR SPECIFIED *** +C*** DAY OF YEAR *** +C*** GEODATIC OR GEOMAGNETIC LATITUDE AND LONGITUDE *** +C*** ALTITUDE *** +C*** 10.7 CM SOLAR RADIO FLUX, DAILY (FOR PREVIOUS DAY) *** +C*** AND 3-MONTHS AVERAGE *** +C*** LOCAL (APPARENT SOLAR) OR UNIVERSAL TIME *** +C*** MAGNETIC INDEX Ap, DAILY OR HISTORY *** +C*** YOUR CHOICE OF VARIABLE *** +C***************************************************************** +C***************************************************************** +C* --------------------ADDRESSES------------------------ * +C* I DR. A. E. HEDIN DR. D. BILITZA I * +C* I GSFC CODE 614 GSFC/NSSDC CODE 633 I * +C* I GREENBELT, MD 20771 GREENBELT, MD 20771 I * +C* I USA USA I * +C* ----------------------------------------------------- * +C***************************************************************** +C***************************************************************** +C***************************************************************** +C********* ALL ANGLES ARE IN DEGREE ************** +C********* ALL NUMBER DENSITIES ARE IN CM-3 ************** +C********* ALL MASS DENSITIES ARE IN G/CM+3 ************** +C********* ALL ALTITUDES ARE IN KM ************** +C********* ALL TEMPERATURES ARE IN KELVIN ************** +C***************************************************************** +C******************** OPTIONS ********************************** +C***************************************************************** +C* HOUR IS LOCAL TIME OR UNIVERSAL TIME + 25 * +C* JMAG =0 GEOGRAFIC LATITUDE AND LONGITUDE EXPECTED * +C* =1 GEOMAGNETIC LATITUDE AND LONGITUDE EXPECTED * +C* TO TURN ON/OFF 23 PARTICULAR VARIATIONS CALL "TSELEC(SW)" * +C* TO SET THE 23 FLAGS SW. TO GET CURRENT VALUES OF * +C* SW CALL "TRETRV(SW)". * +C***************************************************************** +C***************************************************************** +C***************************************************************** + INTEGER EGNR,AGNR,DAYNR + REAL LATI,LONGI,MLAT,MLONG + CHARACTER ITEXT(8)*5 + CHARACTER LTEX*4 + CHARACTER IMZ(8)*4 + DIMENSION DEN(8),TEMP(2),AP(16),XVAR(8),ISWI(25),SWI(25), + & OUTF(11,30),PARMAX(8),PARMIN(8) + COMMON/UINR/IUMSIS,MONITO,IIEE + COMMON/GTS3C/DL(16) + LOGICAL UNTI,UTLT,NOTBEG,OUT1 + DATA IMZ/'GEOD','GEOD',' DAY',' MON',' ','L.T.',' ', + & ' '/,ITEXT/' LATI',' LONG','F10.7','F10.7',' DAY ', + & ' HOUR',' H/KM',' AP '/,LATI,LONGI,HEIGHT,F107,F107M, + & DAYNR,HOUR,AP(1),IVAR,BVAR,EVAR,SVAR/45.1,293.1,100, + & 100,100,231,12.5,0,7,100,1000,100/,ISWI/25*1/,SWI/25*1.0/ + DATA PARMIN/-90.,-360.,50.,60.,1.,0.,85.,0./,PARMAX/90., + & 360.,400.,400.,366.,49.,3000.,500./,JAGNR/0/ + UMR=ATAN(1.0)*4./180. + ALOG2=ALOG(2.) + ISTART=1 + LTEX='(LT)' + MAX1=1 + MIN0=0 +C +C FIRST SPECIFY YOUR COMPUTERS CHANNEL NUMBERS .................... +C EGNR=INPUT, MONITO=MONITOR, AGNR=OUTPUT ......................... +C IUMSIS=UNIT NUMBER FOR COEFFICIENT INPUT ........................ +C IUOUT=UNIT NUMBER FOR OUTPUTFILE OUTPUT.MSI ..................... +C + EGNR=5 + MONITO=6 + IUMSIS=12 + IUOUT=16 + WRITE(MONITO,5100) +5100 FORMAT(1X/////4X,'************* MSIS THERMOSPHERE MODEL', + & ' 1986 **************'/1X,63('*')/ + & ' THIS PROGRAM ALLOWS YOU TO PRODUCE MSIS-PROFILES IN LATITUDE,'/ + & ' LONGITUDE,SOLAR ACTIVITY,DAY,TIME,ALTITUDE OR MAGNETIC', + & ' ACTIVITY.'/1X,63('*')) + WRITE(MONITO,5111) +5111 FORMAT(' In each of the following windows you will be asked ', + & 'to enter'/' one or more values, defining the conditions for ', + & 'your MSIS'/' tables.'/' In each window the current value(s) ', + & 'is (are) shown in the right'/ + & ' upper corner (#..#). You can choose the current value(s) by'/ + & ' entering / at the prompt'/' If you enter a wrong character', + & ' or a value outside the allowed'/' parameter range, the ', + & 'program will ask you for a new entry.'/' After your tables', + & ' are displayed, you can change any parameter'/' you wish to ', + & 'change and create new tables.'/' You can leave the program', + & ' at any point by entering Ctrl Z.'/1X,63('*')) + NOTBEG=.FALSE. + GOTO 5508 +3293 DLATI=LATI + DLONG=LONGI + IF(JMAG.EQ.1) THEN + DLATI=MLAT + DLONG=MLONG + ENDIF + DHOU=HOUR + LTEX='(LT)' + IF(UNTI) THEN + DHOU=UT + LTEX='(UT)' + ENDIF + WRITE(MONITO,5602) DLATI,JMAG,DLONG,ITEXT(IVAR),HEIGHT,BVAR, + & EVAR,SVAR,F107,F107M,DAYNR,LTEX,DHOU,AP(1) + ISTART=ISTART+1 +5602 FORMAT(1X//' **** WHICH PARAMETER DO YOU WANT TO ', + & 'CHANGE?'/1X,70('-')/' 0 NO FURTHER CHANGES, CALCULATE PRO', + & 'FILE'/' 1 LATITUDE #',F5.1,'#',8X,'7 GEOD.(0) OR GEOM.(', + & '1) #',I1,'#'/' 2 LONGITUDE #',F5.1,'#',8X,'8 SELECTION', + & ' OF VARIABLE #',A5,'#'/' 3 ALTITUDE #',F6.1,'#',7X,'9 ', + & 'VARIABLE RANGE #',3F8.1,'#'/' 4 F10.7 #',F5.1,'#',7X, + & '10 F10.7M',18X,'#',F5.1,'#'/' 5 DAY',7X,'#',I3,'#',9X,'11', + & ' ON/OFF FOR PARTICULAR VARIATIONS'/' 6 HOUR ',A4,' #',F5.1, + & '#',7X,'12 DISPLAY OR STORE'/28X,'13 AP',23X,'#',F5.1,'#'/ + & 1X,70('-')/' ENTER NUMBER') + MAXI=13 +8603 READ(EGNR,*,ERR=8600,END=2978) ISWIT + IF((ISWIT.GE.MIN0).AND.(ISWIT.LE.MAXI)) GOTO 8601 +8600 WRITE(MONITO,8602) MIN0,MAXI +8602 FORMAT(' Your input is outside the value range:',I2,' to ',I3, + & ', try again') + GOTO 8603 +8601 GOTO (5300,3329,3339,3331,3500,5501,5502,3332,5503,5504, + & 5701,5505,5508,6780) ISWIT+1 +5508 WRITE(MONITO,5123) JAGNR +5123 FORMAT(/' DO YOU WANT YOUR MSIS-PROFILES',27X,'#',I1,'#'/5X, + & 'DISPLAYED ON YOUR MONITOR: ENTER 0 AT PROMPT'/5X, + & 'STORED IN FILE OUTPUT.MSI: ENTER 1 AT PROMPT'/5X, + & 'DISPLAYED AND STORED: ENTER 2 AT PROMPT') + MAXI=2 + WRITE(MONITO,8630) +8630 FORMAT(1X,60('-')/' enter /, to continue with current value(s);', + & ' Ctrl Z, to exit') +8604 READ(EGNR,*,ERR=8605,END=2978) JAGNR + IF((JAGNR.GE.MIN0).AND.(JAGNR.LE.MAXI)) GOTO 8606 +8605 WRITE(MONITO,8602) MIN0,MAXI + GOTO 8604 +8606 IVARNR=0 + AGNR=MONITO + IF(JAGNR.GT.0) THEN + OPEN(UNIT=IUOUT,FILE='OUTPUT.MSI',STATUS='NEW',FORM='FORMATTED') + IF(JAGNR.EQ.1) AGNR=IUOUT + ENDIF + IF(NOTBEG) GOTO 3293 +5503 WRITE(MONITO,5040) IVAR +5040 FORMAT(1X//' SELECT YOUR VARIABLE:',36X,'#',I1,'#'//34X, + & 'Geodetic or geomagnetic coordinates'/34X,'are assumed dep', + & 'ending on your later'/' 1 LATITUDE 5 DAY OF YEAR',4X, + & 'selection of JMAG.'/' 2 LONGITUDE 6 HOUR',11X,'Varia', + & 'tion with Universal Time is chosen'/' 3 F10.7',7X,'7 ', + & 'ALTITUDE',7X,'by adding "25" to your BEGIN hour in '/' 4 ', + & ' F10.7M',6X,'8 AP',13X,'the next window.'/34X,'If you se', + & 'lect F10.7M, F10.7 = F10.7M'/34X,'will be assumed.') + WRITE(MONITO,8630) + MAXI=8 + MINI=1 +8610 READ(EGNR,*,ERR=8611,END=2978) IVAR + IF((IVAR.GE.MINI).AND.(IVAR.LE.MAXI)) GOTO 5504 +8611 WRITE(MONITO,8602) MINI,MAXI + GOTO 8610 +5504 WRITE(MONITO,5044) BVAR,EVAR,SVAR +5044 FORMAT(1X//' CHOOSE YOUR VARIABLE RANGE:',5X,' BEGIN, END, ', + & 'STEPWIDTH ?'/32X,'#',F8.1,',',F8.1,',',F8.1,'#'/) + IF(IVAR.EQ.6) WRITE(MONITO,8741) +8741 FORMAT(' !! if your variable is HOUR and you add "25" to your', + & ' BEGIN '/' !! hour UNIVERSAL TIME is assumed, otherwise ', + & 'LOCAL TIME') + WRITE(MONITO,8630) + XMAX=PARMAX(IVAR) + XMIN=PARMIN(IVAR) +9630 READ(EGNR,*,ERR=8631,END=2978) BVAR,EVAR,SVAR + IF((BVAR.GE.XMIN).AND.(EVAR.LE.XMAX)) GOTO 8632 +8631 WRITE(MONITO,8633) XMIN,XMAX +8633 FORMAT(' Your input is outside the value range:',F7.1,' to',F7.1, + & ', try again') + GOTO 9630 +8632 IF(IVAR.NE.6) GOTO 2929 + IMZ(6)='L.T.' + UNTI=.FALSE. + IF(BVAR.GT.24.1) THEN + UNTI=.TRUE. + IMZ(6)='U.T.' + BVAR=BVAR-25. + ENDIF +2929 LANZ=INT((EVAR-BVAR)/SVAR)+1 + IF(LANZ.GT.30) THEN + WRITE(MONITO,6013) +6013 FORMAT(' The maximum table size is 30 rows. Please choose a'/ + & ' smaller range or larger stepsize.') + GOTO 9630 + ENDIF + IF(NOTBEG) GOTO 3293 +3332 WRITE(MONITO,6006) JMAG +6006 FORMAT(1X//1X,'JMAG ?',50X,'#',I1,'#'//' !! "0" geodetic', + & ' longitude and latitude'/' !! "1" geomagnetic ... ') + WRITE(MONITO,8630) +8640 READ(EGNR,*,ERR=8641,END=2978) JMAG + IF((JMAG.GE.MIN0).AND.(JMAG.LE.MAX1)) GOTO 8642 +8641 WRITE(MONITO,8602) MIN0,MAX1 + GOTO 8640 +8642 CONTINUE + IMZ(1)='GEOD' + IMZ(2)='GEOD' + IF(JMAG.EQ.1) THEN + IMZ(1)='GEOM' + IMZ(2)='GEOM' + ENDIF + IF(NOTBEG) GOTO 3293 + IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7339 +3329 DLATI=LATI + IF(JMAG.EQ.1) DLATI=MLAT + WRITE(MONITO,5000) IMZ(1),DLATI +5000 FORMAT(1X//1X,A4,' LATITUDE ? !NORTH! [DEGREE,DECIMAL]', + & 8X,'#',F5.1,'#') + WRITE(MONITO,8630) + XMAX=PARMAX(1) + XMIN=PARMIN(1) +8650 READ(EGNR,*,ERR=8651,END=2978) DLATI + IF((DLATI.GE.XMIN).AND.(DLATI.LE.XMAX)) GOTO 8652 +8651 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8650 +8652 IF(JMAG.EQ.0) THEN + LATI=DLATI + ELSE + MLAT=DLATI + ENDIF + IF(NOTBEG) GOTO 3293 +7339 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7500 +3339 DLONG=LONGI + IF(JMAG.EQ.1) DLONG=MLONG + WRITE(MONITO,6001) IMZ(2),DLONG +6001 FORMAT(1X//1X,A4,' LONGITUDE ? !EAST! [DEGREE,DECIMAL]', + & 8X,'#',F5.1,'#') + WRITE(MONITO,8630) + XMAX=PARMAX(2) + XMIN=PARMIN(2) +8653 READ(EGNR,*,ERR=8654,END=2978) DLONG + IF((DLONG.GE.XMIN).AND.(DLONG.LE.XMAX)) GOTO 8655 +8654 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8653 +8655 IF(JMAG.EQ.0) THEN + LONGI=DLONG + ELSE + MLONG=DLONG + ENDIF + IF(NOTBEG) GOTO 3293 +7500 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7701 +3500 WRITE(MONITO,6003) F107 +6003 FORMAT(1X//1X,'10.7CM SOLAR RADIO FLUX ? * PREVIOUS DAY *', + & 8X,'#',F5.1,'#') + WRITE(MONITO,8630) + XMAX=PARMAX(3) + XMIN=PARMIN(3) +8656 READ(EGNR,*,ERR=8657,END=2978) F107 + IF((F107.GE.XMIN).AND.(F107.LE.XMAX)) GOTO 8658 +8657 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8656 +8658 IF(NOTBEG) GOTO 3293 +7701 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7501 +5701 WRITE(MONITO,6913) F107M +6913 FORMAT(1X//1X,'10.7CM SOLAR RADIO FLUX ? * MONTHLY AVERAGE *', + & 6X,'#',F5.1,'#') + WRITE(MONITO,8630) + XMAX=PARMAX(4) + XMIN=PARMIN(4) +8659 READ(EGNR,*,ERR=8660,END=2978) F107M + IF((F107M.GE.XMIN).AND.(F107M.LE.XMAX)) GOTO 8661 +8660 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8659 +8661 IF(NOTBEG) GOTO 3293 +7501 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7502 +5501 WRITE(MONITO,6004) DAYNR +6004 FORMAT(1X//1X,'DAY OF YEAR ?',8X,'* DDD *',27X,'#',I3,'#') + WRITE(MONITO,8630) + MAXI=366 +8690 READ(EGNR,*,ERR=8691,END=2978) DAYNR + IF((DAYNR.GE.MAX1).AND.(DAYNR.LE.MAXI)) GOTO 8692 +8691 WRITE(MONITO,8602) MAX1,MAXI + GOTO 8690 +8692 IF(NOTBEG) GOTO 3293 +7502 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 7331 +5502 DHOU=HOUR + IF(UNTI) DHOU=UT + WRITE(MONITO,6005) DHOU,LTEX +6005 FORMAT(1X//1X,'LOCAL TIME ?',8X,'[HOURS, DECIMAL]',14X,'#', + & F4.1,A4,'#'//' !! Universal Time (UT) is assumed, if you enter', + & ' UT+25.'/' !! Enter -1, if you like to provide LOCAL TIME', + & ' as well as UNIVERSAL TIME') + WRITE(MONITO,8630) + XMAX=PARMAX(6) + XMIN=-1.0 +8665 READ(EGNR,*,ERR=8667,END=2978) DHOUR + IF((DHOUR.GE.XMIN).AND.(DHOUR.LE.XMAX)) GOTO 8668 +8667 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8665 +8668 UNTI=.FALSE. + IF(DHOUR.GT.24.1) THEN + UNTI=.TRUE. + UT=DHOUR-25. + ELSE + HOUR=DHOUR + ENDIF + UTLT=.FALSE. + IF(HOUR.LT.0.0) THEN + WRITE(MONITO,6605) +6605 FORMAT(//' LOCAL TIME, UNIVERSAL TIME ? [HOURS, DECIMAL]' + & /1X,60('-')) + XMAX=24.0 + XMIN=0.0 +8670 READ(EGNR,*,ERR=8671,END=2978) HOUR,UT + IF((HOUR.LT.XMIN).OR.(HOUR.GT.XMAX)) GOTO 8671 + IF((UT.GE.XMIN).AND.(UT.LE.XMAX)) GOTO 8672 +8671 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8670 +8672 UTLT=.TRUE. + ENDIF + IF(NOTBEG) GOTO 3293 +7331 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 5551 +3331 WRITE(MONITO,6002) HEIGHT +6002 FORMAT(1X//1X,'ALTITUDE ? [KM]',34X,'#',F6.1,'#') + WRITE(MONITO,8630) + XMAX=PARMAX(7) + XMIN=PARMIN(7) +8675 READ(EGNR,*,ERR=8676,END=2978) HEIGHT + IF((HEIGHT.GE.XMIN).AND.(HEIGHT.LE.XMAX)) GOTO 8677 +8676 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8675 +8677 IF(NOTBEG) GOTO 3293 +5551 IVARNR=IVARNR+1 + IF(IVARNR.EQ.IVAR) GOTO 5505 +6780 WRITE(MONITO,7732) AP(1) +7732 FORMAT(1X//1X,'AP-INDEX ? * MAGNETIC ACTIVITY *',18X,'#', + & F5.1,'#'//' !! "-1" enter detailed AP history for 59 hours' + & /' !! prior to current time') + WRITE(MONITO,8630) + XMAX=PARMAX(8) + XMIN=-1. +8680 READ(EGNR,*,ERR=8681,END=2978) AP1 + IF((AP1.GE.XMIN).AND.(AP1.LE.XMAX)) GOTO 8682 +8681 WRITE(MONITO,8633) XMIN,XMAX + GOTO 8680 +8682 IF(AP1.GT.-1.0) THEN + AP(1)=AP1 + GOTO 3999 + ENDIF + ISWI(9)=-1 +3813 WRITE(MONITO,6620) (AP(J),J=1,7) +6620 FORMAT(' 1 DAILY AP',45X,'#',F5.1,'#'/' 2 3-H(OUR)-AP INDEX', + & ' FOR CURRENT TIME',19X,'#',F5.1,'#'/' 3 3-H-AP INDEX FOR ', + & '3 HRS BEFORE CURRENT TIME',11X,'#',F5.1,'#'/' 4 3-H-AP ', + & 'INDEX FOR 6 HRS BEFORE CURRENT TIME',11X,'#',F5.1,'#'/ + & ' 5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME',11X,'#',F5.1, + & '#'/' 6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS ', + & 'BEFORE #',F5.1,'#'/' 7 AVERAGE OF 3-H-AP INDICIES FROM ', + & '36 TO 59 HRS BEFORE #',F5.1,'#'/1X,70('-')/' ENTER:', + & ' NUMBER, AP-VALUE (0,0 TO CONTINUE)') + MAXI=7 + XMIN=0. +8694 READ(EGNR,*,ERR=8695,END=2978) NRAP,APN + IF((NRAP.GE.MIN0).AND.(NRAP.LE.MAXI)) GOTO 8696 +8695 WRITE(MONITO,8602) MIN0,MAXI + GOTO 8694 +8696 IF((APN.GE.XMIN).AND.(APN.LE.XMAX)) GOTO 8779 + WRITE(MONITO,8633) XMIN,XMAX + GOTO 8694 +8779 IF(NRAP.GT.0) THEN + AP(NRAP)=APN + GOTO 3813 + ENDIF +3999 IF(NOTBEG) GOTO 3293 +5505 IF(NOTBEG) CALL TRETRV(SWI) + IF(ISWI(9).LT.0) SWI(9)=ISWI(9)*1.0 + DO 3919 J=1,25 +3919 ISWI(J)=INT(SWI(J)) +5521 WRITE(MONITO,5030) (ISWI(J),J=1,23) +5030 FORMAT(1X//' SELECTION OF PARTICULAR VARIATIONS: "0" OFF ', + & '"1" ON'/5X,'"2" MAIN EFFECT OFF, BUT CROSS TERMS ON',5X, + & '"-1" SPECIAL'/1X,70('-')/ + & ' 1 F10.7 EFFECT ON MEAN #',I1,'#',9X,'2 TIME', + & ' INDEPENDENT #',I1,'#'/' 3 SYMMETRICAL ANNUAL #', + & I1,'#',9X,'4 SYMMETRICAL SEMI-ANNUAL #',I1,'#'/' 5 ASYMMETR', + & 'ICAL ANNUAL #',I1,'#',9X,'6 ASYMMETRICAL SEMI-ANNUAL#',I1, + & '#'/' 7 DIURNAL',16X,'#',I1,'#',9X,'8 SEMI-DIURNAL',12X,'#', + & I1,'#'/' 9 DAILY AP (-1 HISTORY) #',I2,'#',8X,'10 ALL UT/LO', + & 'NG EFFECTS #',I1,'#'/' 11 LONGITUDINAL',11X,'#',I1,'#',8X, + & '12 UT AND MIXED UT/LONG #',I1,'#'/' 13 MIXED AP/UT/LONG', + & 7X,'#',I1,'#',8X,'14 TER-DIURNAL',13X,'#',I1,'#'/' 15 DEPART', + & 'URES FROM DIFF. EQUIL. #',I1,'# 16 ALL TINF VARIATION',6X, + & '#',I1,'#'/' 17 ALL TLB VARIATION #',I1,'#',8X,'18 ALL', + & ' T0 VARIATION #',I1,'#'/' 19 ALL S VARIATION #', + & I1,'#',8X,'20 ALL Z0 VARIATION #',I1,'#'/' 21 ALL NLB', + & ' VARIATION #',I1,'#',8X,'22 ALL TR12 VARIATION #', + & I1,'#'/' 23 TURBO SCALE HEIGHT VARIATION #',I1,'#'/1X,70('-')/ + & ' ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE') + MAXI=23 + MINI=-1 + MAX2=2 +8700 READ(EGNR,*,ERR=8701,END=2978) ISELEC,IVALUE + IF((ISELEC.GE.MIN0).AND.(ISELEC.LE.MAXI)) GOTO 8702 +8701 WRITE(MONITO,8602) MIN0,MAXI + GOTO 8700 +8702 IF((IVALUE.LT.MINI).OR.(IVALUE.GT.MAX2)) THEN + WRITE(MONITO,8602) MINI,MAX2 + GOTO 8700 + ENDIF + IF(ISELEC.GT.0) THEN + ISWI(ISELEC)=IVALUE + SWI(ISELEC)=IVALUE*1.0 + GOTO 5521 + ENDIF + CALL TSELEC(SWI) + IF(NOTBEG) GOTO 3293 +5300 NOTBEG=.TRUE. + WRITE(AGNR,8193) ITEXT(IVAR),IMZ(IVAR) + IF(JAGNR.EQ.2) WRITE(IUOUT,8193) ITEXT(IVAR),IMZ(IVAR) +8193 FORMAT(//////////3X,A5,8X,'NUMBER DENSITIES/CM-3 MASS', + & ' DENSITY TEMPERATURE/K'/4X,A4,4X,' O N2 ', + & ' O2 G*CM-3 TN TEXO') + XVAR(1)=LATI + XVAR(2)=LONGI + IF(JMAG.EQ.1) THEN + XVAR(1)=MLAT + XVAR(2)=MLONG + ENDIF + XVAR(3)=F107 + XVAR(4)=F107M + XVAR(5)=DAYNR + XVAR(6)=HOUR + IF(UNTI) XVAR(6)=UT + XVAR(7)=HEIGHT + XVAR(8)=AP(1) + LFD=0 + XVAR(IVAR)=BVAR-SVAR +2123 XVAR(IVAR)=XVAR(IVAR)+SVAR + LFD=LFD+1 + IF(JMAG.EQ.1) THEN + MLAT=XVAR(1) + MLONG=XVAR(2) + ELSE + LATI=XVAR(1) + LONGI=XVAR(2) + ENDIF + F107=XVAR(3) + F107M=XVAR(4) + IF(IVAR.EQ.4) F107=F107M + DAYNR=XVAR(5) + IF(UNTI) THEN + UT=XVAR(6) + ELSE + HOUR=XVAR(6) + ENDIF + HEIGHT=XVAR(7) + AP(1)=XVAR(8) +C +C MSIS CALCULATION +C + IF((LFD.EQ.1).OR.(IVAR.LT.3)) + & CALL GGM(JMAG,LONGI,LATI,MLONG,MLAT) + IF(UTLT) GOTO 3820 + IF(UNTI) THEN + HOUR=UT+LONGI/15. + IF(HOUR.GT.24.0) HOUR=HOUR-24.0 + ELSE + UT=HOUR-LONGI/15. + IF(UT.LT.0.0) UT=UT+24. + ENDIF +3820 UTSEC=UT*3600.0 + CALL GTS5(DAYNR,UTSEC,HEIGHT,LATI,LONGI,HOUR,F107M,F107, + & AP(1),48,DEN,TEMP) + XCOR=XVAR(IVAR) + OUTF(1,LFD)=XCOR + DO 2918 LL=1,8 +2918 OUTF(LL+1,LFD)=DEN(LL) + OUTF(10,LFD)=TEMP(1) + OUTF(11,LFD)=TEMP(2) + WRITE(AGNR,7117) XCOR,DEN(2),DEN(3),DEN(4),DEN(6), + & INT(TEMP(2)+.5),INT(TEMP(1)+.5) + IF(JAGNR.EQ.2) WRITE(IUOUT,7117) XCOR,DEN(2),DEN(3),DEN(4), + & DEN(6),INT(TEMP(2)+.5),INT(TEMP(1)+.5) +7117 FORMAT(1X,F7.1,1X,3(1X,1PE10.3),2X,1PE9.3,2X,2I6) + IF(XCOR.LT.EVAR) GOTO 2123 +2289 WRITE(AGNR,2193) LATI,LONGI,HEIGHT,F107,DAYNR,HOUR + & ,AP(1),MLAT,MLONG,F107M,UT + IF(JAGNR.EQ.2) WRITE(IUOUT,2193) LATI,LONGI,HEIGHT,F107, + & DAYNR,HOUR,AP(1),MLAT,MLONG,F107M,UT +2193 FORMAT(1X,74('-')/' LATI/LONG=',F5.1,'/',F5.1,' H=',F6.1, + & ' F10.7 =',F5.1,' DAY:',I3,' LT:',F4.1,' AP=',F5.1/ + & ' MLAT/MLON=',F5.1,'/',F5.1,12X,'F10.7M=',F5.1,11X, + & 'UT:',F4.1/1X,74('-')) + OUT1=.TRUE. +3918 WRITE(MONITO,5600) +5600 FORMAT(1X/' **** DO YOU WANT TO CONTINUE?'/1X,60('-')/ + & ' "0" QUIT AND EXIT "1" NEW PARAMETERS'/ + & ' "2" OTHER OUTPUT WINDOW'/1X,60('-')) + MAXI=2 +8750 READ(EGNR,*,ERR=8751,END=2978) IALL + IF((IALL.GE.MIN0).AND.(IALL.LE.MAXI)) GOTO 8752 +8751 WRITE(MONITO,8602) MIN0,MAXI + GOTO 8750 +8752 IF(IALL.EQ.1) GOTO 3293 + IF(IALL.EQ.0) GOTO 2978 + IF(OUT1) GOTO 1938 + WRITE(AGNR,8193) ITEXT(IVAR),IMZ(IVAR) + IF(JAGNR.EQ.2) WRITE(IUOUT,8193) ITEXT(IVAR),IMZ(IVAR) + DO 2891 I=1,LFD + WRITE(AGNR,7117) OUTF(1,I),OUTF(3,I),OUTF(4,I),OUTF(5,I), + & OUTF(7,I),INT(OUTF(11,I)+.5),INT(OUTF(10,I)+.5) + IF(JAGNR.EQ.2) WRITE(IUOUT,7117) OUTF(1,I),OUTF(3,I), + & OUTF(4,I),OUTF(5,I),OUTF(7,I),INT(OUTF(11,I)+.5), + & INT(OUTF(10,I)+.5) +2891 CONTINUE + WRITE(AGNR,2193) LATI,LONGI,HEIGHT,F107,DAYNR,HOUR, + & AP(1),MLAT,MLONG,F107M,UT + IF(JAGNR.EQ.2) WRITE(IUOUT,2193) LATI,LONGI,HEIGHT,F107, + & DAYNR,HOUR,AP(1),MLAT,MLONG,F107M,UT + OUT1=.TRUE. + GOTO 3918 +1938 WRITE(AGNR,8195) ITEXT(IVAR),IMZ(IVAR) + IF(JAGNR.EQ.2) WRITE(IUOUT,8195) ITEXT(IVAR),IMZ(IVAR) +8195 FORMAT(//////////3X,A5,13X,'NUMBER DENSITIES/CM-3',12X, + & 'TEMPERATURE/K'/4X,A4,7X,'HE',9X,'AR',9X,'H', + & 10X,'N',9X,'TN') + DO 2899 I=1,LANZ + IF(JAGNR.EQ.2) WRITE(IUOUT,7119) OUTF(1,I),OUTF(2,I), + & OUTF(6,I),OUTF(8,I),OUTF(9,I),INT(OUTF(11,I)+.5) + WRITE(AGNR,7119) OUTF(1,I),OUTF(2,I),OUTF(6,I), + & OUTF(8,I),OUTF(9,I),INT(OUTF(11,I)+.5) +2899 CONTINUE +7119 FORMAT(1X,F7.1,1X,4(1X,1PE10.3),2X,I6) + WRITE(AGNR,2193) LATI,LONGI,HEIGHT,F107,DAYNR, + & HOUR,AP(1),MLAT,MLONG,F107M,UT + IF(JAGNR.EQ.2) WRITE(IUOUT,2193) LATI,LONGI,HEIGHT,F107,DAYNR, + & HOUR,AP(1),MLAT,MLONG,F107M,UT + OUT1=.FALSE. + GOTO 3918 +2978 STOP + END diff --git a/MSIS/MSIS86/m86dri.log b/MSIS/MSIS86/m86dri.log new file mode 100755 index 0000000..3c92461 --- /dev/null +++ b/MSIS/MSIS86/m86dri.log @@ -0,0 +1,619 @@ + + ************* MSIS THERMOSPHERE MODEL 1986 ************** +*************************************************************** +THIS PROGRAM ALLOWS YOU TO PRODUCE MSIS-PROFILES IN LATITUDE, +LONGITUDE,SOLAR ACTIVITY,DAY,TIME,ALTITUDE OR MAGNETIC ACTIVITY. +*************************************************************** + In each of the following windows you will be asked to enter + one or more values, defining the conditions for your MSIS + tables. + In each window the current value(s) is (are) shown in the right + upper corner (#..#). You can choose the current value(s) by + entering / at the prompt + If you enter a wrong character or a value outside the allowed + parameter range, the program will ask you for a new entry. + After your tables are displayed, you can change any parameter + you wish to change and create new tables +*************************************************************** + +DO YOU WANT YOUR MSIS-PROFILES #0# + DISPLAYED ON YOUR MONITOR: ENTER 0 AT PROMPT + STORED IN FILE OUTPUT.MSI: ENTER 1 AT PROMPT + DISPLAYED AND STORED: ENTER 2 AT PROMPT +------------------------------------------------------------ +enter /, to continue with current value(s) +; +Your input is outside the value range: 0 to 2, try again +0 + + +SELECT YOUR VARIABLE: #7# + + Geodetic or geomagnetic coordinates + are assumed depending on your later +1 LATITUDE 5 DAY OF YEAR selection of JMAG. +2 LONGITUDE 6 HOUR Variation with Universal Time is chosen +3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in +4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 100.0, 1000.0, 100.0# + +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +JMAG ? #0# + +!! "0" geodetic longitude and latitude +!! "1" geomagnetic ... +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +GEOD LATITUDE ? !NORTH! [DEGREE,DECIMAL] # 45.1# +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +GEOD LONGITUDE ? !EAST! [DEGREE,DECIMAL] #293.1# +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +10.7CM SOLAR RADIO FLUX ? * PREVIOUS DAY * #100.0# +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +10.7CM SOLAR RADIO FLUX ? * MONTHLY AVERAGE * #100.0# +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +DAY OF YEAR ? * DDD * #231# +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +LOCAL TIME ? [HOURS, DECIMAL] #12.5(LT)# + +!! Universal Time (UT) is assumed, if you enter UT+25. +!! Enter -1, if you like to provide LOCAL TIME as well as UNIVERSAL TIME +------------------------------------------------------------ +enter /, to continue with current value(s) +30 + + +AP-INDEX ? * MAGNETIC ACTIVITY * # 0.0# + +!! "-1" enter detailed AP history for 59 hours +!! prior to current time +------------------------------------------------------------ +enter /, to continue with current value(s) +-1 +1 DAILY AP # 0.0# +2 3-H(OUR)-AP INDEX FOR CURRENT TIME # 0.0# +3 3-H-AP INDEX FOR 3 HRS BEFORE CURRENT TIME # 0.0# +4 3-H-AP INDEX FOR 6 HRS BEFORE CURRENT TIME # 0.0# +5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME # 0.0# +6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS BEFORE # 0.0# +7 AVERAGE OF 3-H-AP INDICIES FROM 36 TO 59 HRS BEFORE # 0.0# +---------------------------------------------------------------------- +ENTER: NUMBER, AP-VALUE (0,0 TO CONTINUE) +1,20 +1 DAILY AP # 20.0# +2 3-H(OUR)-AP INDEX FOR CURRENT TIME # 0.0# +3 3-H-AP INDEX FOR 3 HRS BEFORE CURRENT TIME # 0.0# +4 3-H-AP INDEX FOR 6 HRS BEFORE CURRENT TIME # 0.0# +5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME # 0.0# +6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS BEFORE # 0.0# +7 AVERAGE OF 3-H-AP INDICIES FROM 36 TO 59 HRS BEFORE # 0.0# +---------------------------------------------------------------------- +ENTER: NUMBER, AP-VALUE (0,0 TO CONTINUE) +2,10 +1 DAILY AP # 20.0# +2 3-H(OUR)-AP INDEX FOR CURRENT TIME # 10.0# +3 3-H-AP INDEX FOR 3 HRS BEFORE CURRENT TIME # 0.0# +4 3-H-AP INDEX FOR 6 HRS BEFORE CURRENT TIME # 0.0# +5 3-H-AP INDEX FOR 9 HRS BEFORE CURRENT TIME # 0.0# +6 AVERAGE OF 3-H-AP INDICIES FROM 12 TO 33 HRS BEFORE # 0.0# +7 AVERAGE OF 3-H-AP INDICIES FROM 36 TO 59 HRS BEFORE # 0.0# +---------------------------------------------------------------------- +ENTER: NUMBER, AP-VALUE (0,0 TO CONTINUE) +0,0 + + +SELECTION OF PARTICULAR VARIATIONS: "0" OFF "1" ON + "2" MAIN EFFECT OFF, BUT CROSS TERMS ON "-1" SPECIAL +---------------------------------------------------------------------- +1 F10.7 EFFECT ON MEAN #1# 2 TIME INDEPENDENT #1# +3 SYMMETRICAL ANNUAL #1# 4 SYMMETRICAL SEMI-ANNUAL #1# +5 ASYMMETRICAL ANNUAL #1# 6 ASYMMETRICAL SEMI-ANNUAL#1# +7 DIURNAL #1# 8 SEMI-DIURNAL #1# +9 DAILY AP (-1 HISTORY) #-1# 10 ALL UT/LONG EFFECTS #1# +11 LONGITUDINAL #1# 12 UT AND MIXED UT/LONG #1# +13 MIXED AP/UT/LONG #1# 14 TER-DIURNAL #1# +15 DEPARTURES FROM DIFF. EQUIL. #1# 16 ALL TINF VARIATION #1# +17 ALL TLB VARIATION #1# 18 ALL T0 VARIATION #1# +19 ALL S VARIATION #1# 20 ALL Z0 VARIATION #1# +21 ALL NLB VARIATION #1# 22 ALL TR12 VARIATION #1# +23 TURBO SCALE HEIGHT VARIATION #1# +---------------------------------------------------------------------- +ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE +2,2 + + +SELECTION OF PARTICULAR VARIATIONS: "0" OFF "1" ON + "2" MAIN EFFECT OFF, BUT CROSS TERMS ON "-1" SPECIAL +---------------------------------------------------------------------- +1 F10.7 EFFECT ON MEAN #1# 2 TIME INDEPENDENT #2# +3 SYMMETRICAL ANNUAL #1# 4 SYMMETRICAL SEMI-ANNUAL #1# +5 ASYMMETRICAL ANNUAL #1# 6 ASYMMETRICAL SEMI-ANNUAL#1# +7 DIURNAL #1# 8 SEMI-DIURNAL #1# +9 DAILY AP (-1 HISTORY) #-1# 10 ALL UT/LONG EFFECTS #1# +11 LONGITUDINAL #1# 12 UT AND MIXED UT/LONG #1# +13 MIXED AP/UT/LONG #1# 14 TER-DIURNAL #1# +15 DEPARTURES FROM DIFF. EQUIL. #1# 16 ALL TINF VARIATION #1# +17 ALL TLB VARIATION #1# 18 ALL T0 VARIATION #1# +19 ALL S VARIATION #1# 20 ALL Z0 VARIATION #1# +21 ALL NLB VARIATION #1# 22 ALL TR12 VARIATION #1# +23 TURBO SCALE HEIGHT VARIATION #1# +---------------------------------------------------------------------- +ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE +2,1 + + +SELECTION OF PARTICULAR VARIATIONS: "0" OFF "1" ON + "2" MAIN EFFECT OFF, BUT CROSS TERMS ON "-1" SPECIAL +---------------------------------------------------------------------- +1 F10.7 EFFECT ON MEAN #1# 2 TIME INDEPENDENT #1# +3 SYMMETRICAL ANNUAL #1# 4 SYMMETRICAL SEMI-ANNUAL #1# +5 ASYMMETRICAL ANNUAL #1# 6 ASYMMETRICAL SEMI-ANNUAL#1# +7 DIURNAL #1# 8 SEMI-DIURNAL #1# +9 DAILY AP (-1 HISTORY) #-1# 10 ALL UT/LONG EFFECTS #1# +11 LONGITUDINAL #1# 12 UT AND MIXED UT/LONG #1# +13 MIXED AP/UT/LONG #1# 14 TER-DIURNAL #1# +15 DEPARTURES FROM DIFF. EQUIL. #1# 16 ALL TINF VARIATION #1# +17 ALL TLB VARIATION #1# 18 ALL T0 VARIATION #1# +19 ALL S VARIATION #1# 20 ALL Z0 VARIATION #1# +21 ALL NLB VARIATION #1# 22 ALL TR12 VARIATION #1# +23 TURBO SCALE HEIGHT VARIATION #1# +---------------------------------------------------------------------- +ENTER: NUMBER, NEW FLAG OR: "0,0" TO CONTINUE +0,0 + + + + + + + + + + + H/KM NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + O N2 O2 G*CM-3 TN TEXO + 100.0 3.132E+11 8.741E+12 2.040E+12 5.283E-10 192 796 + 200.0 2.362E+09 2.392E+09 1.427E+08 1.819E-13 766 796 + 300.0 2.245E+08 4.745E+07 1.626E+06 8.322E-15 795 796 + 400.0 2.616E+07 1.137E+06 2.287E+04 7.637E-16 796 796 + 500.0 3.296E+06 3.047E+04 3.654E+02 9.464E-17 796 796 + 600.0 4.422E+05 9.062E+02 6.577E+00 1.478E-17 796 796 + 700.0 6.279E+04 2.977E+01 1.326E-01 3.488E-18 796 796 + 800.0 9.417E+03 1.076E+00 2.983E-03 1.431E-18 796 796 + 900.0 1.488E+03 4.262E-02 7.449E-05 8.370E-19 796 796 + 1000.0 2.473E+02 1.843E-03 2.056E-06 5.644E-19 796 796 +-------------------------------------------------------------------------- +LATI/LONG= 45.1/293.1 H=1000.0 F10.7 =100.0 DAY:231 LT: 0.5 AP= 20.0 +MLAT/MLON= 56.5/ 3.7 F10.7M=100.0 UT: 5.0 +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +"2" OTHER OUTPUT WINDOW +------------------------------------------------------------ +2 + + + + + + + + + + + H/KM NUMBER DENSITIES/CM-3 TEMPERATURE/K + HE AR H N TN + 100.0 1.071E+08 8.062E+10 2.346E+07 2.426E+05 192 + 200.0 3.174E+06 1.420E+06 3.310E+05 1.439E+07 766 + 300.0 1.782E+06 5.310E+03 2.451E+05 2.324E+06 795 + 400.0 1.045E+06 2.574E+01 2.140E+05 3.274E+05 796 + 500.0 6.232E+05 1.462E-01 1.880E+05 5.227E+04 796 + 600.0 3.772E+05 9.638E-04 1.658E+05 9.014E+03 796 + 700.0 2.315E+05 7.325E-06 1.468E+05 1.634E+03 796 + 800.0 1.441E+05 6.380E-08 1.304E+05 3.106E+02 796 + 900.0 9.084E+04 6.333E-10 1.162E+05 6.182E+01 796 + 1000.0 5.800E+04 7.127E-12 1.038E+05 1.285E+01 796 +-------------------------------------------------------------------------- +LATI/LONG= 45.1/293.1 H=1000.0 F10.7 =100.0 DAY:231 LT: 0.5 AP= 20.0 +MLAT/MLON= 56.5/ 3.7 F10.7M=100.0 UT: 5.0 +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +"2" OTHER OUTPUT WINDOW +------------------------------------------------------------ +2 + + + + + + + + + + + H/KM NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + O N2 O2 G*CM-3 TN TEXO + 100.0 3.132E+11 8.741E+12 2.040E+12 5.283E-10 192 796 + 200.0 2.362E+09 2.392E+09 1.427E+08 1.819E-13 766 796 + 300.0 2.245E+08 4.745E+07 1.626E+06 8.322E-15 795 796 + 400.0 2.616E+07 1.137E+06 2.287E+04 7.637E-16 796 796 + 500.0 3.296E+06 3.047E+04 3.654E+02 9.464E-17 796 796 + 600.0 4.422E+05 9.062E+02 6.577E+00 1.478E-17 796 796 + 700.0 6.279E+04 2.977E+01 1.326E-01 3.488E-18 796 796 + 800.0 9.417E+03 1.076E+00 2.983E-03 1.431E-18 796 796 + 900.0 1.488E+03 4.262E-02 7.449E-05 8.370E-19 796 796 + 1000.0 2.473E+02 1.843E-03 2.056E-06 5.644E-19 796 796 +-------------------------------------------------------------------------- +LATI/LONG= 45.1/293.1 H=1000.0 F10.7 =100.0 DAY:231 LT: 0.5 AP= 20.0 +MLAT/MLON= 56.5/ 3.7 F10.7M=100.0 UT: 5.0 +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +"2" OTHER OUTPUT WINDOW +------------------------------------------------------------ +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE # H/KM# +3 ALTITUDE #1000.0# 9 VARIABLE RANGE # 100.0 1000.0 100.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (UT) # 5.0# 12 DISPLAY OR STORE + 13 AP # 20.0# +---------------------------------------------------------------------- +ENTER NUMBER +8 + + +SELECT YOUR VARIABLE: #7# + + Geodetic or geomagnetic coordinates + are assumed depending on your later +1 LATITUDE 5 DAY OF YEAR selection of JMAG. +2 LONGITUDE 6 HOUR Variation with Universal Time is chosen +3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in +4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. +------------------------------------------------------------ +enter /, to continue with current value(s) +6 + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 100.0, 1000.0, 100.0# + +!! if your variable is HOUR and you add "25" to your BEGIN +!! hour UNIVERSAL TIME is assumed, otherwise LOCAL TIME +------------------------------------------------------------ +enter /, to continue with current value(s) +25,24,4 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE # HOUR# +3 ALTITUDE #1000.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (UT) # 5.0# 12 DISPLAY OR STORE + 13 AP # 20.0# +---------------------------------------------------------------------- +ENTER NUMBER +3 + + +ALTITUDE ? [KM] #1000.0# +------------------------------------------------------------ +enter /, to continue with current value(s) +300 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE # HOUR# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (UT) # 5.0# 12 DISPLAY OR STORE + 13 AP # 20.0# +---------------------------------------------------------------------- +ENTER NUMBER +13 + + +AP-INDEX ? * MAGNETIC ACTIVITY * # 20.0# + +!! "-1" enter detailed AP history for 59 hours +!! prior to current time +------------------------------------------------------------ +enter /, to continue with current value(s) +; +Your input is outside the value range: -1.0 to 500.0, try again +0 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE # HOUR# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (UT) # 5.0# 12 DISPLAY OR STORE + 13 AP # 0.0# +---------------------------------------------------------------------- +ENTER NUMBER +0 + + + + + + + + + + + HOUR NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + U.T. O N2 O2 G*CM-3 TN TEXO + 0.0 3.210E+08 6.869E+07 3.067E+06 1.202E-14 912 922 + 4.0 2.453E+08 5.060E+07 1.769E+06 9.047E-15 802 803 + 8.0 2.026E+08 4.550E+07 1.754E+06 7.630E-15 814 817 + 12.0 2.748E+08 6.213E+07 2.960E+06 1.042E-14 875 881 + 16.0 3.788E+08 9.540E+07 3.823E+06 1.487E-14 936 941 + 20.0 3.598E+08 8.354E+07 3.279E+06 1.376E-14 958 972 + 24.0 3.210E+08 6.869E+07 3.067E+06 1.202E-14 912 922 +-------------------------------------------------------------------------- +LATI/LONG= 45.1/293.1 H= 300.0 F10.7 =100.0 DAY:231 LT:19.5 AP= 0.0 +MLAT/MLON= 56.5/ 3.7 F10.7M=100.0 UT:24.0 +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +"2" OTHER OUTPUT WINDOW +------------------------------------------------------------ +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE # HOUR# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 0.0 24.0 4.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (UT) # 24.0# 12 DISPLAY OR STORE + 13 AP # 0.0# +---------------------------------------------------------------------- +ENTER NUMBER +8 + + +SELECT YOUR VARIABLE: #6# + + Geodetic or geomagnetic coordinates + are assumed depending on your later +1 LATITUDE 5 DAY OF YEAR selection of JMAG. +2 LONGITUDE 6 HOUR Variation with Universal Time is chosen +3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in +4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. +------------------------------------------------------------ +enter /, to continue with current value(s) +3 + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 0.0, 24.0, 4.0# + +------------------------------------------------------------ +enter /, to continue with current value(s) +70,250,30 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE #F10.7# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 250.0 30.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (UT) # 24.0# 12 DISPLAY OR STORE + 13 AP # 0.0# +---------------------------------------------------------------------- +ENTER NUMBER +6 + + +LOCAL TIME ? [HOURS, DECIMAL] #24.0(UT)# + +!! Universal Time (UT) is assumed, if you enter UT+25. +!! Enter -1, if you like to provide LOCAL TIME as well as UNIVERSAL TIME +------------------------------------------------------------ +enter /, to continue with current value(s) +12 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE #F10.7# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 250.0 30.0# +4 F10.7 #100.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 0.0# +---------------------------------------------------------------------- +ENTER NUMBER +0 + + + + + + + + + + + F10.7 NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + DAY O N2 O2 G*CM-3 TN TEXO + 70.0 3.425E+08 7.712E+07 2.881E+06 1.296E-14 878 881 + 100.0 3.837E+08 9.666E+07 3.765E+06 1.505E-14 939 945 + 130.0 4.148E+08 1.123E+08 4.499E+06 1.670E-14 987 996 + 160.0 4.380E+08 1.238E+08 5.054E+06 1.795E-14 1022 1033 + 190.0 4.547E+08 1.312E+08 5.419E+06 1.884E-14 1044 1058 + 220.0 4.659E+08 1.347E+08 5.593E+06 1.942E-14 1055 1070 + 250.0 4.717E+08 1.343E+08 5.575E+06 1.969E-14 1054 1069 +-------------------------------------------------------------------------- +LATI/LONG= 45.1/293.1 H= 300.0 F10.7 =250.0 DAY:231 LT:12.0 AP= 0.0 +MLAT/MLON= 56.5/ 3.7 F10.7M=100.0 UT:16.5 +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +"2" OTHER OUTPUT WINDOW +------------------------------------------------------------ +1 + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE #F10.7# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 250.0 30.0# +4 F10.7 #250.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 0.0# +---------------------------------------------------------------------- +ENTER NUMBER +8 + + +SELECT YOUR VARIABLE: #3# + + Geodetic or geomagnetic coordinates + are assumed depending on your later +1 LATITUDE 5 DAY OF YEAR selection of JMAG. +2 LONGITUDE 6 HOUR Variation with Universal Time is chosen +3 F10.7 7 ALTITUDE by adding "25" to your BEGIN hour in +4 F10.7M 8 AP the next window. + If you select F10.7M, F10.7 = F10.7M + will be assumed. +------------------------------------------------------------ +enter /, to continue with current value(s) +4 + + +CHOOSE YOUR VARIABLE RANGE: BEGIN, END, STEPWIDTH ? + # 70.0, 250.0, 30.0# + +------------------------------------------------------------ +enter /, to continue with current value(s) +/ + + +**** WHICH PARAMETER DO YOU WANT TO CHANGE? +---------------------------------------------------------------------- +0 NO FURTHER CHANGES, CALCULATE PROFILE +1 LATITUDE # 45.1# 7 GEOD.(0) OR GEOM.(1) #0# +2 LONGITUDE #293.1# 8 SELECTION OF VARIABLE #F10.7# +3 ALTITUDE # 300.0# 9 VARIABLE RANGE # 70.0 250.0 30.0# +4 F10.7 #250.0# 10 F10.7M #100.0# +5 DAY #231# 11 ON/OFF FOR PARTICULAR VARIATIONS +6 HOUR (LT) # 12.0# 12 DISPLAY OR STORE + 13 AP # 0.0# +---------------------------------------------------------------------- +ENTER NUMBER +0 + + + + + + + + + + + F10.7 NUMBER DENSITIES/CM-3 MASS DENSITY TEMPERATURE/K + MON O N2 O2 G*CM-3 TN TEXO + 70.0 2.468E+08 4.698E+07 1.715E+06 8.927E-15 800 802 + 100.0 3.837E+08 9.666E+07 3.765E+06 1.505E-14 939 945 + 130.0 5.347E+08 1.599E+08 6.408E+06 2.225E-14 1065 1076 + 160.0 7.018E+08 2.338E+08 9.443E+06 3.043E-14 1177 1195 + 190.0 8.883E+08 3.165E+08 1.271E+07 3.962E-14 1278 1302 + 220.0 1.098E+09 4.066E+08 1.608E+07 4.985E-14 1367 1397 + 250.0 1.334E+09 5.028E+08 1.944E+07 6.122E-14 1446 1480 +-------------------------------------------------------------------------- +LATI/LONG= 45.1/293.1 H= 300.0 F10.7 =250.0 DAY:231 LT:12.0 AP= 0.0 +MLAT/MLON= 56.5/ 3.7 F10.7M=250.0 UT:16.5 +-------------------------------------------------------------------------- + +**** DO YOU WANT TO CONTINUE? +------------------------------------------------------------ +"0" QUIT AND EXIT "1" NEW PARAMETERS +"2" OTHER OUTPUT WINDOW +------------------------------------------------------------ +0 +FORTRAN STOP diff --git a/MSIS/MSIS86/m86tes.dat b/MSIS/MSIS86/m86tes.dat new file mode 100755 index 0000000..59170d0 --- /dev/null +++ b/MSIS/MSIS86/m86tes.dat @@ -0,0 +1,92 @@ + 6.68E+05 1.09E+08 2.07E+07 6.73E+05 4.23E+03 3.98E-15 3.50E+04 3.61E+06 + 1.277E+03 1.270E+03 + 3.76E+02 1.80E-02 4.58E+06 4.38E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.79E+04 1.17E+02 1.50E+02 8.88E+01 1.62E+01 4.95E+00 3.54E+06 7.85E+08 + + 3.36E+06 1.53E+08 1.42E+07 5.58E+05 1.91E+03 4.88E-15 5.23E+04 3.99E+06 + 1.195E+03 1.189E+03 + 3.90E+02 1.80E-02 2.31E+07 7.10E+10 2.85E+11 3.93E+10 1.65E+09 1.73E-11 + 1.40E+05 1.17E+02 1.78E+02 9.39E+01 1.45E+01 4.68E+00 3.92E+06 9.68E+08 + + 7.36E+05 1.14E+08 2.05E+07 6.65E+05 3.86E+03 4.11E-15 3.26E+04 3.47E+06 + 1.274E+03 1.267E+03 + 3.76E+02 1.80E-02 5.05E+06 4.62E+10 3.02E+11 3.24E+10 2.06E+09 1.71E-11 + 9.10E+04 1.17E+02 1.50E+02 8.88E+01 1.62E+01 4.98E+00 3.41E+06 7.59E+08 + + 1.04E+08 3.05E+11 8.47E+12 1.97E+12 9.19E+10 5.12E-10 1.53E+07 4.30E+05 + 1.277E+03 1.802E+02 + 3.76E+02 1.80E-02 4.58E+06 4.38E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.79E+04 1.17E+02 1.50E+02 8.88E+01 1.62E+01 4.95E+00 5.89E+09 7.85E+08 + + 1.86E+06 1.50E+08 1.67E+07 4.55E+05 1.80E+03 4.90E-15 6.16E+04 5.04E+06 + 1.207E+03 1.205E+03 + 3.94E+02 2.12E-02 1.22E+07 5.75E+10 2.41E+11 2.20E+10 9.77E+08 1.40E-11 + 1.63E+05 1.17E+02 1.79E+02 9.52E+01 1.73E+01 4.50E+00 4.95E+06 1.04E+09 + + 8.92E+05 1.27E+08 1.79E+07 4.58E+05 2.72E+03 4.31E-15 3.68E+04 3.30E+06 + 1.229E+03 1.224E+03 + 3.76E+02 1.90E-02 6.15E+06 5.47E+10 3.02E+11 2.63E+10 1.80E+09 1.70E-11 + 1.01E+05 1.17E+02 1.50E+02 8.88E+01 1.62E+01 4.98E+00 3.24E+06 7.59E+08 + + 5.63E+05 6.46E+07 1.18E+07 3.71E+05 1.63E+03 2.31E-15 5.29E+04 8.43E+05 + 1.125E+03 1.123E+03 + 3.72E+02 2.15E-02 3.98E+06 3.41E+10 3.02E+11 3.45E+10 2.01E+09 1.69E-11 + 1.42E+05 1.17E+02 1.50E+02 8.88E+01 1.62E+01 6.19E+00 8.22E+05 2.28E+08 + + 3.54E+05 3.90E+07 4.32E+06 1.28E+05 4.34E+02 1.28E-15 9.07E+04 1.53E+06 + 1.008E+03 1.005E+03 + 3.59E+02 2.00E-02 2.78E+06 3.48E+10 2.93E+11 3.66E+10 2.23E+09 1.66E-11 + 2.41E+05 1.17E+02 1.50E+02 8.74E+01 1.30E+01 5.11E+00 1.50E+06 6.54E+08 + + 6.72E+05 1.18E+08 2.40E+07 8.01E+05 5.32E+03 4.40E-15 3.25E+04 4.85E+06 + 1.332E+03 1.322E+03 + 3.76E+02 1.70E-02 4.60E+06 4.42E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.26E+04 1.17E+02 1.50E+02 8.88E+01 1.62E+01 4.70E+00 4.76E+06 1.00E+09 + + 5.58E+05 1.12E+08 3.83E+07 1.72E+06 1.25E+04 4.91E-15 2.68E+04 3.18E+06 + 1.384E+03 1.373E+03 + 4.20E+02 1.68E-02 3.45E+06 3.11E+10 3.02E+11 4.12E+10 2.77E+09 1.72E-11 + 7.20E+04 1.17E+02 1.50E+02 8.88E+01 1.62E+01 5.30E+00 3.11E+06 4.99E+08 + + + + DAY 172 81 172 172 172 + UT 29000. 29000. 75000. 29000. 29000. + ALT 400. 400. 400. 100. 400. + LAT 60. 60. 60. 60. 0. + LONG -70. -70. -70. -70. -70. + LST 16. 16. 16. 16. 16. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + + TINF 1277.31 1195.09 1273.80 1277.31 1207.30 + TG 1270.08 1188.75 1266.73 180.20 1204.56 + HE 6.676E+05 3.365E+06 7.357E+05 1.035E+08 1.857E+06 + O 1.088E+08 1.534E+08 1.144E+08 3.046E+11 1.497E+08 + N2 2.070E+07 1.421E+07 2.049E+07 8.466E+12 1.667E+07 + O2 6.727E+05 5.584E+05 6.646E+05 1.973E+12 4.546E+05 + AR 4.230E+03 1.905E+03 3.855E+03 9.190E+10 1.799E+03 + H 3.498E+04 5.230E+04 3.255E+04 1.525E+07 6.158E+04 + N 3.609E+06 3.988E+06 3.474E+06 4.298E+05 5.038E+06 + RHO 3.976E-15 4.879E-15 4.111E-15 5.125E-10 4.905E-15 + + + DAY 172 172 172 172 172 + UT 29000. 29000. 29000. 29000. 29000. + ALT 400. 400. 400. 400. 400. + LAT 60. 60. 60. 60. 60. + LONG 0. -70. -70. -70. -70. + LST 16. 4. 16. 16. 16. + F107A 150. 150. 70. 150. 150. + F107 150. 150. 150. 180. 150. + + TINF 1228.82 1125.30 1007.50 1331.63 1384.07 + TG 1223.62 1122.95 1004.51 1321.54 1373.50 + HE 8.923E+05 5.629E+05 3.539E+05 6.725E+05 5.578E+05 + O 1.269E+08 6.462E+07 3.901E+07 1.177E+08 1.116E+08 + N2 1.785E+07 1.183E+07 4.318E+06 2.401E+07 3.832E+07 + O2 4.580E+05 3.714E+05 1.276E+05 8.015E+05 1.718E+06 + AR 2.721E+03 1.633E+03 4.341E+02 5.318E+03 1.249E+04 + H 3.677E+04 5.292E+04 9.069E+04 3.252E+04 2.678E+04 + N 3.301E+06 8.427E+05 1.532E+06 4.852E+06 3.177E+06 + RHO 4.309E-15 2.310E-15 1.282E-15 4.401E-15 4.914E-15 diff --git a/MSIS/MSIS86/m86tes.for b/MSIS/MSIS86/m86tes.for new file mode 100755 index 0000000..3af43af --- /dev/null +++ b/MSIS/MSIS86/m86tes.for @@ -0,0 +1,80 @@ +C TEST DRIVER FOR GTS5 (MSIS86 THERMOSPHERE MODEL) + DIMENSION D(8,10),T(2,10) + DIMENSION IDAY(10),UT(10),ALT(10),XLAT(10),XLONG(10),XLST(10), + $ F107A(10),F107(10),AP(16) + COMMON/UINR/IUMSIS,MONITO,IIEE + COMMON/GTS3C/DL(16) + DATA IDAY/172,81,8*172/ + DATA UT/29000.,29000.,75000.,7*29000./ + DATA ALT/400.,400.,400.,100.,6*400./ + DATA XLAT/4*60.,0.,5*60./ + DATA XLONG/5*-70.,0.,4*-70./ + DATA XLST/6*16.,4.,3*16./ + DATA F107A/7*150.,70.,150.,150./ + DATA F107/8*150.,180.,150./ + DATA AP/9*4.,40.,6*0/ +C + IUMSIS=12 + MONITO=6 + DO 10 I=1,10 + CALL GTS5(IDAY(I),UT(I),ALT(I),XLAT(I),XLONG(I),XLST(I), + $ F107A(I),F107(I),AP(I),48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,8),T(1,I),T(2,I),DL + 10 CONTINUE + WRITE(6,200) (IDAY(I),I=1,5) + WRITE(6,201) (UT(I),I=1,5) + WRITE(6,202) (ALT(I),I=1,5) + WRITE(6,203) (XLAT(I),I=1,5) + WRITE(6,204) (XLONG(I),I=1,5) + WRITE(6,205) (XLST(I),I=1,5) + WRITE(6,206) (F107A(I),I=1,5) + WRITE(6,207) (F107(I),I=1,5) + WRITE(6,210) (T(1,I),I=1,5) + WRITE(6,211) (T(2,I),I=1,5) + WRITE(6,212) (D(1,I),I=1,5) + WRITE(6,213) (D(2,I),I=1,5) + WRITE(6,214) (D(3,I),I=1,5) + WRITE(6,215) (D(4,I),I=1,5) + WRITE(6,216) (D(5,I),I=1,5) + WRITE(6,217) (D(7,I),I=1,5) + WRITE(6,219) (D(8,I),I=1,5) + WRITE(6,218) (D(6,I),I=1,5) + WRITE(6,200) (IDAY(I),I=6,10) + WRITE(6,201) (UT(I),I=6,10) + WRITE(6,202) (ALT(I),I=6,10) + WRITE(6,203) (XLAT(I),I=6,10) + WRITE(6,204) (XLONG(I),I=6,10) + WRITE(6,205) (XLST(I),I=6,10) + WRITE(6,206) (F107A(I),I=6,10) + WRITE(6,207) (F107(I),I=6,10) + WRITE(6,210) (T(1,I),I=6,10) + WRITE(6,211) (T(2,I),I=6,10) + WRITE(6,212) (D(1,I),I=6,10) + WRITE(6,213) (D(2,I),I=6,10) + WRITE(6,214) (D(3,I),I=6,10) + WRITE(6,215) (D(4,I),I=6,10) + WRITE(6,216) (D(5,I),I=6,10) + WRITE(6,217) (D(7,I),I=6,10) + WRITE(6,219) (D(8,I),I=6,10) + WRITE(6,218) (D(6,I),I=6,10) + 100 FORMAT(1X,1P8E9.2/4X,2E10.3/4X,8E9.2/4X,8E9.2/) + 200 FORMAT(//' DAY ',5I12) + 201 FORMAT(' UT ',5F12.0) + 202 FORMAT(' ALT ',5F12.0) + 203 FORMAT(' LAT ',5F12.0) + 204 FORMAT(' LONG ',5F12.0) + 205 FORMAT(' LST ',5F12.0) + 206 FORMAT(' F107A',5F12.0) + 207 FORMAT(' F107 ',5F12.0) + 210 FORMAT(/' TINF ',5F12.2) + 211 FORMAT(' TG ',5F12.2) + 212 FORMAT(' HE ',1P5E12.3) + 213 FORMAT(' O ',1P5E12.3) + 214 FORMAT(' N2 ',1P5E12.3) + 215 FORMAT(' O2 ',1P5E12.3) + 216 FORMAT(' AR ',1P5E12.3) + 217 FORMAT(' H ',1P5E12.3) + 219 FORMAT(' N ',1P5E12.3) + 218 FORMAT(' RHO ',1P5E12.3) + STOP + END diff --git a/MSIS/MSIS86/msis86.dat b/MSIS/MSIS86/msis86.dat new file mode 100755 index 0000000..e2d7494 --- /dev/null +++ b/MSIS/MSIS86/msis86.dat @@ -0,0 +1,293 @@ + 0.996040E+00 0.385528E-01 0.303445E-02-0.105531E+00-0.607134E-02 + -0.516278E-03-0.115622E+00 0.202240E-02 0.990156E-02-0.127371E+00 + -0.302449E-01 0.123512E-01-0.526277E-02-0.845398E+01 0.000000E+00 + 0.142370E-01 0.000000E+00 0.125818E+03 0.805486E-02 0.164419E-02 + -0.621452E-05 0.311701E-02 0.000000E+00 0.386578E-02 0.132397E+00 + 0.213315E+00 0.000000E+00 0.000000E+00 0.000000E+00-0.641110E-05 + 0.000000E+00 0.300150E+02 0.533297E-02 0.389146E-02 0.204725E-02 + 0.000000E+00 0.000000E+00-0.192645E-01 0.275905E+01 0.147284E-02 + 0.341345E-03-0.117388E-02-0.354589E-03 0.113139E+00 0.169134E+00 + 0.508295E-02 0.365016E-04 0.426385E-02 0.115102E-03 0.511819E-02 + 0.609108E-02 0.404995E-04 0.153049E-02 0.241470E-04 0.230764E-02 + 0.155267E-02 0.133722E-02-0.182318E-02-0.263007E+03 0.000000E+00 + 0.137337E-02 0.995774E-03 0.000000E+00-0.108983E+03 0.562606E-02 + 0.594053E-02 0.109358E-02 0.000000E+00-0.133410E-01-0.243409E-01 + -0.135688E-01 0.311370E+05 0.000000E+00 0.000000E+00 0.000000E+00 + -0.283023E+04 0.845583E-03 0.538706E-03 0.000000E+00 0.247956E+03 + 0.292246E-02 0.000000E+00 0.000000E+00 0.747703E-04 0.887993E-03 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + -0.116540E-01-0.449173E-02-0.353189E-03-0.173933E-03-0.153218E-03 + -0.565411E+00 0.777272E-02-0.911784E+02 0.645187E-03 0.000000E+00 + -0.837685E-03 0.242318E-02 0.473796E-02-0.301801E-02-0.423564E-02 + -0.248289E-02 0.919286E-03 0.216372E-02 0.863968E-03 0.189689E-02 + 0.415654E-02 0.000000E+00 0.118068E-01 0.331190E-02 0.000000E+00 + 0.120222E-02 0.000000E+00 0.000000E+00-0.307246E+01 0.000000E+00 + 0.000000E+00 0.672403E-03 0.108930E-02 0.972278E-03 0.468242E+01 + -0.315034E-03 0.400059E-02 0.515036E-02 0.162989E-02 0.108824E-02 + 0.995261E-03 0.418955E+01-0.364059E+00 0.170182E-02 0.000000E+00 + 0.000000E+00-0.320120E+01 0.000000E+00 0.580206E-02 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.104934E+01-0.288362E-01-0.207095E+00-0.103314E+00-0.702373E-02 + 0.129664E-01 0.408853E+00-0.919895E-02-0.188660E-01 0.140927E+01 + 0.175033E+00 0.187351E-01 0.110979E+00-0.742871E+01 0.000000E+00 + 0.267143E+00-0.595979E-01 0.105038E+03-0.840963E-01-0.697632E-03 + 0.206521E-05 0.765306E-03 0.000000E+00 0.000000E+00 0.126762E+00 + 0.128876E+00-0.504479E-01-0.130735E-01-0.224348E-01 0.000000E+00 + 0.000000E+00-0.150832E+03-0.629928E-02 0.000000E+00-0.407760E-02 + 0.000000E+00 0.000000E+00 0.525725E-01-0.311486E+02-0.313351E-02 + 0.275838E-02 0.000000E+00 0.000000E+00 0.111247E+00 0.108815E+00 + -0.466713E-01 0.000000E+00-0.329329E-02 0.000000E+00 0.167838E-02 + -0.916691E-02 0.345044E-04-0.971806E-02 0.000000E+00-0.204672E-02 + -0.786899E-02-0.798285E-02 0.536515E-02-0.531172E+04 0.000000E+00 + -0.642781E-02-0.171690E-02 0.000000E+00-0.679131E+02-0.179912E-01 + -0.158305E-01-0.712313E-02 0.000000E+00 0.253477E-01 0.852960E-01 + 0.102163E+00 0.295009E+05 0.000000E+00 0.000000E+00 0.000000E+00 + -0.684625E+04-0.619098E-02-0.269289E-02 0.000000E+00-0.520231E+03 + -0.633463E-02 0.000000E+00 0.000000E+00-0.602428E-02-0.407077E-02 + 0.542264E-02 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.407560E-01 0.282288E-01 0.908088E-02 0.000000E+00 0.000000E+00 + -0.405204E+00-0.597931E-01-0.731823E+02-0.206620E-02 0.000000E+00 + -0.372723E-02-0.188146E-01-0.101794E-01 0.804633E-02 0.101090E-01 + 0.873253E-02 0.238268E-01 0.480444E-02 0.171088E-02 0.396369E-01 + -0.213809E-01 0.000000E+00-0.102588E+00-0.591702E-02 0.000000E+00 + 0.270923E-02 0.000000E+00 0.000000E+00-0.175043E+03 0.603489E+00 + -0.617589E+00 0.838098E-02 0.183871E-02-0.705329E-03-0.406644E+01 + -0.509347E-02-0.284344E-01-0.124160E-01 0.133665E-01 0.393410E-02 + -0.503723E-03-0.457683E+01-0.529542E+00-0.425812E-02 0.000000E+00 + 0.000000E+00 0.191541E+02 0.000000E+00 0.323247E-02 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.931113E+00-0.138721E+00-0.133457E+00-0.529542E-01-0.444983E-02 + 0.135264E-01 0.598075E-01-0.362880E-01-0.312798E-01 0.372068E+00 + 0.295974E-01 0.120509E-01 0.521995E-01-0.778888E+01 0.000000E+00 + 0.118634E+00-0.204495E-01 0.103280E+03 0.982432E-01 0.477694E-03 + 0.000000E+00 0.274372E-02 0.000000E+00 0.000000E+00 0.757809E-01 + 0.171403E+00-0.105205E-01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00-0.873348E+01-0.581094E-02 0.000000E+00-0.814944E-02 + 0.000000E+00 0.000000E+00 0.517255E-01-0.153028E+02-0.348932E-02 + 0.961771E-03 0.557732E-02-0.454180E-03 0.988213E-01 0.940456E-01 + -0.318797E-01 0.000000E+00 0.000000E+00 0.000000E+00 0.232122E-02 + -0.600220E-02 0.277654E-04-0.322019E-02 0.000000E+00-0.378551E-02 + -0.334809E-02-0.170668E-02 0.000000E+00 0.636184E+04 0.000000E+00 + 0.159986E-02-0.388204E-02-0.164825E-02-0.747955E+02-0.105360E-01 + -0.945723E-02-0.159824E-02-0.706730E-03-0.168513E-01-0.113023E+00 + -0.636637E-01-0.137709E+05 0.000000E+00 0.000000E+00 0.000000E+00 + -0.152368E+05-0.586061E-02-0.253108E-02 0.000000E+00-0.254837E+04 + -0.328988E-02 0.000000E+00 0.000000E+00-0.276364E-02 0.967923E-02 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.434255E-01 0.114020E-01-0.618447E-02 0.000000E+00 0.000000E+00 + -0.302568E+00-0.327694E-01-0.671589E+02-0.228340E-02 0.000000E+00 + 0.306230E-02-0.465113E-02-0.973421E-02 0.128326E-01 0.788553E-02 + 0.797197E-02-0.120760E-01-0.767547E-02-0.120755E-02-0.298523E-01 + -0.126560E-01 0.000000E+00-0.568350E-01-0.153039E-01 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.242911E-02-0.401347E-02-0.219074E-02 0.311281E+01 + 0.323251E-02-0.639523E-02-0.663069E-02-0.304403E-03-0.401920E-02 + -0.118708E-02 0.415211E+01-0.201896E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.106903E+01 0.377113E-03 0.000000E+00 0.000000E+00 0.000000E+00 + 0.898481E-01-0.236325E+02 0.208180E-01 0.139638E+03-0.119444E+00 + -0.845398E+01-0.399776E-05 0.000000E+00 0.366210E-02-0.178929E-02 + 0.190412E-01-0.392257E-01 0.632343E-02 0.548144E-02 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00-0.243022E-02 + 0.976619E+00 0.568478E-03 0.582026E-02 0.000000E+00 0.621998E-02 + 0.000000E+00 0.000000E+00 0.107674E-01 0.893820E+02-0.192414E-01 + -0.845398E+01 0.000000E+00 0.000000E+00-0.200200E-01-0.195833E-02 + -0.938391E-02 0.131480E-01-0.260147E-02-0.808556E-03 0.511651E-04 + 0.255717E-02 0.000000E+00 0.466814E-02 0.664196E-02 0.000000E+00 + 0.998594E+00 0.190038E-03 0.000000E+00-0.243825E-01 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.522105E-01 + -0.845398E+01 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.767271E-02 0.564539E-02-0.270623E-02-0.526454E-03 0.137075E-02 + 0.133060E-02 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.949197E+00 0.000000E+00 0.000000E+00-0.768008E-01 0.000000E+00 + 0.000000E+00 0.000000E+00-0.137993E-01-0.140136E+01 0.120481E+00 + -0.845398E+01 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.987746E-02 0.175330E-02-0.688835E-03 0.287022E-02 0.000000E+00 + 0.000000E+00 0.744513E-01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.152840E+00 0.000000E+00 0.000000E+00 0.116252E+01 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00-0.649190E+00 + -0.845398E+01 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + -0.584949E-01-0.102105E+00 0.299153E-01-0.486227E-01 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.931402E+00 0.137976E+00 0.000000E+00 0.323736E-03 0.000000E+00 + -0.910906E-02 0.707506E-01 0.000000E+00-0.516650E-01 0.689755E-01 + 0.000000E+00 0.000000E+00 0.000000E+00-0.845398E+01 0.000000E+00 + 0.281140E-01 0.000000E+00 0.736009E+02 0.596604E-01 0.000000E+00 + 0.000000E+00-0.151792E-02 0.000000E+00 0.000000E+00 0.132397E+00 + 0.213315E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.948758E+01 0.884541E-02 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.113139E+00 0.169134E+00 + 0.145192E-01 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.107906E-01 0.299942E-04 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00-0.148930E-01 + -0.787184E-02 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + -0.683420E-01-0.441778E-01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.229730E-01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.868053E+00 0.236364E+00 0.134306E+00 0.103086E-01 0.000000E+00 + -0.379164E-02-0.157806E+00 0.000000E+00-0.587644E-01-0.312508E+00 + 0.000000E+00 0.437387E-01-0.354091E-01-0.223636E+02 0.000000E+00 + -0.533976E-01 0.000000E+00 0.114091E+03 0.517497E-01 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.132397E+00 + 0.213315E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.342702E+03 0.157033E-01 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00-0.366278E-02 + -0.116193E-02 0.000000E+00 0.000000E+00 0.113139E+00 0.169134E+00 + 0.178431E-01 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.162864E-01 0.316963E-04 0.127968E-01 0.000000E+00 0.000000E+00 + -0.704599E-02 0.207921E-02 0.636660E-02 0.229940E+05 0.000000E+00 + 0.127833E-01-0.208036E-02-0.461820E-02-0.629391E+02-0.120745E-01 + 0.136675E-01 0.136011E-01-0.537162E-02 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.192509E+05 0.835522E-02 0.419439E-02 0.000000E+00 0.120366E+05 + 0.000000E+00 0.000000E+00 0.000000E+00-0.100034E-01-0.233267E-02 + 0.972374E-02 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + -0.265079E-01-0.209125E-01-0.109465E-01 0.000000E+00 0.000000E+00 + 0.000000E+00 0.217252E-01-0.712385E+02-0.189428E-02 0.000000E+00 + -0.602006E-02 0.169058E-01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.290646E-01 + 0.348971E-02 0.000000E+00 0.501174E-01 0.550595E-01 0.000000E+00 + -0.955897E-02 0.000000E+00 0.000000E+00-0.151693E+04 0.000000E+00 + 0.000000E+00 0.129306E-01 0.269567E-02 0.000000E+00 0.392243E+01 + -0.847690E-02 0.116896E-01 0.000000E+00 0.148967E-01 0.544521E-02 + 0.000000E+00 0.564918E+01 0.000000E+00-0.772178E-02 0.000000E+00 + 0.000000E+00-0.734042E+02 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.127515E+01-0.210472E+00-0.177924E+00 0.218900E+00 0.288436E-01 + 0.190077E-01 0.291001E+00 0.217437E-01-0.105186E-01 0.436141E+00 + 0.107605E+00 0.330755E-01 0.400581E-01-0.958051E+01 0.000000E+00 + 0.154028E-01 0.000000E+00 0.734194E+02 0.496540E-01-0.595906E-02 + 0.384512E-04-0.136000E-01 0.000000E+00 0.000000E+00 0.132397E+00 + 0.213315E+00-0.416610E-01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.146276E+03-0.198408E-01 0.000000E+00 0.132530E-01 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00-0.104687E-03 + -0.147562E-02 0.000000E+00 0.000000E+00 0.113139E+00 0.169134E+00 + -0.126913E-01 0.000000E+00 0.000000E+00 0.000000E+00-0.608370E-02 + -0.257587E-01 0.319022E-04 0.000000E+00 0.000000E+00 0.156644E-01 + 0.103640E-01 0.105771E-02 0.000000E+00 0.357949E+04 0.000000E+00 + -0.125672E-02 0.152783E-02 0.130518E-02 0.755558E+01-0.920341E-02 + -0.209142E-01-0.134106E-01 0.000000E+00-0.483312E-01 0.830900E-01 + 0.988009E-01-0.141148E+05 0.000000E+00 0.000000E+00 0.000000E+00 + -0.105513E+04 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.673442E-02 0.201691E-02 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.598019E-01 0.633298E-02-0.112871E-02 0.000000E+00 0.000000E+00 + 0.000000E+00-0.128604E-01 0.000000E+00 0.000000E+00 0.000000E+00 + -0.494960E-02-0.136415E-01-0.115039E-01 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00-0.586860E-02-0.141732E-02 0.213697E-02 0.263845E+01 + -0.834186E-02-0.187336E-01-0.190870E-01-0.803810E-02-0.284279E-02 + 0.256722E-02 0.171429E+01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.573587E+02-0.398747E+00 0.000000E+00-0.529554E+00-0.582186E-02 + 0.714177E-01-0.679279E+00-0.167715E+00-0.642434E-01-0.211569E+00 + -0.159922E+00-0.171024E-03-0.115885E+00 0.651603E+01 0.000000E+00 + -0.176683E+00 0.650395E-01 0.143504E+01 0.928208E-01 0.511662E-02 + 0.000000E+00 0.995121E-02 0.000000E+00 0.000000E+00 0.132397E+00 + 0.213315E+00 0.101451E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.567667E+02 0.238192E-02 0.000000E+00-0.188240E-01 + 0.000000E+00 0.000000E+00 0.476218E-01 0.235206E+02 0.475901E-02 + 0.576162E-02 0.151815E-01-0.192730E-01 0.113139E+00 0.169134E+00 + -0.288771E-01 0.000000E+00 0.000000E+00 0.000000E+00 0.118418E-02 + -0.368927E-02 0.314704E-04 0.882198E-02 0.000000E+00-0.192562E-01 + -0.258674E-02-0.219913E-01 0.000000E+00 0.438655E+04 0.000000E+00 + 0.760126E-02 0.259438E-02 0.172310E-02 0.779204E+02 0.797786E-03 + -0.770510E-02 0.190982E-02 0.272707E-02 0.101016E-01 0.116537E+00 + -0.312236E-02 0.139783E+05 0.000000E+00 0.000000E+00 0.000000E+00 + -0.130712E+04 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00-0.320544E-02-0.206970E-01 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.159010E-01-0.191427E-02-0.342829E-01 0.000000E+00 0.000000E+00 + 0.000000E+00-0.345379E-01 0.894518E+02 0.171556E-02 0.000000E+00 + -0.765278E-02-0.208987E-03-0.157393E-01 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00-0.860673E-02-0.119922E-01-0.646356E-02-0.300107E+01 + -0.932511E-02-0.150205E-01-0.867835E-02-0.764801E-02-0.131495E-01 + -0.676720E-02-0.182396E+01 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.951363E+00-0.467542E-01 0.120260E+00 0.000000E+00 0.000000E+00 + 0.191357E-01 0.000000E+00 0.000000E+00 0.125429E-02-0.133240E+00 + 0.000000E+00 0.000000E+00 0.000000E+00-0.845398E+01 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.252317E-02 0.000000E+00-0.973404E-02 0.132397E+00 + 0.213315E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00-0.718482E-03 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.787683E-02-0.233698E-02 0.113139E+00 0.169134E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.933804E+00 0.547446E+01 0.153263E+00 0.919303E+00 0.164109E+02 + 0.427083E+01 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 0.000000E+00 + 0.115897E+01 0.471094E+00 0.109459E+01 0.525012E+01 0.100000E+01 + 0.100000E+01 0.103999E+01 0.767132E+00 0.110514E+01 0.175636E+01 + 0.110845E+01 0.233439E+01 0.796532E+00 0.431520E+01 0.407300E+01 + 0.101885E+01 0.239547E+00 0.253791E-05 0.842931E+00 0.104192E+01 + 0.200202E+01 0.100000E+01 0.100000E+01 0.100000E+01 0.100000E+01 + 0.104130E+04 0.386000E+03 0.190000E+03 0.166728E+02 0.115000E+03 + 0.120000E+03 0.945537E+02 0.000000E+00 0.245600E+08 0.671072E-05 + 0.100000E+03 0.000000E+00 0.110000E+03 0.100000E+02 0.000000E+00 + 0.000000E+00 0.859400E+11 0.540000E+00 0.105000E+03-0.800000E+01 + 0.110000E+03 0.100000E+02 0.900000E+02 0.200000E+01 0.281000E+12 + 0.000000E+00 0.105000E+03 0.280000E+02 0.289500E+02 0.000000E+00 + 0.000000E+00 0.000000E+00 0.330000E+11 0.268270E+00 0.105000E+03 + 0.000000E+00 0.110000E+03 0.100000E+02 0.000000E+00 0.000000E+00 + 0.133000E+10 0.119615E-01 0.105000E+03 0.000000E+00 0.110000E+03 + 0.100000E+02 0.000000E+00 0.000000E+00 0.176100E+06 0.100000E+01 + 0.950000E+02-0.800000E+01 0.110000E+03 0.100000E+02 0.900000E+02 + 0.200000E+01 0.100000E+08 0.100000E+01 0.105000E+03-0.800000E+01 + 0.110000E+03 0.100000E+02 0.900000E+02 0.200000E+01 diff --git a/MSIS/MSIS86/msis86.for b/MSIS/MSIS86/msis86.for new file mode 100755 index 0000000..8d703c2 --- /dev/null +++ b/MSIS/MSIS86/msis86.for @@ -0,0 +1,835 @@ +C MSIS86.FOR D. BILITZA 10/88 +C +C!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! +C SUBROUTINES AND FUNCTIONS: +C GTS5, DENSS, GLOBE5, TSELEC, GLOB5L, DNET, CCOR, PRMSG5,GGM +C!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! +C +C +C*********************************************************************** + SUBROUTINE GTS5(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS,D,T) +C MSIS-86/CIRA 1986 Neutral Thermosphere Model +C A.E.Hedin 3/15/85;2/26/87 (Variable Names Shortened) +C 10/14/87 increase altitude limit of O mixing calculation +C ALTL(2) from 300.0 to 400.0 km . +C INPUT: +C IYD - YEAR AND DAY AS YYYYDDD +C SEC - UT(SEC) +C ALT - ALTITUDE(KM) (GREATER THAN 85 KM) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS) +C F107A - 3 MONTH AVERAGE OF F10.7 FLUX +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 59 HRS PRIOR +C TO CURRENT TIME +C MASS - MASS NUMBER (ONLY DENSITY FOR SELECTED GAS IS +C CALCULATED. MASS 0 IS TEMPERATURE. MASS 48 FOR ALL. +C OUTPUT: +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C +C TO GET OUTPUT IN M-3 and KG/M3: CALL METERS(.TRUE.) +C +C ADDITIONAL COMMENTS +C (1) LOWER BOUND QUANTITIES IN COMMON/GTS3C/ +C (2) TO TURN ON AND OFF PARTICULAR VARIATIONS CALL TSELEC(SW) +C WHERE SW IS A 25 ELEMENT ARRAY CONTAINING 0. FOR OFF, 1. +C FOR ON, OR 2. FOR MAIN EFFECTS OFF BUT CROSS TERMS ON +C FOR THE FOLLOWING VARIATIONS +C 1 - F10.7 EFFECT ON MEAN 2 - TIME INDEPENDENT +C 3 - SYMMETRICAL ANNUAL 4 - SYMMETRICAL SEMIANNUAL +C 5 - ASYMMETRICAL ANNUAL 6 - ASYMMETRICAL SEMIANNUAL +C 7 - DIURNAL 8 - SEMIDIURNAL +C 9 - DAILY AP 10 - ALL UT/LONG EFFECTS +C 11 - LONGITUDINAL 12 - UT AND MIXED UT/LONG +C 13 - MIXED AP/UT/LONG 14 - TERDIURNAL +C 15 - DEPARTURES FROM DIFFUSIVE EQUILIBRIUM +C 16 - ALL TINF VAR 17 - ALL TLB VAR +C 18 - ALL T0 VAR 19 - ALL S VAR +C 20 - ALL Z0 VAR 21 - ALL NLB VAR +C 22 - ALL TR12 VAR 23 - TURBO SCALE HEIGHT VAR +C +C To get current values of SW: CALL TRETRV(SW) +C +C !!!!!!!!!!!!!!!!!!!!!!!!!!! CHANGES !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! +C +C - NAME,ISD,IST,ISDATE, and ISTIME were changed to character variables +C in GTS5 and PRMSG5 +C +C - The variable dimension of P and AP in GLOBE5 and GLOBE5L was +C indicted by *, rather than 1; if this does not work on your system +C you may want to use P(150) and AP(7). +C +C - The large data statement in PRMSG5 is now read in from file +C MSIS86.DAT; some compilers do not allow named commons to be +C initialized in a data statement. +C +C - The first call to GLOBE5 should come before the common array SW(25) +C is used in GTS5. +C +C Dieter Bilitza !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! March 87 +C ********************************************************************** + LOGICAL METER + DIMENSION D(8),T(2),MT(10),AP(7),ALTL(8) + CHARACTER NAME(2)*4 + COMMON/UINR/IUMSIS,MONITO,IIEE + COMMON/GTS3C/TLB,S,DB04,DB16,DB28,DB32,DB40,DB48,DB01,ZA,T0,Z0 + $ ,G0,RL,DD,DB14 + COMMON/LOWER5/PTM(8),PDM(8,7) + COMMON/PARM5/PT(150),PD(150,7),PS(150),PDL(25,2) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/TTEST/TINFG,GB,ROUT,TT(15) + COMMON/DATIME/ISDATE(3),ISTIME(2),NAME + DATA MT/48,0,4,16,28,32,40,1,49,14/,IFL/0/ + DATA ALTL/200.,400.,150.,200.,240.,450.,320.,450./ + DATA IMR/0/ +c + IF(IFL.EQ.0) THEN + CALL PRMSG5 + IF(IIEE.GT.0) GOTO 9999 + IFL=1 + ENDIF + YRD=IYD +C Eq. A7 +C!!OLD!! TINF=PTM(1)*(1.+SW(16)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107, +C!!OLD!!$ AP,PT))*PT(1) + GGGG=GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PT) + TINF=PTM(1)*(1.+SW(16)*GGGG)*PT(1) + ZA=PTM(5)*PDL(16,2) +C Eq. A9 + T0=PTM(3)*PD(76,3)*(1.+SW(18)*GLOB5L(PD(76,3))) +C Eq. A8 + TLB=PTM(2)*(1.+SW(17)*GLOB5L(PD(26,3)))*PD(26,3) +C Eq. A10 + Z0=PTM(7)*(1.+SW(20)*GLOB5L(PD(51,3)))*PD(51,3) +C Eq. A6 + G0=PTM(4)*PS(1) + $ *(1.+SW(19)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107, + $ AP,PS)) +C Eq. A5 + S=G0/(TINF-TLB) +C Eq. A11 + TR12=PD(101,3)*(1.+SW(22)*GLOB5L(PD(101,3))) + T(1)=TINF + IF(MASS.EQ.0) GO TO 50 +C Eq. A18 N2 + G28=SW(21)*GLOB5L(PD(1,3)) + YRD=IYD + T(1)=TINF + XMM=PDM(5,3) + DO 10 J = 1,10 + IF(MASS.EQ.MT(J)) GO TO 15 + 10 CONTINUE + WRITE(6,100) MASS + GO TO 90 + 15 IF(ALT.GT.ALTL(6).AND.MASS.NE.28.AND.MASS.NE.48) GO TO 17 +C +C **** N2 DENSITY **** +C +C Eq. A18 + DB28 = PDM(1,3)*EXP(G28)*PD(1,3) +C Eq. A13 - A17 + D(3)=DENSS(ALT,DB28,TINF,TLB, 28.,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) + DD=D(3) +C Eq. A19 + ZH28=PDM(3,3) + ZHM28=PDM(4,3)*PDL(6,2) + XMD=28.-XMM + B28=DENSS(ZH28,DB28,TINF,TLB,XMD,-1.,TZ,PTM(6),S,T0,ZA,Z0,TR12) + IF(ALT.GT.ALTL(3).OR.SW(15).EQ.0.) GO TO 17 + DM28=DENSS(ALT,B28,TINF,TLB,XMM,0.,TZ,PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + D(3)=DNET(D(3),DM28,ZHM28,XMM,28.) + 17 CONTINUE + GO TO (20,50,20,25,90,35,40,45,25,48), J + 20 CONTINUE +C +C **** HE DENSITY **** +C +C Eq. A18 + G4 = SW(21)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,1)) + DB04 = PDM(1,1)*EXP(G4)*PD(1,1) +C Eq. A13 - A17 + D(1)=DENSS(ALT,DB04,TINF,TLB, 4.,-.4,T(2),PTM(6),S,T0,ZA,Z0,TR12) + DD=D(1) + IF(ALT.GT.ALTL(1).OR.SW(15).EQ.0.) GO TO 24 +C Eq. A19 + ZH04=PDM(3,1) + B04=DENSS(ZH04,DB04,TINF,TLB,4.-XMM,-1.4, + $ T(2),PTM(6),S,T0,ZA,Z0,TR12) + DM04=DENSS(ALT,B04,TINF,TLB,XMM,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + ZHM04=ZHM28 + D(1)=DNET(D(1),DM04,ZHM04,XMM,4.) +C Eq. A20b + RL=ALOG(B28*PDM(2,1)/B04) +C Eq. A20a + ZC04=PDM(5,1)*PDL(1,2) + HC04=PDM(6,1)*PDL(2,2) + D(1)=D(1)*CCOR(ALT,RL,HC04,ZC04) + 24 CONTINUE + IF(MASS.NE.48) GO TO 90 + 25 CONTINUE +C +C **** O DENSITY **** +C +C Eq. A18 + G16= SW(21)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,2)) + DB16 = PDM(1,2)*EXP(G16)*PD(1,2) +C Eq. A13 - A17 + D(2)=DENSS(ALT,DB16,TINF,TLB, 16.,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) + DD=D(2) + IF(ALT.GT.ALTL(2).OR.SW(15).EQ.0.) GO TO 34 +C Corrected from PDM(3,1) to PDM(3,2) 12/2/85 +C Eq. A19 + ZH16=PDM(3,2) + B16=DENSS(ZH16,DB16,TINF,TLB,16-XMM,-1., + $ T(2),PTM(6),S,T0,ZA,Z0,TR12) + DM16=DENSS(ALT,B16,TINF,TLB,XMM,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + ZHM16=ZHM28 + D(2)=DNET(D(2),DM16,ZHM16,XMM,16.) +C Eq. A20b + RL=ALOG(B28*PDM(2,2)*ABS(PDL(17,2))/B16) +C Eq. A20a + HC16=PDM(6,2)*PDL(4,2) + ZC16=PDM(5,2)*PDL(3,2) + D(2)=D(2)*CCOR(ALT,RL,HC16,ZC16) +C Eq. A21 + HCC16=PDM(8,2)*PDL(14,2) + ZCC16=PDM(7,2)*PDL(13,2) + RC16=PDM(4,2)*PDL(15,2) + D(2)=D(2)*CCOR(ALT,RC16,HCC16,ZCC16) + 34 CONTINUE + IF(MASS.NE.48 .AND. MASS.NE.49) GO TO 90 + 35 CONTINUE +C +C **** O2 DENSITY **** +C +C Eq. A18 + G32= SW(21)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,4)) + DB32 = PDM(1,4)*EXP(G32)*PD(1,4) +C Eq. A13 - A17 + D(4)=DENSS(ALT,DB32,TINF,TLB, 32.,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) + IF(MASS.EQ.49) THEN + DD=DD+2.*D(4) + ELSE + DD=D(4) + ENDIF + IF(ALT.GT.ALTL(4).OR.SW(15).EQ.0.) GO TO 39 +C Eq. A19 + ZH32=PDM(3,4) + B32=DENSS(ZH32,DB32,TINF,TLB,32.-XMM,-1., + $ T(2),PTM(6),S,T0,ZA,Z0,TR12) + DM32=DENSS(ALT,B32,TINF,TLB,XMM,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + ZHM32=ZHM28 + D(4)=DNET(D(4),DM32,ZHM32,XMM,32.) +C Eq. A20b + RL=ALOG(B28*PDM(2,4)/B32) +C Eq. A20a + HC32=PDM(6,4)*PDL(8,2) + ZC32=PDM(5,4)*PDL(7,2) + D(4)=D(4)*CCOR(ALT,RL,HC32,ZC32) + 39 CONTINUE + IF(MASS.NE.48) GO TO 90 + 40 CONTINUE +C +C **** AR DENSITY **** +C +C Eq. A18 + G40= SW(21)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,5)) + DB40 = PDM(1,5)*EXP(G40)*PD(1,5) +C Eq. A13 - A17 + D(5)=DENSS(ALT,DB40,TINF,TLB, 40.,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) + DD=D(5) + IF(ALT.GT.ALTL(5).OR.SW(15).EQ.0.) GO TO 44 +C Eq. A19 + ZH40=PDM(3,5) + B40=DENSS(ZH40,DB40,TINF,TLB,40.-XMM,-1., + $ T(2),PTM(6),S,T0,ZA,Z0,TR12) + DM40=DENSS(ALT,B40,TINF,TLB,XMM,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + ZHM40=ZHM28 + D(5)=DNET(D(5),DM40,ZHM40,XMM,40.) +C Eq. A20b + RL=ALOG(B28*PDM(2,5)/B40) +C Eq. A20a + HC40=PDM(6,5)*PDL(10,2) + ZC40=PDM(5,5)*PDL(9,2) + D(5)=D(5)*CCOR(ALT,RL,HC40,ZC40) + 44 CONTINUE + IF(MASS.NE.48) GO TO 90 + 45 CONTINUE +C +C **** HYDROGEN DENSITY **** +C +C Eq. A18 + G1 = SW(21)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,6)) + DB01 = PDM(1,6)*EXP(G1)*PD(1,6) +C Eq. A13 - A17 + D(7)=DENSS(ALT,DB01,TINF,TLB,1.,-.4,T(2),PTM(6),S,T0,ZA,Z0,TR12) + DD=D(7) + IF(ALT.GT.ALTL(7).OR.SW(15).EQ.0.) GO TO 47 +C Eq. A19 + ZH01=PDM(3,6) + B01=DENSS(ZH01,DB01,TINF,TLB,1.-XMM,-1.4, + $ T(2),PTM(6),S,T0,ZA,Z0,TR12) + DM01=DENSS(ALT,B01,TINF,TLB,XMM,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + ZHM01=ZHM28 + D(7)=DNET(D(7),DM01,ZHM01,XMM,1.) +C Eq. A20b + RL=ALOG(B28*PDM(2,6)*ABS(PDL(18,2))/B01) +C Eq. A20a + HC01=PDM(6,6)*PDL(12,2) + ZC01=PDM(5,6)*PDL(11,2) + D(7)=D(7)*CCOR(ALT,RL,HC01,ZC01) +C Eq. A21 + HCC01=PDM(8,6)*PDL(20,2) + ZCC01=PDM(7,6)*PDL(19,2) + RC01=PDM(4,6)*PDL(21,2) + D(7)=D(7)*CCOR(ALT,RC01,HCC01,ZCC01) + 47 CONTINUE + 48 CONTINUE +C +C **** ATOMIC NITROGEN DENSITY **** +C +C Eq. A18 + G14 = SW(21)*GLOBE5(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,7)) + DB14 = PDM(1,7)*EXP(G14)*PD(1,7) +C Eq. A13 - A17 + D(8)=DENSS(ALT,DB14,TINF,TLB,14.,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) + DD=D(8) + IF(ALT.GT.ALTL(8).OR.SW(15).EQ.0.) GO TO 49 +C Eq. A19 + ZH14=PDM(3,7) + B14=DENSS(ZH14,DB14,TINF,TLB,14.-XMM,-1., + $ T(2),PTM(6),S,T0,ZA,Z0,TR12) + DM14=DENSS(ALT,B14,TINF,TLB,XMM,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) +C Eq. A12 + ZHM14=ZHM28 + D(8)=DNET(D(8),DM14,ZHM14,XMM,14.) +C Eq. A20b + RL=ALOG(B28*PDM(2,7)*ABS(PDL(3,1))/B14) +C Eq. A20a + HC14=PDM(6,7)*PDL(2,1) + ZC14=PDM(5,7)*PDL(1,1) + D(8)=D(8)*CCOR(ALT,RL,HC14,ZC14) +C Eq. A21 + HCC14=PDM(8,7)*PDL(5,1) + ZCC14=PDM(7,7)*PDL(4,1) + RC14=PDM(4,7)*PDL(6,1) + D(8)=D(8)*CCOR(ALT,RC14,HCC14,ZCC14) + 49 CONTINUE + IF(MASS.NE.48) GO TO 90 +C +C TOTAL MASS DENSITY +C + D(6) = 1.66E-24*(4.*D(1)+16.*D(2)+28.*D(3)+32.*D(4)+40.*D(5)+ + $ D(7)+14.*D(8)) + DB48=1.66E-24*(4.*DB04+16.*DB16+28.*DB28+32.*DB32+40.*DB40+DB01+ + $ 14.*DB14) + GO TO 90 + 50 DDUM = DENSS(ALT,1., TINF,TLB,0.,0.,T(2),PTM(6),S,T0,ZA,Z0,TR12) + GO TO 90 + 90 CONTINUE + IF(IMR.EQ.1) THEN + DO 95 I=1,8 + D(I)=D(I)*1.E6 + 95 CONTINUE + D(6)=D(6)/1000. + ENDIF + RETURN + 100 FORMAT(1X,'MASS', I5, ' NOT VALID') + ENTRY METERS(METER) + IMR=0 + IF(METER) IMR=1 +9999 CONTINUE + END +C-------------------------------------------------------------------- + FUNCTION DENSS(ALT,DLB,TINF,TLB,XM,ALPHA,TZ,ZLB,S2,T0,ZA,Z0,TR12) +C Calculate Temperature and Density Profiles for MSIS models + COMMON/PARMB/GSURF,RE + COMMON/FIT/TAF + COMMON/LSQV/MP,II,JG,LT,QPB(50),IERR,IFUN,N,J,DV(60) + DATA RGAS/831.4/ + ZETA(ZZ,ZL)=(ZZ-ZL)*(RE+ZL)/(RE+ZZ) + DENSS=1. + Z=AMAX1(ALT,ZA) +C Eq. A4a + ZG2=ZETA(Z,ZLB) +C Eq. A1a + TT=TINF-(TINF-TLB)*EXP(-S2*ZG2) + TA=TT + TZ=TT + DENSS=TZ + IF(ALT.GE.ZA) GO TO 10 +C Eq. A4b + ZG0=ZETA(Z0,ZA) +C Eq. A2b + DTA=(TINF-TA)*S2*((RE+ZLB)/(RE+ZA))**2 +C Eq. A3e + T12=T0+TR12*(TA-T0) +C Eq. A4b + ZG1=ZETA(ALT,ZA) +C CALCULATE TEMPERATURE BELOW ZA +C Eq. A3a + DD=0.666666*ZG0*DTA/TA**2 - 3.11111*(1./TA-1./T0)+ + $ 7.11111*(1./T12-1./T0) +C Eq. A3b + CC=ZG0*DTA/(2.*TA*TA) - (1./TA-1./T0) - 2.*DD +C Eq. A3c + BB=(1./TA-1./T0) - CC - DD +C Eq. A3d + X=(-(ZG1-ZG0)/ZG0) +C Eq. A1b + X2=X*X + TZ=1./(1./T0+BB*X2+CC*X2*X2+DD*X2*X2*X2) + DENSS=TZ + TAF=(T12-T0)/(TA-T0) + 10 IF(XM.EQ.0.) GO TO 50 + IF(TA.GT.0. .AND. TZ.GT.0.) GO TO 20 + WRITE(6,*)ALT,XM,TINF,TLB,T0,TA,II,JG,N,DV(J),IFUN,S2,ZG0,TZ + TT=TLB + TA=TLB + TZ=TLB + 20 CONTINUE +C CALCULATE DENSITY ABOVE ZA +C Eq. A17a + GLB=GSURF/(1.+ZLB/RE)**2 +C Eq. A16a + GAMMA=XM*GLB/(S2*RGAS*TINF) +C Eq. A13, A14a, & A15 + DENSA=DLB*(TLB/TT)**(1.+ALPHA+GAMMA)*EXP(-S2*GAMMA*ZG2) + DENSS=DENSA + IF(ALT.GE.ZA) GO TO 50 +C CALCULATE DENSITY BELOW ZA +C Eq. A17b + GLB=GSURF/(1.+ZA/RE)**2 +C Eq. A16b + GAMM=XM*GLB*ZG0/RGAS +C Eq. A13, A14b, & A15 + DENSS=DENSA*(TA/TZ)**(1.+ALPHA)* + $ EXP(GAMM*((X-1)/T0+BB*(X*X2-1.)/3.+CC*(X2*X2*X-1.)/5.+ + $ DD*(X2*X2*X2*X-1.)/7.)) + 50 CONTINUE +CCCCCCWRITE(6,100)CXM,ALT,ZA,TINF,TLB,S2,T0,S1,TA,TZ,DLB,DENSA,DENSS +CC100 FORMAT(' D',1P13E10.2) + RETURN + END +C-------------------------------------------------------------------- + FUNCTION GLOBE5(YRD,SEC,LAT,LONG,TLOC,F107A,F107,AP,P) +C CALCULATE G(L) FUNCTION FOR MSIS-86/CIRA 1986 +C Upper Thermosphere Parameters + REAL LAT, LONG +C!!OLD!! DIMENSION P(1),SV(25),AP(1) !!!!!!!!!!!!!!!!!!!!!!!!!!! + DIMENSION P(*),SV(25),AP(*) + COMMON/TTEST/TINF,GB,ROUT,T(15)/CSW/SW(25),ISW,SWC(25) + & /LPOLY/PLG(9,4),CTLOC,STLOC,C2TLOC,S2TLOC,C3TLOC,S3TLOC, + & IYR,DAY,DF,DFA,APD,APDF,APT(4) + DATA DGTR/1.74533E-2/,DR/1.72142E-2/, XL/1000./,TLL/1000./ + & DAYL/-1./,P14/-1000./,P18/-1000./,P32/-1000./ + & HR/.2618/,SR/7.2722E-5/,SV/25*1./,NSW/14/,P39/-1000./ +C Eq. A24d + G0(A)=(A-4.+(P(26)-1.)*(A-4.+(EXP(-ABS(P(25))*(A-4.))-1.)/ + & ABS(P(25)))) +C Eq. A24c + SUMEX(EX)=1.+(1.-EX**19)/(1.-EX)*EX**(.5) +C Eq. A24a + SG0(EX)=(G0(AP(2))+(G0(AP(3))*EX+G0(AP(4))*EX*EX+G0(AP(5))*EX**3 + $ +(G0(AP(6))*EX**4+G0(AP(7))*EX**12)*(1.-EX**8)/(1.-EX))) + $ /SUMEX(EX) + IF(ISW.NE.64999) CALL TSELEC(SV) + T(10) = 0. + T(11) = 0. + T(12) = 0. + T(13)=0. + 10 CONTINUE + IYR = YRD/1000. + DAY = YRD - IYR*1000. +C Eq. A22 (remainder of code) + IF(XL.EQ.LAT) GO TO 15 +C CALCULATE LEGENDRE POLYNOMIALS + C = SIN(LAT*DGTR) + S = COS(LAT*DGTR) + C2 = C*C + C4 = C2*C2 + S2 = S*S + PLG(2,1) = C + PLG(3,1) = 0.5*(3.*C2 -1.) + PLG(4,1) = 0.5*(5.*C*C2-3.*C) + PLG(5,1) = (35.*C4 - 30.*C2 + 3.)/8. + PLG(6,1) = (63.*C2*C2*C - 70.*C2*C + 15.*C)/8. + PLG(7,1) = (11.*C*PLG(6,1) - 5.*PLG(5,1))/6. + PLG(2,2) = S + PLG(3,2) = 3.*C*S + PLG(4,2) = 1.5*(5.*C2-1.)*S + PLG(5,2) = 2.5*(7.*C2*C-3.*C)*S + PLG(6,2) = 1.875*(21.*C4 - 14.*C2 +1.)*S + PLG(7,2) = (11.*C*PLG(6,2)-6.*PLG(5,2))/5. + PLG(3,3) = 3.*S2 + PLG(4,3) = 15.*S2*C + PLG(5,3) = 7.5*(7.*C2 -1.)*S2 + PLG(6,3) = 3.*C*PLG(5,3)-2.*PLG(4,3) + PLG(7,3)=(11.*C*PLG(6,3)-7.*PLG(5,3))/4. + PLG(8,3)=(13.*C*PLG(7,3)-8.*PLG(6,3))/5. + PLG(4,4) = 15.*S2*S + PLG(5,4) = 105.*S2*S*C + PLG(6,4)=(9.*C*PLG(5,4)-7.*PLG(4,4))/2. + PLG(7,4)=(11.*C*PLG(6,4)-8.*PLG(5,4))/3. + XL=LAT + 15 CONTINUE + IF(TLL.EQ.TLOC) GO TO 16 + STLOC = SIN(HR*TLOC) + CTLOC = COS(HR*TLOC) + S2TLOC = SIN(2.*HR*TLOC) + C2TLOC = COS(2.*HR*TLOC) + S3TLOC = SIN(3.*HR*TLOC) + C3TLOC = COS(3.*HR*TLOC) + TLL = TLOC + 16 CONTINUE + IF(DAY.NE.DAYL.OR.P(14).NE.P14) CD14=COS(DR*(DAY-P(14))) + IF(DAY.NE.DAYL.OR.P(14).NE.P14) C2D14=COS(DR*2*(DAY-P(14))) + IF(DAY.NE.DAYL.OR.P(18).NE.P18) CD18=COS(2.*DR*(DAY-P(18))) + IF(DAY.NE.DAYL.OR.P(32).NE.P32) CD32=COS(DR*(DAY-P(32))) + IF(DAY.NE.DAYL.OR.P(39).NE.P39) CD39=COS(2.*DR*(DAY-P(39))) + DAYL = DAY + P14 = P(14) + P18 = P(18) + P32 = P(32) + P39 = P(39) +C F10.7 EFFECT + DF = F107 - F107A + DFA=F107A-150. + T(1) = P(20)*DF + P(21)*DF*DF + P(22)*DFA + $ + P(30)*DFA**2 + F1 = 1. + (P(48)*DFA +P(20)*DF+P(21)*DF*DF)*SWC(1) + F2 = 1. + (P(50)*DFA+P(20)*DF+P(21)*DF*DF)*SWC(1) +C TIME INDEPENDENT + T(2) = + 1 (P(2)*PLG(3,1) + P(3)*PLG(5,1)+P(23)*PLG(7,1)) + $ +(P(15)*PLG(3,1))*DFA*SWC(1) + 2 +P(27)*PLG(2,1) +C SYMMETRICAL ANNUAL + T(3) = + 1 (P(19) )*CD32 +C SYMMETRICAL SEMIANNUAL + T(4) = + 1 (P(16)+P(17)*PLG(3,1))*CD18 +C ASYMMETRICAL ANNUAL + T(5) = F1* + 1 (P(10)*PLG(2,1) + P(11)*PLG(4,1))*CD14 +C ASYMMETRICAL SEMIANNUAL + T(6) = P(38)*PLG(2,1)*CD39 +C DIURNAL + T71 = (P(12)*PLG(3,2) + P(36)*PLG(2,2))*CD14*SWC(5) + T72 = (P(13)*PLG(3,2) + P(37)*PLG(2,2))*CD14*SWC(5) + T(7) = F2* + 1 ((P(4)*PLG(2,2) + P(5)*PLG(4,2) + P(28)*PLG(6,2) + 2 + T71)*CTLOC + 4 + (P(7)*PLG(2,2) + P(8)*PLG(4,2) +P(29)*PLG(6,2) + 5 + T72)*STLOC) +C SEMIDIURNAL + T81 = (P(24)*PLG(4,3))*CD14*SWC(5) + T82 = (P(34)*PLG(4,3))*CD14*SWC(5) + T(8) = F2* + 1 ((P(6)*PLG(3,3) + P(42)*PLG(5,3) + T81)*C2TLOC + 3 +(P(9)*PLG(3,3) + P(43)*PLG(5,3) + T82)*S2TLOC) +C TERDIURNAL + T(14) = F2* + 1 ((P(40)*PLG(4,4)+(P(94)*PLG(5,4)+P(47)*PLG(7,4))*CD14*SWC(5))* + $ S3TLOC + 2 +(P(41)*PLG(4,4)+(P(95)*PLG(5,4)+P(49)*PLG(7,4))*CD14*SWC(5))* + $ C3TLOC) +C MAGNETIC ACTIVITY BASED ON DAILY AP + IF(SW(9).EQ.-1. .AND. P(52).NE.0.) GO TO 30 + APD=(AP(1)-4.) + P44=P(44) + P45=P(45) + IF(P44.LT.0) P44=1.E-5 + APDF = (APD+(P45-1.)*(APD+(EXP(-P44 *APD)-1.)/P44 )) + T(9)=APDF*(P(33)+P(46)*PLG(3,1)+P(35)*PLG(5,1)+ + $ (P(101)*PLG(2,1)+P(102)*PLG(4,1)+P(103)*PLG(6,1))*CD14*SWC(5)+ + $ (P(122)*PLG(2,2)+P(123)*PLG(4,2)+P(124)*PLG(6,2))*SWC(7)* + $ COS(HR*(TLOC-P(125)))) + GO TO 40 + 30 CONTINUE + EXP1 = EXP(-10800.*ABS(P(52))/(1.+P(139)*(45.-ABS(LAT)))) + IF(EXP1.GT..99999) EXP1=.99999 + EXP2 = EXP(-10800.*ABS(P(54))) + IF(EXP2.GT..99999) EXP2=.99999 + IF(P(25).LT.1.E-4) P(25)=1.E-4 + APT(1)=SG0(EXP1) + APT(3)=SG0(EXP2) + T(9) = APT(1)*(P(51)+P(97)*PLG(3,1)+P(55)*PLG(5,1)+ + $ (P(126)*PLG(2,1)+P(127)*PLG(4,1)+P(128)*PLG(6,1))*CD14*SWC(5)+ + $ (P(129)*PLG(2,2)+P(130)*PLG(4,2)+P(131)*PLG(6,2))*SWC(7)* + $ COS(HR*(TLOC-P(132)))) + 40 CONTINUE + IF(SW(10).EQ.0.OR.LONG.LE.-1000.) GO TO 49 +C LONGITUDINAL + T(11)= (1.+P(90)*PLG(2,1))*(1.+P(81)*DFA*SWC(1))* + $((P(65)*PLG(3,2)+P(66)*PLG(5,2)+P(67)*PLG(7,2) + $ +P(104)*PLG(2,2)+P(105)*PLG(4,2)+P(106)*PLG(6,2) + $ +SWC(5)*(P(110)*PLG(2,2)+P(111)*PLG(4,2)+P(112)*PLG(6,2))*CD14)* + $ COS(DGTR*LONG) + $ +(P(91)*PLG(3,2)+P(92)*PLG(5,2)+P(93)*PLG(7,2) + $ +P(107)*PLG(2,2)+P(108)*PLG(4,2)+P(109)*PLG(6,2) + $ +SWC(5)*(P(113)*PLG(2,2)+P(114)*PLG(4,2)+P(115)*PLG(6,2))*CD14)* + $ SIN(DGTR*LONG)) +C UT AND MIXED UT,LONGITUDE + T(12)=(1.+P(96)*PLG(2,1))*(1.+P(82)*DFA*SWC(1))* + $(1.+P(120)*PLG(2,1)*SWC(5)*CD14)* + $((P(69)*PLG(2,1)+P(70)*PLG(4,1)+P(71)*PLG(6,1))* + $ COS(SR*(SEC-P(72)))) + T(12)=T(12)+SWC(11)* + $ (P(77)*PLG(4,3)+P(78)*PLG(6,3)+P(79)*PLG(8,3))* + $ COS(SR*(SEC-P(80))+2.*DGTR*LONG)*(1.+P(138)*DFA*SWC(1)) +C UT,LONGITUDE MAGNETIC ACTIVITY + IF(SW(9).EQ.-1. .AND. P(52).NE.0.) GO TO 45 + T(13)= APDF*SWC(11)*(1.+P(121)*PLG(2,1))* + $((P( 61)*PLG(3,2)+P( 62)*PLG(5,2)+P( 63)*PLG(7,2))* + $ COS(DGTR*(LONG-P( 64)))) + $ +APDF*SWC(11)*SWC(5)* + $ (P(116)*PLG(2,2)+P(117)*PLG(4,2)+P(118)*PLG(6,2))* + $ CD14*COS(DGTR*(LONG-P(119))) + $ + APDF*SWC(12)* + $ (P( 84)*PLG(2,1)+P( 85)*PLG(4,1)+P( 86)*PLG(6,1))* + $ COS(SR*(SEC-P( 76))) + GOTO 48 + 45 CONTINUE + T(13)=APT(1)*SWC(11)*(1.+P(133)*PLG(2,1))* + $((P(53)*PLG(3,2)+P(99)*PLG(5,2)+P(68)*PLG(7,2))* + $ COS(DGTR*(LONG-P(98)))) + $ +APT(1)*SWC(11)*SWC(5)* + $ (P(134)*PLG(2,2)+P(135)*PLG(4,2)+P(136)*PLG(6,2))* + $ CD14*COS(DGTR*(LONG-P(137))) + $ +APT(1)*SWC(12)* + $ (P(56)*PLG(2,1)+P(57)*PLG(4,1)+P(58)*PLG(6,1))* + $ COS(SR*(SEC-P(59))) + 48 CONTINUE +C PARMS NOT USED: 60,83,100,140-150 + 49 TINF = 0. + IF(SW(9).EQ.-1.) TINF=P(31) + DO 50 I = 1,NSW + 50 TINF = TINF + ABS(SW(I))*T(I) + GLOBE5 = TINF + RETURN + END +C-------------------------------------------------------------------- + SUBROUTINE TSELEC(SV) +C SET SWITCHES + DIMENSION SV(1),SAV(25),SVV(1) + COMMON/CSW/SW(25),ISW,SWC(25) + DO 100 I = 1,25 + SAV(I)=SV(I) + SW(I)=AMOD(SV(I),2.) + IF(ABS(SV(I)).GT.0.) THEN + SWC(I)=1. + ELSE + SWC(I)=0. + ENDIF + 100 CONTINUE + ISW=64999 + RETURN + ENTRY TRETRV(SVV) + DO 200 I=1,25 + SVV(I)=SAV(I) + 200 CONTINUE + END +C-------------------------------------------------------------------- + FUNCTION GLOB5L(P) +C LIMITED PARAMETER VERSION OF GLOBE 9/2/82 +C CALCULATE G(L) FUNCTION FOR MSIS-86/CIRA 1986 +C Lower Thermosphere Parameters + COMMON/LPOLY/PLG(9,4),CTLOC,STLOC,C2TLOC,S2TLOC,C3TLOC,S3TLOC, + $ IYR,DAY,DF,DFA,APD,APDF,APT(4)/CSW/SW(25),ISW,SWC(25) +C!!OLD!! DIMENSION P(1),T(15) !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! + DIMENSION P(*),T(15) + DATA DR/1.72142E-2/,T/15*0./ + DATA DAYL/-1./,P7/-1000./,P9/-1000./,P11/-1000./ + IF(DAY.NE.DAYL.OR.P7.NE.P(7)) CD7=COS(DR*(DAY-P(7))) + IF(DAY.NE.DAYL.OR.P9.NE.P(9)) CD9=COS(2.*DR*(DAY-P(9))) + IF(DAY.NE.DAYL.OR.P11.NE.P(11)) CD11=COS(DR*(DAY-P(11))) + DAYL=DAY + P7=P(7) + P9=P(9) + P11=P(11) +C + T(1)=P(2)*DFA + T(2)=P(4)*PLG(3,1) + T(3)=P(6)*CD7 + T(4)=(P(8) )*CD9 + T(5)=(P(10)*PLG(2,1)+P(22)*PLG(4,1))*CD11 + T(6)=0. + T(7)=(P(14)*PLG(2,2)*CTLOC+P(15)*PLG(2,2)*STLOC) + T(8)=(P(16)*PLG(3,3)+P(18)*PLG(5,3) + $ +(P(20)*PLG(6,3))*CD11*SWC(5) + $ )*C2TLOC + $ +(P(17)*PLG(3,3)+P(19)*PLG(5,3) + $ +(P(21)*PLG(6,3))*CD11*SWC(5) + $ )*S2TLOC + T(14)=(P(12)*PLG(4,4)*C3TLOC + $ +P(25)*PLG(4,4)*S3TLOC) + IF(SW(9).EQ.1) + $ T(9)=APDF*(P(23)+P(24)*PLG(3,1)*SWC(2)) + IF(SW(9).EQ.-1) + $ T(9)=(P(3)*APT(3)+P(5)*PLG(3,1)*APT(3)*SWC(2)) +C PARMS NOT USED: 13 + TT=0. + DO 50 I=1,14 + 50 TT=TT+ABS(SW(I))*T(I) + GLOB5L=TT + RETURN + END +C-------------------------------------------------------------------- + FUNCTION DNET(DD,DM,ZHM,XMM,XM) +C 8/20/80 +C TURBOPAUSE CORRECTION FOR MSIS MODELS +C Eq. A12b + A=ZHM/(XMM-XM) +C Eq. A12a + YLOG=A*ALOG(DM/DD) + IF(YLOG.LT.-10.) GO TO 10 + IF(YLOG.GT.10.) GO TO 20 + DNET=DD*(1.+EXP(YLOG))**(1/A) + GO TO 50 + 10 CONTINUE + DNET=DD + GO TO 50 + 20 CONTINUE + DNET=DM + GO TO 50 + 50 CONTINUE + RETURN + END +C-------------------------------------------------------------------- + FUNCTION CCOR(ALT, R,H1,ZH) +C CHEMISTRY/DISSOCIATION CORRECTION FOR MSIS MODELS +C Eq. A20a or Eq. A21 + E=(ALT-ZH)/H1 + IF(E.GT.70.) GO TO 20 + IF(E.LT.-70.) GO TO 10 + EX=EXP(E) + CCOR=R/(1.+EX) + GO TO 50 + 10 CCOR=R + GO TO 50 + 20 CCOR=0. + GO TO 50 + 50 CONTINUE + CCOR=EXP(CCOR) + RETURN + END +C-------------------------------------------------------------------- + SUBROUTINE PRMSG5 +C CIRA 11-FEB-86 + CHARACTER ISD(3),IST(2),NAME(2),ISDATE(3),ISTIME(2)*4 + COMMON/UINR/IUMSIS,MONITO,IIEE + COMMON/PARMB/GSURF,RE + COMMON/PARM5/PT1(50),PT2(50),PT3(50),PA1(50),PA2(50),PA3(50), + * PB1(50),PB2(50),PB3(50),PC1(50),PC2(50),PC3(50), + * PD1(50),PD2(50),PD3(50),PE1(50),PE2(50),PE3(50), + * PF1(50),PF2(50),PF3(50),PG1(50),PG2(50),PG3(50), + * PH1(50),PH2(50),PH3(50),PI1(50) + COMMON/LOWER5/PTM(8),PDM(8,7)/DATIME/ISDATE,ISTIME,NAME + DATA ISD/'11-F','EB-8','6 '/,IST/'18:2','3:31'/ +c + GSURF=980.665 + RE=6356.77 + IIEE=0 +2392 OPEN(UNIT=IUMSIS,FILE='MSIS86.DAT',FORM='FORMATTED', + & ERR=2399,STATUS='OLD') +c2392 OPEN(UNIT=IUMSIS,FILE= +c &'/ncf/nssdc/pub/ftp/pub/models/atmospheric/msis/msis86/msis86.dat' +c &,FORM='FORMATTED',ERR=2399,STATUS='OLD') + READ(IUMSIS,1290,ERR=2390) PT1,PT2,PT3,PA1,PA2,PA3,PB1, + & PB2,PB3,PC1,PC2,PC3,PD1,PD2,PD3,PE1,PE2,PE3,PF1,PF2,PF3, + & PG1,PG2,PG3,PH1,PH2,PH3,PI1,PTM,PDM +C +CCCCCCCCCCCCC IN PC VERSION: 1290 FORMAT(5E13.6) +C +1290 FORMAT(1X,5E13.6) + GOTO 2395 +2399 WRITE(MONITO,2396) +2396 FORMAT(' THE MSIS COEFFICIENT FILE (MSIS86.DAT) IS NOT IN', + & ' YOUR DIRECTORY.') + IIEE=1 + RETURN +2390 WRITE(MONITO,2397) +2397 FORMAT(' ERROR IN READING THE MSIS COEFFICIENT FILE (MSIS86.DAT)') + IIEE=1 + RETURN +2395 DO 10 I=1,3 + ISDATE(I)=ISD(I) +10 CONTINUE + DO 20 I=1,2 + ISTIME(I)=IST(I) +20 CONTINUE + NAME(1)='CIRA' + NAME(2)='-86 ' + END +C------------------------------------------------------------------ + SUBROUTINE GGM(ART,XLG,BG,XLM,BM) +C CALCULATES GEOMAGNETIC LONGITUDE (XLM) AND LATITUDE (BM) +C FROM GEOGRAFIC LONGITUDE (XLG) AND LATITUDE (BG) FOR ART=0 +C AND REVERSE FOR ART=1. ALL ANGLES IN DEGREE. +C LATITUDE:-90 TO 90. LONGITUDE:0 TO 360 EAST. + INTEGER ART + FAKTOR=.0174532925 + ZPI=FAKTOR*360. + CBG=11.4*FAKTOR + CI=COS(CBG) + SI=SIN(CBG) + IF(ART.EQ.0) GOTO 10 + CBM=COS(BM*FAKTOR) + SBM=SIN(BM*FAKTOR) + CLM=COS(XLM*FAKTOR) + SLM=SIN(XLM*FAKTOR) + SBG=SBM*CI-CBM*CLM*SI + BG=ASIN(SBG) + CBG=COS(BG) + SLG=(CBM*SLM)/CBG + CLG=(SBM*SI+CBM*CLM*CI)/CBG + IF(ABS(CLG).GT.1.) CLG=SIGN(1.,CLG) + XLG=ACOS(CLG) + IF(SLG.LT.0.0) XLG=ZPI-ACOS(CLG) + BG=BG/FAKTOR + XLG=XLG/FAKTOR + XLG=XLG-69.8 + IF(XLG.LT.0.0) XLG=XLG+360.0 + RETURN +10 YLG=XLG+69.8 + CBG=COS(BG*FAKTOR) + SBG=SIN(BG*FAKTOR) + CLG=COS(YLG*FAKTOR) + SLG=SIN(YLG*FAKTOR) + SBM=SBG*CI+CBG*CLG*SI + BM=ASIN(SBM) + CBM=COS(BM) + SLM=(CBG*SLG)/CBM + CLM=(-SBG*SI+CBG*CLG*CI)/CBM + XLM=ACOS(CLM) + IF(SLM.LT..0) XLM=ZPI-ACOS(CLM) + BM=BM/FAKTOR + XLM=XLM/FAKTOR + END diff --git a/MSIS/MSIS90/AAREADME.TXT b/MSIS/MSIS90/AAREADME.TXT new file mode 100755 index 0000000..e6f9aad --- /dev/null +++ b/MSIS/MSIS90/AAREADME.TXT @@ -0,0 +1,53 @@ + +MSISE-1990 Model + +Author: A. E. Hedin, NASA/GSFC, Code 914, Greenbelt, Maryland 20771 + +Parameter: Neutral densities and temperature from ground to thermosphere + +Brief Description: + +The MSISE model describes the neutral temperature and densities in Earth's +atmosphere from ground to thermospheric heights. Below 72.5 km the model is +primarily based on the MAP Handbook (Labitzke et al., 1985) tabulation of zonal +average temperature and pressure by Barnett and Corney, which was also used for +the CIRA-86. Below 20 km these data were supplemented with averages from the +National Meteorological Center (NMC). In addition, pitot tube, falling sphere, +and grenade sounder rocket measurements from 1947 to 1972 were taken into +consideration. Above 72.5 km MSISE-90 is essentially a revised MSIS-86 model +taking into account data derived from space shuttle flights and newer incoherent +scatter results. For someone interested only in the thermosphere (above 120 km), +the author recommends the MSIS-86 model. MSISE is also not the model of +preference for specialized tropospheric work. It is rather for studies that +reach across several atmospheric boundaries. +24/10/01 Corrected version as provided by M. Picone and A. Hedin (Corrected +error in GHP6 when using METER6(.TRUE.). + +CORRECTION: +July 15, 2003 - New version that fixes an error related to units used, that resulted + in an incorrect magnitude of the scale height variable that was used to compute + values of pressure levels. Specifically, using both MKS units and a grid of + pressure levels (rather than an altitude grid), the previous version of MSISE-90 + (Subroutine GHP6) produced incorrect pressure values. + +Availability: +(1) FORTRAN source code from this directory: +msise90_driver.for Example driver program; includes the MSISE90 subroutines + (compilation: f77 -o msis msise90.for) +msise90_out.txt Output from driver program +msise90_sub.for MSISE90 Fortran subroutines + +(2) Model parameters can be computed and plotted online at +http://nssdc.gsfc.nasa.gov/space/model/models/msis.html + +(3) Homepage at http://nssdc.gsfc.nasa.gov/space/model/atmos/msise.html + +NSSDC ID #MN-61F + +References: + +K. Labitzke, J. J. Barnett, and B. Edwards (eds.), Handbook MAP 16, SCOSTEP, +University of Illinois, Urbana, 1985. + +A. E. Hedin, Extension of the MSIS Thermospheric Model into the Middle and +Lower Atmosphere, J. Geophys. Res. 96, 1159, 1991. diff --git a/MSIS/MSIS90/msise90_driver.for b/MSIS/MSIS90/msise90_driver.for new file mode 100644 index 0000000..40af04d --- /dev/null +++ b/MSIS/MSIS90/msise90_driver.for @@ -0,0 +1,107 @@ +C-------------------------------------------------------------------------- +C TEST DRIVER FOR GTD6 (ATMOSPHERIC MODEL) + DIMENSION D(8,16),T(2,16),SW(25),APH(7) + DIMENSION IDAY(15),UT(15),ALT(15),XLAT(15),XLONG(15),XLST(15), + & F107A(15),F107(15),AP(15) + COMMON/GTS3C/DL(16) + COMMON/DATIME/ISDATE(3),ISTIME(2),NAME(2) + DATA IDAY/172,81,13*172/ + DATA UT/29000.,29000.,75000.,12*29000./ + DATA ALT/400.,400.,400.,100.,6*400.,0,10.,30.,50.,70./ + DATA XLAT/4*60.,0.,10*60./ + DATA XLONG/5*-70.,0.,9*-70./ + DATA XLST/6*16.,4.,8*16./ + DATA F107A/7*150.,70.,7*150./ + DATA F107/8*150.,180.,6*150./ + DATA AP/9*4.,40.,5*4./ + DATA APH/7*100./,SW/8*1.,-1.,16*1./ + DO I=1,15 + CALL GTD6(IDAY(I),UT(I),ALT(I),XLAT(I),XLONG(I),XLST(I), + & F107A(I),F107(I),AP(I),48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,8),T(1,I),T(2,I),DL + ENDDO + CALL TSELEC(SW) + I=16 + CALL GTD6(IDAY(1),UT(1),ALT(1),XLAT(1),XLONG(1),XLST(1), + & F107A(1),F107(1),APH,48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,8),T(1,I),T(2,I),DL + CALL GTD6(IDAY(1),UT(1),ALT(4),XLAT(1),XLONG(1),XLST(1), + & F107A(1),F107(1),APH,48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,8),T(1,I),T(2,I),DL + WRITE(6,300) NAME,ISDATE,ISTIME + WRITE(6,200) (IDAY(I),I=1,5) + WRITE(6,201) (UT(I),I=1,5) + WRITE(6,202) (ALT(I),I=1,5) + WRITE(6,203) (XLAT(I),I=1,5) + WRITE(6,204) (XLONG(I),I=1,5) + WRITE(6,205) (XLST(I),I=1,5) + WRITE(6,206) (F107A(I),I=1,5) + WRITE(6,207) (F107(I),I=1,5) + WRITE(6,210) (T(1,I),I=1,5) + WRITE(6,211) (T(2,I),I=1,5) + WRITE(6,212) (D(1,I),I=1,5) + WRITE(6,213) (D(2,I),I=1,5) + WRITE(6,214) (D(3,I),I=1,5) + WRITE(6,215) (D(4,I),I=1,5) + WRITE(6,216) (D(5,I),I=1,5) + WRITE(6,217) (D(7,I),I=1,5) + WRITE(6,219) (D(8,I),I=1,5) + WRITE(6,218) (D(6,I),I=1,5) + WRITE(6,200) (IDAY(I),I=6,10) + WRITE(6,201) (UT(I),I=6,10) + WRITE(6,202) (ALT(I),I=6,10) + WRITE(6,203) (XLAT(I),I=6,10) + WRITE(6,204) (XLONG(I),I=6,10) + WRITE(6,205) (XLST(I),I=6,10) + WRITE(6,206) (F107A(I),I=6,10) + WRITE(6,207) (F107(I),I=6,10) + WRITE(6,210) (T(1,I),I=6,10) + WRITE(6,211) (T(2,I),I=6,10) + WRITE(6,212) (D(1,I),I=6,10) + WRITE(6,213) (D(2,I),I=6,10) + WRITE(6,214) (D(3,I),I=6,10) + WRITE(6,215) (D(4,I),I=6,10) + WRITE(6,216) (D(5,I),I=6,10) + WRITE(6,217) (D(7,I),I=6,10) + WRITE(6,219) (D(8,I),I=6,10) + WRITE(6,218) (D(6,I),I=6,10) + WRITE(6,200) (IDAY(I),I=11,15) + WRITE(6,201) (UT(I),I=11,15) + WRITE(6,202) (ALT(I),I=11,15) + WRITE(6,203) (XLAT(I),I=11,15) + WRITE(6,204) (XLONG(I),I=11,15) + WRITE(6,205) (XLST(I),I=11,15) + WRITE(6,206) (F107A(I),I=11,15) + WRITE(6,207) (F107(I),I=11,15) + WRITE(6,210) (T(1,I),I=11,15) + WRITE(6,211) (T(2,I),I=11,15) + WRITE(6,212) (D(1,I),I=11,15) + WRITE(6,213) (D(2,I),I=11,15) + WRITE(6,214) (D(3,I),I=11,15) + WRITE(6,215) (D(4,I),I=11,15) + WRITE(6,216) (D(5,I),I=11,15) + WRITE(6,217) (D(7,I),I=11,15) + WRITE(6,219) (D(8,I),I=11,15) + WRITE(6,218) (D(6,I),I=11,15) + 100 FORMAT(1X,1P8E9.2/4X,2E10.3/4X,8E9.2/4X,8E9.2/) + 200 FORMAT(//' DAY ',5I12) + 201 FORMAT(' UT ',5F12.0) + 202 FORMAT(' ALT ',5F12.0) + 203 FORMAT(' LAT ',5F12.0) + 204 FORMAT(' LONG ',5F12.0) + 205 FORMAT(' LST ',5F12.0) + 206 FORMAT(' F107A',5F12.0) + 207 FORMAT(' F107 ',5F12.0) + 210 FORMAT(/' TINF ',5F12.2) + 211 FORMAT(' TG ',5F12.2) + 212 FORMAT(' HE ',1P5E12.3) + 213 FORMAT(' O ',1P5E12.3) + 214 FORMAT(' N2 ',1P5E12.3) + 215 FORMAT(' O2 ',1P5E12.3) + 216 FORMAT(' AR ',1P5E12.3) + 217 FORMAT(' H ',1P5E12.3) + 219 FORMAT(' N ',1P5E12.3) + 218 FORMAT(' RHO ',1P5E12.3) + 300 FORMAT(1X,2A4,2X,3A4,2X,2A4) + STOP + END diff --git a/MSIS/MSIS90/msise90_out.txt b/MSIS/MSIS90/msise90_out.txt new file mode 100644 index 0000000..789cbb4 --- /dev/null +++ b/MSIS/MSIS90/msise90_out.txt @@ -0,0 +1,154 @@ +-------------------------------------------------------------------------- +Test Output + 6.66E+05 1.08E+08 2.05E+07 6.64E+05 4.16E+03 3.94E-15 3.50E+04 3.59E+06 + 1.277E+03 1.270E+03 + 3.76E+02 1.80E-02 4.58E+06 4.38E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.79E+04 1.23E+02 1.82E+02 9.00E+01 1.62E+01 4.87E+00 3.52E+06 7.85E+08 + + 3.36E+06 1.52E+08 1.40E+07 5.51E+05 1.87E+03 4.84E-15 5.23E+04 3.96E+06 + 1.195E+03 1.189E+03 + 3.90E+02 1.80E-02 2.31E+07 7.10E+10 2.85E+11 3.93E+10 1.65E+09 1.73E-11 + 1.40E+05 1.23E+02 1.82E+02 9.00E+01 1.45E+01 4.67E+00 3.89E+06 9.68E+08 + + 7.34E+05 1.14E+08 2.03E+07 6.56E+05 3.79E+03 4.08E-15 3.25E+04 3.45E+06 + 1.274E+03 1.267E+03 + 3.76E+02 1.80E-02 5.05E+06 4.62E+10 3.02E+11 3.24E+10 2.06E+09 1.71E-11 + 9.10E+04 1.23E+02 1.82E+02 9.00E+01 1.62E+01 4.90E+00 3.39E+06 7.59E+08 + + 6.45E+07 2.05E+11 5.62E+12 1.24E+12 5.69E+10 3.36E-10 1.04E+07 2.95E+05 + 1.037E+03 2.051E+02 + 3.76E+02 2.45E-02 4.58E+06 4.38E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.79E+04 1.23E+02 1.46E+02 9.00E+01 1.62E+01 4.78E+00 4.58E+09 7.85E+08 + + 1.86E+06 1.52E+08 1.71E+07 4.68E+05 1.86E+03 4.98E-15 6.16E+04 5.10E+06 + 1.207E+03 1.205E+03 + 3.94E+02 2.12E-02 1.22E+07 5.75E+10 2.41E+11 2.20E+10 9.77E+08 1.40E-11 + 1.63E+05 1.23E+02 1.82E+02 9.00E+01 1.73E+01 4.43E+00 5.01E+06 1.04E+09 + + 8.91E+05 1.26E+08 1.76E+07 4.52E+05 2.68E+03 4.27E-15 3.68E+04 3.28E+06 + 1.229E+03 1.224E+03 + 3.76E+02 1.90E-02 6.15E+06 5.47E+10 3.02E+11 2.63E+10 1.80E+09 1.70E-11 + 1.01E+05 1.23E+02 1.82E+02 9.00E+01 1.62E+01 4.90E+00 3.22E+06 7.59E+08 + + 5.62E+05 6.41E+07 1.17E+07 3.66E+05 1.60E+03 2.29E-15 5.29E+04 8.37E+05 + 1.125E+03 1.123E+03 + 3.72E+02 2.15E-02 3.98E+06 3.41E+10 3.02E+11 3.45E+10 2.01E+09 1.69E-11 + 1.42E+05 1.23E+02 1.82E+02 9.00E+01 1.62E+01 6.11E+00 8.17E+05 2.28E+08 + + 3.53E+05 3.87E+07 4.26E+06 1.26E+05 4.26E+02 1.27E-15 9.06E+04 1.52E+06 + 1.008E+03 1.005E+03 + 3.59E+02 2.00E-02 2.78E+06 3.48E+10 2.93E+11 3.66E+10 2.23E+09 1.66E-11 + 2.41E+05 1.23E+02 1.82E+02 9.00E+01 1.30E+01 5.03E+00 1.49E+06 6.54E+08 + + 6.71E+05 1.17E+08 2.37E+07 7.91E+05 5.23E+03 4.37E-15 3.25E+04 4.82E+06 + 1.332E+03 1.322E+03 + 3.76E+02 1.70E-02 4.60E+06 4.42E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.26E+04 1.23E+02 1.82E+02 9.00E+01 1.62E+01 4.63E+00 4.74E+06 1.00E+09 + + 5.57E+05 1.11E+08 3.79E+07 1.70E+06 1.23E+04 4.87E-15 2.68E+04 3.16E+06 + 1.384E+03 1.373E+03 + 4.20E+02 1.68E-02 3.45E+06 3.11E+10 3.02E+11 4.12E+10 2.77E+09 1.72E-11 + 7.20E+04 1.23E+02 1.82E+02 9.00E+01 1.62E+01 5.31E+00 3.09E+06 4.99E+08 + + 1.37E+14 0.00E+00 2.04E+19 5.47E+18 2.44E+17 1.26E-03 0.00E+00 0.00E+00 + 1.037E+03 2.815E+02 + 3.76E+02 2.40E-02 3.45E+06 3.11E+10 3.02E+11 4.12E+10 2.77E+09 1.72E-11 + 7.20E+04 1.23E+02 1.46E+02 9.00E+01 1.59E+01 5.31E+00 1.17E+15 4.99E+08 + + 4.41E+13 0.00E+00 6.57E+18 1.76E+18 7.85E+16 4.04E-04 0.00E+00 0.00E+00 + 1.037E+03 2.274E+02 + 3.76E+02 2.40E-02 3.45E+06 3.11E+10 3.02E+11 4.12E+10 2.77E+09 1.72E-11 + 7.20E+04 1.23E+02 1.46E+02 9.00E+01 1.59E+01 5.31E+00 1.17E+15 4.99E+08 + + 2.12E+12 0.00E+00 3.16E+17 8.47E+16 3.77E+15 1.94E-05 0.00E+00 0.00E+00 + 1.037E+03 2.374E+02 + 3.76E+02 2.40E-02 3.45E+06 3.11E+10 3.02E+11 4.12E+10 2.77E+09 1.72E-11 + 7.20E+04 1.23E+02 1.46E+02 9.00E+01 1.59E+01 5.31E+00 1.17E+15 4.99E+08 + + 1.40E+11 0.00E+00 2.09E+16 5.61E+15 2.50E+14 1.29E-06 0.00E+00 0.00E+00 + 1.037E+03 2.799E+02 + 3.76E+02 2.40E-02 3.45E+06 3.11E+10 3.02E+11 4.12E+10 2.77E+09 1.72E-11 + 7.20E+04 1.23E+02 1.46E+02 9.00E+01 1.59E+01 5.31E+00 1.17E+15 4.99E+08 + + 1.25E+10 0.00E+00 1.86E+15 4.98E+14 2.25E+13 1.14E-07 0.00E+00 0.00E+00 + 1.037E+03 2.157E+02 + 3.76E+02 2.40E-02 4.58E+06 4.38E+10 3.02E+11 3.24E+10 2.23E+09 1.71E-11 + 9.79E+04 1.23E+02 1.46E+02 9.00E+01 1.59E+01 4.78E+00 6.61E+10 7.85E+08 + + 5.02E+05 1.07E+08 5.69E+07 3.80E+06 2.71E+04 5.76E-15 2.22E+04 3.21E+06 + 1.434E+03 1.423E+03 + 4.64E+02 1.67E-02 2.85E+06 2.30E+10 3.02E+11 5.85E+10 3.51E+09 1.80E-11 + 5.68E+04 1.23E+02 1.82E+02 9.00E+01 1.62E+01 5.51E+00 3.14E+06 4.01E+08 + + 4.99E+07 1.32E+11 4.37E+12 1.03E+12 4.68E+10 2.64E-10 7.73E+06 1.82E+05 + 1.037E+03 2.124E+02 + 4.64E+02 2.82E-02 2.85E+06 2.30E+10 3.02E+11 5.85E+10 3.51E+09 1.80E-11 + 5.68E+04 1.23E+02 1.36E+02 9.00E+01 1.62E+01 5.27E+00 2.25E+09 4.01E+08 + + MSISE 90 12-MAR-90 15:09:04 + + + DAY 172 81 172 172 172 + UT 29000. 29000. 75000. 29000. 29000. + ALT 400. 400. 400. 100. 400. + LAT 60. 60. 60. 60. 0. + LONG -70. -70. -70. -70. -70. + LST 16. 16. 16. 16. 16. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + + TINF 1277.31 1195.09 1273.80 1037.18 1207.30 + TG 1270.08 1188.75 1266.73 205.12 1204.56 + HE 6.665E+05 3.359E+06 7.345E+05 6.450E+07 1.864E+06 + O 1.080E+08 1.523E+08 1.136E+08 2.051E+11 1.518E+08 + N2 2.046E+07 1.404E+07 2.026E+07 5.625E+12 1.708E+07 + O2 6.639E+05 5.506E+05 6.559E+05 1.236E+12 4.677E+05 + AR 4.161E+03 1.873E+03 3.792E+03 5.694E+10 1.864E+03 + H 3.497E+04 5.228E+04 3.254E+04 1.037E+07 6.163E+04 + N 3.587E+06 3.963E+06 3.453E+06 2.954E+05 5.099E+06 + RHO 3.944E-15 4.841E-15 4.078E-15 3.363E-10 4.982E-15 + + + DAY 172 172 172 172 172 + UT 29000. 29000. 29000. 29000. 29000. + ALT 400. 400. 400. 400. 400. + LAT 60. 60. 60. 60. 60. + LONG 0. -70. -70. -70. -70. + LST 16. 4. 16. 16. 16. + F107A 150. 150. 70. 150. 150. + F107 150. 150. 150. 180. 150. + + TINF 1228.82 1125.30 1007.50 1331.63 1384.07 + TG 1223.62 1122.95 1004.52 1321.54 1373.50 + HE 8.908E+05 5.619E+05 3.532E+05 6.714E+05 5.569E+05 + O 1.260E+08 6.413E+07 3.868E+07 1.169E+08 1.109E+08 + N2 1.764E+07 1.169E+07 4.258E+06 2.374E+07 3.791E+07 + O2 4.519E+05 3.661E+05 1.256E+05 7.912E+05 1.697E+06 + AR 2.676E+03 1.604E+03 4.255E+02 5.233E+03 1.230E+04 + H 3.676E+04 5.290E+04 9.064E+04 3.251E+04 2.677E+04 + N 3.280E+06 8.371E+05 1.521E+06 4.823E+06 3.160E+06 + RHO 4.274E-15 2.289E-15 1.270E-15 4.366E-15 4.875E-15 + + + DAY 172 172 172 172 172 + UT 29000. 29000. 29000. 29000. 29000. + ALT 0. 10. 30. 50. 70. + LAT 60. 60. 60. 60. 60. + LONG -70. -70. -70. -70. -70. + LST 16. 16. 16. 16. 16. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + + TINF 1037.18 1037.18 1037.18 1037.18 1037.18 + TG 281.46 227.42 237.44 279.90 215.67 + HE 1.369E+14 4.406E+13 2.118E+12 1.404E+11 1.252E+10 + O 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + N2 2.040E+19 6.566E+18 3.156E+17 2.092E+16 1.861E+15 + O2 5.473E+18 1.762E+18 8.466E+16 5.612E+15 4.978E+14 + AR 2.440E+17 7.854E+16 3.775E+15 2.502E+14 2.252E+13 + H 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + N 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + RHO 1.255E-03 4.040E-04 1.942E-05 1.287E-06 1.145E-07 +-------------------------------------------------------------------------- +End of File +Please acknowledge receipt. diff --git a/MSIS/MSIS90/msise90_sub.for b/MSIS/MSIS90/msise90_sub.for new file mode 100644 index 0000000..271f95a --- /dev/null +++ b/MSIS/MSIS90/msise90_sub.for @@ -0,0 +1,2199 @@ +Contents: MSIS FORTRAN SUBROUTINE GTD6 + +C----------------------------------------------------------------------- + SUBROUTINE GTD6(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS,D,T) +C Neutral Atmosphere Empirical Model from the surface to lower +C exosphere MSISE90 (JGR, 96, 1159-1172, 1991) +C A.E.Hedin 4/24/90;6/3/91(add SAVE) +C 2/11/93 correct switch initialization and mks calculation +C 2/11/97 [AEH] CORRECT ERROR IN GHP6 WHEN USING METER6(.TRUE.) +C See subroutine GHP6 to specify a pressure rather than +C altitude. +C INPUT: +C IYD - YEAR AND DAY AS YYDDD or DDD (day of year from 1 to 365) +C SEC - UT(SEC) +C ALT - ALTITUDE(KM) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS) +C F107A - 3 MONTH AVERAGE OF F10.7 FLUX +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 59 HRS PRIOR +C TO CURRENT TIME +C MASS - MASS NUMBER (ONLY DENSITY FOR SELECTED GAS IS +C CALCULATED. MASS 0 IS TEMPERATURE. MASS 48 FOR ALL. +C Note: Ut, Local Time, and Longitude are used independently in the +C model and are not of equal importance for every situation. +C For the most physically realistic calculation these three +C variables should be consistent (STL=SEC/3600+GLONG/15). +C F107, F107A, and AP effects are not large below 80 km +C and these can be set to 150., 150., and 4. respectively. +C OUTPUT: +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C +C TO GET OUTPUT IN M-3 and KG/M3: CALL METER6(.TRUE.) +C +C O, H, and N set to zero below 72.5 km +C Exospheric temperature set to average for altitudes below 120 km. +C +C The following is for test and special purposes: +C TO TURN ON AND OFF PARTICULAR VARIATIONS CALL TSELEC(SW) +C WHERE SW IS A 25 ELEMENT ARRAY CONTAINING 0. FOR OFF, 1. +C FOR ON, OR 2. FOR MAIN EFFECTS OFF BUT CROSS TERMS ON +C FOR THE FOLLOWING VARIATIONS +C 1 - F10.7 EFFECT ON MEAN 2 - TIME INDEPENDENT +C 3 - SYMMETRICAL ANNUAL 4 - SYMMETRICAL SEMIANNUAL +C 5 - ASYMMETRICAL ANNUAL 6 - ASYMMETRICAL SEMIANNUAL +C 7 - DIURNAL 8 - SEMIDIURNAL +C 9 - DAILY AP 10 - ALL UT/LONG EFFECTS +C 11 - LONGITUDINAL 12 - UT AND MIXED UT/LONG +C 13 - MIXED AP/UT/LONG 14 - TERDIURNAL +C 15 - DEPARTURES FROM DIFFUSIVE EQUILIBRIUM +C 16 - ALL TINF VAR 17 - ALL TLB VAR +C 18 - ALL TN1 VAR 19 - ALL S VAR +C 20 - ALL TN2 VAR 21 - ALL NLB VAR +C 22 - ALL TN3 VAR 23 - TURBO SCALE HEIGHT VAR +C +C To get current values of SW: CALL TRETRV(SW) +C + DIMENSION D(8),T(2),AP(7),D6(8),T6(2) + DIMENSION ZN3(5),ZN2(4),SV(25) + COMMON/GTS3C/TLB,S,DB04,DB16,DB28,DB32,DB40,DB48,DB01,ZA,T0,Z0 + & ,G0,RL,DD,DB14,TR12 + COMMON/MESO6/TN1(5),TN2(4),TN3(5),TGN1(2),TGN2(2),TGN3(2) + COMMON/LOWER6/PTM(10),PDM(10,8) + COMMON/PARM6/PT(150),PD(150,9),PS(150),PDL(25,2),PTL(100,4), + $ PMA(100,10) + COMMON/DATIM6/ISD(3),IST(2),NAM(2) + COMMON/DATIME/ISDATE(3),ISTIME(2),NAME(2) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/MAVG6/PAVGM(10) + COMMON/DMIX/DM04,DM16,DM28,DM32,DM40,DM01,DM14 + COMMON/PARMB/GSURF,RE + COMMON/METSEL/IMR + SAVE + EXTERNAL GTD6BK + DATA MN3/5/,ZN3/32.5,20.,15.,10.,0./ + DATA MN2/4/,ZN2/72.5,55.,45.,32.5/ + DATA ZMIX/62.5/,ALAST/99999./,MSSL/-999/ + DATA SV/25*1./ + IF(ISW.NE.64999) CALL TSELEC(SV) +C Put identification data into common/datime/ + DO 1 I=1,3 + ISDATE(I)=ISD(I) + 1 CONTINUE + DO 2 I=1,2 + ISTIME(I)=IST(I) + NAME(I)=NAM(I) + 2 CONTINUE +C +Ce Test for changed input + V1=VTST(IYD,SEC,GLAT,GLONG,STL,F107A,F107,AP,1) +C Latitude variation of gravity (none for SW(2)=0) + XLAT=GLAT + IF(SW(2).EQ.0) XLAT=45. + CALL GLATF(XLAT,GSURF,RE) +C + XMM=PDM(5,3) +C +C THERMOSPHERE/UPPER MESOSPHERE [above ZN2(1)] + ALTT=AMAX1(ALT,ZN2(1)) + MSS=MASS +Ce Only calculate N2 in thermosphere if alt in mixed region + IF(ALT.LT.ZMIX.AND.MASS.GT.0) MSS=28 +Ce Only calculate thermosphere if input parameters changed +Ce or altitude above ZN2(1) in mesosphere + IF(V1.EQ.1..OR.ALT.GT.ZN2(1).OR.ALAST.GT.ZN2(1).OR.MSS.NE.MSSL) + $ THEN + CALL GTS6(IYD,SEC,ALTT,GLAT,GLONG,STL,F107A,F107,AP,MSS,D6,T6) + DM28M=DM28 +C metric adjustment + IF(IMR.EQ.1) DM28M=DM28*1.E6 + MSSL=MSS + ENDIF + T(1)=T6(1) + T(2)=T6(2) + IF(ALT.GE.ZN2(1)) THEN + DO 5 J=1,8 + D(J)=D6(J) + 5 CONTINUE + GOTO 10 + ENDIF +C +C LOWER MESOSPHERE/UPPER STRATOSPHERE [between ZN3(1) and ZN2(1)] +C Temperature at nodes and gradients at end nodes +C Inverse temperature a linear function of spherical harmonics +Ce Only calculate nodes if input changed + IF(V1.EQ.1..OR.ALAST.GE.ZN2(1)) THEN + TGN2(1)=TGN1(2) + TN2(1)=TN1(5) + TN2(2)=PMA(1,1)*PAVGM(1)/(1.-SW(20)*GLOB6S(PMA(1,1))) + TN2(3)=PMA(1,2)*PAVGM(2)/(1.-SW(20)*GLOB6S(PMA(1,2))) + TN2(4)=PMA(1,3)*PAVGM(3)/(1.-SW(20)*SW(22)*GLOB6S(PMA(1,3))) + TGN2(2)=PAVGM(9)*PMA(1,10)*(1.+SW(20)*SW(22)*GLOB6S(PMA(1,10))) + $ *TN2(4)*TN2(4)/(PMA(1,3)*PAVGM(3))**2 + TN3(1)=TN2(4) + ENDIF + IF(ALT.GE.ZN3(1)) GOTO 6 +C +C LOWER STRATOSPHERE AND TROPOSPHERE [below ZN3(1)] +C Temperature at nodes and gradients at end nodes +C Inverse temperature a linear function of spherical harmonics +Ce Only calculate nodes if input changed + IF(V1.EQ.1..OR.ALAST.GE.ZN3(1)) THEN + TGN3(1)=TGN2(2) + TN3(2)=PMA(1,4)*PAVGM(4)/(1.-SW(22)*GLOB6S(PMA(1,4))) + TN3(3)=PMA(1,5)*PAVGM(5)/(1.-SW(22)*GLOB6S(PMA(1,5))) + TN3(4)=PMA(1,6)*PAVGM(6)/(1.-SW(22)*GLOB6S(PMA(1,6))) + TN3(5)=PMA(1,7)*PAVGM(7)/(1.-SW(22)*GLOB6S(PMA(1,7))) + TGN3(2)=PMA(1,8)*PAVGM(8)*(1.+SW(22)*GLOB6S(PMA(1,8))) + $ *TN3(5)*TN3(5)/(PMA(1,7)*PAVGM(7))**2 + ENDIF + 6 CONTINUE + IF(MASS.EQ.0) GOTO 50 +Ce Linear transition to full mixing at ZMIX from almost +Ce full mixing at ZN2(1) to improve efficiency + DMC=0 + IF(ALT.GT.ZMIX) DMC=1.-(ZN2(1)-ALT)/(ZN2(1)-ZMIX) + DZ28=D6(3) +C ***** N2 DENSITY **** + DMR=D6(3)/DM28M-1. + D(3)=DENSM(ALT,DM28M,XMM,TZ,MN3,ZN3,TN3,TGN3,MN2,ZN2,TN2,TGN2) + D(3)=D(3)*(1.+DMR*DMC) +C ***** HE DENSITY **** + D(1)=0 + IF(MASS.NE.4.AND.MASS.NE.48) GOTO 204 + DMR=D6(1)/(DZ28*PDM(2,1))-1. + D(1)=D(3)*PDM(2,1)*(1.+DMR*DMC) + 204 CONTINUE +C **** O DENSITY **** + D(2)=0 + 216 CONTINUE +C ***** O2 DENSITY **** + D(4)=0 + IF(MASS.NE.32.AND.MASS.NE.48) GOTO 232 + DMR=D6(4)/(DZ28*PDM(2,4))-1. + D(4)=D(3)*PDM(2,4)*(1.+DMR*DMC) + 232 CONTINUE +C ***** AR DENSITY **** + D(5)=0 + IF(MASS.NE.40.AND.MASS.NE.48) GOTO 240 + DMR=D6(5)/(DZ28*PDM(2,5))-1. + D(5)=D(3)*PDM(2,5)*(1.+DMR*DMC) + 240 CONTINUE +C ***** HYDROGEN DENSITY **** + D(7)=0 +C ***** ATOMIC NITROGEN DENSITY **** + D(8)=0 +C +C TOTAL MASS DENSITY +C + IF(MASS.EQ.48) THEN + D(6) = 1.66E-24*(4.*D(1)+16.*D(2)+28.*D(3)+32.*D(4)+40.*D(5)+ + & D(7)+14.*D(8)) + IF(IMR.EQ.1) D(6)=D(6)/1000. + ENDIF + T(2)=TZ + 10 CONTINUE + GOTO 90 + 50 CONTINUE + DD=DENSM(ALT,1.,0,TZ,MN3,ZN3,TN3,TGN3,MN2,ZN2,TN2,TGN2) + T(2)=TZ + 90 CONTINUE + ALAST=ALT + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GHP6(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP, + $ D,T,PRESS) +C FIND ALTITUDE OF PRESSURE SURFACE (PRESS) FROM GTD6 +C 2/11/97 [AEH] CORRECT ERROR IN GHP6 WHEN USING METER6(.TRUE.) +C INPUT: +C IYD - YEAR AND DAY AS YYDDD +C SEC - UT(SEC) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS) +C F107A - 3 MONTH AVERAGE OF F10.7 FLUX +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 59 HRS PRIOR +C TO CURRENT TIME +C PRESS - PRESSURE LEVEL(MB) +C OUTPUT: +C ALT - ALTITUDE(KM) +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C + COMMON/PARMB/GSURF,RE + COMMON/METSEL/IMR + DIMENSION D(8),T(2),AP(7) + SAVE + DATA BM/1.3806E-19/,RGAS/831.4/ + DATA TEST/.00043/ + PL=ALOG10(PRESS) +C Initial altitude estimate + IF(PL.GE.-5.) THEN + IF(PL.GT.2.5) ZI=18.06*(3.00-PL) + IF(PL.GT..75.AND.PL.LE.2.5) ZI=14.98*(3.08-PL) + IF(PL.GT.-1..AND.PL.LE..75) ZI=17.8*(2.72-PL) + IF(PL.GT.-2..AND.PL.LE.-1.) ZI=14.28*(3.64-PL) + IF(PL.GT.-4..AND.PL.LE.-2.) ZI=12.72*(4.32-PL) + IF(PL.LE.-4.) ZI=25.3*(.11-PL) + IDAY=MOD(IYD,1000) + CL=GLAT/90. + CL2=CL*CL + IF(IDAY.LT.182) CD=1.-IDAY/91.25 + IF(IDAY.GE.182) CD=IDAY/91.25-3. + CA=0 + IF(PL.GT.-1.11.AND.PL.LE.-.23) CA=1.0 + IF(PL.GT.-.23) CA=(2.79-PL)/(2.79+.23) + IF(PL.LE.-1.11.AND.PL.GT.-3.) CA=(-2.93-PL)/(-2.93+1.11) + Z=ZI-4.87*CL*CD*CA-1.64*CL2*CA+.31*CA*CL + ENDIF + IF(PL.LT.-5.) Z=22.*(PL+4.)**2+110 + L=0 +C ITERATION LOOP + 10 CONTINUE + L=L+1 + CALL GTD6(IYD,SEC,Z,GLAT,GLONG,STL,F107A,F107,AP,48,D,T) + XN=D(1)+D(2)+D(3)+D(4)+D(5)+D(7)+D(8) + P=BM*XN*T(2) + IF(IMR.EQ.1) P=P*1.E-6 + DIFF=PL-ALOG10(P) + IF(ABS(DIFF).LT.TEST .OR. L.EQ.6) GOTO 20 + XM=D(6)/XN/1.66E-24 + IF(IMR.EQ.1) XM = XM*1.E3 + G=GSURF/(1.+Z/RE)**2 + SH=RGAS*T(2)/(XM*G) +C New altitude estimate using scale height + Z=Z-SH*DIFF*2.302 + GOTO 10 + 20 CONTINUE + IF(L.EQ.6) WRITE(6,100) PRESS,DIFF + 100 FORMAT(1X,29HGHP6 NOT CONVERGING FOR PRESS,1PE12.2,E12.2) + ALT=Z + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GLATF(LAT,GV,REFF) +C CALCULATE LATITUDE VARIABLE GRAVITY (GV) AND EFFECTIVE +C RADIUS (REFF) + REAL LAT,LATL + SAVE + DATA DGTR/1.74533E-2/,LATL/-999./ + IF(LAT.NE.LATL) C2 = COS(2.*DGTR*LAT) + LATL=LAT + GV = 980.616*(1.-.0026373*C2) + REFF = 2.*GV/(3.085462E-6 + 2.27E-9*C2)*1.E-5 + RETURN + END +C----------------------------------------------------------------------- + FUNCTION VTST(IYD,SEC,GLAT,GLONG,STL,F107A,F107,AP,IC) +C Test if geophysical variables or switches changed and save +C Return 0 if unchanged and 1 if changed + DIMENSION AP(7),IYDL(2),SECL(2),GLATL(2),GLL(2),STLL(2) + DIMENSION FAL(2),FL(2),APL(7,2),SWL(25,2),SWCL(25,2) + COMMON/CSW/SW(25),ISW,SWC(25) + SAVE + DATA IYDL/2*-999/,SECL/2*-999./,GLATL/2*-999./,GLL/2*-999./ + DATA STLL/2*-999./,FAL/2*-999./,FL/2*-999./,APL/14*-999./ + DATA SWL/50*-999./,SWCL/50*-999./ + VTST=0 + IF(IYD.NE.IYDL(IC)) GOTO 10 + IF(SEC.NE.SECL(IC)) GOTO 10 + IF(GLAT.NE.GLATL(IC)) GOTO 10 + IF(GLONG.NE.GLL(IC)) GOTO 10 + IF(STL.NE.STLL(IC)) GOTO 10 + IF(F107A.NE.FAL(IC)) GOTO 10 + IF(F107.NE.FL(IC)) GOTO 10 + DO 5 I=1,7 + IF(AP(I).NE.APL(I,IC)) GOTO 10 + 5 CONTINUE + DO 7 I=1,25 + IF(SW(I).NE.SWL(I,IC)) GOTO 10 + IF(SWC(I).NE.SWCL(I,IC)) GOTO 10 + 7 CONTINUE + GOTO 20 + 10 CONTINUE + VTST=1 + IYDL(IC)=IYD + SECL(IC)=SEC + GLATL(IC)=GLAT + GLL(IC)=GLONG + STLL(IC)=STL + FAL(IC)=F107A + FL(IC)=F107 + DO 15 I=1,7 + APL(I,IC)=AP(I) + 15 CONTINUE + DO 16 I=1,25 + SWL(I,IC)=SW(I) + SWCL(I,IC)=SWC(I) + 16 CONTINUE + 20 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GTS6(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS,D,T) +C Neutral Thermosphere Model above 72.5 km for MSISE-90 +C A.E.Hedin 3/9/90 +C Coefficients not changed for 120km and above, but results may differ +C by a few percent from MSIS-86 (GTS5) with introduction of a +C latitude dependent accel. of gravity. +C Lower thermosphere reformulated for better continuation into +C lower atmosphere. +C For efficiency: +C Exospheric temperature left at average value for alt below 120km; +C 120 km gradient left at average value for alt below 72 km; +C INPUT: +C IYD - YEAR AND DAY AS YYDDD +C SEC - UT(SEC) +C ALT - ALTITUDE(KM) (GREATER THAN 72.5 KM) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS) +C F107A - 3 MONTH AVERAGE OF F10.7 FLUX +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 59 HRS PRIOR +C TO CURRENT TIME +C MASS - MASS NUMBER (ONLY DENSITY FOR SELECTED GAS IS +C CALCULATED. MASS 0 IS TEMPERATURE. MASS 48 FOR ALL. +C Note: Ut, Local Time, and Longitude are used independently in the +C model and are not of equal importance for every situation. +C For the most physically realistic calculation these three +C variables should be consistent (STL=SEC/3600+GLONG/15). +C OUTPUT: +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C +C The following is for test and special purposes: +C (1) LOWER BOUND QUANTITIES IN COMMON/GTS3C/ +C (2) TO TURN ON AND OFF PARTICULAR VARIATIONS CALL TSELEC(SW) +C WHERE SW IS A 25 ELEMENT ARRAY CONTAINING 0. FOR OFF, 1. +C FOR ON, OR 2. FOR MAIN EFFECTS OFF BUT CROSS TERMS ON +C FOR THE FOLLOWING VARIATIONS +C 1 - F10.7 EFFECT ON MEAN 2 - TIME INDEPENDENT +C 3 - SYMMETRICAL ANNUAL 4 - SYMMETRICAL SEMIANNUAL +C 5 - ASYMMETRICAL ANNUAL 6 - ASYMMETRICAL SEMIANNUAL +C 7 - DIURNAL 8 - SEMIDIURNAL +C 9 - DAILY AP 10 - ALL UT/LONG EFFECTS +C 11 - LONGITUDINAL 12 - UT AND MIXED UT/LONG +C 13 - MIXED AP/UT/LONG 14 - TERDIURNAL +C 15 - DEPARTURES FROM DIFFUSIVE EQUILIBRIUM +C 16 - ALL TINF VAR 17 - ALL TLB VAR +C 18 - ALL TN1 VAR 19 - ALL S VAR +C 20 - ALL TN2 VAR 21 - ALL NLB VAR +C 22 - ALL TN3 VAR 23 - TURBO SCALE HEIGHT VAR +C +C To get current values of SW: CALL TRETRV(SW) +C + LOGICAL METER + DIMENSION ZN1(5) + COMMON/GTS3C/TLB,S,DB04,DB16,DB28,DB32,DB40,DB48,DB01,ZA,T0,Z0 + & ,G0,RL,DD,DB14,TR12 + COMMON/MESO6/TN1(5),TN2(4),TN3(5),TGN1(2),TGN2(2),TGN3(2) + DIMENSION D(8),T(2),MT(10),AP(7),ALTL(8) + COMMON/LOWER6/PTM(10),PDM(10,8) + COMMON/PARM6/PT(150),PD(150,9),PS(150),PDL(25,2),PTL(100,4), + $ PMA(100,10) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/TTEST/TINFG,GB,ROUT,TT(15) + COMMON/DMIX/DM04,DM16,DM28,DM32,DM40,DM01,DM14 + COMMON/METSEL/IMR + SAVE + DATA MT/48,0,4,16,28,32,40,1,49,14/ + DATA ALTL/200.,400.,160.,200.,240.,450.,320.,450./ + DATA MN1/5/,ZN1/120.,110.,100.,90.,72.5/ + DATA DGTR/1.74533E-2/,DR/1.72142E-2/,ALAST/-999./ +Ce Test for changed input + V2=VTST(IYD,SEC,GLAT,GLONG,STL,F107A,F107,AP,2) +C + YRD=IYD + ZA=PDL(16,2) + ZN1(1)=ZA + DO 2 J=1,8 + D(J)=0. + 2 CONTINUE +Ce TINF VARIATIONS NOT IMPORTANT BELOW ZA OR ZN1(1) + IF(ALT.GT.ZN1(1)) THEN + IF(V2.EQ.1..OR.ALAST.LE.ZN1(1)) TINF=PTM(1)*PT(1) + $ *(1.+SW(16)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PT)) + ELSE + TINF=PTM(1)*PT(1) + ENDIF + T(1)=TINF +Ce GRADIENT VARIATIONS NOT IMPORTANT BELOW ZN1(5) + IF(ALT.GT.ZN1(5)) THEN + IF(V2.EQ.1.OR.ALAST.LE.ZN1(5)) G0=PTM(4)*PS(1) + $ *(1.+SW(19)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PS)) + ELSE + G0=PTM(4)*PS(1) + ENDIF +Ce Calculate these temperatures only if input changed + IF(V2.EQ.1.) + $ TLB=PTM(2)*(1.+SW(17)*GLOBE6(YRD,SEC,GLAT,GLONG,STL, + $ F107A,F107,AP,PD(1,4)))*PD(1,4) + S=G0/(TINF-TLB) +Ce Lower thermosphere temp variations not significant for +Ce density above 300 km + IF(ALT.LT.300.) THEN + IF(V2.EQ.1..OR.ALAST.GE.300.) THEN + TN1(2)=PTM(7)*PTL(1,1)/(1.-SW(18)*GLOB6S(PTL(1,1))) + TN1(3)=PTM(3)*PTL(1,2)/(1.-SW(18)*GLOB6S(PTL(1,2))) + TN1(4)=PTM(8)*PTL(1,3)/(1.-SW(18)*GLOB6S(PTL(1,3))) + TN1(5)=PTM(5)*PTL(1,4)/(1.-SW(18)*SW(20)*GLOB6S(PTL(1,4))) + TGN1(2)=PTM(9)*PMA(1,9)*(1.+SW(18)*SW(20)*GLOB6S(PMA(1,9))) + $ *TN1(5)*TN1(5)/(PTM(5)*PTL(1,4))**2 + ENDIF + ELSE + TN1(2)=PTM(7)*PTL(1,1) + TN1(3)=PTM(3)*PTL(1,2) + TN1(4)=PTM(8)*PTL(1,3) + TN1(5)=PTM(5)*PTL(1,4) + TGN1(2)=PTM(9)*PMA(1,9) + $ *TN1(5)*TN1(5)/(PTM(5)*PTL(1,4))**2 + ENDIF +C + Z0=ZN1(4) + T0=TN1(4) + ZLB=PTM(6) + TR12=1. +C + IF(MASS.EQ.0) GO TO 50 +C N2 variation factor at Zlb + G28=SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107, + & AP,PD(1,3)) +C Variation of turbopause height + DAY=AMOD(YRD,1000.) + ZHF=PDL(25,2) + $ *(1.+SW(5)*PDL(25,1)*SIN(DGTR*GLAT)*COS(DR*(DAY-PT(14)))) +C + YRD=IYD + T(1)=TINF + XMM=PDM(5,3) +C + DO 10 J = 1,10 + IF(MASS.EQ.MT(J)) GO TO 15 + 10 CONTINUE + WRITE(6,100) MASS + GO TO 90 + 15 IF(ALT.GT.ALTL(6).AND.MASS.NE.28.AND.MASS.NE.48) GO TO 17 +C +C **** N2 DENSITY **** +C +C Diffusive density at Zlb + DB28 = PDM(1,3)*EXP(G28)*PD(1,3) +C Diffusive density at Alt + D(3)=DENSU(ALT,DB28,TINF,TLB, 28.,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + DD=D(3) +C Turbopause + ZH28=PDM(3,3)*ZHF + ZHM28=PDM(4,3)*PDL(6,2) + XMD=28.-XMM +C Mixed density at Zlb + B28=DENSU(ZH28,DB28,TINF,TLB,XMD,-1.,TZ,ZLB,S,MN1,ZN1,TN1,TGN1) + IF(ALT.GT.ALTL(3).OR.SW(15).EQ.0.) GO TO 17 +C Mixed density at Alt + DM28=DENSU(ALT,B28,TINF,TLB,XMM,0.,TZ,ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(3)=DNET(D(3),DM28,ZHM28,XMM,28.) + 17 CONTINUE + GO TO (20,50,20,25,90,35,40,45,25,48), J + 20 CONTINUE +C +C **** HE DENSITY **** +C +C Density variation factor at Zlb + G4 = SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,1)) +C Diffusive density at Zlb + DB04 = PDM(1,1)*EXP(G4)*PD(1,1) +C Diffusive density at Alt + D(1)=DENSU(ALT,DB04,TINF,TLB, 4.,-.4,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + DD=D(1) + IF(ALT.GT.ALTL(1).OR.SW(15).EQ.0.) GO TO 24 +C Turbopause + ZH04=PDM(3,1) + ZHM04=ZHM28 +C Mixed density at Zlb + B04=DENSU(ZH04,DB04,TINF,TLB,4.-XMM,-1.4, + $ T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM04=DENSU(ALT,B04,TINF,TLB,XMM,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(1)=DNET(D(1),DM04,ZHM04,XMM,4.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,1)/B04) + ZC04=PDM(5,1)*PDL(1,2) + HC04=PDM(6,1)*PDL(2,2) +C Net density corrected at Alt + D(1)=D(1)*CCOR(ALT,RL,HC04,ZC04) + 24 CONTINUE + IF(MASS.NE.48) GO TO 90 + 25 CONTINUE +C +C **** O DENSITY **** +C +C Density variation factor at Zlb + G16= SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,2)) +C Diffusive density at Zlb + DB16 = PDM(1,2)*EXP(G16)*PD(1,2) +C Diffusive density at Alt + D(2)=DENSU(ALT,DB16,TINF,TLB, 16.,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + DD=D(2) + IF(ALT.GT.ALTL(2).OR.SW(15).EQ.0.) GO TO 34 +C Corrected from PDM(3,1) to PDM(3,2) 12/2/85 +C Turbopause + ZH16=PDM(3,2) + ZHM16=ZHM28 +C Mixed density at Zlb + B16=DENSU(ZH16,DB16,TINF,TLB,16-XMM,-1., + $ T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM16=DENSU(ALT,B16,TINF,TLB,XMM,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(2)=DNET(D(2),DM16,ZHM16,XMM,16.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,2)*ABS(PDL(17,2))/B16) + HC16=PDM(6,2)*PDL(4,2) + ZC16=PDM(5,2)*PDL(3,2) + D(2)=D(2)*CCOR(ALT,RL,HC16,ZC16) +C Chemistry correction + HCC16=PDM(8,2)*PDL(14,2) + ZCC16=PDM(7,2)*PDL(13,2) + RC16=PDM(4,2)*PDL(15,2) +C Net density corrected at Alt + D(2)=D(2)*CCOR(ALT,RC16,HCC16,ZCC16) + 34 CONTINUE + IF(MASS.NE.48 .AND. MASS.NE.49) GO TO 90 + 35 CONTINUE +C +C **** O2 DENSITY **** +C +C Density variation factor at Zlb + G32= SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,5)) +C Diffusive density at Zlb + DB32 = PDM(1,4)*EXP(G32)*PD(1,5) +C Diffusive density at Alt + D(4)=DENSU(ALT,DB32,TINF,TLB, 32.,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + IF(MASS.EQ.49) THEN + DD=DD+2.*D(4) + ELSE + DD=D(4) + ENDIF + IF(ALT.GT.ALTL(4).OR.SW(15).EQ.0.) GO TO 39 +C Turbopause + ZH32=PDM(3,4) + ZHM32=ZHM28 +C Mixed density at Zlb + B32=DENSU(ZH32,DB32,TINF,TLB,32.-XMM,-1., + $ T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM32=DENSU(ALT,B32,TINF,TLB,XMM,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(4)=DNET(D(4),DM32,ZHM32,XMM,32.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,4)/B32) + HC32=PDM(6,4)*PDL(8,2) + ZC32=PDM(5,4)*PDL(7,2) +C Net density corrected at Alt + D(4)=D(4)*CCOR(ALT,RL,HC32,ZC32) + 39 CONTINUE + IF(MASS.NE.48) GO TO 90 + 40 CONTINUE +C +C **** AR DENSITY **** +C +C Density variation factor at Zlb + G40= SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,6)) +C Diffusive density at Zlb + DB40 = PDM(1,5)*EXP(G40)*PD(1,6) +C Diffusive density at Alt + D(5)=DENSU(ALT,DB40,TINF,TLB, 40.,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + DD=D(5) + IF(ALT.GT.ALTL(5).OR.SW(15).EQ.0.) GO TO 44 +C Turbopause + ZH40=PDM(3,5) + ZHM40=ZHM28 +C Mixed density at Zlb + B40=DENSU(ZH40,DB40,TINF,TLB,40.-XMM,-1., + $ T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM40=DENSU(ALT,B40,TINF,TLB,XMM,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(5)=DNET(D(5),DM40,ZHM40,XMM,40.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,5)/B40) + HC40=PDM(6,5)*PDL(10,2) + ZC40=PDM(5,5)*PDL(9,2) +C Net density corrected at Alt + D(5)=D(5)*CCOR(ALT,RL,HC40,ZC40) + 44 CONTINUE + IF(MASS.NE.48) GO TO 90 + 45 CONTINUE +C +C **** HYDROGEN DENSITY **** +C +C Density variation factor at Zlb + G1 = SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,7)) +C Diffusive density at Zlb + DB01 = PDM(1,6)*EXP(G1)*PD(1,7) +C Diffusive density at Alt + D(7)=DENSU(ALT,DB01,TINF,TLB,1.,-.4,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + DD=D(7) + IF(ALT.GT.ALTL(7).OR.SW(15).EQ.0.) GO TO 47 +C Turbopause + ZH01=PDM(3,6) + ZHM01=ZHM28 +C Mixed density at Zlb + B01=DENSU(ZH01,DB01,TINF,TLB,1.-XMM,-1.4, + $ T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM01=DENSU(ALT,B01,TINF,TLB,XMM,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(7)=DNET(D(7),DM01,ZHM01,XMM,1.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,6)*ABS(PDL(18,2))/B01) + HC01=PDM(6,6)*PDL(12,2) + ZC01=PDM(5,6)*PDL(11,2) + D(7)=D(7)*CCOR(ALT,RL,HC01,ZC01) +C Chemistry correction + HCC01=PDM(8,6)*PDL(20,2) + ZCC01=PDM(7,6)*PDL(19,2) + RC01=PDM(4,6)*PDL(21,2) +C Net density corrected at Alt + D(7)=D(7)*CCOR(ALT,RC01,HCC01,ZCC01) + 47 CONTINUE + 48 CONTINUE +C +C **** ATOMIC NITROGEN DENSITY **** +C +C Density variation factor at Zlb + G14 = SW(21)*GLOBE6(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,8)) +C Diffusive density at Zlb + DB14 = PDM(1,7)*EXP(G14)*PD(1,8) +C Diffusive density at Alt + D(8)=DENSU(ALT,DB14,TINF,TLB,14.,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + DD=D(8) + IF(ALT.GT.ALTL(8).OR.SW(15).EQ.0.) GO TO 49 +C Turbopause + ZH14=PDM(3,7) + ZHM14=ZHM28 +C Mixed density at Zlb + B14=DENSU(ZH14,DB14,TINF,TLB,14.-XMM,-1., + $ T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM14=DENSU(ALT,B14,TINF,TLB,XMM,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) +C Net density at Alt + D(8)=DNET(D(8),DM14,ZHM14,XMM,14.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,7)*ABS(PDL(3,1))/B14) + HC14=PDM(6,7)*PDL(2,1) + ZC14=PDM(5,7)*PDL(1,1) + D(8)=D(8)*CCOR(ALT,RL,HC14,ZC14) +C Chemistry correction + HCC14=PDM(8,7)*PDL(5,1) + ZCC14=PDM(7,7)*PDL(4,1) + RC14=PDM(4,7)*PDL(6,1) +C Net density corrected at Alt + D(8)=D(8)*CCOR(ALT,RC14,HCC14,ZCC14) + 49 CONTINUE + IF(MASS.NE.48) GO TO 90 +C +C TOTAL MASS DENSITY +C + D(6) = 1.66E-24*(4.*D(1)+16.*D(2)+28.*D(3)+32.*D(4)+40.*D(5)+ + & D(7)+14.*D(8)) + DB48=1.66E-24*(4.*DB04+16.*DB16+28.*DB28+32.*DB32+40.*DB40+DB01+ + & 14.*DB14) + GO TO 90 +C TEMPERATURE AT ALTITUDE + 50 CONTINUE + DDUM=DENSU(ALT,1.,TINF,TLB,0.,0.,T(2),ZLB,S,MN1,ZN1,TN1,TGN1) + GO TO 90 + 90 CONTINUE +C ADJUST DENSITIES FROM CGS TO KGM + IF(IMR.EQ.1) THEN + DO 95 I=1,8 + D(I)=D(I)*1.E6 + 95 CONTINUE + D(6)=D(6)/1000. + ENDIF + ALAST=ALT + RETURN + 100 FORMAT(1X,'MASS', I5, ' NOT VALID') + ENTRY METER6(METER) + IMR=0 + IF(METER) IMR=1 + END +C----------------------------------------------------------------------- + FUNCTION GLOBE6(YRD,SEC,LAT,LONG,TLOC,F107A,F107,AP,P) +C CALCULATE G(L) FUNCTION +C Upper Thermosphere Parameters + REAL LAT, LONG,LONGL + DIMENSION P(150),SV(25),AP(7) + COMMON/TTEST/TINF,GB,ROUT,T(15) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/LPOLY/PLG(9,4),CTLOC,STLOC,C2TLOC,S2TLOC,C3TLOC,S3TLOC, + $ IYR,DAY,DF,DFA,APD,APDF,APT(4),XLONG,CLONG,SLONG + SAVE + DATA DGTR/1.74533E-2/,DR/1.72142E-2/, XL/1000./,TLL/1000./ + DATA SW9/1./,DAYL/-1./,P14/-1000./,P18/-1000./,P32/-1000./ + DATA HR/.2618/,SR/7.2722E-5/,SV/25*1./,NSW/14/,P39/-1000./ + DATA LONGL/-999./ +C 3hr Magnetica activity functions + G0(A)=(A-4.+(P(26)-1.)*(A-4.+(EXP(-ABS(P(25))*(A-4.))-1.)/ABS(P(25 + *)))) + SUMEX(EX)=1.+(1.-EX**19)/(1.-EX)*EX**(.5) + SG0(EX)=(G0(AP(2))+(G0(AP(3))*EX+G0(AP(4))*EX*EX+G0(AP(5))*EX**3 + $ +(G0(AP(6))*EX**4+G0(AP(7))*EX**12)*(1.-EX**8)/(1.-EX)) + $ )/SUMEX(EX) +C + IF(ISW.NE.64999) CALL TSELEC(SV) + DO 10 J=1,14 + T(J)=0 + 10 CONTINUE + IF(SW(9).GT.0) SW9=1. + IF(SW(9).LT.0) SW9=-1. + IYR = YRD/1000. + DAY = YRD - IYR*1000. + XLONG=LONG + IF(XL.EQ.LAT) GO TO 15 +C CALCULATE LEGENDRE POLYNOMIALS + C = SIN(LAT*DGTR) + S = COS(LAT*DGTR) + C2 = C*C + C4 = C2*C2 + S2 = S*S + PLG(2,1) = C + PLG(3,1) = 0.5*(3.*C2 -1.) + PLG(4,1) = 0.5*(5.*C*C2-3.*C) + PLG(5,1) = (35.*C4 - 30.*C2 + 3.)/8. + PLG(6,1) = (63.*C2*C2*C - 70.*C2*C + 15.*C)/8. + PLG(7,1) = (11.*C*PLG(6,1) - 5.*PLG(5,1))/6. +C PLG(8,1) = (13.*C*PLG(7,1) - 6.*PLG(6,1))/7. + PLG(2,2) = S + PLG(3,2) = 3.*C*S + PLG(4,2) = 1.5*(5.*C2-1.)*S + PLG(5,2) = 2.5*(7.*C2*C-3.*C)*S + PLG(6,2) = 1.875*(21.*C4 - 14.*C2 +1.)*S + PLG(7,2) = (11.*C*PLG(6,2)-6.*PLG(5,2))/5. +C PLG(8,2) = (13.*C*PLG(7,2)-7.*PLG(6,2))/6. +C PLG(9,2) = (15.*C*PLG(8,2)-8.*PLG(7,2))/7. + PLG(3,3) = 3.*S2 + PLG(4,3) = 15.*S2*C + PLG(5,3) = 7.5*(7.*C2 -1.)*S2 + PLG(6,3) = 3.*C*PLG(5,3)-2.*PLG(4,3) + PLG(7,3)=(11.*C*PLG(6,3)-7.*PLG(5,3))/4. + PLG(8,3)=(13.*C*PLG(7,3)-8.*PLG(6,3))/5. + PLG(4,4) = 15.*S2*S + PLG(5,4) = 105.*S2*S*C + PLG(6,4)=(9.*C*PLG(5,4)-7.*PLG(4,4))/2. + PLG(7,4)=(11.*C*PLG(6,4)-8.*PLG(5,4))/3. + XL=LAT + 15 CONTINUE + IF(TLL.EQ.TLOC) GO TO 16 + IF(SW(7).EQ.0.AND.SW(8).EQ.0.AND.SW(14).EQ.0) GOTO 16 + STLOC = SIN(HR*TLOC) + CTLOC = COS(HR*TLOC) + S2TLOC = SIN(2.*HR*TLOC) + C2TLOC = COS(2.*HR*TLOC) + S3TLOC = SIN(3.*HR*TLOC) + C3TLOC = COS(3.*HR*TLOC) + TLL = TLOC + 16 CONTINUE + IF(LONG.NE.LONGL) THEN + CLONG=COS(DGTR*LONG) + SLONG=SIN(DGTR*LONG) + ENDIF + LONGL=LONG + IF(DAY.NE.DAYL.OR.P(14).NE.P14) CD14=COS(DR*(DAY-P(14))) + IF(DAY.NE.DAYL.OR.P(18).NE.P18) CD18=COS(2.*DR*(DAY-P(18))) + IF(DAY.NE.DAYL.OR.P(32).NE.P32) CD32=COS(DR*(DAY-P(32))) + IF(DAY.NE.DAYL.OR.P(39).NE.P39) CD39=COS(2.*DR*(DAY-P(39))) + DAYL = DAY + P14 = P(14) + P18 = P(18) + P32 = P(32) + P39 = P(39) +C F10.7 EFFECT + DF = F107 - F107A + DFA=F107A-150. + T(1) = P(20)*DF + P(21)*DF*DF + P(22)*DFA + & + P(30)*DFA**2 + F1 = 1. + (P(48)*DFA +P(20)*DF+P(21)*DF*DF)*SWC(1) + F2 = 1. + (P(50)*DFA+P(20)*DF+P(21)*DF*DF)*SWC(1) +C TIME INDEPENDENT + T(2) = + 1 (P(2)*PLG(3,1) + P(3)*PLG(5,1)+P(23)*PLG(7,1)) + & +(P(15)*PLG(3,1))*DFA*SWC(1) + 2 +P(27)*PLG(2,1) +C SYMMETRICAL ANNUAL + T(3) = + 1 (P(19) )*CD32 +C SYMMETRICAL SEMIANNUAL + T(4) = + 1 (P(16)+P(17)*PLG(3,1))*CD18 +C ASYMMETRICAL ANNUAL + T(5) = F1* + 1 (P(10)*PLG(2,1)+P(11)*PLG(4,1))*CD14 +C ASYMMETRICAL SEMIANNUAL + T(6) = P(38)*PLG(2,1)*CD39 +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + T71 = (P(12)*PLG(3,2))*CD14*SWC(5) + T72 = (P(13)*PLG(3,2))*CD14*SWC(5) + T(7) = F2* + 1 ((P(4)*PLG(2,2) + P(5)*PLG(4,2) + P(28)*PLG(6,2) + 2 + T71)*CTLOC + 4 + (P(7)*PLG(2,2) + P(8)*PLG(4,2) +P(29)*PLG(6,2) + 5 + T72)*STLOC) + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + T81 = (P(24)*PLG(4,3)+P(36)*PLG(6,3))*CD14*SWC(5) + T82 = (P(34)*PLG(4,3)+P(37)*PLG(6,3))*CD14*SWC(5) + T(8) = F2* + 1 ((P(6)*PLG(3,3) + P(42)*PLG(5,3) + T81)*C2TLOC + 3 +(P(9)*PLG(3,3) + P(43)*PLG(5,3) + T82)*S2TLOC) + 210 CONTINUE +C TERDIURNAL + IF(SW(14).EQ.0) GOTO 220 + T(14) = F2* + 1 ((P(40)*PLG(4,4)+(P(94)*PLG(5,4)+P(47)*PLG(7,4))*CD14*SWC(5))* + $ S3TLOC + 2 +(P(41)*PLG(4,4)+(P(95)*PLG(5,4)+P(49)*PLG(7,4))*CD14*SWC(5))* + $ C3TLOC) + 220 CONTINUE +C MAGNETIC ACTIVITY BASED ON DAILY AP + + IF(SW9.EQ.-1.) GO TO 30 + APD=(AP(1)-4.) + P44=P(44) + P45=P(45) + IF(P44.LT.0) P44=1.E-5 + APDF = (APD+(P45-1.)*(APD+(EXP(-P44 *APD)-1.)/P44 )) + IF(SW(9).EQ.0) GOTO 40 + T(9)=APDF*(P(33)+P(46)*PLG(3,1)+P(35)*PLG(5,1)+ + $ (P(101)*PLG(2,1)+P(102)*PLG(4,1)+P(103)*PLG(6,1))*CD14*SWC(5)+ + $ (P(122)*PLG(2,2)+P(123)*PLG(4,2)+P(124)*PLG(6,2))*SWC(7)* + $ COS(HR*(TLOC-P(125)))) + GO TO 40 + 30 CONTINUE + IF(P(52).EQ.0) GO TO 40 + EXP1 = EXP(-10800.*ABS(P(52))/(1.+P(139)*(45.-ABS(LAT)))) + IF(EXP1.GT..99999) EXP1=.99999 + EXP2 = EXP(-10800.*ABS(P(54))) + IF(EXP2.GT..99999) EXP2=.99999 + IF(P(25).LT.1.E-4) P(25)=1.E-4 + APT(1)=SG0(EXP1) + APT(3)=SG0(EXP2) + IF(SW(9).EQ.0) GOTO 40 + T(9) = APT(1)*(P(51)+P(97)*PLG(3,1)+P(55)*PLG(5,1)+ + $ (P(126)*PLG(2,1)+P(127)*PLG(4,1)+P(128)*PLG(6,1))*CD14*SWC(5)+ + $ (P(129)*PLG(2,2)+P(130)*PLG(4,2)+P(131)*PLG(6,2))*SWC(7)* + $ COS(HR*(TLOC-P(132)))) + 40 CONTINUE + IF(SW(10).EQ.0.OR.LONG.LE.-1000.) GO TO 49 +C LONGITUDINAL + IF(SW(11).EQ.0) GOTO 230 + T(11)= (1.+P(81)*DFA*SWC(1))* + $((P(65)*PLG(3,2)+P(66)*PLG(5,2)+P(67)*PLG(7,2) + $ +P(104)*PLG(2,2)+P(105)*PLG(4,2)+P(106)*PLG(6,2) + $ +SWC(5)*(P(110)*PLG(2,2)+P(111)*PLG(4,2)+P(112)*PLG(6,2))*CD14)* + $ CLONG + $ +(P(91)*PLG(3,2)+P(92)*PLG(5,2)+P(93)*PLG(7,2) + $ +P(107)*PLG(2,2)+P(108)*PLG(4,2)+P(109)*PLG(6,2) + $ +SWC(5)*(P(113)*PLG(2,2)+P(114)*PLG(4,2)+P(115)*PLG(6,2))*CD14)* + $ SLONG) + 230 CONTINUE +C UT AND MIXED UT,LONGITUDE + IF(SW(12).EQ.0) GOTO 240 + T(12)=(1.+P(96)*PLG(2,1))*(1.+P(82)*DFA*SWC(1))* + $(1.+P(120)*PLG(2,1)*SWC(5)*CD14)* + $((P(69)*PLG(2,1)+P(70)*PLG(4,1)+P(71)*PLG(6,1))* + $ COS(SR*(SEC-P(72)))) + T(12)=T(12)+SWC(11)* + $ (P(77)*PLG(4,3)+P(78)*PLG(6,3)+P(79)*PLG(8,3))* + $ COS(SR*(SEC-P(80))+2.*DGTR*LONG)*(1.+P(138)*DFA*SWC(1)) + 240 CONTINUE +C UT,LONGITUDE MAGNETIC ACTIVITY + IF(SW(13).EQ.0) GOTO 48 + IF(SW9.EQ.-1.) GO TO 45 + T(13)= APDF*SWC(11)*(1.+P(121)*PLG(2,1))* + $((P( 61)*PLG(3,2)+P( 62)*PLG(5,2)+P( 63)*PLG(7,2))* + $ COS(DGTR*(LONG-P( 64)))) + $ +APDF*SWC(11)*SWC(5)* + $ (P(116)*PLG(2,2)+P(117)*PLG(4,2)+P(118)*PLG(6,2))* + $ CD14*COS(DGTR*(LONG-P(119))) + $ + APDF*SWC(12)* + $ (P( 84)*PLG(2,1)+P( 85)*PLG(4,1)+P( 86)*PLG(6,1))* + $ COS(SR*(SEC-P( 76))) + GOTO 48 + 45 CONTINUE + IF(P(52).EQ.0) GOTO 48 + T(13)=APT(1)*SWC(11)*(1.+P(133)*PLG(2,1))* + $((P(53)*PLG(3,2)+P(99)*PLG(5,2)+P(68)*PLG(7,2))* + $ COS(DGTR*(LONG-P(98)))) + $ +APT(1)*SWC(11)*SWC(5)* + $ (P(134)*PLG(2,2)+P(135)*PLG(4,2)+P(136)*PLG(6,2))* + $ CD14*COS(DGTR*(LONG-P(137))) + $ +APT(1)*SWC(12)* + $ (P(56)*PLG(2,1)+P(57)*PLG(4,1)+P(58)*PLG(6,1))* + $ COS(SR*(SEC-P(59))) + 48 CONTINUE + 49 CONTINUE + TINF=P(31) + DO 50 I = 1,NSW + 50 TINF = TINF + ABS(SW(I))*T(I) + GLOBE6 = TINF + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE TSELEC(SV) +C SET SWITCHES +C SW FOR MAIN TERMS, SWC FOR CROSS TERMS + DIMENSION SV(1),SAV(25),SVV(1) + COMMON/CSW/SW(25),ISW,SWC(25) + SAVE + DO 100 I = 1,25 + SAV(I)=SV(I) + SW(I)=AMOD(SV(I),2.) + IF(ABS(SV(I)).EQ.1.OR.ABS(SV(I)).EQ.2.) THEN + SWC(I)=1. + ELSE + SWC(I)=0. + ENDIF + 100 CONTINUE + ISW=64999 + RETURN + ENTRY TRETRV(SVV) + DO 200 I=1,25 + SVV(I)=SAV(I) + 200 CONTINUE + END +C----------------------------------------------------------------------- + FUNCTION GLOB6S(P) +C VERSION OF GLOBE FOR LOWER ATMOSPHERE 1/17/90 + REAL LONG + COMMON/LPOLY/PLG(9,4),CTLOC,STLOC,C2TLOC,S2TLOC,C3TLOC,S3TLOC, + $ IYR,DAY,DF,DFA,APD,APDF,APT(4),LONG,CLONG,SLONG + COMMON/CSW/SW(25),ISW,SWC(25) + DIMENSION P(100),T(14) + SAVE + DATA DR/1.72142E-2/,DGTR/1.74533E-2/ + DATA DAYL/-1./,P32,P18,P14,P39/4*-1000./ + DO 10 J=1,14 + T(J)=0. + 10 CONTINUE + IF(DAY.NE.DAYL.OR.P32.NE.P(32)) CD32=COS(DR*(DAY-P(32))) + IF(DAY.NE.DAYL.OR.P18.NE.P(18)) CD18=COS(2.*DR*(DAY-P(18))) + IF(DAY.NE.DAYL.OR.P14.NE.P(14)) CD14=COS(DR*(DAY-P(14))) + IF(DAY.NE.DAYL.OR.P39.NE.P(39)) CD39=COS(2.*DR*(DAY-P(39))) + DAYL=DAY + P32=P(32) + P18=P(18) + P14=P(14) + P39=P(39) +C +C F10.7 + T(1)=P(22)*DFA +C TIME INDEPENDENT + T(2)=P(2)*PLG(3,1)+P(3)*PLG(5,1)+P(23)*PLG(7,1) + $ +P(27)*PLG(2,1)+P(28)*PLG(4,1)+P(29)*PLG(6,1) +C SYMMETRICAL ANNUAL + T(3)=(P(19)+P(48)*PLG(3,1)+P(30)*PLG(5,1))*CD32 +C SYMMETRICAL SEMIANNUAL + T(4)=(P(16)+P(17)*PLG(3,1)+P(31)*PLG(5,1))*CD18 +C ASYMMETRICAL ANNUAL + T(5)=(P(10)*PLG(2,1)+P(11)*PLG(4,1)+P(36)*PLG(6,1))*CD14 +C ASYMMETRICAL SEMIANNUAL + T(6)=(P(38)*PLG(2,1))*CD39 +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + T71 = P(12)*PLG(3,2)*CD14*SWC(5) + T72 = P(13)*PLG(3,2)*CD14*SWC(5) + T(7) = + 1 ((P(4)*PLG(2,2) + P(5)*PLG(4,2) + 2 + T71)*CTLOC + 4 + (P(7)*PLG(2,2) + P(8)*PLG(4,2) + 5 + T72)*STLOC) + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + T81 = (P(24)*PLG(4,3)+P(47)*PLG(6,3))*CD14*SWC(5) + T82 = (P(34)*PLG(4,3)+P(49)*PLG(6,3))*CD14*SWC(5) + T(8) = + 1 ((P(6)*PLG(3,3) + P(42)*PLG(5,3) + T81)*C2TLOC + 3 +(P(9)*PLG(3,3) + P(43)*PLG(5,3) + T82)*S2TLOC) + 210 CONTINUE +C TERDIURNAL + IF(SW(14).EQ.0) GOTO 220 + T(14) = P(40)*PLG(4,4)*S3TLOC + $ +P(41)*PLG(4,4)*C3TLOC + 220 CONTINUE +C MAGNETIC ACTIVITY + IF(SW(9).EQ.0) GOTO 40 + IF(SW(9).EQ.1) + $ T(9)=APDF*(P(33)+P(46)*PLG(3,1)*SWC(2)) + IF(SW(9).EQ.-1) + $ T(9)=(P(51)*APT(3)+P(97)*PLG(3,1)*APT(3)*SWC(2)) + 40 CONTINUE + IF(SW(10).EQ.0.OR.SW(11).EQ.0.OR.LONG.LE.-1000.) GO TO 49 +C LONGITUDINAL + T(11)= (1.+PLG(2,1)*(P(81)*SWC(5)*COS(DR*(DAY-P(82))) + $ +P(86)*SWC(6)*COS(2.*DR*(DAY-P(87)))) + $ +P(84)*SWC(3)*COS(DR*(DAY-P(85))) + $ +P(88)*SWC(4)*COS(2.*DR*(DAY-P(89)))) + $ *((P(65)*PLG(3,2)+P(66)*PLG(5,2)+P(67)*PLG(7,2) + $ +P(75)*PLG(2,2)+P(76)*PLG(4,2)+P(77)*PLG(6,2) + $ )*CLONG + $ +(P(91)*PLG(3,2)+P(92)*PLG(5,2)+P(93)*PLG(7,2) + $ +P(78)*PLG(2,2)+P(79)*PLG(4,2)+P(80)*PLG(6,2) + $ )*SLONG) + 49 CONTINUE + TT=0. + DO 50 I=1,14 + 50 TT=TT+ABS(SW(I))*T(I) + GLOB6S=TT + RETURN + END +C-------------------------------------------------------------------- + FUNCTION DENSU(ALT,DLB,TINF,TLB,XM,ALPHA,TZ,ZLB,S2, + $ MN1,ZN1,TN1,TGN1) +C Calculate Temperature and Density Profiles for MSIS models +C New lower thermo polynomial 10/30/89 + DIMENSION ZN1(MN1),TN1(MN1),TGN1(2),XS(5),YS(5),Y2OUT(5) + COMMON/PARMB/GSURF,RE + COMMON/LSQV/MP,II,JG,LT,QPB(50),IERR,IFUN,N,J,DV(60) + SAVE + DATA RGAS/831.4/ + ZETA(ZZ,ZL)=(ZZ-ZL)*(RE+ZL)/(RE+ZZ) +CCCCCCWRITE(6,*) 'DB',ALT,DLB,TINF,TLB,XM,ALPHA,ZLB,S2,MN1,ZN1,TN1 + DENSU=1. +C Joining altitude of Bates and spline + ZA=ZN1(1) + Z=AMAX1(ALT,ZA) +C Geopotential altitude difference from ZLB + ZG2=ZETA(Z,ZLB) +C Bates temperature + TT=TINF-(TINF-TLB)*EXP(-S2*ZG2) + TA=TT + TZ=TT + DENSU=TZ + IF(ALT.GE.ZA) GO TO 10 +C +C CALCULATE TEMPERATURE BELOW ZA +C Temperature gradient at ZA from Bates profile + DTA=(TINF-TA)*S2*((RE+ZLB)/(RE+ZA))**2 + TGN1(1)=DTA + TN1(1)=TA + Z=AMAX1(ALT,ZN1(MN1)) + MN=MN1 + Z1=ZN1(1) + Z2=ZN1(MN) + T1=TN1(1) + T2=TN1(MN) +C Geopotental difference from Z1 + ZG=ZETA(Z,Z1) + ZGDIF=ZETA(Z2,Z1) +C Set up spline nodes + DO 20 K=1,MN + XS(K)=ZETA(ZN1(K),Z1)/ZGDIF + YS(K)=1./TN1(K) + 20 CONTINUE +C End node derivatives + YD1=-TGN1(1)/(T1*T1)*ZGDIF + YD2=-TGN1(2)/(T2*T2)*ZGDIF*((RE+Z2)/(RE+Z1))**2 +C Calculate spline coefficients + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) + X=ZG/ZGDIF + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) +C temperature at altitude + TZ=1./Y + DENSU=TZ + 10 IF(XM.EQ.0.) GO TO 50 +C +C CALCULATE DENSITY ABOVE ZA + GLB=GSURF/(1.+ZLB/RE)**2 + GAMMA=XM*GLB/(S2*RGAS*TINF) + EXPL=EXP(-S2*GAMMA*ZG2) + IF(EXPL.GT.50.OR.TT.LE.0.) THEN + EXPL=50. + ENDIF +C Density at altitude + DENSA=DLB*(TLB/TT)**(1.+ALPHA+GAMMA)*EXPL + DENSU=DENSA + IF(ALT.GE.ZA) GO TO 50 +C +C CALCULATE DENSITY BELOW ZA + GLB=GSURF/(1.+Z1/RE)**2 + GAMM=XM*GLB*ZGDIF/RGAS +C integrate spline temperatures + CALL SPLINI(XS,YS,Y2OUT,MN,X,YI) + EXPL=GAMM*YI + IF(EXPL.GT.50..OR.TZ.LE.0.) THEN + EXPL=50. + ENDIF +C Density at altitude + DENSU=DENSU*(T1/TZ)**(1.+ALPHA)*EXP(-EXPL) + 50 CONTINUE + RETURN + END +C-------------------------------------------------------------------- + FUNCTION DENSM(ALT,D0,XM,TZ,MN3,ZN3,TN3,TGN3,MN2,ZN2,TN2,TGN2) +C Calculate Temperature and Density Profiles for lower atmos. + DIMENSION ZN3(MN3),TN3(MN3),TGN3(2),XS(10),YS(10),Y2OUT(10) + DIMENSION ZN2(MN2),TN2(MN2),TGN2(2) + COMMON/PARMB/GSURF,RE + COMMON/FIT/TAF + COMMON/LSQV/MP,II,JG,LT,QPB(50),IERR,IFUN,N,J,DV(60) + SAVE + DATA RGAS/831.4/ + ZETA(ZZ,ZL)=(ZZ-ZL)*(RE+ZL)/(RE+ZZ) + DENSM=D0 + IF(ALT.GT.ZN2(1)) GOTO 50 +C STRATOSPHERE/MESOSPHERE TEMPERATURE + Z=AMAX1(ALT,ZN2(MN2)) + MN=MN2 + Z1=ZN2(1) + Z2=ZN2(MN) + T1=TN2(1) + T2=TN2(MN) + ZG=ZETA(Z,Z1) + ZGDIF=ZETA(Z2,Z1) +C Set up spline nodes + DO 210 K=1,MN + XS(K)=ZETA(ZN2(K),Z1)/ZGDIF + YS(K)=1./TN2(K) + 210 CONTINUE + YD1=-TGN2(1)/(T1*T1)*ZGDIF + YD2=-TGN2(2)/(T2*T2)*ZGDIF*((RE+Z2)/(RE+Z1))**2 +C Calculate spline coefficients + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) + X=ZG/ZGDIF + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) +C Temperature at altitude + TZ=1./Y + IF(XM.EQ.0.) GO TO 20 +C +C CALCULATE STRATOSPHERE/MESOSPHERE DENSITY + GLB=GSURF/(1.+Z1/RE)**2 + GAMM=XM*GLB*ZGDIF/RGAS +C Integrate temperature profile + CALL SPLINI(XS,YS,Y2OUT,MN,X,YI) + EXPL=GAMM*YI + IF(EXPL.GT.50.) EXPL=50. +C Density at altitude + DENSM=DENSM*(T1/TZ)*EXP(-EXPL) + 20 CONTINUE + IF(ALT.GT.ZN3(1)) GOTO 50 +C +C TROPOSPHERE/STRATOSPHERE TEMPERATURE + Z=ALT + MN=MN3 + Z1=ZN3(1) + Z2=ZN3(MN) + T1=TN3(1) + T2=TN3(MN) + ZG=ZETA(Z,Z1) + ZGDIF=ZETA(Z2,Z1) +C Set up spline nodes + DO 220 K=1,MN + XS(K)=ZETA(ZN3(K),Z1)/ZGDIF + YS(K)=1./TN3(K) + 220 CONTINUE + YD1=-TGN3(1)/(T1*T1)*ZGDIF + YD2=-TGN3(2)/(T2*T2)*ZGDIF*((RE+Z2)/(RE+Z1))**2 +C Calculate spline coefficients + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) + X=ZG/ZGDIF + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) +C temperature at altitude + TZ=1./Y + IF(XM.EQ.0.) GO TO 30 +C +C CALCULATE TROPOSPHERIC/STRATOSPHERE DENSITY +C + GLB=GSURF/(1.+Z1/RE)**2 + GAMM=XM*GLB*ZGDIF/RGAS +C Integrate temperature profile + CALL SPLINI(XS,YS,Y2OUT,MN,X,YI) + EXPL=GAMM*YI + IF(EXPL.GT.50.) EXPL=50. +C Density at altitude + DENSM=DENSM*(T1/TZ)*EXP(-EXPL) + 30 CONTINUE + 50 CONTINUE + IF(XM.EQ.0) DENSM=TZ + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINE(X,Y,N,YP1,YPN,Y2) +C CALCULATE 2ND DERIVATIVES OF CUBIC SPLINE INTERP FUNCTION +C ADAPTED FROM NUMERICAL RECIPES BY PRESS ET AL +C X,Y: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C N: SIZE OF ARRAYS X,Y +C YP1,YPN: SPECIFIED DERIVATIVES AT X(1) AND X(N); VALUES +C >= 1E30 SIGNAL SIGNAL SECOND DERIVATIVE ZERO +C Y2: OUTPUT ARRAY OF SECOND DERIVATIVES + PARAMETER (NMAX=100) + DIMENSION X(N),Y(N),Y2(N),U(NMAX) + SAVE + IF(YP1.GT..99E30) THEN + Y2(1)=0 + U(1)=0 + ELSE + Y2(1)=-.5 + U(1)=(3./(X(2)-X(1)))*((Y(2)-Y(1))/(X(2)-X(1))-YP1) + ENDIF + DO 11 I=2,N-1 + SIG=(X(I)-X(I-1))/(X(I+1)-X(I-1)) + P=SIG*Y2(I-1)+2. + Y2(I)=(SIG-1.)/P + U(I)=(6.*((Y(I+1)-Y(I))/(X(I+1)-X(I))-(Y(I)-Y(I-1)) + $ /(X(I)-X(I-1)))/(X(I+1)-X(I-1))-SIG*U(I-1))/P + 11 CONTINUE + IF(YPN.GT..99E30) THEN + QN=0 + UN=0 + ELSE + QN=.5 + UN=(3./(X(N)-X(N-1)))*(YPN-(Y(N)-Y(N-1))/(X(N)-X(N-1))) + ENDIF + Y2(N)=(UN-QN*U(N-1))/(QN*Y2(N-1)+1.) + DO 12 K=N-1,1,-1 + Y2(K)=Y2(K)*Y2(K+1)+U(K) + 12 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINT(XA,YA,Y2A,N,X,Y) +C CALCULATE CUBIC SPLINE INTERP VALUE +C ADAPTED FROM NUMBERICAL RECIPES BY PRESS ET AL. +C XA,YA: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C Y2A: ARRAY OF SECOND DERIVATIVES +C N: SIZE OF ARRAYS XA,YA,Y2A +C X: ABSCISSA FOR INTERPOLATION +C Y: OUTPUT VALUE + DIMENSION XA(N),YA(N),Y2A(N) + SAVE + KLO=1 + KHI=N + 1 CONTINUE + IF(KHI-KLO.GT.1) THEN + K=(KHI+KLO)/2 + IF(XA(K).GT.X) THEN + KHI=K + ELSE + KLO=K + ENDIF + GOTO 1 + ENDIF + H=XA(KHI)-XA(KLO) + IF(H.EQ.0) WRITE(6,*) 'BAD XA INPUT TO SPLINT' + A=(XA(KHI)-X)/H + B=(X-XA(KLO))/H + Y=A*YA(KLO)+B*YA(KHI)+ + $ ((A*A*A-A)*Y2A(KLO)+(B*B*B-B)*Y2A(KHI))*H*H/6. + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINI(XA,YA,Y2A,N,X,YI) +C INTEGRATE CUBIC SPLINE FUNCTION FROM XA(1) TO X +C XA,YA: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C Y2A: ARRAY OF SECOND DERIVATIVES +C N: SIZE OF ARRAYS XA,YA,Y2A +C X: ABSCISSA ENDPOINT FOR INTEGRATION +C Y: OUTPUT VALUE + DIMENSION XA(N),YA(N),Y2A(N) + SAVE + YI=0 + KLO=1 + KHI=2 + 1 CONTINUE + IF(X.GT.XA(KLO).AND.KHI.LE.N) THEN + XX=X + IF(KHI.LT.N) XX=AMIN1(X,XA(KHI)) + H=XA(KHI)-XA(KLO) + A=(XA(KHI)-XX)/H + B=(XX-XA(KLO))/H + A2=A*A + B2=B*B + YI=YI+((1.-A2)*YA(KLO)/2.+B2*YA(KHI)/2.+ + $ ((-(1.+A2*A2)/4.+A2/2.)*Y2A(KLO)+ + $ (B2*B2/4.-B2/2.)*Y2A(KHI))*H*H/6.)*H + KLO=KLO+1 + KHI=KHI+1 + GOTO 1 + ENDIF + RETURN + END +C----------------------------------------------------------------------- + FUNCTION DNET(DD,DM,ZHM,XMM,XM) +C TURBOPAUSE CORRECTION FOR MSIS MODELS +C Root mean density +C 8/20/80 +C DD - diffusive density +C DM - full mixed density +C ZHM - transition scale length +C XMM - full mixed molecular weight +C XM - species molecular weight +C DNET - combined density + SAVE + A=ZHM/(XMM-XM) + IF(DM.GT.0.AND.DD.GT.0) GOTO 5 + WRITE(6,*) 'DNET LOG ERROR',DM,DD,XM + IF(DD.EQ.0.AND.DM.EQ.0) DD=1. + IF(DM.EQ.0) GOTO 10 + IF(DD.EQ.0) GOTO 20 + 5 CONTINUE + YLOG=A*ALOG(DM/DD) + IF(YLOG.LT.-10.) GO TO 10 + IF(YLOG.GT.10.) GO TO 20 + DNET=DD*(1.+EXP(YLOG))**(1/A) + GO TO 50 + 10 CONTINUE + DNET=DD + GO TO 50 + 20 CONTINUE + DNET=DM + GO TO 50 + 50 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + FUNCTION CCOR(ALT, R,H1,ZH) +C CHEMISTRY/DISSOCIATION CORRECTION FOR MSIS MODELS +C ALT - altitude +C R - target ratio +C H1 - transition scale length +C ZH - altitude of 1/2 R + SAVE + E=(ALT-ZH)/H1 + IF(E.GT.70.) GO TO 20 + IF(E.LT.-70.) GO TO 10 + EX=EXP(E) + CCOR=R/(1.+EX) + GO TO 50 + 10 CCOR=R + GO TO 50 + 20 CCOR=0. + GO TO 50 + 50 CONTINUE + CCOR=EXP(CCOR) + RETURN + END +C----------------------------------------------------------------------- + BLOCK DATA GTD6BK +C MSISE 90 12-MAR-90 + COMMON/PARM6/PT1(50),PT2(50),PT3(50),PA1(50),PA2(50),PA3(50), + $ PB1(50),PB2(50),PB3(50),PC1(50),PC2(50),PC3(50), + $ PD1(50),PD2(50),PD3(50),PE1(50),PE2(50),PE3(50), + $ PF1(50),PF2(50),PF3(50),PG1(50),PG2(50),PG3(50), + $ PH1(50),PH2(50),PH3(50),PI1(50),PI2(50),PI3(50), + $ PJ1(50),PJ2(50),PJ3(50),PK1(50),PL1(50),PL2(50), + $ PM1(50),PM2(50),PN1(50),PN2(50),PO1(50),PO2(50), + $ PP1(50),PP2(50),PQ1(50),PQ2(50),PR1(50),PR2(50), + $ PS1(50),PS2(50),PU1(50),PU2(50),PV1(50),PV2(50), + $ PW1(50),PW2(50),PX1(50),PX2(50),PY1(50),PY2(50), + $ PZ1(50),PZ2(50) + COMMON/LOWER6/PTM(10),PDM(10,8) + COMMON/MAVG6/PAVGM(10) + COMMON/DATIM6/ISDATE(3),ISTIME(2),NAME(2) + COMMON/METSEL/IMR + DATA IMR/0/ + DATA ISDATE/'12-M','AR-9','0 '/,ISTIME/'15:0','9:04'/ + DATA NAME/'MSIS','E 90'/ +C TEMPERATURE + DATA PT1/ + * 9.96040E-01, 3.85528E-02, 3.03445E-03,-1.05531E-01,-6.07134E-03, + * -5.16278E-04,-1.15622E-01, 2.02240E-03, 9.90156E-03,-1.27371E-01, + * -3.02449E-02, 1.23512E-02,-5.26277E-03,-8.45398E+00, 0.00000E+00, + * 1.42370E-02, 0.00000E+00, 1.25818E+02, 8.05486E-03, 1.64419E-03, + * -6.21452E-06, 3.11701E-03, 0.00000E+00, 3.86578E-03, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.41110E-06, + * 0.00000E+00, 3.00150E+01, 5.33297E-03, 3.89146E-03, 2.04725E-03, + * 0.00000E+00, 0.00000E+00,-1.92645E-02, 2.75905E+00, 1.47284E-03, + * 3.41345E-04,-1.17388E-03,-3.54589E-04, 1.13139E-01, 1.69134E-01, + * 5.08295E-03, 3.65016E-05, 4.26385E-03, 1.15102E-04, 5.11819E-03/ + DATA PT2/ + * 6.09108E-03, 4.04995E-05, 1.53049E-03, 2.41470E-05, 2.30764E-03, + * 1.55267E-03, 1.33722E-03,-1.82318E-03,-2.63007E+02, 0.00000E+00, + * 1.37337E-03, 9.95774E-04, 0.00000E+00,-1.08983E+02, 5.62606E-03, + * 5.94053E-03, 1.09358E-03, 0.00000E+00,-1.33410E-02,-2.43409E-02, + * -1.35688E-02, 3.11370E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -2.83023E+03, 8.45583E-04, 5.38706E-04, 0.00000E+00, 2.47956E+02, + * 2.92246E-03, 0.00000E+00, 0.00000E+00, 7.47703E-05, 8.87993E-04, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -1.16540E-02,-4.49173E-03,-3.53189E-04,-1.73933E-04,-1.53218E-04, + * -5.65411E-01, 7.77272E-03,-9.11784E+01, 6.45187E-04, 0.00000E+00/ + DATA PT3/ + * -8.37685E-04, 2.42318E-03, 4.73796E-03,-3.01801E-03,-4.23564E-03, + * -2.48289E-03, 9.19286E-04, 2.16372E-03, 8.63968E-04, 1.89689E-03, + * 4.15654E-03, 0.00000E+00, 1.18068E-02, 3.31190E-03, 0.00000E+00, + * 1.20222E-03, 0.00000E+00, 0.00000E+00,-3.07246E+00, 0.00000E+00, + * 0.00000E+00, 6.72403E-04, 1.08930E-03, 9.72278E-04, 4.68242E+00, + * -3.15034E-04, 4.00059E-03, 5.15036E-03, 1.62989E-03, 1.08824E-03, + * 9.95261E-04, 4.18955E+00,-3.64059E-01, 1.70182E-03, 0.00000E+00, + * 0.00000E+00,-3.20120E+00, 0.00000E+00, 5.80206E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C HE DENSITY + DATA PA1/ + * 1.04934E+00,-2.88362E-02,-2.07095E-01,-1.03314E-01,-7.02373E-03, + * 1.29664E-02, 4.08853E-01,-9.19895E-03,-1.88660E-02, 1.40927E+00, + * 1.75033E-01, 1.87351E-02, 1.10979E-01,-7.42871E+00, 0.00000E+00, + * 2.67143E-01,-5.95979E-02, 1.05038E+02,-8.40963E-02,-6.97632E-04, + * 2.06521E-06, 7.65306E-04, 0.00000E+00, 0.00000E+00, 1.26762E-01, + * 1.28876E-01,-5.04479E-02,-1.30735E-02,-2.24348E-02, 0.00000E+00, + * 0.00000E+00,-1.50832E+02,-6.29928E-03, 0.00000E+00,-4.07760E-03, + * 0.00000E+00, 0.00000E+00, 5.25725E-02,-3.11486E+01,-3.13351E-03, + * 2.75838E-03, 0.00000E+00, 0.00000E+00, 1.11247E-01, 1.08815E-01, + * -4.66713E-02, 0.00000E+00,-3.29329E-03, 0.00000E+00, 1.67838E-03/ + DATA PA2/ + * -9.16691E-03, 3.45044E-05,-9.71806E-03, 0.00000E+00,-2.04672E-03, + * -7.86899E-03,-7.98285E-03, 5.36515E-03,-5.31172E+03, 0.00000E+00, + * -6.42781E-03,-1.71690E-03, 0.00000E+00,-6.79131E+01,-1.79912E-02, + * -1.58305E-02,-7.12313E-03, 0.00000E+00, 2.53477E-02, 8.52960E-02, + * 1.02163E-01, 2.95009E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -6.84625E+03,-6.19098E-03,-2.69289E-03, 0.00000E+00,-5.20231E+02, + * -6.33463E-03, 0.00000E+00, 0.00000E+00,-6.02428E-03,-4.07077E-03, + * 5.42264E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 4.07560E-02, 2.82288E-02, 9.08088E-03, 0.00000E+00, 0.00000E+00, + * -4.05204E-01,-5.97931E-02,-7.31823E+01,-2.06620E-03, 0.00000E+00/ + DATA PA3/ + * -3.72723E-03,-1.88146E-02,-1.01794E-02, 8.04633E-03, 1.01090E-02, + * 8.73253E-03, 2.38268E-02, 4.80444E-03, 1.71088E-03, 3.96369E-02, + * -2.13809E-02, 0.00000E+00,-1.02588E-01,-5.91702E-03, 0.00000E+00, + * 2.70923E-03, 0.00000E+00, 0.00000E+00,-1.75043E+02, 6.03489E-01, + * -6.17589E-01, 8.38098E-03, 1.83871E-03,-7.05329E-04,-4.06644E+00, + * -5.09347E-03,-2.84344E-02,-1.24160E-02, 1.33665E-02, 3.93410E-03, + * -5.03723E-04,-4.57683E+00,-5.29542E-01,-4.25812E-03, 0.00000E+00, + * 0.00000E+00, 1.91541E+01, 0.00000E+00, 3.23247E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C O DENSITY + DATA PB1/ + * 9.31113E-01,-1.38721E-01,-1.33457E-01,-5.29542E-02,-4.44983E-03, + * 1.35264E-02, 5.98075E-02,-3.62880E-02,-3.12798E-02, 3.72068E-01, + * 2.95974E-02, 1.20509E-02, 5.21995E-02,-7.78888E+00, 0.00000E+00, + * 1.18634E-01,-2.04495E-02, 1.03280E+02, 9.82432E-02, 4.77694E-04, + * 0.00000E+00, 2.74372E-03, 0.00000E+00, 0.00000E+00, 7.57809E-02, + * 1.71403E-01,-1.05205E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-8.73348E+00,-5.81094E-03, 0.00000E+00,-8.14944E-03, + * 0.00000E+00, 0.00000E+00, 5.17255E-02,-1.53028E+01,-3.48932E-03, + * 9.61771E-04, 5.57732E-03,-4.54180E-04, 9.88213E-02, 9.40456E-02, + * -3.18797E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.32122E-03/ + DATA PB2/ + * -6.00220E-03, 2.77654E-05,-3.22019E-03, 0.00000E+00,-3.78551E-03, + * -3.34809E-03,-1.70668E-03, 0.00000E+00, 6.36184E+03, 0.00000E+00, + * 1.59986E-03,-3.88204E-03,-1.64825E-03,-7.47955E+01,-1.05360E-02, + * -9.45723E-03,-1.59824E-03,-7.06730E-04,-1.68513E-02,-1.13023E-01, + * -6.36637E-02,-1.37709E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -1.52368E+04,-5.86061E-03,-2.53108E-03, 0.00000E+00,-2.54837E+03, + * -3.28988E-03, 0.00000E+00, 0.00000E+00,-2.76364E-03, 9.67923E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 4.34255E-02, 1.14020E-02,-6.18447E-03, 0.00000E+00, 0.00000E+00, + * -3.02568E-01,-3.27694E-02,-6.71589E+01,-2.28340E-03, 0.00000E+00/ + DATA PB3/ + * 3.06230E-03,-4.65113E-03,-9.73421E-03, 1.28326E-02, 7.88553E-03, + * 7.97197E-03,-1.20760E-02,-7.67547E-03,-1.20755E-03,-2.98523E-02, + * -1.26560E-02, 0.00000E+00,-5.68350E-02,-1.53039E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.42911E-03,-4.01347E-03,-2.19074E-03, 3.11281E+00, + * 3.23251E-03,-6.39523E-03,-6.63069E-03,-3.04403E-04,-4.01920E-03, + * -1.18708E-03, 4.15211E+00,-2.01896E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C N2 DENSITY + DATA PC1/ + * 1.06903E+00, 0.00000E+00, 0.00000E+00, 3.66210E-03, 0.00000E+00, + * 1.90412E-02,-1.78929E-03, 0.00000E+00,-3.92257E-02,-1.19444E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.45398E+00, 0.00000E+00, + * 2.08180E-02, 0.00000E+00, 1.39638E+02, 8.98481E-02, 0.00000E+00, + * 0.00000E+00, 3.77113E-04, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.36325E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.43022E-03, + * -3.99776E-06, 6.32343E-03, 5.48144E-03, 1.13139E-01, 1.69134E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PC2/ + * 0.00000E+00, 2.41470E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PC3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TLB + DATA PD1/ + * 9.76619E-01, 0.00000E+00, 0.00000E+00,-2.00200E-02, 0.00000E+00, + * -9.38391E-03,-1.95833E-03, 0.00000E+00, 1.31480E-02,-1.92414E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.45398E+00, 0.00000E+00, + * 1.07674E-02, 0.00000E+00, 8.93820E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 5.68478E-04, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.66814E-03, 0.00000E+00, 0.00000E+00, + * 5.11651E-05, 2.55717E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.60147E-03,-8.08556E-04, 1.13139E-01, 1.69134E-01, + * 6.64196E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PD2/ + * 5.82026E-03, 2.41470E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 6.21998E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PD3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C O2 DENSITY + DATA PE1/ + * 9.31402E-01, 1.37976E-01, 0.00000E+00, 3.23736E-04, 0.00000E+00, + * -9.10906E-03, 7.07506E-02, 0.00000E+00,-5.16650E-02, 6.89755E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.45398E+00, 0.00000E+00, + * 2.81140E-02, 0.00000E+00, 7.36009E+01, 5.96604E-02, 0.00000E+00, + * 0.00000E+00,-1.51792E-03, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 9.48758E+00, 8.84541E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.13139E-01, 1.69134E-01, + * 1.45192E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PE2/ + * 1.07906E-02, 2.99942E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.48930E-02, + * -7.87184E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -6.83420E-02,-4.41778E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.29730E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PE3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C AR DENSITY + DATA PF1/ + * 8.68053E-01, 2.36364E-01, 1.34306E-01, 1.03086E-02, 0.00000E+00, + * -3.79164E-03,-1.57806E-01, 0.00000E+00,-5.87644E-02,-3.12508E-01, + * 0.00000E+00, 4.37387E-02,-3.54091E-02,-2.23636E+01, 0.00000E+00, + * -5.33976E-02, 0.00000E+00, 1.14091E+02, 5.17497E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 3.42702E+02, 1.57033E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.66278E-03, + * -1.16193E-03, 0.00000E+00, 0.00000E+00, 1.13139E-01, 1.69134E-01, + * 1.78431E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PF2/ + * 1.62864E-02, 3.16963E-05, 1.27968E-02, 0.00000E+00, 0.00000E+00, + * -7.04599E-03, 2.07921E-03, 6.36660E-03, 2.29940E+04, 0.00000E+00, + * 1.27833E-02,-2.08036E-03,-4.61820E-03,-6.29391E+01,-1.20745E-02, + * 1.36675E-02, 1.36011E-02,-5.37162E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.92509E+04, 8.35522E-03, 4.19439E-03, 0.00000E+00, 1.20366E+04, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.00034E-02,-2.33267E-03, + * 9.72374E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -2.65079E-02,-2.09125E-02,-1.09465E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.17252E-02,-7.12385E+01,-1.89428E-03, 0.00000E+00/ + DATA PF3/ + * -6.02006E-03, 1.69058E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.90646E-02, + * 3.48971E-03, 0.00000E+00, 5.01174E-02, 5.50595E-02, 0.00000E+00, + * -9.55897E-03, 0.00000E+00, 0.00000E+00,-1.51693E+03, 0.00000E+00, + * 0.00000E+00, 1.29306E-02, 2.69567E-03, 0.00000E+00, 3.92243E+00, + * -8.47690E-03, 1.16896E-02, 0.00000E+00, 1.48967E-02, 5.44521E-03, + * 0.00000E+00, 5.64918E+00, 0.00000E+00,-7.72178E-03, 0.00000E+00, + * 0.00000E+00,-7.34042E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C H DENSITY + DATA PG1/ + * 1.27515E+00,-2.10472E-01,-1.77924E-01, 2.18900E-01, 2.88436E-02, + * 1.90077E-02, 2.91001E-01, 2.17437E-02,-1.05186E-02, 4.36141E-01, + * 1.07605E-01, 3.30755E-02, 4.00581E-02,-9.58051E+00, 0.00000E+00, + * 1.54028E-02, 0.00000E+00, 7.34194E+01, 4.96540E-02,-5.95906E-03, + * 3.84512E-05,-1.36000E-02, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01,-4.16610E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.46276E+02,-1.98408E-02, 0.00000E+00, 1.32530E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.04687E-04, + * -1.47562E-03, 0.00000E+00, 0.00000E+00, 1.13139E-01, 1.69134E-01, + * -1.26913E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.08370E-03/ + DATA PG2/ + * -2.57587E-02, 3.19022E-05, 0.00000E+00, 0.00000E+00, 1.56644E-02, + * 1.03640E-02, 1.05771E-03, 0.00000E+00, 3.57949E+03, 0.00000E+00, + * -1.25672E-03, 1.52783E-03, 1.30518E-03, 7.55558E+00,-9.20341E-03, + * -2.09142E-02,-1.34106E-02, 0.00000E+00,-4.83312E-02, 8.30900E-02, + * 9.88009E-02,-1.41148E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -1.05513E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.73442E-03, 2.01691E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 5.98019E-02, 6.33298E-03,-1.12871E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.28604E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PG3/ + * -4.94960E-03,-1.36415E-02,-1.15039E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-5.86860E-03,-1.41732E-03, 2.13697E-03, 2.63845E+00, + * -8.34186E-03,-1.87336E-02,-1.90870E-02,-8.03810E-03,-2.84279E-03, + * 2.56722E-03, 1.71429E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C N DENSITY + DATA PH1/ + * 5.73587E+01,-3.98747E-01, 0.00000E+00,-5.29554E-01,-5.82186E-03, + * 7.14177E-02,-6.79279E-01,-1.67715E-01,-6.42434E-02,-2.11569E-01, + * -1.59922E-01,-1.71024E-04,-1.15885E-01, 6.51603E+00, 0.00000E+00, + * -1.76683E-01, 6.50395E-02, 1.43504E+00, 9.28208E-02, 5.11662E-03, + * 0.00000E+00, 9.95121E-03, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01, 1.01451E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 5.67667E+01, 2.38192E-03, 0.00000E+00,-1.88240E-02, + * 0.00000E+00, 0.00000E+00, 4.76218E-02, 2.35206E+01, 4.75901E-03, + * 5.76162E-03, 1.51815E-02,-1.92730E-02, 1.13139E-01, 1.69134E-01, + * -2.88771E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.18418E-03/ + DATA PH2/ + * -3.68927E-03, 3.14704E-05, 8.82198E-03, 0.00000E+00,-1.92562E-02, + * -2.58674E-03,-2.19913E-02, 0.00000E+00, 4.38655E+03, 0.00000E+00, + * 7.60126E-03, 2.59438E-03, 1.72310E-03, 7.79204E+01, 7.97786E-04, + * -7.70510E-03, 1.90982E-03, 2.72707E-03, 1.01016E-02, 1.16537E-01, + * -3.12236E-03, 1.39783E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -1.30712E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.20544E-03,-2.06970E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.59010E-02,-1.91427E-03,-3.42829E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-3.45379E-02, 8.94518E+01, 1.71556E-03, 0.00000E+00/ + DATA PH3/ + * -7.65278E-03,-2.08987E-04,-1.57393E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-8.60673E-03,-1.19922E-02,-6.46356E-03,-3.00107E+00, + * -9.32511E-03,-1.50205E-02,-8.67835E-03,-7.64801E-03,-1.31495E-02, + * -6.76720E-03,-1.82396E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C SPARE + DATA PI1/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.45398E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.13139E-01, 1.69134E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PI2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PI3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C S PARAM + DATA PJ1/ + * 9.51363E-01,-4.67542E-02, 1.20260E-01, 0.00000E+00, 0.00000E+00, + * 1.91357E-02, 0.00000E+00, 0.00000E+00, 1.25429E-03,-1.33240E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.45398E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.52317E-03, 0.00000E+00,-9.73404E-03, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.18482E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 7.87683E-03,-2.33698E-03, 1.13139E-01, 1.69134E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PJ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PJ3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TURBO + DATA PK1/ + * 9.33804E-01, 5.47446E+00, 1.53263E-01, 9.19303E-01, 1.64109E+01, + * 4.27083E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.40925E-01, + * 1.15897E+00, 4.71094E-01, 1.09459E+00, 5.25012E+00, 1.00000E+00, + * 1.00000E+00, 1.03999E+00, 7.67132E-01, 1.10514E+00, 1.75636E+00, + * 1.10845E+00, 2.33439E+00, 7.96532E-01, 4.31520E+00, 4.07300E+00, + * 1.22807E+02, 2.39547E-01, 2.53791E-06, 8.42931E-01, 1.04192E+00, + * 2.00202E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 9.62736E-01/ +C LOWER BOUNDARY + DATA PTM/ + L 1.04130E+03, 3.86000E+02, 1.95000E+02, 1.66728E+01, 2.13000E+02, + L 1.20000E+02, 2.40000E+02, 1.87000E+02,-2.00000E+00, 0.00000E+00/ + DATA PDM/ + L 2.45600E+07, 6.71072E-06, 1.00000E+02, 0.00000E+00, 1.10000E+02, + L 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 8.59400E+10, 5.40000E-01, 1.05000E+02,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 2.81000E+11, 0.00000E+00, 1.05000E+02, 2.80000E+01, 2.89500E+01, + L 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 3.30000E+10, 2.68270E-01, 1.05000E+02, 0.00000E+00, 1.10000E+02, + L 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.33000E+09, 1.19615E-02, 1.05000E+02, 0.00000E+00, 1.10000E+02, + L 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.76100E+05, 1.00000E+00, 9.50000E+01,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.00000E+07, 1.00000E+00, 1.05000E+02,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.00000E+07, 1.00000E+00, 1.05000E+02,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN1(2) + DATA PL1/ + * 1.02083E+00, 4.08449E-02,-2.34582E-02, 4.38274E-04,-1.52380E-02, + * -2.09089E-02, 4.46355E-03,-3.41250E-03,-1.12961E-02,-7.03277E-02, + * -4.82724E-02, 0.00000E+00, 0.00000E+00,-6.20496E+00, 0.00000E+00, + * -9.80197E-03,-1.45065E-02,-1.13226E+02, 2.28455E-02, 0.00000E+00, + * 0.00000E+00, 4.93658E-04, 0.00000E+00, 3.79078E-03, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-8.89051E+03, 2.25900E-03, 1.76142E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.55015E-04, + * 2.21388E-03,-5.99073E-04,-3.52331E-03, 1.13139E-01, 1.69134E-01, + * 7.79156E-03,-1.93458E-03,-1.08596E-02,-4.39285E-04, 0.00000E+00/ + DATA PL2/ + * 3.83994E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 6.76608E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN1(3) + DATA PM1/ + * 9.24880E-01, 7.41986E-02,-6.37629E-03, 6.00575E-03, 1.29382E-03, + * 6.97550E-03,-1.70782E-03, 2.80584E-03,-8.87214E-03,-4.35703E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 4.31515E+00, 0.00000E+00, + * -1.81474E-02,-6.06627E-02,-8.43503E+01, 8.46944E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.17081E-02,-2.19500E-03, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.47580E+02, 4.41585E-03, 7.80466E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.44155E-04, + * -2.49166E-03, 2.90482E-03,-3.40501E-04, 1.13139E-01, 1.69134E-01, + * -6.01460E-03,-1.63368E-03, 0.00000E+00,-4.31340E-03, 0.00000E+00/ + DATA PM2/ + * 4.53979E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-5.43660E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN1(4) + DATA PN1/ + * 9.72669E-01,-4.26748E-02, 1.12876E-02,-8.44951E-03, 7.04114E-03, + * 1.26036E-02,-3.88164E-03,-5.20509E-04,-6.09710E-04, 1.31603E-01, + * 1.13804E-01, 0.00000E+00, 0.00000E+00,-6.15970E+00, 0.00000E+00, + * -2.14214E-02,-6.62913E-02,-2.02884E-01, 2.35350E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.13573E-02,-1.84905E-03, 1.32397E-01, + * 2.13315E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.42645E+00,-2.64405E-03,-5.57771E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.20621E+01,-1.10313E-03, + * 3.97063E-05, 5.47632E-05, 3.57577E-03, 1.13139E-01, 1.69134E-01, + * 0.00000E+00, 1.18897E-03, 0.00000E+00, 7.62305E-04, 0.00000E+00/ + DATA PN2/ + * -3.52015E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-9.52550E-04, + * 8.56253E-04, 4.33114E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.21223E-03, + * 2.38694E-04, 9.15245E-04, 1.28385E-03, 8.67668E-04,-5.61425E-06, + * 1.04445E+00, 3.41112E+01, 0.00000E+00,-8.40704E-01,-2.39639E+02, + * 7.06668E-01,-2.05873E+01,-3.63696E-01, 2.39245E+01, 1.00000E+01, + * -1.06657E-03,-7.67292E-04, 1.54534E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN1(5) TN2(1) + DATA PO1/ + * 9.99368E-01, 4.33893E-02,-2.07009E-03, 1.09617E-03, 1.05440E-03, + * 4.83408E-04, 9.77040E-04, 9.24791E-04, 4.80247E-04, 4.94737E-02, + * 1.05985E-03, 0.00000E+00, 0.00000E+00, 2.74409E+00, 0.00000E+00, + * -4.96656E-03,-1.51684E-02, 4.65158E+01,-7.51133E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.63808E-04, 1.32397E-01, + * 2.13315E-01,-2.06652E-03,-6.32046E-03, 0.00000E+00, 0.00000E+00, + * 5.94545E-03,-1.90958E+02, 0.00000E+00,-4.16892E-03, 0.00000E+00, + * -1.67499E-02, 0.00000E+00, 2.58987E-03, 5.97781E+02, 0.00000E+00, + * 0.00000E+00, 4.44890E-04, 4.66444E-04, 1.13139E-01, 1.69134E-01, + * 0.00000E+00, 7.11360E-04, 1.32186E-02, 2.23948E-03, 0.00000E+00/ + DATA PO2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.60571E-03, + * 6.28078E-04, 5.05469E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.57829E-03, + * -4.00855E-04, 5.04077E-05,-1.39001E-03,-2.33406E-03,-4.81197E-04, + * 1.46758E+00, 6.20332E+00, 0.00000E+00, 3.66476E-01,-6.19760E+01, + * 3.09198E-01,-1.98999E+01, 0.00000E+00,-3.29933E+02, 0.00000E+00, + * -1.10080E-03,-9.39310E-05, 1.39638E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN2(2) + DATA PP1/ + * 9.81637E-01,-1.41317E-03, 3.87323E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.58707E-02, + * -8.63658E-03, 0.00000E+00, 0.00000E+00,-2.02226E+00, 0.00000E+00, + * -8.69424E-03,-1.91397E-02, 8.76779E+01, 4.52188E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-7.07572E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -4.11210E-03, 3.50060E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 2.23760E-02, 0.00000E+00,-8.36657E-03, 1.61347E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.45130E-02, 0.00000E+00, 0.00000E+00/ + DATA PP2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.24152E-03, + * 6.43365E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.33255E-03, + * 2.42657E-03, 1.60666E-03,-1.85728E-03,-1.46874E-03,-4.79163E-06, + * 1.22464E+00, 3.53510E+01, 0.00000E+00, 4.49223E-01,-4.77466E+01, + * 4.70681E-01, 8.41861E+00,-2.88198E-01, 1.67854E+02, 0.00000E+00, + * 7.11493E-04, 6.05601E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN2(3) + DATA PQ1/ + * 1.00422E+00,-7.11212E-03, 5.24480E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.28914E-02, + * -2.41301E-02, 0.00000E+00, 0.00000E+00,-2.12219E+01, 0.00000E+00, + * -3.28077E-03, 1.65727E-02, 1.68564E+00,-6.68154E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 8.42365E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-4.34645E-03,-1.03830E-02,-8.08279E-03, 2.16780E-02, + * 0.00000E+00,-1.38459E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.45155E-02, 0.00000E+00, 7.04573E-03,-4.73204E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.08767E-02, 0.00000E+00, 0.00000E+00/ + DATA PQ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.21769E-04, + * -2.27387E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.26769E-03, + * 3.16901E-03, 4.60316E-04,-1.01431E-04, 1.02131E-03, 9.96601E-04, + * 1.25707E+00, 2.50114E+01, 0.00000E+00, 4.24472E-01,-2.77655E+01, + * 3.44625E-01, 2.75412E+01, 0.00000E+00, 7.94251E+02, 0.00000E+00, + * 2.45835E-03, 1.38871E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN2(4) TN3(1) + DATA PR1/ + * 1.01890E+00,-2.46603E-02, 1.00078E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.70977E-02, + * -4.02286E-02, 0.00000E+00, 0.00000E+00,-2.29466E+01, 0.00000E+00, + * 2.26580E-03, 2.63931E-02, 3.72625E+01,-6.39041E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.85291E-03,-7.47019E-03,-7.07265E-03, 0.00000E+00, + * 0.00000E+00, 1.39717E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 9.58383E-03, 0.00000E+00, 9.19771E-03,-3.69121E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.57067E-02, 0.00000E+00, 0.00000E+00/ + DATA PR2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.92953E-03, + * -2.77739E-03,-4.40092E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.47280E-03, + * 2.95035E-04,-1.81246E-03, 2.81945E-03, 4.27296E-03, 9.78863E-04, + * 1.40545E+00,-6.19173E+00, 0.00000E+00, 0.00000E+00,-7.93632E+01, + * 4.44643E-01,-4.03085E+02, 0.00000E+00, 1.15603E+01, 0.00000E+00, + * 2.25068E-03, 8.48557E-04,-2.98493E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN3(2) + DATA PS1/ + * 9.75801E-01, 3.80680E-02,-3.05198E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.85575E-02, + * 5.04057E-02, 0.00000E+00, 0.00000E+00,-1.76046E+02, 0.00000E+00, + * -1.48297E-03,-3.68560E-03, 3.02185E+01,-3.23338E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.15558E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 4.89620E-03, 1.44594E-02, 9.91215E-03,-1.00616E-02, + * -8.21324E-03,-1.57757E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.53569E-02, 0.00000E+00, 6.63564E-03, 4.58410E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.51280E-02, 0.00000E+00, 0.00000E+00/ + DATA PS2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.73148E-04, + * -1.29648E-03,-7.32026E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.68110E-03, + * -4.66003E-03,-1.31567E-03,-7.39390E-04, 6.32499E-04,-4.65588E-04, + * -1.29785E+00,-1.57139E+02, 0.00000E+00, 2.58350E-01,-3.69453E+01, + * 4.10672E-01, 9.78196E+00,-1.52064E-01,-3.85084E+03, 0.00000E+00, + * -8.52706E-04,-1.40945E-03,-7.26786E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN3(3) + DATA PU1/ + * 9.60722E-01, 7.03757E-02,-3.00266E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.22671E-02, + * 4.10423E-02, 0.00000E+00, 0.00000E+00,-1.63070E+02, 0.00000E+00, + * 5.40747E-04, 7.79481E-03, 1.44908E+02, 1.51484E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.41844E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 5.77884E-03, 1.06073E-02, 5.36685E-03, 9.74319E-03, + * 0.00000E+00,-2.88015E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.97547E-02, 0.00000E+00,-4.44902E-03,-2.92760E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.34419E-02, 0.00000E+00, 0.00000E+00/ + DATA PU2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.65325E-04, + * -5.50628E-04, 3.31465E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.06179E-03, + * -3.08575E-03,-7.93589E-04,-1.08629E-04, 5.95511E-04,-9.05050E-04, + * 1.18997E+00, 4.15924E+01, 0.00000E+00,-4.72064E-01,-9.47150E+02, + * 3.98723E-01, 1.98304E+01, 0.00000E+00, 3.73219E+03, 0.00000E+00, + * -1.50040E-03,-1.14933E-03,-1.56769E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN3(4) + DATA PV1/ + * 1.03123E+00,-7.05124E-02, 8.71615E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.82621E-02, + * -9.80975E-03, 0.00000E+00, 0.00000E+00, 2.89286E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 8.66153E+01, 7.91938E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.68917E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 7.86638E-03, 9.57341E-03, 5.72268E-03, 9.90827E-03, + * 0.00000E+00, 6.55573E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.00200E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 7.07457E-03, 0.00000E+00, 0.00000E+00/ + DATA PV2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.04970E-04, + * 1.21560E-03,-8.05579E-06, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.49941E-03, + * -4.57256E-04,-1.59311E-04, 2.96481E-04,-1.77318E-03,-6.37918E-04, + * 1.02395E+00, 1.28172E+01, 0.00000E+00, 1.49903E-01,-2.63818E+01, + * 0.00000E+00, 4.70628E+01,-2.22139E-01, 4.82292E-02, 0.00000E+00, + * -8.67075E-04,-5.86479E-04, 5.32462E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TN3(5) SURFACE TEMP TSL + DATA PW1/ + * 1.00828E+00,-9.10404E-02,-2.26549E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.32420E-02, + * -9.08925E-03, 0.00000E+00, 0.00000E+00, 3.36105E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.24957E+01,-5.87939E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.79765E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.01237E+03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.75553E-02, 0.00000E+00, 0.00000E+00/ + DATA PW2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.29699E-03, + * 1.26659E-03, 2.68402E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.17894E-03, + * 1.48746E-03, 1.06478E-04, 1.34743E-04,-2.20939E-03,-6.23523E-04, + * 6.36539E-01, 1.13621E+01, 0.00000E+00,-3.93777E-01, 2.38687E+03, + * 0.00000E+00, 6.61865E+02,-1.21434E-01, 9.27608E+00, 0.00000E+00, + * 1.68478E-04, 1.24892E-03, 1.71345E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TGN3(2) SURFACE GRAD TSLG + DATA PX1/ + * 1.57293E+00,-6.78400E-01, 6.47500E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.62974E-02, + * -3.60423E-01, 0.00000E+00, 0.00000E+00, 1.28358E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.68038E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.67898E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.90994E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.15706E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PX2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TGN2(1) TGN1(2) + DATA PY1/ + * 8.66492E-01, 3.55807E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.12111E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.82458E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.01024E+02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 6.54251E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PY2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.56959E-02, + * 1.91001E-02, 3.15971E-02, 1.00982E-02,-6.71565E-03, 2.57693E-03, + * 1.38692E+00, 2.82132E-01, 0.00000E+00, 0.00000E+00, 3.81511E+02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TGN3(1) TGN2(2) + DATA PZ1/ + * 1.06029E+00,-5.25231E-02, 3.73034E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.31072E-02, + * -3.88409E-01, 0.00000E+00, 0.00000E+00,-1.65295E+02, 0.00000E+00, + * -4.38916E-02,-3.22716E-01,-8.82393E+01, 1.18458E-01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.19782E-01,-2.13801E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.62229E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -4.35863E-01, 0.00000E+00, 0.00000E+00,-5.37443E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-4.55788E-01, 0.00000E+00, 0.00000E+00/ + DATA PZ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.84009E-02, + * 3.96733E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.05494E-02, + * 7.39617E-02, 1.92200E-02,-8.46151E-03,-1.34244E-02, 1.96338E-02, + * 1.50421E+00, 1.88368E+01, 0.00000E+00, 0.00000E+00,-5.13114E+01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 5.11923E-02, 3.61225E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C MIDDLE ATMOSPHERE AVERAGES + DATA PAVGM/ + M 2.61000E+02, 2.64000E+02, 2.29000E+02, 2.17000E+02, 2.17000E+02, + M 2.23000E+02, 2.86760E+02,-2.93940E+00, 2.50000E+00, 0.00000E+00/ + END diff --git a/MSIS/NRLMSIS00/nrlmsis00_c_version/DOCUMENTATION b/MSIS/NRLMSIS00/nrlmsis00_c_version/DOCUMENTATION new file mode 100644 index 0000000..dfdf5dd --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsis00_c_version/DOCUMENTATION @@ -0,0 +1,275 @@ +-------------------------------------------------------------------- +--------- N R L M S I S E - 0 0 M O D E L 2 0 0 1 ---------- +-------------------------------------------------------------------- + + +Table of Contents +----------------- + +1. Legal Information +2. Brief Description +3. Source Code Availability +4. This C Release + 4.1 Files + 4.2 Differences between FORTRAN and C version +5. Interface +6. Release Notes +7. Testing Output + + + +1. LEGAL INFORMATION +==================== + +This package is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. Please inform the +maintainer of the C release (Dominik Brodowski - mail@brodo.de) of +any patches and bug-fixes you implement for NRLMSISE-00 so that this C +package can be updated with these improvements. + + + +2. BRIEF DESCRIPTION +==================== + +The NRLMSIS-00 empirical atmosphere model was developed by Mike +Picone, Alan Hedin, and Doug Drob based on the MSISE90 model. + +The MSISE90 model describes the neutral temperature and densities in +Earth's atmosphere from ground to thermospheric heights. Below 72.5 km +the model is primarily based on the MAP Handbook (Labitzke et al., +1985) tabulation of zonal average temperature and pressure by Barnett +and Corney, which was also used for the CIRA-86. Below 20 km these +data were supplemented with averages from the National Meteorological +Center (NMC). In addition, pitot tube, falling sphere, and grenade +sounder rocket measurements from 1947 to 1972 were taken into +consideration. Above 72.5 km MSISE-90 is essentially a revised MSIS-86 +model taking into account data derived from space shuttle flights and +newer incoherent scatter results. For someone interested only in the +thermosphere (above 120 km), the author recommends the MSIS-86 +model. MSISE is also not the model of preference for specialized +tropospheric work. It is rather for studies that reach across several +atmospheric boundaries. +(quoted from http://nssdc.gsfc.nasa.gov/space/model/atmos/nrlmsise00.html) + + + +3. SOURCE CODE AVAILABILITY +=========================== + +The authors of the NRLMSISE-00 model have released a FORTRAN version +which is available at +http://uap-www.nrl.navy.mil/models_web/msis/msis_home.htm + +Based on the Official Beta Release 1.0 (NRLMSISE-00.DIST12.TXT) +Dominik Brodowski wrote an implementation in C which is available on +http://www.brodo.de/english/pub/nrlmsise/ +This release is based on the Official Beta Release 2.0 +(NRLMSISE-00.DIST17.TXT). + + + +4. THIS C RELEASE +================= + +When "INLINE" is not externally defined the source code should be +clean, plain ANSI which any C compiler should be able to work with. If +you find any problems, please report them to the maintainer Dominik +Brodowski at mail@brodo.de. Thank you! + + +4.1 Files +--------- + +DOCUMENTATION - this Documentation +nrlmsise-00.h - header file for nrlmsise-00 +nrlmsise-00.c - source code for nrlmsise-00 +nrlmsise-00_data.c - block data for nrlmsise-00 +nrlmsise-00_test.c - test-driver for nrlmsise-00 +makefile - makefile for nrlmsise-test (gnu-make and gcc) + + +4.2 Differences between FORTRAN and C version +--------------------------------------------- + +The C package does not save the last results internally to speed up +program execution as the FORTRAN version does. + +The "switches" have to be specified before _every_ call. + +The "DL" array is not printed in the testing routine since it's not an +output value. + +The C version probably contains some bugs and still has to be regarded +more unstable than the FORTRAN release. Please report any bugs or +incorrect values to the maintainer at mail@brodo.de + + + +5. INTERFACE +============ + +To access the NRLMSISE-00 functions you need to include the header +file nrlmsise-00.h. In this file you can find comments which explain +the in- and output, and the differences between the various functions. + + + +6. RELEASE NOTES +================ + +20020302 - first release + +20040322 - fix gtd7d output if sw->flags[0] is set + (noted by Dr. Vasiliy Yurasov) + +20041227 - bugfix against memory corruption + (Donald F. Linton) + +20070727 - bugfix concerning DFA being masked + (Stacey Gage) + +20100516 - bugfix concerning Argon densities + (Dr. Choliy Vasyl) + +20131225 - fix comment on switch 0, silence compiler warnings + (David F. Crouse) + +20150329 - use fabs() instead of abs() + (David F. Crouse) + +20151122 - fixes for gcc5, spelling fixes + (Jacco Geul) + +20170830 - fix some compiler warninges + (noted by Steven Queen) + +20190709 fix output at 32.5 km + (Yoshiaki Ando) + + +7. TESTING OUTPUT +================= + +nrlmsise-test should generate the following output: + + + +6.665177E+05 1.138806E+08 1.998211E+07 4.022764E+05 3.557465E+03 4.074714E-15 3.475312E+04 4.095913E+06 2.667273E+04 1.250540E+03 1.241416E+03 + +3.407293E+06 1.586333E+08 1.391117E+07 3.262560E+05 1.559618E+03 5.001846E-15 4.854208E+04 4.380967E+06 6.956682E+03 1.166754E+03 1.161710E+03 + +1.123767E+05 6.934130E+04 4.247105E+01 1.322750E-01 2.618848E-05 2.756772E-18 2.016750E+04 5.741256E+03 2.374394E+04 1.239892E+03 1.239891E+03 + +5.411554E+07 1.918893E+11 6.115826E+12 1.225201E+12 6.023212E+10 3.584426E-10 1.059880E+07 2.615737E+05 2.819879E-42 1.027318E+03 2.068878E+02 + +1.851122E+06 1.476555E+08 1.579356E+07 2.633795E+05 1.588781E+03 4.809630E-15 5.816167E+04 5.478984E+06 1.264446E+03 1.212396E+03 1.208135E+03 + +8.673095E+05 1.278862E+08 1.822577E+07 2.922214E+05 2.402962E+03 4.355866E-15 3.686389E+04 3.897276E+06 2.667273E+04 1.220146E+03 1.212712E+03 + +5.776251E+05 6.979139E+07 1.236814E+07 2.492868E+05 1.405739E+03 2.470651E-15 5.291986E+04 1.069814E+06 2.667273E+04 1.116385E+03 1.112999E+03 + +3.740304E+05 4.782720E+07 5.240380E+06 1.759875E+05 5.501649E+02 1.571889E-15 8.896776E+04 1.979741E+06 9.121815E+03 1.031247E+03 1.024848E+03 + +6.748339E+05 1.245315E+08 2.369010E+07 4.911583E+05 4.578781E+03 4.564420E-15 3.244595E+04 5.370833E+06 2.667273E+04 1.306052E+03 1.293374E+03 + +5.528601E+05 1.198041E+08 3.495798E+07 9.339618E+05 1.096255E+04 4.974543E-15 2.686428E+04 4.889974E+06 2.805445E+04 1.361868E+03 1.347389E+03 + +1.375488E+14 0.000000E+00 2.049687E+19 5.498695E+18 2.451733E+17 1.261066E-03 0.000000E+00 0.000000E+00 0.000000E+00 1.027318E+03 2.814648E+02 + +4.427443E+13 0.000000E+00 6.597567E+18 1.769929E+18 7.891680E+16 4.059139E-04 0.000000E+00 0.000000E+00 0.000000E+00 1.027318E+03 2.274180E+02 + +2.127829E+12 0.000000E+00 3.170791E+17 8.506280E+16 3.792741E+15 1.950822E-05 0.000000E+00 0.000000E+00 0.000000E+00 1.027318E+03 2.374389E+02 + +1.412184E+11 0.000000E+00 2.104370E+16 5.645392E+15 2.517142E+14 1.294709E-06 0.000000E+00 0.000000E+00 0.000000E+00 1.027318E+03 2.795551E+02 + +1.254884E+10 0.000000E+00 1.874533E+15 4.923051E+14 2.239685E+13 1.147668E-07 0.000000E+00 0.000000E+00 0.000000E+00 1.027318E+03 2.190732E+02 + +5.196477E+05 1.274494E+08 4.850450E+07 1.720838E+06 2.354487E+04 5.881940E-15 2.500078E+04 6.279210E+06 2.667273E+04 1.426412E+03 1.408608E+03 + +4.260860E+07 1.241342E+11 4.929562E+12 1.048407E+12 4.993465E+10 2.914304E-10 8.831229E+06 2.252516E+05 2.415246E-42 1.027318E+03 1.934071E+02 + + +DAY 172 81 172 172 172 +UT 29000 29000 75000 29000 29000 +ALT 400 400 1000 100 400 +LAT 60 60 60 60 0 +LONG -70 -70 -70 -70 -70 +LST 16 16 16 16 16 +F107A 150 150 150 150 150 +F107 150 150 150 150 150 + + +TINF 1250.54 1166.75 1239.89 1027.32 1212.40 +TG 1241.42 1161.71 1239.89 206.89 1208.14 +HE 6.665e+05 3.407e+06 1.124e+05 5.412e+07 1.851e+06 +O 1.139e+08 1.586e+08 6.934e+04 1.919e+11 1.477e+08 +N2 1.998e+07 1.391e+07 4.247e+01 6.116e+12 1.579e+07 +O2 4.023e+05 3.263e+05 1.323e-01 1.225e+12 2.634e+05 +AR 3.557e+03 1.560e+03 2.619e-05 6.023e+10 1.589e+03 +H 3.475e+04 4.854e+04 2.017e+04 1.060e+07 5.816e+04 +N 4.096e+06 4.381e+06 5.741e+03 2.616e+05 5.479e+06 +ANM 0 2.667e+04 6.957e+03 2.374e+04 2.820e-42 1.264e+03 +RHO 4.075e-15 5.002e-15 2.757e-18 3.584e-10 4.810e-15 + + +DAY 172 172 172 172 172 +UT 29000 29000 29000 29000 29000 +ALT 400 400 400 400 400 +LAT 60 60 60 60 60 +LONG 0 -70 -70 -70 -70 +LST 16 4 16 16 16 +F107A 150 150 70 150 150 +F107 150 150 150 180 150 + + +TINF 1220.15 1116.39 1031.25 1306.05 1361.87 +TG 1212.71 1113.00 1024.85 1293.37 1347.39 +HE 8.673e+05 5.776e+05 3.740e+05 6.748e+05 5.529e+05 +O 1.279e+08 6.979e+07 4.783e+07 1.245e+08 1.198e+08 +N2 1.823e+07 1.237e+07 5.240e+06 2.369e+07 3.496e+07 +O2 2.922e+05 2.493e+05 1.760e+05 4.912e+05 9.340e+05 +AR 2.403e+03 1.406e+03 5.502e+02 4.579e+03 1.096e+04 +H 3.686e+04 5.292e+04 8.897e+04 3.245e+04 2.686e+04 +N 3.897e+06 1.070e+06 1.980e+06 5.371e+06 4.890e+06 +ANM 0 2.667e+04 2.667e+04 9.122e+03 2.667e+04 2.805e+04 +RHO 4.356e-15 2.471e-15 1.572e-15 4.564e-15 4.975e-15 + + +DAY 172 172 172 172 172 +UT 29000 29000 29000 29000 29000 +ALT 0 10 30 50 70 +LAT 60 60 60 60 60 +LONG -70 -70 -70 -70 -70 +LST 16 16 16 16 16 +F107A 150 150 150 150 150 +F107 150 150 150 150 150 + + +TINF 1027.32 1027.32 1027.32 1027.32 1027.32 +TG 281.46 227.42 237.44 279.56 219.07 +HE 1.375e+14 4.427e+13 2.128e+12 1.412e+11 1.255e+10 +O 0.000e+00 0.000e+00 0.000e+00 0.000e+00 0.000e+00 +N2 2.050e+19 6.598e+18 3.171e+17 2.104e+16 1.875e+15 +O2 5.499e+18 1.770e+18 8.506e+16 5.645e+15 4.923e+14 +AR 2.452e+17 7.892e+16 3.793e+15 2.517e+14 2.240e+13 +H 0.000e+00 0.000e+00 0.000e+00 0.000e+00 0.000e+00 +N 0.000e+00 0.000e+00 0.000e+00 0.000e+00 0.000e+00 +ANM 0 0.000e+00 0.000e+00 0.000e+00 0.000e+00 0.000e+00 +RHO 1.261e-03 4.059e-04 1.951e-05 1.295e-06 1.148e-07 + + +Note: These values equal those of the official FORTRAN package with +one notable exception: the FORTRAN version reports for "anomalous +oxygen" in test-run 4 exactly 0.000E-00, while my C compiler +generates code which calculates 2.820e-42. When only 16-bit wide +double variables are used, this value reduces to 0.000E-00 as well. + + + +======================================================== + +Frankfurt, Germany, on August 30, 2017 + +Dominik Brodowski diff --git a/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.c b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.c new file mode 100644 index 0000000..6b63d29 --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.c @@ -0,0 +1,1459 @@ +/* -------------------------------------------------------------------- */ +/* --------- N R L M S I S E - 0 0 M O D E L 2 0 0 1 ---------- */ +/* -------------------------------------------------------------------- */ + +/* This file is part of the NRLMSISE-00 C source code package - release + * 20041227 + * + * The NRLMSISE-00 model was developed by Mike Picone, Alan Hedin, and + * Doug Drob. They also wrote a NRLMSISE-00 distribution package in + * FORTRAN which is available at + * http://uap-www.nrl.navy.mil/models_web/msis/msis_home.htm + * + * Dominik Brodowski implemented and maintains this C version. You can + * reach him at mail@brodo.de. See the file "DOCUMENTATION" for details, + * and check http://www.brodo.de/english/pub/nrlmsise/index.html for + * updated releases of this package. + */ + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ INCLUDES --------------------------- */ +/* ------------------------------------------------------------------- */ + +#include "nrlmsise-00.h" /* header for nrlmsise-00.h */ +#include /* maths functions */ +#include /* for error messages. TBD: remove this */ +#include /* for malloc/free */ + + + +/* ------------------------------------------------------------------- */ +/* ------------------------- SHARED VARIABLES ------------------------ */ +/* ------------------------------------------------------------------- */ + +/* PARMB */ +static double gsurf; +static double re; + +/* GTS3C */ +static double dd; + +/* DMIX */ +static double dm04, dm16, dm28, dm32, dm40, dm01, dm14; + +/* MESO7 */ +static double meso_tn1[5]; +static double meso_tn2[4]; +static double meso_tn3[5]; +static double meso_tgn1[2]; +static double meso_tgn2[2]; +static double meso_tgn3[2]; + +/* POWER7 */ +extern double pt[150]; +extern double pd[9][150]; +extern double ps[150]; +extern double pdl[2][25]; +extern double ptl[4][100]; +extern double pma[10][100]; +extern double sam[100]; + +/* LOWER7 */ +extern double ptm[10]; +extern double pdm[8][10]; +extern double pavgm[10]; + +/* LPOLY */ +static double dfa; +static double plg[4][9]; +static double ctloc, stloc; +static double c2tloc, s2tloc; +static double s3tloc, c3tloc; +static double apdf, apt[4]; + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ TSELEC ----------------------------- */ +/* ------------------------------------------------------------------- */ + +void tselec(struct nrlmsise_flags *flags) { + int i; + for (i=0;i<24;i++) { + if (i!=9) { + if (flags->switches[i]==1) + flags->sw[i]=1; + else + flags->sw[i]=0; + if (flags->switches[i]>0) + flags->swc[i]=1; + else + flags->swc[i]=0; + } else { + flags->sw[i]=flags->switches[i]; + flags->swc[i]=flags->switches[i]; + } + } +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ GLATF ------------------------------ */ +/* ------------------------------------------------------------------- */ + +void glatf(double lat, double *gv, double *reff) { + double dgtr = 1.74533E-2; + double c2; + c2 = cos(2.0*dgtr*lat); + *gv = 980.616 * (1.0 - 0.0026373 * c2); + *reff = 2.0 * (*gv) / (3.085462E-6 + 2.27E-9 * c2) * 1.0E-5; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ CCOR ------------------------------- */ +/* ------------------------------------------------------------------- */ + +double ccor(double alt, double r, double h1, double zh) { +/* CHEMISTRY/DISSOCIATION CORRECTION FOR MSIS MODELS + * ALT - altitude + * R - target ratio + * H1 - transition scale length + * ZH - altitude of 1/2 R + */ + double e; + double ex; + e = (alt - zh) / h1; + if (e>70) + return exp(0); + if (e<-70) + return exp(r); + ex = exp(e); + e = r / (1.0 + ex); + return exp(e); +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ CCOR ------------------------------- */ +/* ------------------------------------------------------------------- */ + +double ccor2(double alt, double r, double h1, double zh, double h2) { +/* CHEMISTRY/DISSOCIATION CORRECTION FOR MSIS MODELS + * ALT - altitude + * R - target ratio + * H1 - transition scale length + * ZH - altitude of 1/2 R + * H2 - transition scale length #2 ? + */ + double e1, e2; + double ex1, ex2; + double ccor2v; + e1 = (alt - zh) / h1; + e2 = (alt - zh) / h2; + if ((e1 > 70) || (e2 > 70)) + return exp(0); + if ((e1 < -70) && (e2 < -70)) + return exp(r); + ex1 = exp(e1); + ex2 = exp(e2); + ccor2v = r / (1.0 + 0.5 * (ex1 + ex2)); + return exp(ccor2v); +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- SCALH ----------------------------- */ +/* ------------------------------------------------------------------- */ + +double scalh(double alt, double xm, double temp) { + double g; + double rgas=831.4; + g = gsurf / (pow((1.0 + alt/re),2.0)); + g = rgas * temp / (g * xm); + return g; +} + + + +/* ------------------------------------------------------------------- */ +/* -------------------------------- DNET ----------------------------- */ +/* ------------------------------------------------------------------- */ + +double dnet (double dd, double dm, double zhm, double xmm, double xm) { +/* TURBOPAUSE CORRECTION FOR MSIS MODELS + * Root mean density + * DD - diffusive density + * DM - full mixed density + * ZHM - transition scale length + * XMM - full mixed molecular weight + * XM - species molecular weight + * DNET - combined density + */ + double a; + double ylog; + a = zhm / (xmm-xm); + if (!((dm>0) && (dd>0))) { + printf("dnet log error %e %e %e\n",dm,dd,xm); + if ((dd==0) && (dm==0)) + dd=1; + if (dm==0) + return dd; + if (dd==0) + return dm; + } + ylog = a * log(dm/dd); + if (ylog<-10) + return dd; + if (ylog>10) + return dm; + a = dd*pow((1.0 + exp(ylog)),(1.0/a)); + return a; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- SPLINI ---------------------------- */ +/* ------------------------------------------------------------------- */ + +void splini (double *xa, double *ya, double *y2a, int n, double x, double *y) { +/* INTEGRATE CUBIC SPLINE FUNCTION FROM XA(1) TO X + * XA,YA: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X + * Y2A: ARRAY OF SECOND DERIVATIVES + * N: SIZE OF ARRAYS XA,YA,Y2A + * X: ABSCISSA ENDPOINT FOR INTEGRATION + * Y: OUTPUT VALUE + */ + double yi=0; + int klo=0; + int khi=1; + double xx, h, a, b, a2, b2; + while ((x>xa[klo]) && (khi1) { + k=(khi+klo)/2; + if (xa[k]>x) + khi=k; + else + klo=k; + } + h = xa[khi] - xa[klo]; + if (h==0.0) + printf("bad XA input to splint"); + a = (xa[khi] - x)/h; + b = (x - xa[klo])/h; + yi = a * ya[klo] + b * ya[khi] + ((a*a*a - a) * y2a[klo] + (b*b*b - b) * y2a[khi]) * h * h/6.0; + *y = yi; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- SPLINE ---------------------------- */ +/* ------------------------------------------------------------------- */ + +void spline (double *x, double *y, int n, double yp1, double ypn, double *y2) { +/* CALCULATE 2ND DERIVATIVES OF CUBIC SPLINE INTERP FUNCTION + * ADAPTED FROM NUMERICAL RECIPES BY PRESS ET AL + * X,Y: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X + * N: SIZE OF ARRAYS X,Y + * YP1,YPN: SPECIFIED DERIVATIVES AT X[0] AND X[N-1]; VALUES + * >= 1E30 SIGNAL SIGNAL SECOND DERIVATIVE ZERO + * Y2: OUTPUT ARRAY OF SECOND DERIVATIVES + */ + double *u; + double sig, p, qn, un; + int i, k; + u=malloc(sizeof(double)*(unsigned int)n); + if (u==NULL) { + printf("Out Of Memory in spline - ERROR"); + return; + } + if (yp1>0.99E30) { + y2[0]=0; + u[0]=0; + } else { + y2[0]=-0.5; + u[0]=(3.0/(x[1]-x[0]))*((y[1]-y[0])/(x[1]-x[0])-yp1); + } + for (i=1;i<(n-1);i++) { + sig = (x[i]-x[i-1])/(x[i+1] - x[i-1]); + p = sig * y2[i-1] + 2.0; + y2[i] = (sig - 1.0) / p; + u[i] = (6.0 * ((y[i+1] - y[i])/(x[i+1] - x[i]) -(y[i] - y[i-1]) / (x[i] - x[i-1]))/(x[i+1] - x[i-1]) - sig * u[i-1])/p; + } + if (ypn>0.99E30) { + qn = 0; + un = 0; + } else { + qn = 0.5; + un = (3.0 / (x[n-1] - x[n-2])) * (ypn - (y[n-1] - y[n-2])/(x[n-1] - x[n-2])); + } + y2[n-1] = (un - qn * u[n-2]) / (qn * y2[n-2] + 1.0); + for (k=n-2;k>=0;k--) + y2[k] = y2[k] * y2[k+1] + u[k]; + + free(u); +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- DENSM ----------------------------- */ +/* ------------------------------------------------------------------- */ + +__inline_double zeta(double zz, double zl) { + return ((zz-zl)*(re+zl)/(re+zz)); +} + +double densm (double alt, double d0, double xm, double *tz, int mn3, double *zn3, double *tn3, double *tgn3, int mn2, double *zn2, double *tn2, double *tgn2) { +/* Calculate Temperature and Density Profiles for lower atmos. */ + double xs[10], ys[10], y2out[10]; + double rgas = 831.4; + double z, z1, z2, t1, t2, zg, zgdif; + double yd1, yd2; + double x, y, yi; + double expl, gamm, glb; + double densm_tmp; + int mn; + int k; + densm_tmp=d0; + if (alt>zn2[0]) { + if (xm==0.0) + return *tz; + else + return d0; + } + + /* STRATOSPHERE/MESOSPHERE TEMPERATURE */ + if (alt>zn2[mn2-1]) + z=alt; + else + z=zn2[mn2-1]; + mn=mn2; + z1=zn2[0]; + z2=zn2[mn-1]; + t1=tn2[0]; + t2=tn2[mn-1]; + zg = zeta(z, z1); + zgdif = zeta(z2, z1); + + /* set up spline nodes */ + for (k=0;k50.0) + expl=50.0; + + /* Density at altitude */ + densm_tmp = densm_tmp * (t1 / *tz) * exp(-expl); + } + + if (alt>zn3[0]) { + if (xm==0.0) + return *tz; + else + return densm_tmp; + } + + /* troposhere / stratosphere temperature */ + z = alt; + mn = mn3; + z1=zn3[0]; + z2=zn3[mn-1]; + t1=tn3[0]; + t2=tn3[mn-1]; + zg=zeta(z,z1); + zgdif=zeta(z2,z1); + + /* set up spline nodes */ + for (k=0;k50.0) + expl=50.0; + + /* Density at altitude */ + densm_tmp = densm_tmp * (t1 / *tz) * exp(-expl); + } + if (xm==0.0) + return *tz; + else + return densm_tmp; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- DENSU ----------------------------- */ +/* ------------------------------------------------------------------- */ + +double densu (double alt, double dlb, double tinf, double tlb, double xm, double alpha, double *tz, double zlb, double s2, int mn1, double *zn1, double *tn1, double *tgn1) { +/* Calculate Temperature and Density Profiles for MSIS models + * New lower thermo polynomial + */ + double yd2, yd1, x=0, y; + double rgas=831.4; + double densu_temp=1.0; + double za, z, zg2, tt, ta; + double dta, z1=0, z2, t1=0, t2, zg, zgdif=0; + int mn=0; + int k; + double glb; + double expl; + double yi; + double densa; + double gamma, gamm; + double xs[5], ys[5], y2out[5]; + /* joining altitudes of Bates and spline */ + za=zn1[0]; + if (alt>za) + z=alt; + else + z=za; + + /* geopotential altitude difference from ZLB */ + zg2 = zeta(z, zlb); + + /* Bates temperature */ + tt = tinf - (tinf - tlb) * exp(-s2*zg2); + ta = tt; + *tz = tt; + densu_temp = *tz; + + if (altzn1[mn1-1]) + z=alt; + else + z=zn1[mn1-1]; + mn=mn1; + z1=zn1[0]; + z2=zn1[mn-1]; + t1=tn1[0]; + t2=tn1[mn-1]; + /* geopotental difference from z1 */ + zg = zeta (z, z1); + zgdif = zeta(z2, z1); + /* set up spline nodes */ + for (k=0;k50.0) + expl=50.0; + if (tt<=0) + expl=50.0; + + /* density at altitude */ + densa = dlb * pow((tlb/tt),((1.0+alpha+gamma))) * expl; + densu_temp=densa; + if (alt>=za) + return densu_temp; + + /* calculate density below za */ + glb = gsurf / pow((1.0 + z1/re),2.0); + gamm = xm * glb * zgdif / rgas; + + /* integrate spline temperatures */ + splini (xs, ys, y2out, mn, x, &yi); + expl = gamm * yi; + if (expl>50.0) + expl=50.0; + if (*tz<=0) + expl=50.0; + + /* density at altitude */ + densu_temp = densu_temp * pow ((t1 / *tz),(1.0 + alpha)) * exp(-expl); + return densu_temp; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- GLOBE7 ---------------------------- */ +/* ------------------------------------------------------------------- */ + +/* 3hr Magnetic activity functions */ +/* Eq. A24d */ +__inline_double g0(double a, double *p) { + return (a - 4.0 + (p[25] - 1.0) * (a - 4.0 + (exp(-sqrt(p[24]*p[24]) * (a - 4.0)) - 1.0) / sqrt(p[24]*p[24]))); +} + +/* Eq. A24c */ +__inline_double sumex(double ex) { + return (1.0 + (1.0 - pow(ex,19.0)) / (1.0 - ex) * pow(ex,0.5)); +} + +/* Eq. A24a */ +__inline_double sg0(double ex, double *p, double *ap) { + return (g0(ap[1],p) + (g0(ap[2],p)*ex + g0(ap[3],p)*ex*ex + \ + g0(ap[4],p)*pow(ex,3.0) + (g0(ap[5],p)*pow(ex,4.0) + \ + g0(ap[6],p)*pow(ex,12.0))*(1.0-pow(ex,8.0))/(1.0-ex)))/sumex(ex); +} + +double globe7(double *p, struct nrlmsise_input *input, struct nrlmsise_flags *flags) { +/* CALCULATE G(L) FUNCTION + * Upper Thermosphere Parameters */ + double t[15]; + int i,j; + double apd; + double tloc; + double c, s, c2, c4, s2; + double sr = 7.2722E-5; + double dgtr = 1.74533E-2; + double dr = 1.72142E-2; + double hr = 0.2618; + double cd32, cd18, cd14, cd39; + double df; + double f1, f2; + double tinf; + struct ap_array *ap; + + tloc=input->lst; + for (j=0;j<14;j++) + t[j]=0; + + /* calculate legendre polynomials */ + c = sin(input->g_lat * dgtr); + s = cos(input->g_lat * dgtr); + c2 = c*c; + c4 = c2*c2; + s2 = s*s; + + plg[0][1] = c; + plg[0][2] = 0.5*(3.0*c2 -1.0); + plg[0][3] = 0.5*(5.0*c*c2-3.0*c); + plg[0][4] = (35.0*c4 - 30.0*c2 + 3.0)/8.0; + plg[0][5] = (63.0*c2*c2*c - 70.0*c2*c + 15.0*c)/8.0; + plg[0][6] = (11.0*c*plg[0][5] - 5.0*plg[0][4])/6.0; +/* plg[0][7] = (13.0*c*plg[0][6] - 6.0*plg[0][5])/7.0; */ + plg[1][1] = s; + plg[1][2] = 3.0*c*s; + plg[1][3] = 1.5*(5.0*c2-1.0)*s; + plg[1][4] = 2.5*(7.0*c2*c-3.0*c)*s; + plg[1][5] = 1.875*(21.0*c4 - 14.0*c2 +1.0)*s; + plg[1][6] = (11.0*c*plg[1][5]-6.0*plg[1][4])/5.0; +/* plg[1][7] = (13.0*c*plg[1][6]-7.0*plg[1][5])/6.0; */ +/* plg[1][8] = (15.0*c*plg[1][7]-8.0*plg[1][6])/7.0; */ + plg[2][2] = 3.0*s2; + plg[2][3] = 15.0*s2*c; + plg[2][4] = 7.5*(7.0*c2 -1.0)*s2; + plg[2][5] = 3.0*c*plg[2][4]-2.0*plg[2][3]; + plg[2][6] =(11.0*c*plg[2][5]-7.0*plg[2][4])/4.0; + plg[2][7] =(13.0*c*plg[2][6]-8.0*plg[2][5])/5.0; + plg[3][3] = 15.0*s2*s; + plg[3][4] = 105.0*s2*s*c; + plg[3][5] =(9.0*c*plg[3][4]-7.*plg[3][3])/2.0; + plg[3][6] =(11.0*c*plg[3][5]-8.*plg[3][4])/3.0; + + if (!(((flags->sw[7]==0)&&(flags->sw[8]==0))&&(flags->sw[14]==0))) { + stloc = sin(hr*tloc); + ctloc = cos(hr*tloc); + s2tloc = sin(2.0*hr*tloc); + c2tloc = cos(2.0*hr*tloc); + s3tloc = sin(3.0*hr*tloc); + c3tloc = cos(3.0*hr*tloc); + } + + cd32 = cos(dr*(input->doy-p[31])); + cd18 = cos(2.0*dr*(input->doy-p[17])); + cd14 = cos(dr*(input->doy-p[13])); + cd39 = cos(2.0*dr*(input->doy-p[38])); + + /* F10.7 EFFECT */ + df = input->f107 - input->f107A; + dfa = input->f107A - 150.0; + t[0] = p[19]*df*(1.0+p[59]*dfa) + p[20]*df*df + p[21]*dfa + p[29]*pow(dfa,2.0); + f1 = 1.0 + (p[47]*dfa +p[19]*df+p[20]*df*df)*flags->swc[1]; + f2 = 1.0 + (p[49]*dfa+p[19]*df+p[20]*df*df)*flags->swc[1]; + + /* TIME INDEPENDENT */ + t[1] = (p[1]*plg[0][2]+ p[2]*plg[0][4]+p[22]*plg[0][6]) + \ + (p[14]*plg[0][2])*dfa*flags->swc[1] +p[26]*plg[0][1]; + + /* SYMMETRICAL ANNUAL */ + t[2] = p[18]*cd32; + + /* SYMMETRICAL SEMIANNUAL */ + t[3] = (p[15]+p[16]*plg[0][2])*cd18; + + /* ASYMMETRICAL ANNUAL */ + t[4] = f1*(p[9]*plg[0][1]+p[10]*plg[0][3])*cd14; + + /* ASYMMETRICAL SEMIANNUAL */ + t[5] = p[37]*plg[0][1]*cd39; + + /* DIURNAL */ + if (flags->sw[7]) { + double t71, t72; + t71 = (p[11]*plg[1][2])*cd14*flags->swc[5]; + t72 = (p[12]*plg[1][2])*cd14*flags->swc[5]; + t[6] = f2*((p[3]*plg[1][1] + p[4]*plg[1][3] + p[27]*plg[1][5] + t71) * \ + ctloc + (p[6]*plg[1][1] + p[7]*plg[1][3] + p[28]*plg[1][5] \ + + t72)*stloc); +} + + /* SEMIDIURNAL */ + if (flags->sw[8]) { + double t81, t82; + t81 = (p[23]*plg[2][3]+p[35]*plg[2][5])*cd14*flags->swc[5]; + t82 = (p[33]*plg[2][3]+p[36]*plg[2][5])*cd14*flags->swc[5]; + t[7] = f2*((p[5]*plg[2][2]+ p[41]*plg[2][4] + t81)*c2tloc +(p[8]*plg[2][2] + p[42]*plg[2][4] + t82)*s2tloc); + } + + /* TERDIURNAL */ + if (flags->sw[14]) { + t[13] = f2 * ((p[39]*plg[3][3]+(p[93]*plg[3][4]+p[46]*plg[3][6])*cd14*flags->swc[5])* s3tloc +(p[40]*plg[3][3]+(p[94]*plg[3][4]+p[48]*plg[3][6])*cd14*flags->swc[5])* c3tloc); +} + + /* magnetic activity based on daily ap */ + if (flags->sw[9]==-1) { + ap = input->ap_a; + if (p[51]!=0) { + double exp1; + exp1 = exp(-10800.0*sqrt(p[51]*p[51])/(1.0+p[138]*(45.0-sqrt(input->g_lat*input->g_lat)))); + if (exp1>0.99999) + exp1=0.99999; + if (p[24]<1.0E-4) + p[24]=1.0E-4; + apt[0]=sg0(exp1,p,ap->a); + /* apt[1]=sg2(exp1,p,ap->a); + apt[2]=sg0(exp2,p,ap->a); + apt[3]=sg2(exp2,p,ap->a); + */ + if (flags->sw[9]) { + t[8] = apt[0]*(p[50]+p[96]*plg[0][2]+p[54]*plg[0][4]+ \ + (p[125]*plg[0][1]+p[126]*plg[0][3]+p[127]*plg[0][5])*cd14*flags->swc[5]+ \ + (p[128]*plg[1][1]+p[129]*plg[1][3]+p[130]*plg[1][5])*flags->swc[7]* \ + cos(hr*(tloc-p[131]))); + } + } + } else { + double p44, p45; + apd=input->ap-4.0; + p44=p[43]; + p45=p[44]; + if (p44<0) + p44 = 1.0E-5; + apdf = apd + (p45-1.0)*(apd + (exp(-p44 * apd) - 1.0)/p44); + if (flags->sw[9]) { + t[8]=apdf*(p[32]+p[45]*plg[0][2]+p[34]*plg[0][4]+ \ + (p[100]*plg[0][1]+p[101]*plg[0][3]+p[102]*plg[0][5])*cd14*flags->swc[5]+ + (p[121]*plg[1][1]+p[122]*plg[1][3]+p[123]*plg[1][5])*flags->swc[7]* + cos(hr*(tloc-p[124]))); + } + } + + if ((flags->sw[10])&&(input->g_long>-1000.0)) { + + /* longitudinal */ + if (flags->sw[11]) { + t[10] = (1.0 + p[80]*dfa*flags->swc[1])* \ + ((p[64]*plg[1][2]+p[65]*plg[1][4]+p[66]*plg[1][6]\ + +p[103]*plg[1][1]+p[104]*plg[1][3]+p[105]*plg[1][5]\ + +flags->swc[5]*(p[109]*plg[1][1]+p[110]*plg[1][3]+p[111]*plg[1][5])*cd14)* \ + cos(dgtr*input->g_long) \ + +(p[90]*plg[1][2]+p[91]*plg[1][4]+p[92]*plg[1][6]\ + +p[106]*plg[1][1]+p[107]*plg[1][3]+p[108]*plg[1][5]\ + +flags->swc[5]*(p[112]*plg[1][1]+p[113]*plg[1][3]+p[114]*plg[1][5])*cd14)* \ + sin(dgtr*input->g_long)); + } + + /* ut and mixed ut, longitude */ + if (flags->sw[12]){ + t[11]=(1.0+p[95]*plg[0][1])*(1.0+p[81]*dfa*flags->swc[1])*\ + (1.0+p[119]*plg[0][1]*flags->swc[5]*cd14)*\ + ((p[68]*plg[0][1]+p[69]*plg[0][3]+p[70]*plg[0][5])*\ + cos(sr*(input->sec-p[71]))); + t[11]+=flags->swc[11]*\ + (p[76]*plg[2][3]+p[77]*plg[2][5]+p[78]*plg[2][7])*\ + cos(sr*(input->sec-p[79])+2.0*dgtr*input->g_long)*(1.0+p[137]*dfa*flags->swc[1]); + } + + /* ut, longitude magnetic activity */ + if (flags->sw[13]) { + if (flags->sw[9]==-1) { + if (p[51]) { + t[12]=apt[0]*flags->swc[11]*(1.+p[132]*plg[0][1])*\ + ((p[52]*plg[1][2]+p[98]*plg[1][4]+p[67]*plg[1][6])*\ + cos(dgtr*(input->g_long-p[97])))\ + +apt[0]*flags->swc[11]*flags->swc[5]*\ + (p[133]*plg[1][1]+p[134]*plg[1][3]+p[135]*plg[1][5])*\ + cd14*cos(dgtr*(input->g_long-p[136])) \ + +apt[0]*flags->swc[12]* \ + (p[55]*plg[0][1]+p[56]*plg[0][3]+p[57]*plg[0][5])*\ + cos(sr*(input->sec-p[58])); + } + } else { + t[12] = apdf*flags->swc[11]*(1.0+p[120]*plg[0][1])*\ + ((p[60]*plg[1][2]+p[61]*plg[1][4]+p[62]*plg[1][6])*\ + cos(dgtr*(input->g_long-p[63])))\ + +apdf*flags->swc[11]*flags->swc[5]* \ + (p[115]*plg[1][1]+p[116]*plg[1][3]+p[117]*plg[1][5])* \ + cd14*cos(dgtr*(input->g_long-p[118])) \ + + apdf*flags->swc[12]* \ + (p[83]*plg[0][1]+p[84]*plg[0][3]+p[85]*plg[0][5])* \ + cos(sr*(input->sec-p[75])); + } + } + } + + /* parms not used: 82, 89, 99, 139-149 */ + tinf = p[30]; + for (i=0;i<14;i++) + tinf = tinf + fabs(flags->sw[i+1])*t[i]; + return tinf; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- GLOB7S ---------------------------- */ +/* ------------------------------------------------------------------- */ + +double glob7s(double *p, struct nrlmsise_input *input, struct nrlmsise_flags *flags) { +/* VERSION OF GLOBE FOR LOWER ATMOSPHERE 10/26/99 + */ + double pset=2.0; + double t[14]; + double tt; + double cd32, cd18, cd14, cd39; + int i,j; + double dr=1.72142E-2; + double dgtr=1.74533E-2; + /* confirm parameter set */ + if (p[99]==0) + p[99]=pset; + if (p[99]!=pset) { + printf("Wrong parameter set for glob7s\n"); + return -1; + } + for (j=0;j<14;j++) + t[j]=0.0; + cd32 = cos(dr*(input->doy-p[31])); + cd18 = cos(2.0*dr*(input->doy-p[17])); + cd14 = cos(dr*(input->doy-p[13])); + cd39 = cos(2.0*dr*(input->doy-p[38])); + + /* F10.7 */ + t[0] = p[21]*dfa; + + /* time independent */ + t[1]=p[1]*plg[0][2] + p[2]*plg[0][4] + p[22]*plg[0][6] + p[26]*plg[0][1] + p[14]*plg[0][3] + p[59]*plg[0][5]; + + /* SYMMETRICAL ANNUAL */ + t[2]=(p[18]+p[47]*plg[0][2]+p[29]*plg[0][4])*cd32; + + /* SYMMETRICAL SEMIANNUAL */ + t[3]=(p[15]+p[16]*plg[0][2]+p[30]*plg[0][4])*cd18; + + /* ASYMMETRICAL ANNUAL */ + t[4]=(p[9]*plg[0][1]+p[10]*plg[0][3]+p[20]*plg[0][5])*cd14; + + /* ASYMMETRICAL SEMIANNUAL */ + t[5]=(p[37]*plg[0][1])*cd39; + + /* DIURNAL */ + if (flags->sw[7]) { + double t71, t72; + t71 = p[11]*plg[1][2]*cd14*flags->swc[5]; + t72 = p[12]*plg[1][2]*cd14*flags->swc[5]; + t[6] = ((p[3]*plg[1][1] + p[4]*plg[1][3] + t71) * ctloc + (p[6]*plg[1][1] + p[7]*plg[1][3] + t72) * stloc) ; + } + + /* SEMIDIURNAL */ + if (flags->sw[8]) { + double t81, t82; + t81 = (p[23]*plg[2][3]+p[35]*plg[2][5])*cd14*flags->swc[5]; + t82 = (p[33]*plg[2][3]+p[36]*plg[2][5])*cd14*flags->swc[5]; + t[7] = ((p[5]*plg[2][2] + p[41]*plg[2][4] + t81) * c2tloc + (p[8]*plg[2][2] + p[42]*plg[2][4] + t82) * s2tloc); + } + + /* TERDIURNAL */ + if (flags->sw[14]) { + t[13] = p[39] * plg[3][3] * s3tloc + p[40] * plg[3][3] * c3tloc; + } + + /* MAGNETIC ACTIVITY */ + if (flags->sw[9]) { + if (flags->sw[9]==1) + t[8] = apdf * (p[32] + p[45] * plg[0][2] * flags->swc[2]); + if (flags->sw[9]==-1) + t[8]=(p[50]*apt[0] + p[96]*plg[0][2] * apt[0]*flags->swc[2]); + } + + /* LONGITUDINAL */ + if (!((flags->sw[10]==0) || (flags->sw[11]==0) || (input->g_long<=-1000.0))) { + t[10] = (1.0 + plg[0][1]*(p[80]*flags->swc[5]*cos(dr*(input->doy-p[81]))\ + +p[85]*flags->swc[6]*cos(2.0*dr*(input->doy-p[86])))\ + +p[83]*flags->swc[3]*cos(dr*(input->doy-p[84]))\ + +p[87]*flags->swc[4]*cos(2.0*dr*(input->doy-p[88])))\ + *((p[64]*plg[1][2]+p[65]*plg[1][4]+p[66]*plg[1][6]\ + +p[74]*plg[1][1]+p[75]*plg[1][3]+p[76]*plg[1][5]\ + )*cos(dgtr*input->g_long)\ + +(p[90]*plg[1][2]+p[91]*plg[1][4]+p[92]*plg[1][6]\ + +p[77]*plg[1][1]+p[78]*plg[1][3]+p[79]*plg[1][5]\ + )*sin(dgtr*input->g_long)); + } + tt=0; + for (i=0;i<14;i++) + tt+=fabs(flags->sw[i+1])*t[i]; + return tt; +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- GTD7 ------------------------------ */ +/* ------------------------------------------------------------------- */ + +void gtd7(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrlmsise_output *output) { + double xlat; + double xmm; + int mn3 = 5; + double zn3[5]={32.5,20.0,15.0,10.0,0.0}; + int mn2 = 4; + double zn2[4]={72.5,55.0,45.0,32.5}; + double altt; + double zmix=62.5; + double tmp; + double dm28m; + double tz; + double dmc; + double dmr; + double dz28; + struct nrlmsise_output soutput; + int i; + + tselec(flags); + + /* Latitude variation of gravity (none for sw[2]=0) */ + xlat=input->g_lat; + if (flags->sw[2]==0) + xlat=45.0; + glatf(xlat, &gsurf, &re); + + xmm = pdm[2][4]; + + /* THERMOSPHERE / MESOSPHERE (above zn2[0]) */ + if (input->alt>zn2[0]) + altt=input->alt; + else + altt=zn2[0]; + + tmp=input->alt; + input->alt=altt; + gts7(input, flags, &soutput); + altt=input->alt; + input->alt=tmp; + if (flags->sw[0]) /* metric adjustment */ + dm28m=dm28*1.0E6; + else + dm28m=dm28; + output->t[0]=soutput.t[0]; + output->t[1]=soutput.t[1]; + if (input->alt>=zn2[0]) { + for (i=0;i<9;i++) + output->d[i]=soutput.d[i]; + return; + } + +/* LOWER MESOSPHERE/UPPER STRATOSPHERE (between zn3[0] and zn2[0]) + * Temperature at nodes and gradients at end nodes + * Inverse temperature a linear function of spherical harmonics + */ + meso_tgn2[0]=meso_tgn1[1]; + meso_tn2[0]=meso_tn1[4]; + meso_tn2[1]=pma[0][0]*pavgm[0]/(1.0-flags->sw[20]*glob7s(pma[0], input, flags)); + meso_tn2[2]=pma[1][0]*pavgm[1]/(1.0-flags->sw[20]*glob7s(pma[1], input, flags)); + meso_tn2[3]=pma[2][0]*pavgm[2]/(1.0-flags->sw[20]*flags->sw[22]*glob7s(pma[2], input, flags)); + meso_tgn2[1]=pavgm[8]*pma[9][0]*(1.0+flags->sw[20]*flags->sw[22]*glob7s(pma[9], input, flags))*meso_tn2[3]*meso_tn2[3]/(pow((pma[2][0]*pavgm[2]),2.0)); + meso_tn3[0]=meso_tn2[3]; + + if (input->alt<=zn3[0]) { +/* LOWER STRATOSPHERE AND TROPOSPHERE (below zn3[0]) + * Temperature at nodes and gradients at end nodes + * Inverse temperature a linear function of spherical harmonics + */ + meso_tgn3[0]=meso_tgn2[1]; + meso_tn3[1]=pma[3][0]*pavgm[3]/(1.0-flags->sw[22]*glob7s(pma[3], input, flags)); + meso_tn3[2]=pma[4][0]*pavgm[4]/(1.0-flags->sw[22]*glob7s(pma[4], input, flags)); + meso_tn3[3]=pma[5][0]*pavgm[5]/(1.0-flags->sw[22]*glob7s(pma[5], input, flags)); + meso_tn3[4]=pma[6][0]*pavgm[6]/(1.0-flags->sw[22]*glob7s(pma[6], input, flags)); + meso_tgn3[1]=pma[7][0]*pavgm[7]*(1.0+flags->sw[22]*glob7s(pma[7], input, flags)) *meso_tn3[4]*meso_tn3[4]/(pow((pma[6][0]*pavgm[6]),2.0)); + } + + /* LINEAR TRANSITION TO FULL MIXING BELOW zn2[0] */ + + dmc=0; + if (input->alt>zmix) + dmc = 1.0 - (zn2[0]-input->alt)/(zn2[0] - zmix); + dz28=soutput.d[2]; + + /**** N2 density ****/ + dmr=soutput.d[2] / dm28m - 1.0; + output->d[2]=densm(input->alt,dm28m,xmm, &tz, mn3, zn3, meso_tn3, meso_tgn3, mn2, zn2, meso_tn2, meso_tgn2); + output->d[2]=output->d[2] * (1.0 + dmr*dmc); + + /**** HE density ****/ + dmr = soutput.d[0] / (dz28 * pdm[0][1]) - 1.0; + output->d[0] = output->d[2] * pdm[0][1] * (1.0 + dmr*dmc); + + /**** O density ****/ + output->d[1] = 0; + output->d[8] = 0; + + /**** O2 density ****/ + dmr = soutput.d[3] / (dz28 * pdm[3][1]) - 1.0; + output->d[3] = output->d[2] * pdm[3][1] * (1.0 + dmr*dmc); + + /**** AR density ***/ + dmr = soutput.d[4] / (dz28 * pdm[4][1]) - 1.0; + output->d[4] = output->d[2] * pdm[4][1] * (1.0 + dmr*dmc); + + /**** Hydrogen density ****/ + output->d[6] = 0; + + /**** Atomic nitrogen density ****/ + output->d[7] = 0; + + /**** Total mass density */ + output->d[5] = 1.66E-24 * (4.0 * output->d[0] + 16.0 * output->d[1] + 28.0 * output->d[2] + 32.0 * output->d[3] + 40.0 * output->d[4] + output->d[6] + 14.0 * output->d[7]); + + if (flags->sw[0]) + output->d[5]=output->d[5]/1000; + + /**** temperature at altitude ****/ + dd = densm(input->alt, 1.0, 0, &tz, mn3, zn3, meso_tn3, meso_tgn3, mn2, zn2, meso_tn2, meso_tgn2); + output->t[1]=tz; + +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- GTD7D ----------------------------- */ +/* ------------------------------------------------------------------- */ + +void gtd7d(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrlmsise_output *output) { + gtd7(input, flags, output); + output->d[5] = 1.66E-24 * (4.0 * output->d[0] + 16.0 * output->d[1] + 28.0 * output->d[2] + 32.0 * output->d[3] + 40.0 * output->d[4] + output->d[6] + 14.0 * output->d[7] + 16.0 * output->d[8]); + if (flags->sw[0]) + output->d[5]=output->d[5]/1000; +} + + + +/* ------------------------------------------------------------------- */ +/* -------------------------------- GHP7 ----------------------------- */ +/* ------------------------------------------------------------------- */ + +void ghp7(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrlmsise_output *output, double press) { + double bm = 1.3806E-19; + double rgas = 831.4; + double test = 0.00043; + double ltest = 12; + double pl, p; + double zi; + double z; + double cl, cl2; + double ca, cd; + double xn, xm, diff; + double g, sh; + int l; + pl = log10(press); + if (pl >= -5.0) { + if (pl>2.5) + zi = 18.06 * (3.00 - pl); + else if ((pl>0.075) && (pl<=2.5)) + zi = 14.98 * (3.08 - pl); + else if ((pl>-1) && (pl<=0.075)) + zi = 17.80 * (2.72 - pl); + else if ((pl>-2) && (pl<=-1)) + zi = 14.28 * (3.64 - pl); + else if ((pl>-4) && (pl<=-2)) + zi = 12.72 * (4.32 -pl); + else + zi = 25.3 * (0.11 - pl); + cl = input->g_lat/90.0; + cl2 = cl*cl; + if (input->doy<182) + cd = (1.0 - (double) input->doy) / 91.25; + else + cd = ((double) input->doy) / 91.25 - 3.0; + ca = 0; + if ((pl > -1.11) && (pl<=-0.23)) + ca = 1.0; + if (pl > -0.23) + ca = (2.79 - pl) / (2.79 + 0.23); + if ((pl <= -1.11) && (pl>-3)) + ca = (-2.93 - pl)/(-2.93 + 1.11); + z = zi - 4.87 * cl * cd * ca - 1.64 * cl2 * ca + 0.31 * ca * cl; + } else + z = 22.0 * pow((pl + 4.0),2.0) + 110.0; + + /* iteration loop */ + l = 0; + do { + l++; + input->alt = z; + gtd7(input, flags, output); + z = input->alt; + xn = output->d[0] + output->d[1] + output->d[2] + output->d[3] + output->d[4] + output->d[6] + output->d[7]; + p = bm * xn * output->t[1]; + if (flags->sw[0]) + p = p*1.0E-6; + diff = pl - log10(p); + if (sqrt(diff*diff)d[5] / xn / 1.66E-24; + if (flags->sw[0]) + xm = xm * 1.0E3; + g = gsurf / (pow((1.0 + z/re),2.0)); + sh = rgas * output->t[1] / (xm * g); + + /* new altitude estimate using scale height */ + if (l < 6) + z = z - sh * diff * 2.302; + else + z = z - sh * diff; + } while (1==1); +} + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- GTS7 ------------------------------ */ +/* ------------------------------------------------------------------- */ + +void gts7(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrlmsise_output *output) { +/* Thermospheric portion of NRLMSISE-00 + * See GTD7 for more extensive comments + * alt > 72.5 km! + */ + double za; + int i, j; + double ddum, z; + double zn1[5] = {120.0, 110.0, 100.0, 90.0, 72.5}; + double tinf; + int mn1 = 5; + double g0; + double tlb; + double s; + double db01, db04, db14, db16, db28, db32, db40; + double zh28, zh04, zh16, zh32, zh40, zh01, zh14; + double zhm28, zhm04, zhm16, zhm32, zhm40, zhm01, zhm14; + double xmd; + double b28, b04, b16, b32, b40, b01, b14; + double tz; + double g28, g4, g16, g32, g40, g1, g14; + double zhf, xmm; + double zc04, zc16, zc32, zc40, zc01, zc14; + double hc04, hc16, hc32, hc40, hc01, hc14; + double hcc16, hcc32, hcc01, hcc14; + double zcc16, zcc32, zcc01, zcc14; + double rc16, rc32, rc01, rc14; + double rl; + double g16h, db16h, tho, zsht, zmho, zsho; + double dgtr=1.74533E-2; + double dr=1.72142E-2; + double alpha[9]={-0.38, 0.0, 0.0, 0.0, 0.17, 0.0, -0.38, 0.0, 0.0}; + double altl[8]={200.0, 300.0, 160.0, 250.0, 240.0, 450.0, 320.0, 450.0}; + double dd; + double hc216, hcc232; + za = pdl[1][15]; + zn1[0] = za; + for (j=0;j<9;j++) + output->d[j]=0; + + /* TINF VARIATIONS NOT IMPORTANT BELOW ZA OR ZN1(1) */ + if (input->alt>zn1[0]) + tinf = ptm[0]*pt[0] * \ + (1.0+flags->sw[16]*globe7(pt,input,flags)); + else + tinf = ptm[0]*pt[0]; + output->t[0]=tinf; + + /* GRADIENT VARIATIONS NOT IMPORTANT BELOW ZN1(5) */ + if (input->alt>zn1[4]) + g0 = ptm[3]*ps[0] * \ + (1.0+flags->sw[19]*globe7(ps,input,flags)); + else + g0 = ptm[3]*ps[0]; + tlb = ptm[1] * (1.0 + flags->sw[17]*globe7(pd[3],input,flags))*pd[3][0]; + s = g0 / (tinf - tlb); + +/* Lower thermosphere temp variations not significant for + * density above 300 km */ + if (input->alt<300.0) { + meso_tn1[1]=ptm[6]*ptl[0][0]/(1.0-flags->sw[18]*glob7s(ptl[0], input, flags)); + meso_tn1[2]=ptm[2]*ptl[1][0]/(1.0-flags->sw[18]*glob7s(ptl[1], input, flags)); + meso_tn1[3]=ptm[7]*ptl[2][0]/(1.0-flags->sw[18]*glob7s(ptl[2], input, flags)); + meso_tn1[4]=ptm[4]*ptl[3][0]/(1.0-flags->sw[18]*flags->sw[20]*glob7s(ptl[3], input, flags)); + meso_tgn1[1]=ptm[8]*pma[8][0]*(1.0+flags->sw[18]*flags->sw[20]*glob7s(pma[8], input, flags))*meso_tn1[4]*meso_tn1[4]/(pow((ptm[4]*ptl[3][0]),2.0)); + } else { + meso_tn1[1]=ptm[6]*ptl[0][0]; + meso_tn1[2]=ptm[2]*ptl[1][0]; + meso_tn1[3]=ptm[7]*ptl[2][0]; + meso_tn1[4]=ptm[4]*ptl[3][0]; + meso_tgn1[1]=ptm[8]*pma[8][0]*meso_tn1[4]*meso_tn1[4]/(pow((ptm[4]*ptl[3][0]),2.0)); + } + + /* N2 variation factor at Zlb */ + g28=flags->sw[21]*globe7(pd[2], input, flags); + + /* VARIATION OF TURBOPAUSE HEIGHT */ + zhf=pdl[1][24]*(1.0+flags->sw[5]*pdl[0][24]*sin(dgtr*input->g_lat)*cos(dr*(input->doy-pt[13]))); + output->t[0]=tinf; + xmm = pdm[2][4]; + z = input->alt; + + + /**** N2 DENSITY ****/ + + /* Diffusive density at Zlb */ + db28 = pdm[2][0]*exp(g28)*pd[2][0]; + /* Diffusive density at Alt */ + output->d[2]=densu(z,db28,tinf,tlb,28.0,alpha[2],&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + dd=output->d[2]; + /* Turbopause */ + zh28=pdm[2][2]*zhf; + zhm28=pdm[2][3]*pdl[1][5]; + xmd=28.0-xmm; + /* Mixed density at Zlb */ + b28=densu(zh28,db28,tinf,tlb,xmd,(alpha[2]-1.0),&tz,ptm[5],s,mn1, zn1,meso_tn1,meso_tgn1); + if ((flags->sw[15])&&(z<=altl[2])) { + /* Mixed density at Alt */ + dm28=densu(z,b28,tinf,tlb,xmm,alpha[2],&tz,ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Net density at Alt */ + output->d[2]=dnet(output->d[2],dm28,zhm28,xmm,28.0); + } + + + /**** HE DENSITY ****/ + + /* Density variation factor at Zlb */ + g4 = flags->sw[21]*globe7(pd[0], input, flags); + /* Diffusive density at Zlb */ + db04 = pdm[0][0]*exp(g4)*pd[0][0]; + /* Diffusive density at Alt */ + output->d[0]=densu(z,db04,tinf,tlb, 4.,alpha[0],&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + dd=output->d[0]; + if ((flags->sw[15]) && (zt[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Mixed density at Alt */ + dm04=densu(z,b04,tinf,tlb,xmm,0.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + zhm04=zhm28; + /* Net density at Alt */ + output->d[0]=dnet(output->d[0],dm04,zhm04,xmm,4.); + /* Correction to specified mixing ratio at ground */ + rl=log(b28*pdm[0][1]/b04); + zc04=pdm[0][4]*pdl[1][0]; + hc04=pdm[0][5]*pdl[1][1]; + /* Net density corrected at Alt */ + output->d[0]=output->d[0]*ccor(z,rl,hc04,zc04); + } + + + /**** O DENSITY ****/ + + /* Density variation factor at Zlb */ + g16= flags->sw[21]*globe7(pd[1],input,flags); + /* Diffusive density at Zlb */ + db16 = pdm[1][0]*exp(g16)*pd[1][0]; + /* Diffusive density at Alt */ + output->d[1]=densu(z,db16,tinf,tlb, 16.,alpha[1],&output->t[1],ptm[5],s,mn1, zn1,meso_tn1,meso_tgn1); + dd=output->d[1]; + if ((flags->sw[15]) && (z<=altl[1])) { + /* Turbopause */ + zh16=pdm[1][2]; + /* Mixed density at Zlb */ + b16=densu(zh16,db16,tinf,tlb,16.0-xmm,(alpha[1]-1.0), &output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Mixed density at Alt */ + dm16=densu(z,b16,tinf,tlb,xmm,0.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + zhm16=zhm28; + /* Net density at Alt */ + output->d[1]=dnet(output->d[1],dm16,zhm16,xmm,16.); + rl=pdm[1][1]*pdl[1][16]*(1.0+flags->sw[1]*pdl[0][23]*(input->f107A-150.0)); + hc16=pdm[1][5]*pdl[1][3]; + zc16=pdm[1][4]*pdl[1][2]; + hc216=pdm[1][5]*pdl[1][4]; + output->d[1]=output->d[1]*ccor2(z,rl,hc16,zc16,hc216); + /* Chemistry correction */ + hcc16=pdm[1][7]*pdl[1][13]; + zcc16=pdm[1][6]*pdl[1][12]; + rc16=pdm[1][3]*pdl[1][14]; + /* Net density corrected at Alt */ + output->d[1]=output->d[1]*ccor(z,rc16,hcc16,zcc16); + } + + + /**** O2 DENSITY ****/ + + /* Density variation factor at Zlb */ + g32= flags->sw[21]*globe7(pd[4], input, flags); + /* Diffusive density at Zlb */ + db32 = pdm[3][0]*exp(g32)*pd[4][0]; + /* Diffusive density at Alt */ + output->d[3]=densu(z,db32,tinf,tlb, 32.,alpha[3],&output->t[1],ptm[5],s,mn1, zn1,meso_tn1,meso_tgn1); + dd=output->d[3]; + if (flags->sw[15]) { + if (z<=altl[3]) { + /* Turbopause */ + zh32=pdm[3][2]; + /* Mixed density at Zlb */ + b32=densu(zh32,db32,tinf,tlb,32.-xmm,alpha[3]-1., &output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Mixed density at Alt */ + dm32=densu(z,b32,tinf,tlb,xmm,0.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + zhm32=zhm28; + /* Net density at Alt */ + output->d[3]=dnet(output->d[3],dm32,zhm32,xmm,32.); + /* Correction to specified mixing ratio at ground */ + rl=log(b28*pdm[3][1]/b32); + hc32=pdm[3][5]*pdl[1][7]; + zc32=pdm[3][4]*pdl[1][6]; + output->d[3]=output->d[3]*ccor(z,rl,hc32,zc32); + } + /* Correction for general departure from diffusive equilibrium above Zlb */ + hcc32=pdm[3][7]*pdl[1][22]; + hcc232=pdm[3][7]*pdl[0][22]; + zcc32=pdm[3][6]*pdl[1][21]; + rc32=pdm[3][3]*pdl[1][23]*(1.+flags->sw[1]*pdl[0][23]*(input->f107A-150.)); + /* Net density corrected at Alt */ + output->d[3]=output->d[3]*ccor2(z,rc32,hcc32,zcc32,hcc232); + } + + + /**** AR DENSITY ****/ + + /* Density variation factor at Zlb */ + g40= flags->sw[21]*globe7(pd[5],input,flags); + /* Diffusive density at Zlb */ + db40 = pdm[4][0]*exp(g40)*pd[5][0]; + /* Diffusive density at Alt */ + output->d[4]=densu(z,db40,tinf,tlb, 40.,alpha[4],&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + dd=output->d[4]; + if ((flags->sw[15]) && (z<=altl[4])) { + /* Turbopause */ + zh40=pdm[4][2]; + /* Mixed density at Zlb */ + b40=densu(zh40,db40,tinf,tlb,40.-xmm,alpha[4]-1.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Mixed density at Alt */ + dm40=densu(z,b40,tinf,tlb,xmm,0.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + zhm40=zhm28; + /* Net density at Alt */ + output->d[4]=dnet(output->d[4],dm40,zhm40,xmm,40.); + /* Correction to specified mixing ratio at ground */ + rl=log(b28*pdm[4][1]/b40); + hc40=pdm[4][5]*pdl[1][9]; + zc40=pdm[4][4]*pdl[1][8]; + /* Net density corrected at Alt */ + output->d[4]=output->d[4]*ccor(z,rl,hc40,zc40); + } + + + /**** HYDROGEN DENSITY ****/ + + /* Density variation factor at Zlb */ + g1 = flags->sw[21]*globe7(pd[6], input, flags); + /* Diffusive density at Zlb */ + db01 = pdm[5][0]*exp(g1)*pd[6][0]; + /* Diffusive density at Alt */ + output->d[6]=densu(z,db01,tinf,tlb,1.,alpha[6],&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + dd=output->d[6]; + if ((flags->sw[15]) && (z<=altl[6])) { + /* Turbopause */ + zh01=pdm[5][2]; + /* Mixed density at Zlb */ + b01=densu(zh01,db01,tinf,tlb,1.-xmm,alpha[6]-1., &output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Mixed density at Alt */ + dm01=densu(z,b01,tinf,tlb,xmm,0.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + zhm01=zhm28; + /* Net density at Alt */ + output->d[6]=dnet(output->d[6],dm01,zhm01,xmm,1.); + /* Correction to specified mixing ratio at ground */ + rl=log(b28*pdm[5][1]*sqrt(pdl[1][17]*pdl[1][17])/b01); + hc01=pdm[5][5]*pdl[1][11]; + zc01=pdm[5][4]*pdl[1][10]; + output->d[6]=output->d[6]*ccor(z,rl,hc01,zc01); + /* Chemistry correction */ + hcc01=pdm[5][7]*pdl[1][19]; + zcc01=pdm[5][6]*pdl[1][18]; + rc01=pdm[5][3]*pdl[1][20]; + /* Net density corrected at Alt */ + output->d[6]=output->d[6]*ccor(z,rc01,hcc01,zcc01); +} + + + /**** ATOMIC NITROGEN DENSITY ****/ + + /* Density variation factor at Zlb */ + g14 = flags->sw[21]*globe7(pd[7],input,flags); + /* Diffusive density at Zlb */ + db14 = pdm[6][0]*exp(g14)*pd[7][0]; + /* Diffusive density at Alt */ + output->d[7]=densu(z,db14,tinf,tlb,14.,alpha[7],&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + dd=output->d[7]; + if ((flags->sw[15]) && (z<=altl[7])) { + /* Turbopause */ + zh14=pdm[6][2]; + /* Mixed density at Zlb */ + b14=densu(zh14,db14,tinf,tlb,14.-xmm,alpha[7]-1., &output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + /* Mixed density at Alt */ + dm14=densu(z,b14,tinf,tlb,xmm,0.,&output->t[1],ptm[5],s,mn1,zn1,meso_tn1,meso_tgn1); + zhm14=zhm28; + /* Net density at Alt */ + output->d[7]=dnet(output->d[7],dm14,zhm14,xmm,14.); + /* Correction to specified mixing ratio at ground */ + rl=log(b28*pdm[6][1]*sqrt(pdl[0][2]*pdl[0][2])/b14); + hc14=pdm[6][5]*pdl[0][1]; + zc14=pdm[6][4]*pdl[0][0]; + output->d[7]=output->d[7]*ccor(z,rl,hc14,zc14); + /* Chemistry correction */ + hcc14=pdm[6][7]*pdl[0][4]; + zcc14=pdm[6][6]*pdl[0][3]; + rc14=pdm[6][3]*pdl[0][5]; + /* Net density corrected at Alt */ + output->d[7]=output->d[7]*ccor(z,rc14,hcc14,zcc14); + } + + + /**** Anomalous OXYGEN DENSITY ****/ + + g16h = flags->sw[21]*globe7(pd[8],input,flags); + db16h = pdm[7][0]*exp(g16h)*pd[8][0]; + tho = pdm[7][9]*pdl[0][6]; + dd=densu(z,db16h,tho,tho,16.,alpha[8],&output->t[1],ptm[5],s,mn1, zn1,meso_tn1,meso_tgn1); + zsht=pdm[7][5]; + zmho=pdm[7][4]; + zsho=scalh(zmho,16.0,tho); + output->d[8]=dd*exp(-zsht/zsho*(exp(-(z-zmho)/zsht)-1.)); + + + /* total mass density */ + output->d[5] = 1.66E-24*(4.0*output->d[0]+16.0*output->d[1]+28.0*output->d[2]+32.0*output->d[3]+40.0*output->d[4]+ output->d[6]+14.0*output->d[7]); + + + /* temperature */ + z = sqrt(input->alt*input->alt); + ddum = densu(z,1.0, tinf, tlb, 0.0, 0.0, &output->t[1], ptm[5], s, mn1, zn1, meso_tn1, meso_tgn1); + (void) ddum; /* silence gcc */ + if (flags->sw[0]) { + for(i=0;i<9;i++) + output->d[i]=output->d[i]*1.0E6; + output->d[5]=output->d[5]/1000; + } +} diff --git a/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.h b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.h new file mode 100644 index 0000000..d596a82 --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00.h @@ -0,0 +1,222 @@ +/* -------------------------------------------------------------------- */ +/* --------- N R L M S I S E - 0 0 M O D E L 2 0 0 1 ---------- */ +/* -------------------------------------------------------------------- */ + +/* This file is part of the NRLMSISE-00 C source code package - release + * 20041227 + * + * The NRLMSISE-00 model was developed by Mike Picone, Alan Hedin, and + * Doug Drob. They also wrote a NRLMSISE-00 distribution package in + * FORTRAN which is available at + * http://uap-www.nrl.navy.mil/models_web/msis/msis_home.htm + * + * Dominik Brodowski implemented and maintains this C version. You can + * reach him at mail@brodo.de. See the file "DOCUMENTATION" for details, + * and check http://www.brodo.de/english/pub/nrlmsise/index.html for + * updated releases of this package. + */ + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------- INPUT ----------------------------- */ +/* ------------------------------------------------------------------- */ + +struct nrlmsise_flags { + int switches[24]; + double sw[24]; + double swc[24]; +}; +/* + * Switches: to turn on and off particular variations use these switches. + * 0 is off, 1 is on, and 2 is main effects off but cross terms on. + * + * Standard values are 0 for switch 0 and 1 for switches 1 to 23. The + * array "switches" needs to be set accordingly by the calling program. + * The arrays sw and swc are set internally. + * + * switches[i]: + * i - explanation + * ----------------- + * 0 - output in meters and kilograms instead of centimeters and grams + * 1 - F10.7 effect on mean + * 2 - time independent + * 3 - symmetrical annual + * 4 - symmetrical semiannual + * 5 - asymmetrical annual + * 6 - asymmetrical semiannual + * 7 - diurnal + * 8 - semidiurnal + * 9 - daily ap [when this is set to -1 (!) the pointer + * ap_a in struct nrlmsise_input must + * point to a struct ap_array] + * 10 - all UT/long effects + * 11 - longitudinal + * 12 - UT and mixed UT/long + * 13 - mixed AP/UT/LONG + * 14 - terdiurnal + * 15 - departures from diffusive equilibrium + * 16 - all TINF var + * 17 - all TLB var + * 18 - all TN1 var + * 19 - all S var + * 20 - all TN2 var + * 21 - all NLB var + * 22 - all TN3 var + * 23 - turbo scale height var + */ + +struct ap_array { + double a[7]; +}; +/* Array containing the following magnetic values: + * 0 : daily AP + * 1 : 3 hr AP index for current time + * 2 : 3 hr AP index for 3 hrs before current time + * 3 : 3 hr AP index for 6 hrs before current time + * 4 : 3 hr AP index for 9 hrs before current time + * 5 : Average of eight 3 hr AP indicies from 12 to 33 hrs + * prior to current time + * 6 : Average of eight 3 hr AP indicies from 36 to 57 hrs + * prior to current time + */ + + +struct nrlmsise_input { + int year; /* year, currently ignored */ + int doy; /* day of year */ + double sec; /* seconds in day (UT) */ + double alt; /* altitude in kilometers */ + double g_lat; /* geodetic latitude */ + double g_long; /* geodetic longitude */ + double lst; /* local apparent solar time (hours), see note below */ + double f107A; /* 81 day average of F10.7 flux (centered on doy) */ + double f107; /* daily F10.7 flux for previous day */ + double ap; /* magnetic index(daily) */ + struct ap_array *ap_a; /* see above */ +}; +/* + * NOTES ON INPUT VARIABLES: + * UT, Local Time, and Longitude are used independently in the + * model and are not of equal importance for every situation. + * For the most physically realistic calculation these three + * variables should be consistent (lst=sec/3600 + g_long/15). + * The Equation of Time departures from the above formula + * for apparent local time can be included if available but + * are of minor importance. + * + * f107 and f107A values used to generate the model correspond + * to the 10.7 cm radio flux at the actual distance of the Earth + * from the Sun rather than the radio flux at 1 AU. The following + * site provides both classes of values: + * ftp://ftp.ngdc.noaa.gov/STP/SOLAR_DATA/SOLAR_RADIO/FLUX/ + * + * f107, f107A, and ap effects are neither large nor well + * established below 80 km and these parameters should be set to + * 150., 150., and 4. respectively. + */ + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ OUTPUT ----------------------------- */ +/* ------------------------------------------------------------------- */ + +struct nrlmsise_output { + double d[9]; /* densities */ + double t[2]; /* temperatures */ +}; +/* + * OUTPUT VARIABLES: + * d[0] - HE NUMBER DENSITY(CM-3) + * d[1] - O NUMBER DENSITY(CM-3) + * d[2] - N2 NUMBER DENSITY(CM-3) + * d[3] - O2 NUMBER DENSITY(CM-3) + * d[4] - AR NUMBER DENSITY(CM-3) + * d[5] - TOTAL MASS DENSITY(GM/CM3) [includes d[8] in td7d] + * d[6] - H NUMBER DENSITY(CM-3) + * d[7] - N NUMBER DENSITY(CM-3) + * d[8] - Anomalous oxygen NUMBER DENSITY(CM-3) + * t[0] - EXOSPHERIC TEMPERATURE + * t[1] - TEMPERATURE AT ALT + * + * + * O, H, and N are set to zero below 72.5 km + * + * t[0], Exospheric temperature, is set to global average for + * altitudes below 120 km. The 120 km gradient is left at global + * average value for altitudes below 72 km. + * + * d[5], TOTAL MASS DENSITY, is NOT the same for subroutines GTD7 + * and GTD7D + * + * SUBROUTINE GTD7 -- d[5] is the sum of the mass densities of the + * species labeled by indices 0-4 and 6-7 in output variable d. + * This includes He, O, N2, O2, Ar, H, and N but does NOT include + * anomalous oxygen (species index 8). + * + * SUBROUTINE GTD7D -- d[5] is the "effective total mass density + * for drag" and is the sum of the mass densities of all species + * in this model, INCLUDING anomalous oxygen. + */ + + + +/* ------------------------------------------------------------------- */ +/* --------------------------- PROTOTYPES ---------------------------- */ +/* ------------------------------------------------------------------- */ + +/* GTD7 */ +/* Neutral Atmosphere Empircial Model from the surface to lower + * exosphere. + */ +void gtd7 (struct nrlmsise_input *input, \ + struct nrlmsise_flags *flags, \ + struct nrlmsise_output *output); + + +/* GTD7D */ +/* This subroutine provides Effective Total Mass Density for output + * d[5] which includes contributions from "anomalous oxygen" which can + * affect satellite drag above 500 km. See the section "output" for + * additional details. + */ +void gtd7d(struct nrlmsise_input *input, \ + struct nrlmsise_flags *flags, \ + struct nrlmsise_output *output); + + +/* GTS7 */ +/* Thermospheric portion of NRLMSISE-00 + */ +void gts7 (struct nrlmsise_input *input, \ + struct nrlmsise_flags *flags, \ + struct nrlmsise_output *output); + + +/* GHP7 */ +/* To specify outputs at a pressure level (press) rather than at + * an altitude. + */ +void ghp7 (struct nrlmsise_input *input, \ + struct nrlmsise_flags *flags, \ + struct nrlmsise_output *output, \ + double press); + + + +/* ------------------------------------------------------------------- */ +/* ----------------------- COMPILATION TWEAKS ------------------------ */ +/* ------------------------------------------------------------------- */ + +/* "inlining" of functions */ +/* Some compilers (e.g. gcc) allow the inlining of functions into the + * calling routine. This means a lot of overhead can be removed, and + * the execution of the program runs much faster. However, the filesize + * and thus the loading time is increased. + */ +#ifdef INLINE +#define __inline_double static inline double +#else +#define __inline_double double +#endif diff --git a/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_data.c b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_data.c new file mode 100644 index 0000000..0175e6c --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_data.c @@ -0,0 +1,740 @@ +/* -------------------------------------------------------------------- */ +/* --------- N R L M S I S E - 0 0 M O D E L 2 0 0 1 ---------- */ +/* -------------------------------------------------------------------- */ + +/* This file is part of the NRLMSISE-00 C source code package - release + * 20041227 + * + * The NRLMSISE-00 model was developed by Mike Picone, Alan Hedin, and + * Doug Drob. They also wrote a NRLMSISE-00 distribution package in + * FORTRAN which is available at + * http://uap-www.nrl.navy.mil/models_web/msis/msis_home.htm + * + * Dominik Brodowski implemented and maintains this C version. You can + * reach him at mail@brodo.de. See the file "DOCUMENTATION" for details, + * and check http://www.brodo.de/english/pub/nrlmsise/index.html for + * updated releases of this package. + */ + + + +/* ------------------------------------------------------------------- */ +/* ------------------------ BLOCK DATA GTD7BK ------------------------ */ +/* ------------------------------------------------------------------- */ + +/* TEMPERATURE */ +double pt[150] = { + 9.86573E-01, 1.62228E-02, 1.55270E-02,-1.04323E-01,-3.75801E-03, + -1.18538E-03,-1.24043E-01, 4.56820E-03, 8.76018E-03,-1.36235E-01, + -3.52427E-02, 8.84181E-03,-5.92127E-03,-8.61650E+00, 0.00000E+00, + 1.28492E-02, 0.00000E+00, 1.30096E+02, 1.04567E-02, 1.65686E-03, + -5.53887E-06, 2.97810E-03, 0.00000E+00, 5.13122E-03, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.27026E-06, + 0.00000E+00, 6.74494E+00, 4.93933E-03, 2.21656E-03, 2.50802E-03, + 0.00000E+00, 0.00000E+00,-2.08841E-02,-1.79873E+00, 1.45103E-03, + 2.81769E-04,-1.44703E-03,-5.16394E-05, 8.47001E-02, 1.70147E-01, + 5.72562E-03, 5.07493E-05, 4.36148E-03, 1.17863E-04, 4.74364E-03, + 6.61278E-03, 4.34292E-05, 1.44373E-03, 2.41470E-05, 2.84426E-03, + 8.56560E-04, 2.04028E-03, 0.00000E+00,-3.15994E+03,-2.46423E-03, + 1.13843E-03, 4.20512E-04, 0.00000E+00,-9.77214E+01, 6.77794E-03, + 5.27499E-03, 1.14936E-03, 0.00000E+00,-6.61311E-03,-1.84255E-02, + -1.96259E-02, 2.98618E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 6.44574E+02, 8.84668E-04, 5.05066E-04, 0.00000E+00, 4.02881E+03, + -1.89503E-03, 0.00000E+00, 0.00000E+00, 8.21407E-04, 2.06780E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -1.20410E-02,-3.63963E-03, 9.92070E-05,-1.15284E-04,-6.33059E-05, + -6.05545E-01, 8.34218E-03,-9.13036E+01, 3.71042E-04, 0.00000E+00, + 4.19000E-04, 2.70928E-03, 3.31507E-03,-4.44508E-03,-4.96334E-03, + -1.60449E-03, 3.95119E-03, 2.48924E-03, 5.09815E-04, 4.05302E-03, + 2.24076E-03, 0.00000E+00, 6.84256E-03, 4.66354E-04, 0.00000E+00, + -3.68328E-04, 0.00000E+00, 0.00000E+00,-1.46870E+02, 0.00000E+00, + 0.00000E+00, 1.09501E-03, 4.65156E-04, 5.62583E-04, 3.21596E+00, + 6.43168E-04, 3.14860E-03, 3.40738E-03, 1.78481E-03, 9.62532E-04, + 5.58171E-04, 3.43731E+00,-2.33195E-01, 5.10289E-04, 0.00000E+00, + 0.00000E+00,-9.25347E+04, 0.00000E+00,-1.99639E-03, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}; + +double pd[9][150] = { +/* HE DENSITY */ { + 1.09979E+00,-4.88060E-02,-1.97501E-01,-9.10280E-02,-6.96558E-03, + 2.42136E-02, 3.91333E-01,-7.20068E-03,-3.22718E-02, 1.41508E+00, + 1.68194E-01, 1.85282E-02, 1.09384E-01,-7.24282E+00, 0.00000E+00, + 2.96377E-01,-4.97210E-02, 1.04114E+02,-8.61108E-02,-7.29177E-04, + 1.48998E-06, 1.08629E-03, 0.00000E+00, 0.00000E+00, 8.31090E-02, + 1.12818E-01,-5.75005E-02,-1.29919E-02,-1.78849E-02,-2.86343E-06, + 0.00000E+00,-1.51187E+02,-6.65902E-03, 0.00000E+00,-2.02069E-03, + 0.00000E+00, 0.00000E+00, 4.32264E-02,-2.80444E+01,-3.26789E-03, + 2.47461E-03, 0.00000E+00, 0.00000E+00, 9.82100E-02, 1.22714E-01, + -3.96450E-02, 0.00000E+00,-2.76489E-03, 0.00000E+00, 1.87723E-03, + -8.09813E-03, 4.34428E-05,-7.70932E-03, 0.00000E+00,-2.28894E-03, + -5.69070E-03,-5.22193E-03, 6.00692E-03,-7.80434E+03,-3.48336E-03, + -6.38362E-03,-1.82190E-03, 0.00000E+00,-7.58976E+01,-2.17875E-02, + -1.72524E-02,-9.06287E-03, 0.00000E+00, 2.44725E-02, 8.66040E-02, + 1.05712E-01, 3.02543E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -6.01364E+03,-5.64668E-03,-2.54157E-03, 0.00000E+00, 3.15611E+02, + -5.69158E-03, 0.00000E+00, 0.00000E+00,-4.47216E-03,-4.49523E-03, + 4.64428E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 4.51236E-02, 2.46520E-02, 6.17794E-03, 0.00000E+00, 0.00000E+00, + -3.62944E-01,-4.80022E-02,-7.57230E+01,-1.99656E-03, 0.00000E+00, + -5.18780E-03,-1.73990E-02,-9.03485E-03, 7.48465E-03, 1.53267E-02, + 1.06296E-02, 1.18655E-02, 2.55569E-03, 1.69020E-03, 3.51936E-02, + -1.81242E-02, 0.00000E+00,-1.00529E-01,-5.10574E-03, 0.00000E+00, + 2.10228E-03, 0.00000E+00, 0.00000E+00,-1.73255E+02, 5.07833E-01, + -2.41408E-01, 8.75414E-03, 2.77527E-03,-8.90353E-05,-5.25148E+00, + -5.83899E-03,-2.09122E-02,-9.63530E-03, 9.77164E-03, 4.07051E-03, + 2.53555E-04,-5.52875E+00,-3.55993E-01,-2.49231E-03, 0.00000E+00, + 0.00000E+00, 2.86026E+01, 0.00000E+00, 3.42722E-04, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* O DENSITY */ { + 1.02315E+00,-1.59710E-01,-1.06630E-01,-1.77074E-02,-4.42726E-03, + 3.44803E-02, 4.45613E-02,-3.33751E-02,-5.73598E-02, 3.50360E-01, + 6.33053E-02, 2.16221E-02, 5.42577E-02,-5.74193E+00, 0.00000E+00, + 1.90891E-01,-1.39194E-02, 1.01102E+02, 8.16363E-02, 1.33717E-04, + 6.54403E-06, 3.10295E-03, 0.00000E+00, 0.00000E+00, 5.38205E-02, + 1.23910E-01,-1.39831E-02, 0.00000E+00, 0.00000E+00,-3.95915E-06, + 0.00000E+00,-7.14651E-01,-5.01027E-03, 0.00000E+00,-3.24756E-03, + 0.00000E+00, 0.00000E+00, 4.42173E-02,-1.31598E+01,-3.15626E-03, + 1.24574E-03,-1.47626E-03,-1.55461E-03, 6.40682E-02, 1.34898E-01, + -2.42415E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.13666E-04, + -5.40373E-03, 2.61635E-05,-3.33012E-03, 0.00000E+00,-3.08101E-03, + -2.42679E-03,-3.36086E-03, 0.00000E+00,-1.18979E+03,-5.04738E-02, + -2.61547E-03,-1.03132E-03, 1.91583E-04,-8.38132E+01,-1.40517E-02, + -1.14167E-02,-4.08012E-03, 1.73522E-04,-1.39644E-02,-6.64128E-02, + -6.85152E-02,-1.34414E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 6.07916E+02,-4.12220E-03,-2.20996E-03, 0.00000E+00, 1.70277E+03, + -4.63015E-03, 0.00000E+00, 0.00000E+00,-2.25360E-03,-2.96204E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 3.92786E-02, 1.31186E-02,-1.78086E-03, 0.00000E+00, 0.00000E+00, + -3.90083E-01,-2.84741E-02,-7.78400E+01,-1.02601E-03, 0.00000E+00, + -7.26485E-04,-5.42181E-03,-5.59305E-03, 1.22825E-02, 1.23868E-02, + 6.68835E-03,-1.03303E-02,-9.51903E-03, 2.70021E-04,-2.57084E-02, + -1.32430E-02, 0.00000E+00,-3.81000E-02,-3.16810E-03, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-9.05762E-04,-2.14590E-03,-1.17824E-03, 3.66732E+00, + -3.79729E-04,-6.13966E-03,-5.09082E-03,-1.96332E-03,-3.08280E-03, + -9.75222E-04, 4.03315E+00,-2.52710E-01, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* N2 DENSITY */ { + 1.16112E+00, 0.00000E+00, 0.00000E+00, 3.33725E-02, 0.00000E+00, + 3.48637E-02,-5.44368E-03, 0.00000E+00,-6.73940E-02, 1.74754E-01, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.74712E+02, 0.00000E+00, + 1.26733E-01, 0.00000E+00, 1.03154E+02, 5.52075E-02, 0.00000E+00, + 0.00000E+00, 8.13525E-04, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-2.50482E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.48894E-03, + 6.16053E-04,-5.79716E-04, 2.95482E-03, 8.47001E-02, 1.70147E-01, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.47425E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* TLB */ { + 9.44846E-01, 0.00000E+00, 0.00000E+00,-3.08617E-02, 0.00000E+00, + -2.44019E-02, 6.48607E-03, 0.00000E+00, 3.08181E-02, 4.59392E-02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.74712E+02, 0.00000E+00, + 2.13260E-02, 0.00000E+00,-3.56958E+02, 0.00000E+00, 1.82278E-04, + 0.00000E+00, 3.07472E-04, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 3.83054E-03, 0.00000E+00, 0.00000E+00, + -1.93065E-03,-1.45090E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.23493E-03, 1.36736E-03, 8.47001E-02, 1.70147E-01, + 3.71469E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 5.10250E-03, 2.47425E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 3.68756E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* O2 DENSITY */ { + 1.35580E+00, 1.44816E-01, 0.00000E+00, 6.07767E-02, 0.00000E+00, + 2.94777E-02, 7.46900E-02, 0.00000E+00,-9.23822E-02, 8.57342E-02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.38636E+01, 0.00000E+00, + 7.71653E-02, 0.00000E+00, 8.18751E+01, 1.87736E-02, 0.00000E+00, + 0.00000E+00, 1.49667E-02, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-3.67874E+02, 5.48158E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + 1.22631E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 8.17187E-03, 3.71617E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.10826E-03, + -3.13640E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -7.35742E-02,-5.00266E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 1.94965E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* AR DENSITY */ { + 1.04761E+00, 2.00165E-01, 2.37697E-01, 3.68552E-02, 0.00000E+00, + 3.57202E-02,-2.14075E-01, 0.00000E+00,-1.08018E-01,-3.73981E-01, + 0.00000E+00, 3.10022E-02,-1.16305E-03,-2.07596E+01, 0.00000E+00, + 8.64502E-02, 0.00000E+00, 9.74908E+01, 5.16707E-02, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 3.46193E+02, 1.34297E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.48509E-03, + -1.54689E-04, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + 1.47753E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 1.89320E-02, 3.68181E-05, 1.32570E-02, 0.00000E+00, 0.00000E+00, + 3.59719E-03, 7.44328E-03,-1.00023E-03,-6.50528E+03, 0.00000E+00, + 1.03485E-02,-1.00983E-03,-4.06916E-03,-6.60864E+01,-1.71533E-02, + 1.10605E-02, 1.20300E-02,-5.20034E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -2.62769E+03, 7.13755E-03, 4.17999E-03, 0.00000E+00, 1.25910E+04, + 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.23595E-03, 4.60217E-03, + 5.71794E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -3.18353E-02,-2.35526E-02,-1.36189E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.03522E-02,-6.67837E+01,-1.09724E-03, 0.00000E+00, + -1.38821E-02, 1.60468E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.51574E-02, + -5.44470E-04, 0.00000E+00, 7.28224E-02, 6.59413E-02, 0.00000E+00, + -5.15692E-03, 0.00000E+00, 0.00000E+00,-3.70367E+03, 0.00000E+00, + 0.00000E+00, 1.36131E-02, 5.38153E-03, 0.00000E+00, 4.76285E+00, + -1.75677E-02, 2.26301E-02, 0.00000E+00, 1.76631E-02, 4.77162E-03, + 0.00000E+00, 5.39354E+00, 0.00000E+00,-7.51710E-03, 0.00000E+00, + 0.00000E+00,-8.82736E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* H DENSITY */ { + 1.26376E+00,-2.14304E-01,-1.49984E-01, 2.30404E-01, 2.98237E-02, + 2.68673E-02, 2.96228E-01, 2.21900E-02,-2.07655E-02, 4.52506E-01, + 1.20105E-01, 3.24420E-02, 4.24816E-02,-9.14313E+00, 0.00000E+00, + 2.47178E-02,-2.88229E-02, 8.12805E+01, 5.10380E-02,-5.80611E-03, + 2.51236E-05,-1.24083E-02, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01,-3.48190E-02, 0.00000E+00, 0.00000E+00, 2.89885E-05, + 0.00000E+00, 1.53595E+02,-1.68604E-02, 0.00000E+00, 1.01015E-02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.84552E-04, + -1.22181E-03, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + -1.04927E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.91313E-03, + -2.30501E-02, 3.14758E-05, 0.00000E+00, 0.00000E+00, 1.26956E-02, + 8.35489E-03, 3.10513E-04, 0.00000E+00, 3.42119E+03,-2.45017E-03, + -4.27154E-04, 5.45152E-04, 1.89896E-03, 2.89121E+01,-6.49973E-03, + -1.93855E-02,-1.48492E-02, 0.00000E+00,-5.10576E-02, 7.87306E-02, + 9.51981E-02,-1.49422E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 2.65503E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.37110E-03, 3.24789E-04, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 6.14274E-02, 1.00376E-02,-8.41083E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.27099E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -3.94077E-03,-1.28601E-02,-7.97616E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-6.71465E-03,-1.69799E-03, 1.93772E-03, 3.81140E+00, + -7.79290E-03,-1.82589E-02,-1.25860E-02,-1.04311E-02,-3.02465E-03, + 2.43063E-03, 3.63237E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* N DENSITY */ { + 7.09557E+01,-3.26740E-01, 0.00000E+00,-5.16829E-01,-1.71664E-03, + 9.09310E-02,-6.71500E-01,-1.47771E-01,-9.27471E-02,-2.30862E-01, + -1.56410E-01, 1.34455E-02,-1.19717E-01, 2.52151E+00, 0.00000E+00, + -2.41582E-01, 5.92939E-02, 4.39756E+00, 9.15280E-02, 4.41292E-03, + 0.00000E+00, 8.66807E-03, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01, 9.74701E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 6.70217E+01,-1.31660E-03, 0.00000E+00,-1.65317E-02, + 0.00000E+00, 0.00000E+00, 8.50247E-02, 2.77428E+01, 4.98658E-03, + 6.15115E-03, 9.50156E-03,-2.12723E-02, 8.47001E-02, 1.70147E-01, + -2.38645E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.37380E-03, + -8.41918E-03, 2.80145E-05, 7.12383E-03, 0.00000E+00,-1.66209E-02, + 1.03533E-04,-1.68898E-02, 0.00000E+00, 3.64526E+03, 0.00000E+00, + 6.54077E-03, 3.69130E-04, 9.94419E-04, 8.42803E+01,-1.16124E-02, + -7.74414E-03,-1.68844E-03, 1.42809E-03,-1.92955E-03, 1.17225E-01, + -2.41512E-02, 1.50521E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 1.60261E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.54403E-04,-1.87270E-02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 2.76439E-02, 6.43207E-03,-3.54300E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-2.80221E-02, 8.11228E+01,-6.75255E-04, 0.00000E+00, + -1.05162E-02,-3.48292E-03,-6.97321E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.45546E-03,-1.31970E-02,-3.57751E-03,-1.09021E+00, + -1.50181E-02,-7.12841E-03,-6.64590E-03,-3.52610E-03,-1.87773E-02, + -2.22432E-03,-3.93895E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}, /* HOT O DENSITY */ { + 6.04050E-02, 1.57034E+00, 2.99387E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.51018E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.61650E+00, 1.26454E-02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 5.50878E-03, 0.00000E+00, 0.00000E+00, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 6.23881E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + -9.45934E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}}; +/* S PARAM */ +double ps[150] = { + 9.56827E-01, 6.20637E-02, 3.18433E-02, 0.00000E+00, 0.00000E+00, + 3.94900E-02, 0.00000E+00, 0.00000E+00,-9.24882E-03,-7.94023E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.74712E+02, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.74677E-03, 0.00000E+00, 1.54951E-02, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.99007E-04, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 1.24362E-02,-5.28756E-03, 8.47001E-02, 1.70147E-01, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.47425E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}; + +/* TURBO */ +double pdl[2][25] = { + { 1.09930E+00, 3.90631E+00, 3.07165E+00, 9.86161E-01, 1.63536E+01, + 4.63830E+00, 1.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 1.28840E+00, 3.10302E-02, 1.18339E-01 }, + { 1.00000E+00, 7.00000E-01, 1.15020E+00, 3.44689E+00, 1.28840E+00, + 1.00000E+00, 1.08738E+00, 1.22947E+00, 1.10016E+00, 7.34129E-01, + 1.15241E+00, 2.22784E+00, 7.95046E-01, 4.01612E+00, 4.47749E+00, + 1.23435E+02,-7.60535E-02, 1.68986E-06, 7.44294E-01, 1.03604E+00, + 1.72783E+02, 1.15020E+00, 3.44689E+00,-7.46230E-01, 9.49154E-01 } +}; +/* LOWER BOUNDARY */ +double ptm[50] = { + 1.04130E+03, 3.86000E+02, 1.95000E+02, 1.66728E+01, 2.13000E+02, + 1.20000E+02, 2.40000E+02, 1.87000E+02,-2.00000E+00, 0.00000E+00 +}; +double pdm[8][10] = { +{ 2.45600E+07, 6.71072E-06, 1.00000E+02, 0.00000E+00, 1.10000E+02, + 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 },\ +{ 8.59400E+10, 1.00000E+00, 1.05000E+02,-8.00000E+00, 1.10000E+02, + 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00 },\ +{ 2.81000E+11, 0.00000E+00, 1.05000E+02, 2.80000E+01, 2.89500E+01, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 }, +{ 3.30000E+10, 2.68270E-01, 1.05000E+02, 1.00000E+00, 1.10000E+02, + 1.00000E+01, 1.10000E+02,-1.00000E+01, 0.00000E+00, 0.00000E+00 }, +{ 1.33000E+09, 1.19615E-02, 1.05000E+02, 0.00000E+00, 1.10000E+02, + 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 }, +{ 1.76100E+05, 1.00000E+00, 9.50000E+01,-8.00000E+00, 1.10000E+02, + 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, }, +{ 1.00000E+07, 1.00000E+00, 1.05000E+02,-8.00000E+00, 1.10000E+02, + 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00 }, +{ 1.00000E+06, 1.00000E+00, 1.05000E+02,-8.00000E+00, 5.50000E+02, + 7.60000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 4.00000E+03 }}; + + +double ptl[4][100] = { +/* TN1(2) */ { + 1.00858E+00, 4.56011E-02,-2.22972E-02,-5.44388E-02, 5.23136E-04, + -1.88849E-02, 5.23707E-02,-9.43646E-03, 6.31707E-03,-7.80460E-02, + -4.88430E-02, 0.00000E+00, 0.00000E+00,-7.60250E+00, 0.00000E+00, + -1.44635E-02,-1.76843E-02,-1.21517E+02, 2.85647E-02, 0.00000E+00, + 0.00000E+00, 6.31792E-04, 0.00000E+00, 5.77197E-03, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-8.90272E+03, 3.30611E-03, 3.02172E-03, 0.00000E+00, + -2.13673E-03,-3.20910E-04, 0.00000E+00, 0.00000E+00, 2.76034E-03, + 2.82487E-03,-2.97592E-04,-4.21534E-03, 8.47001E-02, 1.70147E-01, + 8.96456E-03, 0.00000E+00,-1.08596E-02, 0.00000E+00, 0.00000E+00, + 5.57917E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 9.65405E-03, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN1(3) */ { + 9.39664E-01, 8.56514E-02,-6.79989E-03, 2.65929E-02,-4.74283E-03, + 1.21855E-02,-2.14905E-02, 6.49651E-03,-2.05477E-02,-4.24952E-02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.19148E+01, 0.00000E+00, + 1.18777E-02,-7.28230E-02,-8.15965E+01, 1.73887E-02, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-1.44691E-02, 2.80259E-04, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.16584E+02, 3.18713E-03, 7.37479E-03, 0.00000E+00, + -2.55018E-03,-3.92806E-03, 0.00000E+00, 0.00000E+00,-2.89757E-03, + -1.33549E-03, 1.02661E-03, 3.53775E-04, 8.47001E-02, 1.70147E-01, + -9.17497E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 3.56082E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.00902E-02, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN1(4) */ { + 9.85982E-01,-4.55435E-02, 1.21106E-02, 2.04127E-02,-2.40836E-03, + 1.11383E-02,-4.51926E-02, 1.35074E-02,-6.54139E-03, 1.15275E-01, + 1.28247E-01, 0.00000E+00, 0.00000E+00,-5.30705E+00, 0.00000E+00, + -3.79332E-02,-6.24741E-02, 7.71062E-01, 2.96315E-02, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 6.81051E-03,-4.34767E-03, 8.66784E-02, + 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 1.07003E+01,-2.76907E-03, 4.32474E-04, 0.00000E+00, + 1.31497E-03,-6.47517E-04, 0.00000E+00,-2.20621E+01,-1.10804E-03, + -8.09338E-04, 4.18184E-04, 4.29650E-03, 8.47001E-02, 1.70147E-01, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -4.04337E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-9.52550E-04, + 8.56253E-04, 4.33114E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.21223E-03, + 2.38694E-04, 9.15245E-04, 1.28385E-03, 8.67668E-04,-5.61425E-06, + 1.04445E+00, 3.41112E+01, 0.00000E+00,-8.40704E-01,-2.39639E+02, + 7.06668E-01,-2.05873E+01,-3.63696E-01, 2.39245E+01, 0.00000E+00, + -1.06657E-03,-7.67292E-04, 1.54534E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN1(5) TN2(1) */ { + 1.00320E+00, 3.83501E-02,-2.38983E-03, 2.83950E-03, 4.20956E-03, + 5.86619E-04, 2.19054E-02,-1.00946E-02,-3.50259E-03, 4.17392E-02, + -8.44404E-03, 0.00000E+00, 0.00000E+00, 4.96949E+00, 0.00000E+00, + -7.06478E-03,-1.46494E-02, 3.13258E+01,-1.86493E-03, 0.00000E+00, + -1.67499E-02, 0.00000E+00, 0.00000E+00, 5.12686E-04, 8.66784E-02, + 1.58727E-01,-4.64167E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 4.37353E-03,-1.99069E+02, 0.00000E+00,-5.34884E-03, 0.00000E+00, + 1.62458E-03, 2.93016E-03, 2.67926E-03, 5.90449E+02, 0.00000E+00, + 0.00000E+00,-1.17266E-03,-3.58890E-04, 8.47001E-02, 1.70147E-01, + 0.00000E+00, 0.00000E+00, 1.38673E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.60571E-03, + 6.28078E-04, 5.05469E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.57829E-03, + -4.00855E-04, 5.04077E-05,-1.39001E-03,-2.33406E-03,-4.81197E-04, + 1.46758E+00, 6.20332E+00, 0.00000E+00, 3.66476E-01,-6.19760E+01, + 3.09198E-01,-1.98999E+01, 0.00000E+00,-3.29933E+02, 0.00000E+00, + -1.10080E-03,-9.39310E-05, 1.39638E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +} }; + +double pma[10][100] = { +/* TN2(2) */ { + 9.81637E-01,-1.41317E-03, 3.87323E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.58707E-02, + -8.63658E-03, 0.00000E+00, 0.00000E+00,-2.02226E+00, 0.00000E+00, + -8.69424E-03,-1.91397E-02, 8.76779E+01, 4.52188E-03, 0.00000E+00, + 2.23760E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-7.07572E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + -4.11210E-03, 3.50060E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-8.36657E-03, 1.61347E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-1.45130E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.24152E-03, + 6.43365E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.33255E-03, + 2.42657E-03, 1.60666E-03,-1.85728E-03,-1.46874E-03,-4.79163E-06, + 1.22464E+00, 3.53510E+01, 0.00000E+00, 4.49223E-01,-4.77466E+01, + 4.70681E-01, 8.41861E+00,-2.88198E-01, 1.67854E+02, 0.00000E+00, + 7.11493E-04, 6.05601E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN2(3) */ { + 1.00422E+00,-7.11212E-03, 5.24480E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.28914E-02, + -2.41301E-02, 0.00000E+00, 0.00000E+00,-2.12219E+01,-1.03830E-02, + -3.28077E-03, 1.65727E-02, 1.68564E+00,-6.68154E-03, 0.00000E+00, + 1.45155E-02, 0.00000E+00, 8.42365E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-4.34645E-03, 0.00000E+00, 0.00000E+00, 2.16780E-02, + 0.00000E+00,-1.38459E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 7.04573E-03,-4.73204E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 1.08767E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.08279E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.21769E-04, + -2.27387E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.26769E-03, + 3.16901E-03, 4.60316E-04,-1.01431E-04, 1.02131E-03, 9.96601E-04, + 1.25707E+00, 2.50114E+01, 0.00000E+00, 4.24472E-01,-2.77655E+01, + 3.44625E-01, 2.75412E+01, 0.00000E+00, 7.94251E+02, 0.00000E+00, + 2.45835E-03, 1.38871E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN2(4) TN3(1) */ { + 1.01890E+00,-2.46603E-02, 1.00078E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.70977E-02, + -4.02286E-02, 0.00000E+00, 0.00000E+00,-2.29466E+01,-7.47019E-03, + 2.26580E-03, 2.63931E-02, 3.72625E+01,-6.39041E-03, 0.00000E+00, + 9.58383E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.85291E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 1.39717E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 9.19771E-03,-3.69121E+02, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-1.57067E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.07265E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.92953E-03, + -2.77739E-03,-4.40092E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.47280E-03, + 2.95035E-04,-1.81246E-03, 2.81945E-03, 4.27296E-03, 9.78863E-04, + 1.40545E+00,-6.19173E+00, 0.00000E+00, 0.00000E+00,-7.93632E+01, + 4.44643E-01,-4.03085E+02, 0.00000E+00, 1.15603E+01, 0.00000E+00, + 2.25068E-03, 8.48557E-04,-2.98493E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN3(2) */ { + 9.75801E-01, 3.80680E-02,-3.05198E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.85575E-02, + 5.04057E-02, 0.00000E+00, 0.00000E+00,-1.76046E+02, 1.44594E-02, + -1.48297E-03,-3.68560E-03, 3.02185E+01,-3.23338E-03, 0.00000E+00, + 1.53569E-02, 0.00000E+00,-1.15558E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 4.89620E-03, 0.00000E+00, 0.00000E+00,-1.00616E-02, + -8.21324E-03,-1.57757E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 6.63564E-03, 4.58410E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-2.51280E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 9.91215E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.73148E-04, + -1.29648E-03,-7.32026E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.68110E-03, + -4.66003E-03,-1.31567E-03,-7.39390E-04, 6.32499E-04,-4.65588E-04, + -1.29785E+00,-1.57139E+02, 0.00000E+00, 2.58350E-01,-3.69453E+01, + 4.10672E-01, 9.78196E+00,-1.52064E-01,-3.85084E+03, 0.00000E+00, + -8.52706E-04,-1.40945E-03,-7.26786E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN3(3) */ { + 9.60722E-01, 7.03757E-02,-3.00266E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.22671E-02, + 4.10423E-02, 0.00000E+00, 0.00000E+00,-1.63070E+02, 1.06073E-02, + 5.40747E-04, 7.79481E-03, 1.44908E+02, 1.51484E-04, 0.00000E+00, + 1.97547E-02, 0.00000E+00,-1.41844E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 5.77884E-03, 0.00000E+00, 0.00000E+00, 9.74319E-03, + 0.00000E+00,-2.88015E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-4.44902E-03,-2.92760E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 2.34419E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.36685E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.65325E-04, + -5.50628E-04, 3.31465E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.06179E-03, + -3.08575E-03,-7.93589E-04,-1.08629E-04, 5.95511E-04,-9.05050E-04, + 1.18997E+00, 4.15924E+01, 0.00000E+00,-4.72064E-01,-9.47150E+02, + 3.98723E-01, 1.98304E+01, 0.00000E+00, 3.73219E+03, 0.00000E+00, + -1.50040E-03,-1.14933E-03,-1.56769E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN3(4) */ { + 1.03123E+00,-7.05124E-02, 8.71615E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.82621E-02, + -9.80975E-03, 0.00000E+00, 0.00000E+00, 2.89286E+01, 9.57341E-03, + 0.00000E+00, 0.00000E+00, 8.66153E+01, 7.91938E-04, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 4.68917E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 7.86638E-03, 0.00000E+00, 0.00000E+00, 9.90827E-03, + 0.00000E+00, 6.55573E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.00200E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 7.07457E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.72268E-03, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.04970E-04, + 1.21560E-03,-8.05579E-06, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.49941E-03, + -4.57256E-04,-1.59311E-04, 2.96481E-04,-1.77318E-03,-6.37918E-04, + 1.02395E+00, 1.28172E+01, 0.00000E+00, 1.49903E-01,-2.63818E+01, + 0.00000E+00, 4.70628E+01,-2.22139E-01, 4.82292E-02, 0.00000E+00, + -8.67075E-04,-5.86479E-04, 5.32462E-04, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TN3(5) SURFACE TEMP TSL */ { + 1.00828E+00,-9.10404E-02,-2.26549E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.32420E-02, + -9.08925E-03, 0.00000E+00, 0.00000E+00, 3.36105E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-1.24957E+01,-5.87939E-03, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.79765E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.01237E+03, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-1.75553E-02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.29699E-03, + 1.26659E-03, 2.68402E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.17894E-03, + 1.48746E-03, 1.06478E-04, 1.34743E-04,-2.20939E-03,-6.23523E-04, + 6.36539E-01, 1.13621E+01, 0.00000E+00,-3.93777E-01, 2.38687E+03, + 0.00000E+00, 6.61865E+02,-1.21434E-01, 9.27608E+00, 0.00000E+00, + 1.68478E-04, 1.24892E-03, 1.71345E-03, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TGN3(2) SURFACE GRAD TSLG */ { + 1.57293E+00,-6.78400E-01, 6.47500E-01, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.62974E-02, + -3.60423E-01, 0.00000E+00, 0.00000E+00, 1.28358E+02, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 4.68038E+01, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.67898E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.90994E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.15706E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TGN2(1) TGN1(2) */ { + 8.60028E-01, 3.77052E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.17570E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 7.77757E-03, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 1.01024E+02, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 6.54251E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.56959E-02, + 1.91001E-02, 3.15971E-02, 1.00982E-02,-6.71565E-03, 2.57693E-03, + 1.38692E+00, 2.82132E-01, 0.00000E+00, 0.00000E+00, 3.81511E+02, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +}, /* TGN3(1) TGN2(2) */ { + 1.06029E+00,-5.25231E-02, 3.73034E-01, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.31072E-02, + -3.88409E-01, 0.00000E+00, 0.00000E+00,-1.65295E+02,-2.13801E-01, + -4.38916E-02,-3.22716E-01,-8.82393E+01, 1.18458E-01, 0.00000E+00, + -4.35863E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00,-1.19782E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 2.62229E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.37443E+01, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00,-4.55788E-01, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.84009E-02, + 3.96733E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.05494E-02, + 7.39617E-02, 1.92200E-02,-8.46151E-03,-1.34244E-02, 1.96338E-02, + 1.50421E+00, 1.88368E+01, 0.00000E+00, 0.00000E+00,-5.13114E+01, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 5.11923E-02, 3.61225E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00 +} }; + +/* SEMIANNUAL MULT SAM */ +double sam[100] = { + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00 +}; + + +/* MIDDLE ATMOSPHERE AVERAGES */ +double pavgm[10] = { + 2.61000E+02, 2.64000E+02, 2.29000E+02, 2.17000E+02, 2.17000E+02, + 2.23000E+02, 2.86760E+02,-2.93940E+00, 2.50000E+00, 0.00000E+00 }; + diff --git a/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_test.c b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_test.c new file mode 100644 index 0000000..330687a --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsis00_c_version/nrlmsise-00_test.c @@ -0,0 +1,168 @@ +/* -------------------------------------------------------------------- */ +/* --------- N R L M S I S E - 0 0 M O D E L 2 0 0 1 ---------- */ +/* -------------------------------------------------------------------- */ + +/* This file is part of the NRLMSISE-00 C source code package - release + * 20041227 + * + * The NRLMSISE-00 model was developed by Mike Picone, Alan Hedin, and + * Doug Drob. They also wrote a NRLMSISE-00 distribution package in + * FORTRAN which is available at + * http://uap-www.nrl.navy.mil/models_web/msis/msis_home.htm + * + * Dominik Brodowski implemented and maintains this C version. You can + * reach him at mail@brodo.de. See the file "DOCUMENTATION" for details, + * and check http://www.brodo.de/english/pub/nrlmsise/index.html for + * updated releases of this package. + */ + + + +/* ------------------------------------------------------------------- */ +/* ------------------------------ INCLUDES --------------------------- */ +/* ------------------------------------------------------------------- */ + +#include +#include "nrlmsise-00.h" + + + +/* ------------------------------------------------------------------- */ +/* ----------------------------- TEST_GTD7 --------------------------- */ +/* ------------------------------------------------------------------- */ + +void test_gtd7(void) { + struct nrlmsise_output output[17]; + struct nrlmsise_input input[17]; + struct nrlmsise_flags flags; + struct ap_array aph; + int i; + int j; + /* input values */ + for (i=0;i<7;i++) + aph.a[i]=100; + flags.switches[0]=0; + for (i=1;i<24;i++) + flags.switches[i]=1; + for (i=0;i<17;i++) { + input[i].doy=172; + input[i].year=0; /* without effect */ + input[i].sec=29000; + input[i].alt=400; + input[i].g_lat=60; + input[i].g_long=-70; + input[i].lst=16; + input[i].f107A=150; + input[i].f107=150; + input[i].ap=4; + } + input[1].doy=81; + input[2].sec=75000; + input[2].alt=1000; + input[3].alt=100; + input[10].alt=0; + input[11].alt=10; + input[12].alt=30; + input[13].alt=50; + input[14].alt=70; + input[16].alt=100; + input[4].g_lat=0; + input[5].g_long=0; + input[6].lst=4; + input[7].f107A=70; + input[8].f107=180; + input[9].ap=40; + input[15].ap_a=&aph; + input[16].ap_a=&aph; + /* evaluate 0 to 14 */ + for (i=0;i<15;i++) + gtd7(&input[i], &flags, &output[i]); + /* evaluate 15 and 16 */ + flags.switches[9]=-1; + for (i=15;i<17;i++) + gtd7(&input[i], &flags, &output[i]); + /* output type 1 */ + for (i=0;i<17;i++) { + printf("\n"); + for (j=0;j<9;j++) + printf("%E ",output[i].d[j]); + printf("%E ",output[i].t[0]); + printf("%E \n",output[i].t[1]); + /* DL omitted */ + } + + /* output type 2 */ + for (i=0;i<3;i++) { + printf("\n"); + printf("\nDAY "); + for (j=0;j<5;j++) + printf(" %3i",input[i*5+j].doy); + printf("\nUT "); + for (j=0;j<5;j++) + printf(" %5.0f",input[i*5+j].sec); + printf("\nALT "); + for (j=0;j<5;j++) + printf(" %4.0f",input[i*5+j].alt); + printf("\nLAT "); + for (j=0;j<5;j++) + printf(" %3.0f",input[i*5+j].g_lat); + printf("\nLONG "); + for (j=0;j<5;j++) + printf(" %3.0f",input[i*5+j].g_long); + printf("\nLST "); + for (j=0;j<5;j++) + printf(" %5.0f",input[i*5+j].lst); + printf("\nF107A "); + for (j=0;j<5;j++) + printf(" %3.0f",input[i*5+j].f107A); + printf("\nF107 "); + for (j=0;j<5;j++) + printf(" %3.0f",input[i*5+j].f107); + printf("\n\n"); + printf("\nTINF "); + for (j=0;j<5;j++) + printf(" %7.2f",output[i*5+j].t[0]); + printf("\nTG "); + for (j=0;j<5;j++) + printf(" %7.2f",output[i*5+j].t[1]); + printf("\nHE "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[0]); + printf("\nO "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[1]); + printf("\nN2 "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[2]); + printf("\nO2 "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[3]); + printf("\nAR "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[4]); + printf("\nH "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[6]); + printf("\nN "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[7]); + printf("\nANM 0 "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[8]); + printf("\nRHO "); + for (j=0;j<5;j++) + printf(" %1.3e",output[i*5+j].d[5]); + printf("\n"); + } + printf("\n"); +} + + +/* ------------------------------------------------------------------- */ +/* -------------------------------- MAIN ----------------------------- */ +/* ------------------------------------------------------------------- */ + +int main(void) { + test_gtd7(); + return 0; +} diff --git a/MSIS/NRLMSIS00/nrlmsise00_driver.for b/MSIS/NRLMSIS00/nrlmsise00_driver.for new file mode 100644 index 0000000..fe8b31b --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsise00_driver.for @@ -0,0 +1,114 @@ +C TEST DRIVER FOR GTD7 (ATMOSPHERIC MODEL) + DIMENSION D(9,16),T(2,16),SW(25),APH(7) + DIMENSION IDAY(15),UT(15),ALT(15),XLAT(15),XLONG(15),XLST(15), + & F107A(15),F107(15),AP(15) + COMMON/GTS3C/DL(16) + COMMON/DATIME/ISDATE(3),ISTIME(2),NAME(2) + DATA IDAY/172,81,13*172/ + DATA UT/29000.,29000.,75000.,12*29000./ + DATA ALT/400.,400.,1000.,100.,6*400.,0,10.,30.,50.,70./ + DATA XLAT/4*60.,0.,10*60./ + DATA XLONG/5*-70.,0.,9*-70./ + DATA XLST/6*16.,4.,8*16./ + DATA F107A/7*150.,70.,7*150./ + DATA F107/8*150.,180.,6*150./ + DATA AP/9*4.,40.,5*4./ + DATA APH/7*100./,SW/8*1.,-1.,16*1./ + DO I=1,15 + CALL GTD7(IDAY(I),UT(I),ALT(I),XLAT(I),XLONG(I),XLST(I), + & F107A(I),F107(I),AP(I),48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,9),T(1,I),T(2,I),DL + ENDDO + CALL TSELEC(SW) + I=16 + CALL GTD7(IDAY(1),UT(1),ALT(1),XLAT(1),XLONG(1),XLST(1), + & F107A(1),F107(1),APH,48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,9),T(1,I),T(2,I),DL + CALL GTD7(IDAY(1),UT(1),ALT(4),XLAT(1),XLONG(1),XLST(1), + & F107A(1),F107(1),APH,48,D(1,I),T(1,I)) + WRITE(6,100) (D(J,I),J=1,9),T(1,I),T(2,I),DL + WRITE(6,300) NAME,ISDATE,ISTIME + WRITE(6,200) (IDAY(I),I=1,5) + WRITE(6,201) (UT(I),I=1,5) + WRITE(6,202) (ALT(I),I=1,5) + WRITE(6,203) (XLAT(I),I=1,5) + WRITE(6,204) (XLONG(I),I=1,5) + WRITE(6,205) (XLST(I),I=1,5) + WRITE(6,206) (F107A(I),I=1,5) + WRITE(6,207) (F107(I),I=1,5) + WRITE(6,208) (AP(I),I=1,5) + WRITE(6,210) (T(1,I),I=1,5) + WRITE(6,211) (T(2,I),I=1,5) + WRITE(6,212) (D(1,I),I=1,5) + WRITE(6,213) (D(2,I),I=1,5) + WRITE(6,214) (D(3,I),I=1,5) + WRITE(6,215) (D(4,I),I=1,5) + WRITE(6,216) (D(5,I),I=1,5) + WRITE(6,217) (D(7,I),I=1,5) + WRITE(6,219) (D(8,I),I=1,5) + WRITE(6,220) (D(9,I),I=1,5) + WRITE(6,218) (D(6,I),I=1,5) + WRITE(6,200) (IDAY(I),I=6,10) + WRITE(6,201) (UT(I),I=6,10) + WRITE(6,202) (ALT(I),I=6,10) + WRITE(6,203) (XLAT(I),I=6,10) + WRITE(6,204) (XLONG(I),I=6,10) + WRITE(6,205) (XLST(I),I=6,10) + WRITE(6,206) (F107A(I),I=6,10) + WRITE(6,207) (F107(I),I=6,10) + WRITE(6,208) (AP(I),I=6,10) + WRITE(6,210) (T(1,I),I=6,10) + WRITE(6,211) (T(2,I),I=6,10) + WRITE(6,212) (D(1,I),I=6,10) + WRITE(6,213) (D(2,I),I=6,10) + WRITE(6,214) (D(3,I),I=6,10) + WRITE(6,215) (D(4,I),I=6,10) + WRITE(6,216) (D(5,I),I=6,10) + WRITE(6,217) (D(7,I),I=6,10) + WRITE(6,219) (D(8,I),I=6,10) + WRITE(6,220) (D(9,I),I=6,10) + WRITE(6,218) (D(6,I),I=6,10) + WRITE(6,200) (IDAY(I),I=11,15) + WRITE(6,201) (UT(I),I=11,15) + WRITE(6,202) (ALT(I),I=11,15) + WRITE(6,203) (XLAT(I),I=11,15) + WRITE(6,204) (XLONG(I),I=11,15) + WRITE(6,205) (XLST(I),I=11,15) + WRITE(6,206) (F107A(I),I=11,15) + WRITE(6,207) (F107(I),I=11,15) + WRITE(6,208) (AP(I),I=11,15) + WRITE(6,210) (T(1,I),I=11,15) + WRITE(6,211) (T(2,I),I=11,15) + WRITE(6,212) (D(1,I),I=11,15) + WRITE(6,213) (D(2,I),I=11,15) + WRITE(6,214) (D(3,I),I=11,15) + WRITE(6,215) (D(4,I),I=11,15) + WRITE(6,216) (D(5,I),I=11,15) + WRITE(6,217) (D(7,I),I=11,15) + WRITE(6,219) (D(8,I),I=11,15) + WRITE(6,220) (D(9,I),I=11,15) + WRITE(6,218) (D(6,I),I=11,15) + 100 FORMAT(1X,1P8E9.2/4X,1PE9.2,2E10.3/4X,8E9.2/4X,8E9.2/) + 200 FORMAT(//' DAY ',5I12) + 201 FORMAT(' UT ',5F12.0) + 202 FORMAT(' ALT ',5F12.0) + 203 FORMAT(' LAT ',5F12.0) + 204 FORMAT(' LONG ',5F12.0) + 205 FORMAT(' LST ',5F12.0) + 206 FORMAT(' F107A',5F12.0) + 207 FORMAT(' F107 ',5F12.0) + 208 FORMAT(' AP ',5F12.0) + 210 FORMAT(/' TINF ',5F12.2) + 211 FORMAT(' TG ',5F12.2) + 212 FORMAT(' HE ',1P5E12.3) + 213 FORMAT(' O ',1P5E12.3) + 214 FORMAT(' N2 ',1P5E12.3) + 215 FORMAT(' O2 ',1P5E12.3) + 216 FORMAT(' AR ',1P5E12.3) + 217 FORMAT(' H ',1P5E12.3) + 219 FORMAT(' N ',1P5E12.3) + 220 FORMAT(' ANM O',1P5E12.3) + 218 FORMAT(' RHO ',1P5E12.3) + 300 FORMAT(1X,2A4,2X,3A4,2X,2A4) + STOP + END diff --git a/MSIS/NRLMSIS00/nrlmsise00_output.txt b/MSIS/NRLMSIS00/nrlmsise00_output.txt new file mode 100644 index 0000000..372950c --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsise00_output.txt @@ -0,0 +1,157 @@ + + 6.67E+05 1.14E+08 2.00E+07 4.02E+05 3.56E+03 4.07E-15 3.48E+04 4.10E+06 + 2.67E+04 1.251E+03 1.241E+03 + 4.02E+02 1.69E-02 4.54E+06 4.63E+10 3.16E+11 4.54E+10 2.65E+09 1.85E-11 + 9.49E+04 1.23E+02 1.84E+02 9.00E+01 1.43E+01 7.78E+00 1.76E+05 9.02E+08 + + 3.41E+06 1.59E+08 1.39E+07 3.26E+05 1.56E+03 5.00E-15 4.85E+04 4.38E+06 + 6.96E+03 1.167E+03 1.162E+03 + 3.76E+02 1.88E-02 2.47E+07 8.24E+10 3.37E+11 6.00E+10 2.14E+09 2.12E-11 + 1.35E+05 1.23E+02 1.84E+02 9.00E+01 1.49E+01 7.63E+00 4.58E+04 1.20E+09 + + 1.12E+05 6.93E+04 4.25E+01 1.32E-01 2.62E-05 2.76E-18 2.02E+04 5.74E+03 + 2.37E+04 1.240E+03 1.240E+03 + 4.02E+02 1.71E-02 4.95E+06 4.92E+10 3.16E+11 4.54E+10 2.48E+09 1.86E-11 + 8.78E+04 1.23E+02 1.84E+02 9.00E+01 1.43E+01 7.63E+00 1.75E+04 8.70E+08 + + 5.41E+07 1.92E+11 6.12E+12 1.23E+12 6.02E+10 3.58E-10 1.06E+07 2.62E+05 + 0.00E+00 1.027E+03 2.069E+02 + 4.02E+02 2.29E-02 4.54E+06 4.63E+10 3.16E+11 4.54E+10 2.65E+09 1.85E-11 + 9.49E+04 1.23E+02 1.47E+02 9.00E+01 1.43E+01 7.68E+00 3.73E+07 9.02E+08 + + 1.85E+06 1.48E+08 1.58E+07 2.63E+05 1.59E+03 4.81E-15 5.82E+04 5.48E+06 + 1.26E+03 1.212E+03 1.208E+03 + 4.12E+02 1.95E-02 1.21E+07 5.46E+10 2.20E+11 2.59E+10 9.98E+08 1.31E-11 + 1.53E+05 1.23E+02 1.84E+02 9.00E+01 1.56E+01 7.27E+00 8.26E+03 1.10E+09 + + 8.67E+05 1.28E+08 1.82E+07 2.92E+05 2.40E+03 4.36E-15 3.69E+04 3.90E+06 + 2.67E+04 1.220E+03 1.213E+03 + 4.02E+02 1.75E-02 5.93E+06 5.43E+10 3.16E+11 3.68E+10 2.05E+09 1.82E-11 + 9.96E+04 1.23E+02 1.84E+02 9.00E+01 1.43E+01 7.79E+00 1.76E+05 8.89E+08 + + 5.78E+05 6.98E+07 1.24E+07 2.49E+05 1.41E+03 2.47E-15 5.29E+04 1.07E+06 + 2.67E+04 1.116E+03 1.113E+03 + 3.98E+02 2.00E-02 4.03E+06 3.60E+10 3.19E+11 5.00E+10 2.16E+09 1.86E-11 + 1.39E+05 1.23E+02 1.84E+02 9.00E+01 1.43E+01 8.94E+00 1.76E+05 2.86E+08 + + 3.74E+05 4.78E+07 5.24E+06 1.76E+05 5.50E+02 1.57E-15 8.90E+04 1.98E+06 + 9.12E+03 1.031E+03 1.025E+03 + 3.98E+02 1.71E-02 2.80E+06 3.72E+10 2.96E+11 1.37E+10 2.65E+09 1.57E-11 + 2.28E+05 1.23E+02 1.84E+02 9.00E+01 1.08E+01 7.90E+00 6.01E+04 7.52E+08 + + 6.75E+05 1.25E+08 2.37E+07 4.91E+05 4.58E+03 4.56E-15 3.24E+04 5.37E+06 + 2.67E+04 1.306E+03 1.293E+03 + 4.04E+02 1.59E-02 4.57E+06 4.67E+10 3.16E+11 4.54E+10 2.65E+09 1.85E-11 + 8.99E+04 1.23E+02 1.84E+02 9.00E+01 1.43E+01 7.57E+00 1.76E+05 1.11E+09 + + 5.53E+05 1.20E+08 3.50E+07 9.34E+05 1.10E+04 4.97E-15 2.69E+04 4.89E+06 + 2.81E+04 1.362E+03 1.347E+03 + 4.36E+02 1.55E-02 3.48E+06 3.54E+10 3.16E+11 5.57E+10 3.67E+09 1.88E-11 + 7.19E+04 1.23E+02 1.84E+02 9.00E+01 1.43E+01 7.87E+00 1.85E+05 8.14E+08 + + 1.38E+14 0.00E+00 2.05E+19 5.50E+18 2.45E+17 1.26E-03 0.00E+00 0.00E+00 + 0.00E+00 1.027E+03 2.815E+02 + 4.02E+02 2.55E-02 3.48E+06 3.54E+10 3.16E+11 5.57E+10 3.67E+09 1.88E-11 + 7.19E+04 1.23E+02 1.47E+02 9.00E+01 1.60E+01 7.87E+00 1.19E+15 8.14E+08 + + 4.43E+13 0.00E+00 6.60E+18 1.77E+18 7.89E+16 4.06E-04 0.00E+00 0.00E+00 + 0.00E+00 1.027E+03 2.274E+02 + 4.02E+02 2.55E-02 3.48E+06 3.54E+10 3.16E+11 5.57E+10 3.67E+09 1.88E-11 + 7.19E+04 1.23E+02 1.47E+02 9.00E+01 1.60E+01 7.87E+00 1.19E+15 8.14E+08 + + 2.13E+12 0.00E+00 3.17E+17 8.51E+16 3.79E+15 1.95E-05 0.00E+00 0.00E+00 + 0.00E+00 1.027E+03 2.374E+02 + 4.02E+02 2.55E-02 3.48E+06 3.54E+10 3.16E+11 5.57E+10 3.67E+09 1.88E-11 + 7.19E+04 1.23E+02 1.47E+02 9.00E+01 1.60E+01 7.87E+00 1.19E+15 8.14E+08 + + 1.41E+11 0.00E+00 2.10E+16 5.65E+15 2.52E+14 1.29E-06 0.00E+00 0.00E+00 + 0.00E+00 1.027E+03 2.796E+02 + 4.02E+02 2.55E-02 3.48E+06 3.54E+10 3.16E+11 5.57E+10 3.67E+09 1.88E-11 + 7.19E+04 1.23E+02 1.47E+02 9.00E+01 1.60E+01 7.87E+00 1.19E+15 8.14E+08 + + 1.25E+10 0.00E+00 1.87E+15 4.92E+14 2.24E+13 1.15E-07 0.00E+00 0.00E+00 + 0.00E+00 1.027E+03 2.191E+02 + 4.02E+02 2.55E-02 4.54E+06 4.63E+10 3.16E+11 4.54E+10 2.65E+09 1.85E-11 + 9.49E+04 1.23E+02 1.47E+02 9.00E+01 1.60E+01 7.68E+00 7.53E+08 9.02E+08 + + 5.20E+05 1.27E+08 4.85E+07 1.72E+06 2.35E+04 5.88E-15 2.50E+04 6.28E+06 + 2.67E+04 1.426E+03 1.409E+03 + 4.62E+02 1.49E-02 3.10E+06 3.10E+10 3.16E+11 7.07E+10 4.96E+09 1.96E-11 + 6.56E+04 1.23E+02 1.84E+02 9.00E+01 1.43E+01 7.78E+00 1.76E+05 8.82E+08 + + 4.26E+07 1.24E+11 4.93E+12 1.05E+12 4.99E+10 2.91E-10 8.83E+06 2.25E+05 + 0.00E+00 1.027E+03 1.934E+02 + 4.62E+02 2.54E-02 3.10E+06 3.10E+10 3.16E+11 7.07E+10 4.96E+09 1.96E-11 + 6.56E+04 1.23E+02 1.37E+02 9.00E+01 1.43E+01 7.49E+00 3.19E+07 8.82E+08 + + MSISE-00 01-FEB-02 15:49:27 + + + DAY 172 81 172 172 172 + UT 29000. 29000. 75000. 29000. 29000. + ALT 400. 400. 1000. 100. 400. + LAT 60. 60. 60. 60. 0. + LONG -70. -70. -70. -70. -70. + LST 16. 16. 16. 16. 16. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + AP 4. 4. 4. 4. 4. + + TINF 1250.54 1166.75 1239.89 1027.32 1212.40 + TG 1241.42 1161.71 1239.89 206.89 1208.14 + HE 6.665E+05 3.407E+06 1.124E+05 5.412E+07 1.851E+06 + O 1.139E+08 1.586E+08 6.934E+04 1.919E+11 1.477E+08 + N2 1.998E+07 1.391E+07 4.247E+01 6.116E+12 1.579E+07 + O2 4.023E+05 3.263E+05 1.323E-01 1.225E+12 2.634E+05 + AR 3.557E+03 1.560E+03 2.619E-05 6.023E+10 1.589E+03 + H 3.475E+04 4.854E+04 2.017E+04 1.060E+07 5.816E+04 + N 4.096E+06 4.381E+06 5.741E+03 2.616E+05 5.479E+06 + ANM O 2.667E+04 6.957E+03 2.374E+04 0.000E+00 1.264E+03 + RHO 4.075E-15 5.002E-15 2.757E-18 3.584E-10 4.810E-15 + + + DAY 172 172 172 172 172 + UT 29000. 29000. 29000. 29000. 29000. + ALT 400. 400. 400. 400. 400. + LAT 60. 60. 60. 60. 60. + LONG 0. -70. -70. -70. -70. + LST 16. 4. 16. 16. 16. + F107A 150. 150. 70. 150. 150. + F107 150. 150. 150. 180. 150. + AP 4. 4. 4. 4. 40. + + TINF 1220.15 1116.39 1031.25 1306.05 1361.87 + TG 1212.71 1113.00 1024.85 1293.37 1347.39 + HE 8.673E+05 5.776E+05 3.740E+05 6.748E+05 5.529E+05 + O 1.279E+08 6.979E+07 4.783E+07 1.245E+08 1.198E+08 + N2 1.823E+07 1.237E+07 5.240E+06 2.369E+07 3.496E+07 + O2 2.922E+05 2.493E+05 1.760E+05 4.912E+05 9.340E+05 + AR 2.403E+03 1.406E+03 5.502E+02 4.579E+03 1.096E+04 + H 3.686E+04 5.292E+04 8.897E+04 3.245E+04 2.686E+04 + N 3.897E+06 1.070E+06 1.980E+06 5.371E+06 4.890E+06 + ANM O 2.667E+04 2.667E+04 9.122E+03 2.667E+04 2.805E+04 + RHO 4.356E-15 2.471E-15 1.572E-15 4.564E-15 4.975E-15 + + + DAY 172 172 172 172 172 + UT 29000. 29000. 29000. 29000. 29000. + ALT 0. 10. 30. 50. 70. + LAT 60. 60. 60. 60. 60. + LONG -70. -70. -70. -70. -70. + LST 16. 16. 16. 16. 16. + F107A 150. 150. 150. 150. 150. + F107 150. 150. 150. 150. 150. + AP 4. 4. 4. 4. 4. + + TINF 1027.32 1027.32 1027.32 1027.32 1027.32 + TG 281.46 227.42 237.44 279.56 219.07 + HE 1.375E+14 4.427E+13 2.128E+12 1.412E+11 1.255E+10 + O 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + N2 2.050E+19 6.598E+18 3.171E+17 2.104E+16 1.875E+15 + O2 5.499E+18 1.770E+18 8.506E+16 5.645E+15 4.923E+14 + AR 2.452E+17 7.892E+16 3.793E+15 2.517E+14 2.240E+13 + H 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + N 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + ANM O 0.000E+00 0.000E+00 0.000E+00 0.000E+00 0.000E+00 + RHO 1.261E-03 4.059E-04 1.951E-05 1.295E-06 1.148E-07 + diff --git a/MSIS/NRLMSIS00/nrlmsise00_sub.for b/MSIS/NRLMSIS00/nrlmsise00_sub.for new file mode 100644 index 0000000..5b36279 --- /dev/null +++ b/MSIS/NRLMSIS00/nrlmsise00_sub.for @@ -0,0 +1,2441 @@ +C----------------------------------------------------------------------- + SUBROUTINE GTD7(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS,D,T) +C +C NRLMSISE-00 +C ----------- +C Neutral Atmosphere Empirical Model from the surface to lower +C exosphere +C +C NEW FEATURES: +C *Extensive satellite drag database used in model generation +C *Revised O2 (and O) in lower thermosphere +C *Additional nonlinear solar activity term +C *"ANOMALOUS OXYGEN" NUMBER DENSITY, OUTPUT D(9) +C At high altitudes (> 500 km), hot atomic oxygen or ionized +C oxygen can become appreciable for some ranges of subroutine +C inputs, thereby affecting drag on satellites and debris. We +C group these species under the term "anomalous oxygen," since +C their individual variations are not presently separable with +C the drag data used to define this model component. +C +C SUBROUTINES FOR SPECIAL OUTPUTS: +C +C HIGH ALTITUDE DRAG: EFFECTIVE TOTAL MASS DENSITY +C (SUBROUTINE GTD7D, OUTPUT D(6)) +C For atmospheric drag calculations at altitudes above 500 km, +C call SUBROUTINE GTD7D to compute the "effective total mass +C density" by including contributions from "anomalous oxygen." +C See "NOTES ON OUTPUT VARIABLES" below on D(6). +C +C PRESSURE GRID (SUBROUTINE GHP7) +C See subroutine GHP7 to specify outputs at a pressure level +C rather than at an altitude. +C +C OUTPUT IN M-3 and KG/M3: CALL METERS(.TRUE.) +C +C INPUT VARIABLES: +C IYD - YEAR AND DAY AS YYDDD (day of year from 1 to 365 (or 366)) +C (Year ignored in current model) +C SEC - UT(SEC) +C ALT - ALTITUDE(KM) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS; see Note below) +C F107A - 81 day AVERAGE OF F10.7 FLUX (centered on day DDD) +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 57 HRS PRIOR +C TO CURRENT TIME +C MASS - MASS NUMBER (ONLY DENSITY FOR SELECTED GAS IS +C CALCULATED. MASS 0 IS TEMPERATURE. MASS 48 FOR ALL. +C MASS 17 IS Anomalous O ONLY.) +C +C NOTES ON INPUT VARIABLES: +C UT, Local Time, and Longitude are used independently in the +C model and are not of equal importance for every situation. +C For the most physically realistic calculation these three +C variables should be consistent (STL=SEC/3600+GLONG/15). +C The Equation of Time departures from the above formula +C for apparent local time can be included if available but +C are of minor importance. +c +C F107 and F107A values used to generate the model correspond +C to the 10.7 cm radio flux at the actual distance of the Earth +C from the Sun rather than the radio flux at 1 AU. The following +C site provides both classes of values: +C ftp://ftp.ngdc.noaa.gov/STP/SOLAR_DATA/SOLAR_RADIO/FLUX/ +C +C F107, F107A, and AP effects are neither large nor well +C established below 80 km and these parameters should be set to +C 150., 150., and 4. respectively. +C +C OUTPUT VARIABLES: +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C D(9) - Anomalous oxygen NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C +C NOTES ON OUTPUT VARIABLES: +C TO GET OUTPUT IN M-3 and KG/M3: CALL METERS(.TRUE.) +C +C O, H, and N are set to zero below 72.5 km +C +C T(1), Exospheric temperature, is set to global average for +C altitudes below 120 km. The 120 km gradient is left at global +C average value for altitudes below 72 km. +C +C D(6), TOTAL MASS DENSITY, is NOT the same for subroutines GTD7 +C and GTD7D +C +C SUBROUTINE GTD7 -- D(6) is the sum of the mass densities of the +C species labeled by indices 1-5 and 7-8 in output variable D. +C This includes He, O, N2, O2, Ar, H, and N but does NOT include +C anomalous oxygen (species index 9). +C +C SUBROUTINE GTD7D -- D(6) is the "effective total mass density +C for drag" and is the sum of the mass densities of all species +C in this model, INCLUDING anomalous oxygen. +C +C SWITCHES: The following is for test and special purposes: +C +C TO TURN ON AND OFF PARTICULAR VARIATIONS CALL TSELEC(SW), +C WHERE SW IS A 25 ELEMENT ARRAY CONTAINING 0. FOR OFF, 1. +C FOR ON, OR 2. FOR MAIN EFFECTS OFF BUT CROSS TERMS ON +C FOR THE FOLLOWING VARIATIONS +C 1 - F10.7 EFFECT ON MEAN 2 - TIME INDEPENDENT +C 3 - SYMMETRICAL ANNUAL 4 - SYMMETRICAL SEMIANNUAL +C 5 - ASYMMETRICAL ANNUAL 6 - ASYMMETRICAL SEMIANNUAL +C 7 - DIURNAL 8 - SEMIDIURNAL +C 9 - DAILY AP 10 - ALL UT/LONG EFFECTS +C 11 - LONGITUDINAL 12 - UT AND MIXED UT/LONG +C 13 - MIXED AP/UT/LONG 14 - TERDIURNAL +C 15 - DEPARTURES FROM DIFFUSIVE EQUILIBRIUM +C 16 - ALL TINF VAR 17 - ALL TLB VAR +C 18 - ALL TN1 VAR 19 - ALL S VAR +C 20 - ALL TN2 VAR 21 - ALL NLB VAR +C 22 - ALL TN3 VAR 23 - TURBO SCALE HEIGHT VAR +C +C To get current values of SW: CALL TRETRV(SW) +C + DIMENSION D(9),T(2),AP(7),DS(9),TS(2) + DIMENSION ZN3(5),ZN2(4),SV(25) + COMMON/GTS3C/TLB,S,DB04,DB16,DB28,DB32,DB40,DB48,DB01,ZA,T0,Z0 + & ,G0,RL,DD,DB14,TR12 + COMMON/MESO7/TN1(5),TN2(4),TN3(5),TGN1(2),TGN2(2),TGN3(2) + COMMON/LOWER7/PTM(10),PDM(10,8) + COMMON/PARM7/PT(150),PD(150,9),PS(150),PDL(25,2),PTL(100,4), + $ PMA(100,10),SAM(100) + COMMON/DATIM7/ISD(3),IST(2),NAM(2) + COMMON/DATIME/ISDATE(3),ISTIME(2),NAME(2) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/MAVG7/PAVGM(10) + COMMON/DMIX/DM04,DM16,DM28,DM32,DM40,DM01,DM14 + COMMON/PARMB/GSURF,RE + COMMON/METSEL/IMR + SAVE + EXTERNAL GTD7BK + DATA MN3/5/,ZN3/32.5,20.,15.,10.,0./ + DATA MN2/4/,ZN2/72.5,55.,45.,32.5/ + DATA ZMIX/62.5/,ALAST/99999./,MSSL/-999/ + DATA SV/25*1./ + IF(ISW.NE.64999) CALL TSELEC(SV) +C Put identification data into common/datime/ + DO 1 I=1,3 + ISDATE(I)=ISD(I) + 1 CONTINUE + DO 2 I=1,2 + ISTIME(I)=IST(I) + NAME(I)=NAM(I) + 2 CONTINUE +C +C Test for changed input + V1=VTST7(IYD,SEC,GLAT,GLONG,STL,F107A,F107,AP,1) +C Latitude variation of gravity (none for SW(2)=0) + XLAT=GLAT + IF(SW(2).EQ.0) XLAT=45. + CALL GLATF(XLAT,GSURF,RE) +C + XMM=PDM(5,3) +C +C THERMOSPHERE/MESOSPHERE (above ZN2(1)) + ALTT=AMAX1(ALT,ZN2(1)) + MSS=MASS +C Only calculate N2 in thermosphere if alt in mixed region + IF(ALT.LT.ZMIX.AND.MASS.GT.0) MSS=28 +C Only calculate thermosphere if input parameters changed +C or altitude above ZN2(1) in mesosphere + IF(V1.EQ.1..OR.ALT.GT.ZN2(1).OR.ALAST.GT.ZN2(1).OR.MSS.NE.MSSL) + $ THEN + CALL GTS7(IYD,SEC,ALTT,GLAT,GLONG,STL,F107A,F107,AP,MSS,DS,TS) + DM28M=DM28 +C metric adjustment + IF(IMR.EQ.1) DM28M=DM28*1.E6 + MSSL=MSS + ENDIF + T(1)=TS(1) + T(2)=TS(2) + IF(ALT.GE.ZN2(1)) THEN + DO 5 J=1,9 + D(J)=DS(J) + 5 CONTINUE + GOTO 10 + ENDIF +C +C LOWER MESOSPHERE/UPPER STRATOSPHERE [between ZN3(1) and ZN2(1)] +C Temperature at nodes and gradients at end nodes +C Inverse temperature a linear function of spherical harmonics +C Only calculate nodes if input changed + IF(V1.EQ.1..OR.ALAST.GE.ZN2(1)) THEN + TGN2(1)=TGN1(2) + TN2(1)=TN1(5) + TN2(2)=PMA(1,1)*PAVGM(1)/(1.-SW(20)*GLOB7S(PMA(1,1))) + TN2(3)=PMA(1,2)*PAVGM(2)/(1.-SW(20)*GLOB7S(PMA(1,2))) + TN2(4)=PMA(1,3)*PAVGM(3)/(1.-SW(20)*SW(22)*GLOB7S(PMA(1,3))) + TGN2(2)=PAVGM(9)*PMA(1,10)*(1.+SW(20)*SW(22)*GLOB7S(PMA(1,10))) + $ *TN2(4)*TN2(4)/(PMA(1,3)*PAVGM(3))**2 + TN3(1)=TN2(4) + ENDIF +C Including ZN3(1) in the jump condition creates a model coverage gap at that exact altitude +C IF(ALT.GE.ZN3(1)) GOTO 6 + IF(ALT.GT.ZN3(1)) GOTO 6 +C +C LOWER STRATOSPHERE AND TROPOSPHERE [below ZN3(1)] +C Temperature at nodes and gradients at end nodes +C Inverse temperature a linear function of spherical harmonics +C Only calculate nodes if input changed + IF(V1.EQ.1..OR.ALAST.GE.ZN3(1)) THEN + TGN3(1)=TGN2(2) + TN3(2)=PMA(1,4)*PAVGM(4)/(1.-SW(22)*GLOB7S(PMA(1,4))) + TN3(3)=PMA(1,5)*PAVGM(5)/(1.-SW(22)*GLOB7S(PMA(1,5))) + TN3(4)=PMA(1,6)*PAVGM(6)/(1.-SW(22)*GLOB7S(PMA(1,6))) + TN3(5)=PMA(1,7)*PAVGM(7)/(1.-SW(22)*GLOB7S(PMA(1,7))) + TGN3(2)=PMA(1,8)*PAVGM(8)*(1.+SW(22)*GLOB7S(PMA(1,8))) + $ *TN3(5)*TN3(5)/(PMA(1,7)*PAVGM(7))**2 + ENDIF + 6 CONTINUE + IF(MASS.EQ.0) GOTO 50 +C LINEAR TRANSITION TO FULL MIXING BELOW ZN2(1) + DMC=0 + IF(ALT.GT.ZMIX) DMC=1.-(ZN2(1)-ALT)/(ZN2(1)-ZMIX) + DZ28=DS(3) +C ***** N2 DENSITY **** + DMR=DS(3)/DM28M-1. + D(3)=DENSM(ALT,DM28M,XMM,TZ,MN3,ZN3,TN3,TGN3,MN2,ZN2,TN2,TGN2) + D(3)=D(3)*(1.+DMR*DMC) +C ***** HE DENSITY **** + D(1)=0 + IF(MASS.NE.4.AND.MASS.NE.48) GOTO 204 + DMR=DS(1)/(DZ28*PDM(2,1))-1. + D(1)=D(3)*PDM(2,1)*(1.+DMR*DMC) + 204 CONTINUE +C **** O DENSITY **** + D(2)=0 + D(9)=0 + 216 CONTINUE +C ***** O2 DENSITY **** + D(4)=0 + IF(MASS.NE.32.AND.MASS.NE.48) GOTO 232 + DMR=DS(4)/(DZ28*PDM(2,4))-1. + D(4)=D(3)*PDM(2,4)*(1.+DMR*DMC) + 232 CONTINUE +C ***** AR DENSITY **** + D(5)=0 + IF(MASS.NE.40.AND.MASS.NE.48) GOTO 240 + DMR=DS(5)/(DZ28*PDM(2,5))-1. + D(5)=D(3)*PDM(2,5)*(1.+DMR*DMC) + 240 CONTINUE +C ***** HYDROGEN DENSITY **** + D(7)=0 +C ***** ATOMIC NITROGEN DENSITY **** + D(8)=0 +C +C TOTAL MASS DENSITY +C + IF(MASS.EQ.48) THEN + D(6) = 1.66E-24*(4.*D(1)+16.*D(2)+28.*D(3)+32.*D(4)+40.*D(5)+ + & D(7)+14.*D(8)) + IF(IMR.EQ.1) D(6)=D(6)/1000. + ENDIF + T(2)=TZ + 10 CONTINUE + GOTO 90 + 50 CONTINUE + DD=DENSM(ALT,1.,0,TZ,MN3,ZN3,TN3,TGN3,MN2,ZN2,TN2,TGN2) + T(2)=TZ + 90 CONTINUE + ALAST=ALT + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GTD7D(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS, + $ D,T) +C +C NRLMSISE-00 +C ----------- +C This subroutine provides Effective Total Mass Density for +C output D(6) which includes contributions from "anomalous +C oxygen" which can affect satellite drag above 500 km. This +C subroutine is part of the distribution package for the +C Neutral Atmosphere Empirical Model from the surface to lower +C exosphere. See subroutine GTD7 for more extensive comments. +C +C INPUT VARIABLES: +C IYD - YEAR AND DAY AS YYDDD (day of year from 1 to 365 (or 366)) +C (Year ignored in current model) +C SEC - UT(SEC) +C ALT - ALTITUDE(KM) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS; see Note below) +C F107A - 81 day AVERAGE OF F10.7 FLUX (centered on day DDD) +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 57 HRS PRIOR +C TO CURRENT TIME +C MASS - MASS NUMBER (ONLY DENSITY FOR SELECTED GAS IS +C CALCULATED. MASS 0 IS TEMPERATURE. MASS 48 FOR ALL. +C MASS 17 IS Anomalous O ONLY.) +C +C NOTES ON INPUT VARIABLES: +C UT, Local Time, and Longitude are used independently in the +C model and are not of equal importance for every situation. +C For the most physically realistic calculation these three +C variables should be consistent (STL=SEC/3600+GLONG/15). +C The Equation of Time departures from the above formula +C for apparent local time can be included if available but +C are of minor importance. +c +C F107 and F107A values used to generate the model correspond +C to the 10.7 cm radio flux at the actual distance of the Earth +C from the Sun rather than the radio flux at 1 AU. +C +C OUTPUT VARIABLES: +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) [includes anomalous oxygen] +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C D(9) - Anomalous oxygen NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C + DIMENSION D(9),T(2),AP(7),DS(9),TS(2) + COMMON/METSEL/IMR + CALL GTD7(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS,D,T) +C TOTAL MASS DENSITY +C + IF(MASS.EQ.48) THEN + D(6) = 1.66E-24*(4.*D(1)+16.*D(2)+28.*D(3)+32.*D(4)+40.*D(5)+ + & D(7)+14.*D(8)+16.*D(9)) + IF(IMR.EQ.1) D(6)=D(6)/1000. + ENDIF + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GHP7(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP, + $ D,T,PRESS) +C FIND ALTITUDE OF PRESSURE SURFACE (PRESS) FROM GTD7 +C INPUT: +C IYD - YEAR AND DAY AS YYDDD +C SEC - UT(SEC) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS) +C F107A - 3 MONTH AVERAGE OF F10.7 FLUX +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 59 HRS PRIOR +C TO CURRENT TIME +C PRESS - PRESSURE LEVEL(MB) +C OUTPUT: +C ALT - ALTITUDE(KM) +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C D(9) - HOT O NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C + COMMON/PARMB/GSURF,RE + COMMON/METSEL/IMR + DIMENSION D(9),T(2),AP(7) + SAVE + DATA BM/1.3806E-19/,RGAS/831.4/ + DATA TEST/.00043/,LTEST/12/ + PL=ALOG10(PRESS) +C Initial altitude estimate + IF(PL.GE.-5.) THEN + IF(PL.GT.2.5) ZI=18.06*(3.00-PL) + IF(PL.GT..75.AND.PL.LE.2.5) ZI=14.98*(3.08-PL) + IF(PL.GT.-1..AND.PL.LE..75) ZI=17.8*(2.72-PL) + IF(PL.GT.-2..AND.PL.LE.-1.) ZI=14.28*(3.64-PL) + IF(PL.GT.-4..AND.PL.LE.-2.) ZI=12.72*(4.32-PL) + IF(PL.LE.-4.) ZI=25.3*(.11-PL) + IDAY=MOD(IYD,1000) + CL=GLAT/90. + CL2=CL*CL + IF(IDAY.LT.182) CD=1.-IDAY/91.25 + IF(IDAY.GE.182) CD=IDAY/91.25-3. + CA=0 + IF(PL.GT.-1.11.AND.PL.LE.-.23) CA=1.0 + IF(PL.GT.-.23) CA=(2.79-PL)/(2.79+.23) + IF(PL.LE.-1.11.AND.PL.GT.-3.) CA=(-2.93-PL)/(-2.93+1.11) + Z=ZI-4.87*CL*CD*CA-1.64*CL2*CA+.31*CA*CL + ENDIF + IF(PL.LT.-5.) Z=22.*(PL+4.)**2+110 +C ITERATION LOOP + L=0 + 10 CONTINUE + L=L+1 + CALL GTD7(IYD,SEC,Z,GLAT,GLONG,STL,F107A,F107,AP,48,D,T) + XN=D(1)+D(2)+D(3)+D(4)+D(5)+D(7)+D(8) + P=BM*XN*T(2) + IF(IMR.EQ.1) P=P*1.E-6 + DIFF=PL-ALOG10(P) + IF(ABS(DIFF).LT.TEST .OR. L.EQ.LTEST) GOTO 20 + XM=D(6)/XN/1.66E-24 + IF(IMR.EQ.1) XM = XM*1.E3 + G=GSURF/(1.+Z/RE)**2 + SH=RGAS*T(2)/(XM*G) +C New altitude estimate using scale height + IF(L.LT.6) THEN + Z=Z-SH*DIFF*2.302 + ELSE + Z=Z-SH*DIFF + ENDIF + GOTO 10 + 20 CONTINUE + IF(L.EQ.LTEST) WRITE(6,100) PRESS,DIFF + 100 FORMAT(1X,29HGHP7 NOT CONVERGING FOR PRESS, 1PE12.2,E12.2) + ALT=Z + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GLATF(LAT,GV,REFF) +C CALCULATE LATITUDE VARIABLE GRAVITY (GV) AND EFFECTIVE +C RADIUS (REFF) + REAL LAT + SAVE + DATA DGTR/1.74533E-2/ + C2 = COS(2.*DGTR*LAT) + GV = 980.616*(1.-.0026373*C2) + REFF = 2.*GV/(3.085462E-6 + 2.27E-9*C2)*1.E-5 + RETURN + END +C----------------------------------------------------------------------- + FUNCTION VTST7(IYD,SEC,GLAT,GLONG,STL,F107A,F107,AP,IC) +C Test if geophysical variables or switches changed and save +C Return 0 if unchanged and 1 if changed + DIMENSION AP(7),IYDL(2),SECL(2),GLATL(2),GLL(2),STLL(2) + DIMENSION FAL(2),FL(2),APL(7,2),SWL(25,2),SWCL(25,2) + COMMON/CSW/SW(25),ISW,SWC(25) + SAVE + DATA IYDL/2*-999/,SECL/2*-999./,GLATL/2*-999./,GLL/2*-999./ + DATA STLL/2*-999./,FAL/2*-999./,FL/2*-999./,APL/14*-999./ + DATA SWL/50*-999./,SWCL/50*-999./ + VTST7=0 + IF(IYD.NE.IYDL(IC)) GOTO 10 + IF(SEC.NE.SECL(IC)) GOTO 10 + IF(GLAT.NE.GLATL(IC)) GOTO 10 + IF(GLONG.NE.GLL(IC)) GOTO 10 + IF(STL.NE.STLL(IC)) GOTO 10 + IF(F107A.NE.FAL(IC)) GOTO 10 + IF(F107.NE.FL(IC)) GOTO 10 + DO 5 I=1,7 + IF(AP(I).NE.APL(I,IC)) GOTO 10 + 5 CONTINUE + DO 7 I=1,25 + IF(SW(I).NE.SWL(I,IC)) GOTO 10 + IF(SWC(I).NE.SWCL(I,IC)) GOTO 10 + 7 CONTINUE + GOTO 20 + 10 CONTINUE + VTST7=1 + IYDL(IC)=IYD + SECL(IC)=SEC + GLATL(IC)=GLAT + GLL(IC)=GLONG + STLL(IC)=STL + FAL(IC)=F107A + FL(IC)=F107 + DO 15 I=1,7 + APL(I,IC)=AP(I) + 15 CONTINUE + DO 16 I=1,25 + SWL(I,IC)=SW(I) + SWCL(I,IC)=SWC(I) + 16 CONTINUE + 20 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE GTS7(IYD,SEC,ALT,GLAT,GLONG,STL,F107A,F107,AP,MASS,D,T) +C +C Thermospheric portion of NRLMSISE-00 +C See GTD7 for more extensive comments +C +C OUTPUT IN M-3 and KG/M3: CALL METERS(.TRUE.) +C +C INPUT VARIABLES: +C IYD - YEAR AND DAY AS YYDDD (day of year from 1 to 365 (or 366)) +C (Year ignored in current model) +C SEC - UT(SEC) +C ALT - ALTITUDE(KM) (>72.5 km) +C GLAT - GEODETIC LATITUDE(DEG) +C GLONG - GEODETIC LONGITUDE(DEG) +C STL - LOCAL APPARENT SOLAR TIME(HRS; see Note below) +C F107A - 81 day AVERAGE OF F10.7 FLUX (centered on day DDD) +C F107 - DAILY F10.7 FLUX FOR PREVIOUS DAY +C AP - MAGNETIC INDEX(DAILY) OR WHEN SW(9)=-1. : +C - ARRAY CONTAINING: +C (1) DAILY AP +C (2) 3 HR AP INDEX FOR CURRENT TIME +C (3) 3 HR AP INDEX FOR 3 HRS BEFORE CURRENT TIME +C (4) 3 HR AP INDEX FOR 6 HRS BEFORE CURRENT TIME +C (5) 3 HR AP INDEX FOR 9 HRS BEFORE CURRENT TIME +C (6) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 12 TO 33 HRS PRIOR +C TO CURRENT TIME +C (7) AVERAGE OF EIGHT 3 HR AP INDICIES FROM 36 TO 57 HRS PRIOR +C TO CURRENT TIME +C MASS - MASS NUMBER (ONLY DENSITY FOR SELECTED GAS IS +C CALCULATED. MASS 0 IS TEMPERATURE. MASS 48 FOR ALL. +C MASS 17 IS Anomalous O ONLY.) +C +C NOTES ON INPUT VARIABLES: +C UT, Local Time, and Longitude are used independently in the +C model and are not of equal importance for every situation. +C For the most physically realistic calculation these three +C variables should be consistent (STL=SEC/3600+GLONG/15). +C The Equation of Time departures from the above formula +C for apparent local time can be included if available but +C are of minor importance. +c +C F107 and F107A values used to generate the model correspond +C to the 10.7 cm radio flux at the actual distance of the Earth +C from the Sun rather than the radio flux at 1 AU. The following +C site provides both classes of values: +C ftp://ftp.ngdc.noaa.gov/STP/SOLAR_DATA/SOLAR_RADIO/FLUX/ +C +C F107, F107A, and AP effects are neither large nor well +C established below 80 km and these parameters should be set to +C 150., 150., and 4. respectively. +C +C OUTPUT VARIABLES: +C D(1) - HE NUMBER DENSITY(CM-3) +C D(2) - O NUMBER DENSITY(CM-3) +C D(3) - N2 NUMBER DENSITY(CM-3) +C D(4) - O2 NUMBER DENSITY(CM-3) +C D(5) - AR NUMBER DENSITY(CM-3) +C D(6) - TOTAL MASS DENSITY(GM/CM3) [Anomalous O NOT included] +C D(7) - H NUMBER DENSITY(CM-3) +C D(8) - N NUMBER DENSITY(CM-3) +C D(9) - Anomalous oxygen NUMBER DENSITY(CM-3) +C T(1) - EXOSPHERIC TEMPERATURE +C T(2) - TEMPERATURE AT ALT +C + DIMENSION ZN1(5),ALPHA(9) + COMMON/GTS3C/TLB,S,DB04,DB16,DB28,DB32,DB40,DB48,DB01,ZA,T0,Z0 + & ,G0,RL,DD,DB14,TR12 + COMMON/MESO7/TN1(5),TN2(4),TN3(5),TGN1(2),TGN2(2),TGN3(2) + DIMENSION D(9),T(2),MT(11),AP(1),ALTL(8) + COMMON/LOWER7/PTM(10),PDM(10,8) + COMMON/PARM7/PT(150),PD(150,9),PS(150),PDL(25,2),PTL(100,4), + $ PMA(100,10),SAM(100) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/TTEST/TINFG,GB,ROUT,TT(15) + COMMON/DMIX/DM04,DM16,DM28,DM32,DM40,DM01,DM14 + COMMON/METSEL/IMR + SAVE + DATA MT/48,0,4,16,28,32,40,1,49,14,17/ + DATA ALTL/200.,300.,160.,250.,240.,450.,320.,450./ + DATA MN1/5/,ZN1/120.,110.,100.,90.,72.5/ + DATA DGTR/1.74533E-2/,DR/1.72142E-2/,ALAST/-999./ + DATA ALPHA/-0.38,0.,0.,0.,0.17,0.,-0.38,0.,0./ +C Test for changed input + V2=VTST7(IYD,SEC,GLAT,GLONG,STL,F107A,F107,AP,2) +C + YRD=IYD + ZA=PDL(16,2) + ZN1(1)=ZA + DO 2 J=1,9 + D(J)=0. + 2 CONTINUE +C TINF VARIATIONS NOT IMPORTANT BELOW ZA OR ZN1(1) + IF(ALT.GT.ZN1(1)) THEN + IF(V2.EQ.1..OR.ALAST.LE.ZN1(1)) TINF=PTM(1)*PT(1) + $ *(1.+SW(16)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PT)) + ELSE + TINF=PTM(1)*PT(1) + ENDIF + T(1)=TINF +C GRADIENT VARIATIONS NOT IMPORTANT BELOW ZN1(5) + IF(ALT.GT.ZN1(5)) THEN + IF(V2.EQ.1.OR.ALAST.LE.ZN1(5)) G0=PTM(4)*PS(1) + $ *(1.+SW(19)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PS)) + ELSE + G0=PTM(4)*PS(1) + ENDIF +C Calculate these temperatures only if input changed + IF(V2.EQ.1. .OR. ALT.LT.300.) + $ TLB=PTM(2)*(1.+SW(17)*GLOBE7(YRD,SEC,GLAT,GLONG,STL, + $ F107A,F107,AP,PD(1,4)))*PD(1,4) + S=G0/(TINF-TLB) +C Lower thermosphere temp variations not significant for +C density above 300 km + IF(ALT.LT.300.) THEN + IF(V2.EQ.1..OR.ALAST.GE.300.) THEN + TN1(2)=PTM(7)*PTL(1,1)/(1.-SW(18)*GLOB7S(PTL(1,1))) + TN1(3)=PTM(3)*PTL(1,2)/(1.-SW(18)*GLOB7S(PTL(1,2))) + TN1(4)=PTM(8)*PTL(1,3)/(1.-SW(18)*GLOB7S(PTL(1,3))) + TN1(5)=PTM(5)*PTL(1,4)/(1.-SW(18)*SW(20)*GLOB7S(PTL(1,4))) + TGN1(2)=PTM(9)*PMA(1,9)*(1.+SW(18)*SW(20)*GLOB7S(PMA(1,9))) + $ *TN1(5)*TN1(5)/(PTM(5)*PTL(1,4))**2 + ENDIF + ELSE + TN1(2)=PTM(7)*PTL(1,1) + TN1(3)=PTM(3)*PTL(1,2) + TN1(4)=PTM(8)*PTL(1,3) + TN1(5)=PTM(5)*PTL(1,4) + TGN1(2)=PTM(9)*PMA(1,9) + $ *TN1(5)*TN1(5)/(PTM(5)*PTL(1,4))**2 + ENDIF +C + Z0=ZN1(4) + T0=TN1(4) + TR12=1. +C + IF(MASS.EQ.0) GO TO 50 +C N2 variation factor at Zlb + G28=SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107, + & AP,PD(1,3)) + DAY=AMOD(YRD,1000.) +C VARIATION OF TURBOPAUSE HEIGHT + ZHF=PDL(25,2) + $ *(1.+SW(5)*PDL(25,1)*SIN(DGTR*GLAT)*COS(DR*(DAY-PT(14)))) + YRD=IYD + T(1)=TINF + XMM=PDM(5,3) + Z=ALT +C + DO 10 J = 1,11 + IF(MASS.EQ.MT(J)) GO TO 15 + 10 CONTINUE + WRITE(6,100) MASS + GO TO 90 + 15 IF(Z.GT.ALTL(6).AND.MASS.NE.28.AND.MASS.NE.48) GO TO 17 +C +C **** N2 DENSITY **** +C +C Diffusive density at Zlb + DB28 = PDM(1,3)*EXP(G28)*PD(1,3) +C Diffusive density at Alt + D(3)=DENSU(Z,DB28,TINF,TLB, 28.,ALPHA(3),T(2),PTM(6),S,MN1,ZN1, + & TN1,TGN1) + DD=D(3) +C Turbopause + ZH28=PDM(3,3)*ZHF + ZHM28=PDM(4,3)*PDL(6,2) + XMD=28.-XMM +C Mixed density at Zlb + B28=DENSU(ZH28,DB28,TINF,TLB,XMD,ALPHA(3)-1.,TZ,PTM(6),S,MN1, + & ZN1,TN1,TGN1) + IF(Z.GT.ALTL(3).OR.SW(15).EQ.0.) GO TO 17 +C Mixed density at Alt + DM28=DENSU(Z,B28,TINF,TLB,XMM,ALPHA(3),TZ,PTM(6),S,MN1, + & ZN1,TN1,TGN1) +C Net density at Alt + D(3)=DNET(D(3),DM28,ZHM28,XMM,28.) + 17 CONTINUE + GO TO (20,50,20,25,90,35,40,45,25,48,46), J + 20 CONTINUE +C +C **** HE DENSITY **** +C +C Density variation factor at Zlb + G4 = SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,1)) +C Diffusive density at Zlb + DB04 = PDM(1,1)*EXP(G4)*PD(1,1) +C Diffusive density at Alt + D(1)=DENSU(Z,DB04,TINF,TLB, 4.,ALPHA(1),T(2),PTM(6),S,MN1,ZN1, + & TN1,TGN1) + DD=D(1) + IF(Z.GT.ALTL(1).OR.SW(15).EQ.0.) GO TO 24 +C Turbopause + ZH04=PDM(3,1) +C Mixed density at Zlb + B04=DENSU(ZH04,DB04,TINF,TLB,4.-XMM,ALPHA(1)-1., + $ T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM04=DENSU(Z,B04,TINF,TLB,XMM,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + ZHM04=ZHM28 +C Net density at Alt + D(1)=DNET(D(1),DM04,ZHM04,XMM,4.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,1)/B04) + ZC04=PDM(5,1)*PDL(1,2) + HC04=PDM(6,1)*PDL(2,2) +C Net density corrected at Alt + D(1)=D(1)*CCOR(Z,RL,HC04,ZC04) + 24 CONTINUE + IF(MASS.NE.48) GO TO 90 + 25 CONTINUE +C +C **** O DENSITY **** +C +C Density variation factor at Zlb + G16= SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,2)) +C Diffusive density at Zlb + DB16 = PDM(1,2)*EXP(G16)*PD(1,2) +C Diffusive density at Alt + D(2)=DENSU(Z,DB16,TINF,TLB, 16.,ALPHA(2),T(2),PTM(6),S,MN1, + $ ZN1,TN1,TGN1) + DD=D(2) + IF(Z.GT.ALTL(2).OR.SW(15).EQ.0.) GO TO 34 +C Corrected from PDM(3,1) to PDM(3,2) 12/2/85 +C Turbopause + ZH16=PDM(3,2) +C Mixed density at Zlb + B16=DENSU(ZH16,DB16,TINF,TLB,16-XMM,ALPHA(2)-1., + $ T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM16=DENSU(Z,B16,TINF,TLB,XMM,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + ZHM16=ZHM28 +C Net density at Alt + D(2)=DNET(D(2),DM16,ZHM16,XMM,16.) +C 3/16/99 Change form to match O2 departure from diff equil near 150 +C km and add dependence on F10.7 +C RL=ALOG(B28*PDM(2,2)*ABS(PDL(17,2))/B16) + RL=PDM(2,2)*PDL(17,2)*(1.+SW(1)*PDL(24,1)*(F107A-150.)) + HC16=PDM(6,2)*PDL(4,2) + ZC16=PDM(5,2)*PDL(3,2) + HC216=PDM(6,2)*PDL(5,2) + D(2)=D(2)*CCOR2(Z,RL,HC16,ZC16,HC216) +C Chemistry correction + HCC16=PDM(8,2)*PDL(14,2) + ZCC16=PDM(7,2)*PDL(13,2) + RC16=PDM(4,2)*PDL(15,2) +C Net density corrected at Alt + D(2)=D(2)*CCOR(Z,RC16,HCC16,ZCC16) + 34 CONTINUE + IF(MASS.NE.48.AND.MASS.NE.49) GO TO 90 + 35 CONTINUE +C +C **** O2 DENSITY **** +C +C Density variation factor at Zlb + G32= SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,5)) +C Diffusive density at Zlb + DB32 = PDM(1,4)*EXP(G32)*PD(1,5) +C Diffusive density at Alt + D(4)=DENSU(Z,DB32,TINF,TLB, 32.,ALPHA(4),T(2),PTM(6),S,MN1, + $ ZN1,TN1,TGN1) + IF(MASS.EQ.49) THEN + DD=DD+2.*D(4) + ELSE + DD=D(4) + ENDIF + IF(SW(15).EQ.0.) GO TO 39 + IF(Z.GT.ALTL(4)) GO TO 38 +C Turbopause + ZH32=PDM(3,4) +C Mixed density at Zlb + B32=DENSU(ZH32,DB32,TINF,TLB,32.-XMM,ALPHA(4)-1., + $ T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM32=DENSU(Z,B32,TINF,TLB,XMM,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + ZHM32=ZHM28 +C Net density at Alt + D(4)=DNET(D(4),DM32,ZHM32,XMM,32.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,4)/B32) + HC32=PDM(6,4)*PDL(8,2) + ZC32=PDM(5,4)*PDL(7,2) + D(4)=D(4)*CCOR(Z,RL,HC32,ZC32) + 38 CONTINUE +C Correction for general departure from diffusive equilibrium above Zlb + HCC32=PDM(8,4)*PDL(23,2) + HCC232=PDM(8,4)*PDL(23,1) + ZCC32=PDM(7,4)*PDL(22,2) + RC32=PDM(4,4)*PDL(24,2)*(1.+SW(1)*PDL(24,1)*(F107A-150.)) +C Net density corrected at Alt + D(4)=D(4)*CCOR2(Z,RC32,HCC32,ZCC32,HCC232) + 39 CONTINUE + IF(MASS.NE.48) GO TO 90 + 40 CONTINUE +C +C **** AR DENSITY **** +C +C Density variation factor at Zlb + G40= SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,6)) +C Diffusive density at Zlb + DB40 = PDM(1,5)*EXP(G40)*PD(1,6) +C Diffusive density at Alt + D(5)=DENSU(Z,DB40,TINF,TLB, 40.,ALPHA(5),T(2),PTM(6),S,MN1, + $ ZN1,TN1,TGN1) + DD=D(5) + IF(Z.GT.ALTL(5).OR.SW(15).EQ.0.) GO TO 44 +C Turbopause + ZH40=PDM(3,5) +C Mixed density at Zlb + B40=DENSU(ZH40,DB40,TINF,TLB,40.-XMM,ALPHA(5)-1., + $ T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM40=DENSU(Z,B40,TINF,TLB,XMM,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + ZHM40=ZHM28 +C Net density at Alt + D(5)=DNET(D(5),DM40,ZHM40,XMM,40.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,5)/B40) + HC40=PDM(6,5)*PDL(10,2) + ZC40=PDM(5,5)*PDL(9,2) +C Net density corrected at Alt + D(5)=D(5)*CCOR(Z,RL,HC40,ZC40) + 44 CONTINUE + IF(MASS.NE.48) GO TO 90 + 45 CONTINUE +C +C **** HYDROGEN DENSITY **** +C +C Density variation factor at Zlb + G1 = SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,7)) +C Diffusive density at Zlb + DB01 = PDM(1,6)*EXP(G1)*PD(1,7) +C Diffusive density at Alt + D(7)=DENSU(Z,DB01,TINF,TLB,1.,ALPHA(7),T(2),PTM(6),S,MN1, + $ ZN1,TN1,TGN1) + DD=D(7) + IF(Z.GT.ALTL(7).OR.SW(15).EQ.0.) GO TO 47 +C Turbopause + ZH01=PDM(3,6) +C Mixed density at Zlb + B01=DENSU(ZH01,DB01,TINF,TLB,1.-XMM,ALPHA(7)-1., + $ T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM01=DENSU(Z,B01,TINF,TLB,XMM,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + ZHM01=ZHM28 +C Net density at Alt + D(7)=DNET(D(7),DM01,ZHM01,XMM,1.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,6)*ABS(PDL(18,2))/B01) + HC01=PDM(6,6)*PDL(12,2) + ZC01=PDM(5,6)*PDL(11,2) + D(7)=D(7)*CCOR(Z,RL,HC01,ZC01) +C Chemistry correction + HCC01=PDM(8,6)*PDL(20,2) + ZCC01=PDM(7,6)*PDL(19,2) + RC01=PDM(4,6)*PDL(21,2) +C Net density corrected at Alt + D(7)=D(7)*CCOR(Z,RC01,HCC01,ZCC01) + 47 CONTINUE + IF(MASS.NE.48) GO TO 90 + 48 CONTINUE +C +C **** ATOMIC NITROGEN DENSITY **** +C +C Density variation factor at Zlb + G14 = SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,8)) +C Diffusive density at Zlb + DB14 = PDM(1,7)*EXP(G14)*PD(1,8) +C Diffusive density at Alt + D(8)=DENSU(Z,DB14,TINF,TLB,14.,ALPHA(8),T(2),PTM(6),S,MN1, + $ ZN1,TN1,TGN1) + DD=D(8) + IF(Z.GT.ALTL(8).OR.SW(15).EQ.0.) GO TO 49 +C Turbopause + ZH14=PDM(3,7) +C Mixed density at Zlb + B14=DENSU(ZH14,DB14,TINF,TLB,14.-XMM,ALPHA(8)-1., + $ T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) +C Mixed density at Alt + DM14=DENSU(Z,B14,TINF,TLB,XMM,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + ZHM14=ZHM28 +C Net density at Alt + D(8)=DNET(D(8),DM14,ZHM14,XMM,14.) +C Correction to specified mixing ratio at ground + RL=ALOG(B28*PDM(2,7)*ABS(PDL(3,1))/B14) + HC14=PDM(6,7)*PDL(2,1) + ZC14=PDM(5,7)*PDL(1,1) + D(8)=D(8)*CCOR(Z,RL,HC14,ZC14) +C Chemistry correction + HCC14=PDM(8,7)*PDL(5,1) + ZCC14=PDM(7,7)*PDL(4,1) + RC14=PDM(4,7)*PDL(6,1) +C Net density corrected at Alt + D(8)=D(8)*CCOR(Z,RC14,HCC14,ZCC14) + 49 CONTINUE + IF(MASS.NE.48) GO TO 90 + 46 CONTINUE +C +C **** Anomalous OXYGEN DENSITY **** +C + G16H = SW(21)*GLOBE7(YRD,SEC,GLAT,GLONG,STL,F107A,F107,AP,PD(1,9)) + DB16H = PDM(1,8)*EXP(G16H)*PD(1,9) + THO=PDM(10,8)*PDL(7,1) + DD=DENSU(Z,DB16H,THO,THO,16.,ALPHA(9),T2,PTM(6),S,MN1, + $ ZN1,TN1,TGN1) + ZSHT=PDM(6,8) + ZMHO=PDM(5,8) + ZSHO=SCALH(ZMHO,16.,THO) + D(9)=DD*EXP(-ZSHT/ZSHO*(EXP(-(Z-ZMHO)/ZSHT)-1.)) + IF(MASS.NE.48) GO TO 90 +C +C TOTAL MASS DENSITY +C + D(6) = 1.66E-24*(4.*D(1)+16.*D(2)+28.*D(3)+32.*D(4)+40.*D(5)+ + & D(7)+14.*D(8)) + DB48=1.66E-24*(4.*DB04+16.*DB16+28.*DB28+32.*DB32+40.*DB40+DB01+ + & 14.*DB14) + GO TO 90 +C TEMPERATURE AT ALTITUDE + 50 CONTINUE + Z=ABS(ALT) + DDUM = DENSU(Z,1., TINF,TLB,0.,0.,T(2),PTM(6),S,MN1,ZN1,TN1,TGN1) + 90 CONTINUE +C ADJUST DENSITIES FROM CGS TO KGM + IF(IMR.EQ.1) THEN + DO 95 I=1,9 + D(I)=D(I)*1.E6 + 95 CONTINUE + D(6)=D(6)/1000. + ENDIF + ALAST=ALT + RETURN + 100 FORMAT(1X,'MASS', I5, ' NOT VALID') + END +C----------------------------------------------------------------------- + SUBROUTINE METERS(METER) +C Convert outputs to Kg & Meters if METER true + LOGICAL METER + COMMON/METSEL/IMR + SAVE + IMR=0 + IF(METER) IMR=1 + END +C----------------------------------------------------------------------- + FUNCTION SCALH(ALT,XM,TEMP) +C Calculate scale height (km) + COMMON/PARMB/GSURF,RE + SAVE + DATA RGAS/831.4/ + G=GSURF/(1.+ALT/RE)**2 + SCALH=RGAS*TEMP/(G*XM) + RETURN + END +C----------------------------------------------------------------------- + FUNCTION GLOBE7(YRD,SEC,LAT,LONG,TLOC,F107A,F107,AP,P) +C CALCULATE G(L) FUNCTION +C Upper Thermosphere Parameters + REAL LAT, LONG + DIMENSION P(150),SV(25),AP(7) + COMMON/TTEST/TINF,GB,ROUT,T(15) + COMMON/CSW/SW(25),ISW,SWC(25) + COMMON/LPOLY/PLG(9,4),CTLOC,STLOC,C2TLOC,S2TLOC,C3TLOC,S3TLOC, + $ IYR,DAY,DF,DFA,APD,APDF,APT(4),XLONG + SAVE + DATA DGTR/1.74533E-2/,DR/1.72142E-2/, XL/1000./,TLL/1000./ + DATA SW9/1./,DAYL/-1./,P14/-1000./,P18/-1000./,P32/-1000./ + DATA HR/.2618/,SR/7.2722E-5/,SV/25*1./,NSW/14/,P39/-1000./ +C 3hr Magnetic activity functions +C Eq. A24d + G0(A)=(A-4.+(P(26)-1.)*(A-4.+(EXP(-ABS(P(25))*(A-4.))-1.)/ABS(P(25 + *)))) +C Eq. A24c + SUMEX(EX)=1.+(1.-EX**19)/(1.-EX)*EX**(.5) +C Eq. A24a + SG0(EX)=(G0(AP(2))+(G0(AP(3))*EX+G0(AP(4))*EX*EX+G0(AP(5))*EX**3 + $ +(G0(AP(6))*EX**4+G0(AP(7))*EX**12)*(1.-EX**8)/(1.-EX)) + $ )/SUMEX(EX) + IF(ISW.NE.64999) CALL TSELEC(SV) + DO 10 J=1,14 + T(J)=0 + 10 CONTINUE + IF(SW(9).GT.0) SW9=1. + IF(SW(9).LT.0) SW9=-1. + IYR = YRD/1000. + DAY = YRD - IYR*1000. + XLONG=LONG +C Eq. A22 (remainder of code) + IF(XL.EQ.LAT) GO TO 15 +C CALCULATE LEGENDRE POLYNOMIALS + C = SIN(LAT*DGTR) + S = COS(LAT*DGTR) + C2 = C*C + C4 = C2*C2 + S2 = S*S + PLG(2,1) = C + PLG(3,1) = 0.5*(3.*C2 -1.) + PLG(4,1) = 0.5*(5.*C*C2-3.*C) + PLG(5,1) = (35.*C4 - 30.*C2 + 3.)/8. + PLG(6,1) = (63.*C2*C2*C - 70.*C2*C + 15.*C)/8. + PLG(7,1) = (11.*C*PLG(6,1) - 5.*PLG(5,1))/6. +C PLG(8,1) = (13.*C*PLG(7,1) - 6.*PLG(6,1))/7. + PLG(2,2) = S + PLG(3,2) = 3.*C*S + PLG(4,2) = 1.5*(5.*C2-1.)*S + PLG(5,2) = 2.5*(7.*C2*C-3.*C)*S + PLG(6,2) = 1.875*(21.*C4 - 14.*C2 +1.)*S + PLG(7,2) = (11.*C*PLG(6,2)-6.*PLG(5,2))/5. +C PLG(8,2) = (13.*C*PLG(7,2)-7.*PLG(6,2))/6. +C PLG(9,2) = (15.*C*PLG(8,2)-8.*PLG(7,2))/7. + PLG(3,3) = 3.*S2 + PLG(4,3) = 15.*S2*C + PLG(5,3) = 7.5*(7.*C2 -1.)*S2 + PLG(6,3) = 3.*C*PLG(5,3)-2.*PLG(4,3) + PLG(7,3)=(11.*C*PLG(6,3)-7.*PLG(5,3))/4. + PLG(8,3)=(13.*C*PLG(7,3)-8.*PLG(6,3))/5. + PLG(4,4) = 15.*S2*S + PLG(5,4) = 105.*S2*S*C + PLG(6,4)=(9.*C*PLG(5,4)-7.*PLG(4,4))/2. + PLG(7,4)=(11.*C*PLG(6,4)-8.*PLG(5,4))/3. + XL=LAT + 15 CONTINUE + IF(TLL.EQ.TLOC) GO TO 16 + IF(SW(7).EQ.0.AND.SW(8).EQ.0.AND.SW(14).EQ.0) GOTO 16 + STLOC = SIN(HR*TLOC) + CTLOC = COS(HR*TLOC) + S2TLOC = SIN(2.*HR*TLOC) + C2TLOC = COS(2.*HR*TLOC) + S3TLOC = SIN(3.*HR*TLOC) + C3TLOC = COS(3.*HR*TLOC) + TLL = TLOC + 16 CONTINUE + IF(DAY.NE.DAYL.OR.P(14).NE.P14) CD14=COS(DR*(DAY-P(14))) + IF(DAY.NE.DAYL.OR.P(18).NE.P18) CD18=COS(2.*DR*(DAY-P(18))) + IF(DAY.NE.DAYL.OR.P(32).NE.P32) CD32=COS(DR*(DAY-P(32))) + IF(DAY.NE.DAYL.OR.P(39).NE.P39) CD39=COS(2.*DR*(DAY-P(39))) + DAYL = DAY + P14 = P(14) + P18 = P(18) + P32 = P(32) + P39 = P(39) +C F10.7 EFFECT + DF = F107 - F107A + DFA=F107A-150. + T(1) = P(20)*DF*(1.+P(60)*DFA) + P(21)*DF*DF + P(22)*DFA + & + P(30)*DFA**2 + F1 = 1. + (P(48)*DFA +P(20)*DF+P(21)*DF*DF)*SWC(1) + F2 = 1. + (P(50)*DFA+P(20)*DF+P(21)*DF*DF)*SWC(1) +C TIME INDEPENDENT + T(2) = + 1 (P(2)*PLG(3,1) + P(3)*PLG(5,1)+P(23)*PLG(7,1)) + & +(P(15)*PLG(3,1))*DFA*SWC(1) + 2 +P(27)*PLG(2,1) +C SYMMETRICAL ANNUAL + T(3) = + 1 (P(19) )*CD32 +C SYMMETRICAL SEMIANNUAL + T(4) = + 1 (P(16)+P(17)*PLG(3,1))*CD18 +C ASYMMETRICAL ANNUAL + T(5) = F1* + 1 (P(10)*PLG(2,1)+P(11)*PLG(4,1))*CD14 +C ASYMMETRICAL SEMIANNUAL + T(6) = P(38)*PLG(2,1)*CD39 +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + T71 = (P(12)*PLG(3,2))*CD14*SWC(5) + T72 = (P(13)*PLG(3,2))*CD14*SWC(5) + T(7) = F2* + 1 ((P(4)*PLG(2,2) + P(5)*PLG(4,2) + P(28)*PLG(6,2) + 2 + T71)*CTLOC + 4 + (P(7)*PLG(2,2) + P(8)*PLG(4,2) +P(29)*PLG(6,2) + 5 + T72)*STLOC) + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + T81 = (P(24)*PLG(4,3)+P(36)*PLG(6,3))*CD14*SWC(5) + T82 = (P(34)*PLG(4,3)+P(37)*PLG(6,3))*CD14*SWC(5) + T(8) = F2* + 1 ((P(6)*PLG(3,3) + P(42)*PLG(5,3) + T81)*C2TLOC + 3 +(P(9)*PLG(3,3) + P(43)*PLG(5,3) + T82)*S2TLOC) + 210 CONTINUE +C TERDIURNAL + IF(SW(14).EQ.0) GOTO 220 + T(14) = F2* + 1 ((P(40)*PLG(4,4)+(P(94)*PLG(5,4)+P(47)*PLG(7,4))*CD14*SWC(5))* + $ S3TLOC + 2 +(P(41)*PLG(4,4)+(P(95)*PLG(5,4)+P(49)*PLG(7,4))*CD14*SWC(5))* + $ C3TLOC) + 220 CONTINUE +C MAGNETIC ACTIVITY BASED ON DAILY AP + + IF(SW9.EQ.-1.) GO TO 30 + APD=(AP(1)-4.) + P44=P(44) + P45=P(45) + IF(P44.LT.0) P44=1.E-5 + APDF = APD+(P45-1.)*(APD+(EXP(-P44 *APD)-1.)/P44) + IF(SW(9).EQ.0) GOTO 40 + T(9)=APDF*(P(33)+P(46)*PLG(3,1)+P(35)*PLG(5,1)+ + $ (P(101)*PLG(2,1)+P(102)*PLG(4,1)+P(103)*PLG(6,1))*CD14*SWC(5)+ + $ (P(122)*PLG(2,2)+P(123)*PLG(4,2)+P(124)*PLG(6,2))*SWC(7)* + $ COS(HR*(TLOC-P(125)))) + GO TO 40 + 30 CONTINUE + IF(P(52).EQ.0) GO TO 40 + EXP1 = EXP(-10800.*ABS(P(52))/(1.+P(139)*(45.-ABS(LAT)))) + IF(EXP1.GT..99999) EXP1=.99999 + IF(P(25).LT.1.E-4) P(25)=1.E-4 + APT(1)=SG0(EXP1) +C APT(2)=SG2(EXP1) +c APT(3)=SG0(EXP2) +C APT(4)=SG2(EXP2) + IF(SW(9).EQ.0) GOTO 40 + T(9) = APT(1)*(P(51)+P(97)*PLG(3,1)+P(55)*PLG(5,1)+ + $ (P(126)*PLG(2,1)+P(127)*PLG(4,1)+P(128)*PLG(6,1))*CD14*SWC(5)+ + $ (P(129)*PLG(2,2)+P(130)*PLG(4,2)+P(131)*PLG(6,2))*SWC(7)* + $ COS(HR*(TLOC-P(132)))) + 40 CONTINUE + IF(SW(10).EQ.0.OR.LONG.LE.-1000.) GO TO 49 +C LONGITUDINAL + IF(SW(11).EQ.0) GOTO 230 + T(11)= (1.+P(81)*DFA*SWC(1))* + $((P(65)*PLG(3,2)+P(66)*PLG(5,2)+P(67)*PLG(7,2) + $ +P(104)*PLG(2,2)+P(105)*PLG(4,2)+P(106)*PLG(6,2) + $ +SWC(5)*(P(110)*PLG(2,2)+P(111)*PLG(4,2)+P(112)*PLG(6,2))*CD14)* + $ COS(DGTR*LONG) + $ +(P(91)*PLG(3,2)+P(92)*PLG(5,2)+P(93)*PLG(7,2) + $ +P(107)*PLG(2,2)+P(108)*PLG(4,2)+P(109)*PLG(6,2) + $ +SWC(5)*(P(113)*PLG(2,2)+P(114)*PLG(4,2)+P(115)*PLG(6,2))*CD14)* + $ SIN(DGTR*LONG)) + 230 CONTINUE +C UT AND MIXED UT,LONGITUDE + IF(SW(12).EQ.0) GOTO 240 + T(12)=(1.+P(96)*PLG(2,1))*(1.+P(82)*DFA*SWC(1))* + $(1.+P(120)*PLG(2,1)*SWC(5)*CD14)* + $((P(69)*PLG(2,1)+P(70)*PLG(4,1)+P(71)*PLG(6,1))* + $ COS(SR*(SEC-P(72)))) + T(12)=T(12)+SWC(11)* + $ (P(77)*PLG(4,3)+P(78)*PLG(6,3)+P(79)*PLG(8,3))* + $ COS(SR*(SEC-P(80))+2.*DGTR*LONG)*(1.+P(138)*DFA*SWC(1)) + 240 CONTINUE +C UT,LONGITUDE MAGNETIC ACTIVITY + IF(SW(13).EQ.0) GOTO 48 + IF(SW9.EQ.-1.) GO TO 45 + T(13)= APDF*SWC(11)*(1.+P(121)*PLG(2,1))* + $((P( 61)*PLG(3,2)+P( 62)*PLG(5,2)+P( 63)*PLG(7,2))* + $ COS(DGTR*(LONG-P( 64)))) + $ +APDF*SWC(11)*SWC(5)* + $ (P(116)*PLG(2,2)+P(117)*PLG(4,2)+P(118)*PLG(6,2))* + $ CD14*COS(DGTR*(LONG-P(119))) + $ + APDF*SWC(12)* + $ (P( 84)*PLG(2,1)+P( 85)*PLG(4,1)+P( 86)*PLG(6,1))* + $ COS(SR*(SEC-P( 76))) + GOTO 48 + 45 CONTINUE + IF(P(52).EQ.0) GOTO 48 + T(13)=APT(1)*SWC(11)*(1.+P(133)*PLG(2,1))* + $((P(53)*PLG(3,2)+P(99)*PLG(5,2)+P(68)*PLG(7,2))* + $ COS(DGTR*(LONG-P(98)))) + $ +APT(1)*SWC(11)*SWC(5)* + $ (P(134)*PLG(2,2)+P(135)*PLG(4,2)+P(136)*PLG(6,2))* + $ CD14*COS(DGTR*(LONG-P(137))) + $ +APT(1)*SWC(12)* + $ (P(56)*PLG(2,1)+P(57)*PLG(4,1)+P(58)*PLG(6,1))* + $ COS(SR*(SEC-P(59))) + 48 CONTINUE +C PARMS NOT USED: 83, 90,100,140-150 + 49 CONTINUE + TINF=P(31) + DO 50 I = 1,NSW + 50 TINF = TINF + ABS(SW(I))*T(I) + GLOBE7 = TINF + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE TSELEC(SV) +C SET SWITCHES +C Output in COMMON/CSW/SW(25),ISW,SWC(25) +C SW FOR MAIN TERMS, SWC FOR CROSS TERMS +C +C TO TURN ON AND OFF PARTICULAR VARIATIONS CALL TSELEC(SV), +C WHERE SV IS A 25 ELEMENT ARRAY CONTAINING 0. FOR OFF, 1. +C FOR ON, OR 2. FOR MAIN EFFECTS OFF BUT CROSS TERMS ON +C +C To get current values of SW: CALL TRETRV(SW) +C + DIMENSION SV(1),SAV(25),SVV(1) + COMMON/CSW/SW(25),ISW,SWC(25) + SAVE + DO 100 I = 1,25 + SAV(I)=SV(I) + SW(I)=AMOD(SV(I),2.) + IF(ABS(SV(I)).EQ.1.OR.ABS(SV(I)).EQ.2.) THEN + SWC(I)=1. + ELSE + SWC(I)=0. + ENDIF + 100 CONTINUE + ISW=64999 + RETURN + ENTRY TRETRV(SVV) + DO 200 I=1,25 + SVV(I)=SAV(I) + 200 CONTINUE + END +C----------------------------------------------------------------------- + FUNCTION GLOB7S(P) +C VERSION OF GLOBE FOR LOWER ATMOSPHERE 10/26/99 + REAL LONG + COMMON/LPOLY/PLG(9,4),CTLOC,STLOC,C2TLOC,S2TLOC,C3TLOC,S3TLOC, + $ IYR,DAY,DF,DFA,APD,APDF,APT(4),LONG + COMMON/CSW/SW(25),ISW,SWC(25) + DIMENSION P(150),T(14) + SAVE + DATA DR/1.72142E-2/,DGTR/1.74533E-2/,PSET/2./ + DATA DAYL/-1./,P32,P18,P14,P39/4*-1000./ +C CONFIRM PARAMETER SET + IF(P(100).EQ.0) P(100)=PSET + IF(P(100).NE.PSET) THEN + WRITE(6,900) PSET,P(100) + 900 FORMAT(1X,'WRONG PARAMETER SET FOR GLOB7S',3F10.1) + STOP + ENDIF + DO 10 J=1,14 + T(J)=0. + 10 CONTINUE + IF(DAY.NE.DAYL.OR.P32.NE.P(32)) CD32=COS(DR*(DAY-P(32))) + IF(DAY.NE.DAYL.OR.P18.NE.P(18)) CD18=COS(2.*DR*(DAY-P(18))) + IF(DAY.NE.DAYL.OR.P14.NE.P(14)) CD14=COS(DR*(DAY-P(14))) + IF(DAY.NE.DAYL.OR.P39.NE.P(39)) CD39=COS(2.*DR*(DAY-P(39))) + DAYL=DAY + P32=P(32) + P18=P(18) + P14=P(14) + P39=P(39) +C +C F10.7 + T(1)=P(22)*DFA +C TIME INDEPENDENT + T(2)=P(2)*PLG(3,1)+P(3)*PLG(5,1)+P(23)*PLG(7,1) + $ +P(27)*PLG(2,1)+P(15)*PLG(4,1)+P(60)*PLG(6,1) +C SYMMETRICAL ANNUAL + T(3)=(P(19)+P(48)*PLG(3,1)+P(30)*PLG(5,1))*CD32 +C SYMMETRICAL SEMIANNUAL + T(4)=(P(16)+P(17)*PLG(3,1)+P(31)*PLG(5,1))*CD18 +C ASYMMETRICAL ANNUAL + T(5)=(P(10)*PLG(2,1)+P(11)*PLG(4,1)+P(21)*PLG(6,1))*CD14 +C ASYMMETRICAL SEMIANNUAL + T(6)=(P(38)*PLG(2,1))*CD39 +C DIURNAL + IF(SW(7).EQ.0) GOTO 200 + T71 = P(12)*PLG(3,2)*CD14*SWC(5) + T72 = P(13)*PLG(3,2)*CD14*SWC(5) + T(7) = + 1 ((P(4)*PLG(2,2) + P(5)*PLG(4,2) + 2 + T71)*CTLOC + 4 + (P(7)*PLG(2,2) + P(8)*PLG(4,2) + 5 + T72)*STLOC) + 200 CONTINUE +C SEMIDIURNAL + IF(SW(8).EQ.0) GOTO 210 + T81 = (P(24)*PLG(4,3)+P(36)*PLG(6,3))*CD14*SWC(5) + T82 = (P(34)*PLG(4,3)+P(37)*PLG(6,3))*CD14*SWC(5) + T(8) = + 1 ((P(6)*PLG(3,3) + P(42)*PLG(5,3) + T81)*C2TLOC + 3 +(P(9)*PLG(3,3) + P(43)*PLG(5,3) + T82)*S2TLOC) + 210 CONTINUE +C TERDIURNAL + IF(SW(14).EQ.0) GOTO 220 + T(14) = P(40)*PLG(4,4)*S3TLOC + $ +P(41)*PLG(4,4)*C3TLOC + 220 CONTINUE +C MAGNETIC ACTIVITY + IF(SW(9).EQ.0) GOTO 40 + IF(SW(9).EQ.1) + $ T(9)=APDF*(P(33)+P(46)*PLG(3,1)*SWC(2)) + IF(SW(9).EQ.-1) + $ T(9)=(P(51)*APT(1)+P(97)*PLG(3,1)*APT(1)*SWC(2)) + 40 CONTINUE + IF(SW(10).EQ.0.OR.SW(11).EQ.0.OR.LONG.LE.-1000.) GO TO 49 +C LONGITUDINAL + T(11)= (1.+PLG(2,1)*(P(81)*SWC(5)*COS(DR*(DAY-P(82))) + $ +P(86)*SWC(6)*COS(2.*DR*(DAY-P(87)))) + $ +P(84)*SWC(3)*COS(DR*(DAY-P(85))) + $ +P(88)*SWC(4)*COS(2.*DR*(DAY-P(89)))) + $ *((P(65)*PLG(3,2)+P(66)*PLG(5,2)+P(67)*PLG(7,2) + $ +P(75)*PLG(2,2)+P(76)*PLG(4,2)+P(77)*PLG(6,2) + $ )*COS(DGTR*LONG) + $ +(P(91)*PLG(3,2)+P(92)*PLG(5,2)+P(93)*PLG(7,2) + $ +P(78)*PLG(2,2)+P(79)*PLG(4,2)+P(80)*PLG(6,2) + $ )*SIN(DGTR*LONG)) + 49 CONTINUE + TT=0. + DO 50 I=1,14 + 50 TT=TT+ABS(SW(I))*T(I) + GLOB7S=TT + RETURN + END +C-------------------------------------------------------------------- + FUNCTION DENSU(ALT,DLB,TINF,TLB,XM,ALPHA,TZ,ZLB,S2, + $ MN1,ZN1,TN1,TGN1) +C Calculate Temperature and Density Profiles for MSIS models +C New lower thermo polynomial 10/30/89 + DIMENSION ZN1(MN1),TN1(MN1),TGN1(2),XS(5),YS(5),Y2OUT(5) + COMMON/PARMB/GSURF,RE + COMMON/LSQV/MP,II,JG,LT,QPB(50),IERR,IFUN,N,J,DV(60) + SAVE + DATA RGAS/831.4/ + ZETA(ZZ,ZL)=(ZZ-ZL)*(RE+ZL)/(RE+ZZ) +CCCCCCWRITE(6,*) 'DB',ALT,DLB,TINF,TLB,XM,ALPHA,ZLB,S2,MN1,ZN1,TN1 + DENSU=1. +C Joining altitude of Bates and spline + ZA=ZN1(1) + Z=AMAX1(ALT,ZA) +C Geopotential altitude difference from ZLB + ZG2=ZETA(Z,ZLB) +C Bates temperature + TT=TINF-(TINF-TLB)*EXP(-S2*ZG2) + TA=TT + TZ=TT + DENSU=TZ + IF(ALT.GE.ZA) GO TO 10 +C +C CALCULATE TEMPERATURE BELOW ZA +C Temperature gradient at ZA from Bates profile + DTA=(TINF-TA)*S2*((RE+ZLB)/(RE+ZA))**2 + TGN1(1)=DTA + TN1(1)=TA + Z=AMAX1(ALT,ZN1(MN1)) + MN=MN1 + Z1=ZN1(1) + Z2=ZN1(MN) + T1=TN1(1) + T2=TN1(MN) +C Geopotental difference from Z1 + ZG=ZETA(Z,Z1) + ZGDIF=ZETA(Z2,Z1) +C Set up spline nodes + DO 20 K=1,MN + XS(K)=ZETA(ZN1(K),Z1)/ZGDIF + YS(K)=1./TN1(K) + 20 CONTINUE +C End node derivatives + YD1=-TGN1(1)/(T1*T1)*ZGDIF + YD2=-TGN1(2)/(T2*T2)*ZGDIF*((RE+Z2)/(RE+Z1))**2 +C Calculate spline coefficients + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) + X=ZG/ZGDIF + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) +C temperature at altitude + TZ=1./Y + DENSU=TZ + 10 IF(XM.EQ.0.) GO TO 50 +C +C CALCULATE DENSITY ABOVE ZA + GLB=GSURF/(1.+ZLB/RE)**2 + GAMMA=XM*GLB/(S2*RGAS*TINF) + EXPL=EXP(-S2*GAMMA*ZG2) + IF(EXPL.GT.50.OR.TT.LE.0.) THEN + EXPL=50. + ENDIF +C Density at altitude + DENSA=DLB*(TLB/TT)**(1.+ALPHA+GAMMA)*EXPL + DENSU=DENSA + IF(ALT.GE.ZA) GO TO 50 +C +C CALCULATE DENSITY BELOW ZA + GLB=GSURF/(1.+Z1/RE)**2 + GAMM=XM*GLB*ZGDIF/RGAS +C integrate spline temperatures + CALL SPLINI(XS,YS,Y2OUT,MN,X,YI) + EXPL=GAMM*YI + IF(EXPL.GT.50..OR.TZ.LE.0.) THEN + EXPL=50. + ENDIF +C Density at altitude + DENSU=DENSU*(T1/TZ)**(1.+ALPHA)*EXP(-EXPL) + 50 CONTINUE + RETURN + END +C-------------------------------------------------------------------- + FUNCTION DENSM(ALT,D0,XM,TZ,MN3,ZN3,TN3,TGN3,MN2,ZN2,TN2,TGN2) +C Calculate Temperature and Density Profiles for lower atmos. + DIMENSION ZN3(MN3),TN3(MN3),TGN3(2),XS(10),YS(10),Y2OUT(10) + DIMENSION ZN2(MN2),TN2(MN2),TGN2(2) + COMMON/PARMB/GSURF,RE + COMMON/FIT/TAF + COMMON/LSQV/MP,II,JG,LT,QPB(50),IERR,IFUN,N,J,DV(60) + SAVE + DATA RGAS/831.4/ + ZETA(ZZ,ZL)=(ZZ-ZL)*(RE+ZL)/(RE+ZZ) + DENSM=D0 + IF(ALT.GT.ZN2(1)) GOTO 50 +C STRATOSPHERE/MESOSPHERE TEMPERATURE + Z=AMAX1(ALT,ZN2(MN2)) + MN=MN2 + Z1=ZN2(1) + Z2=ZN2(MN) + T1=TN2(1) + T2=TN2(MN) + ZG=ZETA(Z,Z1) + ZGDIF=ZETA(Z2,Z1) +C Set up spline nodes + DO 210 K=1,MN + XS(K)=ZETA(ZN2(K),Z1)/ZGDIF + YS(K)=1./TN2(K) + 210 CONTINUE + YD1=-TGN2(1)/(T1*T1)*ZGDIF + YD2=-TGN2(2)/(T2*T2)*ZGDIF*((RE+Z2)/(RE+Z1))**2 +C Calculate spline coefficients + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) + X=ZG/ZGDIF + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) +C Temperature at altitude + TZ=1./Y + IF(XM.EQ.0.) GO TO 20 +C +C CALCULATE STRATOSPHERE/MESOSPHERE DENSITY + GLB=GSURF/(1.+Z1/RE)**2 + GAMM=XM*GLB*ZGDIF/RGAS +C Integrate temperature profile + CALL SPLINI(XS,YS,Y2OUT,MN,X,YI) + EXPL=GAMM*YI + IF(EXPL.GT.50.) EXPL=50. +C Density at altitude + DENSM=DENSM*(T1/TZ)*EXP(-EXPL) + 20 CONTINUE + IF(ALT.GT.ZN3(1)) GOTO 50 +C +C TROPOSPHERE/STRATOSPHERE TEMPERATURE + Z=ALT + MN=MN3 + Z1=ZN3(1) + Z2=ZN3(MN) + T1=TN3(1) + T2=TN3(MN) + ZG=ZETA(Z,Z1) + ZGDIF=ZETA(Z2,Z1) +C Set up spline nodes + DO 220 K=1,MN + XS(K)=ZETA(ZN3(K),Z1)/ZGDIF + YS(K)=1./TN3(K) + 220 CONTINUE + YD1=-TGN3(1)/(T1*T1)*ZGDIF + YD2=-TGN3(2)/(T2*T2)*ZGDIF*((RE+Z2)/(RE+Z1))**2 +C Calculate spline coefficients + CALL SPLINE(XS,YS,MN,YD1,YD2,Y2OUT) + X=ZG/ZGDIF + CALL SPLINT(XS,YS,Y2OUT,MN,X,Y) +C temperature at altitude + TZ=1./Y + IF(XM.EQ.0.) GO TO 30 +C +C CALCULATE TROPOSPHERIC/STRATOSPHERE DENSITY +C + GLB=GSURF/(1.+Z1/RE)**2 + GAMM=XM*GLB*ZGDIF/RGAS +C Integrate temperature profile + CALL SPLINI(XS,YS,Y2OUT,MN,X,YI) + EXPL=GAMM*YI + IF(EXPL.GT.50.) EXPL=50. +C Density at altitude + DENSM=DENSM*(T1/TZ)*EXP(-EXPL) + 30 CONTINUE + 50 CONTINUE + IF(XM.EQ.0) DENSM=TZ + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINE(X,Y,N,YP1,YPN,Y2) +C CALCULATE 2ND DERIVATIVES OF CUBIC SPLINE INTERP FUNCTION +C ADAPTED FROM NUMERICAL RECIPES BY PRESS ET AL +C X,Y: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C N: SIZE OF ARRAYS X,Y +C YP1,YPN: SPECIFIED DERIVATIVES AT X(1) AND X(N); VALUES +C >= 1E30 SIGNAL SIGNAL SECOND DERIVATIVE ZERO +C Y2: OUTPUT ARRAY OF SECOND DERIVATIVES + PARAMETER (NMAX=100) + DIMENSION X(N),Y(N),Y2(N),U(NMAX) + SAVE + IF(YP1.GT..99E30) THEN + Y2(1)=0 + U(1)=0 + ELSE + Y2(1)=-.5 + U(1)=(3./(X(2)-X(1)))*((Y(2)-Y(1))/(X(2)-X(1))-YP1) + ENDIF + DO 11 I=2,N-1 + SIG=(X(I)-X(I-1))/(X(I+1)-X(I-1)) + P=SIG*Y2(I-1)+2. + Y2(I)=(SIG-1.)/P + U(I)=(6.*((Y(I+1)-Y(I))/(X(I+1)-X(I))-(Y(I)-Y(I-1)) + $ /(X(I)-X(I-1)))/(X(I+1)-X(I-1))-SIG*U(I-1))/P + 11 CONTINUE + IF(YPN.GT..99E30) THEN + QN=0 + UN=0 + ELSE + QN=.5 + UN=(3./(X(N)-X(N-1)))*(YPN-(Y(N)-Y(N-1))/(X(N)-X(N-1))) + ENDIF + Y2(N)=(UN-QN*U(N-1))/(QN*Y2(N-1)+1.) + DO 12 K=N-1,1,-1 + Y2(K)=Y2(K)*Y2(K+1)+U(K) + 12 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINT(XA,YA,Y2A,N,X,Y) +C CALCULATE CUBIC SPLINE INTERP VALUE +C ADAPTED FROM NUMERICAL RECIPES BY PRESS ET AL. +C XA,YA: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C Y2A: ARRAY OF SECOND DERIVATIVES +C N: SIZE OF ARRAYS XA,YA,Y2A +C X: ABSCISSA FOR INTERPOLATION +C Y: OUTPUT VALUE + DIMENSION XA(N),YA(N),Y2A(N) + SAVE + KLO=1 + KHI=N + 1 CONTINUE + IF(KHI-KLO.GT.1) THEN + K=(KHI+KLO)/2 + IF(XA(K).GT.X) THEN + KHI=K + ELSE + KLO=K + ENDIF + GOTO 1 + ENDIF + H=XA(KHI)-XA(KLO) + IF(H.EQ.0) WRITE(6,*) 'BAD XA INPUT TO SPLINT' + A=(XA(KHI)-X)/H + B=(X-XA(KLO))/H + Y=A*YA(KLO)+B*YA(KHI)+ + $ ((A*A*A-A)*Y2A(KLO)+(B*B*B-B)*Y2A(KHI))*H*H/6. + RETURN + END +C----------------------------------------------------------------------- + SUBROUTINE SPLINI(XA,YA,Y2A,N,X,YI) +C INTEGRATE CUBIC SPLINE FUNCTION FROM XA(1) TO X +C XA,YA: ARRAYS OF TABULATED FUNCTION IN ASCENDING ORDER BY X +C Y2A: ARRAY OF SECOND DERIVATIVES +C N: SIZE OF ARRAYS XA,YA,Y2A +C X: ABSCISSA ENDPOINT FOR INTEGRATION +C Y: OUTPUT VALUE + DIMENSION XA(N),YA(N),Y2A(N) + SAVE + YI=0 + KLO=1 + KHI=2 + 1 CONTINUE + IF(X.GT.XA(KLO).AND.KHI.LE.N) THEN + XX=X + IF(KHI.LT.N) XX=AMIN1(X,XA(KHI)) + H=XA(KHI)-XA(KLO) + A=(XA(KHI)-XX)/H + B=(XX-XA(KLO))/H + A2=A*A + B2=B*B + YI=YI+((1.-A2)*YA(KLO)/2.+B2*YA(KHI)/2.+ + $ ((-(1.+A2*A2)/4.+A2/2.)*Y2A(KLO)+ + $ (B2*B2/4.-B2/2.)*Y2A(KHI))*H*H/6.)*H + KLO=KLO+1 + KHI=KHI+1 + GOTO 1 + ENDIF + RETURN + END +C----------------------------------------------------------------------- + FUNCTION DNET(DD,DM,ZHM,XMM,XM) +C TURBOPAUSE CORRECTION FOR MSIS MODELS +C Root mean density +C 8/20/80 +C DD - diffusive density +C DM - full mixed density +C ZHM - transition scale length +C XMM - full mixed molecular weight +C XM - species molecular weight +C DNET - combined density + SAVE + A=ZHM/(XMM-XM) + IF(DM.GT.0.AND.DD.GT.0) GOTO 5 + WRITE(6,*) 'DNET LOG ERROR',DM,DD,XM + IF(DD.EQ.0.AND.DM.EQ.0) DD=1. + IF(DM.EQ.0) GOTO 10 + IF(DD.EQ.0) GOTO 20 + 5 CONTINUE + YLOG=A*ALOG(DM/DD) + IF(YLOG.LT.-10.) GO TO 10 + IF(YLOG.GT.10.) GO TO 20 + DNET=DD*(1.+EXP(YLOG))**(1/A) + GO TO 50 + 10 CONTINUE + DNET=DD + GO TO 50 + 20 CONTINUE + DNET=DM + GO TO 50 + 50 CONTINUE + RETURN + END +C----------------------------------------------------------------------- + FUNCTION CCOR(ALT, R,H1,ZH) +C CHEMISTRY/DISSOCIATION CORRECTION FOR MSIS MODELS +C ALT - altitude +C R - target ratio +C H1 - transition scale length +C ZH - altitude of 1/2 R + SAVE + E=(ALT-ZH)/H1 + IF(E.GT.70.) GO TO 20 + IF(E.LT.-70.) GO TO 10 + EX=EXP(E) + CCOR=R/(1.+EX) + GO TO 50 + 10 CCOR=R + GO TO 50 + 20 CCOR=0. + GO TO 50 + 50 CONTINUE + CCOR=EXP(CCOR) + RETURN + END +C----------------------------------------------------------------------- + FUNCTION CCOR2(ALT, R,H1,ZH,H2) +C O&O2 CHEMISTRY/DISSOCIATION CORRECTION FOR MSIS MODELS + E1=(ALT-ZH)/H1 + E2=(ALT-ZH)/H2 + IF(E1.GT.70. .OR. E2.GT.70.) GO TO 20 + IF(E1.LT.-70. .AND. E2.LT.-70) GO TO 10 + EX1=EXP(E1) + EX2=EXP(E2) + CCOR2=R/(1.+.5*(EX1+EX2)) + GO TO 50 + 10 CCOR2=R + GO TO 50 + 20 CCOR2=0. + GO TO 50 + 50 CONTINUE + CCOR2=EXP(CCOR2) + RETURN + END +C----------------------------------------------------------------------- + BLOCK DATA GTD7BK +C MSISE-00 01-FEB-02 + COMMON/PARM7/PT1(50),PT2(50),PT3(50),PA1(50),PA2(50),PA3(50), + $ PB1(50),PB2(50),PB3(50),PC1(50),PC2(50),PC3(50), + $ PD1(50),PD2(50),PD3(50),PE1(50),PE2(50),PE3(50), + $ PF1(50),PF2(50),PF3(50),PG1(50),PG2(50),PG3(50), + $ PH1(50),PH2(50),PH3(50),PI1(50),PI2(50),PI3(50), + $ PJ1(50),PJ2(50),PJ3(50),PK1(50),PL1(50),PL2(50), + $ PM1(50),PM2(50),PN1(50),PN2(50),PO1(50),PO2(50), + $ PP1(50),PP2(50),PQ1(50),PQ2(50),PR1(50),PR2(50), + $ PS1(50),PS2(50),PU1(50),PU2(50),PV1(50),PV2(50), + $ PW1(50),PW2(50),PX1(50),PX2(50),PY1(50),PY2(50), + $ PZ1(50),PZ2(50),PAA1(50),PAA2(50) +c CCMC 2011/03/23 Lutz Rastaetter declare some types + CHARACTER*4 NAME,ISTIME,ISDATE + INTEGER IMR +c end CCMC + COMMON/LOWER7/PTM(10),PDM(10,8) + COMMON/MAVG7/PAVGM(10) + COMMON/DATIM7/ISDATE(3),ISTIME(2),NAME(2) + COMMON/METSEL/IMR + DATA IMR/0/ + DATA ISDATE/'01-F','EB-0','2 '/,ISTIME/'15:4','9:27'/ + DATA NAME/'MSIS','E-00'/ +C TEMPERATURE + DATA PT1/ + * 9.86573E-01, 1.62228E-02, 1.55270E-02,-1.04323E-01,-3.75801E-03, + * -1.18538E-03,-1.24043E-01, 4.56820E-03, 8.76018E-03,-1.36235E-01, + * -3.52427E-02, 8.84181E-03,-5.92127E-03,-8.61650E+00, 0.00000E+00, + * 1.28492E-02, 0.00000E+00, 1.30096E+02, 1.04567E-02, 1.65686E-03, + * -5.53887E-06, 2.97810E-03, 0.00000E+00, 5.13122E-03, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.27026E-06, + * 0.00000E+00, 6.74494E+00, 4.93933E-03, 2.21656E-03, 2.50802E-03, + * 0.00000E+00, 0.00000E+00,-2.08841E-02,-1.79873E+00, 1.45103E-03, + * 2.81769E-04,-1.44703E-03,-5.16394E-05, 8.47001E-02, 1.70147E-01, + * 5.72562E-03, 5.07493E-05, 4.36148E-03, 1.17863E-04, 4.74364E-03/ + DATA PT2/ + * 6.61278E-03, 4.34292E-05, 1.44373E-03, 2.41470E-05, 2.84426E-03, + * 8.56560E-04, 2.04028E-03, 0.00000E+00,-3.15994E+03,-2.46423E-03, + * 1.13843E-03, 4.20512E-04, 0.00000E+00,-9.77214E+01, 6.77794E-03, + * 5.27499E-03, 1.14936E-03, 0.00000E+00,-6.61311E-03,-1.84255E-02, + * -1.96259E-02, 2.98618E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 6.44574E+02, 8.84668E-04, 5.05066E-04, 0.00000E+00, 4.02881E+03, + * -1.89503E-03, 0.00000E+00, 0.00000E+00, 8.21407E-04, 2.06780E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -1.20410E-02,-3.63963E-03, 9.92070E-05,-1.15284E-04,-6.33059E-05, + * -6.05545E-01, 8.34218E-03,-9.13036E+01, 3.71042E-04, 0.00000E+00/ + DATA PT3/ + * 4.19000E-04, 2.70928E-03, 3.31507E-03,-4.44508E-03,-4.96334E-03, + * -1.60449E-03, 3.95119E-03, 2.48924E-03, 5.09815E-04, 4.05302E-03, + * 2.24076E-03, 0.00000E+00, 6.84256E-03, 4.66354E-04, 0.00000E+00, + * -3.68328E-04, 0.00000E+00, 0.00000E+00,-1.46870E+02, 0.00000E+00, + * 0.00000E+00, 1.09501E-03, 4.65156E-04, 5.62583E-04, 3.21596E+00, + * 6.43168E-04, 3.14860E-03, 3.40738E-03, 1.78481E-03, 9.62532E-04, + * 5.58171E-04, 3.43731E+00,-2.33195E-01, 5.10289E-04, 0.00000E+00, + * 0.00000E+00,-9.25347E+04, 0.00000E+00,-1.99639E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C HE DENSITY + DATA PA1/ + * 1.09979E+00,-4.88060E-02,-1.97501E-01,-9.10280E-02,-6.96558E-03, + * 2.42136E-02, 3.91333E-01,-7.20068E-03,-3.22718E-02, 1.41508E+00, + * 1.68194E-01, 1.85282E-02, 1.09384E-01,-7.24282E+00, 0.00000E+00, + * 2.96377E-01,-4.97210E-02, 1.04114E+02,-8.61108E-02,-7.29177E-04, + * 1.48998E-06, 1.08629E-03, 0.00000E+00, 0.00000E+00, 8.31090E-02, + * 1.12818E-01,-5.75005E-02,-1.29919E-02,-1.78849E-02,-2.86343E-06, + * 0.00000E+00,-1.51187E+02,-6.65902E-03, 0.00000E+00,-2.02069E-03, + * 0.00000E+00, 0.00000E+00, 4.32264E-02,-2.80444E+01,-3.26789E-03, + * 2.47461E-03, 0.00000E+00, 0.00000E+00, 9.82100E-02, 1.22714E-01, + * -3.96450E-02, 0.00000E+00,-2.76489E-03, 0.00000E+00, 1.87723E-03/ + DATA PA2/ + * -8.09813E-03, 4.34428E-05,-7.70932E-03, 0.00000E+00,-2.28894E-03, + * -5.69070E-03,-5.22193E-03, 6.00692E-03,-7.80434E+03,-3.48336E-03, + * -6.38362E-03,-1.82190E-03, 0.00000E+00,-7.58976E+01,-2.17875E-02, + * -1.72524E-02,-9.06287E-03, 0.00000E+00, 2.44725E-02, 8.66040E-02, + * 1.05712E-01, 3.02543E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -6.01364E+03,-5.64668E-03,-2.54157E-03, 0.00000E+00, 3.15611E+02, + * -5.69158E-03, 0.00000E+00, 0.00000E+00,-4.47216E-03,-4.49523E-03, + * 4.64428E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 4.51236E-02, 2.46520E-02, 6.17794E-03, 0.00000E+00, 0.00000E+00, + * -3.62944E-01,-4.80022E-02,-7.57230E+01,-1.99656E-03, 0.00000E+00/ + DATA PA3/ + * -5.18780E-03,-1.73990E-02,-9.03485E-03, 7.48465E-03, 1.53267E-02, + * 1.06296E-02, 1.18655E-02, 2.55569E-03, 1.69020E-03, 3.51936E-02, + * -1.81242E-02, 0.00000E+00,-1.00529E-01,-5.10574E-03, 0.00000E+00, + * 2.10228E-03, 0.00000E+00, 0.00000E+00,-1.73255E+02, 5.07833E-01, + * -2.41408E-01, 8.75414E-03, 2.77527E-03,-8.90353E-05,-5.25148E+00, + * -5.83899E-03,-2.09122E-02,-9.63530E-03, 9.77164E-03, 4.07051E-03, + * 2.53555E-04,-5.52875E+00,-3.55993E-01,-2.49231E-03, 0.00000E+00, + * 0.00000E+00, 2.86026E+01, 0.00000E+00, 3.42722E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C O DENSITY + DATA PB1/ + * 1.02315E+00,-1.59710E-01,-1.06630E-01,-1.77074E-02,-4.42726E-03, + * 3.44803E-02, 4.45613E-02,-3.33751E-02,-5.73598E-02, 3.50360E-01, + * 6.33053E-02, 2.16221E-02, 5.42577E-02,-5.74193E+00, 0.00000E+00, + * 1.90891E-01,-1.39194E-02, 1.01102E+02, 8.16363E-02, 1.33717E-04, + * 6.54403E-06, 3.10295E-03, 0.00000E+00, 0.00000E+00, 5.38205E-02, + * 1.23910E-01,-1.39831E-02, 0.00000E+00, 0.00000E+00,-3.95915E-06, + * 0.00000E+00,-7.14651E-01,-5.01027E-03, 0.00000E+00,-3.24756E-03, + * 0.00000E+00, 0.00000E+00, 4.42173E-02,-1.31598E+01,-3.15626E-03, + * 1.24574E-03,-1.47626E-03,-1.55461E-03, 6.40682E-02, 1.34898E-01, + * -2.42415E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.13666E-04/ + DATA PB2/ + * -5.40373E-03, 2.61635E-05,-3.33012E-03, 0.00000E+00,-3.08101E-03, + * -2.42679E-03,-3.36086E-03, 0.00000E+00,-1.18979E+03,-5.04738E-02, + * -2.61547E-03,-1.03132E-03, 1.91583E-04,-8.38132E+01,-1.40517E-02, + * -1.14167E-02,-4.08012E-03, 1.73522E-04,-1.39644E-02,-6.64128E-02, + * -6.85152E-02,-1.34414E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 6.07916E+02,-4.12220E-03,-2.20996E-03, 0.00000E+00, 1.70277E+03, + * -4.63015E-03, 0.00000E+00, 0.00000E+00,-2.25360E-03,-2.96204E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 3.92786E-02, 1.31186E-02,-1.78086E-03, 0.00000E+00, 0.00000E+00, + * -3.90083E-01,-2.84741E-02,-7.78400E+01,-1.02601E-03, 0.00000E+00/ + DATA PB3/ + * -7.26485E-04,-5.42181E-03,-5.59305E-03, 1.22825E-02, 1.23868E-02, + * 6.68835E-03,-1.03303E-02,-9.51903E-03, 2.70021E-04,-2.57084E-02, + * -1.32430E-02, 0.00000E+00,-3.81000E-02,-3.16810E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-9.05762E-04,-2.14590E-03,-1.17824E-03, 3.66732E+00, + * -3.79729E-04,-6.13966E-03,-5.09082E-03,-1.96332E-03,-3.08280E-03, + * -9.75222E-04, 4.03315E+00,-2.52710E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C N2 DENSITY + DATA PC1/ + * 1.16112E+00, 0.00000E+00, 0.00000E+00, 3.33725E-02, 0.00000E+00, + * 3.48637E-02,-5.44368E-03, 0.00000E+00,-6.73940E-02, 1.74754E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.74712E+02, 0.00000E+00, + * 1.26733E-01, 0.00000E+00, 1.03154E+02, 5.52075E-02, 0.00000E+00, + * 0.00000E+00, 8.13525E-04, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.50482E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.48894E-03, + * 6.16053E-04,-5.79716E-04, 2.95482E-03, 8.47001E-02, 1.70147E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PC2/ + * 0.00000E+00, 2.47425E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PC3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TLB + DATA PD1/ + * 9.44846E-01, 0.00000E+00, 0.00000E+00,-3.08617E-02, 0.00000E+00, + * -2.44019E-02, 6.48607E-03, 0.00000E+00, 3.08181E-02, 4.59392E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.74712E+02, 0.00000E+00, + * 2.13260E-02, 0.00000E+00,-3.56958E+02, 0.00000E+00, 1.82278E-04, + * 0.00000E+00, 3.07472E-04, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 3.83054E-03, 0.00000E+00, 0.00000E+00, + * -1.93065E-03,-1.45090E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.23493E-03, 1.36736E-03, 8.47001E-02, 1.70147E-01, + * 3.71469E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PD2/ + * 5.10250E-03, 2.47425E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 3.68756E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PD3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C O2 DENSITY + DATA PE1/ + * 1.35580E+00, 1.44816E-01, 0.00000E+00, 6.07767E-02, 0.00000E+00, + * 2.94777E-02, 7.46900E-02, 0.00000E+00,-9.23822E-02, 8.57342E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.38636E+01, 0.00000E+00, + * 7.71653E-02, 0.00000E+00, 8.18751E+01, 1.87736E-02, 0.00000E+00, + * 0.00000E+00, 1.49667E-02, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-3.67874E+02, 5.48158E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + * 1.22631E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PE2/ + * 8.17187E-03, 3.71617E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.10826E-03, + * -3.13640E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -7.35742E-02,-5.00266E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.94965E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PE3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C AR DENSITY + DATA PF1/ + * 1.04761E+00, 2.00165E-01, 2.37697E-01, 3.68552E-02, 0.00000E+00, + * 3.57202E-02,-2.14075E-01, 0.00000E+00,-1.08018E-01,-3.73981E-01, + * 0.00000E+00, 3.10022E-02,-1.16305E-03,-2.07596E+01, 0.00000E+00, + * 8.64502E-02, 0.00000E+00, 9.74908E+01, 5.16707E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 3.46193E+02, 1.34297E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.48509E-03, + * -1.54689E-04, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + * 1.47753E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PF2/ + * 1.89320E-02, 3.68181E-05, 1.32570E-02, 0.00000E+00, 0.00000E+00, + * 3.59719E-03, 7.44328E-03,-1.00023E-03,-6.50528E+03, 0.00000E+00, + * 1.03485E-02,-1.00983E-03,-4.06916E-03,-6.60864E+01,-1.71533E-02, + * 1.10605E-02, 1.20300E-02,-5.20034E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -2.62769E+03, 7.13755E-03, 4.17999E-03, 0.00000E+00, 1.25910E+04, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.23595E-03, 4.60217E-03, + * 5.71794E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -3.18353E-02,-2.35526E-02,-1.36189E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.03522E-02,-6.67837E+01,-1.09724E-03, 0.00000E+00/ + DATA PF3/ + * -1.38821E-02, 1.60468E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.51574E-02, + * -5.44470E-04, 0.00000E+00, 7.28224E-02, 6.59413E-02, 0.00000E+00, + * -5.15692E-03, 0.00000E+00, 0.00000E+00,-3.70367E+03, 0.00000E+00, + * 0.00000E+00, 1.36131E-02, 5.38153E-03, 0.00000E+00, 4.76285E+00, + * -1.75677E-02, 2.26301E-02, 0.00000E+00, 1.76631E-02, 4.77162E-03, + * 0.00000E+00, 5.39354E+00, 0.00000E+00,-7.51710E-03, 0.00000E+00, + * 0.00000E+00,-8.82736E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C H DENSITY + DATA PG1/ + * 1.26376E+00,-2.14304E-01,-1.49984E-01, 2.30404E-01, 2.98237E-02, + * 2.68673E-02, 2.96228E-01, 2.21900E-02,-2.07655E-02, 4.52506E-01, + * 1.20105E-01, 3.24420E-02, 4.24816E-02,-9.14313E+00, 0.00000E+00, + * 2.47178E-02,-2.88229E-02, 8.12805E+01, 5.10380E-02,-5.80611E-03, + * 2.51236E-05,-1.24083E-02, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01,-3.48190E-02, 0.00000E+00, 0.00000E+00, 2.89885E-05, + * 0.00000E+00, 1.53595E+02,-1.68604E-02, 0.00000E+00, 1.01015E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.84552E-04, + * -1.22181E-03, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + * -1.04927E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.91313E-03/ + DATA PG2/ + * -2.30501E-02, 3.14758E-05, 0.00000E+00, 0.00000E+00, 1.26956E-02, + * 8.35489E-03, 3.10513E-04, 0.00000E+00, 3.42119E+03,-2.45017E-03, + * -4.27154E-04, 5.45152E-04, 1.89896E-03, 2.89121E+01,-6.49973E-03, + * -1.93855E-02,-1.48492E-02, 0.00000E+00,-5.10576E-02, 7.87306E-02, + * 9.51981E-02,-1.49422E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 2.65503E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 6.37110E-03, 3.24789E-04, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 6.14274E-02, 1.00376E-02,-8.41083E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.27099E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PG3/ + * -3.94077E-03,-1.28601E-02,-7.97616E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-6.71465E-03,-1.69799E-03, 1.93772E-03, 3.81140E+00, + * -7.79290E-03,-1.82589E-02,-1.25860E-02,-1.04311E-02,-3.02465E-03, + * 2.43063E-03, 3.63237E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C N DENSITY + DATA PH1/ + * 7.09557E+01,-3.26740E-01, 0.00000E+00,-5.16829E-01,-1.71664E-03, + * 9.09310E-02,-6.71500E-01,-1.47771E-01,-9.27471E-02,-2.30862E-01, + * -1.56410E-01, 1.34455E-02,-1.19717E-01, 2.52151E+00, 0.00000E+00, + * -2.41582E-01, 5.92939E-02, 4.39756E+00, 9.15280E-02, 4.41292E-03, + * 0.00000E+00, 8.66807E-03, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01, 9.74701E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 6.70217E+01,-1.31660E-03, 0.00000E+00,-1.65317E-02, + * 0.00000E+00, 0.00000E+00, 8.50247E-02, 2.77428E+01, 4.98658E-03, + * 6.15115E-03, 9.50156E-03,-2.12723E-02, 8.47001E-02, 1.70147E-01, + * -2.38645E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.37380E-03/ + DATA PH2/ + * -8.41918E-03, 2.80145E-05, 7.12383E-03, 0.00000E+00,-1.66209E-02, + * 1.03533E-04,-1.68898E-02, 0.00000E+00, 3.64526E+03, 0.00000E+00, + * 6.54077E-03, 3.69130E-04, 9.94419E-04, 8.42803E+01,-1.16124E-02, + * -7.74414E-03,-1.68844E-03, 1.42809E-03,-1.92955E-03, 1.17225E-01, + * -2.41512E-02, 1.50521E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 1.60261E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.54403E-04,-1.87270E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 2.76439E-02, 6.43207E-03,-3.54300E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-2.80221E-02, 8.11228E+01,-6.75255E-04, 0.00000E+00/ + DATA PH3/ + * -1.05162E-02,-3.48292E-03,-6.97321E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.45546E-03,-1.31970E-02,-3.57751E-03,-1.09021E+00, + * -1.50181E-02,-7.12841E-03,-6.64590E-03,-3.52610E-03,-1.87773E-02, + * -2.22432E-03,-3.93895E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C HOT O DENSITY + DATA PI1/ + * 6.04050E-02, 1.57034E+00, 2.99387E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.51018E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.61650E+00, 1.26454E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 5.50878E-03, 0.00000E+00, 0.00000E+00, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 6.23881E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 8.47001E-02, 1.70147E-01, + * -9.45934E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PI2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PI3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C S PARAM + DATA PJ1/ + * 9.56827E-01, 6.20637E-02, 3.18433E-02, 0.00000E+00, 0.00000E+00, + * 3.94900E-02, 0.00000E+00, 0.00000E+00,-9.24882E-03,-7.94023E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.74712E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.74677E-03, 0.00000E+00, 1.54951E-02, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.99007E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.24362E-02,-5.28756E-03, 8.47001E-02, 1.70147E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PJ2/ + * 0.00000E+00, 2.47425E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PJ3/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C TURBO + DATA PK1/ + * 1.09930E+00, 3.90631E+00, 3.07165E+00, 9.86161E-01, 1.63536E+01, + * 4.63830E+00, 1.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.28840E+00, 3.10302E-02, 1.18339E-01, + * 1.00000E+00, 7.00000E-01, 1.15020E+00, 3.44689E+00, 1.28840E+00, + * 1.00000E+00, 1.08738E+00, 1.22947E+00, 1.10016E+00, 7.34129E-01, + * 1.15241E+00, 2.22784E+00, 7.95046E-01, 4.01612E+00, 4.47749E+00, + * 1.23435E+02,-7.60535E-02, 1.68986E-06, 7.44294E-01, 1.03604E+00, + * 1.72783E+02, 1.15020E+00, 3.44689E+00,-7.46230E-01, 9.49154E-01/ +C LOWER BOUNDARY + DATA PTM/ + L 1.04130E+03, 3.86000E+02, 1.95000E+02, 1.66728E+01, 2.13000E+02, + L 1.20000E+02, 2.40000E+02, 1.87000E+02,-2.00000E+00, 0.00000E+00/ + DATA PDM/ + L 2.45600E+07, 6.71072E-06, 1.00000E+02, 0.00000E+00, 1.10000E+02, + L 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 8.59400E+10, 1.00000E+00, 1.05000E+02,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 2.81000E+11, 0.00000E+00, 1.05000E+02, 2.80000E+01, 2.89500E+01, + L 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 3.30000E+10, 2.68270E-01, 1.05000E+02, 1.00000E+00, 1.10000E+02, + L 1.00000E+01, 1.10000E+02,-1.00000E+01, 0.00000E+00, 0.00000E+00, +C + L 1.33000E+09, 1.19615E-02, 1.05000E+02, 0.00000E+00, 1.10000E+02, + L 1.00000E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.76100E+05, 1.00000E+00, 9.50000E+01,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.00000E+07, 1.00000E+00, 1.05000E+02,-8.00000E+00, 1.10000E+02, + L 1.00000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 0.00000E+00, +C + L 1.00000E+06, 1.00000E+00, 1.05000E+02,-8.00000E+00, 5.50000E+02, + L 7.60000E+01, 9.00000E+01, 2.00000E+00, 0.00000E+00, 4.00000E+03/ +C TN1(2) + DATA PL1/ + * 1.00858E+00, 4.56011E-02,-2.22972E-02,-5.44388E-02, 5.23136E-04, + * -1.88849E-02, 5.23707E-02,-9.43646E-03, 6.31707E-03,-7.80460E-02, + * -4.88430E-02, 0.00000E+00, 0.00000E+00,-7.60250E+00, 0.00000E+00, + * -1.44635E-02,-1.76843E-02,-1.21517E+02, 2.85647E-02, 0.00000E+00, + * 0.00000E+00, 6.31792E-04, 0.00000E+00, 5.77197E-03, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-8.90272E+03, 3.30611E-03, 3.02172E-03, 0.00000E+00, + * -2.13673E-03,-3.20910E-04, 0.00000E+00, 0.00000E+00, 2.76034E-03, + * 2.82487E-03,-2.97592E-04,-4.21534E-03, 8.47001E-02, 1.70147E-01, + * 8.96456E-03, 0.00000E+00,-1.08596E-02, 0.00000E+00, 0.00000E+00/ + DATA PL2/ + * 5.57917E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 9.65405E-03, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN1(3) + DATA PM1/ + * 9.39664E-01, 8.56514E-02,-6.79989E-03, 2.65929E-02,-4.74283E-03, + * 1.21855E-02,-2.14905E-02, 6.49651E-03,-2.05477E-02,-4.24952E-02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.19148E+01, 0.00000E+00, + * 1.18777E-02,-7.28230E-02,-8.15965E+01, 1.73887E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.44691E-02, 2.80259E-04, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.16584E+02, 3.18713E-03, 7.37479E-03, 0.00000E+00, + * -2.55018E-03,-3.92806E-03, 0.00000E+00, 0.00000E+00,-2.89757E-03, + * -1.33549E-03, 1.02661E-03, 3.53775E-04, 8.47001E-02, 1.70147E-01, + * -9.17497E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PM2/ + * 3.56082E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.00902E-02, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN1(4) + DATA PN1/ + * 9.85982E-01,-4.55435E-02, 1.21106E-02, 2.04127E-02,-2.40836E-03, + * 1.11383E-02,-4.51926E-02, 1.35074E-02,-6.54139E-03, 1.15275E-01, + * 1.28247E-01, 0.00000E+00, 0.00000E+00,-5.30705E+00, 0.00000E+00, + * -3.79332E-02,-6.24741E-02, 7.71062E-01, 2.96315E-02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 6.81051E-03,-4.34767E-03, 8.66784E-02, + * 1.58727E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.07003E+01,-2.76907E-03, 4.32474E-04, 0.00000E+00, + * 1.31497E-03,-6.47517E-04, 0.00000E+00,-2.20621E+01,-1.10804E-03, + * -8.09338E-04, 4.18184E-04, 4.29650E-03, 8.47001E-02, 1.70147E-01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PN2/ + * -4.04337E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-9.52550E-04, + * 8.56253E-04, 4.33114E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.21223E-03, + * 2.38694E-04, 9.15245E-04, 1.28385E-03, 8.67668E-04,-5.61425E-06, + * 1.04445E+00, 3.41112E+01, 0.00000E+00,-8.40704E-01,-2.39639E+02, + * 7.06668E-01,-2.05873E+01,-3.63696E-01, 2.39245E+01, 0.00000E+00, + * -1.06657E-03,-7.67292E-04, 1.54534E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN1(5) TN2(1) + DATA PO1/ + * 1.00320E+00, 3.83501E-02,-2.38983E-03, 2.83950E-03, 4.20956E-03, + * 5.86619E-04, 2.19054E-02,-1.00946E-02,-3.50259E-03, 4.17392E-02, + * -8.44404E-03, 0.00000E+00, 0.00000E+00, 4.96949E+00, 0.00000E+00, + * -7.06478E-03,-1.46494E-02, 3.13258E+01,-1.86493E-03, 0.00000E+00, + * -1.67499E-02, 0.00000E+00, 0.00000E+00, 5.12686E-04, 8.66784E-02, + * 1.58727E-01,-4.64167E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 4.37353E-03,-1.99069E+02, 0.00000E+00,-5.34884E-03, 0.00000E+00, + * 1.62458E-03, 2.93016E-03, 2.67926E-03, 5.90449E+02, 0.00000E+00, + * 0.00000E+00,-1.17266E-03,-3.58890E-04, 8.47001E-02, 1.70147E-01, + * 0.00000E+00, 0.00000E+00, 1.38673E-02, 0.00000E+00, 0.00000E+00/ + DATA PO2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.60571E-03, + * 6.28078E-04, 5.05469E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.57829E-03, + * -4.00855E-04, 5.04077E-05,-1.39001E-03,-2.33406E-03,-4.81197E-04, + * 1.46758E+00, 6.20332E+00, 0.00000E+00, 3.66476E-01,-6.19760E+01, + * 3.09198E-01,-1.98999E+01, 0.00000E+00,-3.29933E+02, 0.00000E+00, + * -1.10080E-03,-9.39310E-05, 1.39638E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN2(2) + DATA PP1/ + * 9.81637E-01,-1.41317E-03, 3.87323E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.58707E-02, + * -8.63658E-03, 0.00000E+00, 0.00000E+00,-2.02226E+00, 0.00000E+00, + * -8.69424E-03,-1.91397E-02, 8.76779E+01, 4.52188E-03, 0.00000E+00, + * 2.23760E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-7.07572E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * -4.11210E-03, 3.50060E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-8.36657E-03, 1.61347E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.45130E-02, 0.00000E+00, 0.00000E+00/ + DATA PP2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.24152E-03, + * 6.43365E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.33255E-03, + * 2.42657E-03, 1.60666E-03,-1.85728E-03,-1.46874E-03,-4.79163E-06, + * 1.22464E+00, 3.53510E+01, 0.00000E+00, 4.49223E-01,-4.77466E+01, + * 4.70681E-01, 8.41861E+00,-2.88198E-01, 1.67854E+02, 0.00000E+00, + * 7.11493E-04, 6.05601E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN2(3) + DATA PQ1/ + * 1.00422E+00,-7.11212E-03, 5.24480E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.28914E-02, + * -2.41301E-02, 0.00000E+00, 0.00000E+00,-2.12219E+01,-1.03830E-02, + * -3.28077E-03, 1.65727E-02, 1.68564E+00,-6.68154E-03, 0.00000E+00, + * 1.45155E-02, 0.00000E+00, 8.42365E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-4.34645E-03, 0.00000E+00, 0.00000E+00, 2.16780E-02, + * 0.00000E+00,-1.38459E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 7.04573E-03,-4.73204E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.08767E-02, 0.00000E+00, 0.00000E+00/ + DATA PQ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.08279E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.21769E-04, + * -2.27387E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.26769E-03, + * 3.16901E-03, 4.60316E-04,-1.01431E-04, 1.02131E-03, 9.96601E-04, + * 1.25707E+00, 2.50114E+01, 0.00000E+00, 4.24472E-01,-2.77655E+01, + * 3.44625E-01, 2.75412E+01, 0.00000E+00, 7.94251E+02, 0.00000E+00, + * 2.45835E-03, 1.38871E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN2(4) TN3(1) + DATA PR1/ + * 1.01890E+00,-2.46603E-02, 1.00078E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-6.70977E-02, + * -4.02286E-02, 0.00000E+00, 0.00000E+00,-2.29466E+01,-7.47019E-03, + * 2.26580E-03, 2.63931E-02, 3.72625E+01,-6.39041E-03, 0.00000E+00, + * 9.58383E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.85291E-03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 1.39717E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 9.19771E-03,-3.69121E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.57067E-02, 0.00000E+00, 0.00000E+00/ + DATA PR2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.07265E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.92953E-03, + * -2.77739E-03,-4.40092E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.47280E-03, + * 2.95035E-04,-1.81246E-03, 2.81945E-03, 4.27296E-03, 9.78863E-04, + * 1.40545E+00,-6.19173E+00, 0.00000E+00, 0.00000E+00,-7.93632E+01, + * 4.44643E-01,-4.03085E+02, 0.00000E+00, 1.15603E+01, 0.00000E+00, + * 2.25068E-03, 8.48557E-04,-2.98493E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN3(2) + DATA PS1/ + * 9.75801E-01, 3.80680E-02,-3.05198E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.85575E-02, + * 5.04057E-02, 0.00000E+00, 0.00000E+00,-1.76046E+02, 1.44594E-02, + * -1.48297E-03,-3.68560E-03, 3.02185E+01,-3.23338E-03, 0.00000E+00, + * 1.53569E-02, 0.00000E+00,-1.15558E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 4.89620E-03, 0.00000E+00, 0.00000E+00,-1.00616E-02, + * -8.21324E-03,-1.57757E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 6.63564E-03, 4.58410E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-2.51280E-02, 0.00000E+00, 0.00000E+00/ + DATA PS2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 9.91215E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-8.73148E-04, + * -1.29648E-03,-7.32026E-05, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.68110E-03, + * -4.66003E-03,-1.31567E-03,-7.39390E-04, 6.32499E-04,-4.65588E-04, + * -1.29785E+00,-1.57139E+02, 0.00000E+00, 2.58350E-01,-3.69453E+01, + * 4.10672E-01, 9.78196E+00,-1.52064E-01,-3.85084E+03, 0.00000E+00, + * -8.52706E-04,-1.40945E-03,-7.26786E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN3(3) + DATA PU1/ + * 9.60722E-01, 7.03757E-02,-3.00266E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.22671E-02, + * 4.10423E-02, 0.00000E+00, 0.00000E+00,-1.63070E+02, 1.06073E-02, + * 5.40747E-04, 7.79481E-03, 1.44908E+02, 1.51484E-04, 0.00000E+00, + * 1.97547E-02, 0.00000E+00,-1.41844E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 5.77884E-03, 0.00000E+00, 0.00000E+00, 9.74319E-03, + * 0.00000E+00,-2.88015E+03, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-4.44902E-03,-2.92760E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 2.34419E-02, 0.00000E+00, 0.00000E+00/ + DATA PU2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.36685E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.65325E-04, + * -5.50628E-04, 3.31465E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.06179E-03, + * -3.08575E-03,-7.93589E-04,-1.08629E-04, 5.95511E-04,-9.05050E-04, + * 1.18997E+00, 4.15924E+01, 0.00000E+00,-4.72064E-01,-9.47150E+02, + * 3.98723E-01, 1.98304E+01, 0.00000E+00, 3.73219E+03, 0.00000E+00, + * -1.50040E-03,-1.14933E-03,-1.56769E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN3(4) + DATA PV1/ + * 1.03123E+00,-7.05124E-02, 8.71615E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-3.82621E-02, + * -9.80975E-03, 0.00000E+00, 0.00000E+00, 2.89286E+01, 9.57341E-03, + * 0.00000E+00, 0.00000E+00, 8.66153E+01, 7.91938E-04, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.68917E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 7.86638E-03, 0.00000E+00, 0.00000E+00, 9.90827E-03, + * 0.00000E+00, 6.55573E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-4.00200E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 7.07457E-03, 0.00000E+00, 0.00000E+00/ + DATA PV2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.72268E-03, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.04970E-04, + * 1.21560E-03,-8.05579E-06, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.49941E-03, + * -4.57256E-04,-1.59311E-04, 2.96481E-04,-1.77318E-03,-6.37918E-04, + * 1.02395E+00, 1.28172E+01, 0.00000E+00, 1.49903E-01,-2.63818E+01, + * 0.00000E+00, 4.70628E+01,-2.22139E-01, 4.82292E-02, 0.00000E+00, + * -8.67075E-04,-5.86479E-04, 5.32462E-04, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TN3(5) SURFACE TEMP TSL + DATA PW1/ + * 1.00828E+00,-9.10404E-02,-2.26549E-02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-2.32420E-02, + * -9.08925E-03, 0.00000E+00, 0.00000E+00, 3.36105E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.24957E+01,-5.87939E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.79765E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.01237E+03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-1.75553E-02, 0.00000E+00, 0.00000E+00/ + DATA PW2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.29699E-03, + * 1.26659E-03, 2.68402E-04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 1.17894E-03, + * 1.48746E-03, 1.06478E-04, 1.34743E-04,-2.20939E-03,-6.23523E-04, + * 6.36539E-01, 1.13621E+01, 0.00000E+00,-3.93777E-01, 2.38687E+03, + * 0.00000E+00, 6.61865E+02,-1.21434E-01, 9.27608E+00, 0.00000E+00, + * 1.68478E-04, 1.24892E-03, 1.71345E-03, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TGN3(2) SURFACE GRAD TSLG + DATA PX1/ + * 1.57293E+00,-6.78400E-01, 6.47500E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-7.62974E-02, + * -3.60423E-01, 0.00000E+00, 0.00000E+00, 1.28358E+02, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 4.68038E+01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.67898E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.90994E+04, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.15706E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PX2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TGN2(1) TGN1(2) + DATA PY1/ + * 8.60028E-01, 3.77052E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.17570E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 7.77757E-03, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 1.01024E+02, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 6.54251E+02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ + DATA PY2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00,-1.56959E-02, + * 1.91001E-02, 3.15971E-02, 1.00982E-02,-6.71565E-03, 2.57693E-03, + * 1.38692E+00, 2.82132E-01, 0.00000E+00, 0.00000E+00, 3.81511E+02, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C TGN3(1) TGN2(2) + DATA PZ1/ + * 1.06029E+00,-5.25231E-02, 3.73034E-01, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.31072E-02, + * -3.88409E-01, 0.00000E+00, 0.00000E+00,-1.65295E+02,-2.13801E-01, + * -4.38916E-02,-3.22716E-01,-8.82393E+01, 1.18458E-01, 0.00000E+00, + * -4.35863E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00,-1.19782E-01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 2.62229E+01, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00,-5.37443E+01, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00,-4.55788E-01, 0.00000E+00, 0.00000E+00/ + DATA PZ2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 3.84009E-02, + * 3.96733E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 5.05494E-02, + * 7.39617E-02, 1.92200E-02,-8.46151E-03,-1.34244E-02, 1.96338E-02, + * 1.50421E+00, 1.88368E+01, 0.00000E+00, 0.00000E+00,-5.13114E+01, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 5.11923E-02, 3.61225E-02, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 2.00000E+00/ +C SEMIANNUAL MULT SAM + DATA PAA1/ + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, + * 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00, 1.00000E+00/ + DATA PAA2/ + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, + * 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00, 0.00000E+00/ +C MIDDLE ATMOSPHERE AVERAGES + DATA PAVGM/ + M 2.61000E+02, 2.64000E+02, 2.29000E+02, 2.17000E+02, 2.17000E+02, + M 2.23000E+02, 2.86760E+02,-2.93940E+00, 2.50000E+00, 0.00000E+00/ + END diff --git a/MSIS/NRLMSIS00/readme.txt b/MSIS/NRLMSIS00/readme.txt new file mode 100644 index 0000000..6cab2df --- /dev/null +++ b/MSIS/NRLMSIS00/readme.txt @@ -0,0 +1,58 @@ +NRLMSISE-00 Model 2001 + +Authors: M. Picone, A.E. Hedin, D. Drob +Naval Research Laboratory
+ +Parameter: Neutral densities and temperature from ground to +thermosphere + +Brief Description: +The NRLMSIS-00 empirical atmosphere model was developed by Mike Picone, Alan Hedin, +and Doug Drob based on the MSISE90 model. The main differences to MSISE90 are noted +in the comments at the top of the computer code. They involve (1) the extensive use +of drag and accelerometer data on total mass density, (2) the addition of a +component to the total mass density that accounts for possibly significant +contributions of O+ and hot oxygen at altitudes above 500 km, and (3) the inclusion +of the SMM UV occultation data on [O2]. +The MSISE90 model describes the neutral temperature and densities in Earth's +atmosphere from ground to thermospheric heights. Below 72.5 km the model is +primarily based on the MAP Handbook (Labitzke et al., 1985) tabulation of +zonal average temperature and pressure by Barnett and Corney, which was also +used for the CIRA-86. Below 20 km these data were supplemented with averages +from the National Meteorological Center (NMC). In addition, pitot tube, +falling sphere, and grenade sounder rocket measurements from 1947 to 1972 were +taken into consideration. Above 72.5 km MSISE-90 is essentially a revised +MSIS-86 model taking into account data derived from space shuttle flights and +newer incoherent scatter results. For someone interested only in the +thermosphere (above 120 km), the author recommends the MSIS-86 model. MSISE +is also not the model of preference for specialized tropospheric work. It is +rather for studies that reach across several atmospheric boundaries. + +Availability: +(1) FORTRAN source code is available in this directory: +nrlmsise00_driver.for Example driver program + (f77 -o nrlmsis nrlmsise00_driver.for nrlmsise00_sub.for) +nrlmsise00_output.for Output from driver program +nrlmsise00_sub.for NRLMSISE90 FORTRAN subroutines + +(2) FORTRAN source code is also available from http://uap-www.nrl.navy.mil/models_web/msis/msis_home.htm. + +(3) A C version of the code was provided by D. Brodowski and is available in directory +/nrlmsis00_c_version, or can be downloaded from D. Brodowski's site at +http://www.brodo.de/english/pub/nrlmsise/ + +National Space Science Data Center / Dieter Bilitza / bilitza@gsfc.ansa.gov /Nov 5,01 + +CORRECTIONS: +July 14, 2003 - Beta version was replaced with offical version. Very minor changes + primarily concerning the O2 and He profiles in the lower thermosphere and upper + mesosphere. + +The following modificatiions were made by Lutz Rastaetter at the CCMC: + +March 23, 2011 - declare data types: CHARACTER*4 NAME,ISTIME,ISDATE + and INTEGER IMR + +Sept. 16, 2014 - array dimensions were increased: P(1) -> P(150), AP(1) -> AP(7) + +July 9, 2019 - closed model coverage gap at altitude ZN3(1) (32.5 km) diff --git a/SOFIP/guzik_version/aareadme.txt b/SOFIP/guzik_version/aareadme.txt new file mode 100755 index 0000000..dac8753 --- /dev/null +++ b/SOFIP/guzik_version/aareadme.txt @@ -0,0 +1,30 @@ + +SOFIP files in Directory PHCRES::DSKK2:[CRRES.MODELS.SOFIP] + +AAAREADME.TXT - This file + +SOFIP_MAIN.FOR - The SOFIP main program and associated subroutines +DSPCTR.FOR +SOLPRO.FOR +TARARA1.FOR +TARARA2.FOR + +SOFIP.FOR - SOFIP source that contains all routines + +AE5MIN.FOR - The radiation belt models +AE6MAX.FOR +AEI7HI.FOR +AEI7LO.FOR +AP8MAC.FOR +AP8MIC.FOR + +RUN_SOFIP.COM - Sample procedure to compile and run SOFIP +SAMPLE_INPUT.INP - Sample input file +SAMPLE_ORBIT.DAT - Sample orbit file +SAMPLE_ORBIT_6.OUT - Sample output +SAMPLE_ORBIT_7.OUT - Sample output + +UNPACK_SOFIP.COM - Procedure to convert the NSSDC archive files +STRIP_TO_72.FOR - Truncates line to 72 characters and deletes trailing + spaces +UNFOLD_RECORDS.FOR - Splits long records into individual lines diff --git a/SOFIP/guzik_version/ae5min.for b/SOFIP/guzik_version/ae5min.for new file mode 100755 index 0000000..75095c3 --- /dev/null +++ b/SOFIP/guzik_version/ae5min.for @@ -0,0 +1,772 @@ + BLOCK DATA + DOUBLE PRECISION NAME + COMMON/AE5MIN/NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH,MAP000(101), + *MAP0A0(108),MAP001(113),MAP002(114),MAP003(151),MAP004(100), + *MAP0A4(107),MAP005(110),MAP006(111),MAP007(147),MAP008(97), + *MAP0A8(103),MAP009(105),MAP010(106),MAP011(137),MAP012(94), + *MAPA12(96),MAP013(95),MAP014(95),MAP015(125),MAP016(91), + *MAPA16(93),MAP017(91),MAP018(85),MAP019(116),MAP020(89), + *MAPA20(93),MAP021(90),MAP022(80),MAP023(108),MAP024(87), + *MAPA24(90),MAP025(85),MAP026(72),MAP027(98),MAP028(82), + *MAPA28(87),MAP029(80),MAP030(65),MAP031(89),MAP0Z0(76), + *MAP0Z1(80),MAP0Z2(75),MAP0Z3(57),MAP0Z4(76),MAP032(69), + *MAPA32(72),MAP033(69),MAP034(49),MAP035(62),MAP036(32), + *MAPA36(45),MAP037(47),MAP038(27),MAP039(33),MAP040(31), + *MAP041(31),MAP042(14) + DATA NAME/8HAE5 PROJ/ + DATA EPOCH/1975.00/ + DATA SCAE/1000./ + DATA SCAL/2000.1/ + DATA SCAB/150000./ + DATA SCAF/1024./ + DATA LENGTH/4930/ +C L=1.20 TO1.30 40 KEV + DATA MAP000/ + . 587, 40, 3, 0, 0, 3, 2200, 0, + . 27, 2400, 5907, 5393, 2748, 2773, 2720, 2608, 2465, + . 2301, 2131, 1963, 1786, 1626, 1465, 1324, 1181, 1066, + . 941, 842, 754, 659, 592, 511, 451, 404, 362, + . 32, 2500, 7073, 10597, 4887, 4854, 4691, 4439, 4153, + . 3837, 3500, 3175, 2856, 2553, 2275, 2014, 1769, 1572, + . 1372, 1191, 1055, 891, 811, 691, 578, 537, 471, + . 322, 402, 230, 285, 234, + . 34, 2600, 7700, 25087, 8002, 7151, 6669, 6135, 5559, + . 4991, 4425, 3904, 3430, 2975, 2566, 2230, 1908, 1613, + . 1422, 1183, 1011, 875, 743, 550, 603, 339, 494, + . 281, 158, 324, 306, 172, 97, 54/ +C L=1.35 TO 1.45 40 KEV + DATA MAP0A0/ + . 35, 2700, 7982, 40884, 12461, 10502, 9518, 8454, 7410, + . 6397, 5449, 4630, 3875, 3209, 2677, 2238, 1815, 1521, + . 1230, 948, 905, 649, 607, 341, 477, 395, 222, + . 125, 70, 39, 22, 12, 7, 4, 2, + . 36, 2800, 8120, 56948, 17986, 15412, 13580, 11663, 9805, + . 8093, 6581, 5292, 4215, 3346, 2638, 2034, 1622, 1321, + . 1034, 788, 636, 582, 327, 184, 103, 58, 33, + . 18, 10, 6, 3, 2, 1, 1, 0, 0, + . 37, 2900, 8178, 58843, 27009, 24580, 21181, 17450, 13872, + . 10726, 8122, 6065, 4462, 3222, 2388, 1671, 1491, 997, + . 675, 379, 213, 120, 67, 38, 21, 12, 7, + . 4, 2, 1, 1, 0, 0, 0, 0, 0, + . 0/ +C L=1.5 TO 1.7 40 KEV + DATA MAP001/ + . 37, 3000, 8219, 51891, 38225, 35925, 31065, 25139, 19253, + . 14201, 10131, 7098, 4857, 3351, 2333, 1884, 1146, 649, + . 365, 205, 115, 65, 37, 21, 12, 6, 4, + . 2, 1, 1, 0, 0, 0, 0, 0, 0, + . 0, + . 38, 3200, 8277, 55824, 49773, 50034, 45877, 38888, 30842, + . 23295, 16876, 11912, 8276, 5624, 3748, 3011, 1999, 1219, + . 686, 386, 217, 122, 69, 39, 22, 12, 7, + . 4, 2, 1, 1, 0, 0, 0, 0, 0, + . 0, 0, + . 38, 3400, 8322, 64991, 61716, 65123, 62436, 54847, 44680, + . 34409, 25267, 17815, 12489, 8482, 5634, 4167, 2999, 1966, + . 1106, 622, 350, 197, 111, 62, 35, 20, 11, + . 6, 3, 2, 1, 1, 0, 0, 0, 0, + . 0, 0/ +C L=1.8 TO 2.0 40 KEV + DATA MAP002/ + . 38, 3600, 8312, 64725, 71833, 80143, 80809, 74079, 62538, + . 49194, 36716, 26276, 18214, 12449, 8391, 5639, 4497, 2890, + . 1694, 953, 536, 301, 169, 95, 54, 30, 17, + . 10, 5, 3, 2, 1, 1, 0, 0, 0, + . 0, 0, + . 38, 3800, 8254, 60464, 81877, 96225,101739, 96913, 84143, + . 67563, 50931, 36765, 25629, 17424, 11565, 7600, 6229, 3946, + . 2418, 1360, 765, 430, 242, 136, 76, 43, 24, + . 14, 8, 4, 2, 1, 1, 0, 0, 0, + . 0, 0, + . 38, 4000, 8201, 68492, 97222,118219,128001,123359,107183, + . 85506, 63705, 45183, 31024, 20550, 13569, 8976, 6951, 4383, + . 2533, 1424, 801, 450, 253, 142, 80, 45, 25, + . 14, 8, 5, 3, 1, 1, 0, 0, 0, + . 0, 0/ +C L=2.2 TO 3.0 40 KEV + DATA MAP003/ + . 37, 4400, 8110, 77700,116405,151941,176248,181462,166343, + .138235,105947, 76489, 52928, 35360, 23303, 14821, 11474, 7401, + . 4558, 2563, 1442, 811, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, 3, 1, 1, 0, 0, + . 0, + . 37, 4800, 8014, 85461,134377,186146,230010,251091,242122, + .209412,164675,121152, 84347, 56714, 37286, 23915, 16893, 11650, + . 7641, 4297, 2416, 1359, 764, 430, 242, 136, 76, + . 43, 24, 14, 8, 4, 2, 1, 1, 0, + . 0, + . 36, 5200, 7785, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, 0, + . 35, 5600, 7575, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, 10320, 7993, 6274, 4857, 3644, 2831, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 100 KEV + DATA MAP004/ + . 575, 100, 3, 0, 0, 3, 2200, 0, + . 26, 2400, 5736, 5384, 2732, 2760, 2706, 2600, 2457, + . 2300, 2130, 1960, 1789, 1627, 1464, 1329, 1186, 1073, + . 948, 846, 756, 658, 600, 517, 455, 407, + . 32, 2500, 6885, 10570, 4846, 4817, 4659, 4422, 4136, + . 3827, 3501, 3172, 2866, 2556, 2293, 2025, 1779, 1584, + . 1384, 1195, 1079, 904, 802, 699, 593, 553, 468, + . 338, 396, 242, 272, 247, + . 34, 2600, 7529, 25024, 7950, 7081, 6619, 6108, 5541, + . 4988, 4447, 3920, 3434, 2998, 2582, 2255, 1927, 1636, + . 1440, 1207, 1027, 884, 744, 566, 611, 358, 482, + . 297, 167, 295, 323, 182, 102, 58/ +C L=1.35 TO 1.45 100 KEV + DATA MAP0A4/ + . 35, 2700, 7817, 40761, 12362, 10385, 9452, 8430, 7407, + . 6414, 5490, 4651, 3916, 3272, 2712, 2268, 1817, 1556, + . 1250, 999, 911, 635, 643, 362, 449, 419, 235, + . 132, 74, 42, 24, 13, 7, 4, 2, + . 36, 2800, 7965, 56707, 17786, 15220, 13489, 11646, 9837, + . 8156, 6661, 5389, 4280, 3410, 2735, 2097, 1663, 1343, + . 1030, 840, 614, 621, 349, 196, 110, 62, 35, + . 20, 11, 6, 3, 2, 1, 1, 0, 0, + . 36, 2900, 8024, 58270, 26281, 24153, 21053, 17537, 14107, + . 10985, 8377, 6293, 4668, 3380, 2473, 1774, 1551, 1031, + . 738, 415, 233, 131, 74, 42, 23, 13, 7, + . 4, 2, 1, 1, 0, 0, 0, 0, 0/ +C L=1.5 TO 1.7 100 KEV + DATA MAP005/ + . 36, 3000, 8061, 50382, 36638, 34983, 30901, 25510, 19915, + . 14916, 10772, 7624, 5276, 3568, 2414, 2125, 1273, 738, + . 415, 233, 131, 74, 41, 23, 13, 7, 4, + . 2, 1, 1, 0, 0, 0, 0, 0, 0, + . 37, 3200, 8118, 53434, 46989, 47959, 45041, 39207, 31914, + . 24685, 18230, 12963, 9176, 6260, 4209, 3122, 2281, 1442, + . 811, 456, 256, 144, 81, 46, 26, 14, 8, + . 5, 3, 1, 1, 0, 0, 0, 0, 0, + . 0, + . 37, 3400, 8160, 61737, 57511, 61552, 60489, 54804, 46196, + . 36508, 27467, 19920, 13896, 9645, 6454, 4400, 3586, 2297, + . 1351, 760, 427, 240, 135, 76, 43, 24, 14, + . 8, 4, 2, 1, 1, 0, 0, 0, 0, + . 0/ +C L=1.8 TO 2.0 100 KEV + DATA MAP006/ + . 37, 3600, 8155, 60542, 65968, 74312, 76867, 73052, 64140, + . 52302, 40349, 29581, 20981, 14445, 9812, 6492, 5105, 3399, + . 2152, 1210, 680, 383, 215, 121, 68, 38, 22, + . 12, 7, 4, 2, 1, 1, 0, 0, 0, + . 0, + . 37, 3800, 8081, 55418, 73962, 87603, 94999, 94176, 85537, + . 71861, 56410, 41811, 29992, 20678, 14012, 9331, 6706, 4781, + . 3178, 1787, 1005, 565, 318, 179, 100, 57, 32, + . 18, 10, 6, 3, 2, 1, 1, 0, 0, + . 0, + . 37, 4000, 8017, 62130, 86556,105970,118079,119200,109292, + . 91792, 71586, 52500, 37052, 25058, 16723, 10831, 8128, 5445, + . 3399, 1911, 1075, 604, 340, 191, 107, 60, 34, + . 19, 11, 6, 3, 2, 1, 1, 0, 0, + . 0/ +C L=2.2 TO 3.0 100 KEV + DATA MAP007/ + . 37, 4400, 7906, 68565,100146,129829,154552,167752,164827, + .147163,120668, 91766, 66266, 45676, 30687, 20079, 13136, 10209, + . 6486, 3793, 2133, 1200, 675, 379, 213, 120, 67, + . 38, 21, 12, 7, 4, 2, 1, 1, 0, + . 0, + . 36, 4800, 7795, 74042,111795,152244,191602,220688,230684, + .217955,187613,148235,109384, 77341, 51907, 34340, 21885, 16272, + . 10853, 6945, 3906, 2196, 1235, 695, 391, 220, 124, + . 69, 39, 22, 12, 7, 4, 2, 1, 1, + . 35, 5200, 7407, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, + . 33, 5600, 7034, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, 10320, 7993, 6274, 4857, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 250 KEV + DATA MAP008/ + . 548, 250, 3, 0, 0, 3, 2200, 0, + . 25, 2400, 5285, 5355, 2684, 2721, 2667, 2568, 2440, + . 2285, 2124, 1957, 1793, 1631, 1488, 1336, 1204, 1072, + . 971, 861, 762, 676, 607, 536, 469, + . 31, 2500, 6405, 10488, 4717, 4699, 4569, 4347, 4088, + . 3805, 3492, 3185, 2883, 2590, 2318, 2063, 1829, 1612, + . 1417, 1252, 1083, 963, 822, 718, 636, 558, 459, + . 397, 374, 285, 226, + . 33, 2600, 6922, 24836, 7791, 6879, 6475, 6008, 5491, + . 4979, 4458, 3957, 3499, 3058, 2661, 2307, 1990, 1721, + . 1434, 1289, 1080, 913, 750, 669, 593, 425, 440, + . 353, 199, 194, 386, 217, 122/ +C L=1.35 TO 1.45 250 KEV + DATA MAP0A8/ + . 34, 2700, 7159, 40397, 12084, 10032, 9224, 8319, 7386, + . 6461, 5580, 4774, 4044, 3384, 2853, 2345, 1976, 1591, + . 1323, 1118, 919, 645, 711, 434, 347, 505, 284, + . 160, 90, 50, 28, 16, 9, 5, + . 34, 2800, 7298, 56000, 17201, 14607, 13162, 11556, 9919, + . 8354, 6923, 5659, 4548, 3657, 2873, 2319, 1807, 1419, + . 1013, 1028, 578, 719, 429, 241, 136, 76, 43, + . 24, 14, 8, 4, 2, 1, 1, + . 35, 2900, 7380, 56738, 24122, 22779, 20514, 17680, 14665, + . 11768, 9208, 7005, 5282, 3894, 2877, 2091, 1605, 1206, + . 927, 550, 310, 174, 98, 55, 31, 17, 10, + . 6, 3, 2, 1, 1, 0, 0, 0/ +C L=1.5 TO 1.7 250 KEV + DATA MAP009/ + . 35, 3000, 7422, 46490, 32166, 31926, 29725, 26033, 21537, + . 16961, 12830, 9309, 6656, 4586, 3186, 2287, 1777, 1100, + . 618, 348, 196, 110, 62, 35, 20, 11, 6, + . 3, 2, 1, 1, 0, 0, 0, 0, + . 35, 3200, 7476, 47524, 39615, 41726, 41397, 38645, 33948, + . 28133, 22163, 16621, 12111, 8565, 5953, 4003, 3064, 2170, + . 1368, 769, 433, 243, 137, 77, 43, 24, 14, + . 8, 4, 2, 1, 1, 0, 0, 0, + . 35, 3400, 7500, 53938, 46962, 51478, 53287, 52078, 47807, + . 41325, 33642, 25988, 19350, 13763, 9682, 6520, 4422, 3717, + . 2360, 1413, 795, 447, 251, 141, 79, 45, 25, + . 14, 8, 4, 3, 1, 1, 0, 0/ +C L=1.8 TO 2.0 250 KEV + DATA MAP010/ + . 36, 3600, 7451, 50809, 51989, 59287, 64173, 65814, 63545, + . 57656, 49071, 39483, 30096, 21954, 15550, 10721, 7239, 5292, + . 3791, 2535, 1426, 802, 451, 253, 143, 80, 45, + . 25, 14, 8, 5, 3, 1, 1, 0, 0, + . 35, 3800, 7348, 43951, 56260, 66861, 75274, 80402, 81109, + . 76637, 67819, 56284, 44035, 32814, 23418, 16261, 10968, 7245, + . 6071, 3819, 2323, 1306, 735, 413, 232, 131, 73, + . 41, 23, 13, 7, 4, 2, 1, 1, + . 35, 4000, 7222, 48001, 64012, 77838, 90173, 98634,101707, + . 97710, 87547, 72988, 56973, 42167, 29878, 20286, 13575, 8986, + . 7127, 4492, 2633, 1481, 833, 468, 263, 148, 83, + . 47, 26, 15, 8, 5, 3, 1, 1/ +C L=2.2 TO 3.0 250 KEV + DATA MAP011/ + . 34, 4400, 7022, 50984, 68881, 86630,105015,121429,133797, + .139353,135859,123646,104489, 82600, 61600, 43676, 29970, 19838, + . 13074, 10264, 6545, 3861, 2171, 1221, 687, 386, 217, + . 122, 69, 39, 22, 12, 7, 4, + . 34, 4800, 6894, 53317, 73073, 94212,117436,141171,163361, + .179748,187575,183320,167004,141499,111861, 82855, 58642, 39897, + . 26561, 17702, 13089, 8810, 5067, 2849, 1602, 901, 507, + . 285, 160, 90, 51, 29, 16, 9, + . 32, 5200, 6725, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, 6750, 1500, + . 31, 5600, 6551, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, 10320, 7993, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 500 KEV + DATA MAP012/ + . 505, 500, 3, 0, 0, 3, 2200, 0, + . 24, 2400, 4291, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, 604, 542, + . 30, 2500, 5471, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 416, 367, 299, + . 32, 2600, 6097, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160, 406, 228/ +C L=1.35 TO 1.45 500 KEV + DATA MAPA12/ + . 32, 2700, 6408, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, 30, 17, + . 32, 2800, 6617, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, 3, + . 32, 2900, 6726, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2, 1, 1/ +C L=1.5 TO 1.7 500 KEV + DATA MAP013/ + . 32, 3000, 6771, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, 1, 0, + . 32, 3200, 6771, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, 5, 3, 2, 1, + . 31, 3400, 6695, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, + . 17, 10, 5, 3/ +C L=1.8 TO 2.0 500 KEV + DATA MAP014/ + . 32, 3600, 6526, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, + . 31, 18, 10, 6, 3, + . 32, 3800, 6321, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, + . 53, 30, 17, 9, 5, + . 31, 4000, 6148, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, + . 61, 34, 19, 11/ +C L=2.2 TO 3.0 500 KEV + DATA MAP015/ + . 30, 4400, 6058, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, + . 172, 97, 54, + . 30, 4800, 6028, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, + . 430, 242, 136, + . 30, 5200, 5972, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, + . 29, 5600, 5917, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 750 KEV + DATA MAP016/ + . 476, 750, 3, 0, 0, 3, 2200, 0, + . 23, 2400, 3596, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, 604, + . 29, 2500, 4794, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 416, 367, + . 31, 2600, 5470, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160, 406/ +C L=1.35 TO 1.45 750 KEV + DATA MAPA16/ + . 31, 2700, 5894, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, 30, + . 31, 2800, 6206, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, + . 31, 2900, 6333, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2, 1/ +C L=1.5 TO 1.7 750 KEV + DATA MAP017/ + . 31, 3000, 6367, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, 1, + . 30, 3200, 6315, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, 5, 3, + . 30, 3400, 6161, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, + . 17, 10, 5/ +C L=1.8 TO 2.0 750 KEV + DATA MAP018/ + . 29, 3600, 5931, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, + . 31, 18, + . 28, 3800, 5692, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, + . 53, + . 28, 4000, 5513, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, + . 61/ +C L=2.2 TO 3.0 750 KEV + DATA MAP019/ + . 27, 4400, 5359, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, + . 27, 4800, 5369, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, + . 28, 5200, 5518, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, + . 28, 5600, 5677, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 1.00 MEV + DATA MAP020/ + . 460, 1000, 3, 0, 0, 3, 2200, 0, + . 23, 2400, 3149, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, 604, + . 28, 2500, 4466, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 416, + . 30, 2600, 5120, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160/ +C L=1.35 TO 1.45 1.00 MEV + DATA MAPA20/ + . 31, 2700, 5586, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, 30, + . 31, 2800, 5917, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, + . 31, 2900, 6066, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2, 1/ +C L=1.5 TO 1.7 1000 KEV + DATA MAP021/ + . 31, 3000, 6077, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, 1, + . 30, 3200, 5985, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, 5, 3, + . 29, 3400, 5803, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, + . 17, 10/ +C L=1.8 TO 2.0 1000 KEV + DATA MAP022/ + . 28, 3600, 5558, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, + . 31, + . 26, 3800, 5253, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, + . 26, 4000, 5010, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192/ +C L=2.2 TO 3.0 1000 KEV + DATA MAP023/ + . 24, 4400, 4713, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 16561, 11965, 8293, 5431, 3054, 1717, + . 25, 4800, 4803, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, + . 26, 5200, 5182, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, + . 27, 5600, 5471, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 1.50 MEV + DATA MAP024/ + . 432, 1500, 3, 0, 0, 3, 2200, 0, + . 22, 2400, 2572, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, + . 27, 2500, 3869, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 30, 2600, 4606, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160/ +C L=1.35 TO 1.45 1.50 MEV + DATA MAPA24/ + . 30, 2700, 5099, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, + . 30, 2800, 5470, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, + . 30, 2900, 5664, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2/ +C L=1.5 TO 1.7 1500 KEV + DATA MAP025/ + . 30, 3000, 5690, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, + . 28, 3200, 5545, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, + . 27, 3400, 5335, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30/ +C L=1.8 TO 2.0 1500 KEV + DATA MAP026/ + . 25, 3600, 5042, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, + . 24, 3800, 4620, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, + . 23, 4000, 4229, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082/ +C L=2.2 TO 3.0 1500 KEV + DATA MAP027/ + . 21, 4400, 3846, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52955, 37122, 25243, + . 16561, 11965, 8293, + . 21, 4800, 3918, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, + . 24, 5200, 4569, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, + . 26, 5600, 5048, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 2.00 MEV + DATA MAP028/ + . 403, 2000, 3, 0, 0, 3, 2200, 0, + . 20, 2400, 2228, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, + . 26, 2500, 3497, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, + . 28, 2600, 4229, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372/ +C L=1.35 TO 1.45 2.00 MEV + DATA MAPA28/ + . 29, 2700, 4739, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, + . 29, 2800, 5097, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, + . 29, 2900, 5309, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3/ +C L=1.5 TO 1.7 2000 KEV + DATA MAP029/ + . 28, 3000, 5356, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, + . 27, 3200, 5170, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 25, 3400, 4882, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95/ +C L=1.8 TO 2.0 2000 KEV + DATA MAP030/ + . 23, 3600, 4426, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, + . 22, 3800, 3931, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, + . 20, 4000, 3589, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422/ +C L=2.2 TO 3.0 2000 KEV + DATA MAP031/ + . 18, 4400, 3171, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 18, 4800, 3072, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 22, 5200, 3937, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, + . 25, 5600, 4485, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 2.50 MEV + DATA MAP0Z0/ + . 364, 2500, 3, 0, 0, 3, 2200, 0, + . 18, 2400, 1766, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 24, 2500, 3044, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, + . 26, 2600, 3869, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446/ +C L=1.35 TO 1.45 2.50 MEV + DATA MAP0Z1/ + . 26, 2700, 4404, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, + . 27, 2800, 4757, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 27, 2900, 4986, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11/ +C L=1.5 TO 1.7 2.50 MEV + DATA MAP0Z2/ + . 26, 3000, 5020, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, + . 25, 3200, 4770, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, + . 24, 3400, 4426, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170/ +C L=1.8 TO 2.0 2.50 MEV + DATA MAP0Z3/ + . 21, 3600, 3911, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, + . 19, 3800, 3345, 40943, 52384, 62024, 70199, 75902, 78093, + . 75852, 69272, 59488, 48040, 36749, 26945, 18926, 13088, 8734, + . 6523, + . 17, 4000, 2956, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327/ +C L=2.2 TO 3.0 2.50 MEV + DATA MAP0Z4/ + . 15, 4400, 2493, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, + . 14, 4800, 2297, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191, + . 18, 5200, 3196, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 23, 5600, 3986, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 3.00 MEV + DATA MAP032/ + . 321, 3000, 3, 0, 0, 3, 2200, 0, + . 16, 2400, 1230, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, + . 21, 2500, 2537, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, + . 24, 2600, 3308, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703/ +C L=1.35 TO 1.45 3.00 MEV + DATA MAPA32/ + . 24, 2700, 3715, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, + . 24, 2800, 3968, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, + . 24, 2900, 4138, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60/ +C L=1.5 TO 1.7 3000 KEV + DATA MAP033/ + . 24, 3000, 4138, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, + . 23, 3200, 3869, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, + . 22, 3400, 3514, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536/ +C L=1.8 TO 2.0 3000 KEV + DATA MAP034/ + . 19, 3600, 3081, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, + . 16, 3800, 2551, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, + . 14, 4000, 2086, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575/ +C L=2.2 TO 3.0 3000 KEV + DATA MAP035/ + . 11, 4400, 1404, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553, + . 8, 4800, 1024, 49529, 65656, 84636,103935,125234, + . 17, 5200, 2455, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800, + . 20, 5600, 3380, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 4.00 MEV + DATA MAP036/ + . 184, 4000, 3, 0, 0, 3, 2400, 0, + . 11, 2500, 669, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, + . 13, 2600, 1233, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502/ +C L=1.35 TO 1.45 4.00 MEV + DATA MAPA36/ + . 14, 2700, 1568, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, + . 15, 2800, 1806, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, + . 16, 2900, 1908, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186/ +C L=1.5 TO 1.7 4000 KEV + DATA MAP037/ + . 16, 3000, 1914, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, + . 16, 3200, 1842, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, + . 15, 3400, 1693, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811/ +C L=1.8 TO 2.0 4000 KEV + DATA MAP038/ + . 12, 3600, 1431,048616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, + . 9, 3800, 1066, 41466, 52542, 62164, 70320, 76003, 78120, + . 6, 4000, 616, 45118, 59201, 71966/ +C L=2.2 TO 3.0 4000 KEV + DATA MAP039/ + . 3, 4400, 0, + . 3, 5300, 0, + . 9, 5200, 425, 54773, 72665, 94767,120930,121864,168300, + . 12, 5600, 1662, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.45 4.50 MEV + DATA MAP040/ + . 75, 4500, 3, 0, 0, 3, 2600, 0, + . 6, 2700, 389, 40297, 12004, 9928, + . 8, 2800, 659, 55808, 17043, 14421, 13069, 11529, + . 9, 2900, 797, 56343, 23557, 22371, 20306, 17687, 14787/ +C L=1.5 TO 1.7 4500 KEV + DATA MAP041/ + . 10, 3000, 818, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, + . 11, 3200, 754, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, + . 10, 3400, 559, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048/ +C L=1.8 TO 2.0 4500 KEV + DATA MAP042/ + . 7, 3600, 149, 48616, 48894, 55717, 60750, + . 3, 3700, 0, 3, 32767, 0, 0/ + END diff --git a/SOFIP/guzik_version/ae6max.for b/SOFIP/guzik_version/ae6max.for new file mode 100755 index 0000000..09684ec --- /dev/null +++ b/SOFIP/guzik_version/ae6max.for @@ -0,0 +1,772 @@ + BLOCK DATA + DOUBLE PRECISION NAME + COMMON/AE6MAX/NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH,MAP000(101), + *MAP0A0(108),MAP001(113),MAP002(114),MAP003(151),MAP004(100), + *MAP0A4(107),MAP005(110),MAP006(111),MAP007(147),MAP008(97), + *MAP0A8(103),MAP009(105),MAP010(106),MAP011(137),MAP012(94), + *MAPA12(96),MAP013(95),MAP014(95),MAP015(125),MAP016(91), + *MAPA16(93),MAP017(91),MAP018(85),MAP019(116),MAP020(89), + *MAPA20(93),MAP021(90),MAP022(80),MAP023(108),MAP024(87), + *MAPA24(90),MAP025(85),MAP026(72),MAP027(98),MAP028(82), + *MAPA28(87),MAP029(80),MAP030(65),MAP031(89),MAP0Z0(76), + *MAP0Z1(80),MAP0Z2(75),MAP0Z3(57),MAP0Z4(76),MAP032(69), + *MAPA32(72),MAP033(69),MAP034(49),MAP035(62),MAP036(32), + *MAPA36(45),MAP037(47),MAP038(27),MAP039(33),MAP040(31), + *MAP041(31),MAP042(14) + DATA NAME/8HAE6 MAX / + DATA EPOCH/1980.500/ + DATA SCAE/1000./ + DATA SCAL/2000.1/ + DATA SCAB/150000./ + DATA SCAF/1024./ + DATA LENGTH/4935/ +C L=1.20 TO1.30 40 KEV + DATA MAP000/ + . 587, 40, 3, 0, 0, 3, 2200, 0, + . 27, 2400, 5907, 5393, 2748, 2773, 2720, 2608, 2465, + . 2301, 2131, 1963, 1786, 1626, 1465, 1324, 1181, 1066, + . 941, 842, 754, 659, 592, 511, 451, 404, 362, + . 32, 2500, 7393, 10597, 4887, 4854, 4691, 4439, 4153, + . 3837, 3500, 3175, 2856, 2553, 2275, 2014, 1769, 1572, + . 1372, 1191, 1055, 891, 811, 691, 578, 537, 471, + . 322, 402, 230, 285, 234, + . 34, 2600, 7926, 25087, 8002, 7151, 6669, 6135, 5559, + . 4991, 4425, 3904, 3430, 2975, 2566, 2230, 1908, 1613, + . 1422, 1183, 1011, 875, 743, 550, 603, 339, 494, + . 281, 158, 324, 306, 172, 97, 54/ +C L=1.35 TO 1.45 40 KEV + DATA MAP0A0/ + . 35, 2700, 8153, 40884, 12461, 10502, 9518, 8454, 7410, + . 6397, 5449, 4630, 3875, 3209, 2677, 2238, 1815, 1521, + . 1230, 948, 905, 649, 607, 341, 477, 395, 222, + . 125, 70, 39, 22, 12, 7, 4, 2, + . 36, 2800, 8339, 56948, 17986, 15412, 13580, 11663, 9805, + . 8093, 6581, 5292, 4215, 3346, 2638, 2034, 1622, 1321, + . 1034, 788, 636, 582, 327, 184, 103, 58, 33, + . 18, 10, 6, 3, 2, 1, 1, 0, 0, + . 37, 2900, 8464, 58843, 27009, 24580, 21181, 17450, 13872, + . 10726, 8122, 6065, 4462, 3222, 2388, 1671, 1491, 997, + . 675, 379, 213, 120, 67, 38, 21, 12, 7, + . 4, 2, 1, 1, 0, 0, 0, 0, 0, + . 0/ +C L=1.5 TO 1.7 40 KEV + DATA MAP001/ + . 37, 3000, 8568, 51891, 38225, 35925, 31065, 25139, 19253, + . 14201, 10131, 7098, 4857, 3351, 2333, 1884, 1146, 649, + . 365, 205, 115, 65, 37, 21, 12, 6, 4, + . 2, 1, 1, 0, 0, 0, 0, 0, 0, + . 0, + . 38, 3200, 8720, 55824, 49773, 50034, 45877, 38888, 30842, + . 23295, 16876, 11912, 8276, 5624, 3748, 3011, 1999, 1219, + . 686, 386, 217, 122, 69, 39, 22, 12, 7, + . 4, 2, 1, 1, 0, 0, 0, 0, 0, + . 0, 0, + . 38, 3400, 8812, 64991, 61716, 65123, 62436, 54847, 44680, + . 34409, 25267, 17815, 12489, 8482, 5634, 4167, 2999, 1966, + . 1106, 622, 350, 197, 111, 62, 35, 20, 11, + . 6, 3, 2, 1, 1, 0, 0, 0, 0, + . 0, 0/ +C L=1.8 TO 2.0 40 KEV + DATA MAP002/ + . 38, 3600, 8842, 64725, 71833, 80143, 80809, 74079, 62538, + . 49194, 36716, 26276, 18214, 12449, 8391, 5639, 4497, 2890, + . 1694, 953, 536, 301, 169, 95, 54, 30, 17, + . 10, 5, 3, 2, 1, 1, 0, 0, 0, + . 0, 0, + . 38, 3800, 8814, 60464, 81877, 96225,101739, 96913, 84143, + . 67563, 50931, 36765, 25629, 17424, 11565, 7600, 6229, 3946, + . 2418, 1360, 765, 430, 242, 136, 76, 43, 24, + . 14, 8, 4, 2, 1, 1, 0, 0, 0, + . 0, 0, + . 38, 4000, 8766, 68492, 97222,118219,128001,123359,107183, + . 85506, 63705, 45183, 31024, 20550, 13569, 8976, 6951, 4383, + . 2533, 1424, 801, 450, 253, 142, 80, 45, 25, + . 14, 8, 5, 3, 1, 1, 0, 0, 0, + . 0, 0/ +C L=2.2 TO 3.0 40 KEV + DATA MAP003/ + . 37, 4400, 8669, 77700,116405,151941,176248,181462,166343, + .138235,105947, 76489, 52928, 35360, 23303, 14821, 11474, 7401, + . 4558, 2563, 1442, 811, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, 3, 1, 1, 0, 0, + . 0, + . 37, 4800, 8562, 85461,134377,186146,230010,251091,242122, + .209412,164675,121152, 84347, 56714, 37286, 23915, 16893, 11650, + . 7641, 4297, 2416, 1359, 764, 430, 242, 136, 76, + . 43, 24, 14, 8, 4, 2, 1, 1, 0, + . 0, + . 36, 5200, 8273, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, 0, + . 35, 5600, 8030, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, 10320, 7993, 6274, 4857, 3644, 2831, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 100 KEV + DATA MAP004/ + . 575, 100, 3, 0, 0, 3, 2200, 0, + . 26, 2400, 5801, 5384, 2732, 2760, 2706, 2600, 2457, + . 2300, 2130, 1960, 1789, 1627, 1464, 1329, 1186, 1073, + . 948, 846, 756, 658, 600, 517, 455, 407, + . 32, 2500, 7285, 10570, 4846, 4817, 4659, 4422, 4136, + . 3827, 3501, 3172, 2866, 2556, 2293, 2025, 1779, 1584, + . 1384, 1195, 1079, 904, 802, 699, 593, 553, 468, + . 338, 396, 242, 272, 247, + . 34, 2600, 7818, 25024, 7950, 7081, 6619, 6108, 5541, + . 4988, 4447, 3920, 3434, 2998, 2582, 2255, 1927, 1636, + . 1440, 1207, 1027, 884, 744, 566, 611, 358, 482, + . 297, 167, 295, 323, 182, 102, 58/ +C L=1.35 TO 1.45 100 KEV + DATA MAP0A4/ + . 35, 2700, 8028, 40761, 12362, 10385, 9452, 8430, 7407, + . 6414, 5490, 4651, 3916, 3272, 2712, 2268, 1817, 1556, + . 1250, 999, 911, 635, 643, 362, 449, 419, 235, + . 132, 74, 42, 24, 13, 7, 4, 2, + . 36, 2800, 8206, 56707, 17786, 15220, 13489, 11646, 9837, + . 8156, 6661, 5389, 4280, 3410, 2735, 2097, 1663, 1343, + . 1030, 840, 614, 621, 349, 196, 110, 62, 35, + . 20, 11, 6, 3, 2, 1, 1, 0, 0, + . 36, 2900, 8332, 58270, 26281, 24153, 21053, 17537, 14107, + . 10985, 8377, 6293, 4668, 3380, 2473, 1774, 1551, 1031, + . 738, 415, 233, 131, 74, 42, 23, 13, 7, + . 4, 2, 1, 1, 0, 0, 0, 0, 0/ +C L=1.5 TO 1.7 100 KEV + DATA MAP005/ + . 36, 3000, 8428, 50382, 36638, 34983, 30901, 25510, 19915, + . 14916, 10772, 7624, 5276, 3568, 2414, 2125, 1273, 738, + . 415, 233, 131, 74, 41, 23, 13, 7, 4, + . 2, 1, 1, 0, 0, 0, 0, 0, 0, + . 37, 3200, 8572, 53434, 46989, 47959, 45041, 39207, 31914, + . 24685, 18230, 12963, 9176, 6260, 4209, 3122, 2281, 1442, + . 811, 456, 256, 144, 81, 46, 26, 14, 8, + . 5, 3, 1, 1, 0, 0, 0, 0, 0, + . 0, + . 37, 3400, 8667, 61737, 57511, 61552, 60489, 54804, 46196, + . 36508, 27467, 19920, 13896, 9645, 6454, 4400, 3586, 2297, + . 1351, 760, 427, 240, 135, 76, 43, 24, 14, + . 8, 4, 2, 1, 1, 0, 0, 0, 0, + . 0/ +C L=1.8 TO 2.0 100 KEV + DATA MAP006/ + . 37, 3600, 8695, 60542, 65968, 74312, 76867, 73052, 64140, + . 52302, 40349, 29581, 20981, 14445, 9812, 6492, 5105, 3399, + . 2152, 1210, 680, 383, 215, 121, 68, 38, 22, + . 12, 7, 4, 2, 1, 1, 0, 0, 0, + . 0, + . 37, 3800, 8656, 55418, 73962, 87603, 94999, 94176, 85537, + . 71861, 56410, 41811, 29992, 20678, 14012, 9331, 6706, 4781, + . 3178, 1787, 1005, 565, 318, 179, 100, 57, 32, + . 18, 10, 6, 3, 2, 1, 1, 0, 0, + . 0, + . 37, 4000, 8608, 62130, 86556,105970,118079,119200,109292, + . 91792, 71586, 52500, 37052, 25058, 16723, 10831, 8128, 5445, + . 3399, 1911, 1075, 604, 340, 191, 107, 60, 34, + . 19, 11, 6, 3, 2, 1, 1, 0, 0, + . 0/ +C L=2.2 TO 3.0 100 KEV + DATA MAP007/ + . 37, 4400, 8507, 68565,100146,129829,154552,167752,164827, + .147163,120668, 91766, 66266, 45676, 30687, 20079, 13136, 10209, + . 6486, 3793, 2133, 1200, 675, 379, 213, 120, 67, + . 38, 21, 12, 7, 4, 2, 1, 1, 0, + . 0, + . 36, 4800, 8395, 74042,111795,152244,191602,220688,230684, + .217955,187613,148235,109384, 77341, 51907, 34340, 21885, 16272, + . 10853, 6945, 3906, 2196, 1235, 695, 391, 220, 124, + . 69, 39, 22, 12, 7, 4, 2, 1, 1, + . 35, 5200, 7942, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, + . 33, 5600, 7538, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, 10320, 7993, 6274, 4857, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 250 KEV + DATA MAP008/ + . 548, 250, 3, 0, 0, 3, 2200, 0, + . 25, 2400, 5498, 5355, 2684, 2721, 2667, 2568, 2440, + . 2285, 2124, 1957, 1793, 1631, 1488, 1336, 1204, 1072, + . 971, 861, 762, 676, 607, 536, 469, + . 31, 2500, 6948, 10488, 4717, 4699, 4569, 4347, 4088, + . 3805, 3492, 3185, 2883, 2590, 2318, 2063, 1829, 1612, + . 1417, 1252, 1083, 963, 822, 718, 636, 558, 459, + . 397, 374, 285, 226, + . 33, 2600, 7377, 24836, 7791, 6879, 6475, 6008, 5491, + . 4979, 4458, 3957, 3499, 3058, 2661, 2307, 1990, 1721, + . 1434, 1289, 1080, 913, 750, 669, 593, 425, 440, + . 353, 199, 194, 386, 217, 122/ +C L=1.35 TO 1.45 250 KEV + DATA MAP0A8/ + . 34, 2700, 7584, 40397, 12084, 10032, 9224, 8319, 7386, + . 6461, 5580, 4774, 4044, 3384, 2853, 2345, 1976, 1591, + . 1323, 1118, 919, 645, 711, 434, 347, 505, 284, + . 160, 90, 50, 28, 16, 9, 5, + . 34, 2800, 7737, 56000, 17201, 14607, 13162, 11556, 9919, + . 8354, 6923, 5659, 4548, 3657, 2873, 2319, 1807, 1419, + . 1013, 1028, 578, 719, 429, 241, 136, 76, 43, + . 24, 14, 8, 4, 2, 1, 1, + . 35, 2900, 7856, 56738, 24122, 22779, 20514, 17680, 14665, + . 11768, 9208, 7005, 5282, 3894, 2877, 2091, 1605, 1206, + . 927, 550, 310, 174, 98, 55, 31, 17, 10, + . 6, 3, 2, 1, 1, 0, 0, 0/ +C L=1.5 TO 1.7 250 KEV + DATA MAP009/ + . 35, 3000, 7959, 46490, 32166, 31926, 29725, 26033, 21537, + . 16961, 12830, 9309, 6656, 4586, 3186, 2287, 1777, 1100, + . 618, 348, 196, 110, 62, 35, 20, 11, 6, + . 3, 2, 1, 1, 0, 0, 0, 0, + . 35, 3200, 8092, 47524, 39615, 41726, 41397, 38645, 33948, + . 28133, 22163, 16621, 12111, 8565, 5953, 4003, 3064, 2170, + . 1368, 769, 433, 243, 137, 77, 43, 24, 14, + . 8, 4, 2, 1, 1, 0, 0, 0, + . 35, 3400, 8189, 53938, 46962, 51478, 53287, 52078, 47807, + . 41325, 33642, 25988, 19350, 13763, 9682, 6520, 4422, 3717, + . 2360, 1413, 795, 447, 251, 141, 79, 45, 25, + . 14, 8, 4, 3, 1, 1, 0, 0/ +C L=1.8 TO 2.0 250 KEV + DATA MAP010/ + . 36, 3600, 8218, 50809, 51989, 59287, 64173, 65814, 63545, + . 57656, 49071, 39483, 30096, 21954, 15550, 10721, 7239, 5292, + . 3791, 2535, 1426, 802, 451, 253, 143, 80, 45, + . 25, 14, 8, 5, 3, 1, 1, 0, 0, + . 35, 3800, 8156, 43951, 56260, 66861, 75274, 80402, 81109, + . 76637, 67819, 56284, 44035, 32814, 23418, 16261, 10968, 7245, + . 6071, 3819, 2323, 1306, 735, 413, 232, 131, 73, + . 41, 23, 13, 7, 4, 2, 1, 1, + . 35, 4000, 8066, 48001, 64012, 77838, 90173, 98634,101707, + . 97710, 87547, 72988, 56973, 42167, 29878, 20286, 13575, 8986, + . 7127, 4492, 2633, 1481, 833, 468, 263, 148, 83, + . 47, 26, 15, 8, 5, 3, 1, 1/ +C L=2.2 TO 3.0 250 KEV + DATA MAP011/ + . 34, 4400, 7864, 50984, 68881, 86630,105015,121429,133797, + .139353,135859,123646,104489, 82600, 61600, 43676, 29970, 19838, + . 13074, 10264, 6545, 3861, 2171, 1221, 687, 386, 217, + . 122, 69, 39, 22, 12, 7, 4, + . 34, 4800, 7685, 53317, 73073, 94212,117436,141171,163361, + .179748,187575,183320,167004,141499,111861, 82855, 58642, 39897, + . 26561, 17702, 13089, 8810, 5067, 2849, 1602, 901, 507, + . 285, 160, 90, 51, 29, 16, 9, + . 32, 5200, 7363, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, 6750, 1500, + . 31, 5600, 7040, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, 10320, 7993, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 500 KEV + DATA MAP012/ + . 505, 500, 3, 0, 0, 3, 2200, 0, + . 24, 2400, 4305, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, 604, 542, + . 30, 2500, 5677, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 416, 367, 299, + . 32, 2600, 6186, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160, 406, 228/ +C L=1.35 TO 1.45 500 KEV + DATA MAPA12/ + . 32, 2700, 6494, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, 30, 17, + . 32, 2800, 6686, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, 3, + . 32, 2900, 6802, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2, 1, 1/ +C L=1.5 TO 1.7 500 KEV + DATA MAP013/ + . 32, 3000, 6902, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, 1, 0, + . 32, 3200, 7045, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, 5, 3, 2, 1, + . 31, 3400, 7130, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, + . 17, 10, 5, 3/ +C L=1.8 TO 2.0 500 KEV + DATA MAP014/ + . 32, 3600, 7195, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, + . 31, 18, 10, 6, 3, + . 32, 3800, 7173, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, + . 53, 30, 17, 9, 5, + . 31, 4000, 7052, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, + . 61, 34, 19, 11/ +C L=2.2 TO 3.0 500 KEV + DATA MAP015/ + . 30, 4400, 6798, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, + . 172, 97, 54, + . 30, 4800, 6749, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, + . 430, 242, 136, + . 30, 5200, 6650, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, 3750, 3750, + . 29, 5600, 6551, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, 13254, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 750 KEV + DATA MAP016/ + . 476, 750, 3, 0, 0, 3, 2200, 0, + . 23, 2400, 3623, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, 604, + . 29, 2500, 4922, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 416, 367, + . 31, 2600, 5527, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160, 406/ +C L=1.35 TO 1.45 750 KEV + DATA MAPA16/ + . 31, 2700, 5946, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, 30, + . 31, 2800, 6243, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, + . 31, 2900, 6375, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2, 1/ +C L=1.5 TO 1.7 750 KEV + DATA MAP017/ + . 31, 3000, 6418, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, 1, + . 30, 3200, 6380, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, 5, 3, + . 30, 3400, 6294, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, + . 17, 10, 5/ +C L=1.8 TO 2.0 750 KEV + DATA MAP018/ + . 29, 3600, 6186, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, + . 31, 18, + . 28, 3800, 6045, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, + . 53, + . 28, 4000, 5870, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, + . 61/ +C L=2.2 TO 3.0 750 KEV + DATA MAP019/ + . 27, 4400, 5553, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, + . 27, 4800, 5637, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, + . 28, 5200, 6135, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, + . 7200, + . 28, 5600, 6257, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 17049, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 1.00 MEV + DATA MAP020/ + . 460, 1000, 3, 0, 0, 3, 2200, 0, + . 23, 2400, 3149, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, 604, + . 28, 2500, 4466, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 416, + . 30, 2600, 5120, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160/ +C L=1.35 TO 1.45 1.00 MEV + DATA MAPA20/ + . 31, 2700, 5586, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, 30, + . 31, 2800, 5917, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, 5, + . 31, 2900, 6066, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2, 1/ +C L=1.5 TO 1.7 1000 KEV + DATA MAP021/ + . 31, 3000, 6077, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, 1, + . 30, 3200, 5985, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, 5, 3, + . 29, 3400, 5803, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, + . 17, 10/ +C L=1.8 TO 2.0 1000 KEV + DATA MAP022/ + . 28, 3600, 5558, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, + . 31, + . 26, 3800, 5253, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, + . 26, 4000, 5010, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192/ +C L=2.2 TO 3.0 1000 KEV + DATA MAP023/ + . 24, 4400, 4713, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 16561, 11965, 8293, 5431, 3054, 1717, + . 25, 4800, 4803, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, + . 26, 5200, 5182, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, + . 27, 5600, 5471, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 1.50 MEV + DATA MAP024/ + . 432, 1500, 3, 0, 0, 3, 2200, 0, + . 22, 2400, 2572, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, 764, 686, + . 27, 2500, 3869, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, + . 30, 2600, 4606, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372, 209, 160/ +C L=1.35 TO 1.45 1.50 MEV + DATA MAPA24/ + . 30, 2700, 5099, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, 53, + . 30, 2800, 5470, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, 8, + . 30, 2900, 5664, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3, 2/ +C L=1.5 TO 1.7 1500 KEV + DATA MAP025/ + . 30, 3000, 5690, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, 2, 1, + . 28, 3200, 5545, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 9, + . 27, 3400, 5335, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30/ +C L=1.8 TO 2.0 1500 KEV + DATA MAP026/ + . 25, 3600, 5042, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, 315, 177, + . 24, 3800, 4620, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, 939, 528, + . 23, 4000, 4229, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422, 3423, 1925, 1082/ +C L=2.2 TO 3.0 1500 KEV + DATA MAP027/ + . 21, 4400, 3846, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52955, 37122, 25243, + . 16561, 11965, 8293, + . 21, 4800, 3918, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 35233, 23066, 16594, + . 24, 5200, 4569, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, 18750, 13500, + . 26, 5600, 5048, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 2.00 MEV + DATA MAP028/ + . 403, 2000, 3, 0, 0, 3, 2200, 0, + . 20, 2400, 2228, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 975, 865, + . 26, 2500, 3497, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, 641, 560, + . 28, 2600, 4229, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, + . 372/ +C L=1.35 TO 1.45 2.00 MEV + DATA MAPA28/ + . 29, 2700, 4739, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, + . 168, 95, + . 29, 2800, 5097, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 26, 14, + . 29, 2900, 5309, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11, + . 6, 3/ +C L=1.5 TO 1.7 2000 KEV + DATA MAP029/ + . 28, 3000, 5356, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, 7, + . 4, + . 27, 3200, 5170, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, + . 25, 3400, 4882, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170, 95/ +C L=1.8 TO 2.0 2000 KEV + DATA MAP030/ + . 23, 3600, 4426, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, 996, 560, + . 22, 3800, 3931, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, + . 6507, 4502, 2970, 1670, + . 20, 4000, 3589, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, + . 8065, 5422/ +C L=2.2 TO 3.0 2000 KEV + DATA MAP031/ + . 18, 4400, 3171, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, + . 18, 4800, 3072, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, + . 22, 5200, 3937, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 97800, 78000, 59400, 25350, + . 25, 5600, 4485, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, 45328, 35692, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 2.50 MEV + DATA MAP0Z0/ + . 364, 2500, 3, 0, 0, 3, 2200, 0, + . 18, 2400, 1766, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, + . 24, 2500, 3044, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, 982, 835, 727, + . 26, 2600, 3869, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703, 587, 446/ +C L=1.35 TO 1.45 2.50 MEV + DATA MAP0Z1/ + . 26, 2700, 4404, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, 314, 533, + . 27, 2800, 4757, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, + . 27, 2900, 4986, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60, 34, 19, 11/ +C L=1.5 TO 1.7 2.50 MEV + DATA MAP0Z2/ + . 26, 3000, 5020, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, 22, 12, + . 25, 3200, 4770, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, 90, 50, + . 24, 3400, 4426, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536, 301, 170/ +C L=1.8 TO 2.0 2.50 MEV + DATA MAP0Z3/ + . 21, 3600, 3911, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, 2962, 1770, + . 19, 3800, 3345, 40943, 52384, 62024, 70199, 75902, 78093, + . 75852, 69272, 59488, 48040, 36749, 26945, 18926, 13088, 8734, + . 6523, + . 17, 4000, 2956, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327/ +C L=2.2 TO 3.0 2.50 MEV + DATA MAP0Z4/ + . 15, 4400, 2493, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553,125652,111586, 92462, 71636, + . 14, 4800, 2297, 49529, 65656, 84636,103935,125234,145303, + .163236,174969,178212,170767,153191, + . 18, 5200, 3196, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800,104700, + . 23, 5600, 3986, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, 89266, 71814, 57257, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 3.00 MEV + DATA MAP032/ + . 321, 3000, 3, 0, 0, 3, 2200, 0, + . 16, 2400, 1230, 5347, 2670, 2710, 2657, 2560, 2433, + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, + . 21, 2500, 2537, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, + . 1430, 1259, 1083, + . 24, 2600, 3308, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, + . 1465, 1281, 1097, 923, 751, 703/ +C L=1.35 TO 1.45 3.00 MEV + DATA MAPA32/ + . 24, 2700, 3715, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, + . 1346, 1131, 921, 680, 702, 458, + . 24, 2800, 3968, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, + . 1055, 1042, 613, 704, 456, 256, + . 24, 2900, 4138, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, + . 952, 598, 336, 189, 106, 60/ +C L=1.5 TO 1.7 3000 KEV + DATA MAP033/ + . 24, 3000, 4138, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, + . 695, 391, 220, 124, 70, 39, + . 23, 3200, 3869, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, + . 1581, 897, 504, 284, 159, + . 22, 3400, 3514, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, + . 2664, 1695, 953, 536/ +C L=1.8 TO 2.0 3000 KEV + DATA MAP034/ + . 19, 3600, 3081, 48616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, + . 4624, + . 16, 3800, 2551, 41466, 52542, 62164, 70320, 76003, 78120, + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, + . 14, 4000, 2086, 45118, 59201, 71966, 83342, 92297, 97094, + . 96119, 89035, 77026, 62490, 47575/ +C L=2.2 TO 3.0 3000 KEV + DATA MAP035/ + . 11, 4400, 1404, 47488, 62790, 78781, 94700,110076,123024, + .131177,132553, + . 8, 4800, 1024, 49529, 65656, 84636,103935,125234, + . 17, 5200, 2455, 54773, 72665, 94767,120930,121864,168300, + .176400,195450,211500,199950,173400,184800,158400,136800, + . 20, 5600, 3380, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730,252422,246560,231587,210039,184801,158511, + .133026,109737, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.30 4.00 MEV + DATA MAP036/ + . 184, 4000, 3, 0, 0, 3, 2400, 0, + . 11, 2500, 669, 10465, 4679, 4669, 4542, 4327, 4076, + . 3792, 3491, + . 13, 2600, 1233, 24783, 7745, 6822, 6426, 5981, 5480, + . 4966, 4472, 3970, 3502/ +C L=1.35 TO 1.45 4.00 MEV + DATA MAPA36/ + . 14, 2700, 1568, 40297, 12004, 9928, 9156, 8294, 7366, + . 6470, 5615, 4793, 4085, 3423, + . 15, 2800, 1806, 55808, 17043, 14421, 13069, 11529, 9943, + . 8406, 6978, 5723, 4610, 3730, 2935, + . 16, 2900, 1908, 56343, 23557, 22371, 20306, 17687, 14787, + . 11981, 9404, 7241, 5438, 4054, 3017, 2186/ +C L=1.5 TO 1.7 4000 KEV + DATA MAP037/ + . 16, 3000, 1914, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, + . 16, 3200, 1842, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, + . 15, 3400, 1693, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048, 35052, 27724, 20911, 15140, 10811/ +C L=1.8 TO 2.0 4000 KEV + DATA MAP038/ + . 12, 3600, 1431,048616, 48894, 55717, 60750, 63092, 62213, + . 57866, 50662, 41864, + . 9, 3800, 1066, 41466, 52542, 62164, 70320, 76003, 78120, + . 6, 4000, 616, 45118, 59201, 71966/ +C L=2.2 TO 3.0 4000 KEV + DATA MAP039/ + . 3, 4400, 0, + . 3, 4800, 0, + . 9, 5200, 616, 54773, 72665, 94767,120930,121864,168300, + . 12, 5600, 2455, 54773, 72665, 94767,120930,150210,180644, + .209294,232704,247730, + . 3, 5620, 0, 3, 32767, 0/ +C L=1.20 TO 1.45 4.50 MEV + DATA MAP040/ + . 75, 4500, 3, 0, 0, 3, 2600, 0, + . 6, 2700, 389, 40297, 12004, 9928, + . 8, 2800, 659, 55808, 17043, 14421, 13069, 11529, + . 9, 2900, 797, 56343, 23557, 22371, 20306, 17687, 14787/ +C L=1.5 TO 1.7 4500 KEV + DATA MAP041/ + . 10, 3000, 818, 45531, 31037, 31028, 29242, 26022, 21862, + . 17490, + . 11, 3200, 754, 46114, 37841, 40048, 40182, 38118, 34149, + . 28849, 23157, + . 10, 3400, 559, 52148, 44533, 48922, 51107, 50748, 47550, + . 42048/ +C L=1.8 TO 2.0 4500 KEV + DATA MAP042/ + . 7, 3600, 149, 48616, 48894, 55717, 60750, + . 3, 3700, 0, 3, 32767, 0, 0/ + END diff --git a/SOFIP/guzik_version/aei7hi.for b/SOFIP/guzik_version/aei7hi.for new file mode 100755 index 0000000..c692213 --- /dev/null +++ b/SOFIP/guzik_version/aei7hi.for @@ -0,0 +1,665 @@ + BLOCK DATA + DOUBLE PRECISION NAME + COMMON/AEI7HI/NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH, + *MAP000(144),MAP001(136),MAP002(135),MAP003(131),MAP004(66), + *MAP005(140),MAP006(136),MAP007(133),MAP008(125),MAP009(51), + *MAP010(131),MAP011(127),MAP012(127),MAP013(137),MAP014(126), + *MAP015(124),MAP016(123),MAP017(122),MAP018(121),MAP019(120), + *MAP020(141),MAP021(65),MAP022(141),MAP023(142),MAP024(110), + *MAP025(134),MAP026(154),MAP027(60),MAP028(124),MAP029(125), + *MAP030(63),MAP031(67),MAP032(69),MAP033(135),MAP034(131), + *MAP035(80),MAP036(116),MAP037(41),MAP038(21) + DATA NAME /8HELCTHI-7/ + DATA EPOCH / 1980.000/ + DATA SCAE / 6400.000/ + DATA SCAL / 2100.000/ + DATA SCAB / 1250.000/ + DATA SCAF / 1024.000/ + DATA LENGTH / 4373/ +C L=2.80 TO 3.40 40 KEV + DATA MAP000/ + . 612, 255, 3, 0, 0, 3, 5858, 0, + . 35, 5879, 8033, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 110, 86, 66, 52, 40, 30, 30, + . 34, 6300, 7759, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 38, 26, 18, 13, 9, 9, + . 33, 6719, 7599, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 1, 0, 0, 0, + . 34, 7139, 7840, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1, 0, 0, 0, 0/ +C L=3.60 TO 4.50 40 KEV + DATA MAP001/ + . 34, 7559, 7892, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 0, 0, 0, 0, 0, + . 34, 7979, 7909, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, 0, 0, 0, + . 34, 8400, 7887, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 0, 0, 0, 0, + . 34, 9450, 7927, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 0, 0, 0/ +C L=5.00 TO 6.60 40 KEV + DATA MAP002/ + . 34, 10500, 7890, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, 1, 0, 0, + . 34, 11550, 7852, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 2, 1, 0, 0, + . 34, 12600, 7709, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 4, 2, 1, 1, + . 33, 13859, 7679, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 10, 6, 3, 3/ +C L=7.00 TO 9.00 40 KEV + DATA MAP003/ + . 33, 14700, 7638, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 24, 14, 8, 5, 5, + . 33, 15750, 7586, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 95, + . 56, 33, 19, 12, 6, 6, + . 33, 16800, 7542, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 366, 217, 129, + . 76, 45, 27, 16, 10, 10, + . 32, 18900, 7314, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 3712, 2171, 1269, 742, 433, 253, 147, + . 87, 50, 30, 16, 16/ +C L=10.00 TO 11.00 40 KEV + DATA MAP004/ + . 31, 21000, 7002, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810, 79456, 44175, 24274, 13256, 7214, + . 3919, 2126, 1154, 625, 340, 183, 100, 54, 30, + . 15, 9, 5, 5, + . 29, 23100, 6595, 12346,119540,610494,983131,726676,399082, + .197322, 93600, 43620, 20169, 9293, 4275, 1965, 903, 415, + . 190, 88, 40, 19, 8, 4, 2, 1, 0, + . 0, 0, + . 3, 25200, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 100 KEV + DATA MAP005/ + . 585, 639, 3, 0, 0, 3, 5858, 0, + . 33, 5879, 7538, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 110, 86, 66, 52, 52, + . 33, 6300, 7497, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 38, 26, 18, 13, 13, + . 33, 6719, 7429, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 1, 0, 0, 0, + . 33, 7139, 7575, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1, 0, 0, 0/ +C L=3.60 TO 4.50 100 KEV + DATA MAP006/ + . 34, 7559, 7698, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 0, 0, 0, 0, 0, + . 34, 7979, 7725, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, 0, 0, 0, + . 34, 8400, 7737, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 0, 0, 0, 0, + . 34, 9450, 7737, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 0, 0, 0/ +C L=5.00 TO 6.60 100 KEV + DATA MAP007/ + . 34, 10500, 7712, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, 1, 0, 0, + . 33, 11550, 7671, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 2, 1, 1, + . 33, 12600, 7538, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 4, 2, 2, + . 33, 13859, 7518, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 10, 6, 3, 3/ +C L=7.00 TO 9.00 100 KEV + DATA MAP008/ + . 33, 14700, 7429, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 24, 14, 8, 5, 5, + . 32, 15750, 7377, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 95, + . 56, 33, 19, 12, 12, + . 31, 16800, 7167, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 366, 217, 129, + . 76, 45, 27, 27, + . 29, 18900, 6568, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 3712, 2171, 1269, 742, 433, 253, 147, + . 87, 87/ +C L=10.00 TO 11.00 100 KEV + DATA MAP009/ + . 25, 21000, 5608, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810, 79456, 44175, 24274, 13256, 7214, + . 3919, 2126, 1154, 625, 340, 183, 183, + . 20, 23100, 4177, 12346,119540,610494,983131,726676,399082, + .197322, 93600, 43620, 20169, 9293, 4275, 1965, 903, 415, + . 190, 190, + . 3, 25200, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 300 KEV + DATA MAP010/ + . 522, 1919, 3, 0, 0, 3, 5858, 0, + . 30, 5879, 6890, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 110, 110, + . 31, 6300, 6940, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 38, 26, 26, + . 31, 6719, 6962, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 1, 1, + . 31, 7139, 7057, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1, 1/ +C L=3.60 TO 4.50 300 KEV + DATA MAP011/ + . 31, 7559, 7167, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 0, 0, + . 32, 7979, 7284, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, 0, + . 32, 8400, 7403, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 0, 0, + . 32, 9450, 7403, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 1/ +C L=5.00 TO 6.60 300 KEV + DATA MAP012/ + . 32, 10500, 7317, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, 1, + . 32, 11550, 7284, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 2, 2, + . 32, 12600, 7210, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 4, 4, + . 31, 13859, 7045, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 10, 10/ +C L=7.00 TO 10.00 300 KEV + DATA MAP013/ + . 30, 14700, 6893, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 24, 24, + . 30, 15750, 6688, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 95, + . 56, 33, 33, + . 28, 16800, 6260, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 366, 217, 129, + . 129, + . 24, 18900, 5300, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 3712, 2171, 1269, 1269, + . 19, 21000, 4023, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810, 79456, 44175, 24274, 13256, 7214, + . 7214, + . 3, 23519, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 500 KEV + DATA MAP014/ + . 495, 3200, 3, 0, 0, 3, 5858, 0, + . 29, 5879, 6551, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 142, + . 29, 6300, 6632, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 54, + . 30, 6719, 6688, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 2, + . 30, 7139, 6760, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1/ +C L=3.60 TO 4.50 500 KEV + DATA MAP015/ + . 30, 7559, 6868, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 1, + . 31, 7979, 6969, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 1, + . 31, 8400, 7121, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 1, + . 32, 9450, 7210, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 1/ +C L=5.00 TO 6.60 500 KEV + DATA MAP016/ + . 31, 10500, 7121, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 3, + . 31, 11550, 7063, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 4, + . 31, 12600, 6925, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 7, + . 30, 13859, 6674, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 18/ +C L=7.00 TO 10.00 500 KEV + DATA MAP017/ + . 29, 14700, 6494, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 40, + . 27, 15750, 6116, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 160, + . 25, 16800, 5561, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 617, + . 21, 18900, 4357, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 6337, + . 14, 21000, 2686, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810,139810, + . 3, 22050, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 1000 KEV + DATA MAP018/ + . 447, 6400, 3, 0, 0, 3, 5858, 0, + . 27, 5879, 5974, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 233, + . 28, 6300, 6144, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 77, + . 28, 6719, 6306, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 5, + . 30, 7139, 6424, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1/ +C L=3.60 TO 4.50 1000 KEV + DATA MAP019/ + . 29, 7559, 6568, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 2, + . 31, 7979, 6701, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, + . 30, 8400, 6812, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, + . 30, 9450, 6885, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 3/ +C L=5.00 TO 7.00 1000 KEV + DATA MAP020/ + . 31, 10500, 6747, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, + . 29, 11550, 6551, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 13, + . 28, 12600, 6347, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 33, + . 27, 13859, 5985, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 88, + . 26, 14700, 5707, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 196/ +C L=7.50 TO 9.00 1000 KEV + DATA MAP021/ + . 24, 15750, 5162, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 772, + . 21, 16800, 4503, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 4972, + . 14, 18900, 2664, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,199821, + . 3, 20159, 0, 3, 32767, 0/ +C L=2.80 TO 3.60 2000 KEV + DATA MAP022/ + . 393, 12800, 3, 0, 0, 3, 5858, 0, + . 25, 5879, 5345, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 377, + . 25, 6300, 5544, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 223, + . 27, 6719, 5736, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 28, 7139, 5938, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, + . 28, 7559, 6116, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2/ +C L=3.80 TO 5.50 2000 KEV + DATA MAP023/ + . 29, 7979, 6293, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, + . 29, 8400, 6369, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, + . 29, 9450, 6243, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, + . 28, 10500, 5952, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, + . 27, 11550, 5644, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22/ +C L=6.00 TO 8.00 2000 KEV + DATA MAP024/ + . 25, 12600, 5300, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, + . 23, 13859, 4701, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, + . 21, 14700, 4305, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, + . 19, 15750, 3677, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, + . 16, 16800, 2949, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, + . 3, 18269, 0, 3, 32767, 0/ +C L=2.80 TO 3.60 3000 KEV + DATA MAP025/ + . 348, 19200, 3, 0, 0, 3, 5858, 0, + . 24, 5879, 4935, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, + . 25, 6300, 5162, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, + . 25, 6719, 5355, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, + . 25, 7139, 5544, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, + . 27, 7559, 5713, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4/ +C L=3.80 TO 6.00 3000 KEV + DATA MAP026/ + . 27, 7979, 5835, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 28, 8400, 5938, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, + . 27, 9450, 5753, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 74, 42, 25, 14, 8, + . 26, 10500, 5389, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, + . 24, 11550, 4928, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, + . 22, 12600, 4384, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460/ +C L=6.60 TO 8.00 3000 KEV + DATA MAP027/ + . 18, 13859, 3560, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 16, 14700, 2944, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, + . 12, 15750, 2048, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,172612, + . 8, 16800, 1024, 2003, 5172, 13138, 32034, 71261, + . 3, 17535, 0, 3, 32767, 0/ +C L=2.80 TO 3.60 4000 KEV + DATA MAP028/ + . 312, 25600, 3, 0, 0, 3, 5858, 0, + . 22, 5879, 4364, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, + . 22, 6300, 4599, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, + . 23, 6719, 4833, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, + . 24, 7139, 5052, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, + . 25, 7559, 5269, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12/ +C L=3.80 TO 5.50 4000 KEV + DATA MAP029/ + . 26, 7979, 5480, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, + . 27, 8400, 5677, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 26, 9450, 5388, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, + . 24, 10500, 4961, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, + . 22, 11550, 4503, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307/ +C L=6.00 TO 7.50 4000 KEV + DATA MAP030/ + . 20, 12600, 3937, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, + . 16, 13859, 3025, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, + . 13, 14700, 2228, 1998, 5133, 12870, 30443, 63655,107659, + .138483,132127,111546, 79866, + . 8, 15750, 924, 2000, 5155, 13021, 31328, 31328, + . 3, 16380, 0, 3, 32767, 0/ +C L=2.80 TO 3.20 5000 KEV + DATA MAP031/ + . 271, 32000, 3, 0, 0, 3, 5858, 0, + . 19, 5879, 3629, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, + . 19, 6300, 3937, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, + . 21, 6719, 4248, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98/ +C L=3.40 TO 3.80 5000 KEV + DATA MAP032/ + . 22, 7139, 4503, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, + . 23, 7559, 4712, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, + . 24, 7979, 4910, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21/ +C L=4.00 TO 7.00 5000 KEV + DATA MAP033/ + . 24, 8400, 4992, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, + . 23, 9450, 4712, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, + . 21, 10500, 4344, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, + . 20, 11550, 3853, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, + . 17, 12600, 3267, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, + . 14, 13859, 2309, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, + . 10, 14700, 1332, 1998, 5133, 12870, 30443, 63655,107659, + .138483, + . 3, 15435, 0, 3, 32767, 0/ +C L=2.80 TO 4.00 6000 KEV + DATA MAP034/ + . 211, 38400, 3, 0, 0, 3, 5858, 0, + . 14, 5879, 2398, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, + . 16, 6300, 2913, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, + . 17, 6719, 3252, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, + . 18, 7139, 3496, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 19, 7559, 3665, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, + . 19, 7979, 3787, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, + . 20, 8400, 3853, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196/ +C L=4.50 TO 6.60 6000 KEV + DATA MAP035/ + . 19, 9450, 3644, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, + . 17, 10500, 3297, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, + . 16, 11550, 2825, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, + . 13, 12600, 2273, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, + . 9, 13859, 1176, 1995, 5111, 12719, 29584, 59889, 96565, + . 3, 14700, 0, 3, 32767, 0/ +C L=2.80 TO 4.50 6500 KEV + DATA MAP036/ + . 157, 41600, 3, 0, 0, 3, 5858, 0, + . 11, 5879, 1739, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, + . 11, 6300, 2048, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, + . 13, 6719, 2296, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, + . 14, 7139, 2455, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, + . 15, 7559, 2572, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, + . 15, 7979, 2663, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, + . 15, 8400, 2691, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, + . 14, 9450, 2605, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331/ +C L=5.00 TO 6.00 6500 KEV + DATA MAP037/ + . 14, 10500, 2333, 7973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, + . 11, 11550, 1909, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, + . 10, 12600, 1332, 1989, 5065, 12419, 27954, 53314, 79229, + . 79229, + . 3, 13671, 0, 3, 32767, 0/ +C L=4.00 7000 KEV + DATA MAP038/ + . 20, 44800, 3, 0, 0, 3, 8200, 0, + . 6, 8400, 20, 1936, 4662, 10100, + . 3, 8600, 0, 3, 32767, 0, + . 0/ + END diff --git a/SOFIP/guzik_version/aei7lo.for b/SOFIP/guzik_version/aei7lo.for new file mode 100755 index 0000000..fa04da8 --- /dev/null +++ b/SOFIP/guzik_version/aei7lo.for @@ -0,0 +1,592 @@ + BLOCK DATA + DOUBLE PRECISION NAME + COMMON/AEI7LO/NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH, + *MAP000(144),MAP001(136),MAP002(135),MAP003(131),MAP004(66), + *MAP005(140),MAP006(136),MAP007(133),MAP008(125),MAP009(51), + *MAP010(131),MAP011(127),MAP012(127),MAP013(137),MAP014(126), + *MAP015(124),MAP016(123),MAP017(122),MAP018(120),MAP019(119), + *MAP020(140),MAP021(65),MAP022(136),MAP023(132),MAP024(105), + *MAP025(128),MAP026(121),MAP027(78),MAP028(115),MAP029(87), + *MAP030(78),MAP031(138),MAP032(64),MAP033(97) + DATA NAME /8HELCTLO-7/ + DATA EPOCH / 1980.000/ + DATA SCAE / 6400.000/ + DATA SCAL / 2100.000/ + DATA SCAB / 1250.000/ + DATA SCAF / 1024.000/ + DATA LENGTH / 3936/ +C L=2.80 TO 3.40 40 KEV + DATA MAP000/ + . 612, 255, 3, 0, 0, 3, 5858, 0, + . 35, 5879, 8033, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 110, 86, 66, 52, 40, 30, 30, + . 34, 6300, 7759, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 38, 26, 18, 13, 9, 9, + . 33, 6719, 7599, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 1, 0, 0, 0, + . 34, 7139, 7840, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1, 0, 0, 0, 0/ +C L=3.60 TO 4.50 40 KEV + DATA MAP001/ + . 34, 7559, 7892, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 0, 0, 0, 0, 0, + . 34, 7979, 7909, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, 0, 0, 0, + . 34, 8400, 7887, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 0, 0, 0, 0, + . 34, 9450, 7927, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 0, 0, 0/ +C L=5.00 TO 6.60 40 KEV + DATA MAP002/ + . 34, 10500, 7890, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, 1, 0, 0, + . 34, 11550, 7852, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 2, 1, 0, 0, + . 34, 12600, 7709, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 4, 2, 1, 1, + . 33, 13859, 7679, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 10, 6, 3, 3/ +C L=7.00 TO 9.00 40 KEV + DATA MAP003/ + . 33, 14700, 7638, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 24, 14, 8, 5, 5, + . 33, 15750, 7586, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 95, + . 56, 33, 19, 12, 6, 6, + . 33, 16800, 7542, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 366, 217, 129, + . 76, 45, 27, 16, 10, 10, + . 32, 18900, 7314, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 3712, 2171, 1269, 742, 433, 253, 147, + . 87, 50, 30, 16, 16/ +C L=10.00 TO 11.00 40 KEV + DATA MAP004/ + . 31, 21000, 7002, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810, 79456, 44175, 24274, 13256, 7214, + . 3919, 2126, 1154, 625, 340, 183, 100, 54, 30, + . 15, 9, 5, 5, + . 29, 23100, 6595, 12346,119540,610494,983131,726676,399082, + .197322, 93600, 43620, 20169, 9293, 4275, 1965, 903, 415, + . 190, 88, 40, 19, 8, 4, 2, 1, 0, + . 0, 0, + . 3, 25200, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 100 KEV + DATA MAP005/ + . 585, 639, 3, 0, 0, 3, 5858, 0, + . 33, 5879, 7538, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 110, 86, 66, 52, 52, + . 33, 6300, 7497, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 38, 26, 18, 13, 13, + . 33, 6719, 7429, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 1, 0, 0, 0, + . 33, 7139, 7575, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1, 0, 0, 0/ +C L=3.60 TO 4.50 100 KEV + DATA MAP006/ + . 34, 7559, 7698, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 0, 0, 0, 0, 0, + . 34, 7979, 7725, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, 0, 0, 0, + . 34, 8400, 7737, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 0, 0, 0, 0, + . 34, 9450, 7737, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 0, 0, 0/ +C L=5.00 TO 6.60 100 KEV + DATA MAP007/ + . 34, 10500, 7712, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, 1, 0, 0, + . 33, 11550, 7671, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 2, 1, 1, + . 33, 12600, 7538, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 4, 2, 2, + . 33, 13859, 7518, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 10, 6, 3, 3/ +C L=7.00 TO 9.00 100 KEV + DATA MAP008/ + . 33, 14700, 7429, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 24, 14, 8, 5, 5, + . 32, 15750, 7377, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 95, + . 56, 33, 19, 12, 12, + . 31, 16800, 7167, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 366, 217, 129, + . 76, 45, 27, 27, + . 29, 18900, 6568, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 3712, 2171, 1269, 742, 433, 253, 147, + . 87, 87/ +C L=10.00 TO 11.00 100 KEV + DATA MAP009/ + . 25, 21000, 5608, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810, 79456, 44175, 24274, 13256, 7214, + . 3919, 2126, 1154, 625, 340, 183, 183, + . 20, 23100, 4177, 12346,119540,610494,983131,726676,399082, + .197322, 93600, 43620, 20169, 9293, 4275, 1965, 903, 415, + . 190, 190, + . 3, 25200, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 300 KEV + DATA MAP010/ + . 522, 1919, 3, 0, 0, 3, 5858, 0, + . 30, 5879, 6890, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 110, 110, + . 31, 6300, 6940, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 38, 26, 26, + . 31, 6719, 6962, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 1, 1, + . 31, 7139, 7057, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1, 1/ +C L=3.60 TO 4.50 300 KEV + DATA MAP011/ + . 31, 7559, 7167, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 0, 0, + . 32, 7979, 7284, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 0, 0, + . 32, 8400, 7403, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 0, 0, + . 32, 9450, 7403, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 1/ +C L=5.00 TO 6.60 300 KEV + DATA MAP012/ + . 32, 10500, 7317, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 1, 1, + . 32, 11550, 7284, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 2, 2, + . 32, 12600, 7210, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 4, 4, + . 31, 13859, 7045, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 10, 10/ +C L=7.00 TO 10.00 300 KEV + DATA MAP013/ + . 30, 14700, 6893, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 24, 24, + . 30, 15750, 6688, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 95, + . 56, 33, 33, + . 28, 16800, 6260, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 366, 217, 129, + . 129, + . 24, 18900, 5300, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 3712, 2171, 1269, 1269, + . 19, 21000, 4023, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810, 79456, 44175, 24274, 13256, 7214, + . 7214, + . 3, 23519, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 500 KEV + DATA MAP014/ + . 495, 3200, 3, 0, 0, 3, 5858, 0, + . 29, 5879, 6551, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 142, 142, + . 29, 6300, 6632, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, 54, + . 30, 6719, 6688, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, 2, 2, + . 30, 7139, 6760, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1, 1/ +C L=3.60 TO 4.50 500 KEV + DATA MAP015/ + . 30, 7559, 6868, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, 1, + . 31, 7979, 6969, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, 1, + . 31, 8400, 7121, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, 1, + . 32, 9450, 7210, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1, 1, 1/ +C L=5.00 TO 6.60 500 KEV + DATA MAP016/ + . 31, 10500, 7121, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, 3, + . 31, 11550, 7063, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, 4, 4, + . 31, 12600, 6925, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, 11, 7, 7, + . 30, 13859, 6674, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 31, 18, 18/ +C L=7.00 TO 10.00 500 KEV + DATA MAP017/ + . 29, 14700, 6494, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116, 69, + . 40, 40, + . 27, 15750, 6116, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, 271, 160, 160, + . 25, 16800, 5561, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, 1755, 1042, 617, 617, + . 21, 18900, 4357, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, 84344, 51540, 30902, 18323, + . 10797, 6337, 6337, + . 14, 21000, 2686, 3361, 12264, 43191,135774,322732,492969, + .490645,367647,235979,139810,139810, + . 3, 22050, 0, 3, 32767, 0/ +C L=2.80 TO 3.40 1000 KEV + DATA MAP018/ + . 444, 6400, 3, 0, 0, 3, 5858, 0, + . 27, 5879, 5974, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, 297, 233, 182, + . 28, 6300, 6144, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, 110, 77, + . 54, + . 28, 6719, 6306, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, 5, + . 3, + . 29, 7139, 6424, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, 4, + . 2, 1/ +C L=3.60 TO 4.50 1000 KEV + DATA MAP019/ + . 29, 7559, 6568, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4, + . 2, 1, + . 30, 7979, 6701, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 2, 1, 1, + . 30, 8400, 6812, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 3, 1, 1, + . 30, 9450, 6885, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 5, 3, 1/ +C L=5.00 TO 7.00 1000 KEV + DATA MAP020/ + . 30, 10500, 6747, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, 14, + . 8, 5, 3, + . 29, 11550, 6551, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64, 37, 22, + . 13, 7, + . 28, 12600, 6347, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, 95, 56, 33, + . 19, + . 27, 13859, 5985, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, 425, 252, 149, 88, 52, + . 26, 14700, 5697, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, 1588, 943, 559, 331, 196, 116/ +C L=7.50 TO 9.00 1000 KEV + DATA MAP021/ + . 24, 15750, 5219, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 6190, 3688, 2192, 1301, 772, 457, + . 21, 16800, 4466, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, 37914, 23120, 13935, + . 8339, 4972, 2956, + . 14, 18900, 2664, 2173, 5916, 15868, 40969, 96591,189857, + .283250,312992,271156,199821,133564, + . 3, 20159, 0, 3, 32767, 0/ +C L=2.80 TO 3.60 2000 KEV + DATA MAP022/ + . 373, 12800, 3, 0, 0, 3, 5858, 0, + . 24, 5879, 5345, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, 377, + . 25, 6300, 5544, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, 223, 157, + . 26, 6719, 5701, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 23, 14, 9, + . 26, 7139, 5835, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, 7, + . 27, 7559, 5934, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12, 7, 4/ +C L=3.80 TO 5.50 2000 KEV + DATA MAP023/ + . 27, 7979, 6004, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, 7, 4, + . 27, 8400, 6044, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, 8, 5, + . 27, 9450, 5985, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, 14, 8, + . 26, 10500, 5834, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, 41, 24, + . 25, 11550, 5593, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307, 182, 108, 64/ +C L=6.00 TO 8.00 2000 KEV + DATA MAP024/ + . 24, 12600, 5300, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 1305, 775, 460, 272, 161, + . 22, 13859, 4701, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, 5730, + . 3420, 2035, 1209, 717, + . 20, 14700, 4305, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, 20636, 12512, 7516, + . 4489, 2673, + . 18, 15750, 3677, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638,106680, 71661, 45723, 28302, 17209, 10354, + . 15, 16800, 2949, 2003, 5172, 13138, 32034, 71261,133169, + .192775,211783,185426,139051, 94733, 60952, + . 3, 18269, 0, 3, 32767, 0/ +C L=2.80 TO 3.60 3000 KEV + DATA MAP025/ + . 327, 19200, 3, 0, 0, 3, 5858, 0, + . 23, 5879, 4935, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, 598, 477, + . 23, 6300, 5111, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, 447, 316, + . 24, 6719, 5300, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, 61, 38, 12, + . 25, 7139, 5405, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, 33, 20, 12, + . 25, 7559, 5527, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55, 33, 20, 12/ +C L=3.80 TO 5.50 3000 KEV + DATA MAP026/ + . 25, 7979, 5577, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, 35, 21, 12, + . 25, 8400, 5608, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, 40, 24, 14, + . 25, 9450, 5428, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, 71, 42, 25, + . 24, 10500, 5120, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331, 196, 116, 69, + . 22, 11550, 4747, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, 517, 307/ +C L=6.00 TO 8.00 3000 KEV + DATA MAP027/ + . 20, 12600, 4290, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 2195, 3105, + . 17, 13859, 3560, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, 15787, 9551, + . 15, 14700, 2944, 1998, 5133, 12870, 30443, 63655,107659, + .138483,137127,111546, 79866, 52923, 33497, + . 12, 15750, 2048, 2000, 5155, 13021, 31328, 67780,120934, + .165403,172612,145638, + . 8, 16800, 1024, 2003, 5172, 13138, 32034, 71261, + . 3, 17535, 0, 3, 32767, 0/ +C L=2.80 TO 3.60 4000 KEV + DATA MAP028/ + . 280, 25600, 3, 0, 0, 3, 5858, 0, + . 21, 5879, 4364, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, 1929, 1750, 1540, 1320, + . 1108, 914, 743, + . 21, 6300, 4466, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, 3062, 2301, 1695, + . 1230, 884, 630, + . 21, 6719, 4584, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, 647, 405, + . 253, 157, 98, + . 22, 7139, 4668, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, 394, + . 241, 147, 89, 54, + . 22, 7559, 4747, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, 423, + . 255, 153, 92, 55/ +C L=3.80 TO 5.00 4000 KEV + DATA MAP029/ + . 22, 7979, 4800, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, 471, + . 281, 167, 100, 59, + . 22, 8400, 4811, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, 555, + . 330, 196, 116, 68, + . 22, 9450, 4711, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621, 967, + . 575, 341, 202, 120, + . 21, 10500, 4515, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, 2646, 1580, + . 940, 559, 331/ +C L=5.50 TO 7.50 4000 KEV + DATA MAP030/ + . 20, 11550, 4255, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, 6843, 4118, 2462, + . 1467, 872, + . 18, 12600, 3805, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, 26763, 16688, 10192, 6147, 3681, + . 15, 13859, 3025, 1995, 5111, 12719, 29584, 59889, 96565, + .117985,112040, 88596, 62337, 40881, 25717, + . 12, 14700, 2228, 1998, 5133, 12800, 30443, 63655,107659, + .138483,137127,111546, + . 7, 15750, 924, 2000, 5155, 13021, 31328, + . 3, 16380, 0, 3, 32767, 0/ +C L=2.80 TO 4.50 5000 KEV + DATA MAP031/ + . 202, 32000, 3, 0, 0, 3, 5858, 0, + . 14, 5879, 2699, 456, 605, 789, 1007, 1251, 1505, + . 1744, 1939, 2064, 2103, 2054, + . 15, 6300, 3025, 800, 1274, 1969, 2915, 4063, 5241, + . 6174, 6612, 6463, 5832, 4930, 3960, + . 16, 6719, 3224, 1469, 2984, 5488, 8619, 11061, 11555, + . 10167, 7902, 5655, 3837, 2519, 1620, 1028, + . 17, 7139, 3359, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, 9280, 6418, 4222, 2695, 1688, 1046, 643, + . 17, 7559, 3461, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, 4882, 3065, 1891, 1154, 700, + . 17, 7979, 3529, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, 3549, 2167, 1310, 787, + . 17, 8400, 3560, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, 6884, 4262, 2592, 1559, 932, + . 17, 9450, 3479, 1959, 4826, 10980, 21339, 32513, 37510, + . 34064, 26154, 18074, 11727, 7331, 4483, 2707, 1621/ +C L=5.00 TO 7.00 5000 KEV + DATA MAP032/ + . 16, 10500, 3275, 1973, 4936, 11614, 24036, 40027, 50620, + . 49426, 39823, 28345, 18716, 11822, 7274, 4407, + . 15, 11550, 2961, 1983, 5011, 12078, 26219, 47036, 64751, + . 67962, 57576, 42282, 28446, 18167, 11251, + . 13, 12600, 2489, 1989, 5065, 12419, 27954, 53314, 79229, + . 89221, 79560, 60369, 41422, + . 9, 13859, 1481, 1995, 5111, 12719, 29584, 59889, 96565, + . 5, 14700, 308, 1998, 5133, + . 3, 14805, 0, 3, 32767, 0/ +C L=3.00 TO 5.50 6000 KEV + DATA MAP033/ + . 96, 38400, 3, 0, 0, 3, 5858, 0, + . 6, 6300, 407, 800, 1274, 1969, + . 7, 6719, 715, 1469, 2984, 5488, 8619, + . 10, 7139, 951, 1646, 3556, 6883, 11127, 14274, 14565, + . 12382, + . 12, 7559, 1150, 1777, 4023, 8138, 13593, 17687, 17989, + . 15087, 11114, 7549, + . 13, 7979, 1280, 1877, 4410, 9264, 15992, 21240, 21740, + . 18170, 13273, 8925, 5711, + . 12, 8400, 1311, 1936, 4662, 10100, 18060, 24762, 25899, + . 21886, 16047, 10786, + . 8, 9450, 1150, 1959, 4826, 10980, 21339, 32513, + . 7, 10500, 758, 1973, 4936, 11614, 24036, + . 7, 11550, 269, 1983, 5011, 12078, 26219, + . 3, 12075, 0, 3, 32767, 0, + . 0/ + END diff --git a/SOFIP/guzik_version/ap8mac.for b/SOFIP/guzik_version/ap8mac.for new file mode 100755 index 0000000..e05b192 --- /dev/null +++ b/SOFIP/guzik_version/ap8mac.for @@ -0,0 +1,818 @@ + BLOCK DATA + DOUBLE PRECISION NAME + COMMON/ AP8MAC /NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH + X,MAP 1(163),MAP 2(163),MAP 3(163),MAP 4(163),MAP 5(163) + X,MAP 6(163),MAP 7(163),MAP 8(163),MAP 9(163),MAP 10(163) + X,MAP 11(163),MAP 12(163),MAP 13(163),MAP 14(163),MAP 15(163) + X,MAP 16(163),MAP 17(163),MAP 18(163),MAP 19(163),MAP 20(163) + X,MAP 21(163),MAP 22(163),MAP 23(163),MAP 24(163),MAP 25(163) + X,MAP 26(163),MAP 27(163),MAP 28(163),MAP 29(163),MAP 30(163) + X,MAP 31(163),MAP 32(163),MAP 33(163),MAP 34(163),MAP 35(163) + X,MAP 36(163),MAP 37(163),MAP 38(163),MAP 39(163),MAP 40(153) + DATA NAME /8H AP8MAC / + DATA EPOCH / 1970.000/ + DATA SCAE / 100.000/ + DATA SCAL / 2048.000/ + DATA SCAB / 2048.000/ + DATA SCAF / 1024.000/ + DATA LENGTH/ 6509/ + DATA MAP 1/ + X 874, 10, 3, 0, 0, 3, 2333, 0, 10, + X 2355, 1740, 26, 24, 19, 16, 14, 11, 7, + X 14, 2396, 2814, 47, 35, 30, 19, 11, 10, + X 6, 7, 6, 4, 4, 17, 2457, 3519, 88, + X 72, 59, 50, 44, 30, 23, 17, 12, 9, + X 7, 5, 5, 9, 22, 2662, 4651, 197, 199, + X 174, 143, 108, 75, 62, 51, 42, 35, 25, + X 21, 17, 15, 14, 12, 12, 15, 21, 24, + X 2867, 5303, 199, 226, 254, 258, 242, 220, 188, + X 163, 96, 73, 61, 32, 25, 18, 15, 14, + X 14, 15, 16, 19, 25, 26, 3072, 5864, 230, + X 255, 288, 310, 313, 320, 307, 273, 231, 199, + X 139, 110, 85, 63, 50, 37, 28, 21, 13, + X 11, 9, 9, 9, 28, 3276, 6182, 286, 324, + X 358, 383, 401, 395, 383, 365, 336, 297, 212, + X 183, 155, 131, 114, 85, 73, 59, 50, 39, + X 33, 21, 20, 22, 32, 29, 3481, 6577, 294, + X 340, 389, 450, 477, 460, 481, 478, 436, 377, + Y 297/ + DATA MAP 2/ + X 254, 233, 212, 189, 170, 155, 136, 112, 83, + X 60, 48, 29, 20, 24, 45, 30, 3686, 6855, + X 312, 364, 416, 478, 519, 540, 587, 600, 550, + X 508, 482, 417, 340, 286, 253, 218, 186, 175, + X 158, 136, 117, 97, 78, 65, 37, 38, 42, + X 31, 3891, 7129, 314, 375, 448, 542, 624, 699, + X 795, 874, 874, 745, 605, 468, 341, 284, 250, + X 223, 179, 142, 136, 119, 107, 104, 103, 104, + X 119, 136, 154, 176, 32, 4096, 7407, 334, 394, + X 475, 577, 703, 827, 972, 1093, 1188, 1074, 908, + X 636, 435, 348, 274, 219, 165, 164, 158, 139, + X 125, 119, 115, 115, 114, 119, 125, 125, 127, + X 33, 4300, 7621, 366, 450, 557, 675, 769, 967, + X 1265, 1501, 1460, 1187, 946, 678, 526, 425, 350, + X 258, 249, 241, 211, 203, 181, 155, 141, 142, + X 142, 146, 149, 149, 160, 209, 34, 4505, 7867, + X 382, 471, 591, 752, 959, 1200, 1505, 1721, 1812, + X 1669, 1402, 941, 613, 451, 303, 216, 190, 188, + Y 190/ + DATA MAP 3/ + X 187, 172, 155, 142, 145, 149, 159, 168, 172, + X 180, 205, 237, 35, 4710, 8054, 415, 508, 642, + X 842, 1147, 1476, 1802, 2034, 2054, 1878, 1601, 1346, + X 780, 611, 400, 311, 287, 277, 258, 218, 188, + X 181, 176, 168, 162, 159, 162, 166, 170, 179, + X 197, 281, 35, 4915, 8191, 429, 552, 758, 1046, + X 1448, 1880, 2204, 2295, 2373, 2118, 1778, 1391, 880, + X 660, 384, 284, 315, 322, 322, 314, 309, 290, + X 254, 228, 219, 216, 215, 216, 224, 228, 228, + X 233, 36, 5120, 8348, 436, 579, 831, 1177, 1604, + X 2078, 2467, 2696, 2584, 2459, 2157, 1616, 1211, 974, + X 791, 678, 614, 603, 520, 356, 287, 168, 169, + X 167, 172, 177, 176, 178, 182, 185, 184, 194, + X 240, 36, 5324, 8441, 478, 648, 958, 1333, 1836, + X 2343, 2773, 3311, 3419, 2803, 2140, 1621, 1319, 1072, + X 844, 694, 522, 447, 366, 324, 325, 326, 328, + X 330, 331, 334, 335, 330, 324, 324, 330, 346, + X 380, 37, 5529, 8530, 535, 724, 1032, 1500, 2095, + Y 2747/ + DATA MAP 4/ + X 3316, 4200, 3472, 2907, 2306, 2010, 1668, 1471, 1297, + X 1124, 775, 608, 544, 450, 359, 315, 313, 315, + X 319, 320, 321, 322, 323, 324, 329, 335, 368, + X 305, 37, 5734, 8610, 564, 781, 1155, 1669, 2312, + X 3090, 4074, 5030, 4602, 3857, 3266, 1855, 1449, 1031, + X 825, 803, 769, 715, 630, 517, 423, 405, 399, + X 395, 392, 410, 422, 421, 414, 406, 396, 398, + X 404, 416, 38, 6144, 8722, 604, 898, 1472, 2354, + X 3537, 5035, 6435, 7318, 5921, 4842, 3838, 3039, 2426, + X 1935, 1450, 1152, 921, 737, 566, 486, 412, 325, + X 316, 310, 311, 309, 319, 328, 328, 325, 317, + X 302, 301, 295, 280, 38, 6963, 8763, 745, 1340, + X 2634, 4863, 8313, 11557, 12095, 9931, 8798, 4460, 3611, + X 2250, 1768, 1661, 1348, 1094, 886, 860, 794, 728, + X 706, 870, 860, 847, 854, 868, 878, 878, 875, + X 870, 869, 850, 832, 804, 778, 37, 7782, 8451, + X 1037, 2053, 4320, 8234, 13247, 19364, 16095, 14423, 8192, + X 6289, 5014, 3402, 2768, 2848, 2891, 2928, 2726, 2438, + Y 2119/ + DATA MAP 5/ + X 1818, 1556, 1405, 1251, 1121, 1098, 1078, 1085, 1087, + X 1092, 1090, 1060, 1020, 948, 798, 36, 8601, 8201, + X 1062, 2374, 5797, 11755, 18805, 25569, 23593, 20955, 12019, + X 8725, 6250, 4196, 3353, 3278, 3143, 2868, 2756, 2757, + X 2671, 2585, 2560, 2549, 2551, 2574, 2602, 2610, 2605, + X 2580, 2526, 2444, 2308, 2126, 1593, 35, 9420, 8014, + X 1038, 2625, 7002, 17078, 28580, 38218, 28555, 23784, 14905, + X 11120, 8605, 6453, 4668, 4644, 4592, 4364, 4336, 4353, + X 4256, 3923, 3552, 3377, 3348, 3337, 3353, 3360, 3388, + X 3398, 3367, 3347, 3357, 3459, 34, 10240, 7822, 1097, + X 3528, 11320, 30959, 45133, 53296, 39292, 32724, 20426, 14875, + X 10911, 8529, 5325, 4152, 3082, 3242, 3447, 3667, 3830, + X 4060, 4536, 4778, 4570, 4412, 4498, 4488, 4240, 4153, + X 4479, 5171, 839, 33, 11264, 7605, 973, 3803, 17998, + X 46677, 62123, 61152, 47671, 35256, 27396, 19708, 13998, 11838, + X 7860, 7709, 7271, 7088, 7038, 6993, 6975, 7063, 7193, + X 7321, 7394, 7338, 6942, 6839, 6984, 7192, 7622, 8761, + X 32, 12288, 7377, 828, 3421, 18339, 42434, 68271, 86460, + Y 57767/ + DATA MAP 6/ + X 47630, 30906, 22593, 17972, 14424, 12692, 13367, 13302, 12054, + X 11412, 11977, 12466, 12773, 13205, 13097, 12909, 12830, 12615, + X 12871, 13077, 13745, 15513, 31, 13516, 7063, 913, 2335, + X 9874, 30730, 56329, 75941, 78564, 67183, 58077, 49459, 43291, + X 37201, 31822, 27507, 25464, 25615, 24834, 23578, 23705, 23609, + X 23880, 24027, 24368, 24596, 25015, 27160, 24452, 2795, 3, + X 20480, 0, 3, 32767, 0, 861, 20, 3, 0, + X 0, 3, 2333, 0, 10, 2355, 1731, 26, 24, + X 19, 16, 14, 11, 7, 14, 2396, 2810, 47, + X 35, 30, 19, 11, 10, 6, 7, 6, 4, + X 4, 17, 2457, 3517, 87, 73, 59, 49, 44, + X 30, 23, 17, 12, 10, 5, 6, 5, 5, + X 22, 2662, 4649, 195, 199, 176, 143, 107, 75, + X 62, 51, 42, 35, 25, 21, 18, 14, 15, + X 12, 11, 15, 14, 24, 2867, 5300, 200, 225, + X 255, 255, 246, 218, 189, 161, 97, 73, 60, + X 32, 26, 17, 15, 14, 14, 15, 16, 19, + X 18, 26, 3072, 5861, 229, 254, 290, 310, 312, + Y 319/ + DATA MAP 7/ + X 311, 272, 229, 198, 141, 110, 84, 63, 50, + X 38, 28, 20, 15, 9, 9, 9, 10, 28, + X 3276, 6178, 286, 328, 355, 381, 402, 398, 381, + X 362, 338, 299, 211, 181, 157, 131, 113, 85, + X 73, 59, 49, 40, 32, 21, 20, 22, 23, + X 29, 3481, 6571, 295, 338, 390, 451, 479, 460, + X 483, 478, 436, 374, 295, 256, 232, 212, 190, + X 171, 153, 137, 111, 84, 59, 48, 28, 19, + X 26, 44, 30, 3686, 6844, 315, 363, 415, 478, + X 524, 543, 589, 602, 553, 508, 477, 414, 341, + X 285, 252, 216, 187, 174, 158, 135, 116, 97, + X 77, 63, 38, 38, 38, 31, 3891, 7090, 323, + X 390, 457, 557, 629, 720, 796, 890, 857, 741, + X 579, 451, 340, 285, 246, 223, 172, 145, 132, + X 118, 108, 104, 101, 107, 121, 140, 153, 154, + X 32, 4096, 7354, 344, 409, 487, 590, 718, 854, + X 1001, 1128, 1196, 1044, 890, 585, 424, 337, 262, + X 210, 163, 165, 157, 137, 123, 116, 114, 115, + Y 116/ + DATA MAP 8/ + X 121, 124, 125, 131, 33, 4300, 7570, 372, 452, + X 549, 667, 803, 1017, 1308, 1529, 1404, 1162, 917, + X 641, 521, 427, 354, 262, 258, 244, 211, 204, + X 179, 154, 142, 142, 142, 146, 148, 151, 164, + X 216, 34, 4505, 7793, 379, 455, 570, 731, 977, + X 1227, 1535, 1743, 1780, 1630, 1365, 939, 620, 455, + X 352, 222, 194, 193, 198, 192, 175, 154, 141, + X 144, 147, 161, 171, 173, 180, 211, 218, 35, + X 4710, 7966, 404, 488, 613, 831, 1185, 1531, 1878, + X 2067, 2052, 1835, 1553, 1300, 773, 605, 400, 315, + X 290, 285, 260, 221, 193, 183, 177, 167, 162, + X 162, 163, 166, 171, 181, 200, 286, 35, 4915, + X 8093, 426, 545, 746, 1062, 1465, 1848, 2164, 2343, + X 2409, 2131, 1785, 1365, 876, 642, 372, 276, 326, + X 334, 327, 311, 304, 287, 253, 229, 219, 216, + X 217, 219, 220, 225, 231, 238, 36, 5120, 8218, + X 448, 595, 877, 1251, 1678, 2096, 2446, 2692, 2680, + X 2424, 2103, 1476, 1135, 949, 791, 677, 601, 582, + Y 524/ + DATA MAP 9/ + X 362, 306, 172, 170, 166, 172, 175, 173, 173, + X 177, 188, 187, 193, 237, 36, 5324, 8322, 478, + X 645, 949, 1348, 1882, 2446, 2841, 3274, 3281, 2732, + X 2126, 1643, 1330, 1072, 838, 695, 537, 459, 375, + X 328, 320, 317, 320, 322, 328, 331, 334, 333, + X 327, 328, 332, 344, 382, 36, 5529, 8423, 502, + X 675, 1008, 1498, 2133, 2841, 3447, 4058, 3374, 2842, + X 2267, 2051, 1689, 1478, 1308, 1117, 828, 601, 553, + X 459, 374, 313, 303, 303, 314, 321, 323, 322, + X 322, 326, 330, 339, 368, 37, 5734, 8507, 511, + X 703, 1047, 1615, 2311, 3191, 4062, 4984, 4264, 3746, + X 3357, 1963, 1500, 1113, 860, 804, 783, 725, 672, + X 562, 462, 398, 400, 401, 408, 408, 407, 408, + X 414, 413, 412, 411, 403, 400, 37, 6144, 8612, + X 558, 774, 1201, 2043, 3199, 4581, 6000, 6729, 6150, + X 5230, 4177, 3435, 2699, 2119, 1659, 1148, 1024, 808, + X 647, 476, 444, 353, 311, 308, 306, 306, 309, + X 321, 330, 322, 317, 317, 315, 307, 37, 6963, + Y 8587/ + DATA MAP 10/ + X 692, 1088, 1992, 3453, 5800, 8838, 11312, 10008, 9045, + X 8377, 4344, 3557, 2187, 1751, 1627, 1330, 1087, 885, + X 832, 748, 674, 665, 784, 829, 847, 853, 863, + X 871, 877, 881, 872, 866, 849, 833, 36, 7782, + X 8258, 862, 1621, 3341, 5892, 9631, 14765, 19120, 14600, + X 12656, 6845, 5547, 4497, 3150, 2854, 2905, 2883, 2817, + X 2688, 2447, 2071, 1730, 1483, 1247, 1149, 1112, 1059, + X 1040, 1063, 1097, 1103, 1101, 1096, 1039, 35, 8601, + X 7974, 909, 1760, 4040, 8630, 14664, 20515, 24478, 21433, + X 18823, 11208, 8233, 5687, 3540, 3378, 3348, 3101, 3036, + X 2968, 2768, 2624, 2540, 2486, 2502, 2548, 2613, 2644, + X 2580, 2511, 2496, 2451, 2307, 2033, 34, 9420, 7720, + X 887, 1868, 5173, 10913, 19119, 28304, 35276, 26805, 21006, + X 14469, 10736, 8279, 6230, 4862, 5056, 5146, 5163, 5185, + X 4901, 4182, 3603, 3372, 3367, 3365, 3396, 3434, 3484, + X 3467, 3370, 3259, 3202, 33, 10240, 7449, 847, 2149, + X 5927, 13285, 27861, 38919, 44550, 36595, 30908, 25054, 17307, + X 13158, 9905, 7109, 4811, 3696, 2974, 3018, 3271, 3714, + Y 3828/ + DATA MAP 11/ + X 3741, 3948, 4071, 3945, 4183, 4416, 4491, 4365, 4285, + X 31, 11264, 7123, 798, 2023, 9118, 28050, 46908, 59170, + X 51113, 42329, 32758, 26764, 18817, 13107, 11586, 8984, 7765, + X 7692, 7070, 6926, 6862, 7121, 6862, 7313, 7223, 7169, + X 7064, 7133, 6529, 7041, 30, 12288, 6799, 777, 2110, + X 10075, 29071, 56377, 72072, 69929, 52809, 40026, 28183, 21131, + X 16579, 12927, 10434, 12876, 14824, 12506, 11152, 12073, 12446, + X 12927, 13002, 13291, 12850, 13021, 12279, 13234, 29, 13516, + X 6400, 745, 1890, 7095, 25419, 45079, 65303, 79899, 68012, + X 60001, 52424, 45500, 38955, 34167, 30242, 25962, 23415, 24372, + X 24157, 23102, 22849, 22146, 24514, 26260, 24343, 22772, 26066, + X 3, 20480, 0, 3, 32767, 0, 810, 60, 3, + X 0, 0, 3, 2334, 0, 10, 2355, 1717, 26, + X 24, 19, 16, 14, 11, 12, 14, 2396, 2804, + X 47, 35, 30, 19, 11, 10, 6, 7, 6, + X 4, 4, 17, 2457, 3514, 86, 73, 58, 50, + X 43, 30, 23, 17, 12, 10, 5, 6, 5, + X 5, 22, 2662, 4645, 192, 196, 182, 143, 106, + Y 74/ + DATA MAP 12/ + X 62, 51, 42, 35, 25, 21, 18, 14, 15, + X 12, 11, 15, 15, 24, 2867, 5294, 198, 227, + X 254, 254, 251, 218, 186, 160, 98, 72, 60, + X 32, 26, 16, 16, 13, 15, 15, 16, 18, + X 18, 26, 3072, 5850, 229, 257, 289, 310, 313, + X 321, 312, 273, 228, 195, 141, 108, 84, 62, + X 50, 37, 27, 20, 15, 10, 8, 10, 9, + X 28, 3276, 6166, 286, 326, 360, 378, 401, 397, + X 388, 358, 342, 297, 213, 177, 161, 129, 113, + X 82, 73, 59, 49, 39, 32, 21, 20, 23, + X 22, 29, 3481, 6546, 294, 339, 390, 456, 478, + X 467, 486, 479, 433, 370, 293, 253, 234, 215, + X 193, 172, 150, 137, 108, 81, 58, 46, 27, + X 21, 26, 44, 30, 3686, 6802, 315, 365, 418, + X 473, 526, 564, 606, 606, 553, 508, 476, 404, + X 333, 282, 250, 215, 185, 176, 160, 131, 112, + X 94, 76, 58, 38, 39, 38, 31, 3891, 6979, + X 349, 409, 477, 582, 664, 750, 829, 870, 823, + Y 715/ + DATA MAP 13/ + X 555, 428, 337, 287, 247, 225, 154, 147, 130, + X 115, 107, 105, 101, 111, 130, 145, 151, 123, + X 32, 4096, 7202, 360, 430, 511, 620, 760, 917, + X 1078, 1252, 1213, 1001, 790, 476, 388, 307, 240, + X 184, 161, 168, 153, 130, 117, 112, 112, 118, + X 121, 121, 123, 132, 141, 32, 4300, 7380, 392, + X 470, 543, 672, 931, 1167, 1468, 1559, 1278, 1051, + X 800, 578, 496, 414, 343, 271, 269, 247, 215, + X 201, 174, 153, 143, 141, 141, 145, 149, 157, + X 173, 33, 4505, 7559, 387, 470, 569, 747, 1031, + X 1304, 1603, 1773, 1772, 1573, 1374, 815, 591, 434, + X 333, 226, 206, 203, 211, 199, 172, 148, 142, + X 143, 150, 166, 173, 173, 184, 241, 34, 4710, + X 7700, 397, 492, 654, 873, 1163, 1534, 1885, 2091, + X 2066, 1802, 1512, 1274, 763, 597, 401, 315, 302, + X 297, 270, 224, 196, 188, 180, 169, 165, 162, + X 164, 166, 173, 186, 205, 34, 4915, 7817, 399, + X 520, 723, 983, 1310, 1751, 2151, 2394, 2539, 2282, + Y 1871/ + DATA MAP 14/ + X 1418, 862, 624, 371, 272, 327, 328, 324, 317, + X 311, 289, 251, 222, 217, 218, 225, 230, 225, + X 221, 227, 34, 5120, 7922, 408, 544, 779, 1093, + X 1501, 2002, 2396, 2626, 2902, 2546, 2192, 1386, 1130, + X 938, 793, 685, 596, 555, 534, 483, 345, 282, + X 175, 171, 166, 174, 180, 179, 183, 188, 186, + X 35, 5324, 8005, 430, 584, 833, 1135, 1610, 2258, + X 2738, 3148, 3248, 2852, 2394, 1896, 1389, 1160, 948, + X 744, 598, 496, 390, 340, 321, 318, 321, 322, + X 319, 318, 327, 334, 330, 329, 337, 345, 35, + X 5529, 8079, 437, 583, 872, 1239, 1815, 2497, 3008, + X 3518, 3736, 3032, 2549, 2206, 1981, 1479, 1326, 1179, + X 1007, 749, 582, 541, 447, 370, 318, 306, 308, + X 316, 317, 314, 319, 330, 334, 334, 35, 5734, + X 8120, 451, 616, 928, 1358, 2006, 2723, 3356, 4046, + X 4373, 4102, 3451, 2925, 1741, 1354, 1020, 818, 786, + X 790, 778, 704, 554, 454, 400, 395, 391, 391, + X 394, 403, 413, 418, 419, 419, 35, 6144, 8172, + Y 443/ + DATA MAP 15/ + X 613, 956, 1406, 2186, 3270, 4200, 4906, 5635, 6031, + X 5108, 4300, 3477, 2951, 2416, 1902, 1463, 1075, 856, + X 701, 581, 485, 422, 310, 319, 315, 315, 315, + X 314, 319, 321, 312, 35, 6963, 8014, 519, 720, + X 1175, 2004, 3122, 4531, 6786, 8972, 8833, 8897, 8207, + X 7248, 4298, 3142, 2184, 1780, 1732, 1392, 1077, 853, + X 734, 640, 632, 602, 755, 850, 847, 860, 873, + X 894, 911, 888, 33, 7782, 7608, 567, 860, 1576, + X 2793, 4340, 6755, 10578, 14463, 17058, 13071, 10830, 8050, + X 5562, 4457, 3202, 3114, 3079, 2931, 2826, 2642, 2192, + X 1772, 1448, 1224, 1128, 1070, 1074, 1087, 1073, 1067, + X 31, 8601, 7131, 532, 913, 1616, 3018, 5419, 9207, + X 14456, 19329, 22536, 23381, 16778, 13874, 7750, 4716, 3579, + X 3854, 4079, 3935, 3234, 2625, 2585, 2586, 2572, 2550, + X 2561, 2513, 2596, 2641, 29, 9420, 6630, 506, 864, + X 1562, 3128, 5983, 10205, 16453, 24342, 29366, 27618, 22287, + X 18444, 15934, 10004, 8329, 7515, 7355, 6759, 6134, 3818, + X 3562, 3340, 3275, 3238, 3322, 3645, 27, 10240, 6012, + Y 438/ + DATA MAP 16/ + X 780, 1255, 2525, 5944, 11157, 19076, 32094, 37873, 38300, + X 32050, 24974, 19668, 15500, 10208, 8437, 7279, 5732, 4322, + X 3172, 2437, 2429, 2529, 2820, 25, 11264, 5475, 439, + X 724, 1428, 3344, 7002, 13165, 26384, 37240, 42053, 41304, + X 33930, 29309, 25763, 23855, 15288, 12002, 8386, 8387, 8272, + X 7777, 6884, 8015, 24, 12288, 5162, 409, 654, 1223, + X 2547, 6141, 11659, 19324, 32440, 48198, 55163, 54196, 41046, + X 35533, 30532, 26128, 17942, 14105, 11156, 9471, 10682, 15977, + X 22, 13516, 4758, 438, 733, 1327, 2456, 5208, 10804, + X 19805, 26527, 34336, 43649, 50222, 50500, 43690, 40191, 36566, + X 32282, 28428, 29400, 39894, 3, 20480, 0, 3, 32767, + X 0, 765, 100, 3, 0, 0, 3, 2334, 0, + X 10, 2355, 1707, 26, 24, 19, 16, 14, 11, + X 12, 14, 2396, 2798, 47, 35, 30, 19, 11, + X 10, 6, 7, 6, 4, 3, 17, 2457, 3510, + X 85, 72, 58, 50, 44, 29, 23, 17, 12, + X 9, 6, 6, 5, 5, 22, 2662, 4640, 192, + X 190, 189, 142, 106, 72, 63, 51, 42, 34, + Y 26/ + DATA MAP 17/ + X 20, 18, 14, 15, 12, 12, 14, 14, 24, + X 2867, 5285, 200, 229, 255, 249, 257, 217, 184, + X 157, 99, 71, 59, 32, 25, 17, 15, 13, + X 15, 15, 16, 18, 19, 26, 3072, 5838, 229, + X 260, 287, 311, 314, 325, 313, 272, 227, 192, + X 141, 107, 82, 63, 48, 37, 27, 20, 14, + X 10, 8, 10, 10, 28, 3276, 6153, 288, 327, + X 355, 381, 402, 398, 384, 360, 347, 297, 209, + X 175, 166, 127, 110, 82, 74, 58, 48, 40, + X 31, 21, 20, 23, 22, 29, 3481, 6520, 293, + X 341, 391, 459, 485, 471, 488, 477, 428, 369, + X 288, 254, 233, 219, 195, 173, 146, 138, 105, + X 79, 56, 45, 26, 21, 29, 28, 30, 3686, + X 6761, 315, 368, 416, 471, 529, 576, 625, 615, + X 559, 505, 473, 390, 328, 284, 246, 212, 184, + X 175, 162, 129, 109, 90, 74, 55, 38, 39, + X 36, 30, 3891, 6909, 349, 420, 499, 590, 667, + X 767, 826, 854, 808, 713, 556, 421, 338, 292, + Y 252/ + DATA MAP 18/ + X 222, 151, 150, 131, 112, 107, 105, 102, 114, + X 135, 147, 124, 31, 4096, 7094, 367, 438, 521, + X 645, 797, 967, 1144, 1301, 1190, 1008, 652, 459, + X 370, 295, 228, 175, 161, 168, 150, 128, 116, + X 114, 114, 119, 119, 121, 127, 131, 32, 4300, + X 7242, 393, 470, 566, 725, 980, 1226, 1507, 1532, + X 1253, 1015, 755, 563, 479, 402, 330, 274, 272, + X 245, 220, 201, 170, 150, 142, 141, 142, 147, + X 151, 162, 182, 32, 4505, 7377, 389, 477, 603, + X 803, 1084, 1380, 1698, 1885, 1755, 1484, 1308, 716, + X 552, 405, 291, 221, 211, 213, 213, 194, 165, + X 144, 145, 147, 156, 167, 169, 175, 193, 33, + X 4710, 7487, 402, 497, 650, 870, 1182, 1534, 1887, + X 2151, 2164, 1787, 1427, 1218, 762, 592, 405, 328, + X 320, 307, 269, 222, 195, 192, 179, 165, 164, + X 163, 162, 166, 177, 192, 33, 4915, 7586, 385, + X 507, 716, 958, 1247, 1730, 2186, 2509, 2676, 2305, + X 1857, 1382, 829, 597, 361, 270, 331, 329, 329, + Y 325/ + DATA MAP 19/ + X 317, 286, 242, 218, 215, 218, 229, 229, 228, + X 234, 33, 5120, 7658, 394, 521, 738, 1016, 1403, + X 1945, 2432, 2777, 2979, 2536, 2184, 1350, 1116, 921, + X 786, 685, 595, 539, 531, 503, 384, 306, 197, + X 175, 168, 173, 177, 182, 190, 195, 34, 5324, + X 7723, 404, 535, 772, 1078, 1518, 2111, 2620, 2998, + X 3280, 2956, 2457, 1950, 1517, 1226, 998, 801, 659, + X 541, 406, 348, 327, 322, 325, 327, 321, 320, + X 323, 325, 330, 331, 344, 34, 5529, 7777, 394, + X 519, 759, 1101, 1584, 2211, 2829, 3391, 3763, 3252, + X 2732, 2287, 2053, 1620, 1292, 1192, 1033, 882, 588, + X 585, 499, 396, 331, 318, 311, 314, 320, 320, + X 321, 336, 345, 34, 5734, 7795, 380, 508, 763, + X 1147, 1680, 2342, 3020, 3733, 4289, 4343, 3894, 3250, + X 2097, 1406, 1115, 885, 816, 822, 823, 779, 634, + X 475, 408, 402, 393, 385, 387, 404, 417, 429, + X 438, 34, 6144, 7762, 402, 537, 792, 1203, 1853, + X 2671, 3553, 4507, 5362, 5934, 5192, 4407, 3776, 3402, + Y 2944/ + DATA MAP 20/ + X 2216, 1761, 1299, 1034, 828, 659, 534, 463, 321, + X 316, 323, 311, 314, 316, 328, 332, 33, 6963, + X 7500, 452, 598, 912, 1468, 2366, 3486, 4895, 6738, + X 8179, 8549, 9508, 8129, 7166, 3783, 2852, 2096, 1831, + X 1702, 1265, 1007, 828, 718, 651, 603, 637, 814, + X 849, 858, 895, 914, 31, 7782, 6939, 522, 755, + X 1260, 2152, 3389, 5055, 7932, 11779, 15030, 16017, 12407, + X 9994, 7887, 5242, 4287, 3624, 3363, 2964, 2914, 2797, + X 2082, 1712, 1417, 1220, 1144, 1117, 1122, 1120, 28, + X 8601, 6284, 407, 672, 1225, 2011, 3440, 5889, 9939, + X 16037, 21522, 24071, 23418, 15698, 11009, 6282, 4591, 4462, + X 4805, 4425, 3371, 2614, 2541, 2463, 2461, 2734, 2612, + X 25, 9420, 5547, 350, 460, 755, 1190, 2188, 4496, + X 7724, 13039, 20767, 32944, 35094, 30524, 21946, 19605, 10265, + X 8768, 7317, 6065, 4203, 3658, 3354, 3529, 22, 10240, + X 4636, 277, 416, 666, 965, 1422, 3044, 4816, 7207, + X 11505, 20471, 42537, 41723, 37898, 27898, 20383, 15476, 12570, + X 9422, 9065, 19, 11264, 3924, 309, 355, 544, 862, + Y 1231/ + DATA MAP 21/ + X 2579, 4232, 5960, 9071, 21152, 34273, 41233, 41140, 36631, + X 25294, 28206, 17, 12288, 3497, 311, 394, 644, 1006, + X 1694, 3708, 5976, 9598, 15923, 26355, 37962, 45523, 48895, + X 53970, 16, 13516, 3098, 349, 447, 680, 1029, 1603, + X 3188, 5529, 9136, 15107, 22390, 27256, 35118, 63012, 3, + X 20480, 0, 3, 32767, 0, 646, 200, 3, 0, + X 0, 3, 2334, 0, 10, 2355, 1698, 26, 24, + X 19, 16, 14, 11, 7, 14, 2396, 2794, 47, + X 35, 30, 19, 11, 10, 6, 7, 6, 4, + X 3, 17, 2457, 3509, 84, 73, 58, 49, 44, + X 29, 23, 17, 12, 9, 6, 6, 5, 5, + X 22, 2662, 4628, 198, 188, 189, 142, 104, 71, + X 64, 50, 42, 34, 25, 20, 18, 14, 15, + X 12, 12, 14, 14, 24, 2867, 5263, 201, 230, + X 259, 261, 251, 218, 182, 152, 98, 70, 56, + X 32, 25, 16, 15, 14, 14, 15, 16, 19, + X 18, 26, 3072, 5806, 231, 261, 287, 311, 322, + X 332, 312, 275, 228, 186, 138, 104, 80, 61, + Y 47/ + DATA MAP 22/ + X 35, 26, 20, 13, 10, 8, 10, 9, 27, + X 3276, 6120, 289, 329, 354, 378, 401, 402, 391, + X 374, 335, 295, 216, 179, 159, 127, 107, 81, + X 72, 57, 46, 39, 30, 20, 21, 22, 29, + X 3481, 6457, 298, 337, 394, 468, 503, 476, 495, + X 475, 425, 354, 282, 248, 238, 227, 203, 173, + X 147, 127, 100, 75, 54, 39, 25, 22, 29, + X 29, 30, 3686, 6660, 310, 368, 427, 505, 559, + X 606, 636, 614, 553, 510, 466, 349, 320, 289, + X 238, 201, 183, 186, 162, 121, 102, 84, 67, + X 48, 38, 39, 35, 30, 3891, 6779, 351, 420, + X 516, 625, 692, 789, 824, 831, 789, 696, 555, + X 413, 340, 293, 253, 220, 159, 153, 128, 114, + X 111, 105, 105, 124, 140, 143, 143, 30, 4096, + X 6877, 369, 450, 559, 703, 862, 1046, 1233, 1342, + X 1104, 953, 566, 432, 344, 269, 208, 165, 172, + X 171, 144, 126, 116, 114, 117, 120, 121, 124, + X 131, 31, 4300, 6961, 390, 475, 612, 797, 1035, + Y 1261/ + DATA MAP 23/ + X 1486, 1509, 1242, 1010, 748, 561, 467, 387, 313, + X 286, 274, 237, 221, 189, 160, 145, 142, 142, + X 143, 149, 160, 175, 31, 4505, 7006, 391, 491, + X 641, 841, 1093, 1454, 1813, 2011, 1845, 1479, 1150, + X 662, 489, 377, 236, 216, 215, 215, 204, 180, + X 160, 153, 150, 155, 164, 169, 174, 189, 31, + X 4710, 7034, 392, 498, 662, 862, 1152, 1611, 2070, + X 2276, 2146, 1776, 1412, 1171, 740, 548, 380, 344, + X 345, 309, 247, 217, 202, 183, 167, 165, 163, + X 162, 163, 178, 31, 4915, 7052, 367, 474, 667, + X 932, 1261, 1779, 2413, 2912, 3112, 2191, 1965, 884, + X 688, 466, 295, 312, 352, 352, 343, 331, 298, + X 246, 218, 219, 222, 228, 232, 240, 31, 5120, + X 7053, 356, 462, 649, 939, 1356, 1934, 2551, 3001, + X 3214, 2542, 2157, 1302, 1085, 884, 753, 655, 585, + X 566, 565, 515, 347, 287, 174, 177, 173, 173, + X 179, 196, 31, 5324, 7044, 336, 430, 651, 979, + X 1381, 2068, 2707, 3168, 3518, 3358, 2516, 2002, 1479, + Y 1181/ + DATA MAP 24/ + X 942, 774, 645, 526, 364, 338, 322, 314, 315, + X 323, 334, 334, 335, 349, 31, 5529, 7036, 340, + X 431, 640, 990, 1463, 2210, 2861, 3298, 3675, 3671, + X 2905, 2421, 2001, 1596, 1226, 1167, 1039, 876, 648, + X 590, 519, 397, 337, 313, 310, 322, 329, 343, + X 31, 5734, 6965, 333, 432, 657, 1028, 1521, 2222, + X 2979, 3609, 4149, 4578, 4425, 3271, 2419, 1473, 1146, + X 932, 879, 878, 834, 750, 512, 428, 405, 401, + X 386, 382, 413, 462, 30, 6144, 6834, 326, 405, + X 599, 999, 1560, 2221, 3024, 3994, 5118, 5921, 6091, + X 4842, 4163, 3676, 3274, 2679, 1830, 1403, 1078, 868, + X 637, 501, 388, 318, 319, 315, 328, 28, 6963, + X 6250, 360, 496, 830, 1358, 2091, 3043, 4222, 5678, + X 7368, 8967, 9902, 9671, 7033, 5149, 3144, 2568, 2059, + X 1802, 1009, 930, 806, 674, 579, 674, 882, 24, + X 7782, 5282, 574, 819, 1347, 2404, 3698, 5239, 8784, + X 13898, 17731, 15705, 12740, 9658, 7335, 5800, 4887, 4128, + X 3380, 2707, 2031, 1665, 1410, 20, 8601, 4223, 420, + Y 681/ + DATA MAP 25/ + X 1145, 1909, 3450, 5769, 10196, 18157, 25687, 27769, 20234, + X 17936, 7858, 5976, 5243, 4753, 4075, 15, 9420, 2943, + X 317, 415, 741, 1268, 2740, 7218, 12285, 27310, 54424, + X 46048, 33240, 23316, 8, 10240, 1241, 167, 232, 357, + X 594, 1646, 3, 11264, 0, 3, 32767, 0, 514, + X 600, 3, 0, 0, 3, 2334, 0, 10, 2355, + X 1662, 26, 24, 19, 16, 14, 11, 12, 14, + X 2396, 2777, 47, 35, 30, 19, 11, 10, 6, + X 7, 6, 4, 4, 17, 2457, 3499, 85, 72, + X 57, 50, 43, 29, 22, 18, 11, 9, 6, + X 6, 5, 5, 21, 2662, 4582, 205, 203, 175, + X 145, 104, 70, 60, 49, 41, 32, 24, 20, + X 17, 14, 15, 12, 12, 12, 24, 2867, 5170, + X 211, 248, 274, 275, 253, 217, 174, 133, 90, + X 64, 48, 29, 22, 16, 15, 14, 14, 16, + X 17, 19, 19, 26, 3072, 5656, 238, 269, 290, + X 326, 359, 367, 317, 271, 220, 161, 122, 90, + X 69, 53, 40, 31, 22, 16, 12, 9, 9, + Y 9/ + DATA MAP 26/ + X 9, 27, 3276, 5947, 294, 337, 365, 369, 400, + X 431, 432, 392, 328, 285, 213, 179, 149, 121, + X 91, 75, 63, 50, 41, 32, 25, 21, 22, + X 21, 27, 3481, 6109, 317, 364, 419, 503, 532, + X 523, 529, 481, 405, 328, 280, 264, 268, 221, + X 181, 139, 126, 100, 75, 55, 34, 24, 25, + X 28, 28, 3686, 6190, 343, 405, 470, 562, 651, + X 730, 708, 626, 537, 504, 379, 363, 306, 253, + X 208, 200, 178, 140, 115, 92, 70, 53, 39, + X 39, 36, 28, 3891, 6206, 365, 445, 541, 662, + X 824, 897, 802, 782, 779, 707, 593, 402, 344, + X 290, 247, 186, 158, 126, 119, 107, 108, 124, + X 139, 164, 163, 27, 4096, 6128, 404, 510, 657, + X 838, 1021, 1178, 1271, 1243, 1049, 792, 528, 424, + X 341, 247, 204, 216, 167, 138, 119, 114, 116, + X 120, 123, 129, 27, 4300, 6047, 403, 525, 722, + X 956, 1208, 1471, 1653, 1459, 1209, 931, 675, 545, + X 446, 324, 301, 274, 246, 199, 167, 148, 141, + Y 145/ + DATA MAP 27/ + X 149, 154, 27, 4505, 5954, 413, 539, 755, 1019, + X 1412, 1893, 2242, 2018, 1607, 1396, 705, 538, 376, + X 257, 260, 254, 224, 188, 165, 162, 163, 166, + X 166, 171, 26, 4710, 5831, 393, 526, 783, 1132, + X 1637, 2207, 2543, 2512, 1967, 1553, 1124, 752, 514, + X 422, 408, 350, 268, 241, 210, 183, 172, 165, + X 177, 26, 4915, 5720, 388, 489, 700, 1070, 1761, + X 2641, 3235, 3380, 2361, 2063, 988, 764, 470, 350, + X 422, 406, 373, 346, 292, 245, 221, 223, 234, + X 25, 5120, 5570, 368, 483, 697, 1103, 1823, 2754, + X 3419, 3662, 2812, 2345, 1375, 1074, 888, 744, 650, + X 621, 627, 559, 390, 311, 187, 193, 25, 5324, + X 5376, 375, 511, 799, 1243, 2053, 2909, 3520, 3867, + X 3603, 2684, 2042, 1486, 1216, 970, 745, 548, 371, + X 329, 322, 330, 341, 357, 24, 5529, 5212, 386, + X 533, 809, 1236, 2047, 3064, 3902, 4358, 3620, 2889, + X 2296, 2027, 1554, 1290, 1191, 1038, 870, 656, 599, + X 461, 376, 23, 5734, 4989, 384, 529, 822, 1281, + Y 2165/ + DATA MAP 28/ + X 3129, 3970, 5050, 5868, 4244, 3773, 1791, 1338, 1062, + X 974, 917, 818, 652, 476, 461, 21, 6144, 4544, + X 414, 564, 850, 1299, 2166, 3030, 4228, 6234, 7413, + X 6343, 5077, 4205, 3680, 2731, 2089, 1697, 1462, 985, + X 17, 6963, 3376, 411, 624, 1083, 1815, 2937, 4377, + X 7047, 9559, 11176, 12183, 8484, 8000, 3648, 3056, 10, + X 7782, 1620, 578, 947, 1671, 3213, 5905, 10064, 23750, + X 3, 8601, 0, 3, 32767, 0, 456, 1000, 3, + X 0, 0, 3, 2334, 0, 10, 2355, 1641, 26, + X 24, 19, 16, 14, 11, 7, 14, 2396, 2768, + X 47, 35, 30, 19, 11, 10, 6, 7, 6, + X 4, 3, 17, 2457, 3485, 85, 73, 57, 49, + X 42, 29, 22, 17, 11, 9, 6, 6, 5, + X 5, 21, 2662, 4533, 208, 210, 177, 145, 101, + X 70, 58, 48, 38, 31, 24, 19, 17, 14, + X 14, 12, 13, 12, 23, 2867, 5017, 243, 287, + X 317, 279, 241, 204, 153, 110, 76, 54, 38, + X 25, 18, 16, 14, 15, 15, 16, 18, 18, + Y 25/ + DATA MAP 29/ + X 3072, 5422, 240, 282, 353, 410, 427, 364, 302, + X 238, 176, 129, 95, 72, 55, 42, 31, 24, + X 17, 12, 10, 9, 9, 9, 25, 3276, 5632, + X 319, 362, 398, 420, 472, 483, 449, 387, 324, + X 232, 189, 152, 121, 91, 73, 59, 49, 39, + X 31, 24, 22, 22, 26, 3481, 5668, 334, 384, + X 476, 548, 594, 608, 579, 491, 403, 331, 311, + X 260, 213, 163, 139, 114, 83, 60, 41, 28, + X 24, 26, 27, 26, 3686, 5663, 363, 440, 539, + X 671, 771, 809, 731, 652, 579, 454, 408, 320, + X 263, 216, 192, 146, 116, 93, 71, 56, 38, + X 39, 38, 25, 3891, 5590, 390, 494, 628, 787, + X 938, 998, 959, 927, 816, 631, 434, 355, 294, + X 216, 166, 133, 119, 108, 108, 127, 139, 139, + X 25, 4096, 5488, 439, 548, 712, 956, 1221, 1313, + X 1423, 1223, 1066, 629, 475, 378, 264, 248, 183, + X 147, 121, 113, 116, 119, 122, 124, 25, 4300, + X 5391, 462, 590, 815, 1147, 1486, 1696, 1689, 1395, + Y 1135/ + DATA MAP 30/ + X 804, 611, 496, 353, 323, 277, 225, 183, 153, + X 145, 149, 156, 164, 24, 4505, 5237, 471, 620, + X 909, 1371, 1888, 2275, 2089, 1785, 1583, 827, 651, + X 413, 313, 328, 285, 226, 188, 174, 169, 173, + X 177, 23, 4710, 5072, 438, 626, 990, 1489, 2217, + X 2779, 2530, 2211, 1795, 1297, 841, 558, 447, 420, + X 331, 279, 238, 205, 184, 183, 23, 4915, 4894, + X 460, 620, 960, 1647, 2609, 3351, 3469, 2594, 2498, + X 985, 782, 463, 411, 434, 402, 367, 326, 269, + X 225, 231, 22, 5120, 4718, 427, 626, 1012, 1647, + X 2746, 3632, 3955, 2947, 2564, 1415, 1099, 908, 760, + X 676, 636, 617, 524, 352, 263, 21, 5324, 4536, + X 399, 567, 895, 1582, 2811, 3566, 3831, 4215, 2942, + X 2098, 1615, 1350, 1062, 836, 617, 424, 365, 358, + X 20, 5529, 4299, 427, 611, 984, 1608, 2615, 3672, + X 4264, 4274, 3217, 2568, 2205, 1828, 1398, 1279, 1130, + X 960, 753, 19, 5734, 4018, 465, 635, 992, 1699, + X 2789, 3913, 5166, 6412, 4611, 4242, 1908, 1458, 1114, + Y 1032/ + DATA MAP 31/ + X 974, 872, 17, 6144, 3442, 449, 593, 893, 1427, + X 2226, 3228, 5654, 7596, 7913, 5856, 4834, 3891, 3162, + X 2365, 11, 6963, 1940, 512, 724, 1195, 2095, 3359, + X 5769, 9543, 13441, 3, 7782, 0, 3, 32767, 0, + X 384, 2000, 3, 0, 0, 3, 2336, 0, 10, + X 2355, 1594, 26, 24, 19, 16, 14, 11, 7, + X 14, 2396, 2748, 47, 35, 30, 19, 11, 10, + X 6, 7, 6, 4, 4, 17, 2457, 3450, 92, + X 71, 56, 49, 41, 27, 21, 16, 11, 9, + X 6, 5, 6, 5, 21, 2662, 4384, 243, 227, + X 184, 130, 85, 72, 54, 41, 34, 27, 21, + X 18, 15, 15, 13, 12, 13, 14, 22, 2867, + X 4750, 336, 402, 324, 268, 226, 156, 116, 77, + X 55, 38, 26, 19, 16, 15, 15, 15, 16, + X 18, 18, 23, 3072, 4921, 378, 479, 542, 477, + X 408, 273, 194, 150, 106, 74, 56, 43, 32, + X 24, 17, 14, 9, 9, 9, 9, 23, 3276, + X 4891, 469, 587, 705, 663, 565, 470, 282, 231, + Y 178/ + DATA MAP 32/ + X 140, 94, 77, 61, 50, 40, 32, 25, 23, + X 22, 22, 22, 3481, 4814, 472, 623, 805, 800, + X 740, 650, 528, 401, 301, 243, 161, 135, 105, + X 81, 58, 36, 27, 23, 24, 22, 3686, 4705, + X 504, 696, 943, 1062, 1021, 880, 735, 497, 395, + X 315, 248, 176, 134, 106, 83, 65, 45, 37, + X 41, 21, 3891, 4579, 528, 769, 1105, 1400, 1280, + X 1133, 1004, 621, 467, 356, 243, 166, 128, 117, + X 109, 112, 128, 143, 21, 4096, 4420, 616, 922, + X 1367, 1750, 1731, 1440, 1227, 674, 524, 377, 285, + X 211, 134, 122, 114, 120, 122, 131, 20, 4300, + X 4288, 658, 979, 1467, 1972, 2098, 1719, 1265, 906, + X 766, 628, 438, 318, 252, 203, 159, 149, 154, + X 20, 4505, 4134, 633, 983, 1575, 2203, 2578, 2165, + X 1770, 1321, 854, 572, 365, 417, 362, 274, 215, + X 207, 210, 19, 4710, 3916, 664, 1059, 1746, 2522, + X 2969, 2761, 2278, 1830, 1110, 751, 520, 459, 358, + X 293, 249, 207, 18, 4915, 3717, 632, 1044, 1792, + Y 2737/ + DATA MAP 33/ + X 3557, 3928, 2885, 1767, 1393, 575, 419, 454, 430, + X 401, 363, 17, 5120, 3502, 586, 998, 1767, 2807, + X 3783, 4275, 3130, 2725, 1366, 1123, 924, 802, 741, + X 732, 16, 5324, 3264, 555, 892, 1699, 2673, 3535, + X 4322, 4005, 3328, 2002, 1513, 1362, 1142, 911, 15, + X 5529, 2944, 581, 920, 1693, 2736, 3789, 4751, 4003, + X 3348, 2484, 2244, 1827, 1621, 14, 5734, 2591, 513, + X 805, 1550, 2684, 4050, 5924, 7518, 4639, 4143, 1846, + X 1569, 11, 6144, 1804, 509, 724, 1211, 2046, 3043, + X 5020, 8322, 9479, 4, 6963, 22, 1965, 3, 7782, + X 0, 3, 32767, 0, 342, 3000, 3, 0, 0, + X 3, 2336, 0, 10, 2355, 1541, 26, 24, 19, + X 16, 14, 11, 7, 14, 2396, 2731, 47, 35, + X 30, 19, 11, 10, 6, 7, 6, 4, 4, + X 17, 2457, 3414, 91, 76, 58, 47, 39, 26, + X 21, 16, 10, 10, 5, 5, 6, 5, 20, + X 2662, 4305, 259, 225, 188, 123, 87, 70, 54, + X 40, 32, 25, 20, 17, 15, 14, 12, 13, + Y 13/ + DATA MAP 34/ + X 22, 2867, 4631, 394, 403, 346, 273, 203, 141, + X 103, 67, 46, 33, 23, 17, 16, 14, 16, + X 15, 17, 18, 16, 22, 3072, 4686, 550, 622, + X 547, 487, 278, 216, 172, 117, 81, 61, 44, + X 33, 25, 18, 13, 11, 9, 8, 9, 22, + X 3276, 4612, 625, 786, 779, 669, 520, 329, 243, + X 185, 142, 105, 80, 62, 49, 40, 31, 25, + X 23, 22, 22, 21, 3481, 4415, 723, 915, 955, + X 848, 700, 541, 407, 318, 215, 155, 125, 100, + X 72, 47, 32, 23, 22, 27, 20, 3686, 4249, + X 760, 1040, 1233, 1156, 1024, 710, 520, 408, 311, + X 213, 164, 117, 97, 70, 54, 43, 37, 19, + X 3891, 4096, 729, 1084, 1511, 1453, 1283, 1163, 645, + X 490, 375, 213, 173, 123, 115, 102, 119, 134, + X 19, 4096, 3855, 988, 1449, 1939, 1901, 1746, 1028, + X 788, 532, 359, 264, 197, 130, 112, 116, 120, + X 126, 18, 4300, 3672, 936, 1449, 2080, 2226, 1975, + X 1360, 1012, 814, 665, 433, 321, 252, 189, 170, + Y 167/ + DATA MAP 35/ + X 17, 4505, 3465, 941, 1423, 2249, 2649, 2384, 2088, + X 1236, 1009, 551, 394, 444, 397, 321, 230, 16, + X 4710, 3209, 973, 1611, 2413, 3340, 3003, 2585, 1706, + X 1294, 759, 530, 465, 381, 304, 15, 4915, 2972, + X 926, 1621, 2744, 3852, 3959, 3792, 1435, 1429, 531, + X 464, 466, 460, 14, 5120, 2727, 860, 1680, 2825, + X 3893, 4473, 3516, 2560, 1585, 1228, 1025, 879, 13, + X 5324, 2450, 793, 1420, 2561, 3593, 3924, 4135, 3819, + X 2078, 1696, 1556, 12, 5529, 2114, 715, 1189, 2140, + X 3391, 4558, 4884, 3954, 3035, 2751, 10, 5734, 1753, + X 564, 952, 1934, 3405, 5226, 6766, 7189, 7, 6144, + X 836, 576, 814, 1407, 2953, 3, 6963, 0, 3, + X 32767, 0, 297, 5000, 3, 0, 0, 3, 2338, + X 0, 9, 2355, 1394, 26, 24, 19, 16, 14, + X 11, 14, 2396, 2686, 47, 35, 30, 19, 11, + X 10, 6, 7, 6, 4, 4, 17, 2457, 3357, + X 95, 75, 61, 48, 37, 25, 20, 14, 10, + X 9, 5, 5, 6, 5, 20, 2662, 4213, 257, + Y 226/ + DATA MAP 36/ + X 190, 129, 88, 71, 56, 39, 30, 23, 19, + X 16, 15, 13, 13, 13, 11, 21, 2867, 4496, + X 419, 415, 351, 284, 185, 147, 89, 62, 40, + X 28, 20, 16, 15, 15, 16, 16, 18, 17, + X 21, 3072, 4480, 737, 654, 594, 335, 262, 210, + X 142, 99, 76, 57, 35, 26, 19, 15, 11, + X 9, 9, 9, 20, 3276, 4347, 897, 871, 771, + X 623, 403, 306, 223, 151, 121, 82, 73, 51, + X 42, 31, 25, 22, 23, 20, 3481, 4100, 910, + X 1139, 1014, 880, 575, 452, 360, 249, 172, 132, + X 107, 75, 50, 38, 20, 22, 32, 19, 3686, + X 3882, 937, 1274, 1334, 1187, 882, 603, 466, 381, + X 231, 181, 129, 108, 78, 63, 51, 39, 18, + X 3891, 3611, 987, 1412, 1615, 1496, 1374, 762, 609, + X 413, 246, 188, 125, 120, 105, 119, 134, 16, + X 4096, 3313, 1261, 1989, 2112, 1894, 1370, 972, 620, + X 426, 305, 220, 129, 115, 118, 15, 4300, 3036, + X 1335, 2063, 2337, 2152, 1625, 1132, 892, 780, 474, + Y 370/ + DATA MAP 37/ + X 288, 233, 14, 4505, 2745, 1309, 2054, 2620, 2527, + X 2253, 1536, 1216, 692, 465, 410, 493, 13, 4710, + X 2428, 1374, 2244, 3316, 3148, 2775, 2037, 1477, 969, + X 590, 574, 12, 4915, 2118, 1326, 2246, 3819, 4315, + X 3900, 2004, 1897, 681, 558, 11, 5120, 1798, 1439, + X 2680, 3952, 4656, 4278, 2684, 1935, 1399, 9, 5324, + X 1456, 1349, 2202, 3752, 3848, 4096, 4135, 8, 5529, + X 1058, 971, 1678, 2954, 4556, 6312, 6, 5734, 618, + X 656, 1147, 3056, 3, 6144, 0, 3, 32767, 0, + X 243, 10000, 3, 0, 0, 3, 2342, 0, 7, + X 2355, 1015, 26, 24, 19, 19, 13, 2396, 2537, + X 47, 35, 30, 19, 11, 10, 6, 7, 6, + X 5, 16, 2457, 3215, 98, 78, 61, 50, 39, + X 23, 16, 13, 9, 6, 5, 6, 6, 19, + X 2662, 3987, 268, 234, 193, 129, 89, 70, 55, + X 39, 25, 20, 17, 14, 14, 13, 13, 13, + X 20, 2867, 4246, 433, 420, 356, 277, 188, 150, + X 88, 55, 46, 22, 17, 16, 15, 16, 15, + Y 17/ + DATA MAP 38/ + X 19, 20, 3072, 4223, 768, 648, 563, 335, 271, + X 216, 149, 101, 73, 55, 36, 26, 15, 12, + X 9, 9, 9, 19, 3276, 3987, 928, 863, 765, + X 650, 423, 313, 217, 141, 112, 73, 62, 48, + X 39, 33, 20, 20, 18, 3481, 3694, 1031, 1103, + X 987, 788, 520, 416, 338, 278, 218, 173, 135, + X 80, 62, 29, 21, 17, 3686, 3408, 963, 1170, + X 1225, 1116, 894, 608, 471, 386, 264, 198, 164, + X 103, 99, 92, 15, 3891, 3072, 948, 1270, 1464, + X 1379, 1206, 916, 671, 502, 362, 239, 176, 138, + X 14, 4096, 2684, 1245, 1668, 2057, 1882, 1565, 1010, + X 663, 474, 313, 253, 148, 13, 4300, 2326, 1401, + X 1915, 2285, 2132, 1647, 1153, 903, 777, 509, 412, + X 11, 4505, 1923, 1493, 1974, 2545, 2484, 2168, 1452, + X 1173, 786, 9, 4710, 1527, 1291, 1808, 2793, 2910, + X 2741, 2402, 8, 4915, 1082, 1395, 2062, 3312, 3867, + X 4519, 6, 5120, 665, 1495, 2923, 4786, 4, 5324, + X 174, 1699, 3, 5529, 0, 3, 32767, 0, 190, + Y 20000/ + DATA MAP 39/ + X 3, 0, 0, 3, 2351, 0, 5, 2355, 308, + X 26, 24, 12, 2396, 2165, 47, 35, 30, 19, + X 11, 10, 6, 7, 6, 15, 2457, 2905, 98, + X 78, 62, 50, 38, 28, 20, 13, 6, 5, + X 6, 6, 17, 2662, 3556, 263, 236, 195, 137, + X 91, 72, 57, 36, 26, 20, 17, 15, 14, + X 12, 18, 2867, 3770, 416, 422, 355, 275, 187, + X 144, 90, 61, 46, 30, 20, 15, 14, 16, + X 17, 18, 3072, 3725, 764, 644, 523, 341, 274, + X 216, 156, 102, 76, 50, 40, 31, 23, 19, + X 15, 17, 3276, 3389, 834, 767, 711, 674, 446, + X 357, 233, 166, 123, 90, 64, 60, 51, 48, + X 15, 3481, 3049, 819, 979, 879, 744, 545, 415, + X 349, 324, 304, 258, 204, 149, 14, 3686, 2700, + X 831, 960, 948, 876, 787, 581, 497, 415, 342, + X 318, 273, 13, 3891, 2319, 663, 918, 1221, 1167, + X 1044, 886, 752, 540, 457, 520, 11, 4096, 1858, + X 934, 1448, 1755, 1802, 1612, 1232, 830, 627, 9, + Y 4300/ + DATA MAP 40/ + X 1402, 903, 1385, 2215, 2305, 1998, 1368, 7, 4505, + X 856, 1286, 1601, 2390, 2881, 5, 4710, 283, 1313, + X 1680, 3, 4915, 0, 3, 32767, 0, 127, 40000, + X 3, 0, 0, 3, 2369, 0, 9, 2396, 1332, + X 47, 35, 30, 19, 11, 10, 12, 2457, 2210, + X 85, 69, 55, 45, 38, 30, 23, 19, 15, + X 14, 2662, 2764, 228, 222, 184, 154, 96, 75, + X 59, 45, 32, 24, 20, 15, 2867, 2923, 368, + X 410, 329, 237, 198, 138, 113, 70, 53, 45, + X 36, 26, 15, 3072, 2820, 711, 610, 555, 292, + X 236, 186, 163, 133, 94, 72, 55, 48, 13, + X 3276, 2454, 674, 589, 443, 490, 523, 403, 328, + X 264, 198, 158, 11, 3481, 2040, 605, 685, 723, + X 677, 605, 417, 353, 332, 10, 3686, 1613, 586, + X 614, 616, 682, 704, 649, 542, 8, 3891, 1074, + X 591, 725, 841, 998, 1108, 6, 4096, 521, 880, + X 1122, 1201, 3, 4300, 0, 3, 32767, 0, + Y 0/ + END diff --git a/SOFIP/guzik_version/ap8mic.for b/SOFIP/guzik_version/ap8mic.for new file mode 100755 index 0000000..73ca4ec --- /dev/null +++ b/SOFIP/guzik_version/ap8mic.for @@ -0,0 +1,843 @@ + BLOCK DATA + DOUBLE PRECISION NAME + COMMON/ AP8MIC /NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH + X,MAP 1(163),MAP 2(163),MAP 3(163),MAP 4(163),MAP 5(163) + X,MAP 6(163),MAP 7(163),MAP 8(163),MAP 9(163),MAP 10(163) + X,MAP 11(163),MAP 12(163),MAP 13(163),MAP 14(163),MAP 15(163) + X,MAP 16(163),MAP 17(163),MAP 18(163),MAP 19(163),MAP 20(163) + X,MAP 21(163),MAP 22(163),MAP 23(163),MAP 24(163),MAP 25(163) + X,MAP 26(163),MAP 27(163),MAP 28(163),MAP 29(163),MAP 30(163) + X,MAP 31(163),MAP 32(163),MAP 33(163),MAP 34(163),MAP 35(163) + X,MAP 36(163),MAP 37(163),MAP 38(163),MAP 39(163),MAP 40(163) + X,MAP 41(163),MAP 42( 6) + DATA NAME /8H AP8MIC / + DATA EPOCH / 1964.000/ + DATA SCAE / 100.000/ + DATA SCAL / 2048.000/ + DATA SCAB / 2048.000/ + DATA SCAF / 1024.000/ + DATA LENGTH/ 6688/ + DATA MAP 1/ + X 892, 10, 3, 0, 0, 3, 2299, 0, 11, + X 2334, 2001, 17, 12, 13, 12, 12, 10, 9, + X 9, 14, 2355, 2665, 31, 24, 23, 21, 19, + X 13, 10, 6, 5, 1, 1, 16, 2396, 3252, + X 64, 44, 33, 19, 12, 10, 7, 6, 6, + X 5, 4, 4, 4, 18, 2457, 3659, 124, 96, + X 72, 43, 34, 29, 23, 20, 16, 12, 10, + X 8, 7, 5, 9, 22, 2662, 4673, 220, 209, + X 185, 158, 132, 105, 78, 60, 48, 34, 25, + X 21, 18, 16, 14, 11, 10, 10, 16, 24, + X 2867, 5312, 207, 252, 294, 295, 280, 233, 199, + X 118, 87, 68, 54, 47, 32, 26, 25, 25, + X 25, 23, 25, 26, 29, 26, 3072, 5865, 229, + X 257, 288, 311, 315, 332, 327, 300, 258, 211, + X 137, 109, 78, 58, 43, 37, 34, 31, 30, + X 30, 29, 29, 32, 28, 3276, 6182, 286, 325, + X 361, 380, 405, 399, 386, 367, 343, 311, 251, + X 225, 181, 146, 116, 85, 68, 53, 42, 33, + Y 32/ + DATA MAP 2/ + X 31, 31, 35, 49, 29, 3481, 6577, 294, 340, + X 389, 450, 477, 462, 483, 486, 448, 395, 342, + X 332, 283, 242, 213, 181, 144, 123, 99, 76, + X 60, 49, 36, 35, 36, 47, 30, 3686, 6855, + X 312, 364, 416, 478, 522, 543, 590, 612, 572, + X 548, 519, 455, 384, 339, 300, 268, 230, 185, + X 165, 106, 83, 63, 60, 57, 57, 65, 88, + X 31, 3891, 7129, 314, 375, 448, 543, 625, 706, + X 804, 914, 900, 806, 699, 595, 499, 423, 329, + X 256, 198, 156, 126, 110, 95, 79, 69, 65, + X 65, 63, 70, 97, 32, 4096, 7407, 334, 394, + X 475, 584, 699, 834, 982, 1118, 1269, 1290, 1180, + X 1010, 882, 527, 420, 357, 211, 139, 96, 60, + X 31, 22, 17, 18, 19, 15, 17, 20, 18, + X 33, 4300, 7621, 366, 450, 557, 680, 764, 980, + X 1288, 1562, 1633, 1462, 1298, 1112, 869, 534, 371, + X 220, 126, 100, 89, 87, 84, 87, 89, 88, + X 86, 89, 90, 91, 94, 108, 34, 4505, 7867, + Y 382/ + DATA MAP 3/ + X 471, 591, 752, 959, 1202, 1526, 1757, 1896, 1944, + X 1668, 1438, 815, 611, 409, 245, 210, 200, 207, + X 225, 191, 168, 87, 73, 70, 71, 72, 75, + X 78, 85, 108, 35, 4710, 8054, 415, 508, 642, + X 842, 1149, 1487, 1814, 2029, 2078, 1929, 1714, 1478, + X 1091, 807, 643, 522, 471, 337, 259, 203, 145, + X 111, 115, 114, 118, 118, 118, 117, 116, 117, + X 119, 127, 35, 4915, 8191, 429, 552, 758, 1046, + X 1448, 1883, 2223, 2302, 2425, 2212, 1965, 1705, 1319, + X 882, 662, 351, 272, 235, 214, 204, 199, 208, + X 215, 221, 225, 223, 221, 216, 214, 214, 218, + X 233, 36, 5120, 8348, 436, 579, 831, 1178, 1608, + X 2082, 2481, 2772, 2699, 2853, 2711, 2386, 2067, 1300, + X 953, 714, 437, 260, 179, 153, 131, 127, 126, + X 127, 129, 129, 130, 127, 126, 126, 129, 128, + X 129, 36, 5324, 8441, 478, 648, 958, 1333, 1838, + X 2360, 2813, 3385, 3764, 3186, 2699, 2350, 1595, 1221, + X 876, 463, 387, 248, 248, 244, 250, 251, 257, + Y 263/ + DATA MAP 4/ + X 265, 261, 252, 246, 249, 254, 259, 264, 270, + X 37, 5529, 8530, 535, 724, 1032, 1504, 2122, 2726, + X 3348, 4261, 3641, 3439, 3285, 3025, 2062, 1545, 1132, + X 720, 563, 483, 416, 356, 243, 247, 249, 253, + X 257, 258, 257, 255, 253, 254, 251, 250, 245, + X 242, 37, 5734, 8610, 564, 781, 1155, 1669, 2313, + X 3100, 4106, 5090, 4723, 4171, 3579, 2862, 2142, 1776, + X 1466, 1275, 1047, 756, 582, 439, 289, 288, 267, + X 236, 209, 205, 202, 201, 198, 201, 202, 200, + X 193, 181, 38, 6144, 8722, 604, 898, 1472, 2354, + X 3537, 5035, 6435, 7318, 5921, 4842, 3838, 3039, 2426, + X 1935, 1450, 1152, 921, 737, 566, 486, 412, 325, + X 316, 310, 311, 309, 319, 328, 328, 325, 317, + X 302, 301, 295, 280, 38, 6963, 8763, 745, 1340, + X 2634, 4863, 8313, 11557, 12095, 9931, 8798, 4460, 3611, + X 2250, 1768, 1661, 1348, 1094, 886, 860, 794, 728, + X 706, 870, 860, 847, 854, 868, 878, 878, 875, + X 870, 869, 850, 832, 804, 778, 37, 7782, 8451, + Y 1037/ + DATA MAP 5/ + X 2053, 4320, 8234, 13247, 19364, 16095, 14423, 8192, 6289, + X 5014, 3402, 2768, 2848, 2891, 2928, 2726, 2438, 2119, + X 1818, 1556, 1405, 1251, 1121, 1098, 1078, 1085, 1087, + X 1092, 1090, 1060, 1020, 948, 798, 36, 8601, 8201, + X 1062, 2374, 5797, 11755, 18805, 25569, 23593, 20955, 12019, + X 8725, 6250, 4196, 3353, 3278, 3143, 2868, 2756, 2757, + X 2671, 2585, 2560, 2549, 2551, 2574, 2602, 2610, 2605, + X 2580, 2526, 2444, 2308, 2126, 1593, 35, 9420, 8014, + X 1038, 2625, 7002, 17078, 28580, 38218, 28555, 23784, 14905, + X 11120, 8605, 6453, 4668, 4644, 4592, 4364, 4336, 4353, + X 4256, 3923, 3552, 3377, 3348, 3337, 3353, 3360, 3388, + X 3398, 3367, 3347, 3357, 3459, 34, 10240, 7822, 1097, + X 3528, 11320, 30959, 45133, 53296, 39292, 32724, 20426, 14875, + X 10911, 8529, 5325, 4152, 3082, 3242, 3447, 3667, 3830, + X 4060, 4536, 4778, 4570, 4412, 4498, 4488, 4240, 4153, + X 4479, 5171, 839, 33, 11264, 7605, 973, 3803, 17998, + X 46677, 62123, 61152, 47671, 35256, 27396, 19708, 13998, 11838, + X 7860, 7709, 7271, 7088, 7038, 6993, 6975, 7063, 7193, + Y 7321/ + DATA MAP 6/ + X 7394, 7338, 6942, 6839, 6984, 7192, 7622, 8761, 32, + X 12288, 7377, 828, 3421, 18339, 42434, 68271, 86460, 57767, + X 47630, 30906, 22593, 17972, 14424, 12692, 13367, 13302, 12054, + X 11412, 11977, 12466, 12773, 13205, 13097, 12909, 12830, 12615, + X 12871, 13077, 13745, 15513, 31, 13516, 7063, 913, 2335, + X 9874, 30730, 56329, 75941, 78564, 67183, 58077, 49459, 43291, + X 37201, 31822, 27507, 25464, 25615, 24834, 23578, 23705, 23609, + X 23880, 24027, 24368, 24596, 25015, 27160, 16167, 2999, 3, + X 20480, 0, 3, 32767, 0, 879, 20, 3, 0, + X 0, 3, 2299, 0, 11, 2334, 1996, 17, 12, + X 13, 12, 12, 10, 9, 9, 14, 2355, 2653, + X 31, 24, 23, 21, 19, 13, 10, 6, 4, + X 2, 2, 16, 2396, 3246, 63, 45, 33, 19, + X 12, 10, 7, 6, 6, 5, 4, 4, 4, + X 18, 2457, 3657, 123, 96, 73, 42, 35, 28, + X 23, 20, 16, 12, 10, 8, 7, 5, 7, + X 22, 2662, 4672, 218, 207, 189, 158, 131, 104, + X 79, 61, 47, 34, 25, 21, 18, 16, 15, + Y 10/ + DATA MAP 7/ + X 10, 10, 12, 24, 2867, 5309, 208, 252, 294, + X 292, 283, 233, 198, 117, 88, 68, 53, 47, + X 32, 26, 25, 25, 26, 23, 24, 26, 26, + X 26, 3072, 5862, 229, 258, 286, 312, 316, 332, + X 328, 300, 257, 210, 138, 108, 78, 58, 44, + X 36, 33, 32, 31, 28, 29, 30, 32, 28, + X 3276, 6178, 287, 326, 358, 380, 406, 403, 383, + X 364, 346, 313, 248, 223, 185, 145, 115, 84, + X 68, 54, 41, 34, 33, 29, 31, 35, 49, + X 29, 3481, 6571, 296, 337, 391, 450, 481, 460, + X 486, 486, 447, 393, 342, 335, 281, 242, 213, + X 180, 143, 122, 98, 76, 60, 50, 36, 33, + X 37, 47, 30, 3686, 6844, 314, 363, 416, 478, + X 523, 548, 594, 616, 575, 546, 517, 453, 385, + X 336, 299, 267, 229, 183, 164, 104, 83, 62, + X 61, 57, 57, 65, 66, 31, 3891, 7090, 325, + X 387, 460, 556, 634, 721, 812, 921, 894, 800, + X 683, 589, 493, 413, 322, 253, 191, 152, 124, + Y 109/ + DATA MAP 8/ + X 93, 78, 67, 66, 64, 63, 72, 72, 32, + X 4096, 7354, 343, 411, 488, 588, 721, 860, 1012, + X 1160, 1293, 1281, 1158, 989, 817, 522, 406, 343, + X 193, 138, 86, 56, 31, 19, 18, 19, 18, + X 15, 18, 18, 19, 33, 4300, 7570, 372, 452, + X 551, 671, 809, 1021, 1339, 1591, 1623, 1456, 1281, + X 1088, 817, 537, 334, 221, 117, 99, 88, 87, + X 85, 87, 88, 88, 87, 89, 90, 90, 96, + X 110, 34, 4505, 7793, 379, 455, 570, 731, 977, + X 1229, 1552, 1777, 1865, 1884, 1637, 1410, 860, 603, + X 460, 246, 207, 199, 207, 234, 201, 177, 94, + X 74, 70, 72, 73, 74, 78, 87, 111, 35, + X 4710, 7966, 404, 488, 613, 831, 1185, 1531, 1879, + X 2083, 2078, 1887, 1656, 1425, 1083, 797, 641, 531, + X 472, 358, 264, 205, 146, 108, 112, 115, 118, + X 121, 120, 119, 114, 115, 122, 134, 35, 4915, + X 8093, 426, 545, 746, 1062, 1465, 1851, 2189, 2352, + X 2467, 2242, 1984, 1710, 1282, 872, 630, 348, 262, + Y 232/ + DATA MAP 9/ + X 215, 210, 205, 205, 210, 222, 231, 226, 218, + X 212, 209, 216, 223, 233, 36, 5120, 8218, 448, + X 595, 877, 1252, 1683, 2106, 2481, 2740, 2867, 2885, + X 2628, 2264, 1948, 1271, 913, 692, 436, 257, 175, + X 153, 129, 125, 128, 128, 130, 131, 131, 129, + X 124, 124, 127, 127, 126, 36, 5324, 8322, 478, + X 645, 949, 1349, 1886, 2455, 2881, 3392, 3590, 3143, + X 2697, 2325, 1595, 1206, 893, 478, 393, 253, 248, + X 239, 246, 250, 260, 269, 262, 255, 252, 248, + X 252, 255, 260, 267, 277, 36, 5529, 8423, 502, + X 675, 1010, 1510, 2121, 2851, 3463, 4113, 3560, 3364, + X 3243, 2996, 2162, 1530, 1177, 722, 566, 487, 424, + X 367, 278, 252, 245, 253, 267, 262, 253, 252, + X 253, 255, 252, 250, 252, 37, 5734, 8507, 511, + X 703, 1047, 1615, 2313, 3200, 4082, 5038, 4357, 4022, + X 3562, 2763, 2360, 1835, 1542, 1350, 1196, 816, 627, + X 538, 303, 303, 291, 259, 222, 212, 209, 203, + X 194, 190, 195, 197, 200, 187, 37, 6144, 8612, + Y 558/ + DATA MAP 10/ + X 774, 1201, 2043, 3199, 4581, 6000, 6729, 6150, 5230, + X 4177, 3435, 2699, 2119, 1659, 1148, 1024, 808, 647, + X 476, 444, 353, 311, 308, 306, 306, 309, 321, + X 330, 322, 317, 317, 315, 307, 37, 6963, 8587, + X 692, 1088, 1992, 3453, 5800, 8838, 11312, 10008, 9045, + X 8377, 4344, 3557, 2187, 1751, 1627, 1330, 1087, 885, + X 832, 748, 674, 665, 784, 829, 847, 853, 863, + X 871, 877, 881, 872, 866, 849, 833, 36, 7782, + X 8258, 862, 1621, 3341, 5892, 9631, 14765, 19120, 14600, + X 12656, 6845, 5547, 4497, 3150, 2854, 2905, 2883, 2817, + X 2688, 2447, 2071, 1730, 1483, 1247, 1149, 1112, 1059, + X 1040, 1063, 1097, 1103, 1101, 1096, 1039, 35, 8601, + X 7974, 909, 1760, 4040, 8630, 14664, 20515, 24478, 21433, + X 18823, 11208, 8233, 5687, 3540, 3378, 3348, 3101, 3036, + X 2968, 2768, 2624, 2540, 2486, 2502, 2548, 2613, 2644, + X 2580, 2511, 2496, 2451, 2307, 2033, 34, 9420, 7720, + X 887, 1868, 5173, 10913, 19119, 28304, 35276, 26805, 21006, + X 14469, 10736, 8279, 6230, 4862, 5056, 5146, 5163, 5185, + Y 4901/ + DATA MAP 11/ + X 4182, 3603, 3372, 3367, 3365, 3396, 3434, 3484, 3467, + X 3370, 3259, 3202, 33, 10240, 7449, 847, 2149, 5927, + X 13285, 27861, 38919, 44550, 36595, 30908, 25054, 17307, 13158, + X 9905, 7109, 4811, 3696, 2974, 3018, 3271, 3714, 3828, + X 3741, 3948, 4071, 3945, 4183, 4416, 4491, 4365, 4285, + X 31, 11264, 7123, 798, 2023, 9118, 28050, 46908, 59170, + X 51113, 42329, 32758, 26764, 18817, 13107, 11586, 8984, 7765, + X 7692, 7070, 6926, 6862, 7121, 6862, 7313, 7223, 7169, + X 7064, 7133, 6529, 7041, 30, 12288, 6799, 777, 2110, + X 10075, 29071, 56377, 72072, 69929, 52809, 40026, 28183, 21131, + X 16579, 12927, 10434, 12876, 14824, 12506, 11152, 12073, 12446, + X 12927, 13002, 13291, 12850, 13021, 12279, 13234, 29, 13516, + X 6400, 745, 1890, 7095, 25419, 45079, 65303, 79899, 68012, + X 60001, 52424, 45500, 38955, 34167, 30242, 25962, 23415, 24372, + X 24157, 23102, 22849, 22146, 24514, 26260, 24343, 22772, 26066, + X 3, 20480, 0, 3, 32767, 0, 828, 60, 3, + X 0, 0, 3, 2301, 0, 11, 2334, 1970, 17, + X 12, 13, 12, 12, 10, 9, 9, 14, 2355, + Y 2633/ + DATA MAP 12/ + X 31, 24, 23, 21, 19, 13, 10, 6, 5, + X 1, 1, 16, 2396, 3234, 63, 45, 33, 19, + X 12, 10, 7, 6, 6, 5, 4, 4, 4, + X 18, 2457, 3655, 122, 93, 75, 42, 35, 28, + X 23, 20, 16, 12, 10, 8, 6, 6, 6, + X 22, 2662, 4667, 217, 204, 194, 157, 130, 103, + X 80, 60, 48, 34, 24, 21, 18, 16, 16, + X 9, 10, 10, 10, 24, 2867, 5300, 210, 253, + X 297, 287, 288, 231, 196, 115, 88, 67, 54, + X 47, 31, 26, 25, 25, 25, 23, 25, 26, + X 26, 26, 3072, 5850, 230, 257, 289, 312, 316, + X 332, 333, 300, 255, 205, 141, 105, 78, 57, + X 43, 36, 33, 32, 31, 28, 29, 30, 30, + X 28, 3276, 6166, 286, 326, 363, 376, 404, 403, + X 391, 359, 351, 311, 250, 217, 190, 143, 114, + X 82, 69, 52, 42, 33, 33, 30, 31, 35, + X 35, 29, 3481, 6546, 295, 338, 390, 456, 483, + X 465, 489, 486, 447, 393, 344, 334, 279, 241, + Y 213/ + DATA MAP 13/ + X 177, 140, 123, 95, 74, 59, 49, 36, 34, + X 37, 37, 30, 3686, 6802, 315, 364, 419, 475, + X 524, 562, 616, 623, 578, 548, 517, 445, 380, + X 334, 297, 263, 225, 178, 158, 100, 80, 62, + X 61, 56, 59, 66, 66, 31, 3891, 6979, 348, + X 409, 482, 580, 664, 752, 853, 894, 870, 781, + X 676, 583, 491, 397, 314, 241, 166, 143, 123, + X 105, 89, 72, 67, 64, 62, 66, 76, 83, + X 32, 4096, 7202, 359, 432, 509, 621, 764, 926, + X 1097, 1301, 1370, 1245, 1089, 966, 639, 490, 383, + X 282, 160, 136, 61, 46, 25, 21, 15, 19, + X 16, 20, 18, 18, 19, 32, 4300, 7380, 392, + X 470, 542, 682, 931, 1190, 1508, 1697, 1549, 1417, + X 1233, 1028, 605, 563, 219, 179, 102, 93, 88, + X 86, 86, 87, 87, 88, 88, 90, 90, 92, + X 101, 33, 4505, 7559, 387, 470, 569, 749, 1043, + X 1298, 1619, 1814, 1870, 1876, 1591, 1314, 798, 592, + X 429, 249, 214, 207, 214, 234, 189, 160, 86, + Y 70/ + DATA MAP 14/ + X 70, 69, 72, 75, 80, 89, 34, 4710, 7700, + X 397, 492, 654, 873, 1163, 1535, 1891, 2106, 2103, + X 1835, 1604, 1400, 1057, 797, 651, 553, 487, 346, + X 260, 200, 150, 111, 115, 113, 115, 117, 121, + X 120, 113, 113, 124, 34, 4915, 7817, 399, 520, + X 723, 983, 1310, 1753, 2161, 2415, 2598, 2410, 2095, + X 1750, 1257, 843, 639, 332, 268, 231, 210, 203, + X 198, 198, 202, 212, 217, 218, 219, 214, 212, + X 214, 220, 34, 5120, 7922, 408, 546, 790, 1081, + X 1511, 2015, 2419, 2669, 3047, 3001, 2565, 2149, 1918, + X 1399, 1052, 775, 477, 363, 211, 167, 142, 127, + X 125, 125, 126, 129, 132, 131, 126, 123, 128, + X 35, 5324, 8005, 432, 582, 833, 1136, 1616, 2259, + X 2782, 3208, 3450, 3327, 2980, 2574, 1866, 1258, 1050, + X 531, 391, 276, 248, 241, 244, 244, 256, 267, + X 270, 264, 256, 248, 253, 256, 256, 260, 35, + X 5529, 8079, 437, 583, 872, 1241, 1823, 2508, 3037, + X 3602, 3975, 3511, 3466, 3100, 2581, 1619, 1283, 943, + Y 666/ + DATA MAP 15/ + X 517, 458, 393, 333, 248, 248, 251, 261, 274, + X 264, 255, 253, 252, 251, 247, 35, 5734, 8120, + X 451, 616, 928, 1358, 2010, 2740, 3373, 4038, 4422, + X 4209, 3714, 3177, 2592, 2151, 1710, 1529, 1400, 1248, + X 833, 586, 484, 292, 292, 284, 250, 220, 209, + X 203, 202, 201, 202, 200, 35, 6144, 8172, 443, + X 613, 956, 1406, 2186, 3270, 4200, 4906, 5635, 6031, + X 5108, 4300, 3477, 2951, 2416, 1902, 1463, 1075, 856, + X 701, 581, 485, 422, 310, 319, 315, 315, 315, + X 314, 319, 321, 312, 35, 6963, 8014, 519, 720, + X 1175, 2004, 3122, 4531, 6786, 8972, 8833, 8897, 8207, + X 7248, 4298, 3142, 2184, 1780, 1732, 1392, 1077, 853, + X 734, 640, 632, 602, 755, 850, 847, 860, 873, + X 894, 911, 888, 33, 7782, 7608, 567, 860, 1576, + X 2793, 4340, 6755, 10578, 14463, 17058, 13071, 10830, 8050, + X 5562, 4457, 3202, 3114, 3079, 2931, 2826, 2642, 2192, + X 1772, 1448, 1224, 1128, 1070, 1074, 1087, 1073, 1067, + X 31, 8601, 7131, 532, 913, 1616, 3018, 5419, 9207, + Y 14456/ + DATA MAP 16/ + X 19329, 22536, 23381, 16778, 13874, 7750, 4716, 3579, 3854, + X 4079, 3935, 3234, 2625, 2585, 2586, 2572, 2550, 2561, + X 2513, 2596, 2641, 29, 9420, 6630, 506, 864, 1562, + X 3128, 5983, 10205, 16453, 24342, 29366, 27618, 22287, 18444, + X 15934, 10004, 8329, 7515, 7355, 6759, 6134, 3818, 3562, + X 3340, 3275, 3238, 3322, 3645, 27, 10240, 6012, 438, + X 780, 1255, 2525, 5944, 11157, 19076, 32094, 37873, 38300, + X 32050, 24974, 19668, 15500, 10208, 8437, 7279, 5732, 4322, + X 3172, 2437, 2429, 2529, 2820, 25, 11264, 5475, 439, + X 724, 1428, 3344, 7002, 13165, 26384, 37240, 42053, 41304, + X 33930, 29309, 25763, 23855, 15288, 12002, 8386, 8387, 8272, + X 7777, 6884, 8015, 24, 12288, 5162, 409, 654, 1223, + X 2547, 6141, 11659, 19324, 32440, 48198, 55163, 54196, 41046, + X 35533, 30532, 26128, 17942, 14105, 11156, 9471, 10682, 15977, + X 22, 13516, 4758, 438, 733, 1327, 2456, 5208, 10804, + X 19805, 26527, 34336, 43649, 50222, 50500, 43690, 40191, 36566, + X 32282, 28428, 29400, 39894, 3, 20480, 0, 3, 32767, + X 0, 783, 100, 3, 0, 0, 3, 2301, 0, + Y 11/ + DATA MAP 17/ + X 2334, 1960, 17, 12, 13, 12, 12, 10, 9, + X 9, 14, 2355, 2624, 31, 24, 23, 21, 19, + X 13, 10, 6, 5, 1, 1, 16, 2396, 3228, + X 64, 44, 33, 19, 12, 10, 7, 6, 6, + X 5, 5, 3, 4, 18, 2457, 3653, 119, 94, + X 75, 42, 35, 28, 23, 20, 16, 12, 10, + X 8, 6, 6, 7, 22, 2662, 4662, 216, 201, + X 199, 156, 130, 101, 81, 60, 48, 33, 25, + X 20, 18, 16, 16, 9, 10, 10, 10, 24, + X 2867, 5294, 209, 254, 296, 285, 294, 231, 193, + X 114, 88, 68, 52, 47, 31, 26, 25, 25, + X 26, 23, 24, 26, 29, 26, 3072, 5838, 230, + X 258, 289, 313, 318, 335, 334, 300, 254, 201, + X 140, 105, 76, 57, 43, 35, 33, 32, 31, + X 28, 29, 30, 30, 28, 3276, 6153, 288, 327, + X 356, 381, 406, 404, 388, 359, 356, 312, 247, + X 214, 194, 142, 112, 81, 68, 52, 41, 34, + X 32, 30, 31, 36, 35, 29, 3481, 6520, 293, + Y 341/ + DATA MAP 18/ + X 392, 459, 485, 472, 492, 488, 443, 394, 345, + X 337, 273, 245, 209, 174, 136, 122, 94, 72, + X 58, 48, 35, 34, 38, 39, 30, 3686, 6761, + X 315, 370, 414, 474, 526, 588, 626, 631, 585, + X 553, 509, 438, 378, 329, 292, 261, 222, 172, + X 151, 98, 76, 63, 60, 56, 60, 68, 84, + X 30, 3891, 6909, 350, 417, 502, 591, 672, 771, + X 846, 876, 862, 784, 680, 579, 497, 392, 311, + X 232, 162, 141, 122, 104, 86, 69, 66, 62, + X 62, 67, 80, 31, 4096, 7094, 367, 438, 521, + X 647, 799, 978, 1176, 1364, 1406, 1209, 1027, 941, + X 565, 459, 380, 238, 150, 115, 62, 38, 24, + X 19, 16, 19, 16, 18, 16, 20, 32, 4300, + X 7242, 393, 470, 566, 726, 990, 1247, 1559, 1698, + X 1541, 1403, 1214, 965, 570, 506, 207, 161, 100, + X 89, 86, 86, 87, 86, 86, 87, 89, 90, + X 91, 94, 102, 32, 4505, 7377, 389, 477, 603, + X 803, 1089, 1389, 1722, 1930, 1911, 1825, 1543, 1184, + Y 705/ + DATA MAP 19/ + X 561, 357, 241, 208, 205, 217, 226, 181, 139, + X 83, 70, 69, 70, 74, 75, 81, 33, 4710, + X 7487, 402, 497, 650, 870, 1182, 1539, 1893, 2158, + X 2195, 1820, 1524, 1362, 1052, 807, 663, 557, 494, + X 322, 250, 196, 139, 113, 113, 114, 117, 116, + X 117, 117, 114, 118, 33, 4915, 7586, 385, 507, + X 716, 960, 1258, 1722, 2198, 2551, 2749, 2459, 2101, + X 1737, 1203, 819, 559, 319, 250, 227, 208, 202, + X 197, 197, 200, 204, 207, 213, 217, 217, 216, + X 218, 33, 5120, 7658, 394, 521, 738, 1016, 1403, + X 1950, 2460, 2839, 3103, 2971, 2477, 2051, 1855, 1512, + X 1090, 777, 584, 387, 230, 167, 149, 128, 126, + X 124, 126, 133, 132, 132, 127, 125, 34, 5324, + X 7723, 404, 535, 772, 1078, 1518, 2117, 2652, 3058, + X 3451, 3428, 3050, 2603, 2115, 1336, 1113, 594, 398, + X 303, 247, 240, 246, 258, 264, 262, 262, 259, + X 250, 244, 251, 258, 257, 34, 5529, 7777, 394, + X 519, 759, 1101, 1584, 2218, 2860, 3456, 3898, 3749, + Y 3679/ + DATA MAP 20/ + X 3177, 2706, 1785, 1349, 1053, 802, 571, 467, 404, + X 342, 276, 253, 248, 251, 254, 251, 257, 260, + X 260, 257, 34, 5734, 7795, 380, 508, 763, 1147, + X 1680, 2344, 3027, 3743, 4316, 4472, 4084, 3401, 2592, + X 2457, 1836, 1610, 1612, 1355, 1024, 645, 522, 292, + X 294, 282, 258, 221, 214, 196, 196, 201, 200, + X 34, 6144, 7762, 402, 537, 792, 1203, 1853, 2671, + X 3553, 4507, 5362, 5934, 5192, 4407, 3776, 3402, 2944, + X 2216, 1761, 1299, 1034, 828, 659, 534, 463, 321, + X 316, 323, 311, 314, 316, 328, 332, 33, 6963, + X 7500, 452, 598, 912, 1468, 2366, 3486, 4895, 6738, + X 8179, 8549, 9508, 8129, 7166, 3783, 2852, 2096, 1831, + X 1702, 1265, 1007, 828, 718, 651, 603, 637, 814, + X 849, 858, 895, 914, 31, 7782, 6939, 522, 755, + X 1260, 2152, 3389, 5055, 7932, 11779, 15030, 16017, 12407, + X 9994, 7887, 5242, 4287, 3624, 3363, 2964, 2914, 2797, + X 2082, 1712, 1417, 1220, 1144, 1117, 1122, 1120, 28, + X 8601, 6284, 407, 672, 1225, 2011, 3440, 5889, 9939, + Y 16037/ + DATA MAP 21/ + X 21522, 24071, 23418, 15698, 11009, 6282, 4591, 4462, 4805, + X 4425, 3371, 2614, 2541, 2463, 2461, 2734, 2612, 25, + X 9420, 5547, 350, 460, 755, 1190, 2188, 4496, 7724, + X 13039, 20767, 32944, 35094, 30524, 21946, 19605, 10265, 8768, + X 7317, 6065, 4203, 3658, 3354, 3529, 22, 10240, 4636, + X 277, 416, 666, 965, 1422, 3044, 4816, 7207, 11505, + X 20471, 42537, 41723, 37898, 27898, 20383, 15476, 12570, 9422, + X 9065, 19, 11264, 3924, 309, 355, 544, 862, 1231, + X 2579, 4232, 5960, 9071, 21152, 34273, 41233, 41140, 36631, + X 25294, 28206, 17, 12288, 3497, 311, 394, 644, 1006, + X 1694, 3708, 5976, 9598, 15923, 26355, 37962, 45523, 48895, + X 53970, 16, 13516, 3098, 349, 447, 680, 1029, 1603, + X 3188, 5529, 9136, 15107, 22390, 27256, 35118, 63012, 3, + X 20480, 0, 3, 32767, 0, 664, 200, 3, 0, + X 0, 3, 2303, 0, 11, 2334, 1938, 17, 12, + X 13, 12, 12, 10, 9, 9, 14, 2355, 2613, + X 31, 24, 23, 21, 19, 13, 10, 6, 5, + X 1, 1, 16, 2396, 3225, 63, 45, 33, 19, + Y 12/ + DATA MAP 22/ + X 10, 7, 6, 6, 5, 4, 4, 4, 18, + X 2457, 3651, 119, 92, 76, 42, 35, 28, 23, + X 20, 16, 12, 10, 8, 6, 6, 7, 22, + X 2662, 4651, 222, 199, 199, 157, 128, 100, 81, + X 59, 47, 33, 24, 21, 17, 17, 16, 9, + X 9, 10, 11, 24, 2867, 5270, 213, 259, 303, + X 293, 288, 229, 187, 111, 87, 66, 52, 45, + X 31, 25, 25, 26, 25, 23, 25, 26, 28, + X 26, 3072, 5806, 231, 261, 289, 312, 326, 344, + X 334, 301, 255, 194, 137, 101, 74, 55, 42, + X 35, 33, 32, 30, 29, 29, 30, 32, 27, + X 3276, 6120, 288, 331, 358, 375, 403, 411, 393, + X 373, 345, 315, 257, 213, 187, 138, 108, 79, + X 67, 50, 40, 34, 32, 30, 32, 35, 29, + X 3481, 6457, 298, 338, 393, 468, 503, 480, 499, + X 486, 447, 388, 351, 338, 272, 239, 207, 167, + X 132, 116, 89, 69, 55, 44, 36, 35, 37, + X 38, 30, 3686, 6660, 312, 365, 428, 505, 561, + Y 608/ + DATA MAP 23/ + X 648, 635, 588, 556, 507, 411, 370, 326, 289, + X 251, 210, 169, 132, 90, 71, 61, 59, 58, + X 61, 72, 63, 30, 3891, 6779, 351, 419, 518, + X 627, 694, 791, 851, 853, 845, 777, 682, 584, + X 500, 381, 301, 219, 160, 142, 122, 101, 80, + X 67, 63, 63, 63, 70, 87, 30, 4096, 6877, + X 369, 450, 560, 705, 865, 1055, 1280, 1443, 1359, + X 1190, 985, 797, 532, 404, 349, 203, 140, 96, + X 67, 31, 23, 20, 13, 19, 19, 16, 18, + X 31, 4300, 6961, 390, 480, 607, 801, 1044, 1291, + X 1543, 1718, 1614, 1423, 1209, 824, 553, 376, 214, + X 137, 93, 85, 82, 83, 85, 86, 88, 89, + X 89, 91, 93, 93, 31, 4505, 7006, 391, 491, + X 641, 843, 1098, 1466, 1855, 2068, 2068, 1770, 1512, + X 972, 647, 537, 260, 228, 205, 208, 226, 198, + X 172, 96, 76, 71, 72, 74, 75, 77, 31, + X 4710, 7034, 392, 498, 662, 862, 1152, 1611, 2073, + X 2294, 2179, 1822, 1521, 1346, 1015, 791, 658, 543, + Y 436/ + DATA MAP 24/ + X 284, 212, 175, 113, 113, 111, 113, 117, 120, + X 120, 120, 31, 4915, 7052, 367, 474, 667, 933, + X 1267, 1781, 2419, 2981, 3232, 2512, 2036, 1496, 851, + X 737, 359, 275, 230, 212, 201, 196, 202, 206, + X 208, 206, 210, 217, 219, 222, 31, 5120, 7053, + X 356, 462, 649, 940, 1362, 1945, 2578, 3077, 3349, + X 3058, 2454, 2003, 1796, 1418, 1023, 741, 574, 359, + X 232, 177, 152, 125, 120, 122, 127, 135, 134, + X 139, 31, 5324, 7044, 336, 430, 651, 980, 1384, + X 2083, 2737, 3277, 3791, 4007, 3289, 2640, 1917, 1113, + X 908, 496, 349, 253, 253, 251, 247, 245, 253, + X 259, 270, 268, 260, 260, 31, 5529, 7036, 340, + X 431, 640, 990, 1467, 2227, 2883, 3367, 3870, 4129, + X 3958, 3271, 2734, 1794, 1319, 1035, 804, 578, 464, + X 388, 321, 255, 250, 242, 242, 249, 263, 277, + X 31, 5734, 6965, 333, 432, 657, 1028, 1521, 2222, + X 2985, 3637, 4229, 4744, 4830, 3739, 3070, 2635, 1895, + X 1657, 1374, 1110, 765, 492, 375, 292, 283, 263, + Y 236/ + DATA MAP 25/ + X 216, 202, 205, 30, 6144, 6834, 326, 405, 599, + X 999, 1560, 2221, 3024, 3994, 5118, 5921, 6091, 4842, + X 4163, 3676, 3274, 2679, 1830, 1403, 1078, 868, 637, + X 501, 388, 318, 319, 315, 328, 28, 6963, 6250, + X 360, 496, 830, 1358, 2091, 3043, 4222, 5678, 7368, + X 8967, 9902, 9671, 7033, 5149, 3144, 2568, 2059, 1802, + X 1009, 930, 806, 674, 579, 674, 882, 24, 7782, + X 5282, 574, 819, 1347, 2404, 3698, 5239, 8784, 13898, + X 17731, 15705, 12740, 9658, 7335, 5800, 4887, 4128, 3380, + X 2707, 2031, 1665, 1410, 20, 8601, 4223, 420, 681, + X 1145, 1909, 3450, 5769, 10196, 18157, 25687, 27769, 20234, + X 17936, 7858, 5976, 5243, 4753, 4075, 15, 9420, 2943, + X 317, 415, 741, 1268, 2740, 7218, 12285, 27310, 54424, + X 46048, 33240, 23316, 8, 10240, 1241, 167, 232, 357, + X 594, 1646, 3, 11264, 0, 3, 32767, 0, 532, + X 600, 3, 0, 0, 3, 2306, 0, 11, 2334, + X 1883, 17, 12, 13, 12, 12, 10, 9, 10, + X 14, 2355, 2586, 31, 24, 23, 21, 19, 13, + Y 10/ + DATA MAP 26/ + X 6, 4, 2, 2, 16, 2396, 3202, 64, 44, + X 33, 19, 12, 10, 7, 6, 6, 5, 4, + X 4, 4, 18, 2457, 3644, 119, 90, 77, 42, + X 35, 28, 22, 20, 16, 12, 10, 8, 6, + X 6, 5, 21, 2662, 4603, 226, 217, 189, 161, + X 128, 96, 77, 57, 45, 31, 24, 20, 17, + X 16, 15, 9, 10, 9, 24, 2867, 5178, 224, + X 285, 325, 313, 274, 222, 166, 101, 81, 61, + X 50, 40, 29, 25, 25, 26, 24, 24, 25, + X 27, 28, 26, 3072, 5658, 235, 267, 294, 329, + X 363, 380, 347, 296, 242, 166, 119, 86, 64, + X 47, 39, 34, 32, 31, 29, 30, 29, 32, + X 31, 27, 3276, 5947, 295, 336, 366, 370, 402, + X 437, 435, 398, 351, 322, 260, 202, 160, 120, + X 90, 71, 57, 44, 36, 32, 31, 32, 34, + X 35, 27, 3481, 6109, 317, 363, 423, 502, 533, + X 527, 537, 507, 449, 407, 380, 314, 260, 214, + X 175, 136, 105, 82, 64, 52, 42, 36, 36, + Y 36/ + DATA MAP 27/ + X 28, 3686, 6190, 344, 404, 472, 560, 657, 739, + X 732, 653, 595, 558, 461, 411, 349, 302, 251, + X 197, 153, 106, 73, 62, 58, 57, 59, 69, + X 69, 28, 3891, 6206, 364, 445, 537, 668, 832, + X 911, 825, 806, 855, 834, 744, 611, 431, 346, + X 234, 176, 156, 120, 93, 68, 65, 64, 63, + X 68, 84, 27, 4096, 6128, 406, 508, 657, 838, + X 1033, 1193, 1309, 1367, 1214, 1058, 957, 652, 507, + X 389, 294, 187, 144, 76, 62, 30, 22, 20, + X 17, 20, 27, 4300, 6047, 403, 525, 723, 963, + X 1226, 1525, 1781, 1805, 1576, 1318, 912, 574, 462, + X 195, 171, 87, 87, 79, 79, 79, 82, 87, + X 93, 94, 27, 4505, 5954, 413, 539, 755, 1022, + X 1421, 1926, 2296, 2208, 1955, 1665, 1059, 694, 574, + X 268, 225, 221, 234, 203, 178, 94, 75, 69, + X 71, 76, 26, 4710, 5831, 393, 526, 783, 1132, + X 1637, 2215, 2577, 2577, 2073, 1730, 1477, 970, 750, + X 559, 458, 287, 211, 172, 110, 117, 121, 120, + Y 122/ + DATA MAP 28/ + X 26, 4915, 5720, 388, 497, 692, 1070, 1761, 2664, + X 3312, 3498, 2773, 2155, 1628, 928, 616, 335, 231, + X 203, 201, 213, 215, 224, 229, 233, 239, 25, + X 5120, 5570, 368, 483, 698, 1111, 1825, 2775, 3533, + X 3814, 3407, 2644, 2067, 1861, 1274, 956, 772, 393, + X 314, 198, 171, 129, 127, 129, 25, 5324, 5376, + X 375, 511, 799, 1252, 2076, 2943, 3672, 4259, 4550, + X 3384, 2720, 1621, 1169, 593, 400, 257, 255, 258, + X 251, 250, 272, 286, 24, 5529, 5212, 386, 533, + X 814, 1234, 2062, 3127, 4126, 4788, 4869, 4178, 3379, + X 2437, 1502, 1176, 866, 530, 442, 361, 292, 257, + X 268, 23, 5734, 4989, 384, 529, 822, 1283, 2168, + X 3139, 4045, 5329, 6279, 5801, 4248, 3229, 1939, 1458, + X 1152, 757, 566, 458, 308, 313, 21, 6144, 4544, + X 414, 564, 850, 1299, 2166, 3030, 4228, 6234, 7413, + X 6343, 5077, 4205, 3680, 2731, 2089, 1697, 1462, 985, + X 17, 6963, 3376, 411, 624, 1083, 1815, 2937, 4377, + X 7047, 9559, 11176, 12183, 8484, 8000, 3648, 3056, 10, + Y 7782/ + DATA MAP 29/ + X 1620, 578, 947, 1671, 3213, 5905, 10064, 23750, 3, + X 8601, 0, 3, 32767, 0, 473, 1000, 3, 0, + X 0, 3, 2308, 0, 11, 2334, 1821, 17, 12, + X 13, 12, 11, 11, 9, 9, 13, 2355, 2537, + X 31, 24, 23, 21, 19, 13, 10, 6, 5, + X 4, 16, 2396, 3189, 63, 45, 33, 19, 12, + X 10, 7, 6, 6, 5, 4, 4, 4, 18, + X 2457, 3635, 120, 89, 76, 42, 34, 28, 23, + X 19, 17, 12, 9, 8, 6, 6, 7, 21, + X 2662, 4555, 232, 222, 193, 161, 128, 93, 74, + X 54, 42, 30, 23, 20, 17, 16, 13, 10, + X 9, 11, 23, 2867, 5029, 265, 339, 367, 311, + X 253, 196, 130, 92, 70, 55, 44, 34, 27, + X 26, 25, 24, 25, 24, 27, 26, 25, 3072, + X 5422, 239, 284, 357, 413, 438, 393, 324, 262, + X 181, 129, 90, 67, 51, 40, 35, 32, 31, + X 30, 29, 30, 31, 31, 25, 3276, 5632, 318, + X 364, 398, 421, 474, 495, 460, 409, 359, 285, + Y 207/ + DATA MAP 30/ + X 161, 117, 88, 68, 54, 43, 35, 33, 31, + X 33, 34, 26, 3481, 5668, 335, 383, 477, 550, + X 602, 618, 604, 540, 484, 433, 340, 262, 210, + X 157, 121, 90, 69, 55, 45, 38, 36, 36, + X 36, 26, 3686, 5663, 363, 440, 541, 673, 774, + X 834, 771, 721, 659, 560, 462, 350, 287, 223, + X 168, 117, 70, 62, 58, 57, 59, 67, 68, + X 25, 3891, 5590, 394, 490, 631, 790, 952, 1021, + X 990, 1028, 952, 811, 623, 413, 310, 196, 173, + X 129, 91, 67, 65, 63, 63, 69, 25, 4096, + X 5488, 445, 542, 716, 960, 1213, 1347, 1488, 1376, + X 1210, 1024, 755, 559, 414, 319, 194, 153, 76, + X 62, 31, 22, 18, 18, 25, 4300, 5391, 462, + X 590, 821, 1156, 1506, 1776, 1937, 1738, 1462, 1053, + X 661, 516, 239, 216, 93, 88, 80, 78, 79, + X 81, 87, 100, 24, 4505, 5237, 471, 620, 912, + X 1389, 1906, 2324, 2226, 2161, 1802, 1323, 786, 606, + X 290, 247, 238, 237, 196, 143, 93, 72, 75, + Y 23/ + DATA MAP 31/ + X 4710, 5072, 438, 628, 996, 1485, 2229, 2784, 2591, + X 2347, 1973, 1660, 1001, 779, 581, 405, 283, 204, + X 161, 117, 124, 124, 23, 4915, 4894, 460, 622, + X 972, 1637, 2632, 3410, 3612, 3147, 2448, 1451, 1221, + X 448, 321, 234, 207, 207, 209, 221, 230, 239, + X 22, 5120, 4718, 427, 626, 1016, 1653, 2780, 3741, + X 4100, 3590, 2842, 2118, 1892, 1250, 922, 726, 421, + X 266, 186, 154, 131, 21, 5324, 4536, 404, 562, + X 898, 1587, 2846, 3671, 4353, 5169, 3553, 2892, 1829, + X 1194, 808, 415, 320, 263, 273, 297, 20, 5529, + X 4299, 428, 611, 988, 1616, 2678, 3862, 4871, 5531, + X 4787, 3764, 2683, 1593, 1260, 855, 550, 446, 368, + X 19, 5734, 4018, 465, 635, 992, 1701, 2809, 3985, + X 5472, 6788, 6300, 4673, 3412, 1959, 1459, 1127, 794, + X 605, 17, 6144, 3442, 449, 593, 893, 1427, 2226, + X 3228, 5654, 7596, 7913, 5856, 4834, 3891, 3162, 2365, + X 11, 6963, 1940, 512, 724, 1195, 2095, 3359, 5769, + X 9543, 13441, 3, 7782, 0, 3, 32767, 0, 400, + Y 2000/ + DATA MAP 32/ + X 3, 0, 0, 3, 2312, 0, 10, 2334, 1629, + X 17, 12, 13, 12, 11, 11, 11, 13, 2355, + X 2378, 31, 24, 23, 21, 19, 13, 10, 6, + X 5, 1, 16, 2396, 3134, 63, 45, 33, 19, + X 12, 10, 7, 6, 6, 5, 5, 3, 4, + X 18, 2457, 3612, 123, 90, 74, 41, 33, 29, + X 21, 19, 16, 12, 9, 8, 6, 6, 7, + X 21, 2662, 4406, 272, 239, 200, 157, 113, 85, + X 64, 49, 35, 26, 21, 18, 17, 14, 12, + X 9, 10, 11, 22, 2867, 4759, 367, 484, 372, + X 292, 201, 135, 98, 72, 55, 43, 35, 28, + X 26, 25, 25, 24, 25, 26, 26, 23, 3072, + X 4921, 380, 481, 555, 508, 426, 309, 193, 153, + X 97, 68, 52, 41, 36, 32, 32, 29, 30, + X 30, 31, 30, 23, 3276, 4891, 467, 585, 712, + X 675, 583, 483, 344, 259, 198, 141, 93, 73, + X 56, 44, 37, 33, 32, 32, 34, 33, 22, + X 3481, 4814, 472, 632, 806, 814, 782, 712, 616, + Y 447/ + DATA MAP 33/ + X 319, 239, 168, 121, 95, 69, 51, 43, 37, + X 34, 35, 22, 3686, 4705, 509, 703, 945, 1086, + X 1087, 961, 819, 603, 433, 342, 233, 140, 113, + X 63, 59, 59, 55, 61, 74, 21, 3891, 4579, + X 528, 770, 1122, 1432, 1348, 1319, 1133, 845, 525, + X 390, 227, 161, 143, 67, 66, 65, 63, 63, + X 21, 4096, 4420, 616, 923, 1383, 1763, 1770, 1561, + X 1329, 1062, 746, 572, 433, 258, 180, 130, 92, + X 44, 29, 25, 20, 4300, 4288, 660, 983, 1489, + X 2015, 2310, 1918, 1562, 1191, 796, 624, 277, 267, + X 104, 88, 86, 83, 83, 20, 4505, 4134, 633, + X 983, 1581, 2245, 2656, 2372, 2104, 1930, 923, 903, + X 349, 279, 242, 241, 217, 186, 109, 19, 4710, + X 3916, 664, 1059, 1747, 2531, 2999, 2812, 2408, 2092, + X 1194, 964, 713, 514, 369, 238, 188, 131, 18, + X 4915, 3717, 632, 1045, 1805, 2778, 3685, 4323, 3029, + X 2374, 1503, 680, 453, 250, 211, 211, 225, 17, + X 5120, 3504, 581, 997, 1766, 2837, 3926, 4569, 3717, + Y 3120/ + DATA MAP 34/ + X 2222, 1638, 1233, 898, 493, 356, 16, 5324, 3264, + X 555, 892, 1707, 2713, 3678, 4706, 5138, 3845, 2834, + X 1687, 1314, 725, 500, 15, 5529, 2944, 584, 924, + X 1698, 2818, 4114, 5429, 6089, 4712, 4264, 2016, 1585, + X 1083, 14, 5734, 2591, 513, 805, 1557, 2705, 4143, + X 6432, 8251, 5994, 5190, 2656, 1917, 11, 6144, 1804, + X 509, 724, 1211, 2046, 3043, 5020, 8322, 9479, 4, + X 6963, 22, 1965, 3, 7782, 0, 3, 32767, 0, + X 356, 3000, 3, 0, 0, 3, 2315, 0, 9, + X 2334, 1457, 17, 12, 13, 12, 12, 10, 12, + X 2355, 2243, 31, 24, 23, 21, 19, 13, 10, + X 6, 7, 16, 2396, 3094, 63, 45, 33, 19, + X 12, 10, 7, 6, 6, 5, 5, 3, 4, + X 18, 2457, 3589, 123, 95, 71, 41, 33, 27, + X 22, 19, 15, 12, 9, 8, 6, 6, 7, + X 20, 2662, 4329, 285, 244, 203, 155, 106, 84, + X 60, 46, 35, 27, 21, 17, 16, 14, 10, + X 10, 11, 22, 2867, 4648, 442, 472, 388, 296, + Y 168/ + DATA MAP 35/ + X 125, 88, 60, 54, 40, 32, 27, 26, 24, + X 25, 25, 25, 27, 27, 22, 3072, 4687, 554, + X 639, 571, 505, 316, 225, 170, 103, 76, 58, + X 42, 36, 33, 31, 29, 30, 30, 31, 31, + X 22, 3276, 4612, 625, 792, 793, 690, 558, 351, + X 274, 210, 141, 106, 77, 55, 43, 37, 33, + X 32, 32, 34, 33, 21, 3481, 4415, 727, 921, + X 974, 890, 757, 650, 444, 303, 217, 155, 121, + X 90, 63, 48, 40, 35, 36, 39, 20, 3686, + X 4249, 764, 1048, 1256, 1229, 1089, 830, 575, 452, + X 337, 174, 168, 69, 63, 60, 57, 56, 63, + X 19, 3891, 4096, 732, 1091, 1545, 1527, 1460, 1319, + X 799, 618, 364, 222, 171, 109, 74, 65, 65, + X 63, 19, 4096, 3855, 988, 1449, 1963, 1957, 1790, + X 1260, 990, 811, 541, 387, 296, 193, 100, 100, + X 38, 30, 18, 4300, 3672, 945, 1440, 2125, 2362, + X 2093, 1646, 1242, 927, 672, 325, 279, 129, 95, + X 89, 90, 17, 4505, 3465, 941, 1434, 2274, 2730, + Y 2600/ + DATA MAP 36/ + X 2295, 1887, 1175, 831, 456, 295, 237, 242, 235, + X 16, 4710, 3209, 973, 1612, 2430, 3367, 3054, 2649, + X 1957, 1348, 990, 754, 500, 408, 255, 15, 4915, + X 2972, 926, 1625, 2792, 3926, 4488, 3691, 2001, 1828, + X 583, 468, 266, 207, 14, 5120, 2727, 868, 1676, + X 2862, 3990, 4853, 3951, 3250, 2282, 1710, 1329, 794, + X 13, 5324, 2450, 793, 1427, 2595, 3683, 4146, 5234, + X 4349, 3117, 1956, 1518, 12, 5529, 2114, 718, 1195, + X 2178, 3600, 5100, 6486, 5691, 5333, 2477, 10, 5734, + X 1753, 564, 952, 1940, 3447, 5390, 7337, 8574, 7, + X 6144, 836, 576, 814, 1407, 2953, 3, 6963, 0, + X 3, 32767, 0, 308, 5000, 3, 0, 0, 3, + X 2321, 0, 8, 2334, 1233, 17, 12, 13, 12, + X 12, 11, 2355, 2016, 31, 24, 23, 21, 19, + X 13, 10, 6, 15, 2396, 3025, 63, 45, 33, + X 19, 12, 10, 7, 6, 6, 5, 4, 4, + X 17, 2457, 3541, 123, 94, 75, 42, 33, 26, + X 21, 19, 14, 12, 8, 8, 6, 6, 20, + Y 2662/ + DATA MAP 37/ + X 4236, 288, 246, 204, 156, 103, 83, 57, 42, + X 33, 27, 23, 19, 17, 16, 12, 11, 9, + X 21, 2867, 4517, 479, 483, 394, 267, 186, 106, + X 76, 60, 53, 44, 30, 26, 25, 25, 23, + X 24, 24, 25, 21, 3072, 4480, 757, 682, 600, + X 385, 277, 210, 121, 92, 68, 52, 39, 34, + X 32, 30, 29, 29, 29, 31, 20, 3276, 4347, + X 902, 882, 792, 659, 421, 341, 230, 159, 124, + X 93, 65, 46, 36, 32, 31, 31, 33, 20, + X 3481, 4100, 916, 1152, 1056, 914, 684, 478, 361, + X 228, 177, 140, 117, 66, 53, 42, 35, 35, + X 40, 19, 3686, 3882, 941, 1293, 1397, 1246, 1011, + X 650, 504, 369, 226, 168, 127, 74, 61, 60, + X 57, 58, 18, 3891, 3611, 987, 1439, 1692, 1631, + X 1450, 984, 749, 438, 263, 196, 113, 82, 67, + X 66, 64, 16, 4096, 3313, 1262, 2001, 2137, 1958, + X 1565, 1097, 882, 681, 429, 344, 200, 128, 111, + X 15, 4300, 3036, 1344, 2080, 2450, 2291, 1930, 1335, + Y 1052/ + DATA MAP 38/ + X 745, 407, 343, 149, 116, 14, 4505, 2745, 1309, + X 2076, 2686, 2679, 2466, 2147, 1374, 1112, 502, 401, + X 272, 13, 4710, 2428, 1374, 2244, 3341, 3171, 2816, + X 2214, 1560, 1158, 852, 727, 12, 4915, 2118, 1330, + X 2260, 3864, 4654, 4022, 2652, 2017, 887, 641, 11, + X 5120, 1799, 1432, 2705, 4025, 5075, 4615, 3688, 2447, + X 1958, 9, 5324, 1456, 1349, 2216, 3821, 3992, 4773, + X 4697, 8, 5529, 1058, 971, 1678, 2954, 4556, 6312, + X 6, 5734, 618, 656, 1147, 3056, 3, 6144, 0, + X 3, 32767, 0, 249, 10000, 3, 0, 0, 3, + X 2334, 0, 10, 2355, 1555, 31, 24, 23, 21, + X 19, 13, 12, 15, 2396, 2845, 63, 45, 33, + X 19, 12, 10, 7, 6, 6, 5, 5, 3, + X 17, 2457, 3400, 120, 93, 76, 41, 36, 30, + X 25, 16, 13, 10, 8, 7, 6, 6, 19, + X 2662, 4017, 303, 248, 202, 143, 101, 80, 53, + X 37, 30, 25, 23, 22, 18, 18, 16, 12, + X 20, 2867, 4267, 487, 475, 388, 270, 195, 104, + Y 74/ + DATA MAP 39/ + X 59, 49, 42, 31, 23, 25, 25, 24, 24, + X 25, 20, 3072, 4226, 772, 673, 577, 385, 285, + X 216, 122, 93, 66, 49, 37, 34, 33, 30, + X 30, 28, 30, 19, 3276, 3988, 933, 872, 782, + X 678, 429, 345, 217, 156, 123, 87, 54, 43, + X 36, 33, 30, 30, 18, 3481, 3695, 1035, 1115, + X 1011, 843, 570, 457, 355, 263, 217, 168, 153, + X 71, 60, 49, 38, 17, 3686, 3408, 963, 1181, + X 1250, 1150, 971, 626, 493, 376, 276, 207, 171, + X 142, 109, 70, 15, 3891, 3072, 949, 1281, 1498, + X 1450, 1316, 1193, 769, 649, 370, 228, 193, 99, + X 14, 4096, 2684, 1245, 1668, 2081, 1966, 1729, 1107, + X 900, 741, 472, 341, 246, 13, 4300, 2326, 1406, + X 1933, 2357, 2249, 1921, 1363, 1074, 819, 443, 353, + X 11, 4505, 1923, 1498, 1985, 2597, 2582, 2294, 1940, + X 1468, 1149, 9, 4710, 1527, 1291, 1811, 2800, 2930, + X 2776, 2460, 8, 4915, 1082, 1395, 2062, 3312, 3893, + X 4591, 6, 5120, 665, 1495, 2923, 4786, 4, 5324, + Y 174/ + DATA MAP 40/ + X 1699, 3, 5529, 0, 3, 32767, 0, 194, 20000, + X 3, 0, 0, 3, 2347, 0, 7, 2355, 797, + X 31, 24, 23, 21, 13, 2396, 2490, 64, 44, + X 33, 19, 12, 10, 7, 6, 6, 6, 15, + X 2457, 3038, 113, 88, 73, 44, 33, 28, 22, + X 18, 15, 13, 11, 10, 18, 2662, 3591, 307, + X 248, 201, 134, 96, 72, 48, 36, 29, 24, + X 21, 21, 23, 21, 20, 18, 2867, 3790, 472, + X 483, 380, 267, 198, 93, 61, 48, 40, 39, + X 37, 32, 25, 24, 27, 18, 3072, 3725, 769, + X 649, 526, 358, 284, 219, 153, 105, 67, 48, + X 35, 27, 27, 35, 36, 17, 3276, 3389, 836, + X 770, 723, 683, 477, 367, 244, 155, 124, 99, + X 76, 68, 47, 41, 15, 3481, 3049, 819, 984, + X 883, 749, 572, 453, 371, 314, 208, 237, 262, + X 176, 14, 3686, 2701, 829, 969, 953, 888, 805, + X 614, 524, 429, 334, 275, 211, 13, 3891, 2319, + X 663, 925, 1239, 1206, 1098, 1006, 969, 789, 675, + Y 534/ + DATA MAP 41/ + X 11, 4096, 1858, 934, 1448, 1759, 1805, 1634, 1303, + X 998, 866, 9, 4300, 1402, 903, 1391, 2227, 2362, + X 2063, 1579, 7, 4505, 856, 1286, 1601, 2390, 2881, + X 5, 4710, 283, 1313, 1680, 3, 4915, 0, 3, + X 32767, 0, 130, 40000, 3, 0, 0, 3, 2363, + X 0, 11, 2396, 1821, 63, 45, 33, 19, 12, + X 10, 7, 6, 13, 2457, 2307, 82, 70, 60, + X 52, 33, 26, 22, 20, 16, 15, 14, 2662, + X 2792, 262, 235, 192, 152, 88, 68, 50, 40, + X 35, 30, 25, 15, 2867, 2941, 413, 527, 358, + X 266, 209, 73, 52, 42, 33, 25, 20, 21, + X 15, 3072, 2821, 710, 614, 557, 305, 248, 200, + X 166, 129, 91, 69, 49, 42, 13, 3276, 2454, + X 675, 589, 445, 494, 524, 415, 346, 281, 196, + X 132, 11, 3481, 2040, 605, 685, 723, 674, 603, + X 410, 339, 308, 10, 3686, 1613, 586, 615, 615, + X 682, 708, 658, 560, 8, 3891, 1074, 591, 725, + X 841, 1013, 1106, 6, 4096, 521, 880, 1122, 1201, + Y 3/ + DATA MAP 42/ + X 4300, 0, 3, 32767, 0, + Y 0/ + END diff --git a/SOFIP/guzik_version/dspctr.for b/SOFIP/guzik_version/dspctr.for new file mode 100755 index 0000000..3ce2176 --- /dev/null +++ b/SOFIP/guzik_version/dspctr.for @@ -0,0 +1,120 @@ +C *** *************** DIFFERENTIAL SPECTRUM SUBROUTINE *************** +C *** CALCULATES FIRST DERIVATIVES OF INPUT SPECTRUM DEFINED BY FF VS XX +C *** INPUT: XX - 30 INTEGRAL THRESHOLD ENERGIES, IN MEV (R*4) +C *** FF - ALOG OF THE INTEGRAL FLUXES FOR THE 30 ENERGY (R*4) +C *** LEVELS, IN PARTICLES/CM**2/SEC +C *** OUTPUT: DD - DIFFERENTIAL FLUXES OBTAINED FROM THE INTEGRAL (R*4) +C *** FLUXES, IN PARTICLES/CM**2/SEC/KEV +C *** ****************************************************************** +C *** THIS IS A MODIFIED VERSION OF A PROGRAM (DCS1FU) OBTAINED FROM +C *** IMSL LIBRARY 1: AUTHOR/IMPLEMENTOR - C.L.SMITH +C *** ****************************************************************** + SUBROUTINE DSPCTR(FF,XX,DD) + IMPLICIT REAL*8(A-H,O-Z) + REAL*4 DD,FF,XX + DIMENSION F(30),X(30),D(30),H(500),FF(30) ,XX(30) ,DD(30) + DATA EPSLN,OMEGA/1.D-6,1.0717968D0/ +C *** DATA INITIALIZATION + M=0 + DO 5 L=1,30 + 5 DD(L)=0.0 +C *** DETERMINE SIZE OF ARRAY: OBTAIN M & K INDICES +C *** M = # OF NONZERO FLUXES - 1; K = # OF NONZERO FLUXES + DO 10 K=1,30 + IF(FF(K).EQ.0.) GO TO 15 + M=K-1 + F(K)=FF(K)+ALOG(1000.) + X(K)=XX(K)*1000.D0 + 10 D(K)=X(K) + 15 K=M+1 + IF(K.LT.10) GO TO 170 +C *** SMOOTHING INTEGRAL FLUX + CALL SMOOTH(X,F,M) +C *** CALCULATE SECOND DERIVATIVES USING CENTRAL DIFFERENCES + DO 30 I=1,M + H(I)=X(I+1)-X(I) + 30 H(K +I)=(F(I+1)-F(I))/H(I) + DO 40 I=2,M + H(2*K+I)=H(I-1)+H(I) + H(3*K+I)=.5*H(I-1)/H (2*K+I) + H(4*K+I)=(H(K+I)-H(K+I-1))/H(2*K+I) + H(5*K+I)=H(4*K+I)+H(4*K+I) + 40 H(6*K+I)=H(5*K+I)+H(4*K+I) + H(5*K+1)=0. + H(6*K)=0. +C *** BEGIN ITERATION ON SECOND DERIVATIVES + KCOUNT=0 + 50 ETA=0. + KCOUNT=KCOUNT+1 + DO 70 I=2,M + W=(H(6*K+I)-H(3*K+I)*H(5*K+I-1)-(.5-H(3*K+I))*H(5*K+I+1)-H(5*K+ + $ I)*OMEGA) + IF (DABS(W).LE.ETA) GO TO 60 + ETA=DABS(W) + 60 H(5*K+I)=H(5*K+I)+W + 70 CONTINUE + IF(KCOUNT.GT.5*K)GO TO 170 + IF (ETA.GE.EPSLN) GO TO 50 +C *** CONVERGENCE OBTAINED + DO 80 I=1,M + 80 H(7*K+I)=(H(5*K+1+I)-H(5*K+I))/H(I) + DO 140 J=1,K + I=1 + IF (D(J).EQ.X(1))GO TO 130 + IF (D(J)-X(K )) 100,110,110 + 90 IF (D(J)-X(I)) 120,130,100 + 100 I=I+1 + GO TO 90 + 110 I=K + 120 I=I-1 +C *** COMPUTE D(J) + 130 HT1=D(J)-X(I) + HT2=D(J)-X(I+1) + PROD=HT1*HT2 + H(8*K+J)=H(5*K+I)+HT1*H(7*K+I) + DELSQS=(H(5*K+I)+H(5*K+1+I)+H(8*K+J))/6. + 140 D(J)=-(H(K +I)+(HT1+HT2)*DELSQS+PROD*H(7*K+I)*.1666667) +C *** SMOOTHING DIFFERENTIAL FLUX + CALL SMOOTH(X,D,M) + DO 160 I=1,K + F(I)=2.718281828D0**(F(I)-ALOG(1000.)) + 160 DD(I) =D(I)*F(I) + 170 RETURN + END +C +C *** SMOOTH DATA BY 3-POINT AVERAGING OVER EQUAL INTERVALS + SUBROUTINE SMOOTH(X,F,M) + IMPLICIT REAL*8(A-H,O-Z) + DIMENSION X(30),F(30) + FINTER(X1,X2,X3,Y1,Y2,Y3,XIN)=Y1*(XIN-X2)*(XIN-X3)/ + $((X1-X2)*(X1-X3)) + Y2*(XIN-X1)*(XIN-X3)/((X2-X1)*(X2-X3)) + $ + Y3*(XIN-X1)*(XIN-X2)/((X3-X1)*(X3-X2)) +C + FI = F(1) + DO 20 I=2,M + SIZE1 = X(I) - X(I-1) + SIZE2 = X(I+1) - X(I) +C *** CHECK FOR EQUAL STEPSIZES + IF(DABS(SIZE1-SIZE2).LT.0.001) GO TO 200 + IF(SIZE2.GT.SIZE1) GO TO 210 +C *** STEPSIZE DECREASES - FIT CURVE AND INTERPOLATE BACKWARD + F2 = F(I+1) + XINTER = X(I) - SIZE2 + F1 = FINTER(X(I-1),X(I),X(I+1),FI,F(I),F2,XINTER) + GO TO 300 +C *** STEPSIZE INCREASES - FIT CURVE AND INTERPOLATE FORWARD + 210 F1 = FI + XINTER = X(I) + SIZE1 + F2 = FINTER(X(I-1),X(I),X(I+1),F1,F(I),F(I+1),XINTER) + GO TO 300 +C *** STEPSIZES ARE EQUAL - AVERAGE OVER EXISTING VALUES + 200 F1 = FI + F2 = F(I+1) +C +C *** PERFORM AVERAGING + 300 FNEW = (F1+2.0*F(I)+F2)/4. + FI = F(I) + F(I) = FNEW + 20 CONTINUE + RETURN + END diff --git a/SOFIP/guzik_version/guzik.doc b/SOFIP/guzik_version/guzik.doc new file mode 100755 index 0000000..62c1dd8 --- /dev/null +++ b/SOFIP/guzik_version/guzik.doc @@ -0,0 +1,47 @@ +From: PHEPDS::GUZIK "T. Gregory Guzik - Louisiana State University" 7-FEB-1994 13:22:50.47 +To: JCOOPER +CC: GUZIK +Subj: Working SOFIP + +John, + +The following describes what I did to the archive SOFIP you downloaded for me +and where the "working" files are stored. Note that "working" means that output +number appear reasonable, but nothing has been validated. + + Greg + +ps. I still need to call Stass... Will do that in the next few days. + + + +SOFIP files in Directory PHCRES::DSKK2:[CRRES.MODELS.SOFIP] + +AAAREADME.TXT - This file + +SOFIP_MAIN.FOR - The SOFIP main program and associated subroutines +DSPCTR.FOR +SOLPRO.FOR +TARARA1.FOR +TARARA2.FOR + +SOFIP.FOR - SOFIP source that contains all routines + +AE5MIN.FOR - The radiation belt models +AE6MAX.FOR +AEI7HI.FOR +AEI7LO.FOR +AP8MAC.FOR +AP8MIC.FOR + +RUN_SOFIP.COM - Sample procedure to compile and run SOFIP +SAMPLE_INPUT.INP - Sample input file +SAMPLE_ORBIT.DAT - Sample orbit file +SAMPLE_ORBIT_6.OUT - Sample output +SAMPLE_ORBIT_7.OUT - Sample output + +UNPACK_SOFIP.COM - Procedure to convert the NSSDC archive files +STRIP_TO_72.FOR - Truncates line to 72 characters and deletes trailing + spaces +UNFOLD_RECORDS.FOR - Splits long records into individual lines + diff --git a/SOFIP/guzik_version/run_sofip.com b/SOFIP/guzik_version/run_sofip.com new file mode 100755 index 0000000..c50933a --- /dev/null +++ b/SOFIP/guzik_version/run_sofip.com @@ -0,0 +1,22 @@ +$! +$! To run a particular radiation model the appropriate common block must be +$! uncommented in the SOFIP.FOR source and compiled. Next the BLOCK DATA +$! routine for the radiation model is compiled and linked with the SOFIP +$! object. Note that only electrons OR protons can be run in a single pass. +$! In addition, electrons need a inner model (AEI7LO, AEI7HI) and an outer +$! model (AE5MIN, AE6MAX). This example is setup for the AP8MAC proton model. +$! +$! NOTE: The sample input deck (SAMPLE_INPUT.INP) does not necessarily +$! correspond to the actual parameter used to general the sample orbit +$! (SAMPLE_ORBIT.DAT). See the SOFIP document for details on how to run +$! the program +$! +$ FOR SOFIP +$ FOR AP8MAC +$ LINK SOFIP,AP8MAC +$ DEFINE FOR005 SAMPLE_INPUT.INP +$ DEFINE FOR009 SAMPLE_ORBIT.DAT +$ DEFINE FOR006 SAMPLE_ORBIT_6.OUT +$ DEFINE FOR007 SAMPLE_ORBIT_7.OUT +$ RUN SOFIP +$ EXIT diff --git a/SOFIP/guzik_version/sample_input.inp b/SOFIP/guzik_version/sample_input.inp new file mode 100755 index 0000000..00c766c --- /dev/null +++ b/SOFIP/guzik_version/sample_input.inp @@ -0,0 +1,2 @@ +TEST RUNAAAA INCL 89 PRG 2000 APG 2000 MOD 1 PERIOD: 1.500000 1975.00 +04 ITAPE:0000 NTABL 2 CUTOFF:100.50 01 PRINT:01 diff --git a/SOFIP/guzik_version/sample_orbit.dat b/SOFIP/guzik_version/sample_orbit.dat new file mode 100755 index 0000000..4f39eb6 --- /dev/null +++ b/SOFIP/guzik_version/sample_orbit.dat @@ -0,0 +1,721 @@ + 0.0 -0.99729745D 02 0.19932601D-01 0.19940100D 04 0.14110426D 00 0.13647248D 01 + 0.33333331D-01 -0.10023105D 03 0.56954889D 01 0.19941825D 04 0.15099956D 00 0.14214918D 01 + 0.66666663D-01 -0.10073236D 03 0.11370691D 02 0.19946899D 04 0.16341585D 00 0.15126328D 01 + 0.99999964D-01 -0.10123366D 03 0.17045202D 02 0.19955110D 04 0.17749040D 00 0.16473056D 01 + 0.13333333D 00 -0.10173495D 03 0.22718714D 02 0.19966114D 04 0.19234155D 00 0.18404855D 01 + 0.16666663D 00 -0.10223624D 03 0.28390960D 02 0.19979452D 04 0.20713876D 00 0.21150286D 01 + 0.19999999D 00 -0.10273752D 03 0.34061728D 02 0.19994566D 04 0.22113839D 00 0.25087115D 01 + 0.23333329D 00 -0.10323878D 03 0.39730865D 02 0.20010823D 04 0.23371059D 00 0.30852981D 01 + 0.26666665D 00 -0.10374003D 03 0.45398290D 02 0.20027540D 04 0.24437085D 00 0.39616939D 01 + 0.29999995D 00 -0.10424124D 03 0.51063992D 02 0.20044015D 04 0.25281691D 00 0.53607903D 01 + 0.33333331D 00 -0.10474241D 03 0.56728036D 02 0.20059550D 04 0.25896090D 00 0.77779850D 01 + 0.36666662D 00 -0.10524352D 03 0.62390561D 02 0.20073483D 04 0.26294124D 00 0.12426804D 02 + 0.39999998D 00 -0.10574450D 03 0.68051773D 02 0.20085210D 04 -0.10000000D 01 -0.10000000D 01 + 0.43333328D 00 -0.10624522D 03 0.73711938D 02 0.20094213D 04 -0.10000000D 01 -0.10000000D 01 + 0.46666664D 00 -0.10674528D 03 0.79371374D 02 0.20100071D 04 -0.10000000D 01 -0.10000000D 01 + 0.49999994D 00 -0.10724238D 03 0.85030437D 02 0.20102488D 04 -0.10000000D 01 -0.10000000D 01 + 0.53333330D 00 0.72190669D 02 0.89310492D 02 0.20101297D 04 -0.10000000D 01 -0.10000000D 01 + 0.56666666D 00 0.71740650D 02 0.83651024D 02 0.20096467D 04 -0.10000000D 01 -0.10000000D 01 + 0.59999996D 00 0.71242237D 02 0.77990774D 02 0.20088111D 04 0.26230103D 00 0.12013559D 02 + 0.63333333D 00 0.70741935D 02 0.72329377D 02 0.20076477D 04 0.25991653D 00 0.75843015D 01 + 0.66666663D 00 0.70241118D 02 0.66666503D 02 0.20061943D 04 0.25618679D 00 0.52453782D 01 + 0.69999999D 00 0.69740088D 02 0.61001871D 02 0.20044998D 04 0.25076065D 00 0.38709546D 01 + 0.73333329D 00 0.69238949D 02 0.55335259D 02 0.20026232D 04 0.24343243D 00 0.30064618D 01 + 0.76666665D 00 0.68737747D 02 0.49666514D 02 0.20006309D 04 0.23417343D 00 0.24326730D 01 + 0.79999995D 00 0.68236505D 02 0.43995560D 02 0.19985946D 04 0.22314165D 00 0.20381310D 01 + 0.83333331D 00 0.67735236D 02 0.38322396D 02 0.19965881D 04 0.21069374D 00 0.17608474D 01 + 0.86666662D 00 0.67233947D 02 0.32647105D 02 0.19946851D 04 0.19741451D 00 0.15657019D 01 + 0.89999998D 00 0.66732645D 02 0.26969843D 02 0.19929560D 04 0.18415448D 00 0.14294771D 01 + 0.93333328D 00 0.66231333D 02 0.21290840D 02 0.19914652D 04 0.17202928D 00 0.13389290D 01 + 0.96666664D 00 0.65730013D 02 0.15610388D 02 0.19902688D 04 0.16230139D 00 0.12851127D 01 + 0.99999994D 00 0.65228686D 02 0.99288314D 01 0.19894118D 04 0.15608120D 00 0.12632184D 01 + 0.10333328D 01 0.64727353D 02 0.42465531D 01 0.19889268D 04 0.15391702D 00 0.12714048D 01 + 0.10666666D 01 0.64226016D 02 -0.14360372D 01 0.19888322D 04 0.15554206D 00 0.13103115D 01 + 0.10999994D 01 0.63724675D 02 -0.71185188D 01 0.19891315D 04 0.16002042D 00 0.13820250D 01 + 0.11333332D 01 0.63223332D 02 -0.12800475D 02 0.19898135D 04 0.16619146D 00 0.14921875D 01 + 0.11666660D 01 0.62721986D 02 -0.18481508D 02 0.19908522D 04 0.17308367D 00 0.16502412D 01 + 0.11999998D 01 0.62220640D 02 -0.24161252D 02 0.19922084D 04 0.18010217D 00 0.18681481D 01 + 0.12333326D 01 0.61719292D 02 -0.29839390D 02 0.19938310D 04 0.18700919D 00 0.21655186D 01 + 0.12666664D 01 0.61217944D 02 -0.35515660D 02 0.19956594D 04 0.19380046D 00 0.25727617D 01 + 0.12999992D 01 0.60716595D 02 -0.41189869D 02 0.19976257D 04 0.20056611D 00 0.31371205D 01 + 0.13333330D 01 0.60215247D 02 -0.46861898D 02 0.19996572D 04 0.20738591D 00 0.39372819D 01 + 0.13666658D 01 0.59713899D 02 -0.52531706D 02 0.20016797D 04 0.21427317D 00 0.51046935D 01 + 0.13999996D 01 0.59212553D 02 -0.58199333D 02 0.20036203D 04 0.22115787D 00 0.68666791D 01 + 0.14333324D 01 0.58711210D 02 -0.63864894D 02 0.20054095D 04 0.22789031D 00 0.96101620D 01 + 0.14666662D 01 0.58209875D 02 -0.69528578D 02 0.20069847D 04 0.23425107D 00 0.13832264D 02 + 0.14999990D 01 0.57708557D 02 -0.75190639D 02 0.20082919D 04 -0.10000000D 01 -0.10000000D 01 + 0.15333328D 01 0.57207284D 02 -0.80851385D 02 0.20092880D 04 -0.10000000D 01 -0.10000000D 01 + 0.15666666D 01 0.56706275D 02 -0.86511166D 02 0.20099418D 04 -0.10000000D 01 -0.10000000D 01 + 0.15999994D 01 -0.12379653D 03 -0.87829640D 02 0.20102358D 04 -0.10000000D 01 -0.10000000D 01 + 0.16333332D 01 -0.12429723D 03 -0.82170640D 02 0.20101661D 04 -0.10000000D 01 -0.10000000D 01 + 0.16666660D 01 -0.12479848D 03 -0.76511445D 02 0.20097426D 04 0.24784753D 00 0.82475556D 01 + 0.16999998D 01 -0.12529979D 03 -0.70851685D 02 0.20089888D 04 0.24371777D 00 0.59278216D 01 + 0.17333326D 01 -0.12580112D 03 -0.65191019D 02 0.20079406D 04 0.23760759D 00 0.44510366D 01 + 0.17666664D 01 -0.12630247D 03 -0.59529155D 02 0.20066450D 04 0.22969721D 00 0.34843955D 01 + 0.17999992D 01 -0.12680381D 03 -0.53865855D 02 0.20051585D 04 0.22024393D 00 0.28286433D 01 + 0.18333330D 01 -0.12730516D 03 -0.48200947D 02 0.20035446D 04 0.20956193D 00 0.23697498D 01 + 0.18666658D 01 -0.12780652D 03 -0.42534331D 02 0.20018718D 04 0.19801514D 00 0.20406785D 01 + 0.18999996D 01 -0.12830787D 03 -0.36865981D 02 0.20002104D 04 0.18602739D 00 0.18005260D 01 + 0.19333324D 01 -0.12880923D 03 -0.31195944D 02 0.19986302D 04 0.17410738D 00 0.16247664D 01 + 0.19666662D 01 -0.12931059D 03 -0.25524341D 02 0.19971973D 04 0.16287811D 00 0.14958833D 01 + 0.19999990D 01 -0.12981195D 03 -0.19851355D 02 0.19959716D 04 0.15308953D 00 0.14053259D 01 + 0.20333328D 01 -0.13031331D 03 -0.14177229D 02 0.19950043D 04 0.14558162D 00 0.13455833D 01 + 0.20666666D 01 -0.13081467D 03 -0.85022542D 01 0.19943358D 04 0.14116361D 00 0.13128446D 01 + 0.20999994D 01 -0.13131603D 03 -0.28267555D 01 0.19939939D 04 0.14041342D 00 0.13054303D 01 + 0.21333332D 01 -0.13181740D 03 0.28489202D 01 0.19939929D 04 0.14348518D 00 0.13231535D 01 + 0.21666660D 01 -0.13231877D 03 0.85244188D 01 0.19943328D 04 0.15005733D 00 0.13672847D 01 + 0.21999998D 01 -0.13282014D 03 0.14199394D 02 0.19949995D 04 0.15946023D 00 0.14412881D 01 + 0.22333326D 01 -0.13332151D 03 0.19873520D 02 0.19959651D 04 0.17088084D 00 0.15519720D 01 + 0.22666664D 01 -0.13382288D 03 0.25546508D 02 0.19971891D 04 0.18352032D 00 0.17087897D 01 + 0.22999992D 01 -0.13432426D 03 0.31218116D 02 0.19986204D 04 0.19666380D 00 0.19275483D 01 + 0.23333330D 01 -0.13482565D 03 0.36888159D 02 0.20001992D 04 0.20968931D 00 0.22347530D 01 + 0.23666658D 01 -0.13532703D 03 0.42556519D 02 0.20018593D 04 0.22205769D 00 0.26737779D 01 + 0.23999996D 01 -0.13582843D 03 0.48223149D 02 0.20035310D 04 0.23331050D 00 0.33205319D 01 + 0.24333324D 01 -0.13632983D 03 0.53888076D 02 0.20051436D 04 0.24308404D 00 0.43170960D 01 + 0.24666662D 01 -0.13683125D 03 0.59551401D 02 0.20066287D 04 0.25113186D 00 0.59450860D 01 + 0.24999990D 01 -0.13733269D 03 0.65213297D 02 0.20079226D 04 0.25734104D 00 0.88309604D 01 + 0.25333328D 01 -0.13783418D 03 0.70873999D 02 0.20089687D 04 0.26172759D 00 0.14469980D 02 + 0.25666666D 01 -0.13833578D 03 0.76533801D 02 0.20097201D 04 -0.10000000D 01 -0.10000000D 01 + 0.25999994D 01 -0.13883769D 03 0.82193041D 02 0.20101406D 04 -0.10000000D 01 -0.10000000D 01 + 0.26333332D 01 -0.13934248D 03 0.87852091D 02 0.20102071D 04 -0.10000000D 01 -0.10000000D 01 + 0.26666660D 01 0.40163698D 02 0.86488661D 02 0.20099095D 04 -0.10000000D 01 -0.10000000D 01 + 0.26999998D 01 0.39660537D 02 0.80828825D 02 0.20092519D 04 -0.10000000D 01 -0.10000000D 01 + 0.27333326D 01 0.39158724D 02 0.75168023D 02 0.20082523D 04 0.25672826D 00 0.11065565D 02 + 0.27666664D 01 0.38657140D 02 0.69505906D 02 0.20069419D 04 0.25129774D 00 0.70886062D 01 + 0.27999992D 01 0.38155634D 02 0.63842167D 02 0.20053642D 04 0.24453370D 00 0.49408001D 01 + 0.28333330D 01 0.37654164D 02 0.58176551D 02 0.20035733D 04 0.23643723D 00 0.36788920D 01 + 0.28666658D 01 0.37152712D 02 0.52508870D 02 0.20016320D 04 0.22703689D 00 0.28832231D 01 + 0.28999996D 01 0.36651271D 02 0.46839006D 02 0.19996096D 04 0.21639671D 00 0.23551939D 01 + 0.29333324D 01 0.36149836D 02 0.41166922D 02 0.19975790D 04 0.20464678D 00 0.19913109D 01 + 0.29666662D 01 0.35648405D 02 0.35492658D 02 0.19956144D 04 0.19204583D 00 0.17364999D 01 + 0.29999990D 01 0.35146977D 02 0.29816333D 02 0.19937883D 04 0.17906398D 00 0.15570908D 01 + 0.30333328D 01 0.34645550D 02 0.24138140D 02 0.19921684D 04 0.16644545D 00 0.14331637D 01 + 0.30666666D 01 0.34144123D 02 0.18458341D 02 0.19908153D 04 0.15518355D 00 0.13548144D 01 + 0.30999994D 01 0.33642694D 02 0.12777253D 02 0.19897798D 04 0.14633569D 00 0.13138632D 01 + 0.31333332D 01 0.33141264D 02 0.70952420D 01 0.19891009D 04 0.14067331D 00 0.13040863D 01 + 0.31666660D 01 0.32639832D 02 0.14127069D 01 0.19888044D 04 0.13832980D 00 0.13251337D 01 + 0.31999998D 01 0.32138396D 02 -0.42699359D 01 0.19889014D 04 0.13872860D 00 0.13770847D 01 + 0.32333326D 01 0.31636954D 02 -0.99522659D 01 0.19893883D 04 0.14089397D 00 0.14603984D 01 + 0.32666664D 01 0.31135507D 02 -0.15633874D 02 0.19902465D 04 0.14391319D 00 0.15786322D 01 + 0.32999992D 01 0.30634052D 02 -0.21314377D 02 0.19914434D 04 0.14725384D 00 0.17373983D 01 + 0.33333330D 01 0.30132586D 02 -0.26993431D 02 0.19929338D 04 0.15083593D 00 0.19430045D 01 + 0.33666658D 01 0.29631109D 02 -0.32670746D 02 0.19946616D 04 0.15492035D 00 0.22011247D 01 + 0.33999996D 01 0.29129615D 02 -0.38346093D 02 0.19965624D 04 0.15991578D 00 0.25297283D 01 + 0.34333324D 01 0.28628099D 02 -0.44019315D 02 0.19985655D 04 0.16619034D 00 0.29496801D 01 + 0.34666662D 01 0.28126553D 02 -0.49690331D 02 0.20005974D 04 0.17394427D 00 0.34977240D 01 + 0.34999990D 01 0.27624960D 02 -0.55359141D 02 0.20025842D 04 0.18316287D 00 0.42349837D 01 + 0.35333328D 01 0.27123294D 02 -0.61025820D 02 0.20044543D 04 0.19363238D 00 0.52577956D 01 + 0.35666666D 01 0.26621499D 02 -0.66690523D 02 0.20061416D 04 0.20498327D 00 0.67250834D 01 + 0.35999994D 01 0.26119452D 02 -0.72353471D 02 0.20075875D 04 0.21673254D 00 0.88730397D 01 + 0.36333332D 01 0.25616792D 02 -0.78014946D 02 0.20087432D 04 0.22831559D 00 0.11977831D 02 + 0.36666660D 01 0.25111871D 02 -0.83675276D 02 0.20095712D 04 0.23911520D 00 0.16025415D 02 + 0.36999998D 01 0.24546956D 02 -0.89334827D 02 0.20100470D 04 -0.10000000D 01 -0.10000000D 01 + 0.37333326D 01 -0.15587399D 03 -0.85006014D 02 0.20101600D 04 -0.10000000D 01 -0.10000000D 01 + 0.37666664D 01 -0.15638041D 03 -0.79346859D 02 0.20099131D 04 -0.10000000D 01 -0.10000000D 01 + 0.37999992D 01 -0.15688334D 03 -0.73687323D 02 0.20093233D 04 0.26279914D 00 0.11221174D 02 + 0.38333330D 01 -0.15738547D 03 -0.68027052D 02 0.20084203D 04 0.26188903D 00 0.78970087D 01 + 0.38666658D 01 -0.15788731D 03 -0.62365728D 02 0.20072458D 04 0.25809562D 00 0.57030688D 01 + 0.38999996D 01 -0.15838899D 03 -0.56703083D 02 0.20058519D 04 0.25166399D 00 0.42771733D 01 + 0.39333324D 01 -0.15889059D 03 -0.51038914D 02 0.20042987D 04 0.24295288D 00 0.33357418D 01 + 0.39666662D 01 -0.15939214D 03 -0.45373083D 02 0.20026525D 04 0.23237575D 00 0.26967950D 01 + 0.39999990D 01 -0.15989366D 03 -0.39705526D 02 0.20009828D 04 0.22036386D 00 0.22528970D 01 + 0.40333328D 01 -0.16039517D 03 -0.34036256D 02 0.19993597D 04 0.20736745D 00 0.19373982D 01 + 0.40666666D 01 -0.16089665D 03 -0.28365356D 02 0.19978515D 04 0.19389439D 00 0.17105842D 01 + 0.40999994D 01 -0.16139813D 03 -0.22692981D 02 0.19965213D 04 0.18056724D 00 0.15476660D 01 + 0.41333332D 01 -0.16189961D 03 -0.17019344D 02 0.19954250D 04 0.16816346D 00 0.14324172D 01 + 0.41666660D 01 -0.16240108D 03 -0.11344715D 02 0.19946083D 04 0.15759536D 00 0.13555031D 01 + 0.41999998D 01 -0.16290255D 03 -0.56694026D 01 0.19941057D 04 0.14979255D 00 0.13097579D 01 + 0.42333326D 01 -0.16340402D 03 0.62560403D-02 0.19939382D 04 0.14549049D 00 0.12912173D 01 + 0.42666664D 01 -0.16390550D 03 0.56819087D 01 0.19941130D 04 0.14501218D 00 0.12983098D 01 + 0.42999992D 01 -0.16440698D 03 0.11357204D 02 0.19946228D 04 0.14818864D 00 0.13305557D 01 + 0.43333330D 01 -0.16490847D 03 0.17031804D 02 0.19954465D 04 0.15448379D 00 0.13891577D 01 + 0.43666658D 01 -0.16540996D 03 0.22705400D 02 0.19965497D 04 0.16322190D 00 0.14776965D 01 + 0.43999996D 01 -0.16591148D 03 0.28377725D 02 0.19978865D 04 0.17376105D 00 0.16028552D 01 + 0.44333324D 01 -0.16641301D 03 0.34048567D 02 0.19994010D 04 0.18554794D 00 0.17774942D 01 + 0.44666662D 01 -0.16691456D 03 0.39717772D 02 0.20010300D 04 0.19808683D 00 0.20203519D 01 + 0.44999990D 01 -0.16741615D 03 0.45385258D 02 0.20027052D 04 0.21088421D 00 0.23653757D 01 + 0.45333328D 01 -0.16791780D 03 0.51051018D 02 0.20043562D 04 0.22341349D 00 0.28701218D 01 + 0.45666666D 01 -0.16841953D 03 0.56715114D 02 0.20059130D 04 0.23511751D 00 0.36407658D 01 + 0.45999994D 01 -0.16892138D 03 0.62377686D 02 0.20073093D 04 0.24544636D 00 0.48832020D 01 + 0.46333332D 01 -0.16942347D 03 0.68038938D 02 0.20084846D 04 0.25391582D 00 0.70353652D 01 + 0.46666660D 01 -0.16992603D 03 0.73699138D 02 0.20093869D 04 0.26016726D 00 0.11129218D 02 + 0.46999998D 01 -0.17042981D 03 0.79358603D 02 0.20099746D 04 0.26401073D 00 0.19751728D 02 + 0.47333326D 01 -0.17093898D 03 0.85017691D 02 0.20102179D 04 -0.10000000D 01 -0.10000000D 01 + 0.47666664D 01 0.86816001D 01 0.89323214D 02 0.20101001D 04 -0.10000000D 01 -0.10000000D 01 + 0.47999992D 01 0.80842501D 01 0.83663724D 02 0.20096184D 04 -0.10000000D 01 -0.10000000D 01 + 0.48333330D 01 0.75774180D 01 0.78003446D 02 0.20087836D 04 -0.10000000D 01 -0.10000000D 01 + 0.48666658D 01 0.70740535D 01 0.72342017D 02 0.20076204D 04 -0.10000000D 01 -0.10000000D 01 + 0.48999996D 01 0.65716296D 01 0.66679104D 02 0.20061663D 04 0.24412276D 00 0.72647776D 01 + 0.49333324D 01 0.60695943D 01 0.61014427D 02 0.20044702D 04 0.23583079D 00 0.50102436D 01 + 0.49666662D 01 0.55677564D 01 0.55347761D 02 0.20025910D 04 0.22643149D 00 0.37053665D 01 + 0.49999990D 01 0.50660323D 01 0.49678953D 02 0.20005949D 04 0.21590684D 00 0.28886968D 01 + 0.50333328D 01 0.45643794D 01 0.44007926D 02 0.19985536D 04 0.20427814D 00 0.23497747D 01 + 0.50666666D 01 0.40627735D 01 0.38334680D 02 0.19965410D 04 0.19168893D 00 0.19801264D 01 + 0.50999994D 01 0.35612000D 01 0.32659295D 02 0.19946310D 04 0.17848122D 00 0.17270712D 01 + 0.51333332D 01 0.30596491D 01 0.26981929D 02 0.19928940D 04 0.16524304D 00 0.15525827D 01 + 0.51666660D 01 0.25581144D 01 0.21302809D 02 0.19913946D 04 0.15279571D 00 0.14400669D 01 + 0.51999998D 01 0.20565909D 01 0.15622227D 02 0.19901890D 04 0.14208234D 00 0.13735888D 01 + 0.52333326D 01 0.15550749D 01 0.99405265D 01 0.19893223D 04 0.13393643D 00 0.13423724D 01 + 0.52666664D 01 0.10535627D 01 0.42580912D 01 0.19888270D 04 0.12878906D 00 0.13425762D 01 + 0.52999992D 01 0.55205175D 00 -0.14246680D 01 0.19887218D 04 0.12648721D 00 0.13699091D 01 + 0.53333330D 01 0.50539400D-01 -0.71073294D 01 0.19890103D 04 0.12638857D 00 0.14225019D 01 + 0.53666658D 01 -0.45097692D 00 -0.12789475D 02 0.19896817D 04 0.12768944D 00 0.14999257D 01 + 0.53999996D 01 -0.95249971D 00 -0.18470705D 02 0.19907102D 04 0.12976206D 00 0.16028420D 01 + 0.54333324D 01 -0.14540323D 01 -0.24150655D 02 0.19920571D 04 0.13233088D 00 0.17320091D 01 + 0.54666662D 01 -0.19555787D 01 -0.29829003D 02 0.19936714D 04 0.13547135D 00 0.18898032D 01 + 0.54999990D 01 -0.24571446D 01 -0.35505490D 02 0.19954929D 04 0.13949845D 00 0.20825028D 01 + 0.55333328D 01 -0.29587384D 01 -0.41179919D 02 0.19974538D 04 0.14481802D 00 0.23196196D 01 + 0.55666666D 01 -0.34603726D 01 -0.46852172D 02 0.19994816D 04 0.15179214D 00 0.26178996D 01 + 0.55999994D 01 -0.39620667D 01 -0.52522207D 02 0.20015022D 04 0.16064567D 00 0.30058537D 01 + 0.56333332D 01 -0.44638542D 01 -0.58190061D 02 0.20034425D 04 0.17141668D 00 0.35283328D 01 + 0.56666660D 01 -0.49657974D 01 -0.63855848D 02 0.20052333D 04 0.18393892D 00 0.42657113D 01 + 0.56999998D 01 -0.54680270D 01 -0.69519756D 02 0.20068116D 04 0.19784191D 00 0.53595158D 01 + 0.57333326D 01 -0.59708724D 01 -0.75182035D 02 0.20081236D 04 0.21256459D 00 0.70783036D 01 + 0.57666664D 01 -0.64754758D 01 -0.80842994D 02 0.20091258D 04 0.22738804D 00 0.99453355D 01 + 0.57999992D 01 -0.69903729D 01 -0.86502978D 02 0.20097871D 04 0.24149444D 00 0.14972293D 02 + 0.58333330D 01 0.17256526D 03 -0.87837635D 02 0.20100896D 04 -0.10000000D 01 -0.10000000D 01 + 0.58666658D 01 0.17203833D 03 -0.82178456D 02 0.20100295D 04 -0.10000000D 01 -0.10000000D 01 + 0.58999996D 01 0.17153281D 03 -0.76519097D 02 0.20096167D 04 -0.10000000D 01 -0.10000000D 01 + 0.59333324D 01 0.17102972D 03 -0.70859189D 02 0.20088745D 04 -0.10000000D 01 -0.10000000D 01 + 0.59666662D 01 0.17052739D 03 -0.65198392D 02 0.20078389D 04 0.27682238D 00 0.12755927D 02 + 0.59999990D 01 0.17002540D 03 -0.59536414D 02 0.20065568D 04 0.27457217D 00 0.81414616D 01 + 0.60333328D 01 0.16952358D 03 -0.53873016D 02 0.20050845D 04 0.26942499D 00 0.55681250D 01 + 0.60666666D 01 0.16902188D 03 -0.48208027D 02 0.20034853D 04 0.26171124D 00 0.40640657D 01 + 0.60999994D 01 0.16852024D 03 -0.42541345D 02 0.20018273D 04 0.25177401D 00 0.31292844D 01 + 0.61333332D 01 0.16801864D 03 -0.36872944D 02 0.20001806D 04 0.23995836D 00 0.25191991D 01 + 0.61666660D 01 0.16751708D 03 -0.31202870D 02 0.19986147D 04 0.22664399D 00 0.21058893D 01 + 0.61999998D 01 0.16701553D 03 -0.25531243D 02 0.19971953D 04 0.21230584D 00 0.18184608D 01 + 0.62333326D 01 0.16651401D 03 -0.19858247D 02 0.19959821D 04 0.19757593D 00 0.16163526D 01 + 0.62666664D 01 0.16601249D 03 -0.14184125D 02 0.19950260D 04 0.18327760D 00 0.14739773D 01 + 0.62999992D 01 0.16551098D 03 -0.85091668D 01 0.19943675D 04 0.17040563D 00 0.13763874D 01 + 0.63333330D 01 0.16500947D 03 -0.28336973D 01 0.19940344D 04 0.16003026D 00 0.13140080D 01 + 0.63666658D 01 0.16450796D 03 0.28419379D 01 0.19940409D 04 0.15311778D 00 0.12813606D 01 + 0.63999996D 01 0.16400644D 03 0.85173857D 01 0.19943871D 04 0.15030586D 00 0.12755073D 01 + 0.64333324D 01 0.16350492D 03 0.14192301D 02 0.19950587D 04 0.15173993D 00 0.12957073D 01 + 0.64666662D 01 0.16300339D 03 0.19866359D 02 0.19960280D 04 0.15707976D 00 0.13426589D 01 + 0.64999990D 01 0.16250184D 03 0.25539273D 02 0.19972545D 04 0.16566397D 00 0.14203000D 01 + 0.65333328D 01 0.16200027D 03 0.31210802D 02 0.19986871D 04 0.17670175D 00 0.15352653D 01 + 0.65666666D 01 0.16149867D 03 0.36880763D 02 0.20002659D 04 0.18938595D 00 0.16995163D 01 + 0.65999994D 01 0.16099704D 03 0.42549039D 02 0.20019249D 04 0.20292273D 00 0.19331434D 01 + 0.66333332D 01 0.16049534D 03 0.48215584D 02 0.20035941D 04 0.21652941D 00 0.22680990D 01 + 0.66666660D 01 0.15999357D 03 0.53880427D 02 0.20052032D 04 0.22944602D 00 0.27615993D 01 + 0.66999998D 01 0.15949167D 03 0.59543671D 02 0.20066838D 04 0.24097716D 00 0.35169125D 01 + 0.67333326D 01 0.15898955D 03 0.65205489D 02 0.20079720D 04 0.25055559D 00 0.47355447D 01 + 0.67666664D 01 0.15848702D 03 0.70866119D 02 0.20090117D 04 0.25780540D 00 0.68525783D 01 + 0.67999992D 01 0.15798357D 03 0.76525857D 02 0.20097558D 04 0.26258076D 00 0.10907015D 02 + 0.68333330D 01 0.15747719D 03 0.82185042D 02 0.20101684D 04 0.26496255D 00 0.19765450D 02 + 0.68666658D 01 0.15694477D 03 0.87844047D 02 0.20102263D 04 -0.10000000D 01 -0.10000000D 01 + 0.68999996D 01 -0.23487497D 02 0.86496737D 02 0.20099197D 04 -0.10000000D 01 -0.10000000D 01 + 0.69333324D 01 -0.24005187D 02 0.80836919D 02 0.20092525D 04 -0.10000000D 01 -0.10000000D 01 + 0.69666662D 01 -0.24510449D 02 0.75176119D 02 0.20082428D 04 -0.10000000D 01 -0.10000000D 01 + 0.69999990D 01 -0.25013584D 02 0.69513987D 02 0.20069217D 04 -0.10000000D 01 -0.10000000D 01 + 0.70333328D 01 -0.25515972D 02 0.63850213D 02 0.20053326D 04 0.24480358D 00 0.86722599D 01 + 0.70666666D 01 -0.26018013D 02 0.58184546D 02 0.20035298D 04 0.23716515D 00 0.58032812D 01 + 0.70999994D 01 -0.26519864D 02 0.52516795D 02 0.20015762D 04 0.22816733D 00 0.42010514D 01 + 0.71333332D 01 -0.27021599D 02 0.46846845D 02 0.19995412D 04 0.21775416D 00 0.32267991D 01 + 0.71666660D 01 -0.27523259D 02 0.41174657D 02 0.19974980D 04 0.20600167D 00 0.25987202D 01 + 0.71999998D 01 -0.28024869D 02 0.35500272D 02 0.19955211D 04 0.19315428D 00 0.21763986D 01 + 0.72333326D 01 -0.28526442D 02 0.29823811D 02 0.19936830D 04 0.17963098D 00 0.18854031D 01 + 0.72666664D 01 -0.29027989D 02 0.24145468D 02 0.19920519D 04 0.16600202D 00 0.16842489D 01 + 0.72999992D 01 -0.29529517D 02 0.18465503D 02 0.19906885D 04 0.15293825D 00 0.15477696D 01 + 0.73333330D 01 -0.30031030D 02 0.12784237D 02 0.19896439D 04 0.14113403D 00 0.14587962D 01 + 0.73666658D 01 -0.30532534D 02 0.71020362D 01 0.19889571D 04 0.13120809D 00 0.14063061D 01 + 0.73999996D 01 -0.31034030D 02 0.14192999D 01 0.19886539D 04 0.12359831D 00 0.13819735D 01 + 0.74333324D 01 -0.31535522D 02 -0.42635520D 01 0.19887455D 04 0.11848695D 00 0.13809296D 01 + 0.74666662D 01 -0.32037015D 02 -0.99460962D 01 0.19892284D 04 0.11579996D 00 0.14001216D 01 + 0.74999990D 01 -0.32538509D 02 -0.15627920D 02 0.19900840D 04 0.11529413D 00 0.14387985D 01 + 0.75333328D 01 -0.33040010D 02 -0.21308639D 02 0.19912800D 04 0.11669116D 00 0.14973247D 01 + 0.75666666D 01 -0.33541520D 02 -0.26987905D 02 0.19927713D 04 0.11979158D 00 0.15780553D 01 + 0.75999994D 01 -0.34043045D 02 -0.32665426D 02 0.19945021D 04 0.12452435D 00 0.16859535D 01 + 0.76333332D 01 -0.34544590D 02 -0.38340973D 02 0.19964079D 04 0.13092895D 00 0.18270945D 01 + 0.76666660D 01 -0.35046163D 02 -0.44014385D 02 0.19984181D 04 0.13909246D 00 0.20142739D 01 + 0.76999998D 01 -0.35547777D 02 -0.49685580D 02 0.20004591D 04 0.14907040D 00 0.22646750D 01 + 0.77333326D 01 -0.36049454D 02 -0.55354557D 02 0.20024567D 04 0.16081649D 00 0.26084371D 01 + 0.77666664D 01 -0.36551231D 02 -0.61021390D 02 0.20043391D 04 0.17413769D 00 0.30958884D 01 + 0.77999992D 01 -0.37053181D 02 -0.66686231D 02 0.20060400D 04 0.18868119D 00 0.38167246D 01 + 0.78333330D 01 -0.37555470D 02 -0.72349298D 02 0.20075005D 04 0.20395148D 00 0.49436461D 01 + 0.78666658D 01 -0.38058579D 02 -0.78010873D 02 0.20086716D 04 0.21935082D 00 0.68417847D 01 + 0.78999996D 01 -0.38564702D 02 -0.83671284D 02 0.20095159D 04 0.23423392D 00 0.10406589D 02 + 0.79333324D 01 -0.39150312D 02 -0.89330894D 02 0.20100087D 04 0.24796657D 00 0.18255015D 02 + 0.79666662D 01 0.14045502D 03 -0.85009908D 02 0.20101388D 04 -0.10000000D 01 -0.10000000D 01 + 0.79999990D 01 0.13994689D 03 -0.79350735D 02 0.20099091D 04 -0.10000000D 01 -0.10000000D 01 + 0.80333328D 01 0.13944341D 03 -0.73691206D 02 0.20093364D 04 -0.10000000D 01 -0.10000000D 01 + 0.80666666D 01 0.13894099D 03 -0.68030963D 02 0.20084501D 04 -0.10000000D 01 -0.10000000D 01 + 0.80999994D 01 0.13843898D 03 -0.62369690D 02 0.20072919D 04 -0.10000000D 01 -0.10000000D 01 + 0.81333332D 01 0.13793717D 03 -0.56707119D 02 0.20059137D 04 0.28196204D 00 0.10747370D 02 + 0.81666660D 01 0.13743548D 03 -0.51043045D 02 0.20043754D 04 0.27782666D 00 0.66153567D 01 + 0.81999998D 01 0.13693386D 03 -0.45377331D 02 0.20027433D 04 0.27094466D 00 0.45297113D 01 + 0.82333326D 01 0.13643229D 03 -0.39709911D 02 0.20010870D 04 0.26150709D 00 0.33440705D 01 + 0.82666664D 01 0.13593075D 03 -0.34040793D 02 0.19994766D 04 0.24980236D 00 0.26136859D 01 + 0.82999992D 01 0.13542924D 03 -0.28370061D 02 0.19979800D 04 0.23624810D 00 0.21391169D 01 + 0.83333330D 01 0.13492774D 03 -0.22697864D 02 0.19966603D 04 0.22142718D 00 0.18191247D 01 + 0.83666658D 01 0.13442627D 03 -0.17024415D 02 0.19955730D 04 0.20611960D 00 0.15987693D 01 + 0.83999996D 01 0.13392480D 03 -0.11349980D 02 0.19947637D 04 0.19131898D 00 0.14473784D 01 + 0.84333324D 01 0.13342334D 03 -0.56748664D 01 0.19942665D 04 0.17821250D 00 0.13457433D 01 + 0.84666662D 01 0.13292189D 03 0.59026738D-03 0.19941023D 04 0.16808626D 00 0.12825215D 01 + 0.84999990D 01 0.13242044D 03 0.56760395D 01 0.19942783D 04 0.16211282D 00 0.12513545D 01 + 0.85333328D 01 0.13191899D 03 0.11351131D 02 0.19947871D 04 0.16103646D 00 0.12490921D 01 + 0.85666666D 01 0.13141754D 03 0.17025530D 02 0.19956077D 04 0.16490636D 00 0.12751891D 01 + 0.85999994D 01 0.13091609D 03 0.22698930D 02 0.19967059D 04 0.17305690D 00 0.13308517D 01 + 0.86333332D 01 0.13041464D 03 0.28371065D 02 0.19980357D 04 0.18434960D 00 0.14207287D 01 + 0.86666660D 01 0.12991318D 03 0.34041725D 02 0.19995416D 04 0.19748487D 00 0.15546723D 01 + 0.86999998D 01 0.12941171D 03 0.39710760D 02 0.20011604D 04 0.21122192D 00 0.17451826D 01 + 0.87333326D 01 0.12891023D 03 0.45378088D 02 0.20028240D 04 0.22448917D 00 0.20160680D 01 + 0.87666664D 01 0.12840874D 03 0.51043703D 02 0.20044622D 04 0.23643567D 00 0.24064412D 01 + 0.87999992D 01 0.12790722D 03 0.56707670D 02 0.20060055D 04 0.24646255D 00 0.29824927D 01 + 0.88333330D 01 0.12740564D 03 0.62370129D 02 0.20073878D 04 0.25424378D 00 0.38623892D 01 + 0.88666658D 01 0.12690399D 03 0.68031287D 02 0.20085487D 04 0.25972809D 00 0.52909859D 01 + 0.88999996D 01 0.12640215D 03 0.73691413D 02 0.20094366D 04 0.26311042D 00 0.78025770D 01 + 0.89333324D 01 0.12589984D 03 0.79350826D 02 0.20100096D 04 0.26476750D 00 0.12742006D 02 + 0.89666662D 01 0.12539543D 03 0.85009883D 02 0.20102383D 04 -0.10000000D 01 -0.10000000D 01 + 0.89999990D 01 -0.55057769D 02 0.89331034D 02 0.20101058D 04 -0.10000000D 01 -0.10000000D 01 + 0.90333328D 01 -0.55597136D 02 0.83671534D 02 0.20096096D 04 -0.10000000D 01 -0.10000000D 01 + 0.90666666D 01 -0.56100625D 02 0.78011230D 02 0.20087606D 04 -0.10000000D 01 -0.10000000D 01 + 0.90999994D 01 -0.56602750D 02 0.72349758D 02 0.20075837D 04 -0.10000000D 01 -0.10000000D 01 + 0.91333332D 01 -0.57104503D 02 0.66686788D 02 0.20061166D 04 -0.10000000D 01 -0.10000000D 01 + 0.91666660D 01 -0.57606100D 02 0.61022038D 02 0.20044085D 04 -0.10000000D 01 -0.10000000D 01 + 0.91999998D 01 -0.58107618D 02 0.55355289D 02 0.20025183D 04 0.24907188D 00 0.73294422D 01 + 0.92333326D 01 -0.58609088D 02 0.49686387D 02 0.20005127D 04 0.24212451D 00 0.51516457D 01 + 0.92666664D 01 -0.59110530D 02 0.44015257D 02 0.19984633D 04 0.23331498D 00 0.38769885D 01 + 0.92999992D 01 -0.59611953D 02 0.38341901D 02 0.19964445D 04 0.22269921D 00 0.30739965D 01 + 0.93333330D 01 -0.60113362D 02 0.32666402D 02 0.19945302D 04 0.21050136D 00 0.25407850D 01 + 0.93666658D 01 -0.60614762D 02 0.26988917D 02 0.19927910D 04 0.19709002D 00 0.21734017D 01 + 0.93999996D 01 -0.61116156D 02 0.21309676D 02 0.19912916D 04 0.18294957D 00 0.19134146D 01 + 0.94333324D 01 -0.61617547D 02 0.15628973D 02 0.19900880D 04 0.16865719D 00 0.17264753D 01 + 0.94666662D 01 -0.62118936D 02 0.99471516D 01 0.19892254D 04 0.15486699D 00 0.15915078D 01 + 0.94999990D 01 -0.62620325D 02 0.42645983D 01 0.19887359D 04 0.14229193D 00 0.14962977D 01 + 0.95333328D 01 -0.63121714D 02 -0.14182747D 01 0.19886379D 04 0.13166436D 00 0.14316163D 01 + 0.95666666D 01 -0.63623105D 02 -0.71010432D 01 0.19889350D 04 0.12365641D 00 0.13944767D 01 + 0.95999994D 01 -0.64124497D 02 -0.12783286D 02 0.19896158D 04 0.11876376D 00 0.13816929D 01 + 0.96333332D 01 -0.64625891D 02 -0.18464603D 02 0.19906546D 04 0.11720100D 00 0.13931306D 01 + 0.96666660D 01 -0.65127288D 02 -0.24144624D 02 0.19920124D 04 0.11888272D 00 0.14295846D 01 + 0.96999998D 01 -0.65628687D 02 -0.29823030D 02 0.19936384D 04 0.12351382D 00 0.14934571D 01 + 0.97333326D 01 -0.66130090D 02 -0.35499556D 02 0.19954720D 04 0.13072101D 00 0.15904073D 01 + 0.97666664D 01 -0.66631498D 02 -0.41174009D 02 0.19974454D 04 0.14013538D 00 0.17289667D 01 + 0.97999992D 01 -0.67132912D 02 -0.46846266D 02 0.19994861D 04 0.15139733D 00 0.19224701D 01 + 0.98333330D 01 -0.67634336D 02 -0.52516286D 02 0.20015200D 04 0.16411784D 00 0.21952817D 01 + 0.98666658D 01 -0.68135773D 02 -0.58184107D 02 0.20034737D 04 0.17784398D 00 0.25853088D 01 + 0.98999996D 01 -0.68637231D 02 -0.63849843D 02 0.20052779D 04 0.19205708D 00 0.31599484D 01 + 0.99333324D 01 -0.69138726D 02 -0.69513681D 02 0.20068699D 04 0.20620631D 00 0.40426957D 01 + 0.99666662D 01 -0.69640299D 02 -0.75175873D 02 0.20081954D 04 0.21976288D 00 0.54838094D 01 + 0.99999990D 01 -0.70142093D 02 -0.80836728D 02 0.20092110D 04 0.23227360D 00 0.80519273D 01 + 0.10033333D 02 -0.70645170D 02 -0.86496594D 02 0.20098855D 04 0.24339502D 00 0.13273196D 02 + 0.10066667D 02 0.10886057D 03 -0.87844152D 02 0.20102006D 04 -0.10000000D 01 -0.10000000D 01 + 0.10099999D 02 0.10835597D 03 -0.82185118D 02 0.20101522D 04 -0.10000000D 01 -0.10000000D 01 + 0.10133333D 02 0.10785405D 03 -0.76525915D 02 0.20097500D 04 -0.10000000D 01 -0.10000000D 01 + 0.10166666D 02 0.10735244D 03 -0.70866173D 02 0.20090170D 04 -0.10000000D 01 -0.10000000D 01 + 0.10200000D 02 0.10685093D 03 -0.65205554D 02 0.20079889D 04 -0.10000000D 01 -0.10000000D 01 + 0.10233333D 02 0.10634945D 03 -0.59543763D 02 0.20067126D 04 -0.10000000D 01 -0.10000000D 01 + 0.10266666D 02 0.10584800D 03 -0.53880564D 02 0.20052444D 04 0.26996314D 00 0.89464368D 01 + 0.10299999D 02 0.10534657D 03 -0.48215783D 02 0.20036478D 04 0.26530189D 00 0.57519945D 01 + 0.10333333D 02 0.10484514D 03 -0.42549320D 02 0.20019910D 04 0.25837337D 00 0.40520969D 01 + 0.10366666D 02 0.10434372D 03 -0.36881146D 02 0.20003444D 04 0.24930080D 00 0.30521902D 01 + 0.10400000D 02 0.10384231D 03 -0.31211307D 02 0.19987777D 04 0.23833456D 00 0.24208495D 01 + 0.10433332D 02 0.10334090D 03 -0.25539919D 02 0.19973569D 04 0.22586927D 00 0.20037365D 01 + 0.10466666D 02 0.10283950D 03 -0.19867164D 02 0.19961419D 04 0.21246685D 00 0.17204050D 01 + 0.10499999D 02 0.10233811D 03 -0.14193283D 02 0.19951836D 04 0.19889168D 00 0.15251438D 01 + 0.10533333D 02 0.10183672D 03 -0.85185617D 01 0.19945223D 04 0.18614832D 00 0.13916084D 01 + 0.10566667D 02 0.10133535D 03 -0.28433234D 01 0.19941856D 04 0.17548109D 00 0.13046258D 01 + 0.10599999D 02 0.10083398D 03 0.28320875D 01 0.19941878D 04 0.16825544D 00 0.12541890D 01 + 0.10633333D 02 0.10033261D 03 0.85073192D 01 0.19945290D 04 0.16564598D 00 0.12347449D 01 + 0.10666666D 02 0.99831260D 02 0.14182027D 02 0.19951948D 04 0.16819827D 00 0.12452365D 01 + 0.10700000D 02 0.99329916D 02 0.19855890D 02 0.19961577D 04 0.17554812D 00 0.12860881D 01 + 0.10733333D 02 0.98828581D 02 0.25528619D 02 0.19973773D 04 0.18654297D 00 0.13611636D 01 + 0.10766666D 02 0.98327255D 02 0.31199975D 02 0.19988026D 04 0.19965365D 00 0.14777182D 01 + 0.10799999D 02 0.97825941D 02 0.36869776D 02 0.20003738D 04 0.21337414D 00 0.16469533D 01 + 0.10833333D 02 0.97324641D 02 0.42537904D 02 0.20020250D 04 0.22645395D 00 0.18874277D 01 + 0.10866666D 02 0.96823360D 02 0.48204314D 02 0.20036866D 04 0.23798566D 00 0.22301535D 01 + 0.10900000D 02 0.96322105D 02 0.53869036D 02 0.20052883D 04 0.24741600D 00 0.27239760D 01 + 0.10933332D 02 0.95820890D 02 0.59532171D 02 0.20067618D 04 0.25452489D 00 0.34559958D 01 + 0.10966666D 02 0.95319741D 02 0.65193894D 02 0.20080435D 04 0.25938870D 00 0.45913991D 01 + 0.10999999D 02 0.94818714D 02 0.70854443D 02 0.20090768D 04 0.26232741D 00 0.64714798D 01 + 0.11033333D 02 0.94317960D 02 0.76514112D 02 0.20098146D 04 0.26383023D 00 0.99104538D 01 + 0.11066667D 02 0.93818066D 02 0.82173239D 02 0.20102212D 04 0.26445699D 00 0.17184816D 02 + 0.11099999D 02 0.93325749D 02 0.87832196D 02 0.20102730D 04 -0.10000000D 01 -0.10000000D 01 + 0.11133333D 02 -0.87195825D 02 0.86508630D 02 0.20099603D 04 -0.10000000D 01 -0.10000000D 01 + 0.11166666D 02 -0.87692370D 02 0.80848848D 02 0.20092874D 04 -0.10000000D 01 -0.10000000D 01 + 0.11200000D 02 -0.88192578D 02 0.75188082D 02 0.20082723D 04 -0.10000000D 01 -0.10000000D 01 + 0.11233333D 02 -0.88693409D 02 0.69525982D 02 0.20069465D 04 -0.10000000D 01 -0.10000000D 01 + 0.11266666D 02 -0.89194460D 02 0.63862242D 02 0.20053537D 04 -0.10000000D 01 -0.10000000D 01 + 0.11299999D 02 -0.89695613D 02 0.58196608D 02 0.20035483D 04 0.26135005D 00 0.10223102D 02 + 0.11333333D 02 -0.90196822D 02 0.52528892D 02 0.20015933D 04 0.25643924D 00 0.66216113D 01 + 0.11366666D 02 -0.90698067D 02 0.46858977D 02 0.19995581D 04 0.24916479D 00 0.46873512D 01 + 0.11400000D 02 -0.91199335D 02 0.41186825D 02 0.19975158D 04 0.23947577D 00 0.35359499D 01 + 0.11433332D 02 -0.91700619D 02 0.35512478D 02 0.19955407D 04 0.22756413D 00 0.28024444D 01 + 0.11466666D 02 -0.92201915D 02 0.29836055D 02 0.19937053D 04 0.21384310D 00 0.23128225D 01 + 0.11499999D 02 -0.92703218D 02 0.24157749D 02 0.19920773D 04 0.19891161D 00 0.19762305D 01 + 0.11533333D 02 -0.93204527D 02 0.18477823D 02 0.19907174D 04 0.18351765D 00 0.17407765D 01 + 0.11566667D 02 -0.93705839D 02 0.12796596D 02 0.19896763D 04 0.16852628D 00 0.15760896D 01 + 0.11599999D 02 -0.94207153D 02 0.71144358D 01 0.19889930D 04 0.15488482D 00 0.14629523D 01 + 0.11633333D 02 -0.94708467D 02 0.14317428D 01 0.19886931D 04 0.14356341D 00 0.13894842D 01 + 0.11666666D 02 -0.95209780D 02 -0.42510630D 01 0.19887879D 04 0.13544157D 00 0.13486268D 01 + 0.11700000D 02 -0.95711091D 02 -0.99335583D 01 0.19892736D 04 0.13113591D 00 0.13352944D 01 + 0.11733333D 02 -0.96212399D 02 -0.15615331D 02 0.19901320D 04 0.13083562D 00 0.13478819D 01 + 0.11766666D 02 -0.96713703D 02 -0.21295994D 02 0.19913306D 04 0.13426543D 00 0.13860507D 01 + 0.11799999D 02 -0.97215001D 02 -0.26975202D 02 0.19928242D 04 0.14082200D 00 0.14519751D 01 + 0.11833333D 02 -0.97716290D 02 -0.32652662D 02 0.19945570D 04 0.14978449D 00 0.15504393D 01 + 0.11866666D 02 -0.98217566D 02 -0.38328142D 02 0.19964645D 04 0.16046691D 00 0.16895695D 01 + 0.11900000D 02 -0.98718823D 02 -0.44001485D 02 0.19984763D 04 0.17226844D 00 0.18826796D 01 + 0.11933332D 02 -0.99220055D 02 -0.49672606D 02 0.20005189D 04 0.18465628D 00 0.21517031D 01 + 0.11966666D 02 -0.99721247D 02 -0.55341505D 02 0.20025181D 04 0.19713001D 00 0.25329104D 01 + 0.11999999D 02 -0.10022238D 03 -0.61008257D 02 0.20044023D 04 0.20919998D 00 0.30860297D 01 + 0.12033333D 02 -0.10072339D 03 -0.66673013D 02 0.20061053D 04 0.22039123D 00 0.39189647D 01 + 0.12066667D 02 -0.10122419D 03 -0.72335993D 02 0.20075681D 04 0.23027046D 00 0.52297781D 01 + 0.12099999D 02 -0.10172446D 03 -0.77997480D 02 0.20087419D 04 0.23848440D 00 0.74163280D 01 + 0.12133333D 02 -0.10222277D 03 -0.83657802D 02 0.20095889D 04 0.24479456D 00 0.11308002D 02 + 0.12166666D 02 -0.10267039D 03 -0.89317325D 02 0.20100844D 04 0.24909488D 00 0.18504380D 02 + 0.12200000D 02 0.76759755D 02 -0.85023565D 02 0.20102170D 04 -0.10000000D 01 -0.10000000D 01 + 0.12233333D 02 0.76262783D 02 -0.79364476D 02 0.20099893D 04 -0.10000000D 01 -0.10000000D 01 + 0.12266666D 02 0.75762758D 02 -0.73705027D 02 0.20094177D 04 -0.10000000D 01 -0.10000000D 01 + 0.12299999D 02 0.75262042D 02 -0.68044861D 02 0.20085316D 04 -0.10000000D 01 -0.10000000D 01 + 0.12333333D 02 0.74761059D 02 -0.62383662D 02 0.20073723D 04 0.24366281D 00 0.11972083D 02 + 0.12366666D 02 0.74259947D 02 -0.56721163D 02 0.20059916D 04 0.23834870D 00 0.78066114D 01 + 0.12400000D 02 0.73758762D 02 -0.51057159D 02 0.20044497D 04 0.23199166D 00 0.54602378D 01 + 0.12433332D 02 0.73257532D 02 -0.45391512D 02 0.20028128D 04 0.22473201D 00 0.40449747D 01 + 0.12466666D 02 0.72756272D 02 -0.39724157D 02 0.20011505D 04 0.21670888D 00 0.31390574D 01 + 0.12499999D 02 0.72254992D 02 -0.34055104D 02 0.19995331D 04 0.20805720D 00 0.25343194D 01 + 0.12533333D 02 0.71753698D 02 -0.28384436D 02 0.19980288D 04 0.19891273D 00 0.21157100D 01 + 0.12566667D 02 0.71252393D 02 -0.22712305D 02 0.19967011D 04 0.18944536D 00 0.18193099D 01 + 0.12599999D 02 0.70751081D 02 -0.17038923D 02 0.19956058D 04 0.17993486D 00 0.16088862D 01 + 0.12633333D 02 0.70249763D 02 -0.11364555D 02 0.19947892D 04 0.17087963D 00 0.14587939D 01 + 0.12666666D 02 0.69748440D 02 -0.56895102D 01 0.19942858D 04 0.16308873D 00 0.13571164D 01 + 0.12700000D 02 0.69247115D 02 -0.14121506D-01 0.19941170D 04 0.15766164D 00 0.12934464D 01 + 0.12733333D 02 0.68745786D 02 0.56612617D 01 0.19942900D 04 0.15575068D 00 0.12627517D 01 + 0.12766666D 02 0.68244455D 02 0.11336291D 02 0.19947977D 04 0.15811755D 00 0.12624428D 01 + 0.12799999D 02 0.67743122D 02 0.17010632D 02 0.19956189D 04 0.16473806D 00 0.12930226D 01 + 0.12833333D 02 0.67241788D 02 0.22683978D 02 0.19967191D 04 0.17477870D 00 0.13566282D 01 + 0.12866666D 02 0.66740453D 02 0.28356063D 02 0.19980521D 04 0.18695135D 00 0.14592108D 01 + 0.12900000D 02 0.66239117D 02 0.34026674D 02 0.19995620D 04 0.19994277D 00 0.16104453D 01 + 0.12933332D 02 0.65737782D 02 0.39695660D 02 0.20011855D 04 0.21268154D 00 0.18270389D 01 + 0.12966666D 02 0.65236446D 02 0.45362937D 02 0.20028545D 04 0.22441759D 00 0.21329810D 01 + 0.12999999D 02 0.64735111D 02 0.51028499D 02 0.20044986D 04 0.23469294D 00 0.25706615D 01 + 0.13033333D 02 0.64233777D 02 0.56692409D 02 0.20060480D 04 0.24328015D 00 0.32148427D 01 + 0.13066667D 02 0.63732447D 02 0.62354807D 02 0.20074364D 04 0.25013070D 00 0.42008799D 01 + 0.13099999D 02 0.63231123D 02 0.68015899D 02 0.20086035D 04 0.25534253D 00 0.58057032D 01 + 0.13133333D 02 0.62729815D 02 0.73675953D 02 0.20094971D 04 0.25913370D 00 0.86331111D 01 + 0.13166666D 02 0.62228549D 02 0.79335288D 02 0.20100757D 04 0.26180163D 00 0.14219658D 02 + 0.13200000D 02 0.61727471D 02 0.84994259D 02 0.20103092D 04 -0.10000000D 01 -0.10000000D 01 + 0.13233333D 02 -0.11877836D 03 0.89346752D 02 0.20101811D 04 -0.10000000D 01 -0.10000000D 01 + 0.13266666D 02 -0.11927617D 03 0.83687354D 02 0.20096886D 04 -0.10000000D 01 -0.10000000D 01 + 0.13299999D 02 -0.11977733D 03 0.78027159D 02 0.20088429D 04 -0.10000000D 01 -0.10000000D 01 + 0.13333333D 02 -0.12027863D 03 0.72365804D 02 0.20076689D 04 -0.10000000D 01 -0.10000000D 01 + 0.13366666D 02 -0.12077996D 03 0.66702956D 02 0.20062042D 04 -0.10000000D 01 -0.10000000D 01 + 0.13400000D 02 -0.12128131D 03 0.61038334D 02 0.20044980D 04 0.25863577D 00 0.83900040D 01 + 0.13433332D 02 -0.12178267D 03 0.55371713D 02 0.20026091D 04 0.25240330D 00 0.56345052D 01 + 0.13466666D 02 -0.12228403D 03 0.49702942D 02 0.20006041D 04 0.24390963D 00 0.40839232D 01 + 0.13499999D 02 -0.12278539D 03 0.44031941D 02 0.19985545D 04 0.23327772D 00 0.31380203D 01 + 0.13533333D 02 -0.12328676D 03 0.38358713D 02 0.19965345D 04 0.22085287D 00 0.25275320D 01 + 0.13566667D 02 -0.12378813D 03 0.32683338D 02 0.19946181D 04 0.20716010D 00 0.21161778D 01 + 0.13599999D 02 -0.12428950D 03 0.27005972D 02 0.19928758D 04 0.19285543D 00 0.18317611D 01 + 0.13633333D 02 -0.12479087D 03 0.21326845D 02 0.19913723D 04 0.17869044D 00 0.16327392D 01 + 0.13666666D 02 -0.12529224D 03 0.15646249D 02 0.19901636D 04 0.16549636D 00 0.14933350D 01 + 0.13700000D 02 -0.12579361D 03 0.99645272D 01 0.19892949D 04 0.15417290D 00 0.13992167D 01 + 0.13733333D 02 -0.12629498D 03 0.42820667D 01 0.19887986D 04 0.14564299D 00 0.13403477D 01 + 0.13766666D 02 -0.12679635D 03 -0.14007212D 01 0.19886934D 04 0.14072699D 00 0.13110270D 01 + 0.13799999D 02 -0.12729773D 03 -0.70834128D 01 0.19889831D 04 0.13993650D 00 0.13087456D 01 + 0.13833333D 02 -0.12779910D 03 -0.12765588D 02 0.19896564D 04 0.14329010D 00 0.13328542D 01 + 0.13866666D 02 -0.12830048D 03 -0.18446845D 02 0.19906878D 04 0.15029674D 00 0.13847963D 01 + 0.13900000D 02 -0.12880186D 03 -0.24126817D 02 0.19920384D 04 0.16012948D 00 0.14682397D 01 + 0.13933332D 02 -0.12930324D 03 -0.29805181D 02 0.19936575D 04 0.17185837D 00 0.15900794D 01 + 0.13966666D 02 -0.12980461D 03 -0.35481675D 02 0.19954846D 04 0.18461350D 00 0.17601599D 01 + 0.13999999D 02 -0.13030599D 03 -0.41156103D 02 0.19974520D 04 0.19764796D 00 0.19959186D 01 + 0.14033333D 02 -0.13080738D 03 -0.46828344D 02 0.19994872D 04 0.21033342D 00 0.23240705D 01 + 0.14066667D 02 -0.13130876D 03 -0.52498355D 02 0.20015160D 04 0.22212920D 00 0.27876234D 01 + 0.14099999D 02 -0.13181015D 03 -0.58166173D 02 0.20034652D 04 0.23255334D 00 0.34583787D 01 + 0.14133333D 02 -0.13231154D 03 -0.63831910D 02 0.20052656D 04 0.24117124D 00 0.44580015D 01 + 0.14166666D 02 -0.13281294D 03 -0.69495756D 02 0.20068544D 04 0.24760688D 00 0.59914771D 01 + 0.14200000D 02 -0.13331435D 03 -0.75157961D 02 0.20081773D 04 0.25157204D 00 0.84009688D 01 + 0.14233333D 02 -0.13381579D 03 -0.80818834D 02 0.20091910D 04 0.25290171D 00 0.12112583D 02 + 0.14266666D 02 -0.13431744D 03 -0.86478724D 02 0.20098641D 04 -0.10000000D 01 -0.10000000D 01 + 0.14299999D 02 0.45182312D 02 -0.87861991D 02 0.20101782D 04 -0.10000000D 01 -0.10000000D 01 + 0.14333333D 02 0.44680417D 02 -0.82202920D 02 0.20101289D 04 -0.10000000D 01 -0.10000000D 01 + 0.14366666D 02 0.44178956D 02 -0.76543675D 02 0.20097258D 04 -0.10000000D 01 -0.10000000D 01 + 0.14400000D 02 0.43677544D 02 -0.70883886D 02 0.20089918D 04 -0.10000000D 01 -0.10000000D 01 + 0.14433332D 02 0.43176149D 02 -0.65223214D 02 0.20079625D 04 0.21467375D 00 0.79435428D 01 + 0.14466666D 02 0.42674762D 02 -0.59561366D 02 0.20066847D 04 0.20436040D 00 0.59150331D 01 + 0.14499999D 02 0.42173379D 02 -0.53898105D 02 0.20052146D 04 0.19423429D 00 0.45705533D 01 + 0.14533333D 02 0.41671998D 02 -0.48233258D 02 0.20036156D 04 0.18472560D 00 0.36503037D 01 + 0.14566667D 02 0.41170618D 02 -0.42566724D 02 0.20019561D 04 0.17615160D 00 0.29998981D 01 + 0.14599999D 02 0.40669237D 02 -0.36898474D 02 0.20003062D 04 0.16866261D 00 0.25243424D 01 + 0.14633333D 02 0.40167857D 02 -0.31228556D 02 0.19987357D 04 0.16221307D 00 0.21691924D 01 + 0.14666666D 02 0.39666475D 02 -0.25557088D 02 0.19973106D 04 0.15659486D 00 0.19001667D 01 + 0.14700000D 02 0.39165091D 02 -0.19884251D 02 0.19960911D 04 0.15155419D 00 0.16947308D 01 + 0.14733333D 02 0.38663706D 02 -0.14210287D 02 0.19951283D 04 0.14697465D 00 0.15416345D 01 + 0.14766666D 02 0.38162317D 02 -0.85354828D 01 0.19944630D 04 0.14306347D 00 0.14305559D 01 + 0.14799999D 02 0.37660925D 02 -0.28601602D 01 0.19941230D 04 0.14044121D 00 0.13559288D 01 + 0.14833333D 02 0.37159528D 02 0.28153375D 01 0.19941227D 04 0.14002653D 00 0.13130123D 01 + 0.14866666D 02 0.36658128D 02 0.84906599D 01 0.19944621D 04 0.14267944D 00 0.13005637D 01 + 0.14900000D 02 0.36156721D 02 0.14165463D 02 0.19951268D 04 0.14875970D 00 0.13188277D 01 + 0.14933332D 02 0.35655308D 02 0.19839425D 02 0.19960889D 04 0.15791295D 00 0.13694669D 01 + 0.14966666D 02 0.35153887D 02 0.25512257D 02 0.19973080D 04 0.16923946D 00 0.14588936D 01 + 0.14999999D 02 0.34652455D 02 0.31183718D 02 0.19987329D 04 0.18166742D 00 0.15961684D 01 + 0.15033333D 02 0.34151009D 02 0.36853627D 02 0.20003037D 04 0.19426271D 00 0.17950486D 01 + 0.15066667D 02 0.33649544D 02 0.42521864D 02 0.20019544D 04 0.20636514D 00 0.20781387D 01 + 0.15099999D 02 0.33148052D 02 0.48188385D 02 0.20036154D 04 0.21758530D 00 0.24846216D 01 + 0.15133333D 02 0.32646521D 02 0.53853216D 02 0.20052163D 04 0.22773468D 00 0.30843761D 01 + 0.15166666D 02 0.32144929D 02 0.59516460D 02 0.20066888D 04 0.23674484D 00 0.40081149D 01 + 0.15200000D 02 0.31643233D 02 0.65178289D 02 0.20079694D 04 0.24460285D 00 0.55161821D 01 + 0.15233333D 02 0.31141344D 02 0.70838941D 02 0.20090018D 04 0.25130751D 00 0.81783861D 01 + 0.15266666D 02 0.30639019D 02 0.76498711D 02 0.20097388D 04 0.25683925D 00 0.13392302D 02 + 0.15299999D 02 0.30135321D 02 0.82157937D 02 0.20101447D 04 -0.10000000D 01 -0.10000000D 01 + 0.15333333D 02 0.29619591D 02 0.87816990D 02 0.20101963D 04 -0.10000000D 01 -0.10000000D 01 + 0.15366666D 02 -0.15084943D 03 0.86523742D 02 0.20098837D 04 -0.10000000D 01 -0.10000000D 01 + 0.15400000D 02 -0.15135855D 03 0.80863869D 02 0.20092112D 04 -0.10000000D 01 -0.10000000D 01 + 0.15433332D 02 -0.15186177D 03 0.75203012D 02 0.20081971D 04 -0.10000000D 01 -0.10000000D 01 + 0.15466666D 02 -0.15236398D 03 0.69540821D 02 0.20068725D 04 0.25828240D 00 0.98310320D 01 + 0.15499999D 02 -0.15286584D 03 0.63876988D 02 0.20052809D 04 0.25157948D 00 0.63583710D 01 + 0.15533333D 02 -0.15336754D 03 0.58211260D 02 0.20034766D 04 0.24278799D 00 0.44874752D 01 + 0.15566667D 02 -0.15386915D 03 0.52543449D 02 0.20015224D 04 0.23219088D 00 0.33896196D 01 + 0.15599999D 02 -0.15437071D 03 0.46873441D 02 0.19994878D 04 0.22021520D 00 0.26995394D 01 + 0.15633333D 02 -0.15487223D 03 0.41201197D 02 0.19974462D 04 0.20738365D 00 0.22411580D 01 + 0.15666666D 02 -0.15537374D 03 0.35526758D 02 0.19954718D 04 0.19426296D 00 0.19263182D 01 + 0.15700000D 02 -0.15587523D 03 0.29850244D 02 0.19936373D 04 0.18143174D 00 0.17040741D 01 + 0.15733333D 02 -0.15637671D 03 0.24171849D 02 0.19920106D 04 0.16948341D 00 0.15460193D 01 + 0.15766666D 02 -0.15687818D 03 0.18491835D 02 0.19906520D 04 0.15906165D 00 0.14334541D 01 + 0.15799999D 02 -0.15737965D 03 0.12810522D 02 0.19896124D 04 0.15089733D 00 0.13571937D 01 + 0.15833333D 02 -0.15788112D 03 0.71282772D 01 0.19889307D 04 0.14578574D 00 0.13112636D 01 + 0.15866666D 02 -0.15838259D 03 0.14455028D 01 0.19886327D 04 0.14444276D 00 0.12923288D 01 + 0.15900000D 02 -0.15888407D 03 -0.42373814D 01 0.19887294D 04 0.14725769D 00 0.13006047D 01 + 0.15933332D 02 -0.15938554D 03 -0.99199512D 01 0.19892173D 04 0.15409085D 00 0.13365049D 01 + 0.15966666D 02 -0.15988703D 03 -0.15601794D 02 0.19900778D 04 0.16428105D 00 0.14044008D 01 + 0.15999999D 02 -0.16038852D 03 -0.21282523D 02 0.19912787D 04 0.17685549D 00 0.15100776D 01 + 0.16033325D 02 -0.16089003D 03 -0.26961791D 02 0.19927747D 04 0.19078399D 00 0.16632609D 01 + 0.16066666D 02 -0.16139156D 03 -0.32639306D 02 0.19945100D 04 0.20514741D 00 0.18807799D 01 + 0.16099991D 02 -0.16189312D 03 -0.38314836D 02 0.19964200D 04 0.21919358D 00 0.21884124D 01 + 0.16133331D 02 -0.16239470D 03 -0.43988221D 02 0.19984344D 04 0.23231333D 00 0.26280683D 01 + 0.16166656D 02 -0.16289634D 03 -0.49659379D 02 0.20004796D 04 0.24398221D 00 0.32721878D 01 + 0.16199997D 02 -0.16339806D 03 -0.55328308D 02 0.20024816D 04 0.25370824D 00 0.42439022D 01 + 0.16233322D 02 -0.16389988D 03 -0.60995082D 02 0.20043689D 04 0.26101315D 00 0.57702951D 01 + 0.16266663D 02 -0.16440191D 03 -0.66659855D 02 0.20060751D 04 0.26545744D 00 0.82249000D 01 + 0.16299988D 02 -0.16490433D 03 -0.72322849D 02 0.20075416D 04 0.26670063D 00 0.12129145D 02 + 0.16333328D 02 -0.16540769D 03 -0.77984345D 02 0.20087191D 04 -0.10000000D 01 -0.10000000D 01 + 0.16366653D 02 -0.16591452D 03 -0.83644673D 02 0.20095699D 04 -0.10000000D 01 -0.10000000D 01 + 0.16399994D 02 -0.16650950D 03 -0.89304199D 02 0.20100689D 04 -0.10000000D 01 -0.10000000D 01 + 0.16433319D 02 0.13108888D 02 -0.85036687D 02 0.20102048D 04 -0.10000000D 01 -0.10000000D 01 + 0.16466660D 02 0.12599632D 02 -0.79377597D 02 0.20099799D 04 -0.10000000D 01 -0.10000000D 01 + 0.16499985D 02 0.12095831D 02 -0.73718150D 02 0.20094106D 04 0.21354490D 00 0.79049007D 01 + 0.16533325D 02 0.11593265D 02 -0.68057989D 02 0.20085263D 04 0.19976730D 00 0.59651452D 01 + 0.16566666D 02 0.11091173D 02 -0.62396795D 02 0.20073685D 04 0.18655383D 00 0.46930580D 01 + 0.16599991D 02 0.10589313D 02 -0.56734303D 02 0.20059889D 04 0.17451053D 00 0.38258420D 01 + 0.16633331D 02 0.10087584D 02 -0.51070305D 02 0.20044477D 04 0.16407224D 00 0.32096527D 01 + 0.16666656D 02 0.95859350D 01 -0.45404662D 02 0.20028110D 04 0.15546053D 00 0.27538380D 01 + 0.16699997D 02 0.90843386D 01 -0.39737310D 02 0.20011486D 04 0.14865543D 00 0.24051949D 01 + 0.16733322D 02 0.85827780D 01 -0.34068256D 02 0.19995307D 04 0.14340350D 00 0.21312755D 01 + 0.16766663D 02 0.80812422D 01 -0.28397582D 02 0.19980254D 04 0.13928685D 00 0.19121240D 01 + 0.16799988D 02 0.75797235D 01 -0.22725437D 02 0.19966960D 04 0.13585849D 00 0.17361300D 01 + 0.16833328D 02 0.70782166D 01 -0.17052034D 02 0.19955984D 04 0.13281922D 00 0.15958612D 01 + 0.16866653D 02 0.65767170D 01 -0.11377638D 02 0.19947786D 04 0.13018657D 00 0.14881048D 01 + 0.16899994D 02 0.60752214D 01 -0.57025531D 01 0.19942710D 04 0.12838938D 00 0.14101244D 01 + 0.16933319D 02 0.55737267D 01 -0.27114549D-01 0.19940969D 04 0.12821160D 00 0.13590378D 01 + 0.16966660D 02 0.50722303D 01 0.56483295D 01 0.19942635D 04 0.13053562D 00 0.13368267D 01 + 0.16999985D 02 0.45707295D 01 0.11323430D 02 0.19947637D 04 0.13595210D 00 0.13436418D 01 + 0.17033325D 02 0.40692217D 01 0.16997853D 02 0.19955763D 04 0.14446214D 00 0.13831133D 01 + 0.17066666D 02 0.35677040D 01 0.22671292D 02 0.19966671D 04 0.15547845D 00 0.14612499D 01 + 0.17099991D 02 0.30661719D 01 0.28343481D 02 0.19979902D 04 0.16808337D 00 0.15898727D 01 + 0.17133331D 02 0.25646199D 01 0.34014208D 02 0.19994898D 04 0.18133043D 00 0.17862918D 01 + 0.17166656D 02 0.20630399D 01 0.39683323D 02 0.20011027D 04 0.19444041D 00 0.20736959D 01 + 0.17199997D 02 0.15614202D 01 0.45350743D 02 0.20027607D 04 0.20687407D 00 0.24946296D 01 + 0.17233322D 02 0.10597422D 01 0.51016459D 02 0.20043935D 04 0.21832202D 00 0.31211413D 01 + 0.17266663D 02 0.55797528D 00 0.56680535D 02 0.20059317D 04 0.22865225D 00 0.40953812D 01 + 0.17299988D 02 0.56063534D-01 0.62343110D 02 0.20073089D 04 0.23784007D 00 0.57171824D 01 + 0.17333328D 02 -0.44610603D 00 0.68004390D 02 0.20084650D 04 0.24589457D 00 0.86568618D 01 + 0.17366653D 02 -0.94880194D 00 0.73664641D 02 0.20093480D 04 0.25279197D 00 0.14591325D 02 + 0.17399994D 02 -0.14528611D 01 0.79324180D 02 0.20099166D 04 -0.10000000D 01 -0.10000000D 01 + 0.17433319D 02 -0.19628939D 01 0.84983364D 02 0.20101411D 04 -0.10000000D 01 -0.10000000D 01 + 0.17466660D 02 0.17767890D 03 0.89357423D 02 0.20100052D 04 -0.10000000D 01 -0.10000000D 01 + 0.17499985D 02 0.17706348D 03 0.83697796D 02 0.20095061D 04 -0.10000000D 01 -0.10000000D 01 + 0.17533325D 02 0.17655594D 03 0.78037363D 02 0.20086552D 04 0.26325883D 00 0.14623263D 02 + 0.17566666D 02 0.17605233D 03 0.72375761D 02 0.20074773D 04 0.25866196D 00 0.86084420D 01 + 0.17599991D 02 0.17554979D 03 0.66712658D 02 0.20060100D 04 0.25153593D 00 0.56568794D 01 + 0.17633331D 02 0.17504768D 03 0.61047774D 02 0.20043024D 04 0.24210036D 00 0.40489662D 01 + 0.17666656D 02 0.17454580D 03 0.55380889D 02 0.20024133D 04 0.23077072D 00 0.30930736D 01 + 0.17699997D 02 0.17404404D 03 0.49711852D 02 0.20004091D 04 0.21811214D 00 0.24875818D 01 + 0.17733322D 02 0.17354237D 03 0.44040585D 02 0.19983617D 04 0.20477540D 00 0.20843995D 01 + 0.17766663D 02 0.17304074D 03 0.38367093D 02 0.19963453D 04 0.19143830D 00 0.18071727D 01 + 0.17799988D 02 0.17253915D 03 0.32691456D 02 0.19944336D 04 0.17877445D 00 0.16121174D 01 + 0.17833328D 02 0.17203758D 03 0.27013835D 02 0.19926972D 04 0.16746129D 00 0.14746556D 01 + 0.17866653D 02 0.17153603D 03 0.21334458D 02 0.19912008D 04 0.15821616D 00 0.13793117D 01 + 0.17899994D 02 0.17103450D 03 0.15653621D 02 0.19900002D 04 0.15181668D 00 0.13174982D 01 + 0.17933319D 02 0.17053296D 03 0.99716681D 01 0.19891404D 04 0.14903632D 00 0.12845916D 01 + 0.17966660D 02 0.17003144D 03 0.42889875D 01 0.19886539D 04 0.15045417D 00 0.12788140D 01 + 0.17999985D 02 0.16952991D 03 -0.13940075D 01 0.19885591D 04 0.15621004D 00 0.13006100D 01 + 0.18033325D 02 0.16902837D 03 -0.70768920D 01 0.19888596D 04 0.16587921D 00 0.13521076D 01 + 0.18066666D 02 0.16852684D 03 -0.12759245D 02 0.19895441D 04 0.17857120D 00 0.14383916D 01 + 0.18099991D 02 0.16802529D 03 -0.18440663D 02 0.19905868D 04 0.19317204D 00 0.15686850D 01 + 0.18133331D 02 0.16752372D 03 -0.24120778D 02 0.19919487D 04 0.20857760D 00 0.17566518D 01 + 0.18166656D 02 0.16702214D 03 -0.29799267D 02 0.19935790D 04 0.22383496D 00 0.20269921D 01 + 0.18199997D 02 0.16652053D 03 -0.35475866D 02 0.19954172D 04 0.23818799D 00 0.24200845D 01 + 0.18233322D 02 0.16601889D 03 -0.41150378D 02 0.19973956D 04 0.25105526D 00 0.30067881D 01 + 0.18266663D 02 0.16551719D 03 -0.46822683D 02 0.19994418D 04 0.26197403D 00 0.39184360D 01 + 0.18299988D 02 0.16501542D 03 -0.52492738D 02 0.20014816D 04 0.27054280D 00 0.54211775D 01 + 0.18333328D 02 0.16451353D 03 -0.58160581D 02 0.20034420D 04 0.27638900D 00 0.80857624D 01 + 0.18366653D 02 0.16401144D 03 -0.63826327D 02 0.20052535D 04 0.27917631D 00 0.13239328D 02 + 0.18399994D 02 0.16350898D 03 -0.69490164D 02 0.20068534D 04 -0.10000000D 01 -0.10000000D 01 + 0.18433319D 02 0.16300573D 03 -0.75152347D 02 0.20081874D 04 -0.10000000D 01 -0.10000000D 01 + 0.18466660D 02 0.16250023D 03 -0.80813183D 02 0.20092117D 04 -0.10000000D 01 -0.10000000D 01 + 0.18499985D 02 0.16198160D 03 -0.86473023D 02 0.20098948D 04 -0.10000000D 01 -0.10000000D 01 + 0.18533325D 02 -0.18445661D 02 -0.87867754D 02 0.20102182D 04 -0.10000000D 01 -0.10000000D 01 + 0.18566666D 02 -0.18980637D 02 -0.82208758D 02 0.20101775D 04 -0.10000000D 01 -0.10000000D 01 + 0.18599991D 02 -0.19487371D 02 -0.76549600D 02 0.20097821D 04 0.21469048D 00 0.68855552D 01 + 0.18633331D 02 -0.19990954D 02 -0.70889909D 02 0.20090548D 04 0.19924739D 00 0.50838163D 01 + 0.18666656D 02 -0.20493548D 02 -0.65229344D 02 0.20080314D 04 0.18440060D 00 0.39751415D 01 + 0.18699997D 02 -0.20995705D 02 -0.59567612D 02 0.20067585D 04 0.17070620D 00 0.32473326D 01 + 0.18733322D 02 -0.21497632D 02 -0.53904473D 02 0.20052924D 04 0.15853743D 00 0.27440540D 01 + 0.18766663D 02 -0.21999423D 02 -0.48239755D 02 0.20036967D 04 0.14807893D 00 0.23806811D 01 + 0.18799988D 02 -0.22501126D 02 -0.42573354D 02 0.20020395D 04 0.13934467D 00 0.21094712D 01 + 0.18833328D 02 -0.23002771D 02 -0.36905239D 02 0.20003914D 04 0.13221897D 00 0.19020884D 01 + 0.18866653D 02 -0.23504376D 02 -0.31235455D 02 0.19988218D 04 0.12652156D 00 0.17412440D 01 + 0.18899994D 02 -0.24005951D 02 -0.25564118D 02 0.19973969D 04 0.12209456D 00 0.16164020D 01 + 0.18933319D 02 -0.24507506D 02 -0.19891409D 02 0.19961766D 04 0.11889928D 00 0.15205628D 01 + 0.18966660D 02 -0.25009047D 02 -0.14217566D 02 0.19952120D 04 0.11709492D 00 0.14497229D 01 + 0.18999985D 02 -0.25510577D 02 -0.85428756D 01 0.19945437D 04 0.11705625D 00 0.14022831D 01 + 0.19033325D 02 -0.26012100D 02 -0.28676590D 01 0.19941995D 04 0.11928667D 00 0.13772964D 01 + 0.19066666D 02 -0.26513619D 02 0.28077409D 01 0.19941936D 04 0.12422523D 00 0.13767054D 01 + 0.19099991D 02 -0.27015136D 02 0.84829737D 01 0.19945263D 04 0.13202979D 00 0.14033581D 01 + 0.19133331D 02 -0.27516654D 02 0.14157696D 02 0.19951833D 04 0.14246468D 00 0.14633321D 01 + 0.19166656D 02 -0.28018176D 02 0.19831587D 02 0.19961370D 04 0.15495027D 00 0.15658002D 01 + 0.19199997D 02 -0.28519704D 02 0.25504360D 02 0.19973471D 04 0.16871444D 00 0.17229788D 01 + 0.19233322D 02 -0.29021244D 02 0.31175775D 02 0.19987625D 04 0.18294960D 00 0.19551365D 01 + 0.19266663D 02 -0.29522801D 02 0.36845651D 02 0.20003235D 04 0.19692428D 00 0.22929693D 01 + 0.19299988D 02 -0.30024382D 02 0.42513870D 02 0.20019638D 04 0.21004671D 00 0.27895707D 01 + 0.19333328D 02 -0.30526000D 02 0.48180388D 02 0.20036140D 04 0.22189497D 00 0.35443712D 01 + 0.19366653D 02 -0.31027672D 02 0.53845231D 02 0.20052039D 04 0.23222500D 00 0.47518224D 01 + 0.19399994D 02 -0.31529430D 02 0.59508501D 02 0.20066651D 04 0.24095962D 00 0.68320518D 01 + 0.19433319D 02 -0.32031337D 02 0.65170372D 02 0.20079344D 04 0.24815721D 00 0.10803875D 02 + 0.19466660D 02 -0.32533524D 02 0.70831082D 02 0.20089553D 04 0.25395944D 00 0.19575625D 02 + 0.19499985D 02 -0.33036348D 02 0.76490922D 02 0.20096811D 04 -0.10000000D 01 -0.10000000D 01 + 0.19533325D 02 -0.33541192D 02 0.82150232D 02 0.20100760D 04 -0.10000000D 01 -0.10000000D 01 + 0.19566666D 02 -0.34063735D 02 0.87809382D 02 0.20101171D 04 -0.10000000D 01 -0.10000000D 01 + 0.19599991D 02 0.14548267D 03 0.86531239D 02 0.20097947D 04 -0.10000000D 01 -0.10000000D 01 + 0.19633331D 02 0.14496978D 03 0.80871242D 02 0.20091133D 04 0.26487771D 00 0.15836250D 02 + 0.19666656D 02 0.14446569D 03 0.75210249D 02 0.20080910D 04 0.26269939D 00 0.91322285D 01 + 0.19699997D 02 0.14396308D 03 0.69547911D 02 0.20067591D 04 0.25852835D 00 0.59524092D 01 + 0.19733322D 02 0.14346100D 03 0.63883920D 02 0.20051615D 04 0.25222110D 00 0.42271832D 01 + 0.19766663D 02 0.14295916D 03 0.58218026D 02 0.20033521D 04 0.24378900D 00 0.32010634D 01 + 0.19799988D 02 0.14245745D 03 0.52550040D 02 0.20013940D 04 0.23342636D 00 0.25494997D 01 + 0.19833328D 02 0.14195582D 03 0.46879849D 02 0.19993566D 04 0.22151368D 00 0.21150703D 01 + 0.19866653D 02 0.14145425D 03 0.41207414D 02 0.19973130D 04 0.20860637D 00 0.18166567D 01 + 0.19899994D 02 0.14095270D 03 0.35532779D 02 0.19953376D 04 0.19542230D 00 0.16070355D 01 + 0.19933319D 02 0.14045119D 03 0.29856065D 02 0.19935027D 04 0.18283735D 00 0.14603456D 01 + 0.19966660D 02 0.13994968D 03 0.24177468D 02 0.19918762D 04 0.17188022D 00 0.13587372D 01 + 0.19999985D 02 0.13944819D 03 0.18497252D 02 0.19905188D 04 0.16368863D 00 0.12934206D 01 + 0.20033325D 02 0.13894671D 03 0.12815738D 02 0.19894811D 04 0.15936426D 00 0.12587145D 01 + 0.20066666D 02 0.13844524D 03 0.71332947D 01 0.19888021D 04 0.15970016D 00 0.12523466D 01 + 0.20099991D 02 0.13794376D 03 0.14503256D 01 0.19885075D 04 0.16488794D 00 0.12745515D 01 + 0.20133331D 02 0.13744229D 03 -0.42327475D 01 0.19886084D 04 0.17441478D 00 0.13273359D 01 + 0.20166656D 02 0.13694082D 03 -0.99154981D 01 0.19891009D 04 0.18723668D 00 0.14165918D 01 + 0.20199997D 02 0.13643936D 03 -0.15597511D 02 0.19899669D 04 0.20208419D 00 0.15534107D 01 + 0.20233322D 02 0.13593788D 03 -0.21278398D 02 0.19911740D 04 0.21771592D 00 0.17534184D 01 + 0.20266663D 02 0.13543641D 03 -0.26957811D 02 0.19926773D 04 0.23305443D 00 0.20460689D 01 + 0.20299988D 02 0.13493493D 03 -0.32635456D 02 0.19944211D 04 0.24723039D 00 0.24813286D 01 + 0.20333328D 02 0.13443344D 03 -0.38311101D 02 0.19963410D 04 0.25957741D 00 0.31508249D 01 + 0.20366653D 02 0.13393194D 03 -0.43984587D 02 0.19983666D 04 0.26960777D 00 0.42332903D 01 + 0.20399994D 02 0.13343041D 03 -0.49655831D 02 0.20004240D 04 0.27698589D 00 0.61280119D 01 + 0.20433319D 02 0.13292884D 03 -0.55324830D 02 0.20024391D 04 0.28150774D 00 0.98743379D 01 + 0.20466660D 02 0.13242720D 03 -0.60991660D 02 0.20043402D 04 0.28308788D 00 0.18808978D 02 + 0.20499985D 02 0.13192545D 03 -0.66656471D 02 0.20060605D 04 -0.10000000D 01 -0.10000000D 01 + 0.20533325D 02 0.13142345D 03 -0.72319485D 02 0.20075411D 04 -0.10000000D 01 -0.10000000D 01 + 0.20566666D 02 0.13092087D 03 -0.77980981D 02 0.20087327D 04 -0.10000000D 01 -0.10000000D 01 + 0.20599991D 02 0.13041615D 03 -0.83641290D 02 0.20095974D 04 -0.10000000D 01 -0.10000000D 01 + 0.20633331D 02 0.12985717D 03 -0.89300776D 02 0.20101101D 04 -0.10000000D 01 -0.10000000D 01 + 0.20666656D 02 -0.50570358D 02 -0.85040172D 02 0.20102593D 04 -0.10000000D 01 -0.10000000D 01 + 0.20699997D 02 -0.51076595D 02 -0.79381165D 02 0.20100475D 04 0.22468451D 00 0.72556806D 01 + 0.20733322D 02 -0.51579453D 02 -0.73721820D 02 0.20094909D 04 0.21022932D 00 0.50881042D 01 + 0.20766663D 02 -0.52081547D 02 -0.68061778D 02 0.20086189D 04 0.19549704D 00 0.38375644D 01 + 0.20799988D 02 -0.52583350D 02 -0.62400722D 02 0.20074726D 04 0.18095483D 00 0.30527477D 01 + 0.20833328D 02 -0.53085011D 02 -0.56738382D 02 0.20061038D 04 0.16705319D 00 0.25310960D 01 + 0.20866653D 02 -0.53586594D 02 -0.51074551D 02 0.20045725D 04 0.15419621D 00 0.21701504D 01 + 0.20899994D 02 -0.54088129D 02 -0.45409089D 02 0.20029448D 04 0.14271865D 00 0.19133358D 01 + 0.20933319D 02 -0.54589635D 02 -0.39741929D 02 0.20012903D 04 0.13288473D 00 0.17276153D 01 + 0.20966660D 02 -0.55091121D 02 -0.34073077D 02 0.19996791D 04 0.12491857D 00 0.15934635D 01 + 0.20999985D 02 -0.55592593D 02 -0.28402612D 02 0.19981793D 04 0.11905933D 00 0.14987599D 01 + 0.21033325D 02 -0.56094057D 02 -0.22730682D 02 0.19968542D 04 0.11560934D 00 0.14356073D 01 + 0.21066666D 02 -0.56595514D 02 -0.17057499D 02 0.19957593D 04 0.11492630D 00 0.13997366D 01 + 0.21099991D 02 -0.57096967D 02 -0.11383325D 02 0.19949407D 04 0.11732841D 00 0.13889954D 01 + 0.21133331D 02 -0.57598419D 02 -0.57084655D 01 0.19944329D 04 0.12294553D 00 0.14029634D 01 + 0.21166656D 02 -0.58099871D 02 -0.33253503D-01 0.19942571D 04 0.13161195D 00 0.14425611D 01 + 0.21199997D 02 -0.58601323D 02 0.56419632D 01 0.19944207D 04 0.14287165D 00 0.15107908D 01 + 0.21233322D 02 -0.59102778D 02 0.11316837D 02 0.19949168D 04 0.15607453D 00 0.16131704D 01 + 0.21266663D 02 -0.59604236D 02 0.16991034D 02 0.19957247D 04 0.17048929D 00 0.17586686D 01 + 0.21299988D 02 -0.60105698D 02 0.22664252D 02 0.19968102D 04 0.18538399D 00 0.19631853D 01 + 0.21333328D 02 -0.60607166D 02 0.28336226D 02 0.19981276D 04 0.20006991D 00 0.22516426D 01 + 0.21366653D 02 -0.61108641D 02 0.34006745D 02 0.19996211D 04 0.21392695D 00 0.26653435D 01 + 0.21399994D 02 -0.61610127D 02 0.39675661D 02 0.20012278D 04 0.22642807D 00 0.32769941D 01 + 0.21433319D 02 -0.62111627D 02 0.45342892D 02 0.20028794D 04 0.23717066D 00 0.42200981D 01 + 0.21466660D 02 -0.62613149D 02 0.51008430D 02 0.20045057D 04 0.24591152D 00 0.57640041D 01 + 0.21499985D 02 -0.63114704D 02 0.56672342D 02 0.20060372D 04 0.25259437D 00 0.85209957D 01 + 0.21533325D 02 -0.63616312D 02 0.62334765D 02 0.20074076D 04 0.25735636D 00 0.14140789D 02 + 0.21566666D 02 -0.64118016D 02 0.67995907D 02 0.20085568D 04 -0.10000000D 01 -0.10000000D 01 + 0.21599991D 02 -0.64619917D 02 0.73656034D 02 0.20094327D 04 -0.10000000D 01 -0.10000000D 01 + 0.21633331D 02 -0.65122335D 02 0.79315464D 02 0.20099939D 04 -0.10000000D 01 -0.10000000D 01 + 0.21666656D 02 -0.65627020D 02 0.84974553D 02 0.20102108D 04 -0.10000000D 01 -0.10000000D 01 + 0.21699997D 02 0.11392691D 03 0.89366318D 02 0.20100669D 04 -0.10000000D 01 -0.10000000D 01 + 0.21733322D 02 0.11338133D 03 0.83706759D 02 0.20095594D 04 -0.10000000D 01 -0.10000000D 01 + 0.21766663D 02 0.11287759D 03 0.78046385D 02 0.20086998D 04 0.26474468D 00 0.11144242D 02 + 0.21799988D 02 0.11237536D 03 0.72384830D 02 0.20075131D 04 0.26345136D 00 0.70588741D 01 + 0.21833328D 02 0.11187355D 03 0.66721766D 02 0.20060369D 04 0.26071034D 00 0.49111015D 01 + 0.21866653D 02 0.11137190D 03 0.61056912D 02 0.20043206D 04 0.25607694D 00 0.36485113D 01 + 0.21899994D 02 0.11087035D 03 0.55390046D 02 0.20024231D 04 0.24924719D 00 0.28492007D 01 + 0.21933319D 02 0.11036884D 03 0.49721017D 02 0.20004110D 04 0.24013689D 00 0.23172823D 01 + 0.21966660D 02 0.10986738D 03 0.44049750D 02 0.19983561D 04 0.22893566D 00 0.19503642D 01 + 0.21999985D 02 0.10936593D 03 0.38376248D 02 0.19963325D 04 0.21614006D 00 0.16932920D 01 + 0.22033325D 02 0.10886450D 03 0.32700592D 02 0.19944143D 04 0.20257091D 00 0.15113752D 01 + 0.22066666D 02 0.10836309D 03 0.27022943D 02 0.19926718D 04 0.18937019D 00 0.13852240D 01 + 0.22099991D 02 0.10786169D 03 0.21343532D 02 0.19911697D 04 0.17794689D 00 0.13013029D 01 + 0.22133331D 02 0.10736030D 03 0.15662654D 02 0.19899640D 04 0.16980736D 00 0.12522526D 01 + 0.22166656D 02 0.10685891D 03 0.99806551D 01 0.19890998D 04 0.16621507D 00 0.12335795D 01 + 0.22199997D 02 0.10635754D 03 0.42979247D 01 0.19886096D 04 0.16776131D 00 0.12445078D 01 + 0.22233322D 02 0.10585617D 03 -0.13851226D 01 0.19885118D 04 0.17412363D 00 0.12864824D 01 + 0.22266663D 02 0.10535482D 03 -0.70680600D 01 0.19888103D 04 0.18422567D 00 0.13636473D 01 + 0.22299988D 02 0.10485347D 03 -0.12750465D 02 0.19894940D 04 0.19665895D 00 0.14843797D 01 + 0.22333328D 02 0.10435213D 03 -0.18431933D 02 0.19905377D 04 0.21006075D 00 0.16620093D 01 + 0.22366653D 02 0.10385079D 03 -0.24112096D 02 0.19919025D 04 0.22330602D 00 0.19209766D 01 + 0.22399994D 02 0.10334947D 03 -0.29790631D 02 0.19935376D 04 0.23555132D 00 0.22988016D 01 + 0.22433319D 02 0.10284814D 03 -0.35467274D 02 0.19953825D 04 0.24621061D 00 0.28634529D 01 + 0.22466660D 02 0.10234683D 03 -0.41141828D 02 0.19973691D 04 0.25491528D 00 0.37376821D 01 + 0.22499985D 02 0.10184553D 03 -0.46814172D 02 0.19994246D 04 0.26147818D 00 0.51781961D 01 + 0.22533325D 02 0.10134423D 03 -0.52484260D 02 0.20014746D 04 0.26586286D 00 0.77430893D 01 + 0.22566666D 02 0.10084295D 03 -0.58152128D 02 0.20034455D 04 0.26815114D 00 0.12898234D 02 + 0.22599991D 02 0.10034170D 03 -0.63817889D 02 0.20052676D 04 -0.10000000D 01 -0.10000000D 01 + 0.22633331D 02 0.99840490D 02 -0.69481730D 02 0.20068780D 04 -0.10000000D 01 -0.10000000D 01 + 0.22666656D 02 0.99339375D 02 -0.75143902D 02 0.20082221D 04 -0.10000000D 01 -0.10000000D 01 + 0.22699997D 02 0.98838530D 02 -0.80804710D 02 0.20092562D 04 -0.10000000D 01 -0.10000000D 01 + 0.22733322D 02 0.98339256D 02 -0.86464506D 02 0.20099488D 04 -0.10000000D 01 -0.10000000D 01 + 0.22766663D 02 -0.82171017D 02 -0.87876334D 02 0.20102817D 04 -0.10000000D 01 -0.10000000D 01 + 0.22799988D 02 -0.82668297D 02 -0.82217417D 02 0.20102504D 04 -0.10000000D 01 -0.10000000D 01 + 0.22833328D 02 -0.83168996D 02 -0.76558354D 02 0.20098643D 04 0.22802651D 00 0.61568217D 01 + 0.22866653D 02 -0.83670077D 02 -0.70898773D 02 0.20091464D 04 0.21696856D 00 0.44542820D 01 + 0.22899994D 02 -0.84171277D 02 -0.65238332D 02 0.20081321D 04 0.20507010D 00 0.34244344D 01 + 0.22933319D 02 -0.84672531D 02 -0.59576736D 02 0.20068682D 04 0.19270636D 00 0.27616240D 01 + 0.22966660D 02 -0.85173814D 02 -0.53913745D 02 0.20054106D 04 0.18030038D 00 0.23149046D 01 + 0.22999985D 02 -0.85675114D 02 -0.48249184D 02 0.20038228D 04 0.16827773D 00 0.20034148D 01 + 0.23033325D 02 -0.86176424D 02 -0.42582947D 02 0.20021727D 04 0.15703863D 00 0.17819518D 01 + 0.23066666D 02 -0.86677742D 02 -0.36915005D 02 0.20005307D 04 0.14696241D 00 0.16220050D 01 + 0.23099991D 02 -0.87179065D 02 -0.31245399D 02 0.19989662D 04 0.13844430D 00 0.15077436D 01 + 0.23133331D 02 -0.87680391D 02 -0.25574245D 02 0.19975450D 04 0.13194324D 00 0.14279120D 01 + 0.23166656D 02 -0.88181719D 02 -0.19901723D 02 0.19963271D 04 0.12799725D 00 0.13766830D 01 + 0.23199997D 02 -0.88683049D 02 -0.14228071D 02 0.19953636D 04 0.12715744D 00 0.13500519D 01 + 0.23233322D 02 -0.89184380D 02 -0.85535734D 01 0.19946950D 04 0.12983067D 00 0.13474425D 01 + 0.23266663D 02 -0.89685711D 02 -0.28785502D 01 0.19943493D 04 0.13610432D 00 0.13695529D 01 + 0.23299988D 02 -0.90187041D 02 0.27966568D 01 0.19943409D 04 0.14567066D 00 0.14189263D 01 + 0.23333328D 02 -0.90688369D 02 0.84716984D 01 0.19946698D 04 0.15789522D 00 0.15007581D 01 + 0.23366653D 02 -0.91189696D 02 0.14146232D 02 0.19953220D 04 0.17196111D 00 0.16232967D 01 + 0.23399994D 02 -0.91691020D 02 0.19819938D 02 0.19962699D 04 0.18699954D 00 0.17994249D 01 + 0.23433319D 02 -0.92192340D 02 0.25492530D 02 0.19974734D 04 0.20217102D 00 0.20491499D 01 + 0.23466660D 02 -0.92693655D 02 0.31163769D 02 0.19988817D 04 0.21670887D 00 0.24061010D 01 + 0.23499985D 02 -0.93194963D 02 0.36833474D 02 0.20004353D 04 0.22994855D 00 0.29249947D 01 + 0.23533325D 02 -0.93696262D 02 0.42501531D 02 0.20020684D 04 0.24135865D 00 0.37064242D 01 + 0.23566666D 02 -0.94197546D 02 0.48167894D 02 0.20037116D 04 0.25057760D 00 0.49377918D 01 + 0.23599991D 02 -0.94698808D 02 0.53832593D 02 0.20052949D 04 0.25744944D 00 0.70177729D 01 + 0.23633331D 02 -0.95200036D 02 0.59495729D 02 0.20067500D 04 0.26204560D 00 0.10926511D 02 + 0.23666656D 02 -0.95701205D 02 0.65157478D 02 0.20080138D 04 0.26465731D 00 0.19476171D 02 + 0.23699997D 02 -0.96202259D 02 0.70818077D 02 0.20090298D 04 -0.10000000D 01 -0.10000000D 01 + 0.23733322D 02 -0.96703053D 02 0.76477819D 02 0.20097511D 04 -0.10000000D 01 -0.10000000D 01 + 0.23766663D 02 -0.97203023D 02 0.82137043D 02 0.20101418D 04 -0.10000000D 01 -0.10000000D 01 + 0.23799988D 02 -0.97695819D 02 0.87796118D 02 0.20101787D 04 -0.10000000D 01 -0.10000000D 01 + 0.23833328D 02 0.81783306D 02 0.86544570D 02 0.20098520D 04 -0.10000000D 01 -0.10000000D 01 + 0.23866653D 02 0.81286656D 02 0.80884632D 02 0.20091660D 04 0.26379097D 00 0.15409070D 02 + 0.23899994D 02 0.80786392D 02 0.75223692D 02 0.20081390D 04 0.26250938D 00 0.91846965D 01 + 0.23933319D 02 0.80285519D 02 0.69561404D 02 0.20068024D 04 0.26015740D 00 0.61196152D 01 + 0.23966660D 02 0.79784433D 02 0.63897460D 02 0.20052000D 04 0.25624799D 00 0.43970027D 01 + 0.23999985D 02 0.79283248D 02 0.58231610D 02 0.20033863D 04 0.25040740D 00 0.33407863D 01 diff --git a/SOFIP/guzik_version/sample_orbit_6.out b/SOFIP/guzik_version/sample_orbit_6.out new file mode 100755 index 0000000..363cca9 --- /dev/null +++ b/SOFIP/guzik_version/sample_orbit_6.out @@ -0,0 +1,965 @@ +1 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 + + **************************** + ** TEST RUNAAAA ** + ** 89DEG/ 2000KM/ 2000KM ** + **************************** +1 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 + + **************************** + ** TEST RUNAAAA ** + ** 89DEG/ 2000KM/ 2000KM ** + **************************** + +1NAME = TEST RUNAAAA + INCL = 89 + IPRG = 2000 + IAPG = 2000 + ITAPE = 0 + MODEL = 1 + PERIOD= 1.500000 + BLTIME= 1975.00 + NRGLEV= 4 + NTABLS= 2 + CUTOFF= 100.50 + ISKIP= 1 + KPRINT= 1 + + +1*********************************************************************************************************************************** + * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAM FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CONSIDERED SEPARATELY) * + * MAGNETIC PARAMETERS B AND L COMPUTED WITH GEOMAGN. FIELD MODEL 1: HENDRICKS&CAIN 99-TERM GSFC 9/65 * COEFF. UPDATED TO: 1975.0 * + * PROJECT :TEST RUNAAAA * INCLIN= 89DEG * PERIG= 2000KM * APOG= 2000KM * B/L TAPE=TD 0 * PERIOD= 1.500HRS * SOLAR MAXIMUM * + * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASSINOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(301)-344-8067 * + *********************************************************************************************************************************** + + +0 ***** PROTONS (E> 5.00 MEV) ***** + + LONG. LAT. ALT. FIELD LINE ORBIT POSITIONAL TIME-INTEG ORBITAL + -B- -L- TIME FLUX PSTNLFLUX FLUX(SUM) + (DEG) (DEG) (KM) (GAUSS) (E.R.) (HRS) #/CM**2/SEC + -99.73 0.02 1994.0 0.14110 1.36 0.00000 + -100.23 5.70 1994.2 0.15100 1.42 0.03333 2.339E+04 2.806E+06 2.806E+06 + -100.73 11.37 1994.7 0.16342 1.51 0.06667 1.692E+04 2.031E+06 4.837E+06 + -101.23 17.05 1995.5 0.17749 1.65 0.10000 1.011E+04 1.213E+06 6.050E+06 + -101.73 22.72 1996.6 0.19234 1.84 0.13333 4.953E+03 5.944E+05 6.645E+06 + -102.24 28.39 1997.9 0.20714 2.12 0.16667 3.589E+03 4.307E+05 7.075E+06 + -102.74 34.06 1999.5 0.22114 2.51 0.20000 9.497E+02 1.140E+05 7.189E+06 + -103.24 39.73 2001.1 0.23371 3.09 0.23333 5.265E+01 6.318E+03 7.195E+06 + -103.74 45.40 2002.8 0.24437 3.96 0.26667 0.000E+00 0.000E+00 7.195E+06 + -104.24 51.06 2004.4 0.25282 5.36 0.30000 0.000E+00 0.000E+00 7.195E+06 + -104.74 56.73 2006.0 0.25896 7.78 0.33333 0.000E+00 0.000E+00 7.195E+06 + -105.24 62.39 2007.3 0.26294 12.43 0.36667 0.000E+00 0.000E+00 7.195E+06 + -105.74 68.05 2008.5 -1.00000 -1.00 0.40000 0.000E+00 0.000E+00 7.195E+06 + -106.25 73.71 2009.4 -1.00000 -1.00 0.43333 0.000E+00 0.000E+00 7.195E+06 + -106.75 79.37 2010.0 -1.00000 -1.00 0.46667 0.000E+00 0.000E+00 7.195E+06 + -107.24 85.03 2010.2 -1.00000 -1.00 0.50000 0.000E+00 0.000E+00 7.195E+06 + 72.19 89.31 2010.1 -1.00000 -1.00 0.53333 0.000E+00 0.000E+00 7.195E+06 + 71.74 83.65 2009.6 -1.00000 -1.00 0.56667 0.000E+00 0.000E+00 7.195E+06 + 71.24 77.99 2008.8 0.26230 12.01 0.60000 0.000E+00 0.000E+00 7.195E+06 + 70.74 72.33 2007.6 0.25992 7.58 0.63333 0.000E+00 0.000E+00 7.195E+06 + 70.24 66.67 2006.2 0.25619 5.25 0.66667 0.000E+00 0.000E+00 7.195E+06 + 69.74 61.00 2004.5 0.25076 3.87 0.70000 0.000E+00 0.000E+00 7.195E+06 + 69.24 55.34 2002.6 0.24343 3.01 0.73333 8.072E+01 9.686E+03 7.205E+06 + 68.74 49.67 2000.6 0.23417 2.43 0.76667 7.752E+02 9.303E+04 7.298E+06 + 68.24 44.00 1998.6 0.22314 2.04 0.80000 1.557E+03 1.868E+05 7.485E+06 + 67.74 38.32 1996.6 0.21069 1.76 0.83333 1.659E+03 1.990E+05 7.684E+06 + 67.23 32.65 1994.7 0.19741 1.57 0.86667 4.108E+03 4.930E+05 8.177E+06 + 66.73 26.97 1993.0 0.18415 1.43 0.90000 6.102E+03 7.322E+05 8.909E+06 + 66.23 21.29 1991.5 0.17203 1.34 0.93333 8.266E+03 9.919E+05 9.901E+06 + 65.73 15.61 1990.3 0.16230 1.29 0.96667 1.031E+04 1.237E+06 1.114E+07 + 65.23 9.93 1989.4 0.15608 1.26 1.00000 1.155E+04 1.386E+06 1.252E+07 + 64.73 4.25 1988.9 0.15392 1.27 1.03333 1.350E+04 1.620E+06 1.414E+07 + 64.23 -1.44 1988.8 0.15554 1.31 1.06667 1.730E+04 2.076E+06 1.622E+07 + 63.72 -7.12 1989.1 0.16002 1.38 1.10000 1.513E+04 1.816E+06 1.804E+07 + 63.22 -12.80 1989.8 0.16619 1.49 1.13333 1.491E+04 1.789E+06 1.983E+07 + 62.72 -18.48 1990.9 0.17308 1.65 1.16667 1.205E+04 1.446E+06 2.127E+07 + 62.22 -24.16 1992.2 0.18010 1.87 1.20000 8.208E+03 9.850E+05 2.226E+07 + 61.72 -29.84 1993.8 0.18701 2.17 1.23333 7.568E+03 9.081E+05 2.317E+07 + 61.22 -35.52 1995.7 0.19380 2.57 1.26667 1.777E+03 2.133E+05 2.338E+07 + 60.72 -41.19 1997.6 0.20057 3.14 1.30000 7.793E+01 9.352E+03 2.339E+07 + 60.22 -46.86 1999.7 0.20739 3.94 1.33333 0.000E+00 0.000E+00 2.339E+07 + 59.71 -52.53 2001.7 0.21427 5.10 1.36667 0.000E+00 0.000E+00 2.339E+07 + 59.21 -58.20 2003.6 0.22116 6.87 1.40000 0.000E+00 0.000E+00 2.339E+07 + 58.71 -63.86 2005.4 0.22789 9.61 1.43333 0.000E+00 0.000E+00 2.339E+07 + 58.21 -69.53 2007.0 0.23425 13.83 1.46667 0.000E+00 0.000E+00 2.339E+07 + 57.71 -75.19 2008.3 -1.00000 -1.00 1.50000 0.000E+00 0.000E+00 2.339E+07 + 57.21 -80.85 2009.3 -1.00000 -1.00 1.53333 0.000E+00 0.000E+00 2.339E+07 + 56.71 -86.51 2009.9 -1.00000 -1.00 1.56667 0.000E+00 0.000E+00 2.339E+07 + -123.80 -87.83 2010.2 -1.00000 -1.00 1.60000 0.000E+00 0.000E+00 2.339E+07 + -124.30 -82.17 2010.2 -1.00000 -1.00 1.63333 0.000E+00 0.000E+00 2.339E+07 + -124.80 -76.51 2009.7 0.24785 8.25 1.66667 0.000E+00 0.000E+00 2.339E+07 + -125.30 -70.85 2009.0 0.24372 5.93 1.70000 0.000E+00 0.000E+00 2.339E+07 + -125.80 -65.19 2007.9 0.23761 4.45 1.73333 0.000E+00 0.000E+00 2.339E+07 + -126.30 -59.53 2006.6 0.22970 3.48 1.76667 5.619E+00 6.743E+02 2.339E+07 + -126.80 -53.87 2005.2 0.22024 2.83 1.80000 3.318E+02 3.981E+04 2.343E+07 + -127.31 -48.20 2003.5 0.20956 2.37 1.83333 2.961E+03 3.553E+05 2.378E+07 + -127.81 -42.53 2001.9 0.19802 2.04 1.86667 5.884E+03 7.060E+05 2.449E+07 + -128.31 -36.87 2000.2 0.18603 1.80 1.90000 6.749E+03 8.099E+05 2.530E+07 + -128.81 -31.20 1998.6 0.17411 1.62 1.93333 1.168E+04 1.401E+06 2.670E+07 + -129.31 -25.52 1997.2 0.16288 1.50 1.96667 1.700E+04 2.040E+06 2.874E+07 + -129.81 -19.85 1996.0 0.15309 1.41 2.00000 2.143E+04 2.572E+06 3.131E+07 + -130.31 -14.18 1995.0 0.14558 1.35 2.03333 2.601E+04 3.121E+06 3.443E+07 + -130.81 -8.50 1994.3 0.14116 1.31 2.06667 3.145E+04 3.774E+06 3.821E+07 + -131.32 -2.83 1994.0 0.14041 1.31 2.10000 3.254E+04 3.904E+06 4.211E+07 + -131.82 2.85 1994.0 0.14349 1.32 2.13333 2.843E+04 3.412E+06 4.552E+07 + -132.32 8.52 1994.3 0.15006 1.37 2.16667 2.200E+04 2.640E+06 4.816E+07 + -132.82 14.20 1995.0 0.15946 1.44 2.20000 1.705E+04 2.046E+06 5.021E+07 + -133.32 19.87 1996.0 0.17088 1.55 2.23333 1.283E+04 1.539E+06 5.175E+07 + -133.82 25.55 1997.2 0.18352 1.71 2.26667 7.607E+03 9.128E+05 5.266E+07 + -134.32 31.22 1998.6 0.19666 1.93 2.30000 4.960E+03 5.952E+05 5.326E+07 + -134.83 36.89 2000.2 0.20969 2.23 2.33333 3.790E+03 4.548E+05 5.371E+07 + -135.33 42.56 2001.9 0.22206 2.67 2.36667 3.831E+02 4.597E+04 5.376E+07 + -135.83 48.22 2003.5 0.23331 3.32 2.40000 1.790E+01 2.149E+03 5.376E+07 + -136.33 53.89 2005.1 0.24308 4.32 2.43333 0.000E+00 0.000E+00 5.376E+07 + -136.83 59.55 2006.6 0.25113 5.95 2.46667 0.000E+00 0.000E+00 5.376E+07 + -137.33 65.21 2007.9 0.25734 8.83 2.50000 0.000E+00 0.000E+00 5.376E+07 + -137.83 70.87 2009.0 0.26173 14.47 2.53333 0.000E+00 0.000E+00 5.376E+07 + -138.34 76.53 2009.7 -1.00000 -1.00 2.56667 0.000E+00 0.000E+00 5.376E+07 + -138.84 82.19 2010.1 -1.00000 -1.00 2.60000 0.000E+00 0.000E+00 5.376E+07 + -139.34 87.85 2010.2 -1.00000 -1.00 2.63333 0.000E+00 0.000E+00 5.376E+07 + 40.16 86.49 2009.9 -1.00000 -1.00 2.66667 0.000E+00 0.000E+00 5.376E+07 + 39.66 80.83 2009.3 -1.00000 -1.00 2.70000 0.000E+00 0.000E+00 5.376E+07 + 39.16 75.17 2008.3 0.25673 11.07 2.73333 0.000E+00 0.000E+00 5.376E+07 + 38.66 69.51 2006.9 0.25130 7.09 2.76667 0.000E+00 0.000E+00 5.376E+07 + 38.16 63.84 2005.4 0.24453 4.94 2.80000 0.000E+00 0.000E+00 5.376E+07 + 37.65 58.18 2003.6 0.23644 3.68 2.83333 0.000E+00 0.000E+00 5.376E+07 + 37.15 52.51 2001.6 0.22704 2.88 2.86667 1.763E+02 2.115E+04 5.378E+07 + 36.65 46.84 1999.6 0.21640 2.36 2.90000 2.392E+03 2.870E+05 5.407E+07 + 36.15 41.17 1997.6 0.20465 1.99 2.93333 4.933E+03 5.920E+05 5.466E+07 + 35.65 35.49 1995.6 0.19205 1.74 2.96667 4.737E+03 5.685E+05 5.523E+07 + 35.15 29.82 1993.8 0.17906 1.56 3.00000 9.253E+03 1.110E+06 5.634E+07 + 34.65 24.14 1992.2 0.16645 1.43 3.03333 1.293E+04 1.551E+06 5.789E+07 + 34.14 18.46 1990.8 0.15518 1.35 3.06667 1.748E+04 2.097E+06 5.999E+07 + 33.64 12.78 1989.8 0.14634 1.31 3.10000 2.528E+04 3.034E+06 6.302E+07 + 33.14 7.10 1989.1 0.14067 1.30 3.13333 3.208E+04 3.850E+06 6.687E+07 + 32.64 1.41 1988.8 0.13833 1.33 3.16667 3.546E+04 4.255E+06 7.113E+07 + 32.14 -4.27 1988.9 0.13873 1.38 3.20000 3.580E+04 4.296E+06 7.542E+07 + 31.64 -9.95 1989.4 0.14089 1.46 3.23333 3.599E+04 4.319E+06 7.974E+07 + 31.14 -15.63 1990.2 0.14391 1.58 3.26667 3.580E+04 4.297E+06 8.404E+07 + 30.63 -21.31 1991.4 0.14725 1.74 3.30000 2.990E+04 3.587E+06 8.763E+07 + 30.13 -26.99 1992.9 0.15084 1.94 3.33333 2.234E+04 2.681E+06 9.031E+07 + 29.63 -32.67 1994.7 0.15492 2.20 3.36667 1.610E+04 1.932E+06 9.224E+07 + 29.13 -38.35 1996.6 0.15992 2.53 3.40000 4.589E+03 5.507E+05 9.279E+07 + 28.63 -44.02 1998.6 0.16619 2.95 3.43333 5.145E+02 6.174E+04 9.285E+07 + 28.13 -49.69 2000.6 0.17394 3.50 3.46667 1.610E+01 1.932E+03 9.285E+07 + 27.62 -55.36 2002.6 0.18316 4.23 3.50000 0.000E+00 0.000E+00 9.285E+07 + 27.12 -61.03 2004.5 0.19363 5.26 3.53333 0.000E+00 0.000E+00 9.285E+07 + 26.62 -66.69 2006.1 0.20498 6.73 3.56667 0.000E+00 0.000E+00 9.285E+07 + 26.12 -72.35 2007.6 0.21673 8.87 3.60000 0.000E+00 0.000E+00 9.285E+07 + 25.62 -78.01 2008.7 0.22832 11.98 3.63333 0.000E+00 0.000E+00 9.285E+07 + 25.11 -83.68 2009.6 0.23912 16.03 3.66667 0.000E+00 0.000E+00 9.285E+07 + 24.55 -89.33 2010.0 -1.00000 -1.00 3.70000 0.000E+00 0.000E+00 9.285E+07 + -155.87 -85.01 2010.2 -1.00000 -1.00 3.73333 0.000E+00 0.000E+00 9.285E+07 + -156.38 -79.35 2009.9 -1.00000 -1.00 3.76667 0.000E+00 0.000E+00 9.285E+07 + -156.88 -73.69 2009.3 0.26280 11.22 3.80000 0.000E+00 0.000E+00 9.285E+07 + -157.39 -68.03 2008.4 0.26189 7.90 3.83333 0.000E+00 0.000E+00 9.285E+07 + -157.89 -62.37 2007.2 0.25810 5.70 3.86667 0.000E+00 0.000E+00 9.285E+07 + -158.39 -56.70 2005.9 0.25166 4.28 3.90000 0.000E+00 0.000E+00 9.285E+07 + -158.89 -51.04 2004.3 0.24295 3.34 3.93333 1.414E+01 1.697E+03 9.285E+07 + -159.39 -45.37 2002.7 0.23238 2.70 3.96667 2.166E+02 2.600E+04 9.288E+07 + -159.89 -39.71 2001.0 0.22036 2.25 4.00000 2.248E+03 2.697E+05 9.315E+07 + -160.40 -34.04 1999.4 0.20737 1.94 4.03333 3.234E+03 3.881E+05 9.354E+07 + -160.90 -28.37 1997.9 0.19389 1.71 4.06667 4.459E+03 5.351E+05 9.407E+07 + -161.40 -22.69 1996.5 0.18057 1.55 4.10000 8.697E+03 1.044E+06 9.512E+07 + -161.90 -17.02 1995.4 0.16816 1.43 4.13333 1.203E+04 1.444E+06 9.656E+07 + -162.40 -11.34 1994.6 0.15760 1.36 4.16667 1.585E+04 1.902E+06 9.846E+07 + -162.90 -5.67 1994.1 0.14979 1.31 4.20000 2.203E+04 2.643E+06 1.011E+08 + -163.40 0.01 1993.9 0.14549 1.29 4.23333 2.392E+04 2.870E+06 1.040E+08 + -163.91 5.68 1994.1 0.14501 1.30 4.26667 2.622E+04 3.146E+06 1.071E+08 + -164.41 11.36 1994.6 0.14819 1.33 4.30000 2.325E+04 2.790E+06 1.099E+08 + -164.91 17.03 1995.4 0.15448 1.39 4.33333 1.932E+04 2.318E+06 1.122E+08 + -165.41 22.71 1996.5 0.16322 1.48 4.36667 1.583E+04 1.900E+06 1.141E+08 + -165.91 28.38 1997.9 0.17376 1.60 4.40000 1.212E+04 1.455E+06 1.156E+08 + -166.41 34.05 1999.4 0.18555 1.78 4.43333 6.605E+03 7.926E+05 1.164E+08 + -166.91 39.72 2001.0 0.19809 2.02 4.46667 6.234E+03 7.481E+05 1.171E+08 + -167.42 45.39 2002.7 0.21088 2.37 4.50000 2.844E+03 3.412E+05 1.175E+08 + -167.92 51.05 2004.4 0.22341 2.87 4.53333 2.185E+02 2.622E+04 1.175E+08 + -168.42 56.72 2005.9 0.23512 3.64 4.56667 0.000E+00 0.000E+00 1.175E+08 + -168.92 62.38 2007.3 0.24545 4.88 4.60000 0.000E+00 0.000E+00 1.175E+08 + -169.42 68.04 2008.5 0.25392 7.04 4.63333 0.000E+00 0.000E+00 1.175E+08 + -169.93 73.70 2009.4 0.26017 11.13 4.66667 0.000E+00 0.000E+00 1.175E+08 + -170.43 79.36 2010.0 0.26401 19.75 4.70000 0.000E+00 0.000E+00 1.175E+08 + -170.94 85.02 2010.2 -1.00000 -1.00 4.73333 0.000E+00 0.000E+00 1.175E+08 + 8.68 89.32 2010.1 -1.00000 -1.00 4.76667 0.000E+00 0.000E+00 1.175E+08 + 8.08 83.66 2009.6 -1.00000 -1.00 4.80000 0.000E+00 0.000E+00 1.175E+08 + 7.58 78.00 2008.8 -1.00000 -1.00 4.83333 0.000E+00 0.000E+00 1.175E+08 + 7.07 72.34 2007.6 -1.00000 -1.00 4.86667 0.000E+00 0.000E+00 1.175E+08 + 6.57 66.68 2006.2 0.24412 7.26 4.90000 0.000E+00 0.000E+00 1.175E+08 + 6.07 61.01 2004.5 0.23583 5.01 4.93333 0.000E+00 0.000E+00 1.175E+08 + 5.57 55.35 2002.6 0.22643 3.71 4.96667 0.000E+00 0.000E+00 1.175E+08 + 5.07 49.68 2000.6 0.21591 2.89 5.00000 2.468E+02 2.961E+04 1.175E+08 + 4.56 44.01 1998.6 0.20428 2.35 5.03333 3.473E+03 4.168E+05 1.179E+08 + 4.06 38.33 1996.5 0.19169 1.98 5.06667 7.442E+03 8.930E+05 1.188E+08 + 3.56 32.66 1994.6 0.17848 1.73 5.10000 9.267E+03 1.112E+06 1.199E+08 + 3.06 26.98 1992.9 0.16524 1.55 5.13333 1.592E+04 1.910E+06 1.219E+08 + 2.56 21.30 1991.4 0.15280 1.44 5.16667 2.216E+04 2.659E+06 1.245E+08 + 2.06 15.62 1990.2 0.14208 1.37 5.20000 3.095E+04 3.714E+06 1.282E+08 + 1.56 9.94 1989.3 0.13394 1.34 5.23333 4.324E+04 5.189E+06 1.334E+08 + 1.05 4.26 1988.8 0.12879 1.34 5.26667 5.425E+04 6.510E+06 1.399E+08 + 0.55 -1.42 1988.7 0.12649 1.37 5.30000 6.139E+04 7.367E+06 1.473E+08 + 0.05 -7.11 1989.0 0.12639 1.42 5.33333 6.353E+04 7.623E+06 1.549E+08 + -0.45 -12.79 1989.7 0.12769 1.50 5.36667 6.541E+04 7.849E+06 1.628E+08 + -0.95 -18.47 1990.7 0.12976 1.60 5.40000 6.252E+04 7.502E+06 1.703E+08 + -1.45 -24.15 1992.1 0.13233 1.73 5.43333 5.039E+04 6.047E+06 1.763E+08 + -1.96 -29.83 1993.7 0.13547 1.89 5.46667 3.780E+04 4.536E+06 1.809E+08 + -2.46 -35.51 1995.5 0.13950 2.08 5.50000 2.682E+04 3.219E+06 1.841E+08 + -2.96 -41.18 1997.5 0.14482 2.32 5.53333 1.337E+04 1.605E+06 1.857E+08 + -3.46 -46.85 1999.5 0.15179 2.62 5.56667 3.488E+03 4.185E+05 1.861E+08 + -3.96 -52.52 2001.5 0.16065 3.01 5.60000 4.325E+02 5.189E+04 1.861E+08 + -4.46 -58.19 2003.4 0.17142 3.53 5.63333 1.244E+01 1.493E+03 1.861E+08 + -4.97 -63.86 2005.2 0.18394 4.27 5.66667 0.000E+00 0.000E+00 1.861E+08 + -5.47 -69.52 2006.8 0.19784 5.36 5.70000 0.000E+00 0.000E+00 1.861E+08 + -5.97 -75.18 2008.1 0.21256 7.08 5.73333 0.000E+00 0.000E+00 1.861E+08 + -6.48 -80.84 2009.1 0.22739 9.95 5.76667 0.000E+00 0.000E+00 1.861E+08 + -6.99 -86.50 2009.8 0.24149 14.97 5.80000 0.000E+00 0.000E+00 1.861E+08 + 172.57 -87.84 2010.1 -1.00000 -1.00 5.83333 0.000E+00 0.000E+00 1.861E+08 + 172.04 -82.18 2010.0 -1.00000 -1.00 5.86667 0.000E+00 0.000E+00 1.861E+08 + 171.53 -76.52 2009.6 -1.00000 -1.00 5.90000 0.000E+00 0.000E+00 1.861E+08 + 171.03 -70.86 2008.9 -1.00000 -1.00 5.93333 0.000E+00 0.000E+00 1.861E+08 + 170.53 -65.20 2007.8 0.27682 12.76 5.96667 0.000E+00 0.000E+00 1.861E+08 + 170.03 -59.54 2006.6 0.27457 8.14 6.00000 0.000E+00 0.000E+00 1.861E+08 + 169.52 -53.87 2005.1 0.26943 5.57 6.03333 0.000E+00 0.000E+00 1.861E+08 + 169.02 -48.21 2003.5 0.26171 4.06 6.06667 0.000E+00 0.000E+00 1.861E+08 + 168.52 -42.54 2001.8 0.25177 3.13 6.10000 2.427E+01 2.912E+03 1.861E+08 + 168.02 -36.87 2000.2 0.23996 2.52 6.13333 3.098E+02 3.717E+04 1.862E+08 + 167.52 -31.20 1998.6 0.22664 2.11 6.16667 1.148E+03 1.377E+05 1.863E+08 + 167.02 -25.53 1997.2 0.21231 1.82 6.20000 1.699E+03 2.039E+05 1.865E+08 + 166.51 -19.86 1996.0 0.19758 1.62 6.23333 4.241E+03 5.090E+05 1.870E+08 + 166.01 -14.18 1995.0 0.18328 1.47 6.26667 7.026E+03 8.431E+05 1.879E+08 + 165.51 -8.51 1994.4 0.17041 1.38 6.30000 9.470E+03 1.136E+06 1.890E+08 + 165.01 -2.83 1994.0 0.16003 1.31 6.33333 1.435E+04 1.722E+06 1.907E+08 + 164.51 2.84 1994.0 0.15312 1.28 6.36667 1.541E+04 1.849E+06 1.926E+08 + 164.01 8.52 1994.4 0.15031 1.28 6.40000 1.676E+04 2.011E+06 1.946E+08 + 163.50 14.19 1995.1 0.15174 1.30 6.43333 1.920E+04 2.304E+06 1.969E+08 + 163.00 19.87 1996.0 0.15708 1.34 6.46667 1.601E+04 1.921E+06 1.988E+08 + 162.50 25.54 1997.3 0.16566 1.42 6.50000 1.318E+04 1.581E+06 2.004E+08 + 162.00 31.21 1998.7 0.17670 1.54 6.53333 1.022E+04 1.227E+06 2.016E+08 + 161.50 36.88 2000.3 0.18939 1.70 6.56667 5.879E+03 7.055E+05 2.023E+08 + 161.00 42.55 2001.9 0.20292 1.93 6.60000 3.956E+03 4.747E+05 2.028E+08 + 160.50 48.22 2003.6 0.21653 2.27 6.63333 2.570E+03 3.083E+05 2.031E+08 + 159.99 53.88 2005.2 0.22945 2.76 6.66667 2.798E+02 3.358E+04 2.032E+08 + 159.49 59.54 2006.7 0.24098 3.52 6.70000 0.000E+00 0.000E+00 2.032E+08 + 158.99 65.21 2008.0 0.25056 4.74 6.73333 0.000E+00 0.000E+00 2.032E+08 + 158.49 70.87 2009.0 0.25781 6.85 6.76667 0.000E+00 0.000E+00 2.032E+08 + 157.98 76.53 2009.8 0.26258 10.91 6.80000 0.000E+00 0.000E+00 2.032E+08 + 157.48 82.19 2010.2 0.26496 19.77 6.83333 0.000E+00 0.000E+00 2.032E+08 + 156.94 87.84 2010.2 -1.00000 -1.00 6.86667 0.000E+00 0.000E+00 2.032E+08 + -23.49 86.50 2009.9 -1.00000 -1.00 6.90000 0.000E+00 0.000E+00 2.032E+08 + -24.01 80.84 2009.3 -1.00000 -1.00 6.93333 0.000E+00 0.000E+00 2.032E+08 + -24.51 75.18 2008.2 -1.00000 -1.00 6.96667 0.000E+00 0.000E+00 2.032E+08 + -25.01 69.51 2006.9 -1.00000 -1.00 7.00000 0.000E+00 0.000E+00 2.032E+08 + -25.52 63.85 2005.3 0.24480 8.67 7.03333 0.000E+00 0.000E+00 2.032E+08 + -26.02 58.18 2003.5 0.23717 5.80 7.06667 0.000E+00 0.000E+00 2.032E+08 + -26.52 52.52 2001.6 0.22817 4.20 7.10000 0.000E+00 0.000E+00 2.032E+08 + -27.02 46.85 1999.5 0.21775 3.23 7.13333 3.263E+01 3.915E+03 2.032E+08 + -27.52 41.17 1997.5 0.20600 2.60 7.16667 1.150E+03 1.380E+05 2.033E+08 + -28.02 35.50 1995.5 0.19315 2.18 7.20000 6.441E+03 7.729E+05 2.041E+08 + -28.53 29.82 1993.7 0.17963 1.89 7.23333 8.546E+03 1.026E+06 2.051E+08 + -29.03 24.15 1992.1 0.16600 1.68 7.26667 1.601E+04 1.922E+06 2.070E+08 + -29.53 18.47 1990.7 0.15294 1.55 7.30000 2.493E+04 2.992E+06 2.100E+08 + -30.03 12.78 1989.6 0.14113 1.46 7.33333 3.559E+04 4.271E+06 2.143E+08 + -30.53 7.10 1989.0 0.13121 1.41 7.36667 5.124E+04 6.149E+06 2.204E+08 + -31.03 1.42 1988.7 0.12360 1.38 7.40000 7.102E+04 8.523E+06 2.290E+08 + -31.54 -4.26 1988.7 0.11849 1.38 7.43333 9.072E+04 1.089E+07 2.398E+08 + -32.04 -9.95 1989.2 0.11580 1.40 7.46667 1.056E+05 1.267E+07 2.525E+08 + -32.54 -15.63 1990.1 0.11529 1.44 7.50000 1.053E+05 1.263E+07 2.651E+08 + -33.04 -21.31 1991.3 0.11669 1.50 7.53333 1.059E+05 1.270E+07 2.778E+08 + -33.54 -26.99 1992.8 0.11979 1.58 7.56667 9.232E+04 1.108E+07 2.889E+08 + -34.04 -32.67 1994.5 0.12452 1.69 7.60000 7.203E+04 8.643E+06 2.976E+08 + -34.54 -38.34 1996.4 0.13093 1.83 7.63333 4.663E+04 5.596E+06 3.032E+08 + -35.05 -44.01 1998.4 0.13909 2.01 7.66667 3.093E+04 3.711E+06 3.069E+08 + -35.55 -49.69 2000.5 0.14907 2.26 7.70000 1.451E+04 1.741E+06 3.086E+08 + -36.05 -55.35 2002.5 0.16082 2.61 7.73333 3.078E+03 3.694E+05 3.090E+08 + -36.55 -61.02 2004.3 0.17414 3.10 7.76667 1.808E+02 2.170E+04 3.090E+08 + -37.05 -66.69 2006.0 0.18868 3.82 7.80000 0.000E+00 0.000E+00 3.090E+08 + -37.56 -72.35 2007.5 0.20395 4.94 7.83333 0.000E+00 0.000E+00 3.090E+08 + -38.06 -78.01 2008.7 0.21935 6.84 7.86667 0.000E+00 0.000E+00 3.090E+08 + -38.56 -83.67 2009.5 0.23423 10.41 7.90000 0.000E+00 0.000E+00 3.090E+08 + -39.15 -89.33 2010.0 0.24797 18.26 7.93333 0.000E+00 0.000E+00 3.090E+08 + 140.46 -85.01 2010.1 -1.00000 -1.00 7.96667 0.000E+00 0.000E+00 3.090E+08 + 139.95 -79.35 2009.9 -1.00000 -1.00 8.00000 0.000E+00 0.000E+00 3.090E+08 + 139.44 -73.69 2009.3 -1.00000 -1.00 8.03333 0.000E+00 0.000E+00 3.090E+08 + 138.94 -68.03 2008.5 -1.00000 -1.00 8.06667 0.000E+00 0.000E+00 3.090E+08 + 138.44 -62.37 2007.3 -1.00000 -1.00 8.10000 0.000E+00 0.000E+00 3.090E+08 + 137.94 -56.71 2005.9 0.28196 10.75 8.13333 0.000E+00 0.000E+00 3.090E+08 + 137.44 -51.04 2004.4 0.27783 6.62 8.16667 0.000E+00 0.000E+00 3.090E+08 + 136.93 -45.38 2002.7 0.27094 4.53 8.20000 0.000E+00 0.000E+00 3.090E+08 + 136.43 -39.71 2001.1 0.26151 3.34 8.23333 9.277E+00 1.113E+03 3.090E+08 + 135.93 -34.04 1999.5 0.24980 2.61 8.26667 1.344E+02 1.612E+04 3.090E+08 + 135.43 -28.37 1998.0 0.23625 2.14 8.30000 6.402E+02 7.683E+04 3.091E+08 + 134.93 -22.70 1996.7 0.22143 1.82 8.33333 9.286E+02 1.114E+05 3.092E+08 + 134.43 -17.02 1995.6 0.20612 1.60 8.36667 2.805E+03 3.367E+05 3.095E+08 + 133.92 -11.35 1994.8 0.19132 1.45 8.40000 4.439E+03 5.327E+05 3.101E+08 + 133.42 -5.67 1994.3 0.17821 1.35 8.43333 6.083E+03 7.300E+05 3.108E+08 + 132.92 0.00 1994.1 0.16809 1.28 8.46667 7.460E+03 8.952E+05 3.117E+08 + 132.42 5.68 1994.3 0.16211 1.25 8.50000 7.765E+03 9.318E+05 3.126E+08 + 131.92 11.35 1994.8 0.16104 1.25 8.53333 8.266E+03 9.919E+05 3.136E+08 + 131.42 17.03 1995.6 0.16491 1.28 8.56667 7.997E+03 9.597E+05 3.146E+08 + 130.92 22.70 1996.7 0.17306 1.33 8.60000 7.904E+03 9.485E+05 3.155E+08 + 130.41 28.37 1998.0 0.18435 1.42 8.63333 5.997E+03 7.197E+05 3.163E+08 + 129.91 34.04 1999.5 0.19748 1.55 8.66667 4.045E+03 4.854E+05 3.167E+08 + 129.41 39.71 2001.2 0.21122 1.75 8.70000 1.552E+03 1.862E+05 3.169E+08 + 128.91 45.38 2002.8 0.22449 2.02 8.73333 1.513E+03 1.816E+05 3.171E+08 + 128.41 51.04 2004.5 0.23644 2.41 8.76667 8.638E+02 1.037E+05 3.172E+08 + 127.91 56.71 2006.0 0.24646 2.98 8.80000 7.785E+01 9.342E+03 3.172E+08 + 127.41 62.37 2007.4 0.25424 3.86 8.83333 0.000E+00 0.000E+00 3.172E+08 + 126.90 68.03 2008.5 0.25973 5.29 8.86667 0.000E+00 0.000E+00 3.172E+08 + 126.40 73.69 2009.4 0.26311 7.80 8.90000 0.000E+00 0.000E+00 3.172E+08 + 125.90 79.35 2010.0 0.26477 12.74 8.93333 0.000E+00 0.000E+00 3.172E+08 + 125.40 85.01 2010.2 -1.00000 -1.00 8.96667 0.000E+00 0.000E+00 3.172E+08 + -55.06 89.33 2010.1 -1.00000 -1.00 9.00000 0.000E+00 0.000E+00 3.172E+08 + -55.60 83.67 2009.6 -1.00000 -1.00 9.03333 0.000E+00 0.000E+00 3.172E+08 + -56.10 78.01 2008.8 -1.00000 -1.00 9.06667 0.000E+00 0.000E+00 3.172E+08 + -56.60 72.35 2007.6 -1.00000 -1.00 9.10000 0.000E+00 0.000E+00 3.172E+08 + -57.10 66.69 2006.1 -1.00000 -1.00 9.13333 0.000E+00 0.000E+00 3.172E+08 + -57.61 61.02 2004.4 -1.00000 -1.00 9.16667 0.000E+00 0.000E+00 3.172E+08 + -58.11 55.36 2002.5 0.24907 7.33 9.20000 0.000E+00 0.000E+00 3.172E+08 + -58.61 49.69 2000.5 0.24212 5.15 9.23333 0.000E+00 0.000E+00 3.172E+08 + -59.11 44.02 1998.5 0.23331 3.88 9.26667 0.000E+00 0.000E+00 3.172E+08 + -59.61 38.34 1996.4 0.22270 3.07 9.30000 7.545E+01 9.054E+03 3.172E+08 + -60.11 32.67 1994.5 0.21050 2.54 9.33333 1.219E+03 1.463E+05 3.174E+08 + -60.61 26.99 1992.8 0.19709 2.17 9.36667 5.700E+03 6.840E+05 3.181E+08 + -61.12 21.31 1991.3 0.18295 1.91 9.40000 7.922E+03 9.507E+05 3.190E+08 + -61.62 15.63 1990.1 0.16866 1.73 9.43333 1.392E+04 1.671E+06 3.207E+08 + -62.12 9.95 1989.2 0.15487 1.59 9.46667 2.421E+04 2.906E+06 3.236E+08 + -62.62 4.26 1988.7 0.14229 1.50 9.50000 3.640E+04 4.368E+06 3.280E+08 + -63.12 -1.42 1988.6 0.13166 1.43 9.53333 5.057E+04 6.069E+06 3.340E+08 + -63.62 -7.10 1988.9 0.12366 1.39 9.56667 7.097E+04 8.516E+06 3.425E+08 + -64.12 -12.78 1989.6 0.11876 1.38 9.60000 8.931E+04 1.072E+07 3.533E+08 + -64.63 -18.46 1990.7 0.11720 1.39 9.63333 9.788E+04 1.175E+07 3.650E+08 + -65.13 -24.14 1992.0 0.11888 1.43 9.66667 8.850E+04 1.062E+07 3.756E+08 + -65.63 -29.82 1993.6 0.12351 1.49 9.70000 7.796E+04 9.355E+06 3.850E+08 + -66.13 -35.50 1995.5 0.13072 1.59 9.73333 6.002E+04 7.203E+06 3.922E+08 + -66.63 -41.17 1997.4 0.14014 1.73 9.76667 3.856E+04 4.627E+06 3.968E+08 + -67.13 -46.85 1999.5 0.15140 1.92 9.80000 2.198E+04 2.638E+06 3.994E+08 + -67.63 -52.52 2001.5 0.16412 2.20 9.83333 1.336E+04 1.603E+06 4.010E+08 + -68.14 -58.18 2003.5 0.17784 2.59 9.86667 2.449E+03 2.939E+05 4.013E+08 + -68.64 -63.85 2005.3 0.19206 3.16 9.90000 7.988E+01 9.585E+03 4.014E+08 + -69.14 -69.51 2006.9 0.20621 4.04 9.93333 0.000E+00 0.000E+00 4.014E+08 + -69.64 -75.18 2008.2 0.21976 5.48 9.96667 0.000E+00 0.000E+00 4.014E+08 + -70.14 -80.84 2009.2 0.23227 8.05 10.00000 0.000E+00 0.000E+00 4.014E+08 + -70.65 -86.50 2009.9 0.24340 13.27 10.03333 0.000E+00 0.000E+00 4.014E+08 + 108.86 -87.84 2010.2 -1.00000 -1.00 10.06667 0.000E+00 0.000E+00 4.014E+08 + 108.36 -82.19 2010.2 -1.00000 -1.00 10.10000 0.000E+00 0.000E+00 4.014E+08 + 107.85 -76.53 2009.8 -1.00000 -1.00 10.13333 0.000E+00 0.000E+00 4.014E+08 + 107.35 -70.87 2009.0 -1.00000 -1.00 10.16667 0.000E+00 0.000E+00 4.014E+08 + 106.85 -65.21 2008.0 -1.00000 -1.00 10.20000 0.000E+00 0.000E+00 4.014E+08 + 106.35 -59.54 2006.7 -1.00000 -1.00 10.23333 0.000E+00 0.000E+00 4.014E+08 + 105.85 -53.88 2005.2 0.26996 8.95 10.26667 0.000E+00 0.000E+00 4.014E+08 + 105.35 -48.22 2003.6 0.26530 5.75 10.30000 0.000E+00 0.000E+00 4.014E+08 + 104.85 -42.55 2002.0 0.25837 4.05 10.33333 0.000E+00 0.000E+00 4.014E+08 + 104.34 -36.88 2000.3 0.24930 3.05 10.36667 4.589E+01 5.507E+03 4.014E+08 + 103.84 -31.21 1998.8 0.23833 2.42 10.40000 6.269E+02 7.523E+04 4.014E+08 + 103.34 -25.54 1997.4 0.22587 2.00 10.43333 1.442E+03 1.731E+05 4.016E+08 + 102.84 -19.87 1996.1 0.21247 1.72 10.46667 1.370E+03 1.644E+05 4.018E+08 + 102.34 -14.19 1995.2 0.19889 1.53 10.50000 3.803E+03 4.563E+05 4.022E+08 + 101.84 -8.52 1994.5 0.18615 1.39 10.53333 5.086E+03 6.103E+05 4.028E+08 + 101.34 -2.84 1994.2 0.17548 1.30 10.56667 7.317E+03 8.781E+05 4.037E+08 + 100.83 2.83 1994.2 0.16826 1.25 10.60000 5.512E+03 6.615E+05 4.044E+08 + 100.33 8.51 1994.5 0.16565 1.23 10.63333 6.117E+03 7.341E+05 4.051E+08 + 99.83 14.18 1995.2 0.16820 1.25 10.66667 5.349E+03 6.418E+05 4.058E+08 + 99.33 19.86 1996.2 0.17555 1.29 10.70000 5.422E+03 6.507E+05 4.064E+08 + 98.83 25.53 1997.4 0.18654 1.36 10.73333 3.778E+03 4.533E+05 4.069E+08 + 98.33 31.20 1998.8 0.19965 1.48 10.76667 3.216E+03 3.859E+05 4.072E+08 + 97.83 36.87 2000.4 0.21337 1.65 10.80000 1.431E+03 1.717E+05 4.074E+08 + 97.32 42.54 2002.0 0.22645 1.89 10.83333 7.193E+02 8.632E+04 4.075E+08 + 96.82 48.20 2003.7 0.23799 2.23 10.86667 7.937E+02 9.525E+04 4.076E+08 + 96.32 53.87 2005.3 0.24742 2.72 10.90000 1.015E+02 1.218E+04 4.076E+08 + 95.82 59.53 2006.8 0.25452 3.46 10.93333 0.000E+00 0.000E+00 4.076E+08 + 95.32 65.19 2008.0 0.25939 4.59 10.96667 0.000E+00 0.000E+00 4.076E+08 + 94.82 70.85 2009.1 0.26233 6.47 11.00000 0.000E+00 0.000E+00 4.076E+08 + 94.32 76.51 2009.8 0.26383 9.91 11.03333 0.000E+00 0.000E+00 4.076E+08 + 93.82 82.17 2010.2 0.26446 17.18 11.06667 0.000E+00 0.000E+00 4.076E+08 + 93.33 87.83 2010.3 -1.00000 -1.00 11.10000 0.000E+00 0.000E+00 4.076E+08 + -87.20 86.51 2010.0 -1.00000 -1.00 11.13333 0.000E+00 0.000E+00 4.076E+08 + -87.69 80.85 2009.3 -1.00000 -1.00 11.16667 0.000E+00 0.000E+00 4.076E+08 + -88.19 75.19 2008.3 -1.00000 -1.00 11.20000 0.000E+00 0.000E+00 4.076E+08 + -88.69 69.53 2006.9 -1.00000 -1.00 11.23333 0.000E+00 0.000E+00 4.076E+08 + -89.19 63.86 2005.4 -1.00000 -1.00 11.26667 0.000E+00 0.000E+00 4.076E+08 + -89.70 58.20 2003.5 0.26135 10.22 11.30000 0.000E+00 0.000E+00 4.076E+08 + -90.20 52.53 2001.6 0.25644 6.62 11.33333 0.000E+00 0.000E+00 4.076E+08 + -90.70 46.86 1999.6 0.24916 4.69 11.36667 0.000E+00 0.000E+00 4.076E+08 + -91.20 41.19 1997.5 0.23948 3.54 11.40000 0.000E+00 0.000E+00 4.076E+08 + -91.70 35.51 1995.5 0.22756 2.80 11.43333 3.280E+02 3.936E+04 4.076E+08 + -92.20 29.84 1993.7 0.21384 2.31 11.46667 2.706E+03 3.247E+05 4.080E+08 + -92.70 24.16 1992.1 0.19891 1.98 11.50000 5.706E+03 6.847E+05 4.087E+08 + -93.20 18.48 1990.7 0.18352 1.74 11.53333 7.276E+03 8.731E+05 4.095E+08 + -93.71 12.80 1989.7 0.16853 1.58 11.56667 1.425E+04 1.710E+06 4.112E+08 + -94.21 7.11 1989.0 0.15488 1.46 11.60000 2.106E+04 2.528E+06 4.138E+08 + -94.71 1.43 1988.7 0.14356 1.39 11.63333 2.983E+04 3.579E+06 4.173E+08 + -95.21 -4.25 1988.8 0.13544 1.35 11.66667 4.025E+04 4.830E+06 4.222E+08 + -95.71 -9.93 1989.3 0.13114 1.34 11.70000 4.874E+04 5.849E+06 4.280E+08 + -96.21 -15.62 1990.1 0.13084 1.35 11.73333 4.973E+04 5.967E+06 4.340E+08 + -96.71 -21.30 1991.3 0.13427 1.39 11.76667 4.371E+04 5.245E+06 4.392E+08 + -97.22 -26.98 1992.8 0.14082 1.45 11.80000 3.571E+04 4.286E+06 4.435E+08 + -97.72 -32.65 1994.6 0.14978 1.55 11.83333 2.815E+04 3.378E+06 4.469E+08 + -98.22 -38.33 1996.5 0.16047 1.69 11.86667 1.974E+04 2.369E+06 4.493E+08 + -98.72 -44.00 1998.5 0.17227 1.88 11.90000 1.101E+04 1.321E+06 4.506E+08 + -99.22 -49.67 2000.5 0.18466 2.15 11.93333 8.080E+03 9.696E+05 4.516E+08 + -99.72 -55.34 2002.5 0.19713 2.53 11.96667 1.978E+03 2.373E+05 4.518E+08 + -100.22 -61.01 2004.4 0.20920 3.09 12.00000 9.351E+01 1.122E+04 4.518E+08 + -100.72 -66.67 2006.1 0.22039 3.92 12.03333 0.000E+00 0.000E+00 4.518E+08 + -101.22 -72.34 2007.6 0.23027 5.23 12.06667 0.000E+00 0.000E+00 4.518E+08 + -101.72 -78.00 2008.7 0.23848 7.42 12.10000 0.000E+00 0.000E+00 4.518E+08 + -102.22 -83.66 2009.6 0.24479 11.31 12.13333 0.000E+00 0.000E+00 4.518E+08 + -102.67 -89.32 2010.1 0.24909 18.50 12.16667 0.000E+00 0.000E+00 4.518E+08 + 76.76 -85.02 2010.2 -1.00000 -1.00 12.20000 0.000E+00 0.000E+00 4.518E+08 + 76.26 -79.36 2010.0 -1.00000 -1.00 12.23333 0.000E+00 0.000E+00 4.518E+08 + 75.76 -73.71 2009.4 -1.00000 -1.00 12.26667 0.000E+00 0.000E+00 4.518E+08 + 75.26 -68.04 2008.5 -1.00000 -1.00 12.30000 0.000E+00 0.000E+00 4.518E+08 + 74.76 -62.38 2007.4 0.24366 11.97 12.33333 0.000E+00 0.000E+00 4.518E+08 + 74.26 -56.72 2006.0 0.23835 7.81 12.36667 0.000E+00 0.000E+00 4.518E+08 + 73.76 -51.06 2004.4 0.23199 5.46 12.40000 0.000E+00 0.000E+00 4.518E+08 + 73.26 -45.39 2002.8 0.22473 4.04 12.43333 0.000E+00 0.000E+00 4.518E+08 + 72.76 -39.72 2001.2 0.21671 3.14 12.46667 5.375E+01 6.450E+03 4.518E+08 + 72.25 -34.06 1999.5 0.20806 2.53 12.50000 1.378E+03 1.654E+05 4.520E+08 + 71.75 -28.38 1998.0 0.19891 2.12 12.53333 5.008E+03 6.010E+05 4.526E+08 + 71.25 -22.71 1996.7 0.18945 1.82 12.56667 5.643E+03 6.772E+05 4.533E+08 + 70.75 -17.04 1995.6 0.17993 1.61 12.60000 9.393E+03 1.127E+06 4.544E+08 + 70.25 -11.36 1994.8 0.17088 1.46 12.63333 1.115E+04 1.338E+06 4.557E+08 + 69.75 -5.69 1994.3 0.16309 1.36 12.66667 1.260E+04 1.512E+06 4.572E+08 + 69.25 -0.01 1994.1 0.15766 1.29 12.70000 1.437E+04 1.724E+06 4.590E+08 + 68.75 5.66 1994.3 0.15575 1.26 12.73333 1.174E+04 1.408E+06 4.604E+08 + 68.24 11.34 1994.8 0.15812 1.26 12.76667 1.027E+04 1.232E+06 4.616E+08 + 67.74 17.01 1995.6 0.16474 1.29 12.80000 1.051E+04 1.261E+06 4.629E+08 + 67.24 22.68 1996.7 0.17478 1.36 12.83333 7.327E+03 8.792E+05 4.637E+08 + 66.74 28.36 1998.1 0.18695 1.46 12.86667 5.649E+03 6.778E+05 4.644E+08 + 66.24 34.03 1999.6 0.19994 1.61 12.90000 3.809E+03 4.571E+05 4.649E+08 + 65.74 39.70 2001.2 0.21268 1.83 12.93333 1.678E+03 2.014E+05 4.651E+08 + 65.24 45.36 2002.9 0.22442 2.13 12.96667 1.578E+03 1.893E+05 4.653E+08 + 64.74 51.03 2004.5 0.23469 2.57 13.00000 3.811E+02 4.573E+04 4.653E+08 + 64.23 56.69 2006.0 0.24328 3.21 13.03333 2.016E+01 2.419E+03 4.653E+08 + 63.73 62.35 2007.4 0.25013 4.20 13.06667 0.000E+00 0.000E+00 4.653E+08 + 63.23 68.02 2008.6 0.25534 5.81 13.10000 0.000E+00 0.000E+00 4.653E+08 + 62.73 73.68 2009.5 0.25913 8.63 13.13333 0.000E+00 0.000E+00 4.653E+08 + 62.23 79.34 2010.1 0.26180 14.22 13.16667 0.000E+00 0.000E+00 4.653E+08 + 61.73 84.99 2010.3 -1.00000 -1.00 13.20000 0.000E+00 0.000E+00 4.653E+08 + -118.78 89.35 2010.2 -1.00000 -1.00 13.23333 0.000E+00 0.000E+00 4.653E+08 + -119.28 83.69 2009.7 -1.00000 -1.00 13.26667 0.000E+00 0.000E+00 4.653E+08 + -119.78 78.03 2008.8 -1.00000 -1.00 13.30000 0.000E+00 0.000E+00 4.653E+08 + -120.28 72.37 2007.7 -1.00000 -1.00 13.33333 0.000E+00 0.000E+00 4.653E+08 + -120.78 66.70 2006.2 -1.00000 -1.00 13.36667 0.000E+00 0.000E+00 4.653E+08 + -121.28 61.04 2004.5 0.25864 8.39 13.40000 0.000E+00 0.000E+00 4.653E+08 + -121.78 55.37 2002.6 0.25240 5.63 13.43333 0.000E+00 0.000E+00 4.653E+08 + -122.28 49.70 2000.6 0.24391 4.08 13.46667 0.000E+00 0.000E+00 4.653E+08 + -122.79 44.03 1998.6 0.23328 3.14 13.50000 3.674E+01 4.409E+03 4.653E+08 + -123.29 38.36 1996.5 0.22085 2.53 13.53333 8.547E+02 1.026E+05 4.654E+08 + -123.79 32.68 1994.6 0.20716 2.12 13.56667 3.578E+03 4.293E+05 4.659E+08 + -124.29 27.01 1992.9 0.19286 1.83 13.60000 4.854E+03 5.824E+05 4.664E+08 + -124.79 21.33 1991.4 0.17869 1.63 13.63333 9.689E+03 1.163E+06 4.676E+08 + -125.29 15.65 1990.2 0.16550 1.49 13.66667 1.533E+04 1.839E+06 4.694E+08 + -125.79 9.96 1989.3 0.15417 1.40 13.70000 2.039E+04 2.447E+06 4.719E+08 + -126.29 4.28 1988.8 0.14564 1.34 13.73333 2.603E+04 3.124E+06 4.750E+08 + -126.80 -1.40 1988.7 0.14073 1.31 13.76667 3.205E+04 3.845E+06 4.789E+08 + -127.30 -7.08 1989.0 0.13994 1.31 13.80000 3.321E+04 3.986E+06 4.828E+08 + -127.80 -12.77 1989.7 0.14329 1.33 13.83333 2.861E+04 3.433E+06 4.863E+08 + -128.30 -18.45 1990.7 0.15030 1.38 13.86667 2.267E+04 2.721E+06 4.890E+08 + -128.80 -24.13 1992.0 0.16013 1.47 13.90000 1.732E+04 2.079E+06 4.911E+08 + -129.30 -29.81 1993.7 0.17186 1.59 13.93333 1.283E+04 1.539E+06 4.926E+08 + -129.80 -35.48 1995.5 0.18461 1.76 13.96667 6.789E+03 8.146E+05 4.934E+08 + -130.31 -41.16 1997.5 0.19765 2.00 14.00000 6.613E+03 7.935E+05 4.942E+08 + -130.81 -46.83 1999.5 0.21033 2.32 14.03333 2.976E+03 3.572E+05 4.946E+08 + -131.31 -52.50 2001.5 0.22213 2.79 14.06667 3.713E+02 4.455E+04 4.946E+08 + -131.81 -58.17 2003.5 0.23255 3.46 14.10000 8.014E+00 9.617E+02 4.946E+08 + -132.31 -63.83 2005.3 0.24117 4.46 14.13333 0.000E+00 0.000E+00 4.946E+08 + -132.81 -69.50 2006.9 0.24761 5.99 14.16667 0.000E+00 0.000E+00 4.946E+08 + -133.31 -75.16 2008.2 0.25157 8.40 14.20000 0.000E+00 0.000E+00 4.946E+08 + -133.82 -80.82 2009.2 0.25290 12.11 14.23333 0.000E+00 0.000E+00 4.946E+08 + -134.32 -86.48 2009.9 -1.00000 -1.00 14.26667 0.000E+00 0.000E+00 4.946E+08 + 45.18 -87.86 2010.2 -1.00000 -1.00 14.30000 0.000E+00 0.000E+00 4.946E+08 + 44.68 -82.20 2010.1 -1.00000 -1.00 14.33333 0.000E+00 0.000E+00 4.946E+08 + 44.18 -76.54 2009.7 -1.00000 -1.00 14.36667 0.000E+00 0.000E+00 4.946E+08 + 43.68 -70.88 2009.0 -1.00000 -1.00 14.40000 0.000E+00 0.000E+00 4.946E+08 + 43.18 -65.22 2008.0 0.21467 7.94 14.43333 0.000E+00 0.000E+00 4.946E+08 + 42.67 -59.56 2006.7 0.20436 5.92 14.46667 0.000E+00 0.000E+00 4.946E+08 + 42.17 -53.90 2005.2 0.19423 4.57 14.50000 0.000E+00 0.000E+00 4.946E+08 + 41.67 -48.23 2003.6 0.18473 3.65 14.53333 0.000E+00 0.000E+00 4.946E+08 + 41.17 -42.57 2002.0 0.17615 3.00 14.56667 3.498E+02 4.197E+04 4.947E+08 + 40.67 -36.90 2000.3 0.16866 2.52 14.60000 3.943E+03 4.732E+05 4.951E+08 + 40.17 -31.23 1998.7 0.16221 2.17 14.63333 1.398E+04 1.677E+06 4.968E+08 + 39.67 -25.56 1997.3 0.15659 1.90 14.66667 1.890E+04 2.268E+06 4.991E+08 + 39.17 -19.88 1996.1 0.15155 1.69 14.70000 2.728E+04 3.273E+06 5.024E+08 + 38.66 -14.21 1995.1 0.14697 1.54 14.73333 3.113E+04 3.736E+06 5.061E+08 + 38.16 -8.54 1994.5 0.14306 1.43 14.76667 3.198E+04 3.838E+06 5.099E+08 + 37.66 -2.86 1994.1 0.14044 1.36 14.80000 3.245E+04 3.893E+06 5.138E+08 + 37.16 2.82 1994.1 0.14003 1.31 14.83333 3.321E+04 3.986E+06 5.178E+08 + 36.66 8.49 1994.5 0.14268 1.30 14.86667 2.961E+04 3.554E+06 5.214E+08 + 36.16 14.17 1995.1 0.14876 1.32 14.90000 2.276E+04 2.731E+06 5.241E+08 + 35.66 19.84 1996.1 0.15791 1.37 14.93333 1.594E+04 1.913E+06 5.260E+08 + 35.15 25.51 1997.3 0.16924 1.46 14.96667 1.191E+04 1.429E+06 5.274E+08 + 34.65 31.18 1998.7 0.18167 1.60 15.00000 8.781E+03 1.054E+06 5.285E+08 + 34.15 36.85 2000.3 0.19426 1.80 15.03333 4.602E+03 5.522E+05 5.290E+08 + 33.65 42.52 2002.0 0.20637 2.08 15.06667 3.791E+03 4.549E+05 5.295E+08 + 33.15 48.19 2003.6 0.21759 2.48 15.10000 1.288E+03 1.546E+05 5.296E+08 + 32.65 53.85 2005.2 0.22773 3.08 15.13333 6.135E+01 7.362E+03 5.297E+08 + 32.14 59.52 2006.7 0.23674 4.01 15.16667 0.000E+00 0.000E+00 5.297E+08 + 31.64 65.18 2008.0 0.24460 5.52 15.20000 0.000E+00 0.000E+00 5.297E+08 + 31.14 70.84 2009.0 0.25131 8.18 15.23333 0.000E+00 0.000E+00 5.297E+08 + 30.64 76.50 2009.7 0.25684 13.39 15.26667 0.000E+00 0.000E+00 5.297E+08 + 30.14 82.16 2010.1 -1.00000 -1.00 15.30000 0.000E+00 0.000E+00 5.297E+08 + 29.62 87.82 2010.2 -1.00000 -1.00 15.33333 0.000E+00 0.000E+00 5.297E+08 + -150.85 86.52 2009.9 -1.00000 -1.00 15.36667 0.000E+00 0.000E+00 5.297E+08 + -151.36 80.86 2009.2 -1.00000 -1.00 15.40000 0.000E+00 0.000E+00 5.297E+08 + -151.86 75.20 2008.2 -1.00000 -1.00 15.43333 0.000E+00 0.000E+00 5.297E+08 + -152.36 69.54 2006.9 0.25828 9.83 15.46667 0.000E+00 0.000E+00 5.297E+08 + -152.87 63.88 2005.3 0.25158 6.36 15.50000 0.000E+00 0.000E+00 5.297E+08 + -153.37 58.21 2003.5 0.24279 4.49 15.53333 0.000E+00 0.000E+00 5.297E+08 + -153.87 52.54 2001.5 0.23219 3.39 15.56667 1.576E+01 1.891E+03 5.297E+08 + -154.37 46.87 1999.5 0.22022 2.70 15.60000 3.596E+02 4.316E+04 5.297E+08 + -154.87 41.20 1997.4 0.20738 2.24 15.63333 3.973E+03 4.768E+05 5.302E+08 + -155.37 35.53 1995.5 0.19426 1.93 15.66667 5.457E+03 6.549E+05 5.308E+08 + -155.88 29.85 1993.6 0.18143 1.70 15.70000 8.454E+03 1.014E+06 5.318E+08 + -156.38 24.17 1992.0 0.16948 1.55 15.73333 1.353E+04 1.624E+06 5.335E+08 + -156.88 18.49 1990.7 0.15906 1.43 15.76667 1.723E+04 2.068E+06 5.355E+08 + -157.38 12.81 1989.6 0.15090 1.36 15.80000 2.096E+04 2.515E+06 5.381E+08 + -157.88 7.13 1988.9 0.14579 1.31 15.83333 2.603E+04 3.123E+06 5.412E+08 + -158.38 1.45 1988.6 0.14444 1.29 15.86667 2.527E+04 3.032E+06 5.442E+08 + -158.88 -4.24 1988.7 0.14726 1.30 15.90000 2.456E+04 2.948E+06 5.472E+08 + -159.39 -9.92 1989.2 0.15409 1.34 15.93333 1.821E+04 2.185E+06 5.493E+08 + -159.89 -15.60 1990.1 0.16428 1.40 15.96667 1.395E+04 1.674E+06 5.510E+08 + -160.39 -21.28 1991.3 0.17686 1.51 16.00000 1.028E+04 1.234E+06 5.522E+08 + -160.89 -26.96 1992.8 0.19078 1.66 16.03333 5.543E+03 6.651E+05 5.529E+08 + -161.39 -32.64 1994.5 0.20515 1.88 16.06667 2.913E+03 3.495E+05 5.533E+08 + -161.89 -38.31 1996.4 0.21919 2.19 16.09999 2.918E+03 3.501E+05 5.536E+08 + -162.39 -43.99 1998.4 0.23231 2.63 16.13333 3.315E+02 3.978E+04 5.537E+08 + -162.90 -49.66 2000.5 0.24398 3.27 16.16666 1.620E+01 1.944E+03 5.537E+08 + -163.40 -55.33 2002.5 0.25371 4.24 16.20000 0.000E+00 0.000E+00 5.537E+08 + -163.90 -61.00 2004.4 0.26101 5.77 16.23332 0.000E+00 0.000E+00 5.537E+08 + -164.40 -66.66 2006.1 0.26546 8.22 16.26666 0.000E+00 0.000E+00 5.537E+08 + -164.90 -72.32 2007.5 0.26670 12.13 16.29999 0.000E+00 0.000E+00 5.537E+08 + -165.41 -77.98 2008.7 -1.00000 -1.00 16.33333 0.000E+00 0.000E+00 5.537E+08 + -165.91 -83.64 2009.6 -1.00000 -1.00 16.36665 0.000E+00 0.000E+00 5.537E+08 + -166.51 -89.30 2010.1 -1.00000 -1.00 16.39999 0.000E+00 0.000E+00 5.537E+08 + 13.11 -85.04 2010.2 -1.00000 -1.00 16.43332 0.000E+00 0.000E+00 5.537E+08 + 12.60 -79.38 2010.0 -1.00000 -1.00 16.46666 0.000E+00 0.000E+00 5.537E+08 + 12.10 -73.72 2009.4 0.21354 7.90 16.49998 0.000E+00 0.000E+00 5.537E+08 + 11.59 -68.06 2008.5 0.19977 5.97 16.53333 0.000E+00 0.000E+00 5.537E+08 + 11.09 -62.40 2007.4 0.18655 4.69 16.56667 0.000E+00 0.000E+00 5.537E+08 + 10.59 -56.73 2006.0 0.17451 3.83 16.59999 0.000E+00 0.000E+00 5.537E+08 + 10.09 -51.07 2004.4 0.16407 3.21 16.63333 1.013E+02 1.215E+04 5.537E+08 + 9.59 -45.40 2002.8 0.15546 2.75 16.66666 1.679E+03 2.015E+05 5.539E+08 + 9.08 -39.74 2001.1 0.14866 2.41 16.70000 1.024E+04 1.228E+06 5.551E+08 + 8.58 -34.07 1999.5 0.14340 2.13 16.73332 2.233E+04 2.679E+06 5.578E+08 + 8.08 -28.40 1998.0 0.13929 1.91 16.76666 3.240E+04 3.888E+06 5.617E+08 + 7.58 -22.73 1996.7 0.13586 1.74 16.79999 4.419E+04 5.302E+06 5.670E+08 + 7.08 -17.05 1995.6 0.13282 1.60 16.83333 5.565E+04 6.678E+06 5.736E+08 + 6.58 -11.38 1994.8 0.13019 1.49 16.86665 5.778E+04 6.934E+06 5.806E+08 + 6.08 -5.70 1994.3 0.12839 1.41 16.89999 5.772E+04 6.926E+06 5.875E+08 + 5.57 -0.03 1994.1 0.12821 1.36 16.93332 5.644E+04 6.773E+06 5.943E+08 + 5.07 5.65 1994.3 0.13054 1.34 16.96666 4.999E+04 5.999E+06 6.003E+08 + 4.57 11.32 1994.8 0.13595 1.34 16.99998 3.939E+04 4.727E+06 6.050E+08 + 4.07 17.00 1995.6 0.14446 1.38 17.03333 2.835E+04 3.402E+06 6.084E+08 + 3.57 22.67 1996.7 0.15548 1.46 17.06667 2.046E+04 2.455E+06 6.109E+08 + 3.07 28.34 1998.0 0.16808 1.59 17.09999 1.483E+04 1.780E+06 6.126E+08 + 2.56 34.01 1999.5 0.18133 1.79 17.13333 8.055E+03 9.666E+05 6.136E+08 + 2.06 39.68 2001.1 0.19444 2.07 17.16666 6.255E+03 7.506E+05 6.144E+08 + 1.56 45.35 2002.8 0.20687 2.49 17.20000 1.856E+03 2.227E+05 6.146E+08 + 1.06 51.02 2004.4 0.21832 3.12 17.23332 5.845E+01 7.014E+03 6.146E+08 + 0.56 56.68 2005.9 0.22865 4.10 17.26666 0.000E+00 0.000E+00 6.146E+08 + 0.06 62.34 2007.3 0.23784 5.72 17.29999 0.000E+00 0.000E+00 6.146E+08 + -0.45 68.00 2008.5 0.24589 8.66 17.33333 0.000E+00 0.000E+00 6.146E+08 + -0.95 73.66 2009.3 0.25279 14.59 17.36665 0.000E+00 0.000E+00 6.146E+08 + -1.45 79.32 2009.9 -1.00000 -1.00 17.39999 0.000E+00 0.000E+00 6.146E+08 + -1.96 84.98 2010.1 -1.00000 -1.00 17.43332 0.000E+00 0.000E+00 6.146E+08 + 177.68 89.36 2010.0 -1.00000 -1.00 17.46666 0.000E+00 0.000E+00 6.146E+08 + 177.06 83.70 2009.5 -1.00000 -1.00 17.49998 0.000E+00 0.000E+00 6.146E+08 + 176.56 78.04 2008.7 0.26326 14.62 17.53333 0.000E+00 0.000E+00 6.146E+08 + 176.05 72.38 2007.5 0.25866 8.61 17.56667 0.000E+00 0.000E+00 6.146E+08 + 175.55 66.71 2006.0 0.25154 5.66 17.59999 0.000E+00 0.000E+00 6.146E+08 + 175.05 61.05 2004.3 0.24210 4.05 17.63333 0.000E+00 0.000E+00 6.146E+08 + 174.55 55.38 2002.4 0.23077 3.09 17.66666 5.336E+01 6.403E+03 6.146E+08 + 174.04 49.71 2000.4 0.21811 2.49 17.70000 1.234E+03 1.480E+05 6.147E+08 + 173.54 44.04 1998.4 0.20478 2.08 17.73332 4.023E+03 4.827E+05 6.152E+08 + 173.04 38.37 1996.3 0.19144 1.81 17.76666 5.268E+03 6.321E+05 6.159E+08 + 172.54 32.69 1994.4 0.17877 1.61 17.79999 9.821E+03 1.179E+06 6.170E+08 + 172.04 27.01 1992.7 0.16746 1.47 17.83333 1.336E+04 1.603E+06 6.186E+08 + 171.54 21.33 1991.2 0.15822 1.38 17.86665 1.611E+04 1.933E+06 6.206E+08 + 171.03 15.65 1990.0 0.15182 1.32 17.89999 2.015E+04 2.418E+06 6.230E+08 + 170.53 9.97 1989.1 0.14904 1.28 17.93332 1.902E+04 2.282E+06 6.253E+08 + 170.03 4.29 1988.7 0.15045 1.28 17.96666 1.712E+04 2.054E+06 6.273E+08 + 169.53 -1.39 1988.6 0.15621 1.30 17.99998 1.699E+04 2.039E+06 6.294E+08 + 169.03 -7.08 1988.9 0.16588 1.35 18.03333 1.108E+04 1.330E+06 6.307E+08 + 168.53 -12.76 1989.5 0.17857 1.44 18.06667 7.823E+03 9.387E+05 6.316E+08 + 168.03 -18.44 1990.6 0.19317 1.57 18.09999 5.066E+03 6.080E+05 6.322E+08 + 167.52 -24.12 1991.9 0.20858 1.76 18.13333 1.872E+03 2.246E+05 6.325E+08 + 167.02 -29.80 1993.6 0.22383 2.03 18.16666 1.533E+03 1.839E+05 6.327E+08 + 166.52 -35.48 1995.4 0.23819 2.42 18.20000 6.447E+02 7.737E+04 6.327E+08 + 166.02 -41.15 1997.4 0.25106 3.01 18.23332 6.555E+01 7.867E+03 6.327E+08 + 165.52 -46.82 1999.4 0.26197 3.92 18.26666 0.000E+00 0.000E+00 6.327E+08 + 165.02 -52.49 2001.5 0.27054 5.42 18.29999 0.000E+00 0.000E+00 6.327E+08 + 164.51 -58.16 2003.4 0.27639 8.09 18.33333 0.000E+00 0.000E+00 6.327E+08 + 164.01 -63.83 2005.3 0.27918 13.24 18.36665 0.000E+00 0.000E+00 6.327E+08 + 163.51 -69.49 2006.9 -1.00000 -1.00 18.39999 0.000E+00 0.000E+00 6.327E+08 + 163.01 -75.15 2008.2 -1.00000 -1.00 18.43332 0.000E+00 0.000E+00 6.327E+08 + 162.50 -80.81 2009.2 -1.00000 -1.00 18.46666 0.000E+00 0.000E+00 6.327E+08 + 161.98 -86.47 2009.9 -1.00000 -1.00 18.49998 0.000E+00 0.000E+00 6.327E+08 + -18.45 -87.87 2010.2 -1.00000 -1.00 18.53333 0.000E+00 0.000E+00 6.327E+08 + -18.98 -82.21 2010.2 -1.00000 -1.00 18.56667 0.000E+00 0.000E+00 6.327E+08 + -19.49 -76.55 2009.8 0.21469 6.89 18.59999 0.000E+00 0.000E+00 6.327E+08 + -19.99 -70.89 2009.1 0.19925 5.08 18.63333 0.000E+00 0.000E+00 6.327E+08 + -20.49 -65.23 2008.0 0.18440 3.98 18.66666 0.000E+00 0.000E+00 6.327E+08 + -21.00 -59.57 2006.8 0.17071 3.25 18.70000 7.190E+01 8.628E+03 6.327E+08 + -21.50 -53.90 2005.3 0.15854 2.74 18.73332 1.661E+03 1.993E+05 6.329E+08 + -22.00 -48.24 2003.7 0.14808 2.38 18.76666 1.092E+04 1.310E+06 6.343E+08 + -22.50 -42.57 2002.0 0.13934 2.11 18.79999 2.567E+04 3.081E+06 6.373E+08 + -23.00 -36.91 2000.4 0.13222 1.90 18.83333 4.140E+04 4.968E+06 6.423E+08 + -23.50 -31.24 1998.8 0.12652 1.74 18.86665 6.056E+04 7.267E+06 6.496E+08 + -24.01 -25.56 1997.4 0.12209 1.62 18.89999 8.252E+04 9.902E+06 6.595E+08 + -24.51 -19.89 1996.2 0.11890 1.52 18.93332 9.496E+04 1.139E+07 6.709E+08 + -25.01 -14.22 1995.2 0.11709 1.45 18.96666 9.821E+04 1.179E+07 6.827E+08 + -25.51 -8.54 1994.5 0.11706 1.40 18.99998 9.856E+04 1.183E+07 6.945E+08 + -26.01 -2.87 1994.2 0.11929 1.38 19.03333 8.655E+04 1.039E+07 7.049E+08 + -26.51 2.81 1994.2 0.12423 1.38 19.06667 6.847E+04 8.216E+06 7.131E+08 + -27.02 8.48 1994.5 0.13203 1.40 19.09999 4.956E+04 5.947E+06 7.190E+08 + -27.52 14.16 1995.2 0.14246 1.46 19.13333 3.398E+04 4.077E+06 7.231E+08 + -28.02 19.83 1996.1 0.15495 1.57 19.16666 2.350E+04 2.820E+06 7.259E+08 + -28.52 25.50 1997.3 0.16871 1.72 19.20000 1.396E+04 1.676E+06 7.276E+08 + -29.02 31.18 1998.8 0.18295 1.96 19.23332 8.930E+03 1.072E+06 7.287E+08 + -29.52 36.85 2000.3 0.19692 2.29 19.26666 4.684E+03 5.621E+05 7.292E+08 + -30.02 42.51 2002.0 0.21005 2.79 19.29999 5.040E+02 6.047E+04 7.293E+08 + -30.53 48.18 2003.6 0.22189 3.54 19.33333 0.000E+00 0.000E+00 7.293E+08 + -31.03 53.85 2005.2 0.23223 4.75 19.36665 0.000E+00 0.000E+00 7.293E+08 + -31.53 59.51 2006.7 0.24096 6.83 19.39999 0.000E+00 0.000E+00 7.293E+08 + -32.03 65.17 2007.9 0.24816 10.80 19.43332 0.000E+00 0.000E+00 7.293E+08 + -32.53 70.83 2009.0 0.25396 19.58 19.46666 0.000E+00 0.000E+00 7.293E+08 + -33.04 76.49 2009.7 -1.00000 -1.00 19.49998 0.000E+00 0.000E+00 7.293E+08 + -33.54 82.15 2010.1 -1.00000 -1.00 19.53333 0.000E+00 0.000E+00 7.293E+08 + -34.06 87.81 2010.1 -1.00000 -1.00 19.56667 0.000E+00 0.000E+00 7.293E+08 + 145.48 86.53 2009.8 -1.00000 -1.00 19.59999 0.000E+00 0.000E+00 7.293E+08 + 144.97 80.87 2009.1 0.26488 15.84 19.63333 0.000E+00 0.000E+00 7.293E+08 + 144.47 75.21 2008.1 0.26270 9.13 19.66666 0.000E+00 0.000E+00 7.293E+08 + 143.96 69.55 2006.8 0.25853 5.95 19.70000 0.000E+00 0.000E+00 7.293E+08 + 143.46 63.88 2005.2 0.25222 4.23 19.73332 0.000E+00 0.000E+00 7.293E+08 + 142.96 58.22 2003.4 0.24379 3.20 19.76666 2.110E+01 2.531E+03 7.293E+08 + 142.46 52.55 2001.4 0.23343 2.55 19.79999 4.239E+02 5.087E+04 7.293E+08 + 141.96 46.88 1999.4 0.22151 2.12 19.83333 1.681E+03 2.017E+05 7.296E+08 + 141.45 41.21 1997.3 0.20861 1.82 19.86665 2.100E+03 2.520E+05 7.298E+08 + 140.95 35.53 1995.3 0.19542 1.61 19.89999 4.804E+03 5.764E+05 7.304E+08 + 140.45 29.86 1993.5 0.18284 1.46 19.93332 6.818E+03 8.181E+05 7.312E+08 + 139.95 24.18 1991.9 0.17188 1.36 19.96666 8.418E+03 1.010E+06 7.322E+08 + 139.45 18.50 1990.5 0.16369 1.29 19.99998 1.095E+04 1.315E+06 7.335E+08 + 138.95 12.82 1989.5 0.15936 1.26 20.03333 9.354E+03 1.123E+06 7.346E+08 + 138.45 7.13 1988.8 0.15970 1.25 20.06667 8.935E+03 1.072E+06 7.357E+08 + 137.94 1.45 1988.5 0.16489 1.27 20.09999 7.994E+03 9.593E+05 7.367E+08 + 137.44 -4.23 1988.6 0.17441 1.33 20.13333 7.430E+03 8.916E+05 7.376E+08 + 136.94 -9.92 1989.1 0.18724 1.42 20.16666 5.288E+03 6.346E+05 7.382E+08 + 136.44 -15.60 1990.0 0.20208 1.55 20.20000 3.168E+03 3.801E+05 7.386E+08 + 135.94 -21.28 1991.2 0.21772 1.75 20.23332 1.034E+03 1.241E+05 7.387E+08 + 135.44 -26.96 1992.7 0.23305 2.05 20.26666 6.584E+02 7.901E+04 7.388E+08 + 134.93 -32.64 1994.4 0.24723 2.48 20.29999 1.924E+02 2.309E+04 7.388E+08 + 134.43 -38.31 1996.3 0.25958 3.15 20.33333 1.745E+01 2.094E+03 7.388E+08 + 133.93 -43.98 1998.4 0.26961 4.23 20.36665 0.000E+00 0.000E+00 7.388E+08 + 133.43 -49.66 2000.4 0.27699 6.13 20.39999 0.000E+00 0.000E+00 7.388E+08 + 132.93 -55.32 2002.4 0.28151 9.87 20.43332 0.000E+00 0.000E+00 7.388E+08 + 132.43 -60.99 2004.3 0.28309 18.81 20.46666 0.000E+00 0.000E+00 7.388E+08 + 131.93 -66.66 2006.1 -1.00000 -1.00 20.49998 0.000E+00 0.000E+00 7.388E+08 + 131.42 -72.32 2007.5 -1.00000 -1.00 20.53333 0.000E+00 0.000E+00 7.388E+08 + 130.92 -77.98 2008.7 -1.00000 -1.00 20.56667 0.000E+00 0.000E+00 7.388E+08 + 130.42 -83.64 2009.6 -1.00000 -1.00 20.59999 0.000E+00 0.000E+00 7.388E+08 + 129.86 -89.30 2010.1 -1.00000 -1.00 20.63333 0.000E+00 0.000E+00 7.388E+08 + -50.57 -85.04 2010.3 -1.00000 -1.00 20.66666 0.000E+00 0.000E+00 7.388E+08 + -51.08 -79.38 2010.0 0.22468 7.26 20.70000 0.000E+00 0.000E+00 7.388E+08 + -51.58 -73.72 2009.5 0.21023 5.09 20.73332 0.000E+00 0.000E+00 7.388E+08 + -52.08 -68.06 2008.6 0.19550 3.84 20.76666 0.000E+00 0.000E+00 7.388E+08 + -52.58 -62.40 2007.5 0.18095 3.05 20.79999 2.194E+02 2.633E+04 7.388E+08 + -53.09 -56.74 2006.1 0.16705 2.53 20.83333 3.933E+03 4.719E+05 7.393E+08 + -53.59 -51.07 2004.6 0.15420 2.17 20.86665 1.668E+04 2.002E+06 7.413E+08 + -54.09 -45.41 2002.9 0.14272 1.91 20.89999 2.901E+04 3.482E+06 7.448E+08 + -54.59 -39.74 2001.3 0.13288 1.73 20.93332 4.994E+04 5.992E+06 7.508E+08 + -55.09 -34.07 1999.7 0.12492 1.59 20.96666 7.587E+04 9.105E+06 7.599E+08 + -55.59 -28.40 1998.2 0.11906 1.50 20.99998 9.564E+04 1.148E+07 7.714E+08 + -56.09 -22.73 1996.9 0.11561 1.44 21.03333 1.041E+05 1.249E+07 7.839E+08 + -56.60 -17.06 1995.8 0.11493 1.40 21.06667 1.099E+05 1.319E+07 7.970E+08 + -57.10 -11.38 1994.9 0.11733 1.39 21.09999 9.642E+04 1.157E+07 8.086E+08 + -57.60 -5.71 1994.4 0.12295 1.40 21.13333 7.364E+04 8.837E+06 8.175E+08 + -58.10 -0.03 1994.3 0.13161 1.44 21.16666 5.152E+04 6.183E+06 8.236E+08 + -58.60 5.64 1994.4 0.14287 1.51 21.20000 3.600E+04 4.321E+06 8.280E+08 + -59.10 11.32 1994.9 0.15607 1.61 21.23332 2.310E+04 2.772E+06 8.307E+08 + -59.60 16.99 1995.7 0.17049 1.76 21.26666 1.254E+04 1.505E+06 8.322E+08 + -60.11 22.66 1996.8 0.18538 1.96 21.29999 8.471E+03 1.017E+06 8.333E+08 + -60.61 28.34 1998.1 0.20007 2.25 21.33333 4.732E+03 5.679E+05 8.338E+08 + -61.11 34.01 1999.6 0.21393 2.67 21.36665 5.541E+02 6.650E+04 8.339E+08 + -61.61 39.68 2001.2 0.22643 3.28 21.39999 2.335E+01 2.802E+03 8.339E+08 + -62.11 45.34 2002.9 0.23717 4.22 21.43332 0.000E+00 0.000E+00 8.339E+08 + -62.61 51.01 2004.5 0.24591 5.76 21.46666 0.000E+00 0.000E+00 8.339E+08 + -63.11 56.67 2006.0 0.25259 8.52 21.49998 0.000E+00 0.000E+00 8.339E+08 + -63.62 62.33 2007.4 0.25736 14.14 21.53333 0.000E+00 0.000E+00 8.339E+08 + -64.12 68.00 2008.6 -1.00000 -1.00 21.56667 0.000E+00 0.000E+00 8.339E+08 + -64.62 73.66 2009.4 -1.00000 -1.00 21.59999 0.000E+00 0.000E+00 8.339E+08 + -65.12 79.32 2010.0 -1.00000 -1.00 21.63333 0.000E+00 0.000E+00 8.339E+08 + -65.63 84.97 2010.2 -1.00000 -1.00 21.66666 0.000E+00 0.000E+00 8.339E+08 + 113.93 89.37 2010.1 -1.00000 -1.00 21.70000 0.000E+00 0.000E+00 8.339E+08 + 113.38 83.71 2009.6 -1.00000 -1.00 21.73332 0.000E+00 0.000E+00 8.339E+08 + 112.88 78.05 2008.7 0.26474 11.14 21.76666 0.000E+00 0.000E+00 8.339E+08 + 112.38 72.38 2007.5 0.26345 7.06 21.79999 0.000E+00 0.000E+00 8.339E+08 + 111.87 66.72 2006.0 0.26071 4.91 21.83333 0.000E+00 0.000E+00 8.339E+08 + 111.37 61.06 2004.3 0.25608 3.65 21.86665 0.000E+00 0.000E+00 8.339E+08 + 110.87 55.39 2002.4 0.24925 2.85 21.89999 8.040E+01 9.648E+03 8.339E+08 + 110.37 49.72 2000.4 0.24014 2.32 21.93332 7.179E+02 8.614E+04 8.340E+08 + 109.87 44.05 1998.4 0.22894 1.95 21.96666 8.307E+02 9.969E+04 8.341E+08 + 109.37 38.38 1996.3 0.21614 1.69 21.99998 1.037E+03 1.245E+05 8.342E+08 + 108.86 32.70 1994.4 0.20257 1.51 22.03333 3.210E+03 3.852E+05 8.346E+08 + 108.36 27.02 1992.7 0.18937 1.39 22.06667 3.920E+03 4.705E+05 8.351E+08 + 107.86 21.34 1991.2 0.17795 1.30 22.09999 6.622E+03 7.947E+05 8.359E+08 + 107.36 15.66 1990.0 0.16981 1.25 22.13333 4.957E+03 5.948E+05 8.365E+08 + 106.86 9.98 1989.1 0.16622 1.23 22.16666 5.941E+03 7.130E+05 8.372E+08 + 106.36 4.30 1988.6 0.16776 1.24 22.20000 5.456E+03 6.547E+05 8.378E+08 + 105.86 -1.39 1988.5 0.17412 1.29 22.23332 5.902E+03 7.083E+05 8.385E+08 + 105.35 -7.07 1988.8 0.18423 1.36 22.26666 4.397E+03 5.277E+05 8.391E+08 + 104.85 -12.75 1989.5 0.19666 1.48 22.29999 3.967E+03 4.760E+05 8.395E+08 + 104.35 -18.43 1990.5 0.21006 1.66 22.33333 1.740E+03 2.088E+05 8.397E+08 + 103.85 -24.11 1991.9 0.22331 1.92 22.36665 1.091E+03 1.309E+05 8.399E+08 + 103.35 -29.79 1993.5 0.23555 2.30 22.39999 1.013E+03 1.216E+05 8.400E+08 + 102.85 -35.47 1995.4 0.24621 2.86 22.43332 8.835E+01 1.060E+04 8.400E+08 + 102.35 -41.14 1997.4 0.25492 3.74 22.46666 0.000E+00 0.000E+00 8.400E+08 + 101.85 -46.81 1999.4 0.26148 5.18 22.49998 0.000E+00 0.000E+00 8.400E+08 + 101.34 -52.48 2001.5 0.26586 7.74 22.53333 0.000E+00 0.000E+00 8.400E+08 + 100.84 -58.15 2003.4 0.26815 12.90 22.56667 0.000E+00 0.000E+00 8.400E+08 + 100.34 -63.82 2005.3 -1.00000 -1.00 22.59999 0.000E+00 0.000E+00 8.400E+08 + 99.84 -69.48 2006.9 -1.00000 -1.00 22.63333 0.000E+00 0.000E+00 8.400E+08 + 99.34 -75.14 2008.2 -1.00000 -1.00 22.66666 0.000E+00 0.000E+00 8.400E+08 + 98.84 -80.80 2009.3 -1.00000 -1.00 22.70000 0.000E+00 0.000E+00 8.400E+08 + 98.34 -86.46 2009.9 -1.00000 -1.00 22.73332 0.000E+00 0.000E+00 8.400E+08 + -82.17 -87.88 2010.3 -1.00000 -1.00 22.76666 0.000E+00 0.000E+00 8.400E+08 + -82.67 -82.22 2010.3 -1.00000 -1.00 22.79999 0.000E+00 0.000E+00 8.400E+08 + -83.17 -76.56 2009.9 0.22803 6.16 22.83333 0.000E+00 0.000E+00 8.400E+08 + -83.67 -70.90 2009.1 0.21697 4.45 22.86665 0.000E+00 0.000E+00 8.400E+08 + -84.17 -65.24 2008.1 0.20507 3.42 22.89999 1.952E+01 2.343E+03 8.400E+08 + -84.67 -59.58 2006.9 0.19271 2.76 22.93332 7.613E+02 9.136E+04 8.401E+08 + -85.17 -53.91 2005.4 0.18030 2.31 22.96666 6.676E+03 8.012E+05 8.409E+08 + -85.68 -48.25 2003.8 0.16828 2.00 22.99998 1.580E+04 1.896E+06 8.428E+08 + -86.18 -42.58 2002.2 0.15704 1.78 23.03333 2.085E+04 2.502E+06 8.453E+08 + -86.68 -36.92 2000.5 0.14696 1.62 23.06667 3.204E+04 3.844E+06 8.491E+08 + -87.18 -31.25 1999.0 0.13844 1.51 23.09999 4.250E+04 5.100E+06 8.542E+08 + -87.68 -25.57 1997.5 0.13194 1.43 23.13333 4.992E+04 5.991E+06 8.602E+08 + -88.18 -19.90 1996.3 0.12800 1.38 23.16666 5.732E+04 6.878E+06 8.671E+08 + -88.68 -14.23 1995.4 0.12716 1.35 23.20000 5.855E+04 7.026E+06 8.741E+08 + -89.18 -8.55 1994.7 0.12983 1.35 23.23332 5.195E+04 6.234E+06 8.804E+08 + -89.69 -2.88 1994.3 0.13610 1.37 23.26666 3.948E+04 4.738E+06 8.851E+08 + -90.19 2.80 1994.3 0.14567 1.42 23.29999 2.863E+04 3.436E+06 8.885E+08 + -90.69 8.47 1994.7 0.15790 1.50 23.33333 2.068E+04 2.482E+06 8.910E+08 + -91.19 14.15 1995.3 0.17196 1.62 23.36665 1.272E+04 1.526E+06 8.926E+08 + -91.69 19.82 1996.3 0.18700 1.80 23.39999 6.474E+03 7.769E+05 8.933E+08 + -92.19 25.49 1997.5 0.20217 2.05 23.43332 4.860E+03 5.833E+05 8.939E+08 + -92.69 31.16 1998.9 0.21671 2.41 23.46666 2.435E+03 2.922E+05 8.942E+08 + -93.19 36.83 2000.4 0.22995 2.92 23.49998 1.340E+02 1.608E+04 8.942E+08 + -93.70 42.50 2002.1 0.24136 3.71 23.53333 0.000E+00 0.000E+00 8.942E+08 + -94.20 48.17 2003.7 0.25058 4.94 23.56667 0.000E+00 0.000E+00 8.942E+08 + -94.70 53.83 2005.3 0.25745 7.02 23.59999 0.000E+00 0.000E+00 8.942E+08 + -95.20 59.50 2006.8 0.26205 10.93 23.63333 0.000E+00 0.000E+00 8.942E+08 + -95.70 65.16 2008.0 0.26466 19.48 23.66666 0.000E+00 0.000E+00 8.942E+08 + -96.20 70.82 2009.0 -1.00000 -1.00 23.70000 0.000E+00 0.000E+00 8.942E+08 + -96.70 76.48 2009.8 -1.00000 -1.00 23.73332 0.000E+00 0.000E+00 8.942E+08 + -97.20 82.14 2010.1 -1.00000 -1.00 23.76666 0.000E+00 0.000E+00 8.942E+08 + -97.70 87.80 2010.2 -1.00000 -1.00 23.79999 0.000E+00 0.000E+00 8.942E+08 + 81.78 86.54 2009.9 -1.00000 -1.00 23.83333 0.000E+00 0.000E+00 8.942E+08 + 81.29 80.88 2009.2 0.26379 15.41 23.86665 0.000E+00 0.000E+00 8.942E+08 + 80.79 75.22 2008.1 0.26251 9.18 23.89999 0.000E+00 0.000E+00 8.942E+08 + 80.29 69.56 2006.8 0.26016 6.12 23.93332 0.000E+00 0.000E+00 8.942E+08 + 79.78 63.90 2005.2 0.25625 4.40 23.96666 0.000E+00 0.000E+00 8.942E+08 + 79.28 58.23 2003.4 0.25041 3.34 23.99998 1.200E+01 1.440E+03 8.942E+08 +0***** PERCENT OF TOTAL LIFETIME SPENT INSIDE AND OUTSIDETRAPPED PARTICLE RADIATION BELT **** + + INNER ZONE (1.0 <= L <2.8) : 51.53 % + OUTSIDE TRAPPING REGION (1.0 <= L < 1.1): 0.00 % + INSIDE TRAPPING REGION (1.1 <= L < 2.8) : 51.53 % + OUTER ZONE (2.8 <= L <= 11.0) : 26.94 % + EXTERNAL (L > 11.0) : 21.53 % + + TOTAL ORBIT TIME IS : 24.00 HOURS +1*********************************************************************************************************************************** + * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAM FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CONSIDERED SEPARATELY) * + * MAGNETIC PARAMETERS B AND L COMPUTED WITH GEOMAGN. FIELD MODEL 1: HENDRICKS&CAIN 99-TERM GSFC 9/65 * COEFF. UPDATED TO: 1975.0 * + * PROJECT :TEST RUNAAAA * INCLIN= 89DEG * PERIG= 2000KM * APOG= 2000KM * B/L TAPE=TD 0 * PERIOD= 1.500HRS * SOLAR MAXIMUM * + * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASSINOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(301)-344-8067 * + *********************************************************************************************************************************** + + ++ **************** PROTONS **************** + ************************************************* + + + +0 **** SOLAR PROTONS **** + + FOR TAU=12,Q=90: NALE=1 + *************** COMPOSITE ORBIT SPECTRUM *************** WITH GEOMAG SHIELDING ** EXPOSURE INDEX: ENERGY>5.000 MEV ** + (EXPOSR FACTOR=0.34) + + ENERGY AVERAGED DIFFERENCE AVERAGED DIFF- ENERGY TOTAL INTENSITY EXPOSURE TOTAL # OF + LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX LEVELS FLUENCE RANGES DURATION ACCUMULATED + >(MEV) #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV >(MEV) #/CM**2 #/CM**2/SEC (HOURS) PARTICLES + + 2.000 1.504E+04 2.134E+03 2.243E+00 10. 5.741E+09 ZERO FLUX 10.100 0.000E+00 + 3.000 1.291E+04 1.468E+03 1.728E+00 20. 3.937E+09 1.E0-1.E1 0.100 2.749E+03 + 4.000 1.144E+04 1.089E+03 1.297E+00 30. 2.699E+09 1.E1-1.E2 1.033 1.700E+05 + 5.000 1.035E+04 8.553E+02 1.002E+00 40. 1.851E+09 1.E2-1.E3 1.333 2.225E+06 + 6.000 9.494E+03 1.536E+03 8.396E-01 50. 1.269E+09 1.E3-1.E4 5.000 8.745E+07 + 8.000 7.959E+03 1.190E+03 6.462E-01 60. 8.701E+08 1.E4-1.E5 6.267 7.407E+08 + 10.00 6.768E+03 1.519E+03 4.690E-01 70. 5.966E+08 1.E5-1.E6 0.167 6.369E+07 + 15.00 5.249E+03 1.113E+03 2.529E-01 80. 4.091E+08 1.E6-1.E7 0.000 0.000E+00 + 20.00 4.136E+03 4.300E+02 1.471E-01 90. 2.805E+08 1.E7-OVER 0.000 0.000E+00 + 25.00 3.706E+03 3.791E+02 9.040E-02 100. 1.923E+08 TOTAL 24.000 8.942E+08 + 30.00 3.327E+03 2.165E+02 5.934E-02 110. 1.319E+08 + 35.00 3.110E+03 2.013E+02 4.529E-02 120. 9.042E+07 + 40.00 2.909E+03 1.873E+02 3.901E-02 130. 6.200E+07 + 45.00 2.722E+03 1.744E+02 3.523E-02 140. 4.251E+07 + 50.00 2.547E+03 1.386E+02 3.117E-02 150. 2.915E+07 + 55.00 2.409E+03 1.307E+02 2.763E-02 160. 1.999E+07 + 60.00 2.278E+03 2.397E+02 2.536E-02 170. 1.370E+07 + 70.00 2.038E+03 2.136E+02 2.260E-02 180. 9.396E+06 + 80.00 1.825E+03 1.905E+02 2.017E-02 190. 6.443E+06 + 90.00 1.634E+03 1.700E+02 1.797E-02 200. 4.418E+06 + 100.0 1.464E+03 3.468E+02 1.598E-02 + 125.0 1.117E+03 2.633E+02 1.206E-02 + 150.0 8.541E+02 2.003E+02 9.156E-03 + 175.0 6.537E+02 1.527E+02 6.906E-03 + 200.0 5.010E+02 1.934E+02 5.146E-03 + 250.0 3.076E+02 1.183E+02 3.020E-03 + 300.0 1.893E+02 7.256E+01 1.834E-03 + 350.0 1.167E+02 4.461E+01 1.127E-03 + 400.0 7.213E+01 4.448E+01 6.939E-04 + 500.0 2.765E+01 2.765E+01 2.649E-04 + +1*********************************************************************************************************************************** + * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAM FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CONSIDERED SEPARATELY) * + * MAGNETIC PARAMETERS B AND L COMPUTED WITH GEOMAGN. FIELD MODEL 1: HENDRICKS&CAIN 99-TERM GSFC 9/65 * COEFF. UPDATED TO: 1975.0 * + * PROJECT :TEST RUNAAAA * INCLIN= 89DEG * PERIG= 2000KM * APOG= 2000KM * B/L TAPE=TD 0 * PERIOD= 1.500HRS * SOLAR MAXIMUM * + * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASSINOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(301)-344-8067 * + *********************************************************************************************************************************** + + ++ ************************ PROTONS *************************** + ** TABLE OF PEAK AND TOTAL FLUXES PER PERIOD : ENERGY > 5.0 MEV ** + ******************************************************************** + +0 PERIOD PEAK FLUX POSITION AT WHICH ENCOUNTERED ORBIT TIME FIELD(B) LINE(L) TOTAL FLUX + NUMBER ENCOUNTERED LONGITUDE LATITUDE ALTITUDE PER ORBIT + #/CM**2/SEC (DEG) (DEG) (KM) (HOURS) (GAUSS) (E.R.) #/CM**2/ORBIT + + 1 2.339E+04 -100.231 5.70 1994.18 0.03333 0.15100 1.42 2.339E+07 + 2 3.254E+04 -131.316 -2.83 1993.99 2.10000 0.14041 1.31 3.450E+07 + 3 3.599E+04 31.637 -9.95 1989.39 3.23333 0.14089 1.46 5.960E+07 + 4 6.541E+04 -0.451 -12.79 1989.68 5.36667 0.12769 1.50 6.865E+07 + 5 1.056E+05 -32.037 -9.95 1989.23 7.46667 0.11580 1.40 9.169E+07 + 6 1.059E+05 -33.040 -21.31 1991.28 7.53333 0.11669 1.50 3.938E+07 + 7 9.788E+04 -64.626 -18.46 1990.65 9.63333 0.11720 1.39 8.562E+07 + 8 4.973E+04 -96.212 -15.62 1990.13 11.73333 0.13084 1.35 4.897E+07 + 9 1.437E+04 69.247 -0.01 1994.12 12.70000 0.15766 1.29 1.361E+07 + 10 3.321E+04 -127.298 -7.08 1988.98 13.80000 0.13994 1.31 6.362E+07 + 11 2.603E+04 -157.881 7.13 1988.93 15.83333 0.14579 1.31 2.462E+07 + 12 5.778E+04 6.577 -11.38 1994.78 16.86665 0.13019 1.49 7.704E+07 + 13 9.856E+04 -25.511 -8.54 1994.54 18.99998 0.11706 1.40 9.860E+07 + 14 9.564E+04 -55.593 -28.40 1998.18 20.99998 0.11906 1.50 5.456E+07 + 15 1.099E+05 -56.596 -17.06 1995.76 21.06667 0.11493 1.40 5.615E+07 +1*********************************************************************************************************************************** + * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAM FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CONSIDERED SEPARATELY) * + * MAGNETIC PARAMETERS B AND L COMPUTED WITH GEOMAGN. FIELD MODEL 1: HENDRICKS&CAIN 99-TERM GSFC 9/65 * COEFF. UPDATED TO: 1975.0 * + * PROJECT :TEST RUNAAAA * INCLIN= 89DEG * PERIG= 2000KM * APOG= 2000KM * B/L TAPE=TD 0 * PERIOD= 1.500HRS * SOLAR MAXIMUM * + * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASSINOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(301)-344-8067 * + *********************************************************************************************************************************** + + ++ **************** PROTONS **************** + ************************************************* + + + +0 **** SOLAR PROTONS **** + + FOR TAU=12,Q=90: NALE=1 + *************** COMPOSITE ORBIT SPECTRUM *************** WITH GEOMAG SHIELDING ** EXPOSURE INDEX: ENERGY>5.000 MEV ** + (EXPOSR FACTOR=0.34) + + ENERGY AVERAGED DIFFERENCE AVERAGED DIFF- ENERGY TOTAL INTENSITY EXPOSURE TOTAL # OF + LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX LEVELS FLUENCE RANGES DURATION ACCUMULATED + >(MEV) #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV >(MEV) #/CM**2 #/CM**2/SEC (HOURS) PARTICLES + + 2.000 1.504E+04 2.134E+03 2.243E+00 10. 5.741E+09 ZERO FLUX 10.100 0.000E+00 + 3.000 1.291E+04 1.468E+03 1.728E+00 20. 3.937E+09 1.E0-1.E1 0.100 2.749E+03 + 4.000 1.144E+04 1.089E+03 1.297E+00 30. 2.699E+09 1.E1-1.E2 1.033 1.700E+05 + 5.000 1.035E+04 8.553E+02 1.002E+00 40. 1.851E+09 1.E2-1.E3 1.333 2.225E+06 + 6.000 9.494E+03 1.536E+03 8.396E-01 50. 1.269E+09 1.E3-1.E4 5.000 8.745E+07 + 8.000 7.959E+03 1.190E+03 6.462E-01 60. 8.701E+08 1.E4-1.E5 6.267 7.407E+08 + 10.00 6.768E+03 1.519E+03 4.690E-01 70. 5.966E+08 1.E5-1.E6 0.167 6.369E+07 + 15.00 5.249E+03 1.113E+03 2.529E-01 80. 4.091E+08 1.E6-1.E7 0.000 0.000E+00 + 20.00 4.136E+03 4.300E+02 1.471E-01 90. 2.805E+08 1.E7-OVER 0.000 0.000E+00 + 25.00 3.706E+03 3.791E+02 9.040E-02 100. 1.923E+08 TOTAL 24.000 8.942E+08 + 30.00 3.327E+03 2.165E+02 5.934E-02 110. 1.319E+08 + 35.00 3.110E+03 2.013E+02 4.529E-02 120. 9.042E+07 + 40.00 2.909E+03 1.873E+02 3.901E-02 130. 6.200E+07 + 45.00 2.722E+03 1.744E+02 3.523E-02 140. 4.251E+07 + 50.00 2.547E+03 1.386E+02 3.117E-02 150. 2.915E+07 + 55.00 2.409E+03 1.307E+02 2.763E-02 160. 1.999E+07 + 60.00 2.278E+03 2.397E+02 2.536E-02 170. 1.370E+07 + 70.00 2.038E+03 2.136E+02 2.260E-02 180. 9.396E+06 + 80.00 1.825E+03 1.905E+02 2.017E-02 190. 6.443E+06 + 90.00 1.634E+03 1.700E+02 1.797E-02 200. 4.418E+06 + 100.0 1.464E+03 3.468E+02 1.598E-02 + 125.0 1.117E+03 2.633E+02 1.206E-02 + 150.0 8.541E+02 2.003E+02 9.156E-03 + 175.0 6.537E+02 1.527E+02 6.906E-03 + 200.0 5.010E+02 1.934E+02 5.146E-03 + 250.0 3.076E+02 1.183E+02 3.020E-03 + 300.0 1.893E+02 7.256E+01 1.834E-03 + 350.0 1.167E+02 4.461E+01 1.127E-03 + 400.0 7.213E+01 4.448E+01 6.939E-04 + 500.0 2.765E+01 2.765E+01 2.649E-04 + +1*********************************************************************************************************************************** + * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAM FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CONSIDERED SEPARATELY) * + * MAGNETIC PARAMETERS B AND L COMPUTED WITH GEOMAGN. FIELD MODEL 1: HENDRICKS&CAIN 99-TERM GSFC 9/65 * COEFF. UPDATED TO: 1975.0 * + * PROJECT :TEST RUNAAAA * INCLIN= 89DEG * PERIG= 2000KM * APOG= 2000KM * B/L TAPE=TD 0 * PERIOD= 1.500HRS * SOLAR MAXIMUM * + * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASSINOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(301)-344-8067 * + *********************************************************************************************************************************** + + ++ ************************ PROTONS *************************** + ** TABLE OF PEAK AND TOTAL FLUXES PER PERIOD : ENERGY > 5.0 MEV ** + ******************************************************************** + +0 PERIOD PEAK FLUX POSITION AT WHICH ENCOUNTERED ORBIT TIME FIELD(B) LINE(L) TOTAL FLUX + NUMBER ENCOUNTERED LONGITUDE LATITUDE ALTITUDE PER ORBIT + #/CM**2/SEC (DEG) (DEG) (KM) (HOURS) (GAUSS) (E.R.) #/CM**2/ORBIT + + 1 2.339E+04 -100.231 5.70 1994.18 0.03333 0.15100 1.42 2.339E+07 + 2 3.254E+04 -131.316 -2.83 1993.99 2.10000 0.14041 1.31 3.450E+07 + 3 3.599E+04 31.637 -9.95 1989.39 3.23333 0.14089 1.46 5.960E+07 + 4 6.541E+04 -0.451 -12.79 1989.68 5.36667 0.12769 1.50 6.865E+07 + 5 1.056E+05 -32.037 -9.95 1989.23 7.46667 0.11580 1.40 9.169E+07 + 6 1.059E+05 -33.040 -21.31 1991.28 7.53333 0.11669 1.50 3.938E+07 + 7 9.788E+04 -64.626 -18.46 1990.65 9.63333 0.11720 1.39 8.562E+07 + 8 4.973E+04 -96.212 -15.62 1990.13 11.73333 0.13084 1.35 4.897E+07 + 9 1.437E+04 69.247 -0.01 1994.12 12.70000 0.15766 1.29 1.361E+07 + 10 3.321E+04 -127.298 -7.08 1988.98 13.80000 0.13994 1.31 6.362E+07 + 11 2.603E+04 -157.881 7.13 1988.93 15.83333 0.14579 1.31 2.462E+07 + 12 5.778E+04 6.577 -11.38 1994.78 16.86665 0.13019 1.49 7.704E+07 + 13 9.856E+04 -25.511 -8.54 1994.54 18.99998 0.11706 1.40 9.860E+07 + 14 9.564E+04 -55.593 -28.40 1998.18 20.99998 0.11906 1.50 5.456E+07 + 15 1.099E+05 -56.596 -17.06 1995.76 21.06667 0.11493 1.40 5.615E+07 diff --git a/SOFIP/guzik_version/sample_orbit_7.out b/SOFIP/guzik_version/sample_orbit_7.out new file mode 100755 index 0000000..cd7a705 --- /dev/null +++ b/SOFIP/guzik_version/sample_orbit_7.out @@ -0,0 +1,25 @@ +TEST RUNAAAA 89/ 2000- 2000 I(#/CM**2-SEC) D(#/CM**2-SEC-KEV) MOD/TM=1/1975.0 + 2.0000E+00 3.0000E+00 4.0000E+00 5.0000E+00 6.0000E+00 8.0000E+00PRNRGY 1 + 1.0000E+01 1.5000E+01 2.0000E+01 2.5000E+01 3.0000E+01 3.5000E+01PRNRGY 2 + 4.0000E+01 4.5000E+01 5.0000E+01 5.5000E+01 6.0000E+01 7.0000E+01PRNRGY 3 + 8.0000E+01 9.0000E+01 1.0000E+02 1.2500E+02 1.5000E+02 1.7500E+02PRNRGY 4 + 2.0000E+02 2.5000E+02 3.0000E+02 3.5000E+02 4.0000E+02 5.0000E+02PRNRGY 5 + 1.5041E+04 1.2907E+04 1.1439E+04 1.0350E+04 9.4945E+03 7.9585E+03PRINTG 1 + 6.7683E+03 5.2490E+03 4.1359E+03 3.7060E+03 3.3268E+03 3.1103E+03PRINTG 2 + 2.9090E+03 2.7217E+03 2.5472E+03 2.4087E+03 2.2780E+03 2.0383E+03PRINTG 3 + 1.8246E+03 1.6341E+03 1.4641E+03 1.1173E+03 8.5406E+02 6.5374E+02PRINTG 4 + 5.0103E+02 3.0759E+02 1.8930E+02 1.1674E+02 7.2127E+01 2.7648E+01PRINTG 5 + 2.2429E+00 1.7283E+00 1.2968E+00 1.0023E+00 8.3957E-01 6.4617E-01PRDIFF 1 + 4.6896E-01 2.5293E-01 1.4711E-01 9.0405E-02 5.9338E-02 4.5289E-02PRDIFF 2 + 3.9009E-02 3.5226E-02 3.1171E-02 2.7626E-02 2.5356E-02 2.2597E-02PRDIFF 3 + 2.0166E-02 1.7965E-02 1.5979E-02 1.2055E-02 9.1560E-03 6.9061E-03PRDIFF 4 + 5.1458E-03 3.0199E-03 1.8335E-03 1.1274E-03 6.9395E-04 2.6488E-04PRDIFF 5 +SOLAR PROTONS #ENERGIES=20 Q=90 TAU=12.0 NALE=1 EXPFCTR= 0.34 + 1.0000E+01 2.0000E+01 3.0000E+01 4.0000E+01 5.0000E+01 SPNRGY 1 + 6.0000E+01 7.0000E+01 8.0000E+01 9.0000E+01 1.0000E+02 SPNRGY 2 + 1.1000E+02 1.2000E+02 1.3000E+02 1.4000E+02 1.5000E+02 SPNRGY 3 + 1.6000E+02 1.7000E+02 1.8000E+02 1.9000E+02 2.0000E+02 SPNRGY 4 + 5.7412E+09 3.9365E+09 2.6992E+09 1.8507E+09 1.2690E+09 SPFLUX 1 + 8.7012E+08 5.9661E+08 4.0908E+08 2.8049E+08 1.9233E+08 SPFLUX 2 + 1.3187E+08 9.0421E+07 6.1999E+07 4.2511E+07 2.9148E+07 SPFLUX 3 + 1.9986E+07 1.3704E+07 9.3964E+06 6.4428E+06 4.4176E+06 SPFLUX 4 diff --git a/SOFIP/guzik_version/sofip.for b/SOFIP/guzik_version/sofip.for new file mode 100755 index 0000000..25f33c0 --- /dev/null +++ b/SOFIP/guzik_version/sofip.for @@ -0,0 +1,802 @@ +C ********************************************************************** +C ************ SHORT ORBITAL FLUX INTEGRATION PROGRAM *********** +C ******* FOR USE WITH NSSDC'S STANDARD ENVIRONMENT MODELS ******* +C ********************************************************************** +C ** DESIGNED AND TESTED BY STASSINOPOULOS, HEBERT, BUTLER, & BARTH ** +C ** CODE 601, NASA/GODDARD SPACE FLIGHT CENTER; GREENBELT, MD. 20771 ** +C ** SINGLE PRECISION DECK FOR FORTRAN IV (EBCDIC,029 PUNCH) ** +C ** TRAJECTORY INPUT FROM UNFORMATTED BINARY OR BCD FORMATTED TAPE ** +C ********************************************************************** +C *** +C *** INPUT PARAMETERS: +C *** * NAME : 12-CHARACTER MISSION (OR PROJECT) NAME +C *** * INCL : APPROXIMATE INCLINATION OF ORBIT PLANE IN DEGREES (I*4) +C *** * IPRG : APPROXIMATE PERIGEE ALTITUDE IN KILOMETERS (I*4) +C *** * IAPG : APPROXIMATE APOGEE ALTITUDE IN KILOMETERS (I*4) +C *** * MODEL : NUMBER OF FIELD-MODEL USED IN B/L CALCULATION (R*4) +C *** * PERIOD: MATHEMATICAL PERIOD OF ORBIT IN HOURS (R*4) +C *** * BLTIME: EPOCH OF FIELD-MODEL USED IN B/L CALCULATION (R*4) +C *** * NRGYLV: THRESHOLD-ENERGY SELECTOR FOR RUNNING PRINTOUT (I*4) +C *** * ITAPE : B/L ORBIT TAPE IDENTIFIER, < 10000 (I*4) +C *** * NTABLS: # OF OUTPUT-TABLE SETS PER TRAJECTORY (I*4) +C *** * CUTOFF: ORBIT DURATION IN DECIMAL HOURS (R*4) +C *** * ISKIP : POSITION SKIPPING CONTROL (I*4) +C *** * KPRINT: RUNNING PRINTOUT CONTROL (I*4) +C *** +C *** INPUT VARIABLES: +C *** * PSNTIM: POSITIONAL TIME (DECIMAL HOURS) +C *** * PSNLON: " LONGITUDE (DEGREES) +C *** * PSNLAT: " LATITUDE (DEGREES) +C *** * PSNALT: " ALTITUDE (KILOMETERS) +C *** * PSNB : " FIELD MAGNITUDE (GAUSS) +C *** * PSNL : " SHELL PARAMETER (EARTH RADII) +C ********************************************************************** +C *** TO READ BCD FORMATTED ORBIT TAPES, UNCOMMENT LINES 132,137,& 143. +C *** COMMENT OUT LINES 133-134,138-139,& 144. +C *** TO READ UNFORMATTED BINARY ORBIT TAPES, UNCOMMENT LINES 133-134, +C *** 138-139,& 144. COMMENT OUT LINES 132,137,& 143. +C *** ******************** BLOCK 0: INITIALIZATION ******************* + COMMON /AP8MAC/DESCR(8),LIST(1) +C COMMON /AE6MAX/DESCR(8),LIST(1) +C COMMON /AEI7HI/DESCR7(8),LIST7(1) +C COMMON /AEI7LO/DESCR7(8),LIST7(1) +C COMMON /AE5MIN/DESCR(8),LIST(1) +C COMMON /AP8MIC/DESCR(8),LIST(1) + REAL MODLAB*8(4,7)/'HENDRICK','S&CAIN 9','9-TERM G','SFC 9/65',' C + $AIN ET','.AL. 120','-TERM GS','FC 12/66',' CAIN&LA','NGEL 143','-T + $ERM PO','GO 10/68',' CAIN&SW','EENEY 12','0-TERM P','OGO 8/69',' + $ IGRF',' 1965.0 ','80-TERM ','10/68 ',' LEATON ','MALIN EV','AN + $S 80-T','ERM 1965',' HURWI','TZ US C&','GS 168-T','ERM 1970'/, + $MODLBL*8(4),AP8/' AP8'/,MAX/'MAX '/,MIN/'MIN '/,LOW/'S LO'/, +C $MAC/'MAC'/,BINDMY*8(5),ADUMMY(6),MOD7/'LO-7'/ + $MAC/'MAC'/,DESCR7(8),BINDMY*8(5),ADUMMY(6),MOD7/'LO-7'/ + REAL ENERGY(31,2)/2.,3.,4.,5.,6.,8.,10.,15.,20.,25.,30.,35.,40., + $45.,50.,55.,60.,70.,80.,90.,100.,125.,150.,175.,200.,250.,300., + $350.,400.,500.,0.,.1,.2,.3,.4,.5,.6,.7,.8,.9,1.,1.25,1.5,1.75,2., + $2.25,2.5,2.75,3.,3.25,3.5,3.75,4.,4.25,4.5,4.75,5.,5.5,6.,6.5,7., + $0.0/,SPNRG(20)/10.,20.,30.,40.,50.,60.,70.,80.,90.,100.,110.,120., + $130.,140.,150.,160.,170.,180.,190.,200./ + INTEGER NRGRNG(10,2)/1,3,5,7,12,20,22,26,30,31,1,5,8,10,12,13,14, + $22,30,31/,IZONE(120)/10*1,17*2,93*3/,NRBITO/1/ + DIMENSION FLUXES(30),ALGFLX(30),ALNFLX(30),DIFSPC(30),EXPFLX(10), + $PKVALU(50,8),AIFLXS(30),ENRNGS(11),EXPTIM(10),IYMD(3),LCOUNT(4), + $DIFFLX(30),NAME(3),PKFLX(50),PKTIM(50),PTIME(4), + $PKLON(50),PKLAT(50),PKALT(50),PKB(50),PKL(50),TAUFLX(50),F(20) + EQUIVALENCE(PKVALU(1,1),PKFLX(1)),(PKVALU(1,2),PKLON(1)),(PKVALU(1 + $,3),PKLAT(1)),(PKVALU(1,4),PKALT(1)),(PKVALU(1,5),PKTIM(1)),(PKVAL + $U(1,6),PKB(1)),(PKVALU(1,7),PKL(1)),(PKVALU(1,8),TAUFLX(1)) + REAL TYPLBL(3,2)/' PR','OTON','S ','ELEC','TRON','S HI'/, + $FIRNGS(11)/'0.E0','1.E0','1.E1','1.E2','1.E3','1.E4','1.E5', + $'1.E6','1.E7','OVER',' '/,XLABEL*8(3,2)/'PRNRGY','PRINTG','PRDIFF' + $,'ELNRGY','ELINTG','ELDIFF'/,PROTLB*8(2)/'SPNRGY','SPFLUX'/ + 1 FORMAT('1NAME = ',3A4/' INCL = ',I3/' IPRG = ', I6/' IAPG = ', + $I6/' ITAPE = ',I4/' MODEL = ',I2/' PERIOD= ',F9.6/ + $' BLTIME= ',F7.2/' NRGLEV= ',I2/' NTABLS= ',I2/' CUTOFF= ',F6.2/ + $' ISKIP= ',I2/' KPRINT= ',I2//) + 2 FORMAT('1',131('*')/' * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAM + $ FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CON + $SIDERED SEPARATELY) *'/' * MAGNETIC PARAMETERS B AND L COMPUTED WI + $TH GEOMAGN. FIELD MODEL',I3,': ',4A8,' * COEFF. UPDATED TO:',F7.1, + $' *'/' * PROJECT :',3A4,' * INCLIN=',I3,'DEG * PERIG=',I5,'KM * AP + $OG=',I6,'KM * B/L TAPE=TD',I4,' * PERIOD=',F7.3,'HRS * SOLAR ',A3, + $'IMUM *'/' * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASS + $INOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(3 + $01)-344-8067 *'/1X,131('*')//) + 3 FORMAT(2('1'/12('0'/)/53X,28('*')/53X,'**',6X,3A4,6X,'**'/53X,'**' + $,I3,'DEG/',I5,'KM/',I6,'KM **'/53X,28('*')/)) + 4 FORMAT (3A4,7X,I3,7X,I6,4X,I6,4X,I2,8X,F9.6,1X,F7.2/I2,7X,I4, + $6X,I2,8X,F6.2,4X,I2,8X,I2) + 5 FORMAT(6E18.8) +C *** ******************** BLOCK 1: INITIALIZATION ******************* + 10 READ(5,4,END=999) NAME,INCL,IPRG,IAPG,MODEL,PERIOD,BLTIME,NRGYLV, + $ITAPE,NTABLS,CUTOFF,ISKIP,KPRINT + ITYPE=1 + WRITE(6,3) (NAME,INCL,IPRG,IAPG,I=1,2) + NORBIT=1 + IPASS=1 + IPRINT=KPRINT + ASSIGN 110 TO NGO2 + L=0 + LSUM=0 + EXPFCT=0.0 + XAMNIM=MAX + ISWTCH=1 + IF(DESCR(1).EQ.AP8) GO TO 15 + ITYPE = 2 + ASSIGN 120 TO NGO2 + IF(DESCR(2).NE.MAX) XAMNIM=MIN + IF(DESCR7(2).EQ.MOD7) TYPLBL(3,2)=LOW + GO TO 17 + 15 IF(DESCR(2).NE.MAC) XAMNIM=MIN + 17 DO 20 I=1,4 + LCOUNT(I)=0 + 20 MODLBL(I) = MODLAB(I,MODEL) + TAU = PERIOD + FLXSUM = 0.0 + OFLXSM = 0.0 + PEAK = -1.0 + DO 30 NRNG=1,10 + ENRNGS(NRNG) = ENERGY(NRGRNG(NRNG,ITYPE),ITYPE) + EXPTIM(NRNG) = 0.0 + 30 EXPFLX(NRNG) = 0.0 + DO 35 NRGSP=1,20 + 35 F(NRGSP)=0.0 + DO 40 NRG=1,30 + AIFLXS(NRG)=0.0 + ALNFLX(NRG) = 0.0 + DIFSPC(NRG) = 0.0 + 40 FLUXES(NRG) = 0.0 +C *** WRITE OUT INPUT PARAMETERS + WRITE(6,1)NAME,INCL,IPRG,IAPG,ITAPE,MODEL,PERIOD,BLTIME,NRGYLV, + $NTABLS,CUTOFF,ISKIP,KPRINT +C *** ************************ BLOCK 2: INPUT ************************ + READ(9,5,END=400,ERR=10)PSNTM1,PSNLN1,PSNLT1,PSNAL1,PSNB1,PSNL1 +C READ(9,END=400,ERR=10)PSNTM1,PSNLN1,DUMMY,PSNLT1,DUMMY,PSNAL1, +C $DUMMY,PSNB1,DUMMY,PSNL1,DUMMY + TMLAST = PSNTM1 + 50 DO 60 ISKP=1,ISKIP + READ(9,5,END=400,ERR=10) PSNTIM,PSNLON,PSNLAT,PSNALT,PSNB,PSNL +C READ(9,END=400,ERR=10)PSNTIM,PSNLON,DUMMY,PSNLAT,DUMMY,PSNALT, +C $DUMMY,PSNB,DUMMY,PSNL,DUMMY + 60 CONTINUE + IF(PSNTIM.LE.CUTOFF) GO TO 65 +C *** DUMMY READ LOOP TO READ TO END OF FILE + 66 READ(9,5,END=400,ERR=10) ADUMMY +C 66 READ(9,END=400,ERR=10) BINTIM,BINDMY + GO TO 66 + 65 CONTINUE +C *** ********************* BLOCK 3: CALCULATIONS ******************** +C *** CALCULATE KPSTEP (NUMBER OF MINUTES BETWEEN POINTS ON B/L TAPE) + GO TO (70,80), IPASS + 70 KPSTEP = INT((PSNTIM-TMLAST)/.0166667+0.1) + 80 TMLAST = PSNTIM +C *** TEST L-VALUE & BYPASS FLUX CALCULATIONS IF WARRANTED + IF(PSNL.GT.0.0.AND.PSNL.LT.12.0) GO TO NGO2,(110,120) + DO 100 NRG=1,30 + 100 FLUXES(NRG) = 0.0 + GO TO 170 +C *** OBTAIN COMMON LOGARITHM OF POSITIONAL FLUXES (ALGFLX) +C *** PROTONS + 110 CALL TRARA1(DESCR,LIST,PSNL,PSNB,ENERGY(1,1),ALGFLX(1),30) + GO TO 140 +C *** ELECTRONS + 120 IF(INT(100.0*PSNL+0.2).LE.280) GO TO 130 + CALL TRARA1(DESCR7,LIST7,PSNL,PSNB,ENERGY(1,2),ALGFLX(1),30) + GO TO 140 + 130 CALL TRARA1(DESCR,LIST, PSNL,PSNB,ENERGY(1,2),ALGFLX(1),30) +C *** CONVERT LOG-FLUX TO FLUX + 140 DO 150 NRG=1,30 + FLUXES(NRG) = 10.0**ALGFLX(NRG) + 150 IF(FLUXES(NRG).LT.1.001) FLUXES(NRG) = 0.0 +C *** SUM FLUXES FOR (A) RUNNING PRINTOUT, (B) TABULAR OUTPUT + FLXSUM = FLXSUM+FLUXES(NRGYLV)*FLOAT(KPSTEP)*60. + DO 160 NRG=1,30 + 160 AIFLXS(NRG) = AIFLXS(NRG)+FLUXES(NRG) + 170 CONTINUE +C *** ******************** RUNNING PRINTOUT MODULE ******************* + GO TO (200,210),IPASS + 200 WRITE (6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, + $XAMNIM + WRITE (6,201)(TYPLBL(I,ITYPE),I=1,3), ENERGY(NRGYLV,ITYPE) + 201 FORMAT('0',21X,'***** ',3A4,'(E>',G9.3,'MEV) *****'// ' LONG + $. LAT. ALT. FIELD LINE ORBIT POSITIONAL TIME-INTE + $G ORBITAL'/' ',T28,'-B-',T37,'-L- TIME FLUX PSTNL + $FLUX FLUX(SUM)'/' (DEG) (DEG) (KM) (GAUSS) (E.R.) (HRS) + $ #/CM**2/SEC') + WRITE(6,202)PSNTM1,PSNLN1,PSNLT1,PSNAL1,PSNB1,PSNL1 + 202 FORMAT(' ',T41,F9.5,T2,F7.2,1X,F6.2,1X,F8.1,1X,F8.5,1X,F5.2,T50, + $7(2X,1PE10.3)) + 210 IF(MOD(IPRINT,KPRINT).NE.0) GO TO 220 + TIFLUX = FLUXES(NRGYLV)*FLOAT(KPSTEP)*60. + WRITE(6,202)PSNTIM,PSNLON,PSNLAT,PSNALT,PSNB,PSNL, + $FLUXES(NRGYLV),TIFLUX,FLXSUM + 220 IPRINT=IPRINT+1 +C *** ***************** ORBIT L-ZONE BREAKDOWN MODULE **************** +C *** ******* THIS MODULE MUST BE USED WITH PERCENT TIME MODULE ****** +C *** STORE TIME IN INNER & OUTER ZONE, EXTERNAL + IF(PSNL.LT.0.0.OR.PSNL.GT.11.0) GO TO 250 + IZ = IZONE(INT(PSNL/.1)) + LCOUNT(IZ) = LCOUNT(IZ) + 1 + GO TO 260 + 250 LCOUNT(4) = LCOUNT(4)+1 + 260 CONTINUE +C *** ********************* EXPOSURE INDEX MODULE ******************** +C *** STORE FLUXES AND TIMES IN INTENSITY RANGES + GO TO(270,280),IPASS + 270 ISWTCH=ISWTCH+1 + 280 INTRNG = (8-INT(1.0-SIGN(0.5,ALGFLX(NRGYLV)-7.0)) * + $(7-INT(ALGFLX(NRGYLV)))) * INT(1.0+SIGN(0.5, + $FLUXES(NRGYLV)-1.0009))+1 + EXPFLX(INTRNG)=EXPFLX(INTRNG)+FLUXES(NRGYLV)*60.0*FLOAT( + $KPSTEP) + EXPFLX(10)=EXPFLX(10)+FLUXES(NRGYLV)*60.0*FLOAT(KPSTEP) + EXPTIM(INTRNG) = EXPTIM(INTRNG) + FLOAT(KPSTEP) * .0166667 + EXPTIM(10) = EXPTIM(10) + FLOAT(KPSTEP) * .0166667 +C *** *************** PEAK AND TOTALS PER ORBIT MODULE *************** +C *** DETERMINE ORBIT NUMBER AND TOTAL FLUXES PER ORBIT + IF(PSNTIM.LT.TAU) GO TO 300 + PEAK = -1.0 + TAUFLX(NORBIT) = FLXSUM-OFLXSM + OFLXSM = FLXSUM + NRBITO=NORBIT + NORBIT = NORBIT+1 + TAU = NORBIT * PERIOD + IF(NORBIT.LE.50) GO TO 300 + WRITE(6,301) + 301 FORMAT('0ERROR: NORBIT EXCEEDS LIMIT OF 50. ************') + STOP +C *** DETERMINE FLUX PEAKS AND POSITIONS PER ORBIT + 300 IF(FLUXES(NRGYLV).LE.PEAK) GO TO 310 + PKFLX(NORBIT) = FLUXES(NRGYLV) + PKTIM(NORBIT) = PSNTIM + PKLON(NORBIT) = PSNLON + PKLAT(NORBIT) = PSNLAT + PKALT(NORBIT) = PSNALT + PKB(NORBIT) = PSNB + PKL(NORBIT) = PSNL + PEAK = FLUXES(NRGYLV) + 310 CONTINUE +C *** ***************** GEOMAGNETIC SHIELDING MODULE ***************** +C *** ******* THIS MODULE MUST BE USED WITH SOLAR PROTON MODULE ****** + IF(INT(PSNL).GE.5.OR.PSNL.LE.0.0) L=L+1 +C *** ************ BLOCK 4: LOOPING (READ-LOOP ENDS HERE) *********** + IPASS=2 + GO TO 50 +C *** ****************** BLOCK 5: OUTPUT PREPARATION ***************** +C *** COMPOSITE ORBIT SPECTRUM + 400 AFCTRS = (KPSTEP*1440.0) / (PSNTIM*86400.0) + DO 410 NRG=1,30 + AIFLXS(NRG) = AIFLXS(NRG)*AFCTRS + IF(AIFLXS(NRG).LE.0.0) GO TO 440 + ALNFLX(NRG) = ALOG(AIFLXS(NRG)) + 410 CONTINUE + 440 DO 450 NRG=1,29 + 450 DIFFLX(NRG) = AIFLXS(NRG)-AIFLXS(NRG+1) + DIFFLX(30) = AIFLXS(30) +C *** ********************** PERCENT TIME MODULE ********************* +C *** ** THIS MODULE MUST BE USED WITH ORBIT L-ZONE BREAKDOWN MODULE * +C *** CALCULATE AND PRINT PERCENT TIME TABLE + LSUM=LCOUNT(1) + LCOUNT(2) + LCOUNT(3) + LCOUNT(4) + IF(LSUM.EQ.0) GO TO 470 + DO 460 IL=1,4 + 460 PTIME(IL)=FLOAT(LCOUNT(IL)*KPSTEP)*1.66667/TMLAST + PTIZ=PTIME(1)+PTIME(2) + WRITE(6,401)PTIZ,(PTIME(II),II=1,4),PSNTIM + 470 CONTINUE + 401 FORMAT('0***** PERCENT OF TOTAL LIFETIME SPENT INSIDE AND OUTSIDE + $TRAPPED PARTICLE RADIATION BELT ****'//6X,'INNER ZONE (1.0 <= L < + $2.8) : ',F6.2,' %'/18X,'OUTSIDE TRAPPING REGION (1.0 <= L < 1.1) + $: ',F6.2,' %'/18X,'INSIDE TRAPPING REGION (1.1 <= L < 2.8) : ', + $F6.2,' %'/6X,'OUTER ZONE (2.8 <= L <= 11.0) : ',F6.2,' %'/6X,'EXTE + $RNAL (L > 11.0) : ',F6.2,' %'//' TOTAL ORBIT TIME IS :', + $F8.2,' HOURS') +C *** ***************** DIFFERENTIAL SPECTRUM MODULE ***************** + CALL DSPCTR(ALNFLX(1),ENERGY(1,ITYPE),DIFSPC(1)) +C *** ********************** SOLAR PROTON MODULE ********************* +C *** **** THIS MODULE MUST BE USED WITH GEOMAG. SHIELDING MODULE **** + T=12. + IT=T + IQ=90 + ISWTCH=ISWTCH+2 + IF(L.LE.0) GO TO 510 + CALL SOLPRO(T,IQ,F,INALE) + EXPOTM=FLOAT(L*KPSTEP)*.0166667 + EXPFCT=(EXPOTM/PSNTIM) + DO 500 J=1,20 + F(J)=F(J)*EXPFCT + 500 CONTINUE + 510 CONTINUE +C *** ********************** OUTPUT PUNCH MODULE ********************* +C *** PUNCHES ENERGY, INTEG AND DIFF FLUX, SOLAR PROTONS IF PRESENT + WRITE(7,605) NAME,INCL,IPRG,IAPG,MODEL,BLTIME + WRITE(7,602)((ENERGY((II-1)*6+JJ,ITYPE),JJ=1,6),XLABEL(1,ITYPE),II + $,II=1,5) + WRITE(7,602)((AIFLXS((II-1)*6+JJ),JJ=1,6),XLABEL(2,ITYPE),II,II=1, + $5) + WRITE(7,602)((DIFSPC((II-1)*6+JJ),JJ=1,6),XLABEL(3,ITYPE),II,II=1, + $5) + IF(L.LE.0) GO TO 600 + WRITE(7,603) IQ,T,INALE,EXPFCT + WRITE(7,604)((SPNRG((II-1)*5+JJ),JJ=1,5),PROTLB(1),II,II=1,4) + WRITE(7,604)((F((II-1)*5+JJ),JJ=1,5),PROTLB(2),II,II=1,4) + 600 CONTINUE + 602 FORMAT(1P6E12.4,A6,I2) + 603 FORMAT('SOLAR PROTONS #ENERGIES=20 Q=',I2,' TAU=',F4.1, + $' NALE=',I1,' EXPFCTR=',F5.2) + 604 FORMAT(1P5E12.4,12X,A6,I2) + 605 FORMAT(3A4,1X,I2,'/',I5,'-',I6,1X,'I(#/CM**2-SEC) D(#/CM**2-SEC-KE + $V) MOD/TM=',I1,'/',F6.1) +C *** ******************** OUTPUT TABLES MODULE 1 ******************** + DO 900 NTBL=1,NTABLS + WRITE(6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, + $XAMNIM + GO TO (710,700,730,720),ISWTCH +C *** COMPOSITE ORBIT SPECTRUM AND EXPOSURE INDEX + 700 WRITE (6,701) (TYPLBL(K,ITYPE),K=1,3),ENERGY(NRGYLV,ITYPE), + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),FIRNGS(N), + $FIRNGS(N+1),EXPTIM(N),EXPFLX(N),N=1,10),(ENERGY(N,ITYPE),AIFLXS(N) + $,DIFFLX(N),DIFSPC(N),N=11,30) + 701 FORMAT ('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', + $T18,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),T80,'** EXPOSURE + $INDEX:ENERGY>',G9.2,T112,'MEV **'/'0',T18,'ENERGY AVERAGED + $ DIFFERENCE AVERAGED DIFFE- INTENSITY EXPOSURE TO + $TAL # OF'/' ',T18,'LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTI + $AL FLUX',10X,'RANGES DURATION ACCUMULATED'/' ',T18,'>(MEV) + $ #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV #/CM**2/SEC + $ (HOURS) PARTICLES'/'0',T18,0PG9.4,T23,' ',1PE9.3,7X, + $1PE9.3,8X,1PE9.3,T81,2A4,T81,'ZERO FLUX',1X,0PF10.3,1X,1PE13.3/8(' + $ ',T18,0PG9.4,1PE9.3,7X,1PE9.3,8X,1PE9.3,T81,A4,'-',A4,1X,0PF10.3, + $1X,1PE13.3/),' ',T18,0PG9.4,1PE9.3,7X,1PE9.3,8X,1PE9.3/' ',T81,2A4 + $,T81,' TOTAL',1X,0PF10.3,1X,1PE13.3,20(T18,0PG9.4,1PE9.3,7X, + $1PE9.3,8X,1PE9.3/' ')) + GO TO 750 +C *** COMPOSITE ORBIT SPECTRUM ONLY + 710 WRITE (6,702) (TYPLBL(K,ITYPE),K=1,3),(ENERGY(N,ITYPE),AIFLXS(N), + $DIFFLX(N),DIFSPC(N),N=1,30) + 702 FORMAT ('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', + $T40,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*')/'0',T40,'ENERGY + $ AVERAGED DIFFERENCE AVERAGED DIFFE-'/' ',T40,'LEVELS + $ INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX'/' ',T40,'>(MEV) + $ #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV'//30(' ',T41, + $0PG9.4,T46,' ',1PE9.3,6X,1PE9.3,8X,1PE9.3/)) + GO TO 750 +C *** COMPOSITE ORBIT SPECTRUM WITH SOLAR PROTONS AND EXPOSURE INDEX + 720 WRITE(6,703)(TYPLBL(K,ITYPE),K=1,3),IT,IQ,INALE,ENERGY(NRGYLV, + $ITYPE),EXPFCT,(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG + $(N),F(N),FIRNGS(N),FIRNGS(N+1),EXPTIM(N),EXPFLX(N),N=1,10),(ENERGY + $(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG(N),F(N),N=11,20), + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),N=21,30) + 703 FORMAT('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', + $62X,'**** SOLAR PROTONS ****'//63X,'FOR TAU=',I2,',Q=',I2,': NALE= + $',I1/3X,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),5X,'WITH GEOM + $AG SHIELDING',8X,'** EXPOSURE INDEX: ENERGY>',G9.4,T125,' MEV **'/ + $64X,'(EXPOSR FACTOR=',F4.2,')'//3X,'ENERGY AVERAGED DIFF + $ERENCE AVERAGED DIFF- ENERGY TOTAL INTEN + $SITY EXPOSURE TOTAL # OF'/3X,'LEVELS INTEGRAL FLUX INTEGRA + $L FLUX RENTIAL FLUX LEVELS FLUENCE RANGE + $S DURATION ACCUMULATED'/3X,'>(MEV) #/CM**2/SEC #/CM**2/ + $SEC/DE #/CM**2/SEC/KEV >(MEV) #/CM**2 #/CM**2 + $/SEC (HOURS) PARTICLES'//T4,0PG9.4,T9,' ',1PE9.3,6X, + $1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3,T95,2A4,T95,'ZERO FLUX', + $0PF11.3,1PE14.3/8(T4,0PG9.4,T9,' ',1PE9.3,6X,1PE9.3,7X,1PE9.3 + $,11X,0PF4.0,7X,1PE9.3,9X,A4,'-',A4,0PF11.3,1PE14.3/),T4,0PG9.4,T9, + $' ',1PE9.3,6X,1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3,T95,2A4, + $T95,' TOTAL',0PF11.3,1PE14.3/10(T4,0PG9.4,T9,' ',1PE9.3,6X + $,1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3/),10(T4,0PG9.4,T9,' ', + $1PE9.3,6X,1PE9.3,7X,1PE9.3/)) + GO TO 750 +C *** COMPOSITE ORBIT SPECTRUM WITH SOLAR PROTONS + 730 WRITE(6,704)(TYPLBL(K,ITYPE),K=1,3),IT,IQ,INALE,EXPFCT,(ENERGY(N, + $ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG(N),F(N),N=1,20), + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),N=21,30) + 704 FORMAT('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////T93, + $'**** SOLAR PROTONS ****'//T93,'FOR TAU=',I2,',Q=',I2,': NALE=', + $I1/19X,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),18X,'WITH GEOM + $AG SHIELDING'/T94,'(EXPOSR FACTOR=',F4.2,')'//19X,'ENERGY AVER + $AGED DIFFERENCE AVERAGED DIFF-',20X,'ENERGY TOTAL' + $/19X,'LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX',22X, + $'LEVELS FLUENCE'/19X,'>(MEV) #/CM**2/SEC #/CM**2/SEC/DE + $ #/CM**2/SEC/KEV',20X,'>(MEV) #/CM**2'//20(T20,0PG9.4,T25,' + $ ',1PE9.3,6X,1PE9.3,7X,1PE9.3,24X,0PF4.0,7X,1PE9.3/),10(T20, + $0PG9.4,T25,' ',1PE9.3,6X,1PE9.3,7X,1PE9.3/)) + 750 CONTINUE +C *** ******************** OUTPUT TABLES MODULE 2 ******************** +C *** PEAK AND TOTAL FLUXES PER PERIOD + WRITE(6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, + $XAMNIM + WRITE(6,801)(TYPLBL(K,ITYPE),K=1,3),ENERGY(NRGYLV,ITYPE), + $(N,(PKVALU(N,K),K=1,8),N=1,NRBITO) + 801 FORMAT( '+',T35,24('*'),3X,3A4,2X,27('*')/' ',T35, + $'** TABLE OF PEAK AND TOTAL FLUXES PER PERIOD : ENERGY >',G9.2,T97 + $, 'MEV **'/' ',T35,68('*')//'0',13X,'PERIOD PEAK FLUX PO + $SITION AT WHICH ENCOUNTERED ORBIT TIME FIELD(B) LINE(L) + $ TOTAL FLUX'/' ',13X,'NUMBER ENCOUNTERED LONGITUDE LATITUD + $E ALTITUDE',41X,'PER ORBIT'/ ' ',23X,'#/CM**2/SEC ',2(5X,'(DEG)' + $),6X,'(KM)',7X,'(HOURS)',6X,'(GAUSS) (E.R.) #/CM**2/ORBIT' + $//(' ',14X,I4,1PE14.3,0PF13.3,F10.2,F12.2,F13.5,F12.5,F10.2,1PE15. + $3)) +C *** ***************** BLOCK 6: PROGRAM TERMINATION ***************** + 900 CONTINUE + GO TO 10 + 999 STOP + END +C *** *************** DIFFERENTIAL SPECTRUM SUBROUTINE *************** +C *** CALCULATES FIRST DERIVATIVES OF INPUT SPECTRUM DEFINED BY FF VS XX +C *** INPUT: XX - 30 INTEGRAL THRESHOLD ENERGIES, IN MEV (R*4) +C *** FF - ALOG OF THE INTEGRAL FLUXES FOR THE 30 ENERGY (R*4) +C *** LEVELS, IN PARTICLES/CM**2/SEC +C *** OUTPUT: DD - DIFFERENTIAL FLUXES OBTAINED FROM THE INTEGRAL (R*4) +C *** FLUXES, IN PARTICLES/CM**2/SEC/KEV +C *** ****************************************************************** +C *** THIS IS A MODIFIED VERSION OF A PROGRAM (DCS1FU) OBTAINED FROM +C *** IMSL LIBRARY 1: AUTHOR/IMPLEMENTOR - C.L.SMITH +C *** ****************************************************************** + SUBROUTINE DSPCTR(FF,XX,DD) + IMPLICIT REAL*8(A-H,O-Z) + REAL*4 DD,FF,XX + DIMENSION F(30),X(30),D(30),H(500),FF(30) ,XX(30) ,DD(30) + DATA EPSLN,OMEGA/1.D-6,1.0717968D0/ +C *** DATA INITIALIZATION + M=0 + DO 5 L=1,30 + 5 DD(L)=0.0 +C *** DETERMINE SIZE OF ARRAY: OBTAIN M & K INDICES +C *** M = # OF NONZERO FLUXES - 1; K = # OF NONZERO FLUXES + DO 10 K=1,30 + IF(FF(K).EQ.0.) GO TO 15 + M=K-1 + F(K)=FF(K)+ALOG(1000.) + X(K)=XX(K)*1000.D0 + 10 D(K)=X(K) + 15 K=M+1 + IF(K.LT.10) GO TO 170 +C *** SMOOTHING INTEGRAL FLUX + CALL SMOOTH(X,F,M) +C *** CALCULATE SECOND DERIVATIVES USING CENTRAL DIFFERENCES + DO 30 I=1,M + H(I)=X(I+1)-X(I) + 30 H(K +I)=(F(I+1)-F(I))/H(I) + DO 40 I=2,M + H(2*K+I)=H(I-1)+H(I) + H(3*K+I)=.5*H(I-1)/H (2*K+I) + H(4*K+I)=(H(K+I)-H(K+I-1))/H(2*K+I) + H(5*K+I)=H(4*K+I)+H(4*K+I) + 40 H(6*K+I)=H(5*K+I)+H(4*K+I) + H(5*K+1)=0. + H(6*K)=0. +C *** BEGIN ITERATION ON SECOND DERIVATIVES + KCOUNT=0 + 50 ETA=0. + KCOUNT=KCOUNT+1 + DO 70 I=2,M + W=(H(6*K+I)-H(3*K+I)*H(5*K+I-1)-(.5-H(3*K+I))*H(5*K+I+1)-H(5*K+ + $ I)*OMEGA) + IF (DABS(W).LE.ETA) GO TO 60 + ETA=DABS(W) + 60 H(5*K+I)=H(5*K+I)+W + 70 CONTINUE + IF(KCOUNT.GT.5*K)GO TO 170 + IF (ETA.GE.EPSLN) GO TO 50 +C *** CONVERGENCE OBTAINED + DO 80 I=1,M + 80 H(7*K+I)=(H(5*K+1+I)-H(5*K+I))/H(I) + DO 140 J=1,K + I=1 + IF (D(J).EQ.X(1))GO TO 130 + IF (D(J)-X(K )) 100,110,110 + 90 IF (D(J)-X(I)) 120,130,100 + 100 I=I+1 + GO TO 90 + 110 I=K + 120 I=I-1 +C *** COMPUTE D(J) + 130 HT1=D(J)-X(I) + HT2=D(J)-X(I+1) + PROD=HT1*HT2 + H(8*K+J)=H(5*K+I)+HT1*H(7*K+I) + DELSQS=(H(5*K+I)+H(5*K+1+I)+H(8*K+J))/6. + 140 D(J)=-(H(K +I)+(HT1+HT2)*DELSQS+PROD*H(7*K+I)*.1666667) +C *** SMOOTHING DIFFERENTIAL FLUX + CALL SMOOTH(X,D,M) + DO 160 I=1,K + F(I)=2.718281828D0**(F(I)-ALOG(1000.)) + 160 DD(I) =D(I)*F(I) + 170 RETURN + END +C +C *** SMOOTH DATA BY 3-POINT AVERAGING OVER EQUAL INTERVALS + SUBROUTINE SMOOTH(X,F,M) + IMPLICIT REAL*8(A-H,O-Z) + DIMENSION X(30),F(30) + FINTER(X1,X2,X3,Y1,Y2,Y3,XIN)=Y1*(XIN-X2)*(XIN-X3)/ + $((X1-X2)*(X1-X3)) + Y2*(XIN-X1)*(XIN-X3)/((X2-X1)*(X2-X3)) + $ + Y3*(XIN-X1)*(XIN-X2)/((X3-X1)*(X3-X2)) +C + FI = F(1) + DO 20 I=2,M + SIZE1 = X(I) - X(I-1) + SIZE2 = X(I+1) - X(I) +C *** CHECK FOR EQUAL STEPSIZES + IF(DABS(SIZE1-SIZE2).LT.0.001) GO TO 200 + IF(SIZE2.GT.SIZE1) GO TO 210 +C *** STEPSIZE DECREASES - FIT CURVE AND INTERPOLATE BACKWARD + F2 = F(I+1) + XINTER = X(I) - SIZE2 + F1 = FINTER(X(I-1),X(I),X(I+1),FI,F(I),F2,XINTER) + GO TO 300 +C *** STEPSIZE INCREASES - FIT CURVE AND INTERPOLATE FORWARD + 210 F1 = FI + XINTER = X(I) + SIZE1 + F2 = FINTER(X(I-1),X(I),X(I+1),F1,F(I),F(I+1),XINTER) + GO TO 300 +C *** STEPSIZES ARE EQUAL - AVERAGE OVER EXISTING VALUES + 200 F1 = FI + F2 = F(I+1) +C +C *** PERFORM AVERAGING + 300 FNEW = (F1+2.0*F(I)+F2)/4. + FI = F(I) + F(I) = FNEW + 20 CONTINUE + RETURN + END + SUBROUTINE SOLPRO(TAU,IQ,F,INALE) +C *** MODIFIED 9/77 TO RETURN INALE(# OF AL EVENTS) TO CALLING PROGRAM +C *** INTERPLANETARY SOLAR PROTON FLUX AT 1 AU (FROM E>10 TO E>200 MEV +C *** FOR ANOMALOUSLY LARGE (AL) EVENTS AND FROM E>10 TO E>100 MEV FOR +C *** ORDINARY (OR) EVENTS) +C *** SINGLE PRECISION DECK IN STANDARD FORTRAN IV FOR IBM 360 MACHINES +C *** (EBCDIC, 029 PUNCH) OR OTHER COMPATIBLE SYSTEMS. +C *** PROGRAM DESIGNED AND TESTED BY E.G. STASSINOPOULOS, CODE 601, +C *** NASA GODDARD SPACE FLIGHT CENTER, GREENBELT, MARYLAND 20771 . +C ********************************************************************* +C **** INPUT: TAU MISSION DURATION IN MONTHS (REAL*4) +C **** IQ CONFIDENCE LEVEL THAT CALCULATED FLUENCE F(N) +C **** WILL NOT BE EXCEEDED (INTEGER*4) +C **** OUTPUT: F(N) SPECTRUM OF INTEGRAL SOLAR PROTON FLUENCE FOR +C **** ENERGIES E>10*N (1=10*N (1=',G9.3,'MEV) *****'// ' LONG + $. LAT. ALT. FIELD LINE ORBIT POSITIONAL TIME-INTE + $G ORBITAL'/' ',T28,'-B-',T37,'-L- TIME FLUX PSTNL + $FLUX FLUX(SUM)'/' (DEG) (DEG) (KM) (GAUSS) (E.R.) (HRS) + $ #/CM**2/SEC') + WRITE(6,202)PSNTM1,PSNLN1,PSNLT1,PSNAL1,PSNB1,PSNL1 + 202 FORMAT(' ',T41,F9.5,T2,F7.2,1X,F6.2,1X,F8.1,1X,F8.5,1X,F5.2,T50, + $7(2X,1PE10.3)) + 210 IF(MOD(IPRINT,KPRINT).NE.0) GO TO 220 + TIFLUX = FLUXES(NRGYLV)*FLOAT(KPSTEP)*60. + WRITE(6,202)PSNTIM,PSNLON,PSNLAT,PSNALT,PSNB,PSNL, + $FLUXES(NRGYLV),TIFLUX,FLXSUM + 220 IPRINT=IPRINT+1 +C *** ***************** ORBIT L-ZONE BREAKDOWN MODULE **************** +C *** ******* THIS MODULE MUST BE USED WITH PERCENT TIME MODULE ****** +C *** STORE TIME IN INNER & OUTER ZONE, EXTERNAL + IF(PSNL.LT.0.0.OR.PSNL.GT.11.0) GO TO 250 + IZ = IZONE(INT(PSNL/.1)) + LCOUNT(IZ) = LCOUNT(IZ) + 1 + GO TO 260 + 250 LCOUNT(4) = LCOUNT(4)+1 + 260 CONTINUE +C *** ********************* EXPOSURE INDEX MODULE ******************** +C *** STORE FLUXES AND TIMES IN INTENSITY RANGES + GO TO(270,280),IPASS + 270 ISWTCH=ISWTCH+1 + 280 INTRNG = (8-INT(1.0-SIGN(0.5,ALGFLX(NRGYLV)-7.0)) * + $(7-INT(ALGFLX(NRGYLV)))) * INT(1.0+SIGN(0.5, + $FLUXES(NRGYLV)-1.0009))+1 + EXPFLX(INTRNG)=EXPFLX(INTRNG)+FLUXES(NRGYLV)*60.0*FLOAT( + $KPSTEP) + EXPFLX(10)=EXPFLX(10)+FLUXES(NRGYLV)*60.0*FLOAT(KPSTEP) + EXPTIM(INTRNG) = EXPTIM(INTRNG) + FLOAT(KPSTEP) * .0166667 + EXPTIM(10) = EXPTIM(10) + FLOAT(KPSTEP) * .0166667 +C *** *************** PEAK AND TOTALS PER ORBIT MODULE *************** +C *** DETERMINE ORBIT NUMBER AND TOTAL FLUXES PER ORBIT + IF(PSNTIM.LT.TAU) GO TO 300 + PEAK = -1.0 + TAUFLX(NORBIT) = FLXSUM-OFLXSM + OFLXSM = FLXSUM + NRBITO=NORBIT + NORBIT = NORBIT+1 + TAU = NORBIT * PERIOD + IF(NORBIT.LE.50) GO TO 300 + WRITE(6,301) + 301 FORMAT('0ERROR: NORBIT EXCEEDS LIMIT OF 50. ************') + STOP +C *** DETERMINE FLUX PEAKS AND POSITIONS PER ORBIT + 300 IF(FLUXES(NRGYLV).LE.PEAK) GO TO 310 + PKFLX(NORBIT) = FLUXES(NRGYLV) + PKTIM(NORBIT) = PSNTIM + PKLON(NORBIT) = PSNLON + PKLAT(NORBIT) = PSNLAT + PKALT(NORBIT) = PSNALT + PKB(NORBIT) = PSNB + PKL(NORBIT) = PSNL + PEAK = FLUXES(NRGYLV) + 310 CONTINUE +C *** ***************** GEOMAGNETIC SHIELDING MODULE ***************** +C *** ******* THIS MODULE MUST BE USED WITH SOLAR PROTON MODULE ****** + IF(INT(PSNL).GE.5.OR.PSNL.LE.0.0) L=L+1 +C *** ************ BLOCK 4: LOOPING (READ-LOOP ENDS HERE) *********** + IPASS=2 + GO TO 50 +C *** ****************** BLOCK 5: OUTPUT PREPARATION ***************** +C *** COMPOSITE ORBIT SPECTRUM + 400 AFCTRS = (KPSTEP*1440.0) / (PSNTIM*86400.0) + DO 410 NRG=1,30 + AIFLXS(NRG) = AIFLXS(NRG)*AFCTRS + IF(AIFLXS(NRG).LE.0.0) GO TO 440 + ALNFLX(NRG) = ALOG(AIFLXS(NRG)) + 410 CONTINUE + 440 DO 450 NRG=1,29 + 450 DIFFLX(NRG) = AIFLXS(NRG)-AIFLXS(NRG+1) + DIFFLX(30) = AIFLXS(30) +C *** ********************** PERCENT TIME MODULE ********************* +C *** ** THIS MODULE MUST BE USED WITH ORBIT L-ZONE BREAKDOWN MODULE * +C *** CALCULATE AND PRINT PERCENT TIME TABLE + LSUM=LCOUNT(1) + LCOUNT(2) + LCOUNT(3) + LCOUNT(4) + IF(LSUM.EQ.0) GO TO 470 + DO 460 IL=1,4 + 460 PTIME(IL)=FLOAT(LCOUNT(IL)*KPSTEP)*1.66667/TMLAST + PTIZ=PTIME(1)+PTIME(2) + WRITE(6,401)PTIZ,(PTIME(II),II=1,4),PSNTIM + 470 CONTINUE + 401 FORMAT('0***** PERCENT OF TOTAL LIFETIME SPENT INSIDE AND OUTSIDE + $TRAPPED PARTICLE RADIATION BELT ****'//6X,'INNER ZONE (1.0 <= L < + $2.8) : ',F6.2,' %'/18X,'OUTSIDE TRAPPING REGION (1.0 <= L < 1.1) + $: ',F6.2,' %'/18X,'INSIDE TRAPPING REGION (1.1 <= L < 2.8) : ', + $F6.2,' %'/6X,'OUTER ZONE (2.8 <= L <= 11.0) : ',F6.2,' %'/6X,'EXTE + $RNAL (L > 11.0) : ',F6.2,' %'//' TOTAL ORBIT TIME IS :', + $F8.2,' HOURS') +C *** ***************** DIFFERENTIAL SPECTRUM MODULE ***************** + CALL DSPCTR(ALNFLX(1),ENERGY(1,ITYPE),DIFSPC(1)) +C *** ********************** SOLAR PROTON MODULE ********************* +C *** **** THIS MODULE MUST BE USED WITH GEOMAG. SHIELDING MODULE **** + T=12. + IT=T + IQ=90 + ISWTCH=ISWTCH+2 + IF(L.LE.0) GO TO 510 + CALL SOLPRO(T,IQ,F,INALE) + EXPOTM=FLOAT(L*KPSTEP)*.0166667 + EXPFCT=(EXPOTM/PSNTIM) + DO 500 J=1,20 + F(J)=F(J)*EXPFCT + 500 CONTINUE + 510 CONTINUE +C *** ********************** OUTPUT PUNCH MODULE ********************* +C *** PUNCHES ENERGY, INTEG AND DIFF FLUX, SOLAR PROTONS IF PRESENT + WRITE(7,605) NAME,INCL,IPRG,IAPG,MODEL,BLTIME + WRITE(7,602)((ENERGY((II-1)*6+JJ,ITYPE),JJ=1,6),XLABEL(1,ITYPE),II + $,II=1,5) + WRITE(7,602)((AIFLXS((II-1)*6+JJ),JJ=1,6),XLABEL(2,ITYPE),II,II=1, + $5) + WRITE(7,602)((DIFSPC((II-1)*6+JJ),JJ=1,6),XLABEL(3,ITYPE),II,II=1, + $5) + IF(L.LE.0) GO TO 600 + WRITE(7,603) IQ,T,INALE,EXPFCT + WRITE(7,604)((SPNRG((II-1)*5+JJ),JJ=1,5),PROTLB(1),II,II=1,4) + WRITE(7,604)((F((II-1)*5+JJ),JJ=1,5),PROTLB(2),II,II=1,4) + 600 CONTINUE + 602 FORMAT(1P6E12.4,A6,I2) + 603 FORMAT('SOLAR PROTONS #ENERGIES=20 Q=',I2,' TAU=',F4.1, + $' NALE=',I1,' EXPFCTR=',F5.2) + 604 FORMAT(1P5E12.4,12X,A6,I2) + 605 FORMAT(3A4,1X,I2,'/',I5,'-',I6,1X,'I(#/CM**2-SEC) D(#/CM**2-SEC-KE + $V) MOD/TM=',I1,'/',F6.1) +C *** ******************** OUTPUT TABLES MODULE 1 ******************** + DO 900 NTBL=1,NTABLS + WRITE(6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, + $XAMNIM + GO TO (710,700,730,720),ISWTCH +C *** COMPOSITE ORBIT SPECTRUM AND EXPOSURE INDEX + 700 WRITE (6,701) (TYPLBL(K,ITYPE),K=1,3),ENERGY(NRGYLV,ITYPE), + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),FIRNGS(N), + $FIRNGS(N+1),EXPTIM(N),EXPFLX(N),N=1,10),(ENERGY(N,ITYPE),AIFLXS(N) + $,DIFFLX(N),DIFSPC(N),N=11,30) + 701 FORMAT ('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', + $T18,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),T80,'** EXPOSURE + $INDEX:ENERGY>',G9.2,T112,'MEV **'/'0',T18,'ENERGY AVERAGED + $ DIFFERENCE AVERAGED DIFFE- INTENSITY EXPOSURE TO + $TAL # OF'/' ',T18,'LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTI + $AL FLUX',10X,'RANGES DURATION ACCUMULATED'/' ',T18,'>(MEV) + $ #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV #/CM**2/SEC + $ (HOURS) PARTICLES'/'0',T18,0PG9.4,T23,' ',1PE9.3,7X, + $1PE9.3,8X,1PE9.3,T81,2A4,T81,'ZERO FLUX',1X,0PF10.3,1X,1PE13.3/8(' + $ ',T18,0PG9.4,1PE9.3,7X,1PE9.3,8X,1PE9.3,T81,A4,'-',A4,1X,0PF10.3, + $1X,1PE13.3/),' ',T18,0PG9.4,1PE9.3,7X,1PE9.3,8X,1PE9.3/' ',T81,2A4 + $,T81,' TOTAL',1X,0PF10.3,1X,1PE13.3,20(T18,0PG9.4,1PE9.3,7X, + $1PE9.3,8X,1PE9.3/' ')) + GO TO 750 +C *** COMPOSITE ORBIT SPECTRUM ONLY + 710 WRITE (6,702) (TYPLBL(K,ITYPE),K=1,3),(ENERGY(N,ITYPE),AIFLXS(N), + $DIFFLX(N),DIFSPC(N),N=1,30) + 702 FORMAT ('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', + $T40,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*')/'0',T40,'ENERGY + $ AVERAGED DIFFERENCE AVERAGED DIFFE-'/' ',T40,'LEVELS + $ INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX'/' ',T40,'>(MEV) + $ #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV'//30(' ',T41, + $0PG9.4,T46,' ',1PE9.3,6X,1PE9.3,8X,1PE9.3/)) + GO TO 750 +C *** COMPOSITE ORBIT SPECTRUM WITH SOLAR PROTONS AND EXPOSURE INDEX + 720 WRITE(6,703)(TYPLBL(K,ITYPE),K=1,3),IT,IQ,INALE,ENERGY(NRGYLV, + $ITYPE),EXPFCT,(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG + $(N),F(N),FIRNGS(N),FIRNGS(N+1),EXPTIM(N),EXPFLX(N),N=1,10),(ENERGY + $(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG(N),F(N),N=11,20), + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),N=21,30) + 703 FORMAT('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', + $62X,'**** SOLAR PROTONS ****'//63X,'FOR TAU=',I2,',Q=',I2,': NALE= + $',I1/3X,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),5X,'WITH GEOM + $AG SHIELDING',8X,'** EXPOSURE INDEX: ENERGY>',G9.4,T125,' MEV **'/ + $64X,'(EXPOSR FACTOR=',F4.2,')'//3X,'ENERGY AVERAGED DIFF + $ERENCE AVERAGED DIFF- ENERGY TOTAL INTEN + $SITY EXPOSURE TOTAL # OF'/3X,'LEVELS INTEGRAL FLUX INTEGRA + $L FLUX RENTIAL FLUX LEVELS FLUENCE RANGE + $S DURATION ACCUMULATED'/3X,'>(MEV) #/CM**2/SEC #/CM**2/ + $SEC/DE #/CM**2/SEC/KEV >(MEV) #/CM**2 #/CM**2 + $/SEC (HOURS) PARTICLES'//T4,0PG9.4,T9,' ',1PE9.3,6X, + $1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3,T95,2A4,T95,'ZERO FLUX', + $0PF11.3,1PE14.3/8(T4,0PG9.4,T9,' ',1PE9.3,6X,1PE9.3,7X,1PE9.3 + $,11X,0PF4.0,7X,1PE9.3,9X,A4,'-',A4,0PF11.3,1PE14.3/),T4,0PG9.4,T9, + $' ',1PE9.3,6X,1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3,T95,2A4, + $T95,' TOTAL',0PF11.3,1PE14.3/10(T4,0PG9.4,T9,' ',1PE9.3,6X + $,1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3/),10(T4,0PG9.4,T9,' ', + $1PE9.3,6X,1PE9.3,7X,1PE9.3/)) + GO TO 750 +C *** COMPOSITE ORBIT SPECTRUM WITH SOLAR PROTONS + 730 WRITE(6,704)(TYPLBL(K,ITYPE),K=1,3),IT,IQ,INALE,EXPFCT,(ENERGY(N, + $ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG(N),F(N),N=1,20), + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),N=21,30) + 704 FORMAT('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////T93, + $'**** SOLAR PROTONS ****'//T93,'FOR TAU=',I2,',Q=',I2,': NALE=', + $I1/19X,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),18X,'WITH GEOM + $AG SHIELDING'/T94,'(EXPOSR FACTOR=',F4.2,')'//19X,'ENERGY AVER + $AGED DIFFERENCE AVERAGED DIFF-',20X,'ENERGY TOTAL' + $/19X,'LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX',22X, + $'LEVELS FLUENCE'/19X,'>(MEV) #/CM**2/SEC #/CM**2/SEC/DE + $ #/CM**2/SEC/KEV',20X,'>(MEV) #/CM**2'//20(T20,0PG9.4,T25,' + $ ',1PE9.3,6X,1PE9.3,7X,1PE9.3,24X,0PF4.0,7X,1PE9.3/),10(T20, + $0PG9.4,T25,' ',1PE9.3,6X,1PE9.3,7X,1PE9.3/)) + 750 CONTINUE +C *** ******************** OUTPUT TABLES MODULE 2 ******************** +C *** PEAK AND TOTAL FLUXES PER PERIOD + WRITE(6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, + $XAMNIM + WRITE(6,801)(TYPLBL(K,ITYPE),K=1,3),ENERGY(NRGYLV,ITYPE), + $(N,(PKVALU(N,K),K=1,8),N=1,NRBITO) + 801 FORMAT( '+',T35,24('*'),3X,3A4,2X,27('*')/' ',T35, + $'** TABLE OF PEAK AND TOTAL FLUXES PER PERIOD : ENERGY >',G9.2,T97 + $, 'MEV **'/' ',T35,68('*')//'0',13X,'PERIOD PEAK FLUX PO + $SITION AT WHICH ENCOUNTERED ORBIT TIME FIELD(B) LINE(L) + $ TOTAL FLUX'/' ',13X,'NUMBER ENCOUNTERED LONGITUDE LATITUD + $E ALTITUDE',41X,'PER ORBIT'/ ' ',23X,'#/CM**2/SEC ',2(5X,'(DEG)' + $),6X,'(KM)',7X,'(HOURS)',6X,'(GAUSS) (E.R.) #/CM**2/ORBIT' + $//(' ',14X,I4,1PE14.3,0PF13.3,F10.2,F12.2,F13.5,F12.5,F10.2,1PE15. + $3)) +C *** ***************** BLOCK 6: PROGRAM TERMINATION ***************** + 900 CONTINUE + GO TO 10 + 999 STOP + END diff --git a/SOFIP/guzik_version/solpro.for b/SOFIP/guzik_version/solpro.for new file mode 100755 index 0000000..139561e --- /dev/null +++ b/SOFIP/guzik_version/solpro.for @@ -0,0 +1,75 @@ + SUBROUTINE SOLPRO(TAU,IQ,F,INALE) +C *** MODIFIED 9/77 TO RETURN INALE(# OF AL EVENTS) TO CALLING PROGRAM +C *** INTERPLANETARY SOLAR PROTON FLUX AT 1 AU (FROM E>10 TO E>200 MEV +C *** FOR ANOMALOUSLY LARGE (AL) EVENTS AND FROM E>10 TO E>100 MEV FOR +C *** ORDINARY (OR) EVENTS) +C *** SINGLE PRECISION DECK IN STANDARD FORTRAN IV FOR IBM 360 MACHINES +C *** (EBCDIC, 029 PUNCH) OR OTHER COMPATIBLE SYSTEMS. +C *** PROGRAM DESIGNED AND TESTED BY E.G. STASSINOPOULOS, CODE 601, +C *** NASA GODDARD SPACE FLIGHT CENTER, GREENBELT, MARYLAND 20771 . +C ********************************************************************* +C **** INPUT: TAU MISSION DURATION IN MONTHS (REAL*4) +C **** IQ CONFIDENCE LEVEL THAT CALCULATED FLUENCE F(N) +C **** WILL NOT BE EXCEEDED (INTEGER*4) +C **** OUTPUT: F(N) SPECTRUM OF INTEGRAL SOLAR PROTON FLUENCE FOR +C **** ENERGIES E>10*N (1=10*N (1=)',END=10) IEC,CARD(1:IEC) + IF (IEC .GT. 72) IEC=72 + LLINE = FINDEND(CARD(1:IEC)) + WRITE(LFNOT,'(A)') CARD(1:LLINE) + ENDDO +C + 10 CLOSE(UNIT=LFNIN) + CLOSE(UNIT=LFNOT) + END +C******************************************************************************* + + INTEGER FUNCTION GETSTR(PROMPT,STRING,MAXSTR) +C +C Writes the PROMPT string to the screen and waits for the user to +C enter the string STRING. The length of the user entered string +C is not checked, but FORTRAN will truncate it to the length defined +C in the calling program. The length of the input string is returned +C as the function value. +C +C 11/16/87 * v1.0 - Initial version by TGG +C + CHARACTER*(*) PROMPT + CHARACTER*(*) STRING + CHARACTER TMPSTR*80,ERSLIN*3,ESC*1 + DATA ESC/'1B'X/,ERSLIN/' [K'/ +C + ERSLIN(1:1) = ESC + WRITE(*,'(''$'',A,'': '',A)') PROMPT,ERSLIN + READ(*,'(Q,A)') LEN,TMPSTR(1:LEN) + IF (LEN .GT. MAXSTR) LEN = MAXSTR + STRING(1:LEN) = TMPSTR(1:LEN) + GETSTR = LEN + RETURN + END + +C******************************************************************************* + + INTEGER FUNCTION FINDEND(STR) +C +C Finds the last character of a string. +C + CHARACTER*(*) STR + CHARACTER CH*1,NUL*1 +C + NUL = CHAR(0) + FINDEND = LEN(STR) + CH = STR(FINDEND:FINDEND) +C + DO WHILE (((CH .EQ. ' ').OR.(CH.EQ.NUL)) .AND. (FINDEND .GT. 0)) + FINDEND = FINDEND - 1 + CH = STR(FINDEND:FINDEND) !Back a space + ENDDO + RETURN + END + diff --git a/SOFIP/guzik_version/tarara1.for b/SOFIP/guzik_version/tarara1.for new file mode 100755 index 0000000..4769adc --- /dev/null +++ b/SOFIP/guzik_version/tarara1.for @@ -0,0 +1,92 @@ + SUBROUTINE TRARA1(DESCR,MAP,FL,BABS,E,F,N) +C*********************************************************************** +C B / B0 CASE JOEL STEIN 9-15-71 X2133 KMS +C TRARA1 DOES ENERGY VALUE SEARCH FOR FLUX CALCULATION WHEN GIVEN A +C B AND L POINT. +C*********************************************************************** +C MAP(1) IS THE FIRST WORD OF LIST + LOGICAL S0,S1,S2 +C S0,S1,S2 ARE LOGICAL VARIABLES WHICH INDICATE WHETHER THE FLUX FOR A +C PARTICULAR E,B,L POINT HAS ALREADY BEEN FOUND IN A PREVIOUS CALL +C TO TRARA2. + DIMENSION E(1),F(1),DESCR(8),MAP(1) + NL=AMIN1(32766.,ABS(FL*DESCR(5))) + NB =ABS(((BABS*(FL*FL*FL)/0.311653)-1) * DESCR(6)) +C NB=ABS((BABS-0.311653E0/(FL*FL*FL))*DESCR(6)) +C NL IS THE MINIMUM OF THE L VALUE OR 15.999, SCALED TO AN INTEGER BY +C THE L SCALING FACTOR +C NB IS THE DIFFERENCE BETWEEN THE INPUT B VALUE AND B EQUATORIAL, +C SCALED TO AN INTEGER BY THE B SCALING FACTOR. + I1=0 + I2=MAP(1) + I3=I2+MAP(I2+1) + L3=MAP(I3+1) + E1=MAP(I1+2)/DESCR(4) + E2=MAP(I2+2)/DESCR(4) + S1=.TRUE. + S2=.TRUE. +C +C I2 IS THE NUMBER OF ELEMENTS IN THE FLUX MAP FOR THE FIRST ENERGY. +C I3 IS THE INDEX OF THE LAST ELEMENT OF THE SECOND ENERGY MAP. +C L3 IS THE LENGTH OF THE MAP FOR THE THIRD ENERGY. +C E1 IS THE ENERGY OF THE FIRST ENERGY MAP (UNSCALED) +C E2 IS THE ENERGY OF THE SECOND ENERGY MAP (UNSCALED) +C S1 AND S2 ARE TRUE TO INDICATE THAT NO FLUXES HAVE YET BEEN FOUND. +C + DO 3 IE=1,N +C THE DO STATEMENT LOOPS THROUGH THE ENERGIES FOR WHICH FLUXES ARE +C DESIRED AT THE GIVEN B,L POINT (BABS,FL). +1 IF(E(IE).LE.E2.OR.L3.EQ.0)GOTO2 +C +C THE IF STATEMENT CHECKS TO SEE IF THE INPUT ENERGY IS LESS THAN OR E +C THE ENERGY OF THE SECOND MAP, OR IF THE LENGTH OF THE THIRD MAP IS +C (I.E. THERE ARE NO HIGHER ENERGIES IN THE TABLE). IF TRUE, USE TH +C FOR THOSE TWO ENERGY MAPS TO FIND THE DESIRED FLUX AT THE DESIRED +C ENERGY. IF FALSE, THE ZEROTH ENERGY MAP IS DEFINED TO BE TNE FIRS +C ENERGY MAP, THE FIRST BECOMES THE SECOND, AND THE SECOND BECOMES +C THE THIRD. E0,E1,E2 ARE THE ENERGIES FOR THE ZEROTH,FIRST,AND SEC +C ENERGY MAPS. F0,F1,F2 ARE THE FLUXES FOR THE ZEROTH, FIRST, AND +C SECOND ENERGY MAPS AT THE B,L POINT. +C + I0=I1 + I1=I2 + I2=I3 + I3=I3+L3 + L3=MAP(I3+1) + E0=E1 + E1=E2 + E2=MAP(I2+2)/DESCR(4) + S0=S1 + S1=S2 + S2=.TRUE. + F0=F1 + F1=F2 + GOTO1 +2 IF(S1)F1=TRARA2(MAP(I1+3),NL,NB)/DESCR(7) + IF(S2)F2=TRARA2(MAP(I2+3),NL,NB)/DESCR(7) +C THESE TWO LOGICAL IFS CALL TRARA2 FOR THE FLUX FROM THE FIRST AND +C SECOND ENERGY MAPS AT THE B,L POINT IF THEY HAVE NOT ALREADY BEEN + S1=.FALSE. + S2=.FALSE. +C S1 AND S2 ARE FALSE SINCE F1 AND F2 ARE NOW FOUND. + F(IE)=F1+(F2-F1)*(E(IE)-E1)/(E2-E1) +C +C INTERPOLATE FOR THE FLUX F(IE) USING THE FLUXES AND ENERGIES FOR MAP +C ONE AND TWO. +C THE FOLLOWING COMMENTS APPLY TO THE REMAINING PROGRAM STATEMENTS. +C IF THE FLUX F2 FOR THE SECOND ENERGY MAP IS GREATER THAN ZERO, OR TH +C ZEROTH ENERGY MAP HAS NOT BEEN DEFINED, THE FINAL FLUX IS THE MAXI +C OF THE INTEROOLATED FLUX OR ZERO. IF THE FLUX FOR THE SECOND ENER +C MAP IS EQUAL TO ZERO, AND THE ZEROTH ENERGY MAP HAS BEEN DEFINED, +C THEN INTERPOLATE FOR THE FLUX USING THE ZEROTH AND FIRST ENERGY MA +C CHOOSE THE MINIMUM OF THE TWO INTERPOLATIONS, AND THEN THE MAXIMUM +C CHOICE AND ZERO FOR THE FINAL FLUX VALUE. +C + IF(F2.GT.0.)GOTO3 + IF(I1.EQ.0)GOTO3 + IF(S0)F0=TRARA2(MAP(I0+3),NL,NB)/DESCR(7) + S0=.FALSE. + F(IE)=AMIN1(F(IE),F0+(F1-F0)*(E(IE)-E0)/(E1-E0)) +3 F(IE)=AMAX1(F(IE),0.) + RETURN + END diff --git a/SOFIP/guzik_version/tarara2.for b/SOFIP/guzik_version/tarara2.for new file mode 100755 index 0000000..85ee38a --- /dev/null +++ b/SOFIP/guzik_version/tarara2.for @@ -0,0 +1,113 @@ + FUNCTION TRARA2(MAP,IL,IB) + DIMENSION MAP(777) + DATA FISTEP/256./ + FNL=IL + FNB=IB + ITIME=0 + I2=0 + 1 L2=MAP(I2+1) + IF(MAP(I2+2).GT.IL)GO TO 2 + I1=I2 + L1=L2 + I2=I2+L2 + GO TO 1 + 2 CONTINUE + IF(L1.LT.4.AND.L2.LT.4)GO TO 50 + IF(MAP(I2+3).GT.MAP(I1+3))GO TO 10 + 5 KT=I1 + I1=I2 + I2=KT + KT=L1 + L1=L2 + L2=KT + 10 FLOG1=MAP(I1+3) + FLL1=MAP(I1+2) + FLOG2=MAP(I2+3) + FLL2=MAP(I2+2) + DFL=(FNL-FLL1)/(FLL2-FLL1) + FKB1=0. + FKB2=0. + IF(L1.LT.4)GO TO 32 + DO 17 J2=4,L2 + FINCR2=MAP(I2+J2) + IF(FKB2+FINCR2.GT.FNB)GO TO 23 + FKB2=FKB2+FINCR2 + 17 FLOG2=FLOG2-FISTEP + ITIME=ITIME+1 + IF(ITIME.EQ.1)GO TO 5 + GO TO 50 + 23 IF(ITIME.EQ.1)GO TO 30 + IF(J2.EQ.4)GO TO 28 + SL2=FLOG2/FKB2 + DO 27 J1=4,L1 + FINCR1=MAP(I1+J1) + FKB1=FKB1+FINCR1 + FLOG1=FLOG1-FISTEP + FKBJ1=((FLOG1/FISTEP)*FINCR1+FKB1)/((FINCR1/FISTEP)*SL2+1.) + IF(FKBJ1.LE.FKB1)GO TO 31 + 27 CONTINUE + GO TO 55 + 31 IF(FKBJ1.LE.FKB2)GO TO 29 + FKB1=0. + 30 FKB2=0. + 32 J2=4 + FINCR2=MAP(I2+J2) + FLOG2=MAP(I2+3) + FLOG1=MAP(I1+3) + 28 FLOGM=FLOG1+(FLOG2-FLOG1)*DFL + FKBM=0. + FKB2=FKB2+FINCR2 + FLOG2=FLOG2-FISTEP + SL2=FLOG2/FKB2 + IF(L1.LT.4)GO TO 35 + J1=4 + FINCR1=MAP(I1+J1) + FKB1=FKB1+FINCR1 + FLOG1=FLOG1-FISTEP + SL1=FLOG1/FKB1 + GO TO 15 + 29 FKBM=FKBJ1+(FKB2-FKBJ1)*DFL + FLOGM=FKBM*SL2 + FLOG2=FLOG2-FISTEP + FKB2=FKB2+FINCR2 + SL1=FLOG1/FKB1 + SL2=FLOG2/FKB2 + 15 IF(SL1.LT.SL2)GO TO 20 + FKBJ2=((FLOG2/FISTEP)*FINCR2+FKB2)/((FINCR2/FISTEP)*SL1+1.) + FKB=FKB1+(FKBJ2-FKB1)*DFL + FLOG=FKB*SL1 + IF(FKB.GE.FNB)GO TO 60 + FKBM=FKB + FLOGM=FLOG + IF (J1.GE.L1) GO TO 55 + J1=J1+1 + FINCR1=MAP(I1+J1) + FLOG1=FLOG1-FISTEP + FKB1=FKB1+FINCR1 + SL1=FLOG1/FKB1 + GO TO 15 + 20 FKBJ1=((FLOG1/FISTEP)*FINCR1+FKB1)/((FINCR1/FISTEP)*SL2+1.) + FKB=FKBJ1+(FKB2-FKBJ1)*DFL + FLOG=FKB*SL2 + IF(FKB.GE.FNB)GO TO 60 + FKBM=FKB + FLOGM=FLOG + IF(J2.GE.L2) GO TO 55 + J2=J2+1 + FINCR2=MAP(I2+J2) + FLOG2=FLOG2-FISTEP + FKB2=FKB2+FINCR2 + SL2=FLOG2/FKB2 + GO TO 15 + 50 TRARA2=0. + RETURN + 35 FINCR1=0. + SL1=-900000. + GO TO 20 + 60 IF(FKB.LT.FKBM+1.E-20)GO TO 50 + TRARA2=FLOGM+(FLOG-FLOGM)*((FNB-FKBM)/(FKB-FKBM)) + TRARA2=AMAX1(TRARA2,0.) + RETURN + 55 TRARA2=0. + RETURN + END diff --git a/SOFIP/guzik_version/unfold_records.for b/SOFIP/guzik_version/unfold_records.for new file mode 100755 index 0000000..b6f10cf --- /dev/null +++ b/SOFIP/guzik_version/unfold_records.for @@ -0,0 +1,191 @@ +C + character inline*6600, otline*132 + character infile*80, otfile*80 + integer*4 linf,lotf + integer*4 lenin,irec,orec + integer*4 reclen,linlen,getint + logical*1 trans_logical,okin,okot,more_lines,okrc,okln +C + type *,' ' + type *,'*** Read a file which has multiple lines concatenated' + type *,'*** into long records (up to 6600 characters), split' + type *,'*** these records into lines (up to 132 characters)' + type *,'*** and output to a new file.' + type *,' ' + lfnin = 10 + lfnot = 12 + okin = .false. + okot = .false. + if (trans_logical('INPUT_FILE',infile,linf)) then + okin = .true. + open(lfnin,file=infile(1:linf),type='old',err=1100) + type *,'Opened ',infile(1:linf),' as the input.' + else + type *,'ERROR: Logical INPUT_FILE must be defined' + okin = .false. + endif + if (trans_logical('OUTPUT_FILE',otfile,lotf)) then + okot = .true. + open(lfnot,file=otfile(1:lotf),type='new',err=1200, + * carriagecontrol='list') + type *,'Opened ',otfile(1:lotf),' as the output.' + else + type *,'ERROR: Logical OUTPUT_FILE must be defined' + okot = .false. + endif + if (.not.okin .or. .not.okot) goto 1000 +C + okrc = .false. + okln = .false. + reclen = getint('Enter input file record length') + linlen = getint('Enter output file line length') + if (reclen .gt. 6600) then + okrc = .false. + type *,'ERROR: Input record length must be =< 6600' + else + okrc = .true. + endif + if (linlen .gt. 132) then + okln = .false. + type *,'ERROR: Output line length must be =< 132' + else + okln = .true. + endif + if (.not.okrc .or. .not.okln) goto 9000 +C + type *,' ' + irec = 0 + orec = 0 + more_lines = .true. + do while (more_lines) + call blankit(inline,reclen) + read(lfnin,'(q,a)',end=100,err=2100) + * lenin,inline(1:lenin) + irec = irec + 1 + nlines = lenin/linlen + nremain= mod(lenin,linlen) + if (nremain .ne. 0) nlines = nlines + 1 + type *,' ' + do il=1,nlines + ibeg = (il - 1)*linlen + 1 + iend = ibeg + linlen - 1 + if (iend .gt. lenin) iend = lenin + call blankit(otline,linlen) + ilen = iend - ibeg + 1 + otline(1:ilen) = inline(ibeg:iend) + write(lfnot,'(a)',err=2200) otline(1:ilen) + orec = orec + 1 + write(*,10) irec,orec + 10 format('+','Splitting input ',I5,' to output ',I6) + enddo + enddo +C + 100 close(unit=lfnin) + close(unit=lfnot) + goto 9000 +C + 1000 type *,'ERROR: One or more control logicals not defined' + goto 9000 +C + 1100 type *,'ERROR: With opening ',infile(1:linf),' as input' + goto 9000 +C + 1200 type *,'ERROR: With opening ',otfile(1:lotf),' as output' + goto 9000 +C + 2100 type *,'ERROR: With reading input file ',infile(1:linf) + goto 9000 +C + 2200 type *,'ERROR: With writing output file ',otfile(1:lotf) + goto 9000 +C + 9000 continue + end +C******************************************************************************* + + LOGICAL FUNCTION TRANS_LOGICAL(LOGSTR,TRNSTR,TRNLEN) +C +C Check to see that the logical LOGSTR has been assigned +C +C 11/26/90 * v1.0 - Initial version by TGG +C + PARAMETER SS$_NORMAL = '00000001'X + PARAMETER LNM$_STRING = '00000002'X ! Translation string +C + STRUCTURE /ITMLST/ + UNION + MAP + INTEGER*2 BUFLEN + INTEGER*2 CODE + INTEGER*4 BUFADR + INTEGER*4 RETLENADR + END MAP + MAP + INTEGER*4 END_LIST + END MAP + END UNION + END STRUCTURE + RECORD /ITMLST/ LNMLST(2) + CHARACTER*(*) LOGSTR,TRNSTR + CHARACTER*255 LOGTRN + INTEGER*4 LOGLEN,TRNLEN + INTEGER*4 SYS$TRNLNM +C + LTRNSTR = LEN(TRNSTR) + CALL BLANKIT(TRNSTR,LTRNSTR) + TRNLEN = 0 + LNMLST(1).BUFLEN = 255 + LNMLST(1).CODE = LNM$_STRING + LNMLST(1).BUFADR = %LOC(LOGTRN) + LNMLST(1).RETLENADR = %LOC(LOGLEN) + LNMLST(2).END_LIST = 0 + IOSTAT = SYS$TRNLNM(,'LNM$PROCESS_TABLE',LOGSTR,,LNMLST) + IF (IOSTAT .EQ. SS$_NORMAL) THEN + TRANS_LOGICAL = .TRUE. + TRNLEN = LOGLEN + IF (TRNLEN .GT. LTRNSTR) TRNLEN = LTRNSTR + TRNSTR(1:TRNLEN) = LOGTRN(1:TRNLEN) + ELSE + TRANS_LOGICAL = .FALSE. + ENDIF +C + RETURN + END + +C******************************************************************************* + + INTEGER FUNCTION GETINT(PROMPT) +C +C Writes the PROMPT string to the screen and waits for the user to +C enter an integer value. This integer is returned as the function +C value +C +C 12/19/87 * v1.0 - Initial version by TGG +C + CHARACTER*(*) PROMPT + CHARACTER ERSLIN*3,ESC*1 + DATA ESC/'1B'X/,ERSLIN/' [K'/ +C + ERSLIN(1:1) = ESC + WRITE(*,'(''$'',A,'': '',A)') PROMPT,ERSLIN + READ(*,*) INTVAL + GETINT = INTVAL + RETURN + END + +C******************************************************************************* + + SUBROUTINE BLANKIT(STR,LSTR) +C +C Set the given string STR of length LSTR to blanks +C + CHARACTER*(*) STR + JSTR = LEN(STR) + IC = 1 + DO WHILE ((IC.LE.LSTR).AND.(IC.LE.JSTR)) + STR(IC:IC) = ' ' + IC = IC + 1 + ENDDO + RETURN + END + diff --git a/SOFIP/guzik_version/unpack_sofip.com b/SOFIP/guzik_version/unpack_sofip.com new file mode 100755 index 0000000..d43b957 --- /dev/null +++ b/SOFIP/guzik_version/unpack_sofip.com @@ -0,0 +1,101 @@ +$ DEFINE INPUT_FILE SOFIP01.DAT +$ DEFINE OUTPUT_FILE SOFIP_MAIN.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +SOFIP_MAIN.DAT +SOFIP_MAIN.FOR +$ DEFINE INPUT_FILE SOFIP02.DAT +$ DEFINE OUTPUT_FILE DSPCTR.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +DSPCTR.DAT +DSPCTR.FOR +$ DEFINE INPUT_FILE SOFIP03.DAT +$ DEFINE OUTPUT_FILE SOLPRO.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +SOLPRO.DAT +SOLPRO.FOR +$ DEFINE INPUT_FILE SOFIP04.DAT +$ DEFINE OUTPUT_FILE TRARA1.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +TRARA1.DAT +TRARA1.FOR +$ DEFINE INPUT_FILE SOFIP05.DAT +$ DEFINE OUTPUT_FILE TRARA2.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +TRARA2.DAT +TRARA2.FOR +$ DEFINE INPUT_FILE SOFIP06.DAT +$ DEFINE OUTPUT_FILE AE5MIN.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +AE5MIN.DAT +AE5MIN.FOR +$ DEFINE INPUT_FILE SOFIP07.DAT +$ DEFINE OUTPUT_FILE AE6MAX.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +AE6MAX.DAT +AE6MAX.FOR +$ DEFINE INPUT_FILE SOFIP08.DAT +$ DEFINE OUTPUT_FILE AEI7LO.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +AEI7LO.DAT +AEI7LO.FOR +$ DEFINE INPUT_FILE SOFIP09.DAT +$ DEFINE OUTPUT_FILE AEI7HI.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +AEI7HI.DAT +AEI7HI.FOR +$ DEFINE INPUT_FILE SOFIP10.DAT +$ DEFINE OUTPUT_FILE AP8MIC.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +AP8MIC.DAT +AP8MIC.FOR +$ DEFINE INPUT_FILE SOFIP11.DAT +$ DEFINE OUTPUT_FILE AP8MAC.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +AP8MAC.DAT +AP8MAC.FOR +$ DEFINE INPUT_FILE SOFIP12.DAT +$ DEFINE OUTPUT_FILE SOFIP.DAT +$ RUN UNFOLD_RECORDS +3200 +80 +$ RUN EPDS_TOOLS:STRIP_TO_72 +SOFIP.DAT +SOFIP.FOR +$ DEFINE INPUT_FILE SOFIP13.DAT +$ DEFINE OUTPUT_FILE SAMPLE_ORBIT.DAT +$ RUN UNFOLD_RECORDS +6480 +108 diff --git a/SOFIP/original/aareadme.doc b/SOFIP/original/aareadme.doc new file mode 100755 index 0000000..3abadb5 --- /dev/null +++ b/SOFIP/original/aareadme.doc @@ -0,0 +1,34 @@ + SOFIP 1979 + ---------- + +Author: E.G.Stassinopoulos + NASA/GSFC, Code 933 + Greenbelt, Maryland 20771 + +Parameter: Integrated particle flux for geocentric satellites + +NSSDC ID: PT-15A + +Brief Description: +The Short Orbital Flux Integration Program (SOFIP) is a computer code that +has been developed to evaluate the space radiation environment encountered +by geocentric satellites. It produces for a given input trajectory a +composite integral orbit spectrum of either protons or electrons. Additional +features include calculation of exposure index, peaks per orbit, percent +time in electron trapping zones differential spectrum, and solar proton +fluences (using SOLPRO). SOFIP is a structured, modularized code, which can +perform all the functions of larger and more complex programs, if the +correct modules are used. Care should be taken to use the correct epoch +(1965 for solar minimum and 1970 for maximum) for the geomagnetic field in +the calculation of magnetic field strength B and L-value. B/Bo and L are +needed to determine trapped particle fluxes with the help of the electron (AE) +and proton (AP) models. Otherwise, erroneous fluxes may result at low +altitudes. The code includes the following software files as provided +by the model author: SOFIP.FOR is the FORTRAN program file, AE%%%%.DAT +and AP%%%%.DAT are the model maps in form of BLOCKDATA statements. + +References: + +E. G. Stassinopoulos, J. J. Hebert, E. L. Butler, and J. L. Barth, SOFIP: A +Short Orbital Flux Integration Program, NSSDC 79-01, Greenbelt, Maryland, 1979. + diff --git a/SOFIP/original/ae5min.dat b/SOFIP/original/ae5min.dat new file mode 100755 index 0000000..50fefd0 --- /dev/null +++ b/SOFIP/original/ae5min.dat @@ -0,0 +1,772 @@ + BLOCK DATA AE5MN001 + DOUBLE PRECISION NAME AE5MN002 + COMMON/AE5MIN/NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH,MAP000(101), AE5MN003 + *MAP0A0(108),MAP001(113),MAP002(114),MAP003(151),MAP004(100), AE5MN004 + *MAP0A4(107),MAP005(110),MAP006(111),MAP007(147),MAP008(97), AE5MN005 + *MAP0A8(103),MAP009(105),MAP010(106),MAP011(137),MAP012(94), AE5MN006 + *MAPA12(96),MAP013(95),MAP014(95),MAP015(125),MAP016(91), AE5MN007 + *MAPA16(93),MAP017(91),MAP018(85),MAP019(116),MAP020(89), AE5MN008 + *MAPA20(93),MAP021(90),MAP022(80),MAP023(108),MAP024(87), AE5MN009 + *MAPA24(90),MAP025(85),MAP026(72),MAP027(98),MAP028(82), AE5MN010 + *MAPA28(87),MAP029(80),MAP030(65),MAP031(89),MAP0Z0(76), AE5MN011 + *MAP0Z1(80),MAP0Z2(75),MAP0Z3(57),MAP0Z4(76),MAP032(69), AE5MN012 + *MAPA32(72),MAP033(69),MAP034(49),MAP035(62),MAP036(32), AE5MN013 + *MAPA36(45),MAP037(47),MAP038(27),MAP039(33),MAP040(31), AE5MN014 + *MAP041(31),MAP042(14) AE5MN015 + DATA NAME/8HAE5 PROJ/ AE5MN016 + DATA EPOCH/1975.00/ AE5MN017 + DATA SCAE/1000./ AE5MN018 + DATA SCAL/2000.1/ AE5MN019 + DATA SCAB/150000./ AE5MN020 + DATA SCAF/1024./ AE5MN021 + DATA LENGTH/4930/ AE5MN022 +C L=1.20 TO1.30 40 KEV AE5MN023 + DATA MAP000/ AE5MN024 + . 587, 40, 3, 0, 0, 3, 2200, 0, AE5MN025 + . 27, 2400, 5907, 5393, 2748, 2773, 2720, 2608, 2465, AE5MN026 + . 2301, 2131, 1963, 1786, 1626, 1465, 1324, 1181, 1066, AE5MN027 + . 941, 842, 754, 659, 592, 511, 451, 404, 362, AE5MN028 + . 32, 2500, 7073, 10597, 4887, 4854, 4691, 4439, 4153, AE5MN029 + . 3837, 3500, 3175, 2856, 2553, 2275, 2014, 1769, 1572, AE5MN030 + . 1372, 1191, 1055, 891, 811, 691, 578, 537, 471, AE5MN031 + . 322, 402, 230, 285, 234, AE5MN032 + . 34, 2600, 7700, 25087, 8002, 7151, 6669, 6135, 5559, AE5MN033 + . 4991, 4425, 3904, 3430, 2975, 2566, 2230, 1908, 1613, AE5MN034 + . 1422, 1183, 1011, 875, 743, 550, 603, 339, 494, AE5MN035 + . 281, 158, 324, 306, 172, 97, 54/ AE5MN036 +C L=1.35 TO 1.45 40 KEV AE5MN037 + DATA MAP0A0/ AE5MN038 + . 35, 2700, 7982, 40884, 12461, 10502, 9518, 8454, 7410, AE5MN039 + . 6397, 5449, 4630, 3875, 3209, 2677, 2238, 1815, 1521, AE5MN040 + . 1230, 948, 905, 649, 607, 341, 477, 395, 222, AE5MN041 + . 125, 70, 39, 22, 12, 7, 4, 2, AE5MN042 + . 36, 2800, 8120, 56948, 17986, 15412, 13580, 11663, 9805, AE5MN043 + . 8093, 6581, 5292, 4215, 3346, 2638, 2034, 1622, 1321, AE5MN044 + . 1034, 788, 636, 582, 327, 184, 103, 58, 33, AE5MN045 + . 18, 10, 6, 3, 2, 1, 1, 0, 0, AE5MN046 + . 37, 2900, 8178, 58843, 27009, 24580, 21181, 17450, 13872, AE5MN047 + . 10726, 8122, 6065, 4462, 3222, 2388, 1671, 1491, 997, AE5MN048 + . 675, 379, 213, 120, 67, 38, 21, 12, 7, AE5MN049 + . 4, 2, 1, 1, 0, 0, 0, 0, 0, AE5MN050 + . 0/ AE5MN051 +C L=1.5 TO 1.7 40 KEV AE5MN052 + DATA MAP001/ AE5MN053 + . 37, 3000, 8219, 51891, 38225, 35925, 31065, 25139, 19253, AE5MN054 + . 14201, 10131, 7098, 4857, 3351, 2333, 1884, 1146, 649, AE5MN055 + . 365, 205, 115, 65, 37, 21, 12, 6, 4, AE5MN056 + . 2, 1, 1, 0, 0, 0, 0, 0, 0, AE5MN057 + . 0, AE5MN058 + . 38, 3200, 8277, 55824, 49773, 50034, 45877, 38888, 30842, AE5MN059 + . 23295, 16876, 11912, 8276, 5624, 3748, 3011, 1999, 1219, AE5MN060 + . 686, 386, 217, 122, 69, 39, 22, 12, 7, AE5MN061 + . 4, 2, 1, 1, 0, 0, 0, 0, 0, AE5MN062 + . 0, 0, AE5MN063 + . 38, 3400, 8322, 64991, 61716, 65123, 62436, 54847, 44680, AE5MN064 + . 34409, 25267, 17815, 12489, 8482, 5634, 4167, 2999, 1966, AE5MN065 + . 1106, 622, 350, 197, 111, 62, 35, 20, 11, AE5MN066 + . 6, 3, 2, 1, 1, 0, 0, 0, 0, AE5MN067 + . 0, 0/ AE5MN068 +C L=1.8 TO 2.0 40 KEV AE5MN069 + DATA MAP002/ AE5MN070 + . 38, 3600, 8312, 64725, 71833, 80143, 80809, 74079, 62538, AE5MN071 + . 49194, 36716, 26276, 18214, 12449, 8391, 5639, 4497, 2890, AE5MN072 + . 1694, 953, 536, 301, 169, 95, 54, 30, 17, AE5MN073 + . 10, 5, 3, 2, 1, 1, 0, 0, 0, AE5MN074 + . 0, 0, AE5MN075 + . 38, 3800, 8254, 60464, 81877, 96225,101739, 96913, 84143, AE5MN076 + . 67563, 50931, 36765, 25629, 17424, 11565, 7600, 6229, 3946, AE5MN077 + . 2418, 1360, 765, 430, 242, 136, 76, 43, 24, AE5MN078 + . 14, 8, 4, 2, 1, 1, 0, 0, 0, AE5MN079 + . 0, 0, AE5MN080 + . 38, 4000, 8201, 68492, 97222,118219,128001,123359,107183, AE5MN081 + . 85506, 63705, 45183, 31024, 20550, 13569, 8976, 6951, 4383, AE5MN082 + . 2533, 1424, 801, 450, 253, 142, 80, 45, 25, AE5MN083 + . 14, 8, 5, 3, 1, 1, 0, 0, 0, AE5MN084 + . 0, 0/ AE5MN085 +C L=2.2 TO 3.0 40 KEV AE5MN086 + DATA MAP003/ AE5MN087 + . 37, 4400, 8110, 77700,116405,151941,176248,181462,166343, AE5MN088 + .138235,105947, 76489, 52928, 35360, 23303, 14821, 11474, 7401, AE5MN089 + . 4558, 2563, 1442, 811, 456, 256, 144, 81, 46, AE5MN090 + . 26, 14, 8, 5, 3, 1, 1, 0, 0, AE5MN091 + . 0, AE5MN092 + . 37, 4800, 8014, 85461,134377,186146,230010,251091,242122, AE5MN093 + .209412,164675,121152, 84347, 56714, 37286, 23915, 16893, 11650, AE5MN094 + . 7641, 4297, 2416, 1359, 764, 430, 242, 136, 76, AE5MN095 + . 43, 24, 14, 8, 4, 2, 1, 1, 0, AE5MN096 + . 0, AE5MN097 + . 36, 5200, 7785, 54773, 72665, 94767,120930,121864,168300, AE5MN098 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN099 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE5MN100 + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, 0, AE5MN101 + . 35, 5600, 7575, 54773, 72665, 94767,120930,150210,180644, AE5MN102 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN103 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE5MN104 + . 17049, 13254, 10320, 7993, 6274, 4857, 3644, 2831, AE5MN105 + . 3, 5620, 0, 3, 32767, 0/ AE5MN106 +C L=1.20 TO 1.30 100 KEV AE5MN107 + DATA MAP004/ AE5MN108 + . 575, 100, 3, 0, 0, 3, 2200, 0, AE5MN109 + . 26, 2400, 5736, 5384, 2732, 2760, 2706, 2600, 2457, AE5MN110 + . 2300, 2130, 1960, 1789, 1627, 1464, 1329, 1186, 1073, AE5MN111 + . 948, 846, 756, 658, 600, 517, 455, 407, AE5MN112 + . 32, 2500, 6885, 10570, 4846, 4817, 4659, 4422, 4136, AE5MN113 + . 3827, 3501, 3172, 2866, 2556, 2293, 2025, 1779, 1584, AE5MN114 + . 1384, 1195, 1079, 904, 802, 699, 593, 553, 468, AE5MN115 + . 338, 396, 242, 272, 247, AE5MN116 + . 34, 2600, 7529, 25024, 7950, 7081, 6619, 6108, 5541, AE5MN117 + . 4988, 4447, 3920, 3434, 2998, 2582, 2255, 1927, 1636, AE5MN118 + . 1440, 1207, 1027, 884, 744, 566, 611, 358, 482, AE5MN119 + . 297, 167, 295, 323, 182, 102, 58/ AE5MN120 +C L=1.35 TO 1.45 100 KEV AE5MN121 + DATA MAP0A4/ AE5MN122 + . 35, 2700, 7817, 40761, 12362, 10385, 9452, 8430, 7407, AE5MN123 + . 6414, 5490, 4651, 3916, 3272, 2712, 2268, 1817, 1556, AE5MN124 + . 1250, 999, 911, 635, 643, 362, 449, 419, 235, AE5MN125 + . 132, 74, 42, 24, 13, 7, 4, 2, AE5MN126 + . 36, 2800, 7965, 56707, 17786, 15220, 13489, 11646, 9837, AE5MN127 + . 8156, 6661, 5389, 4280, 3410, 2735, 2097, 1663, 1343, AE5MN128 + . 1030, 840, 614, 621, 349, 196, 110, 62, 35, AE5MN129 + . 20, 11, 6, 3, 2, 1, 1, 0, 0, AE5MN130 + . 36, 2900, 8024, 58270, 26281, 24153, 21053, 17537, 14107, AE5MN131 + . 10985, 8377, 6293, 4668, 3380, 2473, 1774, 1551, 1031, AE5MN132 + . 738, 415, 233, 131, 74, 42, 23, 13, 7, AE5MN133 + . 4, 2, 1, 1, 0, 0, 0, 0, 0/ AE5MN134 +C L=1.5 TO 1.7 100 KEV AE5MN135 + DATA MAP005/ AE5MN136 + . 36, 3000, 8061, 50382, 36638, 34983, 30901, 25510, 19915, AE5MN137 + . 14916, 10772, 7624, 5276, 3568, 2414, 2125, 1273, 738, AE5MN138 + . 415, 233, 131, 74, 41, 23, 13, 7, 4, AE5MN139 + . 2, 1, 1, 0, 0, 0, 0, 0, 0, AE5MN140 + . 37, 3200, 8118, 53434, 46989, 47959, 45041, 39207, 31914, AE5MN141 + . 24685, 18230, 12963, 9176, 6260, 4209, 3122, 2281, 1442, AE5MN142 + . 811, 456, 256, 144, 81, 46, 26, 14, 8, AE5MN143 + . 5, 3, 1, 1, 0, 0, 0, 0, 0, AE5MN144 + . 0, AE5MN145 + . 37, 3400, 8160, 61737, 57511, 61552, 60489, 54804, 46196, AE5MN146 + . 36508, 27467, 19920, 13896, 9645, 6454, 4400, 3586, 2297, AE5MN147 + . 1351, 760, 427, 240, 135, 76, 43, 24, 14, AE5MN148 + . 8, 4, 2, 1, 1, 0, 0, 0, 0, AE5MN149 + . 0/ AE5MN150 +C L=1.8 TO 2.0 100 KEV AE5MN151 + DATA MAP006/ AE5MN152 + . 37, 3600, 8155, 60542, 65968, 74312, 76867, 73052, 64140, AE5MN153 + . 52302, 40349, 29581, 20981, 14445, 9812, 6492, 5105, 3399, AE5MN154 + . 2152, 1210, 680, 383, 215, 121, 68, 38, 22, AE5MN155 + . 12, 7, 4, 2, 1, 1, 0, 0, 0, AE5MN156 + . 0, AE5MN157 + . 37, 3800, 8081, 55418, 73962, 87603, 94999, 94176, 85537, AE5MN158 + . 71861, 56410, 41811, 29992, 20678, 14012, 9331, 6706, 4781, AE5MN159 + . 3178, 1787, 1005, 565, 318, 179, 100, 57, 32, AE5MN160 + . 18, 10, 6, 3, 2, 1, 1, 0, 0, AE5MN161 + . 0, AE5MN162 + . 37, 4000, 8017, 62130, 86556,105970,118079,119200,109292, AE5MN163 + . 91792, 71586, 52500, 37052, 25058, 16723, 10831, 8128, 5445, AE5MN164 + . 3399, 1911, 1075, 604, 340, 191, 107, 60, 34, AE5MN165 + . 19, 11, 6, 3, 2, 1, 1, 0, 0, AE5MN166 + . 0/ AE5MN167 +C L=2.2 TO 3.0 100 KEV AE5MN168 + DATA MAP007/ AE5MN169 + . 37, 4400, 7906, 68565,100146,129829,154552,167752,164827, AE5MN170 + .147163,120668, 91766, 66266, 45676, 30687, 20079, 13136, 10209, AE5MN171 + . 6486, 3793, 2133, 1200, 675, 379, 213, 120, 67, AE5MN172 + . 38, 21, 12, 7, 4, 2, 1, 1, 0, AE5MN173 + . 0, AE5MN174 + . 36, 4800, 7795, 74042,111795,152244,191602,220688,230684, AE5MN175 + .217955,187613,148235,109384, 77341, 51907, 34340, 21885, 16272, AE5MN176 + . 10853, 6945, 3906, 2196, 1235, 695, 391, 220, 124, AE5MN177 + . 69, 39, 22, 12, 7, 4, 2, 1, 1, AE5MN178 + . 35, 5200, 7407, 54773, 72665, 94767,120930,121864,168300, AE5MN179 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN180 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE5MN181 + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, AE5MN182 + . 33, 5600, 7034, 54773, 72665, 94767,120930,150210,180644, AE5MN183 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN184 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE5MN185 + . 17049, 13254, 10320, 7993, 6274, 4857, AE5MN186 + . 3, 5620, 0, 3, 32767, 0/ AE5MN187 +C L=1.20 TO 1.30 250 KEV AE5MN188 + DATA MAP008/ AE5MN189 + . 548, 250, 3, 0, 0, 3, 2200, 0, AE5MN190 + . 25, 2400, 5285, 5355, 2684, 2721, 2667, 2568, 2440, AE5MN191 + . 2285, 2124, 1957, 1793, 1631, 1488, 1336, 1204, 1072, AE5MN192 + . 971, 861, 762, 676, 607, 536, 469, AE5MN193 + . 31, 2500, 6405, 10488, 4717, 4699, 4569, 4347, 4088, AE5MN194 + . 3805, 3492, 3185, 2883, 2590, 2318, 2063, 1829, 1612, AE5MN195 + . 1417, 1252, 1083, 963, 822, 718, 636, 558, 459, AE5MN196 + . 397, 374, 285, 226, AE5MN197 + . 33, 2600, 6922, 24836, 7791, 6879, 6475, 6008, 5491, AE5MN198 + . 4979, 4458, 3957, 3499, 3058, 2661, 2307, 1990, 1721, AE5MN199 + . 1434, 1289, 1080, 913, 750, 669, 593, 425, 440, AE5MN200 + . 353, 199, 194, 386, 217, 122/ AE5MN201 +C L=1.35 TO 1.45 250 KEV AE5MN202 + DATA MAP0A8/ AE5MN203 + . 34, 2700, 7159, 40397, 12084, 10032, 9224, 8319, 7386, AE5MN204 + . 6461, 5580, 4774, 4044, 3384, 2853, 2345, 1976, 1591, AE5MN205 + . 1323, 1118, 919, 645, 711, 434, 347, 505, 284, AE5MN206 + . 160, 90, 50, 28, 16, 9, 5, AE5MN207 + . 34, 2800, 7298, 56000, 17201, 14607, 13162, 11556, 9919, AE5MN208 + . 8354, 6923, 5659, 4548, 3657, 2873, 2319, 1807, 1419, AE5MN209 + . 1013, 1028, 578, 719, 429, 241, 136, 76, 43, AE5MN210 + . 24, 14, 8, 4, 2, 1, 1, AE5MN211 + . 35, 2900, 7380, 56738, 24122, 22779, 20514, 17680, 14665, AE5MN212 + . 11768, 9208, 7005, 5282, 3894, 2877, 2091, 1605, 1206, AE5MN213 + . 927, 550, 310, 174, 98, 55, 31, 17, 10, AE5MN214 + . 6, 3, 2, 1, 1, 0, 0, 0/ AE5MN215 +C L=1.5 TO 1.7 250 KEV AE5MN216 + DATA MAP009/ AE5MN217 + . 35, 3000, 7422, 46490, 32166, 31926, 29725, 26033, 21537, AE5MN218 + . 16961, 12830, 9309, 6656, 4586, 3186, 2287, 1777, 1100, AE5MN219 + . 618, 348, 196, 110, 62, 35, 20, 11, 6, AE5MN220 + . 3, 2, 1, 1, 0, 0, 0, 0, AE5MN221 + . 35, 3200, 7476, 47524, 39615, 41726, 41397, 38645, 33948, AE5MN222 + . 28133, 22163, 16621, 12111, 8565, 5953, 4003, 3064, 2170, AE5MN223 + . 1368, 769, 433, 243, 137, 77, 43, 24, 14, AE5MN224 + . 8, 4, 2, 1, 1, 0, 0, 0, AE5MN225 + . 35, 3400, 7500, 53938, 46962, 51478, 53287, 52078, 47807, AE5MN226 + . 41325, 33642, 25988, 19350, 13763, 9682, 6520, 4422, 3717, AE5MN227 + . 2360, 1413, 795, 447, 251, 141, 79, 45, 25, AE5MN228 + . 14, 8, 4, 3, 1, 1, 0, 0/ AE5MN229 +C L=1.8 TO 2.0 250 KEV AE5MN230 + DATA MAP010/ AE5MN231 + . 36, 3600, 7451, 50809, 51989, 59287, 64173, 65814, 63545, AE5MN232 + . 57656, 49071, 39483, 30096, 21954, 15550, 10721, 7239, 5292, AE5MN233 + . 3791, 2535, 1426, 802, 451, 253, 143, 80, 45, AE5MN234 + . 25, 14, 8, 5, 3, 1, 1, 0, 0, AE5MN235 + . 35, 3800, 7348, 43951, 56260, 66861, 75274, 80402, 81109, AE5MN236 + . 76637, 67819, 56284, 44035, 32814, 23418, 16261, 10968, 7245, AE5MN237 + . 6071, 3819, 2323, 1306, 735, 413, 232, 131, 73, AE5MN238 + . 41, 23, 13, 7, 4, 2, 1, 1, AE5MN239 + . 35, 4000, 7222, 48001, 64012, 77838, 90173, 98634,101707, AE5MN240 + . 97710, 87547, 72988, 56973, 42167, 29878, 20286, 13575, 8986, AE5MN241 + . 7127, 4492, 2633, 1481, 833, 468, 263, 148, 83, AE5MN242 + . 47, 26, 15, 8, 5, 3, 1, 1/ AE5MN243 +C L=2.2 TO 3.0 250 KEV AE5MN244 + DATA MAP011/ AE5MN245 + . 34, 4400, 7022, 50984, 68881, 86630,105015,121429,133797, AE5MN246 + .139353,135859,123646,104489, 82600, 61600, 43676, 29970, 19838, AE5MN247 + . 13074, 10264, 6545, 3861, 2171, 1221, 687, 386, 217, AE5MN248 + . 122, 69, 39, 22, 12, 7, 4, AE5MN249 + . 34, 4800, 6894, 53317, 73073, 94212,117436,141171,163361, AE5MN250 + .179748,187575,183320,167004,141499,111861, 82855, 58642, 39897, AE5MN251 + . 26561, 17702, 13089, 8810, 5067, 2849, 1602, 901, 507, AE5MN252 + . 285, 160, 90, 51, 29, 16, 9, AE5MN253 + . 32, 5200, 6725, 54773, 72665, 94767,120930,121864,168300, AE5MN254 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN255 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE5MN256 + . 7200, 3750, 3750, 6750, 1500, AE5MN257 + . 31, 5600, 6551, 54773, 72665, 94767,120930,150210,180644, AE5MN258 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN259 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE5MN260 + . 17049, 13254, 10320, 7993, AE5MN261 + . 3, 5620, 0, 3, 32767, 0/ AE5MN262 +C L=1.20 TO 1.30 500 KEV AE5MN263 + DATA MAP012/ AE5MN264 + . 505, 500, 3, 0, 0, 3, 2200, 0, AE5MN265 + . 24, 2400, 4291, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN266 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE5MN267 + . 975, 865, 764, 686, 604, 542, AE5MN268 + . 30, 2500, 5471, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN269 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN270 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE5MN271 + . 416, 367, 299, AE5MN272 + . 32, 2600, 6097, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN273 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN274 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE5MN275 + . 372, 209, 160, 406, 228/ AE5MN276 +C L=1.35 TO 1.45 500 KEV AE5MN277 + DATA MAPA12/ AE5MN278 + . 32, 2700, 6408, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN279 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN280 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE5MN281 + . 168, 95, 53, 30, 17, AE5MN282 + . 32, 2800, 6617, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN283 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN284 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE5MN285 + . 26, 14, 8, 5, 3, AE5MN286 + . 32, 2900, 6726, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN287 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN288 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE5MN289 + . 6, 3, 2, 1, 1/ AE5MN290 +C L=1.5 TO 1.7 500 KEV AE5MN291 + DATA MAP013/ AE5MN292 + . 32, 3000, 6771, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN293 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN294 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE5MN295 + . 4, 2, 1, 1, 0, AE5MN296 + . 32, 3200, 6771, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN297 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN298 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE5MN299 + . 9, 5, 3, 2, 1, AE5MN300 + . 31, 3400, 6695, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN301 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN302 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, AE5MN303 + . 17, 10, 5, 3/ AE5MN304 +C L=1.8 TO 2.0 500 KEV AE5MN305 + DATA MAP014/ AE5MN306 + . 32, 3600, 6526, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN307 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN308 + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, AE5MN309 + . 31, 18, 10, 6, 3, AE5MN310 + . 32, 3800, 6321, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN311 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE5MN312 + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, AE5MN313 + . 53, 30, 17, 9, 5, AE5MN314 + . 31, 4000, 6148, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN315 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE5MN316 + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, AE5MN317 + . 61, 34, 19, 11/ AE5MN318 +C L=2.2 TO 3.0 500 KEV AE5MN319 + DATA MAP015/ AE5MN320 + . 30, 4400, 6058, 47488, 62790, 78781, 94700,110076,123024, AE5MN321 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE5MN322 + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, AE5MN323 + . 172, 97, 54, AE5MN324 + . 30, 4800, 6028, 49529, 65656, 84636,103935,125234,145303, AE5MN325 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE5MN326 + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, AE5MN327 + . 430, 242, 136, AE5MN328 + . 30, 5200, 5972, 54773, 72665, 94767,120930,121864,168300, AE5MN329 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN330 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE5MN331 + . 7200, 3750, 3750, AE5MN332 + . 29, 5600, 5917, 54773, 72665, 94767,120930,150210,180644, AE5MN333 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN334 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE5MN335 + . 17049, 13254, AE5MN336 + . 3, 5620, 0, 3, 32767, 0/ AE5MN337 +C L=1.20 TO 1.30 750 KEV AE5MN338 + DATA MAP016/ AE5MN339 + . 476, 750, 3, 0, 0, 3, 2200, 0, AE5MN340 + . 23, 2400, 3596, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN341 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE5MN342 + . 975, 865, 764, 686, 604, AE5MN343 + . 29, 2500, 4794, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN344 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN345 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE5MN346 + . 416, 367, AE5MN347 + . 31, 2600, 5470, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN348 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN349 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE5MN350 + . 372, 209, 160, 406/ AE5MN351 +C L=1.35 TO 1.45 750 KEV AE5MN352 + DATA MAPA16/ AE5MN353 + . 31, 2700, 5894, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN354 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN355 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE5MN356 + . 168, 95, 53, 30, AE5MN357 + . 31, 2800, 6206, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN358 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN359 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE5MN360 + . 26, 14, 8, 5, AE5MN361 + . 31, 2900, 6333, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN362 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN363 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE5MN364 + . 6, 3, 2, 1/ AE5MN365 +C L=1.5 TO 1.7 750 KEV AE5MN366 + DATA MAP017/ AE5MN367 + . 31, 3000, 6367, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN368 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN369 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE5MN370 + . 4, 2, 1, 1, AE5MN371 + . 30, 3200, 6315, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN372 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN373 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE5MN374 + . 9, 5, 3, AE5MN375 + . 30, 3400, 6161, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN376 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN377 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, AE5MN378 + . 17, 10, 5/ AE5MN379 +C L=1.8 TO 2.0 750 KEV AE5MN380 + DATA MAP018/ AE5MN381 + . 29, 3600, 5931, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN382 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN383 + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, AE5MN384 + . 31, 18, AE5MN385 + . 28, 3800, 5692, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN386 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE5MN387 + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, AE5MN388 + . 53, AE5MN389 + . 28, 4000, 5513, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN390 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE5MN391 + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, AE5MN392 + . 61/ AE5MN393 +C L=2.2 TO 3.0 750 KEV AE5MN394 + DATA MAP019/ AE5MN395 + . 27, 4400, 5359, 47488, 62790, 78781, 94700,110076,123024, AE5MN396 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE5MN397 + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, AE5MN398 + . 27, 4800, 5369, 49529, 65656, 84636,103935,125234,145303, AE5MN399 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE5MN400 + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, AE5MN401 + . 28, 5200, 5518, 54773, 72665, 94767,120930,121864,168300, AE5MN402 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN403 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE5MN404 + . 7200, AE5MN405 + . 28, 5600, 5677, 54773, 72665, 94767,120930,150210,180644, AE5MN406 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN407 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE5MN408 + . 17049, AE5MN409 + . 3, 5620, 0, 3, 32767, 0/ AE5MN410 +C L=1.20 TO 1.30 1.00 MEV AE5MN411 + DATA MAP020/ AE5MN412 + . 460, 1000, 3, 0, 0, 3, 2200, 0, AE5MN413 + . 23, 2400, 3149, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN414 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE5MN415 + . 975, 865, 764, 686, 604, AE5MN416 + . 28, 2500, 4466, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN417 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN418 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE5MN419 + . 416, AE5MN420 + . 30, 2600, 5120, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN421 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN422 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE5MN423 + . 372, 209, 160/ AE5MN424 +C L=1.35 TO 1.45 1.00 MEV AE5MN425 + DATA MAPA20/ AE5MN426 + . 31, 2700, 5586, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN427 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN428 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE5MN429 + . 168, 95, 53, 30, AE5MN430 + . 31, 2800, 5917, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN431 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN432 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE5MN433 + . 26, 14, 8, 5, AE5MN434 + . 31, 2900, 6066, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN435 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN436 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE5MN437 + . 6, 3, 2, 1/ AE5MN438 +C L=1.5 TO 1.7 1000 KEV AE5MN439 + DATA MAP021/ AE5MN440 + . 31, 3000, 6077, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN441 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN442 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE5MN443 + . 4, 2, 1, 1, AE5MN444 + . 30, 3200, 5985, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN445 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN446 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE5MN447 + . 9, 5, 3, AE5MN448 + . 29, 3400, 5803, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN449 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN450 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, AE5MN451 + . 17, 10/ AE5MN452 +C L=1.8 TO 2.0 1000 KEV AE5MN453 + DATA MAP022/ AE5MN454 + . 28, 3600, 5558, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN455 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN456 + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, AE5MN457 + . 31, AE5MN458 + . 26, 3800, 5253, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN459 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE5MN460 + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, AE5MN461 + . 26, 4000, 5010, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN462 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE5MN463 + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192/ AE5MN464 +C L=2.2 TO 3.0 1000 KEV AE5MN465 + DATA MAP023/ AE5MN466 + . 24, 4400, 4713, 47488, 62790, 78781, 94700,110076,123024, AE5MN467 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE5MN468 + . 16561, 11965, 8293, 5431, 3054, 1717, AE5MN469 + . 25, 4800, 4803, 49529, 65656, 84636,103935,125234,145303, AE5MN470 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE5MN471 + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, AE5MN472 + . 26, 5200, 5182, 54773, 72665, 94767,120930,121864,168300, AE5MN473 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN474 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, AE5MN475 + . 27, 5600, 5471, 54773, 72665, 94767,120930,150210,180644, AE5MN476 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN477 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE5MN478 + . 3, 5620, 0, 3, 32767, 0/ AE5MN479 +C L=1.20 TO 1.30 1.50 MEV AE5MN480 + DATA MAP024/ AE5MN481 + . 432, 1500, 3, 0, 0, 3, 2200, 0, AE5MN482 + . 22, 2400, 2572, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN483 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE5MN484 + . 975, 865, 764, 686, AE5MN485 + . 27, 2500, 3869, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN486 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN487 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE5MN488 + . 30, 2600, 4606, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN489 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN490 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE5MN491 + . 372, 209, 160/ AE5MN492 +C L=1.35 TO 1.45 1.50 MEV AE5MN493 + DATA MAPA24/ AE5MN494 + . 30, 2700, 5099, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN495 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN496 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE5MN497 + . 168, 95, 53, AE5MN498 + . 30, 2800, 5470, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN499 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN500 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE5MN501 + . 26, 14, 8, AE5MN502 + . 30, 2900, 5664, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN503 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN504 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE5MN505 + . 6, 3, 2/ AE5MN506 +C L=1.5 TO 1.7 1500 KEV AE5MN507 + DATA MAP025/ AE5MN508 + . 30, 3000, 5690, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN509 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN510 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE5MN511 + . 4, 2, 1, AE5MN512 + . 28, 3200, 5545, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN513 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN514 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE5MN515 + . 9, AE5MN516 + . 27, 3400, 5335, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN517 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN518 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30/ AE5MN519 +C L=1.8 TO 2.0 1500 KEV AE5MN520 + DATA MAP026/ AE5MN521 + . 25, 3600, 5042, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN522 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN523 + . 4624, 2962, 1770, 996, 560, 315, 177, AE5MN524 + . 24, 3800, 4620, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN525 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE5MN526 + . 6507, 4502, 2970, 1670, 939, 528, AE5MN527 + . 23, 4000, 4229, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN528 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE5MN529 + . 8065, 5422, 3423, 1925, 1082/ AE5MN530 +C L=2.2 TO 3.0 1500 KEV AE5MN531 + DATA MAP027/ AE5MN532 + . 21, 4400, 3846, 47488, 62790, 78781, 94700,110076,123024, AE5MN533 + .131177,132553,125652,111586, 92462, 71636, 52955, 37122, 25243, AE5MN534 + . 16561, 11965, 8293, AE5MN535 + . 21, 4800, 3918, 49529, 65656, 84636,103935,125234,145303, AE5MN536 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE5MN537 + . 35233, 23066, 16594, AE5MN538 + . 24, 5200, 4569, 54773, 72665, 94767,120930,121864,168300, AE5MN539 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN540 + . 97800, 78000, 59400, 25350, 18750, 13500, AE5MN541 + . 26, 5600, 5048, 54773, 72665, 94767,120930,150210,180644, AE5MN542 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN543 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, AE5MN544 + . 3, 5620, 0, 3, 32767, 0/ AE5MN545 +C L=1.20 TO 1.30 2.00 MEV AE5MN546 + DATA MAP028/ AE5MN547 + . 403, 2000, 3, 0, 0, 3, 2200, 0, AE5MN548 + . 20, 2400, 2228, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN549 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE5MN550 + . 975, 865, AE5MN551 + . 26, 2500, 3497, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN552 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN553 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, AE5MN554 + . 28, 2600, 4229, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN555 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN556 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE5MN557 + . 372/ AE5MN558 +C L=1.35 TO 1.45 2.00 MEV AE5MN559 + DATA MAPA28/ AE5MN560 + . 29, 2700, 4739, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN561 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN562 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE5MN563 + . 168, 95, AE5MN564 + . 29, 2800, 5097, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN565 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN566 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE5MN567 + . 26, 14, AE5MN568 + . 29, 2900, 5309, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN569 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN570 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE5MN571 + . 6, 3/ AE5MN572 +C L=1.5 TO 1.7 2000 KEV AE5MN573 + DATA MAP029/ AE5MN574 + . 28, 3000, 5356, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN575 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN576 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE5MN577 + . 4, AE5MN578 + . 27, 3200, 5170, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN579 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN580 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE5MN581 + . 25, 3400, 4882, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN582 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN583 + . 2664, 1695, 953, 536, 301, 170, 95/ AE5MN584 +C L=1.8 TO 2.0 2000 KEV AE5MN585 + DATA MAP030/ AE5MN586 + . 23, 3600, 4426, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN587 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN588 + . 4624, 2962, 1770, 996, 560, AE5MN589 + . 22, 3800, 3931, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN590 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE5MN591 + . 6507, 4502, 2970, 1670, AE5MN592 + . 20, 4000, 3589, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN593 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE5MN594 + . 8065, 5422/ AE5MN595 +C L=2.2 TO 3.0 2000 KEV AE5MN596 + DATA MAP031/ AE5MN597 + . 18, 4400, 3171, 47488, 62790, 78781, 94700,110076,123024, AE5MN598 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE5MN599 + . 18, 4800, 3072, 49529, 65656, 84636,103935,125234,145303, AE5MN600 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE5MN601 + . 22, 5200, 3937, 54773, 72665, 94767,120930,121864,168300, AE5MN602 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN603 + . 97800, 78000, 59400, 25350, AE5MN604 + . 25, 5600, 4485, 54773, 72665, 94767,120930,150210,180644, AE5MN605 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN606 + .133026,109737, 89266, 71814, 57257, 45328, 35692, AE5MN607 + . 3, 5620, 0, 3, 32767, 0/ AE5MN608 +C L=1.20 TO 1.30 2.50 MEV AE5MN609 + DATA MAP0Z0/ AE5MN610 + . 364, 2500, 3, 0, 0, 3, 2200, 0, AE5MN611 + . 18, 2400, 1766, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN612 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE5MN613 + . 24, 2500, 3044, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN614 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN615 + . 1430, 1259, 1083, 982, 835, 727, AE5MN616 + . 26, 2600, 3869, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN617 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN618 + . 1465, 1281, 1097, 923, 751, 703, 587, 446/ AE5MN619 +C L=1.35 TO 1.45 2.50 MEV AE5MN620 + DATA MAP0Z1/ AE5MN621 + . 26, 2700, 4404, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN622 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN623 + . 1346, 1131, 921, 680, 702, 458, 314, 533, AE5MN624 + . 27, 2800, 4757, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN625 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN626 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE5MN627 + . 27, 2900, 4986, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN628 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN629 + . 952, 598, 336, 189, 106, 60, 34, 19, 11/ AE5MN630 +C L=1.5 TO 1.7 2.50 MEV AE5MN631 + DATA MAP0Z2/ AE5MN632 + . 26, 3000, 5020, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN633 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN634 + . 695, 391, 220, 124, 70, 39, 22, 12, AE5MN635 + . 25, 3200, 4770, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN636 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN637 + . 1581, 897, 504, 284, 159, 90, 50, AE5MN638 + . 24, 3400, 4426, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN639 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN640 + . 2664, 1695, 953, 536, 301, 170/ AE5MN641 +C L=1.8 TO 2.0 2.50 MEV AE5MN642 + DATA MAP0Z3/ AE5MN643 + . 21, 3600, 3911, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN644 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN645 + . 4624, 2962, 1770, AE5MN646 + . 19, 3800, 3345, 40943, 52384, 62024, 70199, 75902, 78093, AE5MN647 + . 75852, 69272, 59488, 48040, 36749, 26945, 18926, 13088, 8734, AE5MN648 + . 6523, AE5MN649 + . 17, 4000, 2956, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN650 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327/ AE5MN651 +C L=2.2 TO 3.0 2.50 MEV AE5MN652 + DATA MAP0Z4/ AE5MN653 + . 15, 4400, 2493, 47488, 62790, 78781, 94700,110076,123024, AE5MN654 + .131177,132553,125652,111586, 92462, 71636, AE5MN655 + . 14, 4800, 2297, 49529, 65656, 84636,103935,125234,145303, AE5MN656 + .163236,174969,178212,170767,153191, AE5MN657 + . 18, 5200, 3196, 54773, 72665, 94767,120930,121864,168300, AE5MN658 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE5MN659 + . 23, 5600, 3986, 54773, 72665, 94767,120930,150210,180644, AE5MN660 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN661 + .133026,109737, 89266, 71814, 57257, AE5MN662 + . 3, 5620, 0, 3, 32767, 0/ AE5MN663 +C L=1.20 TO 1.30 3.00 MEV AE5MN664 + DATA MAP032/ AE5MN665 + . 321, 3000, 3, 0, 0, 3, 2200, 0, AE5MN666 + . 16, 2400, 1230, 5347, 2670, 2710, 2657, 2560, 2433, AE5MN667 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, AE5MN668 + . 21, 2500, 2537, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN669 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE5MN670 + . 1430, 1259, 1083, AE5MN671 + . 24, 2600, 3308, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN672 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE5MN673 + . 1465, 1281, 1097, 923, 751, 703/ AE5MN674 +C L=1.35 TO 1.45 3.00 MEV AE5MN675 + DATA MAPA32/ AE5MN676 + . 24, 2700, 3715, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN677 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE5MN678 + . 1346, 1131, 921, 680, 702, 458, AE5MN679 + . 24, 2800, 3968, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN680 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE5MN681 + . 1055, 1042, 613, 704, 456, 256, AE5MN682 + . 24, 2900, 4138, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN683 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE5MN684 + . 952, 598, 336, 189, 106, 60/ AE5MN685 +C L=1.5 TO 1.7 3000 KEV AE5MN686 + DATA MAP033/ AE5MN687 + . 24, 3000, 4138, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN688 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE5MN689 + . 695, 391, 220, 124, 70, 39, AE5MN690 + . 23, 3200, 3869, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN691 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE5MN692 + . 1581, 897, 504, 284, 159, AE5MN693 + . 22, 3400, 3514, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN694 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE5MN695 + . 2664, 1695, 953, 536/ AE5MN696 +C L=1.8 TO 2.0 3000 KEV AE5MN697 + DATA MAP034/ AE5MN698 + . 19, 3600, 3081, 48616, 48894, 55717, 60750, 63092, 62213, AE5MN699 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE5MN700 + . 4624, AE5MN701 + . 16, 3800, 2551, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN702 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, AE5MN703 + . 14, 4000, 2086, 45118, 59201, 71966, 83342, 92297, 97094, AE5MN704 + . 96119, 89035, 77026, 62490, 47575/ AE5MN705 +C L=2.2 TO 3.0 3000 KEV AE5MN706 + DATA MAP035/ AE5MN707 + . 11, 4400, 1404, 47488, 62790, 78781, 94700,110076,123024, AE5MN708 + .131177,132553, AE5MN709 + . 8, 4800, 1024, 49529, 65656, 84636,103935,125234, AE5MN710 + . 17, 5200, 2455, 54773, 72665, 94767,120930,121864,168300, AE5MN711 + .176400,195450,211500,199950,173400,184800,158400,136800, AE5MN712 + . 20, 5600, 3380, 54773, 72665, 94767,120930,150210,180644, AE5MN713 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE5MN714 + .133026,109737, AE5MN715 + . 3, 5620, 0, 3, 32767, 0/ AE5MN716 +C L=1.20 TO 1.30 4.00 MEV AE5MN717 + DATA MAP036/ AE5MN718 + . 184, 4000, 3, 0, 0, 3, 2400, 0, AE5MN719 + . 11, 2500, 669, 10465, 4679, 4669, 4542, 4327, 4076, AE5MN720 + . 3792, 3491, AE5MN721 + . 13, 2600, 1233, 24783, 7745, 6822, 6426, 5981, 5480, AE5MN722 + . 4966, 4472, 3970, 3502/ AE5MN723 +C L=1.35 TO 1.45 4.00 MEV AE5MN724 + DATA MAPA36/ AE5MN725 + . 14, 2700, 1568, 40297, 12004, 9928, 9156, 8294, 7366, AE5MN726 + . 6470, 5615, 4793, 4085, 3423, AE5MN727 + . 15, 2800, 1806, 55808, 17043, 14421, 13069, 11529, 9943, AE5MN728 + . 8406, 6978, 5723, 4610, 3730, 2935, AE5MN729 + . 16, 2900, 1908, 56343, 23557, 22371, 20306, 17687, 14787, AE5MN730 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186/ AE5MN731 +C L=1.5 TO 1.7 4000 KEV AE5MN732 + DATA MAP037/ AE5MN733 + . 16, 3000, 1914, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN734 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, AE5MN735 + . 16, 3200, 1842, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN736 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, AE5MN737 + . 15, 3400, 1693, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN738 + . 42048, 35052, 27724, 20911, 15140, 10811/ AE5MN739 +C L=1.8 TO 2.0 4000 KEV AE5MN740 + DATA MAP038/ AE5MN741 + . 12, 3600, 1431,048616, 48894, 55717, 60750, 63092, 62213, AE5MN742 + . 57866, 50662, 41864, AE5MN743 + . 9, 3800, 1066, 41466, 52542, 62164, 70320, 76003, 78120, AE5MN744 + . 6, 4000, 616, 45118, 59201, 71966/ AE5MN745 +C L=2.2 TO 3.0 4000 KEV AE5MN746 + DATA MAP039/ AE5MN747 + . 3, 4400, 0, AE5MN748 + . 3, 5300, 0, AE5MN749 + . 9, 5200, 425, 54773, 72665, 94767,120930,121864,168300, AE5MN750 + . 12, 5600, 1662, 54773, 72665, 94767,120930,150210,180644, AE5MN751 + .209294,232704,247730, AE5MN752 + . 3, 5620, 0, 3, 32767, 0/ AE5MN753 +C L=1.20 TO 1.45 4.50 MEV AE5MN754 + DATA MAP040/ AE5MN755 + . 75, 4500, 3, 0, 0, 3, 2600, 0, AE5MN756 + . 6, 2700, 389, 40297, 12004, 9928, AE5MN757 + . 8, 2800, 659, 55808, 17043, 14421, 13069, 11529, AE5MN758 + . 9, 2900, 797, 56343, 23557, 22371, 20306, 17687, 14787/ AE5MN759 +C L=1.5 TO 1.7 4500 KEV AE5MN760 + DATA MAP041/ AE5MN761 + . 10, 3000, 818, 45531, 31037, 31028, 29242, 26022, 21862, AE5MN762 + . 17490, AE5MN763 + . 11, 3200, 754, 46114, 37841, 40048, 40182, 38118, 34149, AE5MN764 + . 28849, 23157, AE5MN765 + . 10, 3400, 559, 52148, 44533, 48922, 51107, 50748, 47550, AE5MN766 + . 42048/ AE5MN767 +C L=1.8 TO 2.0 4500 KEV AE5MN768 + DATA MAP042/ AE5MN769 + . 7, 3600, 149, 48616, 48894, 55717, 60750, AE5MN770 + . 3, 3700, 0, 3, 32767, 0, 0/ AE5MN771 + END AE5MN772 diff --git a/SOFIP/original/ae6max.dat b/SOFIP/original/ae6max.dat new file mode 100755 index 0000000..525f319 --- /dev/null +++ b/SOFIP/original/ae6max.dat @@ -0,0 +1,772 @@ + BLOCK DATA AE6MX001 + DOUBLE PRECISION NAME AE6MX002 + COMMON/AE6MAX/NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH,MAP000(101), AE6MX003 + *MAP0A0(108),MAP001(113),MAP002(114),MAP003(151),MAP004(100), AE6MX004 + *MAP0A4(107),MAP005(110),MAP006(111),MAP007(147),MAP008(97), AE6MX005 + *MAP0A8(103),MAP009(105),MAP010(106),MAP011(137),MAP012(94), AE6MX006 + *MAPA12(96),MAP013(95),MAP014(95),MAP015(125),MAP016(91), AE6MX007 + *MAPA16(93),MAP017(91),MAP018(85),MAP019(116),MAP020(89), AE6MX008 + *MAPA20(93),MAP021(90),MAP022(80),MAP023(108),MAP024(87), AE6MX009 + *MAPA24(90),MAP025(85),MAP026(72),MAP027(98),MAP028(82), AE6MX010 + *MAPA28(87),MAP029(80),MAP030(65),MAP031(89),MAP0Z0(76), AE6MX011 + *MAP0Z1(80),MAP0Z2(75),MAP0Z3(57),MAP0Z4(76),MAP032(69), AE6MX012 + *MAPA32(72),MAP033(69),MAP034(49),MAP035(62),MAP036(32), AE6MX013 + *MAPA36(45),MAP037(47),MAP038(27),MAP039(33),MAP040(31), AE6MX014 + *MAP041(31),MAP042(14) AE6MX015 + DATA NAME/8HAE6 MAX / AE6MX016 + DATA EPOCH/1980.500/ AE6MX017 + DATA SCAE/1000./ AE6MX018 + DATA SCAL/2000.1/ AE6MX019 + DATA SCAB/150000./ AE6MX020 + DATA SCAF/1024./ AE6MX021 + DATA LENGTH/4935/ AE6MX022 +C L=1.20 TO1.30 40 KEV AE6MX023 + DATA MAP000/ AE6MX024 + . 587, 40, 3, 0, 0, 3, 2200, 0, AE6MX025 + . 27, 2400, 5907, 5393, 2748, 2773, 2720, 2608, 2465, AE6MX026 + . 2301, 2131, 1963, 1786, 1626, 1465, 1324, 1181, 1066, AE6MX027 + . 941, 842, 754, 659, 592, 511, 451, 404, 362, AE6MX028 + . 32, 2500, 7393, 10597, 4887, 4854, 4691, 4439, 4153, AE6MX029 + . 3837, 3500, 3175, 2856, 2553, 2275, 2014, 1769, 1572, AE6MX030 + . 1372, 1191, 1055, 891, 811, 691, 578, 537, 471, AE6MX031 + . 322, 402, 230, 285, 234, AE6MX032 + . 34, 2600, 7926, 25087, 8002, 7151, 6669, 6135, 5559, AE6MX033 + . 4991, 4425, 3904, 3430, 2975, 2566, 2230, 1908, 1613, AE6MX034 + . 1422, 1183, 1011, 875, 743, 550, 603, 339, 494, AE6MX035 + . 281, 158, 324, 306, 172, 97, 54/ AE6MX036 +C L=1.35 TO 1.45 40 KEV AE6MX037 + DATA MAP0A0/ AE6MX038 + . 35, 2700, 8153, 40884, 12461, 10502, 9518, 8454, 7410, AE6MX039 + . 6397, 5449, 4630, 3875, 3209, 2677, 2238, 1815, 1521, AE6MX040 + . 1230, 948, 905, 649, 607, 341, 477, 395, 222, AE6MX041 + . 125, 70, 39, 22, 12, 7, 4, 2, AE6MX042 + . 36, 2800, 8339, 56948, 17986, 15412, 13580, 11663, 9805, AE6MX043 + . 8093, 6581, 5292, 4215, 3346, 2638, 2034, 1622, 1321, AE6MX044 + . 1034, 788, 636, 582, 327, 184, 103, 58, 33, AE6MX045 + . 18, 10, 6, 3, 2, 1, 1, 0, 0, AE6MX046 + . 37, 2900, 8464, 58843, 27009, 24580, 21181, 17450, 13872, AE6MX047 + . 10726, 8122, 6065, 4462, 3222, 2388, 1671, 1491, 997, AE6MX048 + . 675, 379, 213, 120, 67, 38, 21, 12, 7, AE6MX049 + . 4, 2, 1, 1, 0, 0, 0, 0, 0, AE6MX050 + . 0/ AE6MX051 +C L=1.5 TO 1.7 40 KEV AE6MX052 + DATA MAP001/ AE6MX053 + . 37, 3000, 8568, 51891, 38225, 35925, 31065, 25139, 19253, AE6MX054 + . 14201, 10131, 7098, 4857, 3351, 2333, 1884, 1146, 649, AE6MX055 + . 365, 205, 115, 65, 37, 21, 12, 6, 4, AE6MX056 + . 2, 1, 1, 0, 0, 0, 0, 0, 0, AE6MX057 + . 0, AE6MX058 + . 38, 3200, 8720, 55824, 49773, 50034, 45877, 38888, 30842, AE6MX059 + . 23295, 16876, 11912, 8276, 5624, 3748, 3011, 1999, 1219, AE6MX060 + . 686, 386, 217, 122, 69, 39, 22, 12, 7, AE6MX061 + . 4, 2, 1, 1, 0, 0, 0, 0, 0, AE6MX062 + . 0, 0, AE6MX063 + . 38, 3400, 8812, 64991, 61716, 65123, 62436, 54847, 44680, AE6MX064 + . 34409, 25267, 17815, 12489, 8482, 5634, 4167, 2999, 1966, AE6MX065 + . 1106, 622, 350, 197, 111, 62, 35, 20, 11, AE6MX066 + . 6, 3, 2, 1, 1, 0, 0, 0, 0, AE6MX067 + . 0, 0/ AE6MX068 +C L=1.8 TO 2.0 40 KEV AE6MX069 + DATA MAP002/ AE6MX070 + . 38, 3600, 8842, 64725, 71833, 80143, 80809, 74079, 62538, AE6MX071 + . 49194, 36716, 26276, 18214, 12449, 8391, 5639, 4497, 2890, AE6MX072 + . 1694, 953, 536, 301, 169, 95, 54, 30, 17, AE6MX073 + . 10, 5, 3, 2, 1, 1, 0, 0, 0, AE6MX074 + . 0, 0, AE6MX075 + . 38, 3800, 8814, 60464, 81877, 96225,101739, 96913, 84143, AE6MX076 + . 67563, 50931, 36765, 25629, 17424, 11565, 7600, 6229, 3946, AE6MX077 + . 2418, 1360, 765, 430, 242, 136, 76, 43, 24, AE6MX078 + . 14, 8, 4, 2, 1, 1, 0, 0, 0, AE6MX079 + . 0, 0, AE6MX080 + . 38, 4000, 8766, 68492, 97222,118219,128001,123359,107183, AE6MX081 + . 85506, 63705, 45183, 31024, 20550, 13569, 8976, 6951, 4383, AE6MX082 + . 2533, 1424, 801, 450, 253, 142, 80, 45, 25, AE6MX083 + . 14, 8, 5, 3, 1, 1, 0, 0, 0, AE6MX084 + . 0, 0/ AE6MX085 +C L=2.2 TO 3.0 40 KEV AE6MX086 + DATA MAP003/ AE6MX087 + . 37, 4400, 8669, 77700,116405,151941,176248,181462,166343, AE6MX088 + .138235,105947, 76489, 52928, 35360, 23303, 14821, 11474, 7401, AE6MX089 + . 4558, 2563, 1442, 811, 456, 256, 144, 81, 46, AE6MX090 + . 26, 14, 8, 5, 3, 1, 1, 0, 0, AE6MX091 + . 0, AE6MX092 + . 37, 4800, 8562, 85461,134377,186146,230010,251091,242122, AE6MX093 + .209412,164675,121152, 84347, 56714, 37286, 23915, 16893, 11650, AE6MX094 + . 7641, 4297, 2416, 1359, 764, 430, 242, 136, 76, AE6MX095 + . 43, 24, 14, 8, 4, 2, 1, 1, 0, AE6MX096 + . 0, AE6MX097 + . 36, 5200, 8273, 54773, 72665, 94767,120930,121864,168300, AE6MX098 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX099 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE6MX100 + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, 0, AE6MX101 + . 35, 5600, 8030, 54773, 72665, 94767,120930,150210,180644, AE6MX102 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX103 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE6MX104 + . 17049, 13254, 10320, 7993, 6274, 4857, 3644, 2831, AE6MX105 + . 3, 5620, 0, 3, 32767, 0/ AE6MX106 +C L=1.20 TO 1.30 100 KEV AE6MX107 + DATA MAP004/ AE6MX108 + . 575, 100, 3, 0, 0, 3, 2200, 0, AE6MX109 + . 26, 2400, 5801, 5384, 2732, 2760, 2706, 2600, 2457, AE6MX110 + . 2300, 2130, 1960, 1789, 1627, 1464, 1329, 1186, 1073, AE6MX111 + . 948, 846, 756, 658, 600, 517, 455, 407, AE6MX112 + . 32, 2500, 7285, 10570, 4846, 4817, 4659, 4422, 4136, AE6MX113 + . 3827, 3501, 3172, 2866, 2556, 2293, 2025, 1779, 1584, AE6MX114 + . 1384, 1195, 1079, 904, 802, 699, 593, 553, 468, AE6MX115 + . 338, 396, 242, 272, 247, AE6MX116 + . 34, 2600, 7818, 25024, 7950, 7081, 6619, 6108, 5541, AE6MX117 + . 4988, 4447, 3920, 3434, 2998, 2582, 2255, 1927, 1636, AE6MX118 + . 1440, 1207, 1027, 884, 744, 566, 611, 358, 482, AE6MX119 + . 297, 167, 295, 323, 182, 102, 58/ AE6MX120 +C L=1.35 TO 1.45 100 KEV AE6MX121 + DATA MAP0A4/ AE6MX122 + . 35, 2700, 8028, 40761, 12362, 10385, 9452, 8430, 7407, AE6MX123 + . 6414, 5490, 4651, 3916, 3272, 2712, 2268, 1817, 1556, AE6MX124 + . 1250, 999, 911, 635, 643, 362, 449, 419, 235, AE6MX125 + . 132, 74, 42, 24, 13, 7, 4, 2, AE6MX126 + . 36, 2800, 8206, 56707, 17786, 15220, 13489, 11646, 9837, AE6MX127 + . 8156, 6661, 5389, 4280, 3410, 2735, 2097, 1663, 1343, AE6MX128 + . 1030, 840, 614, 621, 349, 196, 110, 62, 35, AE6MX129 + . 20, 11, 6, 3, 2, 1, 1, 0, 0, AE6MX130 + . 36, 2900, 8332, 58270, 26281, 24153, 21053, 17537, 14107, AE6MX131 + . 10985, 8377, 6293, 4668, 3380, 2473, 1774, 1551, 1031, AE6MX132 + . 738, 415, 233, 131, 74, 42, 23, 13, 7, AE6MX133 + . 4, 2, 1, 1, 0, 0, 0, 0, 0/ AE6MX134 +C L=1.5 TO 1.7 100 KEV AE6MX135 + DATA MAP005/ AE6MX136 + . 36, 3000, 8428, 50382, 36638, 34983, 30901, 25510, 19915, AE6MX137 + . 14916, 10772, 7624, 5276, 3568, 2414, 2125, 1273, 738, AE6MX138 + . 415, 233, 131, 74, 41, 23, 13, 7, 4, AE6MX139 + . 2, 1, 1, 0, 0, 0, 0, 0, 0, AE6MX140 + . 37, 3200, 8572, 53434, 46989, 47959, 45041, 39207, 31914, AE6MX141 + . 24685, 18230, 12963, 9176, 6260, 4209, 3122, 2281, 1442, AE6MX142 + . 811, 456, 256, 144, 81, 46, 26, 14, 8, AE6MX143 + . 5, 3, 1, 1, 0, 0, 0, 0, 0, AE6MX144 + . 0, AE6MX145 + . 37, 3400, 8667, 61737, 57511, 61552, 60489, 54804, 46196, AE6MX146 + . 36508, 27467, 19920, 13896, 9645, 6454, 4400, 3586, 2297, AE6MX147 + . 1351, 760, 427, 240, 135, 76, 43, 24, 14, AE6MX148 + . 8, 4, 2, 1, 1, 0, 0, 0, 0, AE6MX149 + . 0/ AE6MX150 +C L=1.8 TO 2.0 100 KEV AE6MX151 + DATA MAP006/ AE6MX152 + . 37, 3600, 8695, 60542, 65968, 74312, 76867, 73052, 64140, AE6MX153 + . 52302, 40349, 29581, 20981, 14445, 9812, 6492, 5105, 3399, AE6MX154 + . 2152, 1210, 680, 383, 215, 121, 68, 38, 22, AE6MX155 + . 12, 7, 4, 2, 1, 1, 0, 0, 0, AE6MX156 + . 0, AE6MX157 + . 37, 3800, 8656, 55418, 73962, 87603, 94999, 94176, 85537, AE6MX158 + . 71861, 56410, 41811, 29992, 20678, 14012, 9331, 6706, 4781, AE6MX159 + . 3178, 1787, 1005, 565, 318, 179, 100, 57, 32, AE6MX160 + . 18, 10, 6, 3, 2, 1, 1, 0, 0, AE6MX161 + . 0, AE6MX162 + . 37, 4000, 8608, 62130, 86556,105970,118079,119200,109292, AE6MX163 + . 91792, 71586, 52500, 37052, 25058, 16723, 10831, 8128, 5445, AE6MX164 + . 3399, 1911, 1075, 604, 340, 191, 107, 60, 34, AE6MX165 + . 19, 11, 6, 3, 2, 1, 1, 0, 0, AE6MX166 + . 0/ AE6MX167 +C L=2.2 TO 3.0 100 KEV AE6MX168 + DATA MAP007/ AE6MX169 + . 37, 4400, 8507, 68565,100146,129829,154552,167752,164827, AE6MX170 + .147163,120668, 91766, 66266, 45676, 30687, 20079, 13136, 10209, AE6MX171 + . 6486, 3793, 2133, 1200, 675, 379, 213, 120, 67, AE6MX172 + . 38, 21, 12, 7, 4, 2, 1, 1, 0, AE6MX173 + . 0, AE6MX174 + . 36, 4800, 8395, 74042,111795,152244,191602,220688,230684, AE6MX175 + .217955,187613,148235,109384, 77341, 51907, 34340, 21885, 16272, AE6MX176 + . 10853, 6945, 3906, 2196, 1235, 695, 391, 220, 124, AE6MX177 + . 69, 39, 22, 12, 7, 4, 2, 1, 1, AE6MX178 + . 35, 5200, 7942, 54773, 72665, 94767,120930,121864,168300, AE6MX179 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX180 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE6MX181 + . 7200, 3750, 3750, 6750, 1500, 3000, 1500, 0, AE6MX182 + . 33, 5600, 7538, 54773, 72665, 94767,120930,150210,180644, AE6MX183 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX184 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE6MX185 + . 17049, 13254, 10320, 7993, 6274, 4857, AE6MX186 + . 3, 5620, 0, 3, 32767, 0/ AE6MX187 +C L=1.20 TO 1.30 250 KEV AE6MX188 + DATA MAP008/ AE6MX189 + . 548, 250, 3, 0, 0, 3, 2200, 0, AE6MX190 + . 25, 2400, 5498, 5355, 2684, 2721, 2667, 2568, 2440, AE6MX191 + . 2285, 2124, 1957, 1793, 1631, 1488, 1336, 1204, 1072, AE6MX192 + . 971, 861, 762, 676, 607, 536, 469, AE6MX193 + . 31, 2500, 6948, 10488, 4717, 4699, 4569, 4347, 4088, AE6MX194 + . 3805, 3492, 3185, 2883, 2590, 2318, 2063, 1829, 1612, AE6MX195 + . 1417, 1252, 1083, 963, 822, 718, 636, 558, 459, AE6MX196 + . 397, 374, 285, 226, AE6MX197 + . 33, 2600, 7377, 24836, 7791, 6879, 6475, 6008, 5491, AE6MX198 + . 4979, 4458, 3957, 3499, 3058, 2661, 2307, 1990, 1721, AE6MX199 + . 1434, 1289, 1080, 913, 750, 669, 593, 425, 440, AE6MX200 + . 353, 199, 194, 386, 217, 122/ AE6MX201 +C L=1.35 TO 1.45 250 KEV AE6MX202 + DATA MAP0A8/ AE6MX203 + . 34, 2700, 7584, 40397, 12084, 10032, 9224, 8319, 7386, AE6MX204 + . 6461, 5580, 4774, 4044, 3384, 2853, 2345, 1976, 1591, AE6MX205 + . 1323, 1118, 919, 645, 711, 434, 347, 505, 284, AE6MX206 + . 160, 90, 50, 28, 16, 9, 5, AE6MX207 + . 34, 2800, 7737, 56000, 17201, 14607, 13162, 11556, 9919, AE6MX208 + . 8354, 6923, 5659, 4548, 3657, 2873, 2319, 1807, 1419, AE6MX209 + . 1013, 1028, 578, 719, 429, 241, 136, 76, 43, AE6MX210 + . 24, 14, 8, 4, 2, 1, 1, AE6MX211 + . 35, 2900, 7856, 56738, 24122, 22779, 20514, 17680, 14665, AE6MX212 + . 11768, 9208, 7005, 5282, 3894, 2877, 2091, 1605, 1206, AE6MX213 + . 927, 550, 310, 174, 98, 55, 31, 17, 10, AE6MX214 + . 6, 3, 2, 1, 1, 0, 0, 0/ AE6MX215 +C L=1.5 TO 1.7 250 KEV AE6MX216 + DATA MAP009/ AE6MX217 + . 35, 3000, 7959, 46490, 32166, 31926, 29725, 26033, 21537, AE6MX218 + . 16961, 12830, 9309, 6656, 4586, 3186, 2287, 1777, 1100, AE6MX219 + . 618, 348, 196, 110, 62, 35, 20, 11, 6, AE6MX220 + . 3, 2, 1, 1, 0, 0, 0, 0, AE6MX221 + . 35, 3200, 8092, 47524, 39615, 41726, 41397, 38645, 33948, AE6MX222 + . 28133, 22163, 16621, 12111, 8565, 5953, 4003, 3064, 2170, AE6MX223 + . 1368, 769, 433, 243, 137, 77, 43, 24, 14, AE6MX224 + . 8, 4, 2, 1, 1, 0, 0, 0, AE6MX225 + . 35, 3400, 8189, 53938, 46962, 51478, 53287, 52078, 47807, AE6MX226 + . 41325, 33642, 25988, 19350, 13763, 9682, 6520, 4422, 3717, AE6MX227 + . 2360, 1413, 795, 447, 251, 141, 79, 45, 25, AE6MX228 + . 14, 8, 4, 3, 1, 1, 0, 0/ AE6MX229 +C L=1.8 TO 2.0 250 KEV AE6MX230 + DATA MAP010/ AE6MX231 + . 36, 3600, 8218, 50809, 51989, 59287, 64173, 65814, 63545, AE6MX232 + . 57656, 49071, 39483, 30096, 21954, 15550, 10721, 7239, 5292, AE6MX233 + . 3791, 2535, 1426, 802, 451, 253, 143, 80, 45, AE6MX234 + . 25, 14, 8, 5, 3, 1, 1, 0, 0, AE6MX235 + . 35, 3800, 8156, 43951, 56260, 66861, 75274, 80402, 81109, AE6MX236 + . 76637, 67819, 56284, 44035, 32814, 23418, 16261, 10968, 7245, AE6MX237 + . 6071, 3819, 2323, 1306, 735, 413, 232, 131, 73, AE6MX238 + . 41, 23, 13, 7, 4, 2, 1, 1, AE6MX239 + . 35, 4000, 8066, 48001, 64012, 77838, 90173, 98634,101707, AE6MX240 + . 97710, 87547, 72988, 56973, 42167, 29878, 20286, 13575, 8986, AE6MX241 + . 7127, 4492, 2633, 1481, 833, 468, 263, 148, 83, AE6MX242 + . 47, 26, 15, 8, 5, 3, 1, 1/ AE6MX243 +C L=2.2 TO 3.0 250 KEV AE6MX244 + DATA MAP011/ AE6MX245 + . 34, 4400, 7864, 50984, 68881, 86630,105015,121429,133797, AE6MX246 + .139353,135859,123646,104489, 82600, 61600, 43676, 29970, 19838, AE6MX247 + . 13074, 10264, 6545, 3861, 2171, 1221, 687, 386, 217, AE6MX248 + . 122, 69, 39, 22, 12, 7, 4, AE6MX249 + . 34, 4800, 7685, 53317, 73073, 94212,117436,141171,163361, AE6MX250 + .179748,187575,183320,167004,141499,111861, 82855, 58642, 39897, AE6MX251 + . 26561, 17702, 13089, 8810, 5067, 2849, 1602, 901, 507, AE6MX252 + . 285, 160, 90, 51, 29, 16, 9, AE6MX253 + . 32, 5200, 7363, 54773, 72665, 94767,120930,121864,168300, AE6MX254 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX255 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE6MX256 + . 7200, 3750, 3750, 6750, 1500, AE6MX257 + . 31, 5600, 7040, 54773, 72665, 94767,120930,150210,180644, AE6MX258 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX259 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE6MX260 + . 17049, 13254, 10320, 7993, AE6MX261 + . 3, 5620, 0, 3, 32767, 0/ AE6MX262 +C L=1.20 TO 1.30 500 KEV AE6MX263 + DATA MAP012/ AE6MX264 + . 505, 500, 3, 0, 0, 3, 2200, 0, AE6MX265 + . 24, 2400, 4305, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX266 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE6MX267 + . 975, 865, 764, 686, 604, 542, AE6MX268 + . 30, 2500, 5677, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX269 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX270 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE6MX271 + . 416, 367, 299, AE6MX272 + . 32, 2600, 6186, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX273 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX274 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE6MX275 + . 372, 209, 160, 406, 228/ AE6MX276 +C L=1.35 TO 1.45 500 KEV AE6MX277 + DATA MAPA12/ AE6MX278 + . 32, 2700, 6494, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX279 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX280 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE6MX281 + . 168, 95, 53, 30, 17, AE6MX282 + . 32, 2800, 6686, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX283 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX284 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE6MX285 + . 26, 14, 8, 5, 3, AE6MX286 + . 32, 2900, 6802, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX287 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX288 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE6MX289 + . 6, 3, 2, 1, 1/ AE6MX290 +C L=1.5 TO 1.7 500 KEV AE6MX291 + DATA MAP013/ AE6MX292 + . 32, 3000, 6902, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX293 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX294 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE6MX295 + . 4, 2, 1, 1, 0, AE6MX296 + . 32, 3200, 7045, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX297 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX298 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE6MX299 + . 9, 5, 3, 2, 1, AE6MX300 + . 31, 3400, 7130, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX301 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX302 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, AE6MX303 + . 17, 10, 5, 3/ AE6MX304 +C L=1.8 TO 2.0 500 KEV AE6MX305 + DATA MAP014/ AE6MX306 + . 32, 3600, 7195, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX307 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX308 + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, AE6MX309 + . 31, 18, 10, 6, 3, AE6MX310 + . 32, 3800, 7173, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX311 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE6MX312 + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, AE6MX313 + . 53, 30, 17, 9, 5, AE6MX314 + . 31, 4000, 7052, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX315 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE6MX316 + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, AE6MX317 + . 61, 34, 19, 11/ AE6MX318 +C L=2.2 TO 3.0 500 KEV AE6MX319 + DATA MAP015/ AE6MX320 + . 30, 4400, 6798, 47488, 62790, 78781, 94700,110076,123024, AE6MX321 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE6MX322 + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, AE6MX323 + . 172, 97, 54, AE6MX324 + . 30, 4800, 6749, 49529, 65656, 84636,103935,125234,145303, AE6MX325 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE6MX326 + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, AE6MX327 + . 430, 242, 136, AE6MX328 + . 30, 5200, 6650, 54773, 72665, 94767,120930,121864,168300, AE6MX329 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX330 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE6MX331 + . 7200, 3750, 3750, AE6MX332 + . 29, 5600, 6551, 54773, 72665, 94767,120930,150210,180644, AE6MX333 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX334 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE6MX335 + . 17049, 13254, AE6MX336 + . 3, 5620, 0, 3, 32767, 0/ AE6MX337 +C L=1.20 TO 1.30 750 KEV AE6MX338 + DATA MAP016/ AE6MX339 + . 476, 750, 3, 0, 0, 3, 2200, 0, AE6MX340 + . 23, 2400, 3623, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX341 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE6MX342 + . 975, 865, 764, 686, 604, AE6MX343 + . 29, 2500, 4922, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX344 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX345 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE6MX346 + . 416, 367, AE6MX347 + . 31, 2600, 5527, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX348 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX349 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE6MX350 + . 372, 209, 160, 406/ AE6MX351 +C L=1.35 TO 1.45 750 KEV AE6MX352 + DATA MAPA16/ AE6MX353 + . 31, 2700, 5946, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX354 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX355 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE6MX356 + . 168, 95, 53, 30, AE6MX357 + . 31, 2800, 6243, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX358 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX359 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE6MX360 + . 26, 14, 8, 5, AE6MX361 + . 31, 2900, 6375, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX362 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX363 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE6MX364 + . 6, 3, 2, 1/ AE6MX365 +C L=1.5 TO 1.7 750 KEV AE6MX366 + DATA MAP017/ AE6MX367 + . 31, 3000, 6418, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX368 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX369 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE6MX370 + . 4, 2, 1, 1, AE6MX371 + . 30, 3200, 6380, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX372 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX373 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE6MX374 + . 9, 5, 3, AE6MX375 + . 30, 3400, 6294, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX376 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX377 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, AE6MX378 + . 17, 10, 5/ AE6MX379 +C L=1.8 TO 2.0 750 KEV AE6MX380 + DATA MAP018/ AE6MX381 + . 29, 3600, 6186, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX382 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX383 + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, AE6MX384 + . 31, 18, AE6MX385 + . 28, 3800, 6045, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX386 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE6MX387 + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, 94, AE6MX388 + . 53, AE6MX389 + . 28, 4000, 5870, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX390 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE6MX391 + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192, 108, AE6MX392 + . 61/ AE6MX393 +C L=2.2 TO 3.0 750 KEV AE6MX394 + DATA MAP019/ AE6MX395 + . 27, 4400, 5553, 47488, 62790, 78781, 94700,110076,123024, AE6MX396 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE6MX397 + . 16561, 11965, 8293, 5431, 3054, 1717, 966, 543, 305, AE6MX398 + . 27, 4800, 5637, 49529, 65656, 84636,103935,125234,145303, AE6MX399 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE6MX400 + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, 1358, 764, AE6MX401 + . 28, 5200, 6135, 54773, 72665, 94767,120930,121864,168300, AE6MX402 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX403 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, 4800, AE6MX404 + . 7200, AE6MX405 + . 28, 5600, 6257, 54773, 72665, 94767,120930,150210,180644, AE6MX406 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX407 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE6MX408 + . 17049, AE6MX409 + . 3, 5620, 0, 3, 32767, 0/ AE6MX410 +C L=1.20 TO 1.30 1.00 MEV AE6MX411 + DATA MAP020/ AE6MX412 + . 460, 1000, 3, 0, 0, 3, 2200, 0, AE6MX413 + . 23, 2400, 3149, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX414 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE6MX415 + . 975, 865, 764, 686, 604, AE6MX416 + . 28, 2500, 4466, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX417 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX418 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE6MX419 + . 416, AE6MX420 + . 30, 2600, 5120, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX421 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX422 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE6MX423 + . 372, 209, 160/ AE6MX424 +C L=1.35 TO 1.45 1.00 MEV AE6MX425 + DATA MAPA20/ AE6MX426 + . 31, 2700, 5586, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX427 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX428 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE6MX429 + . 168, 95, 53, 30, AE6MX430 + . 31, 2800, 5917, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX431 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX432 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE6MX433 + . 26, 14, 8, 5, AE6MX434 + . 31, 2900, 6066, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX435 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX436 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE6MX437 + . 6, 3, 2, 1/ AE6MX438 +C L=1.5 TO 1.7 1000 KEV AE6MX439 + DATA MAP021/ AE6MX440 + . 31, 3000, 6077, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX441 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX442 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE6MX443 + . 4, 2, 1, 1, AE6MX444 + . 30, 3200, 5985, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX445 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX446 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE6MX447 + . 9, 5, 3, AE6MX448 + . 29, 3400, 5803, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX449 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX450 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30, AE6MX451 + . 17, 10/ AE6MX452 +C L=1.8 TO 2.0 1000 KEV AE6MX453 + DATA MAP022/ AE6MX454 + . 28, 3600, 5558, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX455 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX456 + . 4624, 2962, 1770, 996, 560, 315, 177, 100, 56, AE6MX457 + . 31, AE6MX458 + . 26, 3800, 5253, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX459 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE6MX460 + . 6507, 4502, 2970, 1670, 939, 528, 297, 167, AE6MX461 + . 26, 4000, 5010, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX462 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE6MX463 + . 8065, 5422, 3423, 1925, 1082, 609, 342, 192/ AE6MX464 +C L=2.2 TO 3.0 1000 KEV AE6MX465 + DATA MAP023/ AE6MX466 + . 24, 4400, 4713, 47488, 62790, 78781, 94700,110076,123024, AE6MX467 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE6MX468 + . 16561, 11965, 8293, 5431, 3054, 1717, AE6MX469 + . 25, 4800, 4803, 49529, 65656, 84636,103935,125234,145303, AE6MX470 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE6MX471 + . 35233, 23066, 16594, 11433, 7639, 4296, 2416, AE6MX472 + . 26, 5200, 5182, 54773, 72665, 94767,120930,121864,168300, AE6MX473 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX474 + . 97800, 78000, 59400, 25350, 18750, 13500, 9000, 5250, AE6MX475 + . 27, 5600, 5471, 54773, 72665, 94767,120930,150210,180644, AE6MX476 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX477 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, 21856, AE6MX478 + . 3, 5620, 0, 3, 32767, 0/ AE6MX479 +C L=1.20 TO 1.30 1.50 MEV AE6MX480 + DATA MAP024/ AE6MX481 + . 432, 1500, 3, 0, 0, 3, 2200, 0, AE6MX482 + . 22, 2400, 2572, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX483 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE6MX484 + . 975, 865, 764, 686, AE6MX485 + . 27, 2500, 3869, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX486 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX487 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, 456, AE6MX488 + . 30, 2600, 4606, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX489 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX490 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE6MX491 + . 372, 209, 160/ AE6MX492 +C L=1.35 TO 1.45 1.50 MEV AE6MX493 + DATA MAPA24/ AE6MX494 + . 30, 2700, 5099, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX495 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX496 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE6MX497 + . 168, 95, 53, AE6MX498 + . 30, 2800, 5470, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX499 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX500 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE6MX501 + . 26, 14, 8, AE6MX502 + . 30, 2900, 5664, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX503 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX504 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE6MX505 + . 6, 3, 2/ AE6MX506 +C L=1.5 TO 1.7 1500 KEV AE6MX507 + DATA MAP025/ AE6MX508 + . 30, 3000, 5690, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX509 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX510 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE6MX511 + . 4, 2, 1, AE6MX512 + . 28, 3200, 5545, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX513 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX514 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE6MX515 + . 9, AE6MX516 + . 27, 3400, 5335, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX517 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX518 + . 2664, 1695, 953, 536, 301, 170, 95, 54, 30/ AE6MX519 +C L=1.8 TO 2.0 1500 KEV AE6MX520 + DATA MAP026/ AE6MX521 + . 25, 3600, 5042, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX522 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX523 + . 4624, 2962, 1770, 996, 560, 315, 177, AE6MX524 + . 24, 3800, 4620, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX525 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE6MX526 + . 6507, 4502, 2970, 1670, 939, 528, AE6MX527 + . 23, 4000, 4229, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX528 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE6MX529 + . 8065, 5422, 3423, 1925, 1082/ AE6MX530 +C L=2.2 TO 3.0 1500 KEV AE6MX531 + DATA MAP027/ AE6MX532 + . 21, 4400, 3846, 47488, 62790, 78781, 94700,110076,123024, AE6MX533 + .131177,132553,125652,111586, 92462, 71636, 52955, 37122, 25243, AE6MX534 + . 16561, 11965, 8293, AE6MX535 + . 21, 4800, 3918, 49529, 65656, 84636,103935,125234,145303, AE6MX536 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE6MX537 + . 35233, 23066, 16594, AE6MX538 + . 24, 5200, 4569, 54773, 72665, 94767,120930,121864,168300, AE6MX539 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX540 + . 97800, 78000, 59400, 25350, 18750, 13500, AE6MX541 + . 26, 5600, 5048, 54773, 72665, 94767,120930,150210,180644, AE6MX542 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX543 + .133026,109737, 89266, 71814, 57257, 45328, 35692, 28001, AE6MX544 + . 3, 5620, 0, 3, 32767, 0/ AE6MX545 +C L=1.20 TO 1.30 2.00 MEV AE6MX546 + DATA MAP028/ AE6MX547 + . 403, 2000, 3, 0, 0, 3, 2200, 0, AE6MX548 + . 20, 2400, 2228, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX549 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE6MX550 + . 975, 865, AE6MX551 + . 26, 2500, 3497, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX552 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX553 + . 1430, 1259, 1083, 982, 835, 727, 641, 560, AE6MX554 + . 28, 2600, 4229, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX555 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX556 + . 1465, 1281, 1097, 923, 751, 703, 587, 446, 426, AE6MX557 + . 372/ AE6MX558 +C L=1.35 TO 1.45 2.00 MEV AE6MX559 + DATA MAPA28/ AE6MX560 + . 29, 2700, 4739, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX561 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX562 + . 1346, 1131, 921, 680, 702, 458, 314, 533, 300, AE6MX563 + . 168, 95, AE6MX564 + . 29, 2800, 5097, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX565 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX566 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE6MX567 + . 26, 14, AE6MX568 + . 29, 2900, 5309, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX569 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX570 + . 952, 598, 336, 189, 106, 60, 34, 19, 11, AE6MX571 + . 6, 3/ AE6MX572 +C L=1.5 TO 1.7 2000 KEV AE6MX573 + DATA MAP029/ AE6MX574 + . 28, 3000, 5356, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX575 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX576 + . 695, 391, 220, 124, 70, 39, 22, 12, 7, AE6MX577 + . 4, AE6MX578 + . 27, 3200, 5170, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX579 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX580 + . 1581, 897, 504, 284, 159, 90, 50, 28, 16, AE6MX581 + . 25, 3400, 4882, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX582 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX583 + . 2664, 1695, 953, 536, 301, 170, 95/ AE6MX584 +C L=1.8 TO 2.0 2000 KEV AE6MX585 + DATA MAP030/ AE6MX586 + . 23, 3600, 4426, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX587 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX588 + . 4624, 2962, 1770, 996, 560, AE6MX589 + . 22, 3800, 3931, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX590 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, 13018, 8677, AE6MX591 + . 6507, 4502, 2970, 1670, AE6MX592 + . 20, 4000, 3589, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX593 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327, 10682, AE6MX594 + . 8065, 5422/ AE6MX595 +C L=2.2 TO 3.0 2000 KEV AE6MX596 + DATA MAP031/ AE6MX597 + . 18, 4400, 3171, 47488, 62790, 78781, 94700,110076,123024, AE6MX598 + .131177,132553,125652,111586, 92462, 71636, 52956, 37122, 25243, AE6MX599 + . 18, 4800, 3072, 49529, 65656, 84636,103935,125234,145303, AE6MX600 + .163236,174969,178212,170767,153191,128166, 99939, 74171, 51983, AE6MX601 + . 22, 5200, 3937, 54773, 72665, 94767,120930,121864,168300, AE6MX602 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX603 + . 97800, 78000, 59400, 25350, AE6MX604 + . 25, 5600, 4485, 54773, 72665, 94767,120930,150210,180644, AE6MX605 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX606 + .133026,109737, 89266, 71814, 57257, 45328, 35692, AE6MX607 + . 3, 5620, 0, 3, 32767, 0/ AE6MX608 +C L=1.20 TO 1.30 2.50 MEV AE6MX609 + DATA MAP0Z0/ AE6MX610 + . 364, 2500, 3, 0, 0, 3, 2200, 0, AE6MX611 + . 18, 2400, 1766, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX612 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, 1206, 1074, AE6MX613 + . 24, 2500, 3044, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX614 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX615 + . 1430, 1259, 1083, 982, 835, 727, AE6MX616 + . 26, 2600, 3869, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX617 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX618 + . 1465, 1281, 1097, 923, 751, 703, 587, 446/ AE6MX619 +C L=1.35 TO 1.45 2.50 MEV AE6MX620 + DATA MAP0Z1/ AE6MX621 + . 26, 2700, 4404, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX622 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX623 + . 1346, 1131, 921, 680, 702, 458, 314, 533, AE6MX624 + . 27, 2800, 4757, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX625 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX626 + . 1055, 1042, 613, 704, 456, 256, 144, 81, 46, AE6MX627 + . 27, 2900, 4986, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX628 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX629 + . 952, 598, 336, 189, 106, 60, 34, 19, 11/ AE6MX630 +C L=1.5 TO 1.7 2.50 MEV AE6MX631 + DATA MAP0Z2/ AE6MX632 + . 26, 3000, 5020, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX633 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX634 + . 695, 391, 220, 124, 70, 39, 22, 12, AE6MX635 + . 25, 3200, 4770, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX636 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX637 + . 1581, 897, 504, 284, 159, 90, 50, AE6MX638 + . 24, 3400, 4426, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX639 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX640 + . 2664, 1695, 953, 536, 301, 170/ AE6MX641 +C L=1.8 TO 2.0 2.50 MEV AE6MX642 + DATA MAP0Z3/ AE6MX643 + . 21, 3600, 3911, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX644 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX645 + . 4624, 2962, 1770, AE6MX646 + . 19, 3800, 3345, 40943, 52384, 62024, 70199, 75902, 78093, AE6MX647 + . 75852, 69272, 59488, 48040, 36749, 26945, 18926, 13088, 8734, AE6MX648 + . 6523, AE6MX649 + . 17, 4000, 2956, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX650 + . 96119, 89035, 77026, 62490, 47575, 34544, 23985, 16327/ AE6MX651 +C L=2.2 TO 3.0 2.50 MEV AE6MX652 + DATA MAP0Z4/ AE6MX653 + . 15, 4400, 2493, 47488, 62790, 78781, 94700,110076,123024, AE6MX654 + .131177,132553,125652,111586, 92462, 71636, AE6MX655 + . 14, 4800, 2297, 49529, 65656, 84636,103935,125234,145303, AE6MX656 + .163236,174969,178212,170767,153191, AE6MX657 + . 18, 5200, 3196, 54773, 72665, 94767,120930,121864,168300, AE6MX658 + .176400,195450,211500,199950,173400,184800,158400,136800,104700, AE6MX659 + . 23, 5600, 3986, 54773, 72665, 94767,120930,150210,180644, AE6MX660 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX661 + .133026,109737, 89266, 71814, 57257, AE6MX662 + . 3, 5620, 0, 3, 32767, 0/ AE6MX663 +C L=1.20 TO 1.30 3.00 MEV AE6MX664 + DATA MAP032/ AE6MX665 + . 321, 3000, 3, 0, 0, 3, 2200, 0, AE6MX666 + . 16, 2400, 1230, 5347, 2670, 2710, 2657, 2560, 2433, AE6MX667 + . 2277, 2122, 1961, 1790, 1638, 1487, 1341, AE6MX668 + . 21, 2500, 2537, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX669 + . 3792, 3491, 3180, 2892, 2594, 2335, 2073, 1833, 1631, AE6MX670 + . 1430, 1259, 1083, AE6MX671 + . 24, 2600, 3308, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX672 + . 4966, 4472, 3970, 3502, 3079, 2672, 2338, 2010, 1731, AE6MX673 + . 1465, 1281, 1097, 923, 751, 703/ AE6MX674 +C L=1.35 TO 1.45 3.00 MEV AE6MX675 + DATA MAPA32/ AE6MX676 + . 24, 2700, 3715, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX677 + . 6470, 5615, 4793, 4085, 3423, 2878, 2379, 2018, 1626, AE6MX678 + . 1346, 1131, 921, 680, 702, 458, AE6MX679 + . 24, 2800, 3968, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX680 + . 8406, 6978, 5723, 4610, 3730, 2935, 2373, 1854, 1444, AE6MX681 + . 1055, 1042, 613, 704, 456, 256, AE6MX682 + . 24, 2900, 4138, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX683 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186, 1623, 1308, AE6MX684 + . 952, 598, 336, 189, 106, 60/ AE6MX685 +C L=1.5 TO 1.7 3000 KEV AE6MX686 + DATA MAP033/ AE6MX687 + . 24, 3000, 4138, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX688 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, 1990, 1209, AE6MX689 + . 695, 391, 220, 124, 70, 39, AE6MX690 + . 23, 3200, 3869, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX691 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, 3172, 2460, AE6MX692 + . 1581, 897, 504, 284, 159, AE6MX693 + . 22, 3400, 3514, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX694 + . 42048, 35052, 27724, 20911, 15140, 10811, 7377, 4966, 3973, AE6MX695 + . 2664, 1695, 953, 536/ AE6MX696 +C L=1.8 TO 2.0 3000 KEV AE6MX697 + DATA MAP034/ AE6MX698 + . 19, 3600, 3081, 48616, 48894, 55717, 60750, 63092, 62213, AE6MX699 + . 57866, 50662, 41864, 32724, 24441, 17523, 12262, 8377, 5632, AE6MX700 + . 4624, AE6MX701 + . 16, 3800, 2551, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX702 + . 75827, 69172, 59313, 47905, 36578, 26825, 18813, AE6MX703 + . 14, 4000, 2086, 45118, 59201, 71966, 83342, 92297, 97094, AE6MX704 + . 96119, 89035, 77026, 62490, 47575/ AE6MX705 +C L=2.2 TO 3.0 3000 KEV AE6MX706 + DATA MAP035/ AE6MX707 + . 11, 4400, 1404, 47488, 62790, 78781, 94700,110076,123024, AE6MX708 + .131177,132553, AE6MX709 + . 8, 4800, 1024, 49529, 65656, 84636,103935,125234, AE6MX710 + . 17, 5200, 2455, 54773, 72665, 94767,120930,121864,168300, AE6MX711 + .176400,195450,211500,199950,173400,184800,158400,136800, AE6MX712 + . 20, 5600, 3380, 54773, 72665, 94767,120930,150210,180644, AE6MX713 + .209294,232704,247730,252422,246560,231587,210039,184801,158511, AE6MX714 + .133026,109737, AE6MX715 + . 3, 5620, 0, 3, 32767, 0/ AE6MX716 +C L=1.20 TO 1.30 4.00 MEV AE6MX717 + DATA MAP036/ AE6MX718 + . 184, 4000, 3, 0, 0, 3, 2400, 0, AE6MX719 + . 11, 2500, 669, 10465, 4679, 4669, 4542, 4327, 4076, AE6MX720 + . 3792, 3491, AE6MX721 + . 13, 2600, 1233, 24783, 7745, 6822, 6426, 5981, 5480, AE6MX722 + . 4966, 4472, 3970, 3502/ AE6MX723 +C L=1.35 TO 1.45 4.00 MEV AE6MX724 + DATA MAPA36/ AE6MX725 + . 14, 2700, 1568, 40297, 12004, 9928, 9156, 8294, 7366, AE6MX726 + . 6470, 5615, 4793, 4085, 3423, AE6MX727 + . 15, 2800, 1806, 55808, 17043, 14421, 13069, 11529, 9943, AE6MX728 + . 8406, 6978, 5723, 4610, 3730, 2935, AE6MX729 + . 16, 2900, 1908, 56343, 23557, 22371, 20306, 17687, 14787, AE6MX730 + . 11981, 9404, 7241, 5438, 4054, 3017, 2186/ AE6MX731 +C L=1.5 TO 1.7 4000 KEV AE6MX732 + DATA MAP037/ AE6MX733 + . 16, 3000, 1914, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX734 + . 17490, 13384, 9843, 7067, 4935, 3407, 2346, AE6MX735 + . 16, 3200, 1842, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX736 + . 28849, 23157, 17733, 13014, 9356, 6488, 4454, AE6MX737 + . 15, 3400, 1693, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX738 + . 42048, 35052, 27724, 20911, 15140, 10811/ AE6MX739 +C L=1.8 TO 2.0 4000 KEV AE6MX740 + DATA MAP038/ AE6MX741 + . 12, 3600, 1431,048616, 48894, 55717, 60750, 63092, 62213, AE6MX742 + . 57866, 50662, 41864, AE6MX743 + . 9, 3800, 1066, 41466, 52542, 62164, 70320, 76003, 78120, AE6MX744 + . 6, 4000, 616, 45118, 59201, 71966/ AE6MX745 +C L=2.2 TO 3.0 4000 KEV AE6MX746 + DATA MAP039/ AE6MX747 + . 3, 4400, 0, AE6MX748 + . 3, 4800, 0, AE6MX749 + . 9, 5200, 616, 54773, 72665, 94767,120930,121864,168300, AE6MX750 + . 12, 5600, 2455, 54773, 72665, 94767,120930,150210,180644, AE6MX751 + .209294,232704,247730, AE6MX752 + . 3, 5620, 0, 3, 32767, 0/ AE6MX753 +C L=1.20 TO 1.45 4.50 MEV AE6MX754 + DATA MAP040/ AE6MX755 + . 75, 4500, 3, 0, 0, 3, 2600, 0, AE6MX756 + . 6, 2700, 389, 40297, 12004, 9928, AE6MX757 + . 8, 2800, 659, 55808, 17043, 14421, 13069, 11529, AE6MX758 + . 9, 2900, 797, 56343, 23557, 22371, 20306, 17687, 14787/ AE6MX759 +C L=1.5 TO 1.7 4500 KEV AE6MX760 + DATA MAP041/ AE6MX761 + . 10, 3000, 818, 45531, 31037, 31028, 29242, 26022, 21862, AE6MX762 + . 17490, AE6MX763 + . 11, 3200, 754, 46114, 37841, 40048, 40182, 38118, 34149, AE6MX764 + . 28849, 23157, AE6MX765 + . 10, 3400, 559, 52148, 44533, 48922, 51107, 50748, 47550, AE6MX766 + . 42048/ AE6MX767 +C L=1.8 TO 2.0 4500 KEV AE6MX768 + DATA MAP042/ AE6MX769 + . 7, 3600, 149, 48616, 48894, 55717, 60750, AE6MX770 + . 3, 3700, 0, 3, 32767, 0, 0/ AE6MX771 + END AE6MX772 diff --git a/SOFIP/original/ap8mac.dat b/SOFIP/original/ap8mac.dat new file mode 100755 index 0000000..d1bafbc --- /dev/null +++ b/SOFIP/original/ap8mac.dat @@ -0,0 +1,818 @@ + BLOCK DATA C8OX 1 + DOUBLE PRECISION NAME C8OX 2 + COMMON/ AP8MAC /NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH C8OX 3 + X,MAP 1(163),MAP 2(163),MAP 3(163),MAP 4(163),MAP 5(163) C8OX 4 + X,MAP 6(163),MAP 7(163),MAP 8(163),MAP 9(163),MAP 10(163) C8OX 5 + X,MAP 11(163),MAP 12(163),MAP 13(163),MAP 14(163),MAP 15(163) C8OX 6 + X,MAP 16(163),MAP 17(163),MAP 18(163),MAP 19(163),MAP 20(163) C8OX 7 + X,MAP 21(163),MAP 22(163),MAP 23(163),MAP 24(163),MAP 25(163) C8OX 8 + X,MAP 26(163),MAP 27(163),MAP 28(163),MAP 29(163),MAP 30(163) C8OX 9 + X,MAP 31(163),MAP 32(163),MAP 33(163),MAP 34(163),MAP 35(163) C8OX 10 + X,MAP 36(163),MAP 37(163),MAP 38(163),MAP 39(163),MAP 40(153) C8OX 11 + DATA NAME /8H AP8MAC / C8OX 12 + DATA EPOCH / 1970.000/ C8OX 13 + DATA SCAE / 100.000/ C8OX 14 + DATA SCAL / 2048.000/ C8OX 15 + DATA SCAB / 2048.000/ C8OX 16 + DATA SCAF / 1024.000/ C8OX 17 + DATA LENGTH/ 6509/ C8OX 18 + DATA MAP 1/ C8OX 19 + X 874, 10, 3, 0, 0, 3, 2333, 0, 10, C8OX 20 + X 2355, 1740, 26, 24, 19, 16, 14, 11, 7, C8OX 21 + X 14, 2396, 2814, 47, 35, 30, 19, 11, 10, C8OX 22 + X 6, 7, 6, 4, 4, 17, 2457, 3519, 88, C8OX 23 + X 72, 59, 50, 44, 30, 23, 17, 12, 9, C8OX 24 + X 7, 5, 5, 9, 22, 2662, 4651, 197, 199, C8OX 25 + X 174, 143, 108, 75, 62, 51, 42, 35, 25, C8OX 26 + X 21, 17, 15, 14, 12, 12, 15, 21, 24, C8OX 27 + X 2867, 5303, 199, 226, 254, 258, 242, 220, 188, C8OX 28 + X 163, 96, 73, 61, 32, 25, 18, 15, 14, C8OX 29 + X 14, 15, 16, 19, 25, 26, 3072, 5864, 230, C8OX 30 + X 255, 288, 310, 313, 320, 307, 273, 231, 199, C8OX 31 + X 139, 110, 85, 63, 50, 37, 28, 21, 13, C8OX 32 + X 11, 9, 9, 9, 28, 3276, 6182, 286, 324, C8OX 33 + X 358, 383, 401, 395, 383, 365, 336, 297, 212, C8OX 34 + X 183, 155, 131, 114, 85, 73, 59, 50, 39, C8OX 35 + X 33, 21, 20, 22, 32, 29, 3481, 6577, 294, C8OX 36 + X 340, 389, 450, 477, 460, 481, 478, 436, 377, C8OX 37 + Y 297/ C8OX 38 + DATA MAP 2/ C8OX 39 + X 254, 233, 212, 189, 170, 155, 136, 112, 83, C8OX 40 + X 60, 48, 29, 20, 24, 45, 30, 3686, 6855, C8OX 41 + X 312, 364, 416, 478, 519, 540, 587, 600, 550, C8OX 42 + X 508, 482, 417, 340, 286, 253, 218, 186, 175, C8OX 43 + X 158, 136, 117, 97, 78, 65, 37, 38, 42, C8OX 44 + X 31, 3891, 7129, 314, 375, 448, 542, 624, 699, C8OX 45 + X 795, 874, 874, 745, 605, 468, 341, 284, 250, C8OX 46 + X 223, 179, 142, 136, 119, 107, 104, 103, 104, C8OX 47 + X 119, 136, 154, 176, 32, 4096, 7407, 334, 394, C8OX 48 + X 475, 577, 703, 827, 972, 1093, 1188, 1074, 908, C8OX 49 + X 636, 435, 348, 274, 219, 165, 164, 158, 139, C8OX 50 + X 125, 119, 115, 115, 114, 119, 125, 125, 127, C8OX 51 + X 33, 4300, 7621, 366, 450, 557, 675, 769, 967, C8OX 52 + X 1265, 1501, 1460, 1187, 946, 678, 526, 425, 350, C8OX 53 + X 258, 249, 241, 211, 203, 181, 155, 141, 142, C8OX 54 + X 142, 146, 149, 149, 160, 209, 34, 4505, 7867, C8OX 55 + X 382, 471, 591, 752, 959, 1200, 1505, 1721, 1812, C8OX 56 + X 1669, 1402, 941, 613, 451, 303, 216, 190, 188, C8OX 57 + Y 190/ C8OX 58 + DATA MAP 3/ C8OX 59 + X 187, 172, 155, 142, 145, 149, 159, 168, 172, C8OX 60 + X 180, 205, 237, 35, 4710, 8054, 415, 508, 642, C8OX 61 + X 842, 1147, 1476, 1802, 2034, 2054, 1878, 1601, 1346, C8OX 62 + X 780, 611, 400, 311, 287, 277, 258, 218, 188, C8OX 63 + X 181, 176, 168, 162, 159, 162, 166, 170, 179, C8OX 64 + X 197, 281, 35, 4915, 8191, 429, 552, 758, 1046, C8OX 65 + X 1448, 1880, 2204, 2295, 2373, 2118, 1778, 1391, 880, C8OX 66 + X 660, 384, 284, 315, 322, 322, 314, 309, 290, C8OX 67 + X 254, 228, 219, 216, 215, 216, 224, 228, 228, C8OX 68 + X 233, 36, 5120, 8348, 436, 579, 831, 1177, 1604, C8OX 69 + X 2078, 2467, 2696, 2584, 2459, 2157, 1616, 1211, 974, C8OX 70 + X 791, 678, 614, 603, 520, 356, 287, 168, 169, C8OX 71 + X 167, 172, 177, 176, 178, 182, 185, 184, 194, C8OX 72 + X 240, 36, 5324, 8441, 478, 648, 958, 1333, 1836, C8OX 73 + X 2343, 2773, 3311, 3419, 2803, 2140, 1621, 1319, 1072, C8OX 74 + X 844, 694, 522, 447, 366, 324, 325, 326, 328, C8OX 75 + X 330, 331, 334, 335, 330, 324, 324, 330, 346, C8OX 76 + X 380, 37, 5529, 8530, 535, 724, 1032, 1500, 2095, C8OX 77 + Y 2747/ C8OX 78 + DATA MAP 4/ C8OX 79 + X 3316, 4200, 3472, 2907, 2306, 2010, 1668, 1471, 1297, C8OX 80 + X 1124, 775, 608, 544, 450, 359, 315, 313, 315, C8OX 81 + X 319, 320, 321, 322, 323, 324, 329, 335, 368, C8OX 82 + X 305, 37, 5734, 8610, 564, 781, 1155, 1669, 2312, C8OX 83 + X 3090, 4074, 5030, 4602, 3857, 3266, 1855, 1449, 1031, C8OX 84 + X 825, 803, 769, 715, 630, 517, 423, 405, 399, C8OX 85 + X 395, 392, 410, 422, 421, 414, 406, 396, 398, C8OX 86 + X 404, 416, 38, 6144, 8722, 604, 898, 1472, 2354, C8OX 87 + X 3537, 5035, 6435, 7318, 5921, 4842, 3838, 3039, 2426, C8OX 88 + X 1935, 1450, 1152, 921, 737, 566, 486, 412, 325, C8OX 89 + X 316, 310, 311, 309, 319, 328, 328, 325, 317, C8OX 90 + X 302, 301, 295, 280, 38, 6963, 8763, 745, 1340, C8OX 91 + X 2634, 4863, 8313, 11557, 12095, 9931, 8798, 4460, 3611, C8OX 92 + X 2250, 1768, 1661, 1348, 1094, 886, 860, 794, 728, C8OX 93 + X 706, 870, 860, 847, 854, 868, 878, 878, 875, C8OX 94 + X 870, 869, 850, 832, 804, 778, 37, 7782, 8451, C8OX 95 + X 1037, 2053, 4320, 8234, 13247, 19364, 16095, 14423, 8192, C8OX 96 + X 6289, 5014, 3402, 2768, 2848, 2891, 2928, 2726, 2438, C8OX 97 + Y 2119/ C8OX 98 + DATA MAP 5/ C8OX 99 + X 1818, 1556, 1405, 1251, 1121, 1098, 1078, 1085, 1087, C8OX 100 + X 1092, 1090, 1060, 1020, 948, 798, 36, 8601, 8201, C8OX 101 + X 1062, 2374, 5797, 11755, 18805, 25569, 23593, 20955, 12019, C8OX 102 + X 8725, 6250, 4196, 3353, 3278, 3143, 2868, 2756, 2757, C8OX 103 + X 2671, 2585, 2560, 2549, 2551, 2574, 2602, 2610, 2605, C8OX 104 + X 2580, 2526, 2444, 2308, 2126, 1593, 35, 9420, 8014, C8OX 105 + X 1038, 2625, 7002, 17078, 28580, 38218, 28555, 23784, 14905, C8OX 106 + X 11120, 8605, 6453, 4668, 4644, 4592, 4364, 4336, 4353, C8OX 107 + X 4256, 3923, 3552, 3377, 3348, 3337, 3353, 3360, 3388, C8OX 108 + X 3398, 3367, 3347, 3357, 3459, 34, 10240, 7822, 1097, C8OX 109 + X 3528, 11320, 30959, 45133, 53296, 39292, 32724, 20426, 14875, C8OX 110 + X 10911, 8529, 5325, 4152, 3082, 3242, 3447, 3667, 3830, C8OX 111 + X 4060, 4536, 4778, 4570, 4412, 4498, 4488, 4240, 4153, C8OX 112 + X 4479, 5171, 839, 33, 11264, 7605, 973, 3803, 17998, C8OX 113 + X 46677, 62123, 61152, 47671, 35256, 27396, 19708, 13998, 11838, C8OX 114 + X 7860, 7709, 7271, 7088, 7038, 6993, 6975, 7063, 7193, C8OX 115 + X 7321, 7394, 7338, 6942, 6839, 6984, 7192, 7622, 8761, C8OX 116 + X 32, 12288, 7377, 828, 3421, 18339, 42434, 68271, 86460, C8OX 117 + Y 57767/ C8OX 118 + DATA MAP 6/ C8OX 119 + X 47630, 30906, 22593, 17972, 14424, 12692, 13367, 13302, 12054, C8OX 120 + X 11412, 11977, 12466, 12773, 13205, 13097, 12909, 12830, 12615, C8OX 121 + X 12871, 13077, 13745, 15513, 31, 13516, 7063, 913, 2335, C8OX 122 + X 9874, 30730, 56329, 75941, 78564, 67183, 58077, 49459, 43291, C8OX 123 + X 37201, 31822, 27507, 25464, 25615, 24834, 23578, 23705, 23609, C8OX 124 + X 23880, 24027, 24368, 24596, 25015, 27160, 24452, 2795, 3, C8OX 125 + X 20480, 0, 3, 32767, 0, 861, 20, 3, 0, C8OX 126 + X 0, 3, 2333, 0, 10, 2355, 1731, 26, 24, C8OX 127 + X 19, 16, 14, 11, 7, 14, 2396, 2810, 47, C8OX 128 + X 35, 30, 19, 11, 10, 6, 7, 6, 4, C8OX 129 + X 4, 17, 2457, 3517, 87, 73, 59, 49, 44, C8OX 130 + X 30, 23, 17, 12, 10, 5, 6, 5, 5, C8OX 131 + X 22, 2662, 4649, 195, 199, 176, 143, 107, 75, C8OX 132 + X 62, 51, 42, 35, 25, 21, 18, 14, 15, C8OX 133 + X 12, 11, 15, 14, 24, 2867, 5300, 200, 225, C8OX 134 + X 255, 255, 246, 218, 189, 161, 97, 73, 60, C8OX 135 + X 32, 26, 17, 15, 14, 14, 15, 16, 19, C8OX 136 + X 18, 26, 3072, 5861, 229, 254, 290, 310, 312, C8OX 137 + Y 319/ C8OX 138 + DATA MAP 7/ C8OX 139 + X 311, 272, 229, 198, 141, 110, 84, 63, 50, C8OX 140 + X 38, 28, 20, 15, 9, 9, 9, 10, 28, C8OX 141 + X 3276, 6178, 286, 328, 355, 381, 402, 398, 381, C8OX 142 + X 362, 338, 299, 211, 181, 157, 131, 113, 85, C8OX 143 + X 73, 59, 49, 40, 32, 21, 20, 22, 23, C8OX 144 + X 29, 3481, 6571, 295, 338, 390, 451, 479, 460, C8OX 145 + X 483, 478, 436, 374, 295, 256, 232, 212, 190, C8OX 146 + X 171, 153, 137, 111, 84, 59, 48, 28, 19, C8OX 147 + X 26, 44, 30, 3686, 6844, 315, 363, 415, 478, C8OX 148 + X 524, 543, 589, 602, 553, 508, 477, 414, 341, C8OX 149 + X 285, 252, 216, 187, 174, 158, 135, 116, 97, C8OX 150 + X 77, 63, 38, 38, 38, 31, 3891, 7090, 323, C8OX 151 + X 390, 457, 557, 629, 720, 796, 890, 857, 741, C8OX 152 + X 579, 451, 340, 285, 246, 223, 172, 145, 132, C8OX 153 + X 118, 108, 104, 101, 107, 121, 140, 153, 154, C8OX 154 + X 32, 4096, 7354, 344, 409, 487, 590, 718, 854, C8OX 155 + X 1001, 1128, 1196, 1044, 890, 585, 424, 337, 262, C8OX 156 + X 210, 163, 165, 157, 137, 123, 116, 114, 115, C8OX 157 + Y 116/ C8OX 158 + DATA MAP 8/ C8OX 159 + X 121, 124, 125, 131, 33, 4300, 7570, 372, 452, C8OX 160 + X 549, 667, 803, 1017, 1308, 1529, 1404, 1162, 917, C8OX 161 + X 641, 521, 427, 354, 262, 258, 244, 211, 204, C8OX 162 + X 179, 154, 142, 142, 142, 146, 148, 151, 164, C8OX 163 + X 216, 34, 4505, 7793, 379, 455, 570, 731, 977, C8OX 164 + X 1227, 1535, 1743, 1780, 1630, 1365, 939, 620, 455, C8OX 165 + X 352, 222, 194, 193, 198, 192, 175, 154, 141, C8OX 166 + X 144, 147, 161, 171, 173, 180, 211, 218, 35, C8OX 167 + X 4710, 7966, 404, 488, 613, 831, 1185, 1531, 1878, C8OX 168 + X 2067, 2052, 1835, 1553, 1300, 773, 605, 400, 315, C8OX 169 + X 290, 285, 260, 221, 193, 183, 177, 167, 162, C8OX 170 + X 162, 163, 166, 171, 181, 200, 286, 35, 4915, C8OX 171 + X 8093, 426, 545, 746, 1062, 1465, 1848, 2164, 2343, C8OX 172 + X 2409, 2131, 1785, 1365, 876, 642, 372, 276, 326, C8OX 173 + X 334, 327, 311, 304, 287, 253, 229, 219, 216, C8OX 174 + X 217, 219, 220, 225, 231, 238, 36, 5120, 8218, C8OX 175 + X 448, 595, 877, 1251, 1678, 2096, 2446, 2692, 2680, C8OX 176 + X 2424, 2103, 1476, 1135, 949, 791, 677, 601, 582, C8OX 177 + Y 524/ C8OX 178 + DATA MAP 9/ C8OX 179 + X 362, 306, 172, 170, 166, 172, 175, 173, 173, C8OX 180 + X 177, 188, 187, 193, 237, 36, 5324, 8322, 478, C8OX 181 + X 645, 949, 1348, 1882, 2446, 2841, 3274, 3281, 2732, C8OX 182 + X 2126, 1643, 1330, 1072, 838, 695, 537, 459, 375, C8OX 183 + X 328, 320, 317, 320, 322, 328, 331, 334, 333, C8OX 184 + X 327, 328, 332, 344, 382, 36, 5529, 8423, 502, C8OX 185 + X 675, 1008, 1498, 2133, 2841, 3447, 4058, 3374, 2842, C8OX 186 + X 2267, 2051, 1689, 1478, 1308, 1117, 828, 601, 553, C8OX 187 + X 459, 374, 313, 303, 303, 314, 321, 323, 322, C8OX 188 + X 322, 326, 330, 339, 368, 37, 5734, 8507, 511, C8OX 189 + X 703, 1047, 1615, 2311, 3191, 4062, 4984, 4264, 3746, C8OX 190 + X 3357, 1963, 1500, 1113, 860, 804, 783, 725, 672, C8OX 191 + X 562, 462, 398, 400, 401, 408, 408, 407, 408, C8OX 192 + X 414, 413, 412, 411, 403, 400, 37, 6144, 8612, C8OX 193 + X 558, 774, 1201, 2043, 3199, 4581, 6000, 6729, 6150, C8OX 194 + X 5230, 4177, 3435, 2699, 2119, 1659, 1148, 1024, 808, C8OX 195 + X 647, 476, 444, 353, 311, 308, 306, 306, 309, C8OX 196 + X 321, 330, 322, 317, 317, 315, 307, 37, 6963, C8OX 197 + Y 8587/ C8OX 198 + DATA MAP 10/ C8OX 199 + X 692, 1088, 1992, 3453, 5800, 8838, 11312, 10008, 9045, C8OX 200 + X 8377, 4344, 3557, 2187, 1751, 1627, 1330, 1087, 885, C8OX 201 + X 832, 748, 674, 665, 784, 829, 847, 853, 863, C8OX 202 + X 871, 877, 881, 872, 866, 849, 833, 36, 7782, C8OX 203 + X 8258, 862, 1621, 3341, 5892, 9631, 14765, 19120, 14600, C8OX 204 + X 12656, 6845, 5547, 4497, 3150, 2854, 2905, 2883, 2817, C8OX 205 + X 2688, 2447, 2071, 1730, 1483, 1247, 1149, 1112, 1059, C8OX 206 + X 1040, 1063, 1097, 1103, 1101, 1096, 1039, 35, 8601, C8OX 207 + X 7974, 909, 1760, 4040, 8630, 14664, 20515, 24478, 21433, C8OX 208 + X 18823, 11208, 8233, 5687, 3540, 3378, 3348, 3101, 3036, C8OX 209 + X 2968, 2768, 2624, 2540, 2486, 2502, 2548, 2613, 2644, C8OX 210 + X 2580, 2511, 2496, 2451, 2307, 2033, 34, 9420, 7720, C8OX 211 + X 887, 1868, 5173, 10913, 19119, 28304, 35276, 26805, 21006, C8OX 212 + X 14469, 10736, 8279, 6230, 4862, 5056, 5146, 5163, 5185, C8OX 213 + X 4901, 4182, 3603, 3372, 3367, 3365, 3396, 3434, 3484, C8OX 214 + X 3467, 3370, 3259, 3202, 33, 10240, 7449, 847, 2149, C8OX 215 + X 5927, 13285, 27861, 38919, 44550, 36595, 30908, 25054, 17307, C8OX 216 + X 13158, 9905, 7109, 4811, 3696, 2974, 3018, 3271, 3714, C8OX 217 + Y 3828/ C8OX 218 + DATA MAP 11/ C8OX 219 + X 3741, 3948, 4071, 3945, 4183, 4416, 4491, 4365, 4285, C8OX 220 + X 31, 11264, 7123, 798, 2023, 9118, 28050, 46908, 59170, C8OX 221 + X 51113, 42329, 32758, 26764, 18817, 13107, 11586, 8984, 7765, C8OX 222 + X 7692, 7070, 6926, 6862, 7121, 6862, 7313, 7223, 7169, C8OX 223 + X 7064, 7133, 6529, 7041, 30, 12288, 6799, 777, 2110, C8OX 224 + X 10075, 29071, 56377, 72072, 69929, 52809, 40026, 28183, 21131, C8OX 225 + X 16579, 12927, 10434, 12876, 14824, 12506, 11152, 12073, 12446, C8OX 226 + X 12927, 13002, 13291, 12850, 13021, 12279, 13234, 29, 13516, C8OX 227 + X 6400, 745, 1890, 7095, 25419, 45079, 65303, 79899, 68012, C8OX 228 + X 60001, 52424, 45500, 38955, 34167, 30242, 25962, 23415, 24372, C8OX 229 + X 24157, 23102, 22849, 22146, 24514, 26260, 24343, 22772, 26066, C8OX 230 + X 3, 20480, 0, 3, 32767, 0, 810, 60, 3, C8OX 231 + X 0, 0, 3, 2334, 0, 10, 2355, 1717, 26, C8OX 232 + X 24, 19, 16, 14, 11, 12, 14, 2396, 2804, C8OX 233 + X 47, 35, 30, 19, 11, 10, 6, 7, 6, C8OX 234 + X 4, 4, 17, 2457, 3514, 86, 73, 58, 50, C8OX 235 + X 43, 30, 23, 17, 12, 10, 5, 6, 5, C8OX 236 + X 5, 22, 2662, 4645, 192, 196, 182, 143, 106, C8OX 237 + Y 74/ C8OX 238 + DATA MAP 12/ C8OX 239 + X 62, 51, 42, 35, 25, 21, 18, 14, 15, C8OX 240 + X 12, 11, 15, 15, 24, 2867, 5294, 198, 227, C8OX 241 + X 254, 254, 251, 218, 186, 160, 98, 72, 60, C8OX 242 + X 32, 26, 16, 16, 13, 15, 15, 16, 18, C8OX 243 + X 18, 26, 3072, 5850, 229, 257, 289, 310, 313, C8OX 244 + X 321, 312, 273, 228, 195, 141, 108, 84, 62, C8OX 245 + X 50, 37, 27, 20, 15, 10, 8, 10, 9, C8OX 246 + X 28, 3276, 6166, 286, 326, 360, 378, 401, 397, C8OX 247 + X 388, 358, 342, 297, 213, 177, 161, 129, 113, C8OX 248 + X 82, 73, 59, 49, 39, 32, 21, 20, 23, C8OX 249 + X 22, 29, 3481, 6546, 294, 339, 390, 456, 478, C8OX 250 + X 467, 486, 479, 433, 370, 293, 253, 234, 215, C8OX 251 + X 193, 172, 150, 137, 108, 81, 58, 46, 27, C8OX 252 + X 21, 26, 44, 30, 3686, 6802, 315, 365, 418, C8OX 253 + X 473, 526, 564, 606, 606, 553, 508, 476, 404, C8OX 254 + X 333, 282, 250, 215, 185, 176, 160, 131, 112, C8OX 255 + X 94, 76, 58, 38, 39, 38, 31, 3891, 6979, C8OX 256 + X 349, 409, 477, 582, 664, 750, 829, 870, 823, C8OX 257 + Y 715/ C8OX 258 + DATA MAP 13/ C8OX 259 + X 555, 428, 337, 287, 247, 225, 154, 147, 130, C8OX 260 + X 115, 107, 105, 101, 111, 130, 145, 151, 123, C8OX 261 + X 32, 4096, 7202, 360, 430, 511, 620, 760, 917, C8OX 262 + X 1078, 1252, 1213, 1001, 790, 476, 388, 307, 240, C8OX 263 + X 184, 161, 168, 153, 130, 117, 112, 112, 118, C8OX 264 + X 121, 121, 123, 132, 141, 32, 4300, 7380, 392, C8OX 265 + X 470, 543, 672, 931, 1167, 1468, 1559, 1278, 1051, C8OX 266 + X 800, 578, 496, 414, 343, 271, 269, 247, 215, C8OX 267 + X 201, 174, 153, 143, 141, 141, 145, 149, 157, C8OX 268 + X 173, 33, 4505, 7559, 387, 470, 569, 747, 1031, C8OX 269 + X 1304, 1603, 1773, 1772, 1573, 1374, 815, 591, 434, C8OX 270 + X 333, 226, 206, 203, 211, 199, 172, 148, 142, C8OX 271 + X 143, 150, 166, 173, 173, 184, 241, 34, 4710, C8OX 272 + X 7700, 397, 492, 654, 873, 1163, 1534, 1885, 2091, C8OX 273 + X 2066, 1802, 1512, 1274, 763, 597, 401, 315, 302, C8OX 274 + X 297, 270, 224, 196, 188, 180, 169, 165, 162, C8OX 275 + X 164, 166, 173, 186, 205, 34, 4915, 7817, 399, C8OX 276 + X 520, 723, 983, 1310, 1751, 2151, 2394, 2539, 2282, C8OX 277 + Y 1871/ C8OX 278 + DATA MAP 14/ C8OX 279 + X 1418, 862, 624, 371, 272, 327, 328, 324, 317, C8OX 280 + X 311, 289, 251, 222, 217, 218, 225, 230, 225, C8OX 281 + X 221, 227, 34, 5120, 7922, 408, 544, 779, 1093, C8OX 282 + X 1501, 2002, 2396, 2626, 2902, 2546, 2192, 1386, 1130, C8OX 283 + X 938, 793, 685, 596, 555, 534, 483, 345, 282, C8OX 284 + X 175, 171, 166, 174, 180, 179, 183, 188, 186, C8OX 285 + X 35, 5324, 8005, 430, 584, 833, 1135, 1610, 2258, C8OX 286 + X 2738, 3148, 3248, 2852, 2394, 1896, 1389, 1160, 948, C8OX 287 + X 744, 598, 496, 390, 340, 321, 318, 321, 322, C8OX 288 + X 319, 318, 327, 334, 330, 329, 337, 345, 35, C8OX 289 + X 5529, 8079, 437, 583, 872, 1239, 1815, 2497, 3008, C8OX 290 + X 3518, 3736, 3032, 2549, 2206, 1981, 1479, 1326, 1179, C8OX 291 + X 1007, 749, 582, 541, 447, 370, 318, 306, 308, C8OX 292 + X 316, 317, 314, 319, 330, 334, 334, 35, 5734, C8OX 293 + X 8120, 451, 616, 928, 1358, 2006, 2723, 3356, 4046, C8OX 294 + X 4373, 4102, 3451, 2925, 1741, 1354, 1020, 818, 786, C8OX 295 + X 790, 778, 704, 554, 454, 400, 395, 391, 391, C8OX 296 + X 394, 403, 413, 418, 419, 419, 35, 6144, 8172, C8OX 297 + Y 443/ C8OX 298 + DATA MAP 15/ C8OX 299 + X 613, 956, 1406, 2186, 3270, 4200, 4906, 5635, 6031, C8OX 300 + X 5108, 4300, 3477, 2951, 2416, 1902, 1463, 1075, 856, C8OX 301 + X 701, 581, 485, 422, 310, 319, 315, 315, 315, C8OX 302 + X 314, 319, 321, 312, 35, 6963, 8014, 519, 720, C8OX 303 + X 1175, 2004, 3122, 4531, 6786, 8972, 8833, 8897, 8207, C8OX 304 + X 7248, 4298, 3142, 2184, 1780, 1732, 1392, 1077, 853, C8OX 305 + X 734, 640, 632, 602, 755, 850, 847, 860, 873, C8OX 306 + X 894, 911, 888, 33, 7782, 7608, 567, 860, 1576, C8OX 307 + X 2793, 4340, 6755, 10578, 14463, 17058, 13071, 10830, 8050, C8OX 308 + X 5562, 4457, 3202, 3114, 3079, 2931, 2826, 2642, 2192, C8OX 309 + X 1772, 1448, 1224, 1128, 1070, 1074, 1087, 1073, 1067, C8OX 310 + X 31, 8601, 7131, 532, 913, 1616, 3018, 5419, 9207, C8OX 311 + X 14456, 19329, 22536, 23381, 16778, 13874, 7750, 4716, 3579, C8OX 312 + X 3854, 4079, 3935, 3234, 2625, 2585, 2586, 2572, 2550, C8OX 313 + X 2561, 2513, 2596, 2641, 29, 9420, 6630, 506, 864, C8OX 314 + X 1562, 3128, 5983, 10205, 16453, 24342, 29366, 27618, 22287, C8OX 315 + X 18444, 15934, 10004, 8329, 7515, 7355, 6759, 6134, 3818, C8OX 316 + X 3562, 3340, 3275, 3238, 3322, 3645, 27, 10240, 6012, C8OX 317 + Y 438/ C8OX 318 + DATA MAP 16/ C8OX 319 + X 780, 1255, 2525, 5944, 11157, 19076, 32094, 37873, 38300, C8OX 320 + X 32050, 24974, 19668, 15500, 10208, 8437, 7279, 5732, 4322, C8OX 321 + X 3172, 2437, 2429, 2529, 2820, 25, 11264, 5475, 439, C8OX 322 + X 724, 1428, 3344, 7002, 13165, 26384, 37240, 42053, 41304, C8OX 323 + X 33930, 29309, 25763, 23855, 15288, 12002, 8386, 8387, 8272, C8OX 324 + X 7777, 6884, 8015, 24, 12288, 5162, 409, 654, 1223, C8OX 325 + X 2547, 6141, 11659, 19324, 32440, 48198, 55163, 54196, 41046, C8OX 326 + X 35533, 30532, 26128, 17942, 14105, 11156, 9471, 10682, 15977, C8OX 327 + X 22, 13516, 4758, 438, 733, 1327, 2456, 5208, 10804, C8OX 328 + X 19805, 26527, 34336, 43649, 50222, 50500, 43690, 40191, 36566, C8OX 329 + X 32282, 28428, 29400, 39894, 3, 20480, 0, 3, 32767, C8OX 330 + X 0, 765, 100, 3, 0, 0, 3, 2334, 0, C8OX 331 + X 10, 2355, 1707, 26, 24, 19, 16, 14, 11, C8OX 332 + X 12, 14, 2396, 2798, 47, 35, 30, 19, 11, C8OX 333 + X 10, 6, 7, 6, 4, 3, 17, 2457, 3510, C8OX 334 + X 85, 72, 58, 50, 44, 29, 23, 17, 12, C8OX 335 + X 9, 6, 6, 5, 5, 22, 2662, 4640, 192, C8OX 336 + X 190, 189, 142, 106, 72, 63, 51, 42, 34, C8OX 337 + Y 26/ C8OX 338 + DATA MAP 17/ C8OX 339 + X 20, 18, 14, 15, 12, 12, 14, 14, 24, C8OX 340 + X 2867, 5285, 200, 229, 255, 249, 257, 217, 184, C8OX 341 + X 157, 99, 71, 59, 32, 25, 17, 15, 13, C8OX 342 + X 15, 15, 16, 18, 19, 26, 3072, 5838, 229, C8OX 343 + X 260, 287, 311, 314, 325, 313, 272, 227, 192, C8OX 344 + X 141, 107, 82, 63, 48, 37, 27, 20, 14, C8OX 345 + X 10, 8, 10, 10, 28, 3276, 6153, 288, 327, C8OX 346 + X 355, 381, 402, 398, 384, 360, 347, 297, 209, C8OX 347 + X 175, 166, 127, 110, 82, 74, 58, 48, 40, C8OX 348 + X 31, 21, 20, 23, 22, 29, 3481, 6520, 293, C8OX 349 + X 341, 391, 459, 485, 471, 488, 477, 428, 369, C8OX 350 + X 288, 254, 233, 219, 195, 173, 146, 138, 105, C8OX 351 + X 79, 56, 45, 26, 21, 29, 28, 30, 3686, C8OX 352 + X 6761, 315, 368, 416, 471, 529, 576, 625, 615, C8OX 353 + X 559, 505, 473, 390, 328, 284, 246, 212, 184, C8OX 354 + X 175, 162, 129, 109, 90, 74, 55, 38, 39, C8OX 355 + X 36, 30, 3891, 6909, 349, 420, 499, 590, 667, C8OX 356 + X 767, 826, 854, 808, 713, 556, 421, 338, 292, C8OX 357 + Y 252/ C8OX 358 + DATA MAP 18/ C8OX 359 + X 222, 151, 150, 131, 112, 107, 105, 102, 114, C8OX 360 + X 135, 147, 124, 31, 4096, 7094, 367, 438, 521, C8OX 361 + X 645, 797, 967, 1144, 1301, 1190, 1008, 652, 459, C8OX 362 + X 370, 295, 228, 175, 161, 168, 150, 128, 116, C8OX 363 + X 114, 114, 119, 119, 121, 127, 131, 32, 4300, C8OX 364 + X 7242, 393, 470, 566, 725, 980, 1226, 1507, 1532, C8OX 365 + X 1253, 1015, 755, 563, 479, 402, 330, 274, 272, C8OX 366 + X 245, 220, 201, 170, 150, 142, 141, 142, 147, C8OX 367 + X 151, 162, 182, 32, 4505, 7377, 389, 477, 603, C8OX 368 + X 803, 1084, 1380, 1698, 1885, 1755, 1484, 1308, 716, C8OX 369 + X 552, 405, 291, 221, 211, 213, 213, 194, 165, C8OX 370 + X 144, 145, 147, 156, 167, 169, 175, 193, 33, C8OX 371 + X 4710, 7487, 402, 497, 650, 870, 1182, 1534, 1887, C8OX 372 + X 2151, 2164, 1787, 1427, 1218, 762, 592, 405, 328, C8OX 373 + X 320, 307, 269, 222, 195, 192, 179, 165, 164, C8OX 374 + X 163, 162, 166, 177, 192, 33, 4915, 7586, 385, C8OX 375 + X 507, 716, 958, 1247, 1730, 2186, 2509, 2676, 2305, C8OX 376 + X 1857, 1382, 829, 597, 361, 270, 331, 329, 329, C8OX 377 + Y 325/ C8OX 378 + DATA MAP 19/ C8OX 379 + X 317, 286, 242, 218, 215, 218, 229, 229, 228, C8OX 380 + X 234, 33, 5120, 7658, 394, 521, 738, 1016, 1403, C8OX 381 + X 1945, 2432, 2777, 2979, 2536, 2184, 1350, 1116, 921, C8OX 382 + X 786, 685, 595, 539, 531, 503, 384, 306, 197, C8OX 383 + X 175, 168, 173, 177, 182, 190, 195, 34, 5324, C8OX 384 + X 7723, 404, 535, 772, 1078, 1518, 2111, 2620, 2998, C8OX 385 + X 3280, 2956, 2457, 1950, 1517, 1226, 998, 801, 659, C8OX 386 + X 541, 406, 348, 327, 322, 325, 327, 321, 320, C8OX 387 + X 323, 325, 330, 331, 344, 34, 5529, 7777, 394, C8OX 388 + X 519, 759, 1101, 1584, 2211, 2829, 3391, 3763, 3252, C8OX 389 + X 2732, 2287, 2053, 1620, 1292, 1192, 1033, 882, 588, C8OX 390 + X 585, 499, 396, 331, 318, 311, 314, 320, 320, C8OX 391 + X 321, 336, 345, 34, 5734, 7795, 380, 508, 763, C8OX 392 + X 1147, 1680, 2342, 3020, 3733, 4289, 4343, 3894, 3250, C8OX 393 + X 2097, 1406, 1115, 885, 816, 822, 823, 779, 634, C8OX 394 + X 475, 408, 402, 393, 385, 387, 404, 417, 429, C8OX 395 + X 438, 34, 6144, 7762, 402, 537, 792, 1203, 1853, C8OX 396 + X 2671, 3553, 4507, 5362, 5934, 5192, 4407, 3776, 3402, C8OX 397 + Y 2944/ C8OX 398 + DATA MAP 20/ C8OX 399 + X 2216, 1761, 1299, 1034, 828, 659, 534, 463, 321, C8OX 400 + X 316, 323, 311, 314, 316, 328, 332, 33, 6963, C8OX 401 + X 7500, 452, 598, 912, 1468, 2366, 3486, 4895, 6738, C8OX 402 + X 8179, 8549, 9508, 8129, 7166, 3783, 2852, 2096, 1831, C8OX 403 + X 1702, 1265, 1007, 828, 718, 651, 603, 637, 814, C8OX 404 + X 849, 858, 895, 914, 31, 7782, 6939, 522, 755, C8OX 405 + X 1260, 2152, 3389, 5055, 7932, 11779, 15030, 16017, 12407, C8OX 406 + X 9994, 7887, 5242, 4287, 3624, 3363, 2964, 2914, 2797, C8OX 407 + X 2082, 1712, 1417, 1220, 1144, 1117, 1122, 1120, 28, C8OX 408 + X 8601, 6284, 407, 672, 1225, 2011, 3440, 5889, 9939, C8OX 409 + X 16037, 21522, 24071, 23418, 15698, 11009, 6282, 4591, 4462, C8OX 410 + X 4805, 4425, 3371, 2614, 2541, 2463, 2461, 2734, 2612, C8OX 411 + X 25, 9420, 5547, 350, 460, 755, 1190, 2188, 4496, C8OX 412 + X 7724, 13039, 20767, 32944, 35094, 30524, 21946, 19605, 10265, C8OX 413 + X 8768, 7317, 6065, 4203, 3658, 3354, 3529, 22, 10240, C8OX 414 + X 4636, 277, 416, 666, 965, 1422, 3044, 4816, 7207, C8OX 415 + X 11505, 20471, 42537, 41723, 37898, 27898, 20383, 15476, 12570, C8OX 416 + X 9422, 9065, 19, 11264, 3924, 309, 355, 544, 862, C8OX 417 + Y 1231/ C8OX 418 + DATA MAP 21/ C8OX 419 + X 2579, 4232, 5960, 9071, 21152, 34273, 41233, 41140, 36631, C8OX 420 + X 25294, 28206, 17, 12288, 3497, 311, 394, 644, 1006, C8OX 421 + X 1694, 3708, 5976, 9598, 15923, 26355, 37962, 45523, 48895, C8OX 422 + X 53970, 16, 13516, 3098, 349, 447, 680, 1029, 1603, C8OX 423 + X 3188, 5529, 9136, 15107, 22390, 27256, 35118, 63012, 3, C8OX 424 + X 20480, 0, 3, 32767, 0, 646, 200, 3, 0, C8OX 425 + X 0, 3, 2334, 0, 10, 2355, 1698, 26, 24, C8OX 426 + X 19, 16, 14, 11, 7, 14, 2396, 2794, 47, C8OX 427 + X 35, 30, 19, 11, 10, 6, 7, 6, 4, C8OX 428 + X 3, 17, 2457, 3509, 84, 73, 58, 49, 44, C8OX 429 + X 29, 23, 17, 12, 9, 6, 6, 5, 5, C8OX 430 + X 22, 2662, 4628, 198, 188, 189, 142, 104, 71, C8OX 431 + X 64, 50, 42, 34, 25, 20, 18, 14, 15, C8OX 432 + X 12, 12, 14, 14, 24, 2867, 5263, 201, 230, C8OX 433 + X 259, 261, 251, 218, 182, 152, 98, 70, 56, C8OX 434 + X 32, 25, 16, 15, 14, 14, 15, 16, 19, C8OX 435 + X 18, 26, 3072, 5806, 231, 261, 287, 311, 322, C8OX 436 + X 332, 312, 275, 228, 186, 138, 104, 80, 61, C8OX 437 + Y 47/ C8OX 438 + DATA MAP 22/ C8OX 439 + X 35, 26, 20, 13, 10, 8, 10, 9, 27, C8OX 440 + X 3276, 6120, 289, 329, 354, 378, 401, 402, 391, C8OX 441 + X 374, 335, 295, 216, 179, 159, 127, 107, 81, C8OX 442 + X 72, 57, 46, 39, 30, 20, 21, 22, 29, C8OX 443 + X 3481, 6457, 298, 337, 394, 468, 503, 476, 495, C8OX 444 + X 475, 425, 354, 282, 248, 238, 227, 203, 173, C8OX 445 + X 147, 127, 100, 75, 54, 39, 25, 22, 29, C8OX 446 + X 29, 30, 3686, 6660, 310, 368, 427, 505, 559, C8OX 447 + X 606, 636, 614, 553, 510, 466, 349, 320, 289, C8OX 448 + X 238, 201, 183, 186, 162, 121, 102, 84, 67, C8OX 449 + X 48, 38, 39, 35, 30, 3891, 6779, 351, 420, C8OX 450 + X 516, 625, 692, 789, 824, 831, 789, 696, 555, C8OX 451 + X 413, 340, 293, 253, 220, 159, 153, 128, 114, C8OX 452 + X 111, 105, 105, 124, 140, 143, 143, 30, 4096, C8OX 453 + X 6877, 369, 450, 559, 703, 862, 1046, 1233, 1342, C8OX 454 + X 1104, 953, 566, 432, 344, 269, 208, 165, 172, C8OX 455 + X 171, 144, 126, 116, 114, 117, 120, 121, 124, C8OX 456 + X 131, 31, 4300, 6961, 390, 475, 612, 797, 1035, C8OX 457 + Y 1261/ C8OX 458 + DATA MAP 23/ C8OX 459 + X 1486, 1509, 1242, 1010, 748, 561, 467, 387, 313, C8OX 460 + X 286, 274, 237, 221, 189, 160, 145, 142, 142, C8OX 461 + X 143, 149, 160, 175, 31, 4505, 7006, 391, 491, C8OX 462 + X 641, 841, 1093, 1454, 1813, 2011, 1845, 1479, 1150, C8OX 463 + X 662, 489, 377, 236, 216, 215, 215, 204, 180, C8OX 464 + X 160, 153, 150, 155, 164, 169, 174, 189, 31, C8OX 465 + X 4710, 7034, 392, 498, 662, 862, 1152, 1611, 2070, C8OX 466 + X 2276, 2146, 1776, 1412, 1171, 740, 548, 380, 344, C8OX 467 + X 345, 309, 247, 217, 202, 183, 167, 165, 163, C8OX 468 + X 162, 163, 178, 31, 4915, 7052, 367, 474, 667, C8OX 469 + X 932, 1261, 1779, 2413, 2912, 3112, 2191, 1965, 884, C8OX 470 + X 688, 466, 295, 312, 352, 352, 343, 331, 298, C8OX 471 + X 246, 218, 219, 222, 228, 232, 240, 31, 5120, C8OX 472 + X 7053, 356, 462, 649, 939, 1356, 1934, 2551, 3001, C8OX 473 + X 3214, 2542, 2157, 1302, 1085, 884, 753, 655, 585, C8OX 474 + X 566, 565, 515, 347, 287, 174, 177, 173, 173, C8OX 475 + X 179, 196, 31, 5324, 7044, 336, 430, 651, 979, C8OX 476 + X 1381, 2068, 2707, 3168, 3518, 3358, 2516, 2002, 1479, C8OX 477 + Y 1181/ C8OX 478 + DATA MAP 24/ C8OX 479 + X 942, 774, 645, 526, 364, 338, 322, 314, 315, C8OX 480 + X 323, 334, 334, 335, 349, 31, 5529, 7036, 340, C8OX 481 + X 431, 640, 990, 1463, 2210, 2861, 3298, 3675, 3671, C8OX 482 + X 2905, 2421, 2001, 1596, 1226, 1167, 1039, 876, 648, C8OX 483 + X 590, 519, 397, 337, 313, 310, 322, 329, 343, C8OX 484 + X 31, 5734, 6965, 333, 432, 657, 1028, 1521, 2222, C8OX 485 + X 2979, 3609, 4149, 4578, 4425, 3271, 2419, 1473, 1146, C8OX 486 + X 932, 879, 878, 834, 750, 512, 428, 405, 401, C8OX 487 + X 386, 382, 413, 462, 30, 6144, 6834, 326, 405, C8OX 488 + X 599, 999, 1560, 2221, 3024, 3994, 5118, 5921, 6091, C8OX 489 + X 4842, 4163, 3676, 3274, 2679, 1830, 1403, 1078, 868, C8OX 490 + X 637, 501, 388, 318, 319, 315, 328, 28, 6963, C8OX 491 + X 6250, 360, 496, 830, 1358, 2091, 3043, 4222, 5678, C8OX 492 + X 7368, 8967, 9902, 9671, 7033, 5149, 3144, 2568, 2059, C8OX 493 + X 1802, 1009, 930, 806, 674, 579, 674, 882, 24, C8OX 494 + X 7782, 5282, 574, 819, 1347, 2404, 3698, 5239, 8784, C8OX 495 + X 13898, 17731, 15705, 12740, 9658, 7335, 5800, 4887, 4128, C8OX 496 + X 3380, 2707, 2031, 1665, 1410, 20, 8601, 4223, 420, C8OX 497 + Y 681/ C8OX 498 + DATA MAP 25/ C8OX 499 + X 1145, 1909, 3450, 5769, 10196, 18157, 25687, 27769, 20234, C8OX 500 + X 17936, 7858, 5976, 5243, 4753, 4075, 15, 9420, 2943, C8OX 501 + X 317, 415, 741, 1268, 2740, 7218, 12285, 27310, 54424, C8OX 502 + X 46048, 33240, 23316, 8, 10240, 1241, 167, 232, 357, C8OX 503 + X 594, 1646, 3, 11264, 0, 3, 32767, 0, 514, C8OX 504 + X 600, 3, 0, 0, 3, 2334, 0, 10, 2355, C8OX 505 + X 1662, 26, 24, 19, 16, 14, 11, 12, 14, C8OX 506 + X 2396, 2777, 47, 35, 30, 19, 11, 10, 6, C8OX 507 + X 7, 6, 4, 4, 17, 2457, 3499, 85, 72, C8OX 508 + X 57, 50, 43, 29, 22, 18, 11, 9, 6, C8OX 509 + X 6, 5, 5, 21, 2662, 4582, 205, 203, 175, C8OX 510 + X 145, 104, 70, 60, 49, 41, 32, 24, 20, C8OX 511 + X 17, 14, 15, 12, 12, 12, 24, 2867, 5170, C8OX 512 + X 211, 248, 274, 275, 253, 217, 174, 133, 90, C8OX 513 + X 64, 48, 29, 22, 16, 15, 14, 14, 16, C8OX 514 + X 17, 19, 19, 26, 3072, 5656, 238, 269, 290, C8OX 515 + X 326, 359, 367, 317, 271, 220, 161, 122, 90, C8OX 516 + X 69, 53, 40, 31, 22, 16, 12, 9, 9, C8OX 517 + Y 9/ C8OX 518 + DATA MAP 26/ C8OX 519 + X 9, 27, 3276, 5947, 294, 337, 365, 369, 400, C8OX 520 + X 431, 432, 392, 328, 285, 213, 179, 149, 121, C8OX 521 + X 91, 75, 63, 50, 41, 32, 25, 21, 22, C8OX 522 + X 21, 27, 3481, 6109, 317, 364, 419, 503, 532, C8OX 523 + X 523, 529, 481, 405, 328, 280, 264, 268, 221, C8OX 524 + X 181, 139, 126, 100, 75, 55, 34, 24, 25, C8OX 525 + X 28, 28, 3686, 6190, 343, 405, 470, 562, 651, C8OX 526 + X 730, 708, 626, 537, 504, 379, 363, 306, 253, C8OX 527 + X 208, 200, 178, 140, 115, 92, 70, 53, 39, C8OX 528 + X 39, 36, 28, 3891, 6206, 365, 445, 541, 662, C8OX 529 + X 824, 897, 802, 782, 779, 707, 593, 402, 344, C8OX 530 + X 290, 247, 186, 158, 126, 119, 107, 108, 124, C8OX 531 + X 139, 164, 163, 27, 4096, 6128, 404, 510, 657, C8OX 532 + X 838, 1021, 1178, 1271, 1243, 1049, 792, 528, 424, C8OX 533 + X 341, 247, 204, 216, 167, 138, 119, 114, 116, C8OX 534 + X 120, 123, 129, 27, 4300, 6047, 403, 525, 722, C8OX 535 + X 956, 1208, 1471, 1653, 1459, 1209, 931, 675, 545, C8OX 536 + X 446, 324, 301, 274, 246, 199, 167, 148, 141, C8OX 537 + Y 145/ C8OX 538 + DATA MAP 27/ C8OX 539 + X 149, 154, 27, 4505, 5954, 413, 539, 755, 1019, C8OX 540 + X 1412, 1893, 2242, 2018, 1607, 1396, 705, 538, 376, C8OX 541 + X 257, 260, 254, 224, 188, 165, 162, 163, 166, C8OX 542 + X 166, 171, 26, 4710, 5831, 393, 526, 783, 1132, C8OX 543 + X 1637, 2207, 2543, 2512, 1967, 1553, 1124, 752, 514, C8OX 544 + X 422, 408, 350, 268, 241, 210, 183, 172, 165, C8OX 545 + X 177, 26, 4915, 5720, 388, 489, 700, 1070, 1761, C8OX 546 + X 2641, 3235, 3380, 2361, 2063, 988, 764, 470, 350, C8OX 547 + X 422, 406, 373, 346, 292, 245, 221, 223, 234, C8OX 548 + X 25, 5120, 5570, 368, 483, 697, 1103, 1823, 2754, C8OX 549 + X 3419, 3662, 2812, 2345, 1375, 1074, 888, 744, 650, C8OX 550 + X 621, 627, 559, 390, 311, 187, 193, 25, 5324, C8OX 551 + X 5376, 375, 511, 799, 1243, 2053, 2909, 3520, 3867, C8OX 552 + X 3603, 2684, 2042, 1486, 1216, 970, 745, 548, 371, C8OX 553 + X 329, 322, 330, 341, 357, 24, 5529, 5212, 386, C8OX 554 + X 533, 809, 1236, 2047, 3064, 3902, 4358, 3620, 2889, C8OX 555 + X 2296, 2027, 1554, 1290, 1191, 1038, 870, 656, 599, C8OX 556 + X 461, 376, 23, 5734, 4989, 384, 529, 822, 1281, C8OX 557 + Y 2165/ C8OX 558 + DATA MAP 28/ C8OX 559 + X 3129, 3970, 5050, 5868, 4244, 3773, 1791, 1338, 1062, C8OX 560 + X 974, 917, 818, 652, 476, 461, 21, 6144, 4544, C8OX 561 + X 414, 564, 850, 1299, 2166, 3030, 4228, 6234, 7413, C8OX 562 + X 6343, 5077, 4205, 3680, 2731, 2089, 1697, 1462, 985, C8OX 563 + X 17, 6963, 3376, 411, 624, 1083, 1815, 2937, 4377, C8OX 564 + X 7047, 9559, 11176, 12183, 8484, 8000, 3648, 3056, 10, C8OX 565 + X 7782, 1620, 578, 947, 1671, 3213, 5905, 10064, 23750, C8OX 566 + X 3, 8601, 0, 3, 32767, 0, 456, 1000, 3, C8OX 567 + X 0, 0, 3, 2334, 0, 10, 2355, 1641, 26, C8OX 568 + X 24, 19, 16, 14, 11, 7, 14, 2396, 2768, C8OX 569 + X 47, 35, 30, 19, 11, 10, 6, 7, 6, C8OX 570 + X 4, 3, 17, 2457, 3485, 85, 73, 57, 49, C8OX 571 + X 42, 29, 22, 17, 11, 9, 6, 6, 5, C8OX 572 + X 5, 21, 2662, 4533, 208, 210, 177, 145, 101, C8OX 573 + X 70, 58, 48, 38, 31, 24, 19, 17, 14, C8OX 574 + X 14, 12, 13, 12, 23, 2867, 5017, 243, 287, C8OX 575 + X 317, 279, 241, 204, 153, 110, 76, 54, 38, C8OX 576 + X 25, 18, 16, 14, 15, 15, 16, 18, 18, C8OX 577 + Y 25/ C8OX 578 + DATA MAP 29/ C8OX 579 + X 3072, 5422, 240, 282, 353, 410, 427, 364, 302, C8OX 580 + X 238, 176, 129, 95, 72, 55, 42, 31, 24, C8OX 581 + X 17, 12, 10, 9, 9, 9, 25, 3276, 5632, C8OX 582 + X 319, 362, 398, 420, 472, 483, 449, 387, 324, C8OX 583 + X 232, 189, 152, 121, 91, 73, 59, 49, 39, C8OX 584 + X 31, 24, 22, 22, 26, 3481, 5668, 334, 384, C8OX 585 + X 476, 548, 594, 608, 579, 491, 403, 331, 311, C8OX 586 + X 260, 213, 163, 139, 114, 83, 60, 41, 28, C8OX 587 + X 24, 26, 27, 26, 3686, 5663, 363, 440, 539, C8OX 588 + X 671, 771, 809, 731, 652, 579, 454, 408, 320, C8OX 589 + X 263, 216, 192, 146, 116, 93, 71, 56, 38, C8OX 590 + X 39, 38, 25, 3891, 5590, 390, 494, 628, 787, C8OX 591 + X 938, 998, 959, 927, 816, 631, 434, 355, 294, C8OX 592 + X 216, 166, 133, 119, 108, 108, 127, 139, 139, C8OX 593 + X 25, 4096, 5488, 439, 548, 712, 956, 1221, 1313, C8OX 594 + X 1423, 1223, 1066, 629, 475, 378, 264, 248, 183, C8OX 595 + X 147, 121, 113, 116, 119, 122, 124, 25, 4300, C8OX 596 + X 5391, 462, 590, 815, 1147, 1486, 1696, 1689, 1395, C8OX 597 + Y 1135/ C8OX 598 + DATA MAP 30/ C8OX 599 + X 804, 611, 496, 353, 323, 277, 225, 183, 153, C8OX 600 + X 145, 149, 156, 164, 24, 4505, 5237, 471, 620, C8OX 601 + X 909, 1371, 1888, 2275, 2089, 1785, 1583, 827, 651, C8OX 602 + X 413, 313, 328, 285, 226, 188, 174, 169, 173, C8OX 603 + X 177, 23, 4710, 5072, 438, 626, 990, 1489, 2217, C8OX 604 + X 2779, 2530, 2211, 1795, 1297, 841, 558, 447, 420, C8OX 605 + X 331, 279, 238, 205, 184, 183, 23, 4915, 4894, C8OX 606 + X 460, 620, 960, 1647, 2609, 3351, 3469, 2594, 2498, C8OX 607 + X 985, 782, 463, 411, 434, 402, 367, 326, 269, C8OX 608 + X 225, 231, 22, 5120, 4718, 427, 626, 1012, 1647, C8OX 609 + X 2746, 3632, 3955, 2947, 2564, 1415, 1099, 908, 760, C8OX 610 + X 676, 636, 617, 524, 352, 263, 21, 5324, 4536, C8OX 611 + X 399, 567, 895, 1582, 2811, 3566, 3831, 4215, 2942, C8OX 612 + X 2098, 1615, 1350, 1062, 836, 617, 424, 365, 358, C8OX 613 + X 20, 5529, 4299, 427, 611, 984, 1608, 2615, 3672, C8OX 614 + X 4264, 4274, 3217, 2568, 2205, 1828, 1398, 1279, 1130, C8OX 615 + X 960, 753, 19, 5734, 4018, 465, 635, 992, 1699, C8OX 616 + X 2789, 3913, 5166, 6412, 4611, 4242, 1908, 1458, 1114, C8OX 617 + Y 1032/ C8OX 618 + DATA MAP 31/ C8OX 619 + X 974, 872, 17, 6144, 3442, 449, 593, 893, 1427, C8OX 620 + X 2226, 3228, 5654, 7596, 7913, 5856, 4834, 3891, 3162, C8OX 621 + X 2365, 11, 6963, 1940, 512, 724, 1195, 2095, 3359, C8OX 622 + X 5769, 9543, 13441, 3, 7782, 0, 3, 32767, 0, C8OX 623 + X 384, 2000, 3, 0, 0, 3, 2336, 0, 10, C8OX 624 + X 2355, 1594, 26, 24, 19, 16, 14, 11, 7, C8OX 625 + X 14, 2396, 2748, 47, 35, 30, 19, 11, 10, C8OX 626 + X 6, 7, 6, 4, 4, 17, 2457, 3450, 92, C8OX 627 + X 71, 56, 49, 41, 27, 21, 16, 11, 9, C8OX 628 + X 6, 5, 6, 5, 21, 2662, 4384, 243, 227, C8OX 629 + X 184, 130, 85, 72, 54, 41, 34, 27, 21, C8OX 630 + X 18, 15, 15, 13, 12, 13, 14, 22, 2867, C8OX 631 + X 4750, 336, 402, 324, 268, 226, 156, 116, 77, C8OX 632 + X 55, 38, 26, 19, 16, 15, 15, 15, 16, C8OX 633 + X 18, 18, 23, 3072, 4921, 378, 479, 542, 477, C8OX 634 + X 408, 273, 194, 150, 106, 74, 56, 43, 32, C8OX 635 + X 24, 17, 14, 9, 9, 9, 9, 23, 3276, C8OX 636 + X 4891, 469, 587, 705, 663, 565, 470, 282, 231, C8OX 637 + Y 178/ C8OX 638 + DATA MAP 32/ C8OX 639 + X 140, 94, 77, 61, 50, 40, 32, 25, 23, C8OX 640 + X 22, 22, 22, 3481, 4814, 472, 623, 805, 800, C8OX 641 + X 740, 650, 528, 401, 301, 243, 161, 135, 105, C8OX 642 + X 81, 58, 36, 27, 23, 24, 22, 3686, 4705, C8OX 643 + X 504, 696, 943, 1062, 1021, 880, 735, 497, 395, C8OX 644 + X 315, 248, 176, 134, 106, 83, 65, 45, 37, C8OX 645 + X 41, 21, 3891, 4579, 528, 769, 1105, 1400, 1280, C8OX 646 + X 1133, 1004, 621, 467, 356, 243, 166, 128, 117, C8OX 647 + X 109, 112, 128, 143, 21, 4096, 4420, 616, 922, C8OX 648 + X 1367, 1750, 1731, 1440, 1227, 674, 524, 377, 285, C8OX 649 + X 211, 134, 122, 114, 120, 122, 131, 20, 4300, C8OX 650 + X 4288, 658, 979, 1467, 1972, 2098, 1719, 1265, 906, C8OX 651 + X 766, 628, 438, 318, 252, 203, 159, 149, 154, C8OX 652 + X 20, 4505, 4134, 633, 983, 1575, 2203, 2578, 2165, C8OX 653 + X 1770, 1321, 854, 572, 365, 417, 362, 274, 215, C8OX 654 + X 207, 210, 19, 4710, 3916, 664, 1059, 1746, 2522, C8OX 655 + X 2969, 2761, 2278, 1830, 1110, 751, 520, 459, 358, C8OX 656 + X 293, 249, 207, 18, 4915, 3717, 632, 1044, 1792, C8OX 657 + Y 2737/ C8OX 658 + DATA MAP 33/ C8OX 659 + X 3557, 3928, 2885, 1767, 1393, 575, 419, 454, 430, C8OX 660 + X 401, 363, 17, 5120, 3502, 586, 998, 1767, 2807, C8OX 661 + X 3783, 4275, 3130, 2725, 1366, 1123, 924, 802, 741, C8OX 662 + X 732, 16, 5324, 3264, 555, 892, 1699, 2673, 3535, C8OX 663 + X 4322, 4005, 3328, 2002, 1513, 1362, 1142, 911, 15, C8OX 664 + X 5529, 2944, 581, 920, 1693, 2736, 3789, 4751, 4003, C8OX 665 + X 3348, 2484, 2244, 1827, 1621, 14, 5734, 2591, 513, C8OX 666 + X 805, 1550, 2684, 4050, 5924, 7518, 4639, 4143, 1846, C8OX 667 + X 1569, 11, 6144, 1804, 509, 724, 1211, 2046, 3043, C8OX 668 + X 5020, 8322, 9479, 4, 6963, 22, 1965, 3, 7782, C8OX 669 + X 0, 3, 32767, 0, 342, 3000, 3, 0, 0, C8OX 670 + X 3, 2336, 0, 10, 2355, 1541, 26, 24, 19, C8OX 671 + X 16, 14, 11, 7, 14, 2396, 2731, 47, 35, C8OX 672 + X 30, 19, 11, 10, 6, 7, 6, 4, 4, C8OX 673 + X 17, 2457, 3414, 91, 76, 58, 47, 39, 26, C8OX 674 + X 21, 16, 10, 10, 5, 5, 6, 5, 20, C8OX 675 + X 2662, 4305, 259, 225, 188, 123, 87, 70, 54, C8OX 676 + X 40, 32, 25, 20, 17, 15, 14, 12, 13, C8OX 677 + Y 13/ C8OX 678 + DATA MAP 34/ C8OX 679 + X 22, 2867, 4631, 394, 403, 346, 273, 203, 141, C8OX 680 + X 103, 67, 46, 33, 23, 17, 16, 14, 16, C8OX 681 + X 15, 17, 18, 16, 22, 3072, 4686, 550, 622, C8OX 682 + X 547, 487, 278, 216, 172, 117, 81, 61, 44, C8OX 683 + X 33, 25, 18, 13, 11, 9, 8, 9, 22, C8OX 684 + X 3276, 4612, 625, 786, 779, 669, 520, 329, 243, C8OX 685 + X 185, 142, 105, 80, 62, 49, 40, 31, 25, C8OX 686 + X 23, 22, 22, 21, 3481, 4415, 723, 915, 955, C8OX 687 + X 848, 700, 541, 407, 318, 215, 155, 125, 100, C8OX 688 + X 72, 47, 32, 23, 22, 27, 20, 3686, 4249, C8OX 689 + X 760, 1040, 1233, 1156, 1024, 710, 520, 408, 311, C8OX 690 + X 213, 164, 117, 97, 70, 54, 43, 37, 19, C8OX 691 + X 3891, 4096, 729, 1084, 1511, 1453, 1283, 1163, 645, C8OX 692 + X 490, 375, 213, 173, 123, 115, 102, 119, 134, C8OX 693 + X 19, 4096, 3855, 988, 1449, 1939, 1901, 1746, 1028, C8OX 694 + X 788, 532, 359, 264, 197, 130, 112, 116, 120, C8OX 695 + X 126, 18, 4300, 3672, 936, 1449, 2080, 2226, 1975, C8OX 696 + X 1360, 1012, 814, 665, 433, 321, 252, 189, 170, C8OX 697 + Y 167/ C8OX 698 + DATA MAP 35/ C8OX 699 + X 17, 4505, 3465, 941, 1423, 2249, 2649, 2384, 2088, C8OX 700 + X 1236, 1009, 551, 394, 444, 397, 321, 230, 16, C8OX 701 + X 4710, 3209, 973, 1611, 2413, 3340, 3003, 2585, 1706, C8OX 702 + X 1294, 759, 530, 465, 381, 304, 15, 4915, 2972, C8OX 703 + X 926, 1621, 2744, 3852, 3959, 3792, 1435, 1429, 531, C8OX 704 + X 464, 466, 460, 14, 5120, 2727, 860, 1680, 2825, C8OX 705 + X 3893, 4473, 3516, 2560, 1585, 1228, 1025, 879, 13, C8OX 706 + X 5324, 2450, 793, 1420, 2561, 3593, 3924, 4135, 3819, C8OX 707 + X 2078, 1696, 1556, 12, 5529, 2114, 715, 1189, 2140, C8OX 708 + X 3391, 4558, 4884, 3954, 3035, 2751, 10, 5734, 1753, C8OX 709 + X 564, 952, 1934, 3405, 5226, 6766, 7189, 7, 6144, C8OX 710 + X 836, 576, 814, 1407, 2953, 3, 6963, 0, 3, C8OX 711 + X 32767, 0, 297, 5000, 3, 0, 0, 3, 2338, C8OX 712 + X 0, 9, 2355, 1394, 26, 24, 19, 16, 14, C8OX 713 + X 11, 14, 2396, 2686, 47, 35, 30, 19, 11, C8OX 714 + X 10, 6, 7, 6, 4, 4, 17, 2457, 3357, C8OX 715 + X 95, 75, 61, 48, 37, 25, 20, 14, 10, C8OX 716 + X 9, 5, 5, 6, 5, 20, 2662, 4213, 257, C8OX 717 + Y 226/ C8OX 718 + DATA MAP 36/ C8OX 719 + X 190, 129, 88, 71, 56, 39, 30, 23, 19, C8OX 720 + X 16, 15, 13, 13, 13, 11, 21, 2867, 4496, C8OX 721 + X 419, 415, 351, 284, 185, 147, 89, 62, 40, C8OX 722 + X 28, 20, 16, 15, 15, 16, 16, 18, 17, C8OX 723 + X 21, 3072, 4480, 737, 654, 594, 335, 262, 210, C8OX 724 + X 142, 99, 76, 57, 35, 26, 19, 15, 11, C8OX 725 + X 9, 9, 9, 20, 3276, 4347, 897, 871, 771, C8OX 726 + X 623, 403, 306, 223, 151, 121, 82, 73, 51, C8OX 727 + X 42, 31, 25, 22, 23, 20, 3481, 4100, 910, C8OX 728 + X 1139, 1014, 880, 575, 452, 360, 249, 172, 132, C8OX 729 + X 107, 75, 50, 38, 20, 22, 32, 19, 3686, C8OX 730 + X 3882, 937, 1274, 1334, 1187, 882, 603, 466, 381, C8OX 731 + X 231, 181, 129, 108, 78, 63, 51, 39, 18, C8OX 732 + X 3891, 3611, 987, 1412, 1615, 1496, 1374, 762, 609, C8OX 733 + X 413, 246, 188, 125, 120, 105, 119, 134, 16, C8OX 734 + X 4096, 3313, 1261, 1989, 2112, 1894, 1370, 972, 620, C8OX 735 + X 426, 305, 220, 129, 115, 118, 15, 4300, 3036, C8OX 736 + X 1335, 2063, 2337, 2152, 1625, 1132, 892, 780, 474, C8OX 737 + Y 370/ C8OX 738 + DATA MAP 37/ C8OX 739 + X 288, 233, 14, 4505, 2745, 1309, 2054, 2620, 2527, C8OX 740 + X 2253, 1536, 1216, 692, 465, 410, 493, 13, 4710, C8OX 741 + X 2428, 1374, 2244, 3316, 3148, 2775, 2037, 1477, 969, C8OX 742 + X 590, 574, 12, 4915, 2118, 1326, 2246, 3819, 4315, C8OX 743 + X 3900, 2004, 1897, 681, 558, 11, 5120, 1798, 1439, C8OX 744 + X 2680, 3952, 4656, 4278, 2684, 1935, 1399, 9, 5324, C8OX 745 + X 1456, 1349, 2202, 3752, 3848, 4096, 4135, 8, 5529, C8OX 746 + X 1058, 971, 1678, 2954, 4556, 6312, 6, 5734, 618, C8OX 747 + X 656, 1147, 3056, 3, 6144, 0, 3, 32767, 0, C8OX 748 + X 243, 10000, 3, 0, 0, 3, 2342, 0, 7, C8OX 749 + X 2355, 1015, 26, 24, 19, 19, 13, 2396, 2537, C8OX 750 + X 47, 35, 30, 19, 11, 10, 6, 7, 6, C8OX 751 + X 5, 16, 2457, 3215, 98, 78, 61, 50, 39, C8OX 752 + X 23, 16, 13, 9, 6, 5, 6, 6, 19, C8OX 753 + X 2662, 3987, 268, 234, 193, 129, 89, 70, 55, C8OX 754 + X 39, 25, 20, 17, 14, 14, 13, 13, 13, C8OX 755 + X 20, 2867, 4246, 433, 420, 356, 277, 188, 150, C8OX 756 + X 88, 55, 46, 22, 17, 16, 15, 16, 15, C8OX 757 + Y 17/ C8OX 758 + DATA MAP 38/ C8OX 759 + X 19, 20, 3072, 4223, 768, 648, 563, 335, 271, C8OX 760 + X 216, 149, 101, 73, 55, 36, 26, 15, 12, C8OX 761 + X 9, 9, 9, 19, 3276, 3987, 928, 863, 765, C8OX 762 + X 650, 423, 313, 217, 141, 112, 73, 62, 48, C8OX 763 + X 39, 33, 20, 20, 18, 3481, 3694, 1031, 1103, C8OX 764 + X 987, 788, 520, 416, 338, 278, 218, 173, 135, C8OX 765 + X 80, 62, 29, 21, 17, 3686, 3408, 963, 1170, C8OX 766 + X 1225, 1116, 894, 608, 471, 386, 264, 198, 164, C8OX 767 + X 103, 99, 92, 15, 3891, 3072, 948, 1270, 1464, C8OX 768 + X 1379, 1206, 916, 671, 502, 362, 239, 176, 138, C8OX 769 + X 14, 4096, 2684, 1245, 1668, 2057, 1882, 1565, 1010, C8OX 770 + X 663, 474, 313, 253, 148, 13, 4300, 2326, 1401, C8OX 771 + X 1915, 2285, 2132, 1647, 1153, 903, 777, 509, 412, C8OX 772 + X 11, 4505, 1923, 1493, 1974, 2545, 2484, 2168, 1452, C8OX 773 + X 1173, 786, 9, 4710, 1527, 1291, 1808, 2793, 2910, C8OX 774 + X 2741, 2402, 8, 4915, 1082, 1395, 2062, 3312, 3867, C8OX 775 + X 4519, 6, 5120, 665, 1495, 2923, 4786, 4, 5324, C8OX 776 + X 174, 1699, 3, 5529, 0, 3, 32767, 0, 190, C8OX 777 + Y 20000/ C8OX 778 + DATA MAP 39/ C8OX 779 + X 3, 0, 0, 3, 2351, 0, 5, 2355, 308, C8OX 780 + X 26, 24, 12, 2396, 2165, 47, 35, 30, 19, C8OX 781 + X 11, 10, 6, 7, 6, 15, 2457, 2905, 98, C8OX 782 + X 78, 62, 50, 38, 28, 20, 13, 6, 5, C8OX 783 + X 6, 6, 17, 2662, 3556, 263, 236, 195, 137, C8OX 784 + X 91, 72, 57, 36, 26, 20, 17, 15, 14, C8OX 785 + X 12, 18, 2867, 3770, 416, 422, 355, 275, 187, C8OX 786 + X 144, 90, 61, 46, 30, 20, 15, 14, 16, C8OX 787 + X 17, 18, 3072, 3725, 764, 644, 523, 341, 274, C8OX 788 + X 216, 156, 102, 76, 50, 40, 31, 23, 19, C8OX 789 + X 15, 17, 3276, 3389, 834, 767, 711, 674, 446, C8OX 790 + X 357, 233, 166, 123, 90, 64, 60, 51, 48, C8OX 791 + X 15, 3481, 3049, 819, 979, 879, 744, 545, 415, C8OX 792 + X 349, 324, 304, 258, 204, 149, 14, 3686, 2700, C8OX 793 + X 831, 960, 948, 876, 787, 581, 497, 415, 342, C8OX 794 + X 318, 273, 13, 3891, 2319, 663, 918, 1221, 1167, C8OX 795 + X 1044, 886, 752, 540, 457, 520, 11, 4096, 1858, C8OX 796 + X 934, 1448, 1755, 1802, 1612, 1232, 830, 627, 9, C8OX 797 + Y 4300/ C8OX 798 + DATA MAP 40/ C8OX 799 + X 1402, 903, 1385, 2215, 2305, 1998, 1368, 7, 4505, C8OX 800 + X 856, 1286, 1601, 2390, 2881, 5, 4710, 283, 1313, C8OX 801 + X 1680, 3, 4915, 0, 3, 32767, 0, 127, 40000, C8OX 802 + X 3, 0, 0, 3, 2369, 0, 9, 2396, 1332, C8OX 803 + X 47, 35, 30, 19, 11, 10, 12, 2457, 2210, C8OX 804 + X 85, 69, 55, 45, 38, 30, 23, 19, 15, C8OX 805 + X 14, 2662, 2764, 228, 222, 184, 154, 96, 75, C8OX 806 + X 59, 45, 32, 24, 20, 15, 2867, 2923, 368, C8OX 807 + X 410, 329, 237, 198, 138, 113, 70, 53, 45, C8OX 808 + X 36, 26, 15, 3072, 2820, 711, 610, 555, 292, C8OX 809 + X 236, 186, 163, 133, 94, 72, 55, 48, 13, C8OX 810 + X 3276, 2454, 674, 589, 443, 490, 523, 403, 328, C8OX 811 + X 264, 198, 158, 11, 3481, 2040, 605, 685, 723, C8OX 812 + X 677, 605, 417, 353, 332, 10, 3686, 1613, 586, C8OX 813 + X 614, 616, 682, 704, 649, 542, 8, 3891, 1074, C8OX 814 + X 591, 725, 841, 998, 1108, 6, 4096, 521, 880, C8OX 815 + X 1122, 1201, 3, 4300, 0, 3, 32767, 0, C8OX 816 + Y 0/ C8OX 817 + END C8OX 818 diff --git a/SOFIP/original/ap8mic.dat b/SOFIP/original/ap8mic.dat new file mode 100755 index 0000000..69a4494 --- /dev/null +++ b/SOFIP/original/ap8mic.dat @@ -0,0 +1,843 @@ + BLOCK DATA C8ON 1 + DOUBLE PRECISION NAME C8ON 2 + COMMON/ AP8MIC /NAME,EPOCH,SCAE,SCAL,SCAB,SCAF,LENGTH C8ON 3 + X,MAP 1(163),MAP 2(163),MAP 3(163),MAP 4(163),MAP 5(163) C8ON 4 + X,MAP 6(163),MAP 7(163),MAP 8(163),MAP 9(163),MAP 10(163) C8ON 5 + X,MAP 11(163),MAP 12(163),MAP 13(163),MAP 14(163),MAP 15(163) C8ON 6 + X,MAP 16(163),MAP 17(163),MAP 18(163),MAP 19(163),MAP 20(163) C8ON 7 + X,MAP 21(163),MAP 22(163),MAP 23(163),MAP 24(163),MAP 25(163) C8ON 8 + X,MAP 26(163),MAP 27(163),MAP 28(163),MAP 29(163),MAP 30(163) C8ON 9 + X,MAP 31(163),MAP 32(163),MAP 33(163),MAP 34(163),MAP 35(163) C8ON 10 + X,MAP 36(163),MAP 37(163),MAP 38(163),MAP 39(163),MAP 40(163) C8ON 11 + X,MAP 41(163),MAP 42( 6) C8ON 12 + DATA NAME /8H AP8MIC / C8ON 13 + DATA EPOCH / 1964.000/ C8ON 14 + DATA SCAE / 100.000/ C8ON 15 + DATA SCAL / 2048.000/ C8ON 16 + DATA SCAB / 2048.000/ C8ON 17 + DATA SCAF / 1024.000/ C8ON 18 + DATA LENGTH/ 6688/ C8ON 19 + DATA MAP 1/ C8ON 20 + X 892, 10, 3, 0, 0, 3, 2299, 0, 11, C8ON 21 + X 2334, 2001, 17, 12, 13, 12, 12, 10, 9, C8ON 22 + X 9, 14, 2355, 2665, 31, 24, 23, 21, 19, C8ON 23 + X 13, 10, 6, 5, 1, 1, 16, 2396, 3252, C8ON 24 + X 64, 44, 33, 19, 12, 10, 7, 6, 6, C8ON 25 + X 5, 4, 4, 4, 18, 2457, 3659, 124, 96, C8ON 26 + X 72, 43, 34, 29, 23, 20, 16, 12, 10, C8ON 27 + X 8, 7, 5, 9, 22, 2662, 4673, 220, 209, C8ON 28 + X 185, 158, 132, 105, 78, 60, 48, 34, 25, C8ON 29 + X 21, 18, 16, 14, 11, 10, 10, 16, 24, C8ON 30 + X 2867, 5312, 207, 252, 294, 295, 280, 233, 199, C8ON 31 + X 118, 87, 68, 54, 47, 32, 26, 25, 25, C8ON 32 + X 25, 23, 25, 26, 29, 26, 3072, 5865, 229, C8ON 33 + X 257, 288, 311, 315, 332, 327, 300, 258, 211, C8ON 34 + X 137, 109, 78, 58, 43, 37, 34, 31, 30, C8ON 35 + X 30, 29, 29, 32, 28, 3276, 6182, 286, 325, C8ON 36 + X 361, 380, 405, 399, 386, 367, 343, 311, 251, C8ON 37 + X 225, 181, 146, 116, 85, 68, 53, 42, 33, C8ON 38 + Y 32/ C8ON 39 + DATA MAP 2/ C8ON 40 + X 31, 31, 35, 49, 29, 3481, 6577, 294, 340, C8ON 41 + X 389, 450, 477, 462, 483, 486, 448, 395, 342, C8ON 42 + X 332, 283, 242, 213, 181, 144, 123, 99, 76, C8ON 43 + X 60, 49, 36, 35, 36, 47, 30, 3686, 6855, C8ON 44 + X 312, 364, 416, 478, 522, 543, 590, 612, 572, C8ON 45 + X 548, 519, 455, 384, 339, 300, 268, 230, 185, C8ON 46 + X 165, 106, 83, 63, 60, 57, 57, 65, 88, C8ON 47 + X 31, 3891, 7129, 314, 375, 448, 543, 625, 706, C8ON 48 + X 804, 914, 900, 806, 699, 595, 499, 423, 329, C8ON 49 + X 256, 198, 156, 126, 110, 95, 79, 69, 65, C8ON 50 + X 65, 63, 70, 97, 32, 4096, 7407, 334, 394, C8ON 51 + X 475, 584, 699, 834, 982, 1118, 1269, 1290, 1180, C8ON 52 + X 1010, 882, 527, 420, 357, 211, 139, 96, 60, C8ON 53 + X 31, 22, 17, 18, 19, 15, 17, 20, 18, C8ON 54 + X 33, 4300, 7621, 366, 450, 557, 680, 764, 980, C8ON 55 + X 1288, 1562, 1633, 1462, 1298, 1112, 869, 534, 371, C8ON 56 + X 220, 126, 100, 89, 87, 84, 87, 89, 88, C8ON 57 + X 86, 89, 90, 91, 94, 108, 34, 4505, 7867, C8ON 58 + Y 382/ C8ON 59 + DATA MAP 3/ C8ON 60 + X 471, 591, 752, 959, 1202, 1526, 1757, 1896, 1944, C8ON 61 + X 1668, 1438, 815, 611, 409, 245, 210, 200, 207, C8ON 62 + X 225, 191, 168, 87, 73, 70, 71, 72, 75, C8ON 63 + X 78, 85, 108, 35, 4710, 8054, 415, 508, 642, C8ON 64 + X 842, 1149, 1487, 1814, 2029, 2078, 1929, 1714, 1478, C8ON 65 + X 1091, 807, 643, 522, 471, 337, 259, 203, 145, C8ON 66 + X 111, 115, 114, 118, 118, 118, 117, 116, 117, C8ON 67 + X 119, 127, 35, 4915, 8191, 429, 552, 758, 1046, C8ON 68 + X 1448, 1883, 2223, 2302, 2425, 2212, 1965, 1705, 1319, C8ON 69 + X 882, 662, 351, 272, 235, 214, 204, 199, 208, C8ON 70 + X 215, 221, 225, 223, 221, 216, 214, 214, 218, C8ON 71 + X 233, 36, 5120, 8348, 436, 579, 831, 1178, 1608, C8ON 72 + X 2082, 2481, 2772, 2699, 2853, 2711, 2386, 2067, 1300, C8ON 73 + X 953, 714, 437, 260, 179, 153, 131, 127, 126, C8ON 74 + X 127, 129, 129, 130, 127, 126, 126, 129, 128, C8ON 75 + X 129, 36, 5324, 8441, 478, 648, 958, 1333, 1838, C8ON 76 + X 2360, 2813, 3385, 3764, 3186, 2699, 2350, 1595, 1221, C8ON 77 + X 876, 463, 387, 248, 248, 244, 250, 251, 257, C8ON 78 + Y 263/ C8ON 79 + DATA MAP 4/ C8ON 80 + X 265, 261, 252, 246, 249, 254, 259, 264, 270, C8ON 81 + X 37, 5529, 8530, 535, 724, 1032, 1504, 2122, 2726, C8ON 82 + X 3348, 4261, 3641, 3439, 3285, 3025, 2062, 1545, 1132, C8ON 83 + X 720, 563, 483, 416, 356, 243, 247, 249, 253, C8ON 84 + X 257, 258, 257, 255, 253, 254, 251, 250, 245, C8ON 85 + X 242, 37, 5734, 8610, 564, 781, 1155, 1669, 2313, C8ON 86 + X 3100, 4106, 5090, 4723, 4171, 3579, 2862, 2142, 1776, C8ON 87 + X 1466, 1275, 1047, 756, 582, 439, 289, 288, 267, C8ON 88 + X 236, 209, 205, 202, 201, 198, 201, 202, 200, C8ON 89 + X 193, 181, 38, 6144, 8722, 604, 898, 1472, 2354, C8ON 90 + X 3537, 5035, 6435, 7318, 5921, 4842, 3838, 3039, 2426, C8ON 91 + X 1935, 1450, 1152, 921, 737, 566, 486, 412, 325, C8ON 92 + X 316, 310, 311, 309, 319, 328, 328, 325, 317, C8ON 93 + X 302, 301, 295, 280, 38, 6963, 8763, 745, 1340, C8ON 94 + X 2634, 4863, 8313, 11557, 12095, 9931, 8798, 4460, 3611, C8ON 95 + X 2250, 1768, 1661, 1348, 1094, 886, 860, 794, 728, C8ON 96 + X 706, 870, 860, 847, 854, 868, 878, 878, 875, C8ON 97 + X 870, 869, 850, 832, 804, 778, 37, 7782, 8451, C8ON 98 + Y 1037/ C8ON 99 + DATA MAP 5/ C8ON 100 + X 2053, 4320, 8234, 13247, 19364, 16095, 14423, 8192, 6289, C8ON 101 + X 5014, 3402, 2768, 2848, 2891, 2928, 2726, 2438, 2119, C8ON 102 + X 1818, 1556, 1405, 1251, 1121, 1098, 1078, 1085, 1087, C8ON 103 + X 1092, 1090, 1060, 1020, 948, 798, 36, 8601, 8201, C8ON 104 + X 1062, 2374, 5797, 11755, 18805, 25569, 23593, 20955, 12019, C8ON 105 + X 8725, 6250, 4196, 3353, 3278, 3143, 2868, 2756, 2757, C8ON 106 + X 2671, 2585, 2560, 2549, 2551, 2574, 2602, 2610, 2605, C8ON 107 + X 2580, 2526, 2444, 2308, 2126, 1593, 35, 9420, 8014, C8ON 108 + X 1038, 2625, 7002, 17078, 28580, 38218, 28555, 23784, 14905, C8ON 109 + X 11120, 8605, 6453, 4668, 4644, 4592, 4364, 4336, 4353, C8ON 110 + X 4256, 3923, 3552, 3377, 3348, 3337, 3353, 3360, 3388, C8ON 111 + X 3398, 3367, 3347, 3357, 3459, 34, 10240, 7822, 1097, C8ON 112 + X 3528, 11320, 30959, 45133, 53296, 39292, 32724, 20426, 14875, C8ON 113 + X 10911, 8529, 5325, 4152, 3082, 3242, 3447, 3667, 3830, C8ON 114 + X 4060, 4536, 4778, 4570, 4412, 4498, 4488, 4240, 4153, C8ON 115 + X 4479, 5171, 839, 33, 11264, 7605, 973, 3803, 17998, C8ON 116 + X 46677, 62123, 61152, 47671, 35256, 27396, 19708, 13998, 11838, C8ON 117 + X 7860, 7709, 7271, 7088, 7038, 6993, 6975, 7063, 7193, C8ON 118 + Y 7321/ C8ON 119 + DATA MAP 6/ C8ON 120 + X 7394, 7338, 6942, 6839, 6984, 7192, 7622, 8761, 32, C8ON 121 + X 12288, 7377, 828, 3421, 18339, 42434, 68271, 86460, 57767, C8ON 122 + X 47630, 30906, 22593, 17972, 14424, 12692, 13367, 13302, 12054, C8ON 123 + X 11412, 11977, 12466, 12773, 13205, 13097, 12909, 12830, 12615, C8ON 124 + X 12871, 13077, 13745, 15513, 31, 13516, 7063, 913, 2335, C8ON 125 + X 9874, 30730, 56329, 75941, 78564, 67183, 58077, 49459, 43291, C8ON 126 + X 37201, 31822, 27507, 25464, 25615, 24834, 23578, 23705, 23609, C8ON 127 + X 23880, 24027, 24368, 24596, 25015, 27160, 16167, 2999, 3, C8ON 128 + X 20480, 0, 3, 32767, 0, 879, 20, 3, 0, C8ON 129 + X 0, 3, 2299, 0, 11, 2334, 1996, 17, 12, C8ON 130 + X 13, 12, 12, 10, 9, 9, 14, 2355, 2653, C8ON 131 + X 31, 24, 23, 21, 19, 13, 10, 6, 4, C8ON 132 + X 2, 2, 16, 2396, 3246, 63, 45, 33, 19, C8ON 133 + X 12, 10, 7, 6, 6, 5, 4, 4, 4, C8ON 134 + X 18, 2457, 3657, 123, 96, 73, 42, 35, 28, C8ON 135 + X 23, 20, 16, 12, 10, 8, 7, 5, 7, C8ON 136 + X 22, 2662, 4672, 218, 207, 189, 158, 131, 104, C8ON 137 + X 79, 61, 47, 34, 25, 21, 18, 16, 15, C8ON 138 + Y 10/ C8ON 139 + DATA MAP 7/ C8ON 140 + X 10, 10, 12, 24, 2867, 5309, 208, 252, 294, C8ON 141 + X 292, 283, 233, 198, 117, 88, 68, 53, 47, C8ON 142 + X 32, 26, 25, 25, 26, 23, 24, 26, 26, C8ON 143 + X 26, 3072, 5862, 229, 258, 286, 312, 316, 332, C8ON 144 + X 328, 300, 257, 210, 138, 108, 78, 58, 44, C8ON 145 + X 36, 33, 32, 31, 28, 29, 30, 32, 28, C8ON 146 + X 3276, 6178, 287, 326, 358, 380, 406, 403, 383, C8ON 147 + X 364, 346, 313, 248, 223, 185, 145, 115, 84, C8ON 148 + X 68, 54, 41, 34, 33, 29, 31, 35, 49, C8ON 149 + X 29, 3481, 6571, 296, 337, 391, 450, 481, 460, C8ON 150 + X 486, 486, 447, 393, 342, 335, 281, 242, 213, C8ON 151 + X 180, 143, 122, 98, 76, 60, 50, 36, 33, C8ON 152 + X 37, 47, 30, 3686, 6844, 314, 363, 416, 478, C8ON 153 + X 523, 548, 594, 616, 575, 546, 517, 453, 385, C8ON 154 + X 336, 299, 267, 229, 183, 164, 104, 83, 62, C8ON 155 + X 61, 57, 57, 65, 66, 31, 3891, 7090, 325, C8ON 156 + X 387, 460, 556, 634, 721, 812, 921, 894, 800, C8ON 157 + X 683, 589, 493, 413, 322, 253, 191, 152, 124, C8ON 158 + Y 109/ C8ON 159 + DATA MAP 8/ C8ON 160 + X 93, 78, 67, 66, 64, 63, 72, 72, 32, C8ON 161 + X 4096, 7354, 343, 411, 488, 588, 721, 860, 1012, C8ON 162 + X 1160, 1293, 1281, 1158, 989, 817, 522, 406, 343, C8ON 163 + X 193, 138, 86, 56, 31, 19, 18, 19, 18, C8ON 164 + X 15, 18, 18, 19, 33, 4300, 7570, 372, 452, C8ON 165 + X 551, 671, 809, 1021, 1339, 1591, 1623, 1456, 1281, C8ON 166 + X 1088, 817, 537, 334, 221, 117, 99, 88, 87, C8ON 167 + X 85, 87, 88, 88, 87, 89, 90, 90, 96, C8ON 168 + X 110, 34, 4505, 7793, 379, 455, 570, 731, 977, C8ON 169 + X 1229, 1552, 1777, 1865, 1884, 1637, 1410, 860, 603, C8ON 170 + X 460, 246, 207, 199, 207, 234, 201, 177, 94, C8ON 171 + X 74, 70, 72, 73, 74, 78, 87, 111, 35, C8ON 172 + X 4710, 7966, 404, 488, 613, 831, 1185, 1531, 1879, C8ON 173 + X 2083, 2078, 1887, 1656, 1425, 1083, 797, 641, 531, C8ON 174 + X 472, 358, 264, 205, 146, 108, 112, 115, 118, C8ON 175 + X 121, 120, 119, 114, 115, 122, 134, 35, 4915, C8ON 176 + X 8093, 426, 545, 746, 1062, 1465, 1851, 2189, 2352, C8ON 177 + X 2467, 2242, 1984, 1710, 1282, 872, 630, 348, 262, C8ON 178 + Y 232/ C8ON 179 + DATA MAP 9/ C8ON 180 + X 215, 210, 205, 205, 210, 222, 231, 226, 218, C8ON 181 + X 212, 209, 216, 223, 233, 36, 5120, 8218, 448, C8ON 182 + X 595, 877, 1252, 1683, 2106, 2481, 2740, 2867, 2885, C8ON 183 + X 2628, 2264, 1948, 1271, 913, 692, 436, 257, 175, C8ON 184 + X 153, 129, 125, 128, 128, 130, 131, 131, 129, C8ON 185 + X 124, 124, 127, 127, 126, 36, 5324, 8322, 478, C8ON 186 + X 645, 949, 1349, 1886, 2455, 2881, 3392, 3590, 3143, C8ON 187 + X 2697, 2325, 1595, 1206, 893, 478, 393, 253, 248, C8ON 188 + X 239, 246, 250, 260, 269, 262, 255, 252, 248, C8ON 189 + X 252, 255, 260, 267, 277, 36, 5529, 8423, 502, C8ON 190 + X 675, 1010, 1510, 2121, 2851, 3463, 4113, 3560, 3364, C8ON 191 + X 3243, 2996, 2162, 1530, 1177, 722, 566, 487, 424, C8ON 192 + X 367, 278, 252, 245, 253, 267, 262, 253, 252, C8ON 193 + X 253, 255, 252, 250, 252, 37, 5734, 8507, 511, C8ON 194 + X 703, 1047, 1615, 2313, 3200, 4082, 5038, 4357, 4022, C8ON 195 + X 3562, 2763, 2360, 1835, 1542, 1350, 1196, 816, 627, C8ON 196 + X 538, 303, 303, 291, 259, 222, 212, 209, 203, C8ON 197 + X 194, 190, 195, 197, 200, 187, 37, 6144, 8612, C8ON 198 + Y 558/ C8ON 199 + DATA MAP 10/ C8ON 200 + X 774, 1201, 2043, 3199, 4581, 6000, 6729, 6150, 5230, C8ON 201 + X 4177, 3435, 2699, 2119, 1659, 1148, 1024, 808, 647, C8ON 202 + X 476, 444, 353, 311, 308, 306, 306, 309, 321, C8ON 203 + X 330, 322, 317, 317, 315, 307, 37, 6963, 8587, C8ON 204 + X 692, 1088, 1992, 3453, 5800, 8838, 11312, 10008, 9045, C8ON 205 + X 8377, 4344, 3557, 2187, 1751, 1627, 1330, 1087, 885, C8ON 206 + X 832, 748, 674, 665, 784, 829, 847, 853, 863, C8ON 207 + X 871, 877, 881, 872, 866, 849, 833, 36, 7782, C8ON 208 + X 8258, 862, 1621, 3341, 5892, 9631, 14765, 19120, 14600, C8ON 209 + X 12656, 6845, 5547, 4497, 3150, 2854, 2905, 2883, 2817, C8ON 210 + X 2688, 2447, 2071, 1730, 1483, 1247, 1149, 1112, 1059, C8ON 211 + X 1040, 1063, 1097, 1103, 1101, 1096, 1039, 35, 8601, C8ON 212 + X 7974, 909, 1760, 4040, 8630, 14664, 20515, 24478, 21433, C8ON 213 + X 18823, 11208, 8233, 5687, 3540, 3378, 3348, 3101, 3036, C8ON 214 + X 2968, 2768, 2624, 2540, 2486, 2502, 2548, 2613, 2644, C8ON 215 + X 2580, 2511, 2496, 2451, 2307, 2033, 34, 9420, 7720, C8ON 216 + X 887, 1868, 5173, 10913, 19119, 28304, 35276, 26805, 21006, C8ON 217 + X 14469, 10736, 8279, 6230, 4862, 5056, 5146, 5163, 5185, C8ON 218 + Y 4901/ C8ON 219 + DATA MAP 11/ C8ON 220 + X 4182, 3603, 3372, 3367, 3365, 3396, 3434, 3484, 3467, C8ON 221 + X 3370, 3259, 3202, 33, 10240, 7449, 847, 2149, 5927, C8ON 222 + X 13285, 27861, 38919, 44550, 36595, 30908, 25054, 17307, 13158, C8ON 223 + X 9905, 7109, 4811, 3696, 2974, 3018, 3271, 3714, 3828, C8ON 224 + X 3741, 3948, 4071, 3945, 4183, 4416, 4491, 4365, 4285, C8ON 225 + X 31, 11264, 7123, 798, 2023, 9118, 28050, 46908, 59170, C8ON 226 + X 51113, 42329, 32758, 26764, 18817, 13107, 11586, 8984, 7765, C8ON 227 + X 7692, 7070, 6926, 6862, 7121, 6862, 7313, 7223, 7169, C8ON 228 + X 7064, 7133, 6529, 7041, 30, 12288, 6799, 777, 2110, C8ON 229 + X 10075, 29071, 56377, 72072, 69929, 52809, 40026, 28183, 21131, C8ON 230 + X 16579, 12927, 10434, 12876, 14824, 12506, 11152, 12073, 12446, C8ON 231 + X 12927, 13002, 13291, 12850, 13021, 12279, 13234, 29, 13516, C8ON 232 + X 6400, 745, 1890, 7095, 25419, 45079, 65303, 79899, 68012, C8ON 233 + X 60001, 52424, 45500, 38955, 34167, 30242, 25962, 23415, 24372, C8ON 234 + X 24157, 23102, 22849, 22146, 24514, 26260, 24343, 22772, 26066, C8ON 235 + X 3, 20480, 0, 3, 32767, 0, 828, 60, 3, C8ON 236 + X 0, 0, 3, 2301, 0, 11, 2334, 1970, 17, C8ON 237 + X 12, 13, 12, 12, 10, 9, 9, 14, 2355, C8ON 238 + Y 2633/ C8ON 239 + DATA MAP 12/ C8ON 240 + X 31, 24, 23, 21, 19, 13, 10, 6, 5, C8ON 241 + X 1, 1, 16, 2396, 3234, 63, 45, 33, 19, C8ON 242 + X 12, 10, 7, 6, 6, 5, 4, 4, 4, C8ON 243 + X 18, 2457, 3655, 122, 93, 75, 42, 35, 28, C8ON 244 + X 23, 20, 16, 12, 10, 8, 6, 6, 6, C8ON 245 + X 22, 2662, 4667, 217, 204, 194, 157, 130, 103, C8ON 246 + X 80, 60, 48, 34, 24, 21, 18, 16, 16, C8ON 247 + X 9, 10, 10, 10, 24, 2867, 5300, 210, 253, C8ON 248 + X 297, 287, 288, 231, 196, 115, 88, 67, 54, C8ON 249 + X 47, 31, 26, 25, 25, 25, 23, 25, 26, C8ON 250 + X 26, 26, 3072, 5850, 230, 257, 289, 312, 316, C8ON 251 + X 332, 333, 300, 255, 205, 141, 105, 78, 57, C8ON 252 + X 43, 36, 33, 32, 31, 28, 29, 30, 30, C8ON 253 + X 28, 3276, 6166, 286, 326, 363, 376, 404, 403, C8ON 254 + X 391, 359, 351, 311, 250, 217, 190, 143, 114, C8ON 255 + X 82, 69, 52, 42, 33, 33, 30, 31, 35, C8ON 256 + X 35, 29, 3481, 6546, 295, 338, 390, 456, 483, C8ON 257 + X 465, 489, 486, 447, 393, 344, 334, 279, 241, C8ON 258 + Y 213/ C8ON 259 + DATA MAP 13/ C8ON 260 + X 177, 140, 123, 95, 74, 59, 49, 36, 34, C8ON 261 + X 37, 37, 30, 3686, 6802, 315, 364, 419, 475, C8ON 262 + X 524, 562, 616, 623, 578, 548, 517, 445, 380, C8ON 263 + X 334, 297, 263, 225, 178, 158, 100, 80, 62, C8ON 264 + X 61, 56, 59, 66, 66, 31, 3891, 6979, 348, C8ON 265 + X 409, 482, 580, 664, 752, 853, 894, 870, 781, C8ON 266 + X 676, 583, 491, 397, 314, 241, 166, 143, 123, C8ON 267 + X 105, 89, 72, 67, 64, 62, 66, 76, 83, C8ON 268 + X 32, 4096, 7202, 359, 432, 509, 621, 764, 926, C8ON 269 + X 1097, 1301, 1370, 1245, 1089, 966, 639, 490, 383, C8ON 270 + X 282, 160, 136, 61, 46, 25, 21, 15, 19, C8ON 271 + X 16, 20, 18, 18, 19, 32, 4300, 7380, 392, C8ON 272 + X 470, 542, 682, 931, 1190, 1508, 1697, 1549, 1417, C8ON 273 + X 1233, 1028, 605, 563, 219, 179, 102, 93, 88, C8ON 274 + X 86, 86, 87, 87, 88, 88, 90, 90, 92, C8ON 275 + X 101, 33, 4505, 7559, 387, 470, 569, 749, 1043, C8ON 276 + X 1298, 1619, 1814, 1870, 1876, 1591, 1314, 798, 592, C8ON 277 + X 429, 249, 214, 207, 214, 234, 189, 160, 86, C8ON 278 + Y 70/ C8ON 279 + DATA MAP 14/ C8ON 280 + X 70, 69, 72, 75, 80, 89, 34, 4710, 7700, C8ON 281 + X 397, 492, 654, 873, 1163, 1535, 1891, 2106, 2103, C8ON 282 + X 1835, 1604, 1400, 1057, 797, 651, 553, 487, 346, C8ON 283 + X 260, 200, 150, 111, 115, 113, 115, 117, 121, C8ON 284 + X 120, 113, 113, 124, 34, 4915, 7817, 399, 520, C8ON 285 + X 723, 983, 1310, 1753, 2161, 2415, 2598, 2410, 2095, C8ON 286 + X 1750, 1257, 843, 639, 332, 268, 231, 210, 203, C8ON 287 + X 198, 198, 202, 212, 217, 218, 219, 214, 212, C8ON 288 + X 214, 220, 34, 5120, 7922, 408, 546, 790, 1081, C8ON 289 + X 1511, 2015, 2419, 2669, 3047, 3001, 2565, 2149, 1918, C8ON 290 + X 1399, 1052, 775, 477, 363, 211, 167, 142, 127, C8ON 291 + X 125, 125, 126, 129, 132, 131, 126, 123, 128, C8ON 292 + X 35, 5324, 8005, 432, 582, 833, 1136, 1616, 2259, C8ON 293 + X 2782, 3208, 3450, 3327, 2980, 2574, 1866, 1258, 1050, C8ON 294 + X 531, 391, 276, 248, 241, 244, 244, 256, 267, C8ON 295 + X 270, 264, 256, 248, 253, 256, 256, 260, 35, C8ON 296 + X 5529, 8079, 437, 583, 872, 1241, 1823, 2508, 3037, C8ON 297 + X 3602, 3975, 3511, 3466, 3100, 2581, 1619, 1283, 943, C8ON 298 + Y 666/ C8ON 299 + DATA MAP 15/ C8ON 300 + X 517, 458, 393, 333, 248, 248, 251, 261, 274, C8ON 301 + X 264, 255, 253, 252, 251, 247, 35, 5734, 8120, C8ON 302 + X 451, 616, 928, 1358, 2010, 2740, 3373, 4038, 4422, C8ON 303 + X 4209, 3714, 3177, 2592, 2151, 1710, 1529, 1400, 1248, C8ON 304 + X 833, 586, 484, 292, 292, 284, 250, 220, 209, C8ON 305 + X 203, 202, 201, 202, 200, 35, 6144, 8172, 443, C8ON 306 + X 613, 956, 1406, 2186, 3270, 4200, 4906, 5635, 6031, C8ON 307 + X 5108, 4300, 3477, 2951, 2416, 1902, 1463, 1075, 856, C8ON 308 + X 701, 581, 485, 422, 310, 319, 315, 315, 315, C8ON 309 + X 314, 319, 321, 312, 35, 6963, 8014, 519, 720, C8ON 310 + X 1175, 2004, 3122, 4531, 6786, 8972, 8833, 8897, 8207, C8ON 311 + X 7248, 4298, 3142, 2184, 1780, 1732, 1392, 1077, 853, C8ON 312 + X 734, 640, 632, 602, 755, 850, 847, 860, 873, C8ON 313 + X 894, 911, 888, 33, 7782, 7608, 567, 860, 1576, C8ON 314 + X 2793, 4340, 6755, 10578, 14463, 17058, 13071, 10830, 8050, C8ON 315 + X 5562, 4457, 3202, 3114, 3079, 2931, 2826, 2642, 2192, C8ON 316 + X 1772, 1448, 1224, 1128, 1070, 1074, 1087, 1073, 1067, C8ON 317 + X 31, 8601, 7131, 532, 913, 1616, 3018, 5419, 9207, C8ON 318 + Y 14456/ C8ON 319 + DATA MAP 16/ C8ON 320 + X 19329, 22536, 23381, 16778, 13874, 7750, 4716, 3579, 3854, C8ON 321 + X 4079, 3935, 3234, 2625, 2585, 2586, 2572, 2550, 2561, C8ON 322 + X 2513, 2596, 2641, 29, 9420, 6630, 506, 864, 1562, C8ON 323 + X 3128, 5983, 10205, 16453, 24342, 29366, 27618, 22287, 18444, C8ON 324 + X 15934, 10004, 8329, 7515, 7355, 6759, 6134, 3818, 3562, C8ON 325 + X 3340, 3275, 3238, 3322, 3645, 27, 10240, 6012, 438, C8ON 326 + X 780, 1255, 2525, 5944, 11157, 19076, 32094, 37873, 38300, C8ON 327 + X 32050, 24974, 19668, 15500, 10208, 8437, 7279, 5732, 4322, C8ON 328 + X 3172, 2437, 2429, 2529, 2820, 25, 11264, 5475, 439, C8ON 329 + X 724, 1428, 3344, 7002, 13165, 26384, 37240, 42053, 41304, C8ON 330 + X 33930, 29309, 25763, 23855, 15288, 12002, 8386, 8387, 8272, C8ON 331 + X 7777, 6884, 8015, 24, 12288, 5162, 409, 654, 1223, C8ON 332 + X 2547, 6141, 11659, 19324, 32440, 48198, 55163, 54196, 41046, C8ON 333 + X 35533, 30532, 26128, 17942, 14105, 11156, 9471, 10682, 15977, C8ON 334 + X 22, 13516, 4758, 438, 733, 1327, 2456, 5208, 10804, C8ON 335 + X 19805, 26527, 34336, 43649, 50222, 50500, 43690, 40191, 36566, C8ON 336 + X 32282, 28428, 29400, 39894, 3, 20480, 0, 3, 32767, C8ON 337 + X 0, 783, 100, 3, 0, 0, 3, 2301, 0, C8ON 338 + Y 11/ C8ON 339 + DATA MAP 17/ C8ON 340 + X 2334, 1960, 17, 12, 13, 12, 12, 10, 9, C8ON 341 + X 9, 14, 2355, 2624, 31, 24, 23, 21, 19, C8ON 342 + X 13, 10, 6, 5, 1, 1, 16, 2396, 3228, C8ON 343 + X 64, 44, 33, 19, 12, 10, 7, 6, 6, C8ON 344 + X 5, 5, 3, 4, 18, 2457, 3653, 119, 94, C8ON 345 + X 75, 42, 35, 28, 23, 20, 16, 12, 10, C8ON 346 + X 8, 6, 6, 7, 22, 2662, 4662, 216, 201, C8ON 347 + X 199, 156, 130, 101, 81, 60, 48, 33, 25, C8ON 348 + X 20, 18, 16, 16, 9, 10, 10, 10, 24, C8ON 349 + X 2867, 5294, 209, 254, 296, 285, 294, 231, 193, C8ON 350 + X 114, 88, 68, 52, 47, 31, 26, 25, 25, C8ON 351 + X 26, 23, 24, 26, 29, 26, 3072, 5838, 230, C8ON 352 + X 258, 289, 313, 318, 335, 334, 300, 254, 201, C8ON 353 + X 140, 105, 76, 57, 43, 35, 33, 32, 31, C8ON 354 + X 28, 29, 30, 30, 28, 3276, 6153, 288, 327, C8ON 355 + X 356, 381, 406, 404, 388, 359, 356, 312, 247, C8ON 356 + X 214, 194, 142, 112, 81, 68, 52, 41, 34, C8ON 357 + X 32, 30, 31, 36, 35, 29, 3481, 6520, 293, C8ON 358 + Y 341/ C8ON 359 + DATA MAP 18/ C8ON 360 + X 392, 459, 485, 472, 492, 488, 443, 394, 345, C8ON 361 + X 337, 273, 245, 209, 174, 136, 122, 94, 72, C8ON 362 + X 58, 48, 35, 34, 38, 39, 30, 3686, 6761, C8ON 363 + X 315, 370, 414, 474, 526, 588, 626, 631, 585, C8ON 364 + X 553, 509, 438, 378, 329, 292, 261, 222, 172, C8ON 365 + X 151, 98, 76, 63, 60, 56, 60, 68, 84, C8ON 366 + X 30, 3891, 6909, 350, 417, 502, 591, 672, 771, C8ON 367 + X 846, 876, 862, 784, 680, 579, 497, 392, 311, C8ON 368 + X 232, 162, 141, 122, 104, 86, 69, 66, 62, C8ON 369 + X 62, 67, 80, 31, 4096, 7094, 367, 438, 521, C8ON 370 + X 647, 799, 978, 1176, 1364, 1406, 1209, 1027, 941, C8ON 371 + X 565, 459, 380, 238, 150, 115, 62, 38, 24, C8ON 372 + X 19, 16, 19, 16, 18, 16, 20, 32, 4300, C8ON 373 + X 7242, 393, 470, 566, 726, 990, 1247, 1559, 1698, C8ON 374 + X 1541, 1403, 1214, 965, 570, 506, 207, 161, 100, C8ON 375 + X 89, 86, 86, 87, 86, 86, 87, 89, 90, C8ON 376 + X 91, 94, 102, 32, 4505, 7377, 389, 477, 603, C8ON 377 + X 803, 1089, 1389, 1722, 1930, 1911, 1825, 1543, 1184, C8ON 378 + Y 705/ C8ON 379 + DATA MAP 19/ C8ON 380 + X 561, 357, 241, 208, 205, 217, 226, 181, 139, C8ON 381 + X 83, 70, 69, 70, 74, 75, 81, 33, 4710, C8ON 382 + X 7487, 402, 497, 650, 870, 1182, 1539, 1893, 2158, C8ON 383 + X 2195, 1820, 1524, 1362, 1052, 807, 663, 557, 494, C8ON 384 + X 322, 250, 196, 139, 113, 113, 114, 117, 116, C8ON 385 + X 117, 117, 114, 118, 33, 4915, 7586, 385, 507, C8ON 386 + X 716, 960, 1258, 1722, 2198, 2551, 2749, 2459, 2101, C8ON 387 + X 1737, 1203, 819, 559, 319, 250, 227, 208, 202, C8ON 388 + X 197, 197, 200, 204, 207, 213, 217, 217, 216, C8ON 389 + X 218, 33, 5120, 7658, 394, 521, 738, 1016, 1403, C8ON 390 + X 1950, 2460, 2839, 3103, 2971, 2477, 2051, 1855, 1512, C8ON 391 + X 1090, 777, 584, 387, 230, 167, 149, 128, 126, C8ON 392 + X 124, 126, 133, 132, 132, 127, 125, 34, 5324, C8ON 393 + X 7723, 404, 535, 772, 1078, 1518, 2117, 2652, 3058, C8ON 394 + X 3451, 3428, 3050, 2603, 2115, 1336, 1113, 594, 398, C8ON 395 + X 303, 247, 240, 246, 258, 264, 262, 262, 259, C8ON 396 + X 250, 244, 251, 258, 257, 34, 5529, 7777, 394, C8ON 397 + X 519, 759, 1101, 1584, 2218, 2860, 3456, 3898, 3749, C8ON 398 + Y 3679/ C8ON 399 + DATA MAP 20/ C8ON 400 + X 3177, 2706, 1785, 1349, 1053, 802, 571, 467, 404, C8ON 401 + X 342, 276, 253, 248, 251, 254, 251, 257, 260, C8ON 402 + X 260, 257, 34, 5734, 7795, 380, 508, 763, 1147, C8ON 403 + X 1680, 2344, 3027, 3743, 4316, 4472, 4084, 3401, 2592, C8ON 404 + X 2457, 1836, 1610, 1612, 1355, 1024, 645, 522, 292, C8ON 405 + X 294, 282, 258, 221, 214, 196, 196, 201, 200, C8ON 406 + X 34, 6144, 7762, 402, 537, 792, 1203, 1853, 2671, C8ON 407 + X 3553, 4507, 5362, 5934, 5192, 4407, 3776, 3402, 2944, C8ON 408 + X 2216, 1761, 1299, 1034, 828, 659, 534, 463, 321, C8ON 409 + X 316, 323, 311, 314, 316, 328, 332, 33, 6963, C8ON 410 + X 7500, 452, 598, 912, 1468, 2366, 3486, 4895, 6738, C8ON 411 + X 8179, 8549, 9508, 8129, 7166, 3783, 2852, 2096, 1831, C8ON 412 + X 1702, 1265, 1007, 828, 718, 651, 603, 637, 814, C8ON 413 + X 849, 858, 895, 914, 31, 7782, 6939, 522, 755, C8ON 414 + X 1260, 2152, 3389, 5055, 7932, 11779, 15030, 16017, 12407, C8ON 415 + X 9994, 7887, 5242, 4287, 3624, 3363, 2964, 2914, 2797, C8ON 416 + X 2082, 1712, 1417, 1220, 1144, 1117, 1122, 1120, 28, C8ON 417 + X 8601, 6284, 407, 672, 1225, 2011, 3440, 5889, 9939, C8ON 418 + Y 16037/ C8ON 419 + DATA MAP 21/ C8ON 420 + X 21522, 24071, 23418, 15698, 11009, 6282, 4591, 4462, 4805, C8ON 421 + X 4425, 3371, 2614, 2541, 2463, 2461, 2734, 2612, 25, C8ON 422 + X 9420, 5547, 350, 460, 755, 1190, 2188, 4496, 7724, C8ON 423 + X 13039, 20767, 32944, 35094, 30524, 21946, 19605, 10265, 8768, C8ON 424 + X 7317, 6065, 4203, 3658, 3354, 3529, 22, 10240, 4636, C8ON 425 + X 277, 416, 666, 965, 1422, 3044, 4816, 7207, 11505, C8ON 426 + X 20471, 42537, 41723, 37898, 27898, 20383, 15476, 12570, 9422, C8ON 427 + X 9065, 19, 11264, 3924, 309, 355, 544, 862, 1231, C8ON 428 + X 2579, 4232, 5960, 9071, 21152, 34273, 41233, 41140, 36631, C8ON 429 + X 25294, 28206, 17, 12288, 3497, 311, 394, 644, 1006, C8ON 430 + X 1694, 3708, 5976, 9598, 15923, 26355, 37962, 45523, 48895, C8ON 431 + X 53970, 16, 13516, 3098, 349, 447, 680, 1029, 1603, C8ON 432 + X 3188, 5529, 9136, 15107, 22390, 27256, 35118, 63012, 3, C8ON 433 + X 20480, 0, 3, 32767, 0, 664, 200, 3, 0, C8ON 434 + X 0, 3, 2303, 0, 11, 2334, 1938, 17, 12, C8ON 435 + X 13, 12, 12, 10, 9, 9, 14, 2355, 2613, C8ON 436 + X 31, 24, 23, 21, 19, 13, 10, 6, 5, C8ON 437 + X 1, 1, 16, 2396, 3225, 63, 45, 33, 19, C8ON 438 + Y 12/ C8ON 439 + DATA MAP 22/ C8ON 440 + X 10, 7, 6, 6, 5, 4, 4, 4, 18, C8ON 441 + X 2457, 3651, 119, 92, 76, 42, 35, 28, 23, C8ON 442 + X 20, 16, 12, 10, 8, 6, 6, 7, 22, C8ON 443 + X 2662, 4651, 222, 199, 199, 157, 128, 100, 81, C8ON 444 + X 59, 47, 33, 24, 21, 17, 17, 16, 9, C8ON 445 + X 9, 10, 11, 24, 2867, 5270, 213, 259, 303, C8ON 446 + X 293, 288, 229, 187, 111, 87, 66, 52, 45, C8ON 447 + X 31, 25, 25, 26, 25, 23, 25, 26, 28, C8ON 448 + X 26, 3072, 5806, 231, 261, 289, 312, 326, 344, C8ON 449 + X 334, 301, 255, 194, 137, 101, 74, 55, 42, C8ON 450 + X 35, 33, 32, 30, 29, 29, 30, 32, 27, C8ON 451 + X 3276, 6120, 288, 331, 358, 375, 403, 411, 393, C8ON 452 + X 373, 345, 315, 257, 213, 187, 138, 108, 79, C8ON 453 + X 67, 50, 40, 34, 32, 30, 32, 35, 29, C8ON 454 + X 3481, 6457, 298, 338, 393, 468, 503, 480, 499, C8ON 455 + X 486, 447, 388, 351, 338, 272, 239, 207, 167, C8ON 456 + X 132, 116, 89, 69, 55, 44, 36, 35, 37, C8ON 457 + X 38, 30, 3686, 6660, 312, 365, 428, 505, 561, C8ON 458 + Y 608/ C8ON 459 + DATA MAP 23/ C8ON 460 + X 648, 635, 588, 556, 507, 411, 370, 326, 289, C8ON 461 + X 251, 210, 169, 132, 90, 71, 61, 59, 58, C8ON 462 + X 61, 72, 63, 30, 3891, 6779, 351, 419, 518, C8ON 463 + X 627, 694, 791, 851, 853, 845, 777, 682, 584, C8ON 464 + X 500, 381, 301, 219, 160, 142, 122, 101, 80, C8ON 465 + X 67, 63, 63, 63, 70, 87, 30, 4096, 6877, C8ON 466 + X 369, 450, 560, 705, 865, 1055, 1280, 1443, 1359, C8ON 467 + X 1190, 985, 797, 532, 404, 349, 203, 140, 96, C8ON 468 + X 67, 31, 23, 20, 13, 19, 19, 16, 18, C8ON 469 + X 31, 4300, 6961, 390, 480, 607, 801, 1044, 1291, C8ON 470 + X 1543, 1718, 1614, 1423, 1209, 824, 553, 376, 214, C8ON 471 + X 137, 93, 85, 82, 83, 85, 86, 88, 89, C8ON 472 + X 89, 91, 93, 93, 31, 4505, 7006, 391, 491, C8ON 473 + X 641, 843, 1098, 1466, 1855, 2068, 2068, 1770, 1512, C8ON 474 + X 972, 647, 537, 260, 228, 205, 208, 226, 198, C8ON 475 + X 172, 96, 76, 71, 72, 74, 75, 77, 31, C8ON 476 + X 4710, 7034, 392, 498, 662, 862, 1152, 1611, 2073, C8ON 477 + X 2294, 2179, 1822, 1521, 1346, 1015, 791, 658, 543, C8ON 478 + Y 436/ C8ON 479 + DATA MAP 24/ C8ON 480 + X 284, 212, 175, 113, 113, 111, 113, 117, 120, C8ON 481 + X 120, 120, 31, 4915, 7052, 367, 474, 667, 933, C8ON 482 + X 1267, 1781, 2419, 2981, 3232, 2512, 2036, 1496, 851, C8ON 483 + X 737, 359, 275, 230, 212, 201, 196, 202, 206, C8ON 484 + X 208, 206, 210, 217, 219, 222, 31, 5120, 7053, C8ON 485 + X 356, 462, 649, 940, 1362, 1945, 2578, 3077, 3349, C8ON 486 + X 3058, 2454, 2003, 1796, 1418, 1023, 741, 574, 359, C8ON 487 + X 232, 177, 152, 125, 120, 122, 127, 135, 134, C8ON 488 + X 139, 31, 5324, 7044, 336, 430, 651, 980, 1384, C8ON 489 + X 2083, 2737, 3277, 3791, 4007, 3289, 2640, 1917, 1113, C8ON 490 + X 908, 496, 349, 253, 253, 251, 247, 245, 253, C8ON 491 + X 259, 270, 268, 260, 260, 31, 5529, 7036, 340, C8ON 492 + X 431, 640, 990, 1467, 2227, 2883, 3367, 3870, 4129, C8ON 493 + X 3958, 3271, 2734, 1794, 1319, 1035, 804, 578, 464, C8ON 494 + X 388, 321, 255, 250, 242, 242, 249, 263, 277, C8ON 495 + X 31, 5734, 6965, 333, 432, 657, 1028, 1521, 2222, C8ON 496 + X 2985, 3637, 4229, 4744, 4830, 3739, 3070, 2635, 1895, C8ON 497 + X 1657, 1374, 1110, 765, 492, 375, 292, 283, 263, C8ON 498 + Y 236/ C8ON 499 + DATA MAP 25/ C8ON 500 + X 216, 202, 205, 30, 6144, 6834, 326, 405, 599, C8ON 501 + X 999, 1560, 2221, 3024, 3994, 5118, 5921, 6091, 4842, C8ON 502 + X 4163, 3676, 3274, 2679, 1830, 1403, 1078, 868, 637, C8ON 503 + X 501, 388, 318, 319, 315, 328, 28, 6963, 6250, C8ON 504 + X 360, 496, 830, 1358, 2091, 3043, 4222, 5678, 7368, C8ON 505 + X 8967, 9902, 9671, 7033, 5149, 3144, 2568, 2059, 1802, C8ON 506 + X 1009, 930, 806, 674, 579, 674, 882, 24, 7782, C8ON 507 + X 5282, 574, 819, 1347, 2404, 3698, 5239, 8784, 13898, C8ON 508 + X 17731, 15705, 12740, 9658, 7335, 5800, 4887, 4128, 3380, C8ON 509 + X 2707, 2031, 1665, 1410, 20, 8601, 4223, 420, 681, C8ON 510 + X 1145, 1909, 3450, 5769, 10196, 18157, 25687, 27769, 20234, C8ON 511 + X 17936, 7858, 5976, 5243, 4753, 4075, 15, 9420, 2943, C8ON 512 + X 317, 415, 741, 1268, 2740, 7218, 12285, 27310, 54424, C8ON 513 + X 46048, 33240, 23316, 8, 10240, 1241, 167, 232, 357, C8ON 514 + X 594, 1646, 3, 11264, 0, 3, 32767, 0, 532, C8ON 515 + X 600, 3, 0, 0, 3, 2306, 0, 11, 2334, C8ON 516 + X 1883, 17, 12, 13, 12, 12, 10, 9, 10, C8ON 517 + X 14, 2355, 2586, 31, 24, 23, 21, 19, 13, C8ON 518 + Y 10/ C8ON 519 + DATA MAP 26/ C8ON 520 + X 6, 4, 2, 2, 16, 2396, 3202, 64, 44, C8ON 521 + X 33, 19, 12, 10, 7, 6, 6, 5, 4, C8ON 522 + X 4, 4, 18, 2457, 3644, 119, 90, 77, 42, C8ON 523 + X 35, 28, 22, 20, 16, 12, 10, 8, 6, C8ON 524 + X 6, 5, 21, 2662, 4603, 226, 217, 189, 161, C8ON 525 + X 128, 96, 77, 57, 45, 31, 24, 20, 17, C8ON 526 + X 16, 15, 9, 10, 9, 24, 2867, 5178, 224, C8ON 527 + X 285, 325, 313, 274, 222, 166, 101, 81, 61, C8ON 528 + X 50, 40, 29, 25, 25, 26, 24, 24, 25, C8ON 529 + X 27, 28, 26, 3072, 5658, 235, 267, 294, 329, C8ON 530 + X 363, 380, 347, 296, 242, 166, 119, 86, 64, C8ON 531 + X 47, 39, 34, 32, 31, 29, 30, 29, 32, C8ON 532 + X 31, 27, 3276, 5947, 295, 336, 366, 370, 402, C8ON 533 + X 437, 435, 398, 351, 322, 260, 202, 160, 120, C8ON 534 + X 90, 71, 57, 44, 36, 32, 31, 32, 34, C8ON 535 + X 35, 27, 3481, 6109, 317, 363, 423, 502, 533, C8ON 536 + X 527, 537, 507, 449, 407, 380, 314, 260, 214, C8ON 537 + X 175, 136, 105, 82, 64, 52, 42, 36, 36, C8ON 538 + Y 36/ C8ON 539 + DATA MAP 27/ C8ON 540 + X 28, 3686, 6190, 344, 404, 472, 560, 657, 739, C8ON 541 + X 732, 653, 595, 558, 461, 411, 349, 302, 251, C8ON 542 + X 197, 153, 106, 73, 62, 58, 57, 59, 69, C8ON 543 + X 69, 28, 3891, 6206, 364, 445, 537, 668, 832, C8ON 544 + X 911, 825, 806, 855, 834, 744, 611, 431, 346, C8ON 545 + X 234, 176, 156, 120, 93, 68, 65, 64, 63, C8ON 546 + X 68, 84, 27, 4096, 6128, 406, 508, 657, 838, C8ON 547 + X 1033, 1193, 1309, 1367, 1214, 1058, 957, 652, 507, C8ON 548 + X 389, 294, 187, 144, 76, 62, 30, 22, 20, C8ON 549 + X 17, 20, 27, 4300, 6047, 403, 525, 723, 963, C8ON 550 + X 1226, 1525, 1781, 1805, 1576, 1318, 912, 574, 462, C8ON 551 + X 195, 171, 87, 87, 79, 79, 79, 82, 87, C8ON 552 + X 93, 94, 27, 4505, 5954, 413, 539, 755, 1022, C8ON 553 + X 1421, 1926, 2296, 2208, 1955, 1665, 1059, 694, 574, C8ON 554 + X 268, 225, 221, 234, 203, 178, 94, 75, 69, C8ON 555 + X 71, 76, 26, 4710, 5831, 393, 526, 783, 1132, C8ON 556 + X 1637, 2215, 2577, 2577, 2073, 1730, 1477, 970, 750, C8ON 557 + X 559, 458, 287, 211, 172, 110, 117, 121, 120, C8ON 558 + Y 122/ C8ON 559 + DATA MAP 28/ C8ON 560 + X 26, 4915, 5720, 388, 497, 692, 1070, 1761, 2664, C8ON 561 + X 3312, 3498, 2773, 2155, 1628, 928, 616, 335, 231, C8ON 562 + X 203, 201, 213, 215, 224, 229, 233, 239, 25, C8ON 563 + X 5120, 5570, 368, 483, 698, 1111, 1825, 2775, 3533, C8ON 564 + X 3814, 3407, 2644, 2067, 1861, 1274, 956, 772, 393, C8ON 565 + X 314, 198, 171, 129, 127, 129, 25, 5324, 5376, C8ON 566 + X 375, 511, 799, 1252, 2076, 2943, 3672, 4259, 4550, C8ON 567 + X 3384, 2720, 1621, 1169, 593, 400, 257, 255, 258, C8ON 568 + X 251, 250, 272, 286, 24, 5529, 5212, 386, 533, C8ON 569 + X 814, 1234, 2062, 3127, 4126, 4788, 4869, 4178, 3379, C8ON 570 + X 2437, 1502, 1176, 866, 530, 442, 361, 292, 257, C8ON 571 + X 268, 23, 5734, 4989, 384, 529, 822, 1283, 2168, C8ON 572 + X 3139, 4045, 5329, 6279, 5801, 4248, 3229, 1939, 1458, C8ON 573 + X 1152, 757, 566, 458, 308, 313, 21, 6144, 4544, C8ON 574 + X 414, 564, 850, 1299, 2166, 3030, 4228, 6234, 7413, C8ON 575 + X 6343, 5077, 4205, 3680, 2731, 2089, 1697, 1462, 985, C8ON 576 + X 17, 6963, 3376, 411, 624, 1083, 1815, 2937, 4377, C8ON 577 + X 7047, 9559, 11176, 12183, 8484, 8000, 3648, 3056, 10, C8ON 578 + Y 7782/ C8ON 579 + DATA MAP 29/ C8ON 580 + X 1620, 578, 947, 1671, 3213, 5905, 10064, 23750, 3, C8ON 581 + X 8601, 0, 3, 32767, 0, 473, 1000, 3, 0, C8ON 582 + X 0, 3, 2308, 0, 11, 2334, 1821, 17, 12, C8ON 583 + X 13, 12, 11, 11, 9, 9, 13, 2355, 2537, C8ON 584 + X 31, 24, 23, 21, 19, 13, 10, 6, 5, C8ON 585 + X 4, 16, 2396, 3189, 63, 45, 33, 19, 12, C8ON 586 + X 10, 7, 6, 6, 5, 4, 4, 4, 18, C8ON 587 + X 2457, 3635, 120, 89, 76, 42, 34, 28, 23, C8ON 588 + X 19, 17, 12, 9, 8, 6, 6, 7, 21, C8ON 589 + X 2662, 4555, 232, 222, 193, 161, 128, 93, 74, C8ON 590 + X 54, 42, 30, 23, 20, 17, 16, 13, 10, C8ON 591 + X 9, 11, 23, 2867, 5029, 265, 339, 367, 311, C8ON 592 + X 253, 196, 130, 92, 70, 55, 44, 34, 27, C8ON 593 + X 26, 25, 24, 25, 24, 27, 26, 25, 3072, C8ON 594 + X 5422, 239, 284, 357, 413, 438, 393, 324, 262, C8ON 595 + X 181, 129, 90, 67, 51, 40, 35, 32, 31, C8ON 596 + X 30, 29, 30, 31, 31, 25, 3276, 5632, 318, C8ON 597 + X 364, 398, 421, 474, 495, 460, 409, 359, 285, C8ON 598 + Y 207/ C8ON 599 + DATA MAP 30/ C8ON 600 + X 161, 117, 88, 68, 54, 43, 35, 33, 31, C8ON 601 + X 33, 34, 26, 3481, 5668, 335, 383, 477, 550, C8ON 602 + X 602, 618, 604, 540, 484, 433, 340, 262, 210, C8ON 603 + X 157, 121, 90, 69, 55, 45, 38, 36, 36, C8ON 604 + X 36, 26, 3686, 5663, 363, 440, 541, 673, 774, C8ON 605 + X 834, 771, 721, 659, 560, 462, 350, 287, 223, C8ON 606 + X 168, 117, 70, 62, 58, 57, 59, 67, 68, C8ON 607 + X 25, 3891, 5590, 394, 490, 631, 790, 952, 1021, C8ON 608 + X 990, 1028, 952, 811, 623, 413, 310, 196, 173, C8ON 609 + X 129, 91, 67, 65, 63, 63, 69, 25, 4096, C8ON 610 + X 5488, 445, 542, 716, 960, 1213, 1347, 1488, 1376, C8ON 611 + X 1210, 1024, 755, 559, 414, 319, 194, 153, 76, C8ON 612 + X 62, 31, 22, 18, 18, 25, 4300, 5391, 462, C8ON 613 + X 590, 821, 1156, 1506, 1776, 1937, 1738, 1462, 1053, C8ON 614 + X 661, 516, 239, 216, 93, 88, 80, 78, 79, C8ON 615 + X 81, 87, 100, 24, 4505, 5237, 471, 620, 912, C8ON 616 + X 1389, 1906, 2324, 2226, 2161, 1802, 1323, 786, 606, C8ON 617 + X 290, 247, 238, 237, 196, 143, 93, 72, 75, C8ON 618 + Y 23/ C8ON 619 + DATA MAP 31/ C8ON 620 + X 4710, 5072, 438, 628, 996, 1485, 2229, 2784, 2591, C8ON 621 + X 2347, 1973, 1660, 1001, 779, 581, 405, 283, 204, C8ON 622 + X 161, 117, 124, 124, 23, 4915, 4894, 460, 622, C8ON 623 + X 972, 1637, 2632, 3410, 3612, 3147, 2448, 1451, 1221, C8ON 624 + X 448, 321, 234, 207, 207, 209, 221, 230, 239, C8ON 625 + X 22, 5120, 4718, 427, 626, 1016, 1653, 2780, 3741, C8ON 626 + X 4100, 3590, 2842, 2118, 1892, 1250, 922, 726, 421, C8ON 627 + X 266, 186, 154, 131, 21, 5324, 4536, 404, 562, C8ON 628 + X 898, 1587, 2846, 3671, 4353, 5169, 3553, 2892, 1829, C8ON 629 + X 1194, 808, 415, 320, 263, 273, 297, 20, 5529, C8ON 630 + X 4299, 428, 611, 988, 1616, 2678, 3862, 4871, 5531, C8ON 631 + X 4787, 3764, 2683, 1593, 1260, 855, 550, 446, 368, C8ON 632 + X 19, 5734, 4018, 465, 635, 992, 1701, 2809, 3985, C8ON 633 + X 5472, 6788, 6300, 4673, 3412, 1959, 1459, 1127, 794, C8ON 634 + X 605, 17, 6144, 3442, 449, 593, 893, 1427, 2226, C8ON 635 + X 3228, 5654, 7596, 7913, 5856, 4834, 3891, 3162, 2365, C8ON 636 + X 11, 6963, 1940, 512, 724, 1195, 2095, 3359, 5769, C8ON 637 + X 9543, 13441, 3, 7782, 0, 3, 32767, 0, 400, C8ON 638 + Y 2000/ C8ON 639 + DATA MAP 32/ C8ON 640 + X 3, 0, 0, 3, 2312, 0, 10, 2334, 1629, C8ON 641 + X 17, 12, 13, 12, 11, 11, 11, 13, 2355, C8ON 642 + X 2378, 31, 24, 23, 21, 19, 13, 10, 6, C8ON 643 + X 5, 1, 16, 2396, 3134, 63, 45, 33, 19, C8ON 644 + X 12, 10, 7, 6, 6, 5, 5, 3, 4, C8ON 645 + X 18, 2457, 3612, 123, 90, 74, 41, 33, 29, C8ON 646 + X 21, 19, 16, 12, 9, 8, 6, 6, 7, C8ON 647 + X 21, 2662, 4406, 272, 239, 200, 157, 113, 85, C8ON 648 + X 64, 49, 35, 26, 21, 18, 17, 14, 12, C8ON 649 + X 9, 10, 11, 22, 2867, 4759, 367, 484, 372, C8ON 650 + X 292, 201, 135, 98, 72, 55, 43, 35, 28, C8ON 651 + X 26, 25, 25, 24, 25, 26, 26, 23, 3072, C8ON 652 + X 4921, 380, 481, 555, 508, 426, 309, 193, 153, C8ON 653 + X 97, 68, 52, 41, 36, 32, 32, 29, 30, C8ON 654 + X 30, 31, 30, 23, 3276, 4891, 467, 585, 712, C8ON 655 + X 675, 583, 483, 344, 259, 198, 141, 93, 73, C8ON 656 + X 56, 44, 37, 33, 32, 32, 34, 33, 22, C8ON 657 + X 3481, 4814, 472, 632, 806, 814, 782, 712, 616, C8ON 658 + Y 447/ C8ON 659 + DATA MAP 33/ C8ON 660 + X 319, 239, 168, 121, 95, 69, 51, 43, 37, C8ON 661 + X 34, 35, 22, 3686, 4705, 509, 703, 945, 1086, C8ON 662 + X 1087, 961, 819, 603, 433, 342, 233, 140, 113, C8ON 663 + X 63, 59, 59, 55, 61, 74, 21, 3891, 4579, C8ON 664 + X 528, 770, 1122, 1432, 1348, 1319, 1133, 845, 525, C8ON 665 + X 390, 227, 161, 143, 67, 66, 65, 63, 63, C8ON 666 + X 21, 4096, 4420, 616, 923, 1383, 1763, 1770, 1561, C8ON 667 + X 1329, 1062, 746, 572, 433, 258, 180, 130, 92, C8ON 668 + X 44, 29, 25, 20, 4300, 4288, 660, 983, 1489, C8ON 669 + X 2015, 2310, 1918, 1562, 1191, 796, 624, 277, 267, C8ON 670 + X 104, 88, 86, 83, 83, 20, 4505, 4134, 633, C8ON 671 + X 983, 1581, 2245, 2656, 2372, 2104, 1930, 923, 903, C8ON 672 + X 349, 279, 242, 241, 217, 186, 109, 19, 4710, C8ON 673 + X 3916, 664, 1059, 1747, 2531, 2999, 2812, 2408, 2092, C8ON 674 + X 1194, 964, 713, 514, 369, 238, 188, 131, 18, C8ON 675 + X 4915, 3717, 632, 1045, 1805, 2778, 3685, 4323, 3029, C8ON 676 + X 2374, 1503, 680, 453, 250, 211, 211, 225, 17, C8ON 677 + X 5120, 3504, 581, 997, 1766, 2837, 3926, 4569, 3717, C8ON 678 + Y 3120/ C8ON 679 + DATA MAP 34/ C8ON 680 + X 2222, 1638, 1233, 898, 493, 356, 16, 5324, 3264, C8ON 681 + X 555, 892, 1707, 2713, 3678, 4706, 5138, 3845, 2834, C8ON 682 + X 1687, 1314, 725, 500, 15, 5529, 2944, 584, 924, C8ON 683 + X 1698, 2818, 4114, 5429, 6089, 4712, 4264, 2016, 1585, C8ON 684 + X 1083, 14, 5734, 2591, 513, 805, 1557, 2705, 4143, C8ON 685 + X 6432, 8251, 5994, 5190, 2656, 1917, 11, 6144, 1804, C8ON 686 + X 509, 724, 1211, 2046, 3043, 5020, 8322, 9479, 4, C8ON 687 + X 6963, 22, 1965, 3, 7782, 0, 3, 32767, 0, C8ON 688 + X 356, 3000, 3, 0, 0, 3, 2315, 0, 9, C8ON 689 + X 2334, 1457, 17, 12, 13, 12, 12, 10, 12, C8ON 690 + X 2355, 2243, 31, 24, 23, 21, 19, 13, 10, C8ON 691 + X 6, 7, 16, 2396, 3094, 63, 45, 33, 19, C8ON 692 + X 12, 10, 7, 6, 6, 5, 5, 3, 4, C8ON 693 + X 18, 2457, 3589, 123, 95, 71, 41, 33, 27, C8ON 694 + X 22, 19, 15, 12, 9, 8, 6, 6, 7, C8ON 695 + X 20, 2662, 4329, 285, 244, 203, 155, 106, 84, C8ON 696 + X 60, 46, 35, 27, 21, 17, 16, 14, 10, C8ON 697 + X 10, 11, 22, 2867, 4648, 442, 472, 388, 296, C8ON 698 + Y 168/ C8ON 699 + DATA MAP 35/ C8ON 700 + X 125, 88, 60, 54, 40, 32, 27, 26, 24, C8ON 701 + X 25, 25, 25, 27, 27, 22, 3072, 4687, 554, C8ON 702 + X 639, 571, 505, 316, 225, 170, 103, 76, 58, C8ON 703 + X 42, 36, 33, 31, 29, 30, 30, 31, 31, C8ON 704 + X 22, 3276, 4612, 625, 792, 793, 690, 558, 351, C8ON 705 + X 274, 210, 141, 106, 77, 55, 43, 37, 33, C8ON 706 + X 32, 32, 34, 33, 21, 3481, 4415, 727, 921, C8ON 707 + X 974, 890, 757, 650, 444, 303, 217, 155, 121, C8ON 708 + X 90, 63, 48, 40, 35, 36, 39, 20, 3686, C8ON 709 + X 4249, 764, 1048, 1256, 1229, 1089, 830, 575, 452, C8ON 710 + X 337, 174, 168, 69, 63, 60, 57, 56, 63, C8ON 711 + X 19, 3891, 4096, 732, 1091, 1545, 1527, 1460, 1319, C8ON 712 + X 799, 618, 364, 222, 171, 109, 74, 65, 65, C8ON 713 + X 63, 19, 4096, 3855, 988, 1449, 1963, 1957, 1790, C8ON 714 + X 1260, 990, 811, 541, 387, 296, 193, 100, 100, C8ON 715 + X 38, 30, 18, 4300, 3672, 945, 1440, 2125, 2362, C8ON 716 + X 2093, 1646, 1242, 927, 672, 325, 279, 129, 95, C8ON 717 + X 89, 90, 17, 4505, 3465, 941, 1434, 2274, 2730, C8ON 718 + Y 2600/ C8ON 719 + DATA MAP 36/ C8ON 720 + X 2295, 1887, 1175, 831, 456, 295, 237, 242, 235, C8ON 721 + X 16, 4710, 3209, 973, 1612, 2430, 3367, 3054, 2649, C8ON 722 + X 1957, 1348, 990, 754, 500, 408, 255, 15, 4915, C8ON 723 + X 2972, 926, 1625, 2792, 3926, 4488, 3691, 2001, 1828, C8ON 724 + X 583, 468, 266, 207, 14, 5120, 2727, 868, 1676, C8ON 725 + X 2862, 3990, 4853, 3951, 3250, 2282, 1710, 1329, 794, C8ON 726 + X 13, 5324, 2450, 793, 1427, 2595, 3683, 4146, 5234, C8ON 727 + X 4349, 3117, 1956, 1518, 12, 5529, 2114, 718, 1195, C8ON 728 + X 2178, 3600, 5100, 6486, 5691, 5333, 2477, 10, 5734, C8ON 729 + X 1753, 564, 952, 1940, 3447, 5390, 7337, 8574, 7, C8ON 730 + X 6144, 836, 576, 814, 1407, 2953, 3, 6963, 0, C8ON 731 + X 3, 32767, 0, 308, 5000, 3, 0, 0, 3, C8ON 732 + X 2321, 0, 8, 2334, 1233, 17, 12, 13, 12, C8ON 733 + X 12, 11, 2355, 2016, 31, 24, 23, 21, 19, C8ON 734 + X 13, 10, 6, 15, 2396, 3025, 63, 45, 33, C8ON 735 + X 19, 12, 10, 7, 6, 6, 5, 4, 4, C8ON 736 + X 17, 2457, 3541, 123, 94, 75, 42, 33, 26, C8ON 737 + X 21, 19, 14, 12, 8, 8, 6, 6, 20, C8ON 738 + Y 2662/ C8ON 739 + DATA MAP 37/ C8ON 740 + X 4236, 288, 246, 204, 156, 103, 83, 57, 42, C8ON 741 + X 33, 27, 23, 19, 17, 16, 12, 11, 9, C8ON 742 + X 21, 2867, 4517, 479, 483, 394, 267, 186, 106, C8ON 743 + X 76, 60, 53, 44, 30, 26, 25, 25, 23, C8ON 744 + X 24, 24, 25, 21, 3072, 4480, 757, 682, 600, C8ON 745 + X 385, 277, 210, 121, 92, 68, 52, 39, 34, C8ON 746 + X 32, 30, 29, 29, 29, 31, 20, 3276, 4347, C8ON 747 + X 902, 882, 792, 659, 421, 341, 230, 159, 124, C8ON 748 + X 93, 65, 46, 36, 32, 31, 31, 33, 20, C8ON 749 + X 3481, 4100, 916, 1152, 1056, 914, 684, 478, 361, C8ON 750 + X 228, 177, 140, 117, 66, 53, 42, 35, 35, C8ON 751 + X 40, 19, 3686, 3882, 941, 1293, 1397, 1246, 1011, C8ON 752 + X 650, 504, 369, 226, 168, 127, 74, 61, 60, C8ON 753 + X 57, 58, 18, 3891, 3611, 987, 1439, 1692, 1631, C8ON 754 + X 1450, 984, 749, 438, 263, 196, 113, 82, 67, C8ON 755 + X 66, 64, 16, 4096, 3313, 1262, 2001, 2137, 1958, C8ON 756 + X 1565, 1097, 882, 681, 429, 344, 200, 128, 111, C8ON 757 + X 15, 4300, 3036, 1344, 2080, 2450, 2291, 1930, 1335, C8ON 758 + Y 1052/ C8ON 759 + DATA MAP 38/ C8ON 760 + X 745, 407, 343, 149, 116, 14, 4505, 2745, 1309, C8ON 761 + X 2076, 2686, 2679, 2466, 2147, 1374, 1112, 502, 401, C8ON 762 + X 272, 13, 4710, 2428, 1374, 2244, 3341, 3171, 2816, C8ON 763 + X 2214, 1560, 1158, 852, 727, 12, 4915, 2118, 1330, C8ON 764 + X 2260, 3864, 4654, 4022, 2652, 2017, 887, 641, 11, C8ON 765 + X 5120, 1799, 1432, 2705, 4025, 5075, 4615, 3688, 2447, C8ON 766 + X 1958, 9, 5324, 1456, 1349, 2216, 3821, 3992, 4773, C8ON 767 + X 4697, 8, 5529, 1058, 971, 1678, 2954, 4556, 6312, C8ON 768 + X 6, 5734, 618, 656, 1147, 3056, 3, 6144, 0, C8ON 769 + X 3, 32767, 0, 249, 10000, 3, 0, 0, 3, C8ON 770 + X 2334, 0, 10, 2355, 1555, 31, 24, 23, 21, C8ON 771 + X 19, 13, 12, 15, 2396, 2845, 63, 45, 33, C8ON 772 + X 19, 12, 10, 7, 6, 6, 5, 5, 3, C8ON 773 + X 17, 2457, 3400, 120, 93, 76, 41, 36, 30, C8ON 774 + X 25, 16, 13, 10, 8, 7, 6, 6, 19, C8ON 775 + X 2662, 4017, 303, 248, 202, 143, 101, 80, 53, C8ON 776 + X 37, 30, 25, 23, 22, 18, 18, 16, 12, C8ON 777 + X 20, 2867, 4267, 487, 475, 388, 270, 195, 104, C8ON 778 + Y 74/ C8ON 779 + DATA MAP 39/ C8ON 780 + X 59, 49, 42, 31, 23, 25, 25, 24, 24, C8ON 781 + X 25, 20, 3072, 4226, 772, 673, 577, 385, 285, C8ON 782 + X 216, 122, 93, 66, 49, 37, 34, 33, 30, C8ON 783 + X 30, 28, 30, 19, 3276, 3988, 933, 872, 782, C8ON 784 + X 678, 429, 345, 217, 156, 123, 87, 54, 43, C8ON 785 + X 36, 33, 30, 30, 18, 3481, 3695, 1035, 1115, C8ON 786 + X 1011, 843, 570, 457, 355, 263, 217, 168, 153, C8ON 787 + X 71, 60, 49, 38, 17, 3686, 3408, 963, 1181, C8ON 788 + X 1250, 1150, 971, 626, 493, 376, 276, 207, 171, C8ON 789 + X 142, 109, 70, 15, 3891, 3072, 949, 1281, 1498, C8ON 790 + X 1450, 1316, 1193, 769, 649, 370, 228, 193, 99, C8ON 791 + X 14, 4096, 2684, 1245, 1668, 2081, 1966, 1729, 1107, C8ON 792 + X 900, 741, 472, 341, 246, 13, 4300, 2326, 1406, C8ON 793 + X 1933, 2357, 2249, 1921, 1363, 1074, 819, 443, 353, C8ON 794 + X 11, 4505, 1923, 1498, 1985, 2597, 2582, 2294, 1940, C8ON 795 + X 1468, 1149, 9, 4710, 1527, 1291, 1811, 2800, 2930, C8ON 796 + X 2776, 2460, 8, 4915, 1082, 1395, 2062, 3312, 3893, C8ON 797 + X 4591, 6, 5120, 665, 1495, 2923, 4786, 4, 5324, C8ON 798 + Y 174/ C8ON 799 + DATA MAP 40/ C8ON 800 + X 1699, 3, 5529, 0, 3, 32767, 0, 194, 20000, C8ON 801 + X 3, 0, 0, 3, 2347, 0, 7, 2355, 797, C8ON 802 + X 31, 24, 23, 21, 13, 2396, 2490, 64, 44, C8ON 803 + X 33, 19, 12, 10, 7, 6, 6, 6, 15, C8ON 804 + X 2457, 3038, 113, 88, 73, 44, 33, 28, 22, C8ON 805 + X 18, 15, 13, 11, 10, 18, 2662, 3591, 307, C8ON 806 + X 248, 201, 134, 96, 72, 48, 36, 29, 24, C8ON 807 + X 21, 21, 23, 21, 20, 18, 2867, 3790, 472, C8ON 808 + X 483, 380, 267, 198, 93, 61, 48, 40, 39, C8ON 809 + X 37, 32, 25, 24, 27, 18, 3072, 3725, 769, C8ON 810 + X 649, 526, 358, 284, 219, 153, 105, 67, 48, C8ON 811 + X 35, 27, 27, 35, 36, 17, 3276, 3389, 836, C8ON 812 + X 770, 723, 683, 477, 367, 244, 155, 124, 99, C8ON 813 + X 76, 68, 47, 41, 15, 3481, 3049, 819, 984, C8ON 814 + X 883, 749, 572, 453, 371, 314, 208, 237, 262, C8ON 815 + X 176, 14, 3686, 2701, 829, 969, 953, 888, 805, C8ON 816 + X 614, 524, 429, 334, 275, 211, 13, 3891, 2319, C8ON 817 + X 663, 925, 1239, 1206, 1098, 1006, 969, 789, 675, C8ON 818 + Y 534/ C8ON 819 + DATA MAP 41/ C8ON 820 + X 11, 4096, 1858, 934, 1448, 1759, 1805, 1634, 1303, C8ON 821 + X 998, 866, 9, 4300, 1402, 903, 1391, 2227, 2362, C8ON 822 + X 2063, 1579, 7, 4505, 856, 1286, 1601, 2390, 2881, C8ON 823 + X 5, 4710, 283, 1313, 1680, 3, 4915, 0, 3, C8ON 824 + X 32767, 0, 130, 40000, 3, 0, 0, 3, 2363, C8ON 825 + X 0, 11, 2396, 1821, 63, 45, 33, 19, 12, C8ON 826 + X 10, 7, 6, 13, 2457, 2307, 82, 70, 60, C8ON 827 + X 52, 33, 26, 22, 20, 16, 15, 14, 2662, C8ON 828 + X 2792, 262, 235, 192, 152, 88, 68, 50, 40, C8ON 829 + X 35, 30, 25, 15, 2867, 2941, 413, 527, 358, C8ON 830 + X 266, 209, 73, 52, 42, 33, 25, 20, 21, C8ON 831 + X 15, 3072, 2821, 710, 614, 557, 305, 248, 200, C8ON 832 + X 166, 129, 91, 69, 49, 42, 13, 3276, 2454, C8ON 833 + X 675, 589, 445, 494, 524, 415, 346, 281, 196, C8ON 834 + X 132, 11, 3481, 2040, 605, 685, 723, 674, 603, C8ON 835 + X 410, 339, 308, 10, 3686, 1613, 586, 615, 615, C8ON 836 + X 682, 708, 658, 560, 8, 3891, 1074, 591, 725, C8ON 837 + X 841, 1013, 1106, 6, 4096, 521, 880, 1122, 1201, C8ON 838 + Y 3/ C8ON 839 + DATA MAP 42/ C8ON 840 + X 4300, 0, 3, 32767, 0, C8ON 841 + Y 0/ C8ON 842 + END C8ON 843 diff --git a/SOFIP/original/sofip.for b/SOFIP/original/sofip.for new file mode 100755 index 0000000..cd9e529 --- /dev/null +++ b/SOFIP/original/sofip.for @@ -0,0 +1,801 @@ +C **********************************************************************SOFIP001 +C ************ SHORT ORBITAL FLUX INTEGRATION PROGRAM ***********SOFIP002 +C ******* FOR USE WITH NSSDC'S STANDARD ENVIRONMENT MODELS *******SOFIP003 +C **********************************************************************SOFIP004 +C ** DESIGNED AND TESTED BY STASSINOPOULOS, HEBERT, BUTLER, & BARTH **SOFIP005 +C ** CODE 601, NASA/GODDARD SPACE FLIGHT CENTER; GREENBELT, MD. 20771 **SOFIP006 +C ** SINGLE PRECISION DECK FOR FORTRAN IV (EBCDIC,029 PUNCH) **SOFIP007 +C ** TRAJECTORY INPUT FROM UNFORMATTED BINARY OR BCD FORMATTED TAPE **SOFIP008 +C **********************************************************************SOFIP009 +C *** SOFIP010 +C *** INPUT PARAMETERS: SOFIP011 +C *** * NAME : 12-CHARACTER MISSION (OR PROJECT) NAME SOFIP012 +C *** * INCL : APPROXIMATE INCLINATION OF ORBIT PLANE IN DEGREES (I*4)SOFIP013 +C *** * IPRG : APPROXIMATE PERIGEE ALTITUDE IN KILOMETERS (I*4)SOFIP014 +C *** * IAPG : APPROXIMATE APOGEE ALTITUDE IN KILOMETERS (I*4)SOFIP015 +C *** * MODEL : NUMBER OF FIELD-MODEL USED IN B/L CALCULATION (R*4)SOFIP016 +C *** * PERIOD: MATHEMATICAL PERIOD OF ORBIT IN HOURS (R*4)SOFIP017 +C *** * BLTIME: EPOCH OF FIELD-MODEL USED IN B/L CALCULATION (R*4)SOFIP018 +C *** * NRGYLV: THRESHOLD-ENERGY SELECTOR FOR RUNNING PRINTOUT (I*4)SOFIP019 +C *** * ITAPE : B/L ORBIT TAPE IDENTIFIER, < 10000 (I*4)SOFIP020 +C *** * NTABLS: # OF OUTPUT-TABLE SETS PER TRAJECTORY (I*4)SOFIP021 +C *** * CUTOFF: ORBIT DURATION IN DECIMAL HOURS (R*4)SOFIP022 +C *** * ISKIP : POSITION SKIPPING CONTROL (I*4)SOFIP023 +C *** * KPRINT: RUNNING PRINTOUT CONTROL (I*4)SOFIP024 +C *** SOFIP025 +C *** INPUT VARIABLES: SOFIP026 +C *** * PSNTIM: POSITIONAL TIME (DECIMAL HOURS) SOFIP027 +C *** * PSNLON: " LONGITUDE (DEGREES) SOFIP028 +C *** * PSNLAT: " LATITUDE (DEGREES) SOFIP029 +C *** * PSNALT: " ALTITUDE (KILOMETERS) SOFIP030 +C *** * PSNB : " FIELD MAGNITUDE (GAUSS) SOFIP031 +C *** * PSNL : " SHELL PARAMETER (EARTH RADII) SOFIP032 +C **********************************************************************SOFIP033 +C *** TO READ BCD FORMATTED ORBIT TAPES, UNCOMMENT LINES 132,137,& 143. SOFIP034 +C *** COMMENT OUT LINES 133-134,138-139,& 144. SOFIP035 +C *** TO READ UNFORMATTED BINARY ORBIT TAPES, UNCOMMENT LINES 133-134, SOFIP036 +C *** 138-139,& 144. COMMENT OUT LINES 132,137,& 143. SOFIP037 +C *** ******************** BLOCK 0: INITIALIZATION *******************SOFIP038 +C COMMON /AP8MAC/DESCR(8),LIST(1) SOFIP039 +C COMMON /AE6MAX/DESCR(8),LIST(1) SOFIP040 +C COMMON /AEI7HI/DESCR7(8),LIST7(1) SOFIP041 +C COMMON /AEI7LO/DESCR7(8),LIST7(1) SOFIP042 +C COMMON /AE5MIN/DESCR(8),LIST(1) SOFIP043 +C COMMON /AP8MIC/DESCR(8),LIST(1) SOFIP044 + REAL MODLAB*8(4,7)/'HENDRICK','S&CAIN 9','9-TERM G','SFC 9/65',' CSOFIP045 + $AIN ET','.AL. 120','-TERM GS','FC 12/66',' CAIN&LA','NGEL 143','-TSOFIP046 + $ERM PO','GO 10/68',' CAIN&SW','EENEY 12','0-TERM P','OGO 8/69',' SOFIP047 + $ IGRF',' 1965.0 ','80-TERM ','10/68 ',' LEATON ','MALIN EV','ANSOFIP048 + $S 80-T','ERM 1965',' HURWI','TZ US C&','GS 168-T','ERM 1970'/, SOFIP049 + $MODLBL*8(4),AP8/' AP8'/,MAX/'MAX '/,MIN/'MIN '/,LOW/'S LO'/, SOFIP050 + $MAC/'MAC'/,DESCR7(8),BINDMY*8(5),ADUMMY(6),MOD7/'LO-7'/ SOFIP051 + REAL ENERGY(31,2)/2.,3.,4.,5.,6.,8.,10.,15.,20.,25.,30.,35.,40., SOFIP052 + $45.,50.,55.,60.,70.,80.,90.,100.,125.,150.,175.,200.,250.,300., SOFIP053 + $350.,400.,500.,0.,.1,.2,.3,.4,.5,.6,.7,.8,.9,1.,1.25,1.5,1.75,2., SOFIP054 + $2.25,2.5,2.75,3.,3.25,3.5,3.75,4.,4.25,4.5,4.75,5.,5.5,6.,6.5,7., SOFIP055 + $0.0/,SPNRG(20)/10.,20.,30.,40.,50.,60.,70.,80.,90.,100.,110.,120.,SOFIP056 + $130.,140.,150.,160.,170.,180.,190.,200./ SOFIP057 + INTEGER NRGRNG(10,2)/1,3,5,7,12,20,22,26,30,31,1,5,8,10,12,13,14, SOFIP058 + $22,30,31/,IZONE(120)/10*1,17*2,93*3/,NRBITO/1/ SOFIP059 + DIMENSION FLUXES(30),ALGFLX(30),ALNFLX(30),DIFSPC(30),EXPFLX(10), SOFIP060 + $PKVALU(50,8),AIFLXS(30),ENRNGS(11),EXPTIM(10),IYMD(3),LCOUNT(4), SOFIP061 + $DIFFLX(30),NAME(3),PKFLX(50),PKTIM(50),PTIME(4), SOFIP062 + $PKLON(50),PKLAT(50),PKALT(50),PKB(50),PKL(50),TAUFLX(50),F(20) SOFIP063 + EQUIVALENCE(PKVALU(1,1),PKFLX(1)),(PKVALU(1,2),PKLON(1)),(PKVALU(1SOFIP064 + $,3),PKLAT(1)),(PKVALU(1,4),PKALT(1)),(PKVALU(1,5),PKTIM(1)),(PKVALSOFIP065 + $U(1,6),PKB(1)),(PKVALU(1,7),PKL(1)),(PKVALU(1,8),TAUFLX(1)) SOFIP066 + REAL TYPLBL(3,2)/' PR','OTON','S ','ELEC','TRON','S HI'/, SOFIP067 + $FIRNGS(11)/'0.E0','1.E0','1.E1','1.E2','1.E3','1.E4','1.E5', SOFIP068 + $'1.E6','1.E7','OVER',' '/,XLABEL*8(3,2)/'PRNRGY','PRINTG','PRDIFF'SOFIP069 + $,'ELNRGY','ELINTG','ELDIFF'/,PROTLB*8(2)/'SPNRGY','SPFLUX'/ SOFIP070 + 1 FORMAT('1NAME = ',3A4/' INCL = ',I3/' IPRG = ', I6/' IAPG = ', SOFIP071 + $I6/' ITAPE = ',I4/' MODEL = ',I2/' PERIOD= ',F9.6/ SOFIP072 + $' BLTIME= ',F7.2/' NRGLEV= ',I2/' NTABLS= ',I2/' CUTOFF= ',F6.2/ SOFIP073 + $' ISKIP= ',I2/' KPRINT= ',I2//) SOFIP074 + 2 FORMAT('1',131('*')/' * SOFIP : SHORT ORBITAL FLUX INTEGR. PROGRAMSOFIP075 + $ FOR STANDARD NSSDC PROTON AND ELECTRON ENVIR. MODELS (SPECIES CONSOFIP076 + $SIDERED SEPARATELY) *'/' * MAGNETIC PARAMETERS B AND L COMPUTED WISOFIP077 + $TH GEOMAGN. FIELD MODEL',I3,': ',4A8,' * COEFF. UPDATED TO:',F7.1,SOFIP078 + $' *'/' * PROJECT :',3A4,' * INCLIN=',I3,'DEG * PERIG=',I5,'KM * APSOFIP079 + $OG=',I6,'KM * B/L TAPE=TD',I4,' * PERIOD=',F7.3,'HRS * SOLAR ',A3,SOFIP080 + $'IMUM *'/' * FOR INFORMATION OR EXPLANATION CONTACT E.G. STASSSOFIP081 + $INOPOULOS AT NASA-GSFC,CODE 601, GREENBELT, MARYLAND 20771, TEL.(3SOFIP082 + $01)-344-8067 *'/1X,131('*')//) SOFIP083 + 3 FORMAT(2('1'/12('0'/)/53X,28('*')/53X,'**',6X,3A4,6X,'**'/53X,'**'SOFIP084 + $,I3,'DEG/',I5,'KM/',I6,'KM **'/53X,28('*')/)) SOFIP085 + 4 FORMAT (3A4,7X,I3,7X,I6,4X,I6,4X,I2,8X,F9.6,1X,F7.2/I2,7X,I4, SOFIP086 + $6X,I2,8X,F6.2,4X,I2,8X,I2) SOFIP087 + 5 FORMAT(6E18.8) SOFIP088 +C *** ******************** BLOCK 1: INITIALIZATION *******************SOFIP089 + 10 READ(5,4,END=999) NAME,INCL,IPRG,IAPG,MODEL,PERIOD,BLTIME,NRGYLV, SOFIP090 + $ITAPE,NTABLS,CUTOFF,ISKIP,KPRINT SOFIP091 + ITYPE=1 SOFIP092 + WRITE(6,3) (NAME,INCL,IPRG,IAPG,I=1,2) SOFIP093 + NORBIT=1 SOFIP094 + IPASS=1 SOFIP095 + IPRINT=KPRINT SOFIP096 + ASSIGN 110 TO NGO2 SOFIP097 + L=0 SOFIP098 + LSUM=0 SOFIP099 + EXPFCT=0.0 SOFIP100 + XAMNIM=MAX SOFIP101 + ISWTCH=1 SOFIP102 + IF(DESCR(1).EQ.AP8) GO TO 15 SOFIP103 + ITYPE = 2 SOFIP104 + ASSIGN 120 TO NGO2 SOFIP105 + IF(DESCR(2).NE.MAX) XAMNIM=MIN SOFIP106 + IF(DESCR7(2).EQ.MOD7) TYPLBL(3,2)=LOW SOFIP107 + GO TO 17 SOFIP108 + 15 IF(DESCR(2).NE.MAC) XAMNIM=MIN SOFIP109 + 17 DO 20 I=1,4 SOFIP110 + LCOUNT(I)=0 SOFIP111 + 20 MODLBL(I) = MODLAB(I,MODEL) SOFIP112 + TAU = PERIOD SOFIP113 + FLXSUM = 0.0 SOFIP114 + OFLXSM = 0.0 SOFIP115 + PEAK = -1.0 SOFIP116 + DO 30 NRNG=1,10 SOFIP117 + ENRNGS(NRNG) = ENERGY(NRGRNG(NRNG,ITYPE),ITYPE) SOFIP118 + EXPTIM(NRNG) = 0.0 SOFIP119 + 30 EXPFLX(NRNG) = 0.0 SOFIP120 + DO 35 NRGSP=1,20 SOFIP121 + 35 F(NRGSP)=0.0 SOFIP122 + DO 40 NRG=1,30 SOFIP123 + AIFLXS(NRG)=0.0 SOFIP124 + ALNFLX(NRG) = 0.0 SOFIP125 + DIFSPC(NRG) = 0.0 SOFIP126 + 40 FLUXES(NRG) = 0.0 SOFIP127 +C *** WRITE OUT INPUT PARAMETERS SOFIP128 + WRITE(6,1)NAME,INCL,IPRG,IAPG,ITAPE,MODEL,PERIOD,BLTIME,NRGYLV, SOFIP129 + $NTABLS,CUTOFF,ISKIP,KPRINT SOFIP130 +C *** ************************ BLOCK 2: INPUT ************************SOFIP131 +C READ(9,5,END=400,ERR=10)PSNTM1,PSNLN1,PSNLT1,PSNAL1,PSNB1,PSNL1 SOFIP132 + READ(9,END=400,ERR=10)PSNTM1,PSNLN1,DUMMY,PSNLT1,DUMMY,PSNAL1, SOFIP133 + $DUMMY,PSNB1,DUMMY,PSNL1,DUMMY SOFIP134 + TMLAST = PSNTM1 SOFIP135 + 50 DO 60 ISKP=1,ISKIP SOFIP136 +C READ(9,5,END=400,ERR=10) PSNTIM,PSNLON,PSNLAT,PSNALT,PSNB,PSNL SOFIP137 + READ(9,END=400,ERR=10)PSNTIM,PSNLON,DUMMY,PSNLAT,DUMMY,PSNALT, SOFIP138 + $DUMMY,PSNB,DUMMY,PSNL,DUMMY SOFIP139 + 60 CONTINUE SOFIP140 + IF(PSNTIM.LE.CUTOFF) GO TO 65 SOFIP141 +C *** DUMMY READ LOOP TO READ TO END OF FILE SOFIP142 +C 66 READ(9,5,END=400,ERR=10) ADUMMY SOFIP143 + 66 READ(9,END=400,ERR=10) BINTIM,BINDMY SOFIP144 + GO TO 66 SOFIP145 + 65 CONTINUE SOFIP146 +C *** ********************* BLOCK 3: CALCULATIONS ********************SOFIP147 +C *** CALCULATE KPSTEP (NUMBER OF MINUTES BETWEEN POINTS ON B/L TAPE) SOFIP148 + GO TO (70,80), IPASS SOFIP149 + 70 KPSTEP = INT((PSNTIM-TMLAST)/.0166667+0.1) SOFIP150 + 80 TMLAST = PSNTIM SOFIP151 +C *** TEST L-VALUE & BYPASS FLUX CALCULATIONS IF WARRANTED SOFIP152 + IF(PSNL.GT.0.0.AND.PSNL.LT.12.0) GO TO NGO2,(110,120) SOFIP153 + DO 100 NRG=1,30 SOFIP154 + 100 FLUXES(NRG) = 0.0 SOFIP155 + GO TO 170 SOFIP156 +C *** OBTAIN COMMON LOGARITHM OF POSITIONAL FLUXES (ALGFLX) SOFIP157 +C *** PROTONS SOFIP158 + 110 CALL TRARA1(DESCR,LIST,PSNL,PSNB,ENERGY(1,1),ALGFLX(1),30) SOFIP159 + GO TO 140 SOFIP160 +C *** ELECTRONS SOFIP161 + 120 IF(INT(100.0*PSNL+0.2).LE.280) GO TO 130 SOFIP162 + CALL TRARA1(DESCR7,LIST7,PSNL,PSNB,ENERGY(1,2),ALGFLX(1),30) SOFIP163 + GO TO 140 SOFIP164 + 130 CALL TRARA1(DESCR,LIST, PSNL,PSNB,ENERGY(1,2),ALGFLX(1),30) SOFIP165 +C *** CONVERT LOG-FLUX TO FLUX SOFIP166 + 140 DO 150 NRG=1,30 SOFIP167 + FLUXES(NRG) = 10.0**ALGFLX(NRG) SOFIP168 + 150 IF(FLUXES(NRG).LT.1.001) FLUXES(NRG) = 0.0 SOFIP169 +C *** SUM FLUXES FOR (A) RUNNING PRINTOUT, (B) TABULAR OUTPUT SOFIP170 + FLXSUM = FLXSUM+FLUXES(NRGYLV)*FLOAT(KPSTEP)*60. SOFIP171 + DO 160 NRG=1,30 SOFIP172 + 160 AIFLXS(NRG) = AIFLXS(NRG)+FLUXES(NRG) SOFIP173 + 170 CONTINUE SOFIP174 +C *** ******************** RUNNING PRINTOUT MODULE *******************SOFIP175 + GO TO (200,210),IPASS SOFIP176 + 200 WRITE (6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, SOFIP177 + $XAMNIM SOFIP178 + WRITE (6,201)(TYPLBL(I,ITYPE),I=1,3), ENERGY(NRGYLV,ITYPE) SOFIP179 + 201 FORMAT('0',21X,'***** ',3A4,'(E>',G9.3,'MEV) *****'// ' LONGSOFIP180 + $. LAT. ALT. FIELD LINE ORBIT POSITIONAL TIME-INTESOFIP181 + $G ORBITAL'/' ',T28,'-B-',T37,'-L- TIME FLUX PSTNL SOFIP182 + $FLUX FLUX(SUM)'/' (DEG) (DEG) (KM) (GAUSS) (E.R.) (HRS)SOFIP183 + $ #/CM**2/SEC') SOFIP184 + WRITE(6,202)PSNTM1,PSNLN1,PSNLT1,PSNAL1,PSNB1,PSNL1 SOFIP185 + 202 FORMAT(' ',T41,F9.5,T2,F7.2,1X,F6.2,1X,F8.1,1X,F8.5,1X,F5.2,T50, SOFIP186 + $7(2X,1PE10.3)) SOFIP187 + 210 IF(MOD(IPRINT,KPRINT).NE.0) GO TO 220 SOFIP188 + TIFLUX = FLUXES(NRGYLV)*FLOAT(KPSTEP)*60. SOFIP189 + WRITE(6,202)PSNTIM,PSNLON,PSNLAT,PSNALT,PSNB,PSNL, SOFIP190 + $FLUXES(NRGYLV),TIFLUX,FLXSUM SOFIP191 + 220 IPRINT=IPRINT+1 SOFIP192 +C *** ***************** ORBIT L-ZONE BREAKDOWN MODULE ****************SOFIP193 +C *** ******* THIS MODULE MUST BE USED WITH PERCENT TIME MODULE ******SOFIP194 +C *** STORE TIME IN INNER & OUTER ZONE, EXTERNAL SOFIP195 + IF(PSNL.LT.0.0.OR.PSNL.GT.11.0) GO TO 250 SOFIP196 + IZ = IZONE(INT(PSNL/.1)) SOFIP197 + LCOUNT(IZ) = LCOUNT(IZ) + 1 SOFIP198 + GO TO 260 SOFIP199 + 250 LCOUNT(4) = LCOUNT(4)+1 SOFIP200 + 260 CONTINUE SOFIP201 +C *** ********************* EXPOSURE INDEX MODULE ********************SOFIP202 +C *** STORE FLUXES AND TIMES IN INTENSITY RANGES SOFIP203 + GO TO(270,280),IPASS SOFIP204 + 270 ISWTCH=ISWTCH+1 SOFIP205 + 280 INTRNG = (8-INT(1.0-SIGN(0.5,ALGFLX(NRGYLV)-7.0)) * SOFIP206 + $(7-INT(ALGFLX(NRGYLV)))) * INT(1.0+SIGN(0.5, SOFIP207 + $FLUXES(NRGYLV)-1.0009))+1 SOFIP208 + EXPFLX(INTRNG)=EXPFLX(INTRNG)+FLUXES(NRGYLV)*60.0*FLOAT( SOFIP209 + $KPSTEP) SOFIP210 + EXPFLX(10)=EXPFLX(10)+FLUXES(NRGYLV)*60.0*FLOAT(KPSTEP) SOFIP211 + EXPTIM(INTRNG) = EXPTIM(INTRNG) + FLOAT(KPSTEP) * .0166667 SOFIP212 + EXPTIM(10) = EXPTIM(10) + FLOAT(KPSTEP) * .0166667 SOFIP213 +C *** *************** PEAK AND TOTALS PER ORBIT MODULE ***************SOFIP214 +C *** DETERMINE ORBIT NUMBER AND TOTAL FLUXES PER ORBIT SOFIP215 + IF(PSNTIM.LT.TAU) GO TO 300 SOFIP216 + PEAK = -1.0 SOFIP217 + TAUFLX(NORBIT) = FLXSUM-OFLXSM SOFIP218 + OFLXSM = FLXSUM SOFIP219 + NRBITO=NORBIT SOFIP220 + NORBIT = NORBIT+1 SOFIP221 + TAU = NORBIT * PERIOD SOFIP222 + IF(NORBIT.LE.50) GO TO 300 SOFIP223 + WRITE(6,301) SOFIP224 + 301 FORMAT('0ERROR: NORBIT EXCEEDS LIMIT OF 50. ************') SOFIP225 + STOP SOFIP226 +C *** DETERMINE FLUX PEAKS AND POSITIONS PER ORBIT SOFIP227 + 300 IF(FLUXES(NRGYLV).LE.PEAK) GO TO 310 SOFIP228 + PKFLX(NORBIT) = FLUXES(NRGYLV) SOFIP229 + PKTIM(NORBIT) = PSNTIM SOFIP230 + PKLON(NORBIT) = PSNLON SOFIP231 + PKLAT(NORBIT) = PSNLAT SOFIP232 + PKALT(NORBIT) = PSNALT SOFIP233 + PKB(NORBIT) = PSNB SOFIP234 + PKL(NORBIT) = PSNL SOFIP235 + PEAK = FLUXES(NRGYLV) SOFIP236 + 310 CONTINUE SOFIP237 +C *** ***************** GEOMAGNETIC SHIELDING MODULE *****************SOFIP238 +C *** ******* THIS MODULE MUST BE USED WITH SOLAR PROTON MODULE ******SOFIP239 + IF(INT(PSNL).GE.5.OR.PSNL.LE.0.0) L=L+1 SOFIP240 +C *** ************ BLOCK 4: LOOPING (READ-LOOP ENDS HERE) ***********SOFIP241 + IPASS=2 SOFIP242 + GO TO 50 SOFIP243 +C *** ****************** BLOCK 5: OUTPUT PREPARATION *****************SOFIP244 +C *** COMPOSITE ORBIT SPECTRUM SOFIP245 + 400 AFCTRS = (KPSTEP*1440.0) / (PSNTIM*86400.0) SOFIP246 + DO 410 NRG=1,30 SOFIP247 + AIFLXS(NRG) = AIFLXS(NRG)*AFCTRS SOFIP248 + IF(AIFLXS(NRG).LE.0.0) GO TO 440 SOFIP249 + ALNFLX(NRG) = ALOG(AIFLXS(NRG)) SOFIP250 + 410 CONTINUE SOFIP251 + 440 DO 450 NRG=1,29 SOFIP252 + 450 DIFFLX(NRG) = AIFLXS(NRG)-AIFLXS(NRG+1) SOFIP253 + DIFFLX(30) = AIFLXS(30) SOFIP254 +C *** ********************** PERCENT TIME MODULE *********************SOFIP255 +C *** ** THIS MODULE MUST BE USED WITH ORBIT L-ZONE BREAKDOWN MODULE *SOFIP256 +C *** CALCULATE AND PRINT PERCENT TIME TABLE SOFIP257 + LSUM=LCOUNT(1) + LCOUNT(2) + LCOUNT(3) + LCOUNT(4) SOFIP258 + IF(LSUM.EQ.0) GO TO 470 SOFIP259 + DO 460 IL=1,4 SOFIP260 + 460 PTIME(IL)=FLOAT(LCOUNT(IL)*KPSTEP)*1.66667/TMLAST SOFIP261 + PTIZ=PTIME(1)+PTIME(2) SOFIP262 + WRITE(6,401)PTIZ,(PTIME(II),II=1,4),PSNTIM SOFIP263 + 470 CONTINUE SOFIP264 + 401 FORMAT('0***** PERCENT OF TOTAL LIFETIME SPENT INSIDE AND OUTSIDE SOFIP265 + $TRAPPED PARTICLE RADIATION BELT ****'//6X,'INNER ZONE (1.0 <= L < SOFIP266 + $2.8) : ',F6.2,' %'/18X,'OUTSIDE TRAPPING REGION (1.0 <= L < 1.1) SOFIP267 + $: ',F6.2,' %'/18X,'INSIDE TRAPPING REGION (1.1 <= L < 2.8) : ', SOFIP268 + $F6.2,' %'/6X,'OUTER ZONE (2.8 <= L <= 11.0) : ',F6.2,' %'/6X,'EXTESOFIP269 + $RNAL (L > 11.0) : ',F6.2,' %'//' TOTAL ORBIT TIME IS :',SOFIP270 + $F8.2,' HOURS') SOFIP271 +C *** ***************** DIFFERENTIAL SPECTRUM MODULE *****************SOFIP272 + CALL DSPCTR(ALNFLX(1),ENERGY(1,ITYPE),DIFSPC(1)) SOFIP273 +C *** ********************** SOLAR PROTON MODULE *********************SOFIP274 +C *** **** THIS MODULE MUST BE USED WITH GEOMAG. SHIELDING MODULE ****SOFIP275 + T=12. SOFIP276 + IT=T SOFIP277 + IQ=90 SOFIP278 + ISWTCH=ISWTCH+2 SOFIP279 + IF(L.LE.0) GO TO 510 SOFIP280 + CALL SOLPRO(T,IQ,F,INALE) SOFIP281 + EXPOTM=FLOAT(L*KPSTEP)*.0166667 SOFIP282 + EXPFCT=(EXPOTM/PSNTIM) SOFIP283 + DO 500 J=1,20 SOFIP284 + F(J)=F(J)*EXPFCT SOFIP285 + 500 CONTINUE SOFIP286 + 510 CONTINUE SOFIP287 +C *** ********************** OUTPUT PUNCH MODULE *********************SOFIP288 +C *** PUNCHES ENERGY, INTEG AND DIFF FLUX, SOLAR PROTONS IF PRESENT SOFIP289 + WRITE(7,605) NAME,INCL,IPRG,IAPG,MODEL,BLTIME SOFIP290 + WRITE(7,602)((ENERGY((II-1)*6+JJ,ITYPE),JJ=1,6),XLABEL(1,ITYPE),IISOFIP291 + $,II=1,5) SOFIP292 + WRITE(7,602)((AIFLXS((II-1)*6+JJ),JJ=1,6),XLABEL(2,ITYPE),II,II=1,SOFIP293 + $5) SOFIP294 + WRITE(7,602)((DIFSPC((II-1)*6+JJ),JJ=1,6),XLABEL(3,ITYPE),II,II=1,SOFIP295 + $5) SOFIP296 + IF(L.LE.0) GO TO 600 SOFIP297 + WRITE(7,603) IQ,T,INALE,EXPFCT SOFIP298 + WRITE(7,604)((SPNRG((II-1)*5+JJ),JJ=1,5),PROTLB(1),II,II=1,4) SOFIP299 + WRITE(7,604)((F((II-1)*5+JJ),JJ=1,5),PROTLB(2),II,II=1,4) SOFIP300 + 600 CONTINUE SOFIP301 + 602 FORMAT(1P6E12.4,A6,I2) SOFIP302 + 603 FORMAT('SOLAR PROTONS #ENERGIES=20 Q=',I2,' TAU=',F4.1, SOFIP303 + $' NALE=',I1,' EXPFCTR=',F5.2) SOFIP304 + 604 FORMAT(1P5E12.4,12X,A6,I2) SOFIP305 + 605 FORMAT(3A4,1X,I2,'/',I5,'-',I6,1X,'I(#/CM**2-SEC) D(#/CM**2-SEC-KESOFIP306 + $V) MOD/TM=',I1,'/',F6.1) SOFIP307 +C *** ******************** OUTPUT TABLES MODULE 1 ********************SOFIP308 + DO 900 NTBL=1,NTABLS SOFIP309 + WRITE(6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, SOFIP310 + $XAMNIM SOFIP311 + GO TO (710,700,730,720),ISWTCH SOFIP312 +C *** COMPOSITE ORBIT SPECTRUM AND EXPOSURE INDEX SOFIP313 + 700 WRITE (6,701) (TYPLBL(K,ITYPE),K=1,3),ENERGY(NRGYLV,ITYPE), SOFIP314 + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),FIRNGS(N), SOFIP315 + $FIRNGS(N+1),EXPTIM(N),EXPFLX(N),N=1,10),(ENERGY(N,ITYPE),AIFLXS(N)SOFIP316 + $,DIFFLX(N),DIFSPC(N),N=11,30) SOFIP317 + 701 FORMAT ('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', SOFIP318 + $T18,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),T80,'** EXPOSURE SOFIP319 + $INDEX:ENERGY>',G9.2,T112,'MEV **'/'0',T18,'ENERGY AVERAGED SOFIP320 + $ DIFFERENCE AVERAGED DIFFE- INTENSITY EXPOSURE TOSOFIP321 + $TAL # OF'/' ',T18,'LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTISOFIP322 + $AL FLUX',10X,'RANGES DURATION ACCUMULATED'/' ',T18,'>(MEV) SOFIP323 + $ #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV #/CM**2/SECSOFIP324 + $ (HOURS) PARTICLES'/'0',T18,0PG9.4,T23,' ',1PE9.3,7X, SOFIP325 + $1PE9.3,8X,1PE9.3,T81,2A4,T81,'ZERO FLUX',1X,0PF10.3,1X,1PE13.3/8('SOFIP326 + $ ',T18,0PG9.4,1PE9.3,7X,1PE9.3,8X,1PE9.3,T81,A4,'-',A4,1X,0PF10.3,SOFIP327 + $1X,1PE13.3/),' ',T18,0PG9.4,1PE9.3,7X,1PE9.3,8X,1PE9.3/' ',T81,2A4SOFIP328 + $,T81,' TOTAL',1X,0PF10.3,1X,1PE13.3,20(T18,0PG9.4,1PE9.3,7X, SOFIP329 + $1PE9.3,8X,1PE9.3/' ')) SOFIP330 + GO TO 750 SOFIP331 +C *** COMPOSITE ORBIT SPECTRUM ONLY SOFIP332 + 710 WRITE (6,702) (TYPLBL(K,ITYPE),K=1,3),(ENERGY(N,ITYPE),AIFLXS(N), SOFIP333 + $DIFFLX(N),DIFSPC(N),N=1,30) SOFIP334 + 702 FORMAT ('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', SOFIP335 + $T40,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*')/'0',T40,'ENERGY SOFIP336 + $ AVERAGED DIFFERENCE AVERAGED DIFFE-'/' ',T40,'LEVELS SOFIP337 + $ INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX'/' ',T40,'>(MEV) SOFIP338 + $ #/CM**2/SEC #/CM**2/SEC/DE #/CM**2/SEC/KEV'//30(' ',T41, SOFIP339 + $0PG9.4,T46,' ',1PE9.3,6X,1PE9.3,8X,1PE9.3/)) SOFIP340 + GO TO 750 SOFIP341 +C *** COMPOSITE ORBIT SPECTRUM WITH SOLAR PROTONS AND EXPOSURE INDEX SOFIP342 + 720 WRITE(6,703)(TYPLBL(K,ITYPE),K=1,3),IT,IQ,INALE,ENERGY(NRGYLV, SOFIP343 + $ITYPE),EXPFCT,(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRGSOFIP344 + $(N),F(N),FIRNGS(N),FIRNGS(N+1),EXPTIM(N),EXPFLX(N),N=1,10),(ENERGYSOFIP345 + $(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG(N),F(N),N=11,20), SOFIP346 + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),N=21,30) SOFIP347 + 703 FORMAT('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////'0', SOFIP348 + $62X,'**** SOLAR PROTONS ****'//63X,'FOR TAU=',I2,',Q=',I2,': NALE=SOFIP349 + $',I1/3X,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),5X,'WITH GEOMSOFIP350 + $AG SHIELDING',8X,'** EXPOSURE INDEX: ENERGY>',G9.4,T125,' MEV **'/SOFIP351 + $64X,'(EXPOSR FACTOR=',F4.2,')'//3X,'ENERGY AVERAGED DIFFSOFIP352 + $ERENCE AVERAGED DIFF- ENERGY TOTAL INTENSOFIP353 + $SITY EXPOSURE TOTAL # OF'/3X,'LEVELS INTEGRAL FLUX INTEGRASOFIP354 + $L FLUX RENTIAL FLUX LEVELS FLUENCE RANGESOFIP355 + $S DURATION ACCUMULATED'/3X,'>(MEV) #/CM**2/SEC #/CM**2/SOFIP356 + $SEC/DE #/CM**2/SEC/KEV >(MEV) #/CM**2 #/CM**2SOFIP357 + $/SEC (HOURS) PARTICLES'//T4,0PG9.4,T9,' ',1PE9.3,6X, SOFIP358 + $1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3,T95,2A4,T95,'ZERO FLUX', SOFIP359 + $0PF11.3,1PE14.3/8(T4,0PG9.4,T9,' ',1PE9.3,6X,1PE9.3,7X,1PE9.3SOFIP360 + $,11X,0PF4.0,7X,1PE9.3,9X,A4,'-',A4,0PF11.3,1PE14.3/),T4,0PG9.4,T9,SOFIP361 + $' ',1PE9.3,6X,1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3,T95,2A4, SOFIP362 + $T95,' TOTAL',0PF11.3,1PE14.3/10(T4,0PG9.4,T9,' ',1PE9.3,6XSOFIP363 + $,1PE9.3,7X,1PE9.3,11X,0PF4.0,7X,1PE9.3/),10(T4,0PG9.4,T9,' ',SOFIP364 + $1PE9.3,6X,1PE9.3,7X,1PE9.3/)) SOFIP365 + GO TO 750 SOFIP366 +C *** COMPOSITE ORBIT SPECTRUM WITH SOLAR PROTONS SOFIP367 + 730 WRITE(6,704)(TYPLBL(K,ITYPE),K=1,3),IT,IQ,INALE,EXPFCT,(ENERGY(N, SOFIP368 + $ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),SPNRG(N),F(N),N=1,20), SOFIP369 + $(ENERGY(N,ITYPE),AIFLXS(N),DIFFLX(N),DIFSPC(N),N=21,30) SOFIP370 + 704 FORMAT('+',41X,16('*'),3X,3A4,2X,16('*')/' ',41X,49('*')////T93, SOFIP371 + $'**** SOLAR PROTONS ****'//T93,'FOR TAU=',I2,',Q=',I2,': NALE=', SOFIP372 + $I1/19X,15('*'),' COMPOSITE ORBIT SPECTRUM ',15('*'),18X,'WITH GEOMSOFIP373 + $AG SHIELDING'/T94,'(EXPOSR FACTOR=',F4.2,')'//19X,'ENERGY AVERSOFIP374 + $AGED DIFFERENCE AVERAGED DIFF-',20X,'ENERGY TOTAL'SOFIP375 + $/19X,'LEVELS INTEGRAL FLUX INTEGRAL FLUX RENTIAL FLUX',22X, SOFIP376 + $'LEVELS FLUENCE'/19X,'>(MEV) #/CM**2/SEC #/CM**2/SEC/DE SOFIP377 + $ #/CM**2/SEC/KEV',20X,'>(MEV) #/CM**2'//20(T20,0PG9.4,T25,' SOFIP378 + $ ',1PE9.3,6X,1PE9.3,7X,1PE9.3,24X,0PF4.0,7X,1PE9.3/),10(T20, SOFIP379 + $0PG9.4,T25,' ',1PE9.3,6X,1PE9.3,7X,1PE9.3/)) SOFIP380 + 750 CONTINUE SOFIP381 +C *** ******************** OUTPUT TABLES MODULE 2 ********************SOFIP382 +C *** PEAK AND TOTAL FLUXES PER PERIOD SOFIP383 + WRITE(6,2) MODEL,MODLBL,BLTIME,NAME,INCL,IPRG,IAPG,ITAPE,PERIOD, SOFIP384 + $XAMNIM SOFIP385 + WRITE(6,801)(TYPLBL(K,ITYPE),K=1,3),ENERGY(NRGYLV,ITYPE), SOFIP386 + $(N,(PKVALU(N,K),K=1,8),N=1,NRBITO) SOFIP387 + 801 FORMAT( '+',T35,24('*'),3X,3A4,2X,27('*')/' ',T35, SOFIP388 + $'** TABLE OF PEAK AND TOTAL FLUXES PER PERIOD : ENERGY >',G9.2,T97SOFIP389 + $, 'MEV **'/' ',T35,68('*')//'0',13X,'PERIOD PEAK FLUX POSOFIP390 + $SITION AT WHICH ENCOUNTERED ORBIT TIME FIELD(B) LINE(L) SOFIP391 + $ TOTAL FLUX'/' ',13X,'NUMBER ENCOUNTERED LONGITUDE LATITUDSOFIP392 + $E ALTITUDE',41X,'PER ORBIT'/ ' ',23X,'#/CM**2/SEC ',2(5X,'(DEG)'SOFIP393 + $),6X,'(KM)',7X,'(HOURS)',6X,'(GAUSS) (E.R.) #/CM**2/ORBIT'SOFIP394 + $//(' ',14X,I4,1PE14.3,0PF13.3,F10.2,F12.2,F13.5,F12.5,F10.2,1PE15.SOFIP395 + $3)) SOFIP396 +C *** ***************** BLOCK 6: PROGRAM TERMINATION *****************SOFIP397 + 900 CONTINUE SOFIP398 + GO TO 10 SOFIP399 + 999 STOP SOFIP400 + END SOFIP401 +C *** *************** DIFFERENTIAL SPECTRUM SUBROUTINE ***************DFSPC002 +C *** CALCULATES FIRST DERIVATIVES OF INPUT SPECTRUM DEFINED BY FF VS XXDFSPC004 +C *** INPUT: XX - 30 INTEGRAL THRESHOLD ENERGIES, IN MEV (R*4)DFSPC006 +C *** FF - ALOG OF THE INTEGRAL FLUXES FOR THE 30 ENERGY (R*4)DFSPC008 +C *** LEVELS, IN PARTICLES/CM**2/SEC DFSPC010 +C *** OUTPUT: DD - DIFFERENTIAL FLUXES OBTAINED FROM THE INTEGRAL (R*4)DFSPC012 +C *** FLUXES, IN PARTICLES/CM**2/SEC/KEV DFSPC014 +C *** ******************************************************************DFSPC016 +C *** THIS IS A MODIFIED VERSION OF A PROGRAM (DCS1FU) OBTAINED FROM DFSPC018 +C *** IMSL LIBRARY 1: AUTHOR/IMPLEMENTOR - C.L.SMITH DFSPC020 +C *** ******************************************************************DFSPC022 + SUBROUTINE DSPCTR(FF,XX,DD) DFSPC024 + IMPLICIT REAL*8(A-H,O-Z) DFSPC026 + REAL*4 DD,FF,XX DFSPC028 + DIMENSION F(30),X(30),D(30),H(500),FF(30) ,XX(30) ,DD(30) DFSPC030 + DATA EPSLN,OMEGA/1.D-6,1.0717968D0/ DFSPC032 +C *** DATA INITIALIZATION DFSPC034 + M=0 DFSPC036 + DO 5 L=1,30 DFSPC038 + 5 DD(L)=0.0 DFSPC040 +C *** DETERMINE SIZE OF ARRAY: OBTAIN M & K INDICES DFSPC042 +C *** M = # OF NONZERO FLUXES - 1; K = # OF NONZERO FLUXES DFSPC044 + DO 10 K=1,30 DFSPC046 + IF(FF(K).EQ.0.) GO TO 15 DFSPC048 + M=K-1 DFSPC050 + F(K)=FF(K)+ALOG(1000.) DFSPC052 + X(K)=XX(K)*1000.D0 DFSPC054 + 10 D(K)=X(K) DFSPC056 + 15 K=M+1 DFSPC058 + IF(K.LT.10) GO TO 170 DFSPC060 +C *** SMOOTHING INTEGRAL FLUX DFSPC062 + CALL SMOOTH(X,F,M) DFSPC064 +C *** CALCULATE SECOND DERIVATIVES USING CENTRAL DIFFERENCES DFSPC066 + DO 30 I=1,M DFSPC068 + H(I)=X(I+1)-X(I) DFSPC070 + 30 H(K +I)=(F(I+1)-F(I))/H(I) DFSPC072 + DO 40 I=2,M DFSPC074 + H(2*K+I)=H(I-1)+H(I) DFSPC076 + H(3*K+I)=.5*H(I-1)/H (2*K+I) DFSPC078 + H(4*K+I)=(H(K+I)-H(K+I-1))/H(2*K+I) DFSPC080 + H(5*K+I)=H(4*K+I)+H(4*K+I) DFSPC082 + 40 H(6*K+I)=H(5*K+I)+H(4*K+I) DFSPC084 + H(5*K+1)=0. DFSPC086 + H(6*K)=0. DFSPC088 +C *** BEGIN ITERATION ON SECOND DERIVATIVES DFSPC090 + KCOUNT=0 DFSPC092 + 50 ETA=0. DFSPC094 + KCOUNT=KCOUNT+1 DFSPC096 + DO 70 I=2,M DFSPC098 + W=(H(6*K+I)-H(3*K+I)*H(5*K+I-1)-(.5-H(3*K+I))*H(5*K+I+1)-H(5*K+DFSPC100 + $ I)*OMEGA) DFSPC102 + IF (DABS(W).LE.ETA) GO TO 60 DFSPC104 + ETA=DABS(W) DFSPC106 + 60 H(5*K+I)=H(5*K+I)+W DFSPC108 + 70 CONTINUE DFSPC110 + IF(KCOUNT.GT.5*K)GO TO 170 DFSPC112 + IF (ETA.GE.EPSLN) GO TO 50 DFSPC114 +C *** CONVERGENCE OBTAINED DFSPC116 + DO 80 I=1,M DFSPC118 + 80 H(7*K+I)=(H(5*K+1+I)-H(5*K+I))/H(I) DFSPC120 + DO 140 J=1,K DFSPC122 + I=1 DFSPC124 + IF (D(J).EQ.X(1))GO TO 130 DFSPC126 + IF (D(J)-X(K )) 100,110,110 DFSPC128 + 90 IF (D(J)-X(I)) 120,130,100 DFSPC130 + 100 I=I+1 DFSPC132 + GO TO 90 DFSPC134 + 110 I=K DFSPC136 + 120 I=I-1 DFSPC138 +C *** COMPUTE D(J) DFSPC140 + 130 HT1=D(J)-X(I) DFSPC142 + HT2=D(J)-X(I+1) DFSPC144 + PROD=HT1*HT2 DFSPC146 + H(8*K+J)=H(5*K+I)+HT1*H(7*K+I) DFSPC148 + DELSQS=(H(5*K+I)+H(5*K+1+I)+H(8*K+J))/6. DFSPC150 + 140 D(J)=-(H(K +I)+(HT1+HT2)*DELSQS+PROD*H(7*K+I)*.1666667) DFSPC152 +C *** SMOOTHING DIFFERENTIAL FLUX DFSPC154 + CALL SMOOTH(X,D,M) DFSPC156 + DO 160 I=1,K DFSPC158 + F(I)=2.718281828D0**(F(I)-ALOG(1000.)) DFSPC160 + 160 DD(I) =D(I)*F(I) DFSPC162 + 170 RETURN DFSPC164 + END DFSPC166 +C DFSPC168 +C *** SMOOTH DATA BY 3-POINT AVERAGING OVER EQUAL INTERVALS DFSPC170 + SUBROUTINE SMOOTH(X,F,M) DFSPC172 + IMPLICIT REAL*8(A-H,O-Z) DFSPC174 + DIMENSION X(30),F(30) DFSPC176 + FINTER(X1,X2,X3,Y1,Y2,Y3,XIN)=Y1*(XIN-X2)*(XIN-X3)/ DFSPC178 + $((X1-X2)*(X1-X3)) + Y2*(XIN-X1)*(XIN-X3)/((X2-X1)*(X2-X3)) DFSPC180 + $ + Y3*(XIN-X1)*(XIN-X2)/((X3-X1)*(X3-X2)) DFSPC182 +C DFSPC184 + FI = F(1) DFSPC186 + DO 20 I=2,M DFSPC188 + SIZE1 = X(I) - X(I-1) DFSPC190 + SIZE2 = X(I+1) - X(I) DFSPC192 +C *** CHECK FOR EQUAL STEPSIZES DFSPC194 + IF(DABS(SIZE1-SIZE2).LT.0.001) GO TO 200 DFSPC196 + IF(SIZE2.GT.SIZE1) GO TO 210 DFSPC198 +C *** STEPSIZE DECREASES - FIT CURVE AND INTERPOLATE BACKWARD DFSPC200 + F2 = F(I+1) DFSPC202 + XINTER = X(I) - SIZE2 DFSPC204 + F1 = FINTER(X(I-1),X(I),X(I+1),FI,F(I),F2,XINTER) DFSPC206 + GO TO 300 DFSPC208 +C *** STEPSIZE INCREASES - FIT CURVE AND INTERPOLATE FORWARD DFSPC210 + 210 F1 = FI DFSPC212 + XINTER = X(I) + SIZE1 DFSPC214 + F2 = FINTER(X(I-1),X(I),X(I+1),F1,F(I),F(I+1),XINTER) DFSPC216 + GO TO 300 DFSPC218 +C *** STEPSIZES ARE EQUAL - AVERAGE OVER EXISTING VALUES DFSPC220 + 200 F1 = FI DFSPC222 + F2 = F(I+1) DFSPC224 +C DFSPC226 +C *** PERFORM AVERAGING DFSPC228 + 300 FNEW = (F1+2.0*F(I)+F2)/4. DFSPC230 + FI = F(I) DFSPC232 + F(I) = FNEW DFSPC234 + 20 CONTINUE DFSPC236 + RETURN DFSPC238 + END DFSPC240 + SUBROUTINE SOLPRO(TAU,IQ,F,INALE) SOLPR010 +C *** MODIFIED 9/77 TO RETURN INALE(# OF AL EVENTS) TO CALLING PROGRAM SOLPR020 +C *** INTERPLANETARY SOLAR PROTON FLUX AT 1 AU (FROM E>10 TO E>200 MEV SOLPR030 +C *** FOR ANOMALOUSLY LARGE (AL) EVENTS AND FROM E>10 TO E>100 MEV FOR SOLPR040 +C *** ORDINARY (OR) EVENTS) SOLPR050 +C *** SINGLE PRECISION DECK IN STANDARD FORTRAN IV FOR IBM 360 MACHINES SOLPR060 +C *** (EBCDIC, 029 PUNCH) OR OTHER COMPATIBLE SYSTEMS. SOLPR070 +C *** PROGRAM DESIGNED AND TESTED BY E.G. STASSINOPOULOS, CODE 601, SOLPR080 +C *** NASA GODDARD SPACE FLIGHT CENTER, GREENBELT, MARYLAND 20771 . SOLPR090 +C ********************************************************************* SOLPR100 +C **** INPUT: TAU MISSION DURATION IN MONTHS (REAL*4) SOLPR110 +C **** IQ CONFIDENCE LEVEL THAT CALCULATED FLUENCE F(N) SOLPR120 +C **** WILL NOT BE EXCEEDED (INTEGER*4) SOLPR130 +C **** OUTPUT: F(N) SPECTRUM OF INTEGRAL SOLAR PROTON FLUENCE FOR SOLPR140 +C **** ENERGIES E>10*N (1=10*N (1=lfN{cJ6lo03|Ns1OFvYjz)&=gfgy{Lfnnz?1_n`x5hx@q94ebogy9@?_rTP_Xpp&Z#S9GKFb45q z=ED395(8ln|26{y!?{@u3}Orn4B1eBq0=Dq_1F;Rf%Jj&qnir~ACNc27%k1H(IhM7V(^ z85kH~?tU_hfx&=*fdQ2MKyoni@5~4B7#OC`U|`Ti>Jf>eHh#6fysG)Nwq4-<#c zuy7`p230K}^O(S;7Kk;9M?-+z5O7Q?E-6Y(F0oQj2+2rQaCh|&aCG)o$jMA9N-U~W z$jnR5DNRW&Rxq?waPtoe33BvPC@xJZ$}cU+%u6lSQ7Fk*NJ>>GEly2Q$jnnHODxLF zFD+ImE-6jPOf6O@$w(|w$jmFt&nZh)NKVX2F3m|S$;{6yR>)6ND9K1wNKehrO-#>A zEy+w)NXtyk0hK$(U5E0FlivF33nN0@;(9m#&bSTaa0lnVguTkejcYlA2Sj zkeHXEpI@X@^H8fviFDi$Yp{5!g-1rA0-lc_j)O zp6)?znjo_k3KEM;6f|7G{LH+P)S|q^94v0n%?G(gML;O8IW8mtiFuMpzl8LSZG>f`Dd?5d#Q zn^>t}qN8ABU|_1Lz{~5Ir%;lSS*%c&T2!2wpQi&34NxE`BW^qPpib6?ZQckKuei|>xEL}qb z6ytOhit{1q1f)ARF*6UE5FmcZ%P&_*ttd&&O97>(qWseI3M6M87b)cC7o{qsq?ROR<`nBF6sM*tC}fnB6j*eJqChDcsg8XQmgW>1CAU<|t?srIuxaf)SJo42<=SjPyay(bVJR<#qE9at-$na)HE% zD?CE{-4q-Hf;@c`jEumsV$91M0*a92{G6QBWKhNd8HSvsGK&=w6^c@eOLI!VQmJLB zMTt2Ir3L9liJ)u?&1U&UndzCJG+U6EoSm4Ss-uvS3i5FQCJ*-r{GzlP?TCwlv)f<4vBdRnR&V? zsRbn&3dnv2MP~s>08}6prRJn27N;s`cqQhQf(jN>um=q_bri}oOEMISGt=`j(=wA2 z^GXzwGZORCQ;R|63CIjcW&!ywIWZ>(l>duM5=&BZL6++&D1;WL78NTLXXKaWq$s2% z=4R$(CKhE@rGgS~ZgFZ(S!yxF3XoZOspSd~^T1_>LQ!cBs1QrcLrTawl?sU|S*67# zAQLi+6pHgpi;`0znMy|?u~?zFAT>ENEi*MmAt^N{zg$lN6icZJY56%h`Q;$@!8`!Y zD7lF#sj$3(5ghqxuoBmbmsi73Qy~~$wkm)!iw>gD%u5HkM*&3i69HK}ir&BIcKtfW$Q*B~x;KZb5z?C`L5Fwq!zb znR{wJC@mFbCMyKz=Oh;C`hv@PNNJv#tl$hvZ^fC3c?!w-y5M3Yu>=$!kq~?Gs zOK=nw>lY~mxjH-gIO`~sXJjU4C?w{9%DBXAaH1~B2N#;9dEf*F@?mLCVi7degOWKY zp`us^$|0F~pjsufEHzJ|GBvSCK_d~O9hM%7ON-JHlT#sOHpo42lfb!2AvrNmp(r&m zIYYr*AumKfH$Sf=15_4)Jf5rxc6WY3NoHUS={P zREj~REhr=sOH1-WH5w>~Rw@*yf-3#uOi;qlfaDxdzDZO_E6szKVjy1@C8lI1<|w3O z7MCREfgBGCCQy?BB$<+0mI>pr9zfA`@h5ex5=~ekv$V zN)%Enl2cPt6b$qX3>ET1^b|Ba^T06)&w9|x4b*hWNL45;C`c_*$jQvj1SNm4CHY05 zw2_~tfa&vMg^a`$P-ad_1qDJ*W^yK|rb8+aDnV(ps8~~nmsi6GB|E!#2H?)kkX!`K zH7S_|`8lZyC>}&)^1OV7ocz4>)FMzSN-Zb>Rg0+#C7C%T3W<5?IjIU|nTcS3V)4E9gU;mWKLz3JQ*} zRzprD*bzmk;9>*Ro&lx8{Jdf-1&vHiP*5XT2x~y5D!`lza%U1KzJfeq#7VG z4OC%*k}If{n+!>>`DxJnub`1%l95_eo>>eo%_gafWN56HQo+6CMW z(}lO|K($~=Mk=VvgEfj0i=bH$RH78?fYK6bF$B_+l2{2zEUDn43EDKxNL9#BDoM-) z`KT;0rxerx1cxrd-FOmEacVNC+{c=NjP&tl>-;=W4X#j}3C;~^nH8xi3J?dBCl({> zKT!J+6cFjD`6vOZqmZ0mRFqm=ke`#4vf`ghCnK`LNx|w+? zsRgNdDXDoSdc3?ECMZGg?&|OB=x(I|%MO_!W#C#XGfyG21k@ufDorjaEdmDuI9DPy z4nUo%JVdVy+Gf%PcX7eZT|}V^%I2VY91_=%stH;@L)@UFkW^X%ss%u4EmapOUm{`< zl-w#(2Ct zsO^aeG(AYe8(KPp0~yrCg4E@Z-Yclp1*$bs+Y8AV`NfcuA6gTE%bAQ+L>;Z*>F4L@ z>#Cpu&Af@lP!|OID&!Y|s#;Lppkbz|;HUuV(;ytB;N;erS<%35+bU>{la8Ck0AOVSq{4|B&jM7wv)Dnfn96g0-LrY7G zSa8||IUH0v!^W^c{18hs(7=jrUTO)vvjQ23f{#-{j794nTbhD8$(ClZpzH{$G*VJ? zK=}ySYG@Cv7&P<)YCI$+Czlo_CRgf!s;uNxh0GF#63ngwxGx5BS}~|2rBI%km!eRV zn5zKlh8Kg1HAt|5RCxNjDL7Rrz@rx23xW2hz#apQQh~e&@*OzTK-nUt2;8{<*Pcn0 z3IPflnI*8=vKZW31eHZ4iA5!#)QZwLRY=O$EzL^-<$PGJij*LcqgE5tS?0wDpshqJ z1qDZiVAl`@e>eEJV{oWbkbh{1r=M#uNKC=m-!~vM#4*Iv-!B-XF2uuCL4g-i3j4W+ zcseV%dAj{ zI}|X0pPquFogwm@ z>Jy@);OnAbWMFP?$ji&?si&ae=@$~@?-J?^iep~hAn?#4d~g|B0e~}vZb>Sr(NQ5FxT&Iu&8hgxFC`wJvPtVJ&0;O9}{wMuYqZepH7YF=4pQGOn%MGndOuyzt!sgaYJmksH$f$NKcoW#7; z5>Up;O-;!x%|(n!02j;P&OEr?my`Zmxod z7a>^y)B#IPE&+8DKxsNLxdfW$VD%QXp`s7Z4w=acNucgVVi72a6~N=>pwygMlv=D% z3hE7l#p*O;0XvE06Nh5FHop}IuYPJ3u@yPBo>vxdQ_kQNvX_B z%*|JT&K!X{eBfpz*i=Ze2dM(hV}LtNAniJ!$~C1l8PR%z*bT|tnaSV`kL5CF|ufd=0|gIDl@J!wdMVdAPMG9yZ6WlAsGM1`?JmQBo+7C~7xrym0d0PYIA5c$4A2c}$ng0XL zV1n5oibrl4U?+wmCVv#mR{|so*XM zl0Bf@0Uh85xdJ*ao1X?6QiF_|gU5$aJ6Os2c_l^ppix}#Kq{#B1{x#+*C3!`4^(*- zr6z-C&cIz4aG-*8C1&P9z#g=8vtSqRcs z3@OM!0S*8xgVg1z3MrW>3VHb@ywJIL=;#D^Z~|*yg*y?|?~s8BaNiS@ z|B6zJONuf3LenUPlHW?LFP0-^Q?I}nc1L; zkCJ@k3A~(2*klH@g_c$d8h8P9#1%jhS(I2@0v`26jA)<)W>I26W(sIJB^T6Hg0y^! zOAAtqic?ck6(CbL;MQ+`Ua>Ve1i;G-ic%AcL6g>*C9nbyR0bENrhw)>iu3cplh7sk zpkfy^0|pB4T=?KhPNg0%uOrBLWvO|fX>J8jg_obE0LccR=!5o5P=Y@bGIW8M0s@ta z(7CHza0!ky4hXUlZE!I^3Di6TWn0ihBq*ijDbWmv$q)3&W6-5;F7--GB2A68gl~GoscO3=#-nDf@4le26!?b z6tu9^msn7cnpgyG92S;lmZT~aM?Lvlvv2gBJOKN=?w33edP)nnF=3 zbifeOHcYKZ1iKDWXI2(~D=|>v4a!dGpn(W*^SLMyT=;@ZMQA$#T;f7!`N45rT2ug< z?kLGu0Hq+%NNEu`7p0^om4fHEGm8}R%Ry7ZpuP>L%uOuI&rAWwOMae0E@-kaJGB@R zp|CYcpvkVxymW~3z$0nkbq**23~uA(B!XI8;K~m^u$l(SvCzz==jI;-TB5=03F?0; zxVQ#82YCj7`k&x222Vd1&oEDyP)8pHq~Qo&US2~z1tbwGc#j)YH-knIp&fa*P(N^I z7NG#F(iyrm3fyieN`=(c&~Z6fPZYE=Mg!Im(8RL(2wK`IC}8iEgDpZM+~ITO*eB>U zKnnqo2g)I9k{~0W3ZPLK@QSeD5XTT#Ust~nD+L9pN6{=o=Q=z3_<-9Jps-QUh;R?~ z)rkZVQ6Rzz%y$9{IDteop{9EJ1%!qu1ULpc`nra=1_fIwD1eoMRe}^M=z?-3q$2?h zIHZ+e&?YK0pprqW4|GWgEvP5J3l`jieUZYYSV1E*4>G8tUaSD>31{jk1f|-V8JipG z87XAvYU(H`l!KOBfJ^WQ36`o1D*AQ%x>kSL!wrPU|Io{RvF-F7RW>@Y^WNeQwth-168iD z#YyO$n!FTP$A?f%fI3Ftrd47}3OL<^t4S=yLvc=ic@C^;23r#a>On!X1FV}y$ilRu z#9Z(+61<8~(16V5 zfGQG5!Ud1@gNA{06v|V<11AcQmPScFX!TxdQ7&kC14w-dyr-v2$U;!P4H}*YugnDL zMXWFaH|oH{Q_!vjyuXg<6hf*@q`6!|_US`9jo`8YRAGP`gsGsG6{7p71L~832A49^ zz@1}|tFR`Tl2pRU6uLeFWCkR#P-hgui$D=A1RcM5k2JV;$ZKH)MOvQiCHn1M1H zC|6>cQUMu;k#IqJKoan>16)>vd!mH=2<@LihIio|e3aRGP$S6_vVNf0O2N?5%v8?+ zG-Y6J0HwivLKYcXT0qrXfYlpXT0;4jV7`%o0hkZ+H)zeNo&oY2+sq=!atO$PVq#t; zA?v`=4Jskw5dmIf0tzKi<1P_2v{;f_1Ydy*Tha_t02(|6&E$fYOcX;_)`G-|u@f|m z22OO~xF}1^0WVZmuu<@gbaf0;uz{}Y1sR8wc1nvuBR&-+&?UjCDWJ*)856P^Il_=e z1i;q7*2TaV3oDdlK-MIKq#-NEEc6sS(;#lN0mU#O`#`hHAP?DrmNi2PZ)7Kc7e*x( z7nkOyrYNKqf*SPT$_dnl1|=tu6`%|XifA13F$mv7hgCDnQgbRH4QQm0gDz>v1oh<7 zL2D9oDq#zWQ@{&fL4HJW8p2>=ScC!s0G63l3a(?oJ!SA}ha%AW*VH0~+|ry9@cKVcGZHcm zl9HMX8ry(16+pHn=9FX-uEk1IQuP!<@)e2`%fKsYK*cR+wL8dau(y%AM~KEa>UdpA zQE47%ETWiT+Xv*X;?i8mf=tA!e(2yZs7;Kt)DxVqQ;Ul7i*PU9Bow6RtMnD19d>ZH z6tj&7?v!TcrGppq>nNn^rR#y_IrGv}b3n@hEX-pG_nbf_Dq=xANSmcWEU3F^gsuAr zN|vBSBaqGuwyqyF`+bCh3z9{l^CqBS0Yu*qsd=LTUgUyk%RmRXp$%+UcN@9Ght!pG z^;ggc(h2c!4RO>7@bJ`e3es_c@SFlXJfWR9EPXhIARW*YeTbuuLV$-Savu)bHpS{{ zcUOPpE|?X;6dDA|n9$m`%PN=_=Fk_Ti0T4yak zO#z&CL3Y45FXSecfLDa&rNCzGK(o1tpjEX+iA9;aWWa(d3-lpHsL!z0 z6ku1OkNP2&xKTbNF33_Ug(21$AQN5U?~lpdcduA zSls=6Du;oGvKg#0^i6YsAUNm zIRs6X6+rje5h_?H7*_<9XyDojb=)vFkx&v)NY8^bV!#7?py_Gwb|vVx4p1e4b(9hJ z7$HFmi^0QhX>zYJvtkVY|0LR$-~H2}L1fl>&Uo3Nk8J0LxdU#=3K(oW#*+8fp$Y7WeaF;6w%IgFG@|#D+i4d=cXp+DL__y zK$nI=>ql%gKPVnS76s;IerXZG zfjtF<+|0aE(AYmHNkewe>A-p;;Nd=NNCLvvTEH0+?!h4nAjjbgW!z2!2aSTRLTYkO zWH@brk! zCdZr{a6>#XDZeZg)X4>HYe%dl1P{Mv=7HyQ6Z4>3#X(ySFeWe+kQy$;&0QjCKM2k(o@FH$JWOim=$o8UD(c#0!PVFPwKXaEgqEKElsLPsG| zMKVGrYJwvm`kKv}7WRQmX6f}^=x*&sPq*@BI96^JMGDL|18+b!xMosdp0Qt-Y<}*aZBFA}zPNYs0 zBoSdNFrk41DmU_wmQrAvfba{^EQsqMMk9K|;8cec-q6GZDmKu^*pNyULd6i0Qjkf| z@ikPZdZsBTMA#aD+bEH?uwVm4MrJX1VJLh~%0NLu!^_41H2%kHh9i4Afp-N$LKZW7 zVjZynl`n{)%|z(3GH9*^PoRK$Oxby$HDfvXpi`j`!A491K{8(hGAV$(6Cct>18w{S zrACCw;IkHrAvu+(VgRHa6l&036UM3}XpCZOt$>RMNXRK@fHN1C(RCfC2py+L9j7SV z#RSB)urYR|3=47_BBSAQAyM8$PCOc*QH#X9Vv_TzQxI&F89KI%f2bSM>w~6<%si6a znWz9sH~B>+8Tsk?pb=z5R)#h?Aw6wS!xl240Gen7^AP8ZfxJ#kf&;08VekTUXw+jX zX<(76po>z@ppDKcK>Q9h2b7gbDip9Ttb&#eyym!aGI*acmYj@~i4oZaDU*SY)W&DBE+gaV`vA9{3w!ya6&fn*>-2wG)Is4ojW=?K=PK|L-4TYUme zLeS{Jox{N)s-OX`eBjxc_(?RdKIHL7oEaH9K!Vk+1i~7Ya1k^#^hwl*HDNCOUujyEeZz-q77;y_xC}|HWC%m!Mn$a z3r$d0m+;1}{4~%KNJLj3c0LAZfB~{D6SNvUu|yZ_72<3z%1j3BdxdT^0=XQqDiAb6 z1>TeoU-gGL(G8JPNEyHYI}D>HDYgPF&V(LV24aGStcx;}6~I&PIv^4Ff=3NsM|Vxo zS_;tNX~cOEp%;9H85P=+k z2j1nTiEBkO(grt(mr)i)5n~_J`9-P8rA6T5B1X|?L)@cNx(W)#pe4VERe$es^Tfq!1oNNnClpLS7oo#0SWM5DZ&}Zm19H(&m9yfq^1J!Pr#6 zL^r9j1e5}cGC^z6iopjVl4rURs_BN77MP|(gB27Qs2wxNT3Y!2Uf6yp&>qjk9MC`v zXbl`_HHHFc&o6Ao1hMxAQLGW?ctmVN2SdQ?8K8T%tf2GquKqeuRWx=s?tnTQ%@f&>$2%Z;nQPNci5zfKg0hyX=ZB#4Lt5qJihz(aLm)Yps1Q-W04P}k zR3IURKce{xwhXDrfTm9@d(KcY1xmul$P}K4kfvFtFf_!-6AB>U>xkGnh9zGpIKvK2 zBUDYm%5Qh1!|cH=cOplk5Mhjx3qUaeId}O=+m(l=dW6!^Z5?x@KcwfqIe7O5B|QKPN9Qb6)Kk;xblRA^}!#icY$!@Pz@ z*b_0NfdsV|BNbCrwnNe$O1Kj)U?52qz9|mey+n#ySmFg2^PmKdRF^>PbA`?p6V5x} zJ}1mTl5zti&_G2!C|W@cP0-$9oe1|}SI{nGSDh#ji>^gIB1=FT3}}m&(6%`fjt7)z zgK{8Q0%pD|QnY}|c4WU3nJGY_6bT|g;f0njK%olXmJLmxv}o`cW6u|$egkYZ9 z21rxSkaUVxawEBuxX^$meK>`h2T=F$gBQ)h(=5?>04cE0@&KrGfz+=w%m60XGXSJN z4Ye0F2auljks5@g?3sWx)e*@bw5A_4QUkhZ2(kMJIb&f@_@E?BAi9Z9@sNN475=Cl zV3Y!jzU?85RFAf`i5mT0l&*{ZHhpjzAeqmEP+{(2%3lom3`1j>6FYO#MM7e&;eX*BfyaI3gH6qssV67z@`*~ z40VExbb^d^JpBVgbOIcMeEnT?Tq8gyP3u4ooQ4{YWuF5se?pfhDd>WR>QGt~&@pc4 znTXJ%SMovEm>_}=x+oFhXao!7Mx-T8pwr(gz$+S4i$JFsg63|J)-fldpIVON5H#Ga zO7Q4EctJd;fHgAINk-|WA7{QgcBqh6?7F66$}k@p_60^iA6=AwWFXrn&80&IrSd> zutd-}D99>!fZ=pBB-+5?1lv9fo-2YJMh!Y)40I4RXe$ZmGyufOw%|K|V0(f<6YS6l zbR7kk;u74G?a&xU%sL>>u11RlOH)uJSenJ+2_{G~2Q9P(%@Ke+4LY^A0(zAjlGi{h zsbPnhYk;o(0$=h3&X6go#mPmWrL6gRAOmm)6eJNtj>iYZF!&rV=v89)X2BqN5Y3IK z%gLds5K(l2&R$7{TtuZnP4{6d{bA*Y!Zhf*TtxYZbOnV5>Tn4tZ6TF!1Og2bbm*j$ zz7s6m$g4znCo-a=ggzB#VAG?$2!tN&nqc{o>~B%1%mqxb zxC>!;SVETF1^a^cinw?Nfals2AaMt-1wgxO!Ry+g0YpTN2(A!8VG64cU4nI7gMvV- z`3cmA3Ro&ckSA~@X4py`P%{gC1rl^m503f}&+%z4!3w$xC8>F!TSLlH6^cReUJSk| z2GL^3%uB^r27)}Rpo@Cx735r>#FX63;^IuuVTRyS8St0_u9!iE6et0JRvSYLYLvPL zU)78__7g3k;tEc9s(>;enF+L29aOmBtg4~Yl%V6PK)Y%|cX7b3Dg~9wU?)Nrk3h{O z)_%kZOjs*xXd?=0C<;Zt${NL55C>8gK!Xml&XwHS8x&~7hLwT>_*y{7Itdrh!LL{< zbUYyj$?^)i;1U^BR*_b1qg9C|8L7lO929DZQcD3xeU9Gj2I+!eX!WA2fb4cqrU9P; zjvOCIwjeb*(A-Xv!*MtkT3BMM+>y&H_<^>sr>BCCyayLe(2KDW(HbP6Fo4&# zpsE+1q9A#jP%?o;8zRMl#$>>)Ti1vX*C0Pf9|idJs-Wyv3EGebT3V0L0qPKe&)6Yk zRY4KxUd~({$hIEHhD>n%3)-}pSC*fhngVIQLeKbyZjCh5HHLMxk+T3H+w#+(Srpu0 z2eqs);~qr>w9*W;&k4S!NWmo-+--wwM*?3P22N(MQ<7naBxfX+fz||pcD{nV0P>O! z5$(hz=z)mf1r*Tzuh7^9*SQLy1A}uxS0z9$u`E`Av`)aW1Fr7DM{^aVf{%sv#hr7@v7?c&jz6NJbf}R9<2ei{I zCBHN&Cp87s162Ush?fkyAOtk_0$$vco1d3olAi}Ux*B$(7AS#(tcK(XP`(GbwT$o< zcm?o*=AdJL%`uzq;IbE*)lpjQNDFO|TZZ6*4|LBP`05q#&Teo)Tda@+KI#!^%mjSp zHKZ*MyRCyj=oEu)Y$^urR)DS1g%z=2JHX4|!Ix{NLaqrc1zp0BTm-s1E-zgHe7AF6 zD(Gf)*w#4EB^!i_Tkus-(6k0~XHjZ8C@M6-`+|{fgUE+mx(>hTB2^Q7-Xz!^sTG;v zt4_cRvIuw-oL<01ASiD_Y=cDt^x}HNsa438Hn>{=jxz;~2v40zPn{@F9T(3aogg1i zU!5QW+@odig-%)u5pFt>ZaPtJIuQ{%k&!x4Q93@*Mh%v(120A;3AYzIj)uR}0BZTd zf)TXECQ}o$x$fc_1ZtzFq#`cpfyD%TMA1qiu^4pmwt|aikgcJf0ceOAlpVks0di0R zXrv0HFEvFWzX0qi=z0J6VgqD`6Kp&ax~B>pg&>JM&@LO$#W zfG%HG$jMKFrU`s@g1n#$_5<`HL#S)Pr$j;10aED?idzL;(26_QvS(00mV&b)$O-wS zpe_R_t>a6}=x07_LJr%<=T7(q6`<3pKv$xJF1JojRS2>JISDf!gA72?i0Zh^JW!S- z6v{e&NL@Js*5T~wVF?g2x_FQ(5OwDjwDFQylwL}x zegYlAfwXKI(%c3e`wd=mpQ?bpDGZ8baJx4be7z~e4FtjgbT0v@l>xdZGZFa`Zjd0z zK%{0hG#qk4H(n%xFE)a#)Gj7?vY`ejyTK-O0)lnGy(jn%GELAiAgM*EkW2|0_X8i| z2FjB<(9}r47of%!=JW!{3qh`qK3XOUC6xux`zb(v0$nWwk_55gjq76YNeV@&i8&ax zA0!jON$}BeNjad6I`Es@Km#@)T8ZVE3~k4ND-;8-VVu$pqgxhcE;dAc*c7>bwX62f}WGg%6A( zu7QOI999PUDXHM&PZdD-c@%)|2SmE!CKGg_TM}&U1DX|5^HLx#&n#8|-ID6X+zL^MIaFaYMy{@ErHzTo0^DunpYXfj2kci2~w7kd8Y9cRxY?0y&(3ZAhgIbdM0Y`v|)ECLems6~aNF?Rg3sCc5BbXf(ka z^&rD{h$9T)DUE==kSp4tJ%N!B<18MXM;8&1vol;6FU4x!_crKLr1~T2t`p3y5wK_!!c}G*G{RPz?uiB`EtQ!%rxJ=1L9J zWQ=H-fP)xZTm%H`C^&-%kSjqULLdOa2{|cM0e*uTbVd%evk-E}8|YHNq)KS6f|l>- zDI3n$FxFIX%mdxIg@5WCX|@GvE-bu;Fe{ zfx-inpuqF{;1Nd9tyYMWf8mWf0s)3J{t2xEL06f94mSli`@k3ZfDRl3MPPPnF=Wt@ zV6d5Jf^G$Xon8W}!a&(HIVZmuGzglhm#PO!WF@6VdBqAziOJcZyD1;V z7MCb!_~@2oXu{Gap`-@&0(d=0u|foBxen+!p(xPR?vRSAq$sl>C$$7LgrN}WrlSz$ zrl|lGOk$T6V6Ps`6QA$a))WLyba=7T*7J(nH4SrZFtN-#!b3qq#=chqux54&;T~e$78%?#ew1kvLpu|id5rEolrJ$MC z{5(itfEwgU`9+|-0!nC!3gwAK;N9`Lpyo$9sE{iz$VsdOU&h31Xn{E_2(lIVE_BEk zlpFGeV4$`dY?u!0c#u~ix2eL~f0=pU^=P20l1ob~I;KbfitX$pZR>Oj^a zFn(|6fG*NeNQBN!Lqi?B_ZNIoHE0Y0z9SZt9wKzXN1SQ|m*zolNCt&FbRRf;@DjhB zAafv{Q>YIhH`0R+ddnzHRY)ySNX*d#pR{ig3$8&Cg<^7k9^}d+_#8%NUUEKx;v^T8 zWWX&s@VX^veFf@nRpu6yD^AUWR9>KR1X5msvube(G;E+r8tP;MR)T#5P3oBI z6d>t9K|ujL5Q&^Z6f`3I;sacC!d!iHoT5B^-O!h2Lqb+7!q?p|KqnGRMuABe&)^Up zPZ!)nkP2XvL5K4}hJ8V?fCv=OrG6#(c?!^6l>$0^ucQ(@qyoCS7<{uh#BM~&BFF+A z=$2fX1iHW&bRAk|nnIYX59ow3=m;>9^`QF%Ve84jw&n#SYU(I}#wSU(Hq6z>hG02^ z>G&{LADp36T#yPXw6k;di#0)$VW3uMUTQkzUTJVm4eD`2>Ig#RGp5bpW(BBGtB{!o zxd#-K0251~QHE%6fIAHZMXBI238W@f0Vxbg4k+Y6hbC4`$KezKr%wf41*a;+3O`Wk z1xi>DhvHZeNV-+1%k*)Km}8u;1x`mnsjzuLY*XNv3ZQdVL5U4~G*7AmayV;%ovaBhB6C2UZ)kNz z$e9}XkjhLGmSiv;3{5A_SgsC)?tTV^F6MS=q@{l#1rQu!X%-JED8UB`7+PYltYM1a zYqDrnR}%^yq{DWpR5uf{5ngwL(imo3fcljwp#C>V8uzkXGf0I^$TC6|IvF)KAuB=d zM$M}_3a|C$I~r0uK^w!c3fm|EXu(rdt^bA@(!dwXn1W(ZY)gI}qXayklrpup2n zaL>t4O3Z=HU_d$*;G_&5{sWcm$fwqTqXt$LCubJtAWwegB^D__yQt8?7tlOfN@g1P zZub&!`?Itt3ETwDNi9pwDb`U?2mm+K^@0l$lT#IflQY3yFg8W5-R)m2@bjqOnAmG7?96}hbv{LX*Ey>7FDMmO4H2zbR3R(DL6zG|o>Ka;@fgEND>wjViCExs%RQMIR-~m6-NF#V^5Hgm7;Ub0P{5!X1NL6%;f; z_qahxT#x({_P(X|VlVJ0x>RV_`LVXGIl_5A>6%;)E6hb^agJHr7 zo*@dJ!3vJS!J)pcE(#$Yjv)%+t_t3Mpn!1&g;Risr?Y~yzkiU6r=Md8By=1V-2DAR z0{lJwLU^4O6hHyyh!j)`jv=69tQA}xgF-yigB5~9gWMdQT@@VtT)+YA3b6+istRuY zK?FWwn7!jdiYG9zL6B!AiqoN=*be)BUp@AlE zGH)^{dYnLWGDWGNv32Op(V*p)@L3APD(uWW1@J2DLLDL<@5EJv$ zK-E+#czXe;kOGgpfKIbU%1%hj6yT$#(4+jocl;J-fL7swmr(0LOod&y2wgG&8A6Az zmB3{WWVr{ZJ7i!8p6i3nH|ju4MY-}4Jfj4j`hx6W1KsVI2U>av+9ZoKeN>W>TB(o$ zyUi9nFb!!7K+FWW1ynzRB|zg8pe8DGA_Cl<(}!*zfX`qS>+!-`C-8uWxLF70UTE5O zadq?b10^n31=NHCPI&=At^uID2}&b~^bAUne!*`3LB5V5pi~s#806^d8sZuh3{Hwp zk&v+oSWXWPbqewi4FOpLnGUpq=coY3pb$^zP#?!21!u=#S5P*BtXOpfmmgr`K&c&c zkF>3!rKP!!0{8+DV^aeih0qWM(7iPZwhBguItsp?ehRhtFtY_B>w{J<7uL!4)L$Lj;Aq*4R)=%j;E21I!Gr-jggK%>>PUVKszLe@t&0m z%ifS(TN;L%w#Ir;PeX-_G;MW_4A2CPG1Zx9+Umk;SY+QC8fd~x22EZCLqoX#G}ILo z6oUOhF&^&e=b{kg=&KMAC2oGQUN z-l+;?s1d?(pyC`{c!Nvla8Dl}1t(WfCUJIkQE&_L_f>FI02llU;hrHLps9QJAV*Lg z;pn3Px@O5UB-F)K!NgR-#nnB?)fJM96u=qK$1wyVYYvySf+ucwSAQSJ5L1*_3eI4+YFHZR=|W7`)Y3CBG&eCdHiBIM6yf9VXA6?__d}8cwQWG! z{lZ*>LKK1nJY0i3ogIB3^=q(#r(cM_g0o{#h-jy@m`G^|kUgd}2LM|VHh5Pzt%6#V^MgVCHo+_@}ZM}X?j z-~dpy9tlo9pb`{OxFXC2Eebc(1DB4V8W)T;AO$C=q=qKL5Dx{UMhB$Kbye{54+`;c z4f0d)aP{>BJKGg>Nwp)WO{0Tqq=KVgh$qN?A0JmAg%E#m8i#n;(;3osftPfkRo=E{ z2I!9R@$~hCG;Bc51NkS&)g4r4fO3MTpF)tWnE_}mBRow9fmU^+Izz+9(a!~>6_$q} z`ODeS2UK%}xVk9#gBobA3J~8Y1lby*djuRp3Z8nddN8$U?JQ911**tDAOuwGLwI0P z1ET@x9{>t21+UQH5CumCmr!5dNKknPsRglF9`4~E?5Ysv=o9Ly;NtHZtl;M#qTuTo z65<+!l=_?@6*0IG2Ce`RQ4UVcpfGer8#%(cr30w>W(?b)up`Y#&=g9bb^)hF~3#7Knm|hEar$v74Em zktRGjI{WwsyF#mLSoP@Y=fVq5XJ}1*BS;YdZsvp9_I{8F7ijke+^ojzxggp#O5m7L z(o+ca^YQd{h2=GKsnAc1X6#2G`Kj1xaxzt6ndagbXHIZ&CAKm zPKAxp!2PNKx73&ax#-MOL8hfEooSH1Y%ZhE_^W^;&5Us zkl(0j*SXa?$`b8iIA4oiz+CVX2JtJ`;Em8!;WG^30M9 zP=J8Y>muJO$FF!47P3*?tTL(okB8+f?H-0 zXu~_`%1!9%Ivr48gBK)&c1x#1E*OAVj=bg<)O^xW0AB|T>25*BQ!@dUXcR`5O^xN?9s{K4HMPzT9C$3O?(Eq4W7 zzo3Aa(**Y$5yv_eBMd`sGAg)&1_p4p*FF6dkXr2O(Dq^ws36gTZNbn0w`?F;3X9P$ z!66DbG#Y_wC7c?;4f03@M?V(@rzjjIfU+m}G%!$`-kBFv2DpGX4uT^!C$R)_XQxJl zk7I}?I9fnQj=%-|{owQVkhBb11*QO6EC`{ZJzsdUz`$OhFbPwbMbZP+LO_ zP}&8h{9wq)2iQ^2^n;Y(Kx<-Qg(Q5bFm&ZGs2Ea!-K+t256nR*i-i$o7*d5D5Nr$Y z;epJx4fgcY2ndFiW1z*jw$A>+U?IrR4t$?4)++$O1rjI=fVbv?hA7}6g$RfcTW}8m z6du^x|F)ozL2CO$VjnbR2zFhFrWVLW5k4?Sf)2HW$$*@XkO3_x0Xshgl!`_h)(Sx* zuwe~Owjo8J2_I0xL}X$_f&>?x;MN=ZVkANhYZuP|;@Z?jnI(`~5i+>~%c0OQJJ9AM zc&pk7JeGu%Ns&jL6hIAd_^=a1DcZ1;f&!>z3~9w{80vsVN$@qJ4G=AKQrghGyu7>& zgB`FjFmQ4(Fx=r}VBq3nVBqFrVBq0mU^v9Zz;Kw0fkA?sfkBd+fuV$(fuWR}fuWU~ zfngpu1H*i71_nhQ1_o^&1_pa!1_l>l28P#C3=H3-7#JL+85q2z85q)}85jzs85kzW zFfja=VPIgCWnd7OWnj>iWnc)GWnjpVWnd_iWnlO&%fKKi$G{*a$G~7G$G{LG$G}i2 z$G|X8j)7s790P;AE(3$BE(1fjDFZ{XDFed}QwD}BrVI>sOc@xSn=&xGHf3P=WXizs z#gu`8*^Ggq-Hd@@wiyG%YBL4~A#(->Q*#CeTXP16P;&-`By$FaT5|@5esczfgXRnj z=gb)x_$?S1Y%CZUqAVB~qAeI0Vk{UKx-A$OE?Y1#+^}F^_;1C)@cr}aXAf^(1Htnr z&VN4m8H5jl>1&@saPMajJpcJTnBMz&@6NrScVdAIY+@P9GgufvG)Jf=0|Sp(#uWYo z3}zgSu^f#c9-FEzgDFR241@=ggYwwKGC*<+JfdJ4%HxF4rW}o&5R*(f8u^h`m~u3- zL1Y;CA+#w+qn#Eb$O2CWHU@^?MTK?W562}jZ51gvnB z7~Ubk!otAF$Oy`hx}ppWHlhp+wxSFS+r=0dc8D=BXiG3K=twXyp zlMDkxvkU`6iwpxps|*7}n+yX(y9@(EhYSNlrwju_mka|#w+sVAj|>AtuM7i2p9}*- zzYL^~zbM1Nz#t2$=Ottr7$jvG7%F5L7%F8M7^-9$7#7GfFf5d1V0a`u8vmeZ7!2_b ziVJ%=28J1O3=A{n7#L>BF)*x_V_;Y#$H2g<$iPsl$iPsh$iQ$!nStS`G6TbEbp{4* zP^(3gfnm8O1H%eU28LtW3=GG$85qQL85qQM85ksV85ksW85rDj85rDk85lft85lBk z85pv385pkWGBB9yjmH0AiGNUBSm-e@1nDs_1nV&{tk7d%SgFUrz^u=}P@~Vla9p2( z;esFlz;Ml&fx*LsfnmD|1A~q!1H)8P1_l;028If=(fA)M@ehiN&t?n^$>t0U=gk=y zax54aZdx!fcv>%maN3%I zLDPnTLCc1LA=ie1A|qhAFlT46ke%7((qB7{crr7^>_T7^>|? zhODh-{mQ^q? z_)leE2${;jFnbmQ!_rv{41bn0FtD#+V0g2JfkAv11B1ja28QUP3=E(?#m}!lzrOnl zAwl%JuaCYy`U>*-D5hozh(UVw&R#+c{$9)sfnLlEabC>ukp;x)0cb1%G{OL)A>$2V zpuD))j)7r`9RmZmJp)6XJp;ohdj^Iy2L^^44h#(LjtmSN92pokIx;YvbYx&S<;cLG z;l#i&&xwKIu@eKs6DI}+4QB=hO=kv%MrQ_wz0M2_`wz7z;M-_ zfx***fnk>i1B1RN1H(j528KzV3=ES!85mZ1GBB+6WMJU&VqmEDVqm!I#lUdSi-F<0 z7X!m@F9wDnZw7{7Zw7`H-V6+{y%`wZcr!4t`YlNXJE+jXJE+nXJAY>U?>k_V7MQ| zz~C0lz|bAcz|a%Sz;Gp)f#GT}1A}e|14CK}1H;u228Mu828Om!28Q-f28MH?3=HQ( z85rJ%GBCUgWnhpGV_;ASV_;AWV_AR5lVkQ>gxkQdIt zuqm8@VRJYGgHQwmgI5Ft!t!_z_31nfnh@e1H;Ay28K-u3=EeN7#J=mFff=UGB7Mp zWMH_Q$iQ$Vk%2)fX*B)^OZFxclZFs#jGV0e_v!0gfgvG}fnj$Z z1A}xv1A|OH14Cv$14C9m14D2AX#5YB_y@&BUp@oFzI+CT{rL8p{b04 z;d~hb!-X;i2AgsQhT?JthLUmyhCAg948j!*3?dZ_422a8467>`7}iuUFr2SoV7O4h zz@S{oz|dGZ8vlbO{y}lkRLQ{5T*<)DQpv!usFHzUaU}x-TNMLCSrr4r;VK4(BUKCx zcdHl}?o}}`C{!~rC{{BtSXVPJ*i|zyOsr;Lm{iTcaJia+;Yu|FgJcZ@gH#OzLvIZO z18*$@Luf4nLs%^X!+}}`2Fp4IhW0uJhK{lqk6 z)H5)AtY=^dYG7bE(ZIkU*~q{k)yTkL+sMFR*T}$--^jpF(8$1W2_)9Uz_7ZBf#G%& z1H+vr1_tkD28R933=GCC3=B(J7#PG`85nF^85rzZ85rza85p8k85p8lN8^96#6Ku5 z4z)5cn71)7tZrjqxZlRW@Su%>;d>hc!;dxw2D^3!hM0B+hS+unhSGKhhVpg>h7;`! z3@6(e7%V#&7}j<$Fg)*IV0h8Nz!2KWz%Zecfnj1N1H+$A1_rk-1_t*o28JzN3=C@B z3=E0g3=B!#3=F5bN8^96#6Ku5EPEIjih39rihCFsuJhJV0bx& zfgyY<1H<8|3=Bfk7#M`7F)*}FV_^6)je)^)Is=2(bOwe)(-{~{W-u@`%wS+>oWa2G za|Q!L$V>)?(3uPjVKW&Rs%J7V)XZdH_%M@!A!QZ=!y*L((s z^aTtIs~0dZtXaUoaB2Yq!|4SK3=9hy7#J6h#{Xc6e^6X7Eo5L|UdX_px{!fEZ6O0g z>p}*G?+Y0iQWh~VTwlb%pt6{OL3J?$gU(_G2HnLB40?+h7#tTfFgPt{V5nToz%Y9; z1H+uf3=DG@Gcash%)qd7F$06r5(b8%B@7J3OBfigEMZ`9TFSuSyp(~Vdnp4$&(hKO zA1v_?ii?{|85nLYWnlQcl!4*PQU-?5Wef~q%NQ7TEn{GKw~T?|{W1my*X0ZhGnX?k z%v#RCuwyv`!_MUl3@?{6FuYpM!0>uG1HL|D;O9)uV7&KvVwuZeI)}!)ymQM2Z6z`{s$Bn)hihouB>EW&|byB;IxW?!Fd$} z!|YWI4ChxdFkD#0z@W97fgxix14HI&28P3{85p?NFfj0}VPHsI!@#h24FkigH4F@| z*Fe?)zFWh<@L>%DgZ)|thQ7574ENSDFzBvhV9;O3z~Huyfx%-P1H;^Pqwzmj;vWP`sXjp>#b1!}0YD46+*-7>YMAFdW~&z`(eXfq{7=1B22=1_qUl z3=HKP85oXjWMKHek%57669a?LCI$w@O$-bMn-~~uHZd@GZen2Y-o(IAzlnjNVG{$x znoSH0?=~?o$ZTd{klQ>O|AQs|L2+TYnSsG=GXq29W(J1b%?u2An;95-HZw4s-ORvn zelr8Z+szCNB3l?3#I`Un*ll58$lAidkh6t>Veb|OhC5pr818LhV0gcUfq`Kw0|Vn$ z1_sxy3=Cac85p{^GBB*$%D`}HD+9xstqcsmwlXmM*~-A6w{0~32TS~e;=*7X14HdL z28Q}=3=EsMF)(c1#=vlO8w11jZ43-gwlOf6Z)af0+|Iy|wVi>XaytXVhV2Xto3=AB z?Ay-3z_5dX!EgrygYgaq28SIC47EEL7}o4yU|6??=V<&7miPz7Mg2|&hP68x81C$3VED05^}&Ta;V*xd{aal0895_U5%?Ap!1Ah?Ht!Ez4+gVi1e2Ae$$48?mG z7?$s0U|6|_f#EkuZZ89a^U|?8&fPrD<0S1OI2N)P6501wFV2OWF zTu2{eV9+?oz+iolfx+(}14F<;28RBF3=9(wGBB(=$iQ&yAOpjLgA5G64l*$C9AaSL zJH)`CcZh+(;1C0Y?I8w+35OUM4jp1(IDCkK;nE=n2F}9_4BUqq7{m`VFhm|^VCXu` zz|eD;fnnxh28L^g85mfPjK=?9iGNUBupePyP&mTCpmc3=FnM85jbOLiTvY9A#jLJ<7lkca(u49=hjiK>D-;Zz(7` zhZ+X${}{pAwa_raARO_`1qfR!Ht0jZVMZO zA45Jv5koFRB0~-X0|Th|k!5hwVs!SBV2Jl%WXbj5WGTo1sW0~6WGV6B#FlPd7#tlw z{a?u7!oUM6@j$8>#28!{QW?@15*bPvau`Y&6c_>+5*dmZ5*gCLWC244g93vaLq05#>~KAa*d6F zkrl?^V$NYm1PL=Sa5FG4XfR|ueEENnL4$z-ZZ136ECmK1hD?THu>DL(p^~td0d!~+ zAILNR|Ns9Fa?Nc<28KI~3=G^%3=BL>3=FwU3=GB03=AdA3=E~r3=H#`85kBYGcdTa zGBCKYGB9+pGB9+rGB6xrWnehU%E0i3je&uUoq>U!oq^#$I|Bm)2LnSSCj&ziCj-Mu zP6mcmoD2+NT#!@WKqrCe@-i^k@G>yi@-i@N=VM^l!Nk`Mz!vJeBq9w7#XA`u3LVi5+05)lT5QV|A*G7$!bauEiG z3K0f|N)ZNzDiH>TY7qv88W9GDS`h|@IuQnjdJzVO1`!5^MiB;vCJ_dPW)TL477+%9 zRuKkszezW7Kk!1EEHv6cqGceU@ykNFhh)iVWt=Z z!z?idhSg#W3~R&~7+5747)m7>7|J9W7>-CYFdUU;U|22Bz`(7@z`&!(z_47AfnkLr z1H&<828QFx3=Cqb3=HC`3=9&g3=ER03=D3n3=Hn73=AHs3=Em73=CPS3=CIQ85qpf z7#J+n7#M=o7#M=p7#LQlF)*xDV_;xbXJDvNXJ9z4&cJX&oq<6@gMpzygMpz?gMneH z1_Q%14F-l28Vn34H5eH5H5nKdX)-VfYcVjiYB4Z;(_&yq(`I0}rp>_Mp~JwiU59}| zN0)(NsxAWqiyi|*g&qULXFUdnWPJvP^ZE=7IR*?2Hw_pVJPjEb_82lSXd5vw%rRnM z;5TMqa5ZLNa5H9La5rXPNHvC>@^RXjfkD%RfkDfJfg#s~fg#U?f#IwP1B0C@1H)uf z28Jo73=FSK85ly%7#PCL7#OO|7#OO}7#J3tF)%DKV_@JmXJDu^XJGhb&cKicJ#o+7 zl7V4^B?H4oO9qCMmJAH1EEyOytQZ*PSurp?wqjs-V#UCq0XliYnt`Fwnt@@jH3P#w zYX$~E8wLh58wLh*8wQ4S8wQ398wQ3MHVh0iZ5SAMZ5bGJY#A69*fKDP*fB7)+A%PE zw_{*Pvu9wqYR|yn>A=9S%YlJG-;se~q9X&tBu55@$&L&Rs~i~^Ry#5<@HjCrR68*+ z+;w7LxaY*c@ZE`l;kOe5Ly$8AL$EUg!wP2xhS$yv3~!tn7+75x7@S=g80uXZ7`C}E zFuZhOU@&xLU@&rJUU}$z_U|8$Q!0^VEfg!?;fnl2)1H*PV28JDO z3=G%Z7#ME2F)-M>Gce@1Gce@3Gcc@mXJA<8&cN`@oq-|RgMne62LpqQCj*15Cj&#A zCj-MyPX>lvo(v2(JQ)~ndNMFDdoeJucrh@9dNDABc`-1AdoeJSc`-1QdoeKF_hMjh z^JZY^_GVz{@n&GS;?2Nt)tiAq*N1^2&4+>Est*H0fG-0>n=b=HyDtO7IbQ~b^S%rW zZ+#gU-uW^x$onxcDEKijDEculIQTIzIQlU#Ec0Vv5QXjp&huwr*yPW^u-Tu1K`4NM z!7G4)VNC!7!`c7_2F5@JhSER=hO$5ghADvz3{wLc7>))qFdPeHU^pJgz;Ggvf#G=| z1H+3z1_u8i28NSC3=B5G3=C_685kr(7#MOx7#Q+G7#JRhFfas%GBB(UWnkD4%E0g; zl!4)6CHARWcP z5E{k6us4cSm7|umAFr1HO zV0abH!0NMv9*k;uSsGLeBn zKZ${1b`k@_^&|#{8%Ycda>)z~^2rPgk;x1U+mjg>#8Vg;BvKd{GEx{AGE*2BdQun| zdQ%t}_NFi}>`P%_*q_3{a3F<&;eHAO!-EtC2K!V7hP9~-43AP77#^oGFsP<6FsP+5 zFeIcgFzilaV31B{V30{?V8~2oV8}{mVCYR}VCYL{VAz+=z_34^f#EhaR^~D=2OL*7?cYc z7#a&17@7(h7@7+i7+MM$7#0;WFf1-)U|=g^U??kMU^raFz;Fa<$Am&L1A}5Q1A}!j z1A|>L1H;5(28Kz+3=Efx85phJ~6$}iLl?)70l?)8F zl?)7al?)8|l?)68l?)7*Kw?!446Cac7;aZFFx;tPVDPSHVAx;Hz+ha%z_6r-fkC{M zfx)(xfx)hpfx*6(fg!4vfg!qkW zXJCk_XJCk}XJ9C;XJ9C=XJ9x{&%ki9o`J!#fq`Ld0|UeJ1_p)~4GavSjSLJE8W|WS zHZm~$X=GqT{0_BIBF(l!Q$mu(CTYV8aR>g@~+UF{4EhuRq!4!1Kf7bagN=yy;+Ii0WiuIMK<#;LyduP}If1@SuxeHU}&7c z!0>Yd14GC}28Pgy3=Clt85pW3GBDIkWMKF(k%1v)5(C4PNem3`lNlJYCo?eQOlDwc zp3K0|GMRy4-(&`c`;!?M9!zFnu$scauyG0l!wcvtzND!P47a8-Fi1>eV33@~z|cI6 zfuUs@1H)(NYChiS3=I6!85m-xGcd$WXJ9xmoq^%!bOwfB(-|1jXD~3Vp25JdW(EVp zsTm9mr)MxQFwA6NV4TUoz%-MAfq5nagX&BM2DO2wHUq<)*$fPGXEQKto6W$mb2bBm(i{ec zqB#r<#d8=KuFPRzaGJ}&;5?Usp?fX^L(g0WhMUk8XrJdYFnpQIzz{l*fgx-j1H-O) z3=Hq)F)+NJ$H3q^pMhcKdy<$MN)SMwPdUe9M>_&lG1;mdpm z295;`47>{%7*ZE7Ff=btr1H+po3=Hpr!oXm^l!2jdDFeg3r3?(Z%NQ8+moYH7En{Ht zSjNCGcNqi2n`I0Pw#yk9?3Xhz6fb9BC|%CLaC|ufgX{_hhT;_r498b6FfguUU|?R! zz@W5}fk9;@14H>r28LrR85sVrWME)i#lRr6ih)6K6$698Dh39dRSXQCs~8x(S1~Zu zuVP?mSjE7wW)%a&yHyMfGOHOFi81B1vK1_rS;3=DQ_7#OnFFfimmSAE=B!@zKF4FkjbH4F?4YZ(|A*D^4; zu4Q28TFb!Dy_SJt-C72QQ)?L*&a7o%__daS;m=wI2EBC*3lqj}tY=`@w4Q-s-+BfHh7Al1 zh8q|dj5jbaIBZ~GsNKN8ux0}T!@3O&3@0`)Fr3=Jz#zPlfx%!S1B1~<28N7{3=CNt z85rs}GBB*&$iQ%CBLl;ajSLJwH!?8rZem~%-^9Qmv5A2}Y7+y4;U)$K<4p_<{hJsV z9&BP@(Amtu5WAUyA#O7RL&9bThFzN(7zDR4Fj#J3V6fW4z+kh5fuVQ{1H`?POqhu#ioo?Q$Ke7hJJ^mZ{Y80=zTu-(PLFku%1 z!=YUa42O3yFkITjz`(hifq{EB1B3W(28PJp3=Cbn85nwYGce5D&A@PNHvu_;fdN$1Fc^S(v0|P@gNFf^o!vbLjhB_GrhDWjt4CbKwRzdfl+A%Qjx-u}-`!F!<3S?k# z2xDN#i(z1pN@8HxkjB7pBa4BdH=luFV=)6mVXDe7>XGfz;_RqGB7ZdF)%Qc zGcYhzFfcGwGB7YyF)%PxGcYjJFfcIGGB7aIF)%RHgF=XbfuWIsfuV_kfuWg!fuV(g zfuWUwfuRi=7ND?6Wnf_7XJGhX0TN?i`yc_j*_i`!yE7omx14F4HH_an0~b22b6*fTSN zGlAd-P;v!H|Njs25F0}kqbs8T10%zq#oU z463^!Sa&xAgYj<2rwrG5C^h$hF=~47^|wJ}}7-CWXKxC^a%M2!h$dU{VZBf^MZ|0^Li^z{DU9 z7U>mZV3;Vzz%U((PdG6!fUuqm0|N-(n#{m(7mBCNW?+~J#nlTK7(n>)dIpA@>lqmC zL9xzm1_quZ312|JW+PD?Q`bW1ZZ%#>zem?zD^uu__VVZAH^!wy*nhHQBT zh7x%O26iO|25uz=hAw3WhDpi{3_20 z85njMGBDgWWMH^&$iOh&h=F0I5d*`2BL)UmV+Mv;QwD}~Qw9cMGX@43GX{oN<_ruU z%o!L2EEpI>EEpIVtr!^itr!?)S}`!pv0`A@W5vL5(29ZKjWq+qS8E0aZW{&$ej5e` zeH#V_6B`DGAX^58Xj=vbV><>0D?0{;Iy(l2X3&-C_6!U?_6!UM>=_tN+A}aXIxsM} zJ1{V0I505eI503IyD%{1x-c+Ux-&4?x-&3%dN42qdoVEk@@8OQ@nK*v_Ge(Q@@HUB z4`N_22x4G(7sSBuIf#MbV=x25|6m4&g^>&lOCuQ=9>g#(Jc(go*c;Ela4?>MAs~r? zAufr5;dBxM!}%lzh6$+*4D(VM7_Ox z3=Fk-3=9o<3=F?Y7#RMSFff>au0$?nVDK(wVDK$vU`Q%sU`Q`xV8|_FU??bKU^r00 zz;LXBf#FjH1H;b>28OTI3=Ds(85jg=85l%CR~gqbFj&_zFc{V`FqqacFof1IFhtfd zFoZQTFhn#nFod@-FhsR5FkEb5V7S`C!0@$&f#GKh1A`Ih>flZW2K8PB2JK!3hPplm zhUPv7h9!Lr3@iE=7`FB^Fl_HaiVED0sf#J^r28Q5;3=B~V85qtkWMH_okb&XuLI#Eh3mF)M7BMi$En;Ah zU&O$mw1|Nrb`b+Z_96y`)r%Mywl88}*s+L#VfP{i2Ij>K41$Xp7~B>!FnBIzV3@j? zfno7t28I`l85lk^z+lYFz)&W@z)&H;z~Cy#z~CXs zz~C#yzz{FQz_3S%fnlEz1H(pf28KQ2h*E#GJOjffc?O1mstgQfY77irY77j^)EF3! zsxdH}M=HJ7s53BZQfFZJqRzm;puxc4t--+Huff3Jr^&z&sL8-^P?Le-s3rr0kro4k zxfTP%5-kRXHAtoWS8WD{-`a@M-CLJ|Ay}7zL0ON1L0yl5VY(gz!yG*Z1|fY02048O zh9-Rmh8BGWhIjf548Qal7`hD@82Stt7=9QqFfbZ2Fk~1qFccuw3SLGG48BGT40^^4 z42H%G3?Gac7=9WvFa((}Fl3uBFibFEV3=%zs4do+GBE5iWnkbmV_@JjV_?uUXJ9Zk zXJD9P&cLt+srG2GU|?vsU|{$LYR6bIFr->CFl1OFY7s7L1_m{21_oDa1_pm?L@l!4 zmVx0gQZ2H?j)7sB9Rq`yJp+TZJp)54v^M!-&%p4{9#Mx-$bqfHMO_finX`i!%emNoNLz^Ue$m=Uf;VuDUQVw7M}c z^tdrFq`EUOWVtgiNO~|ZNP93a%<*7gnD4>B@Y#cb;j0G&L!>7IL#!tQ!$eO8hRL1` z42oV13~F8s3{2h(3_RWp44K{x3_0Em4BNaJ7%q7;FvR*WFr@e}FtGSCFtGYEFx2}p zFtqqGFf8|1TipFAk~hE!3+%9!3+!+gBciZ1~V|& zg)lIX5c9Z?JnT~Q1SAEOu;K1VSy_(wA^L`EZO zVX;^S2E$kehDEUq3`=4e7+B&M7}(+%7*gUG81mv67+T^P82aKF7@o&7FuaXtV5m%B zV5m-DV7QsUz;HW(fk7*gfx#$|fnj$N1H-i>1_s7t1_qgA28Nzw28O<528K7u3=Hp* z85kT=7#O@#7#LDg85r_X85l05GB8|CWnkb+V_;BDV_=w)#=tNwje+4q8Uw?pGzJEj zbOr{$bVRNHFN1+WGLwO!E0cktCzFBURVD+&n@k1>(0QYJGnWKL#aSUj15Vb5d+hLg~~dDavLhTJI(3=gL;Fg%~az%Xel1H-hb z3=CY;7#Mh`AzE?Ur!g=boW{VQJ)MEUd^!We>gfy&Tcz_4T{1H-zR3=Cqk7#O5yF)%dGVqoZ*#lY}w76Zf2Squzuvl$r5XEQLg zLdONf<}fhG&S7A%o5R51Fo%I*?;Hk(qjMM-zRzJ`V3><&JF)*y3$G~uV9s|RJc?=9m^BEY@=QA+mEnr}1TEM{YYyktqCul2^c_9M>%R&YQ zwuKA~F$)XVPL3Q!ocum2?N91B@7HJmohMHS<1lRznp;~XgLEz@p1-+lI08x zrOO!@%9b-Q9AD1BaAG+FgX{_h2Duds48cDtY%=)Ud_N@zM6r-ZZ!jg&uRvS z;MEKa@v9ja(pEDtG_7V}=v>Xf(7T#}Va93(hR3TJ7+$SrV0gEhf#K(B1_rG)3=D>A z7#Qr=Ffe$nVPFtg%fKMJmVqH;EdxX1S_Xz`YZ(}3tYu($x0Zq7=UN5^_H_&leCrq( zrmbUO*tm{?Ve2{uhHdK@7z{TsFc@uMVA!;Qfnoaw1_p_Z3=Dc385qnqGB8+gWMHV; z$iPs$k%6IoBLhRqZ8K{~H+?ST`{+=xk@1T7`V1GFmP{Y zVBp!#z`(nmfx&1y1B3B)28QPC3=Cb{85mYh zx`Tm1ZU+NH$_@sG)Ex{AZ95nk+IKK8eA&Uk@O1|RgYixV2J@W^3~oCa7`%2eF!=3c zVDR6`z!0#Lfgx}w14I8#28Ibc85m~lWMG)JlY!ylP6mdnI~f>W?_^+jzmtK1br%Bz z=Pm{YzFiCq{JR(!x^^=#bnj+hVBN#Oz_y2hfqf4H1OFZd28BHg42pXg7%cWMFvRU) zV943Sz|gdZf#LWb28J_x7#LXgGBB|3Wnj?U%fMi;mw~}~F9U<;UIqrxI2t>HF~cYx z4TI4%Fq#HN(*UJu0My&B5@lf6Cd$AtON@bGjTi%ig&G4xxf%llzcB-YyDp0vH%70vH&U zM=~(nh-6?mAI-qvRFnpQM03KfhwMyPCfz-0%n-~}*HZd?LY=YDZ@$g!Km4TgsmKYRL zruqyFw)zYVq52FAN&1j+1JKw(uRa4qzdi%QL45{>bI@^wclrzrItC031_lfaMg|NF zHU6jfnj|Q5G0L|Av z1v#7nGUv2BgN1=3RFi>CRhMB3{{e>o4$KXV48NQhz_>$iEu#>F5SR_p1QG|)OrVK0 z5F=qP149C6cGiJ`;Xi0@mVuoilp&8Hn<0-OpP`%~4=f6@6r>u2A*w*CK~sIux#j-| zHpr3gViOq8FfcK(F|)F;GBLBXS1~AnCb(hdfGuKRUTzbsXD9{hOJyj6yPAPPiGhWo zkfTF_;ll+c28IkqkmHtnm83oLo~mZ(Q!C8iZL3SZ%MMVMw11KQ~gky+; zL_oS%sxV-kdKGguk{F5^N*Ib55*d;iN*Jsd6c`j3LKrd_QW+E&+!8PdS^W`F_!ynw}zL61R! z!4XV`FcdRXGNgmcj#O|Nmd_x>;Kz{3kPS9Hks%WtKA5VY#*s|@`_I6@%7{n}Fato@ z|3T~gPe1)L1XfSvV9-|Id=s>=Mt}*lNCuSu85lq--#|JSKnrpWMo@{sz+l420A4N; zzzCTNj$wpM27}5JQ2ANG2wGUcz%YdoV%7pi2Jixk1B?vd1qNpr8Nf>^ZZI-{mr*=n zWB{$jVferZTHwRL@B_RUhXGVzGk_Kya4>J55{okPON$kXOG;BRQ;QW!G7?J^GV{vvbIMW`k`r^1OLG!SGV}9_ z74p**N-`K2K<)t5BcSjEu|W$W{PYwY^%O#iE7KG6QuDGw3$8HKA?pE!m0x~QZek9^ zJg^y=+4(t%nJA`!%m?WMjn9MFps9FY*zyVmfAG=@h4B0$Q2F5ia!|%vHqep?FxxG@ z=;psej9|8u%Aut&c1tVIxsaobpfUlJ7C<7`H@*hNlj2gwGAut*OqaiRF0;3@? z8UmvsFd71*Aut*OqaiRF0z)GN@b&+huAaR*M^9Q{@^lUcZJnR%K>hy$Xx|*vCj^aQ zfHnbub`60x4S;t0fEN7sFff2OI80%HEI0?PFW_ciU|0ek?_gk9!@vOUw{L+is^7x^ z>E|C|fb{$Q8BzQ5JPe@4V8M?1?!j)((6I*47$c|;3L1q3(V+1#5Pd^}8$5;p3Vo2B z*l0Nc$oK_l$I<|g6YvN?yb9{JgMuz3vm_@Kyb}Wyz#zwu;?WQo4S~@R7!85Z5Eu=C z(GVC7fzc2c4S~@R7!85Z5THT`fV!EWIebvx88n9s>c@jRqM(IJp!sLeAqSw%|De7! zs2`5J`5&|b3v`eHXgvpL9v(D5Eeh?^gZ8_F=Al9BRiqdg7^E2(7-Se27-ShBbJ_9? z4B!P-iVUEYM+^+g3=9k^3=9ma3=9lv3=9m=J$4M53=9lf3=9m~3=9l93=9mq3=9l< z3=9nV3=9mQ@d!f(1_sa?6JrJj1``Gb22%zG1~Uc*26F}m2GD#sXyd*W0|SFK0|SE% z0|Nu-ECJBmw><*`18C0Mk%55$bnpjgT)~Bbfx(r5fx(S|fx(@Dfx&};fx(l3fx(M` zfx(-Bfx(A?fx#Cv7Qw*4;LpIo5Wv8|5Xiv55X1mFCcCFFwpC?mUadPhJXM6|Lz327&bC6Fl=IAVA#ySzyKOg+RDJdu#JI%VLJl@!wv=phMf!y47(T@7D1L*>- zlL}@iWyl4u7X__q^JK_lNMiuG3ABO~v|0_catybL8VpR})mxyln^^mAfQ$nb-V7l7 z(S1&udn};g53(DCK}Hk84?qf__A@eo)}!V!6fpQRB!SPQ0!b2&g&3F^K=#5gu{uGg zToJ35kUE&%AexX`TF8U!g<(?72c<%4mM1WGjM76R1Q;3q{b%L^ujT!ZUUq}pXjs<~ xD!Ak)m*%GCm4KIR`UZp67P{mogHM41vGri`dKL^{EH_azuaTO*N7dsG0RV+lYpwtQ literal 0 HcmV?d00001 diff --git a/Tsyganenko-Models/Geopack_2005.for b/Tsyganenko-Models/Geopack_2005.for new file mode 100644 index 0000000..e774c3c --- /dev/null +++ b/Tsyganenko-Models/Geopack_2005.for @@ -0,0 +1,1702 @@ +c
+c
+c          ##########################################################################
+c          #                                                                        #
+c          #                             GEOPACK-2005                               #
+c          #                     (MAIN SET OF FORTRAN CODES)                        #
+c          #                                                                        #
+c          ##########################################################################
+C
+c
+c  This collection of subroutines is a result of several upgrades of the original package
+c  written by N. A. Tsyganenko in 1978-1979. This version is dated May 04, 2005. On that
+c  date, the IGRF coefficients were updated according to the recently published table of
+c  IGRF-10 coefficients, so that the main field model now extends through 2010 (a linear
+c  extrapolation is used for 2005 - 2010, based on the table of secular velocities). For
+c  more details, see  http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html (revision of 03/22/2005).
+c
+c
+c  Prefatory notes to the version of April 22, 2003:
+c
+c  This package represents an in-depth revision of the previous version, with significant
+c  changes in the format of calling statements. Users should familiarize themselves with
+c  the new formats and rules, and accordingly adjust their source codes, as specified
+c  below. Please consult the documentation file geopack-2005.doc (also available from this
+c  site) for detailed descriptions of individual subroutines.
+c
+c  The following changes were made to the previous release of GEOPACK (of Jan 5, 2001).
+c
+c (1) Subroutine IGRF, calculating the Earth's main field:
+
+c   (a) Two versions of this subroutine are provided here. In the first one (IGRF_GSM)
+c     both input (position) and output (field components) are in the Geocentric Solar-
+c     Magnetospheric Cartesian coordinates, while the second one (IGRF_GEO) uses sphe-
+c     rical geographical (geocentric) coordinates, as in the older releases.
+
+c   (b) updating of all expansion coefficients is now made separately in the s/r RECALC,
+c     which also takes into account the secular change of the coefficients within
+c     a given year (at the Earth's surface, the rate of the change can reach 7 nT/month).
+
+c   (c) the optimal length of spherical harmonic expansions is now automatically set
+c     inside the code, based on the radial distance, so that the deviation from the
+c     full-length approximation does not exceed 0.01 nT. (In the previous versions,
+c     the upper limit NM of the order of harmonics had to be specified by users),
+c
+c  (2) Subroutine DIP, calculating the Earth's field in the dipole approximation:
+
+c   (a) no longer accepts the tilt angle via the list of formal parameters. Instead,
+c     the sine SPS and cosine CPS of that angle are now forwarded into DIP via the
+c     first common block /GEOPACK1/.  Accordingly, there are two options: (i) to
+c     calculate SPS and CPS by calling RECALC before calling DIP, or (ii) to specify
+c     them explicitly. In the last case, SPS and CPS should be specified AFTER the
+c     invocation of RECALC (otherwise they will be overridden by those returned by
+c     RECALC).
+
+c   (b) the Earth's dipole moment is now calculated by RECALC, based on the table of
+c     the IGRF coefficients and their secular variation rates, for a given year and
+c     the day of the year, and the obtained value of the moment is forwarded into DIP
+c     via the second common block /GEOPACK2/. (In the previous versions, only a single
+c     fixed value was provided for the geodipole moment, corresponding to the most
+c     recent epoch).
+c
+c  (3) Subroutine RECALC now consolidates in one module all calculations needed to
+c     initialize and update the values of coefficients and quantities that vary in
+c     time, either due to secular changes of the main geomagnetic field or as a result
+c     of Earth's diurnal rotation and orbital motion around Sun. That allowed us to
+c     simplify the codes and make them more compiler-independent.
+c
+c  (4) Subroutine GEOMAG is now identical in its structure to other coordinate trans-
+c     formation subroutines. It no longer invokes RECALC from within GEOMAG, but uses
+c     precalculated values of the rotation matrix elements, obtained by a separate
+c     external invocation of RECALC. This eliminates possible interference of the
+c     two subroutines in the old version of the package.
+c
+c  (5) Subroutine TRACE (and the subsidiary modules STEP and RHAND):
+c
+c   (a) no longer needs to specify the highest order of spherical harmonics in the
+c     main geomagnetic field expansion - it is now calculated automatically inside the
+c     IGRF_GSM (or IGRF_GEO) subroutine.
+c
+c   (b) the internal field model can now be explicitly chosen by specifying the para-
+c      meter INNAME (either IGRF_GSM or DIP).
+c
+c  (6) A new subroutine BCARSP was added, providing a conversion of Cartesian field
+c     components into spherical ones (operation, inverse to that performed by the sub-
+c     routine  BSPCAR).
+c
+c  (7) Two new subroutines were added, SHUETAL_MGNP and T96_MGNP, providing the position
+c     of the magnetopause, according to the model of Shue et al. [1998] and the one
+c     used in the T96 magnetospheric magnetic field model.
+c
+c
+c----------------------------------------------------------------------------------
+c
+      SUBROUTINE IGRF_GSM (XGSM,YGSM,ZGSM,HXGSM,HYGSM,HZGSM)
+c
+C  CALCULATES COMPONENTS OF THE MAIN (INTERNAL) GEOMAGNETIC FIELD IN THE GEOCENTRIC SOLAR
+C  MAGNETOSPHERIC COORDINATE SYSTEM, USING IAGA INTERNATIONAL GEOMAGNETIC REFERENCE MODEL
+C  COEFFICIENTS (e.g., http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html Revised: 22 March, 2005)
+c
+C
+C  BEFORE THE FIRST CALL OF THIS SUBROUTINE, OR IF THE DATE/TIME (IYEAR,IDAY,IHOUR,MIN,ISEC)
+C  WAS CHANGED, THE MODEL COEFFICIENTS AND GEO-GSM ROTATION MATRIX ELEMENTS SHOULD BE UPDATED
+c  BY CALLING THE SUBROUTINE RECALC
+C
+C-----INPUT PARAMETERS:
+C
+C     XGSM,YGSM,ZGSM - CARTESIAN GSM COORDINATES (IN UNITS RE=6371.2 KM)
+C
+C-----OUTPUT PARAMETERS:
+C
+C     HXGSM,HYGSM,HZGSM - CARTESIAN GSM COMPONENTS OF THE MAIN GEOMAGNETIC FIELD IN NANOTESLA
+C
+C     LAST MODIFICATION:  MAY 4, 2005.
+C     THIS VERSION OF THE CODE ACCEPTS DATES FROM 1965 THROUGH 2010.
+c
+C     AUTHOR: N. A. TSYGANENKO
+C
+C
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+
+      DIMENSION A(14),B(14)
+
+      CALL GEOGSM (XGEO,YGEO,ZGEO,XGSM,YGSM,ZGSM,-1)
+      RHO2=XGEO**2+YGEO**2
+      R=SQRT(RHO2+ZGEO**2)
+      C=ZGEO/R
+      RHO=SQRT(RHO2)
+      S=RHO/R
+      IF (S.LT.1.E-5) THEN
+        CF=1.
+        SF=0.
+      ELSE
+        CF=XGEO/RHO
+        SF=YGEO/RHO
+      ENDIF
+C
+      PP=1./R
+      P=PP
+C
+C  IN THIS NEW VERSION, THE OPTIMAL VALUE OF THE PARAMETER NM (MAXIMAL ORDER OF THE SPHERICAL
+C    HARMONIC EXPANSION) IS NOT USER-PRESCRIBED, BUT CALCULATED INSIDE THE SUBROUTINE, BASED
+C      ON THE VALUE OF THE RADIAL DISTANCE R:
+C
+      IRP3=R+2
+      NM=3+30/IRP3
+      IF (NM.GT.13) NM=13
+
+      K=NM+1
+      DO 150 N=1,K
+         P=P*PP
+         A(N)=P
+150      B(N)=P*N
+
+      P=1.
+      D=0.
+      BBR=0.
+      BBT=0.
+      BBF=0.
+
+      DO 200 M=1,K
+         IF(M.EQ.1) GOTO 160
+         MM=M-1
+         W=X
+         X=W*CF+Y*SF
+         Y=Y*CF-W*SF
+         GOTO 170
+160      X=0.
+         Y=1.
+170      Q=P
+         Z=D
+         BI=0.
+         P2=0.
+         D2=0.
+         DO 190 N=M,K
+            AN=A(N)
+            MN=N*(N-1)/2+M
+            E=G(MN)
+            HH=H(MN)
+            W=E*Y+HH*X
+            BBR=BBR+B(N)*W*Q
+            BBT=BBT-AN*W*Z
+            IF(M.EQ.1) GOTO 180
+            QQ=Q
+            IF(S.LT.1.E-5) QQ=Z
+            BI=BI+AN*(E*X-HH*Y)*QQ
+180         XK=REC(MN)
+            DP=C*Z-S*Q-XK*D2
+            PM=C*Q-XK*P2
+            D2=Z
+            P2=Q
+            Z=DP
+190        Q=PM
+         D=S*D+C*P
+         P=S*P
+         IF(M.EQ.1) GOTO 200
+         BI=BI*MM
+         BBF=BBF+BI
+200   CONTINUE
+C
+      BR=BBR
+      BT=BBT
+      IF(S.LT.1.E-5) GOTO 210
+      BF=BBF/S
+      GOTO 211
+210   IF(C.LT.0.) BBF=-BBF
+      BF=BBF
+
+211   HE=BR*S+BT*C
+      HXGEO=HE*CF-BF*SF
+      HYGEO=HE*SF+BF*CF
+      HZGEO=BR*C-BT*S
+
+      CALL GEOGSM (HXGEO,HYGEO,HZGEO,HXGSM,HYGSM,HZGSM,1)
+
+      RETURN
+      END
+C
+c==========================================================================================
+C
+c
+      SUBROUTINE IGRF_GEO (R,THETA,PHI,BR,BTHETA,BPHI)
+c
+C  CALCULATES COMPONENTS OF THE MAIN (INTERNAL) GEOMAGNETIC FIELD IN THE SPHERICAL GEOGRAPHIC
+C  (GEOCENTRIC) COORDINATE SYSTEM, USING IAGA INTERNATIONAL GEOMAGNETIC REFERENCE MODEL
+C  COEFFICIENTS  (e.g., http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html, revised: 22 March, 2005)
+C
+C  BEFORE THE FIRST CALL OF THIS SUBROUTINE, OR IF THE DATE (IYEAR AND IDAY) WAS CHANGED,
+C  THE MODEL COEFFICIENTS SHOULD BE UPDATED BY CALLING THE SUBROUTINE RECALC
+C
+C-----INPUT PARAMETERS:
+C
+C   R, THETA, PHI - SPHERICAL GEOGRAPHIC (GEOCENTRIC) COORDINATES:
+C   RADIAL DISTANCE R IN UNITS RE=6371.2 KM, COLATITUDE THETA AND LONGITUDE PHI IN RADIANS
+C
+C-----OUTPUT PARAMETERS:
+C
+C     BR, BTHETA, BPHI - SPHERICAL COMPONENTS OF THE MAIN GEOMAGNETIC FIELD IN NANOTESLA
+C      (POSITIVE BR OUTWARD, BTHETA SOUTHWARD, BPHI EASTWARD)
+C
+C     LAST MODIFICATION:  MAY 4, 2005.
+C     THIS VERSION OF THE  CODE ACCEPTS DATES FROM 1965 THROUGH 2010.
+c
+C     AUTHOR: N. A. TSYGANENKO
+C
+C
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+
+      DIMENSION A(14),B(14)
+
+      C=COS(THETA)
+      S=SIN(THETA)
+      CF=COS(PHI)
+      SF=SIN(PHI)
+C
+      PP=1./R
+      P=PP
+C
+C  IN THIS NEW VERSION, THE OPTIMAL VALUE OF THE PARAMETER NM (MAXIMAL ORDER OF THE SPHERICAL
+C    HARMONIC EXPANSION) IS NOT USER-PRESCRIBED, BUT CALCULATED INSIDE THE SUBROUTINE, BASED
+C      ON THE VALUE OF THE RADIAL DISTANCE R:
+C
+      IRP3=R+2
+      NM=3+30/IRP3
+      IF (NM.GT.13) NM=13
+
+      K=NM+1
+      DO 150 N=1,K
+         P=P*PP
+         A(N)=P
+150      B(N)=P*N
+
+      P=1.
+      D=0.
+      BBR=0.
+      BBT=0.
+      BBF=0.
+
+      DO 200 M=1,K
+         IF(M.EQ.1) GOTO 160
+         MM=M-1
+         W=X
+         X=W*CF+Y*SF
+         Y=Y*CF-W*SF
+         GOTO 170
+160      X=0.
+         Y=1.
+170      Q=P
+         Z=D
+         BI=0.
+         P2=0.
+         D2=0.
+         DO 190 N=M,K
+            AN=A(N)
+            MN=N*(N-1)/2+M
+            E=G(MN)
+            HH=H(MN)
+            W=E*Y+HH*X
+            BBR=BBR+B(N)*W*Q
+            BBT=BBT-AN*W*Z
+            IF(M.EQ.1) GOTO 180
+            QQ=Q
+            IF(S.LT.1.E-5) QQ=Z
+            BI=BI+AN*(E*X-HH*Y)*QQ
+180         XK=REC(MN)
+            DP=C*Z-S*Q-XK*D2
+            PM=C*Q-XK*P2
+            D2=Z
+            P2=Q
+            Z=DP
+190        Q=PM
+         D=S*D+C*P
+         P=S*P
+         IF(M.EQ.1) GOTO 200
+         BI=BI*MM
+         BBF=BBF+BI
+200   CONTINUE
+C
+      BR=BBR
+      BTHETA=BBT
+      IF(S.LT.1.E-5) GOTO 210
+      BPHI=BBF/S
+      RETURN
+210   IF(C.LT.0.) BBF=-BBF
+      BPHI=BBF
+
+      RETURN
+      END
+C
+c==========================================================================================
+c
+       SUBROUTINE DIP (XGSM,YGSM,ZGSM,BXGSM,BYGSM,BZGSM)
+C
+C  CALCULATES GSM COMPONENTS OF A GEODIPOLE FIELD WITH THE DIPOLE MOMENT
+C  CORRESPONDING TO THE EPOCH, SPECIFIED BY CALLING SUBROUTINE RECALC (SHOULD BE
+C  INVOKED BEFORE THE FIRST USE OF THIS ONE AND IN CASE THE DATE/TIME WAS CHANGED).
+C
+C--INPUT PARAMETERS: XGSM,YGSM,ZGSM - GSM COORDINATES IN RE (1 RE = 6371.2 km)
+C
+C--OUTPUT PARAMETERS: BXGSM,BYGSM,BZGSM - FIELD COMPONENTS IN GSM SYSTEM, IN NANOTESLA.
+C
+C  LAST MODIFICATION: MAY 4, 2005
+C
+C  AUTHOR: N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ AAA(10),SPS,CPS,BBB(23)
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+
+      DIPMOM=SQRT(G(2)**2+G(3)**2+H(3)**2)
+
+      P=XGSM**2
+      U=ZGSM**2
+      V=3.*ZGSM*XGSM
+      T=YGSM**2
+      Q=DIPMOM/SQRT(P+T+U)**5
+      BXGSM=Q*((T+U-2.*P)*SPS-V*CPS)
+      BYGSM=-3.*YGSM*Q*(XGSM*SPS+ZGSM*CPS)
+      BZGSM=Q*((P+T-2.*U)*CPS-V*SPS)
+      RETURN
+      END
+
+C*******************************************************************
+c
+      SUBROUTINE SUN (IYEAR,IDAY,IHOUR,MIN,ISEC,GST,SLONG,SRASN,SDEC)
+C
+C  CALCULATES FOUR QUANTITIES NECESSARY FOR COORDINATE TRANSFORMATIONS
+C  WHICH DEPEND ON SUN POSITION (AND, HENCE, ON UNIVERSAL TIME AND SEASON)
+C
+C-------  INPUT PARAMETERS:
+C  IYR,IDAY,IHOUR,MIN,ISEC -  YEAR, DAY, AND UNIVERSAL TIME IN HOURS, MINUTES,
+C    AND SECONDS  (IDAY=1 CORRESPONDS TO JANUARY 1).
+C
+C-------  OUTPUT PARAMETERS:
+C  GST - GREENWICH MEAN SIDEREAL TIME, SLONG - LONGITUDE ALONG ECLIPTIC
+C  SRASN - RIGHT ASCENSION,  SDEC - DECLINATION  OF THE SUN (RADIANS)
+C  ORIGINAL VERSION OF THIS SUBROUTINE HAS BEEN COMPILED FROM:
+C  RUSSELL, C.T., COSMIC ELECTRODYNAMICS, 1971, V.2, PP.184-196.
+C
+C  LAST MODIFICATION:  MARCH 31, 2003 (ONLY SOME NOTATION CHANGES)
+C
+C     ORIGINAL VERSION WRITTEN BY:    Gilbert D. Mead
+C
+      DOUBLE PRECISION DJ,FDAY
+      DATA RAD/57.295779513/
+C
+      IF(IYEAR.LT.1901.OR.IYEAR.GT.2099) RETURN
+      FDAY=DFLOAT(IHOUR*3600+MIN*60+ISEC)/86400.D0
+      DJ=365*(IYEAR-1900)+(IYEAR-1901)/4+IDAY-0.5D0+FDAY
+      T=DJ/36525.
+      VL=DMOD(279.696678+0.9856473354*DJ,360.D0)
+      GST=DMOD(279.690983+.9856473354*DJ+360.*FDAY+180.,360.D0)/RAD
+      G=DMOD(358.475845+0.985600267*DJ,360.D0)/RAD
+      SLONG=(VL+(1.91946-0.004789*T)*SIN(G)+0.020094*SIN(2.*G))/RAD
+      IF(SLONG.GT.6.2831853) SLONG=SLONG-6.2831853
+      IF (SLONG.LT.0.) SLONG=SLONG+6.2831853
+      OBLIQ=(23.45229-0.0130125*T)/RAD
+      SOB=SIN(OBLIQ)
+      SLP=SLONG-9.924E-5
+C
+C   THE LAST CONSTANT IS A CORRECTION FOR THE ANGULAR ABERRATION  DUE TO
+C   THE ORBITAL MOTION OF THE EARTH
+C
+      SIND=SOB*SIN(SLP)
+      COSD=SQRT(1.-SIND**2)
+      SC=SIND/COSD
+      SDEC=ATAN(SC)
+      SRASN=3.141592654-ATAN2(COS(OBLIQ)/SOB*SC,-COS(SLP)/COSD)
+      RETURN
+      END
+C
+C================================================================================
+c
+      SUBROUTINE SPHCAR (R,THETA,PHI,X,Y,Z,J)
+C
+C   CONVERTS SPHERICAL COORDS INTO CARTESIAN ONES AND VICA VERSA
+C    (THETA AND PHI IN RADIANS).
+C
+C                  J>0            J<0
+C-----INPUT:   J,R,THETA,PHI     J,X,Y,Z
+C----OUTPUT:      X,Y,Z        R,THETA,PHI
+C
+C  NOTE: AT THE POLES (X=0 AND Y=0) WE ASSUME PHI=0 (WHEN CONVERTING
+C        FROM CARTESIAN TO SPHERICAL COORDS, I.E., FOR J<0)
+C
+C   LAST MOFIFICATION:  APRIL 1, 2003 (ONLY SOME NOTATION CHANGES AND MORE
+C                         COMMENTS ADDED)
+C
+C   AUTHOR:  N. A. TSYGANENKO
+C
+      IF(J.GT.0) GOTO 3
+      SQ=X**2+Y**2
+      R=SQRT(SQ+Z**2)
+      IF (SQ.NE.0.) GOTO 2
+      PHI=0.
+      IF (Z.LT.0.) GOTO 1
+      THETA=0.
+      RETURN
+  1   THETA=3.141592654
+      RETURN
+  2   SQ=SQRT(SQ)
+      PHI=ATAN2(Y,X)
+      THETA=ATAN2(SQ,Z)
+      IF (PHI.LT.0.) PHI=PHI+6.28318531
+      RETURN
+  3   SQ=R*SIN(THETA)
+      X=SQ*COS(PHI)
+      Y=SQ*SIN(PHI)
+      Z=R*COS(THETA)
+      RETURN
+      END
+C
+C===========================================================================
+c
+      SUBROUTINE BSPCAR (THETA,PHI,BR,BTHETA,BPHI,BX,BY,BZ)
+C
+C   CALCULATES CARTESIAN FIELD COMPONENTS FROM SPHERICAL ONES
+C-----INPUT:   THETA,PHI - SPHERICAL ANGLES OF THE POINT IN RADIANS
+C              BR,BTHETA,BPHI -  SPHERICAL COMPONENTS OF THE FIELD
+C-----OUTPUT:  BX,BY,BZ - CARTESIAN COMPONENTS OF THE FIELD
+C
+C   LAST MOFIFICATION:  APRIL 1, 2003 (ONLY SOME NOTATION CHANGES)
+C
+C   WRITTEN BY:  N. A. TSYGANENKO
+C
+      S=SIN(THETA)
+      C=COS(THETA)
+      SF=SIN(PHI)
+      CF=COS(PHI)
+      BE=BR*S+BTHETA*C
+      BX=BE*CF-BPHI*SF
+      BY=BE*SF+BPHI*CF
+      BZ=BR*C-BTHETA*S
+      RETURN
+      END
+c
+C==============================================================================
+C
+      SUBROUTINE BCARSP (X,Y,Z,BX,BY,BZ,BR,BTHETA,BPHI)
+C
+CALCULATES SPHERICAL FIELD COMPONENTS FROM THOSE IN CARTESIAN SYSTEM
+C
+C-----INPUT:   X,Y,Z  - CARTESIAN COMPONENTS OF THE POSITION VECTOR
+C              BX,BY,BZ - CARTESIAN COMPONENTS OF THE FIELD VECTOR
+C-----OUTPUT:  BR,BTHETA,BPHI - SPHERICAL COMPONENTS OF THE FIELD VECTOR
+C
+C  NOTE: AT THE POLES (THETA=0 OR THETA=PI) WE ASSUME PHI=0,
+C        AND HENCE BTHETA=BX, BPHI=BY
+C
+C   WRITTEN AND ADDED TO THIS PACKAGE:  APRIL 1, 2003,
+C   AUTHOR:   N. A. TSYGANENKO
+C
+      RHO2=X**2+Y**2
+      R=SQRT(RHO2+Z**2)
+      RHO=SQRT(RHO2)
+
+      IF (RHO.NE.0.) THEN
+        CPHI=X/RHO
+        SPHI=Y/RHO
+       ELSE
+        CPHI=1.
+        SPHI=0.
+      ENDIF
+
+      CT=Z/R
+      ST=RHO/R
+
+      BR=(X*BX+Y*BY+Z*BZ)/R
+      BTHETA=(BX*CPHI+BY*SPHI)*CT-BZ*ST
+      BPHI=BY*CPHI-BX*SPHI
+
+      RETURN
+      END
+C
+c=====================================================================================
+C
+      SUBROUTINE RECALC (IYEAR,IDAY,IHOUR,MIN,ISEC)
+C
+C  1. PREPARES ELEMENTS OF ROTATION MATRICES FOR TRANSFORMATIONS OF VECTORS BETWEEN
+C     SEVERAL COORDINATE SYSTEMS, MOST FREQUENTLY USED IN SPACE PHYSICS.
+C
+C  2. PREPARES COEFFICIENTS USED IN THE CALCULATION OF THE MAIN GEOMAGNETIC FIELD
+C      (IGRF MODEL)
+C
+C  THIS SUBROUTINE SHOULD BE INVOKED BEFORE USING THE FOLLOWING SUBROUTINES:
+C    IGRF_GEO, IGRF_GSM, DIP, GEOMAG, GEOGSM, MAGSM, SMGSM, GSMGSE, GEIGEO.
+C
+C  THERE IS NO NEED TO REPEATEDLY INVOKE RECALC, IF MULTIPLE CALCULATIONS ARE MADE
+C    FOR THE SAME DATE AND TIME.
+C
+C-----INPUT PARAMETERS:
+C
+C     IYEAR   -  YEAR NUMBER (FOUR DIGITS)
+C     IDAY  -  DAY OF YEAR (DAY 1 = JAN 1)
+C     IHOUR -  HOUR OF DAY (00 TO 23)
+C     MIN   -  MINUTE OF HOUR (00 TO 59)
+C     ISEC  -  SECONDS OF MINUTE (00 TO 59)
+C
+C-----OUTPUT PARAMETERS:   NONE (ALL OUTPUT QUANTITIES ARE PLACED
+C                         INTO THE COMMON BLOCKS /GEOPACK1/ AND /GEOPACK2/)
+C
+C    OTHER SUBROUTINES CALLED BY THIS ONE: SUN
+C
+C    AUTHOR:  N.A. TSYGANENKO
+C    DATE:    DEC.1, 1991
+C
+c    CORRECTION OF MAY 9, 2006:  INTERPOLATION OF THE COEFFICIENTS (BETWEEN
+C     LABELS 50 AND 105) IS NOW MADE THROUGH THE LAST ELEMENT OF THE ARRAYS
+C     G(105)  AND H(105) (PREVIOUSLY MADE ONLY THROUGH N=66, WHICH IN SOME
+C     CASES CAUSED RUNTIME ERRORS)
+c
+C    REVISION OF MAY 3, 2005:
+C     The table of IGRF coefficients was extended to include those for the epoch 2005
+c       the maximal order of spherical harmonics was also increased up to 13
+c         (for details, see http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html)
+c
+C    REVISION OF APRIL 3, 2003:
+c     The code now includes preparation of the model coefficients for the subroutines
+c       IGRF and GEOMAG. This eliminates the need for the SAVE statements, used in the
+c        old versions, making the codes easier and more compiler-independent.
+C
+      COMMON /GEOPACK1/ ST0,CT0,SL0,CL0,CTCL,STCL,CTSL,STSL,SFI,CFI,SPS,
+     * CPS,SHI,CHI,HI,PSI,XMUT,A11,A21,A31,A12,A22,A32,A13,A23,A33,DS3,
+     * CGST,SGST,BA(6)
+C
+C  THE COMMON BLOCK /GEOPACK1/ CONTAINS ELEMENTS OF THE ROTATION MATRICES AND OTHER
+C   PARAMETERS RELATED TO THE COORDINATE TRANSFORMATIONS PERFORMED BY THIS PACKAGE
+C
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+C
+C  THE COMMON BLOCK /GEOPACK2/ CONTAINS COEFFICIENTS OF THE IGRF FIELD MODEL, CALCULATED
+C    FOR A GIVEN YEAR AND DAY FROM THEIR STANDARD EPOCH VALUES. THE ARRAY REC CONTAINS
+C    COEFFICIENTS USED IN THE RECURSION RELATIONS FOR LEGENDRE ASSOCIATE POLYNOMIALS.
+C
+      DIMENSION G65(105),H65(105),G70(105),H70(105),G75(105),H75(105),
+     + G80(105),H80(105),G85(105),H85(105),G90(105),H90(105),G95(105),
+     + H95(105),G00(105),H00(105),G05(105),H05(105),DG05(45),DH05(45)
+c
+      DATA G65/0.,-30334.,-2119.,-1662.,2997.,1594.,1297.,-2038.,1292.,
+     *856.,957.,804.,479.,-390.,252.,-219.,358.,254.,-31.,-157.,-62.,
+     *45.,61.,8.,-228.,4.,1.,-111.,75.,-57.,4.,13.,-26.,-6.,13.,1.,13.,
+     *5.,-4.,-14.,0.,8.,-1.,11.,4.,8.,10.,2.,-13.,10.,-1.,-1.,5.,1.,-2.,
+     *-2.,-3.,2.,-5.,-2.,4.,4.,0.,2.,2.,0.,39*0./
+      DATA H65/0.,0.,5776.,0.,-2016.,114.,0.,-404.,240.,-165.,0.,148.,
+     *-269.,13.,-269.,0.,19.,128.,-126.,-97.,81.,0.,-11.,100.,68.,-32.,
+     *-8.,-7.,0.,-61.,-27.,-2.,6.,26.,-23.,-12.,0.,7.,-12.,9.,-16.,4.,
+     *24.,-3.,-17.,0.,-22.,15.,7.,-4.,-5.,10.,10.,-4.,1.,0.,2.,1.,2.,
+     *6.,-4.,0.,-2.,3.,0.,-6.,39*0./
+c
+      DATA G70/0.,-30220.,-2068.,-1781.,3000.,1611.,1287.,-2091.,1278.,
+     *838.,952.,800.,461.,-395.,234.,-216.,359.,262.,-42.,-160.,-56.,
+     *43.,64.,15.,-212.,2.,3.,-112.,72.,-57.,1.,14.,-22.,-2.,13.,-2.,
+     *14.,6.,-2.,-13.,-3.,5.,0.,11.,3.,8.,10.,2.,-12.,10.,-1.,0.,3.,
+     *1.,-1.,-3.,-3.,2.,-5.,-1.,6.,4.,1.,0.,3.,-1.,39*0./
+      DATA H70/0.,0.,5737.,0.,-2047.,25.,0.,-366.,251.,-196.,0.,167.,
+     *-266.,26.,-279.,0.,26.,139.,-139.,-91.,83.,0.,-12.,100.,72.,-37.,
+     *-6.,1.,0.,-70.,-27.,-4.,8.,23.,-23.,-11.,0.,7.,-15.,6.,-17.,6.,
+     *21.,-6.,-16.,0.,-21.,16.,6.,-4.,-5.,10.,11.,-2.,1.,0.,1.,1.,3.,
+     *4.,-4.,0.,-1.,3.,1.,-4.,39*0./
+c
+      DATA G75/0.,-30100.,-2013.,-1902.,3010.,1632.,1276.,-2144.,1260.,
+     *830.,946.,791.,438.,-405.,216.,-218.,356.,264.,-59.,-159.,-49.,
+     *45.,66.,28.,-198.,1.,6.,-111.,71.,-56.,1.,16.,-14.,0.,12.,-5.,
+     *14.,6.,-1.,-12.,-8.,4.,0.,10.,1.,7.,10.,2.,-12.,10.,-1.,-1.,4.,
+     *1.,-2.,-3.,-3.,2.,-5.,-2.,5.,4.,1.,0.,3.,-1.,39*0./
+      DATA H75/0.,0.,5675.,0.,-2067.,-68.,0.,-333.,262.,-223.,0.,191.,
+     *-265.,39.,-288.,0.,31.,148.,-152.,-83.,88.,0.,-13.,99.,75.,-41.,
+     *-4.,11.,0.,-77.,-26.,-5.,10.,22.,-23.,-12.,0.,6.,-16.,4.,-19.,6.,
+     *18.,-10.,-17.,0.,-21.,16.,7.,-4.,-5.,10.,11.,-3.,1.,0.,1.,1.,3.,
+     *4.,-4.,-1.,-1.,3.,1.,-5.,39*0./
+c
+      DATA G80/0.,-29992.,-1956.,-1997.,3027.,1663.,1281.,-2180.,1251.,
+     *833.,938.,782.,398.,-419.,199.,-218.,357.,261.,-74.,-162.,-48.,
+     *48.,66.,42.,-192.,4.,14.,-108.,72.,-59.,2.,21.,-12.,1.,11.,-2.,
+     *18.,6.,0.,-11.,-7.,4.,3.,6.,-1.,5.,10.,1.,-12.,9.,-3.,-1.,7.,2.,
+     *-5.,-4.,-4.,2.,-5.,-2.,5.,3.,1.,2.,3.,0.,39*0./
+      DATA H80/0.,0.,5604.,0.,-2129.,-200.,0.,-336.,271.,-252.,0.,212.,
+     *-257.,53.,-297.,0.,46.,150.,-151.,-78.,92.,0.,-15.,93.,71.,-43.,
+     *-2.,17.,0.,-82.,-27.,-5.,16.,18.,-23.,-10.,0.,7.,-18.,4.,-22.,9.,
+     *16.,-13.,-15.,0.,-21.,16.,9.,-5.,-6.,9.,10.,-6.,2.,0.,1.,0.,3.,
+     *6.,-4.,0.,-1.,4.,0.,-6.,39*0./
+c
+      DATA G85/0.,-29873.,-1905.,-2072.,3044.,1687.,1296.,-2208.,1247.,
+     *829.,936.,780.,361.,-424.,170.,-214.,355.,253.,-93.,-164.,-46.,
+     *53.,65.,51.,-185.,4.,16.,-102.,74.,-62.,3.,24.,-6.,4.,10.,0.,21.,
+     *6.,0.,-11.,-9.,4.,4.,4.,-4.,5.,10.,1.,-12.,9.,-3.,-1.,7.,1.,-5.,
+     *-4.,-4.,3.,-5.,-2.,5.,3.,1.,2.,3.,0.,39*0./
+      DATA H85/0.,0.,5500.,0.,-2197.,-306.,0.,-310.,284.,-297.,0.,232.,
+     *-249.,69.,-297.,0.,47.,150.,-154.,-75.,95.,0.,-16.,88.,69.,-48.,
+     *-1.,21.,0.,-83.,-27.,-2.,20.,17.,-23.,-7.,0.,8.,-19.,5.,-23.,11.,
+     *14.,-15.,-11.,0.,-21.,15.,9.,-6.,-6.,9.,9.,-7.,2.,0.,1.,0.,3.,
+     *6.,-4.,0.,-1.,4.,0.,-6.,39*0./
+c
+      DATA G90/0., -29775.,  -1848.,  -2131.,   3059.,   1686.,   1314.,
+     *     -2239.,   1248.,    802.,    939.,    780.,    325.,   -423.,
+     *       141.,   -214.,    353.,    245.,   -109.,   -165.,    -36.,
+     *        61.,     65.,     59.,   -178.,      3.,     18.,    -96.,
+     *        77.,    -64.,      2.,     26.,     -1.,      5.,      9.,
+     *         0.,     23.,      5.,     -1.,    -10.,    -12.,      3.,
+     *         4.,      2.,     -6.,      4.,      9.,      1.,    -12.,
+     *         9.,     -4.,     -2.,      7.,      1.,     -6.,     -3.,
+     *        -4.,      2.,     -5.,     -2.,      4.,      3.,      1.,
+     *         3.,      3.,      0.,  39*0./
+
+      DATA H90/0.,      0.,   5406.,      0.,  -2279.,   -373.,      0.,
+     *      -284.,    293.,   -352.,      0.,    247.,   -240.,     84.,
+     *      -299.,      0.,     46.,    154.,   -153.,    -69.,     97.,
+     *         0.,    -16.,     82.,     69.,    -52.,      1.,     24.,
+     *         0.,    -80.,    -26.,      0.,     21.,     17.,    -23.,
+     *        -4.,      0.,     10.,    -19.,      6.,    -22.,     12.,
+     *        12.,    -16.,    -10.,      0.,    -20.,     15.,     11.,
+     *        -7.,     -7.,      9.,      8.,     -7.,      2.,      0.,
+     *         2.,      1.,      3.,      6.,     -4.,      0.,     -2.,
+     *         3.,     -1.,     -6.,   39*0./
+
+      DATA G95/0., -29692.,  -1784.,  -2200.,   3070.,   1681.,   1335.,
+     *     -2267.,   1249.,    759.,    940.,    780.,    290.,   -418.,
+     *       122.,   -214.,    352.,    235.,   -118.,   -166.,    -17.,
+     *        68.,     67.,     68.,   -170.,     -1.,     19.,    -93.,
+     *        77.,    -72.,      1.,     28.,      5.,      4.,      8.,
+     *        -2.,     25.,      6.,     -6.,     -9.,    -14.,      9.,
+     *         6.,     -5.,     -7.,      4.,      9.,      3.,    -10.,
+     *         8.,     -8.,     -1.,     10.,     -2.,     -8.,     -3.,
+     *        -6.,      2.,     -4.,     -1.,      4.,      2.,      2.,
+     *         5.,      1.,      0.,    39*0./
+
+      DATA H95/0.,      0.,   5306.,      0.,  -2366.,   -413.,      0.,
+     *      -262.,    302.,   -427.,      0.,    262.,   -236.,     97.,
+     *      -306.,      0.,     46.,    165.,   -143.,    -55.,    107.,
+     *         0.,    -17.,     72.,     67.,    -58.,      1.,     36.,
+     *         0.,    -69.,    -25.,      4.,     24.,     17.,    -24.,
+     *        -6.,      0.,     11.,    -21.,      8.,    -23.,     15.,
+     *        11.,    -16.,    -4.,      0.,    -20.,     15.,     12.,
+     *        -6.,     -8.,      8.,      5.,     -8.,      3.,      0.,
+     *         1.,      0.,      4.,      5.,     -5.,     -1.,     -2.,
+     *         1.,     -2.,     -7.,    39*0./
+
+      DATA G00/0.,-29619.4, -1728.2, -2267.7,  3068.4,  1670.9,  1339.6,
+     *     -2288.,  1252.1,   714.5,   932.3,   786.8,    250.,   -403.,
+     *      111.3,  -218.8,   351.4,   222.3,  -130.4,  -168.6,   -12.9,
+     *       72.3,    68.2,    74.2,  -160.9,    -5.9,    16.9,   -90.4,
+     *       79.0,   -74.0,      0.,    33.3,     9.1,     6.9,     7.3,
+     *       -1.2,    24.4,     6.6,    -9.2,    -7.9,   -16.6,     9.1,
+     *        7.0,    -7.9,     -7.,      5.,     9.4,      3.,   - 8.4,
+     *        6.3,    -8.9,    -1.5,     9.3,    -4.3,    -8.2,    -2.6,
+     *        -6.,     1.7,    -3.1,    -0.5,     3.7,      1.,      2.,
+     *        4.2,     0.3,    -1.1,     2.7,    -1.7,    -1.9,     1.5,
+     *       -0.1,     0.1,    -0.7,     0.7,     1.7,     0.1,     1.2,
+     *        4.0,    -2.2,    -0.3,     0.2,     0.9,    -0.2,     0.9,
+     *       -0.5,     0.3,    -0.3,    -0.4,    -0.1,    -0.2,    -0.4,
+     *       -0.2,    -0.9,     0.3,     0.1,    -0.4,     1.3,    -0.4,
+     *        0.7,    -0.4,     0.3,    -0.1,     0.4,      0.,     0.1/
+
+
+      DATA H00/0.,      0.,  5186.1,      0., -2481.6,  -458.0,      0.,
+     *     -227.6,   293.4,  -491.1,      0.,   272.6,  -231.9,   119.8,
+     *     -303.8,      0.,    43.8,   171.9,  -133.1,   -39.3,   106.3,
+     *         0.,   -17.4,    63.7,    65.1,   -61.2,     0.7,    43.8,
+     *         0.,   -64.6,   -24.2,     6.2,     24.,    14.8,   -25.4,
+     *       -5.8,     0.0,    11.9,   -21.5,     8.5,   -21.5,    15.5,
+     *        8.9,   -14.9,    -2.1,     0.0,   -19.7,    13.4,    12.5,
+     *       -6.2,    -8.4,     8.4,     3.8,    -8.2,     4.8,     0.0,
+     *        1.7,     0.0,     4.0,     4.9,    -5.9,    -1.2,    -2.9,
+     *        0.2,    -2.2,    -7.4,     0.0,     0.1,     1.3,    -0.9,
+     *       -2.6,     0.9,    -0.7,    -2.8,    -0.9,    -1.2,    -1.9,
+     *       -0.9,     0.0,    -0.4,     0.3,     2.5,    -2.6,     0.7,
+     *        0.3,     0.0,     0.0,     0.3,    -0.9,    -0.4,     0.8,
+     *        0.0,    -0.9,     0.2,     1.8,    -0.4,    -1.0,    -0.1,
+     *        0.7,     0.3,     0.6,     0.3,    -0.2,    -0.5,    -0.9/
+     *
+
+      DATA G05/0.,-29556.8, -1671.8, -2340.5,   3047.,  1656.9,  1335.7,
+     *    -2305.3,  1246.8,   674.4,   919.8,   798.2,   211.5,  -379.5,
+     *      100.2,  -227.6,   354.4,   208.8,  -136.6,  -168.3,   -14.1,
+     *       72.9,    69.6,    76.6,  -151.1,   -15.0,    14.7,   -86.4,
+     *       79.8,   -74.4,    -1.4,    38.6,    12.3,     9.4,     5.5,
+     *        2.0,    24.8,     7.7,   -11.4,    -6.8,   -18.0,    10.0,
+     *        9.4,   -11.4,    -5.0,     5.6,     9.8,     3.6,    -7.0,
+     *        5.0,   -10.8,    -1.3,     8.7,    -6.7,    -9.2,    -2.2,
+     *       -6.3,     1.6,    -2.5,    -0.1,     3.0,     0.3,     2.1,
+     *        3.9,    -0.1,    -2.2,     2.9,    -1.6,    -1.7,     1.5,
+     *       -0.2,     0.2,    -0.7,     0.5,     1.8,     0.1,     1.0,
+     *        4.1,    -2.2,    -0.3,     0.3,     0.9,    -0.4,     1.0,
+     *       -0.4,     0.5,    -0.3,    -0.4,     0.0,    -0.4,     0.0,
+     *       -0.2,    -0.9,     0.3,     0.3,    -0.4,     1.2,    -0.4,
+     *        0.7,    -0.3,     0.4,    -0.1,     0.4,    -0.1,    -0.3/
+
+      DATA H05/0.,     0.0,  5080.0,     0.0, -2594.9,  -516.7,     0.0,
+     *     -200.4,   269.3,  -524.5,     0.0,   281.4,  -225.8,   145.7,
+     *     -304.7,     0.0,    42.7,   179.8,  -123.0,   -19.5,   103.6,
+     *        0.0,   -20.2,    54.7,    63.7,   -63.4,     0.0,    50.3,
+     *        0.0,   -61.4,   -22.5,     6.9,    25.4,    10.9,   -26.4,
+     *       -4.8,     0.0,    11.2,   -21.0,     9.7,   -19.8,    16.1,
+     *        7.7,   -12.8,    -0.1,     0.0,   -20.1,    12.9,    12.7,
+     *       -6.7,    -8.1,     8.1,     2.9,    -7.9,     5.9,     0.0,
+     *        2.4,     0.2,     4.4,     4.7,    -6.5,    -1.0,    -3.4,
+     *       -0.9,    -2.3,    -8.0,     0.0,     0.3,     1.4,    -0.7,
+     *       -2.4,     0.9,    -0.6,    -2.7,    -1.0,    -1.5,    -2.0,
+     *       -1.4,     0.0,    -0.5,     0.3,     2.3,    -2.7,     0.6,
+     *        0.4,     0.0,     0.0,     0.3,    -0.8,    -0.4,     1.0,
+     *        0.0,    -0.7,     0.3,     1.7,    -0.5,    -1.0,     0.0,
+     *        0.7,     0.2,     0.6,     0.4,    -0.2,    -0.5,    -1.0/
+
+      DATA DG05/0.0,   8.8,    10.8,   -15.0,    -6.9,    -1.0,    -0.3,
+     *         -3.1,  -0.9,    -6.8,    -2.5,     2.8,    -7.1,     5.9,
+     *         -3.2,  -2.6,     0.4,    -3.0,    -1.2,     0.2,    -0.6,
+     *         -0.8,   0.2,    -0.2,     2.1,    -2.1,    -0.4,     1.3,
+     *         -0.4,   0.0,    -0.2,     1.1,     0.6,     0.4,    -0.5,
+     *          0.9,  -0.2,     0.2,    -0.2,     0.2,    -0.2,     0.2,
+     *          0.5,  -0.7,     0.5/
+
+      DATA DH05/0.0,   0.0,   -21.3,     0.0,   -23.3,   -14.0,     0.0,
+     *          5.4,  -6.5,    -2.0,     0.0,     2.0,     1.8,     5.6,
+     *          0.0,   0.0,     0.1,     1.8,     2.0,     4.5,    -1.0,
+     *          0.0,  -0.4,    -1.9,    -0.4,    -0.4,    -0.2,     0.9,
+     *          0.0,   0.8,     0.4,     0.1,     0.2,    -0.9,    -0.3,
+     *          0.3,   0.0,    -0.2,     0.2,     0.2,     0.4,     0.2,
+     *         -0.3,   0.5,     0.4/
+C
+C
+      IY=IYEAR
+C
+C  WE ARE RESTRICTED BY THE INTERVAL 1965-2010, FOR WHICH THE IGRF COEFFICIENTS
+c    ARE KNOWN; IF IYEAR IS OUTSIDE THIS INTERVAL, THEN THE SUBROUTINE USES THE
+C      NEAREST LIMITING VALUE AND PRINTS A WARNING:
+C
+      IF(IY.LT.1965) THEN
+       IY=1965
+       WRITE (*,10) IYEAR,IY
+      ENDIF
+
+      IF(IY.GT.2010) THEN
+       IY=2010
+       WRITE (*,10) IYEAR,IY
+      ENDIF
+
+C
+C  CALCULATE THE ARRAY REC, CONTAINING COEFFICIENTS FOR THE RECURSION RELATIONS,
+C  USED IN THE IGRF SUBROUTINE FOR CALCULATING THE ASSOCIATE LEGENDRE POLYNOMIALS
+C  AND THEIR DERIVATIVES:
+c
+      DO 20 N=1,14
+         N2=2*N-1
+         N2=N2*(N2-2)
+         DO 20 M=1,N
+            MN=N*(N-1)/2+M
+20    REC(MN)=FLOAT((N-M)*(N+M-2))/FLOAT(N2)
+C
+      IF (IY.LT.1970) GOTO 50          !INTERPOLATE BETWEEN 1965 - 1970
+      IF (IY.LT.1975) GOTO 60          !INTERPOLATE BETWEEN 1970 - 1975
+      IF (IY.LT.1980) GOTO 70          !INTERPOLATE BETWEEN 1975 - 1980
+      IF (IY.LT.1985) GOTO 80          !INTERPOLATE BETWEEN 1980 - 1985
+      IF (IY.LT.1990) GOTO 90          !INTERPOLATE BETWEEN 1985 - 1990
+      IF (IY.LT.1995) GOTO 100         !INTERPOLATE BETWEEN 1990 - 1995
+      IF (IY.LT.2000) GOTO 110         !INTERPOLATE BETWEEN 1995 - 2000
+      IF (IY.LT.2005) GOTO 120         !INTERPOLATE BETWEEN 2000 - 2005
+C
+C       EXTRAPOLATE BEYOND 2005:
+C
+      DT=FLOAT(IY)+FLOAT(IDAY-1)/365.25-2005.
+      DO 40 N=1,105
+         G(N)=G05(N)
+         H(N)=H05(N)
+         IF (N.GT.45) GOTO 40
+         G(N)=G(N)+DG05(N)*DT
+         H(N)=H(N)+DH05(N)*DT
+40    CONTINUE
+      GOTO 300
+C
+C       INTERPOLATE BETWEEEN 1965 - 1970:
+C
+50    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1965)/5.
+      F1=1.-F2
+      DO 55 N=1,105
+         G(N)=G65(N)*F1+G70(N)*F2
+55       H(N)=H65(N)*F1+H70(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1970 - 1975:
+C
+60    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1970)/5.
+      F1=1.-F2
+      DO 65 N=1,105
+         G(N)=G70(N)*F1+G75(N)*F2
+65       H(N)=H70(N)*F1+H75(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1975 - 1980:
+C
+70    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1975)/5.
+      F1=1.-F2
+      DO 75 N=1,105
+         G(N)=G75(N)*F1+G80(N)*F2
+75       H(N)=H75(N)*F1+H80(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1980 - 1985:
+C
+80    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1980)/5.
+      F1=1.-F2
+      DO 85 N=1,105
+         G(N)=G80(N)*F1+G85(N)*F2
+85       H(N)=H80(N)*F1+H85(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1985 - 1990:
+C
+90    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1985)/5.
+      F1=1.-F2
+      DO 95 N=1,105
+         G(N)=G85(N)*F1+G90(N)*F2
+95       H(N)=H85(N)*F1+H90(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1990 - 1995:
+C
+100   F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1990)/5.
+      F1=1.-F2
+      DO 105 N=1,105
+         G(N)=G90(N)*F1+G95(N)*F2
+105      H(N)=H90(N)*F1+H95(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1995 - 2000:
+C
+110   F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1995)/5.
+      F1=1.-F2
+      DO 115 N=1,105   !  THE 2000 COEFFICIENTS (G00) GO THROUGH THE ORDER 13, NOT 10
+         G(N)=G95(N)*F1+G00(N)*F2
+115      H(N)=H95(N)*F1+H00(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 2000 - 2005:
+C
+120   F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-2000)/5.
+      F1=1.-F2
+      DO 125 N=1,105
+         G(N)=G00(N)*F1+G05(N)*F2
+125      H(N)=H00(N)*F1+H05(N)*F2
+      GOTO 300
+C
+C   COEFFICIENTS FOR A GIVEN YEAR HAVE BEEN CALCULATED; NOW MULTIPLY
+C   THEM BY SCHMIDT NORMALIZATION FACTORS:
+C
+300   S=1.
+      DO 130 N=2,14
+         MN=N*(N-1)/2+1
+         S=S*FLOAT(2*N-3)/FLOAT(N-1)
+         G(MN)=G(MN)*S
+         H(MN)=H(MN)*S
+         P=S
+         DO 130 M=2,N
+            AA=1.
+            IF (M.EQ.2) AA=2.
+            P=P*SQRT(AA*FLOAT(N-M+1)/FLOAT(N+M-2))
+            MNN=MN+M-1
+            G(MNN)=G(MNN)*P
+130         H(MNN)=H(MNN)*P
+
+           G10=-G(2)
+           G11= G(3)
+           H11= H(3)
+C
+C  NOW CALCULATE THE COMPONENTS OF THE UNIT VECTOR EzMAG IN GEO COORD.SYSTEM:
+C   SIN(TETA0)*COS(LAMBDA0), SIN(TETA0)*SIN(LAMBDA0), AND COS(TETA0)
+C         ST0 * CL0                ST0 * SL0                CT0
+C
+      SQ=G11**2+H11**2
+      SQQ=SQRT(SQ)
+      SQR=SQRT(G10**2+SQ)
+      SL0=-H11/SQQ
+      CL0=-G11/SQQ
+      ST0=SQQ/SQR
+      CT0=G10/SQR
+      STCL=ST0*CL0
+      STSL=ST0*SL0
+      CTSL=CT0*SL0
+      CTCL=CT0*CL0
+C
+      CALL SUN (IY,IDAY,IHOUR,MIN,ISEC,GST,SLONG,SRASN,SDEC)
+C
+C  S1,S2, AND S3 ARE THE COMPONENTS OF THE UNIT VECTOR EXGSM=EXGSE IN THE
+C   SYSTEM GEI POINTING FROM THE EARTH'S CENTER TO THE SUN:
+C
+      S1=COS(SRASN)*COS(SDEC)
+      S2=SIN(SRASN)*COS(SDEC)
+      S3=SIN(SDEC)
+      CGST=COS(GST)
+      SGST=SIN(GST)
+C
+C  DIP1, DIP2, AND DIP3 ARE THE COMPONENTS OF THE UNIT VECTOR EZSM=EZMAG
+C   IN THE SYSTEM GEI:
+C
+      DIP1=STCL*CGST-STSL*SGST
+      DIP2=STCL*SGST+STSL*CGST
+      DIP3=CT0
+C
+C  NOW CALCULATE THE COMPONENTS OF THE UNIT VECTOR EYGSM IN THE SYSTEM GEI
+C   BY TAKING THE VECTOR PRODUCT D x S AND NORMALIZING IT TO UNIT LENGTH:
+C
+      Y1=DIP2*S3-DIP3*S2
+      Y2=DIP3*S1-DIP1*S3
+      Y3=DIP1*S2-DIP2*S1
+      Y=SQRT(Y1*Y1+Y2*Y2+Y3*Y3)
+      Y1=Y1/Y
+      Y2=Y2/Y
+      Y3=Y3/Y
+C
+C   THEN IN THE GEI SYSTEM THE UNIT VECTOR Z = EZGSM = EXGSM x EYGSM = S x Y
+C    HAS THE COMPONENTS:
+C
+      Z1=S2*Y3-S3*Y2
+      Z2=S3*Y1-S1*Y3
+      Z3=S1*Y2-S2*Y1
+C
+C    THE VECTOR EZGSE (HERE DZ) IN GEI HAS THE COMPONENTS (0,-SIN(DELTA),
+C     COS(DELTA)) = (0.,-0.397823,0.917462); HERE DELTA = 23.44214 DEG FOR
+C   THE EPOCH 1978 (SEE THE BOOK BY GUREVICH OR OTHER ASTRONOMICAL HANDBOOKS).
+C    HERE THE MOST ACCURATE TIME-DEPENDENT FORMULA IS USED:
+C
+      DJ=FLOAT(365*(IY-1900)+(IY-1901)/4 +IDAY)
+     * -0.5+FLOAT(IHOUR*3600+MIN*60+ISEC)/86400.
+      T=DJ/36525.
+      OBLIQ=(23.45229-0.0130125*T)/57.2957795
+      DZ1=0.
+      DZ2=-SIN(OBLIQ)
+      DZ3=COS(OBLIQ)
+C
+C  THEN THE UNIT VECTOR EYGSE IN GEI SYSTEM IS THE VECTOR PRODUCT DZ x S :
+C
+      DY1=DZ2*S3-DZ3*S2
+      DY2=DZ3*S1-DZ1*S3
+      DY3=DZ1*S2-DZ2*S1
+C
+C   THE ELEMENTS OF THE MATRIX GSE TO GSM ARE THE SCALAR PRODUCTS:
+C   CHI=EM22=(EYGSM,EYGSE), SHI=EM23=(EYGSM,EZGSE), EM32=(EZGSM,EYGSE)=-EM23,
+C     AND EM33=(EZGSM,EZGSE)=EM22
+C
+      CHI=Y1*DY1+Y2*DY2+Y3*DY3
+      SHI=Y1*DZ1+Y2*DZ2+Y3*DZ3
+      HI=ASIN(SHI)
+C
+C    TILT ANGLE: PSI=ARCSIN(DIP,EXGSM)
+C
+      SPS=DIP1*S1+DIP2*S2+DIP3*S3
+      CPS=SQRT(1.-SPS**2)
+      PSI=ASIN(SPS)
+C
+C    THE ELEMENTS OF THE MATRIX MAG TO SM ARE THE SCALAR PRODUCTS:
+C CFI=GM22=(EYSM,EYMAG), SFI=GM23=(EYSM,EXMAG); THEY CAN BE DERIVED AS FOLLOWS:
+C
+C IN GEO THE VECTORS EXMAG AND EYMAG HAVE THE COMPONENTS (CT0*CL0,CT0*SL0,-ST0)
+C  AND (-SL0,CL0,0), RESPECTIVELY.    HENCE, IN GEI THE COMPONENTS ARE:
+C  EXMAG:    CT0*CL0*COS(GST)-CT0*SL0*SIN(GST)
+C            CT0*CL0*SIN(GST)+CT0*SL0*COS(GST)
+C            -ST0
+C  EYMAG:    -SL0*COS(GST)-CL0*SIN(GST)
+C            -SL0*SIN(GST)+CL0*COS(GST)
+C             0
+C  THE COMPONENTS OF EYSM IN GEI WERE FOUND ABOVE AS Y1, Y2, AND Y3;
+C  NOW WE ONLY HAVE TO COMBINE THE QUANTITIES INTO SCALAR PRODUCTS:
+C
+      EXMAGX=CT0*(CL0*CGST-SL0*SGST)
+      EXMAGY=CT0*(CL0*SGST+SL0*CGST)
+      EXMAGZ=-ST0
+      EYMAGX=-(SL0*CGST+CL0*SGST)
+      EYMAGY=-(SL0*SGST-CL0*CGST)
+      CFI=Y1*EYMAGX+Y2*EYMAGY
+      SFI=Y1*EXMAGX+Y2*EXMAGY+Y3*EXMAGZ
+C
+      XMUT=(ATAN2(SFI,CFI)+3.1415926536)*3.8197186342
+C
+C  THE ELEMENTS OF THE MATRIX GEO TO GSM ARE THE SCALAR PRODUCTS:
+C
+C   A11=(EXGEO,EXGSM), A12=(EYGEO,EXGSM), A13=(EZGEO,EXGSM),
+C   A21=(EXGEO,EYGSM), A22=(EYGEO,EYGSM), A23=(EZGEO,EYGSM),
+C   A31=(EXGEO,EZGSM), A32=(EYGEO,EZGSM), A33=(EZGEO,EZGSM),
+C
+C   ALL THE UNIT VECTORS IN BRACKETS ARE ALREADY DEFINED IN GEI:
+C
+C  EXGEO=(CGST,SGST,0), EYGEO=(-SGST,CGST,0), EZGEO=(0,0,1)
+C  EXGSM=(S1,S2,S3),  EYGSM=(Y1,Y2,Y3),   EZGSM=(Z1,Z2,Z3)
+C                                                           AND  THEREFORE:
+C
+      A11=S1*CGST+S2*SGST
+      A12=-S1*SGST+S2*CGST
+      A13=S3
+      A21=Y1*CGST+Y2*SGST
+      A22=-Y1*SGST+Y2*CGST
+      A23=Y3
+      A31=Z1*CGST+Z2*SGST
+      A32=-Z1*SGST+Z2*CGST
+      A33=Z3
+C
+ 10   FORMAT(//1X,
+     *'**** RECALC WARNS: YEAR IS OUT OF INTERVAL 1965-2010: IYEAR=',I4,
+     * /,6X,'CALCULATIONS WILL BE DONE FOR IYEAR=',I4,/)
+      RETURN
+      END
+c
+c====================================================================
+C
+      SUBROUTINE GEOMAG (XGEO,YGEO,ZGEO,XMAG,YMAG,ZMAG,J)
+C
+C    CONVERTS GEOGRAPHIC (GEO) TO DIPOLE (MAG) COORDINATES OR VICA VERSA.
+C
+C                    J>0                       J<0
+C-----INPUT:  J,XGEO,YGEO,ZGEO           J,XMAG,YMAG,ZMAG
+C-----OUTPUT:    XMAG,YMAG,ZMAG           XGEO,YGEO,ZGEO
+C
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GEOMAG IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR AND/OR IDAY HAVE BEEN CHANGED
+C
+C
+C   LAST MOFIFICATION:  MARCH 30, 2003 (INVOCATION OF RECALC INSIDE THIS S/R WAS REMOVED)
+C
+C   AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ ST0,CT0,SL0,CL0,CTCL,STCL,CTSL,STSL,AB(19),BB(8)
+
+      IF(J.GT.0) THEN
+       XMAG=XGEO*CTCL+YGEO*CTSL-ZGEO*ST0
+       YMAG=YGEO*CL0-XGEO*SL0
+       ZMAG=XGEO*STCL+YGEO*STSL+ZGEO*CT0
+      ELSE
+       XGEO=XMAG*CTCL-YMAG*SL0+ZMAG*STCL
+       YGEO=XMAG*CTSL+YMAG*CL0+ZMAG*STSL
+       ZGEO=ZMAG*CT0-XMAG*ST0
+      ENDIF
+
+      RETURN
+      END
+c
+c=========================================================================================
+c
+      SUBROUTINE GEIGEO (XGEI,YGEI,ZGEI,XGEO,YGEO,ZGEO,J)
+C
+C   CONVERTS EQUATORIAL INERTIAL (GEI) TO GEOGRAPHICAL (GEO) COORDS
+C   OR VICA VERSA.
+C                    J>0                J<0
+C----INPUT:  J,XGEI,YGEI,ZGEI    J,XGEO,YGEO,ZGEO
+C----OUTPUT:   XGEO,YGEO,ZGEO      XGEI,YGEI,ZGEI
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GEIGEO IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE CURRENT VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(27),CGST,SGST,B(6)
+C
+      IF(J.GT.0) THEN
+       XGEO=XGEI*CGST+YGEI*SGST
+       YGEO=YGEI*CGST-XGEI*SGST
+       ZGEO=ZGEI
+      ELSE
+       XGEI=XGEO*CGST-YGEO*SGST
+       YGEI=YGEO*CGST+XGEO*SGST
+       ZGEI=ZGEO
+      ENDIF
+
+      RETURN
+      END
+C
+C=======================================================================================
+C
+      SUBROUTINE MAGSM (XMAG,YMAG,ZMAG,XSM,YSM,ZSM,J)
+C
+C  CONVERTS DIPOLE (MAG) TO SOLAR MAGNETIC (SM) COORDINATES OR VICA VERSA
+C
+C                    J>0              J<0
+C----INPUT: J,XMAG,YMAG,ZMAG     J,XSM,YSM,ZSM
+C----OUTPUT:    XSM,YSM,ZSM       XMAG,YMAG,ZMAG
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE MAGSM IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(8),SFI,CFI,B(7),AB(10),BA(8)
+C
+      IF (J.GT.0) THEN
+       XSM=XMAG*CFI-YMAG*SFI
+       YSM=XMAG*SFI+YMAG*CFI
+       ZSM=ZMAG
+      ELSE
+       XMAG=XSM*CFI+YSM*SFI
+       YMAG=YSM*CFI-XSM*SFI
+       ZMAG=ZSM
+      ENDIF
+
+      RETURN
+      END
+C
+C=======================================================================================
+C
+       SUBROUTINE GSMGSE (XGSM,YGSM,ZGSM,XGSE,YGSE,ZGSE,J)
+C
+C CONVERTS GEOCENTRIC SOLAR MAGNETOSPHERIC (GSM) COORDS TO SOLAR ECLIPTIC (GSE) ONES
+C   OR VICA VERSA.
+C                    J>0                J<0
+C-----INPUT: J,XGSM,YGSM,ZGSM    J,XGSE,YGSE,ZGSE
+C----OUTPUT:   XGSE,YGSE,ZGSE      XGSM,YGSM,ZGSM
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GSMGSE IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(12),SHI,CHI,AB(13),BA(8)
+C
+      IF (J.GT.0) THEN
+       XGSE=XGSM
+       YGSE=YGSM*CHI-ZGSM*SHI
+       ZGSE=YGSM*SHI+ZGSM*CHI
+      ELSE
+       XGSM=XGSE
+       YGSM=YGSE*CHI+ZGSE*SHI
+       ZGSM=ZGSE*CHI-YGSE*SHI
+      ENDIF
+
+      RETURN
+      END
+C
+C=====================================================================================
+C
+       SUBROUTINE SMGSM (XSM,YSM,ZSM,XGSM,YGSM,ZGSM,J)
+C
+C CONVERTS SOLAR MAGNETIC (SM) TO GEOCENTRIC SOLAR MAGNETOSPHERIC
+C   (GSM) COORDINATES OR VICA VERSA.
+C                  J>0                 J<0
+C-----INPUT: J,XSM,YSM,ZSM        J,XGSM,YGSM,ZGSM
+C----OUTPUT:  XGSM,YGSM,ZGSM       XSM,YSM,ZSM
+C
+C  ATTENTION:  SUBROUTINE RECALC  MUST BE INVOKED BEFORE SMGSM IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(10),SPS,CPS,B(15),AB(8)
+
+      IF (J.GT.0) THEN
+       XGSM=XSM*CPS+ZSM*SPS
+       YGSM=YSM
+       ZGSM=ZSM*CPS-XSM*SPS
+      ELSE
+       XSM=XGSM*CPS-ZGSM*SPS
+       YSM=YGSM
+       ZSM=XGSM*SPS+ZGSM*CPS
+      ENDIF
+
+      RETURN
+      END
+C
+C==========================================================================================
+C
+      SUBROUTINE GEOGSM (XGEO,YGEO,ZGEO,XGSM,YGSM,ZGSM,J)
+C
+C CONVERTS GEOGRAPHIC (GEO) TO GEOCENTRIC SOLAR MAGNETOSPHERIC (GSM) COORDINATES
+C   OR VICA VERSA.
+C
+C                   J>0                   J<0
+C----- INPUT:  J,XGEO,YGEO,ZGEO    J,XGSM,YGSM,ZGSM
+C---- OUTPUT:    XGSM,YGSM,ZGSM      XGEO,YGEO,ZGEO
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GEOGSM IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC  HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION: MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/AA(17),A11,A21,A31,A12,A22,A32,A13,A23,A33,D,B(8)
+C
+      IF (J.GT.0) THEN
+       XGSM=A11*XGEO+A12*YGEO+A13*ZGEO
+       YGSM=A21*XGEO+A22*YGEO+A23*ZGEO
+       ZGSM=A31*XGEO+A32*YGEO+A33*ZGEO
+      ELSE
+       XGEO=A11*XGSM+A21*YGSM+A31*ZGSM
+       YGEO=A12*XGSM+A22*YGSM+A32*ZGSM
+       ZGEO=A13*XGSM+A23*YGSM+A33*ZGSM
+      ENDIF
+
+      RETURN
+      END
+C
+C=====================================================================================
+C
+      SUBROUTINE RHAND (X,Y,Z,R1,R2,R3,IOPT,PARMOD,EXNAME,INNAME)
+C
+C  CALCULATES THE COMPONENTS OF THE RIGHT HAND SIDE VECTOR IN THE GEOMAGNETIC FIELD
+C    LINE EQUATION  (a subsidiary subroutine for the subroutine STEP)
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      DIMENSION PARMOD(10)
+C
+C     EXNAME AND INNAME ARE NAMES OF SUBROUTINES FOR THE EXTERNAL AND INTERNAL
+C     PARTS OF THE TOTAL FIELD
+C
+      COMMON /GEOPACK1/ A(15),PSI,AA(10),DS3,BB(8)
+
+      CALL EXNAME (IOPT,PARMOD,PSI,X,Y,Z,BXGSM,BYGSM,BZGSM)
+      CALL INNAME (X,Y,Z,HXGSM,HYGSM,HZGSM)
+
+      BX=BXGSM+HXGSM
+      BY=BYGSM+HYGSM
+      BZ=BZGSM+HZGSM
+      B=DS3/SQRT(BX**2+BY**2+BZ**2)
+      R1=BX*B
+      R2=BY*B
+      R3=BZ*B
+      RETURN
+      END
+C
+C===================================================================================
+C
+      SUBROUTINE STEP (X,Y,Z,DS,ERRIN,IOPT,PARMOD,EXNAME,INNAME)
+C
+C   RE-CALCULATES {X,Y,Z}, MAKING A STEP ALONG A FIELD LINE.
+C   DS IS THE STEP SIZE, ERRIN IS PERMISSIBLE ERROR VALUE, IOPT SPECIFIES THE EXTERNAL
+C   MODEL VERSION, THE ARRAY PARMOD CONTAINS INPUT PARAMETERS FOR THAT MODEL
+C   EXNAME IS THE NAME OF THE EXTERNAL FIELD SUBROUTINE
+C   INNAME IS THE NAME OF THE INTERNAL FIELD SUBROUTINE (EITHER DIP OR IGRF)
+C
+C   ALL THE PARAMETERS ARE INPUT ONES; OUTPUT IS THE RENEWED TRIPLET X,Y,Z
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      DIMENSION PARMOD(10)
+      COMMON /GEOPACK1/ A(26),DS3,B(8)
+      EXTERNAL EXNAME,INNAME
+
+  1   DS3=-DS/3.
+      CALL RHAND (X,Y,Z,R11,R12,R13,IOPT,PARMOD,EXNAME,INNAME)
+      CALL RHAND (X+R11,Y+R12,Z+R13,R21,R22,R23,IOPT,PARMOD,EXNAME,
+     * INNAME)
+      CALL RHAND (X+.5*(R11+R21),Y+.5*(R12+R22),Z+.5*
+     *(R13+R23),R31,R32,R33,IOPT,PARMOD,EXNAME,INNAME)
+      CALL RHAND (X+.375*(R11+3.*R31),Y+.375*(R12+3.*R32
+     *),Z+.375*(R13+3.*R33),R41,R42,R43,IOPT,PARMOD,EXNAME,INNAME)
+      CALL RHAND (X+1.5*(R11-3.*R31+4.*R41),Y+1.5*(R12-
+     *3.*R32+4.*R42),Z+1.5*(R13-3.*R33+4.*R43),
+     *R51,R52,R53,IOPT,PARMOD,EXNAME,INNAME)
+      ERRCUR=ABS(R11-4.5*R31+4.*R41-.5*R51)+ABS(R12-4.5*R32+4.*R42-.5*
+     *R52)+ABS(R13-4.5*R33+4.*R43-.5*R53)
+      IF (ERRCUR.LT.ERRIN) GOTO 2
+      DS=DS*.5
+      GOTO 1
+  2   X=X+.5*(R11+4.*R41+R51)
+      Y=Y+.5*(R12+4.*R42+R52)
+      Z=Z+.5*(R13+4.*R43+R53)
+      IF(ERRCUR.LT.ERRIN*.04.AND.ABS(DS).LT.1.33) DS=DS*1.5
+      RETURN
+      END
+C
+C==============================================================================
+C
+      SUBROUTINE TRACE (XI,YI,ZI,DIR,RLIM,R0,IOPT,PARMOD,EXNAME,INNAME,
+     *XF,YF,ZF,XX,YY,ZZ,L)
+C
+C  TRACES A FIELD LINE FROM AN ARBITRARY POINT OF SPACE TO THE EARTH'S
+C  SURFACE OR TO A MODEL LIMITING BOUNDARY.
+C
+C  THE HIGHEST ORDER OF SPHERICAL HARMONICS IN THE MAIN FIELD EXPANSION USED
+C  IN THE MAPPING IS CALCULATED AUTOMATICALLY. IF INNAME=IGRF_GSM, THEN AN IGRF MODEL
+C  FIELD WILL BE USED, AND IF INNAME=DIP, A PURE DIPOLE FIELD WILL BE USED.
+
+C  IN ANY CASE, BEFORE CALLING TRACE, ONE SHOULD INVOKE RECALC, TO CALCULATE CORRECT
+C  VALUES OF THE IGRF COEFFICIENTS AND ALL QUANTITIES NEEDED FOR TRANSFORMATIONS
+C  BETWEEN COORDINATE SYSTEMS INVOLVED IN THIS CALCULATIONS.
+C
+C  ALTERNATIVELY, THE SUBROUTINE RECALC CAN BE INVOKED WITH THE DESIRED VALUES OF
+C  IYEAR AND IDAY (TO SPECIFY THE DIPOLE MOMENT), WHILE THE VALUES OF THE DIPOLE
+C  TILT ANGLE PSI (IN RADIANS) AND ITS SINE (SPS) AND COSINE (CPS) CAN BE EXPLICITLY
+C  SPECIFIED AND FORWARDED TO THE COMMON BLOCK GEOPACK1 (11th, 12th, AND 16th ELEMENTS, RESP.)
+C
+C------------- INPUT PARAMETERS:
+C
+C   XI,YI,ZI - GSM COORDS OF INITIAL POINT (IN EARTH RADII, 1 RE = 6371.2 km),
+C
+C   DIR - SIGN OF THE TRACING DIRECTION: IF DIR=1.0 THEN WE MOVE ANTIPARALLEL TO THE
+C     FIELD VECTOR (E.G. FROM NORTHERN TO SOUTHERN CONJUGATE POINT),
+C     AND IF DIR=-1.0 THEN THE TRACING GOES IN THE OPPOSITE DIRECTION.
+C
+C   R0 -  RADIUS OF A SPHERE (IN RE) FOR WHICH THE FIELD LINE ENDPOINT COORDINATES
+C     XF,YF,ZF  SHOULD BE CALCULATED.
+C
+C   RLIM - UPPER LIMIT OF THE GEOCENTRIC DISTANCE, WHERE THE TRACING IS TERMINATED.
+C
+C   IOPT - A MODEL INDEX; CAN BE USED FOR SPECIFYING AN OPTION OF THE EXTERNAL FIELD
+C       MODEL (E.G., INTERVAL OF THE KP-INDEX). ALTERNATIVELY, ONE CAN USE THE ARRAY
+C       PARMOD FOR THAT PURPOSE (SEE BELOW); IN THAT CASE IOPT IS JUST A DUMMY PARAMETER.
+C
+C   PARMOD -  A 10-ELEMENT ARRAY CONTAINING MODEL PARAMETERS, NEEDED FOR A UNIQUE
+C      SPECIFICATION OF THE EXTERNAL FIELD. THE CONCRETE MEANING OF THE COMPONENTS
+C      OF PARMOD DEPENDS ON A SPECIFIC VERSION OF THE EXTERNAL FIELD MODEL.
+C
+C   EXNAME - NAME OF A SUBROUTINE PROVIDING COMPONENTS OF THE EXTERNAL MAGNETIC FIELD
+C    (E.G., T96_01).
+C   INNAME - NAME OF A SUBROUTINE PROVIDING COMPONENTS OF THE INTERNAL MAGNETIC FIELD
+C    (EITHER DIP OR IGRF_GSM).
+C
+C-------------- OUTPUT PARAMETERS:
+C
+C   XF,YF,ZF - GSM COORDS OF THE LAST CALCULATED POINT OF A FIELD LINE
+C   XX,YY,ZZ - ARRAYS, CONTAINING COORDS OF FIELD LINE POINTS. HERE THEIR MAXIMAL LENGTH WAS
+C      ASSUMED EQUAL TO 999.
+C   L - ACTUAL NUMBER OF THE CALCULATED FIELD LINE POINTS. IF L EXCEEDS 999, TRACING
+C     TERMINATES, AND A WARNING IS DISPLAYED.
+C
+C
+C     LAST MODIFICATION:  MARCH 31, 2003.
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      DIMENSION XX(1000),YY(1000),ZZ(1000), PARMOD(10)
+      COMMON /GEOPACK1/ AA(26),DD,BB(8)
+      EXTERNAL EXNAME,INNAME
+C
+      ERR=0.0001
+      L=0
+      DS=0.5*DIR
+      X=XI
+      Y=YI
+      Z=ZI
+      DD=DIR
+      AL=0.
+c
+c  here we call RHAND just to find out the sign of the radial component of the field
+c   vector, and to determine the initial direction of the tracing (i.e., either away
+c   or towards Earth):
+c
+      CALL RHAND (X,Y,Z,R1,R2,R3,IOPT,PARMOD,EXNAME,INNAME)
+      AD=0.01
+      IF (X*R1+Y*R2+Z*R3.LT.0.) AD=-0.01
+C
+c     |AD|=0.01 and its sign follows the rule:
+c (1) if DIR=1 (tracing antiparallel to B vector) then the sign of AD is the same as of Br
+c (2) if DIR=-1 (tracing parallel to B vector) then the sign of AD is opposite to that of Br
+c     AD is defined in order to initialize the value of RR (radial distance at previous step):
+
+      RR=SQRT(X**2+Y**2+Z**2)+AD
+  1   L=L+1
+      IF(L.GT.999) GOTO 7
+      XX(L)=X
+      YY(L)=Y
+      ZZ(L)=Z
+      RYZ=Y**2+Z**2
+      R2=X**2+RYZ
+      R=SQRT(R2)
+
+c  check if the line hit the outer tracing boundary; if yes, then terminate
+c   the tracing (label 8):
+
+      IF (R.GT.RLIM.OR.RYZ.GT.1600.D0.OR.X.GT.20.D0) GOTO 8
+c
+c  check whether or not the inner tracing boundary was crossed from outside,
+c  if yes, then calculate the footpoint position by interpolation (go to label 6):
+c
+      IF (R.LT.R0.AND.RR.GT.R) GOTO 6
+
+c  check if (i) we are moving outward, or (ii) we are still sufficiently
+c    far from Earth (beyond R=5Re); if yes, proceed further:
+c
+      IF (R.GE.RR.OR.R.GT.5.) GOTO 5
+
+c  now we moved closer inward (between R=3 and R=5); go to 3 and begin logging
+c  previous values of X,Y,Z, to be used in the interpolation (after having
+c  crossed the inner tracing boundary):
+
+      IF (R.GE.3.) GOTO 3
+c
+c  we entered inside the sphere R=3: to avoid too large steps (and hence inaccurate
+c  interpolated position of the footpoint), enforce the progressively smaller
+c  stepsize values as we approach the inner boundary R=R0:
+c
+      FC=0.2
+      IF(R-R0.LT.0.05) FC=0.05
+      AL=FC*(R-R0+0.2)
+      DS=DIR*AL
+      GOTO 4
+  3   DS=DIR
+  4   XR=X
+      YR=Y
+      ZR=Z
+  5   RR=R
+      CALL STEP (X,Y,Z,DS,ERR,IOPT,PARMOD,EXNAME,INNAME)
+      GOTO 1
+c
+c  find the footpoint position by interpolating between the current and previous
+c   field line points:
+c
+  6   R1=(R0-R)/(RR-R)
+      X=X-(X-XR)*R1
+      Y=Y-(Y-YR)*R1
+      Z=Z-(Z-ZR)*R1
+      GOTO 8
+  7   WRITE (*,10)
+      L=999
+  8   XF=X
+      YF=Y
+      ZF=Z
+      RETURN
+ 10   FORMAT(//,1X,'**** COMPUTATIONS IN THE SUBROUTINE TRACE ARE',
+     *' TERMINATED: THE CURRENT NUMBER OF POINTS EXCEEDED 1000 ****'//)
+      END
+c
+C====================================================================================
+C
+      SUBROUTINE SHUETAL_MGNP(XN_PD,VEL,BZIMF,XGSM,YGSM,ZGSM,
+     *  XMGNP,YMGNP,ZMGNP,DIST,ID)
+C
+C  FOR ANY POINT OF SPACE WITH COORDINATES (XGSM,YGSM,ZGSM) AND SPECIFIED CONDITIONS
+C  IN THE INCOMING SOLAR WIND, THIS SUBROUTINE:
+C
+C (1) DETERMINES IF THE POINT (XGSM,YGSM,ZGSM) LIES INSIDE OR OUTSIDE THE
+C      MODEL MAGNETOPAUSE OF SHUE ET AL. (JGR-A, V.103, P. 17691, 1998).
+C
+C (2) CALCULATES THE GSM POSITION OF A POINT {XMGNP,YMGNP,ZMGNP}, LYING AT THE MODEL
+C      MAGNETOPAUSE AND ASYMPTOTICALLY TENDING TO THE NEAREST BOUNDARY POINT WITH
+C      RESPECT TO THE OBSERVATION POINT {XGSM,YGSM,ZGSM}, AS IT APPROACHES THE MAGNETO-
+C      PAUSE.
+C
+C  INPUT: XN_PD - EITHER SOLAR WIND PROTON NUMBER DENSITY (PER C.C.) (IF VEL>0)
+C                    OR THE SOLAR WIND RAM PRESSURE IN NANOPASCALS   (IF VEL<0)
+C         BZIMF - IMF BZ IN NANOTESLAS
+C
+C         VEL - EITHER SOLAR WIND VELOCITY (KM/SEC)
+C                  OR ANY NEGATIVE NUMBER, WHICH INDICATES THAT XN_PD STANDS
+C                     FOR THE SOLAR WIND PRESSURE, RATHER THAN FOR THE DENSITY
+C
+C         XGSM,YGSM,ZGSM - GSM POSITION OF THE OBSERVATION POINT IN EARTH RADII
+C
+C  OUTPUT: XMGNP,YMGNP,ZMGNP - GSM POSITION OF THE BOUNDARY POINT
+C          DIST - DISTANCE (IN RE) BETWEEN THE OBSERVATION POINT (XGSM,YGSM,ZGSM)
+C                 AND THE MODEL NAGNETOPAUSE
+C          ID -  POSITION FLAG:  ID=+1 (-1) MEANS THAT THE OBSERVATION POINT
+C          LIES INSIDE (OUTSIDE) OF THE MODEL MAGNETOPAUSE, RESPECTIVELY.
+C
+C  OTHER SUBROUTINES USED: T96_MGNP
+C
+c          AUTHOR:  N.A. TSYGANENKO,
+C          DATE:    APRIL 4, 2003.
+C
+      IF (VEL.LT.0.) THEN
+        PD=XN_PD
+      ELSE
+        PD=1.94E-6*XN_PD*VEL**2  ! PD IS THE SOLAR WIND DYNAMIC PRESSURE (IN nPa)
+      ENDIF
+
+c
+c  DEFINE THE ANGLE PHI, MEASURED DUSKWARD FROM THE NOON-MIDNIGHT MERIDIAN PLANE;
+C  IF THE OBSERVATION POINT LIES ON THE X AXIS, THE ANGLE PHI CANNOT BE UNIQUELY
+C  DEFINED, AND WE SET IT AT ZERO:
+c
+      IF (YGSM.NE.0..OR.ZGSM.NE.0.) THEN
+         PHI=ATAN2(YGSM,ZGSM)
+      ELSE
+         PHI=0.
+      ENDIF
+C
+C  FIRST, FIND OUT IF THE OBSERVATION POINT LIES INSIDE THE SHUE ET AL BDRY
+C  AND SET THE VALUE OF THE ID FLAG:
+C
+      ID=-1
+      R0=(10.22+1.29*TANH(0.184*(BZIMF+8.14)))*PD**(-.15151515)
+      ALPHA=(0.58-0.007*BZIMF)*(1.+0.024*ALOG(PD))
+      R=SQRT(XGSM**2+YGSM**2+ZGSM**2)
+      RM=R0*(2./(1.+XGSM/R))**ALPHA
+      IF (R.LE.RM) ID=+1
+C
+C  NOW, FIND THE CORRESPONDING T96 MAGNETOPAUSE POSITION, TO BE USED AS
+C  A STARTING APPROXIMATION IN THE SEARCH OF A CORRESPONDING SHUE ET AL.
+C  BOUNDARY POINT:
+C
+      CALL T96_MGNP (PD,-1.,XGSM,YGSM,ZGSM,XMT96,YMT96,ZMT96,DIST,ID96)
+C
+      RHO2=YMT96**2+ZMT96**2
+      R=SQRT(RHO2+XMT96**2)
+      ST=SQRT(RHO2)/R
+      CT=XMT96/R
+C
+C  NOW, USE NEWTON'S ITERATIVE METHOD TO FIND THE NEAREST POINT AT THE
+C   SHUE ET AL.'S BOUNDARY:
+C
+      NIT=0
+
+  1   T=ATAN2(ST,CT)
+      RM=R0*(2./(1.+CT))**ALPHA
+
+      F=R-RM
+      GRADF_R=1.
+      GRADF_T=-ALPHA/R*RM*ST/(1.+CT)
+      GRADF=SQRT(GRADF_R**2+GRADF_T**2)
+
+      DR=-F/GRADF**2
+      DT= DR/R*GRADF_T
+
+      R=R+DR
+      T=T+DT
+      ST=SIN(T)
+      CT=COS(T)
+
+      DS=SQRT(DR**2+(R*DT)**2)
+
+      NIT=NIT+1
+
+      IF (NIT.GT.1000) THEN
+         PRINT *,
+     *' BOUNDARY POINT COULD NOT BE FOUND; ITERATIONS DO NOT CONVERGE'
+      ENDIF
+
+      IF (DS.GT.1.E-4) GOTO 1
+
+      XMGNP=R*COS(T)
+      RHO=  R*SIN(T)
+
+      YMGNP=RHO*SIN(PHI)
+      ZMGNP=RHO*COS(PHI)
+
+      DIST=SQRT((XGSM-XMGNP)**2+(YGSM-YMGNP)**2+(ZGSM-ZMGNP)**2)
+
+      RETURN
+      END
+C
+C=======================================================================================
+C
+      SUBROUTINE T96_MGNP (XN_PD,VEL,XGSM,YGSM,ZGSM,XMGNP,YMGNP,ZMGNP,
+     * DIST,ID)
+C
+C  FOR ANY POINT OF SPACE WITH GIVEN COORDINATES (XGSM,YGSM,ZGSM), THIS SUBROUTINE DEFINES
+C  THE POSITION OF A POINT (XMGNP,YMGNP,ZMGNP) AT THE T96 MODEL MAGNETOPAUSE, HAVING THE
+C  SAME VALUE OF THE ELLIPSOIDAL TAU-COORDINATE, AND THE DISTANCE BETWEEN THEM.  THIS IS
+C  NOT THE SHORTEST DISTANCE D_MIN TO THE BOUNDARY, BUT DIST ASYMPTOTICALLY TENDS TO D_MIN,
+C  AS THE OBSERVATION POINT GETS CLOSER TO THE MAGNETOPAUSE.
+C
+C  INPUT: XN_PD - EITHER SOLAR WIND PROTON NUMBER DENSITY (PER C.C.) (IF VEL>0)
+C                    OR THE SOLAR WIND RAM PRESSURE IN NANOPASCALS   (IF VEL<0)
+C         VEL - EITHER SOLAR WIND VELOCITY (KM/SEC)
+C                  OR ANY NEGATIVE NUMBER, WHICH INDICATES THAT XN_PD STANDS
+C                     FOR THE SOLAR WIND PRESSURE, RATHER THAN FOR THE DENSITY
+C
+C         XGSM,YGSM,ZGSM - COORDINATES OF THE OBSERVATION POINT IN EARTH RADII
+C
+C  OUTPUT: XMGNP,YMGNP,ZMGNP - GSM POSITION OF THE BOUNDARY POINT, HAVING THE SAME
+C          VALUE OF TAU-COORDINATE AS THE OBSERVATION POINT (XGSM,YGSM,ZGSM)
+C          DIST -  THE DISTANCE BETWEEN THE TWO POINTS, IN RE,
+C          ID -    POSITION FLAG; ID=+1 (-1) MEANS THAT THE POINT (XGSM,YGSM,ZGSM)
+C          LIES INSIDE (OUTSIDE) THE MODEL MAGNETOPAUSE, RESPECTIVELY.
+C
+C  THE PRESSURE-DEPENDENT MAGNETOPAUSE IS THAT USED IN THE T96_01 MODEL
+C  (TSYGANENKO, JGR, V.100, P.5599, 1995; ESA SP-389, P.181, OCT. 1996)
+C
+c   AUTHOR:  N.A. TSYGANENKO
+C   DATE:    AUG.1, 1995, REVISED APRIL 3, 2003.
+C
+C
+C  DEFINE SOLAR WIND DYNAMIC PRESSURE (NANOPASCALS, ASSUMING 4% OF ALPHA-PARTICLES),
+C   IF NOT EXPLICITLY SPECIFIED IN THE INPUT:
+
+      IF (VEL.LT.0.) THEN
+       PD=XN_PD
+      ELSE
+       PD=1.94E-6*XN_PD*VEL**2
+C
+      ENDIF
+C
+C  RATIO OF PD TO THE AVERAGE PRESSURE, ASSUMED EQUAL TO 2 nPa:
+
+      RAT=PD/2.0
+      RAT16=RAT**0.14
+
+C (THE POWER INDEX 0.14 IN THE SCALING FACTOR IS THE BEST-FIT VALUE OBTAINED FROM DATA
+C    AND USED IN THE T96_01 VERSION)
+C
+C  VALUES OF THE MAGNETOPAUSE PARAMETERS FOR  PD = 2 nPa:
+C
+      A0=70.
+      S00=1.08
+      X00=5.48
+C
+C   VALUES OF THE MAGNETOPAUSE PARAMETERS, SCALED BY THE ACTUAL PRESSURE:
+C
+      A=A0/RAT16
+      S0=S00
+      X0=X00/RAT16
+      XM=X0-A
+C
+C  (XM IS THE X-COORDINATE OF THE "SEAM" BETWEEN THE ELLIPSOID AND THE CYLINDER)
+C
+C     (FOR DETAILS ON THE ELLIPSOIDAL COORDINATES, SEE THE PAPER:
+C      N.A.TSYGANENKO, SOLUTION OF CHAPMAN-FERRARO PROBLEM FOR AN
+C      ELLIPSOIDAL MAGNETOPAUSE, PLANET.SPACE SCI., V.37, P.1037, 1989).
+C
+       IF (YGSM.NE.0..OR.ZGSM.NE.0.) THEN
+          PHI=ATAN2(YGSM,ZGSM)
+       ELSE
+          PHI=0.
+       ENDIF
+C
+       RHO=SQRT(YGSM**2+ZGSM**2)
+C
+       IF (XGSM.LT.XM) THEN
+           XMGNP=XGSM
+           RHOMGNP=A*SQRT(S0**2-1)
+           YMGNP=RHOMGNP*SIN(PHI)
+           ZMGNP=RHOMGNP*COS(PHI)
+           DIST=SQRT((XGSM-XMGNP)**2+(YGSM-YMGNP)**2+(ZGSM-ZMGNP)**2)
+           IF (RHOMGNP.GT.RHO) ID=+1
+           IF (RHOMGNP.LE.RHO) ID=-1
+           RETURN
+       ENDIF
+C
+          XKSI=(XGSM-X0)/A+1.
+          XDZT=RHO/A
+          SQ1=SQRT((1.+XKSI)**2+XDZT**2)
+          SQ2=SQRT((1.-XKSI)**2+XDZT**2)
+          SIGMA=0.5*(SQ1+SQ2)
+          TAU=0.5*(SQ1-SQ2)
+C
+C  NOW CALCULATE (X,Y,Z) FOR THE CLOSEST POINT AT THE MAGNETOPAUSE
+C
+          XMGNP=X0-A*(1.-S0*TAU)
+          ARG=(S0**2-1.)*(1.-TAU**2)
+          IF (ARG.LT.0.) ARG=0.
+          RHOMGNP=A*SQRT(ARG)
+          YMGNP=RHOMGNP*SIN(PHI)
+          ZMGNP=RHOMGNP*COS(PHI)
+C
+C  NOW CALCULATE THE DISTANCE BETWEEN THE POINTS {XGSM,YGSM,ZGSM} AND {XMGNP,YMGNP,ZMGNP}:
+C   (IN GENERAL, THIS IS NOT THE SHORTEST DISTANCE D_MIN, BUT DIST ASYMPTOTICALLY TENDS
+C    TO D_MIN, AS WE ARE GETTING CLOSER TO THE MAGNETOPAUSE):
+C
+      DIST=SQRT((XGSM-XMGNP)**2+(YGSM-YMGNP)**2+(ZGSM-ZMGNP)**2)
+C
+      IF (SIGMA.GT.S0) ID=-1   !  ID=-1 MEANS THAT THE POINT LIES OUTSIDE
+      IF (SIGMA.LE.S0) ID=+1   !  ID=+1 MEANS THAT THE POINT LIES INSIDE
+C                                           THE MAGNETOSPHERE
+      RETURN
+      END
+C
+C===================================================================================
+C
+c
diff --git a/Tsyganenko-Models/Geopack_2005.html b/Tsyganenko-Models/Geopack_2005.html new file mode 100644 index 0000000..3e15867 --- /dev/null +++ b/Tsyganenko-Models/Geopack_2005.html @@ -0,0 +1,1703 @@ +c
+c
+c          ##########################################################################
+c          #                                                                        #
+c          #                             GEOPACK-2005                               #
+c          #                     (MAIN SET OF FORTRAN CODES)                        #
+c          #                                                                        #
+c          ##########################################################################
+C
+c
+c  This collection of subroutines is a result of several upgrades of the original package
+c  written by N. A. Tsyganenko in 1978-1979. This version is dated May 04, 2005. On that
+c  date, the IGRF coefficients were updated according to the recently published table of
+c  IGRF-10 coefficients, so that the main field model now extends through 2010 (a linear
+c  extrapolation is used for 2005 - 2010, based on the table of secular velocities). For
+c  more details, see  http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html (revision of 03/22/2005).
+c
+c
+c  Prefatory notes to the version of April 22, 2003:
+c
+c  This package represents an in-depth revision of the previous version, with significant
+c  changes in the format of calling statements. Users should familiarize themselves with
+c  the new formats and rules, and accordingly adjust their source codes, as specified
+c  below. Please consult the documentation file geopack-2005.doc (also available from this
+c  site) for detailed descriptions of individual subroutines.
+c
+c  The following changes were made to the previous release of GEOPACK (of Jan 5, 2001).
+c
+c (1) Subroutine IGRF, calculating the Earth's main field:
+
+c   (a) Two versions of this subroutine are provided here. In the first one (IGRF_GSM)
+c     both input (position) and output (field components) are in the Geocentric Solar-
+c     Magnetospheric Cartesian coordinates, while the second one (IGRF_GEO) uses sphe-
+c     rical geographical (geocentric) coordinates, as in the older releases.
+
+c   (b) updating of all expansion coefficients is now made separately in the s/r RECALC,
+c     which also takes into account the secular change of the coefficients within
+c     a given year (at the Earth's surface, the rate of the change can reach 7 nT/month).
+
+c   (c) the optimal length of spherical harmonic expansions is now automatically set
+c     inside the code, based on the radial distance, so that the deviation from the
+c     full-length approximation does not exceed 0.01 nT. (In the previous versions,
+c     the upper limit NM of the order of harmonics had to be specified by users),
+c
+c  (2) Subroutine DIP, calculating the Earth's field in the dipole approximation:
+
+c   (a) no longer accepts the tilt angle via the list of formal parameters. Instead,
+c     the sine SPS and cosine CPS of that angle are now forwarded into DIP via the
+c     first common block /GEOPACK1/.  Accordingly, there are two options: (i) to
+c     calculate SPS and CPS by calling RECALC before calling DIP, or (ii) to specify
+c     them explicitly. In the last case, SPS and CPS should be specified AFTER the
+c     invocation of RECALC (otherwise they will be overridden by those returned by
+c     RECALC).
+
+c   (b) the Earth's dipole moment is now calculated by RECALC, based on the table of
+c     the IGRF coefficients and their secular variation rates, for a given year and
+c     the day of the year, and the obtained value of the moment is forwarded into DIP
+c     via the second common block /GEOPACK2/. (In the previous versions, only a single
+c     fixed value was provided for the geodipole moment, corresponding to the most
+c     recent epoch).
+c
+c  (3) Subroutine RECALC now consolidates in one module all calculations needed to
+c     initialize and update the values of coefficients and quantities that vary in
+c     time, either due to secular changes of the main geomagnetic field or as a result
+c     of Earth's diurnal rotation and orbital motion around Sun. That allowed us to
+c     simplify the codes and make them more compiler-independent.
+c
+c  (4) Subroutine GEOMAG is now identical in its structure to other coordinate trans-
+c     formation subroutines. It no longer invokes RECALC from within GEOMAG, but uses
+c     precalculated values of the rotation matrix elements, obtained by a separate
+c     external invocation of RECALC. This eliminates possible interference of the
+c     two subroutines in the old version of the package.
+c
+c  (5) Subroutine TRACE (and the subsidiary modules STEP and RHAND):
+c
+c   (a) no longer needs to specify the highest order of spherical harmonics in the
+c     main geomagnetic field expansion - it is now calculated automatically inside the
+c     IGRF_GSM (or IGRF_GEO) subroutine.
+c
+c   (b) the internal field model can now be explicitly chosen by specifying the para-
+c      meter INNAME (either IGRF_GSM or DIP).
+c
+c  (6) A new subroutine BCARSP was added, providing a conversion of Cartesian field
+c     components into spherical ones (operation, inverse to that performed by the sub-
+c     routine  BSPCAR).
+c
+c  (7) Two new subroutines were added, SHUETAL_MGNP and T96_MGNP, providing the position
+c     of the magnetopause, according to the model of Shue et al. [1998] and the one
+c     used in the T96 magnetospheric magnetic field model.
+c
+c
+c----------------------------------------------------------------------------------
+c
+      SUBROUTINE IGRF_GSM (XGSM,YGSM,ZGSM,HXGSM,HYGSM,HZGSM)
+c
+C  CALCULATES COMPONENTS OF THE MAIN (INTERNAL) GEOMAGNETIC FIELD IN THE GEOCENTRIC SOLAR
+C  MAGNETOSPHERIC COORDINATE SYSTEM, USING IAGA INTERNATIONAL GEOMAGNETIC REFERENCE MODEL
+C  COEFFICIENTS (e.g., http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html Revised: 22 March, 2005)
+c
+C
+C  BEFORE THE FIRST CALL OF THIS SUBROUTINE, OR IF THE DATE/TIME (IYEAR,IDAY,IHOUR,MIN,ISEC)
+C  WAS CHANGED, THE MODEL COEFFICIENTS AND GEO-GSM ROTATION MATRIX ELEMENTS SHOULD BE UPDATED
+c  BY CALLING THE SUBROUTINE RECALC
+C
+C-----INPUT PARAMETERS:
+C
+C     XGSM,YGSM,ZGSM - CARTESIAN GSM COORDINATES (IN UNITS RE=6371.2 KM)
+C
+C-----OUTPUT PARAMETERS:
+C
+C     HXGSM,HYGSM,HZGSM - CARTESIAN GSM COMPONENTS OF THE MAIN GEOMAGNETIC FIELD IN NANOTESLA
+C
+C     LAST MODIFICATION:  MAY 4, 2005.
+C     THIS VERSION OF THE CODE ACCEPTS DATES FROM 1965 THROUGH 2010.
+c
+C     AUTHOR: N. A. TSYGANENKO
+C
+C
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+
+      DIMENSION A(14),B(14)
+
+      CALL GEOGSM (XGEO,YGEO,ZGEO,XGSM,YGSM,ZGSM,-1)
+      RHO2=XGEO**2+YGEO**2
+      R=SQRT(RHO2+ZGEO**2)
+      C=ZGEO/R
+      RHO=SQRT(RHO2)
+      S=RHO/R
+      IF (S.LT.1.E-5) THEN
+        CF=1.
+        SF=0.
+      ELSE
+        CF=XGEO/RHO
+        SF=YGEO/RHO
+      ENDIF
+C
+      PP=1./R
+      P=PP
+C
+C  IN THIS NEW VERSION, THE OPTIMAL VALUE OF THE PARAMETER NM (MAXIMAL ORDER OF THE SPHERICAL
+C    HARMONIC EXPANSION) IS NOT USER-PRESCRIBED, BUT CALCULATED INSIDE THE SUBROUTINE, BASED
+C      ON THE VALUE OF THE RADIAL DISTANCE R:
+C
+      IRP3=R+2
+      NM=3+30/IRP3
+      IF (NM.GT.13) NM=13
+
+      K=NM+1
+      DO 150 N=1,K
+         P=P*PP
+         A(N)=P
+150      B(N)=P*N
+
+      P=1.
+      D=0.
+      BBR=0.
+      BBT=0.
+      BBF=0.
+
+      DO 200 M=1,K
+         IF(M.EQ.1) GOTO 160
+         MM=M-1
+         W=X
+         X=W*CF+Y*SF
+         Y=Y*CF-W*SF
+         GOTO 170
+160      X=0.
+         Y=1.
+170      Q=P
+         Z=D
+         BI=0.
+         P2=0.
+         D2=0.
+         DO 190 N=M,K
+            AN=A(N)
+            MN=N*(N-1)/2+M
+            E=G(MN)
+            HH=H(MN)
+            W=E*Y+HH*X
+            BBR=BBR+B(N)*W*Q
+            BBT=BBT-AN*W*Z
+            IF(M.EQ.1) GOTO 180
+            QQ=Q
+            IF(S.LT.1.E-5) QQ=Z
+            BI=BI+AN*(E*X-HH*Y)*QQ
+180         XK=REC(MN)
+            DP=C*Z-S*Q-XK*D2
+            PM=C*Q-XK*P2
+            D2=Z
+            P2=Q
+            Z=DP
+190        Q=PM
+         D=S*D+C*P
+         P=S*P
+         IF(M.EQ.1) GOTO 200
+         BI=BI*MM
+         BBF=BBF+BI
+200   CONTINUE
+C
+      BR=BBR
+      BT=BBT
+      IF(S.LT.1.E-5) GOTO 210
+      BF=BBF/S
+      GOTO 211
+210   IF(C.LT.0.) BBF=-BBF
+      BF=BBF
+
+211   HE=BR*S+BT*C
+      HXGEO=HE*CF-BF*SF
+      HYGEO=HE*SF+BF*CF
+      HZGEO=BR*C-BT*S
+
+      CALL GEOGSM (HXGEO,HYGEO,HZGEO,HXGSM,HYGSM,HZGSM,1)
+
+      RETURN
+      END
+C
+c==========================================================================================
+C
+c
+      SUBROUTINE IGRF_GEO (R,THETA,PHI,BR,BTHETA,BPHI)
+c
+C  CALCULATES COMPONENTS OF THE MAIN (INTERNAL) GEOMAGNETIC FIELD IN THE SPHERICAL GEOGRAPHIC
+C  (GEOCENTRIC) COORDINATE SYSTEM, USING IAGA INTERNATIONAL GEOMAGNETIC REFERENCE MODEL
+C  COEFFICIENTS  (e.g., http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html, revised: 22 March, 2005)
+C
+C  BEFORE THE FIRST CALL OF THIS SUBROUTINE, OR IF THE DATE (IYEAR AND IDAY) WAS CHANGED,
+C  THE MODEL COEFFICIENTS SHOULD BE UPDATED BY CALLING THE SUBROUTINE RECALC
+C
+C-----INPUT PARAMETERS:
+C
+C   R, THETA, PHI - SPHERICAL GEOGRAPHIC (GEOCENTRIC) COORDINATES:
+C   RADIAL DISTANCE R IN UNITS RE=6371.2 KM, COLATITUDE THETA AND LONGITUDE PHI IN RADIANS
+C
+C-----OUTPUT PARAMETERS:
+C
+C     BR, BTHETA, BPHI - SPHERICAL COMPONENTS OF THE MAIN GEOMAGNETIC FIELD IN NANOTESLA
+C      (POSITIVE BR OUTWARD, BTHETA SOUTHWARD, BPHI EASTWARD)
+C
+C     LAST MODIFICATION:  MAY 4, 2005.
+C     THIS VERSION OF THE  CODE ACCEPTS DATES FROM 1965 THROUGH 2010.
+c
+C     AUTHOR: N. A. TSYGANENKO
+C
+C
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+
+      DIMENSION A(14),B(14)
+
+      C=COS(THETA)
+      S=SIN(THETA)
+      CF=COS(PHI)
+      SF=SIN(PHI)
+C
+      PP=1./R
+      P=PP
+C
+C  IN THIS NEW VERSION, THE OPTIMAL VALUE OF THE PARAMETER NM (MAXIMAL ORDER OF THE SPHERICAL
+C    HARMONIC EXPANSION) IS NOT USER-PRESCRIBED, BUT CALCULATED INSIDE THE SUBROUTINE, BASED
+C      ON THE VALUE OF THE RADIAL DISTANCE R:
+C
+      IRP3=R+2
+      NM=3+30/IRP3
+      IF (NM.GT.13) NM=13
+
+      K=NM+1
+      DO 150 N=1,K
+         P=P*PP
+         A(N)=P
+150      B(N)=P*N
+
+      P=1.
+      D=0.
+      BBR=0.
+      BBT=0.
+      BBF=0.
+
+      DO 200 M=1,K
+         IF(M.EQ.1) GOTO 160
+         MM=M-1
+         W=X
+         X=W*CF+Y*SF
+         Y=Y*CF-W*SF
+         GOTO 170
+160      X=0.
+         Y=1.
+170      Q=P
+         Z=D
+         BI=0.
+         P2=0.
+         D2=0.
+         DO 190 N=M,K
+            AN=A(N)
+            MN=N*(N-1)/2+M
+            E=G(MN)
+            HH=H(MN)
+            W=E*Y+HH*X
+            BBR=BBR+B(N)*W*Q
+            BBT=BBT-AN*W*Z
+            IF(M.EQ.1) GOTO 180
+            QQ=Q
+            IF(S.LT.1.E-5) QQ=Z
+            BI=BI+AN*(E*X-HH*Y)*QQ
+180         XK=REC(MN)
+            DP=C*Z-S*Q-XK*D2
+            PM=C*Q-XK*P2
+            D2=Z
+            P2=Q
+            Z=DP
+190        Q=PM
+         D=S*D+C*P
+         P=S*P
+         IF(M.EQ.1) GOTO 200
+         BI=BI*MM
+         BBF=BBF+BI
+200   CONTINUE
+C
+      BR=BBR
+      BTHETA=BBT
+      IF(S.LT.1.E-5) GOTO 210
+      BPHI=BBF/S
+      RETURN
+210   IF(C.LT.0.) BBF=-BBF
+      BPHI=BBF
+
+      RETURN
+      END
+C
+c==========================================================================================
+c
+       SUBROUTINE DIP (XGSM,YGSM,ZGSM,BXGSM,BYGSM,BZGSM)
+C
+C  CALCULATES GSM COMPONENTS OF A GEODIPOLE FIELD WITH THE DIPOLE MOMENT
+C  CORRESPONDING TO THE EPOCH, SPECIFIED BY CALLING SUBROUTINE RECALC (SHOULD BE
+C  INVOKED BEFORE THE FIRST USE OF THIS ONE AND IN CASE THE DATE/TIME WAS CHANGED).
+C
+C--INPUT PARAMETERS: XGSM,YGSM,ZGSM - GSM COORDINATES IN RE (1 RE = 6371.2 km)
+C
+C--OUTPUT PARAMETERS: BXGSM,BYGSM,BZGSM - FIELD COMPONENTS IN GSM SYSTEM, IN NANOTESLA.
+C
+C  LAST MODIFICATION: MAY 4, 2005
+C
+C  AUTHOR: N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ AAA(10),SPS,CPS,BBB(23)
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+
+      DIPMOM=SQRT(G(2)**2+G(3)**2+H(3)**2)
+
+      P=XGSM**2
+      U=ZGSM**2
+      V=3.*ZGSM*XGSM
+      T=YGSM**2
+      Q=DIPMOM/SQRT(P+T+U)**5
+      BXGSM=Q*((T+U-2.*P)*SPS-V*CPS)
+      BYGSM=-3.*YGSM*Q*(XGSM*SPS+ZGSM*CPS)
+      BZGSM=Q*((P+T-2.*U)*CPS-V*SPS)
+      RETURN
+      END
+
+C*******************************************************************
+c
+      SUBROUTINE SUN (IYEAR,IDAY,IHOUR,MIN,ISEC,GST,SLONG,SRASN,SDEC)
+C
+C  CALCULATES FOUR QUANTITIES NECESSARY FOR COORDINATE TRANSFORMATIONS
+C  WHICH DEPEND ON SUN POSITION (AND, HENCE, ON UNIVERSAL TIME AND SEASON)
+C
+C-------  INPUT PARAMETERS:
+C  IYR,IDAY,IHOUR,MIN,ISEC -  YEAR, DAY, AND UNIVERSAL TIME IN HOURS, MINUTES,
+C    AND SECONDS  (IDAY=1 CORRESPONDS TO JANUARY 1).
+C
+C-------  OUTPUT PARAMETERS:
+C  GST - GREENWICH MEAN SIDEREAL TIME, SLONG - LONGITUDE ALONG ECLIPTIC
+C  SRASN - RIGHT ASCENSION,  SDEC - DECLINATION  OF THE SUN (RADIANS)
+C  ORIGINAL VERSION OF THIS SUBROUTINE HAS BEEN COMPILED FROM:
+C  RUSSELL, C.T., COSMIC ELECTRODYNAMICS, 1971, V.2, PP.184-196.
+C
+C  LAST MODIFICATION:  MARCH 31, 2003 (ONLY SOME NOTATION CHANGES)
+C
+C     ORIGINAL VERSION WRITTEN BY:    Gilbert D. Mead
+C
+      DOUBLE PRECISION DJ,FDAY
+      DATA RAD/57.295779513/
+C
+      IF(IYEAR.LT.1901.OR.IYEAR.GT.2099) RETURN
+      FDAY=DFLOAT(IHOUR*3600+MIN*60+ISEC)/86400.D0
+      DJ=365*(IYEAR-1900)+(IYEAR-1901)/4+IDAY-0.5D0+FDAY
+      T=DJ/36525.
+      VL=DMOD(279.696678+0.9856473354*DJ,360.D0)
+      GST=DMOD(279.690983+.9856473354*DJ+360.*FDAY+180.,360.D0)/RAD
+      G=DMOD(358.475845+0.985600267*DJ,360.D0)/RAD
+      SLONG=(VL+(1.91946-0.004789*T)*SIN(G)+0.020094*SIN(2.*G))/RAD
+      IF(SLONG.GT.6.2831853) SLONG=SLONG-6.2831853
+      IF (SLONG.LT.0.) SLONG=SLONG+6.2831853
+      OBLIQ=(23.45229-0.0130125*T)/RAD
+      SOB=SIN(OBLIQ)
+      SLP=SLONG-9.924E-5
+C
+C   THE LAST CONSTANT IS A CORRECTION FOR THE ANGULAR ABERRATION  DUE TO
+C   THE ORBITAL MOTION OF THE EARTH
+C
+      SIND=SOB*SIN(SLP)
+      COSD=SQRT(1.-SIND**2)
+      SC=SIND/COSD
+      SDEC=ATAN(SC)
+      SRASN=3.141592654-ATAN2(COS(OBLIQ)/SOB*SC,-COS(SLP)/COSD)
+      RETURN
+      END
+C
+C================================================================================
+c
+      SUBROUTINE SPHCAR (R,THETA,PHI,X,Y,Z,J)
+C
+C   CONVERTS SPHERICAL COORDS INTO CARTESIAN ONES AND VICA VERSA
+C    (THETA AND PHI IN RADIANS).
+C
+C                  J>0            J<0
+C-----INPUT:   J,R,THETA,PHI     J,X,Y,Z
+C----OUTPUT:      X,Y,Z        R,THETA,PHI
+C
+C  NOTE: AT THE POLES (X=0 AND Y=0) WE ASSUME PHI=0 (WHEN CONVERTING
+C        FROM CARTESIAN TO SPHERICAL COORDS, I.E., FOR J<0)
+C
+C   LAST MOFIFICATION:  APRIL 1, 2003 (ONLY SOME NOTATION CHANGES AND MORE
+C                         COMMENTS ADDED)
+C
+C   AUTHOR:  N. A. TSYGANENKO
+C
+      IF(J.GT.0) GOTO 3
+      SQ=X**2+Y**2
+      R=SQRT(SQ+Z**2)
+      IF (SQ.NE.0.) GOTO 2
+      PHI=0.
+      IF (Z.LT.0.) GOTO 1
+      THETA=0.
+      RETURN
+  1   THETA=3.141592654
+      RETURN
+  2   SQ=SQRT(SQ)
+      PHI=ATAN2(Y,X)
+      THETA=ATAN2(SQ,Z)
+      IF (PHI.LT.0.) PHI=PHI+6.28318531
+      RETURN
+  3   SQ=R*SIN(THETA)
+      X=SQ*COS(PHI)
+      Y=SQ*SIN(PHI)
+      Z=R*COS(THETA)
+      RETURN
+      END
+C
+C===========================================================================
+c
+      SUBROUTINE BSPCAR (THETA,PHI,BR,BTHETA,BPHI,BX,BY,BZ)
+C
+C   CALCULATES CARTESIAN FIELD COMPONENTS FROM SPHERICAL ONES
+C-----INPUT:   THETA,PHI - SPHERICAL ANGLES OF THE POINT IN RADIANS
+C              BR,BTHETA,BPHI -  SPHERICAL COMPONENTS OF THE FIELD
+C-----OUTPUT:  BX,BY,BZ - CARTESIAN COMPONENTS OF THE FIELD
+C
+C   LAST MOFIFICATION:  APRIL 1, 2003 (ONLY SOME NOTATION CHANGES)
+C
+C   WRITTEN BY:  N. A. TSYGANENKO
+C
+      S=SIN(THETA)
+      C=COS(THETA)
+      SF=SIN(PHI)
+      CF=COS(PHI)
+      BE=BR*S+BTHETA*C
+      BX=BE*CF-BPHI*SF
+      BY=BE*SF+BPHI*CF
+      BZ=BR*C-BTHETA*S
+      RETURN
+      END
+c
+C==============================================================================
+C
+      SUBROUTINE BCARSP (X,Y,Z,BX,BY,BZ,BR,BTHETA,BPHI)
+C
+CALCULATES SPHERICAL FIELD COMPONENTS FROM THOSE IN CARTESIAN SYSTEM
+C
+C-----INPUT:   X,Y,Z  - CARTESIAN COMPONENTS OF THE POSITION VECTOR
+C              BX,BY,BZ - CARTESIAN COMPONENTS OF THE FIELD VECTOR
+C-----OUTPUT:  BR,BTHETA,BPHI - SPHERICAL COMPONENTS OF THE FIELD VECTOR
+C
+C  NOTE: AT THE POLES (THETA=0 OR THETA=PI) WE ASSUME PHI=0,
+C        AND HENCE BTHETA=BX, BPHI=BY
+C
+C   WRITTEN AND ADDED TO THIS PACKAGE:  APRIL 1, 2003,
+C   AUTHOR:   N. A. TSYGANENKO
+C
+      RHO2=X**2+Y**2
+      R=SQRT(RHO2+Z**2)
+      RHO=SQRT(RHO2)
+
+      IF (RHO.NE.0.) THEN
+        CPHI=X/RHO
+        SPHI=Y/RHO
+       ELSE
+        CPHI=1.
+        SPHI=0.
+      ENDIF
+
+      CT=Z/R
+      ST=RHO/R
+
+      BR=(X*BX+Y*BY+Z*BZ)/R
+      BTHETA=(BX*CPHI+BY*SPHI)*CT-BZ*ST
+      BPHI=BY*CPHI-BX*SPHI
+
+      RETURN
+      END
+C
+c=====================================================================================
+C
+      SUBROUTINE RECALC (IYEAR,IDAY,IHOUR,MIN,ISEC)
+C
+C  1. PREPARES ELEMENTS OF ROTATION MATRICES FOR TRANSFORMATIONS OF VECTORS BETWEEN
+C     SEVERAL COORDINATE SYSTEMS, MOST FREQUENTLY USED IN SPACE PHYSICS.
+C
+C  2. PREPARES COEFFICIENTS USED IN THE CALCULATION OF THE MAIN GEOMAGNETIC FIELD
+C      (IGRF MODEL)
+C
+C  THIS SUBROUTINE SHOULD BE INVOKED BEFORE USING THE FOLLOWING SUBROUTINES:
+C    IGRF_GEO, IGRF_GSM, DIP, GEOMAG, GEOGSM, MAGSM, SMGSM, GSMGSE, GEIGEO.
+C
+C  THERE IS NO NEED TO REPEATEDLY INVOKE RECALC, IF MULTIPLE CALCULATIONS ARE MADE
+C    FOR THE SAME DATE AND TIME.
+C
+C-----INPUT PARAMETERS:
+C
+C     IYEAR   -  YEAR NUMBER (FOUR DIGITS)
+C     IDAY  -  DAY OF YEAR (DAY 1 = JAN 1)
+C     IHOUR -  HOUR OF DAY (00 TO 23)
+C     MIN   -  MINUTE OF HOUR (00 TO 59)
+C     ISEC  -  SECONDS OF MINUTE (00 TO 59)
+C
+C-----OUTPUT PARAMETERS:   NONE (ALL OUTPUT QUANTITIES ARE PLACED
+C                         INTO THE COMMON BLOCKS /GEOPACK1/ AND /GEOPACK2/)
+C
+C    OTHER SUBROUTINES CALLED BY THIS ONE: SUN
+C
+C    AUTHOR:  N.A. TSYGANENKO
+C    DATE:    DEC.1, 1991
+C
+c    CORRECTION OF MAY 9, 2006:  INTERPOLATION OF THE COEFFICIENTS (BETWEEN
+C     LABELS 50 AND 105) IS NOW MADE THROUGH THE LAST ELEMENT OF THE ARRAYS
+C     G(105)  AND H(105) (PREVIOUSLY MADE ONLY THROUGH N=66, WHICH IN SOME
+C     CASES CAUSED RUNTIME ERRORS)
+c
+C    REVISION OF MAY 3, 2005:
+C     The table of IGRF coefficients was extended to include those for the epoch 2005
+c       the maximal order of spherical harmonics was also increased up to 13
+c         (for details, see http://www.ngdc.noaa.gov/IAGA/vmod/igrf.html)
+c
+C    REVISION OF APRIL 3, 2003:
+c     The code now includes preparation of the model coefficients for the subroutines
+c       IGRF and GEOMAG. This eliminates the need for the SAVE statements, used in the
+c        old versions, making the codes easier and more compiler-independent.
+C
+      COMMON /GEOPACK1/ ST0,CT0,SL0,CL0,CTCL,STCL,CTSL,STSL,SFI,CFI,SPS,
+     * CPS,SHI,CHI,HI,PSI,XMUT,A11,A21,A31,A12,A22,A32,A13,A23,A33,DS3,
+     * CGST,SGST,BA(6)
+C
+C  THE COMMON BLOCK /GEOPACK1/ CONTAINS ELEMENTS OF THE ROTATION MATRICES AND OTHER
+C   PARAMETERS RELATED TO THE COORDINATE TRANSFORMATIONS PERFORMED BY THIS PACKAGE
+C
+      COMMON /GEOPACK2/ G(105),H(105),REC(105)
+C
+C  THE COMMON BLOCK /GEOPACK2/ CONTAINS COEFFICIENTS OF THE IGRF FIELD MODEL, CALCULATED
+C    FOR A GIVEN YEAR AND DAY FROM THEIR STANDARD EPOCH VALUES. THE ARRAY REC CONTAINS
+C    COEFFICIENTS USED IN THE RECURSION RELATIONS FOR LEGENDRE ASSOCIATE POLYNOMIALS.
+C
+      DIMENSION G65(105),H65(105),G70(105),H70(105),G75(105),H75(105),
+     + G80(105),H80(105),G85(105),H85(105),G90(105),H90(105),G95(105),
+     + H95(105),G00(105),H00(105),G05(105),H05(105),DG05(45),DH05(45)
+c
+      DATA G65/0.,-30334.,-2119.,-1662.,2997.,1594.,1297.,-2038.,1292.,
+     *856.,957.,804.,479.,-390.,252.,-219.,358.,254.,-31.,-157.,-62.,
+     *45.,61.,8.,-228.,4.,1.,-111.,75.,-57.,4.,13.,-26.,-6.,13.,1.,13.,
+     *5.,-4.,-14.,0.,8.,-1.,11.,4.,8.,10.,2.,-13.,10.,-1.,-1.,5.,1.,-2.,
+     *-2.,-3.,2.,-5.,-2.,4.,4.,0.,2.,2.,0.,39*0./
+      DATA H65/0.,0.,5776.,0.,-2016.,114.,0.,-404.,240.,-165.,0.,148.,
+     *-269.,13.,-269.,0.,19.,128.,-126.,-97.,81.,0.,-11.,100.,68.,-32.,
+     *-8.,-7.,0.,-61.,-27.,-2.,6.,26.,-23.,-12.,0.,7.,-12.,9.,-16.,4.,
+     *24.,-3.,-17.,0.,-22.,15.,7.,-4.,-5.,10.,10.,-4.,1.,0.,2.,1.,2.,
+     *6.,-4.,0.,-2.,3.,0.,-6.,39*0./
+c
+      DATA G70/0.,-30220.,-2068.,-1781.,3000.,1611.,1287.,-2091.,1278.,
+     *838.,952.,800.,461.,-395.,234.,-216.,359.,262.,-42.,-160.,-56.,
+     *43.,64.,15.,-212.,2.,3.,-112.,72.,-57.,1.,14.,-22.,-2.,13.,-2.,
+     *14.,6.,-2.,-13.,-3.,5.,0.,11.,3.,8.,10.,2.,-12.,10.,-1.,0.,3.,
+     *1.,-1.,-3.,-3.,2.,-5.,-1.,6.,4.,1.,0.,3.,-1.,39*0./
+      DATA H70/0.,0.,5737.,0.,-2047.,25.,0.,-366.,251.,-196.,0.,167.,
+     *-266.,26.,-279.,0.,26.,139.,-139.,-91.,83.,0.,-12.,100.,72.,-37.,
+     *-6.,1.,0.,-70.,-27.,-4.,8.,23.,-23.,-11.,0.,7.,-15.,6.,-17.,6.,
+     *21.,-6.,-16.,0.,-21.,16.,6.,-4.,-5.,10.,11.,-2.,1.,0.,1.,1.,3.,
+     *4.,-4.,0.,-1.,3.,1.,-4.,39*0./
+c
+      DATA G75/0.,-30100.,-2013.,-1902.,3010.,1632.,1276.,-2144.,1260.,
+     *830.,946.,791.,438.,-405.,216.,-218.,356.,264.,-59.,-159.,-49.,
+     *45.,66.,28.,-198.,1.,6.,-111.,71.,-56.,1.,16.,-14.,0.,12.,-5.,
+     *14.,6.,-1.,-12.,-8.,4.,0.,10.,1.,7.,10.,2.,-12.,10.,-1.,-1.,4.,
+     *1.,-2.,-3.,-3.,2.,-5.,-2.,5.,4.,1.,0.,3.,-1.,39*0./
+      DATA H75/0.,0.,5675.,0.,-2067.,-68.,0.,-333.,262.,-223.,0.,191.,
+     *-265.,39.,-288.,0.,31.,148.,-152.,-83.,88.,0.,-13.,99.,75.,-41.,
+     *-4.,11.,0.,-77.,-26.,-5.,10.,22.,-23.,-12.,0.,6.,-16.,4.,-19.,6.,
+     *18.,-10.,-17.,0.,-21.,16.,7.,-4.,-5.,10.,11.,-3.,1.,0.,1.,1.,3.,
+     *4.,-4.,-1.,-1.,3.,1.,-5.,39*0./
+c
+      DATA G80/0.,-29992.,-1956.,-1997.,3027.,1663.,1281.,-2180.,1251.,
+     *833.,938.,782.,398.,-419.,199.,-218.,357.,261.,-74.,-162.,-48.,
+     *48.,66.,42.,-192.,4.,14.,-108.,72.,-59.,2.,21.,-12.,1.,11.,-2.,
+     *18.,6.,0.,-11.,-7.,4.,3.,6.,-1.,5.,10.,1.,-12.,9.,-3.,-1.,7.,2.,
+     *-5.,-4.,-4.,2.,-5.,-2.,5.,3.,1.,2.,3.,0.,39*0./
+      DATA H80/0.,0.,5604.,0.,-2129.,-200.,0.,-336.,271.,-252.,0.,212.,
+     *-257.,53.,-297.,0.,46.,150.,-151.,-78.,92.,0.,-15.,93.,71.,-43.,
+     *-2.,17.,0.,-82.,-27.,-5.,16.,18.,-23.,-10.,0.,7.,-18.,4.,-22.,9.,
+     *16.,-13.,-15.,0.,-21.,16.,9.,-5.,-6.,9.,10.,-6.,2.,0.,1.,0.,3.,
+     *6.,-4.,0.,-1.,4.,0.,-6.,39*0./
+c
+      DATA G85/0.,-29873.,-1905.,-2072.,3044.,1687.,1296.,-2208.,1247.,
+     *829.,936.,780.,361.,-424.,170.,-214.,355.,253.,-93.,-164.,-46.,
+     *53.,65.,51.,-185.,4.,16.,-102.,74.,-62.,3.,24.,-6.,4.,10.,0.,21.,
+     *6.,0.,-11.,-9.,4.,4.,4.,-4.,5.,10.,1.,-12.,9.,-3.,-1.,7.,1.,-5.,
+     *-4.,-4.,3.,-5.,-2.,5.,3.,1.,2.,3.,0.,39*0./
+      DATA H85/0.,0.,5500.,0.,-2197.,-306.,0.,-310.,284.,-297.,0.,232.,
+     *-249.,69.,-297.,0.,47.,150.,-154.,-75.,95.,0.,-16.,88.,69.,-48.,
+     *-1.,21.,0.,-83.,-27.,-2.,20.,17.,-23.,-7.,0.,8.,-19.,5.,-23.,11.,
+     *14.,-15.,-11.,0.,-21.,15.,9.,-6.,-6.,9.,9.,-7.,2.,0.,1.,0.,3.,
+     *6.,-4.,0.,-1.,4.,0.,-6.,39*0./
+c
+      DATA G90/0., -29775.,  -1848.,  -2131.,   3059.,   1686.,   1314.,
+     *     -2239.,   1248.,    802.,    939.,    780.,    325.,   -423.,
+     *       141.,   -214.,    353.,    245.,   -109.,   -165.,    -36.,
+     *        61.,     65.,     59.,   -178.,      3.,     18.,    -96.,
+     *        77.,    -64.,      2.,     26.,     -1.,      5.,      9.,
+     *         0.,     23.,      5.,     -1.,    -10.,    -12.,      3.,
+     *         4.,      2.,     -6.,      4.,      9.,      1.,    -12.,
+     *         9.,     -4.,     -2.,      7.,      1.,     -6.,     -3.,
+     *        -4.,      2.,     -5.,     -2.,      4.,      3.,      1.,
+     *         3.,      3.,      0.,  39*0./
+
+      DATA H90/0.,      0.,   5406.,      0.,  -2279.,   -373.,      0.,
+     *      -284.,    293.,   -352.,      0.,    247.,   -240.,     84.,
+     *      -299.,      0.,     46.,    154.,   -153.,    -69.,     97.,
+     *         0.,    -16.,     82.,     69.,    -52.,      1.,     24.,
+     *         0.,    -80.,    -26.,      0.,     21.,     17.,    -23.,
+     *        -4.,      0.,     10.,    -19.,      6.,    -22.,     12.,
+     *        12.,    -16.,    -10.,      0.,    -20.,     15.,     11.,
+     *        -7.,     -7.,      9.,      8.,     -7.,      2.,      0.,
+     *         2.,      1.,      3.,      6.,     -4.,      0.,     -2.,
+     *         3.,     -1.,     -6.,   39*0./
+
+      DATA G95/0., -29692.,  -1784.,  -2200.,   3070.,   1681.,   1335.,
+     *     -2267.,   1249.,    759.,    940.,    780.,    290.,   -418.,
+     *       122.,   -214.,    352.,    235.,   -118.,   -166.,    -17.,
+     *        68.,     67.,     68.,   -170.,     -1.,     19.,    -93.,
+     *        77.,    -72.,      1.,     28.,      5.,      4.,      8.,
+     *        -2.,     25.,      6.,     -6.,     -9.,    -14.,      9.,
+     *         6.,     -5.,     -7.,      4.,      9.,      3.,    -10.,
+     *         8.,     -8.,     -1.,     10.,     -2.,     -8.,     -3.,
+     *        -6.,      2.,     -4.,     -1.,      4.,      2.,      2.,
+     *         5.,      1.,      0.,    39*0./
+
+      DATA H95/0.,      0.,   5306.,      0.,  -2366.,   -413.,      0.,
+     *      -262.,    302.,   -427.,      0.,    262.,   -236.,     97.,
+     *      -306.,      0.,     46.,    165.,   -143.,    -55.,    107.,
+     *         0.,    -17.,     72.,     67.,    -58.,      1.,     36.,
+     *         0.,    -69.,    -25.,      4.,     24.,     17.,    -24.,
+     *        -6.,      0.,     11.,    -21.,      8.,    -23.,     15.,
+     *        11.,    -16.,    -4.,      0.,    -20.,     15.,     12.,
+     *        -6.,     -8.,      8.,      5.,     -8.,      3.,      0.,
+     *         1.,      0.,      4.,      5.,     -5.,     -1.,     -2.,
+     *         1.,     -2.,     -7.,    39*0./
+
+      DATA G00/0.,-29619.4, -1728.2, -2267.7,  3068.4,  1670.9,  1339.6,
+     *     -2288.,  1252.1,   714.5,   932.3,   786.8,    250.,   -403.,
+     *      111.3,  -218.8,   351.4,   222.3,  -130.4,  -168.6,   -12.9,
+     *       72.3,    68.2,    74.2,  -160.9,    -5.9,    16.9,   -90.4,
+     *       79.0,   -74.0,      0.,    33.3,     9.1,     6.9,     7.3,
+     *       -1.2,    24.4,     6.6,    -9.2,    -7.9,   -16.6,     9.1,
+     *        7.0,    -7.9,     -7.,      5.,     9.4,      3.,   - 8.4,
+     *        6.3,    -8.9,    -1.5,     9.3,    -4.3,    -8.2,    -2.6,
+     *        -6.,     1.7,    -3.1,    -0.5,     3.7,      1.,      2.,
+     *        4.2,     0.3,    -1.1,     2.7,    -1.7,    -1.9,     1.5,
+     *       -0.1,     0.1,    -0.7,     0.7,     1.7,     0.1,     1.2,
+     *        4.0,    -2.2,    -0.3,     0.2,     0.9,    -0.2,     0.9,
+     *       -0.5,     0.3,    -0.3,    -0.4,    -0.1,    -0.2,    -0.4,
+     *       -0.2,    -0.9,     0.3,     0.1,    -0.4,     1.3,    -0.4,
+     *        0.7,    -0.4,     0.3,    -0.1,     0.4,      0.,     0.1/
+
+
+      DATA H00/0.,      0.,  5186.1,      0., -2481.6,  -458.0,      0.,
+     *     -227.6,   293.4,  -491.1,      0.,   272.6,  -231.9,   119.8,
+     *     -303.8,      0.,    43.8,   171.9,  -133.1,   -39.3,   106.3,
+     *         0.,   -17.4,    63.7,    65.1,   -61.2,     0.7,    43.8,
+     *         0.,   -64.6,   -24.2,     6.2,     24.,    14.8,   -25.4,
+     *       -5.8,     0.0,    11.9,   -21.5,     8.5,   -21.5,    15.5,
+     *        8.9,   -14.9,    -2.1,     0.0,   -19.7,    13.4,    12.5,
+     *       -6.2,    -8.4,     8.4,     3.8,    -8.2,     4.8,     0.0,
+     *        1.7,     0.0,     4.0,     4.9,    -5.9,    -1.2,    -2.9,
+     *        0.2,    -2.2,    -7.4,     0.0,     0.1,     1.3,    -0.9,
+     *       -2.6,     0.9,    -0.7,    -2.8,    -0.9,    -1.2,    -1.9,
+     *       -0.9,     0.0,    -0.4,     0.3,     2.5,    -2.6,     0.7,
+     *        0.3,     0.0,     0.0,     0.3,    -0.9,    -0.4,     0.8,
+     *        0.0,    -0.9,     0.2,     1.8,    -0.4,    -1.0,    -0.1,
+     *        0.7,     0.3,     0.6,     0.3,    -0.2,    -0.5,    -0.9/
+     *
+
+      DATA G05/0.,-29556.8, -1671.8, -2340.5,   3047.,  1656.9,  1335.7,
+     *    -2305.3,  1246.8,   674.4,   919.8,   798.2,   211.5,  -379.5,
+     *      100.2,  -227.6,   354.4,   208.8,  -136.6,  -168.3,   -14.1,
+     *       72.9,    69.6,    76.6,  -151.1,   -15.0,    14.7,   -86.4,
+     *       79.8,   -74.4,    -1.4,    38.6,    12.3,     9.4,     5.5,
+     *        2.0,    24.8,     7.7,   -11.4,    -6.8,   -18.0,    10.0,
+     *        9.4,   -11.4,    -5.0,     5.6,     9.8,     3.6,    -7.0,
+     *        5.0,   -10.8,    -1.3,     8.7,    -6.7,    -9.2,    -2.2,
+     *       -6.3,     1.6,    -2.5,    -0.1,     3.0,     0.3,     2.1,
+     *        3.9,    -0.1,    -2.2,     2.9,    -1.6,    -1.7,     1.5,
+     *       -0.2,     0.2,    -0.7,     0.5,     1.8,     0.1,     1.0,
+     *        4.1,    -2.2,    -0.3,     0.3,     0.9,    -0.4,     1.0,
+     *       -0.4,     0.5,    -0.3,    -0.4,     0.0,    -0.4,     0.0,
+     *       -0.2,    -0.9,     0.3,     0.3,    -0.4,     1.2,    -0.4,
+     *        0.7,    -0.3,     0.4,    -0.1,     0.4,    -0.1,    -0.3/
+
+      DATA H05/0.,     0.0,  5080.0,     0.0, -2594.9,  -516.7,     0.0,
+     *     -200.4,   269.3,  -524.5,     0.0,   281.4,  -225.8,   145.7,
+     *     -304.7,     0.0,    42.7,   179.8,  -123.0,   -19.5,   103.6,
+     *        0.0,   -20.2,    54.7,    63.7,   -63.4,     0.0,    50.3,
+     *        0.0,   -61.4,   -22.5,     6.9,    25.4,    10.9,   -26.4,
+     *       -4.8,     0.0,    11.2,   -21.0,     9.7,   -19.8,    16.1,
+     *        7.7,   -12.8,    -0.1,     0.0,   -20.1,    12.9,    12.7,
+     *       -6.7,    -8.1,     8.1,     2.9,    -7.9,     5.9,     0.0,
+     *        2.4,     0.2,     4.4,     4.7,    -6.5,    -1.0,    -3.4,
+     *       -0.9,    -2.3,    -8.0,     0.0,     0.3,     1.4,    -0.7,
+     *       -2.4,     0.9,    -0.6,    -2.7,    -1.0,    -1.5,    -2.0,
+     *       -1.4,     0.0,    -0.5,     0.3,     2.3,    -2.7,     0.6,
+     *        0.4,     0.0,     0.0,     0.3,    -0.8,    -0.4,     1.0,
+     *        0.0,    -0.7,     0.3,     1.7,    -0.5,    -1.0,     0.0,
+     *        0.7,     0.2,     0.6,     0.4,    -0.2,    -0.5,    -1.0/
+
+      DATA DG05/0.0,   8.8,    10.8,   -15.0,    -6.9,    -1.0,    -0.3,
+     *         -3.1,  -0.9,    -6.8,    -2.5,     2.8,    -7.1,     5.9,
+     *         -3.2,  -2.6,     0.4,    -3.0,    -1.2,     0.2,    -0.6,
+     *         -0.8,   0.2,    -0.2,     2.1,    -2.1,    -0.4,     1.3,
+     *         -0.4,   0.0,    -0.2,     1.1,     0.6,     0.4,    -0.5,
+     *          0.9,  -0.2,     0.2,    -0.2,     0.2,    -0.2,     0.2,
+     *          0.5,  -0.7,     0.5/
+
+      DATA DH05/0.0,   0.0,   -21.3,     0.0,   -23.3,   -14.0,     0.0,
+     *          5.4,  -6.5,    -2.0,     0.0,     2.0,     1.8,     5.6,
+     *          0.0,   0.0,     0.1,     1.8,     2.0,     4.5,    -1.0,
+     *          0.0,  -0.4,    -1.9,    -0.4,    -0.4,    -0.2,     0.9,
+     *          0.0,   0.8,     0.4,     0.1,     0.2,    -0.9,    -0.3,
+     *          0.3,   0.0,    -0.2,     0.2,     0.2,     0.4,     0.2,
+     *         -0.3,   0.5,     0.4/
+C
+C
+      IY=IYEAR
+C
+C  WE ARE RESTRICTED BY THE INTERVAL 1965-2010, FOR WHICH THE IGRF COEFFICIENTS
+c    ARE KNOWN; IF IYEAR IS OUTSIDE THIS INTERVAL, THEN THE SUBROUTINE USES THE
+C      NEAREST LIMITING VALUE AND PRINTS A WARNING:
+C
+      IF(IY.LT.1965) THEN
+       IY=1965
+       WRITE (*,10) IYEAR,IY
+      ENDIF
+
+      IF(IY.GT.2010) THEN
+       IY=2010
+       WRITE (*,10) IYEAR,IY
+      ENDIF
+
+C
+C  CALCULATE THE ARRAY REC, CONTAINING COEFFICIENTS FOR THE RECURSION RELATIONS,
+C  USED IN THE IGRF SUBROUTINE FOR CALCULATING THE ASSOCIATE LEGENDRE POLYNOMIALS
+C  AND THEIR DERIVATIVES:
+c
+      DO 20 N=1,14
+         N2=2*N-1
+         N2=N2*(N2-2)
+         DO 20 M=1,N
+            MN=N*(N-1)/2+M
+20    REC(MN)=FLOAT((N-M)*(N+M-2))/FLOAT(N2)
+C
+      IF (IY.LT.1970) GOTO 50          !INTERPOLATE BETWEEN 1965 - 1970
+      IF (IY.LT.1975) GOTO 60          !INTERPOLATE BETWEEN 1970 - 1975
+      IF (IY.LT.1980) GOTO 70          !INTERPOLATE BETWEEN 1975 - 1980
+      IF (IY.LT.1985) GOTO 80          !INTERPOLATE BETWEEN 1980 - 1985
+      IF (IY.LT.1990) GOTO 90          !INTERPOLATE BETWEEN 1985 - 1990
+      IF (IY.LT.1995) GOTO 100         !INTERPOLATE BETWEEN 1990 - 1995
+      IF (IY.LT.2000) GOTO 110         !INTERPOLATE BETWEEN 1995 - 2000
+      IF (IY.LT.2005) GOTO 120         !INTERPOLATE BETWEEN 2000 - 2005
+C
+C       EXTRAPOLATE BEYOND 2005:
+C
+
+      DT=FLOAT(IY)+FLOAT(IDAY-1)/365.25-2005.
+      DO 40 N=1,105
+         G(N)=G05(N)
+         H(N)=H05(N)
+         IF (N.GT.45) GOTO 40
+         G(N)=G(N)+DG05(N)*DT
+         H(N)=H(N)+DH05(N)*DT
+40    CONTINUE
+      GOTO 300
+C
+C       INTERPOLATE BETWEEEN 1965 - 1970:
+C
+50    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1965)/5.
+      F1=1.-F2
+      DO 55 N=1,105
+         G(N)=G65(N)*F1+G70(N)*F2
+55       H(N)=H65(N)*F1+H70(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1970 - 1975:
+C
+60    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1970)/5.
+      F1=1.-F2
+      DO 65 N=1,105
+         G(N)=G70(N)*F1+G75(N)*F2
+65       H(N)=H70(N)*F1+H75(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1975 - 1980:
+C
+70    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1975)/5.
+      F1=1.-F2
+      DO 75 N=1,105
+         G(N)=G75(N)*F1+G80(N)*F2
+75       H(N)=H75(N)*F1+H80(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1980 - 1985:
+C
+80    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1980)/5.
+      F1=1.-F2
+      DO 85 N=1,105
+         G(N)=G80(N)*F1+G85(N)*F2
+85       H(N)=H80(N)*F1+H85(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1985 - 1990:
+C
+90    F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1985)/5.
+      F1=1.-F2
+      DO 95 N=1,105
+         G(N)=G85(N)*F1+G90(N)*F2
+95       H(N)=H85(N)*F1+H90(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1990 - 1995:
+C
+100   F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1990)/5.
+      F1=1.-F2
+      DO 105 N=1,105
+         G(N)=G90(N)*F1+G95(N)*F2
+105      H(N)=H90(N)*F1+H95(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 1995 - 2000:
+C
+110   F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-1995)/5.
+      F1=1.-F2
+      DO 115 N=1,105   !  THE 2000 COEFFICIENTS (G00) GO THROUGH THE ORDER 13, NOT 10
+         G(N)=G95(N)*F1+G00(N)*F2
+115      H(N)=H95(N)*F1+H00(N)*F2
+      GOTO 300
+C
+C       INTERPOLATE BETWEEN 2000 - 2005:
+C
+120   F2=(FLOAT(IY)+FLOAT(IDAY-1)/365.25-2000)/5.
+      F1=1.-F2
+      DO 125 N=1,105
+         G(N)=G00(N)*F1+G05(N)*F2
+125      H(N)=H00(N)*F1+H05(N)*F2
+      GOTO 300
+C
+C   COEFFICIENTS FOR A GIVEN YEAR HAVE BEEN CALCULATED; NOW MULTIPLY
+C   THEM BY SCHMIDT NORMALIZATION FACTORS:
+C
+300   S=1.
+      DO 130 N=2,14
+         MN=N*(N-1)/2+1
+         S=S*FLOAT(2*N-3)/FLOAT(N-1)
+         G(MN)=G(MN)*S
+         H(MN)=H(MN)*S
+         P=S
+         DO 130 M=2,N
+            AA=1.
+            IF (M.EQ.2) AA=2.
+            P=P*SQRT(AA*FLOAT(N-M+1)/FLOAT(N+M-2))
+            MNN=MN+M-1
+            G(MNN)=G(MNN)*P
+130         H(MNN)=H(MNN)*P
+
+           G10=-G(2)
+           G11= G(3)
+           H11= H(3)
+C
+C  NOW CALCULATE THE COMPONENTS OF THE UNIT VECTOR EzMAG IN GEO COORD.SYSTEM:
+C   SIN(TETA0)*COS(LAMBDA0), SIN(TETA0)*SIN(LAMBDA0), AND COS(TETA0)
+C         ST0 * CL0                ST0 * SL0                CT0
+C
+      SQ=G11**2+H11**2
+      SQQ=SQRT(SQ)
+      SQR=SQRT(G10**2+SQ)
+      SL0=-H11/SQQ
+      CL0=-G11/SQQ
+      ST0=SQQ/SQR
+      CT0=G10/SQR
+      STCL=ST0*CL0
+      STSL=ST0*SL0
+      CTSL=CT0*SL0
+      CTCL=CT0*CL0
+C
+      CALL SUN (IY,IDAY,IHOUR,MIN,ISEC,GST,SLONG,SRASN,SDEC)
+C
+C  S1,S2, AND S3 ARE THE COMPONENTS OF THE UNIT VECTOR EXGSM=EXGSE IN THE
+C   SYSTEM GEI POINTING FROM THE EARTH'S CENTER TO THE SUN:
+C
+      S1=COS(SRASN)*COS(SDEC)
+      S2=SIN(SRASN)*COS(SDEC)
+      S3=SIN(SDEC)
+      CGST=COS(GST)
+      SGST=SIN(GST)
+C
+C  DIP1, DIP2, AND DIP3 ARE THE COMPONENTS OF THE UNIT VECTOR EZSM=EZMAG
+C   IN THE SYSTEM GEI:
+C
+      DIP1=STCL*CGST-STSL*SGST
+      DIP2=STCL*SGST+STSL*CGST
+      DIP3=CT0
+C
+C  NOW CALCULATE THE COMPONENTS OF THE UNIT VECTOR EYGSM IN THE SYSTEM GEI
+C   BY TAKING THE VECTOR PRODUCT D x S AND NORMALIZING IT TO UNIT LENGTH:
+C
+      Y1=DIP2*S3-DIP3*S2
+      Y2=DIP3*S1-DIP1*S3
+      Y3=DIP1*S2-DIP2*S1
+      Y=SQRT(Y1*Y1+Y2*Y2+Y3*Y3)
+      Y1=Y1/Y
+      Y2=Y2/Y
+      Y3=Y3/Y
+C
+C   THEN IN THE GEI SYSTEM THE UNIT VECTOR Z = EZGSM = EXGSM x EYGSM = S x Y
+C    HAS THE COMPONENTS:
+C
+      Z1=S2*Y3-S3*Y2
+      Z2=S3*Y1-S1*Y3
+      Z3=S1*Y2-S2*Y1
+C
+C    THE VECTOR EZGSE (HERE DZ) IN GEI HAS THE COMPONENTS (0,-SIN(DELTA),
+C     COS(DELTA)) = (0.,-0.397823,0.917462); HERE DELTA = 23.44214 DEG FOR
+C   THE EPOCH 1978 (SEE THE BOOK BY GUREVICH OR OTHER ASTRONOMICAL HANDBOOKS).
+C    HERE THE MOST ACCURATE TIME-DEPENDENT FORMULA IS USED:
+C
+      DJ=FLOAT(365*(IY-1900)+(IY-1901)/4 +IDAY)
+     * -0.5+FLOAT(IHOUR*3600+MIN*60+ISEC)/86400.
+      T=DJ/36525.
+      OBLIQ=(23.45229-0.0130125*T)/57.2957795
+      DZ1=0.
+      DZ2=-SIN(OBLIQ)
+      DZ3=COS(OBLIQ)
+C
+C  THEN THE UNIT VECTOR EYGSE IN GEI SYSTEM IS THE VECTOR PRODUCT DZ x S :
+C
+      DY1=DZ2*S3-DZ3*S2
+      DY2=DZ3*S1-DZ1*S3
+      DY3=DZ1*S2-DZ2*S1
+C
+C   THE ELEMENTS OF THE MATRIX GSE TO GSM ARE THE SCALAR PRODUCTS:
+C   CHI=EM22=(EYGSM,EYGSE), SHI=EM23=(EYGSM,EZGSE), EM32=(EZGSM,EYGSE)=-EM23,
+C     AND EM33=(EZGSM,EZGSE)=EM22
+C
+      CHI=Y1*DY1+Y2*DY2+Y3*DY3
+      SHI=Y1*DZ1+Y2*DZ2+Y3*DZ3
+      HI=ASIN(SHI)
+C
+C    TILT ANGLE: PSI=ARCSIN(DIP,EXGSM)
+C
+      SPS=DIP1*S1+DIP2*S2+DIP3*S3
+      CPS=SQRT(1.-SPS**2)
+      PSI=ASIN(SPS)
+C
+C    THE ELEMENTS OF THE MATRIX MAG TO SM ARE THE SCALAR PRODUCTS:
+C CFI=GM22=(EYSM,EYMAG), SFI=GM23=(EYSM,EXMAG); THEY CAN BE DERIVED AS FOLLOWS:
+C
+C IN GEO THE VECTORS EXMAG AND EYMAG HAVE THE COMPONENTS (CT0*CL0,CT0*SL0,-ST0)
+C  AND (-SL0,CL0,0), RESPECTIVELY.    HENCE, IN GEI THE COMPONENTS ARE:
+C  EXMAG:    CT0*CL0*COS(GST)-CT0*SL0*SIN(GST)
+C            CT0*CL0*SIN(GST)+CT0*SL0*COS(GST)
+C            -ST0
+C  EYMAG:    -SL0*COS(GST)-CL0*SIN(GST)
+C            -SL0*SIN(GST)+CL0*COS(GST)
+C             0
+C  THE COMPONENTS OF EYSM IN GEI WERE FOUND ABOVE AS Y1, Y2, AND Y3;
+C  NOW WE ONLY HAVE TO COMBINE THE QUANTITIES INTO SCALAR PRODUCTS:
+C
+      EXMAGX=CT0*(CL0*CGST-SL0*SGST)
+      EXMAGY=CT0*(CL0*SGST+SL0*CGST)
+      EXMAGZ=-ST0
+      EYMAGX=-(SL0*CGST+CL0*SGST)
+      EYMAGY=-(SL0*SGST-CL0*CGST)
+      CFI=Y1*EYMAGX+Y2*EYMAGY
+      SFI=Y1*EXMAGX+Y2*EXMAGY+Y3*EXMAGZ
+C
+      XMUT=(ATAN2(SFI,CFI)+3.1415926536)*3.8197186342
+C
+C  THE ELEMENTS OF THE MATRIX GEO TO GSM ARE THE SCALAR PRODUCTS:
+C
+C   A11=(EXGEO,EXGSM), A12=(EYGEO,EXGSM), A13=(EZGEO,EXGSM),
+C   A21=(EXGEO,EYGSM), A22=(EYGEO,EYGSM), A23=(EZGEO,EYGSM),
+C   A31=(EXGEO,EZGSM), A32=(EYGEO,EZGSM), A33=(EZGEO,EZGSM),
+C
+C   ALL THE UNIT VECTORS IN BRACKETS ARE ALREADY DEFINED IN GEI:
+C
+C  EXGEO=(CGST,SGST,0), EYGEO=(-SGST,CGST,0), EZGEO=(0,0,1)
+C  EXGSM=(S1,S2,S3),  EYGSM=(Y1,Y2,Y3),   EZGSM=(Z1,Z2,Z3)
+C                                                           AND  THEREFORE:
+C
+      A11=S1*CGST+S2*SGST
+      A12=-S1*SGST+S2*CGST
+      A13=S3
+      A21=Y1*CGST+Y2*SGST
+      A22=-Y1*SGST+Y2*CGST
+      A23=Y3
+      A31=Z1*CGST+Z2*SGST
+      A32=-Z1*SGST+Z2*CGST
+      A33=Z3
+C
+ 10   FORMAT(//1X,
+     *'**** RECALC WARNS: YEAR IS OUT OF INTERVAL 1965-2010: IYEAR=',I4,
+     * /,6X,'CALCULATIONS WILL BE DONE FOR IYEAR=',I4,/)
+      RETURN
+      END
+c
+c====================================================================
+C
+      SUBROUTINE GEOMAG (XGEO,YGEO,ZGEO,XMAG,YMAG,ZMAG,J)
+C
+C    CONVERTS GEOGRAPHIC (GEO) TO DIPOLE (MAG) COORDINATES OR VICA VERSA.
+C
+C                    J>0                       J<0
+C-----INPUT:  J,XGEO,YGEO,ZGEO           J,XMAG,YMAG,ZMAG
+C-----OUTPUT:    XMAG,YMAG,ZMAG           XGEO,YGEO,ZGEO
+C
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GEOMAG IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR AND/OR IDAY HAVE BEEN CHANGED
+C
+C
+C   LAST MOFIFICATION:  MARCH 30, 2003 (INVOCATION OF RECALC INSIDE THIS S/R WAS REMOVED)
+C
+C   AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ ST0,CT0,SL0,CL0,CTCL,STCL,CTSL,STSL,AB(19),BB(8)
+
+      IF(J.GT.0) THEN
+       XMAG=XGEO*CTCL+YGEO*CTSL-ZGEO*ST0
+       YMAG=YGEO*CL0-XGEO*SL0
+       ZMAG=XGEO*STCL+YGEO*STSL+ZGEO*CT0
+      ELSE
+       XGEO=XMAG*CTCL-YMAG*SL0+ZMAG*STCL
+       YGEO=XMAG*CTSL+YMAG*CL0+ZMAG*STSL
+       ZGEO=ZMAG*CT0-XMAG*ST0
+      ENDIF
+
+      RETURN
+      END
+c
+c=========================================================================================
+c
+      SUBROUTINE GEIGEO (XGEI,YGEI,ZGEI,XGEO,YGEO,ZGEO,J)
+C
+C   CONVERTS EQUATORIAL INERTIAL (GEI) TO GEOGRAPHICAL (GEO) COORDS
+C   OR VICA VERSA.
+C                    J>0                J<0
+C----INPUT:  J,XGEI,YGEI,ZGEI    J,XGEO,YGEO,ZGEO
+C----OUTPUT:   XGEO,YGEO,ZGEO      XGEI,YGEI,ZGEI
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GEIGEO IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE CURRENT VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(27),CGST,SGST,B(6)
+C
+      IF(J.GT.0) THEN
+       XGEO=XGEI*CGST+YGEI*SGST
+       YGEO=YGEI*CGST-XGEI*SGST
+       ZGEO=ZGEI
+      ELSE
+       XGEI=XGEO*CGST-YGEO*SGST
+       YGEI=YGEO*CGST+XGEO*SGST
+       ZGEI=ZGEO
+      ENDIF
+
+      RETURN
+      END
+C
+C=======================================================================================
+C
+      SUBROUTINE MAGSM (XMAG,YMAG,ZMAG,XSM,YSM,ZSM,J)
+C
+C  CONVERTS DIPOLE (MAG) TO SOLAR MAGNETIC (SM) COORDINATES OR VICA VERSA
+C
+C                    J>0              J<0
+C----INPUT: J,XMAG,YMAG,ZMAG     J,XSM,YSM,ZSM
+C----OUTPUT:    XSM,YSM,ZSM       XMAG,YMAG,ZMAG
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE MAGSM IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(8),SFI,CFI,B(7),AB(10),BA(8)
+C
+      IF (J.GT.0) THEN
+       XSM=XMAG*CFI-YMAG*SFI
+       YSM=XMAG*SFI+YMAG*CFI
+       ZSM=ZMAG
+      ELSE
+       XMAG=XSM*CFI+YSM*SFI
+       YMAG=YSM*CFI-XSM*SFI
+       ZMAG=ZSM
+      ENDIF
+
+      RETURN
+      END
+C
+C=======================================================================================
+C
+       SUBROUTINE GSMGSE (XGSM,YGSM,ZGSM,XGSE,YGSE,ZGSE,J)
+C
+C CONVERTS GEOCENTRIC SOLAR MAGNETOSPHERIC (GSM) COORDS TO SOLAR ECLIPTIC (GSE) ONES
+C   OR VICA VERSA.
+C                    J>0                J<0
+C-----INPUT: J,XGSM,YGSM,ZGSM    J,XGSE,YGSE,ZGSE
+C----OUTPUT:   XGSE,YGSE,ZGSE      XGSM,YGSM,ZGSM
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GSMGSE IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(12),SHI,CHI,AB(13),BA(8)
+C
+      IF (J.GT.0) THEN
+       XGSE=XGSM
+       YGSE=YGSM*CHI-ZGSM*SHI
+       ZGSE=YGSM*SHI+ZGSM*CHI
+      ELSE
+       XGSM=XGSE
+       YGSM=YGSE*CHI+ZGSE*SHI
+       ZGSM=ZGSE*CHI-YGSE*SHI
+      ENDIF
+
+      RETURN
+      END
+C
+C=====================================================================================
+C
+       SUBROUTINE SMGSM (XSM,YSM,ZSM,XGSM,YGSM,ZGSM,J)
+C
+C CONVERTS SOLAR MAGNETIC (SM) TO GEOCENTRIC SOLAR MAGNETOSPHERIC
+C   (GSM) COORDINATES OR VICA VERSA.
+C                  J>0                 J<0
+C-----INPUT: J,XSM,YSM,ZSM        J,XGSM,YGSM,ZGSM
+C----OUTPUT:  XGSM,YGSM,ZGSM       XSM,YSM,ZSM
+C
+C  ATTENTION:  SUBROUTINE RECALC  MUST BE INVOKED BEFORE SMGSM IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/ A(10),SPS,CPS,B(15),AB(8)
+
+      IF (J.GT.0) THEN
+       XGSM=XSM*CPS+ZSM*SPS
+       YGSM=YSM
+       ZGSM=ZSM*CPS-XSM*SPS
+      ELSE
+       XSM=XGSM*CPS-ZGSM*SPS
+       YSM=YGSM
+       ZSM=XGSM*SPS+ZGSM*CPS
+      ENDIF
+
+      RETURN
+      END
+C
+C==========================================================================================
+C
+      SUBROUTINE GEOGSM (XGEO,YGEO,ZGEO,XGSM,YGSM,ZGSM,J)
+C
+C CONVERTS GEOGRAPHIC (GEO) TO GEOCENTRIC SOLAR MAGNETOSPHERIC (GSM) COORDINATES
+C   OR VICA VERSA.
+C
+C                   J>0                   J<0
+C----- INPUT:  J,XGEO,YGEO,ZGEO    J,XGSM,YGSM,ZGSM
+C---- OUTPUT:    XGSM,YGSM,ZGSM      XGEO,YGEO,ZGEO
+C
+C  ATTENTION:  SUBROUTINE  RECALC  MUST BE INVOKED BEFORE GEOGSM IN TWO CASES:
+C     /A/  BEFORE THE FIRST TRANSFORMATION OF COORDINATES
+C     /B/  IF THE VALUES OF IYEAR,IDAY,IHOUR,MIN,ISEC  HAVE BEEN CHANGED
+C
+C     LAST MODIFICATION: MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      COMMON /GEOPACK1/AA(17),A11,A21,A31,A12,A22,A32,A13,A23,A33,D,B(8)
+C
+      IF (J.GT.0) THEN
+       XGSM=A11*XGEO+A12*YGEO+A13*ZGEO
+       YGSM=A21*XGEO+A22*YGEO+A23*ZGEO
+       ZGSM=A31*XGEO+A32*YGEO+A33*ZGEO
+      ELSE
+       XGEO=A11*XGSM+A21*YGSM+A31*ZGSM
+       YGEO=A12*XGSM+A22*YGSM+A32*ZGSM
+       ZGEO=A13*XGSM+A23*YGSM+A33*ZGSM
+      ENDIF
+
+      RETURN
+      END
+C
+C=====================================================================================
+C
+      SUBROUTINE RHAND (X,Y,Z,R1,R2,R3,IOPT,PARMOD,EXNAME,INNAME)
+C
+C  CALCULATES THE COMPONENTS OF THE RIGHT HAND SIDE VECTOR IN THE GEOMAGNETIC FIELD
+C    LINE EQUATION  (a subsidiary subroutine for the subroutine STEP)
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      DIMENSION PARMOD(10)
+C
+C     EXNAME AND INNAME ARE NAMES OF SUBROUTINES FOR THE EXTERNAL AND INTERNAL
+C     PARTS OF THE TOTAL FIELD
+C
+      COMMON /GEOPACK1/ A(15),PSI,AA(10),DS3,BB(8)
+
+      CALL EXNAME (IOPT,PARMOD,PSI,X,Y,Z,BXGSM,BYGSM,BZGSM)
+      CALL INNAME (X,Y,Z,HXGSM,HYGSM,HZGSM)
+
+      BX=BXGSM+HXGSM
+      BY=BYGSM+HYGSM
+      BZ=BZGSM+HZGSM
+      B=DS3/SQRT(BX**2+BY**2+BZ**2)
+      R1=BX*B
+      R2=BY*B
+      R3=BZ*B
+      RETURN
+      END
+C
+C===================================================================================
+C
+      SUBROUTINE STEP (X,Y,Z,DS,ERRIN,IOPT,PARMOD,EXNAME,INNAME)
+C
+C   RE-CALCULATES {X,Y,Z}, MAKING A STEP ALONG A FIELD LINE.
+C   DS IS THE STEP SIZE, ERRIN IS PERMISSIBLE ERROR VALUE, IOPT SPECIFIES THE EXTERNAL
+C   MODEL VERSION, THE ARRAY PARMOD CONTAINS INPUT PARAMETERS FOR THAT MODEL
+C   EXNAME IS THE NAME OF THE EXTERNAL FIELD SUBROUTINE
+C   INNAME IS THE NAME OF THE INTERNAL FIELD SUBROUTINE (EITHER DIP OR IGRF)
+C
+C   ALL THE PARAMETERS ARE INPUT ONES; OUTPUT IS THE RENEWED TRIPLET X,Y,Z
+C
+C     LAST MODIFICATION:  MARCH 31, 2003
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      DIMENSION PARMOD(10)
+      COMMON /GEOPACK1/ A(26),DS3,B(8)
+      EXTERNAL EXNAME,INNAME
+
+  1   DS3=-DS/3.
+      CALL RHAND (X,Y,Z,R11,R12,R13,IOPT,PARMOD,EXNAME,INNAME)
+      CALL RHAND (X+R11,Y+R12,Z+R13,R21,R22,R23,IOPT,PARMOD,EXNAME,
+     * INNAME)
+      CALL RHAND (X+.5*(R11+R21),Y+.5*(R12+R22),Z+.5*
+     *(R13+R23),R31,R32,R33,IOPT,PARMOD,EXNAME,INNAME)
+      CALL RHAND (X+.375*(R11+3.*R31),Y+.375*(R12+3.*R32
+     *),Z+.375*(R13+3.*R33),R41,R42,R43,IOPT,PARMOD,EXNAME,INNAME)
+      CALL RHAND (X+1.5*(R11-3.*R31+4.*R41),Y+1.5*(R12-
+     *3.*R32+4.*R42),Z+1.5*(R13-3.*R33+4.*R43),
+     *R51,R52,R53,IOPT,PARMOD,EXNAME,INNAME)
+      ERRCUR=ABS(R11-4.5*R31+4.*R41-.5*R51)+ABS(R12-4.5*R32+4.*R42-.5*
+     *R52)+ABS(R13-4.5*R33+4.*R43-.5*R53)
+      IF (ERRCUR.LT.ERRIN) GOTO 2
+      DS=DS*.5
+      GOTO 1
+  2   X=X+.5*(R11+4.*R41+R51)
+      Y=Y+.5*(R12+4.*R42+R52)
+      Z=Z+.5*(R13+4.*R43+R53)
+      IF(ERRCUR.LT.ERRIN*.04.AND.ABS(DS).LT.1.33) DS=DS*1.5
+      RETURN
+      END
+C
+C==============================================================================
+C
+      SUBROUTINE TRACE (XI,YI,ZI,DIR,RLIM,R0,IOPT,PARMOD,EXNAME,INNAME,
+     *XF,YF,ZF,XX,YY,ZZ,L)
+C
+C  TRACES A FIELD LINE FROM AN ARBITRARY POINT OF SPACE TO THE EARTH'S
+C  SURFACE OR TO A MODEL LIMITING BOUNDARY.
+C
+C  THE HIGHEST ORDER OF SPHERICAL HARMONICS IN THE MAIN FIELD EXPANSION USED
+C  IN THE MAPPING IS CALCULATED AUTOMATICALLY. IF INNAME=IGRF_GSM, THEN AN IGRF MODEL
+C  FIELD WILL BE USED, AND IF INNAME=DIP, A PURE DIPOLE FIELD WILL BE USED.
+
+C  IN ANY CASE, BEFORE CALLING TRACE, ONE SHOULD INVOKE RECALC, TO CALCULATE CORRECT
+C  VALUES OF THE IGRF COEFFICIENTS AND ALL QUANTITIES NEEDED FOR TRANSFORMATIONS
+C  BETWEEN COORDINATE SYSTEMS INVOLVED IN THIS CALCULATIONS.
+C
+C  ALTERNATIVELY, THE SUBROUTINE RECALC CAN BE INVOKED WITH THE DESIRED VALUES OF
+C  IYEAR AND IDAY (TO SPECIFY THE DIPOLE MOMENT), WHILE THE VALUES OF THE DIPOLE
+C  TILT ANGLE PSI (IN RADIANS) AND ITS SINE (SPS) AND COSINE (CPS) CAN BE EXPLICITLY
+C  SPECIFIED AND FORWARDED TO THE COMMON BLOCK GEOPACK1 (11th, 12th, AND 16th ELEMENTS, RESP.)
+C
+C------------- INPUT PARAMETERS:
+C
+C   XI,YI,ZI - GSM COORDS OF INITIAL POINT (IN EARTH RADII, 1 RE = 6371.2 km),
+C
+C   DIR - SIGN OF THE TRACING DIRECTION: IF DIR=1.0 THEN WE MOVE ANTIPARALLEL TO THE
+C     FIELD VECTOR (E.G. FROM NORTHERN TO SOUTHERN CONJUGATE POINT),
+C     AND IF DIR=-1.0 THEN THE TRACING GOES IN THE OPPOSITE DIRECTION.
+C
+C   R0 -  RADIUS OF A SPHERE (IN RE) FOR WHICH THE FIELD LINE ENDPOINT COORDINATES
+C     XF,YF,ZF  SHOULD BE CALCULATED.
+C
+C   RLIM - UPPER LIMIT OF THE GEOCENTRIC DISTANCE, WHERE THE TRACING IS TERMINATED.
+C
+C   IOPT - A MODEL INDEX; CAN BE USED FOR SPECIFYING AN OPTION OF THE EXTERNAL FIELD
+C       MODEL (E.G., INTERVAL OF THE KP-INDEX). ALTERNATIVELY, ONE CAN USE THE ARRAY
+C       PARMOD FOR THAT PURPOSE (SEE BELOW); IN THAT CASE IOPT IS JUST A DUMMY PARAMETER.
+C
+C   PARMOD -  A 10-ELEMENT ARRAY CONTAINING MODEL PARAMETERS, NEEDED FOR A UNIQUE
+C      SPECIFICATION OF THE EXTERNAL FIELD. THE CONCRETE MEANING OF THE COMPONENTS
+C      OF PARMOD DEPENDS ON A SPECIFIC VERSION OF THE EXTERNAL FIELD MODEL.
+C
+C   EXNAME - NAME OF A SUBROUTINE PROVIDING COMPONENTS OF THE EXTERNAL MAGNETIC FIELD
+C    (E.G., T96_01).
+C   INNAME - NAME OF A SUBROUTINE PROVIDING COMPONENTS OF THE INTERNAL MAGNETIC FIELD
+C    (EITHER DIP OR IGRF_GSM).
+C
+C-------------- OUTPUT PARAMETERS:
+C
+C   XF,YF,ZF - GSM COORDS OF THE LAST CALCULATED POINT OF A FIELD LINE
+C   XX,YY,ZZ - ARRAYS, CONTAINING COORDS OF FIELD LINE POINTS. HERE THEIR MAXIMAL LENGTH WAS
+C      ASSUMED EQUAL TO 999.
+C   L - ACTUAL NUMBER OF THE CALCULATED FIELD LINE POINTS. IF L EXCEEDS 999, TRACING
+C     TERMINATES, AND A WARNING IS DISPLAYED.
+C
+C
+C     LAST MODIFICATION:  MARCH 31, 2003.
+C
+C     AUTHOR:  N. A. TSYGANENKO
+C
+      DIMENSION XX(1000),YY(1000),ZZ(1000), PARMOD(10)
+      COMMON /GEOPACK1/ AA(26),DD,BB(8)
+      EXTERNAL EXNAME,INNAME
+C
+      ERR=0.0001
+      L=0
+      DS=0.5*DIR
+      X=XI
+      Y=YI
+      Z=ZI
+      DD=DIR
+      AL=0.
+c
+c  here we call RHAND just to find out the sign of the radial component of the field
+c   vector, and to determine the initial direction of the tracing (i.e., either away
+c   or towards Earth):
+c
+      CALL RHAND (X,Y,Z,R1,R2,R3,IOPT,PARMOD,EXNAME,INNAME)
+      AD=0.01
+      IF (X*R1+Y*R2+Z*R3.LT.0.) AD=-0.01
+C
+c     |AD|=0.01 and its sign follows the rule:
+c (1) if DIR=1 (tracing antiparallel to B vector) then the sign of AD is the same as of Br
+c (2) if DIR=-1 (tracing parallel to B vector) then the sign of AD is opposite to that of Br
+c     AD is defined in order to initialize the value of RR (radial distance at previous step):
+
+      RR=SQRT(X**2+Y**2+Z**2)+AD
+  1   L=L+1
+      IF(L.GT.999) GOTO 7
+      XX(L)=X
+      YY(L)=Y
+      ZZ(L)=Z
+      RYZ=Y**2+Z**2
+      R2=X**2+RYZ
+      R=SQRT(R2)
+
+c  check if the line hit the outer tracing boundary; if yes, then terminate
+c   the tracing (label 8):
+
+      IF (R.GT.RLIM.OR.RYZ.GT.1600.D0.OR.X.GT.20.D0) GOTO 8
+c
+c  check whether or not the inner tracing boundary was crossed from outside,
+c  if yes, then calculate the footpoint position by interpolation (go to label 6):
+c
+      IF (R.LT.R0.AND.RR.GT.R) GOTO 6
+
+c  check if (i) we are moving outward, or (ii) we are still sufficiently
+c    far from Earth (beyond R=5Re); if yes, proceed further:
+c
+      IF (R.GE.RR.OR.R.GT.5.) GOTO 5
+
+c  now we moved closer inward (between R=3 and R=5); go to 3 and begin logging
+c  previous values of X,Y,Z, to be used in the interpolation (after having
+c  crossed the inner tracing boundary):
+
+      IF (R.GE.3.) GOTO 3
+c
+c  we entered inside the sphere R=3: to avoid too large steps (and hence inaccurate
+c  interpolated position of the footpoint), enforce the progressively smaller
+c  stepsize values as we approach the inner boundary R=R0:
+c
+      FC=0.2
+      IF(R-R0.LT.0.05) FC=0.05
+      AL=FC*(R-R0+0.2)
+      DS=DIR*AL
+      GOTO 4
+  3   DS=DIR
+  4   XR=X
+      YR=Y
+      ZR=Z
+  5   RR=R
+      CALL STEP (X,Y,Z,DS,ERR,IOPT,PARMOD,EXNAME,INNAME)
+      GOTO 1
+c
+c  find the footpoint position by interpolating between the current and previous
+c   field line points:
+c
+  6   R1=(R0-R)/(RR-R)
+      X=X-(X-XR)*R1
+      Y=Y-(Y-YR)*R1
+      Z=Z-(Z-ZR)*R1
+      GOTO 8
+  7   WRITE (*,10)
+      L=999
+  8   XF=X
+      YF=Y
+      ZF=Z
+      RETURN
+ 10   FORMAT(//,1X,'**** COMPUTATIONS IN THE SUBROUTINE TRACE ARE',
+     *' TERMINATED: THE CURRENT NUMBER OF POINTS EXCEEDED 1000 ****'//)
+      END
+c
+C====================================================================================
+C
+      SUBROUTINE SHUETAL_MGNP(XN_PD,VEL,BZIMF,XGSM,YGSM,ZGSM,
+     *  XMGNP,YMGNP,ZMGNP,DIST,ID)
+C
+C  FOR ANY POINT OF SPACE WITH COORDINATES (XGSM,YGSM,ZGSM) AND SPECIFIED CONDITIONS
+C  IN THE INCOMING SOLAR WIND, THIS SUBROUTINE:
+C
+C (1) DETERMINES IF THE POINT (XGSM,YGSM,ZGSM) LIES INSIDE OR OUTSIDE THE
+C      MODEL MAGNETOPAUSE OF SHUE ET AL. (JGR-A, V.103, P. 17691, 1998).
+C
+C (2) CALCULATES THE GSM POSITION OF A POINT {XMGNP,YMGNP,ZMGNP}, LYING AT THE MODEL
+C      MAGNETOPAUSE AND ASYMPTOTICALLY TENDING TO THE NEAREST BOUNDARY POINT WITH
+C      RESPECT TO THE OBSERVATION POINT {XGSM,YGSM,ZGSM}, AS IT APPROACHES THE MAGNETO-
+C      PAUSE.
+C
+C  INPUT: XN_PD - EITHER SOLAR WIND PROTON NUMBER DENSITY (PER C.C.) (IF VEL>0)
+C                    OR THE SOLAR WIND RAM PRESSURE IN NANOPASCALS   (IF VEL<0)
+C         BZIMF - IMF BZ IN NANOTESLAS
+C
+C         VEL - EITHER SOLAR WIND VELOCITY (KM/SEC)
+C                  OR ANY NEGATIVE NUMBER, WHICH INDICATES THAT XN_PD STANDS
+C                     FOR THE SOLAR WIND PRESSURE, RATHER THAN FOR THE DENSITY
+C
+C         XGSM,YGSM,ZGSM - GSM POSITION OF THE OBSERVATION POINT IN EARTH RADII
+C
+C  OUTPUT: XMGNP,YMGNP,ZMGNP - GSM POSITION OF THE BOUNDARY POINT
+C          DIST - DISTANCE (IN RE) BETWEEN THE OBSERVATION POINT (XGSM,YGSM,ZGSM)
+C                 AND THE MODEL NAGNETOPAUSE
+C          ID -  POSITION FLAG:  ID=+1 (-1) MEANS THAT THE OBSERVATION POINT
+C          LIES INSIDE (OUTSIDE) OF THE MODEL MAGNETOPAUSE, RESPECTIVELY.
+C
+C  OTHER SUBROUTINES USED: T96_MGNP
+C
+c          AUTHOR:  N.A. TSYGANENKO,
+C          DATE:    APRIL 4, 2003.
+C
+      IF (VEL.LT.0.) THEN
+        PD=XN_PD
+      ELSE
+        PD=1.94E-6*XN_PD*VEL**2  ! PD IS THE SOLAR WIND DYNAMIC PRESSURE (IN nPa)
+      ENDIF
+
+c
+c  DEFINE THE ANGLE PHI, MEASURED DUSKWARD FROM THE NOON-MIDNIGHT MERIDIAN PLANE;
+C  IF THE OBSERVATION POINT LIES ON THE X AXIS, THE ANGLE PHI CANNOT BE UNIQUELY
+C  DEFINED, AND WE SET IT AT ZERO:
+c
+      IF (YGSM.NE.0..OR.ZGSM.NE.0.) THEN
+         PHI=ATAN2(YGSM,ZGSM)
+      ELSE
+         PHI=0.
+      ENDIF
+C
+C  FIRST, FIND OUT IF THE OBSERVATION POINT LIES INSIDE THE SHUE ET AL BDRY
+C  AND SET THE VALUE OF THE ID FLAG:
+C
+      ID=-1
+      R0=(10.22+1.29*TANH(0.184*(BZIMF+8.14)))*PD**(-.15151515)
+      ALPHA=(0.58-0.007*BZIMF)*(1.+0.024*ALOG(PD))
+      R=SQRT(XGSM**2+YGSM**2+ZGSM**2)
+      RM=R0*(2./(1.+XGSM/R))**ALPHA
+      IF (R.LE.RM) ID=+1
+C
+C  NOW, FIND THE CORRESPONDING T96 MAGNETOPAUSE POSITION, TO BE USED AS
+C  A STARTING APPROXIMATION IN THE SEARCH OF A CORRESPONDING SHUE ET AL.
+C  BOUNDARY POINT:
+C
+      CALL T96_MGNP (PD,-1.,XGSM,YGSM,ZGSM,XMT96,YMT96,ZMT96,DIST,ID96)
+C
+      RHO2=YMT96**2+ZMT96**2
+      R=SQRT(RHO2+XMT96**2)
+      ST=SQRT(RHO2)/R
+      CT=XMT96/R
+C
+C  NOW, USE NEWTON'S ITERATIVE METHOD TO FIND THE NEAREST POINT AT THE
+C   SHUE ET AL.'S BOUNDARY:
+C
+      NIT=0
+
+  1   T=ATAN2(ST,CT)
+      RM=R0*(2./(1.+CT))**ALPHA
+
+      F=R-RM
+      GRADF_R=1.
+      GRADF_T=-ALPHA/R*RM*ST/(1.+CT)
+      GRADF=SQRT(GRADF_R**2+GRADF_T**2)
+
+      DR=-F/GRADF**2
+      DT= DR/R*GRADF_T
+
+      R=R+DR
+      T=T+DT
+      ST=SIN(T)
+      CT=COS(T)
+
+      DS=SQRT(DR**2+(R*DT)**2)
+
+      NIT=NIT+1
+
+      IF (NIT.GT.1000) THEN
+         PRINT *,
+     *' BOUNDARY POINT COULD NOT BE FOUND; ITERATIONS DO NOT CONVERGE'
+      ENDIF
+
+      IF (DS.GT.1.E-4) GOTO 1
+
+      XMGNP=R*COS(T)
+      RHO=  R*SIN(T)
+
+      YMGNP=RHO*SIN(PHI)
+      ZMGNP=RHO*COS(PHI)
+
+      DIST=SQRT((XGSM-XMGNP)**2+(YGSM-YMGNP)**2+(ZGSM-ZMGNP)**2)
+
+      RETURN
+      END
+C
+C=======================================================================================
+C
+      SUBROUTINE T96_MGNP (XN_PD,VEL,XGSM,YGSM,ZGSM,XMGNP,YMGNP,ZMGNP,
+     * DIST,ID)
+C
+C  FOR ANY POINT OF SPACE WITH GIVEN COORDINATES (XGSM,YGSM,ZGSM), THIS SUBROUTINE DEFINES
+C  THE POSITION OF A POINT (XMGNP,YMGNP,ZMGNP) AT THE T96 MODEL MAGNETOPAUSE, HAVING THE
+C  SAME VALUE OF THE ELLIPSOIDAL TAU-COORDINATE, AND THE DISTANCE BETWEEN THEM.  THIS IS
+C  NOT THE SHORTEST DISTANCE D_MIN TO THE BOUNDARY, BUT DIST ASYMPTOTICALLY TENDS TO D_MIN,
+C  AS THE OBSERVATION POINT GETS CLOSER TO THE MAGNETOPAUSE.
+C
+C  INPUT: XN_PD - EITHER SOLAR WIND PROTON NUMBER DENSITY (PER C.C.) (IF VEL>0)
+C                    OR THE SOLAR WIND RAM PRESSURE IN NANOPASCALS   (IF VEL<0)
+C         VEL - EITHER SOLAR WIND VELOCITY (KM/SEC)
+C                  OR ANY NEGATIVE NUMBER, WHICH INDICATES THAT XN_PD STANDS
+C                     FOR THE SOLAR WIND PRESSURE, RATHER THAN FOR THE DENSITY
+C
+C         XGSM,YGSM,ZGSM - COORDINATES OF THE OBSERVATION POINT IN EARTH RADII
+C
+C  OUTPUT: XMGNP,YMGNP,ZMGNP - GSM POSITION OF THE BOUNDARY POINT, HAVING THE SAME
+C          VALUE OF TAU-COORDINATE AS THE OBSERVATION POINT (XGSM,YGSM,ZGSM)
+C          DIST -  THE DISTANCE BETWEEN THE TWO POINTS, IN RE,
+C          ID -    POSITION FLAG; ID=+1 (-1) MEANS THAT THE POINT (XGSM,YGSM,ZGSM)
+C          LIES INSIDE (OUTSIDE) THE MODEL MAGNETOPAUSE, RESPECTIVELY.
+C
+C  THE PRESSURE-DEPENDENT MAGNETOPAUSE IS THAT USED IN THE T96_01 MODEL
+C  (TSYGANENKO, JGR, V.100, P.5599, 1995; ESA SP-389, P.181, OCT. 1996)
+C
+c   AUTHOR:  N.A. TSYGANENKO
+C   DATE:    AUG.1, 1995, REVISED APRIL 3, 2003.
+C
+C
+C  DEFINE SOLAR WIND DYNAMIC PRESSURE (NANOPASCALS, ASSUMING 4% OF ALPHA-PARTICLES),
+C   IF NOT EXPLICITLY SPECIFIED IN THE INPUT:
+
+      IF (VEL.LT.0.) THEN
+       PD=XN_PD
+      ELSE
+       PD=1.94E-6*XN_PD*VEL**2
+C
+      ENDIF
+C
+C  RATIO OF PD TO THE AVERAGE PRESSURE, ASSUMED EQUAL TO 2 nPa:
+
+      RAT=PD/2.0
+      RAT16=RAT**0.14
+
+C (THE POWER INDEX 0.14 IN THE SCALING FACTOR IS THE BEST-FIT VALUE OBTAINED FROM DATA
+C    AND USED IN THE T96_01 VERSION)
+C
+C  VALUES OF THE MAGNETOPAUSE PARAMETERS FOR  PD = 2 nPa:
+C
+      A0=70.
+      S00=1.08
+      X00=5.48
+C
+C   VALUES OF THE MAGNETOPAUSE PARAMETERS, SCALED BY THE ACTUAL PRESSURE:
+C
+      A=A0/RAT16
+      S0=S00
+      X0=X00/RAT16
+      XM=X0-A
+C
+C  (XM IS THE X-COORDINATE OF THE "SEAM" BETWEEN THE ELLIPSOID AND THE CYLINDER)
+C
+C     (FOR DETAILS ON THE ELLIPSOIDAL COORDINATES, SEE THE PAPER:
+C      N.A.TSYGANENKO, SOLUTION OF CHAPMAN-FERRARO PROBLEM FOR AN
+C      ELLIPSOIDAL MAGNETOPAUSE, PLANET.SPACE SCI., V.37, P.1037, 1989).
+C
+       IF (YGSM.NE.0..OR.ZGSM.NE.0.) THEN
+          PHI=ATAN2(YGSM,ZGSM)
+       ELSE
+          PHI=0.
+       ENDIF
+C
+       RHO=SQRT(YGSM**2+ZGSM**2)
+C
+       IF (XGSM.LT.XM) THEN
+           XMGNP=XGSM
+           RHOMGNP=A*SQRT(S0**2-1)
+           YMGNP=RHOMGNP*SIN(PHI)
+           ZMGNP=RHOMGNP*COS(PHI)
+           DIST=SQRT((XGSM-XMGNP)**2+(YGSM-YMGNP)**2+(ZGSM-ZMGNP)**2)
+           IF (RHOMGNP.GT.RHO) ID=+1
+           IF (RHOMGNP.LE.RHO) ID=-1
+           RETURN
+       ENDIF
+C
+          XKSI=(XGSM-X0)/A+1.
+          XDZT=RHO/A
+          SQ1=SQRT((1.+XKSI)**2+XDZT**2)
+          SQ2=SQRT((1.-XKSI)**2+XDZT**2)
+          SIGMA=0.5*(SQ1+SQ2)
+          TAU=0.5*(SQ1-SQ2)
+C
+C  NOW CALCULATE (X,Y,Z) FOR THE CLOSEST POINT AT THE MAGNETOPAUSE
+C
+          XMGNP=X0-A*(1.-S0*TAU)
+          ARG=(S0**2-1.)*(1.-TAU**2)
+          IF (ARG.LT.0.) ARG=0.
+          RHOMGNP=A*SQRT(ARG)
+          YMGNP=RHOMGNP*SIN(PHI)
+          ZMGNP=RHOMGNP*COS(PHI)
+C
+C  NOW CALCULATE THE DISTANCE BETWEEN THE POINTS {XGSM,YGSM,ZGSM} AND {XMGNP,YMGNP,ZMGNP}:
+C   (IN GENERAL, THIS IS NOT THE SHORTEST DISTANCE D_MIN, BUT DIST ASYMPTOTICALLY TENDS
+C    TO D_MIN, AS WE ARE GETTING CLOSER TO THE MAGNETOPAUSE):
+C
+      DIST=SQRT((XGSM-XMGNP)**2+(YGSM-YMGNP)**2+(ZGSM-ZMGNP)**2)
+C
+      IF (SIGMA.GT.S0) ID=-1   !  ID=-1 MEANS THAT THE POINT LIES OUTSIDE
+      IF (SIGMA.LE.S0) ID=+1   !  ID=+1 MEANS THAT THE POINT LIES INSIDE
+C                                           THE MAGNETOSPHERE
+      RETURN
+      END
+C
+C===================================================================================
+C
+c
diff --git a/Tsyganenko-Models/Storm_paper2.pdf b/Tsyganenko-Models/Storm_paper2.pdf new file mode 100644 index 0000000000000000000000000000000000000000..6cd2d10da4e350eab62964af235470b7c5e78f7b GIT binary patch literal 1223105 zcmY!laBi8yf{)eV@#{)Wo99s?-z(Lj_)ae+6?( z1zvp*g=hssV{=mlGc#j_SdcOWLn9+&LjzLu6H5y-3k6<%KLtZG1z!CSkffoB ziMax=ot*-2YF-M+cm;AmMNw)RuerH`iG>2M0TdXTDS%lDdAwX;hJm56fd#slk%2L$ zn31UghB^}?V{|cN17i~mF>^z6bTJbH3nL6Mb5l!9F$)ZPP0h?P>@YR6G)32IW`acw ziyfB6rWkIqG_^oC&(Ofg4BcKs19JoPFf}x=FhCC%LqkJT40VRamgxR9G_*8BcZ;E+ zr3Hq0M&_27VitxNZZoouu4dbC}CAnl$e>5TEuH(!>b>h zS(U0_Xk^N(@0pjDuV8MbV4x7Bz^fmWpI@S2ZUN;56s49y$`WI91zvqmmuMS{G!t`E z<0M1#WJ41(v$V8CgR~^ew3L)IL(`O$MAH;I!YX2U?d*7qOA?Dpz@>`;ud1r6zZ8@TE(=2{3sM#IofAtEbMn&_c=ZDk(^HETK**k%~D(P;mk) zPxXTpOfAe5^xZOZN>Ymy^xbk2OHy4@lk-zj74&^l^U_N)6by|_z=nX#C@v{VP0Z!x z^5{%TNJvOaNa#&ZNKTm0lPr+tz>v5=LYkSI`M8k4`H7AP8eJP4UECZ!n|)g^er%4B z>)v}l^LVSVr2PKdVl%h)K78=FE^VVt`wR}Ywlj~pxxJl(omFIKo;OZlZ1R)uh~)K_*_xD|I(Tx zE4TByPCFm9H22d=e}xAV@@}7dn;jhD-B#iSn%kP(5;IX4<1m^(8!UJnl)|OG{#4Y4MHuaH8@!HWMz2^<^@T0 zursa^=l4vG!+Ct${fpMZ)W5p1GbA#xW<@NyrDyb zS^l#8xwezOmm`Et8a;Inpcyn)9-$fnoaL>TAkQ{Q8zVHl2A8Bk-2t zE4xDjBg2kc*PnxGS7@q%*0YfG1WLrFrY7*(*W41hmWQNlP!Q@W5(P73a5Ci8 z4@xc0FD*(=Emi>4THvJaoS#>cnpaY+5UpSV$*LBRJZcFtHb}wHz!0q25L6E<1SuFA z8bSD=G8N2+=mIqzd{a|06P@xa6rvRj6buwhEsYc`49vl;3g@Ey0_-wD`6Y=ZsR{-t zEef#nKpq9>)_|h?Lr^N^%EgQLRS zNP$=1IkCVaH8VYwFu-%eXv*c zlZq0PA=*>*1NHMV^HTK-5{pvvz$T{Y2k9s0=j7)>ltJ_bLlhKc#_*lfsd7VC%WXX~dHmL}%tC+Fwp zChB|Z=jg}q=7J@2GxJJ|^&|8%Dho1F^YkP2^Ysf$Q;SP7^YcJ{%gj&FFVN4^57196 z(J#&cnO>+L0(M(=Y6;lIF}x|6sYR*9nZ^1}`czC-e>z8B{rKaka>U-$>=~w7`>bvTf#qerEBHAr8C)F5KD}r+vatj-rqT%@g zk;D{u^@B^3O2D-lNE8&`Zka{JCC(X%MGD|(^+|;C49!6`ZFpu%Nd_pl8yguZm>8HT zm>L*>v4xS5g1NbY0!SH14urvSW=0C2#x;l!qK(WU>Ope6AOar-DF$IvGb05UHZe9= zurxGNFgLVN;59QdQvhKQ$IQS)!PL|UECJ$!Y&5no1@l327Em@w4yF!l0Eh!p0FnS< zOJj4eCJ-AW4l)Sj3J`5#W&!ptmP!keTni^oLfQZ0j0m3y< z0BOWzo0=Gc3r*L&{K*3p8X=q`hplf6VE)6Xe%ncx(1Gx`T8oEPEL!;!RM3clcV?8HO zTa$2k2yqr_d6=pnte*!d3e)sGVTD8yxctk|chfJ{Pt?!UFM$*VkP^>VKSaM2Tp&2= zXY2dN@am`QJL#9{gUW(jXmMAepQP`sUk)u7^7T{nll6o2bM#&GEAdLP0n!Na2S@>k z4Z>i*fEXYQk^ngY{@y&m1 zCb0K+_zw#vp|<&xI_BNEt9D}%r&#t|&DqU5hGx={CMs6Z|9|s&o?N#*-XNjp#P>9d z&vHMDx9-@T?!9eIoVbsGZg-96NAu%dlboJEHM(voxa!L3to;i(H`YYov0Zbs$oi4j z)t3G5yVEO5*1pWye>Sf*;DIrhwQ%yG1-4(m-ZM-7G0mm9npaSr=?`nl#7p1PJffw( z-PAq$wCc9>`(uas%1s^`JY?N+TyaYE%DSV`AkUlh=J-Vs!r+ks&nyKveF{i(J zq`BA3QsT>gUH$!Ey;7iG*GsvW&MzzF_kMNHe^yesplQ0rw{E*8aSP7d>iOayywj!Z zci7$Klxyj9=3m%w_2Grc%gcI>+I;INY`ME6w6gHH<{E<-&+T1GFY<+dKiG9H$5$)h z(DSN_?rO(1^|Jb0hc^bBa(+H)!sfkgr8R5JnYQ@Z&E~&*XG%RkpgGn4>?hu5cl$b* zU7VsbKhyu+-!rG24{>wr-ZoKu?V{cIdgeF5^M;q7^lv#_c==|b`TQV;VB`0N)08}# zRb11A15bUv>1sGHG@Mm+>5|l{zXACb=T_Ypx2$rWGSRTrOQ@^-Qx}6y!hb{CSGq^} zUrgs*TN*h>SN4%i{)PwFUubiOS$FGA>U#Y3*Sj|Jo~3Tx`F-26AM+iS6`yzggW@xG z#RXml^%a-ZCCYf;S*WzNI0u}QeH>P>qVjA+gnRq%kp9EwHE*Zvt9tv0@7Y`fsaJh> zTCxsST9kj(JstN?B!NNo&Fm1&o}>k+0|d%_=0-;FjwHC_2NEQhB|*9&-5^AkED1TC zciTW<&vWgfC0!m1R(#)@!ENG@zwfH8fl%`1i5`th=Du+MwfAmpRMDj+>Ye>_@6Mh1 z^xZ$Tvzy(XeATU~RKIom?)2I7b#AEWuC~d(x!_#Z7Gu5BYZ8R&PU&Ue*dSr~GOn*8 z=u@Da zm&vj2?YsQ4`3uZ)dx{DsB})n(`1NzeoL$Yafd~IizW%HseAb#2J5S3gCa2?$uGP&7 zYMkK0ypmmV!_GaeyA|6`sHa|A`|ye0jNGuzN)OlUT=aJvOS3FPtlEzVxh(>XJfY`1 zA8%W!e7y4dRnJ?ZZ~P~1>rl3ME^uOFM&<;zxC8n5zV$_X35D#g8~EdPZsxfqbxI}d z*uyQm4bFYeeqA;tLf$=VUa8Bype>QCQi<_BL6Yr33g&_5b=*(~z^6^jh{6qYp%|L+!T5x-_XA^CG!q*CGf0&m8x zjx%qqwAhh5$2lfI+}r-rjRujgW@ZH{8JD{Ge3vY*49QM^J!AR~1xH8a#-^+%%MM&% zp788VvBe~QJvZhxTua_Ooy2gqDOLMKxJdo%cal*rzxurITJUkJy1SUr4VhFCncGX) zS`%Kep2^l&@Ll%d7io?AKP+4P_x(cWR%= z|6KIf=wR@pMM1o~+N{RX?}xN41);>PJB|MaZ#Rl7odt+_i{%6!fr`?}le zf;-~kXXVzgU12zO%;llfw+$-$|8W^G7(JZLgeB8}1_z+|gO^Z0-vZQoM{3!cf~HSE z^(3U9Z)gDO+=Ki1APG<M(urOAzG&KOX+CeH14O?$VNH;$*$voB2JS~N& zX04eyXif*zGlX>WQ}qk=)4=UkAN>-2XG3!{{UrSq{T!55CusN^tv&|}LBj#>_@|Mn zfuRCg2h|xodV(l6LPBGE?u1FsjlFdyS6X*z(BiWeTPt04r$%u$X(rK;{n)-=4>^lmX?Y~j0-#5E0*t3 zP*hoRv!v-k-l9bdlz$%mx9|PD_cHT$PpZr_-Mnejr&qhh_5VHiEgrYOU~AFKOUI^u zzJAZD{_m@k-R6Dg*UHVeu1))SPN@Fdht2P8{rkiIUCy$topvU@&xx{6u6gt0%;iYlrEgbkNjlv3?6hLnos^H? zHg4Hh@w{+w>vYfA zMg6u_e5|zQ@-fY`F1s>J797$Da9k2mZgc4L)!l9$0t@$Dbm#PHmsfS)`+Gt8{n`(w z?-*~r-t+nc8*~1N*EW3pp%e*FAkcl+;;ou6&6mp}Whda2!XE(Z_w zS9Yczdn}R`-SBSP`SkaGg&41&b5DiIa%?x>`dZ|8c@>i~OVXMpk2w4;$T?J>y{TiK zeg1=7@Ap5RHhg7|EfmwegUUU4gJV5sxO5)fAoj`eYC7ksyv+KYyY89YYU{nlV#btx z>7&2c^%Dn}lh?hud}@u|(_=~T9jk1`tJghO|7-BI{eXPgvB!6ANE{U8Z7d+m<-hD?iouK{3iHnFVO}M#tefPtb~#H?KsjqW zJ750it1{^y)%<7gi3@jGB5mb#V0DN=`<7{5E3+;KNnUN5*4NPHBl~Q@;>wP)iTP!m zv-7rJeOsmLqVIUTt^L{XO0c)88a1ZvVFR@pZB2mh<^n<3GBa)NlEEk-hxh zkH=Q>r)rf=FNM8&S2k&Ze7izVaJdgJdzEr(+0z|zA&i^msx33f+nRf9V=nt`-%Uo9 zG141aB%{A|xfo1UfBk?}OzdjX<_Ds8=C;iJxPSMyy5M{3rg8bp%&mX)BKOgYx94Tg z@@e_Y=-L;4$$4^AbMmpmThi>w^|xj+?|J{`{d2S4^dkllCk|&V)-!F;;d0?w_ig7w z>GM)m^Cha@*SCE;lqXQqocF?YZbYR2(OAuizminGy>h%O9wWD7PjIS#S?RO$DYNcw z(rw=+b9!5c>zQd+RSafxcFHs@x~L%_n^WZUtr^K$J6>IN+Nk|Kf#(Xx zQBS?XUvWOwg#xa7`O2*8)GsL;t7(e6pOvUytLLh+g?ZWSZ?gQ%{K@Cf|2%QkU~OW? zYO@WZTi33N;tq_qmg?j@dvRl5YW&+QTLxz1o?=C{HyQhHe@@na%Xe3h?OZ`h|H=~a zmoDD6jh&B_t{3HAKgRctVfp28<#2AU!f>nOEv%4P({4i;5;K@Ytlo z5NVKgWVxPvS4l+wQ8G^G0^bw=9olZs(CC`% zcmMtGKmoVC7yJvjrd@d?opM?%%c*-?!rstjSxvpHY{xr|7pVPBo1C(zb@tgix0WB@ zA9+VfUOtQc(j2kpf410Y@p60a+kW?UQU2|O#FW^}7c=LotXpa9tz3Qk)}_zAZ`~X< zikEW5Px|C==JoCEMcePZweWZUxy9tE+SHi^7iMUef7vY-5vOvo$>x^rQ>z&+r;omg z{oPkBaHe{5iq$Nh%b7Op7w=eGoT>fpqdnW5HDXEPLzVT}HK8e@Ona}e9M4Z%e(i>Y zc5(#t7(?$9N*HZZzBIK!Jm6;#?SAM?blpaj|o!v8F}NS zh@YO{+b7q2eg~*D2KQ$vZvXM@Q$cNIa;3P|v{wff36^Uhg>g=+L9d zUyt5CZSmmur2xy@n`WE+&7QO+MK*iAe0}9dexrYkRSfShf7tiM^XojZgC42@huki3 zq{J6BYIjB~XtBDa>UJfy$lhGUwQZ7?qv!M;^S#0!ur)|OdwO~&|D4nR*xu&5gtvvq zUY!2#box#mbI#Vnn#G!Vn_fH3V4QzARQ~9dOJ&YUdQX%Z3pkgmv@*-^wJ0cZx;oGG zoPF!Xsk!=(cWj!SrY3!UN5M<(n(Z^+fB*e^2g4+0)c_~mOPsY$TfL477Hm9qM}SSk zLF0pZ9fx|H$?o|!2Xq;?KX`5a>Fbw*J?Z@K*1vnpo16O}wu0M9z-poJjuT&FIc#4D z@O{a3S-SBO_sk9575fF}R4zC3j#yJ#w+$%ABN@xy8lu;q!CH{hy@o4d9B>YngMNqqx3B+WgG2i-#tJ+!m6Ho%B!g zv`p`@GcU4gQjPC^=lgZ~bf-+WacN#k%SMyU*+rSU2bIIEJf69_j6Y;eF$6aI_=@Rv;W2a1-{~JQ!`qmcCu@UM^?Oe+YGg34lxna`#f)} zZfD8ij_BFWb6G|0kxHxN*VR|<+V`<-dlkFqifxV+m(%U966ZJmo$$ua)=qza)vvw3 zJFD%#T))~BSNQyL@~WbH>%%11Y0V2i;Z+iLB_nUE*!C-jt+cq(w$56&{fXhfc)xYq zZ=0Mq7wLQSD&u0>kC2o3CzzggTiW`6e$b{>w9_{ISW|# z+Ma`s?SN<6pbbRihBE$9NzmK{VzL6ngU?lfhUQExEEP-*4HQfa%@j;6jTOv{O(ASk zBk(+iv8AbknFVCF5k8^~T3iBZy`l|lV`)Bv+Sj1wIc#7X)YbVp>R zfXqS~*#gfllI&5!(=s40f(9C)Bd?(0Owi0AXaEv~L4$js(M!;%D~J!GK?9N?aS-MO z5%@4j69|J0fnkt((6kJA02M@lBtWB;V77q?d`1PN5j1iMk_U}yf`&dpY?xXQ%?r{5 zG7+QzBmm-r6+-8DK;obwPmr@gG&oibAX670ePAzuYyojVG)N(c4ZU-)#=BQJPK(oPR`ce8B`T_c0`fmD}`YHN8uvuq6 z{Yw3+)EM5PeElqaU;QfmJn)Q9w!R~Do~J@T5IVc#t)H(S1ewzYPazke^t26)K=XpA zlWE}c3$1{G7jC@zE}3a*sYR)IpcNg_3Wf^$ISTqo3i>4q`l$-~X$ty@3i>Gu`o#+R zg$nwh{=I^}4`?s}xdela%@Z2)GcvbC>$%5F^v!ND5NLb5ZdlBFMznnU)kk+$B{r_=y0P1P-L*Rp3MSsauKk|dr_0gq82^E|UKit) zf_&GXJigqRclj50dWcxkitGs%E^8{E{c1hW@g|;qzTdak;+?CXG4X~gJBg}q<*wyj z@#KC?NLyDO$L+r>_zUk{;ajrgGD8rP`z5<0u5Jp-wOs0cEJc?p88{o8N(3A9EhpQx z%egbDzBFQpzw}<&dcsc2J5Tl-Us67Cf469o@v)sx><>!2#QAW&|Gz}s*MGU_Uk(F? z;1wN0Sn5Kgc@E^d5GlvG~ zf3#ZB2;@F^0{~QYfT|1-jf_DBIx-)|29>`cHn?y%0<8!#Qs4y%V8fsi8H7P~6v#kO z?Es=-hJY*vRWabT1|S1Kk{}GKmqD69G^jcO(IAB&3|_2YZUA0V0TwqmK&*CvX$DDv zYyoKiVUS@U3qZ~WiG$c63{nr016Qjc21pX_Oj9H9tS86|ATf}0K^UY7qz;5ZY!C+5 zNgxBj3JnavYcD{2kOq(#2%B3Pg4bcdG=f$c!3!ONiw3+glNl)TL8%zpwz33e3AAz! zG_?&%GUmpJ`3Ud|G>{;nvdI#p8+|^a1u`GuQvD_Tg$JYA>E#}=-AWEzThtd%S71N3 zNLOsrlc11Ge`=>Md2(dMgbM?^K+j zRBd#Rg?o2UQm2>raZ@F?`6HcH-%p+70aa zyXLekO8hUMVJ;&dliwu$t72JUZ`-5=#SaehmBj}!S$;1Qzq45P{r1zjTUI^F4OsIx zqxoy{&cAzq6&>b|%K5I{IQ7vM1w*#FGVL$M^Sf)-845=ow$v1PHs@3mQ(!1(q>Jbj zkv%u$!e3l=4dYmuy;dkEGFZznyg?~K`$yl3c={$00hQMR9bzT(v8ySCF$YJ3nX zkdAGf{6cT7^k=Cv&r3cv-`r}rs*fwykX4{UX89A3Elo2n%!*K+dLk|5jR=SB&)6=( zjf^L+KGIPZKPGc{(YJROO@lufo=}~zeeTcQ6=GKntt;+x$XQm59Pm!SXclwT`<&?-CVSRSemmQRdA;1z9G#RDf>cq*TyXg zJbOic{hI^UG4hM1c&^s3vIyRpk|w^HP26*e;r`pl0}nkrTqzm4=J|8S%E!mTZc1)+ zYdI<85a-VN_=jct-gDBo-C066hBrwunM@C=&TV7=6>wgpUiQA($Flh@g`slWj;AN| z$!?v$q-e*+mdVfD-n-?n+&bX&VxrpW1$Q#8dd8%jIOY>3z)`ka?@#c9^K)lcsbyCF*r+ z`wpML36~i{?=i~NXg*x?`P!Mclak&_tr0t~)Z}#|_&V#1t*M-RhDE2VS(k4tlw$5p zC~T76|K@#f$X#3YcPD>3q>1w^d9SwfiH5sq^wQiLwZ?^(0h=}(9XORG_-ECOjK)D)bMxA2LkFi%oGtovB6W!uKCCcF4E+}mf(pLVT~_2iOk zAGZHkpBU4`C4SGhxGwohN~Wl|gm=IjqwQW7?j4(DH|5&9V-_=>%ySR%y*XLAV8<4V zm^qBL7s7hE>e&1zo|?(<^nj3Q$M@=;A5Q&@WNO)S&Rj^9&GG0JR^C_r{ufrThzY#? zsCrxNcJk&%?I5wtUA=LitFO~zrqO&e|@Gt!j?fm>wt;L3PzTu zXzkpPiH`m)1_G_`|8!Zd`*@*=V>hQ_WTN@Q1$i-F@8z;PDJ|7Z*!2INU$?aFhflwJ zm#4->UcJ)$EgmeZ%Bjr;2Vy?|v^r~HvP*WM zhSIlZU6*s#Z@9VoeQ?y$cALG=%MZk@b-MkU&+Prj5Z=< zXNVgrY}o&HpV)fwelB%om8gZ*EltZ+MGAwMvcB#YJDPoZDevnI)9ojH$ceU^F!B4L z`C3etmHK~9aORw>e)zTVK;Iv|Hy<1(h(GL^)u8ge)n0~E<5OJ4JAT(s691C@7c5n* zV3^5l5+HDW(v*qP@5;GmO+K{WRaHDYw(DPOO@m1I`j6i_(oClC)n4ppU}n(y)0=_W z?lm+Zq0?y&ZtWq>mRf=u!k{JtxZ!IAUXKT9_<|%r?Fraysgb3EuBEA^f+1*ewz;_} zwuY}isNox6;%wq-4$@Az)oW&fx*)nhza%5SC{N$nKtD~tNIyeAwIoA7Q{UML)YU62 zO)M%&Ekdjx&eC@_G`7%pHZlN7XC&sN>8I;E8=2_G@H!ir>W6@gLTyBY_GqE?*&*xF zp(z%*v4H`B>45ESh3-C5HsIdvdpw=n~gZLmCgh6aj!xMx-Y*51!#0E73K^P_2iZ@WCLfe6mB!W7~W@rG)sHlxYi1BDa0dJ6E=>juZt zr7Loi9I~@sEjG+ezI|iKwqFVIRqXGY=DPa+zHnyl$vg9l&wamJtdU^I*tO`>ws&_T z_a$FnoytD@RQKGY(dMG*VccIs)oMe(am(wznOSXf+x>9et4nY0*gFdwjFILBbX;ULst=g`V{!h990*nvid9}|-_XU;NOYv#G^ z_OqqWoQ(7L<(%B~W~;_D$yAv_A~t=hhV*y$N_nR|xkQGNXJ2m7?< zmCk>&{$6d%YP)^=clH@rZM8|&P z{=EA?EpHhfG3VJEU)xYz%_pa=esgvqpX9Qf61H8`SY3I?y7836kq#)*2f#GzDcKGe?V$x8H31)qmRk zVRiG`cfZMsVXmT>%X$G?c29}zI$1XvfHBGPviHB z*xi-uCK6aJ!FqGTlj(m1rZ3ITn7?F8wwu_ZLe`@bPfZls%QgK~=oXQwk3S`e-8msF zupstt-xZ@K`AVlX?q4%!Eh_b9Ymak2y-`o~ke1W-1x`WBu3uUu(Dl*HE?okXP$}AW(#_hz;f#=SB*~Xl$YEbUH2QA6d4P%y)s*x zoEmtwJYLS+u|#U-I-lv6)~&d)(9-X;pzfiUp~XwL$V^o_m9$juN&eTvUzYu}yp?c8 zJI~`KQ&P~U2xAZrt$j5iqoolj&8`2yz(e%`jIka%@?uzdv)~N-wRA`pJBc+ z|A@yqQzz$1)sLsYwe9QB(cR>m(7E$=U-7pjsYiEWrSmIg5Bd}*SyXmaZ%LaaGSOK_ z)6(ajinpiS6WgSSgl40zFMrCU_4o7bKeo)m?0)jwUsiVxJ>b6P66CXVmaDnD-UGpG zC!bw0Nt>l72^u98n|JGl2l*7-m=Sq5saQ)@P56S{>m&9Cd(St%v|oFk?_1F?`6ZJo z-EJORDj#usUa-Wnl`cuguAdXNlTl~o&fVrJUCX1nqIyTbj%|G65pOqdtg&tXna&W! zzB&?HD+4yxWMNW7YY6%Uh_d}?wr??RvzMdIoUkTBv_|jZr{6aJ_)KW z8<)>m5%uhg{EE59D=%F9XY_R6D%Oy!x!=`h-eFO@nZT%a`Fm=w<))|emPqWLx_99+ z8RMm42_G)MyRe=80gL&jlX)u~ITmWZu>NISD!9XOi3*4L8~2$!LbLY1oM0Dx|K8c) z@0!*uo3uA^wRZQWX*R^n|0gQa^*o2Ee*VW-W_gky*O)&ka$RST*zk<+XS@27ts(mr z-Fbh`IP^{Qc+2|9xid~p_RYAIwyLL%o9%#;Tk*xUnS0+QZz|RaT)z0+eUY;UtqHs4 z)Jp%Da-QpGOO8DCts>;F4?2F)9>xg-6zi~&Qxi! ztlzSFzgyL-X^Iow_sN{Ss$1<5D71I(+XSNzQadwuq)p*nbxG@W|H{=&J$!xdKS$(0 zXsX<0uaNU~N5u5ImF9WjFBdfN2Kuk%+&RI8r~A0;CMoZz)xTZ$J#o#GIocDrlPf#* zxf_#D%N>*NpO);{t@AHHz~Zdve*F~&kF^{XTzgk{bu|U=(3`p^L92Juqoav;7V7uw zE(qA{F;C>S`SJyBN;pXO~47jLq?b@15hZJ%G5X_Y;jE_p{)f1^`nvqQ^^=MTm1#j4xh z3ge%d#?`yd_%NGH$fN@Ke+)Br>Q22-c4hfVm)pxWGwl6-jfeZSM5CMg+^>$4?Jg-F z)eK1VEqYjFR_B?zVMpr;fdEE5YuCs6&21WQg&n44t-rJQ<*xFBRT6iiuZj9@xSR6N zU*P@a56>ROnr~0rU8%>mIP<~RPs^?<+HroaJ@;YOtu@h&3wS2j?w%!$J5Ez=@h;OTchWhjo zjaAg`X`r!eV`F3R)Gny?3Bne}#tP;ZhLA04#>NUDd62j%Y>S$)F?g$*k%b|6CkJ@6 z6RZF_nTm}KQVhZ%Ltq$mzy)Y76uuJ$Gq6TsWbX%I4p@{-`)YlNSInx3> zgbFtRG`1oYM>!;kW)a;My5fEKw=;a(geaVHYj{R zY#0WI0Z0R=i4RiISG6o*x9+d^?p~%Zv1;47P)TAGuGc{4;nFf-TzRMxl_%dV)YIEKkH>H?y0S2c)d>Y_Pf@1 zw$%w<9gh^fFRD&|6CQrt`SQDycQ+fJW{t6TE&8ygF8lDtn|vkP*4z%%JA15rdE25} zX5Uy&Z%)3kz3@%j<={8UwhWVOzX$8G828k=tMhk$-?(^2+H8%p>Q)QXy*yi&Fc{xv zZ7Ka*7$I0XYsKZ5nL$FO46YoC7r)P2+sLt2G~~D7?#q{NH>5w^ky!u8;JaU-(CNFD zoKtt{C{+ZCJ=@z69O8URr(DRZ<8;j=>7{Sf7ld_i&MsEoBBUx8%Gq-*wph2(W8t5v zLNkv~Nvl;}Qn2rjg2{)^`${}BH`{vqMx9Y>;PA zKG9b*nyXBj26)QA%-(ig52gx~!uV%57LOir9ZiYvq7k8)TsK&d86n%Ad*9}f z@)C!lo{0>v4S5VLr7sj;4~lTSUA&G*mR)V-uX=EJGN}vuD2`Mem}kbNHs4mw*GS!^U)X5Qw%1kDA?|(Db#Z?Wvcim zTU=AnxkfhR-uGoE=G@#6J)x*~%G{{gyI#8byKZ|k|HqR)RlklX-9nUEj@Ee<3(Az(hw}ciNSA z*=6BV&Q={}++fa{U>C6?tMx$5JzM7~x?Z+AlNSE^#%)x-H6gLS`m>@t7t_@JH|ML*%xut~DXMcfK+j!x?}JX3dWsp-0g2T2b#q?=h< zne-;q^&G$aWZxvOqX&<1PF%dyGr@o@IsJLU?<{Vb%~P0sjzy&AqpX7QA# zleXn_X9vuGx7wO((u!b>sU-o`;@to1R8}*sKD|@ebkpKI;h#xUkK{Hxvz?v2^xm>7 zm76!}N2{2)eUf=IQEtI3wy$@D%QE&UuRb#Mq7|3#<6Sa;Din@h&~i6X3*k3xo7BB$ zy}R>^)@u)HY?g0%qtg1&=Lgw(pjOE0Hf+~T|C?Tx;0K9lD! zeqG$1$+=+fqJ@$P|2I$h|NC&Qt6Gv!`Nq#TlaI%rmdkZ(^eW+q)VQAU_~D$>*EJ2+ z%nXZ`OwgPhQFmqj`2@+fWm7*KT>9qiqmWq>RyjZTzG~_JSJjOrB^KA8%TK*%@OOvP z&-eyL29IgYpRnag*jgIUQZkS{s2Vf`ohe0Ro&@Pf&yy)Z2m3A?2<&~XUGyMfaj*5Z zD3m;Tp`nk7xt$g^A+TH`r!G;+2;9aliozE*vS&O!7AkO zhXclQ#Sd-vUg0m1af{iFr(@34FDWf)rI*c;cifc`YTuX5KCkjgKuC4s%^P!^uYB^b zEPX21nzsKI=g0TALpRmVe-lyvvZC#&>S~JstE97RN0?(((k81CClK}^ywK#{$5<+ zXS28|affz~$bom2ZqH8FdA&G%S83~umhEB78}75H3S7|B?Ge3HH9zmXMcdV1xt}Zl zIbGhI^S5L9qD}s%zfOOizka^hN6yz$+amYrJ)eE_v-6Xrm+N1PJ6aqUQ@P&d*^xi# ztfO|p$3-WCuGcK^Z2n}-I$`}Yg@qp`PRL#;!REWA_qV=->uup9@(Vs(TY8Nnb<5tF zaV3AhUXtlkzPWXKiBrat<5O2%(mI~J!?HA|j&J(1MXFh@o2$8E>-X?kl&{=)Q)qgn z(z?Ujw{LqHC3x3imM3GI+gHKWO=n`+yhM#3>@Yve^X%_k0axy4_Zr0+0u#S!1kcQS z&2szuvE#?oR&c3@yz2^iy#Gzk8y*Ax3Gu3zIevaq&ss72*newNBXO>x-|N}(j!Zt* zcd{=#H$wMu;^L)G&3@`0U{KkA9?KXA_*5EDS_2=J13CsoK_78=4X=K%qe5C@PH`$| z=D=6MK+nJk<-i6*@VNp|{dj8)Qws|dLSxq{Q?d($uZtePer#GElVPKqP1(%5nQF2U z5|`X(o!oNSN%3$%SEpiI1LNZaW$wsny*X>QuD+VRH7fEL|H-J6pS-4pee#-?bMu71 zPmipD;vTCDVpe}Iyqw~vJ~MOKT$5U#@RFBXvNO_t{V3Xhr}~`j^ZI|!!ts;rP5_S@-_B)eHZ<*?!(^-^X9~rmlYLx@60a)U#|mgO2?_XJ;AIr{?|d z=H0)4Vir%klD%~O`q%fHuB>nO^7e{5_D|dO?!EtKIi@;fD`w2)y2azj!LoN3*DWr` z+lntrIexLR><#34%Nmes8M3ymOlzuR>IJV^%1@i+^)vLts_4|2pTbX7hxooK zDwTV~c2nGM|A*J&JFotD6~Auh?@K?Y{|htRR`&c>f84*%yBfc)zW)4L{imt+dmdfR zxpe1d!1j;X(y_BcW=okn&t8AbcivaJDTn=t|PD=qYyTamwAuV%)Pt zD8{7iXi|(4>vD<4u7!qO4+@q<#|Gw1kjs|a`R;LfK-Rv!7p5>u?#&D6&L}OLEO&YK ztt}zE8$vF!-)rk<_5Wa+v7>N9>v7iPQ*#zFOg(8>sWO|-&Bdoj<#Ff33awe)F-#w4 zKitj#AaCoQ#qPy{d2g(aZ@G2ytlqJQO9f_MKEKn@{CQ`U>w&(X?`qk+?O*&|Y~TK? zc#c3PLtpogN)@{kmt@2i?nwJDneg)G!Zl%^LOsgo?^!yr_R}hXNI9|Ae~KzHpDHbT zl9_YlnSafQJH&B%fB5{bu`fy%&hzCH_LIW%Im%be0mn zm@{V%9o78WC31Xe7VpZUS$EB@J^r|3?-u?aG0(cITG~f7@!Q6`>*|s9zbE2eXp3_lWEU7;4(4=RLVzxE63Qv^? zna-`LZr>ACCwk#%`rn+Xb&GfA{ys3}dXr)9ntgm`yKb*#@tPo3Zha|B=8S}abK8@> zwFmq!*P0}iZ!qcI857seyRBtSA-h*v+Fg0Ye)*2@=^K`=e%W8ocK(9!G@UHTOv!6% zMb4Uy@@zF)8eJcjwQ@KT?N^x zKZ<5f@7H>NY-xPvqvpGcPqz1a-1U94OfUSm-W{*mp4?fAXYzy}6@2}bc}8wSo6a7^ z)Mv7c0tFVo=KOy*v8-}#*$kd&R%@@6=Py8KdpXQF{H*2Aiw`Ce^ZL%5IrRP3y6Z7+ z_kVskyCz1=kE>iWYj@VHj}8sIq8(TH`BB~@_gl=jW=Y+3TwtAXcRTw!&beau z+=buwOQ;nz`1|Zkn|RXu;Sme7c_&gHPgaQIID6)B`Pyz@)-4x8n|4UZojknxT2q~f z?A7@_VM^?N5nrQxR;!=Cdhl0*_ZHr#zQS#j$?M7PB&EY3Kxg zpE&$WuAB7t$E>qrG2eY#bE)#FLo)$P=7=1!C zby9<1%}m3HH@>Vv846eBx!wN6OpxZ#JSh5U`K9viD&Bvp3pixV?3qPGy(@w|yf}`{ zW6p|T40$BEK<7Mzs=e0lNm=tmSF!$Y&N}oz_-$pt(Y230?$5HYdGO{X)7~8Z(}zmb z4_5{DcYo2`r@VCj@z7~ml0Dvye12Kg^F`Y( zCq(o-`Sd|!uCn_S*<9gSl?SBnaldnW(!M0i=&!xXB zSv)uI*yErTPhY(-Qd;t5<*&`{oikl?)b!8j9prv8B~Qdu_4T8vfv%C2_ZPT5y2>pa z7xj=wcC)*Ofa0&)(Fw}8->C$sJKijiy0GJ3^lFX8y3upKT*}n(Niw-vzG4);}%oC{OeLHTCHJuPLV|zt7mUCQkh@LtEkRj21;E zL1i_W^^z-GwN|fqmbKF+;s->@+kmF(_y-P|-o(73avgw197 z&ePlc{m~3?R)0XLC8w-D*XiZ^0G3UYe{jBv@Kh@^)-nvmV&896v zb}u7a^6x#3>*^l7-Y;?bkZYamfyI~9y}oR1I*}+UdZveZPCM;zDNB_*TXL`dif6$K?yK~QM8y2y(%@}ulU;D` z{|(vd&!@%j?6rJuvLxpBD-)TU=Uygv==-M!Hl9w*6bb-_`HmHD7eqa3m{iyu%;?QdA{D=DWUn*|Yv2EV} z`Ny^8{GD(6#q9ox{H^)q|Cj&czjpgqHU16PM3&!OeL8cMuTH?(m%pkP*s1KV6shgC zb*(PAB|Pg(JEQEE&69836fC~$&-32xU(WZ1^;hez{}cFs_0`*R%x^k3yp7%d_U+qm zHHcFb(o#20MgA5LrAW&1Es-FW%Y>4^7? zXQZ^N9lrmcXxh(vL|o5dnNVt&P>6!Y&Yh-L>^QGx|9^O)FFW0~P%>=q>02)%OPW3( zcdoE;F;tXbS6p8p_xbkhbKC7UnR7HNIj22xV*4PecRVR`Sq!J3qN$RxYJl3|qXK2G z(kE^VOiD2+s$-Zt?ax&PnXIr4vU%;>)8xUUacY|z^T`B`vi1u; zSu)ZxM(g;6#n=BXPwr>9sx6@xI9()^Y0;u7B0g7H_xb6lKDTgYXi7|tzHvCVIJx`A zos8N7{<}SQIZ6ua%M;#C{aP-j?z2p2ozd11*@CHS;+&t0oHi;roTD9^Q>^@Iuiu)= z=j~UF4-|bYd!X>*x{U681A)xj5%GDK`hq>Z zYqo6KMQ04j8@OUnrg~x@sCjXV&EW!*cqo*e(W0yCu)N$ftfO zbKX&whgpi=9IY{&%Y6OzEHV%L&6{FBPFPk=ob53nO z=4-u;zcP^jQ|celG~reT~{ zbiOFfJ0p4fHEl7SoU=#!N`)h&U%lP^Lae&^-J=roJKqkg|4zS>d8W8gMo#t3rpxEw z$-LSk{@OcY^Tb6Ziv$DM?mNT_pW9S7=j(E%P7@E+B&ObpTUMxcv>dy(N$o`D&u_X{ zvq$H+nZp~l`eNa`6R-E0#f7i-k_~>! zqb)2HoyL_?=*5>+C~*DNo>s{T*%I?bH>NE(z0vi*joo|s%jXi;&!1UYJ!6Kpbets}->)Q*=IcrzXT76{I&K;L-HOSvnJRR4P(>gKCRQteNb!Dr2Z8@##7w#2% z99fhV$a>%!m~EvC6nESy|&fz*`}wv93`?Y&xvMQ zul#Lyb}es9m$++R!f8p%@Ww@_%&%YAYuSGEdDZ^1?-oadcZhsS{umPYh{Mf$#v36I zea_k6FV20m>&~&KtXD5+IZU~_sI4@-X%f#Uy0u<-SAG<%=U(L^TE&J zo!oMt)YmUkU+o|8_RK%A-5=|YMk$7^Il8r#fAOotQ}U`WRXi?*s5SYleAL z5?uMvw8%~FnBUyR%lEdFYgs*VZ0^`z{~__cpwaBbi2?_1ojj}{aA~7Xr|a7==8w-k z4VN3@&!HAK&zHL2#t%i@cgJ6!#&eCwS)Ml#;vDmfJWMWeQ}%W7Nd zVa1X?mYXGyEx%cy#kpAV;hLr`N3JAQm~NZ!#;LGuJ-7MBySY2-x+7L?k?Iv&abAuG7S)H_IOf znL16lTEg4bx@fkR-m0}u*JpOR?_zgMOf8K|X`G>VP~w(+8?)}5haXFfjs;r^Y<3#|hS(dOpxl?GzKmVVrmvo%lWr`e_%U_e45p(YiWXhp+63~aJ&F7i-y0s? zeb+uiR&BQJxk{UD#~**J zG%~j9J)V62;NzLLTX)~Sn>yQdsc-OvSt}L^7Mx^N2t6gwpq2k*)uYdA#4fFJx^w&f z_r32w?>YZ@k4?1D${zw&b}bi=stM?-Hu(K8De}H2%pAipqi!Fw)y|S)$xFg} zEt}xiv_ahY*U6F}8ea~`oHQ6;_7VqHpTL+Hg%pEI5)e=dp>DVVnS=nVJkyFIqKy{-}d;G4RkwQYW% zXvyz-leYF=%_F8$cYC}$IO|_mPTrmFWomc!oOF1ny-DZsrX#Cm%>HeQNbcEmc=pM= z)Bg$7YW{h55{fZJU zwzY-seP3-Y^v=kLe>?d|TwHCANZFT%6%O-mSXX^)JoRJ8rWIc+Puw(&YRh207{+u% zRP<$^mF;;px6>DI89oUR)(L!W%2By2osiIN2=UaJ)4=yGPSv zgXgORYr9il_x5Eo-~P%Yo;`0v`}I=`4qlr){n6rQ$KR}+BGLFKe>v|(tHkrgCvJaQ zC*TmT_tlesN9&ZW4XVLTn!ZcCSH={r+~fGWa)e!Yj#`0qf@Bi56 zHk?s^y+&^P!j(s~8@ptBuKnpfAGGh>)yta=pFUiinDNY8b>WZsJAcYNof^BcpL_A7 z_!munc6Vcr1W8V8%}?H(qQ;unZ@5Z6*4w7o&a`;uj+(|lKm8Xp&b>YRVEVUvr~h#N z{`~%Wo~%H0``!C@UF(A@C*L`K^6!&pcNl&YZ(bX&_%=ISIL}*bcEHBj$w$wb>iuW3 zUHT^^=D^aL)+EaV#cR$aguJ{lzjd7v%cbmB-=tsMy|w$6+`6|>tNo-c`m)Q8X$hX& zH}%EST_x@8F$PnvZJ2xg?LW4S57}qmvn%+%_VD%#(tj8?_ZwI5JUf+vXPS6)@r|NM z%Z*(&`iQRN*}?2CC|T3CF*3zb&tZyXpWx?EhqkwJlNP>~^8YX^7 zWzFw=_2=7!+AY05W7l0!tMdM)@4tAt_VaFSi<3rEmCW|vu#d1SJAT)2hwRp+5}OpW zlii;`{v-VIgsP=#NWsFONuLZo3VgV>1~I?$pOvEFyWmCW^8R(o|DC>lm96GBuigFF zis7B0fr=NH}O~fH#Ds)R-ch5IDYn1$g~pyCtHtp zKafB1vF^vei!n{BJHa>I-TyW5b#sWU9zz|{6*@Cd#Yk>`?J3#F$CM}+*?$f zr*5lpD>Y%WRf)P=k|kf+8kNftYPsy5N|H~u&u|Wyvt^OGn$=|4&6!&b&IY8;PAHET zX39yvTGDpp!ppC>l^^t+xoTR{9KW>PLRKf|OwQRHT|P_mWh+t_>z>^KDHuNQslkM^@-eDUDx)!{%Q6y zxZ#ugA+@sKAHMQm&JX3*2-~{5uPwiYf3K{q$iD=e$q#48 z8%*JHQd_BXnz>P1J9W*Wh4zX*J^bQLgt`2W*T+wM?u|5VmyVqNCDY-z zv&7=-VZC7vENdO@BiPdqZ~j;_?a@z>zUQC+Rs7l$q+}y{@4f7{>$A?jT=rBVPS)%5 zW0gy*xA`xb>3s53(#O<4J6~*Een{T$!tFyB9COcZ(upyD)7Jh~snaEf^zE2}R^9pqj!ncJYE@s&m!2T$PRh$+)G?3(}U{Q9@~;Y`jv zm1?o9YrL_CP0wb2N#3q8v19ob6>k&P?oF4gDqr1vamM(=>rcC`mw*!%Hp`{j84rB!Wmj>r9G z*A?56JPu5dTGU~*G~^SPpW6C6Pi#S=T4_1fmHoMr}Q}HEc<5|np z`pmaS_q*JmGt0L8>7P?JC;c|3_?>YIx47&ou`X;n$40&EF2b~@AZ zfDcT^j)E-|~Gl)G)Wz#aiRvAf;zRZDD&{zrG#GwYfj-i~cx9%)$=-hp)^ zbAsdQNht}5NeL+_BBftHa(*bgR_3G0&FN{h#mCpk&y3k~#oq~OzZB0ZPy4<5{qxuJ zKSw?lGx+!ZUE2hkH|KxEbC=b}E3yQgY+ohL5h7_LF+);vX6g0P&wsD{uKSuk>&5%r z`pXgZH3`4>zD}3QHn0AY&wKH`V*ROz{~a4^`F{tpi9GtfG5zEB&x@7{OD*@CXHe+2 z|IRW^?`QcF<92P>n6&TDt}jmwx&KbLIKw?}-m!@}QF0TMr&=z~y7_8n_qOk+zrKHO zTi}uPd-YTGWx7uzip$T(tsOaaXN5|%rXf9x8VB%p&(JNYnCA7h7REU|zFfunXAT*7U6Pg_o za$R&^^POsk#{$Co6RR&*$KKLgo#Ej9NZKXPG2pm>91{~46O;18mkfu`e2|hzduPD2 zz<~L%bEU7UlG9q7RVOYT6Ii-ZNZ7Z>v)1J7t5-&zyY+1+U*(&X`v1%MpM~ej_vOE@ z-M6>DrJz(%Md;*e>%)gq5*OZUJjuGLyzJ+%b8pv*M2b(WJt~}k>{GpVda=j4*iZ6% z{~i6s_3IR~jri5QJ0HBg{_Maz{d^&zL$OXeDjfVx5iSDjgpz~J^`F7cKI>D_rKz2s&rj_-qt<-z zgk)APTchdht*Kp)eoQ#Lr$kdnYw2zK4SY8??|$-W&YYgbe@~UgaUF~7Ydgxc?(SaK zcI^*Idm`9V<9)aTxVwMqh0Byl%s=q?(~93l6)jr){++Pcv-ux8?@ilr?Y*wt z`$Oy=TTduxwsd^Y>{#Y!_CmVn&rkQ%w4jxmms2+X&}dcNF=fpPv#@I$9YPMCvv_kn zAv58JoZh3q(hGAY{j11)<#Eq8f?dzP>AJFS{-e~mvTEPc&(h2_|CmT;E*9=lRX2W@ z;P|KFBqx`;^_8xcGjA&`<666vVhej`GbQD$Q1G*_xpX5Z>ydt=HK$nCiP>wkGrjcF zf-YqTS+HJFZs(H9bhyBrx1)W^vu#y}cJy+I6iM5syGZV;KUQ=6#LW*om~2;Mg|Qp) zNpb~=?_K%gxkB{H zmTk*rl-cSRJNI2bS|h}+v4T77?LozR8^8bOG-MJwEF*qWY-2Oi_xsoCQpzs5c0TmG zFBTv**GykqeNnyr?rY{U!TaZVRY;vY+_in}@q4LClkVN^xtZ}nCa|C~MBY!;TEjcp z+xoisw7Ti7PcPS3pE#WO$5(nyQr@3~cK;qRwP z70WW8`v*^b;BRHOL~Emcb1jP`F&+tDU`7+O56vWpbh9 zk4qPi2MLvLcwK(Cv?}3f@b3en!3+1yTYq}}>HL%Lg!cSmS-p00X6VhQZ|9h*-Ra#qfAlzUf!dtA->#>ZWK|ZuOEgP4zGU<1`*Y-G%SfKSk^AhRbou3j zQMI=Pl>HRf3Pg(p7X>^G?cw>_`^)OvqJ0kMlH;$;*30)x+4wrE=YzC`;52QvbhdM) z+dmzuTea<%*K5_+8Qs&3A6?zh=y%fl&fY%WnByEV)HC&|9qcj{g?PoL@Mb2m$!dzNfu-x0{X>~#1}!OPncx2@g0 za=ZOPYZ>;}AI}xkB_EsqL+ojMh*;2B&4nkMYFcKk{~x7DuoTkqN(=$%sb zV*lE**%y0XKAL&rF6Rx|;FaQU?zHS^-e-EF@?Exe+NMui8+UI{v)^_6;C%gy&Hq;H z2w0*2K-cr<*UX%Ta-Fz>1^+L6&8fR9ws%#>$yY(;t9QKEvP0SLkiYOe+cw|H4&SES ziOhOr5bJ)5cjGa?Wp57!%sy~+?&Wz&>igwclJ=YlyY*5g@~GIa1m~46`ItApaN^ZD zAon}jh;Lb;)ef)B-r~~!`ndAPr*~N!UHEpXtAi_j(o8Xt!+Egcv#gavsf zPM@_>cv?r@3a<{GE}hQG#C2@W!qyStGUu(i0$g_LMI82IzGdr}ypT_#`_+2GN89Zm zE6;!I|CfJ$?>+61ldI-@&OLpd|7F5Xy_Lsi*7dP2mAuqy$Y$rT%v-pA*PTf+hY~Gs zO%9i}e?G~E+bZdV$-UGAEx)XP&28JAJHhp{g=nkTYrZfm!AP+wx)V6loa5P<-7ol@ z;2-YKdD;2IO6haKf`pUjK9C7EPpfp=Kn4IRQ0>)cb$vh<=%Z))qV6^Tz<|U zKhfVjCEtCnem=DS)boA68Gj4>R`y7ZkmtMhTTC>ez09*suIhW+Tz2Q`X{Y7C8?a}u zS>Cu=`n&w4@ABW-zf0QRHL{D1$}f}e>}9>e-r5^o5nUBsBU#PfGi7S`6zO$+Rmt-A zJ4825JiL6p^mo1qzs*X1I~i7Fg~V)IB+plT{k~{$bw@~}T+R2ES?m$Lnf(`}zL&DE z-oAIS+~TPj>!cUYoVR36`GU;U%yO3)`OYV7ZM{+Dk(E)^lGW_JQ>OLKl%74WD?pxa z`S8bb;W$Cr3*G4+PDSWv+3ka`R})WtJSiv>|EXHFZFu@yW-7~EpvDGZ`>reZ5yj4dvE8i*&AmboGHoo zqwq(V=x_NNwk2H)n@Xh8U49#6YRjp9pTgQPxpmfbsU-{h7Wc}{`W;cjKEG>z>#W@M zF0X&rEcWF{oZZ_#MS9Ydh0CVNe;4_Fb@8!Dv)A@X^8LsM87N)Dwz_9_V}(>xU3O!E zobB(T-|XKfvUW^rnLR^l*}9%ZJ#w>tC)Kjg=v>-1z34mJ?=Fd%IlJ|1q^gsD%ZAI< z<;*RRj_pisEnJkn_uBTe-=+4+f7kn=J!{MS-Wk1;d_OuwzW)?uW^nyz)_|??3tCJ~ zOyk$m$kKvP<2NRxvOxH`?9^UWeN6#{Sb^Os(+k)xEmPf+oRJZ%{#fX;$&QDcymOM1 zUvDVAxoK_j)~LA+xh3mTA}58nm;Ri_-=o-PIKkklSFn>;`;oa@E|<-4y6mUEx#;@b zvZr6>f1Ce)e*V7id%xGc|ITIM+B&DHsi`+Le{X2vjyFp$we=+*XJOxWdqe&GeY>Wg z{v2LiRFIhWc@?h@>*YWGHaj0SJADz9qbF)9so4@9{h?vM4*Z=H` zw*C1pXvsQfD(jr9t#eAXEu+JWzljxkby=)$p0moSZ_eS$xv7UWA5AIDnbSV!IBPW5 zGVX_minULLM|4%V*1F0UX~t>3ulvXouvsYf=TYOn{E+ok#aDZ;e$760t>({~Ox-=- zj_vw>ZT0-sHSfaj|B>Wq@HhLC_v7=iz<-MW?wi*#X(oPr_V4-ZiCa&s50w7ZFMe%r zLH+C7x3}d*-?+CY`8(fzznt)odcTgc@816IAK&I3ZZ7hPuN)7)H~F6L)L->~LSxk}m8&UXH@|4&cG=l|o~@u~9vw zAN3P^*f@$GEa5bqSQpLk?xW>i6|btf{}`?$f1c^_Eq$?Y^Ud@xmyZf$X+ z|8(=W%qi;=moB}K-MBc@P|2@1Yxx70D=!ybSa=~JE5YV>+_UBrwhBe(%fIt|S@~~P z4U6Qo?n9+IVd2_0#EmkmFE(6TEZ}rMJAKD;NtVEx{XaV#SR@SAhVpLDwo&A{%C6g) z_(J*r^S}NRJ}|#Zdtzkj%p0)RAwPb8`>D&P6m@i;Ic)VlUD{H;Yp=n}tCF7UY>cxRG#vem3H?MLIkR~9U~016U;NuZ9NdiJH70~oJ7yQ}r&o3#)NwdA zx6{OArToO@6Q}rGiDu_MQW0%@YfVn>wX3ZC(Pv`QS3bEI`Ae)kvg)0JMXI!!`iDB3 zMO>#E7o5?yVh(-b=h@ofpmdER;n1DZgI%*^+|1uGJH5?XKTR|@*>(0b*VnNXaU~Xs zl5LwKjpn!pH?oMn??1k>@q&ba)K|ZA4)R-L*Pc|mR8jk4N%uCH(%H>{J;xmG-YspI$gQZ&rx%r5SSq;#=)!_{Yt5O@IFT z{a>+JSN%^Jd9=w^+uqSLe(n0=$K07ecdp#IGW+CfTL<}U?$6TCtRz0M-&w+3Fd=2T zyx)10PbY}uftjdhW&m%hU!TMGB<|_^T|S*#bB5KS%YEtL zhYQ$0uw3rToN@1TvYcM6)w;8y`gzaWW<34y$M87w^Fxn6RRMzTxcy}LBXlXSvy4APM zy?13`#x47s^Id;!PM)b9vhP@sTfw!;i^g|~m8)_q-hH}r=E~Q`+YZmlKD>*~;F~?M zUpcapIh6DNpB;ZPM58LVZ2jXN;Op<)ba%#)8F^xSKX&W=2)N(6V7AiJ<&?DcZ7U6`b+8!D#07yfEV4zpolTFAHBdzF&K=GNrCS#qyjU!$Q8r zic`ZCo4js+3*W!TX3@DhxgQyJY)Q>@30RtO>4o`AQ`t1toMi52Eayd^tuknD?_GKO z-B-tVdHsjGE%w~Im+<7?{2yPeZHhbhe$2TYnKW5+vxINhftJj-vKuB&f4`jJw*Q?l z-|fu~y?mQ*dohK5x7@`3siaj;Wy1I3@EcEW9-h*$)~Dh0o>PnaFE&0ceYK=q_tU}8 ze(B4(-|^qnjk}UvIIDnTvsR~COJ!OndzkZyvp>|d6E{6D3)}i_P0>!lwR>I%-(9C- z^-S`MdUI!jiQFlMg+1j79H#_4OYIl+onB#lFrIB$@=8X9shmA23wKzq>sH#85gqY} z{g2SZ-Hd4*^IQ)H{hZ|4$e&>zeQ|Hjr{(P&ysbewHb(;1hFwr`Ug8^iLvhB1^0Ji| z_DpgAuekeF^6ed`Hwb+C$~J3)faJHiCGA_h6dW>Kc|w^2r(R53Dt(tNH{-II=j1De zvBx{-9+7|k`RBWueqT=_?hS`n}8bzbh|~sbw}hbFKbf zxm4-R9?lK9{!#Bb4cz?$6n@$lW@Yd2Yq?11l#t&;4*9 z@cYE@33)4*S1@YFMQpov{Ncx6We?RVHsxHzs_T&_8%cDf$_&V=bZ=iBwq zvoPLVCnz8D{Z3`enJbXixTybwMd@Ad z&Sdr8$`{kJa<@JT{>qTy%4wq5y1a?=LCCxb&3o@;FjJuZ<>FyU1f z*uPJnsavBRJpb;BoRDd!j6eUp^u_C&)SR8OR^==0|D4~Sm$Z2Hw5<0!F)wV@=&=bG9NF4`rkRb^OQxGc+*^J{s9 z*z;vhA3d1()YXKUCV8DXnLXoIlJbt#OOJh@=Op_*TTrk4{3c5;wTB{8KL~mxT#{Ga zXj9_*cj7|JMfI_5Ub-9KKKjxo(<6HM!L#m=`~&BHHQp#IymT+aJEvD<%i?`$9~`#D z^MB=UYUBB5_Ce|wn~C2sAw?OTCrdgS4vMC2bbrQA z-1}?gLe1A4&z3J1ys*4O;F;x&=Z|!_Z<($-T)}tX1$WPu#2<`2-y(M#C7d|BvCv?F z+OnxiPmat9IV`s#o%erJma5)_W0xD3obUai>~f=3bOC?pxd&}(zhe2!S%cRl<}uVt z{)*mx%YXhp&Jf;1T!$I0A6dj+ZQSwTaB=hAm78CDyk7gw{G;9VhPym<+v3v2-@IAm zx3Be!*WS&0BNi^tx+&8td;R@y`NdP0?%2>Vy>-^6&>La(Ng=NuH7P8+v}gr~my-Pa z`Cexvwz_r{OB)3&l}IwG=*s@-a^q}o;@w+{(zbFc%F8;=n|m%eeokcj0kNB(?%sC% zXZ-);-2M&!?S38qrv73r@BU)J_>z>jVJ%%%N`4n6M88Ui{%0=zlrPm;%lqaMmF}G? zH=1@<2(s>5kvcz+Pes`CU635}lr)1>DQmKTBc`(&TOizw6eRt zY7+yax_<3OFaHyqtKMAWliJd*;K;Lb@=w0sQ>>4D@R{@YFq4efqLU&@jD`(`x31q< zA0vEP^XQbI6vNe*C-k1*W~Wf+SNZT8`=f(myt|^`XTMwi>+27$430NX!)4Fz*(c9% zwmv+(;bh3-)(J-r39a^*KihjT?agzk_kRix$ZWW*7kuF9_X#R5KeKiyoDp(qabfoH zc~Icj!Qt8B-?6D_>5>)|WiAUw7aiB&2P_{ZIoh`d*Yy=B^JOl2aCA?rYMSibUCTtS zf7rV7R8gVw_9?5M-}@PH*C;JNeU+r@;xnA#%Y-TyPh&f?!n)T+;9&FFEYAnUMSf>E zEfd`|KHB^^ERYc1>6NIMB6J}2uwstNiH#DzemioLqa3W0_N@Kqv(o$Nk{lt2Y@?NC z#SA;eF3+62ASmyA?A-&gxw>x~3b)qh#mwCHdPSxN>#@?F^m)CjnRwQ>{dL^Bx}(g{ zTuZR@v_b>3RYO33}GPYOpt4llk zBDFbxTP7#^#PzqAY&1ySFJaX#*B%q1bMU1kgNDbd+~*ZK{7!pSf&{OK$)jhgT+3TG%y2aNI5UJZ zc>gsEjjKl{%`ofiQaQz`XeJ%qd${uL)7rCr&pxe}I;}hTM&NvQ*5Y|yC30zzw++g_2oaa zuJ88TfABUPoK@ts_l)jcCY<@Gln&BqHn|HNgTKSJU4VW z@%f17eO3F^MJF~+SStE$lhxE7hvK3leDagZuZHtB&X!)tRrR_pV#VXHPNn-I zTDwnwIwiW~UF_Bd?n9TRzIFMU_;dTV%O73lnyIWx4S0Js^%gJFWN*2xN@2&`c#>Ok zb82R^)S6`%aL8`{I7#yU)|+Ch{Dx20^em$@B%wDry z8JY)JPqVI+{`+)e=f3cd=l0#-bFrG^ovlgX4{?w1Z$4jT!feZnQ`)bd%d$5)^{+?a z^T`>S(?srvT{tCs?KjKv{M>@>7jJVbzp?EL-Bb1Sl-Wcht9DsoK6{_uTTN+KF6nzb z|5$u!gG1BqDPMdAS6mn7-CgkY_52qXpZvJ|z9i@R9x;K}I;R}?i<)fgszju1i(am6 z{5-uqhtHb9%tl7W&42dtY`;5^+zqqe27WtyYW~Jchd+J$6t#3)Ox(GHJD+A{vEGe+ z+aJ$xy8P5cB_lPZ$E$yB>tDUR=ljvMkGy!-t@F!|aX0InRVt_*z1wL0f?KJzo1T4= zS^I!X_eX8V`+A*l@0{D;B<&*;rzf^E9#Rof<$s-cpn;dUP3*AT+f6yl+Y%$DE!miD z9hqglE$8H>l)b85N}Bs}xX zPik-CdcycS_*^ghr~m(d)b4-({XtU6i=LF_?JCw!xDz^8n#fD`g|dE#(>S8)_HB~Z za>)&vW>@)sEwr^fRASb``=t9|{M?x8gYS0RZ(Tc)X~X(k1tq)>N>6)l{@{{Tb+G@} z^ZXP&<&{Tfy{NdmJ}2dlbkx=)#jKgnwQk7OS;wgxvUuf5xLGS9rN z$}q)uS9f{9p3Md2e_pID|GPJb`H=3in@!eHs}mQ7EnfX~Li_HU1?;a|w74%DY@8J5 zxuEpA;RioY@tMntdAK)LMlBF%i_|Tc;oz0U6n$wDS7gJIl1&p_*2Vds{cUi+CaX$_ zPs97FK$MsHA!}~=|9=ivs)FU2KS-Il^%U{>Kyj}lQ-OVrNeOctH9?6zjJqHZ!4z)BstjLL% zv5YOfl6Li9;<3B+EA`*aFDduEoPF(V*UD*Kq8q~sR5F>?>{ku3nEG*5B`1gF*~>be z&n~YFC`entzwg7H*U3TtTU3r}hhGVbyq4nqX5GmLw^wz0GnHjtjTCC}Vo;D#Yh5DX zvVM+Lg7uXFF&<;D`URh^lo<4)~B=qp)w-9ZoX83cO$oiUq-}@on&pgqH=joP z%>0tIq(^;cXj>!u(cts3zju~|+`3e{ex3Q$dlSBMJvhEw`}Lcfr)Mr<7F2Be_iatd z2JcmqLt3QblN4qO&-}B&*kl$T`}5`Z{{7OP_xfA5a>;b#P=VxBPdC+_8Y`7lR$VnE+ve5Ht0zxR*lT<*MDG*}tC&WnK*7@@MsdrF+#=3b zA3T~>ylBnLYuC2@&HZgXZ}GwJ?jid{mN#%+Hff&Z(!{%0pkTqF)1DhSay%ynW%TM@ z+*)J3+q-nfuN{Al`~SB6o&1~KdiL8@+fz%n&Rul*eMfU|_P6T4zUDg*oAT}m3Fzkf z!M<}v*QKbv8+5H?MPvF3*3B;s;SXOnk56cxceA-{*$KuilPrI=vU2Y`k+on(z#;|4 zm&G~v4O~~I?$9d#+WtcMx9RUt>q~p@zq!J*e%;j2y(>D}ZV0#*TsN5^Cm`;ZxR*=2 z@nmXnH}~Wh4^}sKr%Qjizwgz$-CwMawMDMJF7n|;+L@R*5HANxb@gWc2XyY^KUtC_T?Y${T1f2y_SW(&V|zg7RmbC1uq@73FK zFDt88@#*~ff4b$LVh&!oCUWFLW!O=bu#^L0#uM+DSp7J*(#oj1XiiOwjGWYLhn2g2 zf8Xx6VD02rC)q#LCaGU?yFJmhmXA}{*o7rpZJN@**8eyDv+3m(ysTfp!+ulqug0sl zbEjf8pffny(u1ZUDec$8#!~7 z3bL&%_*jo`&hI^F{$(fMgBR!I3R~X1&wQqL&A5Df6~6*Ir~cg14PlYNf@_a#KDD8l z$A{Ch&w+K;@`|LI56b@Ard{P^4ca8B+4>{zp?C0&7k6%7XAW2RKlRMk!ir^EGTbiC zxOpa5;VtjkJ-v5d%gM;wdjGlQ{A*`{(76sv)&6Hwg_bLac}KHHY>b-wZSIt3oIiy* zC$&YSb%@?O$feJ8oI88cQbzUf&Hs$qwf0NYyxS-A>*)*DFUJ>~r`I~yOyIM-X8yq5 z+}^6D$0$l86f4$N<3|JXixx%scZ-BFLn<@;JArhJ-o zQA6C3De-JqvSIg~8!cN+o!2a0{rt$b-T$6^JNZv;OLh76H;SfnmpX9&;Vn{fJL zs)-!mk!6$WYGz5L&*iMS-q)C#QyXNh75UZnb=l>XFSAyf2!x9LPzn>^l41XBbNZr& zJ2ww|a8ewbxBB!JqaeLbtqp5dg)Tt|VK|=uu-j`SOgC z;BpTw_h+67Iz^pRRa<7t|6Kn1>cRVu*Qe(f>@YX?Z|hW zjsn~Tj#IjXR-IV1=zx~Kal`zXHH}Ujla^=lJP`TuFvoED#f)<+j9>p>zAG#F_Kw#d zrr)&v$jCNnVzK(W2i#7V1w^!3%#IytU!`!+Y;D%=OKI7Yw`JaYW8s(d``q*D&v$Q5 ztkt)hf4;oV(pvm_VbJrXnX}3iQ?H72aYbz}O?5sXzVG0K9~u67LjN}hADgmX{AcCA z{r5kAa*kTtbobDD*)ypJzg1t$kUTf*x5hZ@g~aI{U=j*_O%Nw~c0r?&iB$TDz0+y5($*#Tzf}C_PrO?;Zc@ z!q#xbIM3BuYrMKvElS;-xJLY+!rO4O+ZWt+?<(cq7Nokb>EG4td!^GqES>*L!|+&p zfZY+j3r8Ln8?xvBRlv%)Da8!i!pz>z%8kD2 zq&n~Wai@zOJuNPAf99`eUVDn`M!%BAq3_n>Hc{T0R~~ZZ8?lC@3uVd7oYljwwxRRD zhwSx#7kuu`J8=L0?+@wmA17`(&=hsN!$E$D&ug7iFY;!IFb2q8{_Mqgr{AgZ>O~u8 zZ54yst>w3_|32BHUgfeX`ligJ^GjV=gMW#(K72lN^$Y!KM}BD$Wf7l~KJ%D!_&%=; zIUe=(nAhH3@jn-5zF>NAP`&bivw(5Ys`JjRsVip`U+}m7|K*G0BjyQb{x_%aInH99 z@JrFdjlG0j!BqT7_hq?19n%7hi`asu_PqJE+FJA8+$ksY4U*rz{Gs|u$58NSd&dhI zX{Kk>-7d{^{jUG|yw@b1#j~`srPeT=Wc;aW+36@zreHZS^+C(4M~Po2B`BAdX}#5b z<5vCk?oxlN_}Bjq*%$0Tzwh4|%)-s`j`Ms-*~sD7=)vCEqEdPF$;Ks)Zy(5C zuzn-;{!PxWuQhA$#OX;st#Mtu!t~}zt3zC@ue0b*gFO zr9({Co&R=hXE%xXf1~okkF&kUt=YGiD_q`Gq^6|(Zuz9&n)^BG5(7n)&fJ*2_x&u^hhsW$LXZAj! ze3ta=UfUHL!|&W?pZE7r>HUwbj~A<75MC^PtbJlZh_>*$i`Lm6s=pn6`~713?cJ}d zPXtX>);XiJ<-?ZSHuql2eRl0nIem0Z-;2M~gIPFrJcEwx6u9;K)8y$Z1*@j9)i%Wn zEc?AYU`@T_gPS@RzF+26THADFs@JUMypnxch06j&+FcHNO`qT|muF*lfKP6_oNbf& z%diyAweD%X3_={6Tm-mE4 zech&FnWGm?+&N>cX3g^1c}7^T*k{+{6hH63 zQPUn8Z#lA3NktLlxFH~McPFW%(vF_3Vmjyhh(P=#Vu6Z7pP|#0|2KX+~eJ)+A!=ib;FzyDw4q#GZz zk9*22SIrDleVf6an(DK1LR*5uK^CFqTn8KF>kshp8L`WyC){8Aef9D4-#=HrTyZ_a z?M=b9n^P6SBQ&Rn^iE<}{iFWw`dsT?o0%{Ft^dgRprgllefs;OJ7? zHve8l;^*4DodtiJm-4RD2{zJy)e-h}R_=knmzw%bq|2ke&t(6oJ@Y|vxy)1M!-rcG zBQ~nex*u{>Df+?n@SWMRmgW-WO4k?4TwlBUWsL8P)se<$XS&Cvi%p(xd}#M8Q@!}Y zZL>7LL<>B7kSDHCUGx3m_WplS^}aK%Tb_EL>o~8}yuz|Xa>0t(YWprr_qC}f8HY#c zO*ff)>FSg@=Y^s-A9h%O=l$CY(BR)rzseD(i9AalU7VpD=lftt@|z})rAeK zr?09iF8sdf(C6*f)~$)vT*sBbyxDv9x|=MU_o-NRgl$-u6c!q6&B(|+?_pYS{=s+$ zE9*BI@1LyReBXZ8mAczgS4_I^C@9;Kr=4`X`f&4I|5I^!-NIgb91>d^Z@0x2Cv57I z%R0RJk&*}EQ%$7BdcXFrm)y)2}CinW@uzS}pPuv}`%~dM#^r1CN zI9DizxdcvVZ8a}`1?g9l_q8iYp(B5e(vL_dGN#&?-`gq2-G*8P6*_~hdG=j8v}R2o$lRfx$3U0i4`^{l+%8l!N7&S8A4+Q08KZ)s}x37G|`#btvzgzU=mY zlYdp~rhl!9yRH1e%tm9TTZrt%k4JMpxqmWIK4x$CUGk08eAn%TtjqhCMNC;KvOWC8 zlchO-(*KxT_S)xNez9}!&ibg+m#?+oe7^iy>yP(4>lsgSv*=@6t^_*epP1!Jh6bi4 zMugTYg@l679GbTB?Oxt1dp70WRNcLWWfB9gCwH*Z=M{%lf)BLpkl>jz-SC*%57qT? z*|ufjyR}bRY?51jHTv4=Nx6!NJ%tSt9D1fp409)+Gq|j|#QxSYp1Ci5mcQIkB(^Me z<~R5MckI87w zg0TTE;-RObpI(kHF76eLSoG%p-@pFnT`wFydg;>Ac~jTd?O5|=$E*K`LsM6E8Huh4 zTk90EesxIxsu0r^uR6T0E)CkK6&kWME1+ogsnGq})f*lx=bpsr?xu$LrUJ zY}}v}^zr;Dz6{wd{JYq59^5hiJumWi&yIq_his49kg}HtJO#Udhgr#{oxUo?lb_!TPKAwsjp!rYBrOwtxC?YUgt?`|p2>ZLamM zF37vOEcE&Q-{-zJt)3ljUuCy@S?bx|t^cbOKR@EuulpKQc6VB7eSG}(f2VovZ-033 z`{DHReKL1<R%ST^SAay7;o#zJu>k%^VXgI3vbU`8L^OotMx^z z_6e4$*Ljj%wk3YrDydM*5W7wEjHZ%j%dA-5gn+2%o%;9WHdyiMoo%?qskdFe@!N;q z6nFL)FATPuDe5}8_Z+yiHrThkpP^F5>V=i0(j}K$F$FPfxBhvpbSpZfyK>$VOU5&W zdQ;un_H=rPbh}*ow}<;g)e8Ajw#O1QxnlDzZ_AoAEV#G&x}sIw`3VxfvwT!?6M1bC z+5ZNFZmi5Zc_;fr^54n7y1b{l-i@hswg2+N$8=%h*{GOgwXM_i5?(&JeS1QffAt1# z?h@BhPh$i1;21X9^Xv(@}=mMI!4I_J4}uIkxd&LPU?&M%T49;@2`PS{uIYXW8}7 zeStK0+0ifloEtJr{^V4YNXX0a#?Es56w@blOy_WllQ5fNuiFK!h*zIHE<`PId%sjvKAw|{Xy#xr$k+sooNst)(JoUQ9SQ)S0_?-0{= zw)JVpj358J<07Q8Kz{q18?_1C78_b`>=3Io-(b60So)S_*#C`+~3JcXZ2Qhc%zC?CXB>pe(RdA~fA%MP8Ws{H**-OhUWN%bs7` zYTvXvp2zkF`=^;t&22Z&sM_{aynVUf)Bb)L8KzxA>yC)qZaC=gc7jFHyj4U0L(r7& zz^csW7IRW%b-E??PBUo!c|$R;$@ep--Z7~N+x6SG7gx=`n)gg{+IFUMQB|jQL^K|b zIQaa-V!Qd5A0KAEmtiuOw{`KtiVf#)q`yr59WlG}GE>-V0}Uho3vqRE<3R#Mm*4 zvrM;dY5BoZ%J^95+YbdHb9W!bKasF}w~wm3o)Q%g{`_dvn^5`HvYUaIO0V)(YS-vi*-e#WTRG8TT|-aQ<-N@jYqqDDTsm@D#4m6U)9u%r zI>LHHnYVGg`e-#*?vC&Wz8wM256rYvw@WDhWV0xZBWUAxx4XC9Y~Mz|ZrLI|?M``W zd41|tt<0CsH!>bdvMraKeRRo;>yPwjny*M`Ys$OWudT&$xNDW;vHs32N0aq>536;~ zzs-31&g8Z(?x{lN*B7kmSY`N9?oacJ=;YlSW}WQ!KeuRSjY8}J?w1okJ~8p|V}JKY zZsMsc^;QM!yYH1)Y?jY`zu@cKisJI$g>T~)tXy9HhvjAazqH2uU1>GOGYo`h`lLJB zNQqC*&^ctRXpdAv&h0%R_h_&4?Tya2x93gM4rkuf;S|2)>C!9v_4p26Zaw*?)MWa? zubeguKbOyUx?fg`yZohvXwbKb=iewd&j0Xb#Y8c0 z_Jzl;*v`F@c_pWCm&TmZD4VK4{UEv7!WL`SOm@vo?Yj9>bDNS_W0%Ifj-F4`FY4Q$ z_Va(3JbB}4;}a~g7y6TSUHldj%yMVnyxnH4Jr@q|;t6|UBX_r5E_-2z-k!+{QM~TY z|4((D#H^QhoBQN;`S&YUO#Srf_V=aR|9{$<8AQTSsnf9 zf9HSkjXZuvTTl92Y5FaPXZ9`O(K)xTNgiv9u+p!VT&AdKD8#%i!QWXFI_QZO2+x}`O`IyL}(v~T61>! zg7`R_n&&2q^ukVv{zo@!k!^DUG3z-bdVElU3-qa!A)Whk}IsJk<1&kVgM z5!2497Eg>xu?zV6=2vm;=6~fEb8JMD_9S$5`nWws+vU3p`_f*l2{l{d%+|)H zsoNu2W5{%M`I*YsOdF=fE>)T`d(QVTLAh5>xlTuRB(;{LnQc2SpSoNu;hnAH-#6zj zFDqqSUj1$JvX@rZA8eiZyL-jr{(MK?1Ez?D%ATVp{zQFQ@blEp9;TLFyJopdw+xv39>g`uc)m@t<_17-EJw1QT)a{Nx-+lS(enI@k-#*?Yw=U1jY`mX+d7DR|tNO({ zDJx0g=}$Up@=k8yihs0yZ`-8wFS%WOuI(|J=1hxYyu1^P*Yj^bX!}(5lFMVh1oIhg z9uZ5E(|A`bb6R)5JFvd*DpKhv7hjZEgbOs)u#p46PMKKvs8OE(ce&P}hU+pjIH z?Y?*`PBQn!)QfJFi+Sr(w}_YRyS`%6$51nI*MIWWd>5x&|8!_xebD3%o%_3DMEX9R zX8m8jb9(E0JMnjJ{?D>6I@h>=VNtr@Gq00-@#Ggr%on-;G^(;VY4SZF#QVChZ|Flm z>+gYU=Vs?eiM?C$`q;9&?>nV*R;5lWGfHmym0i6=Kdv&@QnuW|B=BP_&$8y1HBVnv zEu3~p#TH9h(`W#sofDhn5Rq#ancvsTmVP4>*4+FrSfzs-+Y-jPwb?4^a|Epa8^dx{Zj zRZ90}MCX^c|1x=DpPDJ^T+3KD&y}ZB#g=*b=6^17XOD|(hvzdduX4$6YTM(|GGF%a z<#jqSv3*bU7EZr$$*5X-!}gi|+ZX7bUREZ1@!p$#SB$vRqU{p;4(IPlogm|Sf8rcV zRa>Sd?jOwgo!W)m#rzbW3TNkjuWI~r&-tYpdJ8SlB<8E@9 z+2*%ybU9NQyw&f@x_74Bub!Ms-E(+_lFsipWs{v>Kl?vLwPh7&bNe^uTkrWkI6n?C zI-{ihKkpG!GSeoVRgancPAuJF`}Im5|NWJoJN9>q9d1pT#Oi4lqTwjIYKgYOE~ore z$~=Eg>G^BN#G9nD-psU?bY$M98Ed}f^R|Fz$7Ia@X*J#6`e8xmZuN?i)2Bbwoq2M3 zC6kA!)1Sr|HL(y@m-#_1*3ElfU;S$-_+0qcjXldb^4CsccHOd~S2K0OxrNWunNB4r z8Ax52aYwbS_u0lmZm*tT;cF+|UN+mtguRgG?>Bzj;Mt@8@Tx2O$?KCPg_{}KJ||kO zXb<@I`RC>OJ}cJm->R7QzUbDiI~Xr;w`KCC+l`kqwQx^(CX?IJ zoCv1*w&JrUF5Dz}cFsnw53fGl68qBrK>cL4$ERC4JLj;y{JFG1G%kAM3hft7R`(}b z@hxKFHs9j?xA@(5`)74u`Y-*>EqQ$I&Ew@4mLE}HW$Lo^T5RU|hLYP4Kj=TGx@Gb? z_DHfCWB#w@>pQZd4?Q?^Cxo%CsC>a!tE#=G)n6D&5o8P+*Z`gKT_{F`a z$!pkbvxP*BmGjtoEe~y(|49DKdWOqP*55xblbx@rd_q+=MB?k^U@OiopZfw#t)46s zG=IC{vR;C^t}@FS^Q$#YzV8Ai2O6jxylUYmkT$D;ae8G!2;24V96nce9PhNUS+_D! zU*cn&hlqmT;kV+?CgrI&8=X6_;rc7dc}6}f9h#JVngS(l9VQ&`;@$P**IyasjE3CD z|Bg26Zp=&P>9v%Mp1~8@^s7PY2rFM+{pG%1cIob2Z+WCjs$}J?Kip7j6XBh;ByVoB z8wXc8&xeGatt@H^I=nY?FH2H^rMxg0tVS zsa-iyU}`c$;1x%w_wT>)?eG+sH20#RXBU|c;f++{i zA357Jw>9#2z=^JRwgyRghxsM^WsFS^KT}@k%s%1n&+F^n94}j2e{tnMhS=Cnj)bTd z)=ER>)o(AwY8^vvU;-~G-m~c4jdfMaC zkZ>O3g)-8IBMeV<3(oLYxuG&Ed<)lsV77`=|M|~*$@*VkTrn>oKT~~y-~3jl{*&$f z?B)l*o5=k(lM9b;+~%U#tf3|qn6olV!eycCmAtF@P60lL&3~{xn|6~){_v!rHvOxc zBN;A#w%=SSv0&>x*{_%UR^8u!KV^csto#0N4|7kvDR1C^u5l{-`kOsY58r*VZ0$NE z^EB1A;eKtx;h-t=OO(p$A|wySc+H#TCZ4t=hExC9rKLAaWM)4LTc_~Ko&T`U=gGYW z=F+cEW^I4?clPFDo9XjUEDK5snqt{G^+pB9hIxyAa!Ps~WAYK{H`4J{mb-6xs+afc zwk-Gz0ekf0PCX!nx+~t<`kbQz3*U>#mzu!mYie2Ma$(O5Psxv7u zt$GIMMG>c;8C?e@PKhcU(EP>D`bygTbK1>0FJ``pxyH0=|H^~r^+DeyJNh2RElEA7~ITe)I*x;qw4VECZM^~PpZMz)LG zFE*twS2{05s~=j$@Zv?O`tCw*(N+4k3qM_5z3W!=g_*tShnFNb>pRvpS9LdgPuSu9 zMLcZ6E4d8CInP~nL{D=Be|?vIG5dMeCb#g^x!0Utyl!FrR-MdeX>NU`{mQqTt*=-f zU)b;}H=>q1sP)#>V|#WwhHG{vI2^g$btWbW%5uAW+Y z$9K!Y%d)RzosUibxV*U_Akb~{i}vtI#iBKJevy0IbS4%%e2!XvCUP;0_p!$p#Y9Rz zGy87bnQo?a%4Wq2hgvP&UySZs7~MbGERti~wdad$Dc7T}n+06DPcx0$(@!pO-gIcv z)Ys<9vU!WIHbt`ix|1HrZz)#vc-;k$6Oq#eN<(I49**B+9;SD%N&n8QAD?ZXcwe@i z@b}lg_@+1YzdqgE`};#}weRjSg|i!#cM35ePvhw&Gtd!_1YsFEZ%SQf1Fyq(7cxGoczRl6@rzgz6Jfx z-|%f+@;38}Vhl;;vPY^JTuN^rSuVal>ACjwO}rxc_v;-EOWLbhqYq7cp}&9gs=pq# zH%eloPKuo_*f?iKyrbB`uLhlw>SteWR??BW|LofWsn1hAZZs{~Z7AK)z&Oce%f&CH zD*Vn9Ph_YFNhSvx8k)^J5<0sqdig%HW$WjL+MBPKEMOj-VEp2z<@Ti=;<|;8HJ>cm zeEdrPOyAsh&l>8_y#L&5+zaT?DewB>N~4@ROU1Zi?u2HsbBKui^!dEHtSQ#qPxp7 zHu1mry>)5b9&P_~!P66+q=UXF&JEwJEr@%juHqUb6x7vxvqI0Nw=RhL^>&`mcdjM! z)$>g)vdic4uM*aq_~1mx+_&wb3Mpk~6^o=;Tt1dgy1eOv+^(r_4&T|^9JZLbOv1m~ zf6*~JKdB>Yg%l@e27MI!yLm&tS%jX_E3PdJX5B4ImzX4UHf>sX`?FW<>7#dI>eUw= zU2u2eVMAlJ`8rbK2YWXcoc$YKQmY#maY(%T=*uHaGV5Kgzf;QMTgBk2l(f@DEo{x~ zBKwFS#Rg`^-c1iL3e5U^y2s<-BJ)RIm6WHXF5$jh7gilpz46u(>6weWJzbJm8;`eS zs2QDY5}l^Lz{lX_bcs&EOoQ)R9FF|H^6}PPHP`i4tIZ!97dd+7O+O+szyAPNi2CRL z_x!m#&ZscgarU!W#J4m?TJe}Im~6J&%JA*RTV`(yw=R>8T(~^QV@~f!n`56j!yH9j zy9Iyku#kFEV5jh-vhB0G#I%Q=bt)l;j;_k-ls^1g!4$Ry=L1d`} zd+|oz{{hTfyh?8c%sK6M;-ia=rq-S#ryiDYFgOWaII=?KN%NnyIG>J%f>s{v5@*f_ zESY^_-|Dv+zdC=dIcMppDWtSv&xz!uki_n<|KAH=@F|$2Wx;)J)5fBZS|{r(OWt0I zTD#ZT?9kS^1(yE~mv23~EqCt2=`K$`Gw^=1l(?Cqy`fZg!xqL}ZxyB6avXw1B6lfd z&dS@Cyu4HQ_NU%mfg<_KG*&J0n7GKp>&n@#{Efo#Ld$(;nRqsTO^n^Zdt*a;!U2PX z^VL!>8Z>t)Ti(3Jc4M`}+|P60|Nr;?f87%IFsF%ocYACq%~4w_$)qW9_w9xdgD%xY z5n9$)m-+v)fA3uVaN?_+nVM<8Ljy&hH%@Wp6la{cDTr@+rP}?uUuKu)EHcPe%j$gf z-M?qNd_se*y885!n{qsU)ok}s3SzULK0~2tJ$p0b!~S>u>p$g6?@&E$ z$a(mk+W9Q=&#iAZO)@^g7yZ=tqR8C{>qqk3VZWQ4&z~>QG7;KvKZoPE>ez9--b^Byx zY~H)e)eE{*&F@pT-hIF&xKqMTGEr|HdtmXpc`B3Qf-?^93f~miq4m0tJ?7*y-9wKe z=eC~sF4E{y^0YW$($%28DW*r)F!-;YCVObzR_XAliq+cf?*E>pKh(5M{KyhtwnQps z|E-@H%`t}_edJL;S>bo?*=7T6ag&)-y1hI%796dr|H$?s{#f3VFqP>KqJ4A|AD$~Y zBGI_~{Kn$IqM~UtJDW--nz}j}=-zDGwsfXi=B!zjyQDQBarKi$}`l&%j_*4pY;y7ASl>2s}pZ7ePY|NAZ{&mFvQ!T%J^t?}hr zuH3Vh&RH{g*P2dOvGB;!KRgviO}gsSW~efXi%;Lw{o&x;XJ2POx!XU@u9~H8{vPwH z-WzhVdH=ZPRhB>cp>Qiv`S&c}^Mzg&H$Q)|iiuu$T>PZ><8ue1ADlgNb0&wOnXRk; z0hdkIEtAqtEwsIp|82$n+Jp8|e!R<GSH=j+jDUo(q-RXw{_TX6kmWQ?-a zS=VY=v(=G|rMBryuC~n5Nb?e!w=rfV=UuPD{_xX`b4%23DT*x;f5Z5r+xW@>0ZS8s z`q$|XmVXtFc0O|98vDlnhv&*ld7mygJ(vHjf3@M0`7;ZwpM1Z6zUuceP?9>eih%gx$4 zANERryuIP_wbQzrQnzNmWi5F>wO06|XPS_2$a}3xr$e8ebN*oc{oE_jM?uvWBO9+q zg{_!qdhcX}r^%cotycDxw&&u$>bKi_)(S+bUsHa*$N0k!>nj&HERAMZ{7Wv_^6~WA z;ulNJAAf)N_Vw4^(xTeMm3My_#J=n8H;ayo~bG_JMXK@-%0MR77xZVgFCvKd%p; zTibt9JNxTu>4cg2s;^x(*+tL1@c323uU)_564xoL*m6pIvueyG(Y-8Qt5!y{RCylV zT9}!rc)jg=`JK=yK_A#84O=fyc)L%F;d z^)-?j8}-{~J$@hB_TZ(Xm62DUTgH(CErzjkRqxykE3$0X`fOgWx#z|sjs6_}8;A3o z6APRCggC9#&K$~Ib!pkjovC@h^>(DKyE4mV@wH7>8mw|vpQ?UDeQW%q{?zYZ*PFAC zxBfJm%~H%G+AH|+g+e*gzRGQvdM0p27wlSjz%=$yiT2g3wbzC973Oms@MM0uH%e3L zg2}v>v9-&-tKUDi$jeELV~Vk=Nw3PZbE*la=6~B@8FiI)()Fc5ez5@jM?-s;SnGw)dGE(uHSrtl3fZRSqrw4D6Zm2>)$5lJL8dhgGJFFcPvL`~p4?!@?J(}J6} z>rF(CG+ldJB^NHamHU@^gvs;?l}DOP^iS>3G4kTsXz(!cit(AYoQFk`nL5n&H<-Vy z)luMA&LZDM~REAU6KI$ZL+ zVau76opRlucUGQA^D+0mv@XF*Yh7oPmV--c$AivI2bj)1iRpWAciR@8_wP*1uAkiM z`~G13fp;t8nq^#?KDO&7N;4^5FritiGQx2!6y zJTYzFr-rQWvS9sChw{@(F|Bu?) ze_0>4_~Dha|8`xxHjS%7*TOZqY~LL1lRM_=dI?PsjdXPPZ`%dU9%xfCA&L z6z6WS8=Dq7H!@~V%RM?v?e#Phx4J*dr`PEQ3b}R(xdtk|JR8pYOb3;ZQ~)S$3bd2L7BY{!Y-Y@k37rt z>}=1ie{OrJEqBt2a|=y$r)A91OYOGYrjuf{@kYY-JzrKN|8hLODt^}T=4>hJZWi?g znTAIW@+D)E7qiS3$5x#$_rC33TON4+p+-TCMyc41Rl)P~Cw&s1{Y2rI z_?jtfvsLCCyUw1vGh*TF;+O8JbAPA4QQv>yaErFW!;hMJ#=Y(*e@1>X@`-z-7wZ8wYOYB7U?g(La z<%dlVofKzp>=Ij$QSAEV!u@+?<=Z~oy}zaIfBKXDnfz+`iRNj?=Ng*Kd$9Sy)wIc< zS89J)E~)Y3*vp046aK%Qt~|H=&a#zshk2rW;T`Il4WzRHw`T55lJ+YB? zejYT7^~k)?jIPrQ+di2I{;y^}Rl{8}IcX)+(dWH$j;%=eeOZ*t_A6Uq9?$*)y|0_) z71U>^{|?`v{rBw|y<2&!)420z%I4P!^Z7Y{WYu~SD0oLkP;7_Hime_$Gt(^?vuZt- zG=F4Q`OC7WLg|Np%Si*vw)V<4G2<5%Yc4YXefKoKzU9xly5*M-SIwQbw{=&afq<>r z>Sqb2>ggORGdP0hed2GNbMS!H!vnLJySx>7nqs)V>uu){OZadq;aSW1l}9cG?O<4` zHsxGc2%r9nr4t^d21muY{>fai@m_|hPDH3_r0dnFoe2-ugo^uYNjq^>YhC!%DBBW~ z9NyI%EvGu^_q)f>J@8*P?aEhs7D>hfr!O(>QRqA{e+svEme}=2nKRw={hxQT$oX$D zo_ylA)Wrn`+LyiW``%NmlAPW6b`776>#`|lpKh$t3-(*MaeH>|g-K?2_3yQ9KFIye zz=Latsi?&PsdM*VaK@JGj{ja&aenjq_X_Xb^XJ|LvyZJ< zHEZfKp*Jk<8Y?1q?^^K4p`dFMhrVa`qK<;3buNkR&94&w-wIf%7^%i&*0d~XRo02p zE$>)_9TxunA9}F(bW`Z6PoeitNO}JM@b9tmxefof?0;%6mc!djT8)APic_Vm<#gme_9}YrU6sjU5V5LDa+Yp&VpSklk@%}gYO`u| z*QZ;lyU*iR>-)KN;U?9YY(cS?LRf>RL>=YaU&mXrKyDe!pPtt1-KRD4U*#VRckg5O zKO3jUxy>R!{vVy)sBdyY;F1c;K_@QpyH_4H|GEQ`f;OT`Lb!6ihEcr`loiS znZkTzR*ut5SGTm%u=5q4&6|(^5qG!ym0g~Fbo1H3;LR!4HUDOdq`YEJSv$p%!)$I( zqHzAPcOOk1r(X%YCgvl1aazcP&1*um#iYIoRt0f73i~>Wiv&Ji&DwnNGuQL|B7c%q zz8P5`pTwFsCE2pk*>#`N<{k4AwPa?U?XD5j|D?oiGWXOh)-?&Y4lFL)wKYuq{kA=? z&*}a@UTrUbF?MNOV2Sf(=S7m<&z$e9eZ_PjHg>|&E|UX$d!8)WGvRn2+x4dPKVB|$ z^3J&C{GgO!PuOJX6%Sb+GyK^9M)vFc&W=Du)gqh2g*q11IYo+HZ1*L1|G0jiIuCw2bo3m}-bG z3;VIHeaF<$z3rK=KSgoxoOfTrY=cYwrRvi=Z{PW{NAAtq+0wO3RLi`iCGJlSi#>Ar z_BpO+JMJFa#%R9K_)mnE6{oxU3-4r(z?s+64RYPoGFl!4sdP?!Qe&reNac$7wNHAS zyO&J#Qkvp1CC#ADtxJ94#%D|av0R&f$Jh3O;~vLZ_5a`Oo|v20Tj+7aGkh|OQ&;DQ z_8B7nih;)4tePt~`aa^T?VF|25jkTxbA!UK9Hs^_nJimTmCI_*45lz)rc`;*yn zo4nt;Y~S$WS;XrezDKR${vTIQ{QK)loUDWCQ|PCvsW_TTux+yA>d7kvAl&u(bqd-=hvWy+aZ&6%qhP389e{u5CiSMvG& zx%Zs+t&-5{iSO-Q87Drg(d5FsN?5@_0lE^CS08eD zWI$qissgWmKw?p9UWtMk=&Io$1z!E2)Z+ZoqU6+K1tSFm1(1kyeqKpxUP-Y6Oo=b( zmN=*U3WaC|0|f&GQ%fTS3j=fT9q7(Q`32Zzg7QleOHvgKP;R9JSpj!eKv8~jaB7J{ zw1R$si<^ReNNPn1*ig{L>IybC3i@t_3Kk|{SLwSMDOiAX2Px>g87o-Am?jFApfmD7 zqNWO#=1{d}3Wf#{eZ2Z^77C^i)pm9YyhvAQf-GIthJuBWg^7Z`TV_s4YLSAzTTWt0s!M8eeoCqWNMCVDQEFl?FPBH>lJL`$ zZXXl9t1|m1m!7odM5bNR>zB@*BC9$z$7ZU|u_zPIf{qRr2?m*2zqqR>zCUaEy-7hc z^G#4tuxZYh&);h26#u$?ynXxqn~_Gb$=|+T>eo>e{<5b-4%(+^UunC z=ihj4Mr}pK@4x&f-|VcPQC!yJ8zxa>V{0>WTjw*)YfI8@gk{{SnK;wx(2*l1zE?BD zv#!ZneRfSWvob3icv8zWyd9kKcM;rfle55wDJo$Ft&uUw#efvc#b zDNJ-%tZuqxwqNdd#j5{5#3L;H#R?-I>D4dVxtjg6i0wb_x`J2j6%W^V7r6G^zw_p# zjhide?BAb@Ggduw*1qlg?sKSq}r_V%{v^I2TXE2k@XdsSGRS+hF!Kt@w#dd#%)ia*Rb?^bP)%1WDfIyh$k(b9=Z zdW#(w>+k43UGc-t#{BAqZ|u7!dvCJt-+3nSYL@h@=esJOm3MyrRVHrbw@luzbn`Vc z;TOjyl-K{(oAvw1tkBzQvS(e)mYQ9!4=kQj z%yZHI#7ejQ!9F*yTur7XdGv(7iSn(nH_En|_E2ZOSX$*XnQBHR{{G07FJkvjOZc(IzUhuJ~w@$quqAVt}j{Amz;B*6T;mSd=5)5Pzm}hRCavT^Pe4B29BG%Tq`BBCx$by>|t8dl=)F~{e6M;&#xt3 zUb3V0v-J+Y3qR$KzT#3?@}%P6sVOYVZiuAp0Xs#M1cINgoh4g7D zZno^*#tn(}cRb&HyzOVRD)=O8#)qumVO~bt9^c)y!7l0dNfpDwma8`oJ`|7WO+GnI zd(EQ73Pr+OeooY^+jFs1Gl+4X^frx&n?ks6XxOh*J;P=&jV=D_?b5AW&!fK^upM}} zDxQ=1iLjs1$~lK*cgkpl%y3L?GGc$d>1|8ci79(l8U+{a6uhaLxKxupH&A)0lApEvWuBO=x-s+7a^e27Usjo@%;h<_&>@&{#qYBrmi{kYiFh_+fSAG9x8elWJHrAIG@MeoL;eMo%w97 zMHL|xpFOpD>feMN(&^UH0Ac^@rTzYSR& z;!(O&_-M7r0$&Hqyz+rzeq zM@Y*TKMlA#^=~D=*|Z~@m2|C6B|EV$N(oLn)$(W8qSgOu*CamCZGXBmja}=ow#|f4 zp^)|i3+pEEtS~zwdZ!~W@Z@6QZ3R~9OIa={ermG%q0*(ZnB`~5n(}PbSb^IQjnw2W z`8^ZLX`lb4XLEtc>9Bc{M(H~~y^qc6whlK@SM0gq+SlG^k=STF+*kKrt2xZJGR;ChYv<(C!kqV1rll(TvZ^=M##(H)xN4<7WpDO$^9HlD zU1uZLIj^oX%5v3yReI&Tnfj$wb=xH8GM~Nt{kWgnrZoQJvFD?UW*TqZ6D82l_H~iJ z+$DEE-pwohc6n=h#+o00sHVREPZ;wSzgy?~-Q&;S zF2%Y>32Jq?FM5?ySpT5@RJ+T~3#(5~YPq~ET2@r%?27iwx6ALxiV9S*)o!~X`2B|) zvjX4k;1}0!10C2?Zgh2BKBF z$^DQ`*fqx^-Jj-_>Rff{@%>+%X;JI7le@+8_+k6NZ3!oCJbNX%B$lIhoztR|%-mWZ zFJEc$of#89ZO_G@s!y`!?Yq9x;p?5{|5iV3Xg{^V?(C75|F%Cl@b-=V>Bf91tw(*I zTBYj4-@jH2*x^~Ws!KEE_OFsl+vfEMPkVd%M@xy8O112#XCg~H-z_dGU9x!J-SE%X zRTy9EOXpg1o)-SxnEY@9ue|c24K|?xcG;zNK@PNAB~L6C&5@ z-s_J!_d$M59rA0rIpE%9A89#k9tK zS$$KcJYr5rD819_c-Jc~R3LFj z|22)Hhw1eHB4ZoDOE&uTf78Od1yXn%vvoI_>~}u3J7mGTYrEXm*#2y+n0+W|vkl)Z z9pB4AES-6>ZCUjaAqJ|-Axi_46LlAP#x=~D>-45HUGm7D+S|Rev<`AFax{CpE{JRW znbf;1p&6epJY6;|L`Ug5=jZRCrHM^di{~=Qr?+~fpIdc8=EQ!3(^(QMGoH%c?A^50 z{$1O@|5X9IWMtSM>fQ6N?{>^f|3Cdp*3H6@-HY}YwMVRacc8LR;-2RcIhU?Q(~MpS zram_6;$!-zoq4BV%(%mo@hV*5JTRCa04hwI>vR zYEI$U5%)ogou{d2k6%TX=CgwgThG`2*Z*sq=B`nsLcwBi63q zH}HGQV=C!Uz5U(3pEu^be!r3{_T&P+AWnIQ0_kwBUeSbW4^mt2-FnBmxZu#@d;f1; zEMdsW6q=X4RNwEpnoY@GOQs*Mx7x-e#x`X{WgcSl)3&%VBe~n1`{cI^Mh6*pPM&!1 zePMPA)7nTQ<%lcl#zHwBW<_`ZcXLFag^I) zE31G<`%M1Y{?_=`@Mdw*Qf9stCd^AbPBvcWn8JHrBO-CvjxSPfvF-l1-yYSAn;`3a z_vjAG_t$sqWN0i}@m#9vSof|I|H4jZi68NPW&E|({h-auj;z@N&o@3-DzI7Ly>+*_ zNY-o5loO#>LmLH79bET&=Dv&KGfWRM#@#YeS(TX_`FQT$No7k_bRHChI#nv>_O@2- zTfg(5yUJ|UcMp#&+r9bEv?rJ?>E+W zw_okA{iS+9<011yog!&JvrQiJG}lG)P1hDpoB4l_WJ_C@sQt5>v-f$dU!dgM_92Vk zMf7nc+bU+JBDr^mrIj*Q6y8|;`|14S+blojEIZR8cI^7LotoS;wl3q&VdwlCxj+2o z`sXXt)t_i@-B2E|E9#ftRpvDDhNoLpd0Ibvg>K$f-D0-mtMU$2r8`2*?QDS&3_Jar ze&jxCiO>s>U9>RTVg81qFU_I91L~4?zgCJ{^iabnD|V63=ObGCvb9;}9{(n3zCq~S zq$5enSr0CpDXqTtzV2k_Q%6aa6*8RFQzbe!t2nP=)|RQ7J?-Ixi0G!k71>HMw@O|e z-}$mGgP&E{;n503-@7b(HZC}^mqp{E*1?VkXOHA=I&ASydTyAehtzBbqu!UZZkvS$ z9%l5Klh4{cF779pJjD*CW1l_2Df{$%R(SLsv}7{8?~8 zrnU4*(Bn(-pQbbUU$-yVo#yvE^ZaD7eHTv)Fqn1xpAdBD(R=IX0TFskg8B~ncccWo zOQyzaark;%|90b@;g+bCuNw%q&p=0=sp%GD03$;COxHr{-|Q^X@yp4lk0 zG4s{Op6KV2MyplqW9FYP5>vYOf2jty$07|k<}RZ@GZ)?I`xgDKAp z?w6Jn{Fr=pR&nt{m(8J5O=gO1H`}vTz%{qRr-PeYd!N07)#Sp}_oppYJuA=QGiQg_ z0i!FsyR0VvS1|gr_b>nd(`5`AC$#c)&mVoi!2WqedBxPKhyRW39?wYGTCOhhqicTT zzL1;KQ}x~L6x6QvbNlV;58FFwt!wq&vL2~An?2E|bIoI(pZBU%{B5oMe(T%yor+IW zj>~d-&nWV%P@W`V>ZTBIXJhxgH{ZFgnMr+0U47UpZTp%@EN{f_R6U3(d12zQHOcR! zo`t=~Jl9BzWO3D(pMLD<(Uv$`=472X(~s?(M8w5wxgs-_lO`TkY)pt`&HUZDy5XPy z*^WoIs}4N8Q#y70IO@~qtnz&Q+1)hL_E$}wp0j<~sv2&NLjl{_V{fg@ec?HK+mw=X#s%D#8&g-_SyFjJ!qqXQZ~Fojg+I%mtY4E_ ztzdki?V8K1(4bYOQ%_AY|JM+AIDGc~hrS#etTT2xaK`+~oW>SyzHG%;%R3H1@;>{Q z^W9l;^tpieBdg=TTGv1LR36kjf5qw4%YjdK#8&2BUYOxP8A7Vx>a*W%{PCm&C@xqd8gu+G=I7jvOrAp zy3~&(nTQWN#lQSdIg&M%f9(r}i}g-Uk`Xz97cOiT4Evzb&S)pyujaG&_0fbq-=43& zwsPXP%DfBuTCCgVs9*i{e)XxOCk`xvRi$pC9E=Nd4W8=P>(&Y0vuOIeT5B5j@6R`% zIk{|{^t&rZvzGDO|7nsZvs^cSc|FN9_T(Dvze|(_Zr_RGoU`I}g7=y)?MAEtSxqw< z-}bEe|fqL<+yofnZr6ok?S4%8A{a-lpYj*^26~)WsnKK$u3`+&6c&^Ub~{=bcy;B^5OLWaHkxw`+tIFJ{>(PkB9) zLH{#bbHS>PHk;RGUw>>mEOz!&ZPo@47LDdtJf%}s)d{ zv5HPt-fgAe`&Z9rMFgZxVLQ9PVD87pB!7>(Bbk_@RW2KGo(O>+6jTdiCzYY3<0@2^Sy6e$G4e%{1#k()VY(Jy=t29=hGBvFK-{@KfH^ zE7+0`3QID)-B`P`>t)m2t1l`yALA32+Yyx>_&NXSFa9KDy`=b^K3j?(cCp|8ZXek5 zebP>kveS>|8=Xn}@|)#zXm1W@n~$5>A~o};;bJ$Hq`jvFET0v6Aa$046YHUa?wfAS z*88flPqW!{-!Gkln#|?T_%mMow91~(DK$sEBP+kdT0rMh>?zq_{S!{}xjnv{7<1hI z2lwlMYEREfhOgPS+fH6Rz_?}_-|cDkyW6iUkq%z+m+R__1vB=4keHg~l72#x+ofWE zBS%ZEZsnd`TNg$xH7Zs4?Yr@{q&jH`LhNMgEy)KbXx?ZZ9*5}rrkE)grT9T6*v_;=+ z<>BJ{)o=3?<)=>DSln8u(XIZ%$*Gk=W)|B;wVs*Z+NK?D)YdB0I~I6vx8PwvF~d*w z(=Hi01;6-E@ORa@#jnK`-|H^Wt*TU*&F5~?&-bYQWKQ^^^qEzjZ$EXfwEg#o$0qKX zocEfLcMW!;%@?Itz0SJ4Wl?9|6w`YKUShBBu3P)Xx8V5f1zNgGp6hzI7tNfw$x5wd zvu5vN-l%QGTF3iO#QG;(_)|VI8Mf_7N%{H~C1#UbdsxwtKpUp?KR^@b}MCv+yORqC`ve&L$x?-Zf z(X@A~Zf*O^!E95ops6)~$KS_ay#DDe=d&xa4~bRZcx2V9qO^{V+i{nVKRvE9uRQ!u zVvE5i#_*!>tD>L!-?oaR?K0dl(dGOJ?aTKcifpp``%}x|(-o!pKiN(y&v`xJ?qk0? z>%2Fa@t)aY2dDcV^_UQ|Q2k8gr{FAIlf`}QXETf!ALeU(d~aR*i;gQxZ;CeUXsF6a z%}wa}`Q(DzZfT~;t5?2bj5z&Iw085yr9PjkHDc~e*Zfs`v*d$Go0UZ5InK2jr!5cv zSS+2z-z%l$EK}CTe$D%4-R38UerychcIWN$@);9lRg&KwOHWb$VY?vKVb1J?mz8JB zC*N5w_af1>Q2y)opUzibJ-leNW#jXpbDBw#^4q5K%r=ybf9;U^>E9$t)1KS0Mpv)t zZ&p}c$G!Mu;NE~GUbPM%Po(S(`V?utJ-jAab@J*Wzx8KaRe4qj^PlN(o4oC{{zb#* z8-#CZ)CY`F(IM z*%KA^yUX$LrzsiFJZ0k&h38y5di$~P<1{ao+4Hq>Ii%*^`!=s#Tf*jiUEKr~o+4qP z#da>=CHB8jd@}C~i`@EYe{bF9>nc!xByveP^o3ZzXidbG^4CA>tk=iyT{|o7UO=dG zRZGzfr%9`yY?|)6MO3gSpXV^2*P(QA?H2JP7F?a*ryVpp!`665*KF3+Ej+15!t)~< zZvDQy*h0ZM@~Es1$7P-36ERh)%C~A0T7LMvTl2QQcU$YmOY(eTQQ_SatBj&gbG*JH z@+5Wnr%;>KSyMLX#ywla!FtJB?07_(W`EGk@5O%~UN~lSs$lWFROhX``;`u97Boqe zYR@&TU9v~7%*yL;!~f2Jni*@h`#jp<_(a`L>UHk_hmYb`y?IgfzTCnwOG!^ncUfh}?&%uI4f->$uD<$klZe&yRnNNYR3wjef8De5@%L$W!vA)B z|D`ueV&?u=V%KxdNjeK%J=ZbUHDuibhn*%5rlnZ1U-T*Ob7C{OyWqykSudit?@le% zKlo0fXa4*p*4f@?_lie+NwmCEu_{R2(r>duc!I6I+}3RE`L&;~om1#s&Aq@^LuY|d z3Y!;8X5Hs&8NyYMO18Y5oU;8Z^R4JW|BT#Cudgg`2^5NoU$HG{#*+E#6h-f>*^x4v z!=-y>@Tr|a+nFy!2wSnrD;}F^np`vIgyquY%d*oxzN_fT*46Nx_+B4T-Mq6CZXm2a^8_AT()sky9N z#QkW_v1Z>BHyzJCpZ=@tmdLMVLS{*A4SG&$Z}-nFIXd(AnIr4u{dPTDDF4M={qxkN z+#6s1J{h%9BtO|kHQxVN^Oe>$`M>U}a23vJ?bf|{Qb{HzIOo@2lalx%Z%w6b8ijW@ z)SR30)OhvG}>w0jFvf8%UPd8ky6#jg3eu!6B z>8n#oukM*dw(5omcd9J)SZAZY+Ieq>&n(X1sD!@aA(rN&AYDb_^keS)&ECxvL?)1aH>>2uH%TwuAEuQ8>&M!Rem&bEJ-n>lRUtg{Huq%1u?rDsH6)Scv zepvEz{*Ia))9tQ3#g$V$I8NkTDV{94{KkwF&EI=9j5wSRq}jdusrggF!N}5A9x^j^>v3f{t$VG$uQ z{Y;-6TIb%f*}~bJ`Q<~j^Hz!EMXKj>%5#?|J5AV?=68$jox&nx#dT?xN^6zbdUt9) zzw-97nBe^j(E;nlydqeqHKe@Q5-o8<=lt^Qi-xl}lJ>0cSn@*n>3l()V+y!-a-@ACS^MX%+*9@p7f`}uBs-o3wn<@4=MbTLfc z=~$>CAbRb{fx{k-?{B`*E4^`b>GAtI`&wV-F&t1l+kG=*LZO*_`NwD99zADdsC@J% zlM7>=hY1<$JWRo>BzX1V>paY$0@PdQ0kQ(Rc!F1-%IiE3i#zlYYdd)L-7FPML2EW3 z3pt2i=K=CO)T#PDkaZrGMxfKl2(R;416k*>_DJY9e3kmIl9_35g=VvIhhA*wRa<*fv5(k{HUHP~=EvngG-yCAHeu=WQoru7^eHMJ}=YOobT;6xp`SzNR z4;9_7x9Tmf{Pm+%NAYSxsE_A0*;CuzT%MkMwyfqsl6T>OTGkNhCkfyEPv7S65HfY~ zT(&2SqakBw`0;K1V&9+KaR{&OjtJ&8AGfChwkp_^i(K2kin~I?(hA{EB4K4(bcop8?IMy*(;~E>&G1~voBG*PVd=q;+3^gmGr4!w)X-KO-2m6X_*#_Cpn`bcGDh>rbtZmf z>AHeNEoyuxEg83)l{|gsp|M2C=I`%_wz{j+FZ#|>%KPB^LuA#=f*JodWi;GI6cIUOEMBaC2TNf4`w3xdqET+ZvL00AlSxFtAHG0CTnzuwM7c{fa`Z96;f&DL* zKdPFu#mLT(r}dcI+P{Y`9kdBu-`%lkc}Gx9hsC$IJnt;#%3ty?R)75S+uJ8h6Dy6s zJ~E#iUD5Vs%VFkV?L&<=k2E6<`C6C1^>fbX6yIwV{qf5K(a^--FSDl(-EU0&* z{QmOCda~DN8Z5T)yl3yf&Yf4}9`C0*^V4=u*({Q>(p(Q;UGe1mWsQHbS&2JO_lTXJ z`~OEkQ0r2O&^Mh9vo|;g9uc2j82FAqq-JVSNaXBS5}W__D>Z*UW5sP)G&fT*d4*H6 z#iD@s>ANb|K9ykW>UMOy5o)pE)b`8YRl1f0$NSCI_G|wV^n~lviXQ1FSHmr3w;c3* zuO78w|B~Q3p=yIgA1l9{ov*gB(pAjBR6BQ{0bgkC32(Ett3HIhTN1aRO=GQ6Mc<{m zo6k;^C#N0yH;eD(Cc%gYdf-cI2v(IO3-`SzT$!VVb7_GKZ7LpJ$Cw6`iW&y^iNK$ z{In+JnO{Pz%KZZDUzzw;h?qQmBd@mSU%kqnz!lR)_%FA(?^}Gpuf$bzd-zQ@xUbCL%5Zn31%#<-x{K0_$*LBCG zmixDvhV9l~`YcEI?K;7>{g>Ce?5M~JQCoZV$D__&6J}W6Hvhd^NWk@<7UzdoCiXJ& zt@9bVew~it+sDG*_eI7;Fyf=D->+YqL7zQxTiTSrpH&NaBJNk~w2C)1bW3Jz|B=QH zmh(5Qr`a9dty<`uBKw=4cfyh7rmopHc&6J1l_b3}sC|?4`P9kyg&C_So!fY0_mSnN zt!xA5?B4ln$NuHKX18YE$xWXA?Zy^)>sfyPHgrY2Rx5eEO+_qwYTNQMm#Ep*mqeru zT;e0&haHy^ZaS4b%VNJ+wNpv+6|q?otLDYnA1nFgr}k=g+5MwoJ-cRS$~xz36n(5d zE7!ZuqterT*TLCE_hc2% zs<(bS8s6H+q7?Z5CGW;gkEOO-jqZNjC(Zjv^XB_!E{81E`mt%+P4e#i`a6UFt!DPR z8_X)7F3H`BoFj1WbNV!cn0Y!M*RQ%G-mIZ#`#>XYolU|L(f_L@Js5r-<|%x;^6rl0 z{~2uU${JrEu(-~B{rXw)MPFA3^9OtOe5q8)s5rFG|B{kODc`YDMW0Du`&=3vi=MJc z3AKyu?Puw}6eeV9b(P!liksrTD-jV3tPEbZSuyX!4gTfVU{BxeV@t)9GU z%6$Dxo0!-paLZKwE|w3v5y3RAoB8emcgFuY)(n2T^;d1Wtsma@`Lp)f3vEG@&d%Cq z%&?;3rAD~NOzoR$iScK0xcHbvJ~TI9&4ksK+YYpp9Eg#5aen)| z?pWEdbcvU<-!-g?S-0_E);3ikzX^*LHS>C!Ii1>N<;HR7Sof~(6$$N&-kvVeax%S< zdhXVi>pM0+xzPHcebU-S&)mzUtM_TF-mLLFw@oXc%gtngz{Aj+bv&Vg!W_w}=O%A& zQ;u~Lp7O$e(Y#ADvwrv%HZBM{c`@lKkvR1xOQA?BkQBJAEf#jW^qUS zxTHVr(W4I^uJEdI?iO9${qM%I%^#nb#b;g6Rr z3AK6CmMl!W8+@JJN&ix6(h}dBvVFB4(np_uzSZ2n(ZAz@?@fEv$0sG^Zw2RHo^LK1 zTYhKpm$~!SpRx+5of>$^*Fr(lX|Gzox7(USQWB{FF;Ui`bJXrE*s*0w|HNs&0)Y%d zYftNMe0#RX!Xk0Lu-uLkw;xMGh4p@xU9(sq|3SGf@FC-(LwWBzm=#_f@LTY(vMzef zZ;Q1_RYl(dzBt=0K2&I4WdC{1Hy33&p~YA3#DDVi_Y5*;`4SVPwXI(D1- z+W_u%^W8IIGCP&7F--R9xuNKyJ}tjdXui8%ezMe*YK7d186xZEUY37)=ZMkv&lf(Y zr5u{M=@5TNv`%Bwo2NRHj9-`ji$Aq`oq68lE~d<10gLUO`tK+SS;Wh1a*%(dz}9rd zW1>U`<8uBhda8nvy5>*T<^1RQy>S2b=Xb21O!{=H@2isDNy&3}EWg*(7@e(T$gU(GTSv7fy>paYj~X1KFa8`CFH&^R1NIzx3Ugy0dJL=JuT~koeyBFYujJ(9J!C zF*g<)o0y5sUsLt;(9At7+7KffGv)8}AyXzu*)_QfXeEyW=k|`(a?6+kX?l7}h@I1UsKH2%Y_k^d9X88Q7 zDqgew&TiIIU77EHNW3(9q8^s?h=j;fkQ!lNF+bwDB zY_D;4d9MSz(hX60zxxF@eed73k4jW}_$y%b%ZJPR!nTvUZzilXRBqc| zT7Ns{)R|v8D*xxY+-kGBi`6#w|^~^2=UHc+Bb3j>64ji{AG_! z79FZId|Pt)iTLvsH}WldkBH_k)&J4pZrnBPz+&I{1B(nSR68%WS{Jz<=wI#fTdh;q zW4X|6jg0~8n0M~e(AN=&nzr=Fq3bgb^R4dM{fpD@@xt7DFWN&Nm)KUt^tD#r%st_; zrt@@MhC)%((fse#8WKB~RG)T}>;IQxc-|${VfCX~Ji)2+rpHV^btU^$NTb4QFUg5| zj#k&E9$+BnjqzN~|rX_yd*7#XK zTI&a6@3+{!`yS^D8JE;DM9jXjJFc&%-=jacC;7rx?}NM5*jb7$tiJQ$(iMK#5ozP@C6it0s8 z-5(M+(ll>ZyfhAYSh{<4r`;NtNX===+CL&Typ(FxefM}Sd&Ab(?fYNnvvDeaQ*aA? zdqnuk<}>QKJzyN}$?=9D|;*;;1)){ime@8X_JkIwto z|2}+o_*AfE+eOVz<2zSxpPV);BE);f66Vr*%e_wudVNr-dF!J%-DSz|Ultd3ep0jL z{?Pls%;dDfJXf}>8<~Q3+C>*Omq>R%^7isO{iI06uQ~Lv)rLGN`Eyfe3MCiq$Y=JC zeR^?@_U7WL4?M)*mslrGE7#MV#m2O);OnNSyOY;gE7EF5TSO!M**sO4}jv z{s*5=pTBRr)$qo2rv~0XizrN1g2|Yh{?hL&i@^RnAONW$xez3?{ z7P{(wNl3zK#Y<`DZ~rs@VPC0aeocGhDxF<%owZZN+H0>yKWcSmD_^y3TH?`-9F8?d za?IY$TrRou=>x6QTDw&O@sT1IcAUA`G4;-zvx`lR-}S56Vx0Gd+p^W6ae8s7eMW8E zz6a4ipX6LoxqPC#eBEW+`FrDCoxbnAprldiexBLXAmz&4_D~h}x(Bz7Wix;MRu$NI z&A!e4L!bV^oCZ#%K+A>xXIaEPa+(LWB7+t^Ni3-Z}x%6$>O!8O7^!XzXvw zu~Ay^Xk}_r<-O-uYi8bz7mq%CT4Ba2p9fOEpSMr<_m+N`Kj(i2ceo6r8AFr!jK6bK zmAz*@+US&atoGc*vux*hZf?&i+}k~A;=2Xe?47e#uv}QSlGm*GtTo$$*cP$%VrDmm z!*xRY&E2klX)*U+)Lo=~>1K?c@;!Fn-D=grr&Zsp$2@-9k{!KaZNh5_qZ~(PRo)Z7 zPevC_65^@8{X$1@+UtE&Un;v=vT_x=U#PKao8y@h|9*DepN$KHPpQ5rV~@ME>yf3} zqxCan1DPbfCVHq&FyvF+dGY@7wMznhUQD!36fr+;x_U}6ztzNv5+@&Y^6>|JYC3iM zB-g`l=Te{R1Q2kF2yO# z=ka~=&EkZznkrqPb#`+4I*T8cHlNs(^gmVeR9NKdt@l=1e!4k(cbM9DpS1k6(+__& zqzUa=5_cuXLV*38(YeeGXP19TSJHdBBqVLy`zt*&gyL`C-zy!!xs2IE_5Gz)R}UBL znO-O3H-BpIvm;4yx8wGUZ*H%;opRp|&=jRPwyMx8&I(~B>sNAvXSlyYDf11mZZP#=c z8kQU@UEeY#NhbN0?Oo3A+z0v-yV(@KW?%Pr^kUznYR?y-%B@lHD^0V1iFJe4TbneC_zta)hm8>O-tW5`y1A6c=0@G3b*>7Nt@=FTr7CepWVA^Ufm8kH>dT- z4b5*q%dOt)>zaM+w&vz#OjX(~rot>0H{L$=y>GIZt;I$xJtRRu`Q*Qy>)PF17&Tq3 zTDH4C>U7drvZCs;+T4z-DdL536K_9y*KlIim+&C*Z+98<52tn?-lB4k7{36z?jLOHWf)=<+&}(0yDW_ujj&9d{*~9d_isyYYYV`PEbYEa>Jl z`>T~?rh78Hdw-~F(jPCeAAeV;KU=i7;+e-m)?UUrWgPW$b2|FkzPsnSWI!|Bb@66TX5Z8dZ$S`&HC))>2Iza{(LM*?Z>3K|NhOK>-2qn&4H$K zZ?;qwEoa%v=*RVGLka|8;@p3Jc6ketC> zaF;jvtwQ*M-jH2P#^UK-&*$mP|DWT`cK0fWi^M%i7kZ*v<;lEF@fv?* zj9T-_yoLqK%{#5RXD!lQq#5MvRrcM+ZJx#RJJC}-B4^EXYgpqlaZS?IwbkeUp0oeS zT4UVurK*mh-RZ;oAIT~1Cpj+6V3(^(s4dxia{rgW84qOR=gR%fGvu0cs3+nqzn1l> zb=plA(>XG^_C2fG|NC-MYQ@; z_Sq`+Qx-i9&4HAAOHU}XR$@Wn`d^# z2hYl0FL^Zmme58E5tF6{_4qw6y>HEA+?`?5zxPJJjjeF*^oe%y2angBGAo{7_Rwh4 z#4p-g_8xerC^BF8sQQ<8TC6HN=c@TG4}Xz&SGBISVfx(;K^2uuXO*ZpaltE0x*k{g zoo(O!%3FItWXHZ|mCi}0I%kH)+uNFkz6mzl&Xi`n|KMH;qq^(mxtFgpmAg89YOtFT zsUF<4EhlDok;e9~awhVP$)^IlowX0ycuv2{@yCo|;?>Gc#et_&_-CGe{<-F#?q?f@ zsiia3CW!xH)|`^9_u|@?zl%$kl|8I5bUgFBeaYI>f)`JJ3b}2;`T6rgmnr!{yG-Y} zi-ldZOtF}0a??zf=kEEf|IVAPsQUTun2P{o5~1rXA(i z_7dKu5vC$8b=yX3zy0dsEg|BsVjDq?V@X;=t{3kkkLg_L7x%iWADwLo%9(J4 z#p7^KjJd+GXCD`w$dK_pn6s{P*}DUaS-I*1W3!~+_oz*Tj=QFT6}@{AIGSKx+L{hq#gj|5ADbd2{nZU+><FTDW7kh$| zpQZo$_vv8em;EAr?BWG1k;`g-x5rPl>-SG!iaBsdRODmv+uhgaRtP$FN-D`0P1bAP z_Wrw1tgzE1*=_wiTQzxe3zN=$)1H6f^}AOOSFZaeBRHw>@W)fnCHKB!`5_r@eBZ~d_s2q+Z?pg3 zu~>GhBI?ern_qRGD)1g}aA2u8{)6Lhjfebd&zX`PE7YDE%0Bck4wRGG>l?ST@o$^1 zOZ+@vqph>I*{)q!FZ24LtMb8Kp49I;ucytj%ze2<(lasEV!q-%U+u(=9YSu~zn)m) zxZ7v4eDycy$CZm-&pK-GN_lm9*NI1O%+Km*sJcg-KDD4fE3V>{gJO-OROTP!>2UbAD@HKwVo;l;VL`Oj!}&oPK9FM=3nBU)NR&fU71%Jhgb{8u37w(dd1|Y=3i?Ep6Wy_MP4LjM?qo(mBiO za-M$w!J-;i`|4HUp8X6A+zPhqTpJ5xogKf$|D0Z=siOJ5m%S@~N#N0|JBs#srwQtu z?U2(?z3%W(LRKd3(yE*qTfe3M9o3Cx8D*TzayJHTOnxUK67nTsr*Do<`Po@bSr;W^ zj7*YkUuFMPiT<_9dtUp$(9Nq9GB(eh{^n3+)3K8~nOl>?r_Vq3Sv4T`&XVw+gE0>| zxH|efSpRMO9VeRC8?V0B=iim=P`A^5|Cf}D$FG|4=dZ;*&qDd@qWv$zm}5E4D^1C9 zmbmjW@yU(ioqe+H?-ifF&I)*<_N7OvZp9DAkD}8~?wr(VkY~!ObN-LYGEtucQJIGw z=WKc*!r&|TKKSC#Ac^_^^<*dj>*HIdGA{ie%9=hIPNNP>)*z( zZl$8~_3bYft2NEq>?zzl-(+IFPHuqpw_ibhZ$ov152~S=oA2;0c9$L)T zu)VQz-p?j?y{WsSRxX<0vi;ooyUbQxO&eGqzEWYB)iBxaw!_wnwXFG0byi0{O&0K* zu3sev{``*< zXWpKZFh$N|&EZ+EHa6uaZF{j|+2v_12Ex*XbKNIg&JOF^r|D6)GV<&Xo(FaxXDZI+ zyz)Fjgk!e&cNK>Ht{z{kTq;GqFKl$T$^X`Mg6rQdAv^QQDHqBcCQh|UeGnX7pDA~{ zDy($<)_EQlCs*q3@ck&OrNhcuR=?`$%vGN8RIL`i^ztH^oMJcY&eS(I2 zez;Z?2egWM3%9-Y-FQSr>q(1dM&u>4jrQzHT^Tc%oss=w=O4V;=TY9NIa94QW&X=d z{`U0`q<(wqC5vUr zUd`5*r9LIwXsXv{yYLGJaI~D*^me6$-Vaa1Ia99N^v6zk_i?GBruE7lT24mMvR!`F zE4fo5o=xRWTh?hqn16l`9J%r^R`C;dJ%iygs;6<^Ww~_zoN4jUU&U)*yT*Bb0ycJy>G5> z|CB$;LVM%;Zx`-6Pw`IdTE6hU-}PdLsf^8Y`p#KymGYhO`;JxlyInasyz9;V7HA$# zS@eI&zK?Ci?{7(O3fvr?eMD@-bn7)0`U{pX?*CtIZemun=gyn8w+z>~FPok-iTy+D zYqw=V_f?Av#n>;1F+V+F<#8} z8oT2om$f>Eu63$&GqT_N|6kVL%jLy87C-$$bxHi)~KZoJ{C8kY2EaE#grO#jg zx&3+fjK$9Td`mArzHQv&yy*A+p27zH{Ea_FZ&mFwN}v7z_}8<-{Y@tWgd^^1`Rc!& z>&882aV5_b`xX0i_J~AhpIzp>;9f&ere7v5v7HDpLaYz?;Lb1pt<|=rV~y+ z=M+o0^j^)&(@yzND=gNo(8}>~Wv_9>qu*x&8q!_gT$x;8ETQL+l6~W3*Aa8)86Vvz z>#WLC4)wJ8vqTC;`Ec(C!IT;8=`YFr;L4L z=BsL+1-}dsF1 zd29Vlo6Of)s!0bnSaqG{Jypwl^zyf3vd3%JSw?MsnIf#L^=M(<(`5hEryp%QU$B$? z-Rz~wi??6Yb71Y*ru%5SQJCh5nY(9oF8(>!_~;5fv)5-g{kD&s`0(7);-~qW4*d@f zJ2KyGlT-2i-@;1|)O_#ZoysMX{=lZ zlDAE`x8h%cftE_dXN4|6bd7cFD&x)}IblSes06JMx@qdc`Ao5sNoU=lf4C zI)8SpT)ggk3+)}E_Zgl(oq5n{Nz4v!rKj$DySFY2k3TCZv*+s8E0X7x^EZ5uoVMh3 z{U*+{ljj%7{k*Z}RpXV3yW3@$czVv7yz}3{JVS6A)8>nks$cIY>(+A_2$)u z)=Ao`ELHnbLJk|oOQbBRaM;coR2%=-@U*g~yvrWFo94CqrYzm6zsJWu<%{;><=tCX z=(9~pNGj-7IJ$c33(;TaT?EG7m2Vm7`zZsvzytpam}qZRTUH4ITCV7#>bsiBu^x2GPW+VOa6K6=iPm` zPQH6HEAMrh!K;ElVu}0h*Ssn|y2Mk>X73a3-MgO^UcX%I$QtlWaRT%HSPga6yON81 zmq&IOF`5?by7hLJZF=UW75F<(xme2WWwG3oW`**C9VpXhQR`mdpP-m>?4Y18NL_gVkc?Sx(a z0&DIg_Bku(vX&J|{n;k@a@%V`Rxh!%cVA3b@b+n0-cot?_@n6M+2Q*cmVM!i!(62W zI+q5z#)wy+$kTW%po_BLtF$bk0@Pcj1+oI}EGnqdZ(82dGqVmU9lihM?d8`ndLwiD!MU@a84AOg3F- z)rpt?y)W;pK)QYXXZ3jz0cx1c4cn6Ju7;BevH&K zN1L+DlgzW{&3}1GwY+ru`s4ou_ZxTLzrFAF=h<~VulW8JXEs)cy#DBMKIYkUv&!pV z;$O#J&9j(rP;y6=^1Lmp{IH_)E>$VnW}e z!%BS-8IvWhhSmGV9W~wBbL{m=kLcHhw&^ck$mxa5IFpq1g715(&+!|)o7Q{q86`d0 zSGYe;LGHlpbhDQ!)g^E34a$#fI9!#MHX->)s#T>}pRe#;>ykVBS666O7a1K}w6fIZ zSjyt#Z=`mGoC}wpCX@bk&AXifrp+5F<|{U@SX*&DZ`bN6GJB`!uhCH{C{DWeqh`rb zrfG7k9DScY*SynxHYTU;@{gsj<~k1zDBZuON1Rp*}0Ny=nobq$i`+kJeQ>ytU@ zJt>}T2lBF*mPkprU903*uQ)U9^P2Y3>tCfGWUh&{I(NF$R_Ef4niUUDbXxz;3*PLL z8zHnJ`8enFH~p`x>kLo6jy1pH(s)+z`m1&8U)RcVJ18_4PPZ|6ytnG*qFQgCYx`wi zedSQ=Xm3_C@}HJ4t9@gBUVoJ&|B>pLV~Lli9Xypd@0#+O8CCYqf6kf|oPOnape5&A z?isb!nVO#t-Fo}$rj%Z4;=Xld1xq9S?dBEUe4esnJ)e-S)Z1qc{%07hT{qnooX|7P z`R`WK>^|w5Pl;Dd`6fuHY!egP{Wwqg^-`%?GTxzZ;2?M{nTSGVs;w%NS>*O&8GiUMa`a`8SUZ?g?hGbM^y{q z9-$zW9XBWUf1Num(aY@2kBPp^Z*FQ4Pm`*451FeWAT!%{<(zN){f8sov;R{mx4+^u zS(kg$gT(7SUTbDvd-3M5gBz#Hx(=7-FWH%S>bp8(ejTW9yv&k6qb>60%!z-Uawit* zublGw@xR}lb2tRv-;7+ewEFDQK3|!o!4qZK66Kn2`}u8qUaiKbxO-E|Ig3=K)16(C z=1;$zE#F{P$+(++o85)z;tAg(mVB5Kkna10=hVXYe6i~|55 zyO!TK`n3pS;-@*$ewTOekX~afXC7skf8Tnl#1jT3?VoqQzPg`&DtTs;yrR~H3Hl$t zx0b7)6}H_sW3FHci=W1A7X8$oSyFtly8}P*=xoUi7S22Kl6OMgb*>XEYRjc~j%>W8 zV#1NJt5*2$t_j>%^R9Fo7Fqt?Jnc=viq-4?Fg9r%omTpWdG@P?PbW>9Ag5OMLGDk%01U5UKvv1d3TYP%+uC8@= z%x~|A(Dq2~^E&?~^~`ghn@v}(T6Y<^6nzi)+LJBU;;LG;X^ryX=Q)bM(=MBpe_#Br zP-pe7YpG?6{AOQvX9-U*bQd?6J-N#3{_kh+G(=kSUJ4ey+y3NX?jGgc&IhMfzqI&c z_Tql>)i-P>cWZlu%SZiv^jG>)yx%jKfcXCF^I8rIJl6@EsP;Q8{Hyx?Jn03qJijSk z&x_vLtf5fAGxH9+{LU-v-*&Cob}Ox=;9lU#CpxpTF3TR9m9<=CrBIO8$CGa)84C`$ zc$|&f;Nh&Hm(efn$JD#u%-pN(s$YAfOXAiXArD3UEl1tGF14ihC|YMZD8+vI?(vxa zt9j(J6Az9V_(T-E%L=$Q`)SVUU1vH>59*zl+HumIv$W|l>-_enuAB?#o|Zo_#~;~%*C+G-ogte&oP_?KsjMfTzo6AWbv@3_7_ z+OS`I@-~}J&C^f5mzth9tdi7y{?_E*{gc~5FIY5|=sb{$DP8sR@rp!^uUlu#Z&|O9 zwR(NjUi~jM_y1m7Q4s%1SY%4H*mITTM}E&d!u@nk^rymI9rHsnmu=u~Ps?7=BDVUk zrLcPB!CFaop9#H}%?mOw>BPMGGv`kilg7_&KeLZ+nH>{y^84L6`Yo@v{a$uguJ9LI z(VJh6*0xHQ7Jc?TaFWCS|G~XFj*JJ`b5S)v!VF$-ci zt}jvBs5!funMvJ#rqK#7+sk*&E4DtVu#eqx>_G<*K$Tg;ge_1eE;ojGQA6<+ITy6K*yX|f2EB%^EQ^XXpG6KfjqC|FCJx z%J25=rjHlcI&8KN&pNg^*YbCffZaYebDI#KD5muqjZ-%MnCMll%cAh6A#Ll13zI9O zTI89dyLQ|(*m}cdH@IKxo!ixMV0FT2g{Ih#MJ#vzXRO~QdVHcW&t`A4M%D8d zrW^TiU)|X?Vf6$Dj>g8=8{PBv29#$nW6j&0yfXcSo!dN%`|+wbLpS-!eb>`@JZi4{3L$BOruX$>GUFjqD z&D!EolU+&;|lj!VLidlk96o2+m5f9m|zPV8as>;2|`Li%i%W(9e> z+6P2_{S)NeHa+_P0};)CN$%ys$M!oX`}AJ6eRL<)-gfUVC#DmdR(+knsc3fj`x0r# zl9!E#_7@$Wvw8m|f7!0`|F`z>Ur(%Ys@R=pcahz2j{lkJY7OaG7O#&d`OnWNJ**R1 zG_g8A!|uAtIUYOYdKfH_^FUS~6|p^4FPdx-&KFuh;GVI=TCHz=^r?S=!ad zwR=2!u5IK$TNiz3&Pu1nr{c3`N&Pyr$@!;`JY#9Bx3tN|MeZguPve2&bY-9LNI1~%5@bH|pR zefMJLxw(x(95$o&>AP&w9>}O?R#`__v8;--f(+ z&Qg_S-HYE{UGD$2E#Tq8Wun57TeEFjIxD>X+^#)(<#=y>!}NV&?Db-{b}jj<#YLpr zLu|h(E>iiu${qzO0$S{;7R(2ItSs zsw-Kql|1gb%;DzpmZ zf3U|nIx2=Q?mBC!MpR7QwjIa*kMVr@-eZP(#T2uI70^9eag^r#@XD4x;KKX7USJ<7No?G&h zR;cJoeqLWDU&yYcu`SsOUABp5uBs(% zKYFX7Y-@7T7PI6EbLZV%QALTDkIkr^SthGz`qCuUZMTI(!8`Fq4+5@>UtDJ@!}~yK zyULg6ncJnCR%eKZXRBR)Yy14Jw$6b|--O<4t3kFxY6`N0l`X?=I*HKlhO5 z{jGqtpKtH)Ee}0sF|$=;!|9IePMjHrMmeXCoNnZt)ZpEGa7$;jz3(11j?8Br-$GV6 z7&|Dg?VoD1*h@3^d+27DsWZ5rigOuwEUKQU#eT%-P_2}bu;%fL?OA8vTnL)Ob67$2 zVYSSQR33}NxdI>0otij7UDD54m}%{T`;Gg8j_S@b?Q6=MYW7X*@s5cS@3>=?#s8Mn z%+5~Xd0ZO#sO|X{hvdq5mp~=<|0|vpH62;RvHH%MkJWR|ILdIYe90(wMxg({>A%p1 zqD1|NvKM-j0+zD6^Ju;=aou4W!dh3%tv4k?an;e&8*1JB-u?Ad+OPB0mMbIoMNj48 zz3kbKSnZXH-rmzcdQ!rxG1r^9cJDh7Tls|< z?R&m!@9}5G%}x7nzVcr9R35R;z|KF_> z7Km;+U}ebZ_GKMxOrb?(_GyK5!`YHPO7$G+lb0BCx_`)F70>*BnMFAHnAk+G zN#A9Bj;RE(=5J{UIiRKTRBgek&*A9-t)_p=rZ#;|xw7--t`ow%y4P5}Uvt#Dohst& zu$(X>h`Vs^ckiB-JsPDZ2Y8({J0*X4IzC@F$!br4<%+)Fwh7`{va_YNUxwN|bn0)O zyWvyP24f-LM@HLgzy2_~78x9&e^avaPv9DB&E=vI$5+nsx!`faymi;o7>3eB>&G!^ zSFTE}NRB(_a&nL8CEcAdPF8wT{Wi~Zw94J#Q*FQbVh!sh&;4>A--c&xs$B9r_K(Db zK4ax)uZ0v(CB^D&YZNcqq9^V&_c2T9bW@+6BYW6hwLJGZa%R8as~E?7t{09zQ;JP5 z6jaqoxW^W7Jyi0Cc0rmA%lk=F3~qCYGN~JAiR}BI7@*;h8qQ-YF@J?$=B%D8hS%+G z{M&qJhh^^ut~Tw%hupP(>HYo{BD?CWF8ifVYwkX_2x) zeZIJWbl`%6U#C}n-?>_F`NwO8y%T;f)O)`@bh3^qn?r}n@AzYz+0R$zn0=^f<-Tx{ zZ_;zN6ycRiE{3Dbn-#(xD zbce*{&5VmaANp{rf@5{Y^6+EEmeP9~0+tFdu9)O|G>WT#L!GXphJ);y)Y=913O$>h z8(y!fTq$?!mv?E4K_JI8r-)SW2{l5FG?iAa5x61VES8ns=idtZLwcURARv(8` z#R)u%bR?p;ZtYxVA@(xys1Ebg3BAkCzWH-wL*=y_M+3`tD$d`b_h_NZPMxHdtP^`< zBsaBcZ?V!5*&D~=K7D2XcEczw<(v5KPK9=hk4)VM_EkKPDXV?p zF{RDWwa+svU46gZ`c(~Ru_AJKZp1vlYkCvVI$d;(Pt>1+0C8PEu;fqQZz~u~7XoEr-8J$=d=x zPMfoMvQF&uSyO-C-y?P){l$UvmJ?g~HtSvf*r~TIjXN(eZ1xM6DRO#}d)usnExeQEpZ1jA(qHgld_w&A($-+Z^3YZX+lteI_IdOZH(3D?bw)m<&Qods7H&fT-- z1-EBQY-Gr7gX5k19=?5UyvrbYLvf#h!41ph><|4T_y3d#DLRE7*>d+KM(F;;W7OY_%h)_{|}{q75=_T?Nr0 zKb5chXf1oJ(x|1mVYX%N==7iSE^kXt%{#baD|g1lS$YP?#cMs?tFrSdd)Q3aj%2PacwlU?(Eh-o zs|#QL`tZ!9(xRYFHOl9n_|?b4FQSgwikZw>=ObYDVpmYkyH8c|B@aUl-KALWwtSX4 z{DN->Uoi8!%q{a@eC)Cl;F5cHs%!buEhi7GF}`B_nVB(ZyS7>5yX9Ql+Pofhdad1P zIJNDVvFX&qUoyq50xZ9BwC`WN@wq{V$%DBa8(ptHKF(KcQ}_K&PMg_Q?$;mUXWj^i z6`a&wX1L^4q0NI2^V(yNUo+ZY^-=EZqH~59BE0G&@5}%Gu;{`?WtQb1Hm6-s%s+CL zYZ=$a`a91x4#&@uSg^zD$Ty2=#SUjZ7`uL+f4!k`=`We;$*LdTckjyh+|?HSo#ohs zT%}WYH{Ofk*A)y^U&y&=o`+t$-eM!Uy9M%BGK_BOR9Y!o>=Av)Y;0D$iRH+n0&j(d znpL;uOAxG5_k3Z7fFu zo^L30-K*H5<;=M&TkgS0jjaJP+EaSP|Hv=hwZx7|BukH(HHSBKwU3)_{Q>d#8DXDa zynb+Zliq9Fx7kS-+BY4I-MwP(qmr3+U+ayhzUq-$@~$(H)jVZF)NE@t(Uuuf5``Ss z<9_fwdbC>LbxwC|B>U2rk*~KfAI_NO&TTj;aeGMNdO5kRu7O^iV(%SqyHu~y(KXMt zs*)Gc3|h+WdZ7Q7U`dADto7%YRDDuP-H}^Wcv|F*e(tV2K~bWQK0FQAKDzfQx82`z zbNwf$KRxAsJ25vW*EaIzbdMFK`hpHGdbU+;{Qc|bc60eXnl&=oiLVRU)9+mFyscp$ z5tKS1Sc7Y>-plwC2g6eqPn(po=t8`S)a5B3?Oi%7c;_>II(g~_kGTJ49S)T|`-b+d z6ILp`_mTXjz28M}>6;fN8;s(07EVpNT0HHoi2~bRqpJZ&KHGH2pMQSa;kZ|)#F@{w zaz3$lnD&Ys@^y_qvp90k{^hC@l9)d(*lf6ShJVoC$&q~4oW#2iF6pvzn$vt<{F>?MGc(?M&vtIJ;t%UI`yZhy#eMKuO-!c+ z|H1COE~h!kb3;VRm~W&$GP2_PvM`NP?ca~(23PuTaRo&M%{abLv24Dp`lc6F%EDdx z;vU!PST;o;ke`?HqU+J>j7ygKPO&F{^JE@O?fqWFd650t8UE>AWu6V9F_KElHmldf zt`P5OYj-XX2o0EhZGH<|uT6^H)r)ouj|D1OHBazs6m31$CF1;I@p+qe#>{|b9XFid%q>+J$upQ`5_;q=H9mAbP?Q{!eDlGledJb(8RzKcBM1x7hRZSa^S`J zdQRuFu8)rFy2KbH_DOolllev;cTe9tUUlk+l=GDXb)Mhm ztoX?Ek}39noYLu>T$4>k{kQ)7yX&sZQJ5Xsa7IaDT?vzU#vO~IQ=0Ow=i++i9Jb+4 zv+2EKm$b)Ny`(`fsx;=z{&<4~HjSDojDPbFHMAXVE9;KfFL?iN)fvyPlaKi->bXb0 z_qet?WYTvf&zz}0&TmZSe0OrrCzef%kFG!dDK<`2=X|h<=(M$8Ot^Bg7tVG6eL?*9 zG+8$PG~GVmMGJFx?tk6v?U_`~WN-cR^13^G+m3a%#iW1msN2<8xqBBE^OrMwS~#2M zndR{QQm+@8Yt(Wy!gE&jrcGBYc$c_-;Qk)EPmwcEM^f&_%#&LWJeOIf8gy}w_N@&w zgund?_>^vKEmfm(=!EovW!ugw@)#^vd$;Yz^wL z$hs{7zONQ2d}Y_$BNzMPHRtJtCmwaV3Tl50Xi;CXhncTAd+)R#3{jn0UCr)IPggoI zUg@)|>P~uf+WBH`z`a6|K(kA3fjQ!VC1%#oi|==BTk+|;bK-=xr;kOQ`rVYbz;>6- z@^EYJHJA1Ov|ET&mgn4jS0%inIiFSa$(uhxkJedki#;+c{lkhC$p>o|3O{Ugd4J;V zeEs}KLiXE3(?6~$+37|8nVuh&=2TQaG7>(biDrqFicmhqi4LPuA%_+oX>9 z9`s$w{>n1v|K6Sre&=0(bcuyUR46@m|MkfA9$&RqU~}f@Re$uILl{G^@O_w~OQP2%W3?7 z;ihjN%F-WAE`J>P>BEAf%PeJPEp&U>9P;XnWz5T-~DVwcIFh(P{qR zlUp7zvI+GXeGX(c%2+BOZ9G0pr0J}P0?!2I};d|Xz|}$v-x$=(b-d`ED8E# z7oeiD$VZUJ!RurHlj>r>?+q#nL2-LI9wekyRqZ<8+Vec{r^edc&6RF%8Gl$jSn^&k zg++S0;*|BW9@|5FYi`!fIp52CkWnMH;koXa8;9<=B%ZeWF-62()0frl$cDxzd)CNb zJkPSd206x6LWiJ zYQ2ig`@@iK5^kP#EkUnqhIVC(tjp`F5dK+K%H}<1X6-%Gxxwz5XT8kwdn)$+%N8zC z+aLG#<{Hi4^^te4N?*K~dEhnc53?zvm1UCq8~G#GUtqf)7#LUl^F$z zP(58eb@hc-rte2NW{CTimWTVF$n2KNo-EV-<%s_%m6@)yclKFnSNm;}nOu!yGtlPC+KgwymwpG zlGpYBj!X(^IOWI69KQQb?S*wK&&R*ocjZU%D}^%o?aUHav;3Eft>m6?ZHHKVQ^w9$ zJWS@7J*6`o`nB(_SsK5z^hf+3rd=_o*ZVw5U%T(%YqmY5$$@i4-?83l@H??7uH?UC z`>B5c6ZTfji{w8x;a$Dyzu7*#TOWSBD{<+{Y6+M9oc_1gFA95<5O9HS+xOs;`Rqn4 zYq*jn+LLa$+OKZ8-{XA0XOEWG3X8c@A3OCZmDGH>cQ)va*TK9CYp$?%J4U3>)yi4I zzal>RP*tR3sWrD=>7*O+|I;SiG~S)ovDRS0G!X?R7dtC`>ob2MAL*v|t@ViW@?M|x z?0d8B!8ONrT~67&CgJO^ZD$--J1&&cO5OcWX+~Q-XIW&JTDI84xBG8|2=ty}WjJzX zR`-URVX`Hj?)Sc?^7o5uIX5}-S$)rT z0ux;=pWL~->Z)?sT`t@HXs3>uhnJt+^{B&JZuQr2k%#;BG!NCJ6>YH;4fph{yTq;k z>VU~NrUqk%`}1BNkW5}uynEj-gPCHUuRb&{7g?hizx?RLW70Cm4S0XEPM%*mYx=rp z=6aPA{#PpfYyF&QZf;}x$)V=SgN1&@hax4GuFsO6k*RUL**)h6-;2gSuf%d|Pao3t z_@zGOfy?y;`vM|2&f#*qyCA{kd~?kF`u(%7zc$|#^(pplU0cabou_x_2`rlOqU_$g zEX|bTQpz>{*K)5(y6p%MeRj_ikC}f74iy% zNUy96mswnwRZ_4A#xmrc~(GuPX1Ww>U_&lC;U-ydg0 z-I4ElHu2P=gq3AG?v^h7C3>mys={3>^A+>7`Bu%zx+&+fTF{7Vd$cn#xJNQMeNlbSCx!@B2yMFyk6)jKQ>Z;c)xvR5mCTFRaQLO22 z&nwb1)n%>Q`W*u2~MY{uawYyFrSE^7+LSL%{AZiDF_x$m zeNc8z%F>#1LOi5?QU8UPNn_h={iz8oTPE8|Ic=~_+M9ZL znV*b9f9s6k?ZQbDjpRB`Pu(edXkJ@BbKv_$5@sTY)t>hL?dKPnG+(HG%86I)O+WVj ztlAiVxLEh-W5sQ?%japNJU?RcZe5=C+_{d5I6H z`!mOcCtvr~o4@h@51r@C-0>y#Y;mbfih%9a>enq|FDxw2_J6Z(d06D6aC*;e(+8b1 zc^V~q%+Kdu=FJyxQY&|Lk*-{#!d!poNy-6v7b7;4-%MgkTNNH2yfXVq`il*dzLYop z&6N7f=eWFQi~5XtO^0u8oVzJx70+@V)y=1)WSy5esnFr=Oe%+XJ^IK%mTHo18y51iTxpI0+ni#MJ_xMQe?^Svb_F>fo z@A&~0RY%p-<>Mc!XLaz;5pfAwkfc6kZL1FV7f#P9E!s;D>m>g^B6H^GrYV05ukE_2 zxN-UKt-G?;c6SC%6W0CqarY0$KjAOAR&nvMZp&D;dv}!*Z^&X*H;zeXgTi^{Jbjma zWm;liW2M0Zt&gHh%!)T2FbeTX3rygPx{?0t=j@58r!Frl501ZUFY<#o)c(f*qDJSE z-6HFrX#c)_Z&RsqJ(ud!^9mY`cGg!z+OIPFUMZPz|82%eqvlF)WuHk-PF->wI?DQ~ zokZ#f- zQ58FPUxV8F|2pG+ITtf_+Sc!45$tn`W?LcoUgX!o3B2oG%r?w-sw~pbww?~^?GL)axbEZwIp25OE3Z5?c(+-W?bbQR z&&M9|CET-kE9_NJvP4PS|FFbtRc`gP$>sf5-L5WhOf~)edurCPIBBsKBh9{5tIbv^ zGOzj&;%pXM8sU_s6}5N^Pg=_*-SPz!Pjvo0;3n>}cGIO-7D^dEH{{Mf{>t%+B)37w zoZ^QL56;A${3P;~TXk75FK3IrW1~XK-;Eycvb0Rqg_tkzm-+Ze#ug?Dr@I`o#$Fgi9t?9y8BK_Gkx0>b>;Ho za}#ZAJ?6FW9hBNIpEqPrmfXF~fwpbSmE@#P-I|oq8ZBl$xBblu`_p|zk8eoq(4X8M zf1%m@vO5x4%OY@Qh09}Tjo|1ch{duUV z=EP0u8#qb=HruaW9k;jY@AKcY-~U^c_w?=GcWzx<1y=14{o$LdeeIn1)3ukA*0yNo zz2`SqI=kcV&u6>e*H7Bs|MzTH8h6g7gAe|GKHI*AyVSHLci*LJDb9VIM%gdD*Pg%s z+d;PI?dA`a9I?SyGn>wvQMLai|I24=o|OI2mZzS7Gn>`rDO|$4e(aDB`@QOB5P#&w<8LiqZ7OS@ zrk(Kg_?jOxF1H_E)E<+f|K;KJvO3;bU40j1KTU0)TKh_CQ@T#aVLMsHR{|Tn=imR&UU*ScFYT?@`iDg^juZMf*DwEQn8z{Et)rqwtdswy zRJtfz+JD{1TMuqmnXJk!dN1p{VZ-#pqVqqAKI$vDut(^cGM}@!yq^r0(VV8k>mKG7 z%(mO`ReSfgRTGNS4-06XPVu<^Y?4jQE3=i3>IuwmGD}Z(7;q|FTk-k1-P_u4%zs{T zng3$EzNGj;&-cF@3fRA0Uux+;`H+h8D!nC-PraEg^L@)rO}^*ra_m@(GjgxI}^?fthd8{(})<%cL zr#Tf9FBh37EiCYP5x4B4^7r?v?Y>N&f6FA({r;?T+m5CFy-?P^`%2xt&x>~4^xw@e zVatajf4@Hc@WK04SL}=rC(cRt%05!Oz}ubUYJTUF-b0ITf*VfwpGo`TytDnrp{!~n;8C3^FWzy#q`?hs+RJp`ailYdQv?YW1qR$=a^H$r*#-?0lUa=(i$i%^As?_y9=B+XtLvQhQS{~W8Ebi9NE5d7oZl~HTOyOI| zR=GA)dY`u8e08U=r3Y6T&wRS7VQEbir@z7SEv2@~`zB5oeQ`9+KU92m`>g%8Ni{ju z&$NE2>17|Bz1t-6oTkOvdnLK|*SBe1%d}lk{whdMJNyyTU%QsXS+Q4j*Boe9FnD|T zjKV!fX{i-cE{WAB$_OHZ}CBX;?wBbU-Qn|$2Y+@>Wm*wMv$~(Ck_TIkS_TcoTC5!C6 zCUX~T)lL7TkXM)IbU%K>(MitMyVP{cq`H6C-r@Zc*!RfU+V~}F)-CS7QqM0&k7n3i zX-N)X`8H>*q_0QBvo|w0#01$dfAK0wA~pMuKI1KqThsD*-BkP1?kY_(YnJ^xQABEP zW=s3;U(*5(pHBHE6B*38>p%i*6REwoJGt+MoMy?#Mm)!9s!PwQARc)Sdf8BE$k!6pwH4$ZA?~wMZ#Fn`5uD^-8^` zTce9=#QRKj)deIDdp%vW%~WxB?F(o2+Q3Z$!gEA&PD#j~V4u@>Sk;^7VB{iEZj)zm zi(K^>qJsZcBu!lOGcGueci~ItM^45}aluNwzXN3qALz{xGs%CHmcP+;RcM*ksw*KI zSnf5h^9Yg^ox!LY<#w#rMU}k3;<7@vFYZDm{lQmfi%*=?Vr#4B z;Zmr3gtgu>v^FO9vEjlwuXH7}+Gd?zyHD7aj zN%^b(({HY2FDRV#qyNyXY#v%{lLIju0?rgK-l>Vn6rmG(C3L5wc4smxJnPF$ut zCmDF`K7J=yR63jW!-J5WXJ#b7Fni)(^^xalvc&v3({D|XTNQGB+tq-j59i&yKFKL@ z*Rc&}_WggTZ@-j1W8&2Em8nMcc}rb3ESbDyhL%?`+ZRazO=ov5h5hC(x7-9R=D+Nk z)nQj-*T!pK**kARs>uY&RS&Ox-12GB#1o#g?zrYh$SpZMQF8XLE60}y?2kFe{_pm$ z&T_HfpUO{8Rw~{&nrJbd;e~%rwEZ^OxZUhslNolaNts;OEyX{*YP*!!)ek&;38%$Z z&9N`MAAfPp6xWYjbDvcCL~Hh5dhpd~&EeLMVx<#I@3vO*WOlEdwaI_pa!WB&N6A+qOlSRkioy zt&&y=<(#z4-&;>zI5e$z>POS(kIpK$M#u2S#O`X!t^e*D74N6Q`8E2C{`c8O|5dE9 zN}slUcSNY4@;|QFuos-M_jNA6;;m$B zQ@8e2Kx3~^fyE9_seJtjwWlqn7}w{e~CUZ+<0y(b%JXN;^dZJkY4^Sp zJ@WtEtGB*!%ZmxT!MJG#gP)zF_o)k8BKfZ=Tk}6+h)bD#=1{{M)~mjryjx}&-JFv4 zM>6tBb@4gfNxqw+jW;FctC-1$mcFy#~em*pInGk&t!uk6?# zZ?-RPbAvZDCojFHV>B_Li?8{_v13UoQ>;(1L`>PsA+3=##Wg9kPNZp8uh9#3O^1lg zV4W-N8eOYZ79{Lkv9B`zE6Q@rbiMfqiPwnl|hzWhW z@cMq+o!`n9%`8ukxw*jp?%Y%JUY|SCU?s%$IyThoQFU=%@61iH)Bkb=H1GHRV?JyC zluQ{-E9=~YYj*8DDy==QY4-5~E0gt;xq9xk$hj50yyBI8BKA{2fuFAF%5C}&k2P`? z9ZLK3wDg;>da^^!{XDbiX`5X_b$Z$lJM7C|rB!*}%+ka-eUYh2TuiYo>|5a&b9L9)>4(r?+W(lUruy+pes0|W~FM$?%1nEHW%Nh zF{uB)buT~v=*vx&r($)*LfRb{L_8Mj>#yvI{F!*0&)Y`%V6@vgSDUwb2d8Y?bZ3>l z$f{Kd-qmx$qUXqbY0|G_<1t>fZTpn$J+BMDf1K3i-WIht-;*sY{r$p}CF+;0E&i&u z^S?U1QAeanH8lRlm!O;5?lQlQjHvSC(>Ul}zs6E9*Kp3!mqLlP<=>cA_?BIlPk(u0 zMc1pX;wRrGD$4bKKYV!o|9SI7^{r%h6rUCqsByj7s_z%`PUFnMi-$Ma*PL?>TB~Wa z(RJ3GZudmHU8)TFw+`N@*_l#V67%1q{@h~68Vil~Oop5D(-RlBujwrg{y6&()4Q!& z1}nMJZq8hMSCaq7v@pJ=z2fgBuB1H^{rY3pxw#W&ZJLpxyz;N3r4~*~fw@NO1U1RGn!C}(AWs>QPHT4fBXY@=f-~X#ifB)0D7xbHg zv~>R&|9*YHZTUS#@5f9tco_Qkd{UP9uD|)7b#S=AuFFj(9Ip=jRDOEr?5V<8iM=lu znDp5>*Mfz8Qj?6gd;1|5&8Sk1ODt^Wm$1hnvY|wnA{9$S4vyd;#t0sT; zkDj?z#3!sc;LWLL?*4$Yeko_(}$h!QvNA(O*hT#3(eg=IpMKOqBiI=V1 ziw}9!by%sYymb(4o_ISt?qI;T8_^f@zg>;hoM)n%_n;Wf)k0S-M@!!L_sH7}VcK9-y@UHFGXPe#XVrQiHZ_}6+1 zHD)lGDzORjbu291*!rMuc}SHP=8_4gy`rO zwp`U5axVhrbZwG%=kfe|;^&XpChK`8zAcW*kq=b6c(E&o^Fl1TUFl$rXBChUToie^w80VZFWqyJ5@|M5@aPsny+5ud!|vl zX`Nv3^)1JpKbcPNxqM#sa@d3H>3erSntJGM>CH~{Qp=+nGA!?mvm&n^tj(;L`fB4X z@5D>IdQmQ`Zk~*uwCr$M?VajiTc^b3Q^YUboxN^iD%afLJ7O*Q*W_M3Yg`l=@$R?n zf!6mdD~#W+`lH2uE?zNi{Xwq?nOA;6_m<6V%2^q@EpM0a)x)y4EPt`ykzcjxEz6d` zHQq(3Y8T3RLWOeNl>OdGES;#;@%EsEOOCLI@@+4X+9jdYN7#}olw+^9?R&D3ZFN7N z%GUSgM-J5MFKkslY;a(Y6wl;|Zx%jGi_}^m@8(psT_Jsg*ZI_&;>J?WKOFggJ-xqq zyX`&x z{l&(zKmU15FW2fMx2xsdADX4vE(q+iO9aTWxgGX0iSI^kMf|llHj*q88>MYDYd~r`-x!Fo$n@!xb%m ze~!QDJ~pfNR(>^j7{>LgdeWyz!P2^^5teD@ODDwsI@ou0;!gdiT`UpzZE|0)OD`1J z8^ithSDnm9y-&YF-d^4+tI50OjMj?-i625tK*ahHf`EjKUYI~#rruL&QS+`HD7Mb@$35CU3t7I@{_UBcPrz{zGkatu{-2YZuREeC9RUOg;Z6DxxI*Lvy@$NKIR#A$OwazAXM6 zV*0c$p4(-L#=cV3BA?XRU)l~fI4+#{?@j$-SHpbOh@}>rb@f%I%@Ixrs!vTS{h*zF z#$zx(iN;}`ZO;HH-b+vgVZt&))XM^z%k##1quj7tvoF(WQazeP(nWIz0 z{Px)e)Uq!I@A!nKrAznyIU{qUaenZh^Qs45uXM|M-FIk){fi}+uG>{lSp4EZ z#C$_$&Hf*2Cl|h|>_|T~*Y}jNXh`t8_io-Nmd)5aP3w-&-7^oJz8Y&>j+B(#XSmv; zf-PC%?6R!uXTPzzhdgS%S!rA*nfO>Pb;JamBreE06;o)Z&q`0e$)P;-fK>>ieU!3hsO-CTbC zrvHc1iE}>xm1tpe$t??Ky!f^&ygHCqdiA#(TVHcI^|`zb`}4x{+0LmijApW5uYUET z%e`ey=Brm(*XD&?@bkQ(yLpOe-G?R0b(2#9UJA@#7`O2G)+yiTOU=1&z2Wa9Nv++x zYVuZnyq{bZ`Rb9lUfZTiGL;9RZi`8LGFn%3X8melE_Qhowf$<@%s|up*QWlRwt;_rV$b>3&nu4;3ZLkI`s3xl z*Ix7F39J%w$xsMde4=*Bh3dW6B^ypC{#CU2!CJmL%TE8F`a-*+84D(tRClICJ(ZL1*}kIl%_ZY2HR`)}RNQGSv}a+@ zo_zbw;uQy-4P0gmPtTl`dp5z}?Lx+y<*Kz#`fB~D!V`olk0uodu9|)L+gFAC)l=kz zW_U$io;J}fuFvC$ec`qJ6@&N&}$dz{^udbFyn_x$H87BUL*f0@O0wzTap_vVgz zF*C?NAjI2Q>QkL-`|cK*XcPZTePb)1WVfHTybb@(wY#$MehsdwV{O&_w)MiK=`uD| zPZmkp7hEfxwEEujlvx_tHFzrIjKr8?I4W^K*+_^0=OVA#}{V{^VSuUP#iM0Zp1lVfL|M$}p? zo_6IL6AKT^hsDOXw#u4Z?Y?JS#q{%Ic{f*oMbE~6y(>80cXhqI)VU(yws7UHiIO}| z+~*iF3w4?=?uas9&U^XDlOwLrejL$T;vwmnq{R9@wBn<5@Y#=H?n^|Chhs<{+@x8G>yWy9`xgT+?oUQEh{+&KlAGs;~N#rY$Pq$p{1T&TGgDsA_E*E}Q z&e%8iZtJ6n{3D%uOJ*Ece4+Yxm8d&MO7MC|E}>d0xfutJzkK-bPv6qb3%)xsv{rp- zH4gVL7q3@%rgNTY+2qGv=2btE?C-vi>dL4OcMw?KSClF?;b)#hiI-qujk?0anCB-8 zBri-Wb||dzOWJVV3VP-6ER^XQBPu5$w|E}ua9s4*d zd&Yj#Y~Pd%9A5(N?3g;oC{kCOjctAPiNt%Wc)CNFEF<|;1Iizpbk;NExwLV8U|!wf zm+x}oxrz~&G8=c?dU?OQ#gzhc1(z0vKJS`#SoDozBmay0En1U9CcZzle&wbZ$Gev@ zzkJzRbF}RTt5}H0eD6PJu3MV&%qyB#5g(h(#WPi;YH!nQyO=d$iCi=5&(1y>oYu4R zv2oz*6V~|?GJAuk&-ksmw{;FinhDY-1Yswyb8D6_D=YQ;gbOBWY`#IwGb&PD-3{@6PhHE0Iil z=EY@x?!DJvx9rXD%iSi`?vK{~D}K~k+`zNpW3-S)n%xVxoj>O0-&&!w(=q*Ur^Bjg z*1mtV5)Z_m>0vWDJ>SH2M$|^BoXWS83>I(X__OC>^{UCXQIqZn6}%69`GUzZxUO*} zzsjY}Z;XD4zA?EgaZG#bwVJ|QuFXq)v#&{)G~Ztl`Rwj5{wZr*`CArTxb@ZW82>e$ zoq3`~V){z$+xFHUy=P!tYueNQQf}|ZmvVazJ8ysRI5k(BRX5>*!S1#9lSBW_ey2Qn z*?fru$0jnau?SKPYCN^;?XFe!+pf&1YqV3-$^UuMH++8Siy8kn{=avH*KP|}erCa? zkfIkeuAG|pL;QANn!pE@59NFNHz#DRxNm+>z5e=dpXq*k&d0ARt$Y<(&=(v0q@6eU z+Fa#W6^*HP{kSGq*v^TYck}1m&r3F~^*g)n<-r-@RjQZXSII66GtmCM_(iqI+VU?p z9E_^(3!Q(SS=&?{GIQ?Ixk;%9BGiIfIf@D*!(toCuQXbpd4KEjM7J#w8&2r#4E#0! z+>DoNr5ZI<&{BJk1k|y@=f4Uk?p_k;r5&JoyM|Bhc`D*5V|O=$;vm?ud93Ryvtm-r!=2& zW%IUcITFXei|Fnps{+cn>Gk&OG#-$9QKO$-g@ zsJ|M&`mC_~6^Z|EzFw%D5_j~0&%xPEo;S8nICVno`FDwbY zxt;x!?%A-2KN01B4><37lxfqHuu3RcF*j!IyIGoF)E3^bnsxEyAK%|q4qZ}rZ#W%X zI5{M~G`(a|TLaUcTPLTMZV=Y55_4GV#(aNL#F>iP*Pjebiuw)+e`)$%CZH%T#OD%ZsW#wj+3RJ*b@qmG{r<#aajoYwPAOOYKh`pI*qG6x!_c{MGFWXJ>)6<+hzj~R_Bl%y9mF3#ufm*9G>L)LM_~+99 zgbRyy+~Cr0S{SwH{sxB7kHQ_lx`G6mcS_|)KIS;D`0lX9wVRjDgjAofVrunU)p%;M zxQfcgiKk{Hgw8*IOZw3%x79N2sro z{Q{A!)Y#Z-AM(ET>wl@6V%XRE({qYimP)kDbhj-}cjo!qUa0Y(nzO?0)?y7)=gxg= z+Z9(Dta}z}wmaHtDxQMdc&1k}T?+h7(T(3m=*&s+sgiOEgL4`1f4r;)Z{{ zG7II*uM0$Yn@*LGo_YFYUP-=Qz|^@%6n7j*k+c4CFRj*VN8S{MmB zm0j4U)7xe{;nkB_{dXnU3?D7NcWCQ}$ZVbc-}Z=fl>Sok(wMqRPXCXk&QjJDXPydX z9lEWcvHus1!X*G+(l9|9*xy>w7rUwDeZ7vnDS~ z*bf!YN!Evd(bEN}C&L;0a zq|cghAk30G{pIY7yK)7NI0|ofc=*L}+mk6Bs+NnU=*eGt|JL$5pQhKw*UxfYirmWI z6^Z?Pqii?()z72yo=F!cTrU?=7b?q`KEXQq(&K_A5zF9|#H(eiey=#Ju*zL{@AP?J zWv;$3IQU3a+DO#1|4Z_*GcB4ERozVX*NP#{0kv2Krhvc{)yckqs8)M z*@DUE{g#MMoqE3ISl;F+{V(o?B{PrC?pv0_eRSWFx`t(jMAdDn2W>~z zd93?y$K{($+I4gar{R|VH~d>9ju`Sq`}Lblr6R`=mvNzWIOW*@}7`YW(;4al@oFlh603e{i|$IV~h>+bpIe;q32* zZ|({^nl;=DN&Yx9(5$Vr?Dx%GLN&`zZeqSQhbh8YSnl`<$xQ#Z!e`H~-S)1m^73ar z=_Lzy25vvbxajGl2hW-UO!78L%y4+7G0$I3Nx+-CYAs93v4~}Uxt9Nnjc@kO$WV^I zefQY?=ug{kT>j|7eOg)l?1^(fXGwfcye*`p5SXdEBjJJh>Z5XSU`sn-qg z!y4Q7_osUM-ajvyFI=6%H)(OTLc#CtHE-NjYAJ>&mAq5=)%mSc@|VhUk>7R`w;tXa zeCp!~le$MfTD6ZB3KcE$s?e=`v;5!w39K{MTr6nIJ9c#pFC z=}hUW!!dt1M(qz@e%;&MPF^Q*+GMfaUt?Y@dLC+L5?Z|LK+DRRGhEmUBz>=jt~WXQ zEKz>t9`*k#-QLs)Ixh{+lr%Na>Tt`L#B_AyN4@)d9IV5(T3=M(wrif(1Dm+a)0N+L zb^rA`5%;hC?Vi_B%@ToyMj!2$1ZOdJJI&!)O^OmI-ExyicS}y%$()T$|frfT`pYAN5>;Az`y#K@3 z&(rUJ-#_y?=ktzd?}MgvipOuAaqbCA+BVsj-M>SxZ@qry+`UhqtP2jkPu%z8mgU6< zzpC!m$3L0s`$_)&v|`ci%Hk~kVW;>vn<-p7n`LW#K`^I-jWcTX?V$S&E_}b3C3RR= zmd~16-EdI%$(MzP3<`ss=h?4Y{MxhWhNjG~ZMPn)TkvsnT`Hg5K9%#Q;WbSeN3YhN zkN@^>ne}0(ue*TRxy0X!tM}R3U0m(@V)N~?o8D!I`z}p9%(>BWhGpOzVK2XP|CjP? zUhZ*cjTuX_w(r(Edh0Zwt=+PMXUlT#OHz@A){nJHcNuCf>=M5H#r<{@@4S8fZB3^G zB=h}~y3}`bdEf1kWb@<}HSv7#H{%TRsjL;kQ^GF_Rd;TBr!B*6Qs#XBLYC>(A~j3l zOG>pf4FUbB8=Ti-+)?IECM*xNiDw%b#)mm(~}KjoXj6 zWCqu@2Hh+&>|VDinMTy2_T-o$-z&DJ7i8yUfOo5Kx1wFk^8e(y?dCdacPk( zhrq1jmzK-@=2~5~_mAIO_gL@A(J$YoiYyg470dA__gdH#yIlo|wK_}9|0PxZ_j;nP zS6BV@*W2pK!tIBqzU=uwFHY3nXW9RQ)3owCx9{bssQPt1Jp4|OhuyD*1rL{>oO*TL zjL`3<;rn`y=5F6}{8q;$5mEhBLE^D{SNwXmF|OvBZt$r^Yj@@SJo5X`Ri6!pdf#rS zOlwtS(ipI?4J+9;r*8zKeRax8ai2+3#+qyY%MG`X{_F zfMLu3kmpOa#3UcB+CAH4LDc%Hdlw_lP0PJ+YW{j((YOn@(ve;Tc@b=d|tJ_$n1uthyL-OHdkd6j5?S9Ww@Mgy20R< z(vwxsxhlldWR~f-2E{L(CKM;TRLpMu_U(Ktw|<{yy&&vL*j@)+1^H&z@5=J4*V;{w z(&!2edT7g@<@&iNYP#fv8K*N#T-Hw4jlQ$sckM#;MH+woe@@fMGoJJ{Y2y9j+v}d^ z^Rw|pG%wz1w#r0rRblR|ZEJV`PEE@0Nr(#HTE1qQfCldhb3IRu+&@*GOS~&&-+p`H zU;6uA^s^1O7jM;{q9P&U_mX?Hsn?@NJ5@OaI}(_uY@Fg~x7x!qK&D{EGQ0j&72m&q z{~5Jl#=6U)S4_V)^%YHM;W4kepJ{y{*Z9uq*`arBudP^bCSC^A(#eEP23t&-r*z+ef*n z>os40GIHG~=(xo}#>IelMZDw1?eFgy@P7OJwg>*Htsux8Jn*tIXv6)I9L<%gVnuLLx6!G8T2*J;)?{Z0&Tt zBahU0S%i5DJh=PrG0NLLWUnb`*SU4BJ@>Dul_JMiU6ufex?33@e6wy!y*#hN@boU% zmez(H?63KMDLHoAu5-|S`=)Wh9lh%3d~J|0bsAr?BWrCU(9Mq(s*p~QDy19i{2}@T$&ENL+K*0hZ z*~7svl@l`VZz=!dIfXsxdEkEcoJ-lK6Q^!)?<~AoytTUN-GV2=LcJT=-S@5MKFQkS zYUCAqdEKYHEbXN$zfQVysd-XqWWK6(?zT1g`LiRLCromF+Q;dw%iEN1=s0`Zx?O*k z>C3I+dndJO_P0kjWY}JAI?Z-HFJ`WPKnZh>X2-wGlbJc&&6XwpmfAnn{N53FhEq~s z_t{J-xWWBDSBQ^6)#F(1+Rn&Bznje%ql#us_$1=3x=LvY`$56AJ-1|q=FC`{`!r3B z-C}1xm)NYdg*(#OSNpM@J~z>54wqTADo+6W^yu?a3G)~9H`JYHku1AWI#EBOZ&JsK zZv8pi-t?SZTVN~c;{3_r@!cKPZc~mhYXyZ!VbepDyz=a@}TV-QcEJ%yB>X zXl?2BYqiFY-*0%>*(c4tcQbEhX5#<%ju%$TzTTBKEks0Bro^e(W%8-o$?qRXOt%V) zo@0KkW7S*!6URSub${No;8lvFEyI>m@e-`@M_KuIt!eUlzrX(b^vj}0c6Q%8yx`~u zMe}{%lfW*}v;7LM49P7i^a0`Yw2RFMT@ap9^|Hb{pk2zu$0u zr7vZywsHsnap_GW0omrN~DW!pBPdm z@$A{YSFg{i{hnqOdt*+>(lhKEY*$~%UAyyMvBAo_?!Pt4Oup`Xd3|MgubA|b%ZGif z*>}7YXsFK0Kc{`IVrxwK<}dS-R-3)m>v+BJ!-35|w%!eSw{hkCqR2y=tDMwy81~gi zT-k5__xYC_8{0cBC2fn#@t1FEd-3CCva}yF-q z{m($pc4Dvlxx8mHMLbF^{dgW^yg&C);nd4ThUv?f#rd86=p+4R=E{YuoLc70{P#%R za&h`k4cSAIKQ(w{PAk9Hn18j~QCrY^hr;*&*OZrSUitT4kp{Q_nkKpS{~wBe9EoXr zzi6@u$LwwYz29ZXe4J8Hwtp$Nww}AXcu)6(^CynaHgf4KQ90%0XRvNIbJ@%tnr|h0 zg)clbs(Qn*q;ie*w3Q-ZvL~6uUQfbk4t2^w?u? zfBG^ZpYu-D+gn^VMfayHu>O7Y?9SQ;_ty2qwJUDl;v%EpQhTiCMovb@yacandK+{F01`M zheaif{lvUl-@X#Q^B)qP885JXnY{B==cO%@ZOO}S2Nye)9NocitfY)^Rvl^)m)-xtSYfjJ?xa7c((5R z?TJaz`#yT#mTfQLJ}IeqW`U^RCAnWKg32N{MDcalg!4IF+q*cV;t03(9iA8LVm%WJ zq`plN5k35LPSSj>06zUDHuq!`ty6aEEdAa;d9-SQO)KLe>$+q0W=_p#v*$I2FVXII z+ucy>8xS^mUxYTtzA3x>wU5WeN^-Uf-&((AD&L{=a`{vGFMe6R$GP^I?uvy!HctMp zes-pI$F}ZMbNMfQ3{md)+tS)sxYSp0U%XpIvcjP$U7yeBb^W=#YLThLzIU&ji+_}F zw-GzHHRNXSsl*o&GHDz3Ppg-a|6^Rff6dS7#Z&)A8))&0i64x+lQ_j?C0nxEWwoW} z)6d-GSZt}TY~uJ*%)xfw!yM+A%#IhiKFj=nSqAc7TeFz$-clPsjq+%X6;HJt!WZSQ zYG7`yS?fUVflGkz{y^FIM51F#9I{e?>q1e{phh#^^_uXt9{GxNC*fQ#}*|r|? zsO0!~-`I)QHGOLDdybFNmRB;~a47AQT2!ri#D1UXqJs`cK5RO*ez)D`FtOEXf-#Ra zep9=>(_~p*5SL+u#`u5jv4D);@k`qX~e$Z`RlZw_yLeeZm0d~nI+a?{6! za+kXle!T1CHE2Ft>mIgL=aTDvKHpo}=k6GnZ}KTO%`vUwtRbdRpEM7RD~yVZT`U$)#<>b~z7(x%<^c<~wz*Py8gNaMI=a*)l2j&q{wW`1ba0 zVa{&mRsrX8w{Eu!rf8D%9sD0 z&&#(6iuv=6P1+aAGP=E-@yE=`wWE8xvDX%pjJ1Cn)?YK*bwxPxOSF5h=A!?{ zy8hIhTH)gRmecjD__a3vPVKve-zRMI)lfFQQDXbewzPfimUh;tX-9*<-}xfc6xE?N z=h~n2gP{k)mj12IXf#M`+9qF<+W6yOeRYzqNRG}!M%x;v%+LzMjrD$Y2gJHQr|JCP z6!f;G_Q!dVFP7I&Fz;Q^TWEI5_UB=@XC*oE(l=f5B;+0%sYzc__f9>ZTe?HRQ>Z5M z{$xJ?O$7nxyGvqP!?Y?y{PZt1iX{BxjX1b#wU&(RLjik-Q=;Ex?OWI7T|7VQ?kzdK zUYn^gOP(Fu>Mot%|2ysMewF+4m+2NioGX_*dpX{7sg2@PT9)3 zPv1^>)`8=$$7`Qyt~Zg=TJQUEn*8?ImM>YyGX)$wsy${tvkcFxO7Yk2@LYtlaR%;^19k-b^p6=ai3pI4S2Jwujb&5?yB~ebvZXe zb#CpE(ljQHiD`S>UC!TlZ#utb)or`-CGB75m~4ug^sPT&#o?B}+dXG8 z-910~+P9aQeZRg&s5`MpE;u7xx%>9jw_O%-pW?Z$Pn&b6aG&kLEe73ZZ_Mdm`~7fF z_4`>af4ko7yjdPHd4t4j%l{Tfud8!>ef=f&b&$2~{~cEn>^G+|uE<#(le<&o2gkX^ z$p%ME%EWt<)-RfM^#G@~Z`Hk3K{M+cg$`br&12EnF=>mV7^^~z1CRaVx}}_I-+y$Z z887?tQ)M0V*2pH_3l{b=UxjnH&oHm@deL~{hF^E&Z1NJ%$rkzD3PoKT_+`zw)-11C@Vef1Tk_;-Mjdw< zXWmq~o3eu0czcNP*Q-7yn;uL%qAq#1gh`=gTGgBNoYUWgiY_c@FucmnE_cOC)kIpK z;o20n=xeWgvJ9UyME09IzOgLt%ullQWi>k}llw}!{dmY5?zFohm0E?7Va5VCyE$1` zJ1(q$>ipt&()_KJ`%k~#tZX3a`!Lwt(>YkMf8Ukg$&=6Rv(fp!u<$}4_lKJ$B@Nnq zoVgDwJjERKPd?K1S~6+P7WSKrbqa28Bj+VtwOSQ%^7Ogjy66{2*w?E`A3G7*z1?x| zfv!C#OmCf&w3@O%!Qtf+9@i|}yKhVgSz{npQgwY} z4qxi>DA4|9)q=Qk-kO-sLS5Hi!z@tv?^feErvz?@w1wEWRqMTBbE?M~%BfxIUoT+NfCk6cv)?JGVzrRi4T9<{n{Ef}2VK=5fN!1lKWShd% z&zoxaMpOOB)ut)?mMNBh$dx&ta*OTa2BW3tP11v0%ta&Kz0cUY>p6>YAJ4Y8xAk+s z6;#YvRmOa&sc*ii=(6?sudOHiw}~u!YkF<3tsX}*Z^UQ$9G(*sx8@iA|N6yoS!EZy zwD*$rHJx|2zp($AaAkk=IrEg8)hD+cn$sSj%WS@Xs?Wm7*Izu&clqzUN;0(eldu_A zYR%BM0@;teXlhDEsEM5UDqft#7die&PSeGAMx zW-Nc=&&&hgbNg!b_nl$!i_i^cnYw&mbEb5gr)}$js}-7Ox!rF5aF~3(L@0T;<>W)# zRNeEWm>Pe|zrDKY_KqSK!83XL4taA)Xs2x6ebUXKo9EqJg>DANq?E@qS#`JO9;|Ym zlJ@4eWaJb3Pwke=S9wmHG*>Wh(o~I2@>gR+p9@A@t$#Ch>q=(68K;vK+)NbKx^0O_ z*uA~*uG^};4qKNWU)fy1*ta+$xk>e!$?tgrJ}Ztobp}4EcyNsE?Ifopy9(zs$LkLH zJ&_Im_*g3DWcC8V856=@W-y)(F#fbXQa^=>r?;SI&k@;+?+P1RI(+FMtCztBIu>*k63)qc-I-^usS&vtbCRJ{10 z-hacwl>gsCPb~B4u2%6`AekNTU&QC<;nPQ08&_+|l$LCcJ;S;nr9^#}i>t=Fj-Y?* zK7_QsS;(%!P;=su@w>9SI_zH^JEH72SZRsG^;Xlj3u+{U?{nQoHZ}cfH*>1hte1e|;v?VTcMYdS)zxULk z#LBse@olyIxebpNXRQdjz*N*yzxKvtVQ#^OJ~smbC0 zzY`6syHtK2_`OKRZdcr$ufKd2U3Xo-=IW_ehB>ick3ZOKf2mQ_R!wu&Ydcq~O5JG< z!e9I~dasXP>%l=o`!58cYcHru(3dY#?`Y*Lnf zvs&w%Qq(lJ%*wh8rW{$8Q+W@(YSnFHUA?yIv>5Z`u++Ixp>jtJs$Q>)I2&5}EMfDf zxA$7snoc;rc;)t+;WsuMc>UMA#=&pP+auqy)B-&&aOkfNWvT2gX7x7p{@b+4OStHj zz*^32C60oH`)_Qm{u{yDBW(~fTh!ZeP4Dc`i!ze}GyC`zqh*(Hb#zDWK2&pZ*+LzU zXA>T8Id*E%tIdHMvV=FB{>Xac>rLkky$?4X&<&aXVCm8e8f>7w6o2jCh4VKR z4!kowuf+VE?ZINXBia_vR9RJR7%X-6^`ex$Le{gjVmPpLDC`pVW*{6^4sqG;Qq1E#8E2f56ko^Fp|<|>r%NIWn!B|k&N$D$-n#7F;|y~h4&&J? z-mMiXxZr51b2R(+Z0I9+2;S-tnWu|?@VUyFnN>#Hjc%E-NxWBoh(W8(5-Cw10X ztkPs)x^!rtaN6vwNnT6EbhW1NZ27Qbh2IaBC;pMYZMqBf-guleQ8;`eW71jK2Nk*z{N{^) zPxCo9LF|aI%(FwYmvaB8xW45S|C(@9-)+fubB*gG%~u~?bG5ZqI!MGQE5<nqx9|_sF?bpX?b$WKmo`q`L3x65>HDFV0zjAQR(uego*3@TC`zU^H0h_|yX^kpZ zRQ|pA?ieo?wAg53tW1&CY=JlLk3~D^J=ylg?O$$?LyBn9wrRy2d5iKmGPR2y-V9s7 zpYQ(mSEKtrHihc&D~Fw=rYa?UjE`(s=J0c3Oi#O9P~U^O`r`hN6xSNAif~zB(v)+p zAwc8E8m9|^ueEPBEOAv>bK>PpFX5jGTwVzqBjvd>9c4|UKTI&2Fy+>_4Y#!XHr9FF zn7>oR+3){$u}^+q6D1vrxBoQTnbyetesaLR{4)Qwe#^IJq!b3dPMGx}Ro->|qMpxF zDstqnn@&@{n>$hL%uL;FPhuWVs)@KG`)!ez?Cjo(9?`0+MQeQQTazj_8=YSDp}9*@ z*D`C}(wzH+rscAe+}Wk}>G@A7TO@GE)$c&&KG&mM7yd^jwge@(Rz-RL5Ph58;ywHA za;3SO?>}C==0JqpY?V8_b7tSz*7a)!%Vk}*-p~)lp98RP7BTpk$?Lr>2Ii;aM12qQ;x7_oed0S zy_OL4k+aIQ;iBxJ$L9jX4qSRtVB2Sx&6oS;Oy=VEX9X5pZcDql^y_=eV~T1oH0{JJ z4jy>3u3@J97k;lbH{X7Jwnyb>-1YTrw$r%6X76=JKs zs`6T?E`0uX$8h&H{>;S+6+3DqBNPOSj&16k6rAGzY)^l$ooa(2Q;N^ped{*s{&Kgw zP!S|k+%c7D)0dV>o|!dFap@U9uWs7R;-_3G`CU^(^}XsMWo2%b>2(Y@-ZHLjo6d0N z$Sme6Zr9~&^ES^fn>;C3EWCZWyNKQMA1=j9VQ8{#PzdI9Qh=a|5`(uEk&iTOnUZmzxVUv z81px4yj{8=Cp+$K2K(Wn_Yn-PCwI4P{c!Vd-sVRP2M_q364IT$`mSWq>UHdK-76P+ z>?%uTnD?l4^OZE?Ie|~?6{>H0$W~aau&!LSIn~R&{WD{omq3Wa<(p1|6UE*La-TFX z&WNph)t$F8Ub~6^|6@~blb|Ut9M(my+BC=e$PLS7y-gzJiq>wjb_;&J)vIF;*b=X{ z$IpAC^53-7w9R*pru|z~e^L5VqxgzeUB%;R>YI*SDtz}S=du*ip0eZ(L3`NzHfcM^K72lR#C=nJzekJ zYz}*hFa8?vE>^j=Ymw2yC#&Clc9NT!+!gOVFHWxIdhOgSPxmZ4Tki*HkE#!CoEP`d zIMgTRTxrYse|O%@3cYhYHfqJWy12*j%fGJ+cF1r}{E`=W<-)a#Nb5|_3*H!ix@wpd$A{^6eoD>gp3_)X5} zjJVMHxWaRF#{wp$maba9FU2zJ(N*aN#v>=^9_%WxD@eMe-yrp+bD`5;@wHuN3uZrN zW_WaZkDS#m`J;S~Ty3q*x$ect{mHlgZN9oA>qyd}2O?5ec2AzQq9*qo%kx~et&7>W z6(u;^xaA#lZ<{fbjYDeLT80z5aE! zrg5pL&ozy{WR9%9CXdEr3HyC)bahmV4!t;-8fK$9S?0*SnbYD$?BTzqz(;;P$fdxxQY z>B*2)M->WgG?eZ$?a)$qs&HdHbCOZR3CG_Nb<)4zTI}{p^@sPgWu!- zTK>E$6?AL+t=1X0<*mA>%+4=(AuGik%AvQlyE`$v zXa+%{3&K^LMVc=Ef9_qvbgbvx+p~vO%?w?bQ^A$S6L_#R$VhLd*1r51nIB?f;y%_M zdb9h>_qWA$rTUtY1-2I#9hTq>y_lUt5Oo?zCC|ILd;Ok$Hpq+=*pA-W<3|0WkrDP-TaYHOeMzuHnMgZf#or{|Y1PZxP8#o*ld<>^J{ zu21*0Cq6&heD^N?)jIL8E2(0H+*pR>+SyC)|Kq67xz?eHUIPB`?_k$S<5Z{ zpFR8fZz;e1y?gKS>`MOsdUo>b+pqg~^Y6Z0;*oJK|AWr6M;9WWbKL6L5Nch1?~X_8 zY5#Z=zAt}$vR~f#|6##}n-$U@wsE^pU&gquEG&U<5r4*n6#lFrW?}7$^}($biE)>W z^7Q80z3J1q=gT%n*NI)O-umIC12-C%-kx8wU0>fegn8$+%9eSn9!~gk*|^=X=M7`% z7T;ptGYmOZZztZ}xbO?h!GL6i3kQp=;tT|Q4xP1>Z<8zzpKh(Sb#B_5VC(*Ou8U6< z3I9Eq5Ob;a*3srWC40QSx_vg-aq?7Ee5g%^O6!Zh@@?;Pw-;RdeTd0uCaX*1H13Sz zwu{ipalzJK^!n?J-fG=1esFEz{o_6&jv&k=18) z#w`J#?fUOm-C2D;m*pXUcT!a38}GACRkJdt?P^O|BQ|0E#>4Mdm#p&7znSPgf5MB$ zUz9xla(;_cvC})vIJx`LBqpJVK)utqbT^$j_UiEz#VO4PU&;N9_TR)hdBe6B>o+{# z^J+m450Ba8$E$dz`2TqHQM6ro_04J>rl=s>*b~KWpEeq7S*#-O!FKt|!?T@w);@*1 z_ncPSwdB1@=!3c+Aywp{x<3{6!{Zjq=s=(wAo$PM-E=8+WJJ0nhCkTlVFA z{2(c14n!RLSE(7b_?XLmh3Q!{z2r3}pPF>)Rk<{aLywI4v@E693LYn>eYOl; z!w+6eH zv3Q{0rYSBV=`&oW2={TMG6sjsk z*(a}FI-ODQZDH!%Jvl*kQ#k@|Y!l==*(fb~W}$iQ5&y&UqQkfSO8lO1)vv`tmmzzj z>zb~~3>no7_iY~~-CV-ixY3GhY4NMsoxuX>GF8i;b1SW{*Er0xL`VE}j&+SpblF^< zTP^W{vb;YYE?*EK+aMv97MfDS$Z%XS$1y;@`GLThi2}1Wa4lTx7;!m*NwG$h!?p34 z%aXLnV56$4b+;GpZjx?eFyPbXl^MEt>DiIVGl9ZD5st1k2=nSahK+u&f@5))jo zZ$a9^1)7U&-EzGA6S7**3WiiKl4-haGV8Q$pg@J2@d<10O0%^*4|oM+@@ChBPHuAE zEb$;!M8D}t?N-?&md7*K%gOG&sSwjHcT+^XwkpP;^+@k78Sz~@-hy`~DIWOBQ^qQr z>2RU5$umheqiFtZhY3Bm($zPW-F)>}((!12&71?l1+fnb`Bajwe!a-DuFUUbIcwX# zSJi=kEd|;-RA0*W9XsZ&cQ3pxWX6w`wcWSwY42Tq+P-d2ePP|l(~teqe?I$nl>gHU z$M^d6`*v0Qc_T8bVfOpo(|7H(s{e8M==uHs%Iap?Fa;mdu(afs*vi)B5!9)Ex_0s& z>$iQirLR7OfB%1Wk>YhDvpXkWOfXz8wa8-suJ8XDx-GS~bEW2`6qgjGCg$>{=B0qv zMH-rsv$WJ)!9W4DkQA}B)B-9(#igYnOF&KppTtS!^DfOmt3bg{Ca|7V-#yq!!4$HT z7OXU&D8C@Js3bGBSi#0dLEqQeP{Gg=ZW2fdEM!4J0(C!p>8YWCxj9j5PkX{o7Ck;8 z%5(hAuV?lT1WPc^fKiN!(rT}KbU3l>w?*;o7P z&-MCMM?ZgfId8J@o50794}ZLz93=nCZp-6O_g?92^^AWz`|3ASJF$~mS8gxkJuDli z(Jvml`;mcntx=v+&Fjg#vXAepwCeG_UbOO%-(4f`YjYAd@cd3+>Gg`WPW4afnVwCw1bN?^ZIz_JKcSI=zx3g&((R? zw}@V=kU8ji>fkOlxqIizZKR!Y64Uwr?<}y~8-1i-^6&Q< zYi4hVUHUO+_MfibeVZQJ`f27q)5|Y=SP{1=D{=EdD`xXBw%ffVn>jso zMrd#HjkoUWf?W5=sF&5~75=K{54ARXef@`R|G|eFe8Se}Zq0u6(qYZSyP}JWUN^Px z-&6hZ(6MTJwf2RXlHEOKAvcacH^@71^<&-X7inVp30apP>vb)=es!8Kx62~_+poT7 zof4`kIeFtvn)I8JxOrkrw~5d5tJ`73aazR2GV;ioGa~D5Ua*vrN;!JqK|0&xQe)QE zhi5;(XMei%mYmZa#+N%^@hy%dbe}&xS$O%%>|%j{bs8ImXq08BwIx8Rl6Ye{D z#pg7SFd%L?LRt}yxc8&Z0W88x4RT|id>>r?fVdX zH8~?uBp`x8{C834+3#wP^orN0u=<=VDL>b%IlJS4TBgzurNmXC!kx^OJMV`Z`}{t+ z;RM%4FUEIT2d8i?Kh3*l;p)7`Ux_oVBO+}%H)TxEc#>FU_T+S;(G@YKMqi1?%|bB? z(`CHBWnWsNm}(l)!2L@2tLP(lWsS55$HONorfY1R>!WJ3aMkVYI)PHrXY5XXh+4f9T?1`B`3asnMVNX;=PDStM!vXj0nT1Te1m4v@R{G3~yI=IzWznSGTO0GP)jqILpVi-Tr>^{M z_4KUw>S;R)pG1Gxo)Z(mkr@;e_=A&GO$cr@WNrPrYvt^n>-@`@&#noauDN-CqRH#io)s~&lZvv%UhV%jcaHk5XEjNz`d@25 z9}4)C%%W8ntX{Og{hpED`SqpORw=p`?RNezV$oFPw8O{I?)^5=h5T0+O-^>6RH(t; z=ib;Q#M!=+t6PiDYa)a4YIg>Ijv$8fMV~InddPK|)~>0tWY23&*>(Qo_x|{4tf#-| z&3m8EGHc2&hf7K~8Lb!+eRz9ByZ8NbyU}^;*-XBdeTQmhHD$ecq^@n{eI-Qcf0odO zInO55uGn|dTSsuok?2y*MP;GF8yC*ab(#}0&Hw9`m2C=rGk)6fefMta5V;*B=+i2i z#@9dHcKR&QryEl)s+}#C4mVljb83bZQ@?oc>XxM?pQ>dKWp(^J^U_>*pyOWd79pJ zPI5dS4>I6aI#u$rtig zZCmz!L!X2Ghk|L$Oag9uwlPUOY%%$?+^;S-)ui&+j1~6t8yU+3qi-#Fd#pfcnz$L~ z|4oS!v!^SF>NOQfFAw?qd6Ixo+PA(>e^aLXSbO5R(lddg2A@6YUyQln z`$BGQ+y%+jGWjVn44q?18kGV<3!_{Q@4UVEtKgJ{UtUE8?my-$ znx~=He@Oe<1dr!$gxOs0U$}R4E<=(23_p_ zMdGlFKa;HFZiiPl?<%}jDBE_{ye@G1-A13(`tQclJ!@CwxK8*Nw0E9&=e1tryWYx6 zW^zP+jNEzNs=GI3+DF@k=8xKptNg_L&MO~|n=Y=my7s4_s;Ksj#gviy_~c zeVjL0@lvJM$yI5K9ID(l=Gc7ft(>T-^uy6=MURC0G{vLL7gY?M3BH zCBOPRqi0v%NuBQM;Le|Yuk%js!hDya>t54OaP2M?*c2W4RggW?BSzuZp#_(=bUtD5 z{&&IAK{fSBpeHT{l@7k-{&WuY~4FL))lI} z6OL^7Ftgh*bk05x(L&)%m*T8nE;*3v79qjs@4Q(k;!MQ%c;Uoo$0b>HmS(#Ru3RLIvgil`!)^DEZ50 zld+Ti$)knxM_%rU>+HVvfAOBIUANu(9-I!{-{k(nR{BuQd6~Cg)$~tZR^4s>RxU$u z+Dui~)+IXo|9)LL@1W1(olA1!b2dh>NHxD(^=i$6!zL4t<`llrnqzY9hbZ6o8G9wQ zR&3^;w$Xob+>JL=4SJ5xi42`r_C@>4QvFr3yKdjD)7kc*XiALyyZQX>lkyhKINIxZ zAz8HJ#KiPF=b9c1Z_;eKxoM5MLhZq)ML&3-eEL%G+H+~&mw26QPC3av$9Fxu$i9i) z`(RI4a138-{;6*-cE8o@mw6er^UJa~GklG&t6uJVyL@wRi5LI*-!;4?PiF`^JHK5c zy6M3h?eN7yn!A?d{benA_3Z1b%2kU(G;-esgg$RQH(5x)NLwg?cQt?ZrdNL)neV-c zTW9-p-lka#9E4hLuGaIdanEgKv@a`keCoK>1?|~! zE59}O@IK|beK+flPwqW-kN5F%fBCv!?^sxE@yQ^{z3lg4ldr3)dOuC(EPsELVP0Uc zNK;LwxYSJV+Y-@NuKhgmZ?T@7B;TRz9p=+crcAcCeWUtI<$m^Ow|WvD9#mP` z>N`y#$Znp;&%b$pzGU|9<(gSLclkpV5gxf$_STd7?^_AE&p7q871l&67oAYm6521?%W5l}^5jlyB|LvMC;6uCl&7+~>>HP?{`B_8h9#4gg)C!o zlVX^ZH#pVHe=dJA^YqCop3I-0gY8<47nXbJTb`G8W&A7KS@Z4qZ`I7oZ+CP)et2|4 z_Sl*aT!*&b&pqAm^!@eL)9bz!PVQ7$%Er3qq)*kNoPoR}u%wQ&f(5N&e2m=mM)a+=eeMYpE&|1P{EX5S(tbK3uw+OnA2 zM?|*1{PDGO+R=COj_jYh(U~D~(nCuf)s46HM)1A|P znenDHTP|grB2@-CaZbpy5oW8CLE_bZ05x_L}#Xs$P`{ky41`nzzPN!!vS;+{0zf=9f$LPAgoRv`k^)hWE=3 zK7GnjSRW^NPmt}sw5Z|-<(WUPYajBSE4DX0Mc`0R+~-A$E~m0gGhdsX5+J}eQ^HH@ zj$Q7Bu$`gad^$%S**y1YcZ#mQ^!{?iYyo!NE|K%KA9oZVb{EyRy(4-3}~h!>e7?jewnjgqkN~*3zoXy)AYPQX;1G?G81w4`efYMClMKW`M$}zFD_4~)au?; zUwU3AZmqAA#G{#^9QC)&pNbitFWPM9%`|Vn(nUuF-N|uDD`h=GcJ4?uw7v4oe_k4Y z{HnB7ye_#h{~YU|{+@a@<&#bB3%9O+Cq7PNaZg|UgX!SO-3PApTg)%Ay!6}t_+P#F z4L{5G%IM1NiZM5}eI2=L)2bKC)|G9lqHJB@OyH94)<=c+k8oz#haZNo`ZnJP*xqe9`{6s(YUHrJrKj3%wls1i#KHEa`u=Ki~HrJ72`{ zZTTNxZ&Z*o?0=Mn^EAk?*6(8uTN^JFi79G`l z*<*)7PdpLXw+-{z_-X1{y-`PV$Bd8)R1m+KkEPQEqg zuBOJs3u0a;8>g{6saWgTlks>#%>A`x`cuqaF1pSp)|@f*Hs{R9cJ9lS;gikFq@$9T zvboD;u{Y1=5>el(wQx$C<^>kn(ox1lp%c))8ck908+oAAnan5qX>)&1qpHsSja&bk7TjQ*} z)3Z-)dZS?fzpC`}=Wma9MD?!b-(9`p(&NIy;@^{__Wb`4oabng{@$ao`iamlbG?7P zi9f}qKJWkWqBm}j&YMSNh2eG%3od@x&)RJ1`i{0&qr$((257#TV~yr zp3hONAmA6bTdic4{ zc-;h*Yu5`vx$advUr8Azkt#2h$nWPRY z@}6Ve%y_0DS@Pv>(Zs&yCNDqN8N#2+i$Pi(G~5<3^)}`n?W)o~!1E>}&_Jz0a+$c4 zMeVcqvHH?Gn9ex75-kmDkUU|r=^ST*+ae#+bRUOgmWth?Q`!vNmDM|sTo!nC;PzsW zS3i^m=CjUVOuzm~OEi&h&Rs7*SE=?z?>*gCa}+;#<7SfQJfpcmkAH*Wna0iRpvZXe zX4A7a1NL>fPfE2eS$ODpUIQ7nHPx0kvF|Or_Po7{XBx9l8|QEoZ`gQh`#phY2euyd z2wPypv+2Zw=c2}kWLj%xvMg6R)0nPZIk(GzeWpFgZ_M%KlY#}GCEVu$Q<`3rf+rqx zjN{DurzVluXXiPm$KbfaYfy+W$6x;xCz{At19IvN=J@ZAc1j(ZbLIHtS=yH@r1sf$ zRGYR~?(zpY^7!{=q3>B7#TzcWfvuYN_Q|!diN_3Y1U2sncb>8Mx1y(?>kQ`eVk_qg zK0B}(5*|6~??VNjxukG_JiCGYRPR>B-egge5Ktohqne$^QT*U-vnVJc@5!lv{INZ{ za($P9x>A;hpR3ey-n~EVZ$IrzJ;})uSRZy#d&S}ZoB3uIADetLH~Tl2hlWx`a%RbI zu>cz_<%^qtO?s^G;Hg;Ei9)4UYpiC=sK?4aS3K@`p}O+>bQ$(Q`KvddSaAGaQ=I$B zN_9ckDGPl|zDY6HKTmqBaO&x{vJ-_9p8C!8?Q7QIx4N#jK6v8O&e_YI`yS8NGC$+o zCmiSs(te`IcD24G-=;mUs?03?Tt%mD{y6DzNl0MqdA0S;cFWvnzE(Z%crU%w%+jxB z*PT8-OTJHWc~b2%%NJdG6*F6gy|I36<>c#*@{hl)+4sc4qbByVcVF|7>mXAUK6YEp zmSOMI-@e$n@AAdjuPkQgs4twna??ELzGjo@w{IyP?_9CyRZh{In$nr=GVGagu8|KU zPJCKtoLeN5@^kAW-#GSq?@OoUi)2zN#ZnuSRYC%0zEnMaa>W9Wrmj=VSKoYM;qhDT z6w`Xa312Urkt>?ha7)8@?-Pp?zgC=6JMMT*JW$MnZBpE|-3JYCU2T*rn$uSoe0|f& z*DgJ?<{}u=4RoB^z8W;Hd@|QSLQ6$-1<}cLEmfV#B{+jH}(a6f@K#NMP_Eh zI543FpOcSsSbA{ZNxT`^A}gb%U#xq`Z;rWkSETo8Om3Mw@!czlME3afYdb+!ELfG?B9r3w_L0sZzlufS$2qJQGfyzpKg4In z5c^r_O^=uZNT(c#{IYy;chYeVOOC!PMcWVt6>$$^XwUJx`)nXuv{@bbS{JSis2!@>O))8l;126U$Mx? z!OiVl@xhn|UX`#bcT5lYxv_>G=ddnSle2cak=Z}x3hN1tcb=Q#m~$#Z{0-F-lI@DSf5+m*>JGIuHtUtKJj$bM4p=>xq(elDt0?nbuAs#Jq)PrbM4 zhT$Q;f1;%_%1;&~zuYy?^@d~C>ngECbz8lYyY&z81x0@^5G>>B+iT@^!!hf$dgcQO z!TO@c@I9Q?a(`3BL00Che=L#6Zd(tw|LdAQ!LnDutE}8^y!@-B0L4sE0kbZ(Vj=%iK>E z;Iwjde~FCp8->lA@7?N|AbfZ7>N8t8tREJ}%7O%!X5Vj-O(_H0{$@?FWa9FL?E%L* ztaq@#>Ma#4n&i$anl4zz^vk=nXG3#NxhKe^+p9s|*`_}CG>0|s+BPe<6DQwwR)vWt zvNP&$zu*=p+^bUc`r=AVLfv!(; zbPoBsi(dUIp~znA({FTL>5ans%~ozVI{l~LzNq#_;r-KP8#%2-r-nT@I>g8H9~3?p zj$7ES?%vRRIJw<$e02J4hH#lxRj};w6NN(m!cuK#ZvdA~YHwUZ z0!w=~OkS^7EL=9>S?Cnb8xGUT=bq%SKJh90sN0E;CyHJ^HBV%ZoaZ{Tp|^!g%UBnd zK1HYchbOnlE~ynxWin#g6gTUp?+wlsy+)Un-YC2VhsZVYK(z#BPyN@X2i$gBUGTl} z@`ZV+uG@*u6P0>R+#3WxsL#xt__*TEPNek{P5Pkji zb^q^Q-)-7!&sdyI&iTUqSVh+4n)Y;dH^G2|LzxZsxF5-s_c`E?D&8 z{uD0j?g`D+ah#8IKK(kE^ zs_|c($0>RKbMTL**eMf#&k3FXYO#>XAG5Nwi=IC&PHgB2mC*dCW_s-P%4-!5E>5^| z?sVqAj|)GnZf^Ox=zZJP!VLWhwbkV}JtRd1RJPg{eEq0o+@2wGXK&2zj`C19w|mbj zEIYri@6}&;s=D89r_ZFf(XQ-IllFG>KkK=ikWw~7K`&38SHLhPPT_jhM5FKecDmnO zvwFo}CNh;M3MaHJI=moT-hBSXRWjn8#s3T3Ki5rsmS?0?xo6#W@$)y9n0c8YuQ|+He`JZ?@+W@-q~CIToVxw; zq(_8x^RhLq-Ak7Fo6ec7rM&pS6_w4451g5N#BaTkkNf{iDOz84s>Z8SM)!UGz4DEI zz_E1muHd`;SLdipy58`Rmgac$IEHr}X-6ylbv;UoemGwE?tkfeh{e~L_6ZG_ zw8i-++%guQQFu4=tI|Txg|8MrInwb@YK}PnjS?jl|DNuKb~@B{m!gO87~(nsYWW!S`xW&Mn&wW7ZX?cv96-x-UF zl!Pvr?UH%1(y`{f$tQ({!3w+$ax=wjJi5Os?RBj>`{2U#Z3PnreyGcdg~X6J*m=F2}4(KZ$8nz}(wd_(bu*M}7_K<~OTZgxsya zoyK7#uzJ-GPK)LgqqnCUmKpwKI=b?w+95Nw7YaGTORY<<+^V&|VzTD(2eHRJh0o+U zzFM4Iu*~w`rRQpszun7SDZ**eyYt+cG zcWciF7+mAaKW&_QNQX6XtB=vt-;K;0=dk)N7B^gR@}BXbwsm4>U%yE2*;FQR|67lt z+B!v<@7otdaNgSIR95+8$JeJfC;J>*xAp(Fbq*VD7)svh|D`r};pz`Q>>QsXEX#8i zok^ZB*_=b?*~UdnzUH{A@sYf(b4#l8 zj*rGJk~^C2zF<4ILv&w%j?fyZLlrk0c=;NS%`{obcc|f_nF?=7p82&a$LaTpspU>4TFT#>mz;c(9pa|{+M!WmTT`q{&LvHL z+tUF;QQU7Ix707beYno5`CrdMRrjLA_q#j;v#)G_Fztv7O8Im3Yuz*+|F|X3a{Y7O8|%q)%4^i zX7()W3XK-;SF#@I3XeIaRk17aJULe|(RWH7`;j0|N1Z>BmMcW(idUxfY7`2ue!25~ zf8q1&OCCG3MWQv^8*V(Cu5>#6adS`lr220)TJsG0o=*5VC#PwWkJX}c>&%V^WY@Ab zZr$e@pLOuMb@DW`2fH5eT%4G{)jM!;^qDs$w-sExCh?2?@-EVtU%c{?PxeKP#BD97 z%Q+NG!Udd*zF&37`YmNto#W7aDmAHFZOin)7_q*kBHs`BoV~xR<7&V8nm^agGJ765 zWyFP43bw!a<-76J{bf75(!RdG61TgLSHL**N|1$>_aEIl?XAajwvUwAK|}r1nNqf4p8qf9mg-qtJ9Im!yld^$)EyVAOar<#b}xLpDn01P>b3dl z(~REly?<`OW!3x25|WFX@}k0)KJmIK(|vu<`@TA}d5R0aO;{MDzSgyFyF=~Qc8+L` zJ9oc*Q@GP@sCA6Z@1W_m1omY#g+=O7YP zzSH5F_3WqK6T;nA8*cio=6FA$>X+OEPs<%;%!X$bCpn!|S{G<%7pA!2p-g>pNU`-} z>mw=CPA}ZkxAoliV7^~ot`FEQAN#U#&#&{R^u$fXGprL7H@xm!uV}l5>Fr(}?%Li@ zsi(4cCQ95)J3rxMf$6kUqU)TLXTN{)a*^uWI@PTAIURU8Ff!QCFoB5?}f`} z@MkE$vlf4~(zc~^-?>dQo(5|)*q&nhx$f75owq0K(Z6zH{keq;j>(!&k_}OHbNt&X z@15Ipv7~vU@)v=eTK5-ulRU2V-b>y!Z4Yze!}ZA-MX#;QPXEgY+WV%zc7|Q@GYwAW z@(V`uZM9ABW~D?=zsKxw^Kq1xhfuU)m2mpz2G5QszDY-4_^NeZ` zU47ci<=@$ID^v51Uz*#jb1?DUZ#Kt`+omj1NnXjYM5BGd3LU{64vV!7x_WYyRzH?q zZIHXkgrRfZ+1`NA-%`n%DXXuXPrvr!y;bqukNILLroWuSI-FQH3o(0qZqL}9KB-cF z{-LEcZx!cGdueqfV%u_|(Au<{HQ{}#vote3+n!h%o6a#yZ+()_!}GxF!R(BTpH?jV zq9L|dH9Ri}Tb8(*OXxN(J1F9%FzsWVkF8E<@}9rP8cL2uODcbvGjHXbBNF-Zie?^p z`Ko>*qmb46j^M7OJN^qrjuz?cxVBIKjeE+ETFH`KCXTHY`=+G@F}K(xxU3V>EoVOX zx{~c#_$0BlbGW2V$mqF9ChX5%&by?yJnDt9T8>?cQS$$JY-UdvUuJlrxn1EW&%|ld z_pj{qTljAFi8JXh-u4)tef~w~q>0NKBfjMA_3XmeUaA!H$=sXJzGY%@T9x|Jdxc{E zCcRoHvL~Wtszv9=uDM3#$1E;i&g8D0>?r?a+pC;OC+$8f{gA(UE%?f$5;0MM&HFlQ zcKW@LT>OmxqyF`okry4BBHxOv-FPw~ta-&8!^xAL@8eS8H0gJ{8=N!AB&}5OkV2`J z=WQ3sC4Tl|vs-KuE=;%nl=!S{!5;0_e5HBGCfSx8zgxX(VkPc|$0oM~#_^96! z``DIqR#K|@8?WQeIk${8L*^MO=bzrxArX2^{*tPCZ-_D)#lz zsZ$rYuYEq@G|}acq|tK?7SFX|Vs1g_*=M-iXfI{^we07ahRE07 z%OWF=${D%53*Nk;teRtYOSPEwyq^O3AJ24!&6|Gi)KVff4lE(h{ri|j| zW6RWUy!xSbXxVas-1j=y)-&C?mwK#g^6WFVuiv!so{4E`Q}dktae`g(T>lc`tN(fo zYukQwwDVj{zcghRk4(#yzZV%REY)vK)#Epuf8OZgqBYF9AK1U>pE630yzzUN0`IZE zA6sv!l>|@a*_wXs$}UHZgEbD*ciCSl*jU8IaqtEIN7+X8UC)dTPwmN5ReQeaxHxB- z$>(eA6W)Cj__&F$H0+jh)ReyluWvYuOj=)hzGyx_XMg&&7|svM8SH!RKNQiq`gotb zkoI<|D*}7-|0(@=vY$0)`H>HwHPhn-U#^^dM2o}xr1>)D^KTQ9XKfUE`LZe2d7bfd z$;;t>3JZk{deT^(c8h(vzp-{>0*8lxtcFVc;o|)T|VU^xIt`!X*;|~A+`#18glj;_cs&z9< zCYxS<_O^_he^c5mrxMqUZO_X()>_pF#|ys7esU+pcc-}H+PZIc?+Q8AHk?`aPc^$k zH-&ejF?&P#{4*jae_ymwG2+rQ3VWv_Sj(Bts_k-Y+a_C{hBb!UCWuTqtuZ-RDpELW z*Q6H{O#8(q?JUkeQ!VFv{OIoUv)t!ivzh7gZ9;^{k{3%Jr@UXR&7dW@IcH6EpAL(2 zo^e!hilXuTAHOWJa?%dC1_T^^Yu`MXz$m=zQsWt>#xIGl%q4|J2&KbB}~g z+36~oa^jx)5&nl7_a@qIij#9u518ANcF>*m-IbiAYvm5%_US)`RMI`7mBo4`ZvNHe z;3-u$U*+wz*oE`U(~WL!fieu0uS6BZE_znnaa$=GbZ}PKdj3>nx!xBSCog7JFk3Tm zr`8F7TZg1OlZ5vjes+1K$H|Ru6)!*g-*sqNvDWZy*uRq16{|wM`~oj|oV@6E%<^;k zQkmWv-aEyA74KX7!*P{QeoD{pXwQnHLEoMip6L3Lv*;_sSv4zdwf){|nbD7rC*C*P zxaf5>^Tdi*cADN{YXqM3Phnoh)J&9@T=UdM(|Pkm%Po;V zAGj@&TFUcudCJujzHWZK^Kz|ZlWv_1$qn0A^j0}Y$AHb_uivRDQ#UX12~@V8wvXFk zxmT&b(e&(nCp?$#n$1$Tz`JI7lu(q{*JU|EJfiXQ)F&8fU2r^mY|Z;k%XZw>@cX?* zv`v1CTiN;($4=bls(TkT-=%L#?UTIA*WO>X-Meaj%JHl2MRz(^hp8+KUTJq|x$U*% zd>18qZ`^4u&S}`zE|qX;lfKK#knQ~|u6|CHH#xmlA$V!{p(mZkibSS2YuxSk7U(+J z`$A&+FEzt1w`F(NdQ4hy@#M=NajQeRG_n_nSV>QO&Zoo9V_78MZ}KS_&qd6l~EIe7$Or<7%OfRTO);HdFEd7t$$?IIX9^TU& zUe4%UF(s$d*y^75vMG;w_Go7-hxjoY^nIJlE`PJ-j%6T3c=cB@YVz5sn#}w&HU)9W7WEj2O_gC4*yeWSrych% zVf`xmP12gBDJkZQwhJD~EMVR|V?pjBB^QOHr5Qa_)+;qDe4ZuuX?wQdf5wkimk+;` zbXc*iT-kbB#*-~_>YEu=zMSI{Sj)*_v>BI#JMNnXU+7xDAj5KX-Fg<+ z+0l(=w;rnQlxcMr+52VDEkS!sEE zqwU@%pJmP|nFjwJ7k1d)ekEvmKlQWS9vCorsyYC)Z%{(R)Yb>|BbT z=w_Epte!8r`Ff{fujQ9%riOb2D)Qdc9{DP;(9h)fw(RFuob>)ReY%(t_R%GB@?O8M z)@&QvZ%c(~{XR0wbk)?fg*)OzUdrFOwqr|g^XaRSKi`+_mQ3N*Qdm>RvHn!``jzXC zuAF|&Y@YKisqOoG->|DjKTo!Dtem`YPS3xFHv;E`Sd29JHs)Ay&%Aj;MEkw8dxfIr z;;?OvJ5sWln@ZayqLnZ2jQn}(QT5qhSJ;D8w@M_Y&Hg&?!b#6w4OdH}Syq!jgUC}pDI9aljM0WRJ3GdG>+?Qrj8Jdt$z<&>lQHh<2@KGgkSld@O$ zlg1v!qlp=k>7`mrip>&CPB$+~x4HVFHb7&!XXIqt#f{{`tXo_K-(P61cfovSV%a{p@F7Y^`s3D{0?#4OrejZT;d%iLXJHPL+jxD*bB& zm;S1_se43DF8TeOMF)BV%C<;Gt!nSN5f<&pn4)>b+K*|)l?Gqm4{lBAH_c5Q%TB!e z!m60>UGd}Z%QZhQO?#pEo>zfsag6nHRsDl)J?dF4!OVKv84c$)8FE#LUEQRXbxcA} zMswdb?k~!ePLFg>M(L_vsyQDtKO<5sJ^KjX&o$2`?E1)kslC4YN8qk2 z2llGvs6V??+puuPBr~H7_Sx^Y@wfapj(cY@<%yZd*=o_fO^z>}Cq}h9AHH~_jq$sR z-=5m|x>YJgLhAe%DwAHi$4xqYUr4l6plZj2uRqFf$v9e^n5lf_)b#K7zQ5{uA*y-g z*P`U3Qu`L45!9_X=P7yA={x(i6{VMS)(AA3G?j2yg{-J%mwaRCcFgF)>Y-Oiv&Gp! z!Bg>JqNly;vS<1ck-`=m-=c#C$^u^ZdOK-Je zVMp?osJ}ehLwi!L9{v96WrSAY&xi>YQLQ|u{&=n z-b^U?k-Vj)v+X(`6J0!#jO zevw%m)%dogNcZ3~*$E8ZWit;MooX+iVyGW@^>(J_3OR2@TlTeSx99DN-f9-VFe}$P zZ)M8Gw=IjDUhLA@C-N_9qx z6>XQt&aDEjC*So7otPEGk?;50akl|?hOxXivzdJCBK6%TlQhFFt(J>`GbD2s-TrUp)IW)-d5dmq&m2LAHFvG<@jLAnKeRaN?S=o-6)qim7^l5fcEyB~ zo-B?X?uvJU<}{yp1?)#6J2+ng?3(peH1C;L!s?*uiw_TLz`sixq z=;r$POSbYys=i38v2#g%<#8&D2@>g<;yNWDMR2;Bs!g?`(#=(_`^zTlW#;zQoNKUJ z%6wqg{jY68&vpxhZo0isFWYXGeflis-&eV2_KRqD-TQVX(&X~16Dv~pEY7Md?^&m4 z6fff?-87exSIf*hO>t7!qn~H)FG{maST}c@_1cqr`&$CCw!3NHTq*Am)e;o2=~Bqq z)(gv$wticC!YgH)cEXf5A|V$-HO}o(3iOoUJ3&zD$;Z_xrFtzt!`A&=z>%?f!oFv! z>R!(_b1!V~zFM_HVA;g5>vPVxehHXy-Ro&HcjC*;(i81>ggWjn^;E`en5#Q!dYu%zgON$Thu8Si@yg(D!q{1J&oW@<_gn@hJLe@;-Nk z@H(e$n!k;B0~Sf5R^0f7Lwaph2ix$Jgl-IxqU(;F7d`&!=?F_g>2SFLVF7JTIR7 z@5rMwj%_PH*|wkR3H|r{Wy((eh7jjl zYuvdKqcRIM-Wp$?=DsB{y)P@DvG)1o?B0pnnJfADEmC^t@)<5Nwsv{CQ&rnV*<11O zy60>9M6Om_wVYZw`EOmsty2l+wiYhel-Daeu1#rv_Gux{1jEZ#9uZ;B5A0TFj}-el z!Tr(OH35ovg6CN;}4tdD5 zO7~XBS}}(ZVWExJ{G<&xMZDXw*~Izuo!ApIR^K=iyMIyTXCtRS{Y<-<&+g=7JH5A7 zX6tqyi+2inLjNO*+hlhx;;lKC^k41XoZ9skCVAmX85(P?{;rc=;<@YH!kInXGn?1F zWw;a_^EZV z+m&zTl4fcBlNUx#y!98n=;e?e}6J_HQd~gA9ZT`{Q4Vj7MeN< z%>5TWpMR}O=+EuXpWpwlzuW8IkI7T>U5gEB#GfD1fA%=M?%!{BWfk$OAyW%kOyicl zuCJK)|Ig#&_Vrt?+AjEDZ~A+WP^qUc--_tlO^<#REHJvXaAnW46(2u;m*?`?I{RCi zv~WOQ25Zm8WkRyu*KQexadTYVk-os`+LLAR4u7_^x~vu5tk;;lk~Qo8)0B02#z{@z zWbX&;HD7kTqCc}fdTvk7rK8LB&uU2s$K2#yw#$H{#=re6&jWA%+ib3^7mQBtZmMOR z&N$z^`K@r+?K-BZ!oG^9>N818s+&Nke&Un}|YPjYX+WanOeeR*LmzxoF&H!k4bY<=WHRj|2Q z-o>{cF54W|&5`G;v-}`wvn?{iG&?eH^4o*nZBU_HK<#j(3RUum897ME+jetwU?yYgk8jZav~^ICgyw9oF8+?4yK zTg*2VE#|-do$vUp0b5CQH)g z&VRV%Ja5LuHyao9_UmV^S}%0T(#-XngooD?z6+t5p=FPxmh|V#u$$Z48b`%n7eDm= zywEE4lH5nUOUoyx+hi_JD7O9gRlW6J>MGr9Hy`;*e*G=a{^04XHjPt~FW;TM+ZOgS zoA>6Qy6tLA>lI6xw5D_DOPPI9t?l{w$K}j%o}TMvQ!ktgKW@$R<>fXe^V1jQKHHaC zOzS=tp#S&S4x{~d`W1q8i%)ky5IQfuwO=tl*t^4nYoGW1tI1E>-d5G@d?oYRJGSu6 z`}fP`AHTn}?|l9CF5VlaN0%m7zm{7oFyo8I{<=Th98a@%+;}%H*YVNp?ANO_(jWUw zQ`>UqgK!Ur>c)-@zO!E}a7y%Fzi4~Y#ti;dbJag>o4={DOm$Y7&!szGQ}6GXI(dF! z?q2yt$(J^rz7;Lsz5c}8+FfEU)9lxAvwYLAi#zOZ+HtsPy1RO5ee}#a!&@=0Dvl>- zw3TzO{`_{^(exWfGhb{mNn3c`DTeds#DW#FiH)aj=Tv<5WZadn`{~N*$K3u$T5aAH zru=uF>$5Gc{nN(#TVvmuF0NE~d+>RoLE6NMa~)eu4|hf#nb~Q1Z-1p!v&jrcixacA z#{GAk5n1`IO2Wh zMEF17@Lp^uq}2K`=CQCQ&)U;AN=I)zyxiyYaZA(p4gr>5lXSOUm|1dm!T*i1Pfu)m zVsU1E@E5@?0kBJ=~dpLZ5_W1=@JpX-R%KTHASx-H#pD&u#^}g@_?7KO?cBt#cKbUE{sOyY& zuxLie*VPe+Leo9Ia)&D>-R256tTQ{}6t;)^*xm_OXD(~*T_Z6&RA8NzfZyIC(fa7^ z9TToL%0#tx>6o{!`Ef08{h9`uWlmu>yLZ>$=$hJSxMb7Su*Z@)TV0QYZ%bl!T)aW_ zcX#B8u7!!}tIvMk#~o>SZ|WK$>&Qx#lc$vZ!U_zhu6dxL6`8yL($v)!{3o3+1|JNW zcXN}I(fg36TRm4febiBk5j|?U>j#6qXA1Ia3ptbCig zJSK#8W^AhUpM5?*o;z~w@#);xyMLIj`O9u}(?#~*`~8cyZ&Pc2ATj;U?U?1xfYz)qnV;Qt-Dua~)$ z8H?CnWmTQIlQ37K>brG8rVdI5U7d<~8@^pSYVa<1S@**uI}Uva zE?kvXXxOv7g6Y5B(U-}mm^`~}++Y7+@5=F$AB-Q@&Eavs z#iiUl{gSWp;fnh=wrDp8#b>5S^t-K`D!JYF=!pd@s|<};-Uqyy`!Fe`rd3+ag@By|6aswQIK+mHls-nz$#Vy1M(u!o`h!8WVF2_dR$KqTPIcp7mO8j)Hmod6(lC z3Qj03HJbPK#-(GQ!{h7M_y~n|as=;uV79Etb)L`DS$9{SQmr+Z_;T~1(6rQ~)|qV2 zwTg{eSDz_o37@IUxz6iO?2;^nou`z~h3;EgJT-FWq0l<5=c`1Wbwfn%i^hn?&(k(B z-q-wG@BYJ+rrWxnNXN4B?fVtFp?|LDp(4|)mZwQqB~Rb=F`C95m#$N6>=&_a#^en# z!Pdz;pYhp!dZUs&b9Sfbv$Up-XU>Y8GBOvQlA5Qcar%zWLY-n`$H-R@iDO3Q!ab?y zR3uIp8clPbw9#l$Pimf;#OXUei8^169U~s4&*@Prb_}0*J7(cd^L<^fSmJliFFe%s zNh)#Ye9uE&VjrEW*(H-*`&pBBelIvyl>ewFbc11-%bbl$4{mq2bndh zhtKtxyirm{|URw+KIIltFPQNoPR$* zgEuGfvC{7aufF@p{Pn z5utYvHWsF>vU^}=S1Eb+>*f`9@efz=|5*0wu=F$cuMc^)FMs8%6&+anqw8~E?GHb# zRs5L?rmo`ey!EeTg(_$|BkL{V&iXGETz5Mn^sAzBNQk`D_Ol_i8J{;OpJhw# zUG(e6_lA?FmoSK54G$}c-4GsFdt=4gMZYer+r7eWPGaCHyFD+(ENYAfzwcb-udwwk;3;T)i%Tak`ACpt9z5Rkt9$m`O`wZdrKm z{8A{j$yz7#l*;`7`L|AGo)U>)s5v>^F<9+>(=r)$-%5qdQ_6n9`<7mwqPcI0rgg}L zE2k=#DgBtV?9b}cTqnKWJgDpruZZhiq4fS(NMrM=x~s1if1kAa&$hC4pKjkdd5SfD z(o}6Gb#39AbD?^glUB!+SVZpB;M6+x#v*d&gKkl^A5Cj~K8S8JIw+o#+N6Ku6ia-f zws6hCFfEA0CZmJmDXEWiPiSqNJk@>D8k$oh z-QMI>^giV2RnJvL2cO40eOkJ%=%9FvsO+QkZ+unpFQ=wFeRSsJsiU(ehaNOLEXT1) zOVD>){!8UwxjCw<7bgGtk!78iXL88uN#{YsXT=My^2b;Iq252vvax_x%*R11bKli)k+;A4Jf7R$7lMlD{s<>}VE9TMCp3$x_e`9l1%!V!d9z}9mvx&CP zh)M~VDO03*FPPh{CZqPz8g0ScN#4IMZr3!l@l2K8_iOFKlWM>Jzu?-sy7PV6rKue1 z{|!$5o8s~O{Ppy6m(%j2GiU5dG73tqI=a%bX#LWK%#X!prpAa!|5ezU+PXw;N3a;X zwG@BxPo1K+t)bf+H%qU1{3*d^8Mj^L1dHva0&IEn_b)ms@&4_#rwK6zP2R35Y`i<_ z3xuUMsS7yTy*EvKC3tqnTS-u)EYvC6!+%}m_O+WX@l!c|unTm}oN>L<-)hk=2G8YF zl=o(*IIlL4`^>R#fz7cim0q3NUr)@tv4ep_E*u1I7ad#@??g)1#| z%QV}Cg6r(A|5~2%?tDjD_>0uS>j$0*e7Bf<(q8qD?27YKPrR)79bnm{=Dq#@pBQ=e_=XaE_4Gr$!Bpj}xWe<@()>?mB*RT1b_@Qp@h{ z%Y9}{_X2D*n5S$^)V;GfIBbK?P9{ZGhNEJJ^S&{Zx5+XIPu;s^NwMnuwwD?DhWkr< zc~+FZ*}FAwef&X|nQjv@56_#Co|QWN9jDZjka#IkKhbk?7mEJ=2|OU*BY26ov^On1 zY15*--h_lk|KoNAN%9j)1)wSg%rfaETzsGye20C_g=USJJ6DHhWncL#ItY5!~Nt+a`KD?$)wv zRdTY&oNvXMbxqIlj!Arx9NSmR{3v1Doevl4T^G6^Tfc+*!CqVDPumV}S(<;}e|hSf zrSe;ZU$dXBw%7i4Df~>N^lOjotoLTMN8_BM%6*Q$h|DZ|n09B{X}O5t(;8Dw@}*@L zo6ntkyF|ooww)pavzKVRoOUo`!`j`F%G>vkM(IoE z|NIXp-c<2xxEHYA`hRoXBpJ^nnX>ocSGd_8-mUXzY_?4K``>Db#_g_kcB(5%PHYnM z@+v!O;?*W@^3?It>_0|(KCcu!knila>wcp2OSHx^$KpYq>w=B@+z4;fy`o178s`549? zbCx64gZHUDk6&_rddKRkB8C1p4UQ!yv~B*u-t6*zQopCvX8HRXqTOaI7c;w+{Jpvf<1aXq)5>A1@4nZm-`cH6hcacbr~QQqk09>nr)Bef(D{XU_v_TO`_AwA8n-UnCjHOkyfDA? zUfJ)*r!BvGTV>^?3|A(L%|WxLUFAErV)u64WvnVYdvEV=^#0D-H22KM?_ZaC+v%Tt zb#w3R9gAZ*rH@%K?LKyO-KBM}8=k*>S-fM(F9C;d@6KF)uttyRs`$>+Jbh2E1uwVH z4STwJUCpI;8=vv$mEH@nEWTV`x$lGV_g5)Gzvg!@$qcAS<7RFAaaH!cx@P*dNf%ER z=Tsc&ejZ_cd*+Jw&z?@TNxHEA)9=mZp68zJy>;M&u*%s_-;LhqJDMH(*^*!9?cn&e z^tZjruHTup)V@3&P=-n_p%-lB2$lh4lsYAzh)yRdV? zv)f9)4zT|Y%2t|C&}C`Mwj;}HgPh8XtB3Sd8&6oBEw0|GKbNL-4_&BMi^DBsZ?-c5l)T+#BwEv^M@bSKb`4 zM;9l!o>f`fAi};qc~&w(z}rd&OM*b{p?0eVq0D z%h73H4Bs3%EcHoa*7jE+F0a1Dr?FS=ny9~bp>W6D$APlqr==^83Rl=hpSjo|HD?~X zYrM!~hRscvEepR$J@Usig;o;FqH zMcbtI)xDQ}{rZ2kUiLk*XtuWC-56ds^Y2~0=2J?hPtZ}=x-@$-XW{0K++7P(Se;IB z@}@3Xz{vZ=voWv8>EV--7i|_Zgg6yI%$c|SMwO2#qY47e~??D&P-&$HG~=gQyI zDKx1!v!LF%?TF=e2eW5$E%`$Qp5Ni0I>Y$Z(Nj#b{mygR+*@-;%Anx8+=;eHQGC}0 zo~6sI+gVZUJ7q$)kE7MQt1u58NYDP?HFfI*~g`eEGsAEc1$&$ zovSgka!y0kt%_oWyBCTz&pMcIY5H2=ee(^&Tep+ez9DxqCcJapwp@Pl6?c|^vKYB>kwyi{$p)IOTVS2mR#x!o3IJXgjX7GOt_~pol`Hz_9uJvq_Azmn`W%P z$Q!!&yvJExDWNTEm_IZcS%z1i{}kEz<96Jg?7F!cyB18%nXq{J-GEZ&W9Hcor<5Me zoRYe8kKx`0`rA@o9Vp{YJGXxS;suNDO;5=-?ed9|;+SI2{Hip`&UNF?3(1e=-!O09 zx`1Jw&f^%xbnRJ^-AP-8*WR-eFMM};{{)uSNuvHce-{cpJ!Q$eJnXL4ucl7R-D_5T z(EsT1m?a~bb;a3VRulK;dpehI+g+Z}_tG4NK7M!lvQo>+L(U&0-fjy%uDsWfed~Ms@TRaoCA*J_JWw^3KJstn^zVN+S?^OS=dr@2JmHcv()ffLXJXtT;u=A8g_0fYBuJZp5PTTNa zaQU($)jc8xRX!WDJ~lE;*Zt`?r^Dow*V(C;R-X!9Wo^3olmWk?>v>Ba*$WYSedgC5 zmx)^zS-xhGtozxANk*;vCM>yWQ&DP`&bA|`JmKTN>$W-y?YJs%xuJG~ zjgY)bKbzp|osW1XiGKNC+UBspu7)`&d2Pyp-HSijTzd8O|F!h{+mFu^Zu9V{x@wl} zobvcU!2WXrl^-OPnvcwL;5|F{fa0X`A7@@jGMs$u+;O&HOW>6hWhME**9WV%%-iXI zg7f$1a+#h}1+9Oo+&sK$`ZfwqO5?i4;(4R?X_0@2_jwM^J4KxD@BHYQ;FzSWV%qXz z=JHwnUrK+kQxomyZK&8)<}EMqvMX}mA&$=F+n2WqSJd!wMf85v_L(sC>k7uB5sQ?* zb~9xuKRKA*!XqTDxN_l{$ML%tck$M?wYczqmYnplQ&?$(Qc0SJ-J8sZEXx)>kXO17G_o z>6h=kPwVA-*w}{LJFvR#*E_RW$9}z=X0d%=yXnc_*Lw47<2zsNo8d{TO{L%H^#sewl7W3sgjMeR@@XiE|GQn`&eN)T?{#ta z`lhC@sC#j8zCz>IjH)B5cNrNr*so_~m^Ag0?q|!t%*z=cMCuiO;4a9NeRyP3k}0pp z+&yx$-@WDA&BRpOu)xMDVEXM7f1e~gnKED8Z<^s=)nYv)ME8svowB$76VJmwxYid;9pCJ^R|H*0Ro7qgnI6>w5bgV?%Gd zTSs?1`r~owP#?z`ovpKVUGDzzI1~1!s`l~YJ|~}b%FkFFeZ)4;b<^gI`^|HH$MPBW zGxXEBx&D2$<&-<~@qkhJj3yO!{rID&X2`h-HAyx;7k$LCnyH-nkZhFl1tGH`hrq2|y=M6g@xmjd*WUThs%|D@DSFUhv#@RQ&ROg*I zm6Uet_PQ+3vx{^!{gsZ3tjx>SSSGT-C7B#%PW%BIC51PtXUi7useH4GZFyXDA-jfO1b2Uz0JyJ1wwWglVlT#Z`PJK8* zJK1Mlj@#tbo!-}$x_o~UbvRmXp!%aWYh`vv?M?N* z(q-}9DO5Y@OC{^pU2k@0tq^@!7Z#>HZ+mNmpvgkfjf>W9pSQJ(R^B@ie`jKhY-{JdG}E2y6A~VsV7a{WxVoU+xo3YV|YFgIw{dNoVeCyTnmfQ!?H2826@|C7rGO zA!^l&uk)-6`gpc4RE>GI58L9I9g?AHsVC=|o-s?+QlI_q;j1?h3n!O-kXYE*DXCMk zvF&JBsZr8;E6E!rpKRmTOg?k9cCw$*_}koc@03rJPHU z`U%Kj@T zUY*O@`$ClIuzuEFExQIW{auTyzHK>k#!^oC-KvGxy0ucbExG3Mf;}Mn(Cd2v*~bI2 zkFUFSZUJA7+X_?tomF8$Ij6QxGv9mY>aC5Fq8>jmbYd1Zj(Cy8+pT-$Rx6kizKRv?wa7C)Z8~?|T(P3P5f_}g zgDVzXJJRz}rtlTl)@33gXBf6VQ{7p7rF~(pj7P+gd}aYZETV*-yw?Z!kS8sf<5cdq>Mw-Zw#Sd%R1Ne#qFV zMtxbk#&y;8(4z~u7SwEt3Jh44c<$KGX}!S$n%wrETqj1Z__ajy{q{R^Wxi?#%vX%9 z`SO03%jLQKtCY)Pt0v7foI7P+z^_)rn9!cDrmmlsZkYD+;s03k%I#@AyrvJUqE8vj z?E1B$q4m!VhANw{HjICBwN7#W&FNR47|^!()$Nqt$pzCRUb7#YvvSf&)?NQQZ+@Nn zv9|ef(*4xzH$Mc0D^6%XYdl_8V^|=nBgnq;NZr>b>~3`rnr*{&S)Y&*yrEEi^QMj@&A6f&BEpmF1ruC%jCt>-hMkTR^6UA-m9WL!#S{Zfz-X z?6vHM+uJ@b*t~u3;fN(K4pd$Ef9hQ(%kH0Y*P6rK7*~It zAT#s7q=oOxJX?v?9y7j9;5bmMc=OiAEL)W|H!D{>y^&{Yajq&bbngPDRbM%dt#LO< zvQ0U8>95%IUDn3Y{O^939;*IOng2=do^IV|g>8mTPVetA@ASOaJel2e@2uQ&YpeUE zi+JBZ{L1+L;aBGO4@IBdYo4($t%CnpZR_`fH}?)pewXWpHSd0D#<`tmB$m&6A~MPEk?*zHyG|G`)_clgE4ofbs-I8RVO7bNE!Ou! zZl5Z8Exu&E?hzLucK0>8;_UCMA9E*v30rih%+`1Hhp9>;zADr9&v?S|rOfJb+(M~> zZ7!2et#-Qj`k?q?bK4J%HsYny*{ch0mj3ANG~L3*mGwhM_iNwt<%#R$YBqeCZnV7J zZQ8Nk3)}xajk~UY>cWI8>#}tpv|UfV%lDJ{*4vm&23x82z7#Pn9p&lgguCFyljW*R&WZMJ!Mwefeu?ES*QK4%ZPi1}r5aNJ@!&$u>s z=c!-CN1QH{vhAwaz*M?|a>tYK*W3#Eh`;NCb zOt~=Y=l8qSZOfltoHE1gQF@nPNt%53KC`r~%Ou^UH@|!zb>Yg*z4itA*QTGkaJ6w) zh>6&hWd}B_>EpdybtOz^bQ zyIgX<%&Lezw0*^wj_aj7>tEm4yUzH-F1y85v5`eDOPAPPF-!FeHRILk=abRCyU3!V z=fZ&_JYu^d4kxXSGf!F{XTG8G?)RFF*HhPp?2Wqmnrm@;^6JwY@?`vsj(oqbJ!jn+ zuJChy(?7nvy;kr2o^x~8=ovrG`M#^?{G3FNpppd1j>yf+1WRg_tztZSHma=ATfXAX zhFxsQX+ zJL^4X@#(biPyKzNo25mQZo4tAyxz-Yyx#lzr|+iL2lgAZB_^zwzOg6I;904$^6?Ft zYhCB3>c(vk{ur`X^F~U*O8$9%%=cC{)=!DFd-D9T^2?bQ*RW=2&TBh+#^{l{pj~h6 zC&wK=mrrf}e&&nw`OSZC^ce0F$SuF(uf(}s?~CIP_4>N0)BpW`y;{%gmhU`=oRnLd zpN_4G`SSehefxd?{#?JlzJB`k`hBnLRO~;S?rbob6)T)~=KS^i`28;g9o2f)Wlefj z|Kr>Y-|#aF{eJ$;n)=D{u4Hmgr{VtEi&ws!`F;QO^nc3(-DP4I`_>)aQ?{^9iS^g* z&IrfOEe%55N--8%Z)J80n}-|j@1E0Pd0>g>0Ua%=eNitwudPsD(PF-Reox`C=Z0#} z4AstV){5-a`~0EwL%D$={|pm;iFwOSxTT&tH-Gc-+3(I`P|K$_t-`-h#a5k-)oJVH zW6BrL<-GhXpOn%3+Va>831|LE|74PVdK9N>pEo>qM8fOf<_~i^4QKzkQQTu_`0UhY zwSL26$73cf{3r3)rzf-M;4_e_Pb%kat%Z}9-SMeB^Z%t@xsG?KYR50rE@LLKNfTHe zXKcRybzNlc{g?X%o~SpydLH_A^F$UV*JYDSKG?pV)x4y6`uDAA>hG>tf4%8BiLY;g z*8Q*vB?S&~R(+F8E^H7jowH=~u9(s}ON<2>cgd;0d{9!e_NJ%BYXO@t0Y#Jes-`UL zn_My>Yq^!*rGx3~UUN?3+vjHz@W#UPxs%tb$0~E80$z3qtH>V74nOW`wR-(zQ+7{w z)7EvC9#)^<{kc&%iH~o~^;vUUnuRmp)XY=$T(0!~O5r5G-O5vC)n7h1aLtt6GyRUc zp0(d4%fM-`V*D;e$~IZ~9kP74szZc5^UB*PjxtLc`CPVLc9fD$U&HrEW$x62Mb{lK zS%#ON=xQ{uT2(OfgrgL1`aB*XmATfZBMm38Sy{>+agfpwC{bm*so>m?|Vy{0|nbWmwTbA}y z71@%m_BHArR=KZ>)WDYfmQ$H4e6_{O@6yhKu2Z$FoXZvWbz3-IT6ud)l!d3&@vz-i zewQ5EUhiY~On)R2dfd~Bqp&u-xuy7xhUO8@Nqz@4way!OSe>Y{|6$MOJ0s7a7k(FFpQfz2=xn!|8vo=aNpLJy*t_(u*Cf76 z)hD8wmNb6}JL(`+t8F#0(PY9qUs3g!3U~GAp6~>n%$M3=kacrOC)WhFNwN7F9#$UT zR)T`$O_I(3=kJBDE|v1T|zkcVr&hu^SnAWpoRTs@!^7(c4T=~bJ z??3EFPuC_`qs|fE2}wp zlUm#gn-arLtXm|UZywdu$bS7})j!Tjk1b9XHm&L3dw*x-w#YZrzLhAuMye8dLo;llD zR{6=AE>~IQCo;Epu1;>56S{E)oXoa9rPw#IWI|rJ@NrJd6%o6v+)iYctDoo-EDG2d zW7Q{E6n1n`pJ364Py4RrsLa{5IBB9OyW;Yk#ix!x1)221!tF$)Xtx!NoO%1o${Pa43f;(J3cZPo%7AV$sj3iWhQ&X z!^-1XZ20SzIbE0iK=zc*wsJf1^2LoSAY-gzHwzc}iA24U@Jv^FSbEm)gyW(4L1vbU z%NO1Y2AwweV^yDE5nEh!Y`t7{2 zm%oc%f6Gf!k$vqW#n**Sez$kc;dDIVSoM0Jwc>LZ(}jJ4MS61<6~+5q%ItWr)F)i@ z%513^pA(3m38Z1@6>Wf8sM|5y@ufwA6MBnPiQ_e zJxPzl(&G=4_SUmz&OX{BB-zshOp z@kbNnZD&?(PyltV&n|P~6WaeW#_fdTqw><83C%~YmtXa?T2a=v?j}gJ5?EP1=&VPT zeG=dQfBAi*WHrx(Mj3gl?ui9`vXwAyp zEh5S$J{F=!gRO7;{JOPo)yJRjKmY#8oNqhtdabqgqYqPgO0w9sgl8S%@D=oPom>9J z@0=~G+!f=a_vcHzKW5x+^YV7B{ptUY|IK*(y!3tTuYVia>+9ZJ{@!o<<8$)-eeZY2 z3qMz`&p-6Nzc;Fs>0arToR?R&8r^ZTyZ(K0-7~GlCpKSSJ#Tvo-@W;v|3mKhTfL9{ z`}y&z_wxR~-p8|O`Ij)>NdGGpuygL=_YaR~US;oF^e+BZYe+=O+!Ngoez?UiPbt;x z_Sv(LKQp=a@&^__<>MOqM&C^R?z-*mIkWe^pZnGi6NIR*UewC-k?0sNcyz%*Fah{@W?Puz35z8ot?vc)K9ZEMbl<&R zYTJ`tea(G~w#i?0c)4R`XQ*g+)_Zfw-IKS;8J;LDQO-`j-d_4GGeze0cfL4W}HuK3b=O8Y?jz&vFEf5d(MHMKMI2x_S;AtD>yGcN5Xq$9`vG`B3O7Wks zQx~uPqthtKuXN%?O1rZ7;fCO!c1B&UpH{w8*tdB?vAmEq*GBOl@Awuw2bpb*?Kq!l zFmc^|g9@`W$-3D~FL%uAn;gtUuBn~msB$E>$QT-FN%DRG34D}?wR%ezQ)SE$ClbV-Re5B+-t9(*W>Tu z75pEQK4w-X9u`^MlGdFTRQ=WZsKcBn#wX|2eo(l=HRsW>-&&gc{-2r`dSK2Y!SWjl zpC`Ux-m-;>B};6x&V`AZ2D|Tf&9VQa8?vVR5|>TEYPFkQAD5=x5w|?+#qd3o<<;qF z?hmuS`mV|s6N;@|qxRK4KJw*9cacV!Z97h<@CZy&y-@gFVY*8i_XWnFbLagmSeG&d zeqr2X%~i+0Xz9NB8Upc`nu_+{7rI|N%{b%`-x{q|rz9I}U#Bm&shzgBigVMpUph)w z9TSedv5oCi*;_i}jTpy~ORp*<`3qlPUQ;pA`SbIdEBAin#VvWg^?kNe=1P$_rfV0i z5y{eDS~H{NSJ(XLz$$-3O@F>eS3mwM?3UYD`M9_^<>c4@ zK2f86Nit4Bb+^NB*!W&+__SNC>qNzbZ)+Uhoyu3b{JieAaOCPc*6}w^s|pE9nU-xd z+SQs;Cp)1d^7zG1S6uj>eh->ZDsbNJ+_&x5b=8!W^$W797l)>?NI!P`!p|ff(eYZ+ zWohoYRYpol7d8F%H}7~cokfV#Z0~&2>$}fbR+&tC_dm`}?8b(z77E2r=3V{wl3h@D zYsFHxCu{Oc6&|Iw%ir!iVi5UR@p{`yz2=lle2-NZU0+bQLYy&j_7{iz72*%`+gKKD z&)xchq5Ttg!b;ngqQ;6--I*!OYIHroP zc(c)QMY7%;w|i30gf?@|Gi2jDx5F)rcfthj@R;CVCOddlB<8HhTsg5?stY?=uI$kw&-QwMjq`S6=7~B2942LpyKgloL>(}H zQ)AchV8)4qD})4v<=8^zpK{he_ViDJ-R*J#{$q_+wcmDadaZqvUvXjQk(YO^7g?Wv z&38yDWlpYH$Gh0-txQ6OQ-lSlx6gU}b*i1hw0|;|D|G(2J$^gIXX9cI>sXQd`>sr7 zyl`6EJmiks7XIzecpX^ww%)1mJ~vmpm&Gw-BeQwb_uA5(o9n#ftb|<(t}E&+6>tA& z{g_SgTXux;o^Jj_&si4)+h2%NoALRbh<>l$Ar{?d&Np6ly!kxgwCajKQ< z!0kFQ+2X#I$LxbMPA#=t+GP6K*U}C(1ABM zialrDiB|bo>E(6er((lY+v2EmoH?!v%Rj#NVlBGxbdK8l&!G+t&HiQgi?2>DPi$Cbaj+O!a<&HPwKZ3=;7yCag){F+eU4g$>?%Wuq`|8vHU59Ia3`i zOpNljaOBkS-MVnU_L_>l(@DQVhZN7GcT1QboM3np*>~6L$(+T{Dh?h}EHGs+=+b+> zCr`wBmD612x0NSs&kD&uJg~3COt)sXQU8{LkXx1=8_pjzUb^3OR*>PemkJkDpL3X1 zDn8BAy(nh)$-!SX@6P#UFTV92`ldidi;d7&M=f^Yd)RkmLVpBuk$QOS%Q{5Mk!e&_QoFgWb0y|Y=OgNd%^cs3_=Ss19sXaZsO>Xy`6CA^A*1do5B(o?#_MXTgtt3LD%hF@t4$( z_6IQUd~qRuFRMpT;6mlUI!umJFU?zLKGDiaGub?L;hcGsHf)wpx_Ve6FI^z$W6;6m zh6oigk5|vkuxT5o^mSebzxipWqmxdr`g!Le z&!jNfGpAZj9^HS-`G2uhMEP^Kyr`La`}Mty4sO`GU3RL)NoVohyY?)R=Beo0UhDm3 zn`NA>Jy+!|wci~)hrFehCjFaioA;&K@I>lQ<-BbhxOtxLxMeua>G-UxEybs%^p&o& z%xOu!J9*a4*;!ilCl}3mHeH^zVC6Eo{8!AA&KSh{zGqRk((|dZ5&CsBNBzoT7J-vy zoY}_}X1#4)zu%&r?dg{VH#;u3%{AN6%VIsF@PK7=%FV=(u)oKv3yKWCl<6;-+KxbFkt=uKuXYyNeCDldT6Mx4(_0*wM|0<#t;m=Zdi316t6$evRG&-R zQs--*y3pWU)iPJjl|9YZFK<7#LfAxhZmPn*Z}KV@)*Ixv_h|OU9JkbLo?z^EGCwmc zL#xxL_#$6q`G2+Tyh*NsC$^+7ee?3X-1r5nN#8m@Wkc(wCp`;SCZ9Xkm1;19^}#8-J)EcSxH3E4P_7Dls;uC% zzOf?T^PMNx`UR)fShEyIPfAxwTzE!-&FHI7)V$-jwmLfONcx%5;QD0KNzZmuT`z^t z7yqkSYTqx7Ut%ylamkq=w+~E(^G&la9l14G#lvXo^XDF$Chn0a5|Q2MxBB|072-Y3 z)6#M;Z96S1$vtmVx?j(-r97VRBJ7jHHvgWslEv_W@aIEfntR@DZ(QWUc6N)w`rI_< zihG~ekRV^E;eX2EV2R(XuP-krHC*{Cbl{VZqt@*jy`+m0cfULQyY-jl!1{LrVQr=& zvXv^|7fUqFczw$1|F?JF4^P}zxoGF!DHqcOOi)3tkUnYEJ#<{5s9VLH3UE?q65xOb!X47<3*$~&h{RPFW**E3oq z?CrYvg<`_y=Z#5)JB{~fidx-_Ilh@K|E$N}ZS4+;{)|hj)U^_&{*^KBN@2Koce%nO zcd45joi_f9JzD)PE&cVDm&t$Qrk9*`-l*xDy6t;_NBfRg1IKe~Di|CV7BKGE)Rfq< zWO{Sb8;yCM`-&vjO0&ilcP!OzzTnyJKGV3ocwhL2h3>(VPx0}8yRGlLre)LXO$kZv zb5}}uY&-Y+4%3cjt~V?WEnu&na&pqQZUznSdD3E45&M-LUL>lD+)bbMwr1tD2$4r- zi_dSe;%t0fKE**&^oV`xFnI)0zu)h6i7veaLMsXX4K>4D%e zj;p^!KS(9^Fq}HkXw-JErpc(Zb<^f7he)eDA*YFTiW2vwCOF9SEsk(tVhp*?dWcOW zV8hauefoKit%d(d87Mml`j;N8STOBq!m`=TN~i6UP4s@8|KVg9-`}JjojLuv&cf(- zOB+~IBd#s8J+~zC*$y7fDYnIuv#y7@Y!1n??pk$cs!Uh^ZpDeRysyrGbbfKs^N(oi z&5O79o_h7N`kK}0oR{0*w<+DuuVy+rYv2A)bKl*~GT*Rqw>>+1`FC6P#Ftg((g9-5 zKhDo|zVYuK&y4iUd#Q6g&7Q9N7f`cr;qr?I?2(H9nGhSItq!qq4toI;Y>Cpk}qOc|NRZx2rZu&dL4zkmcm; zpSq9#oL1`j_^B$aZ2ok1fg_vkpR%0d@NvjYKeOd~M8f*L$C;{iV;fFME`GdGB|ztt zELYCvpqS4QYmX;4ey{ydmne${CoCYdArv#y$(Db`SM!C zk*ImA)-L{X_r239m;8BItEL&nzAM(cxclAnW~G#)_qT4&i2S9MyH{j>(SFe^@8siU zvFA9pf6;P&`%_dRknL>_`@OO?=T9yAyEx+f-!FA(mD8WUXjs4Ic9i4GOYdJDjkZ!~KDrJqo9JaN-XB&p)-`TiabL9r`B5kl{Sn`BDzS%PLICY3(ByG2E? z(W5DWC)ixH?WeVy+rH3J`4UCt`(D~59jT}5w|*{PZ@rE;>d0T)Ba1lq&TkAkw_GYx zcWOx8c4oHsKW#R+-rd8`sI}WR`9)nhTktKtsEHXL0`xbZO?ofI!MH@rx%26s)U%to zQ!noo+_KGk;pS@5t#z|groBzzSRrtFgWB}$v{%b6EtdG_n>6)W-R}$yZGocmwhIaRhdq3#>36I|^64m{{$LZV+-<0A_ds>$6?0I9%$#PE4>Ab|n9M_sT z@i$+Thch1a-#(qexX6<8woz5jl{x2^elik1U8S}*w%_jjlD$uNIwt*m*|XrrzJnYG zwWrx$=8xO-bKk=Blmfe|^~Fp(MNiw_<&j}6pD=&9lzAv#k-CE(@1?wrD z4{UaP2|Tr;?7ht7rGMsbuD&LBJF4po&w-|?7oVLuzw6$7MU6`r-TqCrRIcB=qH|T!!-hcJnny#7mC)~X!pjP{RbMl65dlx7? z{B7L!_A|2v%b@0@$%esSOW6$N6`3+<;GPo9@LaiQ;fWe3UMjq`=8J}(wY zUv1`aBd`3D<>EIx?bVk*=QY!KSH8gd;O{R?=N8=Bu3YwRi_}Epl&PDiDxWy9FE_2u znsW}{&a<1lUj8`4^}F-Kyq&xM$4rmhmZQnxvOGw+!aGysnf*p3hR?5lo|$Xreng?+ zXRPNEuhoxruAa@YO}0p7dgnPS!@RnF^R#QvSIjfCzHBisx-&~aK4kN%rzig@-3xR# z7E#TPUGnLI+7zvi+40RAu1n2*=D5XrZ?VVAp1<4%F59d3?-T9FYdv;~%`#;BHOJpL?x+s|iyx|Zo&(Xk8auXd#W5?I>B zH>YIcRhGMH6Zd{KKGyk8>d8do(|OJhFWfUydplXiEpC3WL-kANTRK}-SZ~?hW%zz` zPj6}V`onK7*H2$vnz7zqh~@d~?H{abHr=zkzPk6v=J$*ttI8v4)O1%E_HfQOJT|Gf zyKnQ<;+g*@20jzKHQSaW?w+D>)}9HW?FM%~c5(dcaL^H({yiV)09!vpep+RXVY1Z|S%9x?gKQZ=dXW zHu81P!SY1)@(-l z+wvpIO<>~hdrmcfdo7NHzk7dl^;%}1&1&BBX7i?=`S(sgWWv3v?Mosj2W-6eBWu^2 zHz}dB4c`8Klu+^2=!t^YSA+Jssn>S(+IF0+l{65TU-a{RM}SI>{fDiy&s<`Vz0`1g z*A)quW4lu1Qnt6nAIZPT^wC5>@bxX}g>zTVJi^=YzG;%mUuO|J`{b6@I);_PTPMZc zYJU@aZ<)!)5`kDwhMMrHOCqBentcvsbj%3*dEsAD#hu!#VFH=#3)iYl<2`1b#{XL& zo4wHPLQv;FE$jXre|TQr|K763&bsoNvcScwE;VbTJuzXQ+_vd!s=-=zuKjRO7(2qJKJZ)oAb9C zC;UpC=b+Nu_u9f`b7}X6pONXkN>}eSzWFlG+;D$yl!@iXwX=>aIoR?+O6G5#lK@jU z|J-yTXAT{e+$v#LC25xLXPly2BHy(ym|}a{q3FHmoM}QwPR=@zm8dP>E^sLCW7m^2 zLMlZ9pV=ywF+57=cy~~t=+c3<{l!M<8v|9(@holqmeg@Z?FH|m_LgUQvv#jPrn)Gnv>N$#8F;Nh^O z#J0mhdfn8IYis0X`E#DBbIO#1)^*DqS%id+AEy1b}vJ}bc2<0 zc*@$8u#A(xS~dj49l4XvBey}Z^8B?9>7prK9BN7j{EJ#|qDVeZwhvQSPg%1Z%nY0K^3szfIeS|fdYZ(mudn8An3b%Nn%*yPz7}}Q zwQIBa$K35oLR-ph)t`#Y`n~Fqpy1tyO)KyEUrEe*y*1A^Wx3S|d|Dl2p>U`=sB>AE$2#+)7WkkoI;u<(oEb_XPV)hm}Vz%)Q!T z+__LZebS;^mO7{NHbuNQaH#nC@6LtD3X}G#>slXnSf6~cUFy{C*9=jmrX0fcX`Hr= z2Y>#xG+p##4rlXA<0YTIzV}(UXGLkD+N_Mr)^$E7c;C4DybRunlu!?(0L z?yE(|!6mlZi)$+O9Jdm4u3GEi-}L2CM8HaCiORPc&)Od}yfUy_&3TB)=ts}Z3y;%N z&l}v|ZC#>hx1mNlIFE6I_A*D0dAm6eok&@J=7my_R0&q8j#w>HUV zUTpTMKeJ+4|Kh0NyFC|joOb6`Ob>ki>wRC^l-8KuG{}rI4>^*)wwE9XH}Bq_ zu737-k73Z;D1pqv8FQB`-0Qna!)QtQ{q-6hfwEoJzK5O&*?(O9>*cESg=gqiv=JD(mKi78k zgnj1CoFRGb`I8ILb$U$uwuz*M$fn193tl5prG5Tt%e}l`0#{aLYfIezDw(vBrT(RS z;wy#sM%x_I+`Z2U1nth^czj9A-TiByW67D@wycq%6ZYOuIuf=@cy^tc(Z$_8>>t+@ zzFx7-<<(!Ygj?TX>c{r?1pJiod(M(^7R;ATqZQQyW1WQ(P#UC-dZ|D2SX~my= zt1?(;-d#Jlbi%hXYyQTKPj9bhx#)U+V*uNqo3dHEjZak1i?qA;ca`dqt-?EFohGdO zJd@RQ&9}18ic0>ArCfH06?cYDFtOWzTj<7mt7#u4AH_^ET4|?Va_z;otB%X=ifet? z`pZS2X!pE`mOFV>Nm50-@4Yy1UGKQ^v2a+OSaxy=(H)!S@X5P#;EkNHA=OYfBrkO z`@q#{bK^g+$@y*TaHM0E?ut0UgnEXvS^1qiILn!@pUn}N`%7~3vtpJTQNMjwP5Jv) zq%Zlz-D4~>@8--2ZoBe|eS>{(xIp2)+x-gO&uaZod|!T1@XN%i?e2~?C+`a?&D{9z zk7|_0`*qz)mM$Le>NGnh-P84&kaz9ey@0sgRf>&w>zH{SPQ7#c?}V8~AIqoS`}r%o zzsX~g{aWsqSFM^)&)ho2E@iiUyv(iFdy7QNdUvUn#8*ss>HkZ!X6^G+`#p2Mw`x!M z?)gaJwASxqc1KRU`_21k%e&(X6!*@(mL7H|u%aG*lt zetou3K>f-+uYRl#U9qG|#W2h1=BIbdCAK}frESM)`(9j=nSY@Kr~eF}=&gH%C(J$6 zWEyr;gvFFUV5TgCp7TSMH0Gdl(-)S`n^?n8+U&-)a36mjf>Oc;ICB*e!A9ao}bK~A|1`wr&rXU7Ts(t^hn!tj#gfW-qpJW zSFT!e%Cc} zEYmJ(zvy>+znE;xWv2&wcw4^x?x`}3k5XSVU32m#ZkdXGzpk2<}Kd;?l^l8$%^CBt1ufw)(R!Aw^zFFZ;kxr3Pwsqn~ z=QHoVPoDYh?I}Tlsk<#toOvlcQ`N_JTgbVntveLvJo>F};K(AUbS=l;WhtNH>mwW0 zHgma!-Ai4S=DB}Oj@o-Eiv$-pIkB7Xw$ETy$ommtj;$l zFSd1-dE^Jt{c6G~<)?4QJ`;$q7cw|v{`trBC5qc7JdSXFd}QOE%kh&Ay$)ObM!WUT zEADH{(%;Wu|9-ilc|xdVMEHiK^WxvycN{wOXHAhS^(i zRngHK!43~*OpJY+Bia?izqatujJ3NznXpvcR~1gst1fF&vVSF*qFs9^rRZRE5wque zw(z~PR-9NX$K|;0Yag zMJ&DWPSm1Ly)4>6W*KkMcF8@z)^N>~Ro}Pf&G}#*TmK7+lNPCJ ztcl}a`^oMF(_Oam`&J@5qky6`y@${7+bEoe<{y52h-?8JfN*T7Y{W({& z!}yzjjP$q2$1zWnQ$I`;U(CJg50g*a`HGk@;rP3&i_cmy7fra9&U<;EsI1uL^*j1o z6Hh(S^Qm}w_WN~HjrY6kohL-DzdVmeIHJEIeYK=mlU++`-64(L0q8rwqW z^zVyH9lt&Ia;`Fb`nQbh>DHf2ceh_-*|7Bd#`3&^z1}Nwth(->Tln?S`$@L*qfAe{ z`(32CNmnRVUgF)3N%NPPZrt~vIOp8FY5rIDv_{q_8*3cQNkR{NqW-ALaf{ ztO1o-HXY~9v$q6)vslTnSvKnTGKJM^?yqB$YdH4!LQ}`@_K^HM>$dyr%KvYx&|bB3 z`SVQ*8YfOSu}40Wcly1Ji*d)>8#~YKX!xXSTP#^}E$@2Dw8h?hQc>++_9#yBpOPI8K>=nj`cpU+~HI1?#`C^v%hOv8 zmz!F5vQ`C^bO`Y;e-ofku~unyQPA&6&Zd{M=eBSkn7gf>f$O8)*a z&Phf6o5Q(o%cF?WO$xWR|Lo4GHBS92)0KHX*3s~3r3OpUr{Dtx%l_qv&N_MD!f2oW z%N5rnf3Gpr+c@JYdy~b_;tLl7pQ{(GP_s48o^W@2jUKaA*7i+SEg|+U-+#SHovHD0 z?e9kq{j0C66?^ev`BnX}ZdZvbTf*zt8J>uH%F!AwJjp2Ut!eX#ny4ayskb{>3|1aH zd6PHez=CTp5@*^f2rt&_NtBaKagL2YWcw|poK;cZ_)uL(%FXI!>4LfT0gu@`e%4$& zu)xc0-nQ93D_%Q`O?tQfZ*$J>7#4=_B4Lx6I=;LK;A3==k7s*yS^uyT^P^Svmst&3 z?Y+gUZj>&c_+s08_HSzbc$i*=!dRdQtR>HSs3fDxmIls+w1M+Cwf1o>w7nEH9py85hQK4Yg)?{CmE#=FK%sd*k|2|OMKKF#Wrc++Kt)`@t^^48RE`8fx zt&ykt?a629zi+%sH44^7Zki<#8WW}7b+|P4J$rkWe~?RQask6d=Wq8UXZ{q}RJC8R z{luzIB^T9p-Mh`ndSREWwm{SFd2kM8B4D3VcgWApUt-^SgVhz>BBc~RmYU+&i8IsJDBuJ{J&du z<=Z|Vlin4#Z#y%e3AM7?ow8ux@8>fZGuE!=Z2s`Y`-r1U-f5ns&v{x3cKPlO!mp}t zmrmeZ8<24{a`W!DC+%8xo&3vT-Z^n;XNBqAzerRjvd z`RlozUaCA=TVkG>9r;Y$A$(^1Y8}3$7nMz67YBba_-J&31otLwR<)R%JG~Ko z8(htLBu{)$V=?VpzG{*Bk?TS{c8#K$Iulp@J*1emA&bB8%x=dQ_PbWAxNo`B_V&N# zKTfIhpKAJK9y0ebc;2s<4w|x@Y12xrjel~o7iAQ>Gu`~Rp*M=xL!6u8Wbp1Iu?Ob0 z%5Utr?jB+pac~3Iizl2q532)CB=9n?y#FhMFE=?p*%N`LC*0@PUD@(A@cpjd8F~}Tx|vNEx!*IrdtPjk#XG5`X}m}7cptG_ zZ@TCDR>O+zH~afTHeR3f@no}@YU3qd@oD!DGgr6r@39u0B^b(lZ|>iZ(puA13U@Nx zn_Hy#w6%oa@K#M;ii!KO77wNOV*gL6yb=19Z}XDv?5qhhixqB$sLYoT_V}pfHt)7m z)R7980)zQa(k_{Js@(h7B5~yQCsD57b7pb)m`V!#eip0h)?3Yf*JJm2Pls9YOMA91 z3ba+=iw(_Fxm)-AlE<#H@M(?er#G_%DceunC?Z;|JarAXN~Rd|Lz55x1eZsBa=+Pa zkR`4y5pnI4uermdrPeiWt+(H?nSVaMTshmbH0*{f{}S6Jsm~@)OrMn(@tS!?P zr(;DXdgl+v5>eijOLp=v;g|i_Ij2`>dsa}*Ey>myrao(W z93~YTTB++E`L!oPo+0(&LqmoT>M~JB!29#f<-70gS$i>^DrpJn}c{WZ(R z#^<J-GL; z+-FHHbKB2+9-oZvO=jpYwM^a2Iw`wn##Z02r~bvHac9OI|1tO4v1b2%w~bL^MqjUn z$Qg;|6)y39z~FiAxJA(1>6(Q{AE|v)c$8OL->GbTbNk&?rX{^!m?ed@&93dc{L5C@ z_=I`a>&buEC&h%k;bb~ewQITVgh{_1i{9A2GHdg_a)+u@-z}JpE`?5<`DAsYxRS=? zn%l*X-<;o-{fJTUw0L3KvLmwJ70yoC@zzs+#{cL_3zu!*0TEi-a%f9f$ zar3kFb*g)0xYL;`MV#KryYJb1VpfOrCw8d@{RGYC>Dztz{(XL}kg%j*`x@Wf`G(JV zJS=4X9zXwLNzf*?{s+ld@2v4GQ{CEnmfxX6Cav1_estQ*y_wDYdY_s99IaAiUKEf~ z{OqFHgj*YDXWQ0pobV^}sJUqSOS5w?HhnzM>%FsyDd~mNewF*Nb8-^o%bRsX%=Sn0 ztrOMe%WgN9uCM!h+yCRs13SBa{^+k+9HVw=Ri2mF1DSKr%97?Dey1(b`{a0T`bXBu zYYTVodJ`CK&{Cpacnzi0bMxL^i9wsPsM_##_<GqXc1teAdWxLcqp)4(Nh>eOdM?zN zcxh7q+9_dn^6Ny`YQ(0VD4fbW>Fd`YhtgwIuADxmG}ra$oJaRpB-~wDq!)N+*R9Xl z6ZrL?tey1#->=`{QUT=`mE+8h&uiW@fvw%;r@hCwbSJ3=Cnm|aD6hKP&d)RDU(9pM zS<^SB+?&;&p`$wO`6J0$Q#UDBJll5Em|gJv8(tUV=PjRRM+l{Jy&Mt{j})wS=DJhXlW zfAbFEDfzRLw@uGJ*mdyMgR{($YZnT?-xmU-`Mxe*KkYr zy6N+eiyf755plMTfBD&CYgHi6M4_Gq5l~+2sE7r%# zI6vuDQam2fC7xe!W~2D=I~>)a$8$9DS{EuS_^9J|Zq6rrv2 zqlw4a`g(T)$CPX3R(sR-?cr=ITW@~&1K-Ko2wtBQtLt)4bcIY!J?tM%Z{up;>|uFo z@^snyqYKu@mlkh*uzcF#*IUkHAB=hZ^{0!xMq=i)9}E1q-uN>vZ8wFk8i%W z%l}L*=e?*GYWnT!&l@~V`yx8#yb%=JRQKzzF@M&pQZB2{!Vi-|CwNPqy}Lo>>qVW@ zYd88HRs0ycLEOjoZ#Uo9&>LCc^?uV&mkZ)f0ZS%a-N!s%dxPsj z3uUj#>jUqu3OPI9%;#p|%+!BfmNzHL-rQKT)Bg+(USJEWW$k<80?F>siafJ}^uW+WK5lx6b8nKdt6}M7)t__4Ro*F(>-72jn_RWODI(aj#7Ik-bo!nRbn18u%VrJj{=`AdiHglXX zO;P+GtGV~hg$dG}ygSP|((b0`2u4aou+AunGmySiIs4MPy?^$Fq`1b)Haxp!czVvq zZM=e!!b!{0d%90}9bF(*#CGSK*hKM1kGiaVSdZ;)O+RwjI7CHX(CFfG;rA;Z?Dkk9 z{CH2y%dbVnYa;?Xczt>gejnJA0N=3J$UE(^rJ>CgSzRKKgyl>$@PEk&m>(jc9$nIA;8?LnY z)cI)>&lIja-xc^+)B4HwuC&)4F3)DWf2_P1W3*|~?Ia6Nw?}@q&$2q);*@)(e+H`P zDQiD#c)EL|_L99fGjndN{d)PvblKj$6EoiIbvF5Cmuz14w0O~+V@J;Xee)`MUxwe} z&&++(c5j}jV}0Ix#?o7tZ=T8DXC=KyGG+0(xNk4tG_QE@Q+~JA?8o=!oja!LwaZF+ zy3S7%y}KF9CqCUS6RRC2bB!bPqTU@Y+02ngFFvU~|1>K%?by3(Zb?ZFtG5eI zxuh4~zqhJdarO3(zr7Z+uin0VyXM2^S8sF7-X2(@_vVjm^udg>^$Qm4zNzTW`2HE& zBBs7)Y|Lk^{EG9d&A+!+6c@Ko^D92gm)CcXZ9(?x?b_C#Y&c)GzRLS#Z|LeP1fIYySc=B#bLSJduMy2SIGNmKbDKHo3Pzy&rbGt8-9otI=|#ORq$K> zcIu>9PcG++m1_@apAi0%VQcw!=l@L4s#k};otS1Pu;AGzj`Po-N`{B;`r{`1JKVoU zH|*cbk5ixi);TJ5;S~F?aG5);Iwy~+)xMR~)O)=o)bU{7)~GL*vnBE+cBH)F3)s+} zcah`B5*6z+Va4$?`o9@iznI05Sb9RMCtu|D!WAnwZ2zZce8)Jl^3=)02LmT@b*Q$V za{R0IaIQjVcYjjw-}4upC)kUyFcoUt=wRx5t8Ak+Bj2(6sq!l4t%YuL%{5dd&E_Zk z?wPcrKcPLg_K~F8dTEvQ!qY-qHrdKsUk@tw-Q)T$a@#9QjY&&|*O^vquZ`V(bk}~@ z8^yCkXPH>EGnKF3Td!pD(JATt-lwfD{7nbBBi@KB7WGb3uQ{-oRnf?Et?rq`V!oKg zDXf&1(>7OSIi>SBi$(W@bmCV*xw3EmTAe$8nYbj)V?94H)+I~-9lPhguPbeZ z7F!ueO-(*OZ-wr>t+geepWksfxy^F_BS{gn_Kc%Fmd&f@Pj_dQ&5nw%Tb)sRUEsRW zT&EQU5({t4D^^*UaU)i`Luuc(V_Ys9Ez>U=fAcd|czgH`Hg>9W3D(HIYn5Tx>`;`rk zioYHa?qpcZB;W7-pi`Os=~Lxtu7`eZ*(vkIsu`4>|tdoY` z@2gx3clgZvtu*DzH_etw-|n;qWLhu0Gr6UxU$D!(al72Mnz(+WZ(n}pJl1$~YJNww zfR@s1<*H97FAG&n+H!VDaLUyeDwW&COs!lK@2uC6S{ytj^g^d?_1q2Gi3V1zD9p_SlfH<)uOfWw(G7HJ)J-AO1|^1 z{;oQ2_7@u8q|9Gve0#h7LSe@yIX?G|*E}Tn;(lz*W-bspf9t(q%F!cl4Za-KerRFh zY5l=~ zrPn;sNXoDM-B2ef`FwH3va+l`2ZICdowe4>KLl=07P`pw=#F%aOpt_F^d_!{%jTQ^ z&?uX){X^qhMcTu~RVB9{EWUMRQR!-4yJg3J&X9Y$IFISPP|i;go37+FauqVaYW6bj z=b8Q3komQ;%?E~*Wyd&Io|IM=n0b;_Y2x2#ftgPW_irj`IH9BGzNF$Dm(!}7(E>)f z>M2!oCR}YcxIO9KwD(P64t?uRi#znSHW}+iLX!3GM%1L>$%~7Fho4 zud2As)%W84wYi3N&wgALj_;mYUv=tx`DHh6hxWq^XUmFhxE9=;x9lx( z#Obs7%a@`HH)^`-ME{LEdEX*LzzR}!ybnD6)plLmi;mrjR&N}>Sci7K_`8AQp6JCl zk>|Z!Ht&sAnswGVKh>oA#MGaT`+mPXnXyg$>#2-y0sg$&>hH}>bB?J=>}8#^yGKHd zH+f6SokiI_)BcHMwn4mAa+E=ce}J?@8~1 z4=uiN?8OI`#fO>QPP>zjYJ+*f-kf4||+ zVl@NRJ&Qk_*mb0}yHtO^=)ASAN6KeUll^;fUb^nl>yvbTX|zpKd$PW6S$@ub{vL_b za=OoRy$uuDY~1;E$~JfZxVdD$O|dJ}zgNqSZ7|9RVw_%{Y=h@PtJ#uoFwDy>sUbe%_ z`pwes0*lq0eoNTy{c<@uyf$;je7Q4^wkApmId}j6k+P{;r<`(bX)pxJW$ymu(XZKG!jQjHWeU4pqJvGn%=cE=Ms3DBL+*!yfu;`y1I-@_mT~l#FAAxc;E+)#`taa9vx0}KJ|yhEEgVwS zd$urOk(y1)Rra8in=RfJX5Wq~)V$;?)9GNDDy#BGn}2_Y&k4S7bIcAaH`cDR)zke_ ztPnIo_K_v~#w$e$M^oR2PLxgh-s?O;l;icT<4>-t${L>BbbHsWY{lObWFOr;d&oE3 zJ?Agmy2Dw{WlN5yx>tpiy>Oq}bE9zkZ@18PnapVZ3G*787qoACt#U~0yD!T%_lP^b zr4?~bB_5CTsytlXRj#?TFZtJWN6l)HnSoSk@*-s|ZI|{6xjXS%Rvnqu39DalSi87a zIF*R>clAYFb~(PiO6;Pcyq-_?(__W|4<-kt#w}#uJ|i=|vZhe=Pv%zhqZ@g8bG@q6 zy!*nmf*w*gW1a!7CZHyZQf}aF!8ik*t$D81sh*3x!_wJ^<{PX`E|LdrfD{?L7Xd8)e}?52W7P_UzF%gH)#b zk*oM?8TJSL;kzCCcI!g>Cx%TW-&32InCEq0+EXHww%dtBQ~3c+>j|d__dL1ccK!{iC+E(CeilEjMrq}?z7t{vH0$fO#&+S z?pMs5H?6>CMVw6f>bA?T?gcnE)%3h)4)31iv&H(=f?)mSjlG}wbid0qs)$z4%{SiV zX&~R&QCWB@*tq*@(yDn&UwsQ+#N)s2@o~L%Z}&366rVb^Vji+JyZ3K;)s?c|os3j3ZA{%)Hf z2lM6h1*zvaF8kdLlRWS>OI%ItL(_SG9_D%ZhoVoIzciCS?6szXZ`U*4EWzo;8_wK% zA>wgc^Z!|~dFM|vt7>n)WwXC3=G3!O_O_aN&mVNX_^W*+*GeJpsGKx|aH00Md!cu_ z+PCHQzcjS?tbTOujq4E%h1TsRfr8ta^Yz8IH_x6_V9_zXFlW!o=xx(q=bv=Fu`uuO z<5y-f%kq*vgSY2wf4(#?Iata6=q%TB&lW!7>P`O5(a-g)`btr4zxI>dW3r#ja;I;< zAEf$eTIfQvz*Es5WjfOK#@*Pn?9sfXYPuy%SJvv>((BvFcgfcG|F3O)GmQc&wb^rJ z&n^|Wyj>L8Cem@CB|^e!%ObTK_rzu$Z~A}0q*D9lM!xM$H)NSb40G;x1_y+2#L7fJ zeY+#-vts_uY1;cwM1KsJxZU|m(!}jY%_^nmP1ydhanIELTVIu}>)veoHUFKK=QM4% z#_IWp)L%?!IriCNQTYAu_si5e+kV~OyQ)E`szcG!B|kDDxaImw-Q)?$J<~tBmu*d=l=Ya`1Ea4 z@WjuvWZtZ@+<1G|diP?zTWB-N^`$%d2cNFE`F>XOjo-ocBDbII z-+zEtFeW0k#P#9oQ!Y*(VNTAHZF-ZJ27arZT=b}9aoWW54u_Yn_X#nR7ATTE{nV<& z`D4`Lv=3)5s9e}=^wI89$DO}^r)F+tyV<3);XtA5i6xKk`v35n<@zMfvR6p#(t?Oz zm*#RL9(&yW`^w1`Moy0+p2ac$U%9eFIsU3okztfT`LBtY7flvBfBu>wvU|P!$5cf{ zHjU_cr+&PZD_+OFrmojk0m|M$GFRC#?@m1B&rr{tU7GqTyP z4WDY{_gpZY^gP6)eL1he3zKDQTAFg!eH5OsIhEhg`^hN}r`uxDmjjgQm>u~$&qm&# zLdT#aP!*Y1SghfRa3+`*&`RTeS&z$S*#XA}nM2bG~k1qSS{7ix3 z7qj`oGKtHi+44`st(~%az1Wp43pY)3JvR4QQTFGFC%+v|&~}^LsF&gQ?!Eef6Yjjr zpRi0j`_#^|@!Xu#XX78D}rzby*G0A3~+#4SqzO7u>dc-H(E; z3(s(RRzBz18F9%cTJB(E$>CFi7bo?v5&04|U)bZ)q&u^Bp80rS-KLD)S6impn&w+C zj4l1EEi9d?*t_YadC1jQFI?k)Fxc-pkUD|kiJ|)5S9;gQj^2HHLaW0P!$-K( zujfA&oBd3(V@kE|`Gzem53}A{E-Y2gI&`Vz)RXxe9QA7n0RTobb?iSFH=AB5B_qYZ_jI7RF=Q}9POO3;~Pi9lIuH-UN1cFk$&sy ztS)YlhlF1XPTgoK{n3HJ{=u88Z#EoSb*?_kjP3rHKUZ?J)dVjW+-$yl zCFPyA_|)2eH`~*GZu_NH_-oQ<4ZRl}%X_chICWgI;lTD+KT3|r>MW6zntf7cx%^p` z8wsh=Pd~+;+WO|?o3Fi3vm-4_8j3pSB`WdUj`IHM>+{fI&iT$YsT0h7?lpw4e{%oC zU0L;|F1b>{qc$d|;z`4i#fI(baRNKu`X2W`@+sgJ$MQ=O;s;)&?EBFce&wRvpTow% zZ@<@Hx@^sAt7RxUz3psg%txVxHcr0LGq zbuzoJt$whs^v%}iclh7-V-b^VK3~z>VGzF+n>i97iqdn zu!I^-*FB{hTk`jD>BM%WBU0ZxmhSed^to=aY0`zyRelrR9$|7fX^lx1J|XsYr`MB- zo3~Ba%ywte6Pr!j)~>#|ZK-s~nmgP62#b|maGP>z75|+{^(=R`t;pMbda73PmVa{` zWPHp`f-|qwCf}MEq_Z`za?N4RbfxL zPh@lPw^>~dh?-b-K=$aZ??zK%=gl{nJWG++@!4rp+tq?QoP)M4U=0p`Qo3{fIuB1a zyPYqWuFN~JK|w3|iOQ?))iz`Q%}j z_q@FQMa$lFtEK1()z<|ccJ$<3=_}U|%T#zY=Xk}E7|#NyWvs8h+8#I>@Xf+~qwd}7 zwkcN(w!LHiG>P4z-J8EAW@p_A)04~BI{sE#72n@hy>j0o>yL#G_@ACDYn_wTzkXNr zBj%#2op(0hO>bS3{`2tpPT3i?hxzXQJ;JAFf7Ij6gTp6h$xEJp!F4qKkVXH>)q8h_ zI=5?f>b`s0<+(F`uE*jXHaCub$Z36l^rTK~_$2RX5#3!2RQL86`_DUnAw^oQHzwAn zwuVLhXTj36vT8q*D3AuNh)9HoTlI_V(fVBeA|m_bxlS z*+MDu?-PBw4z-!*_Plk9TzL9@BZqBjPyb|@I143nRgtA@?ptpUO}RTc{;IFc3a@>q zlCAfiPPgRU!MaRPy?d6A?227m7w-77&F;yivRco}vU28qP9{Rs<2UA(n zvMrA5UbpfcQG3T5bobH51N=vKO-tfTxW8%9e79=94(T8{{Vfl;cRo8&nOd+Q({@$M zp27+3-}!gy-wu5w^?7A!R#RuUw9xZk3FdDnCAckkvHI?$g!2|`%@d0Lw62+CkS(uX zB*8QF#4E++qNaw+>d(DSc+#9HsmJFP(Xjzfq=t*$?qq z)fXQ7lsymJQJdYfGrfh$@^ui)$-8%^tGq9M5ULXO=HmVP?ky%l`9DuI+RGey&a%*O z-4=}&J@fRr>90)jzdD5o`=wC7p8cg84L6KF8*~;`rq6gX}kTz*&830zPEcC!PEOG z{PE<|ENpk5i2S^_eO}0HrkMub)+dX>`6Qy! zf6a#YINhDse;kmryLzbg|HW9{$Z1bCao*|8v8cg{GRC7qc_(y|eiko9B_t@8`K_Z)D4AZR^x& z8y1~?F;Cy-*NTUh^S*DC^*(Xd(%S#7xBe>eV;alntcW~XQjx#)_-hZv*K1Pi@2W6A zX8ZUyvgEzatlPN)+v^{Q2zjt^r*-?Od$(9`>*4x)<_-Uzkr#m&`5WgH>?$6`9mIa}iQccQ z?H9k)Jv@1H_37*m{lE9BdW^Pa^Iz=VcwNZn(PH1_7pot4%z9|HNq7Fnh5s@v&&#d( zny8ujao1V7llvcDp7rEJVq~!5r%PTBCiJb-T^RCAWuEdf?tNP#uYLJ_ecgh?d$zkyxusYrv?IOY-1!w8 z`a0LIO_*_*=jff!X|~KSPbE+NZG2>lQE6$ShSa-w=iH=}rlpp1OKKJRS|+UB)1=E+ zw4i&Fh2@$x-a3Y2yBG>?-FmF)QP}*|bM>c@F#NSr-~n|qt<`mHQC$^y!rn|TbK zAL~qiyKZg-*M&oU&+l&gd0}!?p<;yeCI8Fuvko0zZvXJqqswm(F)^OEJ-AM~arF^f z?(LKQ_S{K17`yi9T3?o*oITr~elU;hl@ySd@GF^k`e3{3ibA87rQej;CnUES@*Oz1 zEiR@`Gg0oajIKvnU;XAAr}tLed}~*rzwdQV@}Co=G1sHsr2eIYnhyY8#@j+x+Y(%X=gtC)@QfUv^&@5 z^6@yYnjdXhx2*Yd>+z>=9!#wE`*7n@d+l+?A2)un%PEK4`5hyWGY}k8Hu_mqg_wSyPuaOfL zGj8wiJARRY?}zx|Wb5}S4crxxzf%&#%yi^=1a1n1)jf{wKPS&+s{cUge!=R;%;zho zTo(%E)nBneLi9=DRtc}e&qMjxrkyA~`sdKW13JaeS0Ckjdq1e~UjKo4`Zn(lJe9n& zVX=9XJkJ@Utewq`+vgceNSssWohf%b-(P;p?K$B~7w_CzQ!Lxh^hD;FmAs0@t7hG> z+P#|@AMJc@Ej_2>_`JXc^E3Z``yZ)eeec`*w%dQxBadx*o%w%5iB{Uy`UhKYXa3(D zF>{?l!It`nTUpERGM|stU-vBYp8xOm)HP+d_6v5WhTFZB-*Nr#mimaYeM|{qv*#9Z zG75a)YWUp9-LSdQn?X*o^`TIMU&Q(zIY;&2-8a^4eSSMUAu?t9ix>ZsZvK9KboVxY zoB4fx$-%GU<##;uzjNI_?2Ac12g9;yrGf{#w{q~gFzBpt5ohFai*{#a*=O|NZ_?G> zjjtOj4yZxn$+UQ1OF{gK=48UcW$s)}{|nM2xmRRc2|3 zo+-~S_OhPGO~=wc_P=_!{v@7;D{Y$mCmBrcFH2orbJU0B&UEvyar|OO`>)N@XPY_I z`pxYng>EZVEoOf=p7-Xj&+g4WeVzJl#zlPh{<60XLSK93#C-Pg_e3CUQC@WRV$~F0LWtt}Qy?ZA&g371e zyFR!6Kecf3@2R!Ng66$H<=?DboAbG6m*aJD|KK9aDRZK=o)*6`xMBBBGGp7sj!%a^ zS+731ZLP`aHM{?57sWbv#TKpkRFl9TVjH}@{cPcU<*J;?!r3drzxvAWJ^U?@(_QZ3 z-xo`C?)?p0#@fs?U%02$c-HB6%av~a-L-U?;WLk8%+rGE<-Pf4-kuoqmfidQwg0CI zxWoRY+Fw{QS^Pb3UVlR6u2Rz7Y8BxX+rGy~&FZ{9QETaJ$7(f&Z`ZiD zx1>tU+9ALCx57Q&iqt>%>J1aEcO(h(d!!v+{HpvySp1w)nMc2mPPg8#{Q3E2nbt0pKs1O`oz#baPOb2lzXg~MQzq@wg0g5Pp3v7FMW;fUCyo3e6Td!Ka7qjL$6){gy^?t73_4$F6)$@&47U`G0HW#v3{7zUq_35!cNvT^er5&+u+5M33Lh1FHvL%j5+99p9?x%@!t7xw4zdg1FAu30$Y z(A1nwE45{Je-tY4SM}mGc0J}5D%EzTWsj)d8tueX<>Tu=w}#HDtTx-=H2ddc7VhKc z`uVT5OxX9K@H@ZF_fMjmewd!;6Jrx{o3qg2q^4z}%&abpe9@#WUSd~Yv0J~M`kniX z6(~3z4|TYIHm#TM)|C1E%X5OfPSjEs$vyY8S1!F6^!x#D@iot#D;mr_4k)crvP?>bUXK+Sy$Xue@@v&ENJT`u?())TnTGf&>%c|CAbM1qboR1>7gk>v4mU>06>S&8=a(MbiJ1fq7 zigPo+bFZSyRGe+)wkU9RVpdH2|KI%f28L-(g(AV4&l)t3HPF`CUvG;RX_jk zdp4+OfBvkuPnYf2T+)_YA3UdUpTW6%uWuf-lulpsYoF$x7r(#xR79R`HVl8az5UU$ zbsE1ya!huqDR(*b%(>ph!nY}5RY-gLw%mtvPE~SEjEM-EwCA?W^d0HqfrsiJ1lX?5 ze^h0pf75{7JL=~vna@?<{xwbv?|-*(_WHjs<}KpbXgBSi{&caFGa1Qd!jk-sF(0;s z9M`K(tKB!FX4>Y)r3$tC)Fb?SBBSE<%(mCe`Fe21?q`AXH=X&vIo9mtttA>F^R8=U zv5IOb?P`m2bN%w-+rQk*@yd`}l%=X|zmt}i~fwD6R${=Ub8QXAf6T%R#}&O)OHLYcdQ{%&=fbIc~{>fUcF7X931n>MB9 z-mS&IrUcIaxW8Src}^K`{jZ--i|sYvypd@8V0Urf%rDQS1V?*7@O5c_G3*<+E_E_L&Fvb^2OU6=QPC2^vS%bUQ@ zKBmc&cvszDxc#!7r{C`j*S2r}rvud*65olYphqYC~(_`aVy=Gdt7&U!vZ=#pJ|Na?^fD(nDLNh>ec60E%eU3 zmsstxBg*RBnYk6GEvmy#$CbQU{Z{eay=#$E8#1!nwUu}_&6kvWBQWc@scqEv<_8^j zYjWb^-h1!)SQLNy@rTaPl=A_bn$JuV%ktT)|DbDIBl|jU`QLpvc5JqPXc26DZjSJ^ zPn;X?y!t!!6kmC!^-hD{30LHHJ-MrTY*N(9GfU^Ly=S)V%#6fL9W|}K>k`Lz{QDfz zD;;rld-R(%jEiR)vT+tW@e(!l~vy=ZguRA?A|R_&oF0m%JrjK z6UwJ=yzIc6t?Qk5_0{8rf2B_A`7#~&w{r95FE#UTG!|XCdHbEZzUrI>TYY?AGO5nL zBX1G&?u<`=@V*6GttaOf?WlH-h&sE>EY9x4dB?W!-N$d$E4&X6XuI{_V}YRay7hI! zAH(g-|NG8cKQH=^TJ`t;ziyR&-2K$+lfAlg(-tB9c+CwG(?!GP_1uwZKd@_+`pLN~ zYJSfST=?m0tZ?$N02ACb&Ed;mYTje@wjKDsP>PL5s(S z`{onxm`ppM_-V%Hx3z9DM`u{Gd58BFcJ`#-nqSCPQSB)aS7p8LX5Q@VOLH>U-4S&; za<4cs=2~@5#gRE>_e7Q$t=|*Q`Z8C}dx44M->vtahyJ(S8?`Xb`_ocyd45Y9mzmOU zotM3n=vqJFZb?k>KNq*{m(TxqSg>f*riu-M)hpL#`~6-X|8P;o>r3m_)=jQmyF!IM z+iE@QvUodAnbltQ`x}Kg7qLq(ssn+GfOPWr~qU}IY5w)5qo*22}Vbt8)Bth{noR7K!+V;tR?GrHh;WZ z+Wy+^I^Xl>o<9>bLcio9gKRl*;A3X9{@9%_r z$>$*C>gzc)HTLmDXl^wyfj3dc|sT$t$5~p{pvV1kzq^ zFiZTpG^fR7l255YuKu2kpk)tlR97i3KBZKuw(?8Pvdi-r^p~CB+WJ;fmdn@Zm|9NG zRMEz~Bn#%wbyHJ5DT}BSH>WzL9P_haxhr+#lIo3#1(M%Nj5*~eU+q}O@t zu~R;mz8kf<^&Lr3nK_3^J*Rr6>q>@~iL0abJXV>Rtg`U-%ZA-Yo=rWpVNQm`7O`@+ zNiU^57j;)hmaS8{cGPqJq!c~&%cgS@cJBNjrQ64R`%q*ec^J(*JcU^DYzvXNGy0?8rGopQP8AMZQC=|)Cs3}cozw_PqmVcZxz4( z&X%+BW*po3_bJ=<_FRofYqe@Vb1GG(I$UU%n8WGTm76bjE^(Z=<>fJjS#`{FbvN?7 z`lDjIEaKPJs+oR9rTWHUXCf6H6ejQduf)^#SefJPmh4jnxw|+;PbM7WxZh>5GXB!5 zz2+);Tlf>t*?rsB-*54%EOsK-QhBGpwr`s@82%M7+_`4wp3)ti*Jmo!{&*Nw7`vx) z!>fw>oJX!rUt?0RFR%IYtv?fP{(33IyY80Vg1#M9ofa$?KQe~BDKQn$|HpS|L$u>9 zk45nbML!KVZl9>`3vWIy^J_y)i|=7c8HTtUu_^27Ttbo$$(c{MQ{|$^cCt1uAuWA@ znacB?)6=gAZhy1Lb4j1^1IMbj^DU!po3>|`)_O#jd2x13pDBJ(?)l2SYLS=po7Pyq zUKyxx)#+xKii1Gb2j3M3+pjgQsaiST;hlTNvoG@+TC{3}HOp45FxY*Tf9A>?%A1xr z+ztONaPQ}Z^a+Yzo!6`lzRDVw@zwd(|DEe5zwru^;96jPN_a(j;8xID-WzOZFPSqh z`uSnP3p*~Ml8*w>CGrZIQ-!xb$$I~HX45U>))fASe)sP$);yZRTj;Y{?4BY&`!dCn zd#~nHXnGkP;b?#D)=(gN*D&S#u0OWkmft6?Rjl!Q5K(qyO52Y*zn4>Vzjb_#(l%Ve zbN%0K=a#p2|AU*7PL$30|ES{foqRv%A0qP0H+bC4>UWth8g6+gbn7vJn>(&Mbu8Jz z(^2ti&J@{i9=YZ(UuFE~ny>WQf0wc<^d;Cf{^^k9 z?<@^pd$qsLUv~D{H1jE%-uxf7v*q;syr2`-tYx-j*AcNN?N@$^^mFVwx__0`(%VPf zB?M0J3zl^EXXt(vaqpiZv{x1Hir@0RXYl5&1?c&`ZKq(@%PPVdW{ zirBe%6Av;Q8M&>B_^fzrM*9Rq%{sed^I4MRoUFCWs`lHTto5%lx6ypVT;jMd{^LEv z?Jn1JQa`mZOBsfPN9h6LT1 zkhk{Vt(zhbZC#knj~mXoF!w6&#hnwl6E9Dk_l@7kdzF>8pxq{`u>8bBCZT*zXL3Bs zeKq&}4!>x1C%MZh=e_b>GuuO5)i;0McAdZ9xj^34cXE(w{K59)XBW>aUQ2G$9Cr{{gNOEcb4xAgXA?^RL9ZQ2&=wR$f5^3Q7_v)B9kX*;%F z>VMH`{N98qE zF7`I(Z`ohUeW@C0%aQhPg0iVyjmP#?sw=!-)mHFs{MTt5yv025?~Q$JCF`S_Dpsam z>HaPD(&UV~YuOc}?WRXWK3hc1y)|9_nIqSgy6az^^ymIjd47D89#{OuUc;_6D_->2 zs{G=3TH~{4%HqAXDRcb~YJ7b)p;&Iw^Tz^F)2s?>9VFx`BV}&3xyL=9<*@%Zhql~@ z#mv7>a$jrBxVA>ceUbC0X?K^$u5(FozB*fW($1)Q*Q(GviyE_eY<;&f&TY`_Xv&iN z)w5^)O}+1?S3g{ka=P1d!9HZs)w-|8cODQs#_?$JF2`QQ--j1OomY*tdm-i2q^@RS zsktY&BgdxjTb28&yOpWNZn{s}gWKnQc31>ybmBIX((TnY2`Iek$1e?XY%vPKV|*#VO)(b5-Y6THe!M z&G}GK<+)UdjHXO=htWP`zlki|RR^;dhD<&9+T%*t@5v{+vllL5In}*l`2)o#Gmc-( zcPTY9bkUye712NAqk#FDWEuA|-R0gzOEsSzyyf>Gf3Je*ozOx>uAq>Tj;ns&592@f zW@bFj)at0PDEPdz8brf+8u(57K=8uwsZW8+h0H5|FgQKhAkY|4T@62i}(T#A6E=f+I=Xl z{m4%d?!e8T_x!5i(9HYlD)aF3Gx=A2vFfiF-nLG%H@P(>)|HWeW%KG?F(sO_fAM`+ z6_qk^N#gnR?`ZzYs{xNr%$u@GPHzR*4F!+IB1V#jjwMg2tBy&2<-F%Q=Qr2RJ@rou zTLiU!b9C}P>=hTt`5Ajx@SRS_+SpPqw~e1Ba#Srj#JZS6acWTe1MMdj_m$?TFZMhJMYQYPx}AMpjcK(;GU6-mDZ-Tmmf4b z<9^pqvNxHZy|1*Tdg=W|E!mGID__(8J1xS_?X7D6lQQ!&kJCerT}*d=;_;_Ti}&TS zfSvt!m96Jh8gYJ;a+=FqzqrW%@)U(Vty*DjSDAy4e2ANSi*@0@Lt!xo+qT9Y-@!kz z_q)nu<%7Xx52mkR)=Yh>=*xV_;Kk;;JyTO_w)$T;-RZhdV$rGdE7mMMZ}da>_=5GD zd!{eiU+r?v>!;)t?WNwIY=U>semwQ$zGWrvmu-!#bFpH{-E1^EmJ8PW`ERb>$BM%S*1zm;c91Ke;tUo6q%mrfbv(agK$@+NA2t zSN)lPEl^nSfQIomX1x`*ht$RH9*|nIDo*6w_4X-e)Q-fui7({(B3+kqb<$0Suhk!& z!|WUPEoph{>GJ(+VM)Zp_6afh7sQ0vZ@e~Q>G<+@pZAq(yh(FxzdLMwoobVB`Ja)y zsr2Sf_Lf|`l+|we|DYU1&N0CAV>Qw+AAQ$Ng{ zoHp^*4tu8S7qm7>|Ck`Wz_jPq<~y@9=Koes`?|{X6|ctcBm6i27OfIvR{F&-wd#k= zr6bE@vJcIzS=%^ca@CI&^O%#?so(TadS`lgw#7-;5Bp8{{uxQXnIgr0Aw=qh_N2TH zfm`~Kn!4(LO=)wPC2&h^{TVSna-97Tr7vQnF)oH=&? zon$v-Rd~y?C%evFxqHO8uRdF$X{NkWjJ|&5o+N=w(?5K9o#JVI_eguJy7HbHyCXku ziClcje^cxFaphgFo-WQ3@3^>?Wuoy@#Vd0Ea-4K>t2*3E6i?Z>{+~2)(|0xNDakI2 zmflod^jcL!lj+heX_e{+t|4g?rS52?W^aV?24*seluC- z(Q3VpRmRtyE3P}Qd?nEFp8L&}%Z_QH0uyreCvNl0&Oex=^<@HwBj47D`^V;I*r|v_ z3EW-X+4f<7hwEG(qe&Wbp7Ku!U1GZWoD6sVrY(IB-}>q({Zx1%x>=87zv;sO1M!=g zb1$6aJj7elytZ_9K$GJRwRzn+GoLRzQM9|!^{~Y^h330*n|9nYN&n?KaqeaLNpD4# zn66%QWqWen5!-j|_34pJj;8UO78|%O)`-nMv2)82PmRxB_Ekq#s7>#d@D^IQXW>GQ zSH1x(E6Z|EMHp$k-}kVe+y*Uq8HNORYKdn(gvyqbtz@ z6IX5`(p{(SpZsH$ z>Fvvh`aT)GRoW00Cd?DFwAW$Lr8`G<#+_Tav7$%HM_(y--L0d|-p2P`s?N^vTw?Oq zb;(-i*|RjRuG`=#;1a(7uY1Sors6kh`}7(fXc@Gbdc@Z1c3#`PP~4VV!GDi&ZsDZ6 zM>a8ha@q2cIjxOVM(K)*(Q~!k(>%B|MEdHDj{8km%y`0&@u)G+FCpLOiV{a=g*j~SluO63nbx*Oe<7jGH!6E9{_I|q0dTIW(w-3~$@JG&klreo)ygJ9Gwfqll zB+bva3!gduJ>SbY!P_s&F>Kn3DQl+t_ zVP1mc<*&}^Vq8bmUTxc}Qoc5%*7e(}^xiARjw+MCZ)dxt*;^xY&Ti|bePR<$Zg`q3 zetRdiq~_Iq`xPHE{yu*1(P{VZ-}Cb!B~vUiBD=2t|2wly`;zz{bH_BE6Q?rOJG^qa z)I~jAH|y-qn-E~ask2@S(*^#}Xf&DPMgmTx?F>xze)fl(P4Cc8|sx9Niz*B%9S=dlR+kZ}GZi1l}c5=7wfKA-LK%hdo?gzk=0;pQ}|QoRmwGw1zJ}2P4x6NTWeh5 z=<tx9~wStMNMPX6`cfSd|7CQD#@t*1%=Q7XN z@x086>+)UeHI!`R7oDCTyX{L<^OES#ic88w0vN8mP(owxS zHdD}3=&a+c0F~uOwD)oz?@%^$t-1Eb!|&kiUuGIH6XzsFCUi^OI(u!R@9GZs3e8#9 zw9FSwX*CEvVYE=qxN5_rXf@xkl;vL2wkXM@#xC^FF}*o)Zou)sIw9L7YOY>pa!sn* zbm5BpgT%)dcE;W7DQXXPGX2)8d%RuNt9Pa66eACv%m2B!mH0WO6aGwYTfuh^}~ol(Th$Gv!N|9eBBKpEaR`{Nop zdl$bxm6f!yCAdxe!;2*sziZ656qGYeUEsdtAD6(yos0iGzag#i$e`o8c6!Ke3yJa{ z@48-074(0gRx#Jb(K}b@K;mqLeXk{^n6=Dx;a$0dO;M%G<=ynfX+C)jCvMtGZ(wsY z*7rXD0b6%*&7wJEhlFc${xu})#fAf;fr@$=N_<&?vD9)$gd&ce6*0s7QrR?oOUy}QS}q>+#&TNQv~RI%e=X;fdcA*>ftS!Li8+dXPd$IF%jmeutft%K zl>N+Okg%e%m#X}c z&))e{(ly>tFmJ2sE>=!6iqe{(FT$6?ds9tOC}6>!hf15yaLiqjyGSw4X(#Xd zk4ING@O;}NJo}PymKZnlf;AZmwOds7RmbhQZj-H_J=>#WwL{*^7lP3f^PIMB^*v<6 zdDQGp$UAZM#1Bk82IUGop$*^8vV1EP^7wz>%I>(@-=0XF0tVebdjj&VzkSkDBz;fs zuZ_oYcIJs!C-Jx$oH#R6aeKDEj^Gm~{_N^{O<#p~i)9*%q}#n7D+*DVi=z320c~ms| z1arqU<%jl%P+Qn@VFD-|AZ5!`9JYHg0unMp7Dq;96! zbkrN37r(}t@>bd{jkC%4*K0@v5woWe6*8KJ(n~W^d*)c_R&x)&q0$ zj20a!+ZENHXXK^R(SIqvX^rUTCwT?Cdy*T<7`$T`b0%}_Go8%SX87yISNAR3+h?p% z2yC<}y)L&Y;+BI=%OdBrrM509%_YSQB?qQvoX%I0w`wi3ZJ9d9MY++sl%g>%!bCyG7clf*vW zpE>`vV)nJln)DFWPg|=+igPj*HBKzPzj(%~*LGr?Z~j$0{B_^Fi)B;d%f04)DBI7n z^hlWErr5V%7b%?el4&T3!UtoxX3o>iw^vlQN~HVs82^jSEuGS6tHM z{}{;@_%=RiublVxpL@6WSWNgSaOIWtc84uz+at6ittGPGDklG&`?@(>#6dWFx*fxo z+7H|tTK=1`ee2OpWz3FKe(_>j=!Ld>r_XJ(KIP>W|NWigGVxZ%k7tg`N4ge0aIoLp zZgTlIr$be!;;%4WF6Kq6_&OD(E+cWsaqW9-{oHzU-8vxTjYORjSk=1j^$oy2`|K-{So(lbMVswd!w+EnoA!{ z6$x^CT65ylZZ2)^hr5E@RCB)ZZae+&YMDUxw+Xom>-!ue^FJ#ZPd2V?xzw|*eZ|__ zwGA^~zKs;Q7X4On@z>KYG}abY+ui)PNnrgo_LQ@69M;ozIr3UZo{;$ZqKj>XtxNEo zbFG2dUlnir|9f}$kl(!pH*;q&w0-4Tw)NA!fb{By*E)&Ko7TFn6WzJO^pDNl$G*RG zMEz&ZeXaPAtA61*Q?H8`r*8X@Kc#lPDYKw%>7{^tW9xdCwRcytZ;HC;>CAd<(q#qP zsW07+g-)vtSfJS%2bpD^)Pk#9>?fZS=sgxYiuZqUyH}+3`a$}8rWT;|Ta;s$Mo^?S~)igwfpJrwI7d3&YWF4c5Y z@4R4oQSxe_aAfXNX^}JE8m2MLu4GmE`N00t^9r}0T9%swc#2P_Px*Uum;B72oV!W> zFZl&^A8{JZvPpSm?2#TgQg0&v!HF}mSNP5dH`YtV8F>Qsj zK*C?Y;z@a*6*rrBsI2aF`f`4sOVETfKZSnheZOPxF?mh*`6qZ?Hu%^0nD4wq%k=wx`^=|YIsN-%zNfLSvg7vKNt0T#t&UA`G1W=E z5h*m8z2elBH;w`~c7EyK@@Tu~k{`K~CW>$NwK_OwFVkP99cxs~{wU7-cRP1~O7n)k zpA*bp*}TZSRR7gPo2k=|JY6s?{qbkzUQg2i&lEMmxCF&!LBovX>Pfi|xo!#? zMAVnXm@knOUN7)7Y3)6m&hqLL+bSR5&Yq;u9x;tOQ||MbWu9$k+kL9tXI{B#TH~WQ zcT>gN$n7e3)LR*Uy6u!tn>Qu8_11azHJ{)7w3zV!s=Si(smX`V@4EZ3g=?bf_ah6I zhVJd0-)5XFIqmuyfslzlvnLB*X#76;;;W#2`rmKymaOaDl<3jwWhpX6vG_?0>!-i7 zpZ=Thq1a~0XSemy?2%>l%0Je=cAhmoP+`)xW^T%s)o6{YSr`0}yla`vOsJnejod?#giG5%hqp!Qc$ zuGxmqwO{;q@&>j{D>)^p^38{o8{V+H>71FX&@?4&lK76>+@qnatPXKBc)2`e`q)984sdherbg=T?b@?Eu0 zwNVqE{uG|L{9Q7CXp*rk``Sx7ds(EE0~HUubuN-xvY2gc;=^5zH_rcz{pIkuXSL=3 z-F?3gHwE}}G99u!-xj_uW+lghO_#%;3S?{6vRh?mmtSh$@*+rH(*IS5f=JS5!F}9( z|F5o?km=dS_I{=6M6snci!SuKYqz*--FcY0s`bpdm$DCzSnb&%RI@|utCk6t>{@(|Cwnvk{z7)+u8ymF1l}j&bVMk zNu0uV??d&*UM#A~zjbWP8(VW&HPkn|zEI^Cy>uw`*yO9fo#PfB=9-!4a(?o&nH%jc zn4a}km~vK;AGyO4cO-ag{-$b)-Ibf2e%uVSE6&?w|HSu>{mwl%coNh)9X`eC%(c-y zA!nMeH2KmonZ>8dQ|jEO?%;}Kt%;SZnbG$}^5J0XD>bSexKItoR*@~a8L7LT-@dtmTW!IY1b2*?Y1}mPW=;}i2@^cGbY?TmA(kJ4UH?3FaZbh(O>s@vgxwfwWfuFp_Czwlm{?%UU*SGgzN z(QsH3tUBvguaczJi%HuL?wvZj;Pc%6<|fY9n~c*JCEF=CyOmopm3W^`*=4=m$;9fJ zbjn1Pjk>cQdVFWN6qLl+Gf#-=36I1?6NNS3XRsD5+bVu$nh#^g)|5|bT%qr7@+`1F zDcQs`%}Il8ZL!Vw=TRp*uG{ImzCZA7qNMeFjXL)oo7qC$_fDA5tA8SGpKip1iCugx zr~e+jm&F;h(P_=nomsD{V<$!^#BwcYzx>>_^Qk76%bRQE4UzwD*&6zW2>0^LQeDn` zC@@ZbVrBM+Ifm+WN0R(%w%(br&Uoc+#rR~cPBk7Ut=58wX~L{~^QV5fBYegFw z%zZM|jW2X7{kEy^@7x-#_rmcMxA-MhcSoz}-SVwH>AuGgCkQeX#jV<(mha!-_hy#h zOUVoDyPtWeXWwCdxtH~&TX&CH^9Ji#E=QJ{xXyfj(lwxd)yv2)m#1(`)-Dk~G`(`3 ziqgV$&)4qBTRGuo)h=!y9aY^QTYt-M%>1r;IH7mq!NTwAY_IOGoUl^U_siE$`U@=X z{@gR+SJ(l=ck1c^5B-eS#_vhL+$@?-q z+~)6il&*;(Qj_~XTQv;Y5`UOUCRdmq+aw5a57lFQHM;fF<*Xv_Q)KJ}ivC9-Ow= zI^*@ly=i<}*<}-JvoGwQ$|X6g@6F{v{e=Z_iYy8f4V zr)?5ER}fb6{w#yp`AHAIyUWg>)AZpMo2I62N5!kgGgIgIUAfvi!RqlFW7~@kDer10 zJX!bQ$c_fNC6%p>9X$$npX*JUYCZeHs|OiPWhbl@)D*0wPiMWXi%subH*KAFzPaJ{ zQU#&)e$io$Y59)3wwE}$3){MwWxjP;yUerhtys%WzL6|Y|~9|tMA;C)1+^}ow3U^ zMsuIX^DX){o$q4rh~_Dsy;SP>efG2!H!W{9d$bpK_aue2#I-u><9^7p!LU#n#>%5#~&Sk$_}`@K|EltAB#Vu|^gm#iJ5 zBDpuVzY8+q(0sq*oUO;=TJzkmX6kddtdZ32omgV+d**1_9VdoIu_6sma~3ZYT_~qu z_HEWO>lKcP+n&wH5_s`n>9dYxE%()LJN!=YihFDqYnlGHJ?+L#w`pMx;g4h$ws~tS zG!}|a2$0;aF-v;;v_&4_C2!3#rM|l56X^bmUB#)yXBek)oF#% z>#li5A7VHyG`;z#vshyc`@)U48*kif-&@~!rgG6V)?z2dwCg-;{vR)$nd&XnvwOAb2E(&b%z5Zu{WtQmr7wnNMx9;D&aH}NCa~Veb;=6wj@lfvp@aPV1&_)p;Cm%KAa{c;br9 zr8877s+8#}1?jiDL|#`qA$N2b2XP%#o_?xPK(kHrX;=U(OFS;zbHnZB~ zV#uxUnI1aF1ed5(&%Nm&v{Gb-tqx~V`g#>*Ud@vyrZL?A-ZXWu)SSQfd{=E`h}7Ts z?yAyjfzI;vVRKneZri+FmD9R9a*LNiM*4YoqvJPMPh9iPQ9j!D%f<5&m%l2m+j{QB z=>@-zrO!QajN9+vE1QZ_6ZmHa^&T+GKU8gbec|T4=be8}UA$lAW9fbVL$@C9a&9U8 z7M-u|V3hWiE%ckmvUq*3zrBlBOvrF6mKI_1K3Wkg(YZWH;mmJWRadX6no-sVZw577 z-Q=!eRB>ABFaQ4D#x1|=&9=1(RJUvE&U{$-N7l*zkfP#ywLQ$q3$mMYvUw+`yYkBD zHs8?s8#D2sf?19K{^<(b*&xKuhV>dE>>QbIZD0 z{JyDmpW;r6EcQ_Ow)6XfPjTWrk2anA&5~HT+u=!UGT#{L z#_3~$4HCFp>niV|r}MV**@B~YuQM*(x$e4mU~zVsq`%P2sSmEn^Icr(zdP*P z!lkPJCY{Ya0h?&r+~Y0XQV6&=Lh{8}M;Ev4j9uj%YHq04W+@?Bz=xK>=E`d;zU|IY`ASF;UK<7#2@eAxT_DoH@@O0BW zg@$9+C*@CX+TuDpXYH$P(QFaY%#Bgk8+av;bR7+EKB*oMQyi~9iT9~js8Lb(h58p~ z{^%s|B+CA;iq2Y>7P;)3*i8}6DS2;iw;sE6;Gy=ZB&MD%EGzP#Dm$cYleF-$oZ@&< z*ZQ_y(uD`d5)XJ*l+5z0FE8pka=x|c$cnt9uUOUo=E~Sgo;-2x-TBt0H902p%)dB1 z(L8@si*3>L&x{5i7e7||sG)sVRYXPNV7>Z0i=#K41bT9eZ@m=0kn!git5D?TT|Hbj z0&DA*y_RW6&1PS?Dudx>u-|Dup?kIwM}M@u`e$YRPxkJKz5lPTh`XT0PfdKNj*=! zbh+wilBE0u-}|Q-{>>KN6L&QF>Q)CA?PqI?I1`NOrp{ey9@&vQN#iS%;40=jFSS}{ zf7vqeWooVYmD@!d4&R$wePdx5jCBQJ*k5@80R=v|Eb$+S4_6tiT-^cAl&oA6fM7BQL7J!crr&; z9uAmSr+z9|^U#ag4fodh{ErQjJ#cq&kI~`DMbVW8R+9s>pIhvToRnC|%22yD_9uV* z?6pVr|J$a1?aAiKi}}f4S*x|7e7RB9f93EMhi{ZgO!uGjWox0UmCJNhrX|_Omb?g4 zzt+a*k~&9Lt>dkQwX?wet>>jw8+rfrMEb8?T<@~w+-5H$$2XGlkJj8*DBh=? zzp^y!sEkKTOtJt&;Qgz|7*f{#5U^s3UGXM*)`@kc^S%m2KQ`_Tdm$&hCXL;(!>FQv zs^a=*@{3C1Ri1h~NGvk{xW{>k`_5L=%h%?xa86qIYc}iAiytMG73GtR>^A?|edgZx zuu0PkCR;xKrQ?}jy^dMi>Zx(}+ef~0e6O2!GghwS(a-wcnz`(ZZQHxwa*MU(ldSAF zJH6YhGxwk6=}UF<)0auyYh-wt99$|G`zf;W{9i@Kx7Oc2Z8@NFuiEkY89NvI?TuHY z%U1+lf8?dMWaq7^%dDpwUEU(acgk=1gV{SKZ1i*dt1MKtcF$&R>&cVi3hO;`c3+xe zq$Y1<&*{FoVm-5D@oqnfpRXqv3d~pC(!V!(TP%}j@x<+2@3j{$y)IdF%J{^VY}r{; z(&txCe4#pFjamO3^(FtW{L)*Q#I@=0d25kVGv4*#?BXz)A#KdP@K)2$tZt{U2;W>)ZQyu7vex`yMzmD1E^1}rNw(lk8mrl7jpSRiK z_(muX!zVYWj}G7yIT(6@9;QEbg6X%Xgn3t|{kq{(nBq-EzmA(~)O)p7ba6 z>GJH6M(6rGUa3OpS#<8({Wm;o zenqZsI)3cv7w2VbtApG)gO)v-$lLy_vQFUgYFUPx{<(ic<{#sGC+Bqf`EzNFtDCnx zH_SC!+~oUruB!IAfb_@H9e+=E%Hgwid}f`pUc2$-F)=NR5EAF9lxhx zX|7vE-d%KAb7k(VIG4>CNB95aGu*tGKhfKKm5a-jmtn2yo-3I;-)-*E_`1bP_-gqz zujnt~zZ|ywo+)2=akFvYs^?bLGN~2wb0(+m2 z>sExxo^D%k%GqV5*%ZH!bZO@H%v|l0AO6U)*L6o-a0m$h&0#V1+ZMeQI&Y`O*ty5N zpWey!*hIRKbL%!yme5;oe?GLY;&{sYKke;bp2X~%kL(4vepd9Zdhsyk?bq6EZbtQi z6XvXWydvh#GY=_-G_OuF zbV<8z^t#33ZO{(iHs#!ZeGfg7Wq&+U*tPf@@4n=m<%hf1C#_g>Rq9pBB%2h$Q1KTn zYpw>gsc((qo$E1eV@OHcnYLq>cO|b8H!F)gd+3-Vli#x`Q8(x4eA%}D)G-6;&l4=u zh2*~VOnfX>mz>~!-1*qX=>3s(!PcuZTu&IjOSMm_-}w8Nvd_03!LGZS@$B;&Zt3g@ zs6BC|E=@z*Hf8r+xXn7x_}a}t@0)j59I^(duajd17$#kHS&79}Uv zb3fjGQT^k#vZVhnyHnkct?Par*So{iSDh^q zdo9kEwI=%SblraYvTN?N*V*5~&9^UDAC{}<9Di7*f9s?PYqI+0=495+5}r2g&xYl{ z6_2f5nrO2AVfa2@&u8L~ro<{Qw)mhZVmp2E-@va1em}m%y!*7sk=3xeBS_f0%{Vew z_DZ*aw@JI>vs0g4E+%Pw$xCl@3ZCfi_Hh1N=Y<=>Sf>X5^yWXh;=YqKCTxI1sIT;7nFY$iz@cbOkn5@kU6t4Ygy-=up^p4Gw{myQiHTlAJ zt^fPh+r;;Cx%j=8$Di%kEOGr_hu_+Hz6-Yh@KY&Xv*-NUgfrq-Bfk~Or~53K_@;RJ zT!G_Oho+^-@8^CvLB;5pv&g4_w4HP6zD#($PciT{)8=-8kH(qK+)|Dv*UmQ`h}z8~ z9^qU3>*(U$bJjguH}{Na|2`wXr#BWpdc(pbeQ>d)q~7w$a!SU{1@|In+0Hn-dsC|L zH2GKVva55K9ycuARF<9K;?HWyduCU1N`L!`qdIYl>>HNv?k%kMT3x%#-7b~wj;HtU z*dt#)@lFin?dZE@!};%0m3i0x9essHDOZ`TXI_ePQ)G(rf6T)7aQjZ?XQA?Li%q8d z4%S#Vb$!T{t_%j9Pce!+Rv+t}{Iyrgo9p59SwE#tg$czv|M-0>>G4d~)-}~T*JZsn z6Y1K0t9GYl?$N-90*@wH3LQE*ZNdY=caevWigT7NiadJ5O(^+is9o#5qPOlM>*}r= zy=f_{PgtS7{dvo-Z4u>*-oAaXd`p?TmwUx)zlVps4wi4y5IX-&)>&(7oz|8qx65}2 zpIwxu<>{yT$2joSp_y*01s-Ot775xl&+zr!E$%vhTocO<-7Nn*P4L}m2lJnb#p}&Z zry9Mgt!wCLi7Pbc?>Wh}gQxU%k@+?RRb@iMOOWxTDc&hzJ95er?{ zD_ObUuzS|e5~s5r8a+#GoFkMgEqHo`V?QfSduHsPV_+1;d}D%8i2a?DvsUj}%RI|e zhUb<>ZA;JH#(BU0a%-wzcYdZ+x5EFHz#S9WO-ClJ$+vA$I+9%N@bICbv&*aIKkG`*8UF7tO!S3NJrYYZFFQ0I&!ZL8?|0!i> zJ3Vi6>KXsqF3F$%qxV+h-SRZK;wfT>4cDaY7rqx%e4${2*e1U>vsF`iSFxIjAH1#Y zdc}I?6`8KdshhbrOy0XDOthKfU3-Su=aM~aqFbU4&f&={J%4ga?AtZMvjU%LT)MB& z9LBrOk!@?3ck{w0>H24j=FLC)KTUL>vci;K6Lyx*-)uJ3DOtcP`}=Xh`3CMkeLhUT z^X}N+rCZw$9{D|g$3>pR6`9%mJXxpSDlc5NIach;m0PI?PD~_ukEJzOc?rpv8O6gL+TnlhtY$xAY0BE4U?kT^CE! zgdAdNDVZj~aMLu8AtkGmQ$SQpks--Qs<3s=+jENTe*_+V^?77?t5dN(<`SdJ<@xQ8 z)|~HsXkKs0XHfQ1lwn!n$&3l9A-@a-y!?ekWm;B>q%#C+Z)0`2?0s&BfA|T}sp7HO z6BNVVsGXP<`i0-K_@8q1H7>qGGNHw1t=-zE1aT)RztZr&Gv8a~d{DNdTgAyUeBwt; zroRYi4iG9?;rMOdQii4z8-06cOq;}!()fiyPF$) z`>wX@y@z*CEAOba%t?zsYI^C1qR-=*M=MW%S6#69?M2%+raqFal6tdO@7vkD^VTlE zX$611)PGw9Zi(fb@s{DAvQW9|>vI>A=U&idEtIsaRt^pm%8=l2_2E;QAuA*%({gU^ z;@DlU-^ji`u_O5hcT)7E6NN1WT-Kd(#ov`b@6kTdGrh>DPkL?gvZ!duTT=Iz-k$Vk z>-@-?D+|}@6wWDizi~%&$9$V_U(AnA6^*)m!e;xs$x0LEToril!XU{xFxtFegDi)j@YhOaHI1MH~EC zeixS;^`@50yCJ`B+j85rDH?vwXW~4sUF1qBW3oE*ptb0Y%5M&5lZB2cePwfMp9qEv za=krZaqfHO6ZS1-+iyQA?lR&$zv}JMA0pd?Up?+?TyeFe;l?>F5kJ3Q|1>W&T+2G^ z;_-IXrl%>FYEE35Fny2I^|-6cnCgCKU+sG2a*p@^Rc>{yuq&w!RZD$8?VcAh%VC0M zu4u&hTjv_z9DI8q;NAu4sOcQ-`yxVI)u-($(7&?x`S#g*J3ghwD9>tMlYebb@q|qu z*k8OlvP@;pst?hwIa_+lpN6hJX_XkU^IVaUU+wQ;BlY0hR(@eec#nqqc<5hGDLu4O z#D39cm-{X8Px)IrKcBT}=h5FYjcavV6*%_qdiP|(ht;1ZY%F@J8PXE=n?*$D8{d_;k*U*8 zOxw^{F)_%QYyYd<Pb9xI?y^frJJFpV@(I|UT2Y%yr-?&Ywu1xo>*Le z(re-7wK+m;?#ds?^M9Zui&I7i&5%+}~Qt0Ol}%VAgU%dmSn_72-r{(hM~L0$Rl?R}9c zIqqV%OT`ziW!e{NaI!B-W$k>=U8#(or^AkH`_y()%5~W(JxqmNcPq}hvtJgkJJNM63Zr4-=er?$ss$}fFU2&l(P&-p0ms#6I)&gZ zTd0w4>SvVvTez^~ z7MC4IHmm0~e}TVl+|nJspLrRAFC7gzeo%3pWm|pnwMW%G4lj22bbAXvN{dp-S#7g< z%FBDQM}GLRapr#gEv>R;>iZ`m9-0?x#T5?Ey2`jP>!#Kh)jc_O`CH=^vbMixH;6rN z6#RVi)n9M+m2EMcZ+4i^sOtmcmY`{;TADgcc1ypVc)|GCtmXY`r{7of#Pu#c+c;JC ze*He_ORwH?A3C{BVnRSzwmxg>+?!ETHCYW$i!V3r`f+00=jgDMw=WLa$Ip|n+I3j$ zb!}OPYNww$XZ>eM<=fp4V_vzw`5C+S_51DK@{FOeUj%L${@z}^V%4^}h3b0zf#*M; z>+1Zlc4y!E&71r)@AuwT%PVKzbofVp*orK(y`QCBZ>)LS`bYlPnN1&cY_8ru>|nEf z#l4i8pL1d+GRt0J|G*cx=lmn3O+O-!rPypvdwJl#PI+zGTBUTJlBu_iE?k`%zH3vC z_l=Ou>CE%JZpn!pniXj9W{q|EC1u?+U27(q|C)NBWz(}mDT_}SR2`es@ke>n$@`}! zggs4{4bJ+=nj5>?Rd`G3+25^)k8|FYmr^V0wVq{?leK%ELSA`HM#gHJ+p-4e!vlPnjk*M_=~;E9F;=jMw~XIAZ7Vd+o9n zo0AbHDsbx-*Hzy_)`xF*ZCEU$w0qgZIbWl}vD&ge<<_goHOzaiX>2H4@Ob0Cnl}?dZ>8{QIYoC4bT`Ny=nCL) zwV2E0?~(f@&ap%!@Z8!P=VurQJMNh$AN2ZX=;d=d^Z#yi&MIYRxmtTuFWJ$C*OcRI zSjm;LkGq2pZe#B>2)8@pljqHBbb9@X{HGO@Pp{IxvVA+Bg7eRHCl&srPF?o?%%n|; zsoD-(WDece5#Hx*c_L+z-i{4CLRR8JOGY7YqhkojuSbzU$oOA8<*i?s-Te{^^ zue{%~Jxto|r=XxCe(qSv;UiJ(CT`Z;hYrdqSpAmyy+*eDt=*@4l8PZwF{f5%%YXjG z;Cw-UZ|J>!Yo~-iXxPx>J%QoK-##;eyIS8SYfRXg`_6xn!=3zv8#ZkCw>;oub^QDL z`L~|F&tPDft`U)D(~)=b=)#vinl*4HuxU=H z@08XrUe@PbA1MCY-kB5bXdPVCGu8B3W!Su1TANyBuDAY_+#Gi8qeuA!PFd~CX*Vqz zCY-4KX#8Zxe8c0vbu|+VchD_mX`Tp*UAaWx#jH}Zr43h(^~7-cwy_2)SBy{Z`RZkS zB`jZ?byLlqzBH%Y|IQtkBx@f>c7+v-kaw~LfZRc95+dnOf=h5j~mmM=tFTU!gxJ7b;TTsgmnaFEl0%f%w z7F!>;UaE?(nD+GVF~!v_-{!C_@hNEKE!p<-oTSm~+Lj)M(}|Crt` zeRF!F&Qt49+0eI-qkr0{m}cKx-hRQ$cU2pgi%O~YW$(rnOJu^lnUnVAsWQ);`dMf7 ziAN$!r?Bz|F14QP*mnOt?|~)P?=pDA7O)z0oGWDC*}i6-wV*>yic(9h|0cI@MN>)- zDTZG?JvY+g`u2BHoRbuPpJw5Y&E@1-o0p_cdAwHq?pKMHifyF@ zx~kk$`4k@2xN~((Oa7t!`5gbBvRUP~8rR$uI$x-5BImU2)~mYFT-X%W{MH{_(p5L|LVnxl3LN2eJp1Y06?K(^ z4=*r#{`27LwD4Gvl&l^7S8mIrkKd2#t;l(MM{ni!MZfZ^W_4IT+!UJMwR2I_>T`bI zV#^$`N4D+rs1_iruJ9{;6 z=nXw`YxxbU^H(_&CZ}>A-+5f(Qdt)F)+4{y&C%GBzH!4GNd|XqU77Uk{5fl`#%vST z2#-2?>_G|d+=8!+p^N66xP0icr{$hc#eCbg?nVc1h@2x&CLH#P%y&FL-4p-)Rav zwEy&um_9+5t7S}LiCJdHI;SiMbKNlE{GUCa0{nQk3YsstasN7N$>Y#ZvI=Q4ro7)? zFx#rb>9ek%mxWiI&XuD3uiGNLq#xb-!S=Ra;r7}{zZFg*ueaOSxMf%_>(7Zxj;*#n zs-)CRj)888R?pu-KjK51`gA252gU1)In)(v(k~kR zG8bHA=!UdrvP-R-ZZypD0awrsT>dt>c=H-S6M1~00*_$CCAk%U!OS}Db&V1ozlW#9{irN|5s{iAAdgDvZRNtnMgsZh~cT^jL_rz3A z=@xjV!mNGBJ$vp7v59As&m60Xzxh6{ENOP19{a~10lD%o-mj{uU+|x?qBTX}(!U4$ z9_;e{t(dyjZd3GcsUunwUOUA`&Of!9)pfzD>%aA40;BtM7`7k(dVkyP!>w07MU;hW zPdF)gWZPE5hd#fp-uY~7@7;ZFm9zZCta$PT<&`cIlXQ$6Tew_)KB2P=S3Hb6D4tatFA0- zS@zD^V*Vx0q&`mdX)OljeMK`>UK##6J6R-PMvA*3_ovw@f>*Cg^v};&KWECfwHuaK zb)+1#KKLOzm#6iNRpK+HnERgvYfH}DnzLJY|8D8$r{pfSS4^9C|DpXS^MHAYSEF~G zidgsQ%H^Fx7o}9*aKCyfBAn6DF!{r4&oY)mWwCz;JWJ*{9$Np*YEb}-Q~KP3)`rtr zErrS=PJ%3PO4{Y>7nG#b&Um&?TfHhk`cZ1~(?cutBloZ$biWm*xcZXa@zO7iWgOQ7 zeRB@-PO?fw?YV{^=-wTP9gC32JF8huZ?N3y+Pg8#iy~SJi0xKg;#`+5N4LC$imGlN&Un&GW>L+|>F6{)SuMzj3X| z6{?yUH+jvjwX>eGr0^Eay83?d+=BD|J!dXCO5Ao7+;lm+CG4`XdW=!*!*?#)%BvhK zZ)P)8zwxu{`7!;rszu}COW&fZ)GO-Vhq(4=ZO?CR3Viy+%+PPjgEBkE93gFc_sr;v z!b#rIHxK{cB4h5j;Wlg16iZ2$2L0(z9r_m*pFSLtqTccT@B8?N{Qv9x{D00l|B2&6 z@Bh!&gQh>699!b_zrMb*?VshWi4W#8Z(8%qY*+V-l`SohNL$GYo`OXhT4J!mUpGTrc@5?ev*s{M!0^Bt<<)S0>D6^mWilP@Ow zql8*g8?N(yI_&ywva8oTn`Y~&xy>iuZN4)@fj@~OcUns6zqTLNukz+Ue$Qc}wlsTp z`pH-GAFu!B!}K^Js_eDeU#&mA9_y{7Rc5!%UQ+$z-3{%$dWrwsr2==Z%qyN=n~@U# z)w-dHZ{ zr_ynOVLk7P^&6i*fAuQhnNeuu*NLHK3(mb{ab#0mVEr{`uFc*}mpeVyOR-2l?N=}01 z#4VltRUYh$iw(8sKKI?U^~XMgBi^@f#_lmQ6^aeDpFU^%+m>0^xs@2+mOg2D{I{vd z>04d-|ND0*u|#Z&Qm9C9f1*&?2a#QqJ)J2&rkC7a>2*QpOG`@X+qnRh!~F3F7JVoW>l zdJPVxQcKCHj%BVgdk$#1CZASVS9sNP4SUy`4=MJ)g`ZUHRp=M7j5~j_ZcT^7uT@(D z9YwAw{N5rRcU@f6@MNh+k^c1^rN1{TY`CUyVke*6aj6!0x#X7TR;RMh+?w*d$!6E; zJ0~A;Gd!L1Re49b{Gk)fIa$AV97(iq^qv!Cy`5XCV7G3*(`&c;)_rPQjyBBxF!{1v zXN1C@@*kPY%40jHsO>kdRd4;wzv#ocO(!yox_>;`y(6A4QsqBe)yb~kB~B|`pS^$M z{zp4kv~xYjA`Vv-u5RIfXS=#HPN!HOT3*ll=$mfSwc|6gCT=Y*X4Ym>WX|O|D3>hp z%xaOviM|E7yQ5j&y4u`ty{&V0-Ie2OsyM`tPJP|rB$y=I;w;^C!28QV!?e$gKi;Km zx$UPosfeGm_l)a~q|>zuUjElUCE7`#w+^qTdX&>znj7E@pq}agpICp!iPV7whX5ZSVcSY)J{3iW4cD4HPA3G z*<`bMD&vvvX+0atRh=B$rY(_P*j62OBG&} zyj(S>^~#l>T##DWo_~^M=J}kI!btJ**$=9KDf3U)8nUVk{%K|^QBd#-hy$E4?fky_*XZ1bxL zU*CjAgii`rd0|>EeWH5)cP*(pj`qr9k;jZ}K3A|X?`&W5Hb~>oVl$_(NvtVn_x9{o zdpPL~!=j^p4H9e3j>T903F=YkFWJx3YLzv!g?}9v!={w;v)K0>{1Genukzd3C7n!$ z_r6Q-OBQ}!dvH@}pHt9Yn;4I*TJ@Zrr>q}doAa)NAyI$2c-bZuy^fn&<)U3x=`xBz zZ_kM~tXw^@bdv3Qtuu?Shn8G%Z>;i)Kelv*rQ^T?0!1Yn5h)Zc{2E&RhRI2kj|WwB861<9mredp*2 z4tKsAC8r;5Iprp^Sn^BlN(Ga@dHjxPFPJ*&Qc|^N`KorLX#Z07s+PScZttA_-D;0% zUE8^HyBp_D2$d?I%J_hG`{d)?w#m5_G#A9e35XYl=php z?jLuYkLvB&`u)+}`7Rzark5^q-0EhN@+^uyaLpBu7YFtlxwtM7%u8=$mtK5l;l6`q z`}_7OmFzEiaVo22USQnKdpRpo_8$5aExBr=l)>gtZxp3g3(op_BJuFAHA}yq*pL|V zSbEXKkF`Yy?$4@y-nqZ@uady^0@v`e#tBnO!z2uMf9IOSIB(_VdE2kWtFr{^g-b-e zztypON@>E;YkNc)RVLe}s&sYbnpSPw8=)vw)Xm>VY4pZc) zowUcXqW|M^Ie~p$J8M`j{a+Z(efZQ)(?i~;ZnwB^a#H&Hx?AaQu9;DKWxx|}t^55q zIOol2(Ur?{nR)7&g_ik)nJUk}9x5qNo^^aU|m5Z@~iW9%oJ(oT4>0-y3N6S<% zO_wgzzNG(f+3Ph0mv0?A@xiS`WIumW(4Te%^WzyQ1uM0h(obvKsLV^ab4j(3d$ZuQ zpmc|OdS9fNE1z6Ep~1@25F;JAy3S>aNoLCT{{4}&{yu)sb(r<~b0^QsY(6{o7zQcj zf0&Tr(Vf?os{EtdV2O+AL4`RF=QeU}+P!CX#j77PS=Y~c^j~>-^Xa>#Dapl?@7}0M zzh;mVcFf^srm51;V>_p}U5i$>^V+5PXyq!U6B8~TI}@eoFe6?0*Ay|nBU!B%zM6Vy zYMVQ@{;xjillvw1bMu^KeI}jh)ny)Y7H_fIHTQz=qCeBW`6wGK75sKH?dBJ^JFnjT z+B)U=nG3HL-;=krJ++f}hV)`L6KA{ps}E93%$%a$-8^(RLVC09ci)g#Yd%)Klb5u4 zZ`}MrGf#fv)>~^H@8n+?&p&x!uWhbe9|Gjt15p$00lPTRl&du|)IJxnu{iC3o z$*wit%2Q62e{-riT|2Au-`P`@&o_Rue{i!;#X%)~_wUAsrP3@#%f9yOtUez5q5sl} zOpbHzN*~rV?D)N?`Pj>^`HLilHFt_F+ci1#nTOTi*&c6q>TFsVV%VLtqI$9T#+%31 z+-xhTJM>fI#Fq_jZC6?qFE>j?F13n!v2Cm3p<2o6SE7rfPhS5sac5UGL*(kl$A9Z5 z_g(%kxIE~v45#nviJnh)If$7a*!rpQg~r`w%Jb!OS=@f=ZBqC=GxyA^(;LLAAAYI) zCT}_KuHB@$@Ay6JHf&V0RQuJn`PqX>py;~ zD|>VHQQKnCmTPN;7;e9aZ@8@0*Wa<#(rPEuX{CZ^1ycWK_vEkz2RLdR{pc;+%b9E_Z=&SXx^&io zdhN`-H|29ytd6l`Ed8=`_A!NKX@?CliGnF<|NfoWHQBh~PMKvx+QVCx@<+Vh&gK86 z^Go*07X^DG?~lBPTzWfhEcI~A$xyb-E1bta>BU61FrnWa>q9vvsYTz=UG2EWBVWM( zFUMq=Bm1X4R?3zAziXR(;qKCUK8b5L8P0CvIpL!|C%W-X99z)mH7fa;I~wnd?yUQ-}(kc7a2CDu)sW&-i zccMVYJB{N)y$OLg|C<~Y-o!fd>HUs$Q|t?;J# z#*F*&%l-ae`|#eNw6~x?=zjDz6_3=#Zf$Sx7e;xe1S)6uiKXrj`L}QB%H{b^NvY>| zh+QnQ{jtCOw5Za*nNK&CtbX@BQ|abgwu!I5)*A9vm~DFdc)GfTK$_}q1HPc-`BQqh zB3lz=miT>kpL}ND6N`=gCst&3Pc+<-b78@m=e1gg#n+@PNM0VK$ITSFL-5pV>u{b& zs|D?z^hVi98Gio#T3B^X=O@8U)){WB)4#J`JlcC>&*l2QEotVKE05^kIov)gJ^y4_8yGdaIw{Jfwsl4BNY>iGQ^QKLQPwZCP z{De7g=?nEV{X*p_GfNh!)ZX9gHr-@XTBdW82zoZ7b$@Qdp#TTz(8?oO$PKJ$b{ zZ|;@a82QQe*m0e=+GYjUo{q2Ee}*H zJ#VO=J!Rq1LghVP4+D6dbB}CsOO)y}@^o<9o94cKvzy1O#|Ku~+Io3svwXNB?rHI5 zZT#CQ&iAM3on3Lul>lr5UxRGn2ke^kVySZJQf8EN>Xn&4^)p9HrKwWPGA)mRtM`dHgl5#H<8K6$s3sg;bW)4TGoFMYVbhiPCoH!Q-F2D1ZNb(RHCiqewk-cE(=5|{{$ASe5V2-rZt^<~(cB}S zrtkMp{cS(JdG01tqfLhMWR>TnD_0(WKI08$p$7e~FPqutrHsSJW-J92*t1Sw% zYh5ILr{krLe)F{O@9qD-W&AXgarC=e9Q~pqC|=EK-gF=O@|-5?6LE|E z0|OPjm%Op~6?rj^`)^No5_4j{gJ%2UH7cvK+C}eXi#2_7{l0eni?~}HOSk-NTJpau zjCGUStqrqhT)VrVviIVN6PK))b1hHo%~X^vt3MYQdzGmmt{9cFQ;T0kIi6t7=d&6!Bu1=_!8Lqv{Ro(6As=wF}!`h32K$sb=hp{LED6rP#2> zXK}xTxMOPI{iTi4uWox!iukeYD#yev8Y^?YpW5uIn}1-9U7F9Ys~uO4x0Jloo>rxN&u_!M=YLO3sLK1&d1)=9#nI=U z0b4pnnB@c4XZCKq_y3!bFVET~qU?M6#0zsCmhKT;ws*fswL%u}nyGbRs-5Sho?Nhs zx%R__791!j*q%dT;q%c9<9mlx97-(W`%Ih=2Q{bFs|p#x1)AW4*6UCe7XZ=+?DXJ)7-Z^de$rELJPE7W> zFMA%>zsRkx-6}BStE|lG;--M~AR*30AHyd8S@3R&&Gx0A zcb-hq^b~5X=)a`kw0#=?qMKUV%6T@u`DXg(hoQ5)#Amamjw;rV+(X{~JgS_PW9oGN zu5Z(ZJD;^XRBqliKT&A4J9V+p2cA0|mv=!Sa^7(3ODS)oHWquPHvc!|}PVN=-fTri*>j{^?GvZ%iZ?p4v0<=Viwgvv*E< z;s4`a%Iu(jzJC=g-hY-C)D1kb>ONn-(FyM<%T#xEuHBoy_3wdzko{)=*ETMSTD*oc z@^Np@dxrXqDK0f8n^w5zF8{D@=8IQ*qzdPkUug+`P~B|I;{3c9d5qcqG z*|a(+^2Yc3Y!w%Rs^?7o`y+$%OlA6tt=kV=)BP*5 z`@}-wp2K-ZzY5A1B)kfkf8pB$%NV9o`M`yGX7)Q$W|j7BXSLh#Gf{)JQ{@KMu04tP&a-C)bF_BJo0na|tyLa5^4z_d>8x^$Cp%OXzf|8={ZYgD z>(PWWD_+c3{WSZS}mgs^Ol=;Wuo?7E$gVB2sb3KYri{Pu!ul|G~c^ z`88GEE>F3dRFhlJN__~h&YiR2*UD+>+$UYPI5&$_l<=P6cFdk8@FR&&WxlK0gGUYb zs+r!a3og{39KSMC`QtP7h4%kFKAw;NKf|Z@ufX)gr!O+|n{PD)*IJak;k{YN9bCr4 z+-m=bdwE;5v-qXX9))Au-h?MC{PAego2Mp^CtZ7g;)bO3_CsvG($}W!36@UUYawz; zO=ZKuLW3{UKY1sos_BG1n73d0`m@zvj1tnaPBN)fa%pU3zfyaH`_AeYaTi`&*mHDB z2%qKf_pI?dsJchfAYH-2XPac|)ume&DDDxIVhcMe?pyHaoO|Z9j=w^cDe0|`%h+zK zEqY>n{9o%@QLpK3Hv-mJG-?)vADnw;X4mX6j~eZQH3w&X>$@0#L*1k%aMCf2{u6wi z=VaKYtzPmfGn*sj{f32WS@)>rOk#f|IPI@KYt(z@iYL4;qb5HQo&DjB=M=SX;_KXJ zq@?Vyy79_GjlV|ur9@og^sKh^HGA1>JOgf&TfALYW^l;!<*Q3GY?}r5JW@Qs>+M#j zD6IMLo4ZrWrJp~_H&i;MFZJ>t0poXGURu#T{1-(_cSIXenBK)8^Xgi^i|)3NC30HdO|HJ-)vF z@H*WKGs9lSD_+dmqSyK2gm1~WZBLRajcnT+?_Lj;et1`!@8(ZOPYcNg_Cw2e6u22i z3%K3gAmBUKB5+aE-j2)De@``dW+jsC-}fn1K`7_7wrk|C)5UhoVSPp06kbMJ{rYz5 z?RNhB*4t)VUcTKJ-P!&7lFC^z&HNeFmCD9GHyw1P^K>5U^WL zf5=!IO#_QuRWTCQ7;?RqW zf(!yF-*$8R`{?%{5t?J5|22JHU**a7Hy+Pym*dvipB{U&=)gnO3g=DUA0|GYw%9b{ z#$E^U|2yvglH4cne*H{6XVHTD%G%%6In}C!d+g3HG+U(h`H`P|Wbpn=X`5rxzNeQy zVDgpz>K4 zy&t)`Smu0)O_P_+ZQkSm>^Zar1#gxozpw z9!UK>Dv_REIK$3aP0Vg4hv(B9&*dYZ&-9Rc*~{~7&u=bH|B{&gjmcRVC-3fgZIPXq zeC%_;@>Gub`Q8<4eh4JYI33axWB0FouSw3jGftuME9d+Y2|jpY?)e*euVxC@6s7t6 zT>FvRxNVE~rsMC68{9mPh+67eYd>x_J$U)ve7ByXKMt|;>fblzekABp^#9z+%T^7` z8LpUi-!`_r zDJaqXAvjTOUwvBB;VVIgM#^Gr*11Km&et^F_i)ty;1CyH&@)kf%8~2)b~t@xxu1AQ z$#4G0&n0=G;-MDrqTK%m>oulLocpQN(`Nnl%$+H(Ccos%=KkVSzUF1o zLs{{OstLz#YFK=jqJA~sXQ} zbIPUZ3c*>AGhhEGonxEMaDGo*Q$x(5otrhiGXmbJ`o>R~`H9)%K}3CUKkH-llZ9J( zH|@0-IzEMUQnYHk;be&NvpYr+UO`q6DmusHXxtnC2%rRbk z^!2KF9qON#CQc4IcKx-^q{R2jXHC$XA}G(*JGJ~wUFwR~>W|v)g{{?1y@g*?H>z*_ z9OB_N>y-_g=kqyRPv&o0&$)cfJHdqA={7%<-(9>LFBKJkgfnO1{q<1>o_^v&H&1>v z-@stac;t1Vi369R1XG&f*WN{K<+PjB<{;*DpPt z6zP5K&cnr1r7!WkPTRNK!&YTeywrz_mW+05)}B_KUHm%eNTT<*RTC>7mwRz-2ztMv zX2bkU3k}Dbg}W8S)+?{{{O)mP&WSfxLJPU)_-y^eW32p}Y1Q!$GyLT{+Rtvjv_!k8 zbD`zKJ)2cz^Plgi<~Fz!Bz$}Gi+UB4AcIeeg)6?ElKH72_1ozAQ=h%2wHu}F65cIb zXyUh5S2}Of-qh#pK~pyeGyk%>-uTQwGo5?aH@TNtXZ5a%KD^206UdyzD{3)&+L4f+ zDKGb*7uH_NbK29X#?eKe_ucQT;%S^c!kg4@JW%lWvJ`pPo-3O^Tldq}<0)$$4z|s# z5iaGu!|t=J_rdJ6ZOmddhMTrbyH}98k~w?A&fi?m-zP}zUcYSPveb)i;jeoWi^_J& zWu^)tdR zStqde?~P;JvfpxkSVwKde0|=NCztt6C{>fLSvZsBf#{ykAG*RObcfZPpU@q~|B>a6(2CHO2#?j;L{}zdUW;yAq{cd+RBIbe&<4oi$M3| zb^dJm7ILpjlf<^am{fgmQm~`WPmW+gZk@|~8!gUN%B1ZySoze5W%~o>y>fX6Cq7~= z*A9yJ5{UK z-Z*tc!O7Mua>^x(-8+`1T?~8JWu|HLIVr}P{g&BgGZVAF?^b>mZQHbB1J{xdpM_?e z`VsJQ$4T#V_xOUX-pvYA($Y(OUSnY1A-?lKUHQNLLh-9Qy3Ur}DVir=o#2#meTkmu z#4GIP%br-@+*kKkR$lX^M}PgHpsT0Zen@@~cz);s^B%9d4SII(M31ho_*%8&*4Lv~ z;`v{w&Y8Kxc6G7l#N8SWYftMQE_>a@>KuA$<_qPZlp_o$RPLPfFH6~99(45CC40Xg z9ya%tKT2MG*1hDdfh5rh>&!B|Ha_r3a4VSl@zB(_FE`pmJ=mDQvxCo(|B39? z4_WfRobJX}+<0m}+kk2L`Hk!CC)VuxX82~`yP(_G_{DOYPG~=$BB#hJ;q$XK@A^>M+gjnBEuURVFE+5dH0j+wOkbJytW z4i_DYzIVzkU17HWvJ&4__8cy2QL#M&o$YMR)5}uZyMO;WGc6`x$;0-G;hUHbMzU|& zyUi*eM}M7Tq{>rPW|6u!yllt8cW)f--oI(Mv_0yD%DWd{8{~SKPtC9Ey{cDZloD;D zRQzI^?;+dJT4%5QEUUcVtbCFDYX<*grrT4ZB(*oZ5K|Uw_SAeSq^bAx{Pc4fBK;fV z4o{2zwC9-Nl$n$I+~1hoXQ>O$^pG#ked*UbWln|mi>tavn>oFmq6>1Y4)3%{P?NFL zOBC3Vn6Xebc1mbf;39*Xhx-;!IulyC%xO_kf#Y+L0LjKrT3=bMOA> zJ=Q;7-w|6sEpC1H))OChlnaGE+iLqVX{G1&;$*p*_GdU*tK6^mX$el5xT-H&(Cv5m z8XvYNZ8zVsT29h5DA|^L`N*TU#$`Ju?e4x-c)5>n>x&Bhtktv1LU{c))LcB&?-#vs z>526LmKGsjFI(#GP|eqBd~n3n^sb}9q28sFrZlu9Z{8o)V`?tRIwk&a*^4Ue_A?Ex z54;bmy<7Nki}RzzkeydeBs96@x|fG#Cf=OAFS_hh{ogM~kYr=Kvv$f1j7_y78n z<#)yW6<3wD3T3B>$en6W7ZKT`nDk_4+>@!#R!@!kGv8GHX^msP>DFvp-Fru+!y`mz z^FO-vdG)2(7XN+kUj6Nwy?zdlvv18A7t@XdF7HdH?k=*Jw`f_6>veU$hJPEi`8HfR z`Q*!uvjz(mKj^LydBC}=K0U_c{-kEsrkr#hHrA{0C(bR=j=(4teM0k$~NamYl|Asel_nrP18TuHTui`aB%8^{rTQc)OR>sJ5`x-y!6cPiTd61u6(Y% z%sqJWs&K;bGGbTcDB;nCr;^>T)VDHQ`_AApOp)C zCQ7Sx@!GEWo3PMlo1|yWulDw&X|F?grtM*UcYe)=OY3G=r%bcSe%e}nw{nZF@<$%; zoW}vzuCp(HTH7+~mdvgewe3q?LfD&i9#?OCpPUdSZu(}O`{@^VraJsw&{g|JP;_}v3UI`OkDN(^o3<&Ja$>a(!Q#kPRnJF95k&vy6j|nVg2-bnvdqG%v`Nf z5Ock5U&GQno3Eq>uvx6<%Uorzdxq28q;+h$UsgT(HBV-Wu;%<}H`2FMJT2jxmhyG$ zvGl2v;-{%q)$}>V?&q&!#0VZ)lhulD{J1xLVQ- zl_Rg-2VYD6$#vT6()V-TOMlJw{q4dfp9RADH4r{Kl;NZRE^^5DhR9wb{x7(hC z^VxmYWBS?eVX|-g(vOF9Q{Ud0wp4UR;$q*jU!0*bF861>3%P3MEc)o$=C(Ya7lrRa z`Imb3$cp`&Bf75CC*HxhaE(}7O2P{t-wjWMxPxri)tqxYK29)PRn)c8G9xQmBInCb zk4S;e$5NT1d!;sroBoga+Idq&;24knCpmKkjSo>>K7lHGR$Nv7-esy{$#q}bzs^wg z_Qum8XAYKC#4qkzzj$xKxoURZDKZC+K3lx9aEWW%7TH(RW(EcP{GfSEOJB6)<1D3W z{_*)I(|;*RI`hd%tn5xT=L@3GS2 z^VhrX9a$4N&H0pcd=KxvBS#ty_gJlyDi7Ce{GDQP>eMYmcHN5H2Uk5kP1kduKaurr zL2Bz7Ryp5%iwZRh(@hIbbYESWcYJ~P+Vk3f_wMno7xn1hRuT5YMn!d(kaBob-4Tg$ zm8k+J>=xR_TqNnQY#-yp0OEey(e-`E4|IqfO z#kDn8)tUFDulF@rr!txE=!2IPVoBZRZi_yi%T|vH5=yXOIhPviQoW&fne3JdKmBD% zQfn4X{5zJ?xW9n&%AMoi@BCoNHd+5>?N*+bmtMWs zyel>5)sC%&Pi8+>^5s|kBWb+jw<@4w044V{pBx{K-g-mdLUoqN#PYQKqcA(dhrya;87{w(-fg z*|EJ7%pHM#n4W_J~-`iDF6Y{KC zQheQlquCqY`xo&?H3;r}uw$P5R`z24Onvr?KM&>R|Io?!cCTp9gl`{Z8dlm&DlL2B zclZD0rVD?+@09*@?B~?2f6R)Bg&NWqT%fH95S`J0dEW zbtSd+u#nf;88vx#=56xkuAA%Dx~|*R%0qeX<<-(lHoxxraHM}pdhe-K($6lxsQG&@ z&n0W$p4Ttd-_PEw82q$o|6^`Ra~`9adxaGHSHF4oQ$3-;b^)8V<-@5pOl^mkX0NJr zyYbbHZ?f*L8IRS{4?O6am$m%TLhai}oX-AOqm*;()}{Ef+a5X}o_*YA=Ax^AcB@wA zw9J{P-`!Vd7=5Oys-)%d)Sg|JvmJCEZW6mA9^`TE%ak8NLj6w-Zg2Z>eS&k}W&wj8 zN6dTXEc#Sqx-)k{=@G9}PwaLy&AIs6qke1E*DDDp+y9g)@QJ6b(G#<7i(Sj}Gxegx z5)a?Q>%HbrRjJbnF3#iFD(F9Z$)27Wj|E@$7Km@idH>jwtjb{Ep6Mz(?7u%lC_odpeoWJ0i z@Z=-MUNr~XDjVh;W_f-m9S>d?-jp$kb58U2- zY7)C-`n-~&6s2XgyW=%?+%cGZDquyQuJ{#=GY2ZKubibF@n_yv!}1jlx{szVs*l;h zRrGYDhIQNq* zl`cBDv`nSHE#>L^xy;v7GoAK*2xD9LK3i(Pm0@D(iK#o>W0`Vtw&Vq7F8?MgeR9c6 z84E>`m-E@WCC@(;S>`DIDDY<2^*1{mavoW_u_-xiU+QoqRqf{KzUGwtIilC&dXthf zYY!QCA8jc*#K3=f$=RLT4VJl_oHtpr=y}W;pQO9{pNSjJKe0!lKGCo~JK~R5(!WWi zg1bNP#WZgb`u|5=$Jpro#{jO3|F1hGHe9}M^|vr9yx8-oXRG>W6ZtPIcGNCT*!E!4&qK*y z_A-gppE|c*?zDiOVwPz+i%^N;oXn5kjb6qrium(B>f!!;*P7!^)6SnxI-78_^Gp7; zy{G(RZcS%p`BbyJdeNsXsU;8EY_0CSX4h8ee*C`0xmQk#yLPd(d%=zdu~v&G?zhj( z`M%_UqT97259G?P{`t{RSl0PWInvW+RrIG9Q8VO%#LG{%^PZXPa!j7z|IpDTJzse5 z7i|Iiia7nt(^2 zb9xb@RGP?7rP?bQR)LG#tY@#~tzRczUpN1#kWl|okK+PISZ%8UY8Iq1eL3>?{NEWl z)%W>7Grrx~wr*y6>4S|lG zwcY)8w5ndVDdyJ4O$SnhPP{shyYZgWEN1Ec6g_ReKA#JFm5LXwpW1jsELldOXR-4W z#c0dS|S(soS=>B^}#yKyLA#Y0)>9#=O;#sY+YNnQ(Jvf3$1<%g=w_eGPhH z=eTQKk9%!Zn9hv)oz>mv+b^X?uBm&F+1Q`BsL}U{(I%PF_ZEi@kKNmoend@tP0Nb~ zb+gJ0`sGhO|29GGIvd;8M*T0f50_0!U$Lh!Oz!oY2eq8rBklp_NN z`=iBQc5S~P5ij6oapvm!aGo&h^{2w8T-Tn=Uwhcq=F`+D`Ir22#nrWh<+6H8POO&h z-}tR-OUtaE2ZDm`U$MFR!smslgrp>!P58cRvq}O~y6x3Z+3X0M$;a{4qf&C3;Z)Ng z9y#UHRbRgyDt^OrYudc%H0dd)c+E3^+7YgEv>tE%Nx{@n<#Dwi{yjsQ0_U%~qn_UZz&R=FE&{X{Uv8KJ}+6Vp7-_(CCIi6wD z!ewjnnO*qYN%7O$=(E9&GuP0OViIr=Q682+N@fw^ufZ`WV?r`*2J}i zZ)R$3`6yucH0@owLRMIF!Rcl0zw8?8M7|m>iTHMNTUz74%af9B#+RHeeETXm`?l%U zhR^dBzOLWU@aOe&zDeaan=+iYGWG|@$2k6%P-Hf|n!GMT-^TMm|547euQp4<%%p-J zF5DFA?tOHjai`Ww)pc7vV=BDjj5li?o2<@RFEC@%ZGrmd8pn0Gb#A6+*`*hYUYx&% z%ciAgztel`G;zgeT$`?bREV|g`^7z{HAti6?j)wg-#FW+wl_@LS8&=x-n*SIyMKw~ zFv`R-tIuB>ZhY|BS8>9%)0Kkf zUoUxf=##kEIhC$CUl#H+U5OMDed}}EVzJ4zuGh!B+NFeBlD*=blM6f;U(Y|I!dJSd zB6m-@ioR{gjzvqtd_)T)oowq8F7mwF-g>+;+HLmrgDcK4`z!V}f408t!R=Zpx;ZDy z@r%FCt@}$j`KNAZSj#1ol5+iM_c4YFgYcf8-)79RE_rlyv##{&!?!*5?mX35xH;BC z>A3Dm@7J4?UMBy%aOouTVv{wRyLVpy^Xk-vp4xMvlRcA6N^_=OQK`(C$oq1A>fQbQ zDlzA5@8y1Gu)TZxO7|hz=g}`Wh{vV2@A|6jR=HB8aV}H8V%nwi*=M)6-u(B|{oiJ_ zv}v9hGE-PsizGyhr*1y9=D@|Z`Zp|NW5oXdKfl*8Hs;{Z6vw3ntfigWi~*bDPe+7t z3x0Z~!CrjSrQb?!!G_HTwLZTVzM}hEV4BMw{>l&gj%|Em`<>02=eKa=t@DCvGpgrb zII8GTe7|u9_pYzgkM|wA_ppj{#i<)1@=5FO#RxQ{fBU-|1w9~cTyRUphQ%+@? ztO)m>^ozf?DmU^o@d_vrS!AH zH-)Wb+5Z}|zjdFoePwlyL*vha1V`N>1F;JGn*AC(RqyY#+`Eh6`R<^m&G75h9?o7u0!G{SS#$Ew9N#Na{VXttZ>!p;^{4$edAu-vY_aJ;&$8?#s}3}mWCtfMU9sk) z<6V)ZihG4_e>RA)6PuqevwazV@0%C*7Cv*IXYgWkC#%who=f8IRH_WZUfh_kzpUpx z-|7z>nK2tzIB$IfPS~p0=Xp6*e#e}KL zr>&SQ_@4W{Te4B@)|XO|9@VLrwmh&C4vC#8Ed1X*aGl0M_Am`rMs1z%EgQORr7!CpEvfMT zkqU2beVF#(vhI?E=!V}1;y+ei{`T*_^z>}@u&4iKb1!l5zLv4fw#uLD(SeA7sI#oX zlV9h>Y)DIx_lkR?b6PZeS>BJoh6^NrOXjaXYrVvzvwCxRSjEEAvtR#JPru?M_9}3y z`p&bR(o0`Fdb!Ke^=5V>%Vx2>nY;fbHfj`edrRE@RsG8L>Q|1fj~wJG=T1=h)}w#x z$!4~~<6EP{*JWrLYxSMrnsUKO{QN0a1BKId|KsmDPMtYx$+!NG2X;BE_+l-$qqR8c z?vdIBqC1+(bc(L*KYUU3;rbtT?0o;`Uv|@*Z~8qx#z0j1TBGReEngkxh$*C7Bob4noAKW^}We?kX`EqZMEeD=#7O5=rR7>iXkanAUz0dl^S??Nqu`(TA zYp;6aiE;ZnD|lv>&R+Q^e%cx5_r9Or?CSH;QDh18czZy2QT9x+M>B*)pI$xvZo`J= zZQlfDLRGwa#) zGwntzdEQNK-hW6?qWRo^-(#Le$8FUEj$NK*!vA4Qk&Ri(bvdbs?J_;0#;m;iBeaosJ$$EXg@ZZCfvRZFwx|=g_y; z)h-~*N=sL-_8#x6V_mkdU;6Gl^d;SdDc^ruYuoD;8GdmW+HSvLPj=<6+Y^7{Uyi}E zAFnxN->dTE*XmUk+C7e96Ysgs`<>&;qrHc|sMwmb#NRh(NM?+y-0z{E(C)9|bn2&M ztzAq0{VhK~?Ul4@Hxt+=*>Y64CpI>3-lbKlOTOvan(Ng5pKoNp`uQ#W`_(1Y_E+U9 z)&$Qn{}tv@T6ENH>DtyW4w4Cd)rOq^BPM;2ch=xPzV!aLs&@rb+M}iRt=Ms8&R>I? z2dCupkMpY>YI-H-xMaz*$IlM`=x=3-pKa^#KT+}N?4>qy4>RxCb|;y4*`Ujip|f)y;XC+awAtu0O2N zS+Uf9=gr0ImCRqW7caAzHhK1Sg}=5(n3RsBrl~y&wN|&NoIh9d;-fd_S1(P>m+D=A zZ$;UjKc^?Hj+x*0T;<6XPdjnz`FA$IPqE*bUj6>>lX;0<-Dhm=W!ZKWZ#+}8q2{B{ z|HBKWJ*|9wO5u7!*~2?YnXT4(ZCjGtKTa+({kQF7@vF&76887k*{z8U)(ok6$oz8R zeEw~MQ?(N;1^2g2n7{9-n)FYL2NidjYWPj}KbSVxO8?37`vu^XQ=Jz7aQn`GT;Kk@IG?2-^ILveOvJYb$7PpqV#o+Z4zOx z0?Q&dPdHV*h5PUss|}Zr`b;#rar2b*vc#}A0aHS4J7+3wO+RDKxo&-d+L8q?moa|V zzPj?&i3!0A{91qK-d5S&;TOsIu%@0ssOzr+0{JB*lyr(DQ`VS}V-}i1brcc=sJ7Z;LbGJRqQ|d@tElAEzGk|HfB6I zc1C+%uGmxY(?K^s3R!5)y4;+~8NMWSR!Nb~RGzp7)8?hU+9@Xz6OPZAqodlC`DRkF zeAXdjvD<<16>TNk^ye>m^DsMsePPXJ#ilB!MZC9p6hC_&PQAI0?_{#;TYpdeZhbQe z){pm}oK~FKI=k}ZlG`bwsa~=?{(s4Ykq31O*dPr z8gc&m>X>WBF`DyUow*aRX-afmd+N7jjvd$8_0O@zt{LmNS7q4eN$V4e zPq6OYqCf9BL)4PZZaW&+{F`TS?mP1yN#*?AhdZ9X_}!uy8T|9agGaBMTVARh?|2+@ z{gbuM;>L678aCY}l{fAgEtLP+bL3_A{{P};{Hmg7`^uD6Ifb^&nRWb+@Wj~j`I)Ag zb{m9`Jgm+xU{Yf>uMSFeZ`daPOkv6;o>`mvmi@Z2Z0XArr+t>yu3T}=@$Dw5b^pI< z_N+YCo0EQb*9rL_Yl13Rk4IawERO#5?c2fLARFDEVz(7tCYC<8bqJ|wPuZ!t?xy-b zJ?{D2edT8VO=xjVt=}hbv~jNPg3XJLPnmwaP4(()ZE@4D&0A|ck97s9c`Uob`E*jx z@we||I$O#%EiJjw<$bnNLF|q0dG^~zi5pz5_3w9{_;6z5GP|Y5HrX35muzZx;(X;M zJL?qVyPFvz(L7WBz4*U)_pOZwjul4OFP|ZNX0ytx@_8oFD&O;`D=2iIOVP5w@GD4# zL+I9zM`b6TOL#qPI`(V#)aQ53b5~q1es?VCCj0t}zdgR*p1=Km)w)d~=~55(tutNw z;O27C<#Vq{PF7x_bSL!^M|Dq2?DRL2xsL~#2^WW~S{OFNH~Dhzw|9kKg5=LkGrd*% zCVGa(AyLMuPPOmmadjszbFAAfKcTC1&%_>;f1+Y)ADcx=uY??SOg-RQd;7)4%(sE2 zi(LHo$a5@?34L&5i__xW+OJYB@m{?yr}au;d7m}+yENN1%i?fDIz%pR?r=NtFt!l}O1vu3aJ z<~KYho9G?a9r7hVy;Gtz^Vo{7cTEe##n*p3nB8x@`1QPw;x#v4EEjWPSd**&vf!9< z+Ts#h#-mak$G=a@N^xbbu6NG4^qFhw^3OB1loz}5R@{AcGW3d&n}%%9^UPTVI;>Kn z+$;KJd9FR5m^1ISOZM3y>9@-->9w$lZ4&?dv})#jLGR98PWP%~%D=`va;aabxA2dF z?(qp7S9hN|*pqqwH=pLk#r|tvIKSBSa`m5I5lbTO7)A9Jcl`T%%<{zi$7?UezDWJD zZ^Grbh5ye;Ki6M&!!=o>{d zEBk!UW(><~Q7Kh9m!RYSbouSYQx;8#x0HxT+VJw0@szM7hadD*E~$&=oUCq{{3`7# z>(lco8w(N>g88>G>#4S6Hma7b_wW24{qysQ&#q5vy?^O%wV%h=t(^02irhal#~ky< zKc?H43jVtnJc}iF@#C!5z8Y*jnU~KoI-kvD>|Z*grRYrHDc!oZrEk7&6j{FPW8Bnf zyF&l`Y0c1#-q`)^%*V|p>@6&7Zm>T)ciT&<(Jg(c=!G3;=J4|NdhKNu`>~ zK;zlOUwrz%1Q&4-%gpHc~mVu%lsl zSJHO=b#D&Fad+6SE8%TxsGI(zoAuqdeJiG|Fi$UdRmts;u=o7tZy%i>itX^=hOIa&KDArK8?{OT@MbdX%nDdq!X@RF@HB4gr-QzI`^07+6Lh;H9wm`K7Xg=dFFbx$UsAa4-#G;p(R__#+CS=E%KdiM^3XZGBq_^@&v3!j9q*s7 zQQx}$yQ{gur~jILR-31H=a7$9@_Ubb!xW4 z>N%?Xs~M*Aul}JqHFAmQTQlv9ItR~dd zVMN`MPjwH~-og?o8IX@%~#LWncfaQ1t%ZGcMXM z)Z*nBW!9!eNh)5t|NkG?tqEI-?!Ud@Ro}WH}lMscJS|k z(vK3kt()(B5}8+W`IJ>u`0>S?|Fy6CCcVT@OnBSp6}4<{+PQW1 zbIAmSyg6u5GLcs;>-*M*_A75ctzCb4@BJ6C##JK8;`7DMw43%!d;VGALFT&1CHD$_ z=M{V3pQQaaamj?WXAUe2W+-lx^5XljJZsXK9W#=R|J~m+Bl^^pgU$ZaiW&JWpLxyr z`1NtT;P=n#{~y&_yZ_XqaEV=An@sa;ruww5es?wQO!M@xOC0^XEQ76ngy>q{%vnXnCCp&s_d_PkSl#nd-!F()j_LnOv^rZwfAWS>s}Wb`!At^H{1W3 z>;LKavL>&}^Fg@8sT-QhdFKY7He#4IF||SZl#kJY!mIlpL_7bV_Tt9JiTb~CUmNfA zHt}LTQ1ngun4q<(c%QqZ{_Ub;232W|(v8-!?Jnnc%$O^=>gE*2lL@-{Os317SFD@5 z`B31CX?kl|?Pxw5gDB z`me=L{%=-U`l7`H4(TU$M4emkwDw~*hY_=#(|Z4;l}p2Jr3ZiK z_TT9exA1qttDl*-5-NkD+q3KLo%_4N{;i5mYVEz>QGPyODpuG>pVN6>GCNa!vRS~C zikTb!b_xkg&ebT4DV}n}{`oWS$L){SxPB}+!_~TL$^s>q8`^I=KJTp%J6kv9(&QcU z&n=$&_f1F3kNa1$zQi$4S3PR5>zF*RC421tBdy)}Qa6)QU+m3@zeK&re z?zytIt*a+|vgg~!A+m8LtODmBeDDADyi|V$kJnWub2m+iRqYFN-n?F53;G(yy?v z5h`g z27J$Y{qOs%W&hV2v@DY{xLmO6zH{=qhRKg7E|7fxd`H!anA!8h4{o#GS} z{%DDJ_W!3ccyviEeD!>`2ID+oQ>BX;A7s`a{CVW4vY3RF^bV<}l}(~r(=+709#FKF z<+s<{5V|HoG1g$Qd$g&Vl~|16G|AP!uJ7%)Jb$Ngd$`5}wwuPb1

DdQ<%QYNbv|Orz+hzbobU zESeMBeYtw|C(-K*RLd&03YYFLXOTC&ej|ISV4WAooSxsm&TP1Fy3*zC?xd_ZcYe$|#k(_?9+$i%+orAT zm}PVGObXi@^_dS>7$17&;(qC^Qsd(3hB?doB)`q5vcB-nVaH12_X)zYLW_@W3OLFU zmeO)>1MAxphkx7@cxP;po4)43>x`agml(#!_Y_61a~u}pKUx@nd=_h8<`Et)F1MP^ zZTZ^D^(#JI|G0O0%_&Kll-8af3B93DepK<9$o92=EA^cd^vuHYXncCY`Db;8Z=RMV z?m3rn{Lv1LXfwXs)2eJ7*T%j0#n_v0(hh`OA9 zq-7vBBVyCp66S~2pC;coI+wChY|V-lk5!E}ItSjop)T?9t6ZX~hDgjX4BBzxzt3}?-+}SE1vD&ya{&@|j zOWV@TO_HZ1F2+j4S4=s2BlqQlFHw%KHy_neR$t?Mrn6e?6w7O`Tlp6oVrM^=+WJvb z_gs5diM!sHJHcn94{sM~+~yYXH=gq{_X2yi$JLi7o_D`@uF^64CqFtLyCjH1&_loL>n+4=m-Pq84eLeAFj7XNyea@rB%n z4a(EF=Xfp9yQjZLcB4)p^E%O6bIwmYWF5wGeL~8=6(@eZ`|?{#>9pwUMS3jx?mBy7 zo=WiFdTv&8=z>JBlK!?6anTPgRByFCxUhEOoEDZl>J@jj)way-%-%NliU8-FS<#s` zH=2z$*G75#4(0dhDSJ}1Bx~`Fb^Mc#Or5rT#)7)D4;)v>)IO>eyQb5_kyq;~{ULVi zzP;zFH!WFnXjyLEgFS0DiAWv&roW|29h2>59(UT3{!CLq zeopnJSK3A^^RIcR-Pu-R{5T*i!0Z@{@6l$#Z+?;!6(`i~Jz6Di;t`ge^6WQ{ukIYd zkbuMPCu3X=>|MKHt?lXXuH+)wV5*?p<%rYIWVx$Y``~ z(YxND`xd7|E8h1w%-$OI;Du}wf25!av$9FH=j@1Lt@s;!zR~(ikN%a?eqw9M{3<(h zA&(5IO|(yR?A#)E;(Ugt zH?wEREZ*p&^KLhISZtoj)V6I?nRal^`MOYFlb=1ak9yV=0eBw#vxdl6)SS{|d+g{Kk`Ffs2;hzOB zxBr$E$lCVm#crMlxfb5Orl)EXPA>Q+#mzk_%l~AKYtoC*km{7Zm+f{e-E5=0>(u5$ zCypH2B44Yc+rVh-ZGX0##deaMTE-Q1@3e)tt9K|~ik-^-d7eT*ck}hV)0Uo%QIfuR z>a!J#O76T(i}y@WDGz1~ZaiPzwf~Z4ddD(VrAsyJAHyBeepo&D{^rpjT0?=&YOy1Y=G!+^6c*i4eVq_;uC@P- zg;<~4HKk|S+-0`|HuIi5eLhy}LbKoLNnK0Qm9sR(_>v#L-+yP()OCW_rlnrbGJLne z(|Y~8w!n*DC#jkrH_m+6+v~~g?NXtzRLWTA{_=SWuS;dF2dq`&pCPyABDZY!_e{eE z?L+BnbhWumdrLJ;mLAJI&rs}KT*XH$aOU?-{K5;(& zxT(;b(mUZi`U&A{W~tlMhRm71DO7t#RJPmZb<%?b(YRbIVy6Im6{a0;qUh-s> zXx%(s{>xeS7Wq^}a(sWb?bl?<9p`ur6H|;gvYpAPl)8LP9EudF#D|#qLf$mKf`+ zCRlJ(&`Z)Xab?gEF5}RPx=1pV}`yv%J1E{zTwTpqSW4uuWBAM{pypLg#Cr{7gap{%ap^)X9c z$Ms$gGHgz_f1h5nWcjHX>92Ok*GTfI`xx6LJ&yRcM7c3Zd^O+Kw9cnJ|27<%bWGKZ zNqy}Bp~EfjW1`QkNdCzd9dfd3&8G)PC#6oDATj^Ak=C*$Ss!X1&6up>k(jqIM7{Kz zL}1WmFLu_FCY9LBvz-qtTFCp})bDF?%x;^n8~@rql}b=m6y`6p(A-i`eWG3@SXF;h zp7BI;+w-#)vd$^1alf=_s-d5Cn*!^0a(~RFe$#T2x zb0h9pcJs^`De9>YVyz5hw%)S2TvhYFtJ`}r`|f^~cQnG-rsVo5wi~ImNc>`Lio$7(V)S z%=9RSXn}VKvwv8DZpOi7wQkXE{5%VtOn({epXGh_|K^IO*3`5sI^CyRa|=6GlG{_pecx||MYTJJtOwQq)|$MyavVi%`w=&1VEHfP@j#qGDPJ_+BsFrz0i zWarv{77s&?e7k(|o9+%)!^e;Rt6ENx%F;IoUblaR+oZCYzq+&jd%g29HegB0IQpm1oX6Vv&99d{TOWIQ)ya8IId*>jT-8~< z4VFepr?38&oiwXvg|qSTNpFlJ4mF#8TNbYL?$?2vYqVuL^wo6TUq9_lnz{PH!$<3< z&z)&pAm3j2@Q~P?5^;U0ssE?EsVP6G_~->MlijTKeo1E&Bf^(7d8bVF>~Y?>e^b*M zZ;4G(SEFJWU6W=VUcC5I;PvI(`j5D$No}`ai@CIP{-%N(yKL6~x;LXf`Pru1UAEGV zkH1XYxcB_^Na^_VKT>{e>sPkix9VN@_3*3FR~F802z@bQ)x-sQn!3{`I4NIy#Hquo z&!)dzF#6JjOFx{RMLyD))O1~5-k8mF-Fp2UuIXpy2|exH_=EN9 z3K8Rk|0=WVEQ-nb#7bE)1v9pn5d^Uf$Qdiwe9uZz+VllCwj-u|c5zruaT;#=Ey zrj)vCPJbfPyHWF;VX@C9Pm4(Lq=!|HCYjwh(DtD%&3SdU&5iDmZ@gZ6P8ozPeg5O) z(Jd19MUGWXxWvge;m*!iVOI_=-wCKrNh(Z-&mA}?(xCmTEqRmA%oY6HoUb@`B=0ZD>E6M) ze?!v3DV>GSXGQd`_}ikgYod3XJ7YQ5q$3}T{27`bm3{uY+IwHtE$2%$JC3iGSlHKo zs=3^C@1(G*IS1TWd1@c?x?K7gbXHpQ@990qtny|of5EXvYJ>7s8MB*hl}xQiwCrBG z;A%+zmqc#y5}(mVb) z3>!A}@Nc{J$jQqlE?9D|_Qt5k6InM4eC+5;7MP>1KB-qB+bX}r#pd%HiK#ydUA*e- zCTU(dT+NX5Z~mm((|4N|)TlV>oWE_iJ9z80LyX=lYu?^w6n?_>?2Cng@#BN?aWq%ZE`(ulC${_Pp&jYuKkb9Gkv92>bHl zKusS{{h#vJ|L+U^dO!cTUH!$5;CkPszn|+uLP)a+lvKK6K)ZUtE&@ zr4xsDrio21y|%i%ewy?(hsz1U`g+U%XiR(%^0D>9g!Jf?h2LcjBuWHlt_&@3{(f=J zmD^&qX2;G=tu)Agv*W{&-rEPS*_p=#*|Vo%C-3MMlG1p=BFSvAviiH)~0?*blqtXD#JnW!oDrBp3SM{GS|}!vD^Qx%}b%q%X_- zxBRTSoSwFHrBz(aB>sJqqAHvm81`A`_RAT8 zd)37v-aZkpkzzVOr@Ztis}9SWy3hWt^IIS1ENYkEKmCJwzQ>Yvzk>}U9!pn0(cQhV zz{ZEE|7QQp5aGk0OeBw_eYo0Y_Ey6B&9R7BcxODktJ%{W3hdOYh;AiM%>ewY%Y-X#C6U5KJS#(k2RbN zs?VN@l;D^!MNEA{>w)0?6<_9=Z(E{l{jv3Ee$tedu&Mu7Z@Y5JY4yWfj@nNX%I%~) zANH{APD+Z&m}vLig?st~=BL}+)^%<=Z-#Mbsa=UK+EfJjYR5;gA^SPJP3Tw{AR*QarICh5bhVgPfIqRxuqbW-_ z?l3v0IYI^TB{j$RtpaR)t`SG({nE6(oOP|LKZ z=DQD@^N;e^l6#|ilznG7_Qo!0xhekoj^tKVMF5M zU)IelK0o(BsZjr~G*y+!>{W3mmdIG1IK8ba+V#t}22YlhlkCmmPg|!P;i<5@&{h|h zll@lOO+eYj19x)X*PlzhmM*n@P9cn|w%dS~TBH_M~a~>C-Ky z57mDsom$-+y@KEJ;IpZk@e#XpHLv=p-kux5Nerrfe0R#ufR%Qy4(>6S{Q5)7 zdhy8agT4Paj`I1h@tR?{N^+jzWVZB!VtfT}oG%t*ov!B2 zO0CR(`Xn~;U2CvWwe>Vxt}_{~n?If@(((NJKqm0RonobHYd*8Ck5HX2u`By{n_Umn z+SdCq*W};Gq`nKfA@t?P52vWeP1E=|Pn}wLpr_U7QhLd&dH!}cQ`48EL@c}ekZF$O zf0y2ti=7@JjmOu!DOk5J;;v%Z^m{wgraSyOOD=^g6#uDOe_f;L+||uTe>|?tTRkt$ zanl?t*Y=MMF0uUQr*sz{emU*NbC=2Q#dU^V}*};I7DI zqhCqiOXihNC_AsZ+nSjr_RU}UyC3)3ZJK|jlF6>W4p|qY+x|Y%W8+||1G+wYsy0R zzd6Bf_F#UBZq@n;OlJC-Pee|#Mt|n3I}r3z^sf82nbQt=n@+not0rZK<;V5)aok<} z+rKQz`x~!w?6vvt7nOc_9>JsB8GU=^&SS-;$JahTJ>%~*|J(V;-x$cf-_RJV zS^F{a{_}I2=G$L>r+%xYc=H4|tCuq#Kbj_YAa&_J?nR&2+k6VD{NDCtPMbDOd(Grq z7S_2nOOI{6A`yFcW53mR;pKBDJ_^5+S}jt5%gmkiaUF-K zh~SqXmK@7zMz1#TJYAwaFaALGiJ8eU0Y5%V%B~1}(~z{ZN8o&90`J^c(?90af9$#V zJW3_XtHv?X?nJLeu;&FKF79a(&VqAKiUu9yQ;3^sRqnNK*Rmeo(3yEwlfDRNn=E=e zJz(nP!}T_oU-Bndi|&~yuRZJgZs*`TVYei&G=y%R^}DYBhF)Au`CF-pk~e-?S;%kM zrybxMD7^5AtyHAow6izPzgy|4ENNL07rNVUvhieX-Hbnt>0a3jum6g0Us>4BTPwBn zzEbNnv1QM*dc3uD?*~qM+9Pz{;of^jmWb=d{Ra$+DsFIxowLw5Wq*im-}OgJGSe41 zsKov|yZpw)yqott4HIYZA3b0&U9OKI?(>mPvv&6L?}*u6WnlME*y+`jy^CJXPPx0AZS#^Z zGp%(@W~Mt{j1a7449tJqyn1>1yBDuJe;v)0C^t#URsN`W>AA;`)^H=W&MSL9n%sGc>i8INqg(lrahD7JuYtWVZMGw$jl%@Wof5W zzlLUdb+X5^q-haFp5Je_SDO4vxo}L;-eK#%Ny)#@zxtj(pMBHk55LVXhHsna@7x;k zY3G#Qy&Dhy=R19-YNiJJO2Y-M=?)Qnh8I~Kw|ay!PVM)e)EE8g^1HQs5yszldAwV3 zbCZ-y!{eaazIhX6*g7{d|5s_aP^whp|P2=QK)o$ia z+Idnt)K!1(nPq(`-gdoZ)vtV;0Oy3lzuQXmHaxJI&vtR;$2SVf`9&ejOkpe1r*(V3 zk38p=u<~(&)uFKJFcGauKMrxln6%$H=k}m6yIhU+UD)SI+6B>jp60RgyxsQagY?|$ z5|1~LSD9vSu?Ri%^VO@=XSP>&BrW89d~fP^y+hUO7O`IzujYBm6|O%y-RU#q?Ni2U z^WPUbazq^o{~2)cXF|VM+QqFdkH7JsQF(4C)xYLu+fCQIL5t4({dG#`@|i0;Uv$jS zowu$+_vXh5qDSq-_9t$VS@rJudaIP&q-6;oRzH9Fe#4r$e%GVFWq%k8b49d9c-S=k zJ0@!(xZ`=BlF*HurIU*fOPpyt_|^E`f{7*vR-ZfIk$OMC_Th!d%b%RP4Yurc|16T9 z^DTecw2Ize3HkFT2`B`!|K$(pt#4Xbcl6b@Hy^owG`cDTGnYTjRI)8ES)A`ZH^y+L zwehJJkNnQv6myA7zgHL?;Lvz`j~B~!g)=PX=T;@GJ@<91&7SSG1;v@wFN>Zg-`r{9 z%=x$e^gUDMTkBJIOqurl%|WL7$(@gLZnkb-D80+h=}e)w)C!m1FU^W;g>5GbZO~iy zVsEX%os+VOp1w!2&2#G`bRx}5COjdnE%`w#4#ph0CYBIudB)y!SNo?G4+lHoEaJhI9Fqb#`@3rnJX)Pncf%+qO& zcWk*J@N-S&|?T{d0(Sj}D5 ztUXCG5n6MVWz6peNxfIxd~EGCukWQl6Kvn#n0D>);8;x3@8SHv8f2_X1t#iTbHc-?`Pw-=|Xl>9i%+6fV7b94n+A-O68X>UxtW@a;6S z8^;4W4$P|cU7*WfwqN|D?3NwJ7l}&jJW<%%badv_jclDCgLI#U1gzcf#HM-iT35OE z*5-}Ov$o$CeP^k;d+LR)GyRsnmfjaTZyv)WPZ|F36X9wr19q)`!qK^@_mR`357Pq9 z3VxKyoF%wjrg=)UaNg3#Ul{IGO`9sKkdU41yl<7q{{O!pZ<%|KZB6Uz(wyUKH@?$p zueiP>Gx^W%jTf?B-@ba~xJ2OuUZY;s%nL05Xg)x5w1s=KbLbT2vd_wTxf$-%ReTC6r6=Un>k#`6U8 zMLRBTtWf7s;(D3zQ{!jLJh8TU*?h`>E(Tvnx7oPo*Pl;jitrtN52!I@!5AH^N>!z>>q z+~eFh-rE~|KP;`jNw@M4o1$0ZHw+0JZ>|+`=sA}x4|_&bC#Doj=Ic?a87>3 zzPsz@$%)gFj^#V?&irxb_=WcS2OBG$`oDaB_w28tlYD=JPr{qzbslFDz8l(W8>k-> z-^HfayJNmbkLT$XC3_e8KJxRPDJKzF_(O!>(|TN5%<)}yiN-FM^dHwIWhhO$I3rNb&Unkr zhnr0gUD`Btrcm^@iM`J~1*6{7mxNpIinHW+oh};bXqWsa#($P(-naXF3W>kx&z|z= z#&LZ`7X9lt)(6DDUy$VcYHRtLDgFmJ-dD-KUJy6^8wbBZ+8d+!g4_Nxa>{p^Xtu#p0b7ClPBJcXcK#~&D19T>CV#u=PtzhKY87`K&PfwyI!Mn zvS(U;lJ>to58*wtt3{5-F1WKg>_Kbz9AQm^vuhpxroTD&fl2t-r30HESKAwh9hc(u z&e2n zER$HIdD~-8+&(_f@NlHq#HR0=4}Y!+)qc!;{;q|xa`J<{RTUP+E1fqi>pRd}nzifZ z#|A&1f>2JK9Xl?)I%rYBD_r5eW7QG;#ZkADcg*=AHY3D3MP>WT9d`bc-{Fn!U-^7G|nf#HH;r~!}q)SXdb)qP9ig5k|FR@3tIs*Ufj1L?7o-vXw zzO$l1`_=;Kjcc~NO`aZlTwZxbYll(1&7&Ke|E&vl;$=R6?DUIW>o!@PTN8F*@A;Dk zi3Tgr_OPva9~xs*@lE=raJ7TyC!S++*81KnS6k1SKV4yen97ScTPjKzrZvjemr6@S zdgNtS=X^=l{0g`W0UUfa2LLTjO@eoFG|-&yWa=ep;dsNA}E_I+i` z(^pEvy@LAJeJyuMD`1Q?$Blbde)9ya z{hw<6z45p~^xEpl&-R_<*wV`w5Pp~|#_COi_MtzwzqD`EjMn&@$VPF0w<*2FROZntsJs#hJ1nm(?-o6jDOB&;4#buXF zONzFgpPV#Z)IMj@?knF)B~D!nOaD`LsdfA{r)_mZ9r3$C2an-++8i@R(xQ@dHT zI&MMvpYlt8w;M7qXZPVXx_-L8=T-X0dCfV+-%}*s${VC@sCm-xGjK`URQqYuw^}B8 z@6Iv4aqaN7Bhzywcjlb#*yy|Q^jUT3+5Z#7tusP(f_|vUu3mTV#J1kt_u6bT41;#4 z{kv)3a(dVFPoCzxrGv~?mMD9g8>epiFLW|e`_;|ZlQLR2nV5DJzt?BHyWw1WL)%Ur zj*J;IC$W@xTc2ZPJ;y!u;{)#lJr5%H&Fiqeb40{Wdq-NI+3)VPe_R&}ob7TAiSIY9 z_qtZRa!%ll-mWk0J}d5gbSstbG0zCKa|_9ouh+O_e{F-zgmUp|#?4K;CY&wZ_%7>N z(%Oy#S8wgFUvj%J(kpn+Nn7ju<8odp+tY8?e9NfU`}%e$L47nSd<+jH*JF7Zlt%jr{9 zJkz(oP;qaHsqu_Mp{i^-zy59r zV`DFyaP5@RmZS|~-Mzk1tGh2pr9SBjaoeOKHBV$E&>yK`@?qfRIz3*2E(*!wPRjb4H?h0;lf|aY+Y~8ZiuDh!Hwq4oQ-qg1@x0gk4tZdrTE_i6E&hD#CJD&>*SR_Yac+>)*@I3Ap5ddM_IB{R6b@8ffaODkrv z*xIix)2S5u`fS-w&%^zJ&p!Oi(;!u*BH`_BrljSYUfqde+| zL8zRhN`AoE2RHby3dOHVeG;UrY!G^2$+c(pRkrgQ|DWJnnSAwJ-3nK`7hAt1u6m?U zf6I?^@r`7{BVjKczjlZB72a&%J2c)Ll2{PyLhi`>@0QTW7i>Zq%NxlgQYy zm!~B0r@{jJV_!oWHP63Wske{ij7QZfX-yo3E$Fwk`kE(ZI1esn;oK$IOqr zqh?=o)_Pz3YHP@JFO8dh7gLu?cA97Y>RF*P?7!S7XgqpM5l3x_s$*N3fY+;^7=9SFUW#)%l)J8EG=|Yt{$1fF}kDK=Clb6T}DfSPq@3NXL zzVfeeZo>Y3f$v_=uYasRweFPdxAz?;W?sfuYFXAc|6j}=S1Z$VdD^9Ug4Z56?hRu# z)D}K*^mVQ4VyV2v+H55UOZ%93=F171%~Y&sdv5d9y5Pf+lnGA7{O>2~yWE)IA+mAL zJ~7)%|MeeDf4)M*ThV@1yj@X=`?`uHEw696=Y(~fUbdk0wBVZ~KKT#MeVl8%$nEHT zd(q3QbNJSud1RE$qmlEG?Z;l$-SMcb9pK*_jq6F=i6}Up=DU z%!>5x{G9yuqv0aaH4n>$AdRd*^e}g}c4j<}^%P z)m~^dd7t}%uj}*Q^siD~_V&s8>l5yOd>{O!{Arfg{M)4lMYX!~Ua9<<*T`<(bEo^n zwSK|P+xzWxp0VED?rx> z`srWwGGdBE-LdUkzlf|jaHc!u;~e?8sFoymec9>XA4}XRzJ1)wUhr0m;pXsf@k%D= z#02G7|C|1HkC!=ibK?@GmQN8WoNK=v=FO@-Gn&`; zS_rE>OJUv?{JvJpR`04_b;_J4igW&ntO>mNxYDm$OLqQqAGts2_Ky74FXY1Bp$K5fZxW!khQ8;c+_ztl2X-;ylKNm zrFWI~4ifL!-dq1E+4aKD!u(a`Y`d?Q|J!DNz5M@gcR&y@xJ>puQ; z`t|3H!tdMv-%h-&9h|a8=hAGZvM7PP?Ey=-o?D}keC5Qm?#+LfKi&3!%Z{F<;+Ga= z%&cU4-SFE&Ra@#%wy*77JA){_-}8gh%pP|7#BaZT-{bzhdfl5Z!$a=>kKXisHs9*^ zK8EYgD6(#!EOWW<H#cRKry!xkh-b#Pa$m+ME?pTvsVOw}e-vp_H??anrt9}y|Dy-bE zF*(F|$MJ1*4Ngp2@>Zg0p=Nfkew)L_mWb*P6V8cdUThS-p_qP5P0`IYp;fChL1ntc zV&}H*YX>HWK9l(FAv-nRLu-4Z?1`CkB9%gxHceZ5HehXZTVrdg+RjB{Z!R|d&)Va3 zVndVY)WsLv@BNl3`xy7QTQ6X3)AKokzZ-tko&0V7!?Ax#sZKLbl7HR$IZIO?aLev+ zUb_EC?w1(Dq6gaFQhrBGJYA*|#1r}QFuQZl^{exzoC?frlrJxNq`9E~Q+Mvo{^!?t z?;M}LOvmeD&l=yZ3rc1?k{jY<7V7pdtz<(!-tlluKY zGs`){b&5LKHHqh~H!KQeDW9Osm$p{!+75LgCY?j4uFhXRldJRlwo@}_D&(JZm(Hkr zDQ%a{yf$*)nR30IuHUVv&w5|b-sPy-|Ds?`{)ySfbKJL^tiP9D+wX1fd{SrY#Yepd zKe}vd*C^bhU;KpY=)8qqJm$YRLW@2~dLJ)3c4=e4)H${*y<~!~2TeV)vrZ=P(S|$W zUEQUYcjrx%n4@@)!)B7zdlt)$c9UOjEZ{Tczx}7Xb@EA_#Ws^yRz`H}{lato>}1EO zGnN*VwQ3d4F=E*ma89*D$lPR(woB*ZCQ0cs^(+;>ua7;1>^IA# zH7U#KH4FFo->RIwQ-V89cD{a?+Pv*|%`BpWCz?DL{rhBU^4##IFKM-z*P3fvMbF8{ zZ#n4qZqgBh<-DSu(ko^=O_Gr7J^EzQlY>)K`c+jr-yitI?fFP=u|%KRM`znfNBsYq z1nyrF({#YXRexvvmM<^5p6t03sB*l>J-*oM%m(-WH427C@7Qh~Ki+z`J^Gj= z&pCH-98P=>wDxCc*>i<>pD&Sv8>AYae2zQ ztlyXao>h_$O%nULCI4^;%L=39z5Q$lZ*p}r#ow5{>BGk6#I8OWhJUY2v+d>PvUHbQ zy0V2nn)Y>t&~fP}>LDkaq1kxC`D63!CsoW>mPvb;p295}w`zWze0iF3`tQSWiaa(c zzquwzKe_#Fz3S{ef;Ub7C7s;1zuEp?ZSSlzzkYmu@<8!s%$Z3-s(o)?I<7gA^ZEO& zReyWC)2_Vg?pLs!c3XR2WqVv=PkQ~#jsVenrR(^Asau~_`a5~9b;QlHx{u@ZzZ&e@ zvG2)|7j@Imi|byVDg7nT{-kEgH6Op^Vh^_h;ZBcdEC;?PZ&kPC&F4E*F}0hW<=DnM zPkg$2qbv9RaA13vJwNBkUW-k(%2J`dWnS#ewksc1*sOdcadF0sy?595>dx89KCepp z+ClZ;zM~qxH*KCRXwdAgHsRTDkLeq$h05G*y{x+rdU8nw^2VH)@0HuL!l%sh^xTTA zwM*AM-e|XG?e0U_-?_c-PhE4i)`oMw(#zY)i{IaxePRKR)V;E^8#G0)Y@Po2*s;a> zF-;}bZ7cuGe{U!~%{yz+&7BT2`tLrOlKhl!Z^arP*U%>p**g#H*Iy=WWphQW!uqn| zo<(;n7Cvc`EX}Iy<##Jk=T1D%7Tajeu{l~SW=loLreJEzPM~m0{ z@xnhldGx=O?4DLU@8wwoJxh_-)n7O82B;+czZaBlBk$vH+HNeA6(zpn!~H@fWtqw4 zE9M!vMF=oWPiOaB|3^ykd*=HUW+iW)^;|2vu47%3*RpimgWGJ3d?fS<>y9cI#5z ziW4ty{}fPi#l!ORk)P?dvX+un*Q0+OnQ*i8PsQq#sXALu?RsG`@!A?=pQ-6ytrcIb zZk(8rdj9+DiHFxJdAGAl-&vhgyJ2dA__Uy?0^a(T-fEsV8$5Yk{62<8lpPjNelRC{ z!|Jb924N|ckGNkK@jl%x*tzxN_HDm1vutlX@15GZ?*#knKU-uzua(hVvUakZcz31v z-xQx`rTowPnw=u0He4(D$XC1V`~RCWzj05mi&u(opL;dtU!P4r^O{8*R;N;o^<`}{ za(N2xTD$YPO$*y%+NrZmFzh$``cknAMi!HuQg7JY`BY(YYst<7^KH{Ij@oY7mfmLF zyWe=Ove&oIt^2QTZnTx0=`k@T;8(l*3zg3+-Zmfih?^+3e5;0vLBHw4jV!(_KNFvZ z-0|jakEmvvvQURD^8vFXzOvAbGJ4}oNZ4uFj^f} z{H((7NrmP_$F!HSn`5N*Ex5;BWZ=c~;mE!NN|O%Hiw}w8UUMamq4dU$)l;>OztUk_ zE4b7$;Iv_fzTBmqO1f4Xn5-kVwQndAmx;9I4;2%tjh3>=+vWei+@`$#`N4uhGrRZ> z0sc1*;_E&NtWa9BwAbP4KatJJ(~_pg1d8(s?m1teUGUJ#`~!<#a*fYB^NcLXV|+#-JNl0#yn z!R>vimrmcFJ%5GJk;Pv$ZkDdh(_XLHH)rb8DRO6`*IehS@R~OLj89qTt7Vf+Gj#%U zH{Dix>m~0Wx>NCbbaVd1?$}P3YUtVMC``uS`ue{d!TDMaF{{&wX ztHPN?Q2-p=IP9pa?WXCh->{Ql{2kZ^r=|A?lSw6F0~gI zXKpa`>0e}Xtjpx3p^u8m>%*U2ZrH3jdU?|vInBj??r84cV478R;n0sd8}576{|K?;yFbjNbVbhQC8Awi2j_{|hD4k4>Yon@wfwp&Ol5BGw@o+1Bi6+(6`I!Q z9(LY0Q}L>zl;*WB%bH$?*)b z7V9V7%MD-a|5?fW@T+}CRUWpccj;gFB=Ti;h=+;r-W~Gu{vG95>ny}`Tx-!QtCX9D zoU<+*S6eBkXYSEhvg58!_P#I!yYp-puUm)O=xhyEET1gjCT@Sz$C|<1^zN<0i(eK_ zJ7_!GrPS-^p$T92wzRLXD7|*bMk%8*^!U6p(uH=FS1q6KiQ_BKU9R}!EZgg~R|Pjp zXuUpZJ6U71*)^`izJI&mf}U9mwsaJuDob;YS*{e`jsnImscD((v&rGRkEY< z=c3#T3txEtu8y8$*-(92v3#qQ@b$K@M@^5n3f_-BbXYf}!6r5Eyrx;sO+^)#S8DG9 zy(6Q)NG?4b{ApHT)B)}NUHJ>&e9k_~#h+iz-L4q+*3sjI@YU!aZc{!#j5(azC(fQP z-u}HyZ0;7nFM__Q4K-XW6Q5iwmrAE-0tPapS}KblB*_ZR9LW;zkKX! zw4vpj_{p64*7AJ^&P>naW4!m&uVj1XL$8v4K{soOd4JO+BW`>@V$^1uZ*f{;pO&Ls z*RIVx1)}_xr)6p)o<;DTmg$ao_C|A>;htY-jnV?&mrOHUQ@HNv*{FSy$C4J#bDg&F zW>#E|z{k3XXB#_$t@i2X{l2R-t#N6$Th0BvFGljS7{ydOQmxFbbuQoh*PL3_liZ$q zM(N-So#Y6g=Q_n75@#k`>Lkl&eod6Lp8Cu!UDEpNIq}mavo9+34azIb6hJG zH-*z%>T48ZWQ^&vSuyPERy7p{ZDN1Dz+_p@__Uz)a`$_Mz}19@e?CgnDF zShJ~J6%G5q$9(j|L$N;JXSORhboNSbn|NM!r{m0@O1@8)O*DV@Ky^9CIfMMGpK8{6 zbh~WgF5W71J|ybMTJH@d%f(Xi1J^CN6u%?*SiSbn^Zom4r_Yqj`|(t4w)ox)bJj`c zos^1DyVtmskLT5k*LxGL{0_b4_GESBG40lfn-X)CzMbqz7dq&w{Mv5E#)&_fHik!? zsVLJ-NRB3F|FCG#||r zT4d+>;@j6lxtr%5{&b>g!-BZ$e_69z4=ubA9@8~_!?)0N+3v<}GgO4HJn`3<&-O23 z(Mji~>wnq3D;$4ZEvn75x^H={w)|RT@SSqgd1qC+!Vf)rdrOS3(|EQ`+C-ippXGVR z-**`(|0oR=zb}4%rq<_6e_S7{Wu-6nKW_ZAdH^Vq4T64hBlvKE^OUb7I!4$e8IExs`-{nloVNyrf^0%@5(TE8GLx| zR^4R=I+s5u-WOP2Z|tDl^Jmk8re)jCZM0bSW8>y|p1s9^=WglmTfpz@m}yhk@Xk^^ zKJv|t%8zRuPaj<;dd22~jDp&+YDeLwWztT<_ zhDgQpKe``C7XJMsUnh~V@Bg1afl`aou5Mob|Nqy;K0mhC>dcq_fBaMLVzr9=8pTBB z&)F4K9`lS@|JF>I+*-%|N`AS6Y2%({|9!px9cD8BxZ~36-J34lpYro&>W!bmTxb3m z@>>KuW-oa4(tp!()jtm>1&W=lZ?XR5{yi(|p4uAIyS1Bco=$pK+4SbX-pzR@7B+@% zPi++DxxF#%aJWI9#JwN+JAO_+ul;kj!RZwdj5&vneQbDn|Lzao-Pv&(d@Yy!I~UyFVfoZfOjt#1&F!QwMc-KbLgUw#6`$C+rvKN* zgcqml^(z?Jq?L-^sh;upady3^oMf)RLTmYs8@D)bomc;2p|I-Xv0^dHJ1;j`9?e-A z9zXS9r_aK@g}=|W%`=I4`2POdJKK5hWiJ!_9VT1zyQ%dpZ`hUTca?pUvP<@4p6zkH z6?3t4YshhJvo^^ycfM_HT5?WyTXNjleH)dYcgkJ0?K6r zPw(K@>n@7F`|?KqdmH*7af1!x+HeymtL3npX&H{<=d}c@9REHHH=!<_W1YyJBMoQ)TQcsQ>vrCL>#}& z`YyNf{o%cV*01v<`VanQO$ayJ6VKpZ+Ft*1-L|{C`lNrYTW`_-+s0$&@1^BYO8=FddQEG?DQ{ zulK~4NryhF?i9UI61tdsg7#$Q%SVs&oxH(xWD9wcs>36#1akK%P0_tJS$oq9+R-J#bu3HqfCV{gVsh_O48czz1u8#&xsB#LUo8`<8Tdt-~$T zc?=tSUQ{v}PhRzr<;0uAi#j=foR*%U<{;eKK2goVPiC*Hu!jG6p#>-Y924_i5HtDV zw8=A7Ll)~iH0f6TFyR7E;l=D}yTuA8UvIZD?!BTbst!s)vKKs4pQ{Wi*Y<89F%-ac!j5%FoR~X-(pU6W8W2SnTIm9c1uor{rFqy z-iRb6=7dY^IR~G~np*fQQZw)I-TNw8PtrYl@e{Bcp0{qwB1h>A#>`w-b5X8& z*#<9r=4m7s2DvS6xY#7c;bvg6Sc=1Vr)a^?m%3L%bxYVPTSN2~bjLAn@I7U~Q)s<& z`5|i$;{$4MJFYVAIk#fYB7>W&Z&}Rh?6UQ9Ro~;LADMb8GrM;CqEBq=g8kyw?%Ctw zt$y|EgOs2+b_7IZQITk=~!8^>hi`FGN#2r zB}y)tb9c*~hsRJuhOObcm?GhKin!QbG6GLVjF`wGXb6j=> z=i##w1z+V>MLFzru~QCwxafEAZ9SfsZ)}uXa*SdYf0}H{doERedT-F_{7f(FH&5cq zig+jf)oATny{z)a$x{7q>&?%E&JF&3T;%1dxyzSNQhPrmGvj#Y!LH_$Qok06o=Y%l zEmqmiu;|8KMjd5e1=Tel+NNk6E#1(s`|e3tYI_D3kEi#!5Yx`AMIWU3eY2GWa(d#< zsOwyDnEs+OLAlUh`{$%j-=${R|5^NVYg^gF%cm~LtDJpx*sr;m`P7ZQC+{>A>0Uj{ zyW*wp%LfdTA1NhCatG+G+;Nc6v^H%!(}9_n-6B_5J-zgxVb-b8zRAp|bcG5YJ$aBi zOU6fea`W|s`bB1yB@UMDB^R#6-CcA|ey`jup%-hnWL~I#&DGbP^ZdZf%03-mKCucZ z**!j+4_`ld=po}|t00>jA2yiO=hBrphVxM-qtWuSc3&?9t zk&+8A&M7<4eLQJ$BR}uP_g)s8SFf4Te6zyOt74im+wpxRw;=o)HHsIgT@}f2yC%o`RAPna;j(L|n_q{S7}-|v`tiTM;yUe0 zyZ-jq1(y%6+GJHy6|qp`u3^I-v1A6m_3IYAxcp(k&5I8cpY}WE7s<9RQrYq;ev`D^ z7N;wj>lEbVwj3*|aPWO^W~;N)$avi)^O?)oFQ54Gz*Hn}qvrYI_?zb3>mHQPw%%dH zdr-6_-KUHtJoaPs1Fm1^EM;T9e)Z$&IaXCKx9(Wz_l(wLzp@O|myuRmoW3t})=t^; z=EA8IN9~IeQ8U{P9W)bN`{ByVhb?!7b~rBI?X0|S+F|W|JJvlo(81U@NA|!%(LIw+ zaL3Kmsn~j6?4jtM@OhJ2);kDCRMvXSt6R5( zV-6}9<%oQkD7fR0*v2bc=gG(um@Rs@62{IU284ph;h{2^6mrIyh$4z zQ+D$AhYQY||AF}l`_V`D`X@`S3t3$7)PyDc!4aKzPtTjKtk^Nj=O|P74P9||w@*<# z>n!%{YC5c6;rg<$fc1N#&8!$VRjVCMU;1UE3Ts!KkFoCxi%H~LyP;^Avvx+qv4V`$ zO$(-G@T~Pwe&S&EwDR5Ss)eCFCXA9%mS>%`CrsXA+7YH8?iS^yeL=xXGpg~8_3|0( zHnnR__~`ZT_mq1)8@19bG^*Ax@wNqSIdSS_$<-l?Bc7UQOC$wv$eL>S% z$Ml7%{m)jH5^ZO#eOv0D%{Y#o%02CgSktgc52&&*O1J))@Mtk%u_SmZ?Mv%BRw+DA2e zss(gpCcT}-vpi{8WpDx4lXKP*%N>lJjORG*3_q+nA^nZ@9424UB#AAD_R0veE{jOi zSlY!JRFQP<+k=bGV{ANJb9%ZPMUE+^HY?Pras>*7|2t#-KL z_2-L(>e7XJ#V-jX9?_-5ht17+t>O!!ad4DOJHUC#STyqzEJwqY)INsbHaJpvkN6SXz<+R^%S4 z$!lk)0JF)+0L7-tf>Z_lfW-7v1z!Dt#G=%^5(P731p|d31z!E2)Z+ZoqU6+K1tUYK zkaK=sNorn6v4W8iRKzzmB{R_}zd|8e0c5hNrICV#fw@Ag0?48H1=wYR@=Fp+QWXpo zP+SJG1Re$fMfu6WsU-^03i<&qZVLJ#sTCz)Q{D3ON)&8t6!hH;6)a4^uF!WgQm}wH zNZ-v^!4k$aQLqG=8Kj`^W~N|h08tDI3w_s$68B)R8$c$x2OBCF8k$4Qat}6AFhx=t zP?TSgT2zvmS`4<;*V#zH2ogddlRy|6hu|QAx?kTXH7~s+L&4C{$imz}LEkMirzEvV zLEkMWu_VeRRN?GnhLl)I+ui>F1m9z{&mDz`(idpFsV3-(>h0|B z7V}(NFUI=s{VS8tciELWEM&~GWcajGrguNxFL!`*r*_Cpzjwv&oh^bRG+boQ^@QyV z->727!M)i)OFz^^bCR&hP1mp(ogaTKmrO0&sd~sw+F`ACMSosiO$$QY4Gzjq=MGyi^@x8Faqgp1M9?Wrn@<&EnbuDLx;NM|@^Po5-a6%#tlX!1;<|uS_4Mi2>iHE-wC@F{%xn3wx8;Ih(bGqB1QZyb&3!DM zygbTKx$6|OMxv9_@o2kUDk6XP#mUaPy=!m0#q8TU;%84bYdsczc+##&eg5==M;-~R&gQzlNhYhJp0-O{e<^_E{1Lbjiaid^<;-Rpk`9_bq<#;#vgoynp1 zdez~@X#$^L^vvRNIR3^)IYT2Pwt`uy{Z96B;hWD|EgrA0+Q@D(`M8qH8kR4$nQ_+) zrr8%a#@=@Q$fm!Rog^al1`}wylVTi@OIFpbj>&A z$MZssjgMKD6~B10bE9D8j+NWBmENpa!nCcKDb2R3THC_fD?5Dq)#tAi=H8x~aA4uh zD}PsIxgS~E(DJEV%EC|Kf8jEw^O@|g92p};ST}rs7?+5#r$R_k~d8l{mi7b+} zKQnDfhsNXh5JC6H3l-1YTz2!B%RHXgdnP6d7R$~`C8kvAPuQB<@8rz;VJ>U+^sJj1 zzB^h@=)8WLcR*17&q{{X%{t1=rH?+ZDX_Tn;LY+|Gkz$Fs~=u{wKwHfuO#o9U&<{B zn}OxK|7~?!$^Q7w?Ij`0Iz*;!aeBD% zZNtSpYd?SInlkoVTsE!NZ)c``*}d&m$_%EKO`Xe(_?{X{&OTSnm2tO3Y5EGA$#)$k zY@R>;)4FK0$jy)+7P|tZMR}Kfony#wDn7EWTvXLq;OpwU6AN!REcCOI>A2!s8hu*8 z^0TwbVx7Q-`KN?t`3L?AKOrRLT<~;eSjMVjzt)Sk)dfyb5IrWY!NbwXXK17Eb;DF! z!^?1pmMQ)<%q1Xoy8FoomRiSdT7<8g zmUVuw_r>K~vR_W@|B_sh(U7@&l5Tx`X}j9iLrm4?x3hl=9Q(4*H-5(b*=nI)QEH*3 zo{76Be||7?%UqSM`)|rdZwmZ;<7@i2XWKtj9a{QJMLKJm&t~7QwXtDq!xAodO3Vt` z66JArQ;f>PbFWIB*FBib>gIg-_F9*6|3aQkNfK{PDoLz9#<%cv`hO;+E0s z$(;v_8spSHYERv#-L`8hOFDnegilX`ay+<&G)!tYyK46F-!RJO!4UBLdhM= z|1SNk^nH&~{iIKi1lPLMEfQMS|F)suf9@-xg?IbstA{=kz3u08ZLyf>nu>{AcVAsz zSgljvo2)Wba(C4`#fiZOe|=6CJ>=`X?|cgDt=AV6Pbn@{U3ru1^#{e7f=!#IADA07 z$u`_zcvpT5_N zxW(NG&^;IU`tql98|Bp3I19<%klS1@zxwS$M=Ob$$tlbi&b3KiP@c6qwzl-@8mY2r zn#;_}51ujjdpX%>YUlX`ud|#x!kH#b^HsYbc<<^}^-ATuv_M%AM8xRryM9^6wH=$*QXl zE{cn+yS>WR$UfCeV{_!LiNZBCDx&)?Y-U-~S*H*w*>t~>)Qtt_8NLaJFFCgCURLcRA!}vPW2*g|vdV4!A9${KwQKe3-WG3f8x6bp$0s*+ z)t#%GE?%%Fn8#S*M$V0ZWm}9Z8@B(xq`8Ry*U#XH+BR>EsQa+W%Ez zaoPP#-U0tV>U`h|UdAo4&HSFHHmCl!NkXOkw@v0RPu5IazHHIv?-?5#rZres?PW99 z=$7xRedJZOFLuL$*M|Sgxy^ikSw#1y}|Bk_@= zM{8>dGqYpE^U%EM8 zZSyMLao=3qZIQ0|8-5RubLLZP7f8g(R|+3gxwG7$)pN=mukhuzm(zCGWoE0Zh5h2( zewkT}|NF*Ou}kIVSna7x@zZ_B^z_NOw8lWoWjWgKmuo*QyL-p%weq>e710Y71NC06 zeDdYS+E-iHvV6`MEZ_Y^LnN3h?0rQ(^W*jEeA6rpUjGxZjk{rIBdfvu>-~=fA9haI zs8zlH{j4yKmBzfcxK`eI;ktL;r_BC1ll>nWth{<}&HQ_Zf9?hT_?L%VCS2g?@n`*i zxZgOEX*XB){E4c{2P59>j@7%An|ncCLFi7h`vwvIGxLhH{dJZ;X_%zxp0rj(ey5SZ z(E~nOyE5jzW74@FualxPrTY5C7IpUiPafApA1|$4;>vd2_r&o@KCVv8{p&>=Y8PCH zFmka7!o*LU7u@Nc);M3t1z_jAJgw#%IlGmo64Rlw-KMQ&OW zlmB+rC4SFrd5>ikJy1%HzO`)UwF`2p(pjd8|K(qXUVeP6(1r2&Hg@?*_6L+%Pb_{p z?;p>E?p((X!B{2vNjEGD%3q2yzYBU$q^rH(?(4(9`C=Fquiz3|kQNt&0o?>?OP zo#SAb*Z0}a{cm3tuc@)**L~}}u&Choo_qgy?X&l*EvS-vo%t*~Y`VqPHUBza7f2U! zo!T*fy3a1ohXHPr4l4Qw9r$@#@Y8qc89GtR8z((HTr%hT>iFxwuQFd%-1EM@e&6$s zgxG!Y|G#}+-FW@OwU355OA}=EuCF`)`tL06;ET78U-T(>^H#i2sx0}%>n~CB$uQ$&-mVcrUhKOgF#!F&BIs0XI z9D3@Z%viQC;k!q8Zlv4uv@Zfh_tu9y*Wa%{`d!rH<(`D-UXIJ>{MPfE++Q+R_PN^z zo$vyl&V+foOiM&X4*Y$~_C)oIpT}2+$B)ZC?|2yQ6r3TRso1v9?D1o{RX1L}Ox$gk zHPfKGA!w82|Mtl}=Pl=+SGurUQmwXgMJ zLQia0ym@;2v7X)Hv&(r}t;24FvadL|<@IV|wtFWKXq@T~x?o8_kf{ zA$OH2L{jD4yx+o&r5p79Q{p80wGHPyu6a^iz@zOgvhst%LZu}w?SFo8mBzi_t~s$P zStLuO;``g+sjC$7mAA6}pZ!qn=p_;5`GqfD_}AQ-Cb4C6>G4;hoo36v7j0BAtK7MG zlZ40LL~|~K^rGxOjUV%_X={bu*dKUNaDjie;-o7khdo>zTenMAM5iV8xMnQU>}zk= zy}ojZQQ&J8?=un~wQDbQ-}t$b!L4Y)RMsEKj*$%iA4)9ro&QDqYrAUcogUHOAI_|0 z;rdr^-ml-@|Lt-4Zubu!mzP;6ymh$y!9rwBlHGDf7_0xTd<*!V;y-w#2z4#?<&|Il?=s?Jd&n;0QGX~TCG0D)?=RE`An6%Y|Iwv*B{(=ru)>ybvJVId0XGUpM8=(fkUAeH|>bd{t{%A1$`nKOZ z|DN5wb?+T_)$ZS2UD+~Q|K6Ve=k)je{b#-6;rj>g*)=x*k97Fw@c8E*j_&W>^Z(iE zz01G1=l26~{`2N}8zb*n2)K#S!^(mfH+4DK>rH3=!!Zw~BEcp~;J zIxEm;ck96wu7>J7y6I1g4aJ^+-y{)mzF4r8=S#sprCYatq_u2%(5;kW``*?`qyKc_ zuD+RVQzj>_mPlPK@pQGicKpGTW5xe+XPi@ac&UH&!%T%~3q*A18~bd}=yOV+>%c47 z6D7hdH>WQsmZz&BX7;kh!B>=K1lLX5IPdb0ud}(I{dsoGI_n}&Zn=TPR*g3OM1`aP zm)*^cD_jkh|ItadeV!zK#15Ysp9;;eslsCbz;@nA|moanXH*NQ{a-8pdv&gc2h3n)ihmSm)dvt}XAtS$? zmAh^iqvgy^y5e^i%}8!)+o&XEU!31I=l*SnD~l{|txGTfg-a7CT;6iAEfzZ}BW%(m zT4=}W${>=G=IH=ReWQ~zPC60 zwmb6NEoL|Oc-~aCHtPLDl~+w~*F2w*ck#>W3+k({dfio;@!&(s?ZdlW4du#MtNpfX zJZo9_bWM%a;kxpJbMD{$;jTNY@vRu!VzGlKbkA(RvS>ybH#|PL)6 zb(5*bd40?6>JrXAb!ROmD4u#+v}RqB+J(gzUkM-8NIa^MY#S-by)1a%$BhZ+wxszO z@Hn;XIwpKtW?A$n2GvEUbC?6Yn>&`7#Rqje%vxe5u$ALU%iO2hF)lLgKG)43yKX*{ zxJ#99p_{c(X-^c(V&;JV)1pL_nFEd^5)Kb2;fQ=SKDee%BYFDYO=kNTr-@3<g1{L&+oUrteN%ab&X5Bq+R-qyoo%yUAG*rC<%mJ zVN+ydG_lPU$jY1$oHuRl9Hm_m`fE3Resk%VVb;YbQ%){VzOrbB*{_lg2@%D~{_Tha z!?CV4Xv!ZSjp{7UWy`0{xfATI);%xEST0B6X|ZL*bwibB)~T%;sf`-Rw&9Ye6Bf2S zpL1ryxuu!*hg+XceOSa7*u5kp_%hofu|^ZaT!kz_kIR=p9GS_+Ijjn^cEs=OJhxd} zx+BWOHuc#{iLDxLY4iF5yOUDDoM$r@B(CY`7Th6qLhVty(#_3Y2DWRTJee0}6!K-y ztd9wYOYFpzN<|M^-4n>0a4uY7Zoc)l%Ts4Ax@=os&|ISD`?=IeX(i80W1sCF-%Lew z6|yn~1TQ}G2D#z_$Q5%oY_4hT?nvCbZPnS$+0xfnxK8$01KFQY^62ILpzfrUM<6#r z5|Uoq!zhc{E%Q6m&aY*Axl;A{w>w#nUHsQdvKzVVjN!W)>T~)1+zm-nHY82iIB!i) z>AZkb#&%*opMDk?>&ZF1I+}PyP2{q{#ge9J28WtkI!&gs>UsBVnbV+>b=bf%_Ws1E zGZxYsO8k#cSUWv2Ezz_yu)f9kb)%w}Zi~iAK~8_`QwGO8vL*5|+#7q^rP!uk{q57C zsS+g~es&j+;I%!?x}rMs1kNqq?4EFVjnF;rYfG0L%ldSq9#3Kca{6+ z2?z>qC_6XPl&@>++XU`A6KaGPOiKThHh0EU-k*2Rx<3+Cw-RYS8#%#EP3%N$;faHn zt;Fq?u$3LNs4Qe_lhnCaxTvDIvMAom{hWvMtV4oI=Ip=47$((DIJ0pZNAJYH)>eHB zSD(>TkNR~=@tDX{-h-PrXZ5vkY`tVP!8kScfa|7(Mf0A%l4x*}y_Wn%eopS3z$^D?c_S0|N3wJ&eRq=NA{3gBG$%gu(7vfVmbxr!>xjQ~gOP%pK zwUdd&dB=%XTaKjo-%I@LmA9^N?NsGOc`sWTFEeTLBowcI{&eQW&d)sM zyO&C=KDcK&gYuUHwzt`j8SiKoTaw%EEl)f%Pt zA%B-zJokr)o)zWH2h4Q)JkBuwSZR3LsOW&vmJ@&e);KdzY!!}$i}y!#}(Jm_4k_s1-$#k$Lac?-j^#12s^%rz6F0LRC(fx~#d2effF_lc(~7}y}L0@Oy{!vW0&;5&8)jKJQv&kFa4MKZO-dY z0ilb#cP4J%vSTOrrhVRbJF+cp`>f5lW8%yY+>OY%8NO%7@>;iuBir{KzI5xyh9?9dD^%8hJDth6yLb8d14+rY+BUyMHG4Q8Y*SwT-D>#+ z)-~5>uex6%ca1xysO}e=j_%jPRgJsTL?hlGo&7bAJ2L;zu! z#e3NbZ+qokf|HEyq}`kHin;?IS9Kl-gavN0lIbNoDM(QU^LS0CPd z*)D8_%34j6*%xmF%{m$&@V0l-yr&oLb(_Df)%Cdf!+BQww|_nYAL961^?vz3);k|B zG;3CwBx6?kElZh|cO#!g2nDEeHb3oWUB+;HL-C$({1$H#0&lr_F|4m@k9AvJnJ&vy zdMA?oPClz#P5Rx9b0WV-Bwc%3|1NU5^ZONt*Q&%Uo44?wh%oc{oUf9a9}fFX^g904 z^1aWg=$^Te-y=+J8c8MoWA9FjWt%B?zW(6U`N?y&Zd*4S&nT+Z}3+bTAHih;q*XAB* z*1M7|yQBX{B$&HBcFE5v0DXWUe?@y2BIj(!Cp?I$T%p&i^HpgbhYlj{N*bA86*c#A$ zl)rgraI*qbCOM^A4zqMz<~(+GsRWJ1Jn@Y1wjBeJz0qQ zx7f|R`)cJniDzro)_lJref^W{v}FcKcHt+q^=8b|`{5d|QaiVot=-41w|{|&=_Dtc zg`2)F-Fn^MboT;!po#mwUM*N^C>PpMzqD@85lTK=;z|neNh7%|_GbSjAnvrnu{a^ICb4#~V8W z6k3ac*rgfJ( z-NmLViWZ)pr0SCKw8Kv6N};TL?PcBC4cl8dN@W`FDSdgM?9}h7bfr+_qu9b7&1a{7 zd^B%stYB2(wP>bhmRFiW0ZYGaTy&+>HKUbp<@$F;rzhm_3UYmq-m7$F;tO#BU03+Lda@ zwM8lN)8#btdt6^6mN+Eadz*^9IQe9;Lt(qpvXBZF?=`I+IrT1~i|!{$u3C5WQ&cpE zh~=tyo$Fo8--zy3@MWFZbwjd}hbhX!)wyZWBEvP?S!{oJTsSTyBvLU!t%c?9M5PG} z;@s>!{{8+MJ}-7s_I81YTVnd(STjDGb=bJGyx1lXk+$wU*N4UH#DbXQCz>WRC*AdD zXWaIJ|AbFYgU%a&_Qs_e(_SbX*veZfP`#m5;sIaOimMHqr|?>N++jR#C9AS7^3+R( zifcik3+#^^PCoulVZ)Qq`JxIZK9>kQF#LM_N>cmo6@8Z-5B*MveWg&jZN~oXtp}V| zoe^WYbNsEM_I&KGnSZ(MtQdFPRG*bd!j?PW4CA`H>~{GCUHdOc?v@+6%WV~V&|5yhdi_Qp%a#_LwLPm;b) z$WGwrjCuZ2(R^w-f2Z?j3tN?UJ6^q0oaiF8zHIf<^Ov0)c27CmA(dAI~K@#(5)S%qzAjoA}@BHNLh^Umg|6Mue9l%HsH&C}`s{)7Un|Jl7| zCT+{7MBXtsx_i;Fqs|zwnjL&%=*yE$a_Ha=(7cS97a_vzG6D;}?*xu5nU3 zt!Psou5oRwDQ+46tTu>JL$-L9F(RQ+xvRP<8}^Hq}i5NZ}2{Tkhk$*XQL|ro6`3)c-lV- z7r&T!ggu$>``ar|oVPdCeTxcEdG0gqz)!8>?z*C=1u9JGpXC#}ccibM-DN1yToUw| zd)Fq1s!ntX%vOz4X7)|`z~sHw|9pe$ zQV*fH2NS$i_K4>ns@Cu(bW-y_kDF=5rFJ z3!n5?k>)%my?w?fgL^yDw;rxg=E>=fHQJPGZkTDkDY-6egVOSknPzimc4uDuZPjD0 zRdph9k9hvE-%%4b6*{fBm$GNSu*#%mTC#udH?Qlf4^AvP7i!Z#*D_qO`mLYg@hf#Y z9ujGPb!ODun^D{sp80-GbE~H`C*z(k=XQ3veeScAD7jo7K zKKnMa`pn10<);p6YfYO`bYPCBpheo+zNpR5pKC5Z`Pp}$YucLr#}iD-&oGA79-AY5>`nO@Mq}UPGqy95^P=Ac z6nm#f-xND>?{t4%U3#34rQrORk1xh6-Ah}sE~x&XQO@?Tdhz?g&L>sYvTQ4u|BJir z%^J-EE>q^3vPx`leSeRMXPTUo5v#<97m-dgqV@e4%XBplJYva`SizV(%-h>GS597mY zTd%jeYlIsx4Lh-*G^ZX!wdE?gcg}N)b6#odVTAXUtP-1%a{G?;@KLl_Hs&5 zMMLx5>gB(jo`hw!i^L1A*d@18^!toor;|!;gI<^Wrq5k$daZtr=d0she6Qmc^RD=H z!lOH$sUT=y)}ezoSI(q{W(ly}DNKI1=wE|xB+uR=b|q=C5BkSb&qdp5O>B@(ZeJd^ zf7<*F67vNwM=o4bbnrvTLBU+rr`b0%K1`gLANC^Dcbdc;f$bM^>QdkGHlNj-A;`3_ z^LY1P#{jdP$%ZjCgJy^sp%?J;(Xhgy%|pt9}Lb9CvbR6nRu}Uo2mA^}M3rKcgAl z&T8FC7Gn`z5zQ8@88T_nwqI`-_qE^M$Cd8JvwZiV^?{RjwXj?joWEP>3h(M?6BQjz z-M>s+(6_bz*RtrS^XG(wt`zS1JZ%BHJZF{8lm&ggDaI-qH8UQk?kNa<>lJWx`#q+D z{Ab%;9H!n%Z+)>#C?xvHiN(9_T*{5(?0T{Ja@o5TpF}`mMcZRx}0i$@7HIE z752&XVOcNEPd?#Ze~4W%bkd)esXDD5Ir~|zp4hYX(&XbU|6C-t@lD`)n;~wzW%rMr zN!K5z*oxh}oN0J+*%Jv~#;&G5QIQ4g@{GSCoEn(Et8gkh)Gs|TfB(Pt`i4DwznSrE zUvtm@v4L%$dvw8`Yq!nMoV+k0y|FUl=9Q>NH&?E4vsqDDc|oZ6@PVf{%uN#1|0mrq z;C3qb)%G~l>i4lKgI~uU^=(;@?=jEv?Kj@zi{8GKE-1cs+g#>$#jd8uhxQ%XmpH4x zCahw~jNcc{WfuFoXFf4CaJrQ%-S_*lsm!dN?YTRSTHel;?pxh++nmp?_i@Ax%Ys91 zwio}YdiO$R*}?Dg&pn)WEB~=U!Nn@+_Qzpwa%I@umTxbdaZKTUdH(~?-$$5|eeJcU zJe(?9w=KeqZ+nT^@(h{2#cRqRA7I`F^4*bw8*>lK@7>ZqUv`i6al;M84;rrKKet#} zW5qs4;%^zB#my%re0P#=-L@?7=R12&bZhTz@kM){-L@3C9ciy!=IAH3q~}{1pUsO2 zw=DxMZfu(S_`zjMIqwp_IRQ5Djh5|P7#z&m!W^_Cc8+z<{DY#qf_FbL zFWFsC*74MQg5060joI}D$6Bp3BrBKrsM$*>$86w9vHt#U&XKTBCvLu$HS37kS}yZ2 z_V%weGql5JJo(-IWMR|M5qecRq7#U76?eJGG2URsW*bxvC2*t8?{lPD)(iH1$}J z6XOIvFAv^3$^VSL-16i6|7Y!r`hXX*Pr~fy9 z@5o=?V|vwQb-kU~l@pf5l-)5A1#;F)>e}(Zr+e`s4yYx=tFnr>#EBSKJB~Z zxiQfAz_dTx7qQyynEJPO!-Tx0vzLCke(B=u-=34_?|&Mn@YQIqoM;SKK{N&VA_hhPT&FeNEo;H%US3t9P4+hUW-4( zeLeoz>l?Rr^oWPQ)qhxeIHjcNgOb_#yUG=t>yjQGIe#skb>W*A)4zR+eRAc(>2g_i z)*HOM@55i8F25UODcbbj>fA$*ebpbH?LO|XubX*R%)Z^9e_V+DvEb{a*yF|iKW0w< zu^~35=tb&o4yNCU&;RX`p7CbN%wPX&!oABt)T=KTq6;c{~;tB*3s zS)H%9+`p9L=9>j&uj^e-)5DnS8hG+>2kZY&n|OQ>?dFSZ#N!rHSU%T zpZu0Mt93N?_K`ko;&@)YPqYq*N-NwiO<{3GTVL8Tdx`0PAhMTZF=py zk9+^cl>%$N>Sw5&@=sXavwsh3I(Mvi&}H|U!gXcsx7RgWW*%Tcsucdyr^6_uvs+rc8v&3)Y`pc1Xz467vjaz5Q zm))MKG&|aFnmJFO+(Yf1dUGbt487iJvPH7U{lgt~Zl%r`E{(rVlkQt^Un%9BcRk4V z??=Ay6|Z+axc2a}GxrH2-^;3v2VX8;DQaW>I{9W(X?R$mkY$ST3_XWO{~9xP**INp zd7&K`8f-^_ss=mz~b{z1-TgEB<8hLZ%YeA^(gC0O%Ls1>-I5cJnL8Y7%#OX+xYxryuB`bLv&*@Z zjjy;YFIn8PKd{%`Ua|GT!;YHlCvn>ZHt~6s+=fT*$a< zorCCZmmL#2)dZ*ge>OL4jeE!pxmoEuCah>$uDpB7IWxBjZAG(BXX&%3C9r9pCbN{-FcECPx+izAmeOIV~@hhbL`UO!&^XT*-I&Cr(sS z)7+wP?2llj9W(#ezwYdH+2LlJ1K!yjo!u#7Uy*yhU09Z&%PFas+$XQ@eP`dO{&z*Co^RgGclM@#Wwv>T zcUYeJCfsdZ2kK|n zdOt8NFPh(RXYZX_CF86=6~$*`?d4}qSha9(O}tLp_PuY`&w9qKG+lXBNVVf!^%9w1 zb=m5_J3anaJqy0LF7uR~&u2+Su%&C1MED7s!%yqGugO7)BNjom4YW^HF?s$5_>pFT%nyW6HPt1oP}+RNEK zR5&lzj1k!s5-nu;^v4B;eW`^Rb6WbX7@`ved3v*|=e=}hme{4-);2GQx1X2y!N&9r z%MwH<9$Y<%qg3l(tIDfP&664huc!7dv-rHv8^>Jw@HXo3Y5!`Ta zq4b@n&B|UsdHHNv+&S6W<%+hMTYM2qUvhBa_cgcK+n*)M&F8)rXYR{)_U%gf_&sel zIVZNI&yxAI;LD^J(r+{V9#V6EU~XB>FI&g^bMa*XgYpSI^`f`uyH*p`*+8hv%HS zxZX8fUe488ll`RcRM9l^_PnUexdI;+a>_v^q6&=5_SDkt5xLT{i z<=lokheC$?srPsmD?MK2WT<3Rx9zRxT2?_8i|+-?lenuki|-A3T;=howz4}~_W!jz zJ?HsvZBU<{#j3MK^{5s@rPk%SK96_bk`#G&lF1;FGqGa+LfKzOt9Io`%roAwRwAFj z?qYoG^xPk^2gA1{b~@&2EW4pws+yDekjw4cv#!IJjz2gq>Ct&ve;?P;f{nK4S2>!V zh~Yh&wQ}y~x|)YfyLoHpr0q5S`;|@nP15@9+x{MzS@SQmQ{xZk%5yV|xR)n=W$f*r z_R@B<__DK41RTw^)F+;O_xHf*T^E&uj%DAP*L!SoYQ3ghpk`Tjqz=l5 z>fz5{s~>oE*;BFJ4{P_|`u0~aP%VwW{{O|R_a#`o+n&hDH!oQ3xZ%x(U28*r+Dln} znQSD@`2OX&qq(t{lMbF0Vq|}!AEhkjx$sB9;cGh=O};->x}i7H{1W4d`4L}rC47!Q z@aLJgv9LAC;A2(0)SH!&C3BW?R2}(V)BNzSmUs8@Ikr|zHw13Qtp8aearuJe3!ghn z0-TR4UT*)dUv{jcXQBVDiHAPR3$EGJaWmqbc14fye(fEbQ{N;AWxSEJwJ6xiY7lqe z>o)TTIgU$@99a`;V{sv6anHo)brKIBzL~OgjZCD(+0&<={O-SXx#;fMlxU87x>@Q% zyff5Kv@u6j9`i`qa$bK$edzlzPihs8{qu@5y$pt^A2gwpV)kFlDCGdjcIrGeVuYu-B%WWnJ20)ZohMP zgSNG|O{WM~%GBK_{@h$x&U)T>)4i!4_NHInwN=S3ESKGV?<>dGbq^fFg7*G?yft*^ ziJiA1BHurH6ZwHl?sLn7qp>d&H7it|wlAm>Kj}IB`WsvGgDD;FX3NX>L_5Dz`a9*y zl-(;<-F1G)73TffO-gRVHl1?SAWv?sa#m^Upm$bvMc0|9?7rb}T=40-@J**{p>-a-P63Zoywgn%s1be`75vgDW6Y%lI6iKRXHb` zGe3R&ADCSr^FeCnV-=&B=G+N8_BHpO`WXH4QE-ynQGatC&E!T|5(p4?(~=`odvEQ zOsWgLF2TeA&*rnf|&j4cRSx)dhT^oO#690ZF#9vAGxxwq-3+6 zKl>|UThiUBQ>VCWv7Gmv$u4a2tGz}E~?>FS|T$;0&@xz<#wGFLXV;5f&3I5@>&vwx%KBrR; zS3eRy?WSQ@m~yIM*+=<_6`KzQubt3Y5o*7c?Wd^dJ#UY)8Fqc8%Rl(!yl0$vRJNz2 zGv90>`&!+)&8-WXXFgcS#ai^8_3cOP9appDxuUPCo{eQ(#1VM2{jjG;=L+l8)!8hE zr!L!CUK*2jB2%~5I_k8;lBlSfMV;>*c$d2bcpP1E+R|+Qf@Z5@CR5~RX}M%~9}n`C zxn5M3%+jgxMM>a#oS?`iJ2n9c6MbLh;>o;Ae+!?Vv@&gpR5kN=K~{qtw%`6$tZVDH z%#S%QW~$<|PRw`Z?JI55POUbY=h4BX-)UFpa&5)Ug8TcU1bnrZ-pqHcY-iqTnUho? zzm;)^-094=gTFS~=5%*NFHb)jw~<*cr0XNo#~!zB^#%;WTzgccwih;U`x>xZWQ+33 zOaGYfWIYi$U-{8+p}COSmHjKVeKkJ3SpV#6a+bevSN0nB_dkyQuBl>~X!LvYp`fL+ z^h7EyOl|x4>CUC?V*cw=_iry*c%ZviMo(m-;%mj`XS($y>~+C;SF&U32)W9 z$F(2z*E21=WTAIO+51u}lYFgQZ_>FA76CmG!C2#5jZKgFCT#!y=j5*wZK8gX^4e;~ zcg}HNc*%BBVbPP7L61e}hGba(;eB3JqoL$$`Qh3J(M_+Mx3OPtzvu8H;CO3r_1>#B zH7n$kf(?I$Y;?ZFR8e|c_k~xP*_oU-2J2p!u-wt#s+N|u)m}T#|D9aF@wb_Qr(`!J z&p6ax_3&rchlS$u^1s|3IRE8dlK$hueAQ21pV!y-Xy(4SI^9N#d)AY{+{;%J8?5xF z-&lVwPpjBodyR_AN!dp8k1_uiT>W%kzg$A()S73~4;bTLt@z;bH>myL;!O*V>9Lh+ zl)JE8xma^FWuj%NMBdj_KAEC5r)An4Yff^vdDnIx{_HmQ>75_@6V~tZvWN%WZQvUpO(*OeZKc z?$!z!wRW?D%YQeuu`YX&%6oYCnmxOo_nov}X%IK_*G8vTs=O-ud#9TO1Zzz<;n9zG zy!1h8wSHzu$%dFq8^rm|9WHs)cqlWg@YWnS%iyVe+QO5${Xt3Dr4`eK_pEsbPjFWnRsr8>*N~--09Li%?};xS!Aq#{bUP2k@3^_L0R7fYpJ=hjrrLYJpHlH zo0SbWK6Vkaw_Mr2P`t23Y^HSOd%?3;ylVu zT>VILzW|SY=E`K5KXv-HJYAolh4#tPtil$BX5S^g3Fn@XpSV!>_V?f6 z&h?8=9{sWL{>C`>1=rHrfitp2*!83t*K0$ezY)#s>YSg8E=>3YQXwzK3lyLGDjwO{*PHfSq- zuDcqLUsQi}!-mvH5n>sCEw?{hwfuDXgPoJ^CAmN43I4)U!0jCE*uXFM^iP}niY-ca zcinbpIdf-Iz`pv>`O|aq7v5ZV?XB6plI7P-EuJ|W-BmM*?9@q~7%8dZ3^GuDT{`}Xqfydv|$Q+Im;-rW*EbTjaslvtHk*)-Rh zb259ot1n#LHRtHr=QXVBpQgS4x29qCo$wD*Vq6KUY*eGg^?Ql(F|9(<5`m9swl!>#UX ztHM7pW$$e=|0uXea=`=EyeiiGX+>OdE~j=iiMQJX*SYgvy{q)WQ%l#(%DS&Lto|vrfvB8ahr<9(sli!o1V*-`Q3iM#<^kYYtx6fUd}8% z@Q3r9mCLj{k?d>AuL$1rEN8NOk$2$vouBt+7C#q%KgW5=vl+$HV#;G4bZNgdpO)Up zF*$6$VY=nr^0?Z+l}s|3E8_f?+!y4t40yZleE7l%$3L$wix)HMXD!_|zxeRE9_wcf zyZ0sY3HtfT7avHyWB5IxZ>R81XWs1e{~Zw%PwFmuAD{X>nXlCPb@u){CPzr)=7rlGQOo>aFegB>^JMX-?N`-3$7J6>=plZ zE}>}tsvlKL89Udx`<^e<=AYc>b*y%3yn}GPYuKrM+6LO+r>Y&;)b#Gfo(YTnG9Rta z+xhDC`@*;rQ;+R`xyPpZ>o4Xd{V`APCe?g?xO>8x&#Zb8CiU-jFZf-3zN}le+3!rP zxWUop-|LRN+&%BaBlVZ&cgr8D-*osAYf;jFs`PPd^y|{7dD|7&t2w284fI_g{7`&? z`Qc=@XYTv%J>uIQH=`(Id*0p;|GcbkZnpcDoOMyShI@Nl+rsT~qN#%Kdy@C^>4v>nV=4;`=NXv)`#n410fDsj&O(&WF#m-}`=VJ^9*n<~#2HlAo${|9IWCSF(Ci z8gKvWW_68};k2LM@87+?iDlxd^irV>9`|#!Rx2i4j8Ht%>p6YJ^U#-0GfED-=1ZU2 zv~5mKM*xS|O{ZC(Wy_X)+cF_BvGuyfc20i_qfc)IV?|D!*qu5tdV$=>PUT=X1KzqN zEe0((KN6AI?mgzcG*L6lraeq&pYd)yBb*^mB0{@9CPu+}t>~W7l<9696 zgK5Vmf3*m%mEqRgD!0j9t|v!s)Av0ZrxPq>T0%O+EO%Xf+W64x{;l0sdP1)vo#T>Q z%UxWQt_C@Untjx*eXGsSawZ2n~A~whkq5Tu6EDlHwy!upUqXexqJB) z)AcEqSHsh71W$2YarrH1QN}F${qJh_y@lbY=PzQ9RWmKMy=wv+lvOsbn=TY&nJ@5a&TsKW6x=h4u|LPr}0_yhbl^y1* zmTKgAvU1%*i!wRs<_T9?>h^4(6<`^@_{Sp7sU1>Fvz-d3PM)=7W9OY_uO}Ziy>e7F zef4kMVV6%{^{UQ$Zme4`I{D>V^S`;NZIK(Qm2Fn+5m%f4n|F`AET`=Xmsd*94>aqA zyzug={`hr)+yeHa?AxZ!tP0Ri{l38B$P%|zWxc{;BGV(ne%+pZw2fI;<5Iz0hVS90 z9HIi2lr3ew*#FAmqse!MWoaMgEIW9mVbT2MozbQX`tCL?>yQd~ko+lz_l0}y3P#-( zt0z@DD=iOy-m9b<(j>w%&(b(oWM}66Ojq{DQrRJ`*P}Eai+)}`-H2tIv8QC{M+^Of zp=?W4G@U<$t>rp(gEN0C!?wdp3wjo5KhtrPY|7T0X;g4xW3w^K_leI|Jy@P{N~2=$ zTrrPnY24=oV&Zzp~HIX5t|cuz)0ER@W-b-{1c2nFutuUI;NYl zoM%p>%AzTO2WoCxGEbi|)98Z6a<)_j&b92y3$|W6F{SZH-`A*vad+MvwK7V6p!=Ke zl!JD^(3FQaG?iVa7&UxXNnNvl{?&z|!LvKh{eLeQb#%V$cF~}KQmgkOiof!EW#-p^ zdLY_#(pKPs%(5+gc4?v)Eq_Gpa?ms2E%(&?upmc6?Vh%tOQNE6BYzvuliHj5F+K`a zDO%TGi_0aeO|}2g{}6N{_3?Y3udL*jdsJG%9i;kU`qE|VuXja7DtkY4_Wl&X=rOP7 z6+`lbL?9z_Pd|G zY^~p9=L4x~Ih7k_%{NVZyTMVll=sqcNek}w_?igqugC3n-tLlAo~fn2Y|_%QEgz!} ze&kj=c>BunI=O#UbEU5(uQ&f`R{i1U?57VO#(R`rn_8rOba$je!1pHUtNQNKU8 zj{YB*dq{hc@(kWTe-|&^e~^in>E)kOOul_FK1XyTzsdLJNO`VgJz%_z|KYVhLtmb! zY`Y}Zi~eeRd<;J^+Pn?e{Dbe=;?MS0{E<7I4bwjCS^nzH zijNvImvUGg*q!How+pO5@}H@ptjBEeX4K7;V#^nm7Gn**5LFe5~_4mYuFq z)1H{3a%uj@D8utSYqfs}%)aqSJGmi;yez$1>+VDdRj%u7zH`WQo=RHb$DNz*Ouh2P_EOifmZwGA&CRB1+dP@Z6!}zd zlYR7w*n`PwTeTa_!dBendn=Xn-Rb%+bBC4M8>Y(!eSf?)bjOLAS-O$0l!~%EVh`^9 zI$_ri^|RVr*STDqxv;d_cxL5Pog(vV+QN%+UstSsQQUSz)TZoYQn=DzGm!-eNg4}rb>19E!QVnoNvGSMW~1=}*%>r2H(O~{d1E#A-rs>r zQD)9^%l@t_Z&!KLWAl>j-t!+zq@Pv1mk?gDMDj0(mFDZMi{6Sh`$<}#w`B3t;<)Oo z{!GT;e^W8v#H&f?80SkAw-`RnJJ24(QgZC>`@53m{|(b*l$IXp3GRzA)Gj#r^hvh# zhc$M&6ShrCyR+c`CqZ$>bH*b2{2z@Eak4MFt6D3{RJo*ns`Tc*N}Y_$bI zg`P%>srj?JPpQqXUKQ9{sXxVM*rQex8|1Ev~v}0fQ zjCI`A%P;oq(yQ4Upcrv^@rvgimk!TS4hwGOHffKaCeo!I+u*qKd#&MtZ9QQxc1>7x z?*A3_=^=$); zSoybWbnRNj=6`){5;aLd=&Q~t2BDX;H7DQZ$T==%(mYi&KkUrv3pEB$o8|}aVZJ@7 zFQt9j%IT9&v;{h|-17dgW@SCgb|V?(#t%(`Kd+sL%u#$2V|1deA?JuXm*o))w*Ma| zl*-M^x-q-)Y5}M4|6*TB9Oy&8e@%3H867%0Fx?AQieP#bH*^A%o;5ieq z(8BG;>WiDK*Q&diTvFhjmJxTki0Avlf;rQsE_7KJ7n*9Y{iNiajq*qRH&@SJUgU0h zSb5sZZ!?~*_1*qutFt7>yyHs_%FLc`5h5NfBJCI3m)Y6u@?hU6nR%9Lpx3~ok}{>R_h*gC!L)Ys8g-8xVH{8~AubE!&)*DiOtA{YC*bM>4n zN*`vLTKjj-2|QHkm38HFY<%aFssFs%EDWqp?@lt>`*qp;chmlCO88V|;a{oWV`DB= zvH#wt&r>{Nr|Ff>%U&^&Yu?@;R{s1KDjzZ5KIJoadH5!4f0?8pnU@w5oz1d+*1lPH z%FxpP&gZPEbuZ@5kY7=4nUr_PHBO$!)Nfwwu|(~e!?F^OiI!$5;?alo6zli88?-+N5-xN&wYSrm zgr4DB$V`28ZNgd4MOWPC*-z3SFb|xqH z{Jd&fnz|=Q@lwh5>s_(YAJ`_XU-Mv(;`-oul6y8PdJE@2_*!*-kK)90Md9}ZY>e_P z_U(Dd_=(MKgZqaz@lBuE_zc}Yu<_ko{h2LqW7RX>JD+DBls@6iKkvf3MTIK)Ij7F- zR=5?I$?RV|^K=IDc}wpPY`-eMJ>WflPFi!(9>yBJ%EJYEpb-3*dA#eJcz*+{^Zl1n z+$&dIUUK{FB@xB&KqL2v$xPmts{gr{PgOZR?bU|0SGejfNbtO_yu9YG|Nc~N=X=rl zQxw$;GIAoD9=ynG+Tc`rE%x}M2$ehY_DZV|CyFYL|8m`2ybLr)RJ8vcU%#O%0aTPC^qaX6B`C775ZlOjGi{2%n{~wRvOy`wP z>@PKvj@(lHBDcmUJ)_^0%V+jO&*1P^H3c!=XDkGtPC6CU5O+kZ>dxa6#nWZKDyRP1 z_It(l%MYHNdh7d9%=Mb_p*r#EiTCH!?m8CRU$ghDWY*5dmLjvGn$PQBZ0(-IBKaxi zEst^YpBaXUTlKGIPt;u^_~S(H{THc!xzB1G?}-pQ|KrfAi`UZA&wZO%ddPUgCbk*6 z{<*BtkLIN&fHYSCSV((jo* ztMSiu<-DQ`RZry|F0Ovq*#7GBOu@owHEtTJ-#6J>hw0t0O4lhXe=_57#@eVyle_27 z`08_GkHAB9vtHI&g-Kf;Rhn)6dExN9*Plfld!Ni&)9^>Dxchd>{(yPOu4SuIv*&!) zFuccn_u-p8I~QAJ*DRRF>1z4d<;W|>*(SG^fBY?ba81XRTk}iLKK%Bx=K770Z@Ud& z&-i?EdzJ3djnf|Q%rc7cnNhO*_Nrrr{GSfg#oL_vd1Q%A^Q~VMELN|3&rJAuX7c&< zPd@joJ(?P=6~~fxwt89?*We$_ndw#$CI7kD=mqY+xyzOefHvetoNQsbHv$eezIjh2S;I`VW~`h}^>)(Bf2-nn>_*zd17dsHX7zx}m$+fUO+R~`xNJ9G2k ztuuyeXBA!V-nsOaZ^e;!!VT9-E!?v1&OiC_IOk!h^)=adzg>M4m28&Mz4?TOZFJ1y zhqk) zjx_#h^WXZww`&UXpKo5ZGP&!}k5wnn{d>oCYlrP^v)r0nCby(NyveV2ZqYq_TiU?4 zW&3va&3osb$W0TQ`RnS3H*4NbbetdG`TXtLnQN|ml+e$7VKnh_;vRvEbI)-H&$=F< z;q~BRv!;{2lF$~ZbKbW$tz~KZ%rxzKg`&VFiyrY0s}7nP#Od=rE>%w4Q`0KC^qsHh z{DjFok6S%dEnWWI+}@G6=8wdZ=>>6h=4)$vS3KnszH_=Oo%8uqanl!D{=D>UoNLRX zbzp^gNNOwRlF~n3qA~Am%keT>#-~*! zvkPMX?e%q^l0MC`H6qDzZPC@f*r=JmUMY5atc_O=iD=f9+rMVVw~7AOJz2^s4qU7< zV&5=r$2TQ)>$1%AN26BxrL~98Nc|+WzGaig@{LVzi{3n8zWsI4hFEi0!`PskQU%#^6 zGWG89HRqT*KCm5q}1`%*{6$8*&xn_ahDtA5_5K3QCpLubteDW-!;FBZu??5Rqz z6tg(PcWpp-^G1>AvABu6!P$-XwH%ugSM`4&$0lZ8uiG^*M0-&(S5vmdUSXy7OxK zj&})r-D4h$c_m2lWzSr1^(IU!HE!aCg)^kS?~vsW&!1MKxK4MG`G-!`ERPe{YLDG} z>&5b0ZOhtjjymBwW4ASNwJkwyIr}-PSI-p?HaVfoeq-^))*Tz%?4}&J$Wl;f%anUO zG<@2XxX0Y*i`M;ead;Y0tHsC&}>W)s^spFFKQYjgb`&8b~~W#^9eeZRDg=5d&^ z8ZGKyf5Og<`Rlizp^b4{gFXd+nJ0E}XWxwtDI1sXh!c(|uihDUM*T&F+YFW&Pi_fT z2wkp;N}0U=ZcW$Bvu;{nC7+qDT;MrZY^Ldni+7hNs!rYY+h@)@W95?h5tBt9f4f}p zGJMyOb-SxZAWC7FqE9)6e??jw1 zSs1W5jJq~0o%Z+325|{Y;RHE_zZni56f=?C7Rvg+G z$DJkEd%K7|tKh8n7IwM+l?HE@`}fT*`8{*yoPWa77j}4mpMT?iN7RQS+n9CKs>Hmt ze#<`Hs?O{FSaoW53Ff`JV){*#gx8hJB0nea+a)B z;d>Bk*2ygVfc>c=pUbT{PniREmuht++g9x4?vNB@EW8pCtlG(ZzvcO^BM)z1nRTQw z`E6yj_J-_}DtsyLKS-%Ed{h4Zm%7 z-H(-x4-eG$Ek5$-?Y83IwYEzdzgq?^y;5=TTKJ~6{qs*8mg?xpy2SQj!qh#5hMkYu znk;J?O($9AsmVY4;5)(lfXqJ6%y!E^B3k^#KP+F)QgipY_=Ht|{Z_eWA6D10->Hf@ zw0!0#fp+`nIi50c7wnWe9zSxH$!9t8up(cm{oiL}N1MztmACP8ny${I#-Ut}vkY`W=j>PzkS zk0w%gVs@_8ytn8?m77CCajRP2)Y|GNuXE1@{AaUCw>kFUv-g$qiIantH0+2DemMK5 zVe+9x9BJ=2oe-PEajNk6`tO_e?*GtJbf)9!$DTE@rfZJBIde-dQp1KdJGzxVKR)zt;|m?PNt^%oa=dw{^V4bJ>aA1i zZ7)Tiu)VFkAmg+j&zqz-URB*bk@3oZMDH%jN_g6|w)j|9k*Mm21m{HzbPG52dFkP^^=-L+yy;!wRpfikp>FEQqqUo27pVR7FQ57(YTNA%m1~u> zIqsaeTg7$aMcS0V%!01FcCN4EU70L@dXtn<-k~onmJeOcg@YBirZ-P^f8i6N`?+C{ z`I5I!wpnEIs_%W>|5Kd1?4pzE?*Ff)!c(R`ud?3y)9M-XX8Ss8AFWdPv;(!z?mpVF zuUklO{j391?=rvJC$aHrpB3NrUoEUUueUBRkN5ljQ~9S-{O0{HyekqHX!YKXU=!ZY zBEIAGr#D6$*4WG!o%cCY_7L|PGtnCHidWV@)}@NCoo#ZYDt)`Hy)Cm?cG(ZT0_MF! z_xDzOzMHLhpLLz7{61;BGk?NF_vk$S5c^<;P*?h$YP%Bgwq4JzH^sbOxVuBSJ8QB{ z#4L`Yt_xK!-0fS$EqZ?m#Ca!3w7+NS+oxbTP?#Z&N`F=e6e;5z2{nO#{#Fty;_Ho-xlHFIm@y9#U3Ga{buaVhTEmV0qR>DV?uf)72 zrugz*kA>d8p_+STwn+zGIP$Kw@ogIa?cNj9K5k74e{5oV_L)(!=1I4C?eE+yr`NoA zcXal$kDv43pq__cYVbPtpEok-0B;-Gj<3_30xo4|bT{DkTaZFjcanfPp)-9FuU zRj+)ditLN@+hQc`F8@~Ezb4_v1g4<6gGSe`#@`73WU)nPN9+Gf@dj&7tu#(LSP~xL zej)zAw^RBO>wYlJnyK2d@M}`n`s{^2nBGl(%l1f{Z-UvPA5E&OZ4DUzuF>B1i0hTU zNW9>Tp#5P_O5%78XQq4>i5Fa=wo!EbI}xAFR_`7dd^A2PuH)Oa&_!LyZWq?B0OqXr+IXSh~2sL+HeEgU-zIn0da*7CTUr1-=;Qc#*gEQ zz0y6$7f<_DVL35+&)@pB630XX;wn~{NPaJyx2~(K*W&Qbp13qKyMG>4+_ztD395B^ z-Fa)OTwuby6Px$ioYD=w#nq+t;X%%U-guw4rMg$*KAu0g}s-7}ABZvD4m#tZSO*UnGsGg_a~_y5=IFRQx0oO*n**n}}c#PRw2 zu)v#1?k&M5V`iSoleE0wVf}99TqYJX(TsPI)~i;=9oR4P{Op@R`_dz4?n+o!oq3x3 zv*qYAFOEFNu#e)0Th;0=_D)&9@%#gUZ%gMq2~B^@<;SsJ{dr|n_2H1!+-WR-KAr3R zYa66j-L4~dG{Ue;t>hWs>6DtCZ)7cW@11_}_0@FS@RHkKKfUf+_x(e5i{i%b(cCjw zj|!{~@3L^%&~ocU_JhT159t1wogSxk%W&Pp!|^GTP6Z_&k9u0fVlVv1EW%}W(Ip?B zBa!JAYaeb_;`CLge(|$i>UGwkhTwDG_Y9daEkg?>dD^a^c5)y565BeEs%wG1KC- zv!XYXth^g`rGDADvTde!(=U_gigy*f9eyY=I`0=5e`A2>Hyy*m`LATQ$8^@R>+ zMV~+WxbfiEWh*+YmPhZBQe|0jc%hpV)0YRz4*jl7BKt!QwlI{=dG%DcWYzg9))kLG z70BMHzVUACoD^mS3mzycKQwm`tbS@8r5t7%1u8xJz~FcF~Gkto&10 zK*tg!Ph>eNuQpjz&Tvr+cUb>b+vy{d?ta~4y36!Lm97+SnWAg`p)Gg&(KWKo54m_>6@0s$ zVSb0JB$@NVjWw0F_gw6_MEH0nEIyu%Y={N5(p}$wW&M8@UU)>ra)tcD*tyom! zkk#w!U9o+^PiM5fkebOOS6rag#$?L&T;oD>KU1yFLWkbqCmI*zUw-_3{eRumC+59U z=PsuHlb$BH=iKRq|G5i}8GNg|I6Zm&j*KG9mQ(NJH*5%;CeVLC)#&QRbd3$$w;qsr zzF~qxbE+i#?!Q0NxyvqYS`>JxY4-+4YdyC$#h)L=ZU~yT zF^Sbvr)ZY-s*n8#Qx6&JPFW6!h`oq zKg$`ow-=W``EEDmBI`4oo9o|fwydj&{~7gTS*2s;-?N9pztvaAo&6l2(9vvhotfp% z+PQ!J$Xcf*Tcn*YjQk+zDsn+o;X>!XEPP{V-f>ftxsK2K>@r!$+td+PiWd! ze^27Xn>h{rhb_YMGJ2(TQukh!P`#)1^p6?a8p&b2i+>#mZWo!RJ0*69pk4dY zQyY&Qn{bFf?$OcWD|?fpjkv8v-Kt6+&wS0&o64;u*_azO;l}~nx`w`k(fW>o%@kudW=&eP6z}wD+Spw=vVSz#8Xu(d` z^xO9WU(P=3v*rrJv%a>z&ucQa*8Dvw2;FJ(V$#pY1@5{x63o1Qr8QQ`PZ_q`)j#r?zXIZ^$)jMPnTLR_D%Yj8O{8BdztsJ&E;6t z=W*rjv!J<8JEpqdyz!~%%p1XwisUyRE}i%pVHYpfWBTjhk)P_P?>)UAROk0<_w{F9 z;n_R;E?!+#zMX-kI&~FW+r{Z==Z4{BdKPP1)ZI2@ChwS#8#O*6PQ% zPNM3ljPh~6{5MnfRBXM`c){4X>i;>BglQc?+4>1bf9P|2_goh96U{wwrdiZ>mFwc; zrU$-ET&?}_*4C}DLEY1~&3N~4%kE3RTI<9&&Q9L2z`3p{Zr1;)>??Gam~C@k73i^N zhjVcB$t>Zo4sM!P?nX9T50egfZs-@ad_uMR^O-w0N!&=Vt)JcHDw90to8|GX9}JIQ zUSn6kC39Pz{HN5qt$6_&Z@Yh6a|R2$9AuN5oox8|PSX3o;Q>r$N$)&f6{=b74=Jxc z`se#RzDj{r*UgU}R$X$e#^ljUU2Xf?YnIV^@pC1fY_`>Qb9u+N#PKaBe^&6)@~_W~ zk{z>SdvD0~EL;5bwn5ZGrmHpUwF|^`S8U^t(1~1K)4 zR5|>#zZ=@W#B&w%U(2I&7BCBNSe&=WuF2l}+ug=<=Asoh^NcqyVEDW2N6wNGKSS+H zT9aau53XvEa(;B^&8r!Q8)jB1%vG{HW2o4#yW~1c*rQqd^b}m4J?# zW~em+Mq_gFo6&q$uN(lLypO&`x%6>{JOW}j@wV89=JA7=ec4P>(PE=PoOyS%A;L^tM15LxyGFyUopdO z<0AjPzgix)?KAXd+nvI_cE=IBn_?69c3juY);Zmp+SBY5YrA37%kGqKrqfuS6-Nqi zF3nqs1IKo6M^2N&% zO@p$Yeev2sSHCl=uRmmb?Of5}GUlDLzaGmw`YTZEREcipWh;xR>v+{Ktl-|e?BX)5 zmz#?^&b!*wez^O25r5e1i?8e|(`z@Ft+wA$vo-DSPKoJq`iHi5?mhNVHBLsmxz6dU z)n)zE+=>8m_g9kdJ}pry^SFGtCax#`s^siH&;B)@j7_>|_dh8mCg@CocPaakMF)C} zmu>RUn=dE(SnBrF=tBm4(>K>YD?DN+#OfnxS|NA$%EQWZ6ZL%`rN953tNi%$0%NCn z?#(~F!@A-?wnMkguiFP_dHWIj(aQl=}4%} zZo7}apKmG>I^ZAOe2qvq8KKAiRA zNVbswzVK<=pD%i^#mJhgxjJo8pl;oQ1-i%9I9dqLTICocF-Otth|^;BxHr<%xbK>8 zk$5I!{#(f6$;Q@Q4B>0AV4`%&>T@xkR?vA6ym zIdJ-0e)sCqf3J6#SL~eCD3dL(ZukF4pXm$cwI6S29bd$^`+#cesiS(&7G7N|-R@fJ zd)lyQ;)nh2ma}&pebkj?D6##5+fL(3?(4D(S#^%fdWUFV_C6x|c+$2z0aopso_;TR z%ALXZu)yzx_K6#_KPvS^ud}O5s1cXo?@ajBVEL?e%|oU)Wv&?<fHk=S(2_x*u$O}xn^W%s<&6OBy!7Zj$Xc6?Kfl+>C!yGlnY z&3g@RW%P~n+*O^%hq^_dWWFqtD|~FKTCO5&+&G;hqUzbq-x9o)yZ8Rsk;pC{pp*6I zfH&Kp1A!;*hx)Tvd^6OpeYxZHKBY%#59-&isXiw!;nHHfIrezOPrctR%aYIdOSPqY z&oJTZ-J0pAzrL^i(2QbEeYJ-Za)p)FeSGILKmNZ&x_ZF$9pC;==Q)(v(y`q-S8Jx9 zPoV$Yr#$E1?R3_-E0*AU_t@8FueST`Tdsez`_yodH}@mg!k@VfkLD(OT;N!FK(@80 zAi&72R%=6J?(52>kEb+lE^@yAd+P$(liQiZJ$JTQe|@2M{z;Nh!zW?eUC}{>Cd~^B z+_)Ai-16IQ9AWvY;^8IrauYs@yiY$4Gl=c&lUcrM){cwWb3UXOJdhAQ9}&ghmdVY| zx5gkiSdI6GlbQYcl5Zz88;{MO!(GyU;G(aSu~vD5;o`*=HZAI94|rd;+O4>9uFU*o zbe>uyZ}7~C)~{lF``$XgwUaokH$`X0`R+`mJ?xL3S*w-b+#a-kvI%$YRLR-X%{(Q-gl$#TjnRUw=mIT%k_4 zl&ne3Hi5U*c1nNwCWm~KYh2IjFCbp}neFjb zi-LB^V-*YbF7;l=e$iR%*2&V%U%B}bd^M7v^%flnxwDgBY%15DCk_!S#deDASRctO zrL=eP$yqgLWV?)4CopEMc75-#!RJ)>%-7d#SYj;KTYdfMU+Z>u+q-+$R;Rr;=FHl2 z?}_;9`RdsZW_%gFZx>hw$t2(HJ_3XIG;{4+tRw? z;OSMNd%fOt?fj;9NYDEC)}*$(^ZZiw=6+_YY5gx{9pzDL9~0T~yY=pc+18V0u90b$ zd~d7$&%;&0w*Q954ZS@qwQ6@ZsD0W!_tNH-T7N9hZ{EZ7+^! zTy#jbctOvV4AZuLMX5VyKUwvCKQ^oVXADo2ibUw&*)wmdfBi0O`pt}S-kNqRBZ1{x zRRB=1N4y!sVBjAGl%ot8T4_ z=l#lKS~kgVbu8Y7?T##b6V@x5u`s0i+@=Pez9rnM%Py|qmR)sm*{!mwwKiv-C(XQQ0VIo*OMKEGJTci(!k<;UI#MNKoCs&n1vI4a|KpM6e>xwPc`Js;C} zg|E@=U%B>{T#God=9lfk$vr1-90S#(Poz?r&R>6%?vwlZq{Z=5JSB!tXE3jGxFs=} z$#=)1k3RBVc`;#m8JaVG8VN{lY<=wGwr2iMt{Zz&*w)xO&pXhSeqFuczs)qu!fyhS zbB^*w+Z#yEd77Eie(@K}hR2FUhqi8*Xa6vZreu489Zclw8(LGFu0nbXheeO;{H z#X0{;6ZmnAXW!CYGs^aSIIneM;U3FNcQ~IW|MdPk#q{%$+xi@Hf7kC?tr}S%!}{*G zNNE#SEraLtnH`;xdw#EHKXGK*?%mTmds}{}O;0)fsF1*ycS89W8nb9WuERnucRw-4>J<7{}{`xBSY@PAS$LeX` zIw_d}>~g|V)kR{B|Ef5*+^L*1Ik7CH`~;`klrPN!y*C0EN6*;Myr}H>%Q^1NQ!Ok- zqn*ncrmuA0Q?Wi$O7-Q6cS;qfFX$=7o+`X>pr`n`*1rQXTkm8D@v})<2k!BCXVNkE zMQ8efrTT5fUWa5pe6#xU$MMjb0?*$mv$ub}JpT`m%v_e9`fCXRyOt-GlvtUp@RHca z+LG|r^R&r!Hv8TDY%it!?d$(u=bf47QO~iVe~oF)%>#~7F?I$!_nfy%xI8<%wME9$ zD_JD^b?5hs?9R!z|NXo8wfNAi()K`QGrx$b_8m%@$t^7NOisD1Fc6!U7$@CWeQ|%Q z_U&2xe7!HOJ^pn#TB81g4!4DM`JB{{jFilshbsciGv8TqhKn!De*R#sNykIs4Y%6& z|2yUzrpY5P`Nndl+bo^4zs0S%8hv-si_843-Rf7&1b)i-2~--~F?s%-UpGv-VDeg} zjKxXnDWwxv&2+T5+^2SK;iMyiby}V!v(Eer-!R=lwQ}M2QxdoP=FT}RSp2!;pw?^I z>1R5tP9A&`kzykuRrF=zpBfdzJ9Yo6Hb1+svh?Z9ZBKWdlubDz%(wYp6dSuLC+BN^ zqw_bMXDNki>sz?YFZupm`rUz~MG~vT<3jDbb4oTZ{Gl54`)R|>E_<=Z8d0~OtvnHY zc!gm|Tu|*(u9th#FK?{;8_4=Ny>I4?tVW5D37yJ*Uo?&@+X~wJR(V&gI5%|l60xAD z^C#?Y9dO!qRqxF`wVAc5MF}DK%{~lnKSSI?Uumu0VJW#TqDkx8Ik$`PKK^gN{#=~4 zYQxWhTG=SB<%LK5{(d!!e1G@Uq{tUfvqQF(U3G8D$^D(_X8-@il^6HkE&KQO-mJV8 zUrh{eFL=ckb|#f?!-O-1d;N;vEf#l9zSX_3@lo}EiPbjSgv7-Itd3ZVq}P5+IxisA z=+}L%@O#qp>`nIdJUi1SsdRgAFT2#(E`8g9{pRNl;-_1ijX(YuI`YHs%%Oh1+0R9d zX9St+{85~2W{_em-T1_9+F6&^f_5zv*BtDe=N`F9-9|d~Z0#{s_lq3U4^HI0kQB?a zMuzwz+bEZ?^zZeURHjUbI!*}Hz$PYPKlS)^zbh5t&DO~UFOZ!6XnWe zweE%ti>q=H@0Qp7FJ9DSD9Q3H486DR+Dv!l{}Ix{8~XnqG?k3&)cJQX>cEnKHLIE? zFHCfrb}{kDEdQ+wjTe=itNSITy=P-@VdM*G*7~aSgW*w{zb#%@PLi_m?S8(N>xhQi ziW6`4?c9F0IPrbd<|JRoaF@Id;rwz2?6>Y*xirC1P1hpmWK!!~;f1Vi$DYmndi>!t zwK)>Km-F8R`?d$O@7cbqFZ!t7A=XXXi`G22nZCG}Q+Bsu!IZkKv&5?84xU%7Xn$D# zAyGolFIFU;$2mTNz0Ik7`Jb3c2@3L#0aGft%kC%{CcnME{Dh9h*>gR$n%|x&to-y@ zcJ=UZt5;?JKR zO;-$ZK5Kt`G1>c=3s*{s6Wt&3rvD_|fVSk&if zu#`VRZ+9_o)&b?o_otfo?N8jbfyMvQv;~u{?YJ3o=~(Zlleac)+;lD8Fi-2f?Ylje zzviDd&fm6o(y5CpR)1vo%>1dH6=VB+&Nch;_xt9p*?Rx9ou~AaAEzSQb7L%{f1JE2 zw8wS-9o>5KKY5}z?apvtuU)ZE-y*Bt(6@nesneT>q@-qI&Y z;t_i-Rr%(iv)n_B z@8a%dOn%39-L%Yi`iz51PJXa(KJ8wj;d4w`EllR-p2(Dk5h7myl%VUat@iP-_*QlN=jvh^|BRdCg$F|qebD8&eQWZx%yUupyTkeSAG>@${(pDwXT<}KW$o{$Es&jMbMIqXE|=lr zD3{Z!d&0buC!BcG@>`_%@&DN_%l4K3U9mn=Ttl?vVvEYZd;53vMCfrH7FWxd!C`vr zkn)+de}bQv&y(B{d!Da%-qNrC9==_zanH}f`up6aAsH%@Z^X^o&$UwK@6Cs+WP4i{ z{awe>u~T@1mHT!6yiHz>-fgZ|t+#R7yxkkHdi^ffi;Lrnp7}?_@LS2;b(P~WKl}5q zv$dg8V)o>FAuF~|C|>$}`E!HqQx@RYriz?Ev}wx_!?ZDO~%&*x$PdfmuEBopNax^WL?ln=pde@3*=4VkUt(mJySzK8G2cIIuQdeSHYa>P@^>%a%u6-Ki9vncwwcLb#2qXItyq zP^HL&*A1_7&6ilr(d{hHd}+&?_7*#F^XAoOt!0EJuaC7Z^xqSeyr4(>HB(qgs%XV6 zog%y21~0{5r(R)C-urq>vFknW*F1A-<3o2W4%wl3q{Bu}{by{3zk zZd^?M$HjKBhRrDNNY8h>)2r>}`?8+>NSd}bVZY^rQ%n{$7A0$P7$unR{FE(TmDJqQ zu|Y!bh?CW-W!HJ`H94l(9K05wtiLMd^^uGAf1(xo&aTz{WwV0)bhiDBV`A^l<}vJf z)&22~;jgVu+B;90_9uQ@ywlWnl}+)I^A`)YF-_-XuQWf_Cv@xTyJP=0g)e88GLQ_N zpSST@@{c`iF??-zzyH^rwN|iKU}qA)@T1;*p1YOnSFyj8diS`9wdhYt*xK)1)6P!Y zH{lP{@5+9ij_9*&-#<-~eQ6dC`WHSpaFZj>dw$Hq-x)mrT(|T^8Xb3EzT^PY+)p8r5`wCmuOH5s zBjhzrGQDY6z{}lXVO42U{X(`K@;Ca>*tjLv^NsQ1yFve4=SJy>-$*@ex8Y-`+=RAO z56-wv$~$!`L%||(`OAyVO(NDwOQ)=vyQK35Q}Xdg=EX5_Fve@z1Q>Q^^2bv?yi4Y9C1&s;=9ck$Jr;ns$ZS|y})-_ zNr3708ouuAzS9pD9f^N@_)Yn$X=c~g&%GsDnaXC#y7g@M5_ORUXM?`#dc2W%8vAjl zPF>)gM=Mv}*V%dcnJL$*>qb@9=k8s+_c+gCN!uFh*`l6PPN%ybpWCFPWm{;`E^T#b z`IFAf3|aLuF6O{FHzik`d+=UD(C|j)8VOAksXw+qTV-TFKiyEH*L_;j&G*Tsh!2`_ zweLz#CoH*Vs(0WiyZ1a(i>xPq*W775#S+xFQs$=*hk;;VVcSaeY7WiAGC8fgjxE*9 z3fSRPx#;@U&eMfA) zJH8&+?RzKZv1Z!C;8#bIW7o3v&8{?hz#aHJ?}OpV!o&Zs-d=C19#?ljVCV8w$#&b{ z*&V$Nt>^eAN~`<1Br8b0d(6=nt21xQ2gXE`nnNG7#k-w&&38CBckDJzictFgXK`V! z;nlA7=S=nYnBDssRc3L_z}bdL_t2^A=Q9h|-d}aCvgHQr?LAI^qKp=lS^qpaNpah6 zgPk8@`DK_w4%?e;efRUpviXmTwUrGvB<;LWW0TeVf=$oZ_LXe>Z!=Dj_FDUc!%HC@W7wtJ9>pmyeoORur&~WA(fyqJ~ceiG(k(eAj>!j=P zUp~3b)|ZsF2{m4~t=sTJFGA&O?Dc{U?m6FMiYGAjuj46u$ag1J=_^yQ`=hN)%4{$(9v*D@t@*5_tSxs*~| zYAHA4`h%shy_bc~o9y}hu|s^l=1yhZ!otInPZ*hI?X~SY+$VVI^qkcZ5BE3zWWCGt zY2BU1bu%&-EQ~N-&=rzKayR zyx=Rysx_Ib{M^)cT7rVY?xNRs?7sZ`^?Uu7M{oV9Gx=b@#UW?qPU{Vu?5sELDSEE| zW`&Hz4ragNonejbHWJn@$F?rg-MR0A1z(2ror!Gqf6ej(rfn6hSUTnPiK1##)yEP- z+6Jc{&h6W}|CYS9#n*(!%n~h~bc^HXo_SQd)J2-ympoSJ7nJ(`faR>UQ9BoFY|dN| z`d($iDsjEqO`(UAX6}~S7im!CV)bm|uM4lcuJ}!Sw*HfUt5@d~bNi4=gL`{V?Ff6* zs=uTC&S%s84VS*Y2&}H$RP{qWbY9@9$BI+pwVTxJEN6wS_}*;t-=VBqyV#?2leyTznM`6DR-eOkf+Q;}I$gBqEqs0S%am8U z57k8atzUab?M0c!%cFN*tcM$q!?uZ&L-0)e(KUVWAhY~JH*wYU3U zV`9&H89(OoxH$2G#|d5Eo=z*WIPl?-;lse=Z;#$E{JuBo+n+-`HbLhvDlWTz;}v_~ zfjb_{-rAkobHjWGpY4ttA9P-4c&^hcWDd*|n0F!U&wQa}1-2W!m&N!WzS733^C$6e z*n_#b`-UWj{MK17=(mz4%!pz3Eu`;&qnicFf;n|NVj&Unv9M ze9^lbd-pOFH}01Ex-i1Nx&7*$UWYYZE4PK~#d9^Eut{3G|JII#SYz`GkM^qAaXh+t zhvCiIWG+}Smi!U z&o)oHYL#&#KkD~W-m9l$(;}*LB|bmMEf;q-%3Aj8nR&^gUtZ_G^(}D9`qnI@)%=Xv zpXKcofw=wCn>tp!-kPvcR?+)gnu{d=Yzw2_Kfi^}NIvX*Rck1HIPv9V?OQd{t~CO^ z$w?`N-b)Xx*tp=!uPag&f(1{7!`v;!i)I9Itm#ufe>Us7&a1K>@tMJyWE+MaAPR6?k>9gy~Ke#I1bPh?6Y5d5s^PhXW z`I)qZr-ZMabJ$$ItxDir&rGv98b9v4W|fJ*SiHAjsqcQhZR&mLhgK}LGduj;U{CIc ztjZTnr|P;leKvbh#Gt=cEy%9@=+Wb;1*MPj4Q;-cznXqPXR_zj>}l`a!>iS%REo$M zJr(eo==HwqeCo&UT}N#+zp{J3GkSmOKhM@{k2Aa_FP-b@esgnu(Pxq7)SoY2>k(84E2FF%MSA>W(m(fCYrsf=Y-6@m$HhVZ-VMoZ^=7O zr*jSM7PREZzI$EPTHPCA{o~}MbkAp|dFs!sZ2Y-jq?zvHUpznhnVpyK8AqMHTu!%| zSf(G?9VZN`uZvOM>IT3M4J+ae&=j;5+nLqLbFPa^h zG0Rtb_WNlz2j}@-(w!SC^t!Elq1=Vb2S1h+m*0i1H>LdISa#&2)Sm5M58PH? z5zQ9$evC`QK>dE8e%cYKo8*e?d-Tj=^F<<{A*X&PBpY``gaR244 zdwqY-haV0Ocg_mRudSGJKBV+pzk9^K9lhHYdy4c%1Zp(hS?i$4DfGI$?Pi#W>~z2M zv*K~m{I-+czBz1o-2RDd*^g=i0~ICkd`~l-xf(rKfh`jq7{m zEL~Q#Rp;z7UeqdBu!t>xO{4JX=u?jal6^TmX1+Y1p=n+9Q9bX*P3zP^BhjPR)z$<| zYI;-?T(eS8Xs)Mr)Nv(|qq@Dx7hh>_NaxuZ((K0jNj~ND%Q?T39<@aMFJIFuA@glg z1+&|o(tdfBb*!B}UUQ_oSvFeUH~p{iMj}@7wG;0Ry@{0%YTves&-$c#^N-t0L$7`3 za*e~q|0f-MvR3r_^`o9T7bYyYXZ%dgX_@1`?Y$4G%G)L4olYi*+;%XZp_H>gc*d61 z7qTYnM2WpO+4K8rSM&8LS3ElPS^JDn{X82df8H@!MK)xPhmc)GbDo>z?Frtm=CVuq zm@2>8vGv!fZsn6YGp^-c{0vfpn{UU2bS=8Yp;#MM1Y{2jBUOI8Sr9uE@S zw)0YK>Vhk2t&;D5e);(|es=OvvlEBg{|7KVTj=Wo0Cc94ls#Kx6-NDR$#p~EC zChhvT=VsCW`(f29w>vS<3Q}Y}_cL|2zQ=(YZ-YG<7hiaMI-7b@#re^Z7wu21uf@sp z^e(&Jn7X-}%kKtH`nGSKR-&5FR&6%0+Rjw4pXH?f}O6PtJds$(d_VDmQ`#YcRKCpG$qcNv7&bp}1 zZs)pv?^#s%WAiOOr}l0sT{!WG`p!AJw`QE#9)6AM@xf&o@6UYAe|TiiwS(5~Cm#A< zTDsTIBXN+%(t%I8G8Q2S>~;VJ5oFCu3k}9xz{QCows*sRbqOLQ}2{7 z3GHQvpTy`i<#R?YzwXbgiCm90LA(t*$;_&)2&ycgahcU(5$*#P6KU_Rb_$yui6X)N$Rc zB{ApC_xzZ-Z{fyU2QSR{U7Pf6Pa>Ni-vX^GFW$^zcH`{rP`h2*X?a6*PD5NSsLGw? z>UPM=_kr=8mFkgq3Z1wzSxp<7>V8&xb}Af>m1?z!3)cK?&+B{Esj`W5b@Rb zvt;mrSFbLt|E!baP+{?E*6g0@Rg2iq39^?k@WqSV-P+sCpxtOK|8=2-z51!;`YlPW zywdAz_K7^N{W32@y87bZL#0byH9vX^nJ@aB6KAm6ZY~Fx@-GAHe)~)xKeh+kjx{d~ z+`K-=CF%2#60wvD&HOu(Z%^iJV~f>)5gXk&wNKZ1#X{D3s||B>X54zw!FEP$wf_f~ zz9+?=2Fi*rzv_FQcC_5*cj=2nStI+Or+a!cx305$Gws^HPi#ehf1Fl%U7K`fb@A@~ z5|bNWzLN{}C|PvE`~1tk6;0{imTdOV`W8{Hlx5!hL2BA;2bUXPOA`te6n($7{Yr7j zxi2xh^NIX~jCq0!IDQ?R!#jP6|2&1aoskdC{mxwI>^-VFm4}(#YrX%@g_ca~Y7Qqw z>qX{uajjqd_+s(qN1Hc`eq(VJ(|y>~d1UU*XY-dCTl}1^B->V$KDjnAJ9_4J%@tjH z&Uzl^&ndBd_{5Og>{#r34(CksmFIRaJ?8xMOWye2hDFUQK5=KKFR-+Y-WzqUr`N1T z1bW%yxPWbwnx1{>9`c3e4WK9|?%KJUrrs)bI>##{ENUK0>$y<_#~dj0q7oEs|x z>L)yzuJT#xSZ8J5js>^Ze7p50#^`%!R?@%3m!TzFbTv$8-s~^C<~L8_YR=Yu1(7Q^ z%v(^S=cu-(VByJ@sV|n5A6hnb=B97!YM=MoR?lJi`@HC^=T_yDEL-D$S3ACn;8+*b z;Bsu=zB|1fFD7qnD@sf}R;InIG!bQlh+?ve(US@Jw7$29p~5o|NH9boQK-o zVW(x(FYGNjeN$2>yPEIyw1&$$fYxm3T+pBJ`wUIyF z;wg1LUwvI)Z|JwA_b2}+AKs}N7ct*pcZFDucA>7vtl#s6j_+H;k|$en@Y1f2LY=aT zD#gb;8?{$ED7G!M&;9i0z-2Cdp1!vSE&VJXr|k9puFk3SW|BnMp6i7<(*I)b>+$5v`ltOW z?@CovHn`KgEvW7ArNvLTzu(GsI>tmttHAo^?<1`DWH#FAc`bQ%Pqolh^vj<|Hn)3c z%wb_v{ZG z%ZlBwpg4iUBrHeRu2|c9!4b1WxfNgYcnx<{ZDT7sWM;y(GB@$H%S*4jGS0nIGm6D0 zHCV76D*k|m3FZM2@5&bF&{%C`zWDPK<(QT3>!yv^nzL8*7AN~O-T`LO-{ zzIh#1^H#@I7J3_T_ZYAF*{t&U&^C`vRW-+>DyoG{tn7ZidGfgU+staNWp2NAFP^xz zbH!QJE!jsnwIAM+SX^yXTle>P%4Ij#>WKI99%`%nxBot4@cG~~8H2}cZK6U&>*h(d z*4P`B&B}dz@IplGe!nN@CYt+{G2}K&t(qHlv{BC>Yl~onm5AH>5Qi7(Jq*W9U*0;R z-ur2>e(MhZR&VQG6e3I(b#(%M{>lg6bb4HxENWOA=|8Esn z4aMrb=u#(El^4QXq6dW++*iGHxBFv41!rnyn1k)fhW;t1BR7j}XJc$J`TFJ{SN#i( z*Sq<+4zr3cb={}F;<3avnHxe`!8&inKDf=BzOSO?yVCY6UHxA=y4^ln$-PZ@BM~fr z`g!Wd&35&E$Nrq1v|H!Ws_WC!CR9A|%YR#JY~jKFF34=1U2E5A?|Zn(z+R+9gU=!| zHPwH195c>(v9M;!^2*1XMN|EiZa6jszLM%&!)vqBPSq;z#)27~cdjb%9sG6gBF`}= zgf;G>p|frZ*DtU? zKI`@9gyxZWEJW*|VR`De#ZCRvLUh7RQ)uxBB`GSIl^69P{*y6c_ z7IDm+)oFb@O>Jw$Mu~~Hu5oX+jG1P*F=<`ptk%cp%p#3$PYsOqaMk^)x&6f3-aGfS z2Z;sbDQPo1ue5T`}A|xTrFni z4YjJAu$JxjZie!cyv%GwX?RJbI7a!z#y0u~Pol z#^{M|zt|$Lf3gUBxO1;Viqm<$ZyHu%o8vQLGk?UiEtmfHqUJ?gZ>{*#=XVQ^?C25< zNs5n(Y2Cx47yQR`?)&x$oNGja0}kY^TyZhrM%(q!2DYg#j&D=M5_j%+`gzk2-@;zg zC*t1kih|zS>)g@{4P)P%q|MxG8lRdzjq&s+&P#@znY+8H3o6>Br5441>dwqyj+dEJ zzU#wm;k`8mKOP6FBzvy8;N>dxa`O7Bwv*4FZm5Y9)8D~!yCQNHYuDMF1I<^NzQzTw z-BiE%$@W!SC)eFwAGLeooR5+h3esB>SxTJ4daloTcyUF47IPZo*<-wRpW0N#b7XGT zCG0Zb^}n=Caq_mJZ6}wQp1E^!$yx8TOHz93yB}SBJ$1{=8IyC4Ptv@#=Fo5bX`8d- zpE8_|`up|ePX9~S0{F@=T}${fdCS$R)cuppK2F|}X%U)#CZIm<%d@Tr{g?JHKdry9 zqd(yC(akw+s%#S)uNYW3SMnq~@b1yjcHgkfqx<2xjX!S79B+7ZvhV-uuy+yXZlq=2 z*|;}Dw*B0e@JMzZ8-obhZeG@f*1ObC#q;iCZ`*b(xlktc%?{p#>mhaeD{3}(Jdi7W z7xB>K#fIeOPq$Kw_Ui4MqJEC)`rDsvBD;@os!)|lICqv`YcB8B*VFoBS8a3=YU=QcOpC{CwMvD1My+UzQ7f z?|2N~&y{a2mVLd)nP>hTMLRKTB z{GC(wmAIOIZ{HBl15T`uXXb?_A8O|NS}FYGhB)uupv7kd-9uI}hi@zFyt%US&iuT_ zT~}7*AHQ|+ulmP;Q>&&~$B4GQi>iot9if<39wSyFCh|77P{{4h>KFQA_glBWIrqLL zsO)UzKIt7yuLZ0^b{>8&_wHeYrSpCHJq~B4r+$|1y7=w&9JBeJ$8@|LgA46$T-tMY zW3uLM;gAhi8J=B{wR%3m*<{1KCl@pxh%CK*<3g76+i$yW_DgARy1j5lOj|J&35xWw`|sxQ9Z6A^pX5PQMw(p_eoZEA~b!k_Qm za<${;nv?g-vw!{hc|GT{m20)ihyMvP1MUe$-P;i4!JE|98+2OtZP@=d?yYCIcBEyQ zuZvH<|Ns2j^=~Iz#m*{dE>IAh{;!QaII1?n;12t`HOU3;!dbO%H!d=IY8V=MuG8j5 zxkCFnu5O>D$uS!xmnqFX^ffi1md8Ns;!!21$zs7DR8%y$HlI*g={ zhogr+RYv|!r*(9?UBA@i({>&&^C zGxOdbZ{pH>zxtj1Cln{^o|BztzT}1M)X+l>6L{5sUUE7nyY{u<#qhp>1L6fA zBPWI?rEhCfsb;&oW^te;FW-{H*_LGwT2@tT-X0$oRIr7Gon3E+{PYv8xzAthY@Q~# z>w>|~!l`}vllcFn-0Qk}Q}p}1-ku=A)tjCk{4#ajb*|_05*pMv_$8NmzB^!&5clR& z>58j0FM`)TO-$5RTDsmtRcgY@r%5Z%*T1mT*d4X`{qJQt+fDwS>NF{M_&SAE&a(E~ zhn>-1Y|cGA{NTog>j!UKczV1msPYicoVW2yirpWckmA|nyhf&O>$WSux*N+2UhiF$ z%Cbm*Mwsp%rntm^r^2o{z13eWqt$g|;tkOw&-%9bd^*0U;8RqW@XE8l9xU~8%N#`>>d9>o6N6vfpv%vM@WVW&k@l$rSX=gKguj23M6MyAs$h~88 zq(Q`e>xdGamPP)LW*uDjLUiwI(cHhB!fejc5?lWpPCna3-b&iEK7ZxHH|><%E$KzJ zf?Som+W9jwf5wQFct&h^of`ROuH)UACf~OC-RVeue%5XOj2i~Fv+g;pyZ>+1Sm@Jg%H-Yz2(aCdyj$~wC5XG zn21b^?&Bz3_^AB;njb#es_Gnju9&BDspLK1U!1n#_JciY9_?X@U;jL5?%no@IdjFO zlPx)>f0`J|x5;UXEwqv4m@*;f`2UydCdqgf$yBTlf5I(wYx;MU3p1RrWd7qf=}nt* zdh=?3#^esYuGN8Si>I|G1t)*~YqimQea_sxb2HCMOm^^fPd?81KGQlaG*J4M%r48b z#wjtZbNOTV*Fv!SX{zx=lLGgZY^xfN5F|KZ`=${DCW`ODn?C!Z%B@QKXY9L+mjp=s5ixIDU~=z9R3O`{b1VM@ zzq!3oCAZYxaFa%7y8oV6ITN2hol+AgbYWIURJCUpYuDz@CRGO70q19~dG<@)^Ul=V z8COp4%Q@`!N6q*6RIXe96>dD$v^>0a!djE%A#I`dOUwmcbersKck`dfYNFnslvT*9)7ty>Xti=UXmGsaBb|=qT5of9+2$-U_!2*c4V9 zYx{ljmYbD_=WeH`P-2PBQ!8c}u{?G(T7IzsZ+8k@@le|4(J#lVKNi*!b&r zZzCP?hKbAvE_bvge=t3)@aO(ILmj3GIltE>r(E6?Vb)$T^|0lV4OL~HX2PE}+_p#+ zp6%0i(&Xv=IH@M)QuyAI6PbU-l6?-W)_wGu_x`hlW%ez-mU5pC*>&cf^qH#u<6NTU zn{dANy}5JqXPcYIu|H;6b9Uk9W2~F@lg{gw&zf4+}EcoHu6ng$+ zTH6!LxE&`0`&sTYlo@p==-%Baxu>eh++278Kim4`xh6fA3f(ni!?=4{gfb_+RX_93 zt#|LT$4ph~JiY2~6@FGM%1bpW)tS22EGJZV>dbfBrS46Wm!%fY(6`B& z>gEx4e%ID#zuY_b7V&s4^7^mqs9In5H`i!0lS_5@_jCEvRdQCTdG6lvTs>|_?j)0A z>lTafuHPlHnoB8nQsgyZ>BEct(gdQWKD<|55vLyY{@u%a6^ED|ziD@Te!D*F&c{Fg zd5k8z4mX8$zF)t}!jiMi)${G4cZIXlldT;^Z%7ySv9$&!Hr*0wc~ih4wqbAYPbsbp zDaAmR3w}>L^AnrHc)u_Hs}>cjWz0DJ;O3jp1>6@&y%<=wgI+_e?cpX>aZTo|!?$FWVXCZ_L^j%X9LT2}r4K$2P9ybZ#|`)xM% z8KpltfQf*(ttzQT@VIqI|Qqq+K*;<6mRZ5VvbN|9kN;7Jbi4oL814 z*4)}Cow~zqZHr*+{V)62Y%G&E{IGoY_1%jJCVdTeTD4c_t}8Woy?SeS?}E~cv;+4s&J9myczc{@;0Y3 ztzO)H_i^7t_6JG_?tX4PyTU@g$>#d?#rdDpavr(Fm@-P0drsbRM0-Q9)wlBF+8saN zT`gG@)~~T@qikojTbN1x@}uXKb8OXI>$5J+*cmVQwkF*n`-I_o1kUM-4}mb`g) z~ih*rIY^eFv~hT@9{>(u$*7}{7T-h z`PX?HGj>v^HYiptTC-;E)$N!5J=|60X%Tgzag7L9 zwb9?CgA?NO&KIh=ZNEM3^X0vgqA4+k>sP#TYwV5SYSX@XAvUM;@bS+@SEZYcR=9c@ zNx!z*x4~mu+S9q&TUOjU$!z_8^>V3qs~#=-pZ;b2l+0)MzC?U{nV6$=aq(sCNfF)s z_B}$p&#&msoiXL(*%@ov!p}I~=TOM>`C;1fl~tc1U=GLac~d5wi0Vq-*!n)L_MuhM zM#Ht!|7%KWMry}Ra(I1y(xRm~vsX86HGOwze{kp4!b;t|-|e9fq-Q+5`h2Rb^pS`q z3ok4zHn=NgoVn`8N$F10#9x9P3_h#YEIpWce_7y}E=TE$+oyOus<+ZK$fBb5@9b4vHImsQ)f9o)FK|zRRZk?mZP3NjRx~;5{+b=oi z-OAqA^wXrT({OAoU|jX%-zDTCgFc$ zq2KLkD#oVsG`_r)>8|(?w#3qO!-<_sKFu^**}C7j(ibnn|=7+?JD z9otO?mVL{*5@#3Rn{F7`{&=3{)(yIBV)}bk=4mXpSm!)*?()Ya7B&{U?%#ZulJkUv z@#Dfjr+g>;Zx?1-?%BKb`^k;(>r?L@&vX{C(psEx;jEkIO_k-ByN~U;{+YX9CRB8i zuD3%&qE(yaoQd6sr!_rqKJIL^r{LhfillF^{^_ii*I6bg_;Qh2ZftzPrSka1++9yj zvt8P!{)Au7_E(w5tvlB>4ECpGt?`?4Tsv3yQ3N%z(* zoVG*s@TGlqZtYiCKC}2ApA)H6bys)u{UT|jBhF`v)>kI&y((t6!dbfBVp^a)XrZ2d3T9dGEbAv+EP@ky)GnoqEo) z_d`u%UDdk{O7nhhI#e*Te9O6rE@<#Q$1B+um)+;Lrq zb!H}8TbhVQOrRIw_X2c3Cvh3j+7YgLJs^q&cTZ1>I+xytL` zCU?+hv=o=JNt%NcBKsmrMV}v z-(U&tT^6)3$5g7mqPT3qK1J>BWud>?-)4C-B_B=vZRzSa;ZQ=|bI+?+bUwY?FME4Z zW8KN1yo>|!nFXy*U-@?aIGYnu_y3}Mo&Bnkj_I2=Y+tf8E#Gmu!SvjnMpxaon%?+# zB4qoCoN!r*b^i~oecs^TeeLVxzs>J{ZBb6P&Q(+GPkWo57||Ep^knEImmjxVxE z<|$}8R^PW{s_ULN&FlSqPrtY3I4{?|ga@D_{ zH-Czs=9&57#JT+ufBZCE${$3oa8c&1-S*^1QJ%s-kDP*sqBEqQF&z4L3Rls) z^xR5d29N3{b}^OHS{u&T=@p93pZV$FtzgEbsR6Buk<0FWpIF;gep~Wa#=+O=j!#yv zwrl^$y!uJq1L=wgi64v3PsLeQ!poT>oMC)HInH!=I*fHF+cfa%5CotUEAvS zFwR|CTQL2Xr^siY-{E0@PH$M-ctTzCU)st!i##Uh{=2U3yUo_+o=K#c;I+wWZ95es zRzECtUZZB->A}5o>F`xDeU-WbcwmRr&G73V&3schb|?LFtS39Y=l@1_09JMrd!eummdw!m(~ z)D5|_ciek-S19Ya+dAtT1tj#z86J_Bn0evboCN=c`k(o}i5!$Ia6N3e>ND?w8;$PwL< zOF{QdQ_y_d7gc=xiSf^cez=}--d=FnjX_KD&a%U=6W?5{y(1W#cfI)f)$QDeZtl0U z)w}E8t$OUv>$ipVTYHT1uN$uk&bw~>#^z_4t@#B0^=HEK4&3IIFLZ8xQ#yOzvq2a1hsp2{5$$ujko2;G7T5hs6BrHMk-JOR#AH(0w(7U|qw85Gi zb`8A7#e3$+^i2x!Hq*IfkUw{t)v?QOjr`(yPv5-w(_8WLzG*indwKqNzP06aBFF#U zviGTc{q0h*S0`)t@@q~}xoGr;^~j;+yR~O%OKZPc@N7jv*zMoV)!s(arrlhSq$0HI z=*_}3i^~EH4ilgv~}SZx%QC z8s3aKKeM&{T-Ta{N&g;gE$&!;wEFwWuxuOeb#f(Vp3cp@ru{X!RbHde%SKVb*rD&C zFN3(_=d1Gd8|V0%-~De;@vq**d#h&7{R<0KXDw#UUo`vCe&L{N317VWbAwtRFkSuJ ztUbrk>fP(^lh@WQeZn>W?^SClgREnl&B{H#6!brJ*5}#2R6geRa>WvFjhqz^9j}Y+ zSmMTPu6mKruKNJk)Zr=x5NvE$p`O57$_J1I$v_x?^W!h6O#2Eb~pQ;FE)z$?V@D-b={1Z zz!|eLuAJMkIn3<6N%M`Hr*1Jv>;FtxJIQCZnB2xx`-vOnmx}jII<&x~KENvU(XB9> zYSANM8cWwLRncE>^Mt?o{lf*_%N1?5KfI}FWxr!-l0_TmM@`3$H?wN(?yhZTO8KAd zt@5hu`EJoSbU(%=p9FFylLtx)Z(#o;mb!$&QXpwi7k0KIwee&ZK-$ zXXCz-^Rax~2cxMIEn|@-eFY9^HCn%^Xh`#He_e+6P>DwsceKO=Xsi zD-=8S@UOq@ep4>v;=iXV^_zdJOVM2YJJ!c2Dz;(ilmHGjBj?E>(tQyZ4>=zTGFcGB zcjLl*ZJoI?i(49Q*t1*h+JEcel{eF@-)(G`bD3c67sK7_cI@bhC6UiJAF8qbaQ^Cv zH1U5gYB*2c<Z)QrOB>lgcDY1{nVbmyJfko9 zr|kY2qJ0_%H@@{|lw)FARF|RMet+YVGmkRmbgyY2`*1~WM@2}dHZm=S(VqtS3Q~EfAqJ9MsWAi-$H_Vz8=IumpQ&an;F{qXa6U%d)*AKiU-)zh!7Q zN4uGpn`PE-tzegne7)w9y>8se{r^Ajf6;r@=ps}8J;&1DXR{-?WZyfQG-bpw$-j*2 zY70LdVEQ^RZ{en{6B05$uM(S2Z9LxG_nfOh?X>byF5YXoEK9C7UyPg0yLR`XU)tg- z>&-t(y6c?%wrc}pYvx4bN}=t2Et}gOr6#Nw*~HjA<@&tHS&O=l&W#axBY)H9_qU1j z6F=^oD8_csnrp6PY|ewI$Pk*mr*hIf(YSlo z9};G*U({IcX?L@NJCoyq)Z4;&OAol1TnjsQ$L__P-o~9;F_)XI5{~TKcR-@9c4MD) zdP%|T$Ii^nDRsi{!&M&hv|ZYs8sKacb+!6u&TpkR()YTzegE?BVCm9x9^UayaViH+ z9G$^geRNfN-i1%UIrz8#IMexOYOB4;x5JIrYiH_~CmcM*dM`k>{=%E8X_tc{6ym10 z{XO3J*vnW-zx)GN?fcueWHvu35t?r-b^b+{ro!AEiW{Fru}?nu!bWVuAERrVk9Ya8 z>}W{j|L0t7bRzD)9SXsl8PAyzhvSdHI1PeT_AL zEiSXneB^VTvG4R5rQ){_PVRK!w=A|1JL1*J$IcTU^6rG_+N7gvs-E~gsNG|}QEA!a zwr-iGZED-RpZ+pA(K6{k-E2#X0PcirO_iv_##L_K8dO@FT3@bS&kn2S=a$3$$W z74YaU%$5y&TJd4lGoN=eF3oQ!voT(1`em`=r66ZPhhWQVr7BaMm;av<@-S-o9g9Tc z2gQdCbH6sfw7Qz?xai#3?3^=`o!*xw&D>FXcXI3&O{O=?kFsR(7`X4}p6$^vF({qa zWsCom(##i)d#^fg<_K)uTf6W4N&9PMmXp(48L39=>6Z z+DlIFO}sXHL%;R!*?PQbA(N1aW{I(8nXu2P*=9?OtnY4Xa@YF&QzBgCtoq$V15wVy zJ+5Z?;xjJwoZMrvGkt+3z;oc((Onz;oW3&0YH2)+}ErC6}>b_owo+??PGX zj{Vv6Oms5y|7@G1bF0)d4xbB@NlCL0o*4Z^z;uV*kNwdWpRTFwTly|U&GSWA#Fj@p zMZ-7F)0oQtX5~}nxu2D9Za5RP=A~a$&DHnQtb$#<5(KTnK31=Me)Z_)+uyk5JWl8y z?w-QGH7TO#Xpj0v-zN)aS#i0~wv!Q@aXCeXIel-^$*38N{+aI)`cgReL(s3xJJ)t7 zt&0vfKhqtXf6t2hbk_29N};DV#(dmuFS_P~RZ+Lum7CA_R=;MycU&`~XEuLb;@ndk z3y#h@VA>sjox@rCYr(7oyoJ_>z0OR$@%^~?+QQSWeV0YtgSsV-A7ppcU&^^&GBoMx z$ACE}cqZRB^LClIbMKeOcKNGMaR1Gb6Q~Z*S>~wYVKOEArMBy%37rLQUNPyP1PgpO zS|(5RRPkCGDe&+|W4hN;6Ng^Ob)pqcpU-tVUk^-W`Qv@X%n7pDK&_Ek=*Gt({w}mnv_F* zrxV|VR;J|p8_x3HCI80yq0Hn#@1<4E96hTU2<1Q(V(2S>|ND_;QQFd_lS7jvB7#`8uQ8PU{1%q0TFg4TXwM>+mzU4( z`+aHN8~644E25Tf*M~8iW527bWrq zu`r$qluo>-KcQ_mvry^z4d!b;RV40s^*HsB^s%i9=k6$8{!l6DDYiOuyQb+0d$}p? zPKV8T#rBzOs{f*Tyfk>uO`eiFV(~LB`z{Gsk-Xj8R*8At`wgQm1n)jCY@ecd z%dnB#wDq!8dGYo$8?MQTx$Y`qo8>u&@ptA#6O)7QFMli5X?~x$^}y0+|0ddQ6x=jP zmeK8N`z((i-%sl3-0wd+qvz}U_p@Ke^N4BAdct&VKOS7?@pVN5cerWU zjsU*=nZkae`x1MPNIz>*a5|EacI&r~KTNV%b%5 z=%~i}=tVXU!(JF>c&=^Js5VJnwY^|5d+n0cw;Nt8sOygTrtw_7zwp$oX?0({517p_ ze-NW^JN3>6$r~(ghnu_@uP7H>58Aol;%Tdb`qWR|A5MN*8}nzHna=(HTPD7DZ}faC|McZB4c)?;o&dl?Gyc#boZ{af6rID|L%zs=MoPp z2HkOLeYoq&N0oj)(+59ZEVxv7Y|aCg-fBPAxK#NX)~u*~?-gva-z=(K_F;CSDDh$^Y`ebVu59^{2h>PN5h@j9P9PRfS9ILg^3%o9x_|$! zoRr&mB3kwIvx8Nuju?ouWSZ_dr{efKdiu6qN+mI`=bPW{7CvvKnV+%o<&C*lf3ESg z+N5;8TusVuaZSmOhfLpmUW%Gap3Q%7VVbUo)gF;|5fP!){rqdJ;!9JeUHfKxP-s)Z zp>^A*?&IF{zUso(@a2+j8uo^ftme(iD`r7R)Jl8eLnSRMm|LNzjy{BsFoaCo0BDSF) zd>po$_#HT9)%i#A;LEBHmpL;N)u;Sg?k{88`+6^Z>9+o!$hEg6K7TG+6K{HN+14!y{mZ7G z;?guDjmMybTN%ft3OuTp4Tq*B%9>Y&4OH~3)G%^!>W zR`qqIY~5@BA>-unON)3nxh+}{Jx4a(&8YX*6`6mAZ_i!|5I6R^^Wy&z=}fIgeNP|n z+mkvYZfuzt!FN<{!37ls(VDKU&$`a(q;8hdUX}F!K=yM5|8Dd5!E3KoPK)t;F=Iae zw3{mmR)#)V__;yIkzq62lc;-A1*%KdbNoD76n=No|Ld0)72UJTeH+e|RRumMl*W*X4vFGvR+9c0u6Q@mzcX6zWW^H2b$z!?})fsv+O+V#MbNhplNN>|8I2$Y|i&TeLPxX78+aN zPsqnz`?BpK5g-)&OraGD>Z*t*cam%rpOGw(UOeMY|4^IbZXbvN=} zQfhK}_PBP-w?g5_b>F$4iZ6Y?JlguJoy#=4mu}h`r7ZKd);%~UdR@u#)VE^eZGmYI zHMD%ZPqV9rsIJR(y|Ma1UaHSCO^>cVZlXDbI-Q9eC@j(vZ_ZS zvtiA0t@G@1+6G)_yee}-L{ueH=Ivjtbw$Kk;Ax-G=Xc$!uJ`G#Qo30DM9k>-=Pw#M zve&h37(FjW)z;6qDOmIE`8Rj#4;n3T0gkH|)>>@uE)RLdzAoK0%Idaz|LQF*V)HhB z_`PVC@A6HlkpfM-SFoPy4iOUKmquiL=0;gOJ5QoXMO|E-1Ja;90|G0^hxvS#Cp;Z9ZhoFpw4FhB_A%Q8YVGEYRvvBx^(9n6;-<#tJ&ur(SDV4 zbN0ce|C?iVcTQWnYg7E<6^b7W*^W)Vlsz}=?oaRYWi5?UXRclQA+6EypG(96m;R^f z+h$zMH}~A|H&{S??FYv{7vdJ>+KHx46V!J5VtYJTWyAJoM{1sZ(|IwmxzF_Y(<5ys z+us&)g3&Qk}AloP8%Tu!s5a`@J5 zwsLteyJY{rpYr=YZVC36?sVBR?Sa)YzrUVWze<_O&MVv8Vz*@8*W@!n>M{Ja*4`63 zcB~f4&N^F=vMb5Cq)UDK_9i!MZv$K37m*K#BrWZJHKpqH^%q zPR(=DDL&^9g3=*IjOt$ZcIPC8=os;c8NIwaKR>I3@%X=tiO+2|uhn^^81eA&rzw}# zsB96}S4)jr!_?CLYr>Dq4?K-8t=G9=uN!y7{{Nr&Ek~dEl;5iMFQ|LHZ*A*R*VOY0 z<$c;$Z+B>Ixv;fn>APRKeG5*056xjSf7W+?g{9x(E%`g0ZhEyR9KE3+bX#4=Fe!;?q)vvfAJ@q>4R4p=@(s> ztExdgS)h&#NtxTKb;eAG+nixvh1Xl(z~+Dk&lm={+TRsBz=d#nd1Use z^SpK`6z53`d~(Y2FD6C1Co?+Mk--od;0=&C!~$8>tXD6IJWNls5*XO_9|>6F(W zTVhO|3fmeU^4PPp>e`2AtdY`lyR?hJI7T|ESL>U`tix^_7d&Blzu?*7XA9ZA?d1<_ zGJEB+S5B6H&w{q#w&-h|b2d~@jB>RuUNa-jsB`Jw+B>=`@udRhA+z33nX$z6*~W%z zyN~U-AFa4k7=zUEz_u4wiUS5fX86S_vUX%`dlkxP5 zdEd=bszR3M1WeXFY&lo(HvW!^bYzrOYS=pk5#gW)_SyUA-m1LJd-jTy(!#xV-x-db zonGLYEh2uoQ&m?`x@uuzFqh_GJA2I~KaT1Z&A$@2q=!Gpc4<^p%DUByd2S!sX?1FT zMY_-#j`hCfY6qV!e&2ebL|pv{&%6^G6~dn{ljj!RZBR3LhhL1(v`zhGj!{=GRGS4V z?fJH1&QHa38%{T_IZHj}tela)bTPMIkyqMD8TM9lxa){7HEGhWgONTRvqr zjz-=!g&WsR3CJwG&-A&J#d-I!f*XpS^>@u)i-tbg5Yp^?GqUXWkz4NfKTD+SjN2%y zw>S59_=(V7Gm*HQ6IZuHh;6Nlo@amFMZ^8aOE10O*W=Xx`sZx6a`!7lQ@-ctlhrgPuR`SpLp+j<~@lf605$8PS6u2;-emYRPbEsflkc~iD^ zu62&k+Luo^#?+*4{=U7~Tle+1(BngirjXzx-(kL>6+Mnhskpc8<~RM`**{sFXWl?UszmI_;8Z$oQqt+P7hPxTV^fikKcc7a!TdNZuh@W=18X17oBhBj3cD^&Wa_N}vofUT@@8;WumS!bV z>=74C6V7?uoG-e!_`GN6CG~T2ChcM8p4I1Fd?z=LA?I9H-@`2`8*ljtxSfhV^Ly6z z+$Y6#(wr&sUr$RNEcy34;tR*^z=v~$kIdJe^k<)#anvL2jrT=&xpV7TH2;s;6J#NK zxGkW_=}`qghi-AMXBnDwfr?3Pp||xNj!Wv<3KL!n<*+SQN?oYiN_{%GA~N>^)|Y) zQ#kSX`4GdLWIp4pW0_`$xe89WCK+8mE;MtI?gxo8dCzy9o|$<~!ef{0&!U2I&+qKl z^Yd;k{dSm>*F3e;@Pg-t{h8l|mne4MeV6|K@9~vv-8vI4E3B{UyTTu*dYWsRq?{~M z&W`5e?OQf?zft++_~h)Srpl;YdTVZ6Qks+7+w5ul$+l&W%eBqS8uyD^ET8x2#40?u zen0odG|x%LwrEI7rZJ|)=U6oCuDN_IDDS0exVQ4Dk#pE_fD@1L`x-wGDnSx?yisb~AXo{*{0 z0k>I~>@%=DZn&klsrNiDH+zjt!i}dAoSSwhi23#%(4SIlqUU(V^Y!(bFc*n=vPuEx zCGYXRdffWZOkQ9ATy_liyOXkh68rimp4qr_#%-x22GOU*9c}VbWf4|S=UAM-7gzK` zZ1I)@aliNL{WR(Bt4iONJT2ync+!rzy(cmp!$s$7)N#$e6Y#*TS8&g{g51i#H*5M6 zA2Tu*r6m=p_Otm!mheOxzsgG5{p@h1-!h(UvwlDBbPJd_MVe3hmqQ2lqj>+E#GjQq zatf9Q|L#r{-EwbV!}c}mKf-#ZM_3#-@?OjFEu%qry=a_dw?*8_^0@6hHurljNIzqD zZ0opqe%T$-iaAlwKJ!kU@zC$86xYR%K5NBPs(-JzxqZ2$Tyk7zM#Z*Su8|Mh`_Be1 zu{&kI;kv&df7d~sM~+XYx#pZdGH0_gYh=W;Jta3k%akY8y^NG+zawJXwl#Ry!%3&- zDQ%88+?~q1c7%n-ZoF4nChNuxi7n=ce&6UzLfPV5B#YwSu?%W zYtoMIB~=IZ3Hr@y)DwN$RB+O3S=^sAGadW-FB9j7PtD7|^G2uhXw{wbmo;<}UJI_g z-PyKB>8eib?W^o z{h-J60H@XWn1@rJ=GRDKu#KF`Hi zSJI#ByuHrmDHAxuEB@V`rw1$ev(_0*jrcP8Y1+aH z*K1Xu?tHLRvhF-m*kcmOT5;N<=c??xrF9#;vgU8md8O|!Jel8Jb=R}vn41}UpMKl0 zMIhnYpEdKC+=WeIjrsQE&lB5MIq|vhmi7Z)XJn6ep1Snhr(2nSWia1I?wBaHdy|yk zUA(sc{pGcH?QSf+wEq0#th@V{9(g}aOzNF)=l)0+zdnmMOXtfJ);#;VuJQE@byue1 zy~bh3pB@R`nVe|gc9^d|&;GxB_pOb(y8=`1Eq)iO>3^Z%T4ON>mecdyu(E0gFv|4x0TsLSi<^*c%e?t89!Yq_#Db?Ku| zr;fb;U+g_$=j-|yTll~)k7RFVSBUX{E4e8baf zjj|syAKM=J`>pNB_tiIwB_MToR9s5A>F}ruYbbM6bzu$Kg z{dV{2Z(O_lW9p3b{lYOxsgGa(UUu;Mk584%y?$&$uAjs7?myf2L)9_Dqp8*=+oQ_y zL{YSJEK{_Lx(|1Hs56IJ>FkS7KWmi+^j9a<^%~W>>qhK|{m4=G`%nC|m(_3O>wc@B z-u5?OUO7{(M1I;cyD87x{*@l}38;;GS8!*gAlt$s=7*MH)g1gk&d(3wJ{@20z3&nC zYeCcd=UL-bmP{@RTmI}~qw^wGu}4Qmn~$2sgl9)t?cX34`1Pgt#N1r3N4ZC%?nZAdX0cPIWG8p8d^}O!THNU2nxQ-08QqEgT-^Q=6Qfv4lY$XkcHCi>aTv};T^`gt-Y(SD|}Zs78G z^Nz%|&i_AsKk$Oj_~+Z-PQBJXJ)Z7`%N_)2PmPhAHF=tNRs4=Asy(-l&pm!4WvfZ6q{4F-GnQlDm(AwflzNs(EZme?K{{Ohr zeU%w+H4cBiI8R>rHM{!;kLJ|CFIV+C_Me;n#AeRsj$)3@0fw9Sj`%Oz7w|gUZTq&{ zI+M5VJ0`zX>*!3;wU-~Rv=sD>Rya_mmtxoZujT=#MPq5=vdyiJ@rq1+OJ~is5y6)_##YYVu{?M@~nK$)@ z2G^XopX4Sr*&mkq$GOMRG}gW+=GMhi@5JMlP1I^+-}SaHPbPiKDz?lWN6l1zJlh() zY@U76r?c*POJ4s>el)fA+54(T)#d#WkA!DFtN2vi|L;onPwny>%zY9z$tDj1Tnk%w z7G`oy*V61S;|uiL7-{%!zRb)yhm4mU==oG(_aWyQ`|`~nb8;e9RiuQqy9W6lz5DF( zj(_fUr|&xL|2oCx<%~Th?6&pGJpUitc3e=l_i16v|LYIe>@|F}>cIBW7qg4&jrfqo{tSoH$KKw!>{otTb7JsXdEsdfHq9zxZtps=U2EgDtB;iuCz@Td zzNjX|U*SC`oGX~!POLA+eV(aY$UDovJL}q_LxLZR1t`qOd8H_R-1+Ug1y66RP}EKQ z8tA)YX;qZZ!k6AbTRHYcTwQ5iH$OOg(wh%kKk)rcIJ)6q^Y6XEkr#3|{a*ci&&G>h z+mED&ZaUqVDsRIyy@zevx&%F+srQ~f?+#$z`TT*-LD@G~R!9b^tdF!k->@`FY2&8V zwPMykl;mbyyk&D)U~j3h0*9(jbzuAN`v=TcC>Y5v3h+`l^>%g-WS3RHlheIUoojL0 z#N-VDzO!wztG+EeAh_*J$vn$*Nongl^%o`IOS%-DLo-I(+DX6Dxi#UV@Db97@O zE~-Q?+5cE*zucl;{b>#RKAFwpiBnls{rp7(tL{x6v0wHxS?YYg1;xCUiE)x%XRG;g z?$^to|J~xfdExV{$)c@n!7~==ZZ5tzOFF5uf701oXN;wetM>EcE3P>;Stt73=NI{R zc5U=>zI4fwz4jB&4mQ!&bH9Eu-TnUc=+1Xro;bX}*VS`TWcGf`@9EDT`Xw$p-dV1| zzxUSSygNds5kgiQdVV%PU&<|ICaJOMQ^gv-O-9v?k1fBv72oowl)Z1m5nkisS`p4W z?3Do<-7hD}9A#f?$D#DqT7rLX#i>|^(}o}Rx&^YuEr>hoZ7H`o?1}21*ylA%#3C%u zDv*PdGkgW5l@k-ZRuHfBgYIP@k_dUN^Eyc%w%{IlOJKN7)I=cFys`tVwRHE4-{Y1O^e;Kaqb=5|oR{)jEl7$cnCZ~n1)l}$FQd)qI5n=Pw!)Y>*|`L=S? ziEEoR?@hkj@UUy5_CEcT2i&h8pR?>dUm9nlb8ZIP$vb|J^!8T-Osk)ku&um(=Y}M+ z2S@oHEa!^PlDKfJK|SQyXTF3ze|+i;+1z{XKHs_|zk>VjZ@=Ki#oa}-9&u&A=3eRk zr2fH<_Gzi_ikGiEaIfs0$yCK{To?SlS4~bAl4#CrPktIHez~$Zj=QK-`hDRAKdHOh zJAWTL{46kNrOy&q`xPCkJVw&>XG~_YtX?)}vB#XX8Ckv#Ewe98irlnbEb`Om-}mlp zJgq+Ck<03pEBu$8ReR{G^7+lD=Bev{=oD^0(sS<31@D{kcXV?L9XI8KghYq0v5N6Z z+xYSE>x@Q!1C6r9Nvz>jk{X;{w-j zTPB$NPV%!=RLV#!&ifo0Ja^N#HRq&$%w;>IaK)V~rb}UyeS*GYg5cMR%6O0W64{4K zZ`Bw4m}R>9*W?YkEc7%s?TKF z{%Jm6#g&R^s%ZdoE{|k-@SaQN@UsN4Yl(RsTX7{ zV4Jsm+sn}V_KP^1rhJLHy4vT1y{}B;7L$h;f_nOUJEcxqcP@P*$$gc#`&#>}8xJxK z)#siNI6g<@Z_UN(H#?hteK~3zK56MG{-`~ZTl22>@pio36dd=8`Mk)lZP`ye-YlrD zWvZI(?)K%jp9X{TshsSE-EV(IX$Z$|2)pN((sESOPA=y1gYF}f?-V{{4)<7fWcNFf z*v!J2VRNT4yzY?QGr_H9FPDC3%YMD(XAe(3eKET2wP5M1a1-y_>kiC1B0jg`)zORk zb385|nzs0m?XLS5xy=1$&Sl=tx9-Nm`9UobPy1%>mHlcOXOVsSeBy@MtT*pvvm@I! zdWmP8WV>!N>!^Xq)n^MnU*0Bu?_y75^K3gY|H(IH7AMNq?K$XMEHh!*?V0-A$LBu# z_dx5Hr%Cm+Z|y&#`)95>DLc=t>+dh!mvu?kHePw#`tAGt897@{JWDA0*Hyf$?t@-r z=#~ThF%M;K6v)dM>%E^g`9((6Dc0Q+-PWJgzry~zz-^|*3b!_wrtc@~$`syK_ieb{ zICZWy%SUTNf1XuKE!z$mJ+C>&$d+(sqvM^Yvv*D_jn+GSE5WNuzmz$lFXAs}L;3GR z3eyC01C=|r{{8y?gUVIm>m6CHw#}~sXG`s0|9EG|#Cfjyx%yR)Dstk_i;L|FoG;sS zJQ=dsZ{r@^BVDp&_MZ3+7rT4^yXN0d`v1!AGjgM~Do#J|G*cr{i z`@F0z`}NF6ywyC?{63izgqt;&Go8DvahT!K3u&hyjTZUy%=3+IWW75tz?*Kn(vrbh z;Z5a(^~bkv`C}vY!@V#6f6k3o)2rqiPu11v$8B@eIk53ekan%D)Wf6=ZB{v^Gk?0g zZdF}XvGe)Sn_m>28*iSUc1K@Adc&{XYFB1Fl;b@es`TNM*mIX?!<;YMOb#cn(H7=i zUzWA$lU%jEYj@_q#=YORx4Cm1TJ!MX-+$LOxO(-p=WGOz>WAc2q(q1Fi#|^U= z9^YX4Ra$HxfseQY2Te{CZqILNZ&G3cG}M_i3cl+#F!);x6SgB z+24Qey{gN^AG>+yyFH$6;vBQ`%#Q=>P3Cl~)EUp7Hvj&u6X&&kul_1CnRXxz#@! z7V;=PyH=5yd2afeuaTyf-^4OjrO8w{&zr_kIWe7ccJpINi!zyXhqpiHWY+aKznXOT zm&|nMsbx>CZ~c1Bd)Kd2sKQqB(Y%dmzkNIEqkVY4`rG|Es8IBYdBgOwPs~4fvex#! zj!?IiVXtHjWz{=A-MGvqtF@N!eLf@Ij zE${9cc6A0F+Hx?V$GB6mJmKZU5YvYCzxy06OI~;D;eEOHWB4^{a zuLqW1{4&iv^0a7XUgIu?ckf~jw-{ABy;`&J`fuyF?|SaRUzopjvCf-(H(MfrJAcFV zDuW|V^CpN1Y~9>=bn*A+EZK`D%2l#I=JGr9sq54BJ^lqJ-v2!E+1j>X`epa`jHxG| zb6uGAo>%z3`GunRld|i??^*n*IyV1()}Kf7jo(dZQYcQpmv}R^BgbW$_uq5Y53bp7 zke^hk^SjSFLD2T|xxx=}=dAfR%3OVBz_#RCsnLTz>-w0-6|Z|OjjTUTD*bT#cSh&E z@Y|c!s$_o^6n(DMJE&{$|IVf469x>MZWx=$=(W$?{CbA+61%nQtn2FwEqf;RzOAy? zO{!k&pZ$As>dU!p2a4^^`q^a8&r5HsYFFGGI)8b$@$WZfXRZra<&?EOubU4R4<~i;^>Rm;@xV>M#Lh~QjBah}P-F&Hl zA2C-ys-KQ6z5K77o9p3Kt<|?w%(RZC#a>i9t2Ft~fpWHYZze0G_D$BaP&9DvFXU%> z8*xp1`er2^-y6H5pHDOm+fdeXJ!{>HduMwi&reTUadb!hhAa8`0l^DmF5c<9AbRA{ z**hsmE;b;9QN2s+@Yb7;TqJyDWlp8aOZ>d@>T{#&0s;TyX7AX$ zclTVGGx_4=MGMv2rng4v$EUbX{Bp+gW7?~aQ=SBto(itg)a0H1x5Mwzf~>u@`(^}o zJvg)7{g&jc*kG>rky6oK@;MTr_8aE2X3o6mc%(VAa*fJ@bCKGnCyQ5J-ugz;^w%tI z<&SJL*P8rtj###4`usl^n?g@Ud~*mn5L{(2jcH@Tw0F+CDt9vRUlKgeExc^e$?$7s zr@6KTDyZ_jcWgf;*Jqm1SZclBz5Lkw#J2hd@o3+<;>Od(+;09n^h#tU)14VT+@B@V zr|7iDRdkDnBp=;6cV*u7z5h-eeR8{=J3jJg{e0>Bv#WPm-8*4&c+-qbvD%r(KRveA znIEQmW5d>GPRHLI>Y8%Yd;7wT-@Q4k#jCz~eGO>!sQwdR87^mkqkihXsO(>} zZoa%_^Tl^({QsZt>tC@6ZZ|#4l$-s(@bm^p=F{8q7~Y&?a%(o~Iid3JskVXQeEt%4 zx6L;`sF_E+s^s9_#3mLp^C6dLLPgXji$3Lm`7sY4Ep3eCuWK|hj0wES{&0 zA76fmxbW!xyldg5Hp>^CpBL=-=FFxaj*b6${CeBh9nkUoajZ67%tdgYv!R5Xz=mjx z*^M**_PegQysgmk=Vr$2j29=KZ+`uSvBH1ujK}Y{E>l0S*P@mA{?a3d?wkLV)0w)@ z@jb)6x|W}OLQf8U&$>$_5}xeIg^6xu#d ziM$=ZBCNE2Grz^hWg**)yeE}j_bM`CV=8Db53bACudff8^yOxk%=~pHewDaxyT9VZ zx38irZ$FH(quV{~0#z1fEVd%cfUi z@^N*I{8d6};(rxhGGDp=Al)VK2ejq(Wn%;e2`T2rs=xvIbR zVXyQ2LK*-6IthLLt}$8@S?8-fn0o%uo7miAo4s5;r-yxx)QI4YNs+n%G9Eq8OL$GQYG4;){q(2?DSxYQI@G_fAqBTAu3MiBYulL-!i4oqWDL|(<8`FS+u&gr#23nv*AfX(+$uRsJpOc8y#4=lztF`Y98YB|YB zs?XImZq8qlViYvFQCG6^n7iAy6qR~Q<=@v0KVA3U`gHZgBA(p5%*>B&uPTsmQe_;l9R^gvg?s3!+>P0KrYYx*8@pV+&>Fz>in%Edbyb@rZ# z2%N0Xbb`b3{LI&yT1PKs^6<=eQnS4+w8Nc!i~q?x4-d92z3F${R87x2dienfQ{L_; zeW?>4eJtU=yeC3HH$uiadX1j6pKQaO3d=YRohzRcHB}x?-D|xx?NrxNm(vElL2Ede zB6v5l8?qx>b~m( zpRaxT-qC3LizjP~S(Y7nI3>`xtVcHV$(E+sdFgC=lA4q5I9hJ?ZxmPkE4MTGpG!+gT#>*SwFu^L+d4 z@I8C~=-W8W+CDw^`)~G#JATYik1caG{^QcaV)#n@@O;5VKNC9Y_Fnj~EhIi#_SoJ; z^@|4aJtAw(w7u<5>VET=@ZqZI_MV$;w)=6^#>Q3GS4Ug@=95+^xxr<4ulIo6bL(ep zG0Tte<^Q(TS-L&q;)(NHJ}x*Xye_twU1uGiMX=j}G-I!rgF+U!x__IzO);<7C%gSf z>nG7|MTu`taBnzpB*`yf@zTd;1emG8n2m+*OCt=n9DZx%H^a$Tb4gKNYz*Bp#h2<+COF)yV}PpSa%NF733NZ(iUPp8VB2d7E8D{=UPfkCBtU8=qYJ`NCxv`Fg&KKg&Dy%x&`L zKdb!9HSfIiykxbM(tTSt{Jd&^_>uhH(}!NMB)%~!mo=Aa+*-wVXH(uPGtSLXMQrCx zYzsK}%B5SXb3P=^OOyv3c8nANbk%dYY8f`NG|g&#lPMtgzUaBf5fC6ZUnwJ3uV1FYfjRh z!(A=G{i}|2-RzHhx8rG5!fH+KU;Eoz5 zu3zS<+mWHjx>+$!f;TL4T?Nzgg2<>H{P9Md#WJz!MwG*R5iY?Sg_;Fn&?Ap(>6ZTnRJU!+amSy2ZxCzQATTK7O9%Z zC~e?$P4?@p)X@GhY1M@bXS%O3JNr(MnqMGn`?6zckx*F5rWp@JmwIj4WT6*&_)_(> zER*67&u6`pH{-I^nponl^mCodtKUMFc2iE&g)8-!R!s5O>5;Nud*YXcE}vYL0>u$y>u>}a@~7f{f$2nC%qJ(`{mt}ziXuFeKYPy+O*6{ zr|;h*?--hw)c0>r=GpH2H{`f)z@N*H-dB7%@^@>|&+eibGvp*^fA^Ixm3-qA9VoKt z$(wf9R)4X3r|++NkW;92@Z&1=!#}s?Uz1Ci?C-MRZYRV2PKH<~2Xn&(x*UHy6<+uX zJTv7e=5CT{N=P+u`{vuZ-~R9-gN}_i7M5(7q-$nv_Nnvqn~RsY!d|c_-?;axf`jcx zkkb3)Tj|1f>a&lY-RQ^j!LILmX5cA9Hs;;YHBa|7>F9R^8lNnTX_u>bHO=hxwM8=g zt>RXE7d#{%6>bSRI5AeBBh94r&B8vjJ6Z2ma2-@xoM~}1VXl~sbFtl=Dbiji#f}v$ z3gcVD%FeONcl~K~fm6SHk1Ja(p0neM@U*9wjDDy`Tim@E>y;!Y(U7&Y=gpi9-g#R) zzAOxVvy;K?+pUFrEuKwNFL_d*w*S#ittGr~G(rLuMRRiY&NXnKZWGnD^_9iKkd|Ys zYV@PK=X|--`0`$qd28?$fzv?^(dUF`XdHgqly_9P)$TD@?cPm~+P|K*P<+m-zh-`- z;12_VwpF{HpF00OLHgsaiOcfNxAf24Q`s^r@ive0{4e#NR;yZ1ifPR|s{P?2yJv>& zyekLp{r?hM7vz$%^YY76tHNumrmzPoxG;PV`s1x)?|;>5-xHzuV=uFxu2a9UpT~3F z)97s*Q-1$?V)xkP`952RXJxyRMR&R+n$F%FF0*~IOnHv)%H#LG=4*>)%<1a1)kr&E z@_E4=!|drQHHnjj*LT^}NG&w4I=!JxH{%0;_hARq%6jolj0e}wd$MnqrpeV^rmw%V zeJbxxE}NY+S^2|5lbMrQ@12S}?xOcIH9uWwM`47$0{_Cj_g|{_U0mt0-Zh{%PUPF7 zi%JtVmQ9mQn8wzb@$B*{0UqnkS97;9+E*=^+_kZF%9-U$#ped?U9+Yz=j~Oktc?pR zuJ&YwPx)8$S8UUqTEU7_tQDttKZvl){bQ+k72cRWr!YMxF}+5z^o8)1ljVuW-S-q- zsc(~wpL^ih8s*;5?KS+R&sa-ONtQl4ykc^GLc46)Gx-+TeFyxaH#pyKo%<{G%12S- z`;Bw|u*x!*YApk{3;uuQxxbJUHjTjKYI+3Y#qt8$NG{Qa`hjyZF^+gXMK> zmh+yOotqGB*E;8Ktl5(<=M|RUZIs!?ZuykS@-th}G1j78&VF?_wckq?|6(nE(Pa5F z@r2?oQ5=RV{hd zHx%-!B%c0MVsW$U+o_6^MFAhWAH|06&=EUfT#!3oz{j$RqcT>otK*>T8j17kD-KJA zZ*UcAvv@cukj2+k*~HC+=Z8q8&-9OxuFou||5+xM(N(*^U1WLC}Dd@@f#*fnM0ta+?P-Saj-U0Xi&_Le;txBQo$9Noe;-@9qe`p4;u=9tgS zvaUGN?ymY?`s21jF3!0f54SY0^O_U-?(CD4|C zc414^s>sJTq!wE5cDk2;>YeP7cju=)66T(GuGPaFjN&@3d#%~OU+DE^?TuBc=bncr z?GJghC*;wdl}CP_p8CW2ZPvsRm9@+(U6?$+EY)<42(FpZ%yA)6d+mh>iYZ%ZQX93kx~BPn#5Ri;9*hog{pF?!oNJtdZ#mpp zBA|4?w9}*Ly7zRq3avw2>>hGIPqopNfu9J5KH;jRA9*wo6+aVs4cX5DcLQvK~V(Y#@nONV8uZqpGtA=9b1 zx44(SEqSudf4jgHQD514ZFxn<7nM%wmB`~wi}~h~+MYjkl^SP!@v+LE>lSVN95ikB z%Pzh8%9GPt3o}B_a!I#5keWLAbmaA!OyA6Ad{>yh*5mlmfKTd0t6k#{Chu~cUzvID zYc zSLW<=|F&ta#)qZxJ9vJ}{ngnn_>-@ft+nlnlp|MH?8PlD4*A|+7fcGXTbTc5VQIuf z)6=PMOI(_pj~&}T#pRtlYe%i->bv*yr2-gZOTTvd&eZp{Jm>3qadN8NjVY;lzFVGF ztkHdMl3HCCysYxwsXv+F=jN9`6|O3>xii^Z_vZYolP*qFjQ#a7&brV2_Qe0I^3Isw zjo_apKWo>`ou7q;oDWmT$M zuGldK6@3!;v@1E&rt8B4$9eLKOO~AyI#7N3Zv&gz7Lm|>qF!MyjyN3JrsK?Jw~Z-= zZL!ju(vI)bOB+ucFkD^rwSdWIjf||0WnKgqzoN_GY+SEL@3YN%BGqtma%HS{!KrDNM`OcvQO>qD2Qz0 zUBSFot)1+O|H#pQDu)O9x$5!j3zEQoX`9cSG=>#6>$qsW_j$ZRlcKPT1 zeec=J^V58U&hD$@6}A02x$nR5@BgK@wtrx4sVZ-tmD@Xcsn7n_Xp={=n<}d3?vpXN z$$NNZ-PX^}@hYdgkDg|`w&-Nq0n^u=Vb1fkg70sNykh64&ei`k`01m_u2xm^-COv% z58YS!Q6><5uJGP{ng7v#-TC@kZ{4qKtN*lR>5cpoOkVS@#oV5xyY}+sBz2v+RqWA^ z&&Gw{x>s^p+i%GfHAgigu`8_8r}-@Ky{YSTd6It7U9NpIX0Wdn+ZZ+L&D@tqr_cQw z;d~|S^{W$s_ull_Y_`nVwyH!{PLWyO{bPqy@K?4eTm9Fhc_zrG8vNATRxPy+O@dv-J0|WQ`O)0l1q1-DNH@KDEt4c zi+*;up5MKAPhRfrpOYEy`Fp-qPu}~d?WA9Q-X`<;Zyv9neAoSmet+37`<`!Q>07o> zuUN_Wg5?`uw-6%BHS*iNO7Fx-=)MTt( zxzyp}f)~@arby4-bZ0jY^E8E@1x&`W9-C}*Dq}aA$T?Sh;5e^;L3K5^0^j^^p?23V z8FWP}E-n93V3%odoR=YG#XJ$o-bAy5|JF+_kulsSpSSC3j`p?2|HZv7f9gK7=^pm; zYyQ6bQC&)Lk9W_*mpMyAo<6a)pR~|wy=Kwb`DZU)J!NuT=ILyiud_j9tNMl|SGL5u zC4N1!e)HL-n#`Av7p8NZjxb`&31x_vI%9M2^wY$o9SL!3t$o^D*{eMs7cd!rc%t~E z^!TL;k<-oYm6h#VYSR|*ZrE^rjmbA=sW0+r`570g*WY={62PXh@oAg*iM`Q>z5J%J zJI#OeueAMil44E8J7MN&GsI3Go^)N-TR3n>yXe!OvbX+P7|;E8eNC*Ht&e@4?7Z-$iEsyZ9>RD(wODQ2!y=`&!RF&e7k8)03IKq?=w)VsU1J^Zu z*O)d(uUl_?u6>dE=ZGm5l7MuK& zc&wBA;>F;+(eG*8okJCyKTKVtzDdZ(Wuk6=WI9WV(sqx-6+CtuyKY*pV=%F66;z&l z|I6co9Up{0%_-0<>KC}dTV<$cI+1f?^B1Fr4;tOdn>l(50>3_}=~LM%)MUJGm(H^I zs1{Fexj7#fs_7PcZwmKce)OBY*^GyCHm#OWnQ`qnx7^(oQGZSTN8~&WI^mSG-^ruq zerM~$FP~pf~ysMjidhZ-EIr}%$miz0~S8G-~{$bo_eXXiy z;|Ax`6E@^dT--WAIa%L#Vpr@}J5v2dl;r;o=awWW zm%Urb(3yWt*xhK>Rx9s3@ip1ceU{%k@F)Lg`~HPyjWFMQ4~)PL`R$nv7Y za}P+|T4d{Mq&+9=Tw+`496!CB?MIJTsZ9RB?)O6MbKQ*%T<1MJuXy(ap5Ikzx!gtP z^pgW?q#sGCvc3IvkW1@$!Q_S`Gd4Ace~WT2`?FBw=UHZpNtctSxSDNU+UDb7;=AI^ z3H#EPX<8BOrItr~xC$424)Et&Av!(4>84oJb+->|IRqo+9%v{z-LWW~uPv_m(W?Ic z74C!C?<$X#KX80`_3p$*#T8||-m6W*EgC=T<=*+{A@qLcf}YrDqg)| zyhi7i#fGW8CwJ9)&3du^HOumybvG8=*!5tF$gX2^tu4RX^z>{gJLkSXJk0pt3&SH! zzju80SlStr>vM_wSK>0ZSI6dD+Pvx3wug!bPJC&7oE5Zf#=XMBzp6cUHDzmEJ>az= z@VZ}wsp*WOHorMHOW*NTo%u0){rdkCRDYk=Iq4rcX_D%1X78X)D*vT*PX5=QmQ&xL zdfRx~lKNhipTeG>geS@PdludC+@$V#$=oyOoy<(t+u;$xAJip+{u%SE^yl1UXP{Dl za>8T#lM}wEI$z@E`T2d~=cM}qtYONo+m?t{SHEHCXP$lcS@~|2u(F9)N}KlnQG3KL zec;_nRpUq7|801F?rlr!^j>c!{dK|*o<6qylh^AtW#Rj?Ip??YPu|k;ZIX%pna02O z<9)@qbp`0(@HW!@zHXxWjk5Qm`*T&ydSA^kTW7zj((H>>;^W+8?@QgKhrWHP5V>n@j5dX!n)l>J~Q@N++S#U>QCFQ(s#eTNWs+Q~iZQhB z@wPNpr$^R(*-tpvvK-Hm?%ex)?W~u-7WUMfd%`H4FC0C|?+N4WNKy|Z7oapl(2 zcF4id|04eR-=^B_O4){=42++xIB0Td!q#_tsvn3MKb;h?A!81M#gUUen>Xb?o~>ZK z&FZN9MCSP2yTZ$QL$96eOIBxL`@xgoX0COK{ULPaqnzZ&=HB;Q zGSee2=m{=H1sk!kT(lhT!}ZAxI8 zMv3d+^PUD59i_Iu+U44KWO?BO&Nq|494U^x5c5#W`;WoSMnR$PeeTUy-d<)%Ur`=l zv3Z_k$rC1to58b=%gdySseh52Vc?t8J{c7Uos0TV?JDM|kV$?(!-~V3dhmoYYLFiner_ zmTs~+cw$9WO84Sm<>;rIcIitQd{w`@py}?mBW*6Nt#QV4Mf3QM3VfU{WAf~Xyb+sO zr_Z@FXPI_O8bo=2I`g%ColvK6K=1P2&=>DmUv1-@C+KnhP}$mh!O5O(wzthcTPF#3 zSX}aHoi$NQckZH?pUU(1c`ag^^Xi^ms=C{x*#~!@m!B`M_+a0+#4rB(8CCa>`p0B^ z@pgSqE+SP9Np)BCjYU3=-F!jspt1D`OTx7d|i_V~wPFA=d7+Zral>0GMa zm0-)v*0o@z+Sa){jwUlmc|YQBk8Qga*7fLp6Yu^{Txn+Rvn>QSeq}oU)x^f2@~*23 zuas%`GQ|nALdsJfoh@IM?2|jJ@bWs#nrGYF{cB5qojCmE<^6efkFO^iT?n?7bNqKf*r}<< z)$8^ow{I`buJ$~VmRPdwcC66lo?B7s8FnqxcoVK4h`cVJ_WA<*u5;{h-=@F&^uCU{ z{#@YJGtoDWa-KW&OIhV?+g|TKiLYmvZWLYpIPuSx578Ms3vbIOb#mU3{$QmzZWxKK6 z+?37hWO>W?2_?HY=a`l)+*7Z$zx?*+6{`#xYd${v!NKWTIb-d^ZKlo7<`^-F@3?h& zYG!SlOX;WAexDgSOYDkunAv}=W9*&C`0&bym7+VCuJ2l?eWOBS`V(6fqX2)~JzbU> ze&^RP*6LV%;}tTq>?=6*`h(W1%jOITvVCjwS*7YON=`CVXHsPR+T!+k*FXQpfMYAu zwuBx&5MZJ;{b|r-IiZXnt5mI9`>J;qy^*?i=s3UFv`!K4*NxFhY3B}1wd5~*G4WZ! zrosm|FZ?b&r1{(V^)!Vm9nHLZv=Uoe_{$8!F7VksoEBCa&bNBy!k6KpDeX)0db+>1 z+dp&I(6vCxtLWO2jZNW&lkEbXJR?=u-)t;S{}+5oO+-VhMVTp4@Tue4W!}DlPH}5E z%0%w;aBW^C@%NbC^pwKRV}IXI^4oIz?cZQ#x8Pf6K5RW-E4sL~e}c!A@@tD8Dry|d zn^T^Y_wcNuqV$vJoS_Rg=1kFCxlq+QX_wp9PU9)k+4Jp02J^$1V%0(7OJJ(-%!LOZsY|5X$J)?E@q=Qg>JNuFUVr%No7w`F0SCh|F7AU`Ep+|5RatS?4Q27wCo|_+H*R>>P`thQ;q@h*KMq}L*i&F+u=>G&Q|so~ zNfF0Hud#Y^OJ?UDSesV%abi+grEsyXE zmQUOYo;^4udvo(~=4fuwrEZF^Z?T47xi{g!*1Era7RxqHJk0k@_u8gF&vQRl<$ALBhi$%fIPO*Rf13i$xt+llMP59r){4{gUtjz?^W1`sJCe27 z*C+(CP2VVW_wJhqCniQ4=JZxSynE=`&enaWo}EhDr4)5uf6DJU8?;sz#ceQ;^11CM znET{ln8?)WmyX)KGb&ctD5!Zwfl+SXt3RhEDR4b9?zf(`_163eCayjzWk&NIAB)U- z{87(l`k7z9k~V$VP$YRyc*pmv!K(zzPyTE(J^4{D;@~yE-m^8wPNiDJb$V4ly7W18 z!jHF(6>>sHm(EV!?^PSq_406fUuF8TWFy1)oWmQAnMf$dF7#oMS;@?Et)DMH|B355 zpYTcClYILx{d0a4HQ~vUqdTu@x82E>u6|xSUG?m%{^`SyZ^?d!8-xbEcxAOmMS@P-YW$sJcPxW5sOA2xc zO8XeMbh?^E+{x>E%6QH@+AZytYUT^f(x`55D~hn6${c%8DtqT7e-AbBIdbb~EvV7G zvFvc{#p~hct&1bStQ1@yq&JyW;>)cx*0S9OC7XZyS|q)(j^*2ycXHRxNs%wL8V@Hv zP4K@yDZj``Qh9^k9;+%2_azVi$t`+h`sW7&vpQdfa)EN#+b=N-S>7sgPP5(k^}y=H zOQ#Ple$%b%&J-_x?yjD3-pXM4w+C-Av41@F;^T`D3AHOXes=LXzn;>Z81etB>$!hM z6NOrRv#(A(Cmiu;^0CLK=Y>9Jo>i;B&hHr=utGE?VQZW8MER{t*GungOxK=sHgMaa z;^Z&k)jKEUs9C?M_qHnM>_7Z`Jy*}FFS@}Wu4SJ5Av`JasoLU)2MaIX50HL#dFqv3 z{Z9-tf4{DDjhrkM@pg^UBd(1%`TE~Ps2>gT;4kCd7-kq3pVIr3bJw@md>a#bk8Ag^ zZ9lHe@1xzf;PLw_a{JHCUvcv@6SwvG^;bUB734Csxh;(U;98~VU(x=^`tV`76?d4= z>^>xF7^eK$Zt~J?=F=`2*(J~2Sm-aXUb^`Jb{Z4!+km?hjYdQb_ z_N#HPo_JL5tDJuSG3&lXCmy$UuICMB(*E4?g=xJ-@BRB5Joij_xX_9J)>N}O4~u%v z=wITjJY+4xalX3r^M{CBU6#n~3zJV}W;PimW#6g#?qk1*FYNS9CHHi_>tgW+1$bT!d)&5Xd+FSxV4d#6n4GoE_PH~#A%zM|y$Ybvg)P34FZ{WIlC z^2NSN1(CS_x1&8yt7x66nrqM`vG?DurR8SUo1gz$$t<<@V}0A1vgMKb@&#uK?={zM z-+ZCWsAlu_myfx*!}q6K#ruejn zk6N{HU+>$PxI^et*UsAq3vxfX)FjSyNU})g-sl+o;s2v+i94s9DcatV?^@9E@EY5l zEVT~#+SqL0&Vw_!dUYeBy;?=hcHidkEWH(6JZ*c%QvW?WZ!9??Ea}dcxWQ-jnOjxb ztzkM>CfPr`#rsNdp4I~P?bEns2534O?z#Q#@1!5stGa%C4v$O@kjjj zs;+#0PuIsi`{D|X5B=s@-gD%`1Kkyj$A+S zVOOc~@f(tNRB9iFe&X{uv+`U!Pyf6e_VO#=lU}@kGRwT=$nL4#i3P5QpZcnu6%GFO zn7cT1`RVB_(@wAye-hK%d-7D&@k_T)^8B4>Dk=QUMdO599!vVSAIHR}*;dx%0K|I9Key(BQRgsluu5uETD zR}uWn=F^77z7rX3!9}n~_USo=&*VPDzdm2W)_YVo_+~9@rxW}2gEo&YOq}+0(*>>X zhgP?)E#|hJx;9j$cJ=SCtwnP`XMK2}k!~Zsm~~5T$OSi{99P#$+1NLa^)9msNl$d* zy>$QLm)GT8HUEF!pKo<`LR0D5o7?Rb1M}Roo}4K>zv^=^Z!-%+efzPR`i3>1TQvl( zPGnF!u*1yp;PdE>*{1P^GN1pCiF+_?GA zXLs(O-3Lk)Cft3$^7PJ!`?k+oIOjyoG|p+)eis}rz8DnmEzAGsy(xe1%@?zK`CC*f z?G5L6vpV*#NtmX_$Z03EIkaS+%FjPjE9cw)pE2+F9(mi-$5MTb<(NB@6(ku~Z7NTQ zk2SMNO5*$dRo`S?x7>?Amp5EF7{~N~i$vi>-+Aj#&(zrN@m{no`|&aMeLJHz+*e>f z7ctFn>x+bIYnSiaV0LGs(Ch1kO3K@~^=7Cz{JFJjn!?p1!RHHJ|4ZY3+rn!+OYlRv z#Y$GsQ~GD7`5b*^UUg78^US9UAF}4Ccl5Daei6Ru-TmSB6rP*$;rH*Y`drw|CV6!B zwGcnkJu8cMSx1|4{9EA3a#v?&zy6fPN1mMXJma4|aq?E4yZ3e|O*7?Rr%)o)Soo;l zH0Ce&36Wf=X#T z6O4La#(x$H-)I+5y}D7|dgG28liY%oRnMJx$LaR{b;X^;wW^|0=3M6=cyMpKt99b9 z>GOje4<+8~mn^JVwOOWIWPQN1UGL|qY+pDrGr7O&+0^%*%T;sq()ZeHZDISo`^KLI zkFUD)B>b57WJXIelio3=lmp&#F0Q#~^d|i2l=JH|>fN(TZfSbFllqhA8}~^1O1Q(6 z?)CQk7LoDp26Gn3=N^?RJs19N`stf2mzKKzUHdz2xy|XBA1!W}hSmK1!}R9&ybF<^ zXK^)iRWv8AW2kt1H1o*R1E*{n?M_HPP|`LB^T6K&o950m%ahJyR%QQJ%4j5Pe5|<1@WJ2pA}Ob5 z%=VKJbsXuZkcAKa7?%2&-)mJy}kNWFr$aQI{ z*R^%3%I{~{EqvJ}?0nm?U;FwUi^AmWD1&tsi46T-Ze|J5>(Z~xh==bw5y*|?i!yL8o*u}&=6`PfsJBStwWTYArhmNYig(#p%R zu@h3iDnE9+nXi&(#ku`=+9}a9B@=&I=-xl0w$XN*`>eaar^_@xi)_Z@!! z;K*Fh=D-~}l5)pe?BsVopVlI+W<9UXoOhFH4YQ2kZ;?F#&VQH=I=!okOgW+Yn87m7 z!uqu5Hh-QVuk!WVrX2J-kXo;}jWwP(+vvxQbx{|RU#FLM6&+#C@!z=c31g;$)4}O+ zJ9|!YUsxdWnelLvky>2ErMZW%pVet&w4KB9$FDcxx(=^oK9l{f1M4@7@FlA_Xxp^O znt%CdlYISHxXPZixOwl5I@au8z`nRRZ4BM?f zwfIbW-(t4Cwpnv|+wHthb8g)2FyDM^%1;%EW9LFIpSc&nxa@_f;NMAW-_L41b~^t| z&E)Q6hJ*9JPP~#Zb2<)PIg6bAjBi z2btQRmszJwi|AJ3o%!DV^2fGEZ7w%g^)I{RSH8E%_{_GoD?8WDcW>^jysr{y5r5Y6 zaDNfw>5me1IayLaxtE`mj*7JAY5gFvS%c|#Wu&#;#^ZGkjCnb|_JU!*jz9Z9^)Z{s z?2k`o>xoY~`e)hhla-!}V;1g>+Z-F`WuNMlwzAy#UPSLiLzxHS)AkxUo#tN2SfzAB zx&6(>9m_9$y>jCD`a{2;d^6~LxFi?E0xpkuo(m%o^)ID`;zyDwZ~s7-MR5(XY`RRX{XbapIxeYTA`Vj32v@Bk-Pe1ZJXZ@-I z|CQ4w2C-gwf1&C^Z$68A4-2>3`jn!YJiRwt4>En=&8e~bD(;mM#t`sw+9tj$Sy$h> z1%~DKeCIIh&Jg`!Xt7abLdBu;D_1nE)46is1V`+m_S4Di<=JK8wdKrKDrLGXS9bq0 zpJT|f#@|Z$>&mmz7ba{sKHoU;zywd>A7)nFGX=j{sJ57V7qVS(=Z%WR=ZSj@Qtsc7 zimWIWY}s<|xip{QZ>PrwIlS`)n({@j>@Sjkv`nDx+6y&nJ&xVCqhRiFcp-q{qr0owZp& z_KW+j$xl`qzj(4rQ0b&l#6QuV{Rz&BYCA0AQk~ZC5$pP#l@{>ob3=0K)cSYoi%wP? zw9?!1#;J63;Xz-Y$Q(J#yo`A@{$K9xi<5Z!TKJXkihkZxNAqr1Jbiog>VflrnGSE* z-(c~ODd)q&z(Pi|T{hPrv!>k9=+W_eWAR3OUvc3lW3A^;{mv)c)m*H*`Z7}TrtqIIH>XAU%1c)8P41HXErC7>9{}b z`Di*>WmlSySR{|hbo2T17}u$#OYtTw&c1L#_kaA!U(G2?A~>f+Z7{p?!eUlAYTuKFh#fSlsOM)jM@v{$1MO>Y>6)9#lQt zW(iX8j`8zl+H-npntJ%YB9=Du6`p-?i}T$Cf6|72?v& zUyUbPr?2Nu&UqFkxpn%YtEH~#dteB{&oqjajpR$N~^wq4mVdfH`=~HVav1=*$Hphmz~jl@%Ln_zIa;v zO|DblpIzpZKW+57YSOu?O$|NI?k`VEdA;T`$IZE?(}VtZ?NgpS!G&dI!A&EpK8{+u zq774zN~>AVX*1_73i6(w&3;uzVSeH=#k!4;+wOc7Iyu2R-@Q-T@4_-0b+*W-UUFhZ zdvm^tJ4H{}Y@n9h&#cR~_-F(>=XJF`0m2WG{ZBGqYM66yM%>Pxqudu32z+KdTm`Bm zHt}|RKbbFa{&3>2@+=mcy(TI$7oIboydW+R8s0xNf(bGuIq zNv+p%JS+09?6v0O8L~C?n(ZeVSc{Wt&N<0j#Qwe&XTB(ZwX**SmA`%wv*)x-kc{M$ zoO9!Bhxz6s8O?$m$$={~(?o)=%~=%c^2K}GzU;K~ukF(IMV=54Kf2tm?(dKL{nyT3 z^!PNf;6-^>!*bn|ekYta{uAk7ND#k#?!uPV+~ao^PtZQRdfwIvtQ>1PjTUN1Gkij=# zVqT^d-_LL>IftL~G_pT5{#YWtnW4;T>cQ7nc+SV15H&jy(9!g5c2MO)UE5jw^Dgi< z{5Y{>_O)Q19sE1bx@x;FkhJa1F-c65`D5d-#Nj)}eL(udk_gho8oJ@JKO-osg>g+T9 zX1{5*Oynfl_Mf#~c1>YkR_BZFZ-4er&{^O@&{ee=lO|ao6i-f$+2z=|JoaQ^Q|p_3 zUuU+|_qn894xb*jb+gN)bdxhm%)zV{?_OTx;XPhg<-cRO)#?=-{R$EPl9tKdJKh_` zbEV_)oEiIhZ(a@lvPpwMtkc`W`3jHB_oWm6b8eoqTlHN-LGR}S=NO_F2jw3yyr>x5 z{BpB4d(RowRGV{5$T z>H8jD_=$h#1_2!{c5g=E{l`oCf-W{>PW)N7sler`miuC#7accXHh>T!P)UICR$<`Xvkce-@h_^{0Ogk2B* zePuo`r~77N!i0J3A57#Q=pT^XtT*B257)m*uh_D#9sV5iH}Mw&_c*HlNqN-k@`}f=ve%&SO!hO|#9LNB4y5Zu zoX@)`WEvEFe|DStgMgYTVQEj9zh5e^DSPBo=Vp2sE#&X_W6s&|6?;}P035>>uZ;~mhq#1^PXjs z67wu4=B$~yjCpZ)rHhrd@(h*L#cuYSo-FA(v)Edm<=MW6dk@u@ZuHN%ZN7~qmdRqh zltuJY`&Ay_XI(mFa@X){qxR(m>X92~r!2C+YyODeW+Ug6$C4XVTPJL}tLhqS+_Cqu zO;?G+6}b(c{yD$uGBjiU{x>RX(Zvwibn74Li;TZZTN$Pt?V4ddKjhW9;=_})^43~h zY`;>*zVAlLv8h{5N^i@I|Df^Wz?1O531LB-um*ScIB-10dupS zuW(48*u73)y(-vz)^3)MeoDo%tgSqco?k3)+Hz-IzU=pdzZ?S^a`OXJ%JnWjGB+yD z)AHVUd!Iy$n|PTV|Gz_O+>4doPh9*`tZR*d*~LlmyK7gZR&nX^uR9>h?P+nsY}WdK z{U5`#-+FIKI-4Z;|6lO6gB#YmJg$@2=G`_)^VYPh7PX5W&9M1<lDyAFhu{&;*jaKjH>8ky(@P@lm*V`H0%^GGU zGwy74*|;!G^d<92<83pY7bO1JGez2b)wNmGi$d;kbiG{{^ZC+=`337t-_n^oYb3r@D$(iwpTN| zSWlK+4pM)~H;FfR_m8~E`W|L3n;yzmO;vK4^}AQIIydy5cC35kBs(j>kE`MIigW|! z=lqWzGsW<7N|n!6nm21z-|V(0PYz_oIo(QA`1tR-jo~h~%#6-U;jcxcd#-2P zbzU{O==q@r-mO}e-nvJ&PQL78lrh6V8$T*+IqcMf#0?Kt%|0_%a&}vu*pkXTXnF8}c`IV+nk>g!Yd|GCH8xz7TOuW|c+?(-{NZeHO3R##~Hl%RRS?^fEG zoQ-}k@sstzn4q=yGv8U~2lgHTMGftljpxGFgYF$vmA~^Sh_$_*X-lptP_2?gfpt{yweAxzC?}{U)9= zwXK$?`1sO0k$o?w-W4g`*Lm)!PWheFduqQuFh1L_a?J8wchE5l`^cJOmL?g0`-+e6 zd}4hr@o*gLR+q}98B)hB+Qm(JlcU@-*Ot#KpZ3|du-ovNrPJop2R7~|(HCvfyS6I$ z8lLBWb&$ED&O2!ybN81cHvdoYrS$|q%`l6Lu{-*Y+tdHNNb#MXn9PN~b`@22|Nc~} zN-TZOXmghR2lw>N>zy{a?5{|8)pU8ufz|7p3lHi_oM#Nr{Z@UyRQ~N__8IO!0}r|c zEPdE|yG489#NUl?TmEwI>NH=`Jm06r*wFpphV{HhOsY<;|IIRYgZz)4BYl4HXC|(k z_D)UznJkxOL3+EHw)~Fi`xYy6wjZcn_@ebM{~CF&^H)S9_85v4TVIu(&nzmZeV*}q zZ|`$P^OL`h>)**Z-7oa+{};bi-PbO*^W>i2w`g8?D2)H{oWm>Qd)xk7oX*yo;q%>Ma*oc- zWx{v(YBb#JtQBXZtS&Cv>v8VnmIDi1WSS*h)-y!g-eBMIRyz7pg~Dmsn_BgOJJ%;n z3e>!uV}9Ws-=q-?A~+`6!@E0~JzTxV=j`+qep`#DEST&enrZoP_O6QwE7)z` zzF4qeg5w{XUw#v&-Tu1vv0a3{q-c7AiI+l=_4JI-(ktX0QZo-}{djPy^Q*_Rglo4_ zQm-5n&)PLrNxP?Z+mq{g^D}48%L?A@dD5DjUA!?Y+5BL9)bB}aB0M9H?*D(KR3JzD z;!gRdx04p8bZtvD^_#!KqVA`OPFehve{%}rH5{80t+(xwUa0qmhp#R7?-UnLVn|q zt%((D_qWH_yZ&~UG*F(`9`F3t=aUr6?XyYZA_v=M-ir3z5bLl^v59xTOCk3f+RJ|1#*tZsy8JnS9Q+2sy}Pi0*P&pe{Pu1%fJ6#(}L?e zblh3@+G*Cj*lPHhZ*SQhm)hpI!%S~iF1o%UFxKLQY0ZH?$vcvMuf$KUy%qAkGq&^K zI>G5{nQodUMebl_+3lt)KFzc8LgMv)l^doT48@yb>z^JwKmY&Vj}FI|?3QJoboJUx ziF=*4vd>-^yjv}*U|~6wm%hMyO=CZy?UH0S8 z@9Q_YO)=j+@xltF<}{m!SMKSixUP3S#;o)yR&wTR(}y1#+0s^MEy*qA6^v+-Tvd0P zEA4@2h_SIr;CY_36Zy=kCwj8u)9wfwIe&jr%a`V0zx@o)9zK5q=Q}sFOE0_lzAZf_%V=8i_hn;m^a*k4 zs+OzG(ix2h+J0@wKGs%sGM#V3!axb-1q;rWrX6czD|>6Ad`s}gg)<-c)Xhw0Yp+=N zch9Wg$5GRzGFh%%czT{I>yHTgiiIB&i)}@}URv2f_T`qkbI_WwVfSXIBV zF=lapu0h3$Ad7mj$yesaN5m-jbKEFg(8f_Q{*cX&$!oCYDXG zm^*8~!onv^)=e$@o@Q(1d{=ZkbMi)FA^ZO$ar6EkT7D=o@Rp+Vm!utuW|N&`-y2J? z-&asSRFxiUxwN0nx9`Kt4eL}6$DdhwcIiSZ^{SMJ!u9(Se3FIuPHiueRJiC zlhw7`8YO$bRlGQ=cm3ai_ok<_k1bdwC7rhVOoDVwz=_kn{wKcHneiv4Enk;>C}g_f z(b&IYyQ2hU9)ujp%fG%&^z`=!J)S#@ClozgB>!-oMDN)$zO*lgldu2Wq<*(!;=bIY z1uvYPUVc8ZFY=~+k>59O&1V&okxMQZqE0qadDw?*;bo!=SE|nXs6xSY=yQ|p2`gWTBlG4cm zn>Hw{J-Y7sR2IpN&*hhHy^%b-u4T)EG3vA=U#Zm6t#ZXduUBpp z-p$i3*0OoWPOlr!D#UJgT-nm$9ObPtx#Ew)mgGR0Rhz_i+ls8I^6rXVk+ovYY_Evb zEE?GxzZ?ILiBz9_>Q`StXU4U$-I5{Re}^m&xZv zE?+fD;A%b;^=4woX18~e>m6Q%24C)JTN4wzcH??6iC0;=tCFpxc168;*DrMS>a4xT zl*{!Dn1aH)b4wPz+WGD3)pC|yQP=gkWlFxTeYAS@SB@!1FI-L9eoS0h%Kg1evUuy( zGA>P?#I=bEhKjQKaYLAN zR@0$h%gq${PAUA*H%@sXa67?mCX3iag>R7u1!@_)Dhf8XN>+8gYjC^RouHaArPh-# zqhqaY@j}IK7Tp&lVmAKhU@CFdy4r<>?i{=upWk8R-I#4DDOGjGl1VD*dm$5N zs$-FA#uUy-0pn%1EmI_A({$IzO}z20lu0Vde-ifvjbA}0&S$0IqTmd)tMx80mB7Y^7y z7iGU$we~uXa8`<2O<#BRz|{wz3$j+~?oIG_&yS=^ksQ zw1mH$X?K+Now=ZV#-VM-}i@DCzBEVc2?!W#JTS!?{zS=JxhJV z!*lkj1WVh~|2=OH?3l)syfLPR<$%VwReKKnSjoFue4^4D7pBE_hqnGPn3Uc9#^kQL z`Qv+%5=N6!+Gpu~Ilvv-vSsa>g$&*woTln4GsZnI3^CR>@jlNHcOt(!>cgX3)5XhM z_FS+n=Z$l)-hPJLhR6Sd)14a~VwnnM(?p(?zwFeIT6vdQBI*3EED_0-%UKPM)csk- zV&F3W+CQbXRrh9fC`N7i=HNEt91o&W=u?`I{AI6^NlHqwMCS6OkxSHo+x!z?_&`FCaL@?%@|OfPY)Sa^D6iDU2lM;n?Z{@Ac{URTw`a0hRT zYp))&uH!iMZ5l)Uzo&wG-qkSgbdtZF5aHYpsur4~xBnM^{`#@wTifSba}QctpOp~F zxZ|+?(WhUB4xBdaGtih@dC1^ytAwF?Ei->p{h>oC+HZJ*I}+pM*JaeI>z^^x7h`^H zti!X>`P30#zpY$1U3Rf-kGi_{>CKHsb4_P2?wdWkg!#y)Q&0ajZt7EiZaDF$PV~kd zk225nd7moVyxD)2;@1kdTaHSluU<{+VdaO`Pf{Y9STc_$M0|5;Y6)oHsv7w($uC!r_p0?oWrkLf zbdBUh+8Kl$Rpxr{d!I`)0ItQVSEe#5uxQuq&# z?VL+*H7`5U=0D?+Sp4~CGuK3Y-6lKZV$5foFGmPid_0%-E2-Z=BAWH^h4#^+g%%f#VMO zlhZO7Z)tMR3Xsd%=D7D~^fu@A`MrX*|06q3ERK7rNvyrix7Bs=h0bK71=HSab=eUy$EU+PEc>H{ zZH^;fs$n_uWIG9EOU9YWa(2K-)z0q zt(`v-N}Xc6ZLQ{uo|wr~@zW{RoKuyX`&HDNsyNRHg4K*cvE8-{X0KSczV_-@*@e5r zcKdQmT-iG3p~JJ7(zVCuOsUp-e?;$rbcsb9XO zOvjq#$krPoQ!ZRf5_=_;^?I4oH7>?mQE&d9vA=%pqQdV)(1af;XQx2k}Knj($-(!*`t(R zK3w`wYeABI^d`1RXKwMNNG`h8_WI~-+k%BQk0xv@c-Yl*|LhvuFP$-QXKoc|8SOo| zhIhKE_ngSzk5k>k+-Dpv;yQE7VD{u0=a0>f%;%o5_5FJunHgXG9-UqDmrLnb!nL;I zG|7gj-NL<@`dM#V7pd`Ny-hqJUg(x8yXHjJwKbxv#T?iEO}!@TvG%W_wz}Mot>MK> zZ+MB{y7OyOL$o#9e1Yx%Jo?_Rw~yDXlIow{%i8l$J|eBK`{=n_YfTNeBp*K+wJ`ZP z6LzV5|$|ExK2rT9)wV`6?ppEnCnZk98bY+T5lTfe+o zW?$ZQj&<+pqS}-hryhKt9Djnz(y6M}Zu@th{V4~UZ#~iC)O-*%eY;n$|GYQZebG~A zH!qaltSxYF@|}wY8xmyp3+^y@XYivV@B9DA#$N3YVRb*ER^1AC{-krR<~3vHt6phc zsmDyumL5sD{mn*G)h3E!Jc%}axy_NJxZN!u4(u~p*E0;5TZMwYXdH!c0* zaB~KKujhULnFrX75?C6gPxY)>EodGVaJ%^Esw3;Xe5OwS^zxW20KzwuHrs!?@$uV< zB@51_+b;L}-xcXKQ~je%J6Dd)r?xrEk0&j!Y<; zDn5LA6!GHuPo~Ek&Lu4P;xN(HFpD)m^TzD6-7zCvorHP6}&aTY4M5tFz5Ji^eQe?anMsg+ZF_T{-z=iWTCbNJJD=-$_dN8d=- zAI|^&JT7qcGskxaB4=8pUE&j8SP?QOQCa;Ht5f0=r^l07ZD&SA6wDWHlaG{qu%h^2 z{=S~F*Y)Suel<+^`f$UwZnbl_KGa`jkWscRxc;?&sp#7oN3M1*jbC7tQn^lfnT+2u zuLm2J8LU{@u5+|ka?wS-Pp_U>Ww2(Q_tb8Vu}GObIqa(aIgJNNJIv#59lBVd9lI*& z*SsB4_WfSHM|gWvl{RI!-TNW1*!X7KvCy2iji)tkId-cX^k+oc+H1tV))cHVWSX6x zxBdR%N!=5f*gqeA`U!VMvq_)-USDeZr*5zO+C+;g{%Eg5e_nIV-qIH7^|D{IaLHm*oi^jG z-6^vdPBL=Nk~s74|0Jol#r9V(N-g6~zhZNA>1^BBs@#o*i7R_^C*Jv>-*M0}&qjV0 z^Nm@b6dq5!WpLUde!{H+cQt*kt%-e~W?hoXoDk`et@6Cc-CLocT!bz4!LQqULSr6x zRcmg);^8M&n(+McRHcuPgP3Q2-8H36^2T=+(@P=YQ6cFMb96SW!i_XS?mRMj?vwMa9lws>lw zEBrPtz57mN8SCP(ipAwIPIhw-6@+R?wby@{DC)nw!|u|vm!i_|^ET?reeDxn`}MK` z&t&=ceGk9qJT2i7pHb?$hC?Rl{*0^*&x_V>h}c?b)%N=MjP+3)AN1Mzoi@0WWT$($ z;2{G?b}iRmlb#nmAHQ@nU)7s-a5wALXN!DZh{><-E&I68zCNK-b$;2yxSpb0t<@_R znmh}TiCVckQ9|Z;?h)M{Yp!FGRlEP6@5+uTJpb{X#Js@bd3}jHo|jm)?Vr=u7}XY; zW-ohK&U#9P)v;r{lXJSQ*z64akKgdzW8D_NsPD2NPq2*WnigrP1%E|O%~_sWA>-HX zklI^O&eNY=y)I(wjnMAQk8(wE^=G5}Pk+c-7k>Umg?aDkrgaZ1o?SMz`_ydtSh(@a ziKu($4Oa-<+t6YpH*HnlErIE`lMJ_gDe3mrGQ8#Q%~)9x-~NBwoLIZ0NAbElKK;Jj zZhpro?8f7_*R1ZGGM;+8^jo@I^#{rDSXZB=iT`%h$zI=MB*Rs(hF{{*q|z-nGUs+p zmw(~0v$$#Vu7$EbcHS?J$;Mh|c}?k4&hyzQnY1&^CF9uV))oIM&KWRDe=hCzn6)8) z=ZBAvBObi?b)f686;tD*s(S}#M9f`Z>|VV(KwrP(WqEkUb*^KHwGTgv-G5zav{|o1 zCc47-b&*<|xqsS?j?ayA+dte$Rh(-VuknlNe8I_^*O)c4gY&8s9OfFBgglN}FZ}9f zd~I#+w~YpJ^S58fvei%6aprXsyS{i|>WhxAtt<6E@U(fZ7gqJ(+Ei}BQ?+T1Lfrb# z5f?(1e-vC=dZd2;l{5Sz>HJ>W)_q;-qRXDi@OpXeNq6dsd@Z+X+C9~yp91zKxH_(9 zj&@MneSS^rgym1-L>k|$=*db4UAQ95zI+Ae z<^Cf)1y^`??%Q7S|NgO`3L9<}M7&--DeqbvYp8NT&z}Rab~4`Dw-lpd6`d!~*mpF4 zo$)iRY4cuwbv_YwNAAzn;B{BC9e=w2Z(eGhEt)N^tDb#Sw7`K;`tZ^~PqCh3`Y+t3 zF>j3xTwC^i)tv`z$BZ(qXI3f8%XKXNn-zBSn%s_#U;5qYpi=O!-3RWK$6}SgB(Z#a zT((E<#W%UhlT5$9y-_M)0JwcUirY?#ps;1W7nIH9Gt})wDTrOrD-m;4LdTi?@GbP8Mjf0&X=eg`78z>Z8c4UHs_?;Ib=!5bzYW>dVEMo`nJ;6hw%YlopWvEe?{lt zXFtCANLwTu$Lb?(zYQz>J9s}&-ah4u!5r07Fz^lP3U#$OCIAb2dx?}cm%)A2%OWp{lX0~PTv2AL_*J&zspUUJ@Mm2_xtts@hhVj{8I;Q=DQjApw2H)y<(ZX$DHM7 z)2_b%cboA}XTX&;mlT|Z;*a0V2>fWhH>~e@?!i-!|F^7}!z;AV`tSUG@)zSvk1l%r z^Xy&5}u(EX8}D^7{SB zxN~(`rTVh|^qU`!y*k9S-h9@gRjy%G3!C&8x%r=$2>LTQag*h}|F&L&)#8gUIK|D4 zNG@Fik-OaDV#~Ufy{fm2p4{|!a(KD>w-Rfo2P`IilCu6ftnw$h}0!A*c*^r_+SC&_in5;nzuLXS zV6t*WgNW*-nMY2uXU+cUD*n*ps`ov~qB#x6X8w=((IlMp@Z@T{e}A6uuT#3F%JOQ< z9l4mxY;nBLB;TeBf3W^^H9W6&ljB0pjBfouY>YpATWzFm?|wM*aLMG;?XixZ@*_TV z|6-rE=f!Vc@4VX%D@>i=UlV?QCgF0LO3k!q;&x{xbA1!EA~#PiTx7EPG0Qc}_>4sl z{ia+}OO)B7wfm&~l|S{eYg{%xWNEARY5K&ZTT>*_wug7Izrw5nqo%|b;od392bY}t zCwr59{hkKn>Cb#l>fdtu|82_OlSlJX{_hH0!oE{wF2{+=jRGqx76wh?w5fMzs;u%n zm96D@EoIg3s*9H0M=#tpjLfTSdKEis+K+cnmuS2aW_hj|DSs;V=dn2|lMTESxAi_U zYG^j%-^f3yXOoSlnXUc)Xr>ddrhhoMc5d#ZD|-d*KE3?)RH)9(3A=62pQ^L*o!Js} z>*tA8i~V|(ihIl^pJYDHabKopl4IRL^KYt4+>LA}`c|jRF<`RU_rWi@@d4X&^;rA- z4d;{>W=?q)G~MmgpA(zJ{HLUCt1Zn}jhKJ+x`6A>?bu-?LNy*wgUI zVsa`j-z!og>`LqQz2Fs(aGol0aC7rrH&K%fx0m$kbsuz_T72@}$!>NpLw0U|0SU{D zhP{H*oF_fICa!t=jUub&eBQXTY&ny^U7PsOCHbz;9?AUwer##{JF?9_ojiKYlu`M8 zLb>Jr&ONu?`+oiSJU`lalFUByEyZ>B%#*xt*$Bq9J(KXeaY)2g$Tfk%;Z)(FhuiAy zW;n0o)?q*Pw`F?W{+ta<7OwAI9}~An>c`KR27@cy93p%N*vj8OIB=j*c=zka%qbPQ zJ>2_NXk1~vAH(n^=J-y#o&G=e3s0`)_@wMMY0EixzFQsT3s=^yklyo*<>GPa11Zna zujsW29~17J^=?*F=NUig@Bb(NZGL=o&wX~L{NJffs$cf1P5Wc@G3!Cv-GIau<^mee zmQVKm#4YhMXYbuOhqNY%sG7jU71H}oo?tUd-^l!64c~@&3ZH$KDW1K&|KDq=^p)L5 zpG60qa1WF^yuZUb>9LPauB7~Rj>_JT-N_TKa!$Cc>AvXP$C({ZW@%nvvD&diWbc0F zH2unTRvSE)`4&FaVUuJmvn)`b%PP*NtQNRoxo=Ex^ZTX3+v@cGJ^`({wkO63Y03Z`OLC?LeHAn8!RTcSzh#5y7=9p+`T(0 zSk}Ft-`(SW_2rIz66aJuw)TmvUTpa&CfR0!vMyIfv3$a|FB{9-BMocyekP<>nmlMIe9W-ZezNNBdwK`C*Ea51eK&5t%ioU4 zMcr=`-U}}0o0TkgaDU}-yU&XY*LgaL$^QBNzv@^1x5_mwN7xuPX7|OI9G>!dLD8eW zc^^;C%4eIuC-1oE8Xu`Sr=IG%I6heN^M{bj&Q$KX%M~Ya@6>raoAtN`i*1IR$FbIx z>-+a?TxTcszxSYod7iH6#2=Dr=bk1y@_ALldHihGcWvCp7c<-Kk=>My0ta^qIEa7RH|P9= zuYWn)()&W>yF-Xop~LxYVo-%jAA$3{^l@MHzgu-YWbbC`$zmH0bnA%8@Nk+I%K`r!7aPI`{p<4rgqb z_kQ*0(YCbx@234|pHEMbSHZNSS7v7xXKOSpcF?!2I+>?ASFd;blZcygl6v{?w2tsxzhSt@ZBD_QwO5q`9#1MizAA8*18+p(Bp-=YSDs#d>ehR>bLtAk zm+hN`%MLW0UcBD@-{ggxEZ6Bvb**SP{Pb$z&qMETUlTX8`LX;vyIIVYZJg4Qw`8XT z#@)E#8twmYU(tbMk2o`!%);t6MwoI+@BhTh_Ws!$Y10_P>)cWgk4frhw9Izrkeb~m z%aqa7*1pQNFa5!+xWs}_0Uzf4=Q=#ApwL1oen&@>)`UlITN4|_CT`a>kJ_>9b>+oF zPYwAWK8h)N(E5SJgi&I}w0)kUUt&!EFt|w^+&R7B;is7~McWSX)=JN*bz+;+AecCV zMd03r?v~zF>lgq1wJ2)h0>MtrcNMD+we^UbESl-cA@zHb{Dle=mfi`yGa9+q-E!Dz zA#Hf%RYl>y*|U`VHtFoXsJ0-RB_y_pd1IByxvNG|b_4Grb(L%#GU=H`zQBH180pne+-uT?W}W}$FqG|v}*P{S&P6~ zR|}I&4qWNWvkvsr*kZ=M_R%#HlmGGUFK>Kc;&|J-^K|#p7e53ipL?1cafM~k(?gFK zE}mL)?}BXLM$OHY?%xh+7uUtldT?6N{M>81#3yk%9@RZULMpL8U6m7=_>3gQgH9d3 z_`x-0qPfnKdS8X~H=-xX`xGA)hxtq@XWyVIUwJAx_{x?yMe8+HD^C5We0^36{CUSy;=N|li3{IeHsx(Jj0-6LS+dvY z*~XbKcJh6bIDe|L#&>3kam5wg)qPeU1%fKJ%?y&WXkD>DJ@MH~ajxTa-AlaHJpQe` zxnm0Z8il%rURJAF#4Qdg`ma%sc$3I-t8lSj|CxTB?2o@MoiW)Zwd2$4@4iPa&hW1< zHoWGXaJga6g!6j?8DizuuYdCAY)j@kJI*-k>l)WJ9JiLw*p9>0_Kxc`dz$Oyv&_kHv!h(ZBewFp-2FT;@#mGFKNp!Vigey6%{Zmwwfv-HUq?<3 z%V~8f@1JHJ2s(3ck?;}MbN_FwoAxBCNYvuH)}AIl&lkt5WG*f)cF+GW$bVwVl230Z z&Xw^zI-lj_ez859R43=)HG%A5{dk)`+n9u-yNW|G$rw>r~QF z1^;Bxh>!FyFBsdgDRo-pBdk8{Tk%B_`R&Cu)J~~OWHH; zmu-L8WRCs_*~VMP>?IY+Z#F%Q!Puch*KdjRr`B=59-l!;=b|1Lxh~k~tH6w5ss&i=G^lPM#2tk6eax zR-Y;|DovE!!_ZjT+o`VVx#Y9);d7@CMU;4kH+4Siy;bTGX8D*~c}smf&xJEruC5o} zR>_mLYJ# z$2CVR>eS{WKHomkE~wIR=M&NXZ;{En{O5D$>v;FG{5c<=lk=-d|JRQ5S_j3w7;ER> zn=HS2Z60&+&C+$@WxrN7y;J8KsbKUfTCtj0YNO}38_UyI z_J6B9dW7fhTT#>7ym5uG*TM^ut(F??=`jDbz@!_>%Ye z^hqu*;uaNGCq939_^HX=_?QQ$_g%C&7kgM!cTI%f{5h-p1fx#x`6jwKdi~oY`4Wkr z|CP`Ez^nMjTjtEA_@2*hf6Z>bE73mly!TBQvzP0PolY~Cgl)MK!Nen85Xm{4V{PTO zbDy6sNs5VAaJwpgHh$y3#6KH-enqSotbbhAT-~g6FLY+)?67B17sUP=u&La8CbRzd zyARTq{}#;WmbBaRX1$GcWA)tXr9J09FFvq(t-|iK_G7!GHmzPPmNt9OM#UBT&PZJ; zl<;@@9UQC}6mj>&wY{RO_TQ)O6|?n8xSp`d(!3_2 z>|JhlY1&HD6Hh<0bP4#o1q8LuJ-IZnMQmTwlUu^7%@=3gn6h@J?t}hBrxq^XlmEV^L1>V(1h>#T2H^XE+|nB!U1`Z$T}$DRoXf`3%EPIEU}xWu&Y-~1c- z4hBlXpM77~T^FAk`~5{q%%+n|w@wWx@H`y$xzYO4rRfZJ9J*f>UMhSTq?Ntj!0PkF z8Jk>RWXrx*-Dr~i+jHXi_|ES?e|ziO<5(qb)R&BzDLHwK4p&{Ri9SzQ)#DnFIbxK_@l^=J$=t_1aij& zv3~Vzo)CYraPJe|?^g4E?6lNUKUCm&{i~JW}JPc6>96Tz%rbDleXQ+Q~u_%_Wc^F10xdYOy8j?~?3D7jLLdKhGxl z!cEbeTOYiRimQD(X+eL*zn+g`FU~MdowWN~K);zGdt}7Q!2Wep=DC<#;E$aCvKe*-?Ddq;{UB5UnFF_ z^FG{sxlOro>T|of6XXl@9aUE(80uRvit>K1lw|CYo||`4xZrT*!@d^dy%WApovYK_ zykHyW>Fmgyr}`05yVgBx`6T(>Cc*M7`v+EUX*0dc-Uju@Zt?IhFp)SW_+rMzm7hxw z{XGA-!A)^9%mOZ;)Uc%vgt|L%;$b3p>pFO9QwpD*@YbT@kX9fg0oi}K5-x&|HAyu3|{^=EMK z@j`u#$)Xut6BeAD!Qy-D#Ntwi zU`4K9>zw~~%!%Rh2a@G_q;2m%;Jo-b?ZK7Akb4wAlB${>drdLOwh%_dK34Cr9XF z#qy0Ur4`$gFO~5h`_eTte1ng{`h;@|or2oslXrIOO8&jTGIPV#?zFz;EPKMw{PfS% z-yiM0>O=K(Irb%ox|g06kIVhYrt<9QstTba*+0rs<>&leQy#D~cf%4vE9vwHhs1LV zs`_f;OD?i}jp8`u$R)1-NOM8=VmHP!Dsj_Z`ib+3KRoq9rc6!!5Z4Ryp5oKxMM=)i z3`dv$YEG}=e9j(um2dxzT2{~RQ(try_(TUU(5{Hx7}vXE_t%5=hyBB1T4ydX@XBn| z*xMkq$?V0GqN>@}VePk1oW9Kct#(~lWzxis?X?>{i~r zVpB@l!kdwuIi1Y4O{>mSITpyoG^EU!Dy`0S=h`>V`wNy?#F^jT_~7rMx2xP%&S1^4 zeq+4zaS>_YjMAN2}<>^$~5Mzk)+9m9NnVpIDk7^|f@-rV~kx zMt457?rB(+vZnf+?%{bheG|E)Pxo;fHU4D1`FG{YX5Z^qKeN@o-tzMEq#p$~`IAJR zxF@gqz}lv-wouzvB5&UM)wXLz%(-^Id?z~3`_ik+*FH?S{;SyYS;y6l*=A4nv(&LS zZG851Rp^bczN^@-AU4Evm~0@_|2s=7pdGjkN|Bf=tzRfPFamu!iJ^10- zlGquB>!z5L&6D-wTNO~dPV(9&c^>;I*E{FDlbJe?oA>^Og?knXtEV08JsKBUzI#L6 z`adpQR_D4C?!A_2yzLOa-Z*xz#sB9^R`1l*`V)3~_1YMrGC}|Omi8(OR;<`^zdnoq zYlcYg@Az#w1+jVAaQ1W+=s4kelbK0^cmiu?g9r*jlL38%=-wfOD9h_3T_U;Ov zmk~AP)dqPPv)2o+et(^N_uA{`Z}ywX%TCErH?^_IwGfJ^e0Q1iC*yaakR~p%FHORy zxV29i_A(snb=>}hbH~Fy1@4d37foc};!g>OQo?#+|0xu;Ltx7u>?w11ZR5n-QM zYZe_>JMg1Kk8_uV{DD4}89RdtoTo?#fA75d>UCr6_t(NwCC@b;zT3ZT8oRu4A4}Ua z?&E?#j$Qt2>yUAMLsaFR_7jGWctoQr`3`WN|En#~aW-4{^9_q|$A;e=Zbrp!vyMov zjD5-N`7nBM^35N2U&}_Pbn>1#(>Zn3jVTV#vK3CQ6srF+Q^kHc|X|5o_sWmvPG ze=iedUH3hv=ccsG?P)h+=X-W>*B%ITToiLqMVM7BBa;7Eob|MQekO`x77KkUb`_fZ z+;@9@;huS0HyvNGHEd0fYIEwODq{xurjCCz4(wcEb*y({{s)))&(9v{ox}L%zDh5r z*pfpEQ?t&U(u zsq(jZp&uJ{dE~Zn$Ny*hq#iDla(t1$l=-|H`bCl~^QvF9x zy%{O4@fC&5o}EuOJQ7ym3|oKZhwgH>grhxWNxd86(xfHX*D%j!5)1tv^xT2}*)z8{ zU&R`xEH0_H&$eV+yf$d*fv`2c`>JAJAJ}|bQR0!Pa`=W6m(9ED?sv3sga?1KE^(Rc z^X+4V>GNPFWv<|TCo?X8yf#5g#{O3i^WHlZo*eqUS~AUKYYf%tvSa`%?4eOnY{8j#qPb zwDXr&E|PCdCnPq#;0oQOxFJ$w^>NNG$^moOt*)N*cQ878qF0!8-si+`PYNc4%vsOv zX=N3nac9%2?SP6<{bDxefzi<8SkCSw>dDU_0t2TlX zX>0Z{bR7K8;Ujo@{(a>S1)rVVw>+Qny8GGhuP;{2*&wP_wDRSi0P8|u`GNzdS}qq^ z@$%YySIdtmeCW}&@`=?gfrUcL z^YwpiOLiJf=}BY0wsOtGthrY{-uY3|Iql`7W1bH(v)!Z`9bcW0Xgs*Itb`%_e%i4l zGuK^G_R8NrKCPJaBhU5CwesVejJF+WoOaj!YwOH?ni~%3%IX_cm!*VfJ(#mGc)6XR znA`_Rk+a7>U+-DN-*j=)yZf)peRpkVI@dKJt9!!Cl&K$CE`FRhy^a6dmlt~`3K_1e zj0^Dp^Ocv3i5?yz*k~psQmbnEsCH4|wB4%GL0?j)&vb`+1W3}t1grwC6{oRHS zmn(9_-t7{XI(96g+dM=u(6uVZ@xA8e)-c`b^S7>Kl{|Tw!o_ubcGdS!Q`V@6nd+|J zvB5g#@tJGES9UM9=35$=R#mn)>*->iITu^+sW>eDnsNEtUdDXhg{sB#*X-G2SvKuh z#_Lk2lXepG&+4?5`}Pa%Jv^&Vq4yQj@3q%r`L->|tW;JFO{_}%9+?||f5R>JMZ3+5 zGhd%tlhB-Ou_JctG|M1)M~j8e7cuMnIpDCY+Uo;z6Z2f&lDF2&(*guz9J0-WtiNjc zJx(Y}{(R`hdNw7;phvA;JJ*D4;`+4h+C;C=GcS+%%+I#H`dRYr{EWW4M#5XxM*02c z^?WB3C&%V}hN-vp<*`#t)mqwRTX}3y6Ax&2CrT- z>?x4jq5N=*bG{9j;~vkKs+@Xl6JWmhsDDULR(Q(8ruB>q z%MVW5UVCGAYOT$TkAk&x1Exjq+mKRUliVE_wd42ez)uIZJo317u14YSg!vcl8r!Ap z>sD_uFN>cpd4MNi-4vUNeJ8}O0nRC(Yw7$Zr37u*;bQr!CCWTvxn{>Kt zxOqG#wSCJ&^N8(*2mbllL@LjIt75&3-}_F4=%kG*esBJnOlCi~K*7TQphiW2d3clQ zhsK=r-siWEz2HyF)_T8M@lZ>xxyN_zlOFRtR#|h;3Gi@ARXTKyQ#3!T=J1x#IT7c= zWHx8&A3Lqq65xBVS7pEUkFJN`9AYGL_wao&oTn~p{wcdQ&t%!$Z59D5CtC#W`;ek3 zb8^A8+@dKi_hxa4&R=uB_hkRHKJ(gDve#7aDDvxnKI;>&F7`J-ZPEP7TShg_)$GR> zrpBf35PP)$h4@4DHE#`L3f7t~T@X1z)~KrJRxW?(kA(&NU%#Y^>1|k%xAKFud~R~RhuX|Z z;UC`HoA#<6suZYZwkp)Wzjy2MRLLu~FFwDxTIBt1!%UZV2c+)t?tHp>V(+^5HT=Gp zSpGcuB4qSKq$Pai!?oocZyuhK&GIc?@KEgE$KJ&Fh`FARoE9^$?sq+$%J9BVpC$E4 z73RJGa!#wg0zR+ig0+bS*6* zcEPRH%HeaLC2aWS!M)g#TO>63hJ4JkXS^O0y8Be$Yzykisb{x#+xXIy?buhHLo72y zm+WiV-c#atBk8nuj_8}7d&?g5I{Dd8V3@j$b!qu~!|2PB$8J7<-Jnn|J~#fu>ZFw) zdLD^MMXz*S{prYurH2+DU%JR+S%kXxM5V%{E8X90Zny{BYdA9LROX8P29`0WrXIb< zZrC2%d2XNW$IhS&HAk$M%r>-m?Z2=<=nI>3@x`3Uk!H`EU*1@Ey;H|+kL1FaJQ>N; z5;HfJy}5g;d*|YitccPN=eD#Qh`R8E^`Otab6f2%DerJR8q#rvH!Glai=xb{>ZO^V zMW$O$75=DcHhslDzblM3-?(}b`hM0QIxTy0lQjFHy0weKE)6IvCP za5wqdAFl8TQ`|k~F8Q_OW4*{*R@Sn+$7QF5o-bDoJu_2%S!(6-nXf-z<^JzBJMo_U z`;R(y!EYyOylp%i?eClWhOv6Zp*Nj>?|lt>Qk`~GKqdbE;diI+39@$1xm!1LQJsoV zac$k3Hka6A*>CrKT=?9zQGAnV+Wg%0Cq43c-(NoVBzXD$%8yM`3pQ26KC@pN*Prxu zpVoT;u{~!#-qO8&xWj6~itT$7{C6MJZdcmoe7V2R^ZriV12ud_K0OX=|I~b7m~nn% z_^va-M>oD%C@uPbx_s--<27rasqG50x}UV}PJiI--ODB2qM4U$Y}a<4?BBD1RlC-y z$UuH|QN=TvC5NWw6~_sm%*ZsFR5siCR>V=`TZ&zBQXMNR<8FO*o%g+WYHrq#W3O&3 zH!G+}_3sG?Y?ofu|L%#4?nCu&4&N%RlvY)Jb7Y_Uth?rhWb=vNRVu=UCyTar>F-%m zrQz#)Ol--leI<_*^ya;@_HNw%^tS7U(+fZA`Mlk+doz`?l+%oV3mS3Ms)q2N*tV>RUh8c~$g=Ma+|S-&nKn z(p{1LR%uy}Z_YCANJ*|$dcpBcM*5rB7Bl`uBKz;IRmjm^EWjo_{rT_2*;`j9HD6tl zm7&bwaNZ2BeTw&MEi+ z31T0fGv43hl(F=>Yh=RWv(1La6&xvtj1SGaZ`XL|MQ}#p_nfxnFTE|g^e?f0@O>cu z?Azq|+INr5SaikpG}}IoEtMwzdpYj6mF8alq8=#g!SG5_&Ui=YpL;2ZQfUINi5-4x zl`gTe1u6v?uinD`cyec8mK^ux>;^jGbPRZMv>5)?>X^Qx4Ik=ehpF_5A5l=h?s7cl7kC=$yYhed7}DDQc$}_@C+uMH$P_)_A

nQPPCLeIAQ|cH?|Z9yS`C{~iKIpI(sxd`uG+24Z=HK9*jB~L zVS?<{ERDCz7v{bTO5c!Z|24JM@~Zgn<@ySdN2)GMdxf7}d)X{3xBq~GoP_t?m~Fow zHR!9UrW{|$`?oFcZ&P>OS>^W?&TGXl?)up^X~h>n7-FXoz5T6LjMTU2 zZTVNTjgPGTUL@G8zG=t*n!pD?R|FnqZ?W}!x`(Urn~qE5!Dn`d7xP#aoP3-k(a7R@ zTsT+Pxz%>obm^}rt(=a(JG*?T$Gfmw7Z>k2vpdRW$=iRf#Y@&L+IVCB?n6Nz!q#m5 zJ$tk9xnCV-+oxIbw%m8`$!!1p$s_RM7YD=awZUcc?{_WATy6FCZ6T-Qe3u{f3v}Lh z{sH(`+oiY>^x8VTc7S}ogGK~CfmxWPFde?ZzpHWS6~0{NPkk@zw^&O zujk*nxaf@W*Yc&W#q6?-@98O@GdEl(^Q?cyMStn-K9-;79_MwP=j59A=em1j(Jra1 z_Ci&|NtO2t4MT*K1*7#@4k>QCvA(ePkynyR>0OQ%g;&bk*FEQNog{H`#cwACm869+ z>Mf@dyY6h|UO0hcr{Gh!6)J9*ZtW1@XgBy=2hz5sD~_YZIiu#Dc9E)KlGnW=!w{k7 zU2`P0+B1t{kDK;scfOqV%-C7gFsNPc(5>h7ogX%?+qq+s#Mj%`V`41NRH*33Ki)A( zV&}KNX)9#XPA$#7Zdwkir^y9k4Iu*B^^TnY|;e3~`ta!Rb z*ehw*&Vy$HJbPwrr~)~q=>Dl4&)#??9l3v}xa_Gx(C1&FYn?oM_Q<`n++8$drQRE< z<5Q13(3~Qv)j9G1x+>9AiBJ5dO)HMj=$tsKVEyT-M^+^7J-)C=V&~+idyf^W8WyRq z7g#LdGFkejyPWEjBONED#F-QYgM{Z*i)giLzDhNAQWTWszt$4q*>mT3lpe@WcIT>n z*Qun%^u4(r$fx{$pFY!!G3w z8Jz`+3=&&>b_jJyZt)2yX!xchxR533n~t!E%mPbq7mdaPvr~^ubx1gC^r%a@B#o0( zRX}2M&kmsutIa$M-qv59rm8T-;lU}8tVt?JwqjGyjz=82kxovWEPXo4>sXkarwNA3 zER^^5&}cl+2QuuzF|hJvu=0&PJDiTJz2Vp=#4#trEryfDO-Fg11(WhL4soUi-qS7G zjR#s&kBGWw91;@pQuvS{S$I@1Y6HlZGGOIwAmvW~r%ni9YW#buL%Z=nEm-+Ju<|&t z^7SC)bHd$X3R{k8D=uVVx<6GgoT>5csSfSF3#F=0ZfL6r*d*J9>_~QB=|N`J+>|d+G8UlkMl9-+!lDb+=laPPFUWZztA&`uY92|DOp>O0M5t z?Ni+#U7cUM%E=hN%y$-3>ia3f^b zEYZL!?T~9VzAI}#&iu6R>+GcSQ?7X5d9;V^UXaGEtC_bSRaLUi4Vh-=>>_zv@6x5( zf9p(24VF*W2=0I1v!->y7aQ4nmAOm1jgD=Nf9*PV*Oc#?8&3!95?iG-Z=I>uZ?P1q z|BrXw*`&hhsIY6Xot;49f9cm83fiXo(_U>`*&*OC<4<05kI7$w=e)Skz`b5Ych zU;8*-vFx_vOE}wgVwd?j$H}Fc?Ym{VB=}m&vLtv!Qw#St9J_fzM_V9^OJN?1{yX^% zkDlB&-%)4rjKT1N-19U0YonW%`JeY+Wop+a_(zjpZsLoKh>yJIGUeuGPCDtn%fqEE z`L=zR#d*7H3Z_TbnP#LΜ1pp1aahMY=Y=L5)Ab=B`SVg2_i~-NT!C`dX!nOJ!0vB?+G~<2vK_`%C`$SQkwTg`QNQv?qH`91_X69&UP1 z#`^KkocI*y!}-h~w{Nsd*%^QRQ1;f_k{)5!_h+Q6H8$|5k@;vU)xO$znx~ljYw`ao zX2#L!9k&m>lGFUCV$%60*wLcq{D<3|#cKlfG=a@$urWyjBUW z-*tu!>&o5;{aflf?Zv{+D)-I@NWH1@+o>A)v1aLZ7M@?s1&4N*JI--=S;g-(DS!VN z=Sl7Yd!Bu)`t7{sP4&0N&7tcyv)p_szbH4R+~IlIY@SSx$@P_HH$+Ya8hhmYo;g=y z+OJviO3wUW)mQdw9cTaI^7IO$!2K%0jMh8x3(H>@<>t)HJpM4_-W|Wm>i@qpCVk$c z-f^|qj>X?jue{MGUVc%O-#3*PcW2dgyxZKZP`L9D!(=6vo{>rf!BuTbHu_cE0?NaExP)mxVmrtrnM-Pm&_ z&?8Z0@rLPLCmT|>b21sOUVLN!M-2{#+Ex*GLSo~aX)Pc+oZ6CINk)Je&Ex)4v ztrE9T@2`L6ueTpAx_RQooz#PDDO)u5&0Tz=iPfW4Tj*>gN;L*9i<$+h?X7#-OskLD(d&bNPi!G1MG!9>w8R$}w{IK}M z=Cs2GjygR4Oh+5%vnYnHYnW}Yfm6QjtkSICeOtsmPfbYpkrLF%v$ZZaEN^Km%8CM_s-8dk@R(Vfod+W82tJejk6ibV& zIiu0qZQvp6?T~h3_U1UDr_yJ1YE(3YdJ;Rf%o3G+msqry>%=W%8%0gEQ)!nE9keP+ zSNq@L{-K0bxkJr(;xp$P?>Jmlw>!ESO^Ki0z~UO95K=4lv4WGsKeA&+Q2+MKmD~#6 zX*(_i?{L_&G`RZI6r&D?fHGe$g=hzh)~`xpYRdPGm?pl{^^u#(d**+~-12xA!Tx2l zo*kXI)c4$lg*`dDWjfZiH1)36VU<3zdtUeroj69XsSIEKup8C@H|M$*Y>ZbSr+xQI`)rnS91T^44Z4@reuf z6wA%z9)|U9`}X(QtqG4KK#{o7@ZP%1)iE7U*cH`)>C7J74jA(FqF-zCZV$ z;Awb}RYm#!4T+-ojHNb5!b6r`;k@$crtk{;l#6#BOLI)<%jP{5eB-xvp2F*2Y)M<6 zDs7njP3!U9ZVqLpPf>fBPAr?0(EDWTMP&npEk}P$O>uKj_->@1+sadP_C$lj^UJg5 zK9x)f_@mH0Y5m!{m0lHRl@+G+CQGmAzyICscBq*BGllHakDiBVs3aN*11hcQ?H^tM( zw;JC$#PMUUoiuyT^`n3GN-$jSI{WH)mmu?lBQjUR%w7hsn!``Q_)e$0~mkDbe04xW!c zb=*EY!$c$h$%G7+gPt{g%1r9dBEQ{?*}Pr6@Y=TK1^mmVY^*ZVR!Y3Tvu)~!vwLnT zsQ)d2Rg;!3W{4OUb#WiNmkwZzVs~Sc6uQ*%g8*%GM@faO<{&sHj_Gd>I z8k+q0!BuO(yRW0pzNn0ceWRC~iQ&vDg($K8N51_PRXKL8@=C*vHy;&`vDfJv25kGq z?h+*{|J7%8vxB``-PEa*SU&MJajd$(>N=Cg;dk9K z`tNN1hv_vM6tF5eZ#}>h+$Y-g#eTYjxQ5rUork(#M5Hq`?D(#{$)J`u?ArCm3a84g z@*3tPt><6qZFl_`r)VU9V)3+pTW17%rhMhUxrP6q>|e!mHD-M>h5kIv!IvYaoKiVu z`AuO3AJ3BOM-`NPj&-}vcS}l+WAT(1`!|o#<&)^K&4=8WvUk4knK&sfU(I#Nb8CrrahJ((7#v^i=^8jQpFo6=LV`8VwryErZT&e{&c$cyZKFIv>u zjtR0o5|!U@$Zkv5Q|X)&5(%q!{NJfJz1TBImgD{Lu8j%%SU5S~NSH6Xe*Les;G$Iu z;mcp=PimjHaF-!h|DpFP=RPqReLHP9QBx)G-S^XmFSVE+zUn`;p@Xku&Spv(4hUeq(v8 zMbQk!3c=Uc-955oTO(J6EwH<6tiHg=Vtzx$hi^(I-*)QHv47spBlhpH(Pkm1T|0C3 zWO+4m)oBGdEV%4i#mePjl<4T@Dd9Wq50~1>8%LgSbV=V_2?o9`c}iJ9KWGV}Y_3Ej%) z`xPv%SuhIeKl{onbpCg#xQgE9e+nLZek)H&{(fD^>P3y|CY?vF5fS{>3XGy2b8MdG z_teM!v-50y^L_P$1&Pm(&A2@))|~BQ*-qBQ&vwbS-duP4srZDMf0b5r-uhWCKPBWX z&+e($SUi6+hDB)^H1~t6Fzt+1~#!)r> zv#Zm=zgr(%6KVgw;@ch>t8eccR~gK6Z`$Z_s7@vDs2I~C#h=HV?>?Drq4LG|+2wWX zCzxdFH@OwnvQEA5t6S&C=RN#F**+7m-BR25{*SV^WmAmiRD++7_FQ{#^waa5X?*r4 zt5TLf*3Rlm)t@BzocE&V?AZL}2`5SgSNOlbZs)P2Y_CY}q^FNV|brQIha!hIPd z@9H;gx%V|`I(u8?z5`os?eJFn!Th%5Z<|2p=M16yPv5vpG(HbMvHD`1%I&@UpR(@# z?vd)*x6#Gu%@*F1Res&Sgr%m|nf?E+f2IH5_y7O?onBa@ex{{tDd!XZ6O)wwO!)6| zBhGVyg1KkU43+*Rvz@Q8J?obL`F%b6S(6eDy#ohb#1DvkcR#ZCQtsB;<8MT*=cV>v zSyLt~E!zC~qwgV!ogLM)XBY4&8pghHO!~ZvA@zCNuU|iSgECn>WAA?uT)f|d_0xCd zCx_!cvEDoWl~<-J-`Yf4?!JQLyt?M8k9X8Mi@d*GfAC9TUDJ2l*K9N7))xn^WY_OM zbNx@N7vKNw;)z=(@ND-Dy7q5U-#gXp#a3T7p1hP>$8vSS#eW<6-4x#UZ2hXVE`9Oj zl-nxJ`<6|aly1GrD}63YppsEk&LpFso~M30hbcMEYu)Q1aa}=sSJE>6UQU&jYt(0M zI^Uo0^~uW)$6gVYb#<)bXE&aFQz&?3!#m@v>$?k%PY!s(c_qR#fvah9%lg;KQ(7t- zHLDfvOrGviJomJ7@{?VCMqj1`x^J`-EzD~!(6}xUvs;hBzOCElpW@-Tgi{Ol=UT2h z(*0xa>43l1oTuFGr7t$uc&$?{p-Me~*UVMluxnts^V8*6SRxw*sJXtK^Usd=Ht7hDAeW24 zDf88)$Q#(OE+y@sp}=7`b*@|HH5R33Y#%R#n?_Gq@NBJO(^|8ItNK3%a^_y# z?3{A-u%plHg|@2q^Ko5_Fb-?S*WK`K~s>pjG$RAFascsN8)tTJ7D zXk~EuFTs;@xmrqv4%(e=QSkAeG^Orsh(aKzp!0HPOB?^Sl22tOBphSAt`)XGM(VXn z$J@(^;_GYIynY+Nx6I@1j@JB5Rd<)amp0mTFJ)JJ{KL0gyYx3MFM3-&#qi!?w``>Y~PzrviE-ROC+V+?sxml&hoDQ*2RpTN8c{HOkq^nINM{Z zsPl?1cU@McPB=5qz1^UNYe{-&{rdG96K)0G^mK}4xww`uQDn<2B>|4t&Oxy(u?JiP zw3g|8l6|KUKlS)q`IVf`OL%6AggU-DxFYVRi;(ZW=W3j?QZM#N=(z~YuV=SP3HAFo zuji7dGOytB8=aP`IHW|?b!}D}|5jVGNo8M()C$ihy=60h>luUzXGF4pZ zQ`Y3xmCXvjHBy;#ug<%pB6(dwFSYSqlhD;JkJ<@3%U)|4Iv-jld~3$rnJm6~uUDiW zQxmf47Ib}(@jdUk^c>-r0xM$~*jQ!d-etKx3zK3yl{$5^!z5egBO$xaSne~CEZE8) zdDvymrpt+3-+JN~SmY#nF9}a*_Bi@y&eO=97MfOOGb(r8S+2#xsj71FlFXri`k?KS z{+?nS#|(>vJ;f%Zi!J1H-1p$|H^%P2jkii(8ZGt?W&4u-O=*YNZ|08BJ&hil1HP^* zmp(1{o7v+>yN^lqq_~f6ACLcIu-tnpd`g*#wZ}@GNeT4~8&4IUGCL;C@!MDMbq8T9j6OseiLuc9_a*Wr3Fx0{YPb+X9cP-2QyaWheWm zDWws6Qe}hxD{eexJ0UQX)5VHy$#mz#-X|JtLKz&VRNwr+vcmcG^gd6kCEFS~Ll}Pd zm2yp7p}Mw6@RO^NTIG4(B}ojM#AmKLr1E=qWGDLt?VjY&N2=^PmB#ah3_UAt%_nv| zjL%(sKKQ`uD@_51pDcdGX|Vcry_E1Qai_RRudMG*(D`kDHML09v+u}-YHvfKE06b` zFf95~c}2daVWMQ|s-h+Ab4_L?{=BBTV)xeda~4(h2uyICBkFLis#E!T^$8Ar{~MLf zGF3^F{AyU9&G$<9z1Vw+P+IWym?E}}mYX3fvv0YCL_Ac8y<1@|k{R3;9KYu62EnZj z{_pBe@cQm;?NmLnda+O+1Wn^Vr` zqtjp8@msdOU$NufJB7t}a<=#L7p<&cqj#Xk??uY%XU-dTGR*yJ`)=Cvs?Fg|?~3NO zRSFzw>s__~{TvCiRn?!*^(G1j)lEpPyyCg3=xN*W=`Brj`fYZdbX#kfV_$Bo6=<#- zQaf4U+^(!!^YTM~?2VG2uFQQxPVmI+tk5%0jV|4;>EN9m_2+JIYu)OJ>=R0pmpqH) zzgdx>s2Uz#{%ne7xfPS8a+i06wP-Pj;vyH*FL|fwnx}w*(9MK0&kzj zo_+agL&Kfri*kRyUTg0imb8QM(TR|Q!YLN)3udZE=PkLNn{tDXuhL`lI<*7+Pp)-j z)mGn>G(7pZ?zgD^`+Q^WBHgxAORRsZZa3?G=-2;EXuWF68vaddYhQ1?rOTwI^KPGXJ_(+tf#YG7F5a|a`8QN^Ru?7!}(kFWruoV zCj91#Gj(@Pozszj)>=tU@TtrCbIjA8)f|$(d*Dlr??wL(DVNU%`pK{UzCP}vAaFTw z>#vO`{)G5_F}zx?u=)Av<5_=tR~YCX$mHL#Rr+RJ_-v(jJ}KEh%%3z?_vHLe7I<`S zPfA36w6*#>pN*A4oF`t&G_L-z(RDks({v4;>0EAY=a)(^|K6_ii)Uly=@lj>v%W08 z!Pr#6(mH2ydDtVqNuRdud9;g*SKKAqw(|M9oaZXbdf_!FcoB z)T%72Uge1sUP(0@G+P}mG0*xx(@}GoZr$a2vpb)QKP;O*w|+uEKL3*>v#q!EBExmw zJwFj~d6|HjmQ4D(nMKzgicR|MU{h%I@0|9LO^FI_D?ANP-`RI>>o4bN)xOgz(j z6iw&3E|W6<_wD|*(|TmYR@MkSI)B9N=k1_?OZ*Po&u3op)|h?F--PAkiMs)699p%# zBF`lz6#txZ>%!Jmhaa*pn4aje_2zBmvfGs$tJs8er_A26_>085uL6h8UkQ-8&EUJ# z?{d$Xt#Xfc3SX)^r+IqeqKt1f$qLs$vZpLP;nZQTaQE6$Pe;X+2}z|aivKd!+J6i6 zWwJVLAaMDLlwO&1rkc3Gob&uUO+2-JGey{QJY-MV(H*UoC{EVqK?Ys)+BI|E&VRktit)6eHe6{8NlATL~KR&x6m~yaJ|304|H#5-1Rb-Lhuj?GZ zxNg49>6j(|PLZeXEW2;zoq8Y5GWq+JvZ>dmyqJ1ZE=f1Ec+Q?ha-jzuJSrV0a4@Q8 zZkbrtH`Pcz;POf)8~xvTU$>CkG_y|e zH(OwChVhm^bN}qhcTCe;wz&1|iIb)!TPE19evxgHaUOVKT}NxJ1r z49>qhdvD^Qyp$+Ghc{IYHj88LtqV&1Gr^L#W#3PxFb@e8R*|Cbzql_p-Sm!$oW65) zW%ByZ4Yr$SZr(KWb==%fkxylV!q0AKo{{!T!;Z(}wPRM#`C~Qr+uzJ84PX)w%`R2G zZN~HD%$j1`w@N-!-`+~OYI3kcn&IWL)CsIl^LjGFrWF@lOg;Oq=ETYVzPaoBmOMV7 z9MrJArz^Qh^eM}MtY15)^KXcB^|*FH?AxE$Ki91>xb$3jd1U?l8J}hvYhSqScA?__2y_r#||Nd!w37B@BM4o`pD1!e1C|D`1j=+PUkG*`L>-G)l)5a z>aG=h-sq%&0>|w9l;;zUhiEN`5dFQ!aLs;k?I-tQ>XKaJSDiUweYixMUqvb_bCFNm z1mD_^emH&tIc{Z2dcFU(Z+DM5k+Kt!=*wZ8k5Sl4dz&mqGi? zX;HDV9=|>wJ3DP*(?4G!r)xYD-^}ZOZK3yxe=CQj^68%Mnxbpc=g#x*wCP^G=aC&_ z*jb~a(qg4%A&y(ha_t=beyZ)#xZ!Yc7TW^5NXNPVOgGJ66TxtN)5E`0l?0YB9bt52 z40~(1uf$!w`wEw2*(HT(Q6*|>F3A^nZ0TReAj7@*--Eo2S(EoIl9Xd&IITTNaPtDk zje90JFTOFW+v~%P8FSd*9RFK<%Pu3JN;*D=yQrpJsoTQLw<~v}(ET3qD=|~jt&aUs z;FhxbqbeW1)vadAy7!99k8k?=UHfmp#`o8sTW*MRD{3~i@HuYF+?W~ms>gcI)8;pl z>QRs0n%chTo;V|2(d?Ll=8R>>&;7W*HY<#)$wBCj{1JI^#w7_-^V%*>G}P-faXROd zG?!CZYTiL#0lwlA#qY;j-bcJMP421RYtvgU!|>#W+=lWX=gN*(PaBNRY<7HSbN^wp zT9xEi)+wdQJ*{WHIX-Y=T+e(p?5zsd)G4tXC;6A8)xX-(`2V+4$huj3LVi_t^crfX z&+OBGcG^?9>Yn*WO_^&?e5~q1)pvYlEPw7{+`c3>IxcgiL2!TADuIWh0=vGMCmxJ> zy8hL{2EMGjvsoz*F5J^Z(4^@MrG3$1l$uHN^&+5Y0wbMMY(1hu_) z=$RWRQuI+hYf?l(&DXER{!Itw8n4OPYW>Q23d{aSq6ZhSuKd}@73{Z6Rn{jY^WQpk3mDwj5 z6nz@r`0y)=1SUUTYyafVp36l!YLA}Gos@m)Yl_a*Z@cYM*0L;~d0=UFo|(|9iECL; zG%D5~7Itnr^LN?u*?X;Qm;TPU>R-dg;{ZQBK6CJX8wv#oN9KH0q z{bPo~)1$k+uFyhZ^^C)=fhmucs8ywST*&{b>pWpf?3#BI6$RBU zPf;xS=-{_0%+)tsl&L&)^@PO_y;7!E1m0whMEXDjf;tm2_sx$=s7wA+lrj>?><7 z3P0Qu#(r}8;n-gmd0Wes7J4z)E{UC(_JrNPU0PIpZd{>~P~Ne% z8S+!#<=gK`HoSV*n5ScfNF<-q3IRV2S8#LaWuPXQ4aKciS zBR!{@AL^S>)cz4}l$O=ZI6aHUl)lMIi3 z_ui?fKj99yRjQ&uSl*kjE@eBt)~X}~GB@xvoiOZeE_+-cnAFJd#OFQNSGg>6BMyxl z^2NIFi%P_gY~w(?q9r-C;VXdLNlS>2vRh+ahuKS89IS+pW!SZ)(rk?XpOw zHoaf_#EtS2(d8WX!fK~pTJIE{{`%L-t`l*$M1tfT%~s!wS-#Xu^z4H8Ydblz8$C9+ z94Ip=tq_ir3-6b8?QFWn#Qr^K%7emm%lPI<@06`98fBbIwka*V&6KsXtH)+~VNaE) zB&X~|k=$p+@dtv;7$U;!w*Cnyd^Ry~!y}KMZ*)TbBot2m6v-lbR={rM(glgmLIr(| zTFdm}ds+Nqi=J=z>~W|&_{6EHHVGE3Rb8v!RsB9Pe{;)H-};`pCj$G{ytz3grFki@ zN|4^7hR9p9nQ~M%O;N5${gINvb5tlWaCXk5>^%xf&x1BERRgpt~vu%6@-w zR%TU*dilY*e4g=Uo{Ld;Qx2A`UiC90Px9tkZcRSE8+y+_o?dxy=cU#&g|0KhV{VFZ zUD7sj*ydIDbip!)*OC_|KH}o_-08fjjP*u{L;AT?t_@LhB)tFho(TGM=FRRYDZZio zX2KIs6#nmgIx{R?c(L5+PY5>%_v3272=I^(B_ul?r&_a_m!*-TK zU%Wli?F1!b^;5m4$IgBen47#HWn=Fh#%s?-zwo{liZ7eH-A3Q3OkwuJ18=z0xcBeO zRbIMhq47&kgJt4BZdIi8>+fDS(Yhz(WAfYsBF_(m2+A1x+=@J(Az5+$Ku52U$fd3{ z=j!+VExARuEC1BhxgR)bnKAETin;B^j;SeL3MIcDU1&1ht#4Ax(8>E&qVRUy<=G08 zrx?pJ&okR8@YXQbeeL$1?&io6^*y%E?#EZJxE-!AqjYKg+JH+RS{|Fo6fx~H%$vDB z?TF|0Pv1kYO}{%|$$!C_XEyh~3X9bhED=9}=^@@s&3$9&y#3_&)reQz%>6Em+Pp6e>*SWKG=U%KmwO&Jey8Gu}d;grfQ1|2E z7X97tcPlo|ooI2&+-2F4;IOl{vXi*yn2a!^CH|ienFJE(u)s z)`=(f^*V#*YmBw0@7+B&@BEhdt6P17T&w+VUon!GJ}>cIT3qtxrfVDaZc?0^74DK5 zzkQdkw#(BiPo~N5`(7!vQoe4YX5QbtZTppDm%P{C`Z6HhDfxKLkEIVUi)2pNSY|UX zBt&7>Rpxs;6SJNbmRhVk@w)$avZQ<2+HZ-$%MWPmIA45RwqW7y#~qs0eAXQ{bIjb= zluvjc_vF2}(Zt86#ICLT^@}}oR=jv1^Q7p{NjVnEZ;QE;pCw0&9oy#l_xqKlu@Aqh zPkh=Za`oBDzo+}YPFW>z;bF%7sJKbCT6>g>zqY?Paod~O!T&}NU*@#mCeb`^XHBgV zbo;h#@g#Z6(^q3nYYY}CpP#eMbJyluvjvMEs3|VWo~J)~jfuI6QvZe;|8n?Y$eFam*`^UQ~T= zDv^`K`u3A$>+eptY0bZJZ0(g3(qHFpy}LKLD>6^GaNovwsqH6B_#SWl zSJQGL@nwX<21z+Sf%}|!vR@tF+*=lXYbyWWr>fT~pIl^AojF~`_nW&y?F<=SKlK|= zE2i)~%f4lq{i~YwU3`sG_I#`M&MP|>Chlh0Y@FAVv+s*o}Uj4D!yJ9H@baFq&z99 zV)?qmKRVP}IHz^2^Pl&2n#@_V*x%cp?@{@ol;iqdxa{MCD;&*RreuOs!227LZ1k7EC~ZBg;hzNM!v-Tbag<=2^oQ$6m5I!k;zDctr+ zxKc3u(${$>K4ojA$ETe;UcYU!_S_1A&${UkLay(N;du7u>*>C#of8C08bwz536*vJ z-yHkYW7<=TGw*}12yW4TzH&x~;i|bi_ZzY}cvaoZO>NNJs~@Ps5wkOO!_Li9-i4B(!2gkCEVA23+Z|oVn5YrX{Y~EpX)c< z65lj<-`MbKqFF3oLJ!k#jj&U#U$b_f6%JflBDC(kWBzaTP5z74&0k?xnG@!}R>PO; zd}0yjomp~q&!wa`Y8b7S@Y<8!ANGrVx};Q~p!DNxoBfHg=B934<&h-^rpG!9h<}>! zHtsCz$4kmzb$kn%jCuK2EKu-JQ#G8!Cw}&OlBDq6j=RY8Pe9zQL>5tpm=qotJ})$ z{5;$D*je0nOR~*B_h&ozKf#-7>z-Haeh{y`Vt0Padg-|vxz(-x`SotkWcs{ugIJ`q zwb3&*gM8tif_1?wPRv&?@+(tXrr~z=bn3%R*J>jV=N<{a9@fIr_G-n{3cgTp%|oZ} z%jJeh+zbhr+~Tt*;B7E zolelbRMC4r^Q-A%Et_KPuin8EEvMu?No8p_xwoo%rB?HS*7$;r^`9TqJy^!r*0|DW zt+U`lL*AIl-;W2EgzP=M>e#h!IZxBs|ID74xYFQm&aUHi6**jd4_cZf<22=S*k>Md ze5z+~;}5f>*foPTmV&9z=gv$P5bTM0a7^E4mUi>u^Hmh|%NB^%6o$2m3Q$GLi@Adybg^<7y7;>hJMo$}VbO4mVt%VUzyu(9+k-^d9P5 zTD8e?RZ-(i(em_fQFX+8l&F>h%BjCaN`+uI9bVU2m4V zLdW}ZVBuSvtC6mAw{EvunPmIvNiWNrnQz~2R;t?g+VT6h`{L^#S{_egSv=|N9r5>9 zqN)v!ockgxc=LtpgS}JK#qMr*@Q}K@Lvr)UmZJuT8jro-FLd_h|9^*B!<4JD&PBcb zbJpW~BySRnocCl&{dSM>hN9guUa%Kg5&E&J{FaNg-w_lhG` z+*#Dk=RCV|bXJ0}j-SxXXu*|hRv)>Q`sx|`yLU5_7#^R^@;Mn-x>s;YWMrU9{lCES zDN)Q`eryN1_*kynIPT*4P}FRqu%xZm-MsFAg|~X+J<;ak4oTS--mN|SRfe~g=>Ge# zctYpq-P0aQ7?tFnD+@GV(JZ#O`xg7xwzENecMp6M*!h#smFuf)!D6;mQ?^(f^85Ny zgZqoh-V2+=mXuvSnf;x)G<(n8*b5q+jn>_V9vMt(%MLG{Jx%&oO4JG_@4pvj9ut_S zJD>0O+2b!GZQFh`Z+~(u@hShgoj>?ob2vWzukGxNy87$+M$?CH_MNVE(T-!-!O$1D znk!-2yLArYhk2fxMtu%R`Ng(7;r5wO-KQ~gcV^G`aX9+^eACt`Gnr<0JxMR;d|v4l zWHxz!{M*M5jkPzebiO9&YL<}mHmUnfa&r4j!@$YkniuBQ9{zI0vEw82o2tjpzFynt zTT?G*-4gz7g;hxAt6#6$z3$$&IePT^gqxoCe4OWQt`1-Hsc~MUQJhXk+7 zH$ziIPG!tnx@pZ9+s^dLk8!ulHIj7L?{oM}(-2x=uccD*(eJ0T^s&{Iwp$oOFY9YM zd^^XV8(?6wh4JQW{alBy-}rMKmR9|oWVX!naHw9c#J>&4jy$%mwIp7R^*7Tx=TF*Y$cg%H`5?J!uS!%@!OZ`lVbx##}ZQ_4VXmkBl z=fND8z0F&Sojr3-!(_ICDv!q@9~F6J7WI2e8ASh7FQsh{~^QEB|8hIMk&g)cp(vgx%YtsjdL zZ4zdgiCW%dQ9IxgG+nm4r zB97Cx{rA_G=BMX2&Rg{vyh0|9oa_vtuwi#8#nStF&0dIz#Ps$2O)N3oUq-Z>&B3 zLA2w~Me}7!KMWJJG&Iz!UASUC=$H82t2>i+xn=*Xtx0~d!c|TFtd|OPQt$5L4w!#N z=Cw_+%t!U>AI^xD2pyt-^xZ=Na=u-eR^<`+4rD{k?Th z*wg){9G5d-|9p#iPvXvZ455pQ_^TNV=Um&$zT7c|Kd-*U)`I(voI>p4nCb)jKW}CC z_^|68L;XzVa`uoPk4xFxSz>;FUV6Mamu>0SUCdX0yt^*HK>O5>ua7s{|6}mY(Ea{{ z*(C4mb@@4bh4l^9SN{HDev|X{7xVt=AI<8b@A&7jI=at&URGalQ}qvHoyq#w`~@0T zJm1+ZzH~?_e_ZTad-Thj&O~Nu)9VEymp7Z2?PFsM+3_j(_^VUL6&B>3-otiq=35Dt zg8Opo9Ub&5%olQ8IQMYLr^bFq3+_eIUymjW6g2IPYi@WJ`BjQ3sHSqm#aY64dUe7U zNwZvVUA@0<+KJ-|HhUhjJ^awtJt?8pfMdG(A%!`jc>+!5PSLUVINAmF2=XabIP)oH zDF1Q1;I`ubg5GBS+&LYW+kP{r_ikXHZhAGLO>+w-^5tdYk#P z=X7j#vuH`^4L;g#dPtEayTzH~8b^CUG=fhKOs>vta{5bS)p7{6fl-sxe;bvU+n?6Qp zNLwn#-24&LBHVOY=1S1}+k4Ba)LJGBGwF5ASpCyot)g|_h2zH;u3Or>cj5zy`ByC9+RAiSRQyERZ_`K3VyrXXhL>>XIZl_eO_X^!J>qqQomp(NNxAXQMWy!IboCs=O*`Ed&JFnLu(sxCSGlD*zjd?)_l*~AFT5C+KWW?K zz-6(W=V#{3pBDvtRVM{8uP)?s@aMkMer@kX%bl)MHuo?5Sbj&Pmbo%$`s~=VZ`dZ^ z*<@B*JfWmdeO6V;4JR9)&GBL-5_vCsFHc&qrb$&z-lqI)chZK=z_ zwez+cg+%2B9y$EqI^lwJA4ihVa|V@Pk&PBCagzK!6+aR#&vNyPDvIi~VYmByG-k&J zwFSnN-K=5>Ph|EyaWZB2Uj8Wk)FgukMTSlvuk9ATHKBXwy}6$v7cRc9e@tehkhiZ` z(T{hXP0Tq*(q1>W_uiT)7J6@&c42?dS7ZM77gnU3N|&W*8wqvw6LL&%b<;vNi{^T7aE`ms`sE5+lv_!`N5?S9Y#H8waOI-nC%r2Y?b2lU z99O>&Ut^GX$~r7V$~9iQKqPs)Ws_U^;yKY4{PQLroHfVtVxr3iwvR7*rpcX_JyWNj zb0Ssby~57vYcuuVWENz3Ej{|w=G5xxeG67RpILBR`U-7V_NT6=$c`{!LXH4pzxKHqeT=e9Dt;V!OZufD9=E0;(fTvoY! zNyL(Q`CDdLY`vK)Y$1E8{P7F!)$F@87QEcOv#5Q;nzxm4Cf`iX|2U&l;uo!$=_h1= zMM~vT?dcdbuWKT2WelfETg}&9dA3rOrOxJmy3)N(FJ+=D|E;SGZc3h@HEC0-^Mc2$ zbH%)iog**2Vu`zQa^ar?vt>>5ZvEq6le+#{h-dw=zbhp!GB~%(9qjn|d2_=!e7;n|FsAN`Z0-L#?PHy%iba`A%W5|r`K$GOsf4xAr$C-7pVlY6*>P{N#O>g3 zYb9Fck7{^px_#wdDltFd`VP%q_FWIdr*BWH*u3@HVhN4xZ-G4Tmw%5ooWtQQ@5qqs zSO5Ev?yjes4;@=9Vc0Tvd(shyUGhf{C|ti5%G09%<)_xMRc#8Q%4*KlB99-fmbgBt zt5N^W^rRT6_@f6@zbuv5ks@R-!rXab-mw|ySA^{--c`fNbZ1KBgrtl&O2T}DyjBisJ8&rd$?{XfGdV(K)Hbb}>{ zUMc&&-7$1O&(d39w*JYE7e#D~AD7!4yxh9NqIuS5^NzhSCmm+AsT>kyuK)4liHNK? z7aPafuZbTb7S23g_GH#$;lA$|`C5d}Pd@xY`*mYlv59xZyov4l10*RTa5MmMm8@d9=(%`PlMf8?{b$ zm|fCszGK}R;Jjh~$7K~eCpbR&8|ADSmvPxhSbXPW)(WFg#pDBQQVuq52YjDzt9i9& z=XnN8ef8R_%_15_Wrk%5o2qr{A4?~%Cz`_rZ0}s;8R`Z+qNijzl8Ol*w33EEJ?4n(z^5L#-f|8OVbq# z-m>MqsFjYee9Y_}F{i)RM)8)ZOZBDAzLL3}%29jle=PjT;Tsr#D&74(w_RntU|z;e z!6Q5$w>31@*H04Rs#BIqt!FDVwEVC!t!B@~xoW2-^mG3dy7({Zf$r^9tE_%b^30!K zIKSykiw^I*7hZe5*CfulQ_QY=X5x=S3fqpD&HS5vy>IKWv$tN~&(KrZP_}c%`wf+L z+Sl&=Ii$ue)_>==R^n#0Go?x|Zgqauh+OohBT9eTjRgkhd@`-4xSn{~yijy^*^<=O ztS<>MJMup9Wb+)q=oKkj^4)4rsHx27H}Uq&e4Ov?j^x#`=-%CLuwd;PJ+>P{{1e`{ zE;asmdQ+Wp?#ISO zZ9eqxM4SD>N&f^BkG`LG>i;35&FmLk{b!sDUvS5`S!!F#wT;_etz_K%H~X^Pj@RpW zGdCU+y?E{L^vWY|EaNj}H%?^~oyxJG!|tj$qim7k z!54olJXL%f7v>hvOm1K z_9ThTVa@)qAJJ;nSLW`Sr5Uxz^}e93+hX_s%CSoS z_h$Ddx8;30a^P^*>4)BPVq~`I9Ne?ZOo7$;R>_pI+!cGzUZ{9+G-0}7&GD@PjK4Sy zXOt|FD&%GL`MJtF@X$f1XzyF+KI|Vvlj;?<2Wdv1yup-I~dBm;Dju`s;G?x9qMXn_{9So!YeQ z?IOv}iC+_pLpeH+$O^37KBp*-JNW(c^0G-mc^Wr8H75U=r>(Yb5zpDkc{7SNZaj9_ zyZHN`$OO-#zWe3r?G6i)E}jj0rO2>+(_(E!@Ba>($Fdm}^=<3;41dJ@Yu&QQb<57r z`kIF=uE;#!blm*z#LUeb50x8Eye0DOeS%tQO{Vo7WgSl2%ZKkTYW=d5<)zr6O1FhU z>Rwi>H+c6hG^pP&9Y{R2KzOx=OgMexu?aQPIr~%&;6+R*Ezc8l*IIHGnBqwy2jkRtxq+h zoBf8xmZKHl{#_EAT(HGE`u5KDX=fIHx)c_C|2DUinC!i#`N#fz5X&mh`R(_ZY|qSoXUw$B%F zy#1>ubnn;mv=?@_ACbXo^X0q7qpidDB9=rNv zDqU9#>+P)5;$9;4Yrnz1QcbUi{`F<{6Qm2oSI=kNXSn&n3-cF$#bP8Koey*JZm>9U z@$2kt*2&s7S0&BADEJGAKDT->(b;cfgjpKNdP z(691&#A(I(vll7vy1S-LW%jN`PegQAv%UN*|M-T~r7LnBE;lr%9V$Mm*=09XY0I5? zCT+z^R^CBVGjErwhfNLtc%|>w;&ZR>O?00!P0Q8B=;@V6KA!n(Pv5exa+ZA_==m#V zwb)Nr!_(To{~Y#ux3K3~#fL}Bw=8tO8?wz_ZbFOr`=8pTdpad|Ii1r_lu&)Ut0hr{ z{p}~l4;{-{lO<9g9+o%|rkBhxsV4pygYNR_hO=hfO5{29^G_nrm*-WSi+5J-X%YOP z*pqv+rBOJ3-vQQV?fMlbJ+kzxH&5Q|$6oQZM~dT6!_ud}A_I$dw=mkT`=rPdF>9^2 z#FyIB(+zumJu6FlccLR=Z%^Wxf9-~5`+7b`%rR_8Uq9Wj?&xjJ!z=dKO<_EJtB}AS|4FI z%hBM8_~YGckMc!!r5kVDzqg`Y*+eYl(U(cd&Smcpp7oH5%i5qZ`R5vkm>MtV2fO^4 zDvl*29Wt6|Q}e>;ZN$v`2?tIcyfe}CQ_Ium$&wutb=H217gL|JK|tTHzEjgR=1A|J z$eQIHTM`WSOU?->o!s*wHYQdklU=u@K=uj-M$FEFi4PSfHe#d;-+n3g4x(aVwBs}f2vC-v6ew~LJ*E!EuIVZh*rFEbO z%eB5+pVC`z{+e^4#9{5meY$`7*FN~4ZFAPoO#fbgLu=H8^D;_XavgW9+UDcvfB)da z;J&qcbHl?UbA0&SqWn!19jE1@}l*s6BHkIX83P zj%{;w5*70Q{19L5&X#HXWZTTPS%p_;$Al*f_AjkFAFt~C z{ZzDFqJ>#va)a7tC@^yu9(8Ua{@EZ{FQHo9rUGx&EtWzABtIbFpKI z$ocrC{u!E49quvFxzg{slICwKo3{G%a*rahqh)Wq6+M#=Z~L;!=uyPu+}!6Dhq?9~ z`}S4Ci_@!Ye@cqaOs`vSiheHPnLB-I^4b%7_iCk9O^D)Sw7C7pg1_*rwZG-B9nI}t z3)$xG&aSgOfAp13wA!Tm|8^z5_6UleJHu!d*Ns;NbIKY0OM6#&c8Cexe8RFsv~?v% zOtHWYB?C>Tr83uE?K`x5&yvob9g$mDYMGofcYAf^x3WDg728rPl_)9K`mx_yAn9T= zOYYm791C4;e6%T5deQi@ZROK-O$_eQeV?1R-h2Hla^jwcOp`?mGCysVk0`b&o}qJk z<+J@I;og%}HHB_p*Zjni`={{SiL{+ z3GY@U^qlXSq;@{$sYU$sXKf)rx@MlVnI_nOC4NUHgZ;EwlIO2D5I%I1DU|i0o~ny$|emRLH%y*V))TZI+yOg7}K-{0--QQvzZrZz zV0QlYj^rhkff~nmuX@9ms(i_;wp9j; zf=xJ>=X6H?d$1?FKssp$^LA&o0=xQLr7gXaXU^lg@%CE|hflR@PwvycW63uKt#v=^ zGk>p$j{RA&+WbrC_6~<@a#tTMSz_~Y*PgZFK^q;vKAkqv^FNo@J$C13CuW?E+p)>> zRMSQgVQW8wLbk`^n^oMOsn2<)%6sFWwQk6#FJgja>KAS}%2@A-d{VmhL)}&vE`{_x zkFVBg-`l!-Nq>chN`Hi|)bWN{M_XgB@dj@$bqO!cNeRl_o8Vu)cj7~}x#mYUEi{o% zx#Fj>??6xOBI*2?sZ0vLK0f>C(R?G2kMSv273W9x$5ri8Ca!e{%WW&`{^gu+@M@PR z-XrwfcE$r{>J})Mzu=arjh) zh|7=quhEV__I{osC0*m5`!;ii_P=Y*I}bm*y6bT0<8|lC{~Va&;62~eUccL_@w#hR z+23tPX6WwMnS3-%!9U4EkJs{%m4p4^O&KqzvMhhJ)A!G<=aUL9@VI*sn?rUq&rP5Hv4Cz{{D$>a`dJk5B3tlUq+14uWlJ!_`O$Y^`>bC>S={{ zObT8(OHcbVN$CBCH3xIESMeQdPHq=|7#Odulvv=Drt13o=KUvqVW*x}AOGaNrC0j5 z$!+VDm(A9%bdG=D(QGJ|7X02|3%|PIr;z!=J49BhnkXb4YdX0z+~-W-oB+x9mtM?t z{U}hfvH!K$Ikwez@}C6O8qTZCa!%%oQa^cAbk5DQ;y#h9uPT)Xm7kqgzuBd*=AExT z^Wq8j+on{!yd_`Bai+}FE;@#z7{Q@m+qP`AF`*hk!kGrd^zIxM})t3~XEjbl;)LiSb!fYWlo3ZY+D{p>D3a&miKE(Ugp3 z*L6j`r}rCt-S+5lOXhk}*D75R`Fqz_UR&|w!#+pF%|RDKk{R3P9sWH@_Ka-p9oWC6e^+t77fn)>o%wpNi_U~g54Ua5Ov+jFOJ2;2mGA3v zDZ?w~=MH73Yws8K{g<6>d%*ow;)f@n4fM=U-Z{B2@omwO#wnH46?Z609=R@7`Qyfk z<#~}SgnJUZZI0ZYaVn&;;-lpt{5|)(7(b3j zT7Ds4<}m(mae5reWB65V#`S|64|C4l)S_*ss&Ptgy=rBcTyIeF|Cf^cr=PS)dvp87 z(G>Yx0RfBG9X2@bUQ)r6z2#d*Wm%i>`Vg+;!Htt)StdYhsv%IA5Gs-93|9o&yb*27_V|$eO4OZC8MBEZRd^hvq zJgvJXl3%7;PCfIj&opDE&7>r~V+zWXwkTTJ2v1zU{HgP4IbW}Tb1YAaO}Ttq`2LC@ zdBY{bs^uatoeh*qSE;jHwk*2-P@?#7{+hn*dH1DR)cU$-KM8Q``I$1=POSdC%d4GB zyZ=X*ys$W2aqNxTn)~WkJR`bZyyA!w-*N452Xp#dhc=$m%X*?Fx=0>>#JN)V{HF3H zHtV8)IBz|ybeKu|zPNj4#4anxh3ms6--`O#deS~c;k^TcK6gYy!q?q9d=g$CseIFa z&TyWl7~>_I_j{Zt-;l`7KQT!s;(cvV%->6e(r@3bxH;KdK_grN`h0`rpC6TffOB9}NU6?fK?a#Zh(<8oVep1hW z`uOc{^kzj!0`t4?>#kJYyI$8EZ`SA6EV|KqTA*0na) z#*1@r-rW{bs2*5mbob(_DR+J6sQsyWe68&0*4bZ=Fg{^kc1Lb1k8<82-pz)VMJkDR z0#63@oSgM`uAbxXjF+wJWaqv#x^j9#|2)&XdB<68Z*f|=_B;zQo}B%1`u67*|JnRg z%YQ#?hlDxY%4U`SJx3std5`%PKjtM4 z4@%1e#nX0Ic`6)Qq-WJTU*Yt}3$1PzH?kMKW)gWraLg^bqY{~zZ*%ul$Pz{OjVXrsHt`N7#Y#h2TBr%rg?C>_2gOz#b!*zbj`zGb4Z zo0l)0cs{!G%Gy)jXO`ZP{ylA3C%@vVa=V$P4k7RE%vLZz&-Fdjey7-mH)o=prK7af zw=;d$%`@zGJ~*X$XY#u5T#py?tbFd3CMPHLx;e4H&@mD46aK!`EN$#-rTCs=MP)Ya<4bbZ?wz&oFS1cUH`kUuk!mE z4%^eBNADJHs9$`TzyIj#Jl2Q%bWgr?crbx?bJg63J)EER70!8h=-}MS^%=q1Hv1Z@ zMYpY#y&d!?ReqkKnC{Nc+P)Tl_rKAK=)2vv@cUmb`IXHwT_UQh%&*^DlBqWPWyDFJ zTwwu}2_`b!<$p>c?a>C+t1T11?ddY!c4KvVPtiSJ6Yg~-8mm0wjOLm4S^jyX zn127XoD%mczuhOAtn|JaoHktbOQ-ARVVS3uaz`|;&tD(D|Jv&E_YXfTaua{JcX8o| zpGq9}_bmu#-}xMAbk;N2>wmOomII>V-)y#Mum zLCz7wsN3mJw(mQ*$a?Eu?}WD>4h5Dr9oVp|Uh-J(q(h<0tcqGUuPR&bTt4SkqCZza zjp>2!%ADUeg#=HU^!2mfzpAS}haXPxyS**>{VL18$9eV>89uFxJN9tn+Y`4Ux4v!r zE3A7&F=+CS13%`?J#@UErOQY5nf>kmw?4$KXn%a;RMCI4p2H?Rdv~03I@01M72shk z!u6+hqlQN6hnTO$|4wXh2=1}4fAuQ$Ns7VFULz^C%>~QfNxIB>`Ks#1`JG(v%tWpT z37=uDC@r2b>DT>>-!$&d)_rLw(bNdB@Q2svWp0}5c6}{cv zOb`FtkR7lx-0Y)U{w0Q_TJ>Oq$3>x z>CYQX-`*(Ma^hCd+y1|Q^L&D`dJo?zUO4k&7wfv3S5H55s%dB!T)vceL@dE8Beitt z+Kc~W#1$DBr~mqPom!a;{_esr5FUe4_v@|zU(09wsDM>9-(09v8EJ<}qP0mkA zRRC#(#xa*iXG{3$zS}nhUBeiEX>VE5BzE?<+Qg~sZOxtrH+|mc=-*IME!3HqYj@{e zjhooddskNO5;@xTw(+9a`_*}OtL9jJJ$?A@?C({J&G_4`r!I|L_E&9j{pao6nSnoQ zgng#HI`ix7;ir0&WoMr+&;R#v_bnOrS(P^)?|;7g$>DDg`>p4T9elD!x2|gHt2=9t zE}3~rN?myJ<163aeXqX&;lJZ+l&{XKkFpBLpMu*iz=vI|*$E3IyckWJXIX>9?U-;bzoyt(hA z)=h1-1vEhlYeriV35O%v@o^>W{; zd(-#GzpvB!{VAxw)PBPj^Y^}IWM;HXv_3_pTPdEKjEG+8utGj(@ z!IT-t6c5d>^kBTSWrycwzJ7&s9_{~+ZV!AD_~B05$5RoFDXdGLubh2?)q1kDP)yJS znG@;~$}`+Qs@yhq@8e0n9{+FmR)gaTlhq`bty&c=*_v{H;>p{!wFgBa=PaG^;H3%s zoRbeFxTcqJE>4aQ3$AqYnt5m9f#VBTX5EWXxf>qVu_e^-R8hI~LZigVe5aC=9n1Ml z=V~RV%}-}t^(ocEm38_a+xhuMU4=&&zALnUHttJyVc_eX>e3u&VKC=niRAv%Gkuiy ztV@|^!p@P^9Wq&Sa*WynhPO+fKD_eP;M*dXnoB&(G(Rw$f7Y>W-j`QyI;VA(Ubyk$ zLhvPzgwN|#+x9ZEO!fCYTJY4EW&Ml$?|$!+$(uZLK4ZftnX47;svO%rPrfWTTjX63 z9k8K3TTl4FS;dzcS0vYd+Hw3@jMIXm^RriEU6kyLV4rL=*UL|L-+Gzrold|0L{@uYZ13p>?~mt|sr>Rvs=9_8?3nui)A<7SUDRUTQBid zlTGH}q}8iVWEMbP~yt!EWdm0h3xzOhO$^Hu-8V*b28TEw`?O?lrH zu9t8Q5_Mfr##HUUcOD;UhF>^ltaKa%~iGRDLZ%W75EUFd@w-bu+ zan?Ol?59vP=ZaWI@X3wu1Wfg##SaLFG#=XdIrhbtJ|())F};arTy%Ent# z593Z9&)#=HVol<;he7ksZ|bxNxgPYx&hL<5&&g@8F6?y*Tq)vi7kam?S?4>s{L`9I`NN|R9A$IJQu&W2Tc7{au!E?T3t$j@1J zHQ&u|QA;IQEQ&ifM*P>}SzVaL%+*Mt=Fq5D=G(+hgcXFGe%p9ux9sEQ z=-IYK9v5c(l2)xaZOF^vwQAo_t;D$p@0WT%5|oh??s+P+Zry$#p)Zn$8uwh?8hX?H znI@aG*ypmfA?l^kcjkFqEH?KlR8DwTRq(-&Yl*O$M`+KbUHZ2dPE7JvU6kpW`{|Iv zVGmD*%SsP*u1`xBxjuW7eaU6fFE&+e@v09v_LnNng<5lVYh^O!oEw0Uc5T(<`dzE^DJiV;4GZBZ{05M%hPmE?MR%> z9MXGsQStMC=k{?~pDSH_;fYSi%1@F8KeFe{=Gx1`F2!Ykn3-AIo>}>oz;;&inI>PA zF0EuvIuhi-(IRjp(Ac8!o>pDZ{~G}=g=?}*1bzpz2W?`}zV}$Xwx+JxKiSvDim9Yw zk%9I^8-uw1ZLGX5C)SB@EZ20C|G#5frredEC(c(tx%1gl+i~wLxurgeM;Eo1Z4R5s z;AY%&cAk?Bdy0|tnZq#|xqVS~lM>8K!|w2UpDjLCTys`kTZ7R+gk2{u@IKK32S~JUh{2gUY_H(1hL1e6h37 zxA3j_)cuVF6w(TVY2_D?Md_cZ!0dC6?(v-YR7BV^qbdoc3)h+^Tzdrbx*l( zs_f|QT2$k>T!Up{uUq3i#*cOn!_IA*>&c%wd1X`9^=Ox;iJ~8yW`rj>TS;ZFU)y<# zDgRfvrL11+?R8yxQ$vGyq^|EWl*)DO^_j@dcI3cIMlUJiU9W?S5v|ir1W4 z;nLn`+t2TLwoLVRU@cSo_CBwLOBt@|8SnY~Z)&in)~A_k|K0rCa^sZf>(^KL*Q?8D z8Ffv%{W|=Z+j^(1n-ean9^1HaqIap?YSnE&Uuy@YU%m6ZHa>-S%gpGxvL3UGvSLMN zYv2DnL*$ZW&pyUDCL&U6_mAbd9-6??IvEKkA-Obh=e|wf9Nq3$67H z(>8MPef<=8)tWeqnRd(J#*e6=j9Cpu-f{-q4Nlzrya^MjA7-JIo;uk!lPt~r~}-&(}tc8TlP z!vyc!-%O^rE`L{I&%Nkn?ox$MCqE>-FU|Rt^|1B8wtuhqj2~ReDSP0v;;@O>zjNPS zf6xgySk$a}xJtEN?v+(vfAQ#eA_w(&sf@cdY0*k9gfj82#*uj?>Jg<&XTR} z;hfK_jIKYQv;NPcIdiu^%|17C;`7*_%f75Q)LOXS_QioMYYQ$Vn6@n2Z}rmc#^QMk zSGee0TpX}b_t2bB`B^MRQ+G9R9Q1GsKW`*g&s6qezQxpH#YpYv+>Jc5Gu<|v?47Gs zb#zwvmzggU7gSzpi#aZO)BLxyI_vgB;fr%C&uwu0C(0qcY-;oQrtLeYKl?bH#n`a! zQ{``^8%v9ttde{?o-_RQetzIMxAON(>l0Rn?|8I1T&voAzPp=;fyIhPd87O2hn^u60bPpev2 z;=OUh`L5qzZuT1lEq?TTM#0Pip~QQtIr_GdhFyPl#=GY~%uKRR`6ap3(fXRxho#Et zZ}~s)Z*N*>ws>Zt4zKX@RmSqW+yDAm9@2K-Zsjc7%V#R{<%^A>L&Ob7ZO@5s+aGV- zeRu1xIQQ)?U)xu2S#?B1V~gS%hH3xrtWuv;@o?jzdf6?!uFG1PCzwzAc6Z(18+Xfg zzxz`2c*mseRx_njy~A9-6+S&NP50YAOW`9klD(3azVTghLCW=UiNF=N7Y~xFGeo{@ zpLo!_G0EeZ8s~~9(Uw+1vXu)<-W4^yjJUWcrC0l&&G)m;+wI&or4>{ttgI53_9)p< z9ds;rL9M0Vo>ty7(~m#9;JUh#|DxZ6z<~Fgtm{^|FE-b6Sgn>5be21leaZT$xQ$}I z>-Vi;Oa9bpDa*Th#)hvAD;#qzH=2pKgm28L(ls)Q^59#0r9<_~#QXNV>1x$4D;!U% z{w;g=L|jj){N;|OAMx&nR^RW=Jt6-)B!W#pSNrUqE79)`Tst}A<(t{huDmFo$+uGE zaiQgs!blZ$nG*Hq=T=#-%U#XREBL)Bb=wBdS)q56jxW1^YPmq|qE!li<1c&1MacM_ z@QSl3|88j;QoL4~f7(OSfW!ikWoB2Ue+A^%RHSZHo)^kilW(KOQCS=M#%0rt4fpMo z+CsM|6qbJQz9@ArdfCqO4?HGI1UzJ>$k|?JwLemj%-{Yw`u#cSw!V*7cwRb}cD3A; z*=D|Vmfhcb^X2ngMJ~j4%P|_J9DhD<$6*0$p1%clelD-Xj6R+CBOtmVvOZ-3+rR%C ztqrznu%)sZwoBgqIC0`!C6@c@f`>X*M|e!#bGl2_Ze3YN<^e^;*X@U2{#$A3bLHhb zgCie}Z)!4|U#?S0d0pXb`gYNwW`VOiW(DlGC=*&M(YtNRvx=o>C#%$3TTW3|Tc}a5 znQ(5ofwswA_sDMj(A$@@p3J+H^~cGb*%y{(eqo4xM1WpL1vB#)UowK3J1>KBV&`E{(D;aBIv z&h9dA+2wFFXkn-8eS`gK zKPT@^=l)oB}=WO=lMDBo}QYMX7+#5`c%8;t@C?p=KqyGx^Z2>te|9{vr;~> zRwdih_ofE#KCOG$AkbZZ`x$<}r7^qQDjug7bK0D1ynU0G$0RtA&Hww`nA;nE8a$S> z-5)%*2F0Ia=gfHe#Enrrs5rR8G0-n>Y>W3%gF;OL;1+?LBvRmj`RbzJIhx&3k_Fhr}JP%NBj=IFYsH5?19n@^~Hsbf)?m>C)!+^w%OPqbLSliMl!m3Qe6nSItL{uvfd zIxyMc@ykz(ziqrK`RnqlO%LAhdK=kt?OIaAhXdz0uK!(EX_vK^U1YB2|CAc-JqdF~ zX5BxRyFW}Lpku3FqeUEF`dXpj;^3vCmxMJpUb(CM=1j{}lPLiy`m9VdJLmseZ4|e_ zGTk`6XPdV%d*%G~UydG^S)+4p_3NNdA_dcC?v5*-V&}1ZbJUMjg84Tlx*DC|_4e$8z+Hn)0=!ub-!~s7KAn()ty@I%BGS#i{zUU*1UF;o2m+H#1OS zMy_gK(32x4uH66sZdngLN$zP}8bFTQo_r`F5gX0rXC`RK%+ zQ-b~ZKM$2yJxaYWt^1a#`qDo~J}x>{{bk9s?Xxw03h2CkZTXRDk3fD%>XQ{y_)lJ( zGTrBUW}c5=mszh04_{l9Df;S`$8Y&*gOk#>@2lDu zO}DREygV*zuQ5aXsdsPY1TJo>pIe#qPr<8uYWdFEt))(1w?>pP78;taOU<0yw$Vl9 z*TT}GP*JgKo_Dz!8JfbUv_!D8eXHRJyjLyOJ|XvG$G;Q1jdmaZ?B!iK@$VXug|1WO zzp)$IF4b|CvznW0qRZE>aH+ik4il*9!hhn@!(<$ z%^wHZc4cgs^EssMQ_O|U1(VKeq;ay|WPDN7zPIvbq)xn*?_zetYt1)X#h&@=E&rJG z@W=7`xeXzDuk)AUBgYXSI;X>8z#A5tiYq*DgxFYj^&h z`NE&K^2+DySxatMZJPb@=Nq-OSzT9C>n-PrNxeO+aWPn~MQ>X0w=*+;2md;w`E;40 z!1X?>1$rt?8Uj4U@?T=e?Idtji7v@RQE%Vq-1+t_T zaK)|qry=qt^mB}V`@3&4(FQy-53|Z*a^CkY&>J<09Cmn}A^q-l?T4Fwfd;89l z?TyC|FxZ{=;P|OAHYHS8tvgjO>!o?kh3~)ic037MdM%=OrPrjLZf<*6ZTift|Gqr` z-Rqi&`EjjxVJA101P0x=+_=49#l0o*Q9R_^zw@k$QswtDW!Q|h~PO=jeM z=P=}InXvEIgcAn3YK7ZZu6a3avgXS4@)u(6|7}&~1)SiUlQCy?m)yC|Vw-QV?lU-5 zo0+^8XHC0#f+0xY=d%?lY?rh_$=TpumlnzyaL_TAyoKHc_Gjn{92F7i|bJ<($hA5m%F|D&)zA^V*0;t+4wABra{~JHraVMl$LSU zEfOx6xbYbe=hkx-p(n4)Jg<}c+4wVHK407Q+Ex8;<{WvHV4-oFCHux>Uf+2P6S$9c zAL2aoFlg1fAZflWWhvtKw3XFmgawRLw|YLgJarMry0Z4)nm2dv`Ru1w@0C3Hzg&Sx z=0=9olaqh@KG3-LK~8NabLRA8@7NuT3ptjn{z$C$oVH7z)z=_)p7;g#0Ih3DK|Q|( zvW$dJ@te-fJNa_q{l_b0&V8|Ey3X+>HD}qg$rXWVtN9~i@9?eR^T{%Z(qv?lV$43Z z?CQG8lB`$TF7a!Iybf?Sv#(n{IWI^w+do8BPyLgL_Ki0NOJ1*@l`XR7cKXdl(WiO! zC%ficaV{^vZ6I~DD7cDs`=!Uc7T-%Eo-JSEQ7GEFXy;YOXXO`U*0DQ!81N-z&0SFW zW%~c^5?`EsUff^5&3nc7O&?~zUg{w8=}q0^`N`S>g^%1skRl5xJ1o2Rrnsujuq|qynBe>Ehs;*Ts&>@ z!G%R9SE$c5?XBDUB73`+sdDFAIkP?YmU<4AOuqJAT~Z)ZxpC$WXZHi^PbXGY z>b84XUe-VI_0pVWOV9UZpLhOmwbw?o{nm@SOM;&zR@>b(S>r9fuDtH<{*o77OHS?5 zEeuZR?b-6LaBu4T-zVyAY&NJmY?HK}AFQJB?nCm%L_7P=Mw?B^ibCwc!8#`w*7`Ny zJh-K#c>7yNzZVDJeto`DO!g`3`Bl62oeGoK(k+m&@0tGcy{F^vMuyMR|EjWTO~j+h z+LcQ~Eb@g+c)zckzA;$Nh<`8VyJc3FD@3>G=ho|pswErcc^XD+FpYm!sAhSa0GPR%%;02eWs$S-I)!Xug!MFP1&hfl*Dhm&DKLzYJXGmnbyvoxql;H&x?>zmyX(h z!YM6Kx6NVUk>aeVL>}kl4Ud;ubk`~7&bulpF^jcZ-2e8qI^n7BlJa)t{)>G*GkWgh z(~3`7+j}{lnupXF=C6D8{P|(!^{dy)ciyN{YD=lnT>rIb*+RRm0pAzL&AJ)RJAJ9< z;&1Lc2K5(iS^N2&@!O}$vLw?zx;w^4Xx1t*Pm3&bhl{S4^c5Ghn8sHx^*h5j*ZkG> z6#0!UEZ+<-i3`~IpXRH(8a~-?f^Kq3UvE|U9FqilUcKOl;_DX6AAh!!*JI|LC8pIo zR;*d|tSD}tNxI0f)l!$5)HerYWku!qow9#edbONe%6RfM**R$+HhC!R&`MREDcA44 zP5Qjns#7a##1sk5@eyDO{=Ic%sZ^a{x<7TWQ&O!TR0lGLM_P z{tMi=oR-G9B`bW*gH6(Jxr7Wp#5)QzFXU-9*D$_jWB+Z9{!FPX`zIfLwrn~0@y3cc z>y7)oYMpLH@MNa4xldCRSbi~{|BAxj?7yDB6BQ?%J}BwR>R%R}_UA}`qPlq9W~2Yf z5og(19$GbhF`9NN`udv4Lz-^KxVGNfKlPva>FuYt3sl8?;&qjCUHiaHv79Hg^F;fc zW?s*C#(dos3%=}=nJ}S<=i1RFcc--8cvW?(bfTZt;thh^%Xxw~cJRDv-I+VRbYI4v z;5a|6*T;H#i+s*>%qTgyHPG{HeR`p?fp693z{?+xZF-@Vt^AQ=$ED-Ci#boXHk_ID z=WFN0(~E=~->087*(o|Z=?lP1FG{9)l^QJtf^1o)Lz=dW9K zjq7B{8sCRDe0|{=Pp+ply446=PP?qL;qR`~Ke_e^`V_E+THS1)w&taNmGz927gt3t zD7h^U_>kLuXN`$sP$?^Gf6%6h>mD49ITOgyG2=vIZt9du{Q&XmjkVpW4~rMIWVrhK z>0j7<_EP9wo+!qBT{XwcC+v;2_wq83E8KJ0w<092$t&m+cf|(%Qpa9?7v2{W&pdUE z^a{RV_VuLyxyO?xDea%!G0|M+$Ff~4Ya-lBcS-+J{3U*A%Yuj1`r@x5zdtozA}S{{ zReHr6j-7`rqCbW@D=P}!UZVJE4V%a6Pu+Z4CU$kE64#zGt=h0zD^cY6Jfr9DSyDPg z9-68)g%oASdd7qYPblQ)wNbozYuRlnP4klEBoo`_PRY!e7ZNiTvEEA?xghJ_Q3%nbS)@Q&@TaPSkW%CAeb zmq^uq)l2>yIeX2w2${=iYYJwX>6Pq%?ERn1m@iAhX3$!*1o>aOCBkGD87O0T`k)Vg<}>Mk*bZY|BDAG^O)R{twb)0h;Lyd^er zPlZLX-v9ryFFhMOg`SAtU#UIo-w!=c&XpW>$vi7>h;Dr-IJw+AE9&$%vCjB+FCOz4 zYskqOUUxgATJ+6}-|&0b%NnO$OE)duV-&>sA-lVO=9}QHuP&u6JuA#G`DE)x<0A|C zU#y7wa?QMwCArp+0^o7RfS^0mA0dGCoi3vbbk_CwOr^AeU3Scrv!Ju zS|sC^x#-wy|F2b%>nGmYlQQMKx*5~lh&lw zlHzz2d298z|E&e4JHz5$6*%np+1+CO=Q`uVx&w0#t;#HFei_uX^x!{{Z`DC@CnouB z=1&%iW4QROtgK5`?BeDPA{r{kb6qoSGrIitB?NoREWLLl>BY7!dIt=PN;cR&X8R$n zYL@(J;cJKy>bMtr6-U(ACYbJ4|-jQ!V zt!b^%@w6tZC_-FZPSKZdgl=8EAdso~_k9qz^agO}q8wMx(TOMtUyrLc0 zeP@Z;g1si$JvLI&6;YQu3^e6)+he{;{66+9$8w{B#V*mh1r^u6_O&eyWfFSn@{67A zQtlLG;iq#`48O#kmiiDWa`O9Vh~VQ02U$o%k$H32^l-cnw2E!<#7uoyBigJ6MilF*R$2oT=!O+@FDT?ud6D% zULUjgT(j!s0(QUuRj2q{t<1!qcqLXgocmSfrjozuUxM?}Q-)hy_vdL_ynoWSuHCYw;+8tm%=K4ResJw{ zw`Se6Iq!48_N{yJCsl4ZlFYR7S;Q8lsCM=YSw_KSOjqAjuUTtm<5$%?YeAnfU&X4Z zeXV`3O^6zUL{+&Yh0!eBrVAp^}P?1Yh;ijla5O(?W9=znPuc z9vCR^x$V11?v(fO9tuAW1>fuP%nvs0YpuUu5f!(Pw>m!}@v%R<)c2>e4^52yS#Y5L zea431rxnw$WO%aYZF;@>etkuGVco~eOGW%A?%iF{Ki}ZT>i+BE)Ayf^ki37&cW&(b z`u~rQ9-m)tyZ_PO%WJ}(9Gx9JYto7vO9Wp`zj4V|Y}QPjYWwEzFDsrtzWMmz3jRHd zUgm8$@iBN#eErw&4C#?qW?@<82wGSNT|&pJA425fLksX~JYIdo;zLWQ2o)C}f-Hf% zEPz&v4?(K}@vJ!1cMmpFFompB1S<_F$}dPQD#=VO1}}N^bv9No1}(D;0pVPp2TZ+2?dtB8E)lgq z7n|fyP5Sv%da+;e%J#kw>~fPYGM?N&?e+YRcVB5Yu*xqn&7O5NxFAIF_)*OxE- zSf+RMWx25@XUV=A|GFp3C+yPc7vi-0YS-eL_wZmql3)#2xzsVQPrts+({G9BD>zX! z`*BRerq-uBBVG3T2ie&jx>ql&oM?1xq4j|`S%&i?QjJfxyZqerMqh98*(dW~FYPb5 z!fhL+a=U9@7vuA!pO3CB(_Rtw#Be^l*QZtTc|6_Hd(FiUD_QPKyP>0T{p@TXx3gY5 z^fRx^Pg@i|k7w16wnUc&^8R0!FSGtG6uxN3GhcPf=3a|sQ7?b4wdU{lzuGB%F)`WX z#%=RY2c~-F@@#+j|MO0HlT$vI_&Y3PdY|8RNs(A#{_4ugGZW^xRjoLYZNzMP`<+Rw zPyCKRO~dtSQ&%uAHda2FqL@_tu77Xby9r^tm(5i@R3s|!W5?CV!`8MMS9R5-V`sE% znv=Xw?x5u4z4KNjE>_k;t{XZO5cBFNh9Anzx zvSj9yLJ4u(0L|^I8aCw3etB9U-YRZZ{8O{b%|>3OW*VCc*Q@Jtc-}wt^5f~cU%PKC z%`{)W>s8~-6I{ZT2e+SLVAMTo6r6NbhNI@PnQvc2_sPZsJ90aFPgy*YkraJi^1HL< zfc#nR)dyolGN0vIws+dwp6=A~Ntj$yJegzlp(Q&%ett0fsq>?zqTAgI&WL>OwqrP& z$C9>k`^;dm8LfpW#y7T1Uu1Obc=Fz>eDrem}uc5d3jGg}Mpg&$>`(JHI|Dc@jw<~>e@ZI^}o3EYM zaQtr&y65Ze{po2+ax>IiGav4-{MLDApH)w`?!3d?Q=d=%y-NJ}w2~br3%X#Om*{>Jge4)NYF823@H|NwVRdORP zY-veU6JF!+^kmkgyDM+aJO1ui^$VLh{>B^jtv8dG^l0q*G$HxZLJgT!wX1BSXa0Ho z^3scqMcRVn}uuFU3C^XZ}?5k z(YkWUL0!9(8wC!?UhMZhyy}+u2L6o!x2~O))XQy;d%5w9l*8WrE6aX7OG_2=bxZgp z>FpouJZqMyp6jYjfllXcJAHm}TDW6`(U^33P2e^|c8zxJ~C8y6>$ROyn8Z?`tO9h)KV zT{1)Z$tfG-vvKcN|8hKhSlxX`+I>#RG~4%InZ&+)NL(p2ukrEbE9TQ84QI`dl3vh! zLR~~Md23zL(n%^>yzYt*wig_+toh8qW|I_R#pYk9nPxaGQ7dgz+Tn<4FT9JHs~6u+ zHmsh%W6H*e2m8W(`;WX>xsvO*{?v;pC%BurddifwFXW%tb4sK3yujB?o@FxH8+3T9 zwjGKtFHX8QGvaV_{2p!hSyEviZ(jU<(*H&1(z)||wHaBriSi`7>$bWb4Cq?G@T*e$ zzU5uNr@m@pjcMl>ZoBlJqwU!RoiDj5q9$M*L{X2 z9y3m}BzG?6U;fU(&F0U9-xmCpr+OEEzHrCQRKQj(((B|`;arc|x!Q>emonp>rW?HB z+59AW-s1C%p0Uo|m;Kb`bAy=nsVADpX74zgGD}P+L{(ATH z_59zzmPO~sm(Dg`ef!bV+wadl+8uuX@xk4@r`zw*7Tf(#FW#iv+BvwjNU&>y*wIG? z$0bhAIn0)D*}Zpp5;EGShd#v?tj)ZnqKhVYC7F01E6Ex4?=_rk&HUgFAY z&nG-e)7oruYU1?POMa>;*WxqgH8eKOFRZx2qiU=gtE1m`ky)Z8r9Hmo+!rn%ee*3R z_0^Bb)@r0YbK^~%%C}8mmrMTY^C#v=ojyqo&!K*GzSp4334BO)KYoF*rw$Y*ZRTJq1ieCLxF+b##}sCNrgcCdb5 z!Q$buB||AnT&3mT?MAlC>AJTI_q>*oT6*cz{PxE;&TW6Yt<$sY4K8}HKJQz3A<@$OsOr>jxtcM5xy}n#owqk9j>3rvhLK@ zwGAD)8*Oi$EUNLJDSr5pl>r&w0hUxxldMQYPo+ zSuJMv%lEKt;C;31@~Q1%ms98RY}R(yzTxc7Q{L^DayR_DCqQCdo|NHuU{r-P%fBxECYN>m5ndOnNp8Vrx zhZh+rUQ7CQ&oe();f&RG1@~izvp$MS?fbv1)a&kH)Be_LhmwzWbUDS8w=RA!msqHO zj_dg8{O3R39E%Oat4^M?UD*BF zs48Rj#|1O*3wBIDojU1$Wsn;pa(5;fIL#p2`v)tOA zS>w7&Ec;T;yIpHFt(bZb?VXfc^}FlJHLqtk)(busynJ>`oWb`s>27aLD_fV`cy@Hc z_IGltvR6vYUU}9l`RfchpGmF1=B2l-2=hCzv0Ll>U-!c+jHDv}=W~{!-?zT^b?#THyZkv(v*}UeMtR$tk7Cui|6I7_)cN?BUFNl|d%S-& zvn}7L%_Eh^7#GPc9mSV+k?pFE_N}<^8)v`6+gZOuX8z?=X083KA`4Yalunw zs<%|4&*G{mnF&o=yqgne?7hvGbMTi{*DK#6fjtKDKldgYw;kUf)z@-=|E4*&-Ooqq zGgs{6v98h06I>}JxAM{CQyUtlxZ2rv90H zX3vF^+t0p7OUQ4_=w#rxHfuxt+?JNCOe^+@mB}?zvskC!$i|W?NeEiqWyj|kI_S_WvlaJ0a zZ+^3Ge{|624^!*6?YVXG!0OV~Prm0Q6b8IYEZwou&MsCUI6L?JC8frtxu?IowKc>Y z=2|rQv3szL^(~Oo;&u+d56>}968vxE#Sk8@|Mkt2Ok^f#+gjjp-6^Y+O& zub0ovs`>7&``1*m+99GX`is?sfYo=|Rb7wGmx*Zma-C!4ZSfmYe{XHiSA2e|eXV8A z0U`dkNhu$G*^>-DQ?};hK z3!|Aum)um3{P1_tQzmtr;`XOEZq56h`g7y2L|czy64qpeDBtFCsx<9rZzHT`#w*`(Xk9HR1W3pHuF?M-sZynQZKH_&^d zQgz9Nz>_BzwH#r6wXdZ`cS*WK zQ=*2Gm4fc4d?l41cW$3(Ve!uWYWnEqS0SOp2JUVu5zpp{PZZnlpr>fq_inMUkouQ- zl`nq$1@(=`3} z9;>_S|E`qmuefmO5{JvN$&nvBCPu417F;~{MaR?PN!Pa?JiAa?BCdet?w+e!vLEfD z_m_NG<-RugZ|ZX^KJQh@Gf!-u_EIHM#DBqd=lzd3w^{tX{=!9jTdY;0z`P@JH@2^eL5ASe-FDe+c~dHebw zaemRze$07&tx$#1nVEGTTYRhfd(=bI9(n>x&yFvagjn(RNp z{(T!4ALM*uckp=d-HVFz_6g0o5VXuCHu(BRCchQYnw)-DiVnr*HXMnT{IsA`T5o2{ z!2>SlHJ60_r~5yWo_WB@io@t(SZVyb9aA4AJWAZltn-RdtxliQr=ploj!Ug>Bcs}$ zD)xGIVgJ6@+f@B0bS@895{@{PH{EB&@jWR*Rws_=cKRH8l=3M1-m4mQQ|qYp4SIh& zEM?zD<+(H0{z>H1mr9ZFYklx|@6TV~?Mo)U@_6#Z>9B_CiPk6~_wQZoRd1%8-dnb( zf0A3t8;wT2y-ddQ~i}b76`LSzqy`56~Dg3>Bn5Wq#qslj$ygogqy~TMRiZx8|Sjv{rKan6cxDtV%M~n z@j5QrueN3_2)))8cD(4~tEe@V^G#*fmR#N{{6l6tpXAEhds!{#Hpgz;)O`HC*wh*C z61}A>68IzM9+2O(%S!6q_R~s{7r&`#Z-Lq`k7NR?ar*4uD{u6=d!;> z+8J_btc7d6*Y?%ym}+m(`if_Q=n?yC8ht|4VXJqM}8A!dO}Nc1i92!ZmBpr-k8q-^*THo!T7N z`s~u`)qzJ!pS`?buXWq7JjcC(y}19`!8?h}>f8CBtz$1{-?qwnXJN-yr>cn`uW}?F z|FrUJ@MncJe*aefOnA2?Wb5V=H@;pz7CU?Ty_q(rmKNtq&Ak0ISL3ozse7RTaFD<`(B0FySy_qqlTj$=B{kh=m;=-zS;a7XU@Rfi0bjkYim3#VojrFhZxO4W1 zhVn-1%S+sw+pT{K?sS$(t3Ek5^H$vSJ2PXvcRt~pIHg~y{Kw+y(@)9n|GzBom#*vX zFZL!MD~fh=`WeL+rH3z#(cfvjvtyR!&SveT{YvFtUlhwL{^v~JrTCHmX7Z6^&fgV^ zrwi?LRy^}>llA2aJ=Us-&hjW}t6}uiMR(yJ7U{ewK`f2`&J>SF) zZT4)La{N%zX1#;Xa@SA47kIl>f4?)o>(911#}2URlc z1b6FJd|MN#TjIv2cdO;u_xPN3Y~A_}3z)9ze(XPcQAT>pp?B*+bb0AsGk0OLjd^x< z@@F>+`q$?4J-hMei@6InHW}Y@><_K>^OvmH6_b5c{&JV7Wb|BC5x@Ue=A5}5 z&#Lm^;tY51H3~jO&-1R8O@S5-zWHyKu^47M0JOk**%x+@}}0CQrHb==s7`TRrlna-^0Vo3&MB=M2s7 zSMS<&x&|M9V%p>=<-xP6cfG{B&)dc0SI9Al|NeHM$3%XHrkM8OW@h912A{Kb=j0|# zeD>Y_axJ^{gipcAeqXo5d;DB!sm`4uuzJ><=D)u$_5}TTc`jc|Ohaw4q}!t@LVq7m zS*fJ!vhYfVfzju?m#sE=iS#^-kXV}4tp4WFCx)D#qKs19p{(kE_!z^VPWyhU(!DdS z)%I#e;`JMQ-oN3tzw~5YNoJg$xMKeuBVVsKw(53b7frv{&PcI4GrvwpWL9xg()T+H zUmW6|n)QfZK{Y&%Pv-w0j~nm*|JLsoSGo32YL(0C4PMu0+lv)G+L^j(U;6Xp;?r53 zwm)X*hRfdfnO7;a%Aq>YZ#U~DugfxfTFy)e{@228ba?Z#DjgolO@1?4`d(e~Xp~vK zX+`?e0?%&q1}$g3s&YBqW8#lr_uluoE7*Ee>*b9ef#sr?wGY`Q?@Q$`KlfXCd(62# zr{(I*t}dRj^bTXkE#FmV7KX`MvpooEo?fMvu=RuOStiebjs>q)JLLtf`mM(5zEq-q z>4vS#%)2giz1}XQU;ZlK-d>}={i|dqPfp&Qb^6}+N9|!P{F9fqGIH#E`fXzHp9fql z8_gPXGbGYvE2BO~pO@eA_SufJ^VoBjD&C4(e6U)1_uXZG=Vx>`2MV06(+%z2WH4tI z@Ak8s))()xIpw@j#aLPP@XLsh^Q=#%MjYkkVJpwL6(OnoY}rf0fVG?tQ@nmFe-~TR zCFRVXC|u@yqPC#ToMpr06t;_p<+mm3B?%uhd}7vdt9rU}_qR2FH@>J2$UCIGFr^ zrBT03_L$uJpuw`_rdjwK-v4&9*1coWT^>{GbCbFElA~Ou+svk^v(tPR<+!JxNmMV` zVEJ>pjKl}Sh>!N0r!+F`SjfU;!Xj$t!)MoE6{GXE>sy=T-8Wp>kJhS9jG4uCyx+O^ z)uD?qa=J1l{hQ3+AJmzATH<`S#%i5w*@A|h!b(}+yE;}|ZZx&9(P(J?H1WA4Oa8j1 zT@fsaQ=%A(qH0cO`Gj9Hb>NvV+j+k_vM^^^w(Gicp4T^vuXreOkL#6$b*StWow8p? zj%7S5QR#RPkY*yy^=sn{=l{YVCqLQi_gsJ16j$AYf&xA#SHI%5ecgUn^q%fDhBdAt z%YNudu@p*eY)&nZY?opNx`)g+DUYdXP z{ue8*6}LtIUSGK(Z?7?{|LpaCW(F}iYfiBS{W|gX--U>ir#p|W{+Mxm;>G#%7yVms z)6D0E{4XWn1vd}Ozy0d?ql0BPJoaQ>N-#9%x!KG1K5E;uiIHoVEv>|^rgzTYz;`WY z!;}NFdJD5>g+^38&`oZRdEURLsMo8A_rjXHy9_I@uKdbt7sXe;CZCmiZsxBFuJq;` zs|&u_ZJO5oH)_QMh39I|PTL=|h~+J5RQt%kKJSj^jr)IiX04JBsHwhX!#`u`V|&xr zCcPJ)F4k;aIrouC+T)`62gBwt97@VQEzNTyug2$~kJVGJq{UBtqE$od*|S31vU zUoP`Yq{LII^wSe(qk~F|Cl`7u-r2+ZbK9pavB^)rZ7Isw(W#Svqf>ZRbSm@NB9Z;^ zuJb~C;*I|=I>~nN@M_(2e^*+v|3BW$=`sHsZ^)bb?whY(OZcqEck%8#jrGpomw)ZI zzU)!7DOBRgqu6|l$+stNZC>*!A|$=7j>$Vq>hTxtZ;f)Zm%nR?zgQz*BLBT2rP|fn z`Hbmdjgn49HQ)0(CG#@p8b{3BY!GKHKZ$p{k8#Sw#*J<(UhnfZ%Dx$2rz0}6*x|^# zxP=c6wf}v6>|V{4Ajwa5r%%jYzrd|leEX)Liv|+CQbpw^4DUq^8XA zQPWSC^6A>vRKE(OD4sU3gwY}UP7^l;Gw z{ZDgt&72*YbmPmJ2l@R=x8?=qNN1-=6o1mVx?eZTzPn6z_L*ZW!cSbkn?DNa|EeeFHTz4S z(7`_2#kThs)irn>d&CkFF1Nr)uc+od>niU5Cz(E<`|)S3z@3G`H@^Q}JEvE6#o>9v z{mBk*ceJ~_RGkxX^}fqJtqYI0i+Z{~dCzs}q(^zi*GGQ$9`568b>GCUWU{AZY3+yV zZPV)fr!ctd?%woj$5L-@)|c=6{C5ZN2JT#;&snPZHB8TwYfsVfpD*1OpHFWT+w|w1 zU9{f+|3YbQRZ;g2^!ab{|KK$J-_i9~t0U|qm^tm|S|0uU(fh+0_8XIwHb-r4p8hm@ ziNA|x=?V~X+~O;`yX6aCh~W1b{$I6OR+)*2 zY>SFLJNe#^KV>n2af<)${7Niu4!j>W^Wo2u9N`uLc zJ6)56Tf56nxV=7?cuFC30#i`qmvu2a?6%nkcWG+8WqWML7?OLm^;E79BaiT|*HW*F zTm+uYxWss0S}5>Ilf-6DRi70(Oyy-uPY9R9bJ+{l+*2=>g;=ZXTYt!a z$EE*yi7OxH!YfbHl`drRY}u&&!``TM#jZut&Y8!=k7S)@Ff#DhyIZmS^AwXgnj2RC zR4iG|(;P6v_oK_n)44hmex}}@6|1BBA$}Ks)?}xJnah>DdwQyN-?rqP6cwvGKgR9K zFVO>0fxB!Dvz9q8wrf46u`%fDr-L8bvWs6$YI}5l)rNB#F&@i4|(}>&bQ^y{PykeKBKth+TS@g+rxDA zZ@WotSREu)SrT!ZNAKMEhVu{Bdda^@6c^j?b-hCLtwV6jj7s?}78^@Bc*Dc8R5X{p;QYR;-zN-R1HLyCd>7I;&GklJ%EuNock`;&6~p#3Nqu z-P}^Wm=)2yn|YSrox0D1`F{4Ajo}ZS%l~WK`BBOBZdZ8tv}t*P($f`;Q~G${Xgm~h z{3DQY)9%llUd?hl5kq}WadyoW?<9ZlF7dJc<#;N#+3LpQMjpxYe5;jeKbi6g81}I( zlFV6g=ab-qg5qN}9~~F(T(tD_hr>HdJ_Lr_zRmn|LEJOA+Sz5|y<_h7C$DqriBMp>RaywcuE$u?YwSjDzgK(M*D4x6ej69pV{x@(`p3nRliDr2Tl#PA z{U-ihMWuqpk4ese>Fn*k-KmK^A2`xXC2qTSOKU|e_Y2m_JoDOYU&6-~QlB64B>kVU z?AgI7D{ro;I{PcQRp?miV@pMqbh^`8q*3LZ*`G^Dr6 zCgv9I%%9bMqlV?$mIWu*@W;I<&`vmX?I6D|TVR>{@xBK}&mTA(c>L(eg~t+8oco<6 zmLETQa@kA~)~;z9ep`1lFV(4wImCME%QVNV=T!*@yJ`Y6SOa#=u+unGsDFO%eA5Ke zy%%;mNWO|$UuePRnQ$@7jc1DLoB2jpCGA&je}3WhF_BM?w(SlQ`DwKB-Ac!^UB+zu zYs=1lzx#d0wC05x<$oWg$~_G@F{9)3Go$pVt=DB2ay)ane!3t+zUqUb^XD%M_oe;U zSh}WUzgBV9JE_21PyQdCvwF`NL09c}3kA-76Bh1I&RFL&_nEQlf`4}oK2neV95;Jv z@H!C}JI`JN!#8`h*AmQuJnz-JKg_;ut~0HUCAVG@Fxl7lRAT<&8OA;jtxEN`=pGAbNfJwT^b9MQ zWArK5$jUUhZGGoW&s|0}ef@rKd;C`KImf;>=+)~Qt9lPn`uY{XV^JvBjPV zzyBqMOFm8%&&rlsDYf_CpL2dsS`I$%*|FpGyj5T1E>9_BI9YtV;mnr58kc7l&yTvd zA^rIgy?SdA<$DWXJMv_R3Cvn+TgQ1vW2d9b%E{*$61}3+`k%=x3Q8M(ApWOwF= zD>DzKNuRfS`$l-d9t-X#cO~C2=@op7megJM?A|NJiHv<^ZlbqV{B+&CmyxMJVb@nd zsgUTm>mna5INrR++hSkK=Rdixr3cwN=@A0xbU3s0&cCun|{B*bN3=a*Xk8hD}P_%RQGZZ*% z%(N=HbyH5(-5|5afdvcsn`2hK`T45aR^f=|jrK!Anf(1_v9lxhzP^=oz*%i>?}>9p zsq$uQKebwgp6p(yYaxE>VN6e}{D;nf)7OuQ&fh4+Ra=#vwj|)5w>r~-j28YIbLE_m z<;Chf+hsXbHNPX$LppNG&7#fAO)JbdLpHh#EuP(g84%bBz9li5udF8}NI>ynhncI9m?(lNhV z^_)(9Va)pK$Il;`yRD+})xQr~`x|eSx4pCf_hWg_(yzz={R#j1^E-3o&)ILEC!dAW_QY>A|3Ak`hMKFaP8dOiT6w&E3)@&W;&F|-@@`=%|KpQ zXPFA`?pRH2uiVp*o&0X^+;!Y9%W+EGk8FR%vNxJHq818#`=oP|eSR*>{%`M$UbpYF zx$S&ExkcpMM41wYYg9;r-Wzj<-H6oW59m>)WjhIksM2`u$bH)SpU*FSi_G zoLMo&wclLj_{Xr~32l}Rm)BV^W-BvmUwd%|DVRjY0j%(VrWCG+ruQ zwqmlO+?7dtwKq7T?JljnR49`kf~q=Lui-WHOL^$oDExAWL@r&px5XP1j3G zrfs$RW`5?KMTO~uwBOPPcz;)a_!YnH^b@bi(rpLJ-7hL;#6S9Q@%;9a_H4~8nt@mM zop~)E-0h{**gw5Ab_biy^XrY$r!yMPzc^sDuPb=#8(*gj4L9GX_AZg-O7+S2c>Cq` zU3x?nLkUESGY|Gku%r!?XR>7p3`OXLgu= zX=Fa)uDE9D)Gbx!j@`a)Gt!!_aoBC0uJJ>&a{)_LkGI5ey3Otxt(&bxgkv`uTTMYq1=g#`CO7h4S#{Y4UMTudeo z9Ot)uG`n_LqGI~I|8w)Vr!LsC&dR|d|4Q)f{*TG(;<`2KQ~f4&-C>n~)z{^^Ag<4D z{R{i>M)%T8r=8k6H=hl9G`Tf~_mz9`nrj+6X7G!j-IS(z_F0?n_uJFHE#i?4JGVVu zY9AZNVxdzKrtc!yR+Yp}=AHa8HrwVw|LSV~eF|Rk2Q6JBTBoOMP7e<_kZETwXy<$K z%L=FT<{;^*F3YE~dhz;6eq2_2hY9xql z{d;7klf>=zj?5Jq%FO5TCF*aVcu*+sQ~TMa_3O`+l~ZRXAG@=%Y02W?*1J!W!xA}QZ2G3&iX(7A%5=9Oo@v0Uz5DD5NXY(B%Lt?7|r$)Z!v&+A2+wj8-|ZoY)n z=b1cr=Dagu{J$!!u%}(uyVq6IbBp>^U*-6sk5%gqdIxj%H}2mSGk@pN$uG`nns-L* zNP6l&wd?ltja!+Hf9Ob9ZMx>wlb#tyQ*v%@*^;t^X|>Qi4a;_}HJbu-Z_oCd%-ODV zS(mTr_|z@VDpG;d9(Gx-+n?dVJ!?T=mAa_LC$^8jE@pN3xg5K7`?A?y&S{eW%qus9 z2Ww@X@Vj01Du-3kxUo>n^z`f~3rj!q2e)%NkL_@}H>c~wqy3YnTDn*5Tx~hg?2PKt zU!P7HPIF#zcAx#sv_v_hwevYncUsTVd777Wb4gL_p^K(&H+px*FMM{kK{av(Xa4?$ zY65E}A1v6kCiS>QgJ8%^(L*N5BHEKrt$Aj!cYkB5-jc~Vn`cB{3N71Uve~5Ky2BnqqwhPMG**r^ri3$``e6YPCEnJvF59SA>7}SNSPN zBJ9d#T`c|6YOCPk{EUPRKw5G1dgSbObXXKo#!zx z4Kr`?y7s|}H=jvu``0zg<{anwwx!&22iw%3Q|^ih_tckvPKo9_wd&Z1DST@CVizP& zcFuVDkx}DQO_ghKiX+d4^oQzQ_fK5kIlYokQeo^kqOx zp1MKmODm>ezr!(t_kS&ruu7cfk!|GmRDdJtz}-#10~T0S?^q(Z(l4#!djHpj2d4Be zP4>6F)S}P&?BLNHG0mjZsh<`)sP8#lbFO&5sL_0tS2@d_IVvXigt~2C@~*n|*%Xuf z$Bo-{^EX(gh$b_vj1S~$k4QM=_cidtxjXZA7aUm1zFFYVu&m@dF)_0G-)^sM3(xHc%KYrRa7rH6axHzEz>cYQ(JPdUpIII+ zKC3F2nPhlavEruB%SmMcMc=ch1xY$Jx2UFF?WjIlz(4die-@zh5nTXbo8yVKW5jj8dkp0gcYb?m%ZO!9O2dCj$gx2+z$Xe|}* zcy#&X>zd~C@&Rcx!w&j3JbTB=VQ}@&LYGU=ZU$=v|Fj57QZhRi<)iV`yO*tDx|HvZ zD>s5oI8$BLu3ahZ<+jF2u1IEeRP?jIsV=!cX5X~aae8SITG4$^wPwN`!K?L5f=YfI zEth?BH1=2*D-2fS-N8K@!b!03&q^(IlCuPye5wI z_dT}7w>JbuZEOFkD4w;NfBm}R$=b8|>hqkKp5BXd46@wAVHp-3!`+f9ohaX6ab+TZ z*GzM#kjcDWi|d^tyHEM>wFC!nbyb=^nz@4W^Np|SkLE9!aJ26A)160NzPDrBI-#oO zYU19_G8)!fe+Vv^`SZ<&>CV2@;UHeK+9J7sM@*}GT*sT1z{V4sd?Hg< z1o3Jc3h`)l3dSv6`H6YrVVQqUDpTglckJ=ndHqK0&M(hTifjLUdwGvf*pBZN8!lb1 z*|16ad)ykA@UwpsmgXKi>UDd4!&KkvavOzq&tcyYpz|4{s5%$%{pVddIL(}^1%N}9d3Sf3QB`QIgOs*?P<fXD%kK`EU9FrHRJiri zymOIZr{cfA*UAvIwb|dUS5&{)T-4y5tl0xb*6GG->JC@*+689{y*2IJs^*bdV3Dz! zUDI|etET5NhP!cRCePY%O@#YhT8iu2p8>*W^q$LB>YQc}dl+C-JhlDLg^R5b&;7cy zZub1L-So5c{okEz=@ITOUOBa|U@L1>?Y!pIKeBIH9AS~wx!MUt!MZjyst><-04nWjsQF3Ie;`{pfQ&!%RpM$`FxDLSz#7Za-u-yA&K z9oSP7cry2PYtL_}klWmcexl?{qby49dOFq_sV`@^@&oOS; zd|EEz-E5VZP4Szx-Gz3ayig&yL!|n*zJS@&rVU#B9O9=xa3AvYdnUv(W$hET*;;w! zyY06yUG`~Jh&khSF}W+4U21YkTK$3YOYc~gcUhL1Yf0~6+IvZ3L;8_tTV3^*Rhn^} zlAL$S;HEt5HdVIDAN)-&Ap$${m1amfKMbDW#-6qMlgXRY3k2WZ{4rzRG}o1B3R4_I zG#}-lcItZ*0E*?TgXP)$NP?6&+Vj`6YI9;%5CglQf3 zH0*oQvQypRUB#S+ zr~ICFubM4Jr^qW~)#vof8wx_jL>vvWBEOzk{ORP8on`gGyEfc-W}CqK)tYr>M`fZy z+0NQCvz{sG7yAn4%~ljBwG{J@4P>Zgd3Y>#Q-jWD9fzIafls=sSFLJrT`)Uv(Q_U7 zx$Y92OMi3JE%>-Ffn~X9Q?x~Em12a$ZJ8Kjv1GOPvwzxD*}UM?v-4fQ@-y4fSHG9E zUdf1;e!Q54^DwLHa(>Rm`QN6uT;wTk4Z8L#AkRWzirA?yhg1}Ej>=5<|V$4Gcj=%-<8hlKp*R8?)i!5tJm~1O;}x(wYo$|T70Ts z(_^vyl@D(;B^Ks7`}^LmuY0lMXisFYO3ArUxA^@9HGvVF@8b*pFnnD3o4upF#Ve7k z(qe|u3}F`=d%@|(^-o@UD1>c%Q-Ks~)BRnX7C)|(1vLDQ zGAMj-Bh5qDL;oPlnyoyVX0BoCUcaKmEVF*P?B{benrHk|knwFr;KBLL>o2mGs%%!g zHgU_!p0dabcRb<_9NX*n@Qa=NyA~rBMSix^fi7G2o-ki_Ju*Gk#IZu~@uq!UOMl!9 zY&Q4E`(EDAEb!@Nh}MybEDr@%ZV)@j(3_G`N~)Oz{zJ8GDHs*Z0f*30&*3!ZxD zxbA}Tz8i-*g?LXLG0I_GJ8h?`3Fl=c6-=DFar7?1p2yB9BO ziwwEMdwEh6|EXn>kDpmq9J!xo8pmxqCA4^^z{P&9<8P*441FnJ_5AGP!;+U?Km8#& z^TX30tM|y{r%ktP`DmJx&=s>_j+T?r?zEjdXHDPo;86DWGwC1Ro%K2{+n4n4$L_Ar z=k^3YESR?E0^gw<@=-?$KK}fCz|>$Ldkni*vQqEj`8PUdZoPIYCaROebaIJlyY=$O ziCL-F=B#^@zUr3L%(dEo*Qfg((@AsRs}kFE-144Zg2U3AjyIi@0&1SSzI~XZlV*OO z>AJ!?_s{x&p9Og;u#0dr9LoGD7pMB7&Hv@92A5}<2^F(DZq>#m*gl^$)kDhLE@_)u zOHJ9;%ncJ=S}HI5|KBUN;bG^K6!En7<4a!UvK%#tdbvAb*NOuLCd(`;?wGB3aeBw) zfD6}GKRuCAV$plx_jcc-XEdu!uH93wka~77j8|M%eTtN_;S4!1X=UD%Yrb5ppU2fz zf3GIpe*e0NDT3;W|3SKk)Zu^IrjmzaIN&hT8gVvcEl5=`+Jk z{pGtKH3xWoRIZ7Tnw!3_JN%&LjEd^Hx7V9;%sI0}&px+SL{fgLWc>P{`V;r9d*)|!E!)v;=eFPY z`FZKD>3?o-kY74)>L!Ne`7gh|-2A_$L;T&}m*JZjaz*U~lx0?b>^cz1p{Q@K@~llY z>XU*|`{YwehVgnU|1Gr6_B4)RnQEA3a6u=Yby@V=&m!Ay9%5v^^N2 zGyUmRzOJOssSCe+RDWo4c5OV{^9_6bj_vP$FEn-M7w(4Ow>aB@-*3O(ZuGH!YM)8X=877|2}gffYUJOb zq&1QIa`5L$E;E^@WshDzzB8%h@UyB_QEb`QoR8<_<-YlNlIi~TAJe&)g|TeaDPQ+2 zca7YwiA8yv6s&Hln-(luKWF}hb-8cm2wr%yR7>c~wL@$*vZiyn zPeT-#?@SC@sUv-|HDig)IhCz(S=&CwCi8Fk<+!oSzY*SzO2 z%Z@ax{5Fg8=R~fW7L_^rSyCa+f(i-8O8Lbl+M4vv9Nf5s#U;chKI&L`&$-$qIve%b z@@`5l(4Lu_dhFPpvU3$DWj5EAO#CUNuwCiXf`jX&Y953%?zq)f!Ftp~s41x_zQFDC zg4XQ4IYE!#Z)}c#_J`wj_=q}KD02~ykdK7YTntiFQ=s}?x>pQ>E+5&XcO%9 z^3}A>@150RZYbRf-{Ag%)j0Cax5`|Dw)&rLyi5JpywgxxbItk2`~{7v<-DO=SzGdc zPd2_`^?9;!f_iRU5!k(Y&^HN3Co5 zM_&2y?|72BlVM)x**lMYQVdVdNDx`ED@(>T)a~z)o~IRu80}UGX=&YjEOIOFyT${x zh37?G?T?>&a(|{w(~0xGO0}6M<_8>c^IK-#u_jM4?sm|Eohb*_J^d&A@!l23@Oipb z^);3|1zD><6)ofQcl2C2Pe1P0{$rnyHGWt&{lxlu+vFp*>pVI)7&URrU0EJncDj%u z&&qdy<}NR*ysP=E?sTqu6T={N^vU5!rXDrj$N7NsXt~^=WSmR6U1l`6meQnSNpON^B?1sp1@{3 zzU%J(8Oj__*3A4UZJ2!9BhEQ*W^!E+Yu(*XYt;T51O!DY30TycYNmHgY|D7Q(Os>7 ztI5Oc%d=;D&F#7%`9CXh)k1@WD|6=;G5_Y+;lKHh<_|~vqHH~<37(6-vmU$uZ{hLP zoXh@AD-X{2R=VU2d!?sOe$XzSIZcAK+n**JY1=$6Ss=^f%Xyaa?z#UDZ`$2B=ChxdOnK>1 zzV^)21N%JGcf@_~GoQ=w^|krj4XewJMQfb4J(0vw`DW(x$>A1^Q~choORHIJrlb#ib~j8k>k~DYOnV-wzB!BW-T`Fcap4iEuDDfQ+|hORn}Qa zQ_Bekf6m?#*PHa0;o%FXo7022*9c~R)Gsp?369;+5Xl;FZF0h_MS&MN7j^#X=-9gG zyhobmbjImvmkY0YxM?Wyy^Kuu+4SB!{M5~fY^UP;mF})|`(|h>^_1bU*kOjnpPd^P zGXCIgKN?}TXRu$4+`NCgzbY`+9Gbq3TleP1Dbk^nqE7`&N;jFUj?mm~^qSk^ z^G1i`lKhg5#yUP}XYv%(ZmOaV%9jtjK?bo#c0mm%qswLt_cRWfz z;&oA1;df`n2KHF<2TOGdFLiLu+G*?Fd}n6qJe4bxefXIa&sAlpGikn5W~qMg?CmsO z?boRa6?1~`UN_~nKGC$mqq%p5*0Yyhxx8mDhG@E;-@*`M(j642?78aFzEd)v?k&=} z+NN~#`S~?HhIx8T9Jey~#TCD)-b}k18IZr$c1g>zd2ba}`SvrN{WEW-Z{xD{A6Eyt zPW&@CF+;!S8M=UD1G0=JHn*t_h9oxSA zskg7}S6vmxbN#K4x^0 z;oETazJAHZ0o%l!BLchX>tdP+f9s0z-ooi?PVEtrNPY zo_^}dvSKQW(B5eRGeW=m%(m5fcRidn{lT$TuX|B$y*soQHmnGlyXowM#lfA5Nv_&0 zSGe}H$#*@8c+l#V@$1!JqbRG!{x6{q^RE3}x@6t1GQN1F*%k&X^%G*VpZuN>xUo=K z?$5g0hg(-fod5pzpsKr+_=!tqpAYX!nZMNi*$s}TCSL@CxrFy?Mc$qIicj|BZ(iYc z)~*>k*;3U}f^laSCU7$|_tkw(EnlLq&qCz^3b*7SS!KF{BFeiL55j*C~Hm)GEYwfJX%ld8hUo{4uq-&uZmj*C~s zM>*LC3;F#oDNRvwdKmNRQ-YUvt@!3y;j`@e-hNq?{wd(-9sdZ!Kt{i%1rC|1b~QO7 z(>Jfabfw_>dWH2{X1zW;;lZ-?;k`QS!Tn!0{@!MlmUwcnTmE#FhRvai|1xi0b?o4~ zM(&+lh`)}M3gr?}tLopE!L zgsKa&nlG~YOHZ|{xV1*)!ID6nU7dKt4XPMb% z$F&wtI?%gFkMB^{A5-~f67%)UpVh4S64+~K^lWxwkM92uohNM%&VDgZe1XC3uI6>i z3=|_Zn2witFF5z_&We_u6XKO_&roL8Gl+gNUutU1msuw~*0^LfNnMupXMLD$@pa8y zAMV*T_wx0=+^wvyeZFV&lS5}Sy(7Q#h9w1AJZA{ov}AH1)6a;P$s78o+Oav$i}ejT zRAO#&z3{9zS-k<(OuIWNYm#J;?&bRBQms%Qxd!+An=&Jtk=gUM9<0lmXT~KCtr`Tc`RsZ~P4+(GTnAW-V!rHzWl9zNEd_s)cxGozqY@H(}Ja5B` z4`J_i@T{42>W()P)2c_C-CtTp_a>FDSgH`JcF}E8gy`h%M-{tvv7NZGqi$PnNWqsm zQ6WBFe60nd7Z-ZD+?i*;eo@%X7=PA_##3Lr3mklzxvcuRmxgWSJbgzWO}21F?cEE4 zTINhUvU|-LF(*FF4_!%?SL3%d`mcK{Fzv0|iX#Fy<$oM3{K>RmS@qSEqBE20u1>o9 zy`k&=yE3;~G5Jl?euWBLj{9~q#<+@e{gvhB*Z+Jye*c18%&dRE_ka0Zzy0@_^~O&Z z&HQh<@ZoGjezBYGTek?^bhe*mU8PrJcf=+A6wl)yji&-GEJ^uZ<|#7y{EW{=`O6m1 z`*c|2wwImCP07~_Shj3QW%Ss7*6=WkxVGk-hZT3r7yj`IxWe3)9O8A~Gq|qvyRLtL z#KDKJAKuWae$*R!{>6fs#kscU1Ky=se{5pB_1VTXzOmGq%Wu;vhP^AJ;=5M(#Y#>$ ztf+YZ+D%QvZ~f=CJ?Anm=SQ@#h1R`3B+s_!*MsxRM0_It8>o7_DaU`y@YYJYR{h3* zoAp)QX+0dTCv~`Xc<;6}3Rtyg&P>$2R=pj%5FWZq0uZuVmJ&E)VUxWbuCbzJ9Mw zXRSJoFD>}9Ta(59MD4*%H@1IfndS4^xp?c%`CN-q>*`xKKRtH7dw2A|zqwKK#Z~xn zzFzx!qT^Vc)P&}M41Rf&N3$|Ge3!=i-tRhg>bvb-ix%s{`*~OARg2kfT6k#*%bBg~ zCbu^f9E%jce49fxV%_$F1t|-~in&6(8JO2ytW?kB)~>cnV_&j0b*16qhhdXfh+GN{ zwrHEh^l93&J!d+ny7{HHteRb6^Lzgh<74_yGT)ki;;EjP{@CYI&b@}>3GFlgI?A0F z5&y)q{hxHDm+&W^)^oaFL(cBhUhVPr)Exnnw4GP__C4-vI~6joF?#1>-&f7z7m~l6 zJE@bCSeVRNdFz(hi!jea6Su3Y7OKw?ytnh$uH;RDyG7?@fAA^mOLRS4rNNQ6>S;^i zWtAxxAHH3CUOJA$G1Ma1)uv*Gx%>Ky`+B!o<*#7)xMYzRcZ}gt;SjfA*1OMs_3Zs2 zX4KbzFM|*2D~N zVa>Vvq9*TyR6A|B+%K(TWv*0<=5E#7vucKT))mHer&xmXXE^nUur2&NHM9JR&77MO z7yiB~J2Ka%{j#97)#B^|FZ)y9?w%E|K0VRZ?_b6y$-dGj{h{A{T>eOWKE!#Q>GG6- z)l=;^Su8zTvuuG=&WR|Gp3u-&Cj{-qG9PhCD~29V*tmM1OL~>zwg)?({n%1nVe8_a zn_Frl$jI)~d#r!$`wtVRd2ICDv+dGn=FGeQ46<9Qs!sG2>byQFm*Mt%Pi9s}xf2YrA~> ztMZ+-!UsY%@1H%85fplAermM8dF!D}v1`enx6Vu8TGsx7hgY*)HY9?=x@R=relAmz4)=BG6kVIN+r{@5;|=oJ`WchYh3 z_4|Q0HZT9s5@nc}87wf5fmO@uKAYP|g@6qUuOB#fZ2E!jRqX}4gV*28tu1-Bwt;)^ zJ%7j0u>M0=wzJnB?eMz1muFU6>H3NtHfOXmC#&DmD_nH9Pvb|&ri&{gWD5IdF7GC|Ac*J&FOJ(83o0G4nCupe0<;NfM z%B;#t4`{up{hcGwKWz2&zx%i*JG-_<8g_;|KD?H^e^t-Z`}5~S)^hEAV$8+2CSt!% z;-00khks{DTP?E9QvZGZdAg>7#OvL+WZB-WvRT$6y1tJ0&&mbO>z2!ur5rT9EEzZT z9C!bzvY)^C*Q8I}QhDoxkfugego)0S>6N8AiMETr`_&6wW6G}*-?VF6ou%ldU0X_j z3Wb%)T%XN#p}vs!$s>PcfNp^T8^uy=Gv-juoWUbcq4(c-HX{9SErjY zPr3f-*gemCp7kAG7g_!Pq`WAInjYJ}=$mz{&4Sula~GuETI#DcZ^2w&(dp)QOEz7c zsK&k1)1tpGr%9-P{;RewZZE}}e}+$gyy!So=6{B7w=A3C?d=D4n?8P_c~DY1UfVD` zyKcoT;iCnzQvNpgx5rwx+SShfwIhGywM)&5Pv82tv({>bx?)AdZ-b&z&A*dFJnsj& zSicqi@N`OhqKABY@ItS+KR2p4MDLdsh{;0*Bc^?aMLYT$ z^HkCNWp?Yl??yTOT@CYUHDRcAZ!wXD9(TGX`t z>pUal!yS)5v@Jgu5}vAk>%hbJCs_Sit&~G6=Sdl}{gW+z%MJCM>qVi zZ8bDcJ@U3!LhC$7{gouaN%Qu(tTOC7e*9g%_xVZ3?*6+ z{5$*NQQ0Q}t%>FG$&P((JV8$;%l#F#-C8oUZEUwY{Cc78@-euj z`0VDO14?PpvgXc?ik*_uS647=D=pER+?Ocm*vNl9_;UbE6c9^H?7arxWJP=YVA+!B%L)gW&1T{@n!ZfA~ea9XuiThnNv%;dD_nXSAklg$=) zy3d`dBG(<;sudPi;ifieYyRQ;A1czCWOcibb=XyL^3N^!KKt+qWibX@V>79$oUCJM z(~BOQIo;FceRF|`lFb99C*_szj_3BCtB(x1(!cny*)cy=z z_~G2|g*P8v__@@9q0Q>b{HbD#4c2&c$(vj7u&n)hZ;D~c+S8%`z8=5tqy6vjlmz?# zQ|8w@Yo2JGv45sh;+4=Z@f)Y^df=rJT(PjoUAVzzrMYR#udhZ|T4fC%@+w#_W?5%* z{M2X7n4NdTn48mY&(bok|9ph^TSe8(r8Y-ow%FhJ?jt>6kivMkk!^^=`? z?&qGE9}hovzma>_b!OT7Dsc~|^_6Cd@BhtucRlI0-N!dK(yQlu;Op*nK5OvIvvAD? zzYm``HlI-4zqNVYLs{EKA5XOjzwHkBz2vx;B`osa=x|B+#`%-veB6q+%@Zx(B%&P9 zztSOm(*rC0^!XBbLWtzwGr@q*szVgT-5n-+-F4vj2_f~D4T$U4h`U?Y(m}&O> zdAkB*BNt9HR(;cAQe?ULi}Q?GT_JkQPqmmu@gE|=%DN-a#x_BXJ! zZmtZE7u$Vf`BEAGSBeXE2<;UYT^jJfOz~_*_Qh$_u9d0%jlXPvsCYA{Zm;RGoc`1K zGMCTr-Cn-Hf9|;suM9i3%ys-X87EcQxgO-U)i_=~eWzX30@fh@KZcKE+hXM;S=R?K z%cno);{Mhl)37s$x9j=Ox7V2eZ8Bs0uVxUr_EYkExjJ&P`=%n$jc zX}My(j0yLz>2*QRm&9Fkd)NHrn#;GG{j;hZ4)wnYn2_Aa>6_lHJ!^+R*reAlRP=Ui z{jhq~g^imZc`Zvk9iXsDhkILA$eWb`OCvrmyS~OiGGon-`D+5=16O9L?qZ&&q4l;> zOH2OjjOrSfX1$O_8>jAnpsm;Qt+Rw$$=mPe3BRvBGymkrkZ12VEwHw`&u**6F1&Y%Tc6{d*;(^% zC?)>Aa^P3qM!}G!t23Wpsz^@Np4(Wu-LxZ9EB)c6HqAe$JCtAV*rn4v-FJ8IRBj#Z z2Y&0)Pin3c%`}?xbFxsQlZn7%_xVRuuE?vZPS5-KWJy_T_e$PKYdsmMZkIhVv->`p z3j{}Bp7b}l^HIl1e$SO_W#vu(=3h@S&e|{0Zl>7w{*~SY{i9z4m;BIEmpuExt82dK zeF>qGEb*;IVLLRlrcdpxE&Uu4fAv&>7+=|(y7`55ZFk&zR$u$(aOjZNypCHF9A?@} zoad=G?2CW;r*(A;r*rBKA*bE1e4JVQot9sJcmGST^NU5_ICM?hCSLV26J|>2xaC^* z%VF2*cv;RCmbleyqTdzsA8JJj#2kn`tG@etdj&UR!M0!bc~5nBTwt4A@r+s9nyu>0 zr;-}M9a5%p%-bUQ+LR2`S)3R5r`}P!X}NLU`b383Dc5TZmOdB0{r<^y#eY&q+W7xT zv1~hQzT?WwcH>q0Ig-YF%d4;DSDdZv>lXg0*?;;h$FB+hDr0grXTME5&v;28XL;(4 zX^uU6AGy!DSGzhqhSz4B|Ms5RFDVyx&0b&1Y21_)UVZ82ThYJqQ)M4yZJSoHg5RNM z@0s+@n@ZEv*Jle{{d;|K%?-wVo35%iIxFyKm#@Al&@%V&%l&&8bWbo6&mnWF~FO6X{e3j4eA`C%F*mhau&SQHj~ zeat5y#?8j$Db2W6_gmDN|T`hRtDYm?@!WY=8&&6<-geTx0@eq!%_x6Z`r zJde}r{%gx``dys+r>w?qZ{nOU+h4vvD0Qvm=qoSgWzQ>XF70(>6IXvIdEYJKpw92( zGP8cO?@4^MYv=Fk9p)i_8FH++XICHYtX?#+V&4CEMS10Ik~6Ii{Wfirz89U5qTyxw z?224ZzKKM@|AuWEC&duVVJYL_iWH~HU za?dNX_uvcWAl2@TAG{s3lq%8Bqr8r7Wd!rQprnf_M*A+5K8dqA+LE;JPRCaLkk6eWeyd+v7YXPE zcXyg!{kUFz;q@sKmL0OXTpjvwLqdI-w9dVAVg)|CG_CI*VE%jE@~7S|g;1k&-(|kD zi>;Y+X50JP-H9)D_0K!aWO2oO)uG?(9=a$LpS{1=!~D{wHw6N=-Y;_PO^af`nvopi9x)}!y+;|>n~Jipc(8xFnnS`wzlD7l z>$94Anhf{MU=@#fuA3Y%scEvH@Y7JgZEEvvV-7cnCf>|s`@5J^S!d@xTmA`ZMa`#6 zWwu|e=x_<_RGMLD85KY0(7HJX=9*^i+4pvG=_NaB&L7T&Qm?!V|GZ^68b0ra#G;DO z7hT4GmRk6o6<@7YR-ems-||M6sA9C^Tch+jdt{gwrl!i?c0axSaaom3dbPXg@k;S0 z71MTP27}*-zBE>_5QSwe3T)XwO34 zg09`k6Ykn-#GU@qxsy})agLz5q|oC$wl!Y1n&AQ^P1j|JW(q# zm1QogVnZ7ZGjESpg*W$F|Dn}>eHxf>nqek*)`>TQW@&rdPjwfz~_)z@)lLZ298%ah(o zGcOnUr@!~}aDC<0F2;A<=gQY#=2!Ck1@!;ScvJr{eV+BE)As^S->^+eiv6(qRP;yZ z&RtpRYI05c%DjK*`m6si%x3xXLBIXJU8Ri^i`R=&K#>x=Fr{S+hHZ4+uNPXEuVEd6wo^V3P?kFp}m`Suq6_u!nrwPjzh z%1NzXH9?P_i9Wr2(M@N0kX}yh6Q=E3W6ihu>+HRFqQQ>4g^MTTWYD~S7mhO&)m>` z`y*C`kXM{b?dAQ+>9CS(mCKF^=_HTQI}m;cnW=5_#|&E{kG_Inv(6t z%Ri3&li9W2b)F)}3^U)C4EIY6J4)gvZmW8HV|(yLrSc<9{~QAJ{y9yU|8F+u;>@Mp z%50b4Ydrn=Z;kg+X`$*Bogq2yA#XU(owYs0>$)o`ZPU|$9OKKC(T@eq7e>UsTN2g# zS?Hs~q!Y6W_Lj-*{LIq6^Hz6}pv#syvt624)z)eX%(F<5S?c*exQ(^(jcT&KFXKI% z2SVMki~`5)Vou&@o)}o8{WkJ@JS%(7KBW`xOoF%F*XpxMYft@hf38AvUHB23RN)Lp zE%W;w>)si4EkC+jaEI7}@H5e;W;GkS^1kh8x^ZmLxiXoI|e9N&8*lckY(>V@lcLw+U(0U z->;o2?{Y6r{mGHV66Bx8-YbVJw zpUn6C>E5%YP5;xBxcDc&=QZ^|E&0Y?`6Em`bGuF8fw^`z>y3}FieBL8(|oe^^5Ujs z%}?icGBsT`=4d+>GCmc9EhCZBJS^_(pVcVw@UdJL{*msO4PLJ<$5FjP*&<6OYUKhSFa+_8140 zJ=UG(6(|xh$x!~qT~~Hv!#<&9?U?@rc7y3KO#`fpd3bAYd zqip<__aDC88sEA)r%Rrwi&}+z}zVb|j_mMkq zZw7wr-M8U++@G5re$n%oQ`WGmDLi2NS9pwJ`{J`A-+v$SWqaQ`TY3-woo5-7mTYO6 zeEI3~SyBg6pU)ICd0A-`Ub~4i`{4S*U2|pCPq)4P7LnI{acbsT^}71m59+D38%u)`c|#&{I_>K zm)Mkh>UPV>t>)wsO~Ibt1O z7;yPO0Q-j-I@iC=&UX9pP5)yD!>iL_+>b7nI>yyL|G=64XZ!I6y?&7m5}Vv59_4;2 zR<=F;^3+b%2duu|KW235tjM*EDl&e;>!+(4v|{NIzI~Tdm~@3+|LB*lXRmAM+R|E( zb|B}+f*^Izl(`pJ=T$vAGVOHA8~ytqrfSK@=?Ys!DBa!u%P4xHcZE~hevUiqtg{xp z=~?}$cqQYs_dTlTx9fDBTc2|LeAGqpzikhdXL;_j?G$^z?)KlCV!5e z+i*7gz}zsaeU?RL?y=`wK6z$#M>hXk_hpVTpWe)hs9(F!-r&~IJL2;L9i{tyo}9FM-l>|h z=n&7UJ(D`CEY}IM~)=B6TFh1@^CKQFsFt*;?6 z{O;|>Bd2#i+u4_7zv;{ioxfYHO$~2*u?REl-0qO@(Sn(Co`Qld>&rA-&KE1i<%O+( zOs_KRF*3~Sjkh{ravpaYoN_4p(MJcC{FHC zM)Sh!)k}93Ob`%G)#I8__Vi@b*U6RB=geF_RZRW1%H&;>^A2xj>Do8xk4$RUqG?NJ zE9rS{(p{Ar)nv_ZqeOPqcC~lYjPm2HtK5AUjY9*LKUY1q;8|>O&GCQ(rfWTG8N0v$Z#k3_=Bxq4O>4+K8fEd>>N6G;+-t@n4_*uz7;CJNoew9T({qq@LGMtwCA2+?@-#3*- zF-pIr*X=sB*zTv;?bOWd_W4dX|5~02-WVLwTy~k)H%WJXg}2n#@`;lt)~>tGxG4N` zcme0rKhs1VV=t-BThDyN>-&?emyxfp*qy$5uFNl8noaLV_|`oij;&JVIC>*++S*?Q z97_WKT>r4}@X~YB>ofN8FtYhx+qBs@G|lh*rndD`bww<`Z=RUG`?mdH;-|s~&p$K7 z+Wel}u`K9-c*hnmg-37Hmvyb1{AiY;%d?%wJ6A~Bn>d8J%rTsun>#(o!~5}XEl%dk z&o_IncYSi>7$f7u?k#87Wy>e-s?_=%xx^+j-PXzLw5y`&>B%>jEU^`eVbUxJeQUXM z*T?-yoeO7g70PRkZKznQzNppui|gku>)_NYCw~;qyEffQaP#BSnv?6?LfYrM&TQG4 z{i*23nZ1ji9aU`%KQ0!uT%%KSd(XxPK7q`8duQB_;y5|CTUP#Xue*w0v|*>rDpt$u zA6lGGF|I#$=YO7rvXH+GyS!^TdsAtzWd5}yN1na?ZF%7Ik@?Jfe0p4Xa8xZnc z%pv1KR#iditA|4W&n|d!!CKqxq^0u<*B7S!ep4=MRUWDi^jp%j!u)m7$15|<3N}U` zxF=JoB$!lubbCoQBr>+`F}Ql=MmY2Kg*ol-*hA;8^xgYp zw}O)1^4aMZKONR+c+P*>-=gboYt0e|z3sZ&Ol^0Z?{K)R?>Ob*vFMksqNc^?eN$(L zbu4`BWn6WFA*SPu+hddF(#0O00^7ASt$f7ZPubRJEpRGIw>YG&y?fWjKJ9GReXb&p zF5Q%QEUaG2=YBWu^ZnO9XXqMV-5GiN)-|h@(Hk~9q&;{a^4;93^Qtv&m5oHR=!=%xP0I1^#wP6ZGK~8Z1}OrznuG8 zsneH*@?OE$+v`epoPIgoZ^74RZ?b=jr%BE{VRyGJvFyYhU0c@udU6#9TV}9atJ$&B z+BWd{rC$sD)b(Gb{qMGNozT7O$V1myDTiBb-amHUUA%td@?|Qw?Ia5QFQ#GDM1_ibj=(kxGe3EpfdIW$xHYAyTYH-(&! zcxzQ}ANzTD+o{x#jkhn|imCon{pijA7kZnOqw^%%mKh1|xwP-e{27c*A>P|h$?H|W z*tfUifg*$MTA6*$1%3bX?8|f31l!gB09iCzmY$?8Omn+W~&wSyC#QdByZDB{R z+&uo>HN-dbVcPBkVrSTS-1e^dXP8mpSwB6oXIVzruG}umzah1UN_gdLm30lD2AJf! zvn=IZ;8Mijck|l*B&}yF(u7?u=|ntQAr_pvWXI#^>FZ}3@BWnAsJx6%(&)}cLnDVX zzS&b`?rbVNnJcsRLXeN|DeVUtri-5HK66FP(`LJ$ zCEgBvkvO~K$3|c6uc@=I{U}MBeO+7s?VZ`(R8 z?1pC_#9wvObKLKw>3HI3vz}O$vF!AsXIZ;?qbEjqF7Z^3s}Xzpb@Nm1v)L#dUSf2j-rFm){yq&Ik#0Ve%n{z#B7#btM#C4!#R`RKi58Zug`|eR0I|t{`z$v()8j^-n5p zYWBCjxLfwQ<+EDU#npS1-PY*6IB~bOBlG_kjcswyG=Jxbnsm(3wy?i=A$Ge&4xm{I<_@ zCndA&u{yL_OP%ljS}~FBLUC6$F1;(5{^|PX3U#*G+7CY#FPpgNH3z@-hOM`I`FPrH zYu7Zr-!XN1K2M*F=fyjc4+~^Pt5;m&QA_Z;o5Ws!&o}mRW%K*E-+UD%n$C>+ZwkL> zx5;)|?dd*KHSzGOE30b)w(m^RS@MRnTXV0X7@O`BTS4ybC(FO*D(IziMCWXO^`&7$ zT-BSu-uyR}cwSn}T)!jlT!Gf-hcUl-qD_`gnsr!w?I%4E|3;Z_lJ^#;T}+mLc0u`) z)N`qf7u7Ra_NAvzcewq$_RNc8c@M0Ob?$!TiT4sey|yrH`NgJVJKZ+S$}0HOdPrH1 z-)@uajo$uO`<@+UKc@LyzUIa%r{-#|?Rl>jU6g%VsPW0+ko)>LZog`g?}2-J-RUcNyp9Zr;&vkL`o@8n9?h>Qdli3d@cMgAu<*dnodp6L zInR7v_%L$w<4rm;YgoUZ>r0oPWgyN`WqIak%w?;4cSJ&@WH%-B9Ol;TnVZyNdF9Ra zbAMu*G~X5qZ??-R-#hP2-gmM0-meem^}mUKp_e3Mn)SkPVjV|RoIKl#)j1abEE@9q zzZEdBWpOZT@~mDvW&Ku9p5*M{b$W|a;wHadzN4ooXhz}3hkYwG?_N`sd^q*wZvHo| zeQP3>cfV^^E5FV6Bkp(u+XpV=5Bw{OWfQi@Fvs3}-!ju;o;b5q;h(B$(Wcr={cA=0 z)La%`{G-+5{rKnAUPd`%!wE5>ausqs5hV)+Y}f1kjE%efiJ7g>^D|ps-_4r>f=+hL zC)u>LFX)`v!28mW^~d^?jLS3&vNxW&cYhhfUWwp!3s_Hh*G^+IS;%!RefoauWS-+f zE7wm|K!BV-s}I84hUS+^ef#l^PAq%D@z*>{GGH%wQBPA0Xx@)6$2iL9dw5fb?NY`kQ zQP$pDXRoh(_H5HpliHxb?H}h}7uw~xA?IwJ!h)_L?@y znXhHbNSUEz!F<*9Qu(%>=hsaLY%2|4?3r;R&fezu(&F;$rx&(q8>Qr=UVOx*Tp4xJ zcl`&0+zqOeQa?nbiEY(XOBOB^2oC=sW%k*WMWMd@{GStV)1SS*^eSI{R@iC29oyDF zpOyctU3Y8sv$@>Y&saCFoB5sR(9HXnce^VDvwYMEd?4Hym@w_M=p?4A%?(aZ4f6vW zvm6_*iLiV)f4Fc>tL>h{yH9KMZQ6VIRC|y5M7E{eXFNX2`8UaK^02;h=hdvrwKIcK z?k?!Q)V4k1=Z772CYyq-_k?Zi)Ro)x(^ULQU>a%MG3eRygV)#v-V_WB6Znit$rkFSecojeV;H%lVbRruETYvvLTZ@D? zh9;?vT3LY~wC$dX1emh+$S9oHJd-7i@BI4EkCIGxmUr?ly}x@=K;lMSweLS#+ir+0 zzn>o6Q*m&!ZkWpDWXVdE*Y_^+OY1mI;^ligqp0Q#-}O|pPf5-k?DOB%-xgDs?3<8t z@qU8G--k{1&mT5jJ9@lzrE5v1(i_>d(k<;Gc|teeZ@DEZb~B%oQ{&X_-*dwZbv`(= zbnV=fx#;hbJvk31K3pvmzhY6=f=ppAbDbBZvs69TcHaw~S;spg*WKsv^%b}D853?C zzwqgL&4mxSmrvf5P^ft*{pgnNM5XUv7e0*-`k4FRW#Fy+qddkY6E6w>l4F%PEYG^) z{(PogKYVn4+&cE~lt5gxwKr4oG1aBJ*^2Hg^V4nL)5KK!U0r;apB?WGCw<-r|IgMI zD{6cwOuQ{+r1xZjgV}2Kwk=Or&2Z7*HLKRt#JrxvY_Bz2#)0)B9ruk-1~Di9k4+Tn zz5n<9xk-no6r_7fCEYyp@Z`reY=5rnMe(lQt+J_j;fcp$w>G9S&G1riO?P5k^3~1L zCgwn+%ByLe8MiETPbWOQ{<7epTK)r#Z+o@bOs(@cdCp9DZW_&$h$iW+nIM<}KhJ>uRXJ`<0 z^c_=Xo=#dtnM}rKucrLOr7ylNNUz?@r!o8ay4AC;O3gLe*co}icyUhqm9xrWdI4eu zO24Gd)_&f{d&$7j&t`YY>Xf}_TMlH_ST`*@S7WyM(i)N8<1X>m+DGfoa?RbZ6}(z> z>YUI(Jy&%_8%A=xp8rGO>WsFi-ANV4>VxfQNwo2`=qI+dEzAqYLrv2^mw$Yj}FZ2)df)(@D za%%do4>{%%vdPjYtV{OnhnY#O@yESnZ)$gj{aAY=ym4lven)uh>z&V5EfJf#X?}WT zt9N*BXMAC(w?!bM)-wH|;~#A++#aWY$hmIUoSq=da^~B?*Q&Q4Y<*K~etpZ%*S5d! z+_dP)^7EN`r;Yd4HvtAsQ*Dv+lTId_w9M8_yZDT`ILtIH;$lt7eYJw#NXe&?T0Cx- z1FqhxJrkw-z0;^KZEH+>YpqEe=khnQ$?l&ot=6pxU11&esw;3wV3O;)Ia70X9jln~ zi)XpT+J|#yfA`E=W-({M*3hE9LQ`GS8@)G^V;oDvRy8k(YD!i;y5&}{^t7aIucdba zGXI%B;{8A6>SK%Bx(AGBmWXM+XXJmuKJl&SzvYk4Pqa@;ohx0wWu~a^_F&H(?;pCK z+qcWKKa^Tt;j@!*ZuqfT+fRI0aq)~Dd(r>nrIjkDCmweAqE*bqx_9T~lK*d0lo-Ws zu9k1QCHnJ{LX+c+!y2y&98SlyC6`}szpww$Le=F###{a`x%q0I3KzdW-SS}L<(`Ad zT8Ae$SSi+dryW;$;K%i6*|%$~^%M1ZCZ10UZohav)L)Wi_nmuf3K4G&bChNs3DY|` z|E3Lx#4i~!U9FGFOv`PbyE4?>z2tjV=B42*wM^DcQ`cQc2(ndk;(f8|W?|Bt0~e;O zd2V`E>cC%1hw>xk7gt)I^osstw@bszspV!!Kw^;1u7U@;uGb$KUyd~Jv{t)ebe6l6 zd5UVvIY((lZ(%L9P&QUW^)xHB%C-laB{lxJbBYLuZ4*4(`g(>S_x%sOZO=JVg1hZb zKV>#B@ZMisB_IAk?@|3>$I-xz>pLzY13Qpnv8K&jub6*H-wmVhpdqijN`$L^u%jymM-u!&V zELkth%CTk^yZ5B{Ms~S2`}6MZCR@1_y6yKrb)Fm7W*MpDt#LFslzDmBa<#8>au!_< z4+whnDqgO#^Jl(h^!qb3^6j1w%Avb(wR zR?52OZHPe3{uFv@X5*&NWhG zu2ss$-6?@t-1+)y-Byb~e|A{d_0H~`nto`Bsziuk1#ft7L3+E^B!}+JiJVv1kK5MR z{toF)J~?9rL&{^%@N-M2Zt_@O^JY=Vw5Z-1AFj zsk|$HcrLsqJSm?2rT6oFUAkTK8{MQB-@dGHjNUA9`?UNa*@sEHwYeNWojcFPGO4`! zkl^H!H!I#~PVsJeVo1`+V9F{9q4T#qtNY_?_CVaOC!F zmhy#P6MEM#TE>vEHTytQt4pq1#>R#`PPbFbwGJG~s`dV{bkDse;WM)ejxV)IP>-J9 zte(cN@n=t-@Eos)yD!`<^O0K2A?&tHty`64vdtH%7tGsDjJ~altqscbp7Ek0=g{p# zDa&3?zV>C^zQ?9}Uz_gzR{e=Z%=&8or(^jEXE*s~{GLNoYNBhTT(e{R)hFAF_M{7hoLIlLqPM8OtZr8C zRmGT(Gq%?|@>()tETl@PsWY?2E2NX{}rAwQIqejk{iF zfY)(<^%1><-%Pik@TIQ^&HW_u;8@+K+`#9_n?#T8 zzrU;Csk%(1kMM^~-b>4>rl{SDd!SYq{;vE&ey-y6V`|)t)BpWQTf0%ljkBf6`}=F3 zP_B80B@H~C4-`yOmr}OV4Bw^7y2iHu;*Qmaif+t1k`YsK&HKQcr(MT(maiz*;@G@6 z)@0|Eo3V;JHs6d5U#Ztw*y>`$x#voUN6G@H>Z{-QS~R(uOfIF0alAdXy7AWZk|TOv zzfZhrJgYw2e^z2iSA^Z>l~EV}YjyuVzJK+yOAcu>66&U^&QIW+Dqb*2Hz|K@q)+!mbM=9B$;OJr?$6KB}|uSQ!}o;94q^EPk(wN0P6qGl_)ck_r`eW&1H zzii94>Hn>TEnJ@3RC};I&U5ee^xZ1+@4JlJnq7;ZYHID2Kf3#d_=?2~{Rxhds}^UcRtXZd8H-m z`KJAsSZWV>Et|eE>**w|nQ@vsjn^&@dbA*ef4-N|(wXmfaeP}Ov+Ui&$v4vXb3CrU z_^2qyF=O41wYA6H5;Y~7cJtK-MBkB{a`kuK6yHDmr@DB<=0yk<+B@ykn}35ZtoPdL zDU+Ybyk1enl4o$b)-?P*_oSCc3l~nUD@|otYZlGWQ`^jaIF`|CaoUY*S5_HpoYh(| z`{1_PiyOavmP@$wICx77<0hH=GS}=ry*_#SUslqO!*5pChYIHPJpMf4>ANf&b~XM5 zb6>4()QFQjp8b<6t-LDc_o}q$>m_sMwuG_qJDiAH@T27Fsi;q`EKUn|U*vpxB0ciw z9NQ?dd$yZ@SA0{tw)M+_VBT7}l0xbHHDYVD!d9QmdG{(-EnX>l4G-hIFqxZanHS!i zoe^RsxzX*3oPFHNKMp$W`xLhc%UW%}y)eH+my_}1mAnSdyOTut|F0{^u*vUsIJCKv3(_R*RUDKWN z{;NXex5E10u14p|Z57<7HYD~|*Dw=ltUAd;X7C8Xx8@;!V08l%1B{%i{WZ z!tBi_?$%oFT)Of`cy_wV_QHiHeZD_+-*{73t|-?~Y3J2=CHs8`&%PFqnfg}x&b{pi z)&_o^e8+t5(cW9k+t!}>zb?%q=kDRVZB}+`-8LF@E>KRX7k7B}=wm5UgK?%y?_QgN zVDAV2%$V0LQi{zM3AM8CxZ~%Vs;@XHE*ZaMAc(*@CZsth{`xOlSU9 zskJ57?>NuV@zbAJbiLbS=4{&kbtiSe(myu!HWyze&f5Z+w zUTZO1cEY)(x%zvV3v7}S&ldFFR=K-V&-;kz)8h;)b6LxCmy3Q%4lqAG>FJMUB@tG$ zgPz(6t-Wwg;`+ll#>HNlc25)*28T_LIoK)lAtz?Txy_^Nh>0MMZN|mi?L|a&OlhmF&BIleQPASog)=+cj5(=SahkJBK}8wU1}3 z{7^evE8XcXYnkf9e1A&w^RVuhx5|2i6K5B7*alC()-Qke2=A|Xxjj$$Z!Zxv6SRG} ze|Ob^75hFszIjJ2`(CTt>>ky}PqrLV+a~j*zSLgtV7j$`t9RH3u8SQnKEB;t!s+?q zl!D8vsxoHn1$y_FywO|vb|bG^#tCy7N@e z$1Ke_@82;CJbc$|VqwDM!>LAorWSjgJMRmH^Bm55oU?xYd5ceB=2D+UmCcL&Zav=F z)UejSJnmZI^-EUjc0E_^Uh7PKx$#`O$RA&kiH}&m$KS5K#M8H+-GSLoGpy>4$871P z9}Y*xuiPED>Mf&skPYTz%;&LwaOAAz-NvO- z(=S-9<b8A@Fi;rS!s~>3yeKei9n&;j6>#Hw&9lBwYYQJ_?{b$#3y~h{!Z7)0& zJ-_f!%=W@5UfT;(*4?&9)00SFvtfy$-Q3_uT{qtr`NjO4BfS5R$l2p33jEIL+FgnG zQ_Q!*rvJR_JIhfg){*bx^T|RD{RrNeWy>zfRbD)s5V7i0)u%^SE}raeK5}76!MgoE zi3v**&2H${Y{(6C67PHC(zJWF@w98&HqDDJNV>MIzvK2?R*UCp>M@C3hI|LV@$GT> zeWU(wTF1H=$t1lU%1`RIUGUF~zA^PSi`w&KrsVF^EEVnB#X>OJ#a9r^-eKZS(olwO-rlg8y^5b|@zpV-g6Didth7QJ_UvVT>{ z2aOq@I1ejwlw54s(6E}DH}@f9cYi{+Ve2;2)54c`G|#(m>)5#;C)xI7Y!BtqS9VyX z(~>rCMN^uL*S9SfW|cg7()xE)o2{x;NVY$o~@` z^RG>N_Eu%5D3i(hN;|IPl$sBWiMbJqPh>aDu*lG8xzv_kz4ZD;j?h=C?>O&DE$n9D z7h6zt?BbqX+%nt&KGA^&$!|0MuIz}gHfYQ|C3ffBu9*pE{}miM$(C_xRe-4e%LN8I zw#VLduv_=N%Q^aK`q7QwGt5^_T9v&oQuNsQm@5x@Lf$w>ht|)(W}*B`!f_M7@JYtC z`>uTm*|&!A;kEUqD!-3UQLK)5%wx8;@Irpk(N||~zH!@7Dtzt2<_wlnrX5K~Rz#mX zEOj+||H^2)FonL1^>4Kw#ce)+vP4?rwx{>$T!qyN2Si*qMhM6;iI-nIWOP^J$DX*e z5_{QLb(H%e5-a|t-ZNm7ZDl!&Fthx*r7W+JT>Qh8_xv!dH;JgdHF-mnuG`E`O62eJw3=B zDcQU{=mx+1PUWlY@;4jaC^5BOj8t}-?fc<_bEVWL|KdNIo}X*kBDn6)3RcOw7kwb& z*!{h;zTfoy9HV@a_q+q+%aq-LRxa_n_k|`iJ+r=4vFwnD&}L4JUlup@k{|qb^RRj2 zWqR!Tl=rH7Cu(;cnLABcd}X9UVZlMZE$K-?U*1i*F2l{ItMqp5g@wO9oh^)H3HZ9u zpq8naGbAL{W6L5yJn1SYyZDf zZ#<3tQx0Cgf1zski?D0`FAg74aQUyIcP&`YP@Q4X_D^1WboBE(3*){rnkv!W zqW5yaYc9E~tasR!W56L9t&^RicqrkO;zyZV9D5#a&)}I=K2>@9_BE{uZ#7Da9q+mw zFJJgLFlvFqM#WpA{|mlec^6^3Y;w}BOLGq|-gE0%WYdAp3OC_|S%M1o%cr$1J)abk z!l-;SeA@PJIg@j=F>Q`q}oER zYr6;8uhL$*(}nN)4xipChMCH@80&5y(fQc@(`!}!xiIyoI@c{OC-T;5oi^Qe<>>R! ze7<(G74LZZc%&|e+|Q4!H|aPSx9-=q!-Dsk50|mpeNy%P>^QMh@ZQ~D($j*UByVuP zIBmlcv2(W%%t=_L+>%%Q#QM|C|C+ZyRI3)A-f-)<@SFcH_m-{it0|wIEz|JswuHsk zLdL$%nWvdN`KRBX)nAkS@2u(MwSQyZlxEH=U2G0aftVy_7BER-?P8_B=auqxi0b0O!VDd_G=%xXO)NNTip6w z%)CQ*y~F3L%=@dtj;o&yeReSQ@}8fwLQOVasF_=oHczl7jAi>pv6u-aZjqi&XP4(k zp4{Q7LOP2sgmT^nbKeqXJh|JrePa>4B5CdY0+k~^mzB=K~@^}Ui|LfaN8aL(ya zUTmj#;KL+!F6&4IcKaoz?TmffDUC(Z_iOip=wEe8L{2Awm zb4;IS-`&`|bH&!X8*5u_vp3Crb~wLz-sASGe`6rjV z#mKJA*0#Gk_53fd`Tuu4oBc!j^VYk14T+xl;%qa{?k;PP3%K7iZOZB_ryO6d!L`$wzo3CaO+v& zg3~LX9#drt2%ma!W02#=hh52ERW#}Y*c*%APW$Q`&_45?@7I0DneW&f6E!irsnmNz z(An0qO6HHC^WK~|=hYvE-+q56yDoi5BKz1a)9-an3_cOprn1cVbfmE1 z;B^jhog&R-Js*Q$!{{qAcXOph#rKE=@2hBN|GKc^9oPS*M|rxouTglh`fqH`H$?{K zE3X%PTk-Dfw?8lD=cEPJznI@=$e-}?Q-@n>joEV;MG#`E{^}G zsCfVVF6|@vN4X^#yQYgp&sbJ-gV7_tT14c$>N<|UAFZPJ7yO6`ve|C@L{ktEyC3!Gy75`!;&^&iJpKOzKry|F-b>(a7=kzQ3`(6-NmNVQ?H6e20 z^@#uOAMQP2cz;Ra<7p;~#;s?WEag|TTjC%&=ZxjV7{S)%{CzyHM? zCQLdMAM5}2Opk!$gQkLCDvWKXSSnZ>R^0Mp%3u7A+jX15;fIr#eG5{&m!~G^bkRED zLGqe@4F|zH86FAOH+;Rv`bI@OGvT`y@0kVWrJKT;t-YCD%i255*GZag_~g!9F;C=K z{)fK?^Ob)eSi9u{!)a~P4aFG;?me3Hf65&>t}kA0TqOdBH|(g~(73Rsf#a8szTlH* z%tu$Bu2pQlIECN)o7?jH^J^TYNcU~#J`pYWbgh+mR>OpYQm>VJQp3}~DukE++G78; z!7n~Wswu^3G1KA|vU610gDuZn&Ue<1t-iXMK_cGVR9DCQ^<}>=^LE@xTkzsrVRY1r z1D9%h?6ofJd$c|I^~#g(%#6hgRNwN%?!Cg#U~*O0$L5t-+4?8^A0Gb7jc@<^{{7Kn zo{IG^)%>7IFDEp4;CvUKM#K5Ze3T9Lrqh#)6N2 zO1UM)nF%YFB+3-KOxnJ*)4#SW!Y-Bdo{yH}OWBIaB9KIi!4 zKR#)@{h_na+tWs7?wa8Jm#5##_!GuhvD@+QL#H<-iL6;HJuj{AzRl+oN?0Db&`11H zNJ?dT>t0?#>9jKbSRPif={xNO1zUNNW@wcyF=zha+-J+#s%Ki#cEMnwkD>fEbzbxC zl*NZi^Vb=)YzpdVP|Q?1knzv<q_zk~U8?(UxbQxvBr3VJg>k?GXk(R{Y-x4^}-Dvc}7 z%H43wo3p=;^ZWeE+kTc;%Cnufw42t@->y>B`&F&vvNFrvo}GE@k!#t?w|rhK`0VAY zZ}-ps`8>&baqaOv?P0sOMx>~Ib5UX4dUoN}cl+KXK3|~szWCyqSr=#fc`TgseO~%K zPp%X5ZrpGVvY4{dWT!jh!QThpd6WyXZ0yxwWqorohS6(JN&eC*5%Ce)3)O=gz5LCthkT|M#*)lH>LVKFtHYtPi!B z7g{;}STM)Yye@%rz0y_9vmT|jyk>zBEi=|BjwuC3j&bALov#FL$#XJ9%~Y-$S!s?no>D zm#2BGv;2Pbo`kpa``Ra7|G3az-a6j@u~l+=eO+SRt$SIon&=JdQInY%svbVM&)JM~&L;NZJYTQKZkVfVbZ!0 z`tD*3^S4_|&d6%$M;}j^Vz{j6uW$6i#SI zq&>Y$CVUhBV}4(oiE|5-9$2~EH@uR+A^z6;cOnzI^R#)Vnu;}u49hPvH zJ>hp-p*WwB?ArZHKji$~@-X9d_}YAv00xm?x*YBdQ}Xy2RXh*vGY%MLJ3dSk%ww`JrfGs$YQN=|cF#3oZ^`BOqav(k z6kESko>zxaUir&?=T91w>s~jO3pn!6&(GP^T-CSrI+HUCAH&&=4@2xYZhIY8J>c=% zo8@r*oOtof_+GQZm4{6e8u&x6h`r07+J9`p{8M)XBo9YCWL~p(ySfA0;k8U}{uusG z4F5Q*zJGNC&!=05IzBzDZtM8QXtZMY-k?UFOXgvHJQ`a97;ER=nz&wGv_bZpJFD4m zIjs%f&uk1|$dr`xbHxKKy^w;y?_VreIEYB}^t-M)_#??qY~3$6Ysre=4ZKI>UmRcS z|Mu@CH<`u9OEcv!hXmOtHpr{~;JM_IQ&p%l=WXz-GtXzex2rhow@IX9=J~aoPSi~M zK7Hx78DDKAe$DyRt|ia(r7kvyPszI|e0k?@bs%$-UlDh5L}-UWR=H<~?!(2GbW|sPcUOs6AL64D zt1lPu;F*!`CJh1hk7uq=FWm9=@#zz?>?VQCqW@0+@UXnFi%G5WiaLM2S_=c?YvXUT zEl)Itl|1^(TjX)NbeU@g3-jD1%pBKvI%|WLH^$fcFOt0Xe&K;-^OnD=tWf@E^RGpx z+_~G~aILG*YR6ul)T1p=mIxZDnQpqgUE@LOk)7;9A0NAmtn^UZ%wotPpy&J`-m~+P zn~7uXE3s2gzkaOZTxRmTTU5nW_~^FU%=yQfS^ zmuNRU?Aq^eoO@|2gUargeSJHo*~Bw9g}DgsICS@}Wmag2uBd;6`>UU=(HW^}_8aB% zeZHJ$)T^v*nDKPe%aqEcNAim!N_y6H9Ned8y&{Y2k45&qNRF6ovOHzW!_{`3K9YC) ze}+ryr>h-ZEK8;}D;n2NSJH75DViT`)}*0V$`W{IPvfym+a|w}*)&Js=-ROHOQqkoN6+iHCf)q~`Rs+B#AjDalox$9 z58<4A+1%0p#FLxvt#6&~{hnrUJxRat-RBk0B&?{X)KkV z8+0z?>QrU1*7z5U!p#AvG8-3(rR>Ntyp$*)u~bU7#CT3dbIi9+&G4XeNo&2g zH-%+;R?!kQ=^-}&@9vs>~`+igFOEZ3bJ zlGMw!-=uHMCKgKxuZ&@shUzF7eRj%$wPeT-Mo&K?>A}_9n@1uiS?yFs8 zoE2B2=1y(&35pe(J~`7Yt9G5N)x^Tk#mbdFzCT43IMjABXol@PCpBOA$rX*CtwjdD zbLADo#bj&~%a$GNdi(L1{+BeL;`x@RF2v3{mOsT+{VKmlUeynC`-L0(zlR0(r?9%) zxIO+YtMK=O{nOMwl~cJaf%SeLb0zIJ=s#a@a)K+XYI4TO3ty*hUDP0{rLj3aeDOw+ zO`A4ZTvMrXv$i`r@5F&8F+Zd#_kNOb3H6CDDwq{57kfoJe05Rs2@Bhqw$u7JBTal) zr_GvfZdBc~Yr8J@PIiT_x4et>GUH}N8{L0g*=e$7Rs1f=bzv&kW3R3%+4$(B)UqR` zEY(`~WFj?Kd8R7ro^|@xsa`&@b?cUhfQK!Y<^)PiY|UOfbIUK z&+fOYY?$*p)g{vHZSwz;o<)|gi`5qvu0ER0-TQjw5!sTd#ZL>T7W-eCd|k@cUP7Z# zGj8FDfa_W_6)huF4ywsKG4MZXD|2E3Uz4}+GUJ7^o7y&3Bqcw3T{rcDXXX0Hohvx^ zZYt^%``5cD3*Nj~Ymx6W(v~IZFlFLPQisK_oe`_zkR=cZot-mJaYdmX28i*Jq&=i_OOTTiwa6x}YHqZm|_k)7r8 zw(1Ah)rD)aQ&u!>TYqc%gvRTsydTeaT)I~kGi`e8{*7rbYxghc?)Ki7uUWKZx%X|t!f#bfasbO3{m+ehoUTtS_f7PAhqM9cz6Ju?? z*%nO-m=tFG?}@pF^2AT4bM7s2ZSl+patC z)6b8mkFURy+au4}8Bzbo_V175=JzFM-mrN2FH3#reM2|Tj+r4TRXu@1NoJfUx(vPi zdaSo>=2KNc(0=d2+<(rMy#*VE@6~ zhipnuRtxq!niUq>8v6P5OuG$M78BFpd{6qL#GNxU*A>p0Basp_KfFh<->_T!UH?R3 z=EcG9B$VqG)jP)jo26HK)wsX$>B$w`if*1Aj_RR_dz^bF2{8NSy_RzK?6|qY|F4w$ z$E6S=E8ANt50)&dIwHVUIDNy(uUvsb$t#}R zF?4eBaXqT9drYI#@WR)s;~boZAG$R57`l1(C|;kpUPAF>%EPbg6Iog~Qu6LyUp3{3 z#Kvca$IkrfY-BxA-ZNo_vqfgeUV+6bM|2{5L$(MkRypS2`Yu(ob0>##@cKOgLZ5i@ z%%1NkQ#Ncn^Iuk3<=BPZyzrh0GrsT8ec2T#lyu?B6jA>x9zBv9)|U57sHivk)urv` z+0%Ga_IH<{($uswGVg3AMmF=WmS$7yKIvtuo%!nUGZ`pX)k~iP~MPaIwO+WoC_&h0XhOy`w zAF%48dwctuY3r9X*@;Ll>&R>T@^8|$lsRiM+kB&iCNEjl z6kz>X;N<;~_NF<{oF}RLofo~mF5mOWT4T1ApA}b6dA&-((_MJdvPlh$IM;V$uQ}(v)A+rwwumY9|I63l)EUaB!~TAOFa#rfPhD|OS7QkID=dpu6|pOch4oRksV zQ6hiy%Et+}w))=XI<;#Fto2I<1;qzP_AKy5obmFJt zccp)2m)IsuDb!u`=gm%=C9e#&Nh-W$tXz}r?O0Uj@#?MBEaiD+HTNfm-YR{jp^&`q z$bZ$DlOhH4E^U9>ry}FA)pGWp?N6KRpR9gXKmCcD`-6J(qOPVGArX`R(_>U7RK=T> zq+Slw5;rQ27vY>WH}Ua_y=U^lh&^~KcUsCurYAwd3_0~N1u%+)tc>E!MtR{9IgDL z>VJK#5?A_fV5^S)tMimKc8%^_(N-%p022d z{F52axV&WfALg(JW?JdJWP4{<_y0EgThE`un>T$q(H9vhvC=hvQ%SaL&YNGkzT18s z^6=_AH}%Bp&h5WWCx>mgaOYpkj9SZiH_n_YOBOkCZ+i4W$?sAeJ1?2I85p<}tvtBS zAo8bTjmp7#^>rVQuM<#A{xBi1uQAcvrnD zS*F~H&vvcY9nUw4N9MXHy=yr+?|6@Z#;ZdzGv*4FA4)m%z_r6u6)Zq4-* ze@?k>`kJt^_i^}+hmTgPi9S}FBD+!3*k8Ewhp1AKZ1V1OmGs}?Gj)GVb$$@EtT%Y) zV}_G&6-}={U%ltME7!ETzcLSMrtE)jdiJtQ(Cw|_KPs+HpHi2*vU1kux6d+_1pSNq z^v!m;9XU8h$AG<9P(HHgxXhW8`o#w7tY;6pDDgd8vdMCW$EyFa>sUNC6+XE&W4UGc zX`8b<>z-vQd0xJzcm0OV*`2SRW%fzUSZ>*r$oH({RC!9+ZVM&9X9+W=lnP$9_-rz< zWct(6%2|u&J;ZEvTI%3*Y2^?FuK@l(oHG- z=!3^HHvXQsVx!~5nC-n65B;*;m{@hn+`u?xpPTm&-z!ct*9Yz{5RCHuV(OiD&iBf? zzxICYdg|s9Vmz0^lLUV}WeBuj)}Zuc`hE>w-rc z5}w6H_%MI``OE!0m!17T(Q6HH{AI@LUe&m(mrZ=Gog;K7;rNXIKM(3JTt4^Bkw=Vy zpEub)=gaQ!apphr?c)6K#MmEi9}7&ey<_*g&NpVl&%vJnQ1Ho~$RIXU}lfy1)B;fBb<7 z@hkSO4c>h~I{su*iu(M<1Die=OYVI?Z=uDS-RW1>A94FD``W*TRa$J8xMZ0U_bRXZ zYyGM@RFAz~@_gfyO6SXOW`5hSfNP6D;Ku1f8`B;>Z+pAAeu~;|zmq{Td-nW{xwI(V zYI>C||D6m=b;YTxb^15_EEK7Hv+{$n=afH9D(fDyg-+p}rP9f7`(11GgV0aPM;EKS z6THuVPuxZ=vQ+!iuAl5%r2ZYeCo^%`pN1%rd&gDZd(Zmj`l=>vv)DdAv$yMy`0oo0 zjpAQ;XW`LriA(Zt_MMVzIU(bm6!!Gy8$H3zr>Z_ZInH`;>dBLa;dXKN8a9=7Zn-!QhR)&?9dVbJ6zQz4(dZgvl+Y*6U69t1NuU-Ag_4=2i6HPiJq%MX%j(m3I z=}!N;yfxB07ajUI!^y7o%)#V0YV1?Ct!sH+8-M2hi%oq^`DIgt)gArVo}IORP;}{g z{ZGB(l*}S&j^D*yR*g-+i{^2(p;dFo9g%LUcXW_NE1d(kOf;-jtmRWaV=+N}$RUAH;y zJgRsh+xL1!LPqC((M#N0?KT_?+WWRMZcEwmKhwpG&nfH^i!|N-v`6Fa0%`W{Xs(+I zQbvc$%ckgUGK;TVbhAr#Qv0Mgn?y?u+MjqmjJooLS-&p)f_{4YwgvY?B;e~|F{`&o4K=BT&N*Jehjs;SlF%SgVcyETR#v$EUy+)BTEAeD%~d6J&gNz2>Yb@a z=EQmXnaVv^xwzMOZqMW+o0Qdce_q?E}v>SxxOueBkI>qI?xrXkR=f^EQQ~Ktx*zdFC8j zxeITf=l8BG7FzV^&_xn-#tF=cWM`(u^*_TowN4_R<7@0ruGW51Nzd`J5PAZw{}j_ zi{#Qtnk1d)IDJcM#MkGOytXuiEU2D;UQzT#s)AF{!EGlsy!tq99(yYAB36Ir1IEIu z^AcNmCK=9m))KNRT)5ZClU2;(`vR_#)jIkMyso%R%{C0_WHULqTQ$-({uYzlonS$e z1<_J`O5fwyL*Jc!&t-M2tl;`j>pMGLroOImovLy3hTUV4N{$4vb zT25JX(U@D~soV4^i$2DuXa}7-D`34fT|o2cvl|OVBEmM?8E#q^F;lo`pNQtusGguj zj&t8iM>Wtrbiu=?9@hWl(fVo0!EC!)blu#DvJrw&IB&*10fqux$$2#m%wU zJ<~->=?t%tAY0XKJ_eB;>e9l3i3y3Pt+badv=ww?P6+XAXX>1>rN_G;yQ*OgcAu|A*BwEfmyp;fZ`Z0!Clz4dfr z)?MM7ExrQB1V5kFeI$8RsAW^#MWfYa;iqqYyx?dTz>W1d>)Rl`SX7Dh&tM8wFc>pa3F?i{o! zk1veL&Uv~{J(@LB_PcV_sjx{^x6h^KuzEj_owD}H%9JHba!dol+*DJvH(uFlyLF-a z^OIB8vVF_*Pte{OojJ$-RM?{5G3EDml-DS9{y)X{MYSsAHe-oumGnNrbt)?QJESsx z?`bDWXEG+^ODbnB}Miwj=ITZRcv;Cy3w|x(}}AS7OX$tw%p-<=GwbuqGlUz=iU|C z^;YK5p+EM!-!g5!f3M5;$@xFCp5<+Pw`)__gYDn$z1m$D?X*2McBgv5+=#T~P>t)l zXAYIEcKLE=`sX8)xp_oS_AIEO zSSYAG<;{n_d-EO2inuQAm^k-^*^iyvC6lw){EOKjY+ErJ;Y2lO;!)8FPt;~*X<(Z{)L<4#Y%YZT|MD<%|wdl%@G45OP`Z| zUyNP_Z8{vtHS^SobBA+M*x5DOq_!)*d0QkS8&ecxxVBK@rXsJ})`@dt&hafxXy5(G z=Vi-!fo&x)Z;9$I)q1bnG9gX*8Cf$MW6g?58Z`%OGS`4@|naxd*XWvwcix<^k_ z_~ufby5BROo+ z`&iM*>hrOOnL7QG`_?H2T$1^3k#V|i0lCZmUrxI4|M=>oGgP-o%#`ewtdu&n zJvHy+XD->Nryu;@bd=}8#Ys~#gQL%E^l)8zW;XNduwa+Q-;>`dO`X1tb&V2hf!NJ( zW({Yds`tk@&cB&uY50muyRB~93%<)jQ;Q;mJg1rFMY`{ef*B7P3@D!)^dNCY7}z%3fJ{T+s^pvuCeH|w3fMkw_N7=DaCKa zwfrf0`e*s~pRf4)^R<1}>E6|orYIzzxW498jNWW^`MF;&{wTM<+R)h$tj`uxJ^RI$ zwf>5Ys{P+=L~mVSo)EeA&ODu}S<9~&FI#K8^?H-(&ZkNICuh&xmAjY4-G74d?h7X8 zuOIo^<+sBzJ3YMa-x>DozPL--s6b`+>4UQG-T3xC{jsum=C^_6-bq{BSv-Um>Rqg#Z zzSRg{eEjUghUwpqlyxOXcKGbcsk3dkyRXIjlcZy8uj$ptU$*XC{ch>&-FZFfHkK87 z$DXkI&r>!sv~*sUXLE1n$<_;J=FhI_aIAgw^3cEQ^5SminI3)8zVbd_Y4&o#`mO~( zEEnzYk^J8M>zsm{;rfEt8?SELS^C=H_&4Re%9pz;!UUJvYTtfr^od7ml^3hWExdJp7e2#Y3=-p_eI^Nh3hrzM7Gv{pXXQ6tKj;W zE4%mzpZ?JsCpKRy5r|CN7F5+KA-qq) zAFe#>@Y#Db)uw#0-b6)^wm=0mDV-wJpWoO}iq&-92lv?!$j`;?}JJTknJ&iCrdvyQTzPb5{VxOMJW7@jnC_?6x=In#!J(y{*+ zzbx9s9=zrvLxPOJHL1J3_4>Y^K^L;G)SGus`cV5{ctiU#`^J4X9bb(eCa&J7bnJn_ zG`ZfW&C_;P)Xeg+dmv!m>9%LafqS1yk5+FJsmgz@ed+PpEa_G1d^2ag=UCzTd`_L` zvF2kDUboIDZ9MNMx^jhocY5r6iO7z3PdY-6pZ{AYx%t)RL!Z<=w=DAemi2I6*QD<3 ztct0ocM(6GQD#P)5=Z(kwi{F?Xy{{vn)sdmFUyj9h+Ir>1CSRWTr{smt zi!Xm>KhfBDzIAq_+4LKnLH}D`rJ~v5+jbmN7yD_lIrPoDr@3jDqq_SpJL<~VUUQkf zA>zx7+&8BtTw3oDWwmu(^_q^E>~ntebZmL@ed6}?#uIDu8(qE~iC(kxu0*=T%anVk z7ddC;F@CtZrLw+##|Mp<533*US$oXb=SMy7+oR6CAs6NRcOP0Duy^f~DIaqt-CF%5 z>>;~WN__q=PrjskmOYQHos^>&w=iFl^58w#_jmNmyl|e(A>0*d$+O^dy8*OH-I&rZ|^oxJW>`;+P(J%f_&itAGJL`^t^}3fklxIlR zZ2xU)EM{DP_^8R_4bI8-%FFi4*09z7vAM?4Yx3>zUWr5Mv%bbGz7ufzz4|F3za_ge zt*>mYXiL3aXSDn9tVOqGGdqT;uWL*SqVe^VeMcdO`Bv+i&T%2h-f5D;0Egoe| z8S%%ch;|Lf`UDDj1{MD7l)!p{cpI=?u!28^J3Ne)dw_JGP@a{3GZQUKJm@>#>NMt zvJv}I1mhT=T$-O_=hGQ))WPMD+M`nrF)hyLE4;9%{zPc>XmOt|J?gYQ0 zYtN1!p1b`e%erYNZ_2+4d0qV?>Ff=!MIoOnC%8CYaBjSjExe95d6|Cb$EK^(3xZx0 zI;?l_xygQVOQoOllp5)C=DW?M6dP0DH~QQ>x2{s)>*>wMAAWkPF!jNcTsNPES~4a+qW;V-rmL%(43R%H79znLtdBp(M#JGOtjykUf^(Y zHkbO|xUi53adyc)Uslbp%t?MRVY<4g+n1-EjBD#G0zO_*xm)FvoVEYSe+6Z=JQI6y zPqtg7U7`2hd%txLTqEODIz@8Jq?PNeuJP`6TbTLSX2S`cW1@#dTt$pnCQbXOSu}a^ zv?ixa1M!)!E~-~v3g;6vQA}>_lk{lZX}Baf;f+3*P0mI34EHHNIzwH(3$rt7+ttF~ z?b=@zH}OcZp?^dB-RJ|F+nyie_Br+Eh4;PF6jhlBE(;qM7@SQPlwcN4N^6UN2 ze6|-j%-XhM%d1(%f)z`?)~N=}|9f$1z`_X*V*gfLzG-?rJn6yPY7Vc^Pr26xPh|Yf ztab>?^uNu#>2=kud$P&P{DW653;$}O{%5YF*PPYC58AAEm7o9c+WOqqi|5vxIW~sg z+r8mW$G`q}MaO47K6WtUUFaX}3yO{n{iQxH9_Kh!|6lo0<-jGMq{x8sQc><5_m475 z+8^T4X$w6b7v0J)XM3fryW_&t)epMGdn2pela|&-F8v*x8hZQwF^jo&DO`M0y{aQb zJzwl7FshVLof)7pW8tx8m5lR#4LCvo04J_7HecF7F()xB`wv9OZfhW zs3=C6ILFiLSwBuRTvKSpI`e=~ubGYf#IFi<9^X`6PP+NXD2sOmf6&a1T@qmvj&Z(L zzIx+fyIiu}hlH}rbrY1GvIVbO|0&!a)z<#ESuTz5y<8B51 zd0BH(bk~$8TwJOvo-wDq(`kCG?WQWV`dFmNK7r%f^Pa>k^t21&eQPXyNbtdx{)PqZ zS*t}gSeLQf3vdchXqZsDv>@ZDtr_p~CDb*uGb9ChZZwchMAyA~5T<68AwmsSq1 z)pu97%CnYZa)Pxck2C@sOK#{2%=c^#6$daTBNv+U*x&0FP~?S1*@Za3M`zrpFn zCt*3gsW%r?>=SSuV>qrtz&l)7k<9F~{x4NK^CRr_oVyRqw+=Ws-&v#F)o-gK|Nk3K(;n)Tx#lTuTD#!(YT=Yd z)z@zXMCX1~QShHvX13q3<28?aLiWe#wUM`lShIVV{Lv4;ea=kdQL4ormM6|Hr#jX| z)!M`!Vz`rh-S3g}{E%ehd*0tlr%TtCG1SdY-kLZzFS5mpogY;>1x~2=_Bg|=bLQGjMr%WN_pt@Dha(`Nv$GqSDj{RAwZJlQ_ge=)JB4m8UuWy!<`DDqr+Q(SX?&0Dq zkGl4YM62$;clds)=h@XyCP^K6^8Dye#bzHsuv^e;?nRv)KMZ%&ioYC82W{`Ce1k`?9f#dz0G< zcOUJaI>*g=)_v4z<;*$wVkMjOzvs@+HoRuLwv(xBd317f__D-q&nqXnCrJfKZrQVG zcj+&;j;?d=HyASdXV)CEIiG%rf5|2jRo9n~qBY!oa*SIdy_yZ0nY2-KAS{_v{YxlyW|jcEIAp8G}0BZ5wWEoAqMJ zp8ZOT-&UnA_->XGu(hBpMC||betTEJ-~E5TumAS>e*4}NCB@(JvfmaTau2URGATFb z`akZ#N2dy8=bIlUo)v^y~ZN7Ct)O#I6p8EqO4J(DI+u|Ib8Xx`2p|#6& z*@8uWsiIfbJor0l-z<@kdopdRe0VKlAcApX~;JZEc~( ziqu&bbUrKT$2{H^a&7%bo$S~}OYNsmJYIdJS$l6Sr|rt{uMfBc>{_0cM1D{#VX)+U zYqO6vYV!+Y=3h>cs;&#pT=}K09yDv+S*v5N4Z5GYVhyIP44m4jw%7jk9D}eF$5UNR zRsEmVaxZ5pW-qNOX|S4hB75^ZovHH_Wr8wYmOiz-yVZZw{H0A*c@O!5E;?<=*Npi7 zth~Y~Iwt)6`>LitW$&-;&E3a%U_NiEd~3m{37?kfX*`uUcF-x@QmbT_)a0iY7dPD9 z_`9>YkJtT4k85gab4jznO9sn;jN*nl0$J=Shs7uQZRMNPzxu4>r;yi{AH0j^PY!tf zq^!e4`S9LTH_!dOlbb(lPK(>8e|ot#F&lDjN2yQoEZS@^WBIhUts3v%P2PLpR>ds# zPhaNSWx4ikmpuJ)Q;ova*B(lTn}56P^grWT*|jA*^WCDxV@a24nisvebK`Va)Iuw% zcY-Iiy&wPi(EBR=NT%GK)2!tmB{T)TYTe#6MbCIP-^Zo7X?t~*Ql$7x1p}l zI{Dc8HF=`9KKywX@>FB{w4Vp^6CO|IpOa%({LC$AV#&I^bKCERZ(Mrj=s|ulX}8N) zxc$0z9-hs1XS$WX%>R8Y1~XUmIel@i;{VRGcB0+USk}8jN47`4+q3QXWQ9Hdeq{XM zKN=J+#_YF0`LL6%){fQMClwaleZOq|{^@%eYMn?`i3%^PSaF z_vzfb+S)K`TYJ;mIdg=9*BAM&JbB`VkXLee+S3CYAC%9XD`DX{Kf{4<&V$0y$~S-|5Re@^hjH_4p41?OZLBHnmvExx&ifp7hn#OxPEOQ-$Wq>-8Kx-{_R z-#G!|h zv3hJ2cbWBMnLwt{&!9_B^0+3d{a;)p%>IS<`ploUg#up2E6<(v`XTXhH*1ILxvxvO znP=oUnXy=3+n8p5yx}nW&hNnwoi}oBOc7q2T^4Jt{f_sDRfv$;hItNM8%{brIxL;9 z@Nvf3NFVP9cQ#!A>+I*UV7{QLB#)VsZIY9cMLJi>zt`uCj!bwFJae~w{3Dm+q3ciY z*|@)d*?E&C%Rio46LPIK{g=7i_t0aqZ2PNbHuc=un7e03(VM+}pHJHt@l`nL><^jH zzxeGh)hEiualcx38ukC*QEB=q$A3k8=YqfSa-8kGn{2*F#NB+smawI9Bbx@U&+fa^C%w@o;oSYaq5ac)6N&k&FJ~P zO?pmeOXhZG#mc+$ZDMq4dgD)UT=SUovTN4`PEn(0TFUFg+%%LO>PmuQoqzl;@w(8M zCqE%lxqjAKMIH5ZQvZCN7H*muUYGV)YA=Uu^Dq`a?~-+IG;|6y#_^bPl; zR{!qz?T%gC5x1h|l278EA7?7-AEzy5y7OrA>kT`6`(0gq-%l5=+vR=!%gV>6rrGq> z9$C(O_T0T%%fRvjC$B%Z`EMWktgApX{jWy$&)Bt5qiEZ*!=|9ZCV-;Uj{6%N0bv0+uXQ&L^XTA6$D_uZBW+b6!vYyC9q_rsqr7XEnl zL!BkDrfspvreBpeF8p-UJu#E7bu-7sRt1KqFTSkuac7*mF*1zi4OYfJ?)d)|U$?rV1*IBYp^M0VVe+ksU=AT1vizwf@I2TX1)D%vqr=2z>?h?cG_Ai zu)N;$x*=oczE4>tTe6flGE@aW`N@*I{;$@HC$kux(nadKZfkf6Uz~D%b-?ybt?J9P zbx!oZTy=D}act!a?)4HrQ_L*)Xfe#2V_3D(epx~7hO2J{#JRq0Hf$H!opJu^d#(%7 zWnVHaH&h-{VB}@FB5CQh*RM49U&371qj%YloRmAiP^H5=;``~!#+>P&-6HKHo=+`X z>GzHQ>Q%GNilU~ok6$$1^z@0$g@E$Ux8pzLFFvfF(8agKwq2kgktgmlzu}V$>buI$ z7M#$SS5|oT(?au4{(-4;WzxjoB-zT}Xl<+y__A|zQSkeg{r8&p_iVGdwvgjbC`bMA zZCkkBY*~}CdR574Aw#!?kLoOb@M>L|c*lRLQD$z~!tawlY<#b2*mF;ucS^TSwkchecRao5x33WMLCYGwU4Q$NTP)e1x#-K}9IUCj>fX;TIlaHo?uKis{RxZjCzZuT zB2CTHOHLf_S+f63k39dSTT|FiS5^qfZn}NAc>~-0#I7CFrzmA61@6~8^hn>>?d&$= zSBbaX9;y}>zPcLsOx2r--CR2D^6`?F_vS2A*s-SZz3*i+ReOo0JHxa5m=A@?uM?RP zc|Lc2kI|(S%MNL2b6?$K==h$!BizyPnvL+QXl}cYe~jZgY3@>bf?~a&dT|8%SR2l^X0$Y3eWtJ>zOhClZ8@1!k20MGJg`9 zZDlxd0ct)zYS) zd${k~&3n3|_nv6H!;zCbQm<$J{ppvJ!o4&z(cE?44gHIbOkTAs#AEL;g^P-WUX&^O zAo3}(kX2*1)!&_6^7kfRDBLA}Gk|fkN10}b=Y3;=$IVCi9k*OM^KjyhxbE}|_tnd# zyOQ!gd5cumUu5ew@T=-*Tl4=Jzdw%vHayn#`Q{J5YY} zx8GjYm3Hf|zY|+>IF!wDgU3wGl~ev5@!Kq+dFkCWMzL2DeAnf#unaV*RePNK{qyvf z@2fXly1#;-KknD#;HJN;6uErkew-Av3ivgNXQv?Vt}_d^s80H5zwxfGg!)eI>bF}$ zy#D{ZUSG&}Bl6!*|DV6-yN1e|G_j^AeAwDvWnwj3y6gPfS=(C=zkBm&qK^;H@7^o> z+`1CB*X`irxEEc$?1rI~Kvi}D8`C?3HGU4QyUK+wY+q~pz2|(SWSsoknt8b{!ReoF zbyo`-dAY5%nZQxCsz~TJTT5+43~O()q(@5_tM9$Z{fC$z9Dg^fbl0V|0f+vFWcJ?M zb~1bw2m8&?BU7)wP&dxoH0KYG+x^%z_jWLb?7CXT!?o(o&P#g|?{84;jht>5d2^fK zUVDcZv!^y}xOHt+P)y-5KZh6YtV^v0;xg9!6_;}UxnN_})`Ls6^d;B0^Pb5%l=xrE z#LDfP@D&dq=M868lt|~UJLqupl+yL5i|jL^er&y0$#-hyZ+6MG$Je#0r+jG(OZ{)~ zB;)tX4{1MBcsSz~oV)sUCiik0-@KN*LEPOf<#F)ytQ6I%#@ZFXcNAaOG%lMxy^T>_ zw&>RFi!Yw<=+3hh)98(E-YS&kadKPCNQU6(KT9-Fi;hbvcjukf}5I!rIt z*D$hVxBeD5y71HLj{P@-`Sot4$9b!W{d>11{m<(kRqa0fb}Rq9ds)8FLu>lxv?b4D z_GAn5JG3N!UgzOHgT+2`=ghH2pkvz9!4exU#P z9R8X`QR#f)%-*ZN>dz30sxpY(@~3*^rDn~3vy!e;(YwwrwlJJZ%Sh`+*saKN! zglF#4eYblkbJx8s$xQ3#x16{k*6-8Yj#Q3r>-86XKL>qE-gVpJ+rv4J(kgZN3o5;Q z%hq4npq;#QHmi1|k3a9N)tB7gTSsmXIu-dfFhMKtX)()npY0DW9=Yk>{mrfW<3%aW z&30`;e^g@+HF4Xop4{F#dF@V&mC08@TGluO-Gdh)6#=Whdi$qT*LkcGKzU7OF2ZuUuBm z-`=sgul~imNm5TAU-9mL5F+>~CH~-2*G6WqoA>u+Z(e-%+smIh3)X}^{v)z&i|FY- zXV%Hm%Gm8U?>yYr$A8~uncj}$K7SYbX;v@g47&T}%$;wqc5I!0 zWzMNhd!MT1|2x=uE@1EO3pys#XK=X6F-pHucp=?&O|saQtMB$So3&dd-4|WFF4`+u z`$4aGbLQEj5v$p5TRhVgtliekan!cRMyqeq7CWBSLwi^xb?w~Th13e?zU&IDdG=SX z$!2~pf24?%^}}_n0t(4b^%>OXysf@0w{6E_hK?m`XC3DYIK8pt2VX>CP}-@c18d^e zs;}rs+&gs=S5?Ov-BQU=0R^+!a<3yo3rfV=K5&K^PLca|+^8+dp?qaYcUqp>V)*s*G^XSdG zGf55u3aN8R<_9U@e8J)KZ|42!wXu=O z%Wq~}o~3H{;c^&f;Eb@8s=%68=YIa-;`?+`<%#W%`=YVe4X^*?=wtJ>voCslce5SW z`Ye~&MRR|b&z`@x==%MWH>=nBv~Aw;_>;ywR(lhf%1;*x?Dw1OxvkH;evPv}Z~s^3 z!?vf+HShB{+;G)v$L5Qh!kE_1-`OGb@!^J^_ok9%ZvGjQTd$jke)HgwSbjaD_}J90 zDGBX*znj03%+{E*mXXEd;u-nfGRDRek3Go^leqKx=Ysj$DrR5x^q5`{e{}ns zFTb>xZ`^8ZEoAg}1D|fBIFGsAd*&B+7cbG6Vt3-)EaZ{g~XZ+c~_(3RsN5}MN zp#@tyH1A*FUf;Nfx!u0?T3XILA^Gj@mmab$jtxwF^ZUdnq5r~Xo_LCDNIBOmW}dY_9=mIi2S^HY6UQ!;1Gye`#m8zuHh{4d%(-D>txjd@#{7;m?4i+wq9 z(Rn?Kq)07;E=jJqDZf|$=;+(=%98o#;)^GCPjdJdXB5#=FuSfjTW_WLw}~w6Q`>)E z5!&xrGv}+_Ywg9KI_EMyDNGT%)gQO(T1?Lu5BsX;9e7xRcA<6q45b`(aD7{a!)6 zT{%-PGnB=pPjTXUzxA%Rrn3C+9|arNJG>Unc>LS#X!!i=no}iemu#KuwO&rctoq=Y z7c=DNd_8=5W3c|-M-7T+Z5(e)%*;35=g6!#vvJ~_iJSHu3%~9ZaoH&5_N|3)_8hs- z9}qZ2R9*bk%;m?nu~$9b@pJ#W1NjmU4vBhA@8)@1vu9LcGl{g>nE6T0qkdB>xX6<=9fzx}-dh@pz z+}mk;d|9i3{L<2uALLSx44=l?9BD5LqN;-#smK6=YD($e#ovUV(5KXa$@7ZgD*woRJz~q`JwIjC*yC>nPrB1-t?5X>`3j@ z%1M&nYITHfqdJeT`MvZjuA)BC>(?^aUyt0*v~pET-p#$snzfJFT?zbW*ZEwtxwT4Y zeX~{egHpDW(iP?_4cz_)eGgeF_@awvtt7{Zd;gcbt1tTTV&#^yRZUw=n|9W}{(rB9 zZN_Jp%2nEK2h6Y58cdF7E}ksF$Zln~@#cdmdyg%1KGxH+Q-aT+U6!TISV(`C$Sc1Z z%|CNGKD#IwcoaOTt@^F<<&3(WL_UMgTvcs`XJ*&j6{qkzTz$GN?N^|{Hj$1~1*fDO z9~@k08ga14yPPw=VCmOjCFwUi*Ir*=vNYX0`*zdkd46%H1VT6RQqUflVH{l{iVE%CBuymVrL++}vxg1SEq?~13&F|Vwjznf*o zgClP9yXB8As5X6EwQEsQYT7~>)s?gFes_*yOFMP=`!4P|cCAl7PSP-ZneuH-ReZ_r zYx&lT)E8FXyL#oDavzwXI7e2B1 zbz4J!rvL0GldrxDSzq(%Ve+QMc7OVruju4{Yx*N*^)YjrdhkA({X*;G`>x;k@hEGZ zgog0CvLD+0U7KHIy`E&V_?>Dcf6LjkQ`TOO5qfH@5Sw`JAM?B1bL%(Ej#13~FYmQ$ z;s2O7?f=7N?w$JY$nV^=@x?u5olX_ccKJl}4^L)l8nmii<$wR!pZ|OD<>+ZQ7cQO? zdZhd1^tZ-Mac|B{Y2v&goKn@*Yn%A})0+9_o`-y&u|8U=t}1?CqW0#^^KajI-jO`6 ztIP3QOY*`N&Hr(GdmnVPEvoF@|L|Guq_qhV7u{>#OJ4YRMY8LC@S=`3cH6GYe>o?A zDfd6|(Qn%O;vLa`-#0ep8T?dckexbp`i{k)dfm%f&dU8>*UB6&zWVHQr<=hm=iFR$ zetL5Is877gU!}Lv3?l2oe#W~eh)y|Kd*P&Bq!h#H_*@3< zykM>dw?@{x#b;wTB;4E1u;Zk!)}j8QrTWuauB}&^CTFKQRj}-h_Z-!Sd(+;$uf6A$ z@MhPGWt%?LHm!@{wjH@MEh>TSGvEHM9xgR=G2t?B&erY+VR+GgADQBh@oVn4< zs<8Y9cZ2G?^gOFM5z8+|?Pql`7U}%0!Jyq-?5eehfoHa=`a#DcBhmR@4S&|@^zZ*T zt9C`jHFmq-TPMak7?{j4XLii=Sv9+H1uvVFBO71PjOXsrsxvxXnhP>EpV(q9$k=0% z8+tGy>ZETyKASuAYj~_DLd|Ok+o3`xwrAM1HB7;6X`6;$s zI=$`(r(CmLzv)BG`7b};UT6MgTXxmX`ZX)E)i1QkZT|4#daiU_^0g%;PuINBZ0Ts5 zJlj_Fe|`4_AuA^X&x*X43#aAA7rgiFgCTatHAytU(;{zJ8* z+Y#}cz27e=1lN>QuIrfP@%kv6QTY$GU-N1wh$>!vv1Ic5W*;NDhj%3k_o@92*1xcG zm9T<(|AwX+ceySJpON0^WUy^bK_=z=zF~P&1K=5xe;7#cXnNT)cTO) zNaMlC@}m(q97Hqc%Cd+~mpQHEQ~jpXvfY#Jv@P5je$o5F|IK}zwR0@Lys?*U zSfFyP_|o#(vHnXZc`!_0xUr~Yit&Q8&Ql*nw!~T|Jr&|q_1@8Vc&6pL<}X*m`}Fgj z_nvE6GJU?tH#=@mU%QH#E0b+j%P$b}Ic|GRQh(88tM;0J;?{zln^$Z;?eAX5vU8sG z3wG^q*E=uR+$l2px9ZT8H4BV4{8rVP>G?WmkMrJ`DYa>v{`^mwHFc}%o!GyoiY`3? z{2>97tJwo)9-Xn>Aka+T#C!jjFK?)e>~;)86P7S*=mhDrRVcgB=ci4 z+TMNMC(Tx@){}4U zEs|R7>^?oIdVQ%}*BevMtJYuhjw_|=Mw9xIP-c3rUf!+rY~&F5~ZMrBW{ zVyiHDAarw0k;AeZ2FYhsJAOR5_KN?+nTsv!j-UPXt-+Lk@tS>g7R&x8_1qINPz!w0 zJh`oF^4Z5T{;#*$6j|MND*pd3b02x>%k%$x*8kI1&yT+`^Nq-%K6OE*H6oj*KJ#>W z71L`J;yG>iL5u3jI?tUa7n?dSn0uDnHC(l}>XF-$mup{3<}Ciof7>BmvNYbp{h8EN z&tuvfZeDDvH(0S%pM65v6U%R*J=K=eA9(k)tUUK1wm+wDzhRD_xB78rNe^q$xy;W5 zzi#09|NO}(U^Pc)TB3-zbm(YJjc1Vyne-!(s_ozkMf)^wA*8tlz1=Nx+K}NmocclnD4_W z@qXLL2KU+Xs$V?jR(w&-ydW(@Bv0R1PfjTJo7RtWc6$zUzgWg_SKHcm^_4oS)~qvL z7dI}Ry=na)t=Z2c>$aXfc=*&dYnk})^v^}GTVTI@41w%kdR7g=Y(gs)-j(Hco!x2B7H`W`>&hF`X|=uI6q+9 zy!z4!=Qo>MbT6k}vbkl-v36^5g1nUG|JshFY0u}C{@cIym$O}amfX*XU5c7p@*hqV zkp9r#vWYGA`a6}7-3}f%pGB}YuPPGh-|Lw&wX?9P^C5Tg>?JEwe9~r5Z#etSO`@zQ zKuW6qKa-rItaXBan48nmcxhGBjhk{yIGpxw<9}kpo$sHVd3^Qt8EyV$$lP1G#g z#$h_4d)AjTL3xKPx4zQSK7P>g>&B)yqtrDq&C85B->9+1z7ni6eykXwwo-Y+X1Cw2 zM}rN1wpDdf8>nlJHb=u zsc%XUx}1|P^~GbmQ>e9XRDX!QcGrTSl`D5-Ewc%|@qEn#%k??z^H*)~G@rTZ$<@6{ zCQa_YKQO)Qp88UyW&Y)b>*pRx=X;(YS*EA8a;~}I3$`IChzfNpUj%?^E zCVQ<^%iljbou05523xf`rC!aO)HnX%dl4hBdfE1@Mzw>lyE@oQm|rY7oyE7$%StPBLGbEd{AtH;9NSX!A|qFH z)074IrJPmYes`@U?lDi_eV9S-oV|EV#rMztEaFwy{se?Oag_$wJ^>Rdc{Z>N4(+FpgpX(i_zjGUJr zHo180<2j#)S{JPYPilV)V-PC$V)Fd0IAy2O=7s>dsXK&pRniMj8f~nKX{tOY@93;{ z;#sNsF(cC{Dw20DH@jwDG!&kH_M+iLf0a9Tt-|IU>Ra$2?5@0p>f{ql%?^iRcT@*j zNSTG4|2<Zy+o_ZL!GzKB=zC$QMCl_pUb9^Eu}MDmu;ka-P0U(rT-s(E|Ksq2 z<;muKehw4+a|7izy_G!vW`m=>?8ScyHfuS0+LA1eWLh8mb}{Bc(QA2wMIX=TOP>Ae z?Y3vKzU0hVZbnA_J5o&Q51e@NW99F~^A5QB+4A>BVlV@8{lqtNiG0Rr8}|Y_8o?RFCEf&AA-m?{=}q(mUe%8uzO=vljH)?K!V*&C)ve zoX(n~sjFP0LN_t`n$DcKD*T(e*4^}l+B+8+-TLG>r{~&=GbJH+5BdKP{g+mE&~RSd z#tpLfTIceHehO@Kob+Uxs@IAw>rSnCI)k~If2!8WwtYQ{-*3HsEWYAQ$etumsi|iE zs<+c^&pXHO)R$8(Dm{GlP3YdFx1|oBvYzZt44G7V@a2@%`=(Y+t+!E~`gH1}!jyPp z1I4vB{X9kE%-9p&zjpESKVQCUMSARJr}ykJJNq59Pygf>udTu#T@%ZrAA* zXNn%bJdmt#Twh|6>YvXdRky=V+Nw#2O!DWr(A_)PFyr3V%P~q}9h#T5Zi~CsFA)-J ztDUmt@ovL|E6?{ItthLW->@^@*)H-Mo6?mfHA^&|J>wde+z!8cdC|ffRuyL1 zsW}(;mPb!!wLE>fLL((QQ|~f8H@TF= zdhBH9S{u=Y(O(Z97w>m&*by(hXw%W^AGKoK7G{qODr_cfe&sMr2q#P(HvW}nD-mzpSQ~QG^9lQ4TZ%S@wPF=(;dsF&w>~@|DSI=1`Pv*Aam@P8d zbn{N5kG!eJ1q|Bvupc)&W6TwD!HH}3se8PZs~4ThX<9gY_#`A?<{(cwa^EJn7&Eln-BbTY=eqNBk%X;l@xz+5mISq>? zif*whP@T=chao9*Vf&CUAjp51vS9Ug5_(0FNg&Ec>hM(?Zj9sIu|=AL47 zO#R8Z!SMlKet7-6Kdbk2E z`+xELUfZSHe`>;=;IKop7e4wOo_a2Mvs0Co@2x*J&9n8tRetVDf4_b`$0p5)W$8I{ zXKYD&Q|M9q}@zl;gy-(sZpe(u5B!lyl~AWxBN@T5|y`ZEYD2lH$FXgyI$^^%R$n*8#>}-G<%Pg z9Y6Kka<)`pXW2sy<;)*W?0GED?U}4%&oQ35p<1<}MYE^qem@Ui7SPy zOj}oC@I+TB&})CzDTRGk{#?_4bM)69rfIAOzoj!4IKA)?{gRv3y@=!4E0wI+HqE2j z%$u*hn$P8z@cnoAi)+ugV%Ew?>P+PDFEd(x@P5A160U7w?|pesbvI2qK96m}tV@=w zv|j95%Jal3X+?qxSI)Y%A_qCbcdU>qc0ap1(f?ejJ=gWgdHvzPHDY)@>qPrbX~)iS z|KujS-LUzIFO#Hx-sc%tY*P04;S0BLyu!WR>mdgL>ymsd&m9eE_<%C zlZy&g&J)kCvJKf)=K3+=UGc6po7>O5cFW&x+Batb_ua~+#|;WruG#VB9S4tAbW+(S zF||X_PDc49Ei$@Pv4DAns6l`3mpvN0#OKeLwb;UN&z!|oBJF(#H-6e98I>Humh1C> zXO9rib0O6kTQV}()WYrw^LqU$`0?w!=!9b&lfA5_{V?6b?on#w^>E?grQdc=IxOt+ zt@EL_^~&giNo#nlJCD53RP#%bJr&l)sdbt!`0)3nbJKaY8h(0|qjssk#!_vQfwZ61 zxmuMD?Ip_hl%g*e9u$neRWOHZ^K};QFKHP9`A@DXOb-2@ap8fhiCV{si;kUzR^=_-mj48KZlP@84usSNQ+^RrlY>&r0lm=m5^2&ST=!;G3C)y-Wx!u>K9h`V? z$C`+FdE$>vPw(5_aPwuNTsdv zb!G324?nJe`kIGN{c6;D*zr%#{{O^~qrnWe5ZOve`*rJsqz>(i>^=W7R7o}rYnyoE6-#o}# z9%8>C(@6!>B1MV3iHtQ>dr%Vt$9WZGc>*Ju*=ND{xlZ|X#r|BN|UbN-R@s84ayl$u3 zElwB<~a~lrXduq!S1KdX(*Y{x8*}c?IjI$E$+WEA1m%L|=$udjYQ!+rAkw!R;Efj2d!Exg<=mpdt{$Z@e2^i14!+H%ig z?q{>|*o~vVo%*a5do%T`aDLla>y-|kYi_NTe(qDv&Ay`MapISGE{)DBejh6k{-r-_ za;IXloJClL<{dHSuDKtKmalo)_i?db%Uwpfl+GTulKZU7r%MKE%2gjo+4VBmJH1hI zwYPrR-Wi`SFBX`0&VXa}mFOckE;%2o(rml%eS(nkX;n;eCJ4s$0)E{BPzd&I2Bua@Jm6SFWtO_o7&>SLbp&4|C_$?EO)VA<|#! zr*l2HGQB>;;or|*>Hd-fnp2Z^S^sXoa9^F!y zOTJrK+>-f!ec$0n;!!$LDwT(t1sf_tb{>)1uilXz*qV8q=}7G3BbJXmF1Vk}eY8#e z{^kiqtN+HE^{-T%sLe8K@!hupEf0^iJo_y6q0`*Q@8mtkv+p+jnAavZ-S=|y#+RGC z95xHKN=(vHF<`h_*zbE+@Nh@k`OOS^H`&$~vdrRM&(?fJ_=rQ8)P-q^oY%}|WC^;J zESp>T$aIsz&)X^WQ#Cms`6Vvc@AvM}KR4mv>ZThveP@`i*LBQ!IALmLiJQAn^fYj<692z4J_GBO za?*BA>*o6%(#TtN=(gvI7q(mEzA=8dY%cN1^>x#}nRPi863XbnG=rz$k(kZG%*P(zW{P_L>f;VvS`^cGdlUan=O_B^ zwet=#eg5B@%lqftrMkTS*B|rKx);2kb-u{*(Sm%t2HC=$Q@&n(7rXdi+1u|YdD_~4 z6(5ya5EiYJ)mzl1H)YwL6-RqdXEAOy-D9j~GFd|GOqkQ^sBaAaX1SO}?SFC1b5p|m zYu$<6y{8xI-kWzPN<{lW_`P`?MP__H1#j8)UHBi~_VzCcG2@Hbu$7r>71P7rEDm2R z_UVYP$#gB&oB2RB_`0`*)+Y1W@_P*=@(8jh?o^2}g70@jx|Cp+iDPDa-Pb0DXkvE?Jf5q(`f~QXUt+?d# z$9$1Ti_@VHvngqlO&pJImD*?UqxRT2gFMBrb0z%*j_%#^bEQGim*3$gT36qhFMb`p z+rF>OEKXm1g;|?^MowwSDWS;dXU*;BCnw#|n{ngNm-Cg?nH#=M&q$V;bE3{gI_2)> z`>T9+Z~7bd)=As=U*hhVNh&7`C90-cI?i_a``)DZ|62x@l@peKU9~AiP)<*%h9&N4 z!`8ab^GmqQ?-#y2V_+#Ub*1dx=Vv#rOAc}W%ToJx@>GVVm$!M|Uw1#SXwI)_Bb75T zuRE1&G#A_2s!y*f+3~es(?$Gu>un`B`RiRlMS=_0|2}j6+_$lA+{a>)f;B{Sum8SZhqvz*sU%4gROX_Bn%Vpcg3Ff{n zSv{}Ls7>QreejZ>=mWj8`*dvAwY4vuG0||J!O^p!+y_c_x$oG=ZE71DeAy-Qz?E-R zm5o~d?srnv6%Kd*Kco7*x}&@7^t+RM>c{8uo8Ne7c06V43E>La-dmS!J$0>udZIex za&PL*38_`9ZWW%)Vwseu_d!xKbwc~+zha-G110W8Nv->I{&mB$RS#-YFKj8PmfW-A z|MzDCw=@@>d6gNnbLBpRxsNxu76wJ6gly^&Yrgt?LWz>XAwR&ws==h3wM%@g=W&u^XD z@{D(1Pk3IQ#H@X1U*qJ7af}Ro%&8LpR#fEGyj}Y9o2uG!A-y-Lg$#@P4p~gOp^=>M zN#mE{?*fMf_smi!d}yi*s?9F?(vW1Ic;m_o(VrO!n@;C3Os;-wKjTYw;OoTMXLHvj z2XV2eRdRCd&PrMJugI%UR(=f5dn(>=6 z^Nz{kzZcFYB`Mrt3HcvBrzE=dW}t3^=V{KsWv)|?Pq=6ldUL_%5B+wRjRVTuIvioNdEIhgpoVFbFO8}|G>+=krR2Ic|>q7%luz2r}zENQElle!8ecF z?Y_PK^F>lk9HWbOEh}1X~y2|vq^m;SJD~E zrukcS>H4$LpSiiyziMvi&$*9d zCU4gKYGJ)SrSWG@U6VnQm|I%l+u3I(dp6#Dvi88a(921Ao9*9BDXzG=(??iv%F3F) z8=A+vn>Qahw`&;bG z;!ZNLTt8F6I{S9tDLugjCwdpRt$f(PInTIgb+68z2QwYtu%CZ@UTB{E^W!HZF1}fE zT*O-ck(GGmS3|8^cGKrtM!4}Gc4!dZDsi?*+I9A&t-q$FPk-LheBtYi$8F7hMMs*` zYubt~b$a>iAa*uiD%m0^PxBo5ir}jm~v-!p5aBqgVTB}7>{z4zu?&KqOop^#=6wUmbLd=jO4p@3%{OdNmwwiCp&Xhz=3P_uh^M)pVW;?kWO58 zO6|)JU5&nTBA*SeFMTwjFk-R0i+H%VC2A$9)^myNo%>4}>QHhsDMMD6O)y{hIed0{vEQ%|0K zHj}$I!Xv$Q>C9h+@mxXHe&ac9wVn^1F9eegan>JN+#V(vkoEY-rZuaK z0v>p?Z0!v{r_p)q+9Z#O&yQ^Nn`coL@OF_YkI7lJZp-pRt1cannI@ExT_42am)7f0 z@b07(zfEOP7uSBh6Sd-rd|tDX-f>MbDw(~WNAH#&S67#@cHoPJ97j#>WgQfc+9R8C z@F2VB>}v^%GBRDx+{_$0d9sCXXC-d_Je~3A&B-iw-!FJiWIgIr9NNSB>^Mul>MYl5 zKR7?hb^B__+1~sy-BR@EwGXX3I(Ic$F5avxyu3+BW$WG8OT4>&EbO~@So2to$XUq+ zH}pl$8b&IH@^XArx_))q?0@AN*Bq{MyUHuQvREUz&z|LIShdJ{KJqY})4j9xfGqD!p9eD{lWrfnyXxTn zo2svuK9}k}CHQWU{$=j(O!=FguUKZUJ$GiENmkU3UcEj07K)ilhRSW|RY{O!@)3PM zgSmUn(TmHDe9fs#aH}}~@rdp^lkF@9(r2Un%wPPEeV55IxnzaioH|pZJ09YTDQISre3i$zN_z_Pvz}Z z(f>J_m#u0;gb)8D-;djZOv}GcNR3nGL__taWZwF*U~ToC z>K^Glo7OHZ%|b6`Id}aVmQITThz1n+5?Aj&X6AGS@z2{TntSzTA#k(C*=Le zKTp8a{w05p(Q zs=3``p7yESr?SH3zjT-M9A*Dg@jSciBj2(UENu5uJGHGuQl7sRJ9j+1;pIA6?UdT` zyk^z!%==wFF_-Urm7>g=a`^5B=Fgw=BJ(ZdHpOl`DKVq)mgvlFVaDR+AGym`tv%~f z9?6_|{qd6S(zE&ci{zioZK~@|+PzEfS!~M9(6oumEsbTZER8?DT$K=B?y`5wDc#41 zrk~W>6B+2J=k#O@8|CLhpn^LT1>5o zxX~=7J8{3at<=vkTwoBBEWGO!XR^+HL6=ir=Dnq^S7zaqPj zM>F>Y#zb!7lT5gIP-ud}`!xOvJEoUr$9C*nw9aArT%%oL!iTh8v)6rl%>U=xy6HJW z^Rw^BRc^XJk@wn8f7QKj=Ny&!W;FGS+y`xw!aLEo%D*xHX*)K1hv(gt$<1bq%Yx6| zIq1&ad|V)S>jGy_pXF=je^}-HXW{}@t#zMGqdWJkf2wY+FP(mmG2Lc1uYabtk<_!v zOD8wj{aN+%`h(ip6Z4jq-M4h}c+rtvz3T9z|MzyXBxqZI3t$y}|I%>XW|N88ht_S^ z-m$>E?My*rZ&qY{w8qb@kkvw*mzfv?a7ZDcbK>8mN}&XPg_pawZ8z8CToQdT@pXiKOz>BWnC>9% z#$TzfE05~`x_;nI$20bvNZxJRJC4r&$jIbt8uf08?uB`_api)aH>c0=Jbx;u)b{32 zZDohMCzzs(qMVuE2EKi{^FmnHittrUcfXi$h(#wh_H!9X+|T>;L6<-M;@RJMI;~-g z&skM}SQpWESbDdv=xvKbI$IweIK4G)CGQ^j;MW_rgv}_3JQeL+*?n;8x}TzR-4=_t zY}>4pD7eKqHvGi1lcL8?ew&>7?u70sCdQheua+~vUlBe zzCU@7Ri5@l{SQ@DyWjr%c+zEA-)(i}e|PsJuUVwM?D91pjR}`M9J$viuRoi}$RH+s z`Hl4t_l=j$_Z+X%UsB>V=fX=3+4Dhi+jsc1$8`1F);nT*~*&tShWIy8gytBfYy*=WM&c&z6@cqdog&SaYH7q0Y5B zk}v+A%@&i0s6N8=^-6!^IUAdn`i;iypAXDrT9;`Y0)YG2z%?!>cSw?yADH=if)Msrt= zs-qm&s=H0r%ipiMt0eX1M7h>Nb2dY3;k@fTg`0YpnX{kGRJgN7I(e@t+hVP)r>hk1 ztV!bFTBgFqWoU6D?WseLN=KmKvrQ*|eOB6J$o1H*ZQeSA5AW3PRr0h?+HAbx#&XX+ zkC@x0=L@c{s<<8%7b+%vFZ)iYn6RGPxyRq9K8$M2JM~_Ba_#D#xgV`dp&W4x|(zwbNG?PQODN7`m#dLBZ#JB!ZTwaDz^eIk?EJz3GSFHQfjuzAP9 z4C{9r9OKiEJ&IrZVt04;KTl5eFtxsg^LQ$FzNQ>lyhNC(e^SAuvnAAdNB-Kwl{MxcOjLxV zTqYVi{>U_694~$OY<+&{?TMQ==iSVA)YgtjKX-&u~a`v$J-KkJ$9vv2dL zF~5<)sdl{bl&)#RRN2KpRKq2UJOvr2{t)2$(=AxITgoG|aaY=%Ci9H94cl&o#C+~J zxnWoAQPIxzJ~O|}oA@JY)pqaZvblw^=o&F30Ecs`$_;5qMnkIup=QXhg0lo^jP>la-4zji^H(mwOxjz#Y| z_FX+(rFGFq+P#%=tDH&p>N^#mZFhfomRMEyt5jcUF)M1Be{Tus#1Bz_IBT-_c6C_J1}=qZ1;)tImh=fw2Dn^ zx_Qp(WY6y-CfgfD{?8SBH)-op{T-D%n$tSB*thOp^uR3YTjzV#9lbx>cBd`;d!Fmv zhgp-dBW}fQdb#TFfv;x!#9l7Ti2G@`eN$oaRqy53-G3Z<)**SiEjlLJ|Ir~?6RBHA zjn?p-e&nudlQ~!EdJ&V}PSNj<>OX!TYkagMbgo9phZK$MpvSTEKk_tx^$|PsfA-V7 zJ(_1^Kh7~||NYA&A+fKg!)~`PTg6uygX}xD$8P=-V0&?E)868ul7`7y*Eskk10{4t z9?jckrXA3=^82R=E05lLpej+wvEI;qPt`fIM{n}_^i@&{cJ6gMy=6v&x&-|rHgYE-}Q{#*v0Q^BGOo+kt>6Rvq`xcNZd<+#%HL)`h3<>p2OWL;z0SJOKE zlgU&W#~phXE}OBq;M&rfsqWu0%il>H&be*(_Uh|Uk&3O?944B5G2L;(@X3-${+?Ey z%(y*@yLNKS-~Pz&m9O-j6IuMZv&v=^`I<7#xVp4odd-d&`McpAO+LXJnc4Ldmp1F3 zZ@DpDQ_4Kw*d?=_oh{@d2>NS+nC~y3Dk0-_sMnY|WW{zk9IExwT{esrJZA zOc~-oJ*|5LFSlOnkvwYV8)m-TV{%Y&s%WE{WtG4g3#&O59`B!I8((O-vf(+~tS8QZCc%r`y89+7o? zwL9~gX$K5{eq>vq?3s};?N7+|lrKuTe>yAg2P?&D3GTT2cFRYD=G{4a?^HY#`gGRb zJm;v3-;5`6yI$xxm5Vv)-$%FUz{-^Ht+9bOz@kZ}2m9AOuuKZrlEigrQdA;PmBO6_MHW-^ptm;Xf zbI^0;rGS}Q@8szAPN1(s4qC^+v}h_n8q20zBI%^-TPmersPW(}#^Y zVY)3{FOy$QRTMOx)4MJrSn0S25TxyQPCk4Lt&WHxjX;w=0+Ckxac~1-Nee%_A zLE(;ln@=C!_P0}Exq8hLg+u3ee?A;F?;Kyhbhlht-0z1~dlbv<_6y$$s+{M1?ULr- zKj9sM%9XadN1e~dw|e~FEutjo-g@C?=lU58?|*8qSgYN3rsb4C$c77H{Bxr6N>ZZ| zwwoSxWzAeHew3-&zUY8Wd8hgAGuN1=FJXUqEjiLV{Njq!recQ1@1p+9YBDUfJR!rw zS&`vmJPL$%#9ru|h_hP#!nu4VB4t@q)nVO-sXT1NS0 z@*DTNTx47vHfjGyzf6b66YN)fRos8+p!N@UzPwM``gfj)XX?5*Og_8r@Z*yWeQWoJ z98Y<}fBAB>-ZJ?(`@5f>1g@z_U*Nf-;pJ(*^}XgNTGco{u6lb}rr$SV;o`YQj!yfz zS@o)dMKFwe?QdP39hk~+$fQefjr#BDvqTMjJe7Z+-edN$vGGLxVTZj> z)b>AlpjLn4;A_Ty85_9|Ck{>)+ITU`*L91W<$@W4l8fhRD7-z^z3t;o!%0EQ#Me04 zE|?lD_bNp2M*ocWVa>l|1$!Qzd;4x#z-PlJpO)ouna)o4p zKF@l++OpYNk5?F(`Am!HHch%AYxh5-`C9!|g@~Gi4>XQ(H_wSNIPrYXFNY(h|1Y*P z+*r!5kP=-US@DG7er%^moVZ?szQ19C*X(Pbst=;-o_wxa`pEd#gKg!lxM>o)?WC?#^U*$q~-l@cV?Dobw00Id7^KHRmr}KMZr{|EVt%zoH)g>+k@dt%yw0egr=DSX*xy!l=nA>U-2+F zVRA`6#nVc@{O(uTJ2&UO7FH5l{c3Nv8GCNMr{TlCz=IodoPOSa!IXF_f0cyIB&(xS zyhLJbUA6yQ=Iq#XNPqXlL#H|yFd6fzxr)VZa9THe>8TLT-CepT)WyX5pIzP9y>egZ zf!-f6pQHnlth7sGc5XD7@_3`d&oe(xeh5hpdK_>-Bt(pTxrs}uQ>jD7)Ab3G(f1uo zm3nT-e(&gXw`D$}Y*g4J=W+Mwk*xxb67azLB)a>U#lWY z=6u=_8yk^*dFHhYOHQ8P{@HTDp_3w>HhLuc=9flfz8cF)f%L*cc{udX}P&QrPNUDbrh;BXrk^D0&^g zWnE-+efuO6?OhkPCSAz*%`TyEHm#9$j*e8o-JZ9>7IWvBbae#pSTxV1=oYKm)@@HN zF0c%!&3U#Y#MefB$06I~AfW_L-I%4D^wp=P9X&0pz0!2Wlo=+0_9w$$95y|V2-WX6Z-LjUVd z9@G|iy(htif7UCz_8YE8&eb0}IJ-WACsya};hTbgTMiU3GEa6nmG`~XE}=^O%u4t3 zEDoPP{=9R$^4OB};!X8z#aF7COuS$8ia#k@wlQo{*A0%MbF-Gr(hJgM6`YWDe6phU z?}|`aA^sZes-NlW5YyQGqKLAMUS3lyjt@|Fu?LQr->NzYjsi4e{9holbLu` zo*v0jTPB-z+SAkLaaUvN6+s*Gm4>-T7vwKZn%gQI-hIa9oTs$cQPWqV>OEIx?RaTz zI)8D`zquPu9$oTwzNcB3Puc5w-xU_cPpmh;t$BIp@204EbIPUV*4aOQ+wy;-#M>u% z{Qgc}wpVyLcLXgdQVY?V&hWdd=bG~Tj#FVOMW*_)8y4P-IkU8(W9PCh4X*rVP66h% zz0U-W=yGy;G<%<{{J!YZvxx=QDtFvnaa-a=6aNoA{=-WQ*!SG2z40&LYs=N?GxnGh;+K4|vXgdnYZ^u{W`Oc{azvRgQNKdgaaG4zqWtJIZ?g z&f3q00xN1Oq8`1KnEp4YIz!{#_kiu}ZwixZ)#FYd&~{!Kmdp8xwZw`g|JKSKvepGE zQx(56zEG%5X*+OY)8j>4wGLmmmf4B7Yt5U?dZoZ<7RNEA+ewd9)p{m|baF_fU(&P} zbV~CR3!1gqJ4e-d!}?>tH|9TCpj)fz$|HQ38!cyHAt@*dhJoL>o z>q)V@jji*qG$rkD&p!D*weD*3i6a+#{O&wRd!(IzXX)n?Gk;6TACs@!AJ;1`(|%6m z%j~^}g8YS?Cj9I+pAZz?yu)}saXr<4CD@4hqX$+bj@T~pU2c=5m5x_tKE z|8Wfpxs_V+D>HW8-o(&`EYqzE@Ay z^MwCQ-mry#Tl6Kn)u#h4TK8`_zx;f%{4u$+M&;)$Z!WL4u56y5eb!GVZSLv6m$Noq zd~^EmY(uPLlDWQa z%u82!MvvlShos!oUdl+H4PVxCVSBjwx)~c5CS-Hom#U%X>dds_t{3e{W^x-K4z0#pyZb zHM37<@2#_x)+*LJ`gQGTzVNv`0!xlpKVfsRzU6yXMMr+sH|B49)ut;K{E3hJ9Ay*U z<-cXa>y`hP1W6f)9TO`&H&HRPwkOHu-JK7gZkh=>a!5TB>%Z4^KijTHQu6I0d8u1E zyt#$~)o!ou&1$dY7TABDb-}&5OVMR{UxgU%-dWTwyS%#U`xW85ZSVISlnvr8SugYC zY|*aDvm5WX$J^)KTPL5l>>%4_x!$X7u`SWdpRv5T{rq@YW_-j!{~cdnhBUS6sUHZm z$+B{kOz=Ihv0zScn&ds(otMrfPpjRR_Hm=z_LlHHlOEYFtBK;^360a_&l5QMV5;bi zMV}n9IhZOR6rYe%Pk$VFS-eY?PyYMStjhlEd8-$FTJ_qDJz87&i9x&D;?{&;Gd8)N zkJ5ggvik^=dz1gZo53A5$Fo13ozbd$Vvcr;!Y`-WpQo?dd~z;fSIY zHzzk6b-h{e+ul7SqigS*H2pmfoA{!&au(Q`*R%06=}BBX6EOKj&W;09mbK`fo0#3k zs~=u+FwXL-U-YJfmWj{m$$i3G{5{( zx%}Sx7uF8XXXwnlvSalOogMDSwKUS7OtZe&R$^6tVp_|qQ+CQ>Vv1dt;^Gqyr)ugy zKA@Mm*!`Eop=sVicl4BYRDRkf70;9;|48dzp`rNijGL1tJqUX9<7kHQW5L}QH_Tu% z72x9xQz;L%-L~lD#4T6tRlkd!Fx&Nu*XMFyKcjJ}=)IJ3<{8htk0-AA%Bb1*`e{}C zZnrnr9~RA@$2;S_U8ctONSClx726~}b*@UD)6e)Iz=KZ@QdsW>>W`~%= zJbM;BY`0%{%u8{>M^5$7s;I9q`s!0_oZhOZ^UO`t%h)YfdYQLy+pZhOPr1ki8|EF9 znH49pn{`!K*rMpyO^2gj-<^1GYg`rIxmCL^m2c8o{e zIJ-Pk{%Clr^_zKbg6}T=G&S~hkkFTlZA;Dx9Tg36+IRS<`Ha6cg&e<+Y*+Z`|M|dO zW624xo$p*(?kv`NFYR0N;mHXb){9yk{=M|l>X*jHx4JCd?*4L4S^Uyuxt*8XJ&d@V z4(@&Ok+V?Y>!zfoW*7gz=(Je*^@;fJ!k*)KWy>Zx3z+4}Cw^{x%_j9{##)^9b97C#Gmq)w9nN$0b$;U4Q7qa9Zk_mfc#{xao?b@AD>JKkLcCeAGWbq&;1LMNjdqjp6?N zo5J4iP1T)JU;6g##DHYo*1A0zk7VDdIdI)|I@W2~GTUC?Y*NCTH~dc@>~lYMt?=o3 zQzxZ2DIxo|ifSKi?OS}&g=eMVx^T8-?^{3Hy}i_za_{!%xmppL#^KKdXU$PhxnAPC zepdfBvCu84@8q_bTnqcH@#Acka?!oWwbQ??sr%5sRA`c%b${O5mw|ibe3PB^iY9-N z^UW7Ozcw?aPtMgh-*HFUGv$}l4}M&3X&*63!0Fw5d5(i@%Bz{3^tk5Vb6olPgnU4S z{^inpDt1dsBX5`9GkG)N+Fn!t*8&ZNe>%Ol%}ZUi@XF6D!D}}rovv}UV>0;uenXi3 z+WtJDki1aqRSwr`)%Hx$jr=a)sAly<_xGc`a}(B-`_2hmbbGPhsfD}Ng&*0xW73*? zexLRz$y9H@a&F1W4c)W2=k!kbW#ON+D@XUSffYmgv42~dv@gxJo*lJbd%tV=UWs$= z6V=``n9q;Vd%M~0(9!rbCYI%DQ})ak(FlHNquW14!CmvVuw#mc*UtWlE)O~P6{kIZ z;J~BzRE_Uo$sCiD%aWK3ujR?VIPkXcfPmFEjuS5&Wdk)93jBMkH)TuHk~KfFeI6Dv zm$h%4CS;vfDURlL>W8tD{pbS!oAg(^CRfZb5&X0;J8yH} z8S8&K@)pIbgs*EnmfPPf9aX0Io%!>WKT{WnZ2WrU@72}GC*GZ8dz5q{ZF$;s%?06S zj4Us%PWJsjE19G0>g09gk0ZUA&uPU*n#KY}XAKu!%56{bX zA91-kZEBMGiqG@s$sg3V%6KzX`*OEZ(Y~~E+{y(Es>N4kRVDsB^5QmQq2jgJty`Z* zR~a^Eg;#h?al1O}ZO6r+(4R>Uif-`~x>!bDJr=R1x-Rg?MU{V-ggBR+d}Sy;%VyEzO-51alf70y%Rc_HqS3idWbK3e!=bxO^e3!& zBeLD=qxrTg;Y*nr?k&B&C|J(mpGo-3mERj{LtowO63@F;bm+rc2iMnM66)T!an*Ru zpCsyRTB5Tcx!~Q*wMQ9Qt1}+&(UQ>n$>Q3k+xWOO0 zJJv4ej9TfmGC%0(h2-m-raahvkq zW`4Uqe;(t?6E)06N}ngC2k82(opy%R_1S9wPfIH0CdHKQm&@JJXE&)>H8NmvD!brw zvGhj_EuyhG>OY;T^e*l--WhYPwOB9pY^8T+-^BfIJeqs%sE60YI4lOOS2i(lM?vSW#jWc4x7Y4hpDldp(S2bqjzfk)|kD#;9`6oqZhIAb{ab@WQ=gB91tlvFayuAw$8Ou2KaIoYt<@Zy@rWbem}A~x^-32^xu{bgSG?vcP89VgL^{1a^Q$`#s= zdi~ibwozfdF6&v%%^EyUzIx7Ld@?bRDKh2J;t=+t8DAf>ZZ%{-k-IR~A#K}Mf4AuG zS31sX%@X$XvR8QP72{A8<@8tK?}C!}^HQ7(b2`}n$9h%0em14^d97Bu7XOsQFCojt zgJaHrw9#DYc`WzuhADqMv}c}q?8siZaQk!4b36ItvZE&4`Dl7nN@#|T{|D8{s!Cfm zZD*V*j(={VmK{;x{kc(Sx|8^y1v&@n>;jx-#4D$3&o(N0*p@O$W!CDsmnQX|n7VrR zx0F8SNtdm;B;%J&+_`eG!kRB%GgPL{38;~ZG`y$CU|V@$@p9F$J-ubSj6|#KOR%fr{WIK6S*G;@j5-pIYG6GJ_V4XW;(oA)%p{)g`Nw=%&VkHbaI z-jY`m{r@YI&oQOBxXq{Q#O0`IOo}RHteY2yPn{;@|4c$lSCwhaRILMH?t6Nda-_Ii zpFH8?`mH}K*IyH=72ony#=k5yUot4@z}DSW-ld66vm>rM_I_baGn#QNI*fbIu1cc_ zdB5vR^cv0C6kbN_{WQwFS2pw5>^{yryA~eN2$b1=*6N7V=0kbi+7Dh_E|gx+<5*b??6yvepY=9Nod1f}@`oIHAC?L2nQ*^eyxZ|syE}h40tY%tX z?}|7!1hyR&%e^osFYlM+`K%-+$?=veP8h9(N~!bsf=n zes>5se`9V<;rw2abMe8i1s(5yE_l#?UYv_{t~A%vyyizce7t^h1zg#Aucz~^_r0^P zIb7G3pSyYI?L(F&7kz9d&F1>B`Fuj@mt#Aox}IedJ)3NHZ_BAUt1_HF-AuKwm=Q4}q zN}>KKi~FDIZJe>Z-|%CM;V+3JnNeozSMB*j=V;H3`FKyzByPq~MRX|)bcI{)~DHB7))t=fMVZ5<5;H6G)^<;4{zB7y4Nri+-W!@lxHyOh?3^&P^o%jtxYAe%Kn~7 z3$5LmwXWm@Ox!w;H{9lWuHuY}S*N6qN*?IHU1PZFYfFoMc1f0R^@;>u6P8)`(hj(| z?|<6dY4|s*dFPj{KkUxsKiYTb{E_fV^|&4*HoyHP*T1emU9cyzdcSwd0fXkXHa#E3 zq!}AXo2>VXh>$Jy<$6y{_^kceB`)z15EukaS13qIANck@H%Ao4J+Z0eaq@j zGllJop51YX@%4N*)(Kz5CcN3|BYH&s%>L!6GfGO;X8eD5+u&h*_S4ymmPyO)trt1G zWM!+7;I8T%(@+t8jfhbhRjfHTz_KYqeceXu4620UDgK+RvxJK{Qn{C&;H$IZD&5$e4X~Q@%2o- z&%Wm->|r(7xK&-@!QNw4dl=uJi)Leq_2hNB;OpNP;lSAz{9vb;*M=)rdsz~=Cn?OB z_in?fGiaux4imCJ z>&kEYzTD=@qG#+Jo17WeKayf>diAg2dq$JObdKUT3JnV1C;Zyded|b{&h^<$O!c4E zr|#S<&!zBnul=I~J@#KzUY~5ZEqd~(z~ttSE}5I3x!;_>aQ0+-XLI%aZG2DX?025O z`qs1aa?xjd)!7ywyJ2jtV(?=5mQ>xk{)Nvq-@Y$;>hpC~+rba7n!YMF9Z2vzZ*#y{ z>4~JX|DC;;#Wy}Z?ewU#CF1kJ3>L0!ACAxJUpT=ad(BR@9_OVWeqXg!JC&hycJ2*^ zOnttC(>^Dhua++2NW8e>=%l8%A`aj7`mu=rC<&kY!g$NxnTkHa*>8UaZFwPe#$#J# zm`kVuo3q<)?c+yId=|6X{MX@vVZZkq#p$QKH~#p)fGMLpdfK*yQ!a!q`OuQ(;rETJ z-2ChL6k{QW=TVat<{Dc(%s%^1h2g{QWs@&!`f`51Dl_-iw5y#nzln04aoOW{LV@G5 z-_sz0XJ_{<;@zgX=MQTk`{pg|`Z7)1|ELCJbX6XEZhZJ%!zN>|D~ETsGlo}%H0RW{ zezuBxCprC1!Q<<5?G-d@@9t&knzXFy%~m=zJVPUDgc%bZ!vsz*IJygQk82G#xH6ti7*ajI8{7n@Jm z^o#E{B=#*ec(%2<#MR#AN!FxQYg^9E+L@XdXIwaATd!(-#54ZWVi)rlc;|kzJ|!3X zYT}=T-VWyiZdnIxI@76sa<&H3iGUqzqarqJxfHe`Qi;9$)^FYP4a<`xxqd4|J2E70 z`j;hGqPc&EC zw?Dh;%sQ^)!P7cAHg}t3e_4LEZthAay_n6@)(M9$i#%YZ#pbw4WOsLJ_)@v4D^$6g zZkPTR%UJYo-REUfR~-KzGu?Arv?Y&o`INLAI`oD#tY06ilqDA@p-IyA=4cTU& zdAILUO38}thY!D%l6{otqnV#=a==FUS7gDDS9z7^PnoU=4=d96r&{{-`QMA7_fMBz z^vZGEH@rMnKYae|64!?8!^`K~irTIq8839}R#mPB-hLyBiW_1yyQ}XZk0V;k|Wdk;bg&tytJu#VJrC4<3;Oqqe7zu*p{gYpKOY- z+7x=Sso?#zwO(Q+m-$Z>9+sT3$z@TR{A4foLw0QOryJ+}W4qh4*d*qfllkthHE!EC zEV%VHw?yEaO0$D!U{ZqPR<3PrLY${&F5Q2O^+{e`mARs#Z0g;D-9ekyYCVn;nq0U* zb%$Ii&*D43we?-3Zy&tODUe&7b=1o(nk839;a1qiQ)^y2a&3BcTc6*mr2lxc#1+M5 zlP^tt{O5>>Pm9P~&KswU-h`i2dZu~mm)I8{{|I@Vw(pM6O@4O!)8FnE7(eMp_n`;<=`hMxSy@Ek%3%E3eHx)!64X;h@ydDsiS< z{;eksQj}-UT3^D*&y=gLx#86ZfsEge^G|GUu$XCaDQEpVdrcwTOF7>^#yv^9?(R7+ zcKxIob3!g{c$4+}#5A|lYbJ3zdZ|Bt6H=_%yUW>2XO7PfL!G5Azbh8V{JeU+eeR-J zf0guRNlw{Pt(7_DonNZy?3uEKRns2}w)`r|J-T{w%ddYHQ_YQ^uN1bj+PaE4YFYU5 zbZ5`NpoL3v|6UclwA%FJ70x#&SC##HVK6c7>aA$5g-a^GWyd-vI_3Hrici@Rxobnv z5!)462fsZ`JvM=B<4Mon1(k8-#*5Bq+ly=sb;+wu3yfa7|9<3!liR)y$>e{g)nJXwLed!MVrW+57inM~~SP_x7|NSh~gN;gk%C%|*hw^QIq4+~*gw zzrwp`l-w8 z?$MQczXP_iC;EycEwKzbnWKD3X62PWrAzY^_Dn2$S}OBz$Ayw&wOcv*$%Yq~ZQ9h8 z#8w;eY172cZ8EfJb6{>9bvq9^+rQS zx99^6FS6V%&X+BH@oMYdduFSZkL*tBoBK~YHhq)WoA6B@>&31I9$E9$@AvDK)0^VX zR=lq=d3>_<@hn}*jt-}@8>0W#evlNtU*x(s+wz*X(%#)^)8ZO%ByD;&y@#VKId8a~lybU^>>*R4r=tahE_XjV}ajjoiw_@>L;rZ8v z%w*@vWM7}M>D8GBT1$6s`E};Ot2o9FD|aw6%~hMSDR*Mb;!_Jnm^s!3U1btf5sax@ z{yO4C?41Oil3dHI>B&`A5?Z>{x&+c=5-MygE&*BZs&UtQ^V`kf{Gx^Nrmpk~WYp*NcuZ$yqmY;Z7no(tM z)3jcMy-eyEU%VmvlJ0vSrY0FJ)?43S^>s&J%f)6NLAQ7Q8=2}qO=<4@CY)isZLfOj zvxn!WE^1-F6;ZvPY0Jiaap&f1OC8Of<{-V5bN*O)jdpN;LV@_bO#cItB zQNGcI>nfSJqc^F}S^V*27VE<~0(|xQ?=6kCn#mrFlX`TyyRGSk9>e3^Yg_w$uHRm& zC{Uo?wNZ6{d%uowt@u-ko)nkf%^Bf8qI;7&MBf~nB;Wd0D*gB40JAxfJB`9BPR7jt z+&cYCZQO^Z>1PV>MIZD@tIgz1o3yuh`OF*Fy!ne`09e6gP=!h?K!p*YnS`3%h`9lwYvWye#2Xh*SXaR(dkF;hpKU2 zxF^k+_j|^AO{Tov?Ar{#{~3JQ zPF|*6an9$zz$qoKs1rw4r3fjWuMZ8?+-tT!dg&yIHfd|+pBp#cdAB|G;l=jbxAkW& z5}o*@*>b_f#Ti_u+P(VbfA7!R#QacpitmTXH@956V*612u}S!)E7QuV=Etn?+IqqF z`m)()wsJ@94Dy%qDRyDMGDRfl_W6sBZfkq4?^v)ntYnw(BWDBC$quuZ*}XWbsx8gV zwEeqQK$x-QBatJnxmEM{7-IVO9%f`v`)#wH_qb+XsriX=?v&k$=QqCnUv*(){nn>E z&a*bCOgoox{Nnt1M}mGni_p{#7xA0X_+Uj zGbh;o(2P0Fzs~U(EI;$@+|?xQKWF5gJjp05*S`8?@#*Llby;3YZL`97O?9gtx%)aB zguIz_Zqke>2jiCev$`{T^6UOaiJyB|lfc1$XSZA^y8*46Z*5!Slc%0LBO7M@02u0EEqO>X7C2nLp z3EV!ptHi0!HP8Fh%H!w1b40O!I~ysZ9i%d)M5grp`UK~)Yt^ZXufBfgT+OIDx8Sx% zrpHN1#`88#p1Zw8d>uJe&#wKVpJdMTd74k(w(bKmX9}+TTsNiTAg6nCzTdke%aF@<5LuqnAd9cWOmft3Gsh2FWC5AMfNGh<*&B(#%Ao<*=`$iab1MZ zto2t?7j6hUcl_Lpi*KLmY2$U^VC%fj_Lzx-d;$5#9Gvb}c5nst|&7JZB< z{=Y7Xr{m*2_E%c-H!&3Y+UCY9Z%K8ZyZF`5&3(3~7=vf!)SiATHuJ-t&s?Qb7atJd zi!b!uZrgd<$L{F0ulLtaxVq)%lbkh2jy&KgpS*3>Iid21d$Z5Y@4mVDx_@T!HBHv+ z8zE|UJ|+ME%^-3pF~Z|?hr#uo9~RV2kXSnH#}=>u65=iI{;%Iua-wTfjd9`s^A%f_ zqswj|h*=%*rbAvp<@&=5OV6aLZ~lLySDtg;%tB46mGbWtIZdQ^@0tbQKDuXe+Uqx; z{cI2WT4tCo56qv@{Iaau$JXS6(d)FkOxB^ljCBlzpKp^*xbe@!Xcn*HbESyID=k-X zzB?&!+VH}bX^d-1lC9ppHItaM_Pvgy^PUr@v^lr!S=cWB`(%ah!ZojWm^St{rKL2_ z-_FRyAMX2Z)^*1WiMD&ZJb@BbrIHdMe|8uoHtFYhwC?C>@89)(Ax~cOopa19&7_Z< z&wrf!e*M#1tD4+SsJi&ii(hw9K3XjKli#HolLPFdQ~I7xiZq@(FT*8aS+el>;h>Kjbx$w!IhWV5TEZ{NEN}T*O<9|Tzb=SvE}7kSEn$gX+xC46 zRI-=$wK)Ac61b}VB*9P04tX2g41SvI4V{it~(Kw{PCoY_@#)3~$vpaen8sj`iPpzA!7NX0F}r!&mQ` zGWE6o$Q1k2yLREWsV?vCmQM?jx%H&zI?tn7yLT;_RnV{@S)#dia%;*dt;%Xku?tH! z?O2s3mA)WZ;QL>m1^4Fm1l)UC6Wia{ur5YJJf5vswsOP72np%Z%R!EdPX2XVaCYvz z_(ZNXQ_r%nY<@fQZ+1`q&hvJUcUyfgyWuSRV0w+hn@4lFK1{uFr%yla&YpSc7n(LM zv)|FO(oW*ENwMv6i{#>r?57j;-WacIJiP06+{f;_-||*^Uu)0Z?H;i0M7g0>?V}Y< zKW@0M2rTn3W-jE{JMCfoG*@|9&GtA6Q^9jE8dCgNj7X9m13#zUucrWAC zyi~2S{M7@e=nd&5Cp$!P&37{|>ArNRTV#FDbw`=aGgTB6dKi2HZEm))&02lo8xueC z8P2v1ohQu%8N9b`nNlG$`H^Oxd(x3Eo#$b~p6rL-UvclAl*%vjc2UlTXJ?m5H#<$T zHOV!9%W!pePF2#iau2KSEem@OPd#yA+U5!SukJa$je}=G=Codw{1fs~vcF#5)e03! z=_&Yh=}l9_>F(MI94n`Ha*8=h&URQ8D*ipmv#M)ijql%6iwf#o-?6)#InH0&e%k3o zjQS?q-K{2k?vXA&1xx(@EsYdv&^hk+{7at6ooi8RGqkq6oHcE2+RdVa$BwSFnJqIZ zkEbAV;;s)}qJg$^Dw@RB#jexyhrwS8Io7Ms1r z_pW0}DG#<|yt<{t{g}a$Uu_NgrzSYw+V*M5qodNoQzE`?(ks6FHbKGu-;d|=|DDnu zrgzEx4FCE0{{A1a3dzZPFQ%^8bS3|}gnQ5#A;+qHk5BYwM*O#^Kh`MH_{Yd-s*{YT z;XbitGa^Lt&pdx?E^W?sa|6$b6^DDg%u1e+)F zvz{~*-)ZQ)CW^1{flGyW8WU?#lEM4iCnWcr=xvlf*l@zI@s0#XU~Mv!rD1?l=JGSw z9Q=4f!nPP6m3eY(M*bx;G0R^NCe(p0m4rakkoYg7H1Hh7)h-YEEXSL8hD?#QXBPxf(j z1pKj+nY?A%yps2A20{nUr?Z*O{I0R#{C$DzieH7kAKUP3OIe-Bghw6rGQL~?9GfQ1 znB(5_rRAzTsd#}Tnu&>gmi_(8;O_tTX zr?&K1x%c{8%)3kU|IGX1C>DK2iEl~785j_?9qJ^?h4x>zWfL^DcSM&$Ru&;8q8&qsm#*@<*!N?_@G; z)!vZy-R5`1;Z1MHHs3N#kOY{ zFEwpbJkz~DXz!_oYlDQEJ04lPMPHKpqhPDH}k`I4)JQ&Y?~n=d`y zVY+;hpzO~Ndbd+P-I^`VasR{o`ag|ax4tnM7favqf9{OR*ywy?^Ip(39-k;XX?(L&?9khBiod1`%Wy%v24)D zjZdlnKE>fq5kqFPoyU69nG-fQ|6wW!XKE?QlL=Qk@yqnU^EnHJ%56Fos{gRB(&x|G64S2Qb?{uTv3ku=H*t6BE#-zk{hy57H!a!TxWRsTh58JQcTX%! zTI`ohxLEY$#jjH=lN450r<{1@X17jZ+WL9lw@T?n#h>HQ*fsS}S(d}ar5ufq3Y!`q zdA`q&;crP;Age9i*r$81vx56x=M0{EJ4HVFxs-kIbE*H}m*Vl^+}b1W=4BqVp4fZP zdg4a+n~}0CC7MbLR`5AG1UfdAFFJ9jOMH>S0*$bP)`5?j%F9G~c62)ZR8MuA`mIU2 zfO+Ybd?zuTo)woe<8n6dKImO>&DVN&v&^lVvCj_lN?r7pa8kK=?p->2UYU4}w)vYk z=OlAB-+t>YAkLM$pysf=mXgZBbMM~dFWvKj{Zz#>^QET+o96mT<+qxAs(<9~YWVB? z^YFyA4a(W=E#d#JufKIsYvY%&eg6!eY1})xzwYnb>&&yXd{jkF-}+!3bAFviVzX287?J z|GQ{Y#dq7Lf+xaiMN^--+$!kq(dY8f_`!eCXQ}ekTn^-OnXzK(u4cjbnv z-%GCCk;kAaTwzO;Bb zmYe=pgRge?gp{0nl7FrC*yj5ea`ssLnt1*O*Q&$M*G%YHbWZN%zMC~|^OY8w=~|o5 z-q`xRU^dT|-2Fdaedn;rdAE;=YxPgRvenhcf|t!dNDb>5_}r*pc?LykV%C$+y= zZsCvFsrJWK9bIG8a>H|1gfj{3M-eSH04mHNUtRZYt}KHYsE6|{Skv6F_#RlYMH zkN?Yaf7%gRuNAI)F!Q+Qr24yuoI00T&VD~T@E5o2v^~oVmpokYOg?p*;9<6&XPlcR z?CD7Sv9aweXNO+*U)w{wx9c06{dWDZ*iE77l50)Q^aS5fu70Ga_AYhvqaQrs7rx#| z$W#3IHR)tZy!*Dyn~IaSw#avj3WqMo7b#__&7QX*GpDhgits}VO=(JDC z_Wm1_(@pzd{&ZjOrRaYtEzjMU^SaCK#L(!krb$mu!_$M4gPwWkl~`1Jp~IqTigqq>~B2fOahD4SUxvGeV{viI)B$~{ z_JiSjUrai*e&6Rq7Dq#PUWDv@C!z7y>RX>;mB+WonzNFeHZ^sLyxHgKbuaq(X{}QE zlcI-KTfXCX_h#<{zYFCF(U!6vo>Mlhp3_z|^)jPO&BcojpEup^>`RcA&=A|`HgkQ3 z?A3h{=Q`4Kq)JR?Mb%xncp$n$PFm(*&duQK4_<7VdTJp@-wuaw-|`Dubf;DA-YnP> zHaD-QH^Khx0l~f)@82>OQh)MJeShyi_2&upy|sE)Qh#P#Vq2noBkKNx4!<-19yBTY zt&mf3T3Gu+-f4^B8PApbr{wsQY`m!P>gqwa=KIo*)Hey9S1K|wd*msnF1zt!UD86q z{QRBzA0AGY4=T#((bhi}xP{-Q2$15!j+p^pp1+r$N#ujUe70H?gZM z61{(ZpLG@J;#%7%7{BF*CU4KZpBbHd9JGt?b;_KYdSdl|xxIG^iZtESH#~pU?sx6R z)$jtQh0}xzn2PPhs}io;x`^47+3E;==Q8Q+e$RMYznanV-J1=z+D4q`t!Kq7F@bTDA2e=bNd| zRzACJ8Td}|i%}f&wH54s58m#{Gi%)N@Zt@YZ&z$js(n3JzMA9IjTWa%?A*b#%dV;O z-fSuJe3>L1eCYmV_cbr3O@Empbck)Tz#Q+KXBmzfmVX{m5yS=^x&v*~SRvYwJCH-TmjNs-XPu8`gC!YJ!Q3Y5|vY*nKj#?>qQp z6N}oy9D|)K%#$Mu(w|$eh&-S5Z1>aE^JJf1**r@i-Pf~OiPy|wh5i29&+pf7ciq&H z(ab$HE%D(4r|MXdSmR%b))RXTPKdV0T<_@8HQ)W%V&}}~{5u0y{_;@Vb>ZFV*VY%G zZnM4I|LBF&ZrghYJN32%OU*y5XLHn}%dgDlMx>5oeTvyt2hl$Lg1@`!&oA=a#QoO& zO{6Jftk==@H%_lYL;^v>#7h~VI;4yb= z=r_a3>}~OnFG}0-J?7J&?oeiVd2Vdd-(J1v41IcK2TYlK-f%5$e;e*m9H;!jDfGkP zIQQ+E?`JuQw`cA?E{jh~Y5rfi8>uMzfj z>g$CuJL3ZDj{lm!vrp4`>*U5Gu3fYITEa9U?!8g#_?x%b_o4KQ*HK@WZwh~U@3VB+ zU9OE?-$YIbug+r4Gx6truBBzVp=;XpCtoYJp8C5?%evoAzt-gwyHMy&;r%O4tqMFl z-#7H0hHay)fB)N%Qjx%`x=UWIcfYeiIruPKOBI_nxtG&BSqin^d(&GLd%l1~X z`5c}6eC58!CpnjTDh6MSTRGQGcwML8k^g!t9^E(H(lqHCYv@6@Cau$1fg2n}r6;{= zbQaxP<}8|hnKyL9>BV>6RUhMCmEr$CJEZjHp;ZA*tDOWR3d3uILM&^$5@puBIUpV} zQ+<>9M5Ff`Zl#p&SuOamR(nX+%-BZo6@&TzRD>y*ShJ%$yY5m z)wH!vmX&TY+Fcnfr+@n7D-EU9(FWzmn@(NGpO|}foATis8Gc)NpRU>_JA2u$RogzV z+BR1{WO;7!#D`Pgh1?DZiTxdN_*b5LZZD|z+bX-G*7m;sjcSq483A_%%-{M*ChVB{ zKBmcNO06AJXrN3+2z#~7Db4&|=7|ecj8-+rc1`NoS$I>+bYaJ<9ZrQ=8!s33Z<9Q- zN^;7jKc}y);9EYY?^=sl#J?HRuM}+DAFN&OZ?$N_9s8}%dwz;dh_$A&&9ok7&IbT(t>n2;>h;&KwIlfrs&TyXfn)oU1xA)IGQqt4(@Q%ic=1W!oS+0ECbkg1CH}B-@mWg+l zN?bq6^=Q`(_Wtb<B$dD2X){!Td}@i7v{! za(*@@ZjYFgYQH~j`Tr$>@BXe9JN*A@f?8Y-gPJJE`;C?>IhHh?jCkmEA#r-O$F&zf zG@|Dj9=3H0wyC}Rb*DrZk6FsGS1(+mewbMBeCzm<;FaNc<+b%kQ9m=)HCHD*&y?T! zZsC+*<}&O5RsJ6id@H@%nCcRKfz#lPSYGwWkSuU)d3&Ed?J=F&aN}m`)7YGXTdS{>?J!lr1jspqnGkCHo0$h_5Bl{c0aR>jA+itJ%7g_k=JzI z>!8OU9Sgs4EEDA{uzeERCnT_i^WKl09*L4$EZRS@te(0i>ZnV-&K~YP+K*V0*FJi) z zjI`yicduSzEgShz!fWQb^Eq9czlc>zDLgN-WLlH3XP;P<|CXt2m;X4XPxrmp^}-{q zWZT=*i@HC|tSWK)W`B^iw-S1cC&aV+rrbu#U;~RfA-96E?9lsyP9ob z_hY@)0g!fsoH#S)`++I7l_}0Q(<_&pjS} zss(nR&+OM>+j9OmlXch$--e_7IjVn5=1*O?l4*sj`m{;g%(5yZpr^tqyEyf6HLR6F5a{D?wNS6 zd~aTU^^+w_wzJ;Q&tKscw2*mu>UwM51(TPpSu0f}|96t@+w(U(&*tc;&TCLD-5=iY z;iT%W2RGlTgi4rAI39Ryxvf#W?b~d|JsrZU4qc0QSG|`Z@r$CFK)#~rYmdrH>5nT` z@V&~loh6^u^FCwp(x59PyM>p&+xF+n?*DgRFN<8+S?8{(aQ3XE-}$y>X{&d7P2ouC zPJF8WrK-KgFU;xl^oro!>IR4H|uWye854bN*{dDSCbkt*mmAjVl@Xj_mv@uwx zf9>RTr$dc*y;JVcIJ*7Y^0(rmYbTaPKKvef@YI7R+g`72D%z*hlQik1($4kE-<$W# zv~xQ796IX!sd-hudr576*#K zObY)sMbh=pt~9zNTD$Sgu9{W4pX0CI`(mY?@msWIn#RVrXOo?lFAitsQ{b!P|5NS4 z%`^FLf@<=NzcEs**8XSy{So=fe!9)M>G9Xr)JrPUbZac9O)n_=*?eSoT87)=6^h#( zgmh%TozS_~Dq<_f$LFlRhCMsxmTmUegd2RHuTR_h7%vRVOa{P3wJMazSP-ccA&^j726z;wPgF&gCw&n)Ti5kp8KRo7X0Pw3&UzqD#6c zRgv|7;mvuTHv(%e|2I3BWARV@=sa~#wgXQWXZFr?os%kj(K2hZ(vYGR>f7aI8^4?pgitDf2u>aRy6nQcKnoa$YiQ$_~ z?z!IyaVbq-ct>tk{tLMumu_qnWqtN(){~j5``oYn+ju+m;z_PTr}T*tPdU#PB|9!} z6E8g85yvl|TleJJJV7xjd8WlrIhxbv9_W7VGyVC6wG}H*zqR3!uG_h6g14fc-1*?Q zwbN6s747-6F(Bnrb?dub4I6p+BTfodPWOMgzQ_E`oQdVzCW-r&{5Z5=?ktw<0Oxys zzxX$Xzm4lI+M2WS(Psl0`CHi=kFRUVePdno>lNoh_gRr1*|#5YE}rjSpkQo~-hZ0u z^{H!|o;5z@Dih`$G}b*JaM*?O!j6~iFFjXConsJ-wtv%OWzT@zuC;mQ;*9)|z=TshF{Cnc2#^B)Q)wZRtKLtHKzNq5P^;vJuAMlO2 z{5^V`UQ)#|>vF|NZ6zwt2?0 zZ}xooRepBzFP81zkDvBemSlZky0ztG#uwuyok#gTDmtz6Vvf$)aJTYE*_ub6l~1m- zRBN&6NmrIW{=_dbc;l_qhoZb~g|Cd)Ut6|klSkjllWV6ed>N}(9A|XvW|4;1<(7km zP2y)O^&L33%3OJPh;81bR-=d%-xS_xpHoe%>Y}eGq!uzAezKFZ@K$q3tNWXC2d=HT zJw^FKpL9~sKlu;AQi`14By5x=5fsq|XtrdQ$)W^ffZE zjF$WFvLppLNvxi^$#ZJZ)0t5v#~luN3Z3KfxAJ>`^X!y!c~YlVsF|!ZW7^s#ul!SO zhRAQ#k5T6LKUTikw=K4DMdq2U+J&bt7aLg$3F*#b_Rc@*y3O@va>SnsqqL>>w@(lb zyij#ze(|gx=CEh?rtLl4EOJWktjMdXa~ro;JnDVUZRoZpYqr|@1e?qD+;O>_V%d^9 zvz~sRlV*AIq1un3pbFXZ>(vo+Xw<*rd$>n(A$=^|DqBt&y&Z(SH4 zq;X|u*V6i#+?%79>OVeYHcMdNGQ0CSZ(khYb7q|qwEb&RthbO2n=S7f&S~rB&q{c< zMN8$6^B2{pYdCf;2>DcO_FnSDhcC%}yl;%2f1b2_j%aRz+3nvyW#sw(oLsy`BzWJo zTlzWy-LAsBcvxmsx?jBT?azb7*YxdT93QL=`J)^6@)^6v-nr}=Z!({Mek~EkbiIe) zO#J6;!TDE%7TW#!vC<-N8|&e$33;XydE{1}y1Y5t;o-HFE(;&MJKSkBo&S#Qmzk-P z|72JnGd?3CS>!k~q03VCJ4e8+ikA%SyJIDz;-h!-Gi~NNy2ZV^HSHSn^&ZP3|Ciid zIw`Gij>d9^{-<4+bPqchK5Fg|-C5dGb!QhJv*UU($!|G^G8R>DpVYLAcc$Oze(?W^ zL!tg7_43Ftu&k& z=j=M;a*wxedD14^8LE3#+qK-B^E&shnJ#LxRYd*GlF}t>mZJD0BK;%}-$%hWGOn%YBKl#dm6t$g=oNBRqVwnCi^y#Tu z35!@P&X{|}a?OUNsS>hhZ#zn{oKnlzp1Dj`Ja-@Knw|2jc7^snMfX@5o6P+blA9w7 z!zSE{ln*yPBh<3maq-!YJ7y)aDa7<@=S_G#=SIhi@<^{`_oDvEO}V^f@42=9Iu17$ zfAi35%(q(marXMU^t~4}+l>8pHDua28PAFgOw;+P*|(HO>v+)4mYoqs{-QBmwy)Hu zpF7nRkg>&DM#QhYr=2>>u+|`<1b#B=MKiRz6YYX~~zSo_abftW6!7SUUT+_?#`@d#x zoBS~BU0+tPiD{9^+@7CVi#l)Y@y3q-0mG7Mna|#M znG~NEF)3cea#mnxl>DsHO$^6Sn#o&7)P18=;t zu+E%m$wKx4cjvEc-JP+6hv$gQ()ve2@4|cY#UAavTD6j2CnZ`YCbf9?YUx?~lbSUi zuFrfX_eXU0`o1W(tlt)f%jbU9&seT(e)-(nlnZ)$ZoYXNFQWP={{K&X{j#sq|9!82 zdj0>>NtrQ=|Es5&i%(zY^+H?GSwh!j@vc4H=AXp`j+HToi!`J#v@p+GRuaFyB`@ID zoc))ArrFHXYu-3}moT@R)$OKo?CMt0py(rT0drp7T@z|Szhig16ceX{&G@BS5 z`Azriv}T1A!=M|zOf$C~xqI|;5%I6T}beVVa7IQ(KjKt<}YoTp2Ec%M5{ zmsm4%=eN^7>M3ckFTWfI@l6^d*1ZmxVJgCCf!u`Yhb!qez8t>!8^9aNdvAs#Cpd?k&AnOkB@+s$ZUH_#CUqcdW4Z$^CCk zDUQO$$GGoVuh6Rg9aAsEVS6n$Dztve*?SwOH?{A(V6^|lrUhZbGw;u{R#iHGY}Rwx z=54=xmP`%oIX}5pqd4^03*Emy7wfiPkJ}$}^{uH{%<_z~iS{#pirLSQoMTfGF39@y zjqO#5?bl-r_{&zmXD6PG-<9-n-PTLL1+K-M6PU&CUAxwG z!mh(7SFZIfWGs`OuyFfT6_MD>3SW-Lm^lZ}@Gkjy>ZxAWkELgVYSrGTd1bG-lp~|S z6!q?HU2J`1SJ1qyt2M8AcfFDk+2iL``TW9~Q27}}%cER#H*u_<{zdBXmMK%^6Pa(t z-z)l3Zf9W`@Vii>JxuCZjLO_s?dyZg_~Y-!#qH~wp0Y11j_>>&pF6LGW~_hFXTK}D zbZ(FP%=UY`L`0mmTgm$EW8`nwtelbx%Uj8{hW1e zc4d%D`s+7p%z8J=cGc_OTIR!e$W7(yZNDvL{*UKOjk_{AYrV4qr%}W06H_!#A7s_z zO10ZF_xfV1{GT_M?%68sb7!{PgGmzwPrHBD{<2yAiPX~O9bz2o)`b>tVA?5j;g*q> z;1}+Q(tCE#q^xc!>^b{X`NiGiswY*Q6hHo6Gw0SCoj*@j37>X1774n~&(r_0=_c1Z z#?Kj#nV(t38GPRUPNui}A|)V*&r60HP461!X-!$E z;CkkChgj0W?{j6iv|Y`(Zg?%deT}v6#oyhtCt5T&tk3JZ<-1^I=x-rOgMd>dk8Qts z-8fV$@X5zMX6NPCITu%kUaWTee&J}`(Tz(tKfd4b&olSnPs`V-+m{(kwA!&IbjD7f z>4$pXK6u_ns1Dn?-QvT>XB;bjPG69- z>e|+`UR!TX;<8!EnQ^7(PVpRf!|7$>Te$`E8s}OTcfY&!Kth`HPTsu6EuUwlFE=Wi z{%X!NAK8Pv+y^#S9P51_azgQ^>%%ynq94(VpQuF$atqy)yb^5e8y=wbdz~29$-i%x zF3qc&(e!o0n~=wAE`+c?G+U~-`j^ogzU;M6ydoyr9?Di&HgRpN(Uom^X-C~|>?oK& zt>trpOlDNDrJerk^x!Q1SJUoTPJQ!tQ{80E^k*OEoipT~@S>mp{g)Y^)HZMgzgzNs zo#>_adyG{s@P9f~enFeh=mqm%@kgf|+J2Z^Z+P*y^Xq3b_U*>}|5D2Qjc>KBKeqfc zAM?LyueW$M-npCJzbt0?EgsiLWed-Ee=Po@YNX!XC8U2P^_2FvXN%guocs9O)W`p) z?rSTyHT#Zi^Av5#etook=jTOzH_ise-|+svKEl?uVopHVu2@Fi{N3rV|9Pi$r)r(cpu?hjg%z0<&;KMFbh~=JNoFoL{?Tr6 zcP)G5SJ7>m?ZUPne(aHI{`}|1#{(QKl3s;R+=BniNDcLZVvFh9-YUf$I``evqrX~2Ov_Ygds#5l^fr6-!A+;dz+nD za_o^)uYPat&bBIFo+YIFO|Mqx($ZuQ>VwBN^||+cTjKAoIh-n-y|q%HTE7(kCzuSH+bwJ zaYJUE^-=dJ5p1@LFWxB;nDt%hs3wp8`MGnZZr$YmL}0J%+869|{+7l(OG({+;mI-a z`6m>YZI6n$+gcmCD^A|_PqwkeT;XYkYT|chPQDVhjQb9k{-$%s94}nlqBPf|;?5jRI_(W&d*t}bG>{!UtEnU5* zr^x6{$c&O>pK)ixom`7Yfkt~H9k!h0K6dEt%=`P7GX+dK?Re<<@uv)uozk0ERxa>b z_HEHwQ`3I4#H^j}hYw9U+qyD#c6Ml;w)Rq4lmD;uSugyU_Hg36;Hn#J2 z(LY&YJSC?j_+a(Y%7(8qUo2qVz52Msq^e6I%j&g6*Q&oOJ;sf-*BPU zZp%?E?ZdoB+*cgtw|2g|sPARG%#5|~pC^6!`10WCfVGDY`ENh?_~3!3Yn2Z*E{tz@ z^ZbCt1XumLZO89Ed62?>Y^Pk9RPO@DYtutlm8_S^{_^?&+vQ1aHsMnK7Pe38s_(Dq zGFxnP-0Rebuoc^Fl3R`J>bO;m-FMb;>m(hs-jW+|F`+2Z)?PhT^yT2xH71XDJhGfzw2<@J!jO=A&vU0dQ22EEtNosPjx|-r zddbbNXBI?!KU1~svXgwsuAQ^_oo;@4UiCb4;m582uebV2h-nqyxFzCo`&oX)EUTTY z>R-9M@4wF1RQGuBhCkp%ZDi37i6T#hDHf9*Qf|95z5catvO_?_8y}a2MelzIMlb*K zwRc;QifU(!<#)|Y!$y+ z1l5`s%dP~!km(fNBHo%3U^{!|ceAitT-mSH`mA)SEo^7FF6&xu7jnmBwtM7)sFvfY zQFjjslrL4xO0966y-H;*UvT~H5TOlI7Pwz*7uPEI=(VcKj{Wdcq5taa8PD}PyG(*N zx+z>b_2P1Qcp!JO*|M!yOJnDLx3tuq9kqCt zfw||R(CNLh907ApeQLIdI!B5bA4|`FVRtr)d`ai6FbKaqf7^!GSzGyp^4Y2sXQtfR z@Z{IB?dDIpJ{!&rUcj2kn-@`59&FALlm{+hWw+q!SbhTxj{;D-~@4p?c;)S=` zqpz%L-LF})t!=4!5x1w9sFG*7N~Qh6DSNJKeDV6~CHa+Eb5+S~QB%A10*k-&guPi6 z+BPp}SGa+ngyaE@^GV`-7ke&qUl{V+j|6hKr=S$DKpomC6*ISpLpLRI9 z%SKoK!P9pRoQEp@JnYrW3%r&c9jBSA-k9gzF38KiQuna-*3xJDkA8nK^LB5p@S&KC z-@l%BF4*;W>PB_f4A#$ACSG~scwy_42l{)zpSyf1cAep+DUVfhtdxx(Y&iGCXMLGW z^{I*chcmo64Bb^0T$;lf9QXHG58wL1?>nA8@7(-Omvuv)lj{v3&Z5YyLE~lHx!itLO}BOQ4tR3st`qrwZ{_`l zMN<{!vOTs`RiC!_ylZ9H56!m+H~u}hJ0Mh>*|VMf^7ZYSy9^&ExmI7>eNsor>GsWL z#zWKjZzbs4w;i~!avOtjUwFdSKBYfX_)L#DabIOWS^HJccL~edHNuOp_Qr3!ZL=ch zV9iz|54T+hH+i`2m7kwvD!O`$aPz)d;T?yx*j%=UU%dUvJYFZ7FHz`F%Ji@IRzC{; zdwZYM)$Nzu?>T?`S7purki~2h?*ujJT#uNTuaAu;?_U`7%SVpm=CW({I@;FBGcP`1 zKmF^^QKQWN&8d8e{HIUNS-I%QANKO!OE)@}MyK>K7oDHQ!E9m^JaeY??6eogIa_&~ zrtQd_X5Z-H7kAv}%z>;4%oA=*3yqS`dl~&>cHs2g`!?^^3MyiR(?!6<-Ef?xtzPpdUBglxr4BLkhA5J&56ttI&*KNq$a&qQ?w|4 z8Mu*cpH{yYH|zJOE~-LWT9-?dT14+_HE-IQ9!8Nu4U$%-rw1UqIN4wAMdL6PnK#3}_&Z9B5Z#^dO{D{BSzd3k=mZng5;`Q5XAHcxqIQ6ayv z*4*2l^T@9Qb>+cly~2NA6O8}%`sj_18|7Q3gr(TatniKP|7-PrE6ef+x*H}d|9&g| zWdlq279$~5^Zobl*uQC)5=f8xmVI~SB#DcAi*od81e`vtc{HVntDsjXk}Y7S#NU7n z_Pz;ggeS#WZH@cfbth!ClBGU#Wa-4EW*)gu-_A9gG-aK!ZL?UW-fH{y&x%?FPcC2G zVy^YFr=ZkZGj~Vjjf@{tk`3O68z^p`yxnL`wz#Hm@6^i1qf=JK9#HcZby1sGpx~nJ zf8*^!5BvEJ9sd@;x;vw<@xZIITP-(DYp$=JUQw^Ekf$ZB6!qzjmBX49j_>C<`1mNF z6KXlMl;yI7)Jy}}TRxWm7acicd!Wqh+t25$iiUw73YorE$vIa%k=!%c^6q!8b!T+m z`$cv!KdVjdclx-3O}InvA)Dt9#-961M_(?n&}CYgv)t}a>JiHxjg~Gi289b#f@Fdh zTEsu%m|QpY)xm{xqn>y&1WR(Q*~<6CxB0^E^~~v4Pq;X(dd=!ESA)4Mh~aS7*Pn0Z zb)9uSvvgHy_q~#}e>DHBs;!$^{vjs%rVev@)VWi)4;DOQUO0Js>Di9muhLIkxyv9I z-B-+ge$iDquj$XPR&gqDRLLam$&@=}ylu+T)h~V@=xXOVYIW?Vs^1hd*%`?)`bn`p zc1`gcXI3K~l89INK{CI+yY8NN=iOyyTI&%gBC+#=#)tSr z?ZV~%m-fWfEnLi7r!lGXoS4-ujo*&PqsnGDy|8R$uQ@ew-4glOb&OVK?|pmCzigWK zoLyx3o;Qh#G6j~adh^yZSuG27D!<_At(SO7*=k$Jp+8rPcAppdFY3NhZrMRM^?AlW z9JC|f$%`x~IR7zx&CiLCPn{8+&;IxAHD9}Kt+MP-8{fWb>fLQ$;Jw65VgG|uid*Xa zcq$`*cU-yoVx8(do2DBLZ{zqb?LH&-e!Zf_T;922o&`AqH7~4GlJ77nS}%RzlN(|A z?xGc!4!788k+%*+`{kjMNOy#W>jR#plI{y-rc4Xi(%IeZxbpM&^)h_y-l^^u zEt8hN*dYG@z}ep_!5XW6o;>pQcvJJsDQgwK*Q$Nz=gyOP`eVZbvn8E6J9IRZxb>vp zt!w-s7xvb0*TN@LlJ`9RcI5W)H5G@qe(m7g&b8rgnTG9q#o#MfV3*2(e8Xecqt5>p%J8`%tdBO(+Zr)8dG8i_jZBx|=)7+b%zt?lW>XMZzk=<)& zP1@pn<@mE)wx!xynbO%V+8pOoiVL(NbMq1}E!|z?vPFrpKj7m?{cS@V3 zi(SqHbmZuGEk&7=RI?t>AdA6-I-fYW3o~KsZw9}q#Is8&_AzgnV>r@^4WtN^VWhyVI$CfutoqR`c={Mn>ACq|P49a zK7OA6hhMVHzHSbUech+d>=*dJ(a*4!SBX(v`cXpNM z1F~Hly1T58%}9UiVWDu~+2>n@(^#ucPJAb%)z~L+g7>09^2^Ik#n+6zC(d|XoA%o{ z)~s56NA|h$xW$d))4t}W&8qp-X3w>4&fbS_Spq*LuQIIxhh<+`&YT`Ca&y$Nbl?D8HWaShi zUYP&m!M(4sN-RI$@Xk${Y;|kxvI7bHD(uHMr{1_xvT*TC!=RI14jQxD8=GfqH8<*} z7baiTV>?(qTU+;SlFyBkzY3H;Or9#eLvX)*TZ?xgyQ9R-t!EooZp^xO*8k>b=H3;; z*)Q{4o^zSU?Yes9`^-lPKc_TLOiz_Kl=08>Hk++mRC#N>*HTN0&c`5s8rq?9y-dEQzO?SJh#&PKCS>10wb%D>T z4)QNzo#Jrv>XfiAJj|ZwRn8hJB&J+tYRS&(4E?4_>_~GVil9Pr?0p-O0!9DO;EXrub`S`-V^YS@?b8yHBTi zd5q4T`|Z5^ve&H(mm)c*?`2(l)@JsBtYDETQ@0caK6Sboe22SzdxL9aXrZ##xkp^* zEsiZxZL7N)TlnDc?Q-FJ2W7H)Y$rX5=z2Hhi}v!fr<9BuKPo9`?%k2}u(D|Rp{R83 ziB1Ps$p$WX$lN4oVtuZ>;gY1$rJ&jSEiGqM#-2&qDWxdpd--WdrO$og-0wF9Hf}3a zb8y~Lw$ZH9eREsW$u!BtW6IanUT4jje_!rQ)ykhNjYn>&BwjCmy7LVG3%fO6&s)ZL zpOQPwy-v3@dF^lY0^OX5Gx9saj=OGPvgONJmjODeKVt;u-3ln{=mkbnU!(CH3^Gc7%x~)eJXZlE3+h1hgRP#2Yi=`p;zdzG~b6nR2CKZ=` z+i+Q>U`n$=Q^fL%EBCm{>e@cYac{Y+w`SJam~SV%nqL2#dL`(k^zFO%J7mAv{(33M zT(aZ8MeP)iitP{l-WLXZGE3UK?nP(D!=&i%n^#y%wtU{wRV(s)-;Xz&?%3Ut?g{Pt z`Tg3WO#M&MX36VM+q(Z`sE@i?yV78qVb+quJ@!q-=*?;Ws zKJ6>9E;{_+&gvc71z(&0MzuRnH(tK^{}l#DueFb7y_o-SYRM9{PW~5fKi?L(F50Q{ zal$44Xc4L0uQ9XTWzFAbY};|!XnxgOTkU7d?5vM@6-W2(|2St&!XsU-&yTPF44!8! zfBuh?%3t>Q3zOAbim&|9a(7F$nAO3a{HD4oQn#WHqd+ps@<;6_O4fY*&a=clT7@Y0D{pQ*4 z0rNdAa<(h=hcWO~#~f=`xnWp)%SZb#`=3b)8y@EbUM`<%rER}y;}*Fao7DEES$vXz&b5Z2QLOFrUS^iFjgz#` zNfgbRCp=TUTZy|PJpW&`#p$&BT)Kz$l^n2IUhKslU)n=(4Ka^9oj3ek4-_QHbM=~b5 zIKMO0G(IN3D)QC(GycC{*n~QlzfIf7u-5ze{iQEwsoj2jKK1a2Q>9yP9NTzKwc*0g z$fd7B+}3`uV5;Wjbzgt0H|5ozjs2^PL%j~46nt6p*>27S`xAQ>F}W0fzaq1zTeMu| z(qAs&<6hk6XBhv8G!$DEGTo2Lnyb%o!$#-Jhb@Ks&p0#rcnU0K3yh0O;W{B%aJl}N ztXj}U`RH#89=xoWU-M|Ewdu-3Mt#AB>6h;9oELG{>0?NzxXJI3WxM4=s|?Qze>^3l z*JU;Ly5B1fBma3P7JQoZ*+=n6>xQ$3BMu#%#VP3@w*H#^gvLd0&P2H_Z|jOoYA>5V zRVp%D>+FH#JYNN?TPs6XtPxb`+8xljF`{qP^R6#EA{v>t0V(H{=JXY?iJkqywt8lK z`D}Bs%TGhre%h+I!lmlPCtHV!N6Qv%-ui3ev}rFECT%h@X?}TVpMlgVRb6i983(=p zH$3;%tNwpv%H`|)ov+rJcXIuEIZt8$Yh`TFqnS&-`%i0Vj4Z4Ecd9j3{>+&Z()|}Ur$=Yst3Asp zx3oK^=2>sx5{;*Cj_{;2h-O@of7*Sp-=OO}=L(*>qt(3svdeZ)=@gK3pR|d!`0%o; zh5OGhIK5-;T3#E=J$YBBGf6&UXkIB)wPEAk)aOUNm>vmAG9_uSho~&rAGiMSoS7yY zl%&>7o@^8QP%gVWG5%|j(4BVMZ_|O+xNP+h!L2x~lsw zeP#T{{C6)4mv|R2@yBfMW&7Cjr+8c7i-mFm;k!&j-URa7ebeI6{9QWvig!3E%Jx8rrTOxdgNUE`Tx)gUW zDouAi+VtQ1uFKLXUpXb56_*$mzx8M3^qt939%{C%P;8TtX8wA{W4~uSIwCh;=kVVy z`F6$$U-WHR-5)+LPi=QOq5U^x-@`?YC?z-McpwZb`dt>fSc_d|=L@Kc<&|PZ6D#>a%-8^G3DX@eLQGEra9& zk`ima+&^sfW|7wN`8TZH56(_~(Cha1q|wY+AyzLvb33D*dm_`W&ess$^25Gn&qcM5 z8@*4T%B&BUR2O_4H&-x8HMwTyYIFCVj}oqiQ*D|xz8UUg;QA8rY=>Gv)sBlkMwi*A zPF0@FyXeNQ@GcigXU}IhI2VP)@7}UFY+-Wjw{@B|jT-y^%=i?1H?QJ}-gBOjOSVAq(CY0Wq#@-4fD9s7%nlbNr!-ZgT) zz4=_Kl*OytOM3*f@4jwOmN3;;5>4?6auZJrcix%)Zs$B3w-;YZTP=j1P5F0H+<763 zyWu`PL3WERf|8aJoT|YerZqVqZWgvG*|Ek)uzzOq>sf0(Sa_wPug^(Z7`*nSl%jz# zJJ;eR41ViA{C>RJE@jiKQ?oMDyi_h~OF#BA-ty&g-i}R&Cx(@u?9yP~wngNhnn3SV zk3x$*F9jGR9}Bw#t~6O$G+k##9p{yatL#}9C_G5Dd-8(y*Pch3do`zi`SDgUd`4A! zxn$_fl^A#8-}=^ulqIX)hLaHA|D*EhGya?XRG^*g#t@+_WOz7qGfjhLEI_2xjUTJ2Tg zln;NVof7a|cI}Cen&f2m-6xEzIr#WrKjfSFXyq$s$)(*Tj!VvbFqp`EO6Brwl@lqu zxclp4{&hWA>AtW0z379LOXE&Ee7N$BS5JGvq+`<`T#Q{gOM-RJ&5yo1bw^nI@5`U= z56d>6AK=s2dJ+TU)(IqaDu0R;7EY+h#xGImn^4 z=%L7+s}hYnnq2RkTiswOS$03g`DPpcH~sC8)gFsFNK2@Gzp}F2tf2R-cU>>j<@fyc z4pVskUAO<&8+jx`^#05LQ|$kLjf~X2#CPnK{`xD699NtV*=2u7K_pY0t^DS{3n!C~ z7;xyWjm*xkd)jtm-uA}hVx5IE!{mieY`L6uXeHOq)OGS!skaU;-@W}ngGaE#aFvF5+u98qlosgz^j`B@LftU-?Xk;uKCKk*5lYlIeso29`zF_9spk??E%zsO7e!po zF$p~s`Ju7q;H>1`9djN|UHhl&)VsUdF|xjWa-YM}TDE;(x4}JhUwH7V$uTSKEKe?7 zo%HaekWrcd-DV9$N49&-#;T-sZ|`+aeeB}Wv4HM9@xa=s;9R& z!Q!{=-Ij%)uJ9hV+A6qsTSMZ^ro{D~$2Y4~F1>Q#aa_@h(?-*C@6R?bKFc7RR+YxJ z*k`|%heTf2!B)FH3-7-Aci@9l{GkaM|2GJ1-h8aR^@qg8=ZT50lp=TB&|S7-qQ;xQ zlWZ0RWF9cuGKpES>3HnihuLT9vwpnmYMs5RC{$s+b9wH4cj-5i=Gm0;Cf$rH>(t!x zbbfX0t-O#^7yMG47Q8=tcboj3t>2ujdM296yYW^YT*@{VWA`ya3m(Ise?a99EuFZ0p z_w0#1vuAaknpW+;^vwC&2~Ya-UYTBr7VejvE$Nw6le%EK;Q8~3Q~Itg^KR=}^?bf{vBb*nQW5EQ1wzj=2O3VcddS*!vZiLIR-cuFNj;}~ zYSW8|$eUB%xlODpc45vJ7135I4^p_kxNz;=UUtvGf z))>!|^6Q;wy-+G9wWMg>k&H<5&+Zxica3gbGjg-)wLd6y`Gmz+Ht*#+CAmwNEuC5S zZI+=?^V9TYpV#m9^F052-G9xRvfX#@#qBmd-@N{=+2p(Hb{@*(j&2H_nd_EX>}%~= z(tg+Pm7Um{bz)`NAsxGmw%jiKw)oJN+lKW`YRm3joxAS#;oOhK`|gMma}Dizm<+V9M0Nq{`=#%-FMddac@@rYFEd;*>>^n6TQ>&vLA=K@z0a_w0e2` zha*4ci{@GX-Tut}+hmuIvu^+Uu6A*~lWWBJ@-?ft?cTN+?ducLx#T6kp zg@}_HU8`^Cx}Vnkc)Y#(fA$f(MfPqnwrvMKl(7Y-pYD#iGhH;e@D=}JqxTxCWa1Vu zoK8BuU};PN&%us(_5E5E=Sq_98u}zeTYOv=_ejnC1&i6oE9OpzI;Z+>p1)4jb?(Zh z_!GUidGF91F_AeSk}LOm*LLnt*+*|5|89D3yVB#M+qZ1EUNNyWds(P? z+@F;HAMci4weA%U)cmHI!R!;; z`}(wda`SGMOU|sYy(Vd`FY0IkHL*PjboXPjd(qsapNkCOr5^tZweU zGq2RH_}x3UGT-E=Xw~NjWtS&4uyDUz{UYq)6bBC9&+Vt4NKF6yP1=!_Ny6BvBVj40 znuV+D)JsL{#GZFFt=7{?iVSv@=IcHl^0(%g%ESskU$(W;t@Gx+zwv2LZ@(V*?xoLn z*FSdHSRAp@Gua{anb0qz`X>!nb^StLyxkO$&z_s)P?N3oU)fpm9{$>Q+Fa|kovJoJ7mqIY)j*8{8ZOcn zMJ@{(ROIewDQi`;a=j7MFtAlEjHp`BFxx6EHDZE;x@6Mq*E1ZMbU)p&^JKbesS?|u z(XfBF)|pMrtTEmTWXb{$%x5mOEb{zvFXqd`n4-GRmjkxVI(^L{-d4}y)~vcy#vPS% z5B`7X*eGAA!oH<|^K%$el|rNu>(UF2(ZOauiE8Xuw#m1*!W_N)GC@6O5k;d6Wb>3Ip; zPu{)kxL(U5@o;+Zet$u!h#5Bbv_cwqMPp2NzS#Qr^#dQt*z0+h#5;nXhw|(=kfRv0 z$0E#R>$O?TE4#~6~0~`^!vw8vAhYr zKjeCj%2v(3nI2;Edf}x-P5j#}oVTx-F<<8S+Ls!2mbX=Pd7g{M8ddg{zLns(7_xG4 z`}Um+VGrK zwRz6!id7}=q_+M1qEnE%@q_jL#}ip+8Ps<^a@+bxQDcARS`Rf7SB|rS>n3T;vPrx0 zSFY=v$)h`Yx6W+%Xmleu>uq{vXZV+sJ4*Xky?Z??XUjsKofYpnMJCrUw{E?B|CwW} zf59b2-WlPy<}#MaT&n%_|Czn-J4wUnUrQf;{=7j`%X!OuVNdo6+mkXp7sd(R*U5YL z>u1B0g6HG*Bwux{H zW%r-j(!(+*EUqZq(}2(5wDVGtWn1O>PJKA&puN6bPxWcZT$x+0R~0U=nYibYX5);> zl1mz^#?FUW}Yo-4kNVXuz1jK?Q$H;02< zae1i)JQ1C-6#*$z{&+ms+q0#JdwSS03Hzy!Ieg=_B6K%)e!j*(`$FZ*5cP{KZyz37 zznR&W?I^3CsVlp~k;aI#aygfF+5UWzESz&`rvB^(mszVD zHg~G8cx9wvCV5(JW3ffyO4s_5HM?wE15BQNW%1f~&Q$-CXZ-I}{+5}Se|bvlL(Db4Hwa7{?%L*}b9v*V{+8t!A{`c<608p|gQwU68NULW2d*eP>GucPut}I!hwz zP-jbb!oFQ|5>?l2xhyZUx28V&+*~VnX8}*%?DA{3i!Pn~bh_~_*N2U3F1M&x-(?7T zlKXf*-i^FVHdNw7on;Cdv6(&cYLF$ZfIvFZ^MSNPh7@}B0pD%20c4* zK~_Pv{0%dgcV4&Ca~(<5$8J{bbF{Yx7oPR_`0bR2R`9-U*{oWavS`y%7z zz%|eO0|f&mr@g%R^oE6;=7lZM0{Nlx*NW;>j=nRLTpnS${ZU-Pi+g^d_noKeTKYYh zJ>~Jw6;^Fq+w8>S4Z_MUq&>M*nJc}@FV3XmpP2E2gU2*mpTBpxa3;JyV$Uj=JwO@6NwhWt)%wzpJVko!z3fV~M>Izuk>VUv6FESY{M|u_^yoTB&Eh z&Xfh7p8mZ>uJU{r|JPl-=5fqai|_n|?Aeip;hSD+8f*P^UzeYnTDALpb8>?Cf23b7-{W(9{SOjt3)e8b`;>Uu@K}eTrzf zPH5}??`w3{886wf{Yny_+SVOMr4P4QT)psUnGUD!x)zs=!n>VMXB(VPlv6*J)@HMQ zQ?pjgH^uYmYA?&mn38OwvtoH)=E~)01g%Qgcb(HWiYIWwz1lDhzvpU)=6~C8VY<`x zV|#rW6B3l~p5XWLm}7HIdGCo58!PwF9iKe%kACv5(w6smd3WKSe`Yt1DE)2zqSWqH z6)vK(`orYCj{=ygynnEC25W4X6|B#rJMYV5@0cwzT?XPCUvUUL_L}-jVfTmpeKU_s zKfdA{E0K~LEB4P-v_WG2%qx3Wh{y+pGc_+Mf6-f5Z>F+$o6eCN$L9-3e@pW!nSY6C zclP?GO|s#8cA4F9s+xJWEx+KW{oT|_I>-B%53YW}V#N2LWW~P!+mrC|%8-FZa zD&}yV`Tk(DWlBY`dN}s;n zV!!_Zm&E$m_@f7VuM0@+IXq|oS8uD?_d|+JvMj#3mpLBYx@FF}#2Z3q;@ciwdEH-h zeG-qzoZS(3A2S`-J+tmKd%mN7OTZVw|6&mzb(XSjkBHx}U87dz$xK#vnI5qhyc3>s z=A_)Sw{ps#f6|#hpFd-_HekG^7d<+UZxG*Aj*<9zNy-q5|57nQ# ze6{)6uzGcGOoz;F%SEdzIp-KATs`w>UfXX|wgq2y#59)e7For3!)@|Ot?IU2n>!X} zY;peB{3%b@fn#0a#&vSNZVEf48aACSd*JT#ms79Seac&*yilD^XDi+ZURQRof47Wb@10oXou}Qt%oI*r&$66Ba8LJadFSN| z+&;*~sTtfpDxb6R)w(KPaaNgyuE(!i9jsns?>XJI^!eTZ*7Eby%GRy;%_qbx9>ud} zssEYQc=>x5Y;LOQA3Hkj^NLA<4^MKs#lF?F(GpkU+xC5S;g8jSUS%XF7tFT5|K9k= zqvZG3eTt&zZ`ArE7oK8w?w0Y1*K2)0DLr7VJpa*b0?R{&%Wq-@es%qmeYEaCTcJeH zw2Elq{B`2mRxRTCh1Zi#?Kh|-L zyUV$yQ?deA9oRliD`ne-%sYC&1yAVces40r{dn2OlKwg83NDIS_U4~FsA_zBqs7Mv z#qwrn;_BiOR`=N@*__3X z4ix4oUGI?V-L`S=l4-{8au4xpuXefcHTHC=$mj0q4`$bU+}e4>@^8kR|35wZF7z*v z%duBcb)37zdTLoggJ;k}`>lH}Pu1-Tyk57gL*uRL7uA+hkAnuTs$E@X7EUkYYy(b- z9?_g7zI5u9WnWr1KH45p(Q|R7QP`jR6X%y*PQP%?b)Qi>{}inaqVd;l94lAzq{$z= znzw*QHOG5p!{Vp5?wxDDmP#Zqm1(lfn-X!YRo%Or)$Z9R$7iRrc4jZ1f8&$5>SIoU zIX=SPXV<>4y_xsJLPAfzZK9TU*_E$h8(8P^$fqyd(*Mg*^I7V@=1VV|Ztb05m3b$j z!m_)>?48rriRzc4_8jiKIICs<{(8UpR((zL95)!9d34VEMj^LOk^SAIc`+4)C-O`<_L+`gf<sw&HmA9E*6&B>g4 zT+uyY`yIEIQz|{1-?^^nnf~a}=ljQ&X`VcIDve#zJ4HHS%6d*CqiilMk+4Y{V=qqf zZ)#Vry;RH5W_k5(>$S~urmFAJVv|h?IpCWb71b%^<3HCWRYN_ZXy1w+nP1MTv*xn- zyu4%jB>j_=+{-yZvgY4^&0i67`=6s~^UTFTk)rC=98@w+0XLTvtaxzb*wYDHKKzii*t&mT$jTRfF^?DYMVQT< zUi!7k^ec0pSNB_E%LQAw8J83V|7tn2Gf7r*`HO{0%c|bHUsvE+xO7?&54Wx0+bXXW zTT1@%=JDMRvALneqM0~p(mJOGhQp!hOFe$?E}3t3#Q4fDTKc#b{Yu$b~DHqu-8i(sn-#0iJD>UI;Z}s&QZq3iL zR1P^ypFi~2^YNr*H`~wWMk?s%sV+XVnCaiH`QK+Z?y6#5SFLlxtlH_W#RHY-J>?DZ zDVyiLU%UTMbnBO+UX5(?w7{Wrnu)i;FtzaBj^Iagi%&U1mB)nBuC zqZ3LQZ_Bpr{kFh&ndg?bcFBCUH`cxsUSK&V*Xp*{hThpr_Dgx#C(bPAEZ!T;wr%P) zro1nlhkW%P78L)xd4JZcgRb7&daWMW+AglWu`IX$JI}o-8KtK_)vWxddNWY@xMOjC zlKl0F3b&_Jd@-D7D(c^ zN(2&$=l^AJp7maUsnaCxW;s`a$Vw*t7t$?V3&fYs)AKxhvG>u*vg_%6T=o{xZ~yX` zeAx26`o{ZxckL~*zi>Qy^K72+nf$wM=X$LkKb>ha!DH);ZHIZg?PeH1_m|_)n6OZ{hn|>&~`OCxgJ?h%t06Cp)!V2a(jA|yk7s<<-mOvt8;sGGWu+yVs&>3h&5CT;FZCN%XYZ%DCjN?&ZD(rBBY>nzlbO zdVQ_UNwF_a-ZmB%&vCf*AfK@)I*T#d`tzQDY)fX&R$O%CWaph0Va4r5f1dp_==*9f zf6O;uQtGbe%$)vW0e&rug|_C&7vA0b_KD?)tC3%h(nS#u`<~UGwu^1;cxBV0Ef;q4 zZSIp!A0E?*1`C^3uee?QKJcJn%U(4O=IXvJx8EL#oB#e_+SJ-EMHAER9Pe$@_&cUQ zSg~;H>80~doM@cRm>imynE&I|)~@~U&sOjD@Ydcpv-hCrKX<3?KZDHAe~^1+Cx2ui z^G_3d@x$v@?kOtSzfVkj^D2(?Rq@N0c33U@bush$?yrd}Bzj+|pJwN6dY<-hrn_4A zNm=ii$F~UmcyY&c^5u8+M~|;~&uF^HQ@w4=lOz506P7>u?JSpddi$Zp{T^PLr9RSs zr?#_KDwfVUn6jW*xH9FsegEae^Izv4D4y@ac)})o1SKg)0??3a~BGmKqJA;1}rn!qn zk8-*#eslNIaf=>>dr_SAy99rRxnIihE$-Yr>)@sK!lH*N=d7knF=zdn`F_!Cf6MOF z?uzB=XYcG6fBr3PrRt-%(+(Ycz_Q2H`;d8r>LcA-y!#G5_1|+d(=fe7OE&MDZ1FbP zIXOq9icLM<9$hkd=ZRFNn(Rv=K7rYfqOY4Tw(dU6%`o-q!p|{N4{l#~-%0#!QeNp{ zy$2PC?j0-UEJ)LTQ1K|q=YXe$MC5LU>&_X5ZE6Q1cWN)vT(D|(M94uA^G%DFEzOwC zE}}b0%`UR2vp}dWv!&*8`m>|DO{#%ie(SVfzbpIUA+zhn9P`?uwF0c$C!aJoe;R-7 zh;Kxwi)B>Ai8Z%f)-P&hJ+$>iuWMDu-Oa0t9$R+qxHm7){J!Y7ORJ4V-mzP=fx zr>C+%T%})8u{@4@ag@#Vg5PWp<~*LvxR~w1oUay{c6}-_r8ybjbHuc+h>vBhFNc{ zW@ zq59*t{2J{lv2CYL+;=@X|HdlkpSs0%ooQQgKII;nryHvLf%m6YS;nVh2evPLckM*} z*05AN9iPVs8n-LGEf2f=by`@)suv0E;qNpi>7V{JuRda#5|f(Rj+*8hKDYWNzZ5z; zl|y|;kbi9KUH9;)7x8m{Pw!hO6K2!;Vp6T>&2v?Ua(E8DnIbIrXy=4gv0qIms?QQ- z?C164II>l^q$f>HA-v1&#VSJ`o(Au_Z1&{OML!=$zM3ZCvhi=3w?r?ms(zcv!8Kq0 zs_AbDD_-7K(boD^W%sg{i!bl4(pKcT;b8w&(B|xl%JT<|O)n~1KjfNXpraFdIjE%~ zV(Sm?$f8*j+VkiAx)PR|8un^Gv)(1W`j5*zuHRYm#awQ+U4{4L&BgZ$9QU|>IThz^ zk@hBdeJ$hm_{2MR)$gatOj*mbziIZxV)lm_od*`xMMWtEoGt%v?O*WRfI<4TyPJl8 z+nEnr>-={8|Ioff!0WxIw)$VuQ-3YD$@cSaU9a=!=>3$lw}ocyy8T)DsKN6cUpb`3 z3(Y-jI#x%$W-q+hEq8=h^55hKN^?d1!=u)`RGoJE^LgoWA9ACV3>q&m-e1Jskmhsx z$?ZLNH|KsloATB*&415a(Z&N7E06A+b7RK4OriaL8`~TnNpINjD)2_X7hhwAcVXs+ za5MHfU-#G_|Ic2qma8DKS>1~5o~qi^m%L0tzjuHA!a9fj0eeA2Y7$4oYU|6lAKg-( z_8=~arzw1w5o5UT-QwfRHz@dSvNcyVUteuLTXFwfEor-1qQ73gdmN~lzFBhrdN0e_ z#&2_{SxP_BnX{}SKs~etY{QI7q*LW0f^LJWBlm55*?|X&Pa@PE3-2C7D zI=9x=z&fk%TaDv_($xRA&0?7rN?>ha(q&VDunZdI^7nq%TiUfS$i5-eIa^Sx< zF~QY*`SA(SOFhIlJMczr;qllcxx*k?ps~nAYllH1+k!VQ_?H|hT9jkU)%$46(?1h- zJ5M;PERxk*XDD->pMiI_;{K#(KNd)O)w#vyFSEa?eP*up5xX0~xp(p&Da$-r=+2@3 zIPlP+%K;X1u716jkuEW}k!`#FtLQ_=WOsWr^G4?`TahEcTV1BS&aiU_ zy``egX3cEdv&X^PnRR&p|LLtErM3;O&)++Km6)pEY+?zLF1F@#1fQ;J)6@`56|B{D015 zeLEiO6xrjLtzk8HLHtiNo4E)B<`^-&y;iPG;@gb9Wn&kB-N;8h0`n5!-QFWUS zUnvK_`TpE4=@JWT{kn5+qcmr#7tLQ@6}F^T!~YC# z>5-gO>5<$EtF{%K{aeIbb2I$^wFReAU#wFWYZiz<4VP45BATm zf1G>$@3f9quaNym-@l9Ie<){hfx|w>V!wi*sPZMfn*sY(Uc`CE3#F`V`O~NA{^iFk z(YegGG;H^r{QJ86rNC_^(Z)8b%X4f_F!A~ZombdB>v(wMfw}A%8AtcCJ8rX1QdlY( zW-^n>v27U_i?)?}%8Oer6%(gEP027$e!Y;tiKq1U@~SIwb7WGvd2)a8pV@RsJ5;>l zWWY~bc_WLZ_9-i7G^n4O^sq_H*=WwRz(YHG)2~g^UEK51Y31cdDf3@CW&S$5;HcS8 z5AFp#uF@MCgG9D#ua!D${+s*W6wRA%dSb_pTKIoFH?G=LDLT~bmPE0npG|;TQx#4uYS%qn(#{~7A z-# zn(JsjbrAz+&XT-6>zi0qHv1f%dSrsaD+i0YAuL>J_aACmJ29CEpL)4>zlOr>{wz01 zOHS*@{ak+X@}ep28|t68Z=b){{GAe$gJ^Pu;;c6dzDHlqsgjiVXde5?C^gwP+xKnB zO4H>>y<3fr?GSA$WsTmq_yEhYhu=fbzIgZd)bjM5i&bA$83fgbu$__?QkZuwy2zTR ze%k5Wcy|UbB^J(xmF7uIcUldfEm!xsQdTc3FRZ(8gRU*()627u=YQV#B6p9WhAdtd&?*IRd-c_b=&>vW2T^siG6>ie(WpZKe8wY>WI zSNYp*{QjPNE5{5m!vV1ddEQ{c?=$T=8Z^xDGJSnT1%chx$8GoPkaRURxr@wzT zGR#rCaDpjUIc;5tfem-|v&s5aGg-^d{n232s40Ar{zaWd;koJYbFPd{&Al9-yw=a) ztiE#o;Y67p?N4uN3za^$Yz(}3aIWMhuEQ)nr^8&YmOj*SFA2MO@$Sohy_)6nu}@BV zcW?ZE$!Yd~ZNZ6F_J2N1`Tjw<=)hC<-)}3uShhYn%JHXzZ`vy+`>1ch^%vGFIeB;I zRVF7KI`m^t&f>JL#_IVEty0YIJdW{bt~5$$+1+-2g;7JuvaR`nk{f!o8aQUm)~;di ztJ%3c=)TxX?cc5EtGCN-%540%Qr*!^xj<>HqgnU8mX~h4OxjY5`Pz17U1MfTd~`&q zaGiJmx*S8V3(mD3I~~6?94m`B6>x3G=C5!6X1E-DbhYFBx5ItEmS?c}%JsTjQ?P!w z$Clmh%>n**mpmdWS3Y#ENK0t&Ua+Px>YKnrmjApnRs1&Wv%SnN+wtMXE}3Qh#rI?w zc}up>jE~j0Uh(YQnujkxwgp^h;V->^(>&W};-N(|6_lswJzOIf>72lDUs*e;^vz{) zDK+c2rHfW~&z4%JH$(21yZCg`aB=gMaj^jv@{tejc|A%I-5L7iy|ih;a_vf`usu6Zh3AGtlp zMEU)iw09l)jtwE+Uwb~la0doVEP%UMCeoK7{u;mt0)8W22I`7*`)Z=lFWolkJ~=HEvU^Z{xW9UF?=fwv@U6 z&!=dQy&E zF0^oLGSJ#S|9ZZ~%((r9&+{X4K8NnjUa&@PKJ(_SuNTJc_kVUIZQiPfzbrEzKRYrf z|CVHd#m@H0Qx6^ced&AST=(;q4}Z?tl34ouf%Tyn4%O)_QJ>U}Z#J)WTyL$`v(i>P zyZwIqn%X^O{rTn!>0b^VcT3w+Y%C|>{Kx#Tz3xZu?n7H2M`p09U)*J_{#x*&?4E6h zTmO8{4zv(lp?!AN#9a&5EZiO>ziRWt%fSm3bmy9TT-Z7_Xp_ErNp`g=zuznl{+SlD zg>U`$agMAhVrlvB9-EW>H!<(TzxJJ5vW>2PKj&$mv`(G-ps5|Z%ihbAcKNM6yd-rl zYfC==tEzi1gbJ7EabM3jF&DGkD6&A}(c2xi<&r!-X8z3Ir^PX;QcI{c@Y5SLH(QmNlXq76o%{Yo&;}mLzAf+uUk}MSC=_ zJaY0}cs1;vSc##A%9oFBmF7z(yb`+Z@Lr{L-Ig~II{lN^y+3HB&zG?z`rSjdkJt7` zX1nbW<6NxZU}NSmwdG}}d%s7*j|;IkKd%w4S*f=A(9cIqr&Z)QoR3Ydx@r36V8Vp- zs9VN|=N)uOXR{2LQ^fRo@4d@az5e&iAL#n!O6gjfP7d08lK1B^ov{I3o9olNyrzx~{}Tfl<**PLphEbV_> z@ssq^b9nM{T$`Mm?F<85Jhj!LrzFi|EW3M3RLXSPY{{>SRyumu`aiC?^UQH?>SXR- zi^qpWWnN|leK$xEZdtpp?~$=vLF(LHs}qiOYoFPBa%x~@^+lEM+yD{WqMi zFZ!>MwLE5$jk~#^-1bBD+txA3AG0&Q~ghNg#T2)@^%sy~%V)X9NZMh|9+WpLC@LMK^>4kqS+|RQ3 zEZf0JKIgW4UMRlNp(=N!LEl;DNpaOzTs}_z7v17rmpPq(?;3{c*>#5hd_V8>>b0<8 zwKmneBsp!fjk#vCRpjd(Zx0*&DAMS@;biA~Q(aBzbdBa33-)DS56zN!RVe?+@Zav0 z;jI~3kEWU$ZJlJZ`u_PRg<}7B9lt1X-(RuCENrj4T~qYhDMz~%Olzj=YnPv$o-t*k zNaQ6YiC5+KdP-e4`<&ge_onDsoyU9KAE+CL6+Lx{QZxOw_0H)>-yg2`J=l0ff-74& z`h~}P#~B;7RFbvUK0PU1HI47b{N-mS>G+EF6}cTdoV$1B?j|P2;v41LBKyUpN+w=? zP^=-7a(Y|J=>=}C&B4(}CeGA9C}#cdcwd!xeN3hJpG@b4{M(KtFDyN0`&r<4N$okN9qO~; z)mf!hY0KS75Bd^re7Y0!VV=)X1^X7{O>8$G#jWv$C{T5EL znw0LMdFx@@-)TP$E&f=TJoe4!WBg)wsPWsb`S<@ssPfltJ~gi{c+H_#>ugSh)hg_@ z$hdk+Gc6$F`){k%A7|fK7OIIHd%b7Xsl?Y2ap@a+uCL-b{OIt3li9v|UGz!}U##GH z#48uewy935|Ao0&wwRj8*}AgD#{_HL`Rx||U2-KvAUW5zEC0CPt+Njn&PnuUV`;hf zm9u2Yex|#Y6o=W=^2HrLlRdFvL3ge(@0V3mI*&g~hs&|OgRNO>J^!A4t!I3K-(^-LoF=DX+r zaIEUk+W$-Opwgo7^=mgQVq5e)fAW#dPx)-Vx!KHqrPeLGQ|{xo<;r)g?HbrNb1FT* z%l+jC$F0YwmGgF(*(M#^&2*t=Q*gCEQkJ{>eYiaN)hPr!W5ISo8fzRjTwKv(w3*#@>fLGnY*f zx*h$IY5S&WpU#JzVc&Mszw?{g#MUiev~%uX6TW?VYQ4=y->UT!-hWK^eSv>&UQ}tL zi|RJr8qt+p)zc%T<4kfza9g5BPqzn!fY$Tylc_ z)+v|W8xCI;(&Q-)yI>X;Gw1sK(@I<1SJ!%7TNrV2g527!2k-V?$@%?@MXplp;N7~~ z2}=$-UDGkqWa>@2HF?R0w%9TSUDsDx_c^akpCXW}ar^SClXH6~G*!NO8#4XE+ut?C z;?w>z$1M9D$QUU3hb`_hYkz%8^u3?ca^H4EOp`aLs7;-H_G+AEi^soLW)t6toSL3@ z`~M3w=PmUm(#Q9FUwd1px$*z}JZG`>hyLE2b?3y1Bi}Z4eKJ18Q55JV+@Io+Q*K*n zrub9*yP(^g@{dP^<>p2{=*~U**L<6(f5H3jvH^BC%AQVsxK#WPSJLg(GMXD6)N8mU zg-&c{cxyY~!Gh_QuB6eSY4L&k4)9Ig7k0L1{^`~GRG*apwC-QRCUo=focLoJcKiZWB<`De|%ZKhDoHBAI{8wcD09hx>xYZ(>Kf|kFS}PTyp70(fVd%&d2L# zPc@T}mA_IbIPFv6)Q#6Gx+FIq>9Y=MaDT0}a^|#yr}7%#C|0N6lj^#W{Dx)I%|EU= zk8aFvce}siz>E2ZnQunl;*#~em^f2M6r_9DBEH%G6qRCi#WETQC8Z?b#-{-vQCfA?m``8}u#yRA^ieBB^(Ib`Yy~$V0uC{H*N}nd{#5-%cKAkeSsBpu2{e|>hJO}1^ zDNp@aE`8Jae!$McuUz+4Zog2v86fDd{CawF_bv0S(`@$@-FTyWV#R6Mm20CX%&Rh9 z@v7m<%C+leO<1tPYExrBM(|i6|ZnuvG%Kd)-Dr!O6a@i|9 znol-;xFWHy&0^Npo$KH0^et=QS-$?vuf{EB899RV?(Upf>!mb3d2+Q`YfPBsiuT;K z>`Rn>{`QJV70GA2H1DSW@^62dds#jnW0On2@kHeHt}~MgZ)wk&$L&)v%{#@!ByX!H%)eAa6BiM zIA>GPj$20e3?`)9GW69>owN1sy{;_die#}xit0!EHw9=#f9z+hlJG9|Drl3mI(c&1 z09x_Ic2XcCpX%*9QtIxBGWIbJxg@)vI>z>{#`2^Lp)utTzSEAG$=a3*(>e!^al~U zw=yhC-EGV9e1fy@3yvpgKWZ0T+Ic^hdCCTsiL)Q6wfv91ZK6@Feqgydv*zvxJm!k~ zGESU6B{b*mVlxll1WDVRm7kRloE2HrdN$yWg-Xr(GH-z=OY=F;h5XLA`mO2C8VxbC zc6MpkP14fAt?bgPr4AgER(JFY)=iwh&Tv-aB9Zi~O$zoO~? zE3?b@=G@Wwdvw}ChS`BiyCR$|WJP;acI%euto@*%%q_C}pN{v%Bg^{V+)~m!xL+mq zAYba%Ym-)cpG^Ap`^mEu@d8VpC2i?5`W#QZZfuf{m3X(=Suxt{`m>q40zTiWGGG+3 z{5G}nLmQJ*#A)VMZGpa(Q)(BtEWZ0YP%~(vJolfjM4P!0OFR<9Od_^lE8}_z(0e#YRV{F0cM4`yH6yK^nY`)ww=y-E4}ta_e2tDj7F*qWWT zubL8WCFF5j+dor2_l8{5@t5*)X8t`-kDSg4PkwYn{PVpuaSgkV$7*BFv>jE~LK`x1qtMAG@Qt6%N?eK5Gr)->bpZYN3Ani~jtCXT7KR^s>s1OZY}yS;Z(`{o<){ z>w~A(^F+#gS*J}&em0X)GUAEdyd{M~+)oszms$HC=GL=3FID(%%R}+zgRaXHru>jD zmSWoD?4%d}M7PS<4TzqtYiNodFbulT?=l(HuG#ZLJ zM9t@y@X%LYa=?o{V5U)QgW^sHmV%uOJ5r^zHW|2eZk?JEJ55ma+LX-~{MRLYa*e#v z5+*-?DsxXr>#2ylCr^kue6U;P+OweT@=DixzWiPhkF;Vue!ddYx()5 zQzj|JZTWPAH|XWE+{Sr&+1U!GgSuEQMN00Uq*#>~_U6>tM&B=w9Qx{t1)Tp`M06=k z&p+{1*LTY!XS32Ifl}}DJBoMzI&J<9jUB$PB?R+nq zXC7IqxQ_q9A}uKg`7T$UTPf9F9u_#(My%7i=bMo18)NeE-iBN;XN6amuevn9IybJX z5&6-fUwdHRj>0b!${+kW+`9CzzF*Gjb>?ExrY{m4ISzRyId3lX)^UsFXR&zmp~Z}+ z>!n7bbH$=HMnPUSn>XKP>{^xS*2y5Mt)H&&@lS$oX{+aq=krS%&#M}=Bw31d%w8%b zTCA6@u=#sK*Ue?d0h)KzJ3p;i&fX{4SZF9v+sMo_MNw6nVTJ6y3`+DvF4!8^`pl3yBl{D887IpUni)%f8~qc?On0AC#xmB&)3oT z{zh(PyO4?h%-hP*-^_ycJY!)wlC;#>@m1SVsX!r()xDKVZDKFo@-6dLsA5Uh`uO;4 z+fBB46Bes&S?jbZ>WTA7)@y+`S=%rCGGNTSq$o4Rg>BIqm079Q@j|W2YnE+V9me78 zab{2ab=`>A-Q1<`{3{DhU%KBv{CB~v#r8qVPO+_9GVd<`njD>1b7C2~UEMb48m(ns zq*j#mbAN~gGrwra#_3%@%lOTIXea0CuZ{nHAo`1zmdc3|#uvLxgCvb5B}AIuRenou zn3!$BoT^>s_Q}~{g$Vneqn)g?E&Dr3#o((PHVp}6=)Ok)_EN9>K zxm*pNlgb=rRK%BWXKFkm%{*Dfl$p8p=DbShDEXz0Zj+T9qcR!Pz1HjSuG8={^LDP= zlr^R8e1??jmb|53F!!g+vT%OizP`W-pZLX>vG9w3ekN$XcKax(9tf-S(zxgO@X&JQCnx_j{y){~*m&b$Vs*@$v@cHOMg_rl=kyS3| zmb=oXmf9race#Ht?~gBc-sc2zEEiH=`u<#_dQ8HB(_!yhxYty!;s=2) zQ~l^i23PnElFX)i>uq=z)3JJe!m-PXYHZeYB;^zMa| z6OZ5g-c@xx$iI2-dqu9aiRJ0#pEv*bQ2xn*tL*Zbopt`Ajr*-x=2=SroPX$0^Mgt6 zb#F~^>svqbXHd8QiT4wumptBnWd4ms`vnZHe`feL@!LLK(Ez>t%=gDvMSiYet=j2y zE4OpuO7FBO6;q}NoH#P8e~bQP&cKE!>6E^G+IeL7W z(i6|^{_9WN&Diq8BI)9E=_Yp8dEDmQ5;@Z|!|v2rGhM2SyL~0$bk>1`CSiVME3D!- zU0Sm;@Xk^;dF_hLT9ZHQXuiAs*!R|R#~#|TvMTUoProo*_Lm*c{K*zp|ExMUY^iov?!bo9l-rh;{ehoY4|CnW$elFd;bU2~o7Eu>T!Mj~KbO?+G7sMF%`tV`td=J? zWqDLt_qcXHIWFX3kk<9Zf7TkY7RDz_wpsoz(EBzaA;;AHeM5Aq58HZ`j)_lSvc>EC z2(0Up{-g1?jCUJr#!;~wf*(0L-$m`}{Sd}Kr$X|RKw^xlO3RYnyMuqVIc^Gf`R^Ee zNOZ6Ll!fM+Jzw}v8DzNbn2>6dd;4bWvF0<^x9>WALHhg8{EjVl`~uM~2^HlmKROD^ zD>?$69lrflfIpR~d&r!Z%6F#C&@W~%33scopVi&5L`#B!XeG+9HuCv+(?-l|D+j zeGHZpU+dmgO^S2nT@rF*{fDMk6C$D&i+7*qSh^!i$gA<>nvSNaGpDOeIV@CkF#g&L zKZX}UZx@Pqrx{ywIBBNs*yJQPtF2pC)WWNPAG6E0}V_81-FOSllbBV^~HfZ`fk_ ziRQn#Yc1@;{;Yd%9UWgU&)5!pM~ul&%Hlxuzx;wanbo3jtBP3%hk`U)zhtft^PBVk+Js2nlIcfr|g(HeD{=e z$Xw1eEQ@rxqu+kmT=V&~K99OjxzwJbrA!D63x1)z6qzijT+}&w|Ockx_6rUZq9C{lE714hn=ju?Q{@t#c7$Mu_7MGW1v-@UwWNKJ&N(kf(Ccljfh2o0yA z{B_U1b8Ng3uO;QWtncQrInzE?XW1tl(2SLkIp!X`OFtt>YPZ1&JLx?|TNM5*I{SX& z%PG7PS+Xp1Pj^&akz@0F#J8?!GW(b7>lqI$=Pz`YdiWsa^GCylZ(Yo49r(71Yn}LL zeZ%gwpvc1a8f% zR6bKTWktu6!cFblPL~JwC0$#|EB()B;sdqc4af8ytqhml`0~B$rT3fJlFYvK-~Vtn zU2anS7|>s@AF}E+*YW+2^^f1~y=E`R=r8BwGJT=Z*{HUTcX52qYxI40>{M2=S-xYZ zvRWDE#`h(r;r9ozyh1-m$}~_hjfaz58k)TC%80mq?9cxaz^>8oSw>{f71~I78&P8zLadM$Mc<={`D(-^uG9?_n?~hH%~4$p*d&cgH{y!sl2tgIpyo{;Vq`e#)kQVA8Jr+Ac14f$x@LtKwRvfQvUvrJjjcC1&x2^f0vU zImqg2tmS#lZIc#+KS7$9ZQB3}r-alt%kLT5hHFZPL*N6aS|E3vhfG!Sh9>wpabn z!w0U7lQpZ_Of^#XHU(!0o#K`~(zGqbXVwayjSIGZ?Fv$66q!Bsb4K>3=oLQO`A=_Y zoI3Xi%TdPyhnt=?Piw`K9H;-wo!*^R^xr@!!BP8kcUbfm`$I{>lUiK+7iu#-IIh~T z@Mogo9UYPBm2Eo%*i#+fm07rSeSfWFy=(GR&EjGik%_LqX0>K(IO&O4#idy!Dz9kV z@gh+?>s4E~-RI+a4azD0hxKHxGv?h`8@2RB=!3RuebJyqCmDL}Y&ukGa3+#As zAg-q+>VcQ0wbGW)J0@R}Ram%y@wC1%gU6P+tkNs}7AoyGa&b}NUAU^6T`*mTU2wtb zyRw33di_-m7`KZ4Xy|f`g`V!bYB$1KT@z?&n=`te-Xga8m#EE}5-2 zrd^NQYT>IFBl7XA*5#{xPNRI)`0+ z6P2eb7pgA*JE1GvbhjjPv1qonhE83K=}hMm~z}D?WzS?Yz|ZJpF4_Ywf1M2fR|^ z0UN(>-{doUe!OW`N%j0Y9M!fvUxpWmp4{&)+p^NbbNY%~HWg=eukT&nle*2(F3Wns ziL%cL_nSq2@EP-nnV`ZwA6Q-IP* z>zR|MN6T|E%4}IbWx`(ji=}dRS7!CCeODvN>MOu~uzN?L&c8X_a{s*F-c}=mT z{oD<0xjczYZ!F#CU6{Tub@eN23Dwza?It&zJG1gs&O+m7X8LRgHN<=(Pb!+Exy>^U z{`YxZmGaj5Kf*1?mbCwiI>mhX;`85)y?>*^B0t$akgWc`vts_ccOIM6_uhIXf8YMX zx<3Ne2d2dEh{)xYxo&3Iao<0n@?Z+z)(LfO&g#`OG_{jDcQnKnKUrdAAGu66I{L^G zk$Fqb&(xft{B-9_wKpd|8r+st)oX3N9qKV_liCN;zSG5K5+5$l#N+Mx`s$ubqGj*A#Mgak|KQ+Vy1jhYf~9kwZag8mXz9$`zhy22 zX;&4!b@V=Yvh>Al#jwpQH-*oTc+7TZwN=4~Z-)2JzHYeir)0z8*IT0|yYt0QUMAv{ z!yS0r?t$U<;_I7iCo^#6-_qK?Q8YWufT2zE&dh@1y6#i!_y7BS{r`u?8_QBWU(WwB zzyAM+-7CKI=FLzDxzl~|qvhkN&(Az5`CWZX`}|Dab%(FprSB;^-{M~RPH^4Rc?ZLa z&(1fFt33B-$KSWdZJX;>uz%Q@x&Qob(H{=Z@oQ@iKfmq&bk4$~p6{*mpU!KPXK=e` z9B7%|Fw55dyyevDHijSPRJ5L-$#A(+titu3MTBeBN4d^Zmd4XN|6AW&F~^wu_Qd1W z&qChK{QCLX@}hGIW>1YfG>&jyzV_?f!?1Ufd6)ic>KCVY=Sy=v-`mwEyTXG1^#`F{ zUPT{7EI)j!H4u8TyXfRa-8%6n{!I)O1$XxfZ+C1xa3ojjzSei9I4c=n-$Si7V(jDnS>6B+a*RA~ec$LK%#Ot8j$&D}9Y>!&Q?A63ucfI4a1gF^re$Myl8v=!L z(w?0&xS{d$SJ|)sk<;(6_pX-y$tM}i-}&$E9bH#x#e-=|>iWWr7n2_P-kIJx;l*XKF!N^%uuyvUSQ{`|Cy zM-Trhf$6=I5}MEGef~9NQUwU#r_~ngg*7|P1g5>Vnmj3EbA+JV z?4?o@=S?vzK2fH$WT}FB`yQtNy_q@&(|>a)O*pR5p(B>*V&;En_39@1vy3lgGcFwR z+MBoPLF>r?rmw!XawldPXDBJ{E>q<`YH%wf{?+RM?Tg-g_pNGIzHR3ypRw=x<(L~g zJFb|XyU6MAs_js@&xN3#-R>_1_I+P2PLjE*OwO_tFM-q z@J|d`#NFJx%W}=)aKU}4*HeF6hG$jVUC(>|>A;4?`!_mowfg_(@vfss6We3UIt*Fk z#b?}EBec@ieo4sA^s0?dGj?xpUo&m}45wwHkvqMgHGTOv=~~KMy?k}c+)m%i8q#-c z?OYCt>&|YP^UQhDks8@)tarMFJnwqU<&WI8A(iXZ{Rw|lcOSfXnpbD{rg;o5%a&M* zY*8%^+Ljs}$-lCu@%Q$*IWuRScJ_+*3EMo?ds5_O9JED z@?6&hCa=5A==oJ~^U39_O6n(GS(EbS&m^taQ*!P1EE6oSDYE-|h&RX;KsG`KDF>*7o8|e_220w5xXVLEFx5dKDX0>oF_xbH(?Q zrTO1K3WSC!Wap~|$4z%=+p0aMhvDvY!zQs4Stlm7c6)fLdz>mf&vcSsVg8YP{%W>#F_N*-pO)l+w!kmNW0a98qWT>SN2^RjD=^EN#_?0b5(jV(jy>eV*k<})^V zot>`4tod!ur^6DA`{%Mu+B?PBf6DBeAG)grPhMAcT=wjO`y$cE`@g$AR*3WUMl;wR zS#tFK{~wLdc^N+hw(Hajhqf=+^{#AX-_!Ml3ZJhjMyuR+eQ~zKDy2Sncl46v3yNPp zY~8OU)#m=z?E3y?l}tB(3n^9XtLANCQD3=jv2Vwdpk|@OMOA+UE+-t_T6WX1OCTfD z#$m7Wt(K$j-Z;(?kTmTQR=V<8_Mu~o%R6U1O{bLSa!XFQu9{nXe!IBGorAMPI{!9# zO!W9=upwPQ&c!RA-|(wSP|L{~juir#OaHP8K0KH*wf#%gcKt}F>q|KV!#d?VvL;@h zRl}gvT^{^;om_RMZxqbuLOpt-DrUahsrhCtfvDef>WH zL4%D`t2cy;o(Jset(<*w_5oDY=?s@}V=Z`GdP z&iAfeGV#qZb6qc!zQ9%DuWDwjpQ&%LO#ZBAG2uDMy&X-K*Vl2WF$Ef^hxr_wQ(?qf zoODjaM`clh-;-HQohfF~?nVwKo@azEo2XCrxjZMwn67CH*v)rtPxu8Bm@EPtc@_OhR6k@P^$*j1Cn|5FG&I&PzTjRT_qVYdR zO}*<=kMDc9V1XU&l<(x)}aN+2h-qva2oaGrk#0 zF6RH{dnH;ed7E0a%F4Tk+*ptJT6q8SPjp_i?4Wx`VFiz8gy+>QO}kIO6 zf?!^dp#EB?S)SaiP3=$EgcG}~8d^{L$1TZ`ySz|a%$euXguK_+`I%H4I!Z!frGnco zSD4IVSU>$u@|lbii?+_a;Qny!-oGaC_s_LAJ6~8h@6Vs}{(mQb^SG7%@uB9F&695x z%)3lkySZ=il)<}82(@rSnZG35@;7kABG#O7Diui$K{ZZu(^$ufhrnGXH$vVG?E zoDp!6^+@gBq}6}?-6vj+mRS=f)qd<)M+<)(?USnUt4Tb;(!$v98MR4ydd;FUtBkGUIZr8SPu~1KUnR!ga~Ze7?BeN% zr>|={!ZcCMmoszYz9Y*%$9Y`6P@rn*Bfsg$xm~6^pB~LqYK%&G-}&76*}9j>h1Z`f z2;qLGx@k>>DMwdM=8e`fI?)-f>vK-DYTp)h^sIS(2L$P4Hf0C3iDTg)3X&6Nl=Aqk2;#q>8sVM>-w( z^XRl@s@25TK@%=L(#$=*&U)$L$&>eM_*=)l-ji%vD74D+@Vmf!PNt5UPw&`VOn!2O z@64pr|NQop-8gmMbB&s;*2gC&<_lh!?Rog>)7u}Ek5xEs3Nf4Xut3b?sl(zbtD8w> zo)dgk7d!J#d6qnjvG?%Ce6dBBDp%>O-W_;OdT+gH$4JK)Ko+e=SYyym$RFg;dv z6>mv%^j>fNI(Gk0_0xUWPo`GYE-VbJU$14%C0bWB^`6Amw5W|4`%UuZ9?yN2?ISz= zTt<*v^y5=+SyX2fv+cg{;jK`H%2LZa-q)G~gIzi!JboV#&Gt+(Tjlc1Mz(wR&AoXG z-z^Wh_q;CSU|!+YsZX>TRm^*QOL`gaUO6MiytO?xnrC9d^}W6ZI_qv&>&Idx__IcS|YF9@Cj~SGX-=J!K`uIsb;P zmrBFEV-r0jmdlw4eY=y@FU7g!N>SvJus$~>^By@@A&&g}E<(qCabELya(vSww?&+5 zU0qXt*Bz|9WT5`MP|#&d7xz?;&964U70L`sz8R}@G3=X_P^a0Xv0*dGz#??uiA-Rl%W-2~Nx|?MhUGipIa;bd!a?yQ?mDu)__Kh9V*WDHVKiz$2 zqV~>2jak*AQH`sAs$VyLs>MF*$Z!6hZtjK*&$2IE6*)pjzJKU-UzCv=W9MWLy}#zm zIyc?N%6@Kkca8XbwH`NbyKOXIrI)Ge#P2iQ8tJZ|Rp-kr^Z#(tahu97i`mmTZ3K^I z+3HS6KXzGvUdNicJrzo`Zk|3mnYlw&+<#I|h0v@6lb2k)CSENy@4=O=MpiAcY~mYs z$IEnfv(7zowzjeQn7P6AyTW(2v#CF8yj$U!fM;R2K5QinwY{L?rZ?n|wSGW8(OxY=4H( zMpF~VFTDSGeUJ#^qk5e9qpKyJB zgOM$4O%YRqLil3N2b}K=PahSnxtOwV?)9#$5YC21AFqOj#{6wx70v{mC|<81@%3r2 z@WB`2sj3M(r`2C(+4x}fuJhi?{l>~-Mm_5^ITIHoNQbusMu+jXH17GfgQJ*vEzjcZ z<~7w{sylxdPi*~nX{UsCOOXjbhv6*tzeYSyE_)gDJUhzQ!g-NXO_Rakdohzw&ig+_ z=hgSGs7+^``-1nH&mSh=o7QV5y!aycXOZ1zJ8RwIqoLoOM5=CPclC<$Jw8ir;tDSG|)P&;7r$t7glZTBYs{zKa3#HJ->1^5*wWAn8i#sUuV!ck$sh6jgIh!b;lUBvoGv_KaWMnw)Aa_{dK)h z6K~y({&0EkOyOzw@BAy@e&hMW?G_3)-urgVQ;$!*Y4vV;M&tSg)t{$k&AD9=I`MYq z!SD&~OO1beeP3%VB(rJp*_0En^*GlrkX&{%Yt@lWJ=S@L%nc{FO#aFBDN^+Z*S)%r zq9TX$822^p>Ft=hzD;EESJubc7x(P_$c&DtZ(zh<)Z`zeAypL~;;bvy0(wvS(9g>$c!|66ymxBTRa_uoC0pX*E3 z%(d2h(rNR$b=N+YmwsnWRcED!o)FzMJ#nGayc4ezIVGRy&g?w8OGa(>iM1CWa#eb6 znp!Rg}MLD*VOq8v9gbxlIXzO3T?(d}b}^ zY3~-(tMHrF{ArS#p?;acnQrB#&xbf3+eqBJwba68@01CZ?_;y06#Ej>w4N!pO;oz0JM@*#jOxp5R z>1|#8`#2Ze;J2^1aMxvC)yky|i|SZpyZ5{mVtTQ8)&JRjXS2WgOLgz92`&8=f3|ts za)S;1x|+AHFZX$sIV&u~r}e#Sn1b7^1!oV6y!}1t)au!VJfA1cyi)o9?wQ526W?p6 zSiQM1FGjKW!G*`M$ydJoTw?Ym&G2UT)Q0fhxNTxn)%E5+vC?@Ha^tYE*@UuhS4vt` zCe=Q4V|XIzc0O*8h{?Ou)-%~tsxEOAo_*GJS?lqRnQM+-3cpi3W8L1;*pDS?`bHd! zex+u;|Fx7cxWSCq`Nmth4DpT^4{W`b^X}9to;~gPLX~f)&K@&apLY33a#8pHEHht; zhz1o?>B}|yOwPaBx%1D0i412a&pypBb^qoq-kPh^p4{J7=FEFw#=C1(!j&dzS?=P3 zmAU2nFA1%AdFBfH`DJY7JZ(R2Dn>7RG(SSoM3p(RT*61$CgN*Pu}yFy@0tt7YuXQb zy|$n7RBmy_DzV}}Z{kiZd)fN+fbGX;Z)~<+NZ##ZJ+;j9`H{uEW!Wc|-rhPl&uymp zz3mSVZL5kr`NGY) z%vwv|yZ@_*c9-#6qqJ4uEGNERl*;@?rAYFu^}5V?xAMC4d^sQNYB##O`MRI>5^Is$ z3pdu9%u9H!>e8DT`!U3Y!<>21chQ}%_C6Kc`dh>Jzuq~kr)4`9Za&N_Vj^?3=9_PM z#plTIkYmPrr_-;_sC8vFXjc^zW%|GSPGZNGx!2s(Pm9hy+xBqTvgL^yi};$O4T`J0 zWj_CVUng#O)b-n}+mD*warYidbNO~dqc&sujq+8;=iPiLR{iZkt;@`xs^{nbaQZA< zo@cW-ajC`A7dv)sYP}@-==kNe&v&)W`=-0s?!M>WtX;|4vz9N*mNJX2Ogr$WQ9Nn4 zZ@AFhT=8gS-L{ffufA?FT<#Lgzj?3XYgawf!09J>P92!jCF&I0TXcB$;zx`(Dv$N4 zvAyRrJYOaDPWO?9?#ZOm{=#gj+WO4nLj669ZDaczHa^aHXZ1_=>YBqsb39Zhz71o~ z>S}ZN{p3IUEzKi-JBxqX#eGU(zZy|K%f!KxEAGyp>N5KUiyod`)W7V!{h=4~rmI;3 z6}#hRH9gZ=XYqVSnv8dA`b@XA4b={sCw@Ebj9}NE{LWeEqLo{u*3oy1FGtCq+S$MI z?WW+&xJGxy^BMdLUmFU$eU}WHF@HvCRb;`26Se!Erdw$SH~%~2@`$f{e;v!DJI6J1 zXS{j2p-}vE9$T%Bc;)MjasRV-A9z03(Prw(yu;rW-|#mr4(nIXOJDolvHAN&K9!t3 zuX)a@o1WI&xbt}O*RnP0PrGVFf9t(E6Y^%+#Uyt*g;Tq=7XPiwbW4;w<6G(fy8T6W z^saT*OPbEPUKG2WkaOy>;i5)%-*1oVbvJx{Rk5Xb%09Ubw#zuB9pGY-Te=aOi9%SFreKb)8+DOlMvd*1Sm54)0B{-#Nt{UD&c?L!}b zzkGX^a%{)u$1>J8lD8Lea#!6n*wu8(s(nwhP=dyil;cN?*WFutjNeHr`i#>_p^pj2 zC#jp-_tcg8aNT)VQ=&8R%ErukuSVgECs?;$XEIV_R-0|S%k9M4Q_p6E%>Cw3-uANT z2v>Aay1|v?4T;y+sQ)Z~zh&Lk72O}Xn$K=zT_N|5^--AJjONuPD=+RYm0v$ebVKBV zB_3ZQQ}~YgDm@N4Zz089n?AwQZk^P$>GclZlvcYdKbjOj_ujsA^{ELp1zKxQo{KX$ zd}rB`W1pVXJC%IjBH>*>;o76Ze(sNoYow1C)Y>_wSE#Z1v`o+Jer&i&^@;WEZ_V`! zE`OeI?CB>XiFTK>=}w>3&QFhVWL}pZbEYVye9okPvuXQZPAX67jheRj>5>b_-v5zS zO}_I~@}h>_zWuRVKih0d519Sf=(yzPQ^jx7*?xG)9ok)e!K(6B+OmH_@2nO@OYCbe zRM$G%5j|nYiOctdI$YxR9P8-{oqGMtvG3}N_ABqSojy4ERO5#KH_nx4Up)4wG4krH zrm}|raS1a^l{e_DsCP?vFLNUGKjV{4|37+!rOckY<^5arJtxGDiM4F)&8qr$Xk(Ah z{?;c40~H=**gNV=zd!e{B+T-0hILtWT1k1!KBtIlq3LfXK6QCp;V{cuLnTk9=*{_v zrpKKfs{2!TxtHkd(pZ-`;X=@|u%({(Qxfw7vRM>oOF!CJKg`Eeq~A<2q0OT~pb#SBDDc&-6O_;^FbW z=5PDvn%+BD)xX&8Ug;5esS|f}-sYC|Mb|SOHgsMbJx?+taL4g08cel?{be$J1-`P0 zk!3A$5gEHarCyN#u-85Hhx?Rel8o`KJTsroG`Kd2r}0nak*U=>9c0O2PG?{zZ8`+ZEiNuk<}!s8X|d1J}`wYac$oH}A&J2@8`89#YcqfHNSk{8ngJ}-7{A=-WELe{J=?h?=6nrE^WI0H#c0!HT-(WW#Y|iU9NA> z6k5CObCGFx>Gf`zcuv*Wc>k7v9xHD+ehm#`l2;V{d~M3@3uhVDO}OQMYV(que~gCj zPS&-4=J(K(39|Yqzs6VNo!um-uQxmQWd3KK z!_hroXFgy#R^euN|Kr{z0!mXiI+sPvO`qV(#GiMg_*a|s2KL(zSAM$k-{suykUS#a+xF+YX5 zjV*l(>JR#sY`Eci=_J z^!vEN`(~Zq{Z&^T_QXkCnxpPe5@P=#>du{ea!$D(@j@pY_OnmwlReQ?dRw4#&gPK0 zld`X#pY!Z_)pgEEOe;R-tnoeODZVr*xmToj%UIST(qx`T)R!@k5a&ya((aO8&=L$6CKL3`5zT6 z{2Q+K?8AZSDb`n+g61Y|{BC@>s4enb(U-2)Sk(#IVv}9W+8*?N;PXyb2wlN@%kuas zV?Lg(Gn6Or^4VogJfY2}$`tWEJb9f(OUPZDswYa91gkdA{8=SnA#wiCR4YxpX^X|8 zEf&A`|08!~Ua_^oF^;V>7RpCw?eku4Hf1VD)}L@)trdR*xij}?8M^xF>&?M)$WQB*h*%va_#$*^IgO ze+3Gditno_pQ$ULY2!ar{ruD_!^jueANM`~Am&g!aiiVkWX2`_)2E!*cr7{M)zK?w zo}5@*u}wVclnU{~+z6^{YjFB(Haw)=&Jl+MrTjDIv38!ge_s}usy}J?|Ec)+VntOrc=FC_9 zcSO2gD4QD|<+%9Wy?)p3y~;_EEbGomHWf8oHk)NDF)=9qJ~-{%+3JutLbh@UEjOceVO&jm~AUtUUR0$ z)g8rRneX3E)muE}>tgq)ml?a31Z*i3oqQrd=~8gcf%&Ji6mHGbIkY=`cjk_%dy8dR zK7Z6tPu=37nRB(f;(`>riy~X6xwUe|oNpU$g>DPZ+i**`+g&6f{p2HE$;+nNGxuG- zutY_*NLBN{muJ<)z*qe_OI4P7*iI^O>Du?LxrHHiV$wnDt@n56JUwQslKD2gDN3T> zWcCT|_qqB>E4Qz*v3HzomwQ#&^QLiRs#xW`%bGgpv#n0={krM;5{E;~*|l$0T;Jlh zWX&As^-13rui>9m_T>+&b(FpK{PG=H=FJ~Vi&_`WIrr+sg+i}s zf>-poGux#NQm#t{nKGZW>^=4WL}Y*U%v)b-{L9t9+q7+v-^{airB-I|tXKU}v46R? z?uygA^6HfMRW0cg%3F)A;v{wQrRtYo@v1%j(>}ZqL<>hi_hPW4m-X#1=A82? zcDXj4lRO@Tg{s+9bvBmD--!1TT73OWdVg@QE7Qa(`8&7H9&dRh+X0NETU+-U`md%X5NPg^I6k>Zpw|gWY ze|`ImrQqc=stmH_d=AHBSr;tUDcqjN`k=qQu4u+f`M=-8fB(@tu-I;v{`)H#-0!Dt z;hBqQ>>C#96QrnxMF$bf)?G@eRoTAjVlcDTE*w@6l|&J?AlYh z)v4O*Sn~6>o6ENp*YVE%@~zY+W!K!zQ&$?zol`K+k$+kmU#ZR{)3^UZXQc~Qy<=o9 z++uy8vt6sW^!CA>S3Z7yIPK=cOi?S2io8XeqXH7WmUAZf3E8c`J3H~aOj90%a8quz zh$+XcZe4+x~+s42eAo)+EibYt>6kd*?zo@j zpG7f6{Tj#bd$ac*zx-^^tGCtV?#}|t*$!U$)wnd`kkN`O2RAysUjAa%7nWJ;B2&(u zGI{;HeCN8Ohe9Op&gb3jXD0fs>eGV#`Om!W-P)FArz<0q_BG?^xpLpl#zx)2Tm+Q^>7qIYW(}yzVhaWhsch{v~E?&rWYq~n8?lUWn z!>?4?t8dT$ukv_f>SlquiR_5*s}5i9l@j#e z(ls9SIaZf{Xst5XkeV~=o-6N_U#Ga zvv&91+T+gYRS!R2n0Zw~&MG+7uAr}J^Ue33X5ZUSf1ALRW;JPX6nNv ztCjhmrujErG+;dAWqG>hjAOE@#EQxDa`x>G3A4D--St$qZfbj+*73iuSe_b59XxaF zsnroBm+G)`>m3gZPaoNG*KKMiUs?FB7^{ZQyJCK|mip{mq+MMxrOWZV)|E$6uY?_@>{RBtSLcN{UVQu6_EkcDaY*;kWnR|}9OZ9C-c)-0F|9;-zT#@_W8B=8 z&yO`neEPR|**=T4K?}u?%&XE>Ox=I_%z~Yt=kg`3SULCj*Q!|y%Zl&lhAp)$dmMf7 z&4jH_PEFYRmwVHTe_@4(r)*^|T~XFM$LH$n8E-pWt9SOktJD4^cZerh_IH0^__NjJ zrq>Tfis!s!&+WcEC+3$~W>;_C#JVN&Hyl32U(kM=wOnVW-8=R@ue!zkR&yL!tiS0| ztzx<3Dvkg5{bS^09 zY!)wZdCv>>R?j{zS(%1ePu^v^eVI7(Uft?%tX1^P=_PTyxTDnr7U1sWn^<`_a_FS62K_lSO+6U+6>sa~Rf1DVk*0D>d z>dal)tM{AwxV5M4+OsT5NsX!PVmWj8iKV&A8&m>Ttyp1TrSfJP7w@7OUv_j0wAeiI z{Fsni@v>x&NmblAoCPM%NrReyWv zvJE{|tm{IjEJ|GeGJLX~lJXKO(WxJ<*NES9rO90j)PF8>ze^>wT5T$yE;o*m&V(@`o9`RIHj?b+rclP6DN z?=VEmZ!O)OH$DF7-pkQGq7#apWhL^WWh+D3t=>NjyL0v6CAQFM$NFVklamsDPcKUJ zI#sms`}8=S`4zraODAz{x)#rsWILP7=;qs#+jh==6)yVZPWmCshjS7`UO4-fniunx zg-hf=I(vivSEuKN5GMtdl-Rv&p$4}MZ=Zk1)Z0EN+Poo5Oyx#ig z_$(t)<>rRX^G}q<8unG}kU4ui~FZ$jBHhZy!-+XN4 zuWazJ)Ky>585tH-q!85T&DXSjlDA)1Kz5ex>}LxXSxSn;l%#bWHG6nw!2_Ymj*2R3 zuIV-0lf8XTU3e2Zqwde=$wnNtd;a}iU0Zkh#r$Q5j89&eB_x~MYG>!E*>?q9plm3uG1b@xiw^f1Q7bL0O`)Sj%A>Ns@~k8148^{=89 zG2gX5BGY=|!dWrq9f76|UlLn2H+)#3m7aTT#oKJrC+?SjIoo$uFMBNPxnq5vrT<&) z6%CI|*F28te)BTthOhS3hw{_40?&oW_8BJIB`#VWvOry|>}$+N9rr8Zam9Rl>*RDU zgxvglW9HY5ON-XYmRt_iQ4Z3tNZF}p;r=ykZC;f!Z|En_SG;agFO7DUtol1udUDb< zY0)Lpk1oyjTW~0N(Q%ph%2Zpn&0XGt3%rqdv0>2WB@oD9vqO_ggI{%o@ z)cR6$)Og}zxl?D}T^5-qXBE1n>hlebdwF3Cze~TGbRbA_@A*q=Zzpy?TX}6&R|xlf zr9ksr`@5!`4(pndt}ecEf`^!<&a<@alQ4o+%brT%7bkMVZ#RF0F5CvCJWgZn0KJ0g(r!Z z+l&fLSB9CCaywR4CuOXf5cx(^GBQ+~3$`^LfUUHRk3k z(<+%C*<=R!nE!g_#B#;i=uyzM_>6qtqg!IM1zrV;|C|{bJ=+u3Q(3A3sknT5^xSwMzZ9 zGuQ0Oz1QmumVCQ+O~Uz$ikZKYw)FjLr=Db*9!NjS8KnJ;d;VMVTnTPR^Xkl{@?N6H znWt*bYz>^~)~Og-yPtF2-+RSp^L9L|$-Dlt?CyVwWiwwny{%X}YpK>6j~`DRRd&w! zJ=Z5ePiC`UQl7ow?^Vfpsdoa*wXB(iG6g@)54%eJ zHj1&`FWJ{1UB zH~4Y`BvLQTo@%xuisSXPpCQL;i*1&=TO9kGwsq~#y4dT=Czowa_qyA!t9M#Q&@xlQ zog??}R>dXL4&N`?ZDxFM-<}}euUo9|&Imc}_bxajO?9zvxvYx#{*Jx#yB0ZqKUA=# z%VgQy-77!ewT*PlGQ8rmi+RrBAXznoJ6lWK7Fx*{UkzPr@adkvU+RYc=Xlgq8xABr zPcN9p+C4L{%vW}BZnP0wW$8NsKQ@d{E^{=y@rLU1<)C#{8Zg68lyu7L3 z@0x$h_I5LAzBRo!XIq{2nm1LC@6G(#u(hfB-?4jhjGZ?=-Rt|{?e&<$7M71!tob(k z`!zZH%Jum_H(q-5_+#Wtsl25^!S?4*EL0DWa*y1d&ByV)+wb5D={l8qq2sS*+ULAb zyLEEk%C%ail5vgBrrJHKdb3kEZ<;YTBBx=v^%TxHptNcmu;9G^zjHT5&ugeNfzPh^VSkBGKvz;a_w78^vU+3M@?|WvQ z(mN90Ut%b2>Y)|8YiD!r@3vT%uS|083%|ady75)=0WA(+Ip)6mHEe6n1;0u@F#F5O zsbNWtr**a!_XTXI&1&4-9xLl@uBG(PTvB=})D!0$;BCHi(izlTkB$kFO?MvnMDEVtL zS-aQF50K{j+j=WH^6&M{=hvqO?=LM9xD+r^ZdK*9Cl;M2@BRK5xc7)=|L;8RaIpx< zj~C8$FL~K`+7C=Hgm^W&6)>eLt(P$gF(2>w+`sOFlNt z`|c)Ro*xu%pw*%rn4|ml?3FjqQc6|snarNGGB>bcR*iUL)9l7>i#_Z5TN=LWPCWbN z{Y~lQ?9TTxucc+aTGI!>==HysK}UysYz+ ziI2azpHAmwD%T*~ewAOz48Z$NQ&Q0rT2G&WF?pT~n&oVfA6Fx`IgIlDcZr>67O-r3E2uJ6r)siw&(I)#smNRTdve>W$IC3)lSFQ&$%OGWhg#}3C`_a2!WX%-YMGV1;5bmwifTKBU5`(#cV-F<#yTF>K) zrxsY>%~d?(d2d%3+sWn0MzdEc#b54w@3njRoSJ3QM%$WgZ5Tw&Ywq5k=f<#kO--~w z$#SXmZt2c~*W4kS8G;_ob#&$4onxB$c7>IsI=jji=_OXmhc>)+SUN}H($y9F`Ob(& zzuYOrym0DciG`nQC_*iu;bPh`Qaz@%;AQ+mb3B_6D8ua{8{>o&YUY5UX_3wu_u zm~A=Da*((2wY=&Xp-Dkz^Jjeuo*>1!BFF4f$Sy_CkjsjD<*fLR39VZ`^((i~*~Os? zRSxe^bvVQ%S;Xb5*ChMl;Te0)-w*%y#Lr-AXYuR#`bWv*grNDXy~l$a>w2DRZjH(O z8U4a&B9F9Sy8Vxf)vJqg7DpcnT&`|(T&sJ|Wxh96-<`UpqGny!?c=|$wk!K#PD#{m zon5QfWkmNl9gQpeeNSuY(%){b$4*Fo{-^fq{Jk8BLSO#{u7}rLDqlOb)A+jA+&BvX z@w+!Bh*dY_t8d^~_Vd7@^1WP-+5TnrO;?&_bht)iQSkGvOxyexs7X9|T5fRhdX!}G zlj=)e$`(y-QuV=qg-TA&ey_RN)jz~8H1quluVV(c_Z`Tae97qWi>VybYdmx=-q>ZE z7jri)=aPr!;p5IazAsWf>y)&#l{}hr{`i-hS4=nPZ!z-Sty3dk`n1-r65W0@OJWk2!}l!Kh1a*geDZlO>&C|SYvV57)QIUl zWAO5(%KL@d+>Yj@vqLl9PI!^)uJ|Qr?VO`tg}>)7;jq2*a?axK8EN%7C6Sij%2)nj zy;5Y)viQ^+Ex)y{sb=9}^IoiVN%=GH*Nn8t@>!dvRrr^tzTL;ZPR&W?-@G9ErLGHS zwHywKzW3zazi`>#3uiu@zqU}bYR2U!5&T)77BF3MTA;74T5(a?`S_|2I^T9W3DkdH z*p;{cU60m5bHn5p6AQDJG3G9|^_x{t5;b{h2*ceS-|GrecR6IIZxxKayHf4$&S=)C zEUuX|`gYoso%%F!(!{?^6M}g+>ggQKP&@VUW39&Vq?68;#a>;W;SzGECf=;mX#X=s zQ+>v>`%{c-UI{;~xpVnju;#ur^@aQYeKwa^_U~c+|LA{z`e$yuA}^LT*Wp4{M{V{@ zffB8s6C#onWknZV*v7b1@_S#;%H&Ez_Dcq9H#N7MNq36O4Y-tXD`LkNGpUYmwe|n> zwmf-1bL+||^W;ZXXKvcF>^`BK7+3H&D);iL(=*u(*7O-1XE^z(ow<8)d-24$1WB{m zt?^>Hyb{ybeX`KvyuVT5agEpW-2y!tB`Zqy=fv#~l{&cM-HM(%q1}r&3G$TYuQvT3 zcKf(b^|~Lw8Z%zz9p{_Fb!_JJsba^NTS}7dPjmPZ|Bc7Uh{JowqC>nbrU}+{$CwXf zE#D;5qENjef^Dz(;?s}TZAk9f;W3Br3dgYzpy4igGu>_arS0*srRai{K?n;pVTW~bGlH5?fKrWs3y59*|M_dUgli7S$~Vc@z$rg zEB-zDxK-7Q#qQ3D&q)_0za3O6*?(`++lY`i?A>{oxA8S!vrn1+qtLwCeR{9bJ zJt^Dj*r*dP?#Q2R`@y%pt|QK0Ps(TW3LQyJm1+U|O1avWHT}wZw@$kD>h954kzn~& zZQ`v0&Sz)!A1v~V>vK*{J(U_@xOe8gE4#z5U8=qycZ}2in5&R`=ft z$3?#S8B)L^GwXHugKu}=o0psXyYaVl#?JWikY8Sh?=P#JJ8Oo4kIwbCZh~9Vxf!h0 z61k;gna+CbTc*ZsxAv#$QA?irwqk$y_NAvjnezC#WvdCB{l_qyC*7wKz0Gegi{~}B z58HKyd+Na%pPHn!R(sxjek%Rj%;~>o`_4BkpYngT$LpWk^BF=;-T5geeCDj>Vk6rR zcHd=1=X;zvlKFGqsk{Y7)$dBS>pizI)!Jt2x%A0B@A|)HR?og=O*Fn4x>g|lbI6K6 zYa+g|Zw|N{wQU3c@~yVZ9V-0i#jkwJ+$3;b^Nn@w-<_7zo^5+So5@-0;EFR<(KogW ziOs#Pc>Z9cg}K&G;S(Ky&lb8Y7rSoT6q^v1&9(E2<58i82P(=2Mp=!b>8~$tt~L|m zkmI}bIGe@s^ZNZ$S50X-^)84fr9Td(TMW!Jne zpRidkzWLJapA88b57}ATcYo$>lGCIhuaQU6a0@FU1_O z;oi$|g~Dsf*X+LEIljNE*Qf7v=KV+8l=6?~Tt7eM=bdkbzKcGG|GXq~xmiZJgEL+> zH^%s!^!s;yRa2TLE_<~v=BWPr9o#v`J|4>Ql+wGYuYPDl^c%&DDf{e~FkO4@Yv2D@n%5kz40<=2meXJ+p4j4FR@y zv!*_~$<@tqCxtEY`i;HkpG?^M{-B0T_bI-#&i>;?4yKn>@)lWa-Xr3%R+RPD;Z3Jq z0+QFg;LG1`eBYygyz%cTk1ncGu#Cah2*vLuBesX=p9xzM*;ixVDwH zy3B6w+y9eaiClTJ!eHy+J+AN5jca@+wX6`_ej!r$f7i;xSM%I*W@+Xu{vxs9q0aSB zT{24p-z_THt2WW#=}R}Kr&qW+MO!;se#gw5GBxt;sU_wNZaO;(^e0Z(_TBZ+_DLQc zYGIL=j>!G{{_df&NLp9T&edWsb#tdUB__FKt}{Lmq{Z{8)o+WD-KvKDhn^=du6X$I z`yQzSog(^EE_C{|?U;Y{QOoR`u97l((_0@4x?4SDWSJV9erI)5sHAoN;>mY@Ys&na z`B-eSyN1L(x1K`r#fRPIY@S)wbPEDA%6WT>EQM z_PtA-W;52QPLwa?@s-@XR&=UYQI*czsh9HFtL9eOXu#w@F>o4#Ue|2)n3*&y>(%rlt@0z9^EMBxH;_;%3 zdr}i`emiw>rNx2k@{u>*hKoi0KIQc6P`KC>Zu?CFng*#4Wq*c?Y2Ey)%pK_&*)Z$- z{TPc!LBR#C@+WWCep#Wj`*^F!TYkytHx!*3ZU`^#=_6Iq> zuKUE!^Ek?BrKbga=?|XTAJ>z*;bg}D00j+`e@p)?SrM4MB1*Zbv7n)s8nuDvRxU$$RD1*iYfQWmPMP6&ROvK&s96l2UpJT zZZg*oo%Unf<)CYS(;n4do$b57OQg~1^d6_@-zJB7=h}*H{IBuu)O9oWdab*E+>>|B z+Z6OQ$;177@q$Oc)^mu2%H{^2FF1U4w_MV6W=F>(OHQ}DDa`ETt=MEVS3p(fU%`}F z7diJEDW2aoc~5BCZ|CJtX8lbJ{9{^@KYf|n)Q0b2S&!mFy=33E@NZpvs?)1mc-i;J zLmt7c2ff_3e6Py4ZvSq;vA6Y|_TKttpM_1F33BmDuT>`O{Il?qyHj*&{tda(CFc)c ztZ?O76frIH-T|}Uxf){Od;Qlmy}rv5VBgl*&)0f3aPuY2t{ZPlaub$*k}KXm>F2=- zma(gu?y}pi(q6vxPuRli$@|rQ%=Yn8I=}YwlSx0%bWgo8?f1>@o*%0x39R^P^n1&b z<9ZzHocn~FI_FvWAAULQhukE+3n?e09XY0YmnrvcKIOjZn){juFZcGJc`kT)?v3-p zChm79X};DfbX_gb9-zQ-{Hjt@;d)04wI3-@1RmM&?B0`p{ciovzljkgQP)-4y7sLL zdwOSL+o1|2pQO!uT@worTI>}1As*NIvUg+k*;QxbH&^}9-Mgy8S#N#UgksCfH~dqt z%YV&UDK7-nThdxWzDtcUd@gVnz})MyW_U{wp!iEk(pv^CmE`&-Fs@^ z8PWN+8#W!<$G3d)rT3A&-&_?ZG@mXns4v|1?!n>k8wFE58t)WVSl&71_W9I>s;a^Z z$*x=SWPPqiBtCof(0AK*t*FhSFQR{koY?pL-_(b8idlC=e_XjxwM5?RL651{zxoI1 zx4&nxRWA@dulo4l(sfnGtPLyW&u#TCi+-nI#IGF1<>IW|8@!k+z|`CAu&UXuhdw2_ zKQG+SjY;P_`Ekult2wK*Z)`aDHQ7+GZrG-E~lP=FYxj>$Bb~?%SPxR=LTC@h1Ov}3K8HEpgn|v^Ih&59ar@(|%vAVwz#CmFeiY)MH^K!{vUa zyk@iT@2h|Q2>s~NxYvEksU58sxAsH}P2f@6u=>@de${gEZ(X1B54-N#6=jeYn)7@U z`;oPwsm9*N?xcLZ6PL61;j4GArtW-K@U*k|)PXbnebRYe7P9Rzp@wTW$j8Nsr7S-- ztBf2MCF8424x@G;-)f;oH5ALehl9-9P;D3L@&F|IO_|%ywo!Z%Md3~|3ZhN+OWA~S-;)e{gDyOqdX?GM3UuT<`by+ZA z;>%z0u37cHzwXUn&|+-nIC+^$=CtiboHtUReNvBoCB8^*(=sg%XTyh67KpE2!JWJ6 zQhL{O9jEnL{S9og*8k>7I$l~ z^4||v=I^}Ev)TK6%gwD%ID-t1yE64NmxLq~f9E{Eq_aTKnlF9#^2*(*=M5%S-I`y2 zQ*Uz4>0FtPJk{`k_S((r@9W=WFnH>pR{pL0)rE`Yv0KGr>o(Q-C%GO!{QL82#k|g$ zi{p58sB9~ zt2;;k=O*dvx7P2p3XiXC=8^px;v~nH&d$5w-k;AJ9KMJBoWzX3eCer4wqWtQKa1b! z^x1TwnI_)xDM`ELc`0q~J(9&#^u}db!1wu6kG$H*{@-XzkW-z+u2=VYrb-?u{lYf2 zVa8#(pGswO?iHli3Peq}&6l>;S}y;Rwbb58LHEL9-+T@icICLFoY{g^z8g0&@5$M= zy}7qnDv~=aDzB$F$DME?vf~IC+!leWs3|=BoU9^E7uJ|9MJ>@AQG{ zbPb&sA8+gmVw&?(_M>KQ{jyVx@66xCDt~Zgp4YeL`R5CZj@vA(l9-$>F*)1j<@@%| z4{De9Nb6o*v8$lhS}Wq?jkB{REIAR#+LN5cYHOl?`BHE5>e$w|`c2QmSTBC5pQ8G2 z&eXKsev$lF=1uDSY;39M`rLvZ<$Lv952q9q$)nbzXXr-6PY;gX_+9om%CV=2YwQ zrbeY~)7{_NXJqc)Q+>X=)?P+=PTWEM2GNhg_ka4QcrSYtpR;SKvt`y~u9@yvTTEj( z&r5~P&^sdhu=B!;r&Aq70;f-}Vhhx7pO|)_lEXo=ddDM`73;qmhhC3S>^b3-x<&MJ zMMinR&3T+l)!#4sS(54hDl9eno#BhA%3fjbwS6e$_`zLvuVe^-F(z1 zTKc0JT$ZrpnD>c^hx>0vupbgryUIkslcrxzzb zUi?DiCr_?~_H|oTr>$Zh*Xsp;MQr1DdVMn9mg8&6fAx@^uhRSMr<(8OJM>Xzb6Wu2hg6mIcZ+7_ft0!>h9&okxl zh566(ZC+oo{kA(Z=V~o$|IOJF`fua5EmP_FZdA2=v(~3Ic{<>Vypu3UMc)Fg9Kk@j|X`A6FVs=j{z z#{5I~e%GO$d~2_yiN5=>lk16O$%z+xO)pg6{_a)V#=*WyFJX!=3y1Na!+o*dAmdM zmtAZN&S~)6)JmvHKYEQj;N#6CEB&{8e9Lc4yP&9b`@t6G2ayMJ=70Wsb(!-0kI&Z4 zX}Wy#^=`)pRdcoo7xCNlOq!M)RCe&XC$;Jv6gwf(e`EpQrr+CyZ)61WEDh#f_Wshp8&76@`eAjCC8TX8 zXT#LjUH6^p0^fhUH_3Rdj`dyz?HLTGzU-F#5>>{;yG_2Sde<%Pt-AUBKle^vxct_; zeYF=^Wn~()O&%6<(9|Ia`s-$|Ce(k!=Y@(jJGd3cC5VCo7Q(f@aZmd zhtHg=8FC0G`FMpOGtR^qz-&6CKMOEpo#IctlhM#Z0cxxQH@tp|Uax29Ii8n7k6dF!E zTK-v5_22zjuhqZFRfhfB^=n>Xs4a8g_3nPLFT8izK4J0U?tHz%eI?CoQ|s(J zj?A4C5_)g@tfb|8nr^PzH|IjL-n;oGYCh?Qig!7{xQvY51YdxbFEg*T(~V)_}99xt-7=7 zq8@FJbFRKBpSQ2Q{Zxe6$K2G`#XkaPL_RrEk#^e3s@uMa?UWqvRK32(%XZjCGOBqw zO#J;~+S#eU7aHX(Ymti%6KY&F+lPPQ!FSXC3gyJd7|hapyuDw(`|!8xUtF_g9%?hm z_xHz5(Ux#wv1yu}b332n&Ej}6DuzbyRe-@bw+m`7c*q7b3_v53)x6j@(=Gc~P=22n`Hk*4c z`+I`z+J$!_L#CNr3^rr_wl}`~bnr&bg7PhA#5O!Hsng+2h~ILpm~X~H>GaUU0y<{} zcJF^{`{Hx!|9>p8K3CboKQlS&Nf(_t$W6FxZKNuZLE$!D{T$~i?m8y{OIwPpR@-lzUN$JaHIsTMC z<)72d$^Pei;#s?6C6d3)CAHf<4^$Yk#{G2v-KZPsbvI;R?6Ut6Y1Zw3y1rd)TWa>V z%llp4t;Zb4#NNK%A_aEr;h-;%~QGSx9|ocvo;zc#C@etefxRwzP_uZ@epP zDJ6XP=cc{osh9XqS(_dYm>0Cluz=gp|4znjGX|5M=&9NpC773Q{kdAQJl|mHou#KX zUSBXP^cRQ3%2ijF*7{B@_-n#2i`gu7Df0xS%W>;>2ycmQ+BmatrqnX!*`kumbp!U> z9B}ziS5W0OgZHl6pS|f)4cc1Er%(Bu^ZBvr&ZaF7J*V_EY_AK}NSL&P{|%#>(exjA zk^8osl9~G`|IpjLvx4SK*sOi_Uxw7OSJJyyn1)Zi;JG4qZ|pZAY0lntH{`VwOBUFb z)W7GjVmvpW%m2oClX|g`H|yhFMN(9Mv5Reu$UbiT>}tCGg$oBIm-y!^@7TU2%yT!J z?zW%%cG;~nnaiT{c;7?eBk%fEUoKO9pPbJayKiP~od3~tiFP&a@hf_#XMf}0ZRynb zP-*95!R^zQ9f)I>|0uz(`%g+Bra`%V=i&F8j5?)w^32-;U;YVrutYO>!=+_!-ERJr zo8{7XqIO!)mg+-tD^L79{_=D6-?{2{T`ktW&^-6z$a)FO=_|G!-nwMB#QExTkAbtan#R|K}DPRPIP$ zEZ+Giz~zU+#S_P6l@@$as#CeOaMh&)KWajnJ>~Yjx<4mJy?V7Cm-1hOmSQF8-^WTH ztYWpE6gz8;BEy~ScRb(RI9@5var2#(v7@R|i{8?H{#_4PKZV(sNWN7%?kX<#MLafb z*54xLC&&7J&*j$AeOIox;>fT6FD^a*#~u4DL%!r--CXls7j9LVUCLBG)OGJQv$53i zoMmx0?-;!K*3)f%BdPMTPf6p0uoD+n)wHJ^l>B|w_mGdO#Qk+{R}2_q%~d0(q?N4H z6-q0M|5TJOVVM-Z*xOEF#ltIFC7E?HOKc0{3sUA)B(Qz|wc*UkOp()5bp2+gs+|6k z>^D<=QfirXz8~Xh4%r8{yQCKRWGiY!zFp)KsWd@#m%>SrWm1*S#=IL}uJ|(LUQ(6V zXHMUJtpHZi#i=72mqYa@or4N6nJ&ITMRBY?q(l z{i;4kZOwv$D!;(522K`NKX*;-+AO?(i?`98+Pa`ka~pQtj4a$6<>vQup>|P`ZA8U2 zS?8cxdBrX>@BZJB^yZ7O#l)cPvpe#RH!ZmN=-=lOQ?2E5roP+d^kTznpZ;fy|1D8T zpT48uOBwr<#)VHduJZJmALZ$#crssi%|4^b0?oBDn-xEC`761GO}_fTfN$*=>FSHS z#OGz)N#47^DM0g|ue7=U`49bBO@~wGKEGFRv-s8TpK`x;t~YRVy0WzX*v9v=PKoO` zJX;ohI}5+J!bOS__|t9dy0P z!S4Tk2~&xD&Gt3gOV;hF{gJuhaBI;Wo{s1%1_4tm!<`}yPP|ngmvF3n@1(m|9Yml0 zdtnr=BsPC<`Nk8SpW_-s&wc(En5_6SX4yO+e$}|#dQ~~=3+f-fEIzvPnHBB*!6(~x`7}TN@T|kQc5!$j*XGrhwbtCv0)uXfE&5z@-g?!dmFz|{ z_8dKObK};6BhL(tu6>;0tk3z?$)V?|)H&-F{DB9jK1|&4WLrDeoBj4X4xjqSGS{F` zP(62o#gVPkQzy;2CgU{Wq`{R6*?Y^8up-aKyj91*JP6|4kGy92vT4V+5C9A$o1yfW%Uaq+NV3P$$*R5QY z-BMl44l`$(f8WwqlUO!)=hDTGJYD{2x_-<%S9#=qMCg+#{5;!}92Z@2yR#_t+{9~M zJ3CKAKJq$q`+C)@k85sUzwuzj@rQ0rS7MY5B=UD#TDc}voc|chc`;?(o7A(j#OJ*} zkn#O{+_zKTKQ}ag+Pf-F_RzcY%9r2O1$=X{Ut)J()Ho&PZ!h5Rmu<&Z3%~E^!{Kh4pzwK;V@#M_Aocv%#8QXsw zQ^Y^=_TPT!;~suD^v6-fb7IU2(k*>`k!Q2Eo!P-~^D&p#i^n-^eW~|2m5kha>Nl-9 zX!xP4gK;@SuA%3b^cNMj&+~5nl$}0n{^I*VpUX<7OIcL;sr^%0d+FkN(=ReUf4rTa z|0y*3zE7Kr-zUxge_rLxohp6(TWPD+uR!U_ud8kZk*$kg)= z_+vG1(}%qa?%s7a4*e7^{$2im+p#E}v!^BVbbjiEh)@&AHEIBOJY|uP#*a zN>g((&;P0M=O@?A-6+SG(UGv!dUJBE$%QTXR}Oq|k$rYW`^tK!(3qO+KXX*RX31UF zZJ$|J=2ibO@xzqEcHMfL+Drp-SHDo|c2T_g)#QWb>(<3P4(c?Wof1F4PPV4yW7Uts zBb{%3KW+GMu*lQHLfyUYir!qE;Acnnrq$f3$mFZDon}`5%=+ifOI5XBZyf*eaP@7G zo~dT%kGs0>`gPt|FnJBH|F>e+-D%D_AIpp~GT&F+myNPo{j}@P&p^KWN)gu7ChvR_m*KjQuzv3+t)b*pdKCwcLjf7itdzuabz z`{i->$}{2n>jEtnC7iCFYjNk4i1p&-x_qURsvrE(PI`Udbx+Buu$-QU8xQGLm7C3q zlvMk>l) z+a1a2)15>TWg3fbG0Wdl;d{>?_2@a5?X(No>z20gj(D&k_^sY#b=z-dMj=2m9B|H(I|oTPe#ZJ>!stQ0)(Efq!N?$D&?N z=5S7Qy!T>7@ZLznN}>O^`z2rBo)^*gP_Rv>diU1OS@%l!_zG5~a@qZLPnrI7S(dZr zxk$Tt95X{LAG|dZxjOO2#>mqqo=av=`nK(Axm~r#iKFXeU5a1s_;JYMmt0)o>yE}+ z>(hbvf>o?m^n3RiznR3@zo+@(#wnBc-TWXK?&r1OcZFh?tS)QiuYV<7TAQE!Pj!`g ze(U%2DMdF8pUy76^2Jx{Mb@GIr%!smoDI09X=(eI!KYA>t1Hp`XV9A$@3{8aTvodI z+Dh~Mq}D?g?VR$Ll_Kx0iDuIjGq?TGB(VD08sjg0&Y6y?s_UDR7joOQHffigjMlhf zo%vYcTuk}Vwi@oE`K+6-`mf`NiPSh3dowIZ=$doZcDp}kc=dzR_POYX1)c4?J+)oL z@9y`jo`*#I_E%hAYWB^Inby>i4LEP-X#cZpRNIzbNYUp|CP(hA$(#M76w!Tzd<+1vcT0438ar=C~!LKl!lt zf9HQInl=h7$>fvRx^DircH#AAzQKICC6||HEI+yC22&pEzx>np6XT;7wdJf%eO@k* z^z_j)wNB@MZ)5IEQBnNA%J*6P+UwpsdB??g%SDzP5ZThf8pQw7U-5tZ zrqfSO70GrkTsMXDk&o2XfBDkREk~x;hnCK`G}%Q-kD+V+&W-<2UYs0Tk z=DC|nXD&Xh(y*!8(0$|a;6rlG=7I9Fv~nJpxgWOITKtbQCoFrxgR{P8L;pDy-!|_S zRydavqI~Jlv6b)MwHl{+gjm!ho$xr5?j?A7^DiOct_zj*C*D{rKf!i>l0wuLoo%ZX zT|@TExMdX?r5=>Dn$fv(s+5M?`+zJLw{vfHwsA(DQN5oB5TVccVf1MNi7JjMXM-5{yF zc2ya>)BgK;UTq>-TSG6-ifo@C@cfL;i|lDZE6?xI=shI;if`eD$p*%0Osh{_>fx-j zf0Uo&er&=EBXNc!vBDPhM#`&$ejbcx`gklp>;K{TjU0bwp3h(R=fieWC;KnSHd)IVimCF#!tEzD{@>d5PrdJ< z=UNti_4&M#_WM$*q!v8VoqD3zR$m%3hMZga?sIQ$kCTENzDCjxf%Q-`^ev0CMYS`@*Ur2kTd;B%Fm~_zwpP`%zpOv==KG#k8XeJQuQ&HmDzq@ zV$%0t4{!IqVSD;h<3r@u^SeJXg}$0I!L9W062*eU3cX*Sy~&()b>fFphpd&)CHAmv ze(w9e##+ZmJ!8#@3Ad*lsSVlPKYveo$mJQ|r&Wq8Dctp%!Y#H~dDqkpr&fA7+1ux; z+bO+2JMp4NuwOg>A_tb_e~kBn|1+HD_|wqdsa4;Y&T{X-g6TXZv|Ib9@7 zirteQ-f}stcJ)bk_T>xJMic#mX7#L|o*Y<~y!~~9z~`J-cReu**peXG z7Ibv$)cSb-hx=2%HApTz=$-DeYmwby_9=19Y5TbO%i9h)|Bh*j+#W5o>9WD>MhBHS zQLLMDd-JR^3%kF%=X4dH`aUaJUKg~QC$FfAFah-aS z_opWl#r7yYUZ{0VdZEjzg@>fqZ`Nsg*>ZBuU6zHS7e$Lt^)PLZn&Z~#!tEb_A-37u9I}h>4{fl7TqEi1{VX@yaGYZabNUS5@W<~jLJ2RFjeJiFW_>A~^I(nXG9P6Zc8{Qp-(9mWgywUx z&Ohw6ppNN5SKW*q@1O5mR-{zydR3Td#z!m1rCtl(Rm}ChU01y3#jz#4d|!T~UXPLc zSz*LtRlP+ZI!}Rr$2*(0bh*L@mHa;>?Z0Mm@4n(Byv0)foLoToO+$Gf&nFJuwioHyKU{?5A(9U*>#)QZqKT-8#L1{T`)Ci-jU5=D)U%MBEsqH^r)5E{H1Ln zw@z=C^-N#M*k*exmF9+Ge2J& zqOiHWxV|mC%!6I$)xya;m6RT+eV=P8%Xuqf;kwN>Pjp2%_D)@-`Cj{Y+}6sRa=V>d=!&**W7>@8iMoj&%%eHZCGYl6VLeo7qsx2! zU;kvilWkA?q)XY$*0x#K-)KC1Q@Oca$-ck(>Tg4fcdx$uFwPYMKbFQ9i+g)S6fr4=xK`S{y?;BprFAE>$mSg%W<9(!`>bu<-G|DoUrUnmB`#@B zk-Xlp_l|uS`_yo!&E>_3^QCq#4f=GdX-PzvK**k(jpsA@SZuRSb&Ag0Yk1(_6Ndt? zZ{4=J{~gW4?p|KfbT_1-V82YSghkxJ?;_8SiN!>G{qvA%Ye})o{=Um}to zx0vVb&hOUGPdsw@Jbk)J?eE%_-l81En23?NA9TL=at(Ec6ci9V!xkU$8Tr;wERP==Jf~us=u;7 zEbsXv_b28jn|=N-w)=l}u-`AZaNY8As%n+`{O`=~gU;nes{h#TuP)CmV0mh9qr{)D zc?qxc81*vl9Pm|1{!pG1&S@bd%MrfoPIF(J2$SZ~Uw1Yv|5U>(bn8=>GdsWSA$Qep zv-xUw-+drCd&8lH>}6L}b`>SQ|9dY)N~z{o{YrgbM@_?@xqs)@OylLMXxq8nf>TS? z*s0Ryr}aB633>L0hkljkr^;_D3>zXJ7253wq0> zG&XZ{1q)7|$u;k|Q$m!hh}FLJUp3Z0o*VY;>#@eNx}9xb4Hi#4bhKG#O?&T@w7RrM zYvs*9?>SeL`M= zeebljfaRX^*1-iodUPE3u+7~%?TV|7^QpLR>VF+hcyIKvkBSd(>-n6YS^(@vVx$M|S z?WxcIJlwGCkD{S&q{)q!I$Xa@o)}%uKI6G3`S`QeMh-ns2H80t*M4kUaontuH*Vdx z?l(`ae&P!AV!LzCHf!eX)S~{fqNNGn6_fL9Z$>EB%>DCm;f~k`9N*rDyX-h0b^ZOJ zCtv1B2C=>5NM5)2cy;jlr3-8i_l5SSr|vB~@^X4b@eZ@d;>_BIrI}|}o`{f(D!(aE z{?4)SgH-8WYyCf~GoN2gR*yKd{$9a)Ew*XVyf1m_1zgtkUjkS*e!5k@=Apt-E!}D+HjCK_g`dseZCs{r zvDwc6co2=zC2)7rl6_TBeO z^6&X|OO`$<=}=g^H8b4)&L*|4sg0M`H41(`ereC%BuBCAsI8S#)^uIf?0Y|TYnY>aPhQ^Bl;>B>!u_pF`wkxviZ*id z*%)iBI(^C1cW*C#Gq`ro_`Id*#Y;Md2mKs2U7OXpLvZ4aciWaMvtwe5Gzxy%d$4Nx zemcb`x4itKgx z(edY+NbhZ{Wpvxu$Pbk3y7Z_ek^@_9O(X8S~s9;xp!ruu&Gv^mg!ku9PAwy?xCmAk2)otq|qRd?+P-}+4P znoaD(RdNB2YacE0vR)t6bMtJyL$B@{=Kb#`ZZ(e7i#T6-d!ephz3sNV(@l@U)50$| z$?uO2{q%LSd9+MoRk&m4hDwt=6CxkndN#@9e(KF5{Bx#6PAqL&a`3s5z=N%&YvccJ ztn?MMSiJ7W4aMLKHm!2f!L|MB65MQTcaL7(`_`eFZ-497%Ho?pbeoD6w8;Mb)im{! zs@0*n)@PzlrDtrF=x^x$D0T7P%&0%c&TM&e>)y?8e7?ac$#V10^Z@RiGFv7*eH^*Z zOZmEu>Z6n^%O+p@WW4p0rO%3gl7F`TS@Mgg&?zG#{n(tsOE*Gh%=7A>e8_yM+xqt> z!;1QZpC#XBS~1_iUa^*WhOQr5TKcKHpE5~DH5kRh^KxG<=@6}2dvdbk-LHvLo~j#i zU*3DBCeO}sKko|p;CKI?S!CV|D}L9Ze)+TPLjN@llai1AQh0I9Y{MA`;j?{Xtd0yjjW{aNC^ds8COrF3UUiZ{kfPiCRQBt08TxN6=Gf!uH{sOmS8gj6*09U% zZrcA(kl|1vU-`%WKR3J@xwctJnOCzH_U+tt_n496*|*!77rIsj6tia}%vsR6QdLF8 zKqjzwj>}oIj|D$!)^i0+2xgTyade|3`)uZV4%T2noBA&^jgo@r?D{0+lcA`;<%OzN zMcMPeZ4NzwJ+ki;7;F;j=B%3S>S@>#i|cK730jfiC& zl}W5>Qdi27Ja-E|T5$M`?V)tn=B>eN_|s3G$d{bFHOk_~&ILhA$$=T1@jpds-n*E6 z^=Uc7^6>S;ZQUw=0$MM9SlYGdU%S@32K~@GjPa{>Fz*WqT%Z{4<;G^Ia3}ZPx@SAs zryZYtIWs?b+5ML%CvzHd9}uZm_+{!FfAg6cujVZ^=;UoDy7$zz?r>(P>eB%WeZO_Nh%R~~zR5M8!={$qwH>k01?r>J`eluPVW zmvGy!-XgqUpY6N{CwuDpc^@q4S6fm2>eTPQD)W}zUHZY)VttF-lj$>h_n+qe_HNSw zFH5EqJ#Sd5OD8d&>fXtmkZ;=lZk7EMdzn*G8V}x0Ik@bPvdALQ+bNaGw{BO?X31Uf zt!LU5=0&wGx?k8Fk~I!9y?t&Xd3Z+Ow{?F!|Aep47um2rIEOz*{>Sd}Js-;7S3G=w zuW)kSk;+B)HyyQ*uY1vdi}g!?@!rL!#Lw;g=zondQ~JG%#9Oat)z(e_)?~`|Om3;W zqpD`}BWwMf1LD_yPC7g(#iv;4yAnIOktDy|Wa8$ud*Hmv;=j&#aw%ucqR$#B_1_ zh{aBxvr=5XZ6hI>i}UD#~-m=h|$*%-dm z4%qtH#g2E*xtX%ARwoQD2_@9D&vq@?zv-Sv6LYKgfo*SQ{@eO$_AX0~BnGCM*noH@ zkMn0{isw&%$3HV*;r@q;k;04@l~or^`jtMbsYg5WDyN>PKyM9C2cN4H)25pOF8*6D zTs!-gX;EzD+yk4PF$Fn=#+uw8t>^#+c;lwlf z7OS*+j-$3+>8~U?xi5B{730WlTyjLm`9+;9kHFh$GpBv60Cvt;jyLLI@^;@&c16E^Fw zm%2CMM5glZq?LVhCLZ;VV|Z|7u4b6yoCBFJpVrQ5Ij!@0wVbo?zxi*qEGH?mC&~GK zu&bH$KcBJFN6hk)xAdKP@3bEAUG(pNP!f}HP~12Q8iMC(ODplPT~1t>pd%`Kj}7=HLGD zNnqPV%?&=yW|va-MeqAOVWqo*qu>-(YsM{W^mVG0&$OC<3UX05cXe4jTghstrjpb{ ztxLgD7oU`I|1dwUsu2`6hbJs6Waq~a7n7X@4BslkEMM)ryX57GxuPaU`fj(*3W{Eo zS-D+1{HN)LX*&;X5lP`#Eo6G>2xE4ndX@5E~v2P z&zxnnfy?+}@WBkx&i$=AuT57h5@Y%Nnm_nM!)B}CU7~t#rptv$hD})%chNfR-mzsd zn}St!bz3tvJy(5T^<2KKgz1owPQWq|W&gzTdEtAFR;{^z^`*S=MR&W`1@B_^6udj2 z@hscIq)W;t^0BUCqQ%Yl*Czx8H;1(>2;I;v(Z}0y@%0YQYZp~7t<0>Rz5mIlnq?0) zzj2-lI-BGc|9ySD+~b=4Ng13DVvB_)UX0qkqi7XdSD>C>PolR;mw@q+EZrLR_zwn; zfAod-8{0hWv7a4kT*ZHSqv(r%YlEqtSEpoksw_LR+zbEbW2@aWW zf38mPEdFaD8SvORyRV(GVA4~~$Fn)tUtVpvpepx^4FmI+=$7)R^Qm98*8SevZn)se zvk%YK>fH(Yc*$T!qk2`x`dT)T8_HQMH@*0_$b=o}^5c7By4P*PuZb*s-Fq|qlN}?r ztTegxi)GL1Yu3FHX;J&QxgYobviMfWQ0tMP_IF3?(dS3GeFW`3y7FYG@68ibmp9zT z^f0MyevA!6)K(jtf|&-ppm ze27&kSRp4QVURKVWOO4lv(Or$AnDI9r$y`e=|`9cEI3g1^5Mttccpo(qBTDS&(&EM zea!j3`HUq8xHzS^20C1hY!_G*m{2?K>}o6RqYuvB)o=*(dN%tI6YH|mGE<8?m=1Ru zhkjngQg%}2snYKzmJ4PvTMAV^pW$QR(wWJ_aNo78P^;nQkLeO?7;?-UF37jHHqK*b zdm~!0UX@K`C*R)I?|f_@))zL(ug$sk!NG3^Rq&Y#LW3UOFcA9|D8%{{Ws%MvwVQO?GcUL2Y9P4YvnyP$a~&(dUK&z&h+I0 z?AKI(-Q1?NL$@aX&w-ay{vK&!Ioy2ufc2c2)>?h;hqkSLEb(&Re+Ji8;l2z<7M&_& z(qsB1kP+})_+I?+9@h_+i~&-6oGctq9yXkI$};5k+jkEfCkrabtzGqMF^lc(--f0o zr_~MAUrv!N+5CY0%S72Pb7ggU( zG0<<%untc;e!DeoVP>*pjbR(ZZPSPgbA08FBsk_S49LEo;8=RQtTideteuVj#*)`B z?{d$V`^s0_u(ka`@&2UCt7dU{yYWrr)!J)d@wS@b>Uc={G^aC{P{viUfEkO0)=DO3w6bU9?l=7Ie_-n;;kIT5llG(t z#_nEs9i5PeS3R!@&lP{M=B6z7x3ERV-ut};FGzkZJbk`BS)OsO?ICGiM~zL>I1bNi zJvYzYqUX4O-T@^;&3#^BS58b9;g*yZsbmff-;XA&0C3ncJo{-H_Tp?w>Qn#X}PCu7k?%Rcn>s0wccP z?MsykXYGn#aOk7!oUBgWq6t7=;ouBpl9FvwBjJhH0p^r!6-A)Zfrj^?gZ_dXck@=*LkbW_?T zQTdEByE)Es)JAkU7%ttD)zHr(AZE*ubW~P7?fU`iAAb*;-l+Sv#j0NPaB$kmKQ5|e zQ}?fyFxyqWH~+6mIG=;{LX}PN)%UJGx#Z3pomBke36o~YDe*UFxkA)j!#z9CHn?xS z%Y58F5iH%x9qoB)wbJgR#XNE1Pp2+Yzwj$gAti+2(aTD4zDQ*O ziz~)wS`Hi4b-bO8YX(t3%sFZ1#kutxQb@G>Y8mb~D#G*{J<;WU(3X_>*VTo(VKct@;W!9{ajXXXaBaR7Nx;gPA%ljeEp&= za_+X5X{&q`z_(S=4O6)>N6$%j?i8IcP5j5?Q7G%yVAT;s@u>%;r%o%cHM+c zE9%m|ed{@q93hhGYG=Nr*4OO5y1)VH5=Y&FW5J;)OoQAqsea*?J#yHZnhgf2gS7-Cryf*s}))9 zXsz^+e@(Q?{0Rz^@{aCpIq#sNd-`eHKP|1i*k`IjocT|=6dX3?ra8V^ywig#+u+}M z4?&r`ERnUmfhsG{?q1#;(HMVTarU|Ql^X)DCNW&y9l+Fvt7Wdb8 znKFJn$5cqw{@zUu1X^s7Iu5+1Juh}PT`)YQ`t3ZcUtMVRi&PliMi)Ifsbeb<* z(rddk5)ZuUU{VOB**S;_f?;Sa$nuGvuWk`%&WK9y`QZY3pI0PaY<3# z`S?=l;(&`1O!=AlMe3heV!l3QJTkpy+ON6^tJE)iw6eb6*?N1eOzaxrdA2W(-;p%f zsB+g_ZR3OJrp=jMLi-Ivn76qpd?@xmc9{R*_S@Ea?SY@anHTJ1H8C^R+psC`XMMuj zk4>#%wu{AY7qLWSx1L)QAG7R*??Wz~cx~qSU&XdxeRM&;>$c>azNs947gf1_j=Qik zP-gYL)3N#;qM96EzRY4@om%%GLUiHu&)uT)+^U}?ur{y%e2j}D)Y53Yl8HW9kn zSIxt6mi#=%#UJP#A+vh_hNR4@4MDyPVai!eXQdLhmQAr(D%_siGP$(q+xOCTVe@Rh z#FHNqxh|s>|cty zM3Wo8TB={jy2lrNr6n}PVb*C4n-4s(4O1-wX6kA0+C0@NYOav-CXR+{vaM$)wKweI z&AS=?Sl=RSX?ADnU4?tcF8xu+Ii3D@+N?)iABALN^f(%;#2)VJT9)H=`=VE_#DbM= zn}p(-e)Ni%p1*cs>w=2uH$QYA;|<&Vp8r%5?2UG4S${0oe)mb|b*!yFcA3+GR2a;2vwTf}nA_Uz~HPz>F7 zcJiHy$APJGhq;ef7so7ivzsmR>&zRrQ+`5uGCG&r!mm!4J$FX&#u+<|wGutNk9BU& zcVyo9>HdN1Yx$*qh_C-qZ=cXzxjWC`y|UfGBbBP}Zd`nGVP%{C9@jgICR7${ayGVv zIVqUgg{@k-=pV_N`LQHw-tIHz>hFy1KRA9{|C^N451-Y~{C}-zG@i9}qGVxER$ti7?#TP= zDyn#*|8*u-_axo8b?}goN$oY|SL{8Vj%|_Kt>3t6AKBo~@_*9fx~Ll%W^%xp7e zRWLuKR?ZkDIBU`MN+D;#(DUuC^Zo@-zq#SWydyLIPf{%S+VtoPpWU_jZcmdk<%D9x z&$+1ub^N#M+R*)0WIrdX_X6H!x!=xjagC~2IyGd?3b$ovV^T_e75vV~zb_KG_qc6) z0JrykonyLozb{xW`qlZFMSIKH8>bc(d6wACJhSxV8UK~`%*WQR|7DzDvvLCi^S#o2 z%K1JCTNf{_J>HNjE59?+qIBzLBbjI3VjoY0uUMqW_vwFX(WJK*kGvF*x_9i=i9Xer z$@l-TEo>B3cMr3e{k!$sbWyhAc^mimS;f00RK5;!V>v2uGH%~RCH>9c5@L^aFuvbe zd!SUkd*T#}2g}N}?o4^iEI0Amj*{U1xmCV%I$nO@dVHioJY1OB?%>H~sYe^iPu^2b z|M#Zm__=td{mSw4ZoT(9{3Yw%mj$U(v3ri6xO+#Tsbc+-?2ZK*H;v{N79YK|q4u=> znd~{GrI8_=;%%|Ia}r`7tW#<%Yy2Hz>BxWM(4+mEJPxOsta;-$$#Z+o#&awG+?V-T z#&U3}c1Y*)VD(V>N6TDVEdq5n+wN7qzT)0Q?&E1uN^a-6zf8Q{#khUl#M!AELyslj z)@}SFGuLHN!joDLmW!@j2YsUBT6|l>wFO0H-dyXiy^&KnUiDkt`_Rlys}e&c`fKKe z`UR*k_5AsutI!l=yqJCUTjiz)xpz`upS(SJ3X5RNj)%9VGH?s#+%29jc#1bUt<>x)?8 zQ~!xmz2I?niLm&7gNHu^j>MZj?5K+AwW

D%=K%WlaXyPZ05%bTrrR+4ewGxjX( zR9^ifOosby{imrW4{jvB+pxry;j!i1&jqGUhrPa*&;K6qEqT{m&z4I6y-tgTzDGYX zxchL{0sR+Fo(XZ^qHalx-3p)cW_f&jr@58AZs~Em$!Fy~V}#jfFKOSt>d%DRiSwgP z+9KLc3f+uR`mGd^@8lI+@lgHug_9H3^fpAse>$+|_nQ5muc_TK{iR~?anrNC+n(jB z7e>$Ic|EW5_U7CCli2f(x4-V3$ba;ko#BU#EiZfv=K6fQYT|b%y*%i}oQk#jTjROo zXHK5;TK|$2rhMMTt8(>kWj@En$4<4CO!r>~ zWn9g7X7X#X7fN{9$nt2a!G}ka54D~#`D(1%7;C)M{I;B5m+G{W^XyBwx#}m$Zh8Fo z{pO!0rF$w<{&GH6clb76X1@u)V1%*#%Uwww3j|sey6YyL)n%|>^YEEP&X$zEd~sp7 zZI`ZW{We`-Q^nml2HrJ`|7iT0>|(C`{p$q>(`wl?k@f3s6!W}UOJAtC24wPFxEA;* zkmb(N+YWc`-Y#a~-SS~=fQIRVSG(&c3GImY=A02T|Jdj6nn@8Ce|0~*eD>dY=e&p+ z(+uCu?fP-=x_?i7$@C{|tZV1&uwxC-@XR~9`cP?`@IR;WR})|7l?%A0JSwf*6DR!8 zxnb?!4krB!ty-~G-IulL>zi1X<=-l*n9B0XPT!2_={Jk@1q&KqKHBtO=~`lq-Mwr} zj$eCAjh=8v*S^hGI8plg@$)Ac*6-UpJ}$gz@gVx&p9?8VbKiFcUi&2$tYU2V_BpQt zlURs2B`*)JkR8{RM)iFt3KvufAeX+n|qml5u>$Y!@Vh@ zp}lNlzn1V-&s|<#5%!@{$u{Fc?B5mbGehRP`2KVDypYHAaB0pA z_tl5jFOT5;oWZiD|4gFX*BALdYfhGIk>}rksNuEi(&VV~@rh@Y&1YI~O!7-SYG;2m zQ7yn(-02X%=}`rnl?z37f0$WX6#MDK^2WP!=QmaIvhr`d6mUmMZsmi*Yc=n=+b&hz zd3i5UL-pO3@M`6!+N%VPt$6(0CG<0=3CCf@N6q(prkwwjpn3J$zfv3Gt=eIr z^-LbGR^Jm>;N6?~FfTRY%H-vCp8~HNf32LSGk3$u9j}cn|0Zz!F4!Q#ea7|E6TLqD z{y7Ck{<|)({A}0vWQ&i!;Da->ZhsL)q_$-hbVlIFWZ5xR*C zdsc)#JRiotlb5|n*ZRs6)9>8YyMlj*#_SUAe(h6!%f7MV?n~=~Z+|GfTQ2qI=(p9} zN5Zy#w(~dUU%veA*2jD=&fW1p5@z`}cH6o7-;rPWnlq%Tu3lnlT$A;}_1{SaZ7HkW z&IT7QUMQb&OX)_z0<-EDr~f7%Zfo@no_C}CbCn`T(c1?qce8|Emz|&ETD^*A`d#Di z3%4KaxmEE|ICICdZ_Kt`y+6V{9M|!*Xa76>+3iKj_eYJbZobidlP~{~V~B2@vM2I- z)Eu8YOTVz!g_|noTW}_CTAKN8>Z_!Qkyf0OcB%iKRaD2dW6P)N9<`3i#&4frPb{(a zms-rKZo5i#-p&{K&(3Yyx$0k<=Fv%_1x00S2bPt~9q3W(6E2eBGq|xMxL#(?3?99F zNp<%HOmVqe_B6MgJn8edynlbk&4)*l_*{FsCtsf2ESu+7EL0!TI5{%N{J6Ztw%Jox z>)Od3G_0I0acuI3IgwYg3O6-B3DtPGCL`!oshT}Q-P=f}@#`YYmnE_^><^S$G7 ziU*H;HxiE)4ijYxD^BbeJZB%dbA!C+l!#x~=F7ffe|7ip_cM3iRv0B)&;G3JFH`sL z`JOXVSx$Fqyt*DfrPpv_?aw|#&NXUm%a0v;@O|e_t)=VOn2gVRzsx-O^px=o4&CO> zb6$&0^yw9J*;S+xB&DU5y|Dh_gQ}#3Id{EIUO)a`zJ96ss~;|Jl#TvRv-|(=tc9{j zdd$qM<;6EIx}GdtSmihM>kbV|J?W>-Tz?A#AL(6jG}D~BnO*fb>&AVzo-TT_!{)c0 z`a?Ynj+-@SFJ+yZHHW8ndQ|4W?7Mz<*k76k{duZ*eEDXkK0CKN?5v6Bv*px}vpbr; zzisfyu30L!#IV4|L+i@vqaD8k9?M+MnzQ5lA|L6C$4`EYe1C544t}F;G2)2{759|9 zv-h++_wi?)*|+Xq=kFAuv*9e3mUbaC*VS7V&Uey%^{McYUB|MxM=xcHYA&pJ{WkeX z?VGovi|%#&R!~ph^{lX{Mxd}Z&d%*ly2{IT#o8Vj`7K>Vza>6O|9#*3w0^a_{dL3d zD?`H5zXS@^{7SMEt(n3i-?8^f^q0V*8jsDvp?p_eJU<+Ky>gmG|HSp>pZ~Aa_{kZt zDc8UI#9O5PL!;9!Kyh)rol_J4J(J2fJFi9jhpJ+qFII7zSn~Wq z@vp7F9rjLpy>AMO{Ke9PM_cZFJYf7SYD0s>+5lD6dpjpSXx=pa)zif)zY?aejJ0!0 zx}scL9Md=PMYGt}(@&LEems~OehDP~VClqsc}2s+AC&eM9qQO3S+#ObPx{IT$uqh_ zYYPo-z3zK6&20ZuF7I@u>QmME>58#((<*j5{xDc56*t3Y=Pcb#6PlEI*K~P=JX5ro zVsvPQvT^RS#V&8(yQIxZY`r3B%&A$u@Q~QV%-t%NqIg^1{ct$;PAYw-^gioO-WBzjsrpVv#k0_$v}4OHQ@QYhi^{y0UukWX|X3_UE(;rFR!v9x%#2@0ap$=_%Q)*^HiF?(OuP7P$J>v$A~tNZoir zlakPhCyJR=@>SQKv~f;;U!fU5ZPnlhjGjrM3+$E<> zJX}?4y>_meW$x?kp_AaY>Hlipnd<4%s*Sm;wRaae-h8W?9l21alw0$+V)3n4OE{W- z)c5q{tv^3 z6y7q%N(oM#Y&vsGoPJaILSf0)tjO!mt2jjdTYf1&&wujky-+UQKF(9OYsr-M68^w_5=xoJPIE8)GGUiD50k(uE5#CrPZ|22WiMsw6jt8kT07x=E$ds? zCEo+;U-DZ%oiE(tv1xy?P$SQOadjziY*LMxvtp8bE+(pTknX2HGqBT^w(v(|iV z_Q>MbJiGebr240+Pu}g0JD+zcHDp$t`sN<5o2#_L{kB|q`}*N4uP0Y-tM-;}jaZz& zU~a`PrqX*1Z9KDyUCnwC?vwNzzPhsZSTWTfWop z!EN7l-P5zTz7z{y?7mdz{ZBUy`~0b!LNnchimq&M@tG`hDR^HA_bb1={R)p)JpL+l z*<)GCwlI%iy(R9KCHPM+mD4?(@N_|H$BYi+n{xx|>O3P(8(ciB@ol-?Z(g_FBsC#H zV;2vP9c79ef+`QFrgdECel6}YpHpEoi=p!)+mDU2W_0#@! z_d85-T>X0_U7jV@iM19#U^DHqmqG9hQZ!T-X%%9Ix<*zP?|W{gCfG z_m$oYe)x!1K2B#eDzEi?`_Uto>F37XEL}^g6FxuP$}qSR>98p~8UYd6a$uLn)XS0D8a z+10_at7Cn;_GE7bHB~Q#^#ytrd-Qfa_;~4M)A7}-x#iX!(B_g`e{x;^o(b_S*?YNV z-m~AId^tSi{F&XCcW`~md!lthdfH04_nG1+eg@gz-g@Hvkr4h(3wzoNF7sMx2)y1< z+ROeTbLOi+&Vq?+mZz?AUwXtfXm`r_O96cg{>mG12x*jmQF~K5?d0melRcg5B!4Ca z6|lP)J(`tsDtwM$l50*?%EY||-S!nOO>(J0Cz#hJ@NauAGP|hnt(tPcx7BA13zJjA zWhb1NQj}!IJK<7#%e0x6jF~fq?{+QA(5Tt0P&skao(>-2?G3W0wTf5yuxSas7go2` zUe;FBS?0d&B!{xdX&dHOXV#oJwCjg>bBUi)IKrnyXLdQknT^-tvekCH58k ztA!3u*ZHj`df=Ow_1Bl%<~T?HtuUEVy;aaX<(u0614a+-Ya9@3cDo<=S}Z@~G1tjA zC094B&Y3AwmKbF5rLwK)T*E(y^4IATEQ-!fQ~egI$A8M=U*^p{EAL3(PS&?=YkMo4 znY__G|Ix(jHf4$ntxH=bcIi2rEme;FcZj=(zb{|@tC?x+)j2}XuYApv&(`hCx}%x9 zNAy>pdCbi!5w|62pZ}i!IAMmrhl!23mB``!cJ@!cWlRjHzVLiXPKErIcPiyNZPO>b z_;kf7I(m{y&gHX36|ZjG@=*WrBN9{o}qZ)gSHc{{1}2 z)M^%1XykEyV!^LH8<|cT|5l8@|HI-WNBukR{mp^AjlsuHFW409USRRViedNkJ;x^m zeK%hcoH^h5_zzr)Ao z*8;8**IHk;IbvH5-M!hi?y2mVT(zI+V(Aa9U-FuD%P?emZkj!9@)6nDoS{`W_P*wi zPTzg*Oxem%_X+D3yqYI;9xjSaDP0%J<{uDpz>t{!A~LIw{cb@Hd;E zpOt2RV%au_ze{hOWO~~p?bNlO3mLa)o}T^6L1=c4%h?xyjtF$`vEDPSUbe#G#*L$8 zrz6#$d$AgYUA^CZ{8W&*#fql8+j<3>c1&rK^YDE7`HbiJUafjvDPybVHChw5JXX~= z{O?=7Q#o={bHJ7NpN9O+g)h2AZmv&$$I6njS4ucYQ*odB665_7J6j?Tx0p=1;2iny{foc1(++K{_M5G=B&;LlptbWEUBl!BGpuWmZ*UX%lFzHM)A`%{ z&uzDs@kQ@%c^h_h*`6nv3Zctq9$)VMu}$gIMcywRsm`lC7+=b_Xnp-UNp$Z^u1nd| z!oStzLfqjP{k! zO5Hc5q)(;h|9-r(icNl+V2s4Z-EH-ml2O(Be-^IY_p*8I>}3npBG`}IsabhdiaA>M z>GIA!r>aiozWaTAalnRYJM=_ez1#g%_e^=1xBOj=W0P;M&@2+ayQ8$4QP5;Z?`MG{ z!A&Z66m>i6z~Z`EyMDPMpUam66^s|tqP-nhD(#FLI`r1)D?E~a%j%N% zb@{R5;{Psb@$yb8*wes~-F0OOv*3TDUjhn?Ow}7Ymf7elY!a{*xX5T+(XO~&m-%8^ zwPhyjs|q!xB%v8o!;CJxnb*;gStum9^Nq_ClhDsz<_1cil;?EZ;ZRnRsPs}&ihI1L zqvLx`SQO*=Gjc92$In{VZ>wCjM$qNRE5mz&N=_B$Dg^~ia`$y`NXcGtbK%M4R`?Y* zLFY*nN0M#mrtBci$Fc3}W;Uv1bEr%?&#AET#`-=v2dASe7*(cx-|2A3`8JQj!ac7) zuK#e5Q(@tqbT*-^4?(303)h@kSM=ryimJ^Qj z@_0Nt^y}{5h4s7lzkByCfOS&A4hB!Lty63J1shv-T@&u_c*N2l@a}kJ%Ojnc?kU%$ zY@Dp+59|Gu&)jU(A7DKFGsoQz7I`ttE4r5_ZT+(M#DYB*PCMWBC|^0VK(K4M@A8RJ zT2Wz(1hroANG-fmb%EpQzbh`vizFSDmEJFysH5H6^6ZjF#uT?BUBV_xY14g_uk^&p zxE~QV{h)m5<)e-XL{!P4vTBJ6@kOIW5$Q@n9+McIt2^K877=f#S;zmpgH9yZK7X_CMH z|KH==G-rmbkf^m8G)8TIEy&gc2JEVJ-0j9JOM;=`8~?JGT-WWqJ{89k0p z)rs!i?N;DwHlc0Z4kh<5vOAoluVwUUPkFt^RS}c)vg4vVb29t1 z72{)0&RSJj%A;zc`(98y{1C@cQNvB4?Sh@Zi-p#maLxACz9BRxOr>YHN|a#w?~0-b2shpYf`?T+K1$osnTn(!$-=Q}Bmjm0C@TJ?smp-0f zI=}9NM0uiw^XI81AC4$jH0+9xUuIgGteNp_&cUFXtx*%b52@Z% zIB0q<$WuA@_IHzMkF3A1gAmDp)l;z@0e+yUf=run)mnbs?+BC-Ai0a%|wEE4}Cvv+TgtkAaKce}^vVT|h%zC5NRk8G=7)P9^#rBi=jm6SmzE#c2*%bWXPTZ#n1#_Bhu5&;C z_HFsZ2Qp7yD;?aa5%GTnX8{>t?o1}xpdOo=b?6%<9Ze!mF#tD*KQm(TDx;rM6%1QYcalSewLjt`MlxA zJIUG~yY=g0E_ZL`xVjxb5I<5Wkn44KhUUVbRhbl2bJ1dIqip=`!F@2fOr9GeI{~T05Y z`%P!Bp6R;xc)R{nX7hf18YYnKn=^5Vhj}`TsaWc-$J38KHv@+%y zrm(6j$W}#lSI=BCQ``Kz=rhUt2WzIEGkAZAD_Zehd(AwtO-s)Eev{d_KE7VHn)T<$ z>o!uZ89C7}&xTf)?iFUK6M0$1J$qAE=8ma7Tg*?KiPPMvcW3pVCFX#KSSm?&tUG@d_MQ{MA2AJkvpX(UbPs zYhGUV`1g4GbMf>$E4DZLy%q}IE|YVx_wc@bPtwia?{v52%-$a-^>yppm#n|ey$Zi9 zyW`NhoiAs(&DIl|UD&qn&yC`rNsY&kHD}*n_kG18eqHM{)6_j0Q+8Nn`d*vh6V|cb zq4~+uWWqjN#$MrY&Q+-aj_qJ4Rt~b{;idc3Y;eXJwYU=vf%lZlj)_zZYt@CJs zv|y9LY>Q2ia$))t#W$yantHwQ?T+&Gr*6r5yjuB=U;4kAa^YF^*PrH=t^F`BMou;* z!1bTG%NL>G?RO>TD@t{`JpQ%yyVIgochgm-nzbao_b8B3OnfZEw%x`lRc_-8&AAUY zm_6I*-M>#x>&LStGJ-P=9xbjD^D114A0On3jZH~jUvY@XRl(@zSVYUJ6gaqzVHsf%wcTwm`fV=7l~ z`u(von>*}y(}}&c3!m17d)uAWE3?!7yZWYZXWI7@HOYoSOXnTt=WynaGW=;e>m;w~ z?K!?@uPqH-TqY*i?Yf!w&>QC3%eqH4t^WD)Q^Y~JeRl6FOlkslE;;fkr-I|9BCle} z&RpxmD?}aET-?NNcO>)k?cyUM{p+i0yZ2AcI^!ZS?N;xm54$GHz2296@Z72y)1A|n zP7A-a@2~boImQsyPj*2;wcqZUvb@`^^-*Y%=Nt{Ud-3v>n>uevDEqhNF5f?!W&ZJP zXE?5Uny)wz=}{xK@N0GZ-EzbGi)1+r`Id9fU!dk+^y18esW&zI7f5ga%vF7yYyY1; zUwEpQ9r$>uuchopwBS@d&5O4tT(}l=El*_vi}Hfq-#&+=CKk@o2-;`h_NX;uo6EXW z-x$NR8zM}mJ+T*0+RvSxtPsh(~>-3l{LEYNIyE8T@EOu;pcG+Okp*5GH<)+qg z+Ww54kb9#$zpP}}pLx0eeyxi*WZb2&@8mR>lcFmoaqV8!;T&F9dTb%fh9;|uq$L@d z(%QFXO@BN0_)ex1JxV`{6{mis=Iwr@A3+n#0EGH36b zx7&4he$?2sz-G#pz|D^qJ*kN3ZEJr!VX=zF(Kk0&Tb06=x z%nOw}BWY5VVzQA(T4*-tk^d5lXOZ(6v|E~-qi+{rt+_TS8%PqvgF zcK>L#@y&0SFaCaK(?wft-9j^bZmxCII=Nl&$Nq`3Z>P^X-1*G0jU%r}UU##`gsTRe z>~T)>7Wru|n&1>O`RJol=X0LdxwNkqn|)frSE`Gv07v|}2p zrL0=wj&SfRR*398SjMGYq@9wInb@rQHAMn<#CU%+JbP=mG1;#8-Ml@! zZ+@9FaZ%je7>->x?{Suim)#dL-aXwmd3nu=`P_!QR~A3|^YB!?>xobM1ATXX-am2k z=X&MowUtxCR!*B;FXs~crh3ai-CHjtgVPhwTfW+v5NL6zvbk2->aDH3%uZ?R?9gLZNFvb8PBlFM^EXnMr(^})x7jhVvjc%PPKTXbySK7CS_?*z5Tn3HEW zXWrQJ{>cG1tF;sK`K$L89Ov_KXFY13)nJm!;&}f=XHJ{ccOAVsO0O^MD1B9%*K|@U)0Marj+V_?YdnTey`a! zzHmw6_r2@m8t3Mp{#Lc+NxPhvlK%1XB~?d#9m{j?y1Tk=H~kq}eC+L4!6m1}%}yPk zt^3vQ%JiFSS@v}*mc(<_%(Kp!*MGD8Ex(JBZM_`J&UL!0ZST*jlPKM`qMt)Em6|P^%gqzyI$URFW&h)hT$*x-r7-W$%PAAy zwRFc<#c9iZjh|5b_Gq>^)52%zb63aQ;#zQBDu2=k55Z@Lj^_Gt?qt0=X%^Fzm!(sM z(&atYKfCE$C~LiPVm|+D8(~M!Q-x<0!nKzbTgnCM#UvgVeXqBDXJ3tfgVmjla{?!A zwRdNH@@BTfuaYp{Gp9=C|c&a7QIVU^o%+q3_)c%pB&XyOegz4?ht zkM#R1O+UYB$D26)`7V0$j{LE9oiTRLV=HRT?fx+5(TcO5eqMQYesY|hc>T8fkFWo) z`@7tnZ{g`A)6I_>&fZV9ogmjg>)xM6(?*5Twb2iE^j|KM*)Z{JC1*-e%dIueYmY|k zdDG* z-M6h4ic5JTFZ-uDSBr1j&hn^#`fHw?iO*M_IA+9Zl&Svc@wJI|s+*19nDm)gN`5Kc zbhLF*=D$CY{rwl$u1lBCUL|)xN}18{((c0(1K8z?W?KthpYUDr$R+2-p5D_zd#ZUJ z`q>NK>*O;5ZM)x9g0++5ePXwC`w)OX38-QPRU21y&21#F$6`pD4m z#+ws;XIyIDWGcw?+>LeIVAJvO$ss#qucfnvJ{o<>e=C~KuX~v}aaQM!c_l}dTM6`j zay!!(k$-&Wo0@1L$u2Pg--L6!J-G~uY~_@t?o7?gy?rP>@x_-4_OlvgZttaxZn^zT zSDVuv@Ne^bo9`PAeJ{Fi(YRlljs4J#nF~5)XJ)HilCVq8POH^bh&^7*KfT{~>%KaL zYjNk#8B2Y1niKNlG@nQ6WHuuc>qGZ-7*(1hzQ2?8xP3MIsOC*2-DRE3B3u8Oe(ZW# zJ-IRPl%jx~lt;9y#AMT=S0-#JDSF%fFchrFzj$0TtRXN)e))~#v)!CuXtlk*S@XAL zjnzE0e-UW~8#OC;T3SyKJ6++`>-c5EnUI36p1S8>oF<)KAFAf>7++$MdgIJ~&R*wt z?hU!B%{{FXzR&3Va4uQ3d4`7K&x1zoj(n#@nq%f{s{7Qpe`(w_%M*!`rDY%bp3c=# z?mG8<7Tf6)PZHQq?VI_rqc~;Z?N#bmBo|n9n$?u`taxGOJHJ2mMdIr2;BS|I*_Cwh zNNm}0A&c#WT%!rw(J%LPpDi{0yomkb41@1le7^O$IqNw!zBPmSg> z4%LbKg}VwAgwsE~3a=DceE2B;@d=)(8@`+?a^A_7|NYgCMIyFS4prOkI_kB1|CFSs z=lK^$Fsa)cxz?SolUN#)=a$KmQt&b0zW(A66WyYs!k(?_{(GmMx%%v0!s|q)WL+k6 zgQ=^s9a)c+Og3I#e5!d$-p{b9d4{={yMpGtj#CYu5)|}ov53Z#?!Xlv`Q0>CKYu*_ z=x4LE-M<-s)fbCQ>H*bMuO9N3#r-L1`p7QbSvCE8WUJKHoQ^efpRQZC?+SbMR^QM0 zE6W$AWtZ*`D)s$Xzw5M2WWO}qp`HF8{T4jpn)JNjMbWb>-~I32;3&vZ4_awzY%l)6 zd3$-hJb$v(

<(x{o!L%T^CcCAW@Nh`R4A_*9I#u8~X2lxxew0QIAC0@;5Q!U1z4BFV>3Qb}RX$ z&*6$RsmHR8MXk|K-}P5Zy)?7AfANy~yzTu3Y@Uy9N+e6F9KI`WZn5UgO(*YZwL6k2(eWelR6#ns?6R^^Ln@#4pb#GR^-K z!;X8t&+vSAVvjbrUtXR2qC1V%ALlC=ub*PI*yzV06NZl&H`SyX_ANeeQ|Ya7=OU-$ zIm$I}q8%Tf{~6P&c+*yE?qtrVcPb}Vx;X`B)ip))YW!Z8$+2T@Px9_3iJkwSW;)6I zlCHWaX8yBf_u3ar4YMz5hVQ;*yK}qp5C7uQ#tD3r;=Ug$xwNn9Qt!jZg=ZgW8s;pT z&97C{-Dz4bZ=jLPerNjU$s5w?Kcr6B z@Bi^n$o^-ZYW`#s{Y#0fa;Hw_O)n1Jm2ikloptKRn9!f6({c_GxMu$Y}v_R znIYFVXU++JC(9S@yV$>oOP#qaEbCAo&-B;Gan5Qpy9MusW^RsI8F_I1U#%~3=d%JL zZ^@sT`-bV(%lzV+{T!tkr`PoTT$)wM_=yMl=k>2+c^#!tA1Wm=gYb1@+r{ghIVn=3mz_2Ewzknk&*wel9L)$KT#Q2NU6(!*Y(kUkF+POgK= zAJj|c2Y-}R-dV^VC34rWZ>>O}dTd7fpBpb_RHB$( zcJA2Tz!J4c?P}1mxw{sApCab9Uh2w@9SIc96lg*pzER`jH z9phR1ir-k^a9{QJls}9!q+MUFs}D$7vz#$Z>7BgLN2TIsj>~V^1XHq0tf$H@^1QDV z=zOvDyf#a|jkry1RP81}3otb?y*^0u%Gr_S*r$}WLclENfkjWo$Ed@1zrQsQ^1mn{ z{mj6q^j+*XPpO$n{0ygyoL)TO`X82lx8#e&sb3f8ob42KmEg89d@lE5^}7SYLbq6@ zZtQv-a4~JeNu9&&jM{HzE$Z2+bD`yl>!}0(t;$2TnP(@ zKc33kS}(r$@HfstCBa~$EfE4asp0%nltJC8P<2T9(9b*enc<$IPqV> zx8)tq=T3DQ{hC`=v2rL%Mb`wTpU<4= zl|IwosPAF1%clF=dwwj;=H0oYF!5S#Da(Q-|L-cQZN0se4S?w%WO#LQ@(S zWL^JP_3IVOb}9A9ryRGUHiTZ{wsxyqX}PubL%XNstSwV*Hv7)m(&Qt-&7``y?(so> z+ukpm<@63+dcQlpFlZ*f#mS;Fzm6Nz^ljNUEV?%D{eie&@=s>UdmUw1R6l|J`=)<9 zX=ghnIuxttd4Av1-+3VOzult7zZ|~j?}Xc(U(`vz0f_}yghO1Mk6H~vDkSJ8MOl|-Yonw;csD(_mcLaeLnrl`pRAA{r=bI zyJo(f*CUd!LB#oncf>ZCYd6H0&Rp_3XC$65Ir*_~`FqM)vr$j}gb-#BpI&16|+doHk#SIP7nQCVQewT-KI3IoMG5KxR(e%<>y$2Uk zTs|sf&h~%vdhgtu-RY~1Uav8kab{Ad@s5=C3!=<6EA-vZJ7!8nyhEw2$98 zfkSWK|IsM^#(i2@F4)IBtS)6;ajvm?cJ}`7-)GL5Gfnp5u6?E7Y#WZ>sFFH#zVdRn z{PVSM^|zJ(x{@Ggevjvd3tcX|9e8B=y7vYB z-;P?FJbLxxuFRE`BUdF^9MiPt?2vm|_(Sk==kICP&U~LFv0r7aaaP3Vm!Vn{)em&s zw(EcY?R@#__3WDeb|gLuoOSEKwby@h#ND5+@I5o(?WbN{^P3+Y{+utZkr%y{mt}wZ zgWWF}*>=xR6I5;Zb@yBDCT9EO!@gy{iZ=7s?L6M6d0p3JEBC&{!@2KnC#kPHnSD8_ z^sQ@6%)5<;!>60&^nKk>_f#i#`pREB-Yqo@H&(p;rz$p?Mjm_J{4B9Q(%iAphy_Nxj_%Me!<)3}o zcM`tGI$T@7=jm3H$cNV=x+`mJt4?%`AobiIB0+xv@ZuhuL~|B{{gPHrQv^1Qlta@YGz7*Y?4H3r=E)U|X`ut7fy7{`B zkAKZ$zOI$VcV}JymtT*6onl;(XlMALxK<`CcKz%AZF1NB8Pd!Dlz%MG@%vEzd1=(5 zqpRvZF62&LFw-G*nxx@^4-GkQT3(*F)Hhl1@^;_~_TS1OzB3c4<8(=fAs!Y*z78m z#>pO*mR1e|72HK;!6FaJIRpYzGG0%JpE_w;MCqefn|H3wZ$GiEYq@T2?dv<@X4ALy zyW9;s{33VG@fT;e-|me&9&>{uR~!LgSA&OK-ofRNL{{!EMjWNcoNvPsyC>_bdd_C9`Ol+|&8Eb;|I#sjxcu+@ z^d$d%3eR6Jy_6lHA`-Rq%fjmp0x5MhUdtzmoj;%Ja(_~;M9vbD^ec;d;FdU!fZyxASk1$_mojf)uTbRMsIx8lxesl7_vj4m5DD@8Db zb&Fm6Gb_gB_D#;N@790(ZyVk$j$b?V<$-%A_hwfW?a8dWe|y=S=6PYSc>nxcHa$PI zTdlG8bMA?@<3SguZ}a+j`ar~Ky>~ySGA-D`c9XN<&9eE8Pp$3#9%7jOfcuz}iM_)T zQ^5(pFI)|g#cSoDqR-SFfQmgcNo&=S<9FBX%z-_W1V?}h)>|$4wo{cei&K3>9o5FJs zhk9?ldP6fNOIxz&^oQ-nv3Xygm=)O1;IVym?0?C0&rLep`JA^u61BJzcy`gA|1a4& zf|l+PtS`ykyUJ@R3lsZ{?KkZ%^v{0Aww}rI@zFw7_e<^;hac7Dv9G6Ei8XJ|8M;@flGYW_q{^qr>8pI-jVx- zeTTh|zj~W()ZZGm*}Zm5rPmZ0*{5jttavbM_RPU$~XuQKe_BU%0tz!+f*u?z}#; z6L)hJ+uk{}lxv3@tg#I!nZIz8*RMwIGaGKao7*C`JAOl?L1R@BmsB$I4ULtLO8#n3 zDP1RHUjD<`^R(<9;Wcmm&HBKUb#3dVqU~Wmih^IxPOZ(Y{HU^_h-Ll3#}BgKJQDi# zYF|?(kF;LYi;ssRZv2{5bt1Nrd9K9m$16`<)T{XTzfOC$^x5+o(f3p?p7NbE+suE` zl%4-oIybp?luvF|nYBB3(}PDk&8c0_%l@#*?GRN~e#BvZZ5RLBmy)K-XC3ztZ@8B* zvo9#W=MEdAtL*VAo7FuX6K}OdE?wi_!{GZ$-L>e6jq9`Es(Q_)?3edNJUf0ZJ@N6p zo#7$w$&c?zc&7Y1>M<>}U-17medP%pZ(Pfl%}`#FwrAzs|K<9ntmO_&VZs z(&}B3cRE&`;*fuKVS25NM_Tkl?)C$YAKoU)9x42lfBsV9Zd(QCId9T;Fdg6cVac&W z#ooHPt1VtI7p}5nX61Y87HvFvDQE7RCFyei=SnW^(B88*{`}I*-?qjsRX4DFU{$U6 z_NM^TjTL@EKj(FI<=q$E5jSP(pKBj}RMp=&)3W%}ylKxh zzW?HQnppOt+2zWIHvxQdqLCLC&$+ayZ~dHx>~neFO*Tx;3$u7W}BuUjHG- zhvTyZU%)9&`Bm@!y37)`W4ZeCRG3gAm-OEGdK-lbq`L#!lcrSm#$2ySJ;}PU>Gjbr zuJvbDeX6kXwSK!gzxEhQipiE&+^e5VFPpz_lW0P3*@<@NcSe%y4rJ^MO5G8WxG8yI zYv8d%v#onh<-hxJNlJ5!&^-60>oo+!a-gy>*#*g(@WR0-Y;XAx^9i* z@iXa5?n_#dtQ!_ zY)6*$)(1U)-1qH{w4DAL5-BL(`y+9WS!c_R0AtD9znW_Mt2QhSePp(lZ+@HJy5qTe zWn7#3&+Ylh(02Yf=l`dX`vv+}$EW`=G5IdMXupHJ_`MLezSrNs#`DN{yR!6Ms9#&2 z!nXdL-M4Px2N4(R=H8#ByY&>e^X3Z8$2@_nnieuG|M~d1u|fR#w1VDuNwXJ9-&>S@ z_EH~b$CO(UmKV>xz8fF^;h0I;%FbyC%*~S;uKWmRvwc?7e9w4oGSAghyDn||{VVA2 zx9(+s%KlEOFaJL&zjv>^+Jfz_YjwolZTG8{P&_%UN=Nr)xgm?^2iw>yl@jlp-t>yb zCoFrWey;s&sKJW8Mqz2JxlHAWAC*0Lr^j_}V^;niv%WCD#x>4p>Gm+S=`*AxuWVK> zUEg%_u8rU9NAC(hohTP9PnTTn8n?G;*I8|`)@%M%#Y?}MHeL72fA-!f)45gGpx5hm zS<;@&O$x7;O+2h-_FK2ZY6C}_8)NybSw};H-j&=nPG&nTFxTkwlljl`GVi6!X}x+~ zda%FzkkG#h_3i(^`mKGi{Z@x)?d$8Fmwjh8NCqD3Q1_ejM>hS=>aeP(8mAvVobpDB z^>;ythW43F0bj2yTBmu|Xy*ep*>~@I)+jUG$mu$>&vn~z-ggF9PT1X9!1^}1C9+MA z?T+zrx5Xv~tFN7&`^Mq2;(;gccC_emL=DS*qe))Wm9+*DtZ_-X_6y>E0r{ zq9$o^K6zcWtH8)X?84jDr_&66+$(#SaO!za=cAXw7PWi+e7+)cFRA$Ml+Q}SwfQIR zZVXzpb5fbT;k~1>t6eX9a4&eDdD>pRlqYe{NUJIQww*nbd*Hrnfn zT<48GzA2VYl`(|A~%CYe0oK&NIq8oadW4|Q^+{p`mweALY+0zEkIq~PK zgX?s_Utee_x5;$@L47t9JfoC41=fvEwgy zb$>6kD*i3H^}zQ#zn8re_t#jG?{i7y-Y52M1rsm+ef3$Thu&13f74Q8;VAMims@@L ziEh>nlVd6;WP0Vr$TOEz-&~^5U1?E~ylUJ0e~~|L%7*!cTTK5q=V(8(u=-7VJ;`ZN zw&jN-HzsB8{`c!7vrO);e{HHd+m_C`y64lX>21YH zar5~On!o3|EObVjYuS#fIpTXxUp)7ZH|xD$ddTfbzcyYzJdb8{q(HJ zvd?Cg=Y;RBIjOermt$~_%U!w2W`B)Mj{iK*ofjT^{agW)rOUgtUe!m*X;)XTQA@k> zRwG>XpNa9Y@219|6#i|QZXB=gJ-=#iPx=3^MqOWDr$!yD(-(XZt^TP;`*!ljS&?>s z)6-mKUz!@v)i`@5>sEB>z2zSx=M?gq8{f3h+kbocre%8{3YEre*}gS4PyGy!TTK7# znJ*`Fmh=5_P^#psSz^BNc1N7IkJ0tpeIW;rekxzEZjq+?#PFFn#Wp>-C82)il;V^l zx`OE%>y@8G^NDO(_b&K~+ea_gQr*@&5|21C-!7V?8X?s^wP_Q7`3#0V5-rjXnRyW34W#Mv(HyKZEpRwJvf=6u9 zG7&uo&xm&utqWJB@@L4FRLU)~dwAt=@%gD!7pcGedb{KV_uZY-zeNZeOEKx>7dKuy z!LGkbedDH^$^o{;557$*>60^_eem6t=I|MspPhN*!<<^521#6W-$8 zdeZI3A0q3UI~VV{F6;AR>W6FbhN4IJ9c)?mafzHy(CtN;31#`u-`!iSwjt;`!$R3_ z3ym*{X1%&-w{)%kc7D#_SywV&c;DVxT`cLPTg9_v?!SW^i|TVW%1HCsy-{YK!Squ8 z)WYX&^=o9-oXcLMb4~c)gf*v=mcKNqPdxQ#Nv%vhtB}v_(1%F}bA2Wy2x(Vz#4b4a zL4DnqPkKUPf0Ym0YxYQOxVv6BnECUNL{=V-qZ+2bG-rSUz+R`{< z9nZmMcb&sp1s|IG@v}=Foc4qF-7fQ#Uwl5P zfAe97G>_#4e~kn>9FlHIF|Itdc$M^tA8TB`@V|X2&nULNu_g9G#pCE1E&C2RD80Qo zS@=xO;`CG@y9b)q`Ig#WL~8e$UO9R>JNoW5`)QLRe@1x)olVs|X^^MMe|W}h<{afs zvQ0O3MxTv6`^qHMCO=~485_pkFXLVs>c76k+;*p1b)?nDasA+L580+xD$p85tG4+IMn-8|%E-i5p5=Ot%PKfEU?%TiJ{3+k*wC8oV?zX)2HP)N@=XT%f^dn0zt#xy`+v#2V zhKrXctnLlhXN%2?yYE&7?#vLCk9`^XWxltykhl8Q%h9DX;>xXsk7cawH|9;(%Su0D zk+e6(LdM;o|&?|o$V*y-eblJ!n`on&as#oUm4XLaSu z0}G>>m|YgAi3X_ct^dLCc#oLlyNWuSG0fbgHci7TG1YguXWRNei~ zvTqv4Ew?29Tm4i$NpGUw*E_nGRh2gCPnlcc@T~Bxx$2geQ|8J@**m&=ZG5FAwR785 zAHy{!@5JxV*Dlzuy6M1z7+3#@QofZ{5px3rZ{FIc8fd}ic_u_B@NS;OqPcTEHY!TR z{y!jKvZitOLyHpOV#hTzt_nVM7n@YUwZ!aDtdF*+?}vyLMhmtWJjzzdakZq zzT<*_p1zO%%ESj+$2Uxhs}nByvd(WukH5)5C$ZV>_HPz&Y!@hexu!zbAi$gAC<7Udz^oO|y+d#1-08TOjWFNfx>yd7F} zt=YCl(cS-_adddpF2v4_z7xOI)!?H)9&lK{}f|Xw?;ka4B4c=xxdUH(Qn(2lO~xnnvT3u2?{$PxvcDoBJXyl4+XR8yEwfz z28X=8$?{)gPs^7QtDYG(+P^Ce@?DiPzU`ZLX2Hb>L2V_8l;v|gujbikK3XDoZCBh} zzDtMRoK9K5e)m@(+pcM`?t6L{+@4l3DTJ%lV}+zu*2?9=$v(1gA6CuUEwOB~<&W*G z?hca5oJ(ue%=NOCiLF~|TcgHz!sg{htIS`0eWm(-JltNAi%vau)Y#(Fl^GqFm7sm> z*#GtCrd+vH#qnXkoN&*tS1Oq;R&(a(nWev+A0?I{wmNiSeko_jl2F$D66ZR(Grk#wp>{aj%4qPpX2OzWU&T^IwKEgs!=7>9UASrf7cOhF!<^|C?;OjY>05vAHv1hlwml2l9_O?@d~N!m z_OoS7c7BtgjJG#)*UQbFC)d|(K6vQUkDrwdB5a?}Yo;yrzkS3#nYrQBiiehezD0I4 zZq@Ybx34dqarHsYnP(3VpZd1-nn=0LA}5#QcVGB9y=X6MGKL2(=L{Ic zB(CZ3@P{7|;JrR&eu#d@Y(DL~@An*T5|5l~TjHPKx*$E6VP{rYRsSiexCKw9i$A*) znHaR;LY3IEWA4Yct?Aji_|ckkT?XO-6YW-C>I?rB6Z!IveL$wwJFX-3ejoS9{9URW ze%n2|=g|6XPE6~!ahy`$qPle3Rr^b~CR(_)Pw!ULSo&sRzOtEw<}#nHf`K zbY!Zu`rUrswjDa0%bvJ(Prh=SX=i}X%36~qwNt$pt5&_v&^W&2%e5GFmO{_HrRQ$0 zmid#ZGrcuy%dtO2n%!4Tw5^_8)?u)17iL`eTJM13xp&{E2PC#H+Vta5v-aDQ^7%gf z2Uo5=^~9*L>&>c!M?3*OuRFs7jtFbpy3Sh9dD!de0lkx28e1Ya-{?JmG&I{U`}5%k zy2sCPiH9mrkUwi}|F|O6=ESN0i|>DX(!Jko)<&({F{&%hd{pUiSvs9@=PdrenN^`? z!+rLZvfZ8;h9`G88(;s}IqUR0=H!MlBY$3I7eR~JiDAND?=U}mo^dynhrPUQmw)_E zHv`9*pO<75v~#}8SE*}k?SFaV^1~;4wEEo5^lmaJZL7bjxA}=jo7e1S##~uize@uP2@CUiL0?V z6ei+#UW#9cqx`MAZSUWuzc}O4Ppv&(eQQ>@)w~n!Md4hnsZ4>(bIYwV-$a#K%-yKw zxO1zk+uJ=pE7l&l>f?Q(N=(W;grjte$8@`?rN!?6EP4F<~8rLEdwEu1q=o%XMn0r@H6lC5hMfvwus-<2da9BHAW0 za{kQ!pVylu87KSM`X$`^VBzRpKiA=2!JG$Mns0N4>?}0DxTCsU*&~tn*84o=38oKN z|DI%$IQZfr%aud1^A^jNR5vHgJN5JK;`qqDZHHvamkK1+?bI$kv2lj@6uI0))zIfN zo!zgkn<%MimlR}ecz&|U`mZPLoE~T0yte1P=7ql>HVKFdo!#R)U2@N!;L4xOyLKK` z&&p_75%==6^(wW8q4V~#3(4I|QVcL*nR;1t=S|;@QO{<~vR-XarYfG1*q(eP?fe}i7{nR4%w*+Va(n56kSP-!%zkTKkC~UMc`{6VwTkj=ht<1yUVBWG z*?voD&V;_XCl?)IpK6?;Z^^V;PquR5fv5iB8KDsoFRNOdG6NP~aBJ`V^V?4@H^AZV+($o&K7 zq8L9U{xgq^-#<01p;mk2x+2+4y&LZYa=-Z;cz)fZdxl+W#T&O*_lr+txKrD4;rsN> zf9AeAZxH?Z-(88Cb6@xAzRUf+^$vrPXu!vRRSdQw~mR zsS9;o{Ce}=hQG_WChj~V^*dIIdEZ{`)m?hb9s1de-m1IurFL&#ub{-9^NIN zXYpQqQ`+!8rftP+=?LA&_n5eHZ!nxy4ZDYgu?# zJ$cTu`1icoa<^onj#Ok9I*2MAJpk|(<684*W!#?+j~{P* z5&L^7M}@j&Y~bCl)VHUTBd$CtIC$pFPd281Z*R}uesF#1ri)KY^}A-=i1=G(ct*1K zgiZFkM;k3y>{_4B)Vc8$FXudq=X+v%-j++LIGIjl9MMkzVFAJ zHzpK)-l5ax^dRahYv5z^+%~^U+b-{@{dPLp%J=ulg%Qzm0V#aiW;-N4w6>oAd`Rip z&hr}_4E7ssl(=YjeV)0Pgu!Fch$%A4`HLf#c7`upP$ucIhs#V+XBoeQZcqr%ck}n$ zJU3t2O_-gOmc=u3f1ZShHAlpiZtq<0eei&v&2@gpqgvg{2A}tSVP%Sc zC&S`r-nl1Y+k-#19&KHlR+A^h@?kqGW9wVF_@sH$POnxIjt%VhzLlqbZ=Q8^w5he` z-E~ac^G{2>ed3U~@{_~G@Bf_*CtPl9c)R;Z%5`bRgiXahmoLfAIP$^ZcP!83z$V7* zmIF&F6AucXHu76l-S>Lm=h=Df2d;^Q+~2~)-Dcr2-SXI~EEsz2)KJ*pQMe?`6uCmpYlNXKupnPtDx(7FK@k%8Op_XLgs* zXN&CG3v=XsLex3qo98nMKNV?8QDio?tp9xc5tH1e<%dpy%cs0@G zho~?^wp74|HPaX_oQ!ar;xmzNs`q;41m8`U9?g5p)GWW;h-ba}J9U+=)jD>!zsT%K zI#+gGxTg2$>qF8}diRus)IT5Pa|zJ+bjVvuPJFKav+(t2&n8J*Ue$Qad3wi=83_MM+Q&KP znPXs4;^NuoU-Z^WiJa!lsL@)cqs!26?BS-3*BBO*IzGzfXDD$~QaGt>&9Hdo;Vds7 zyIZCb2TgzdnLKrB=Y7G?+si(@wVF{szo>6v)}@^;C885^;@JtUS%@L$e#rL!qWf&0cjxbl;@R^# z)*<1X!OyhCx27GLRgt{#xU9~6wS9ZP^4RQbd$awLa(@y3o`~r?ejT`OoK(N(5c7L8 zhG`Z_`Vx=h@(piXdKT+u_$la$O;D!Yr&CGiKCO6ORQ%#~TuMY^rMYRe$-g@5XYH&T zqR;ju{p2j;u#(&$;pOY%7;gJ^m+hUew_dMXK4FFL=he$o5~kYoXh<{EbX6tP3WT(@ zPF|O^Ix9EvmDuZqhS#T4Up+W?yx>{)?U{)WJ>M#vR6l1hJ@(1;hZ^j1R(E!EJ-eIs z;^vVmUYU>HqP3-sr9Qa_-}8TW>sDr}t3UqifAa2AMNf|yIgM- zDaSL;d3SwUR{O&x$HH~4f4Dh^;eAo6$D7A8FPv{~VDeSVWcmAz>vsUd`m1YdH5xW3 zq+15Ml&HlApIq>#bw{NM!_S#Y?>FDQcHp#J*8J#uX|6xLvp4WCz3*s|ars$odgyQZ zve(rQ|0}&)CI7BE@uln1!YNnYr*ZAw&6xDm{lFPPKknzVv+BcwW?#M9)wINq_e0B> z>{ku9wzK|wp5n$`qAMBXRuwIoxx3=~TJ^o(en~DoFuCr}x8^$)3>B|9uDGr*x1UjBc{b=~XCSYW z%_i;)so-bL&q{RGs+HWk!?^6K$s4a^h8Z)ra;ojq=03&8ceTQXUG0h{Pj`1K?)_7g&?48^`)uCB zS4)34cWaq_ci~QXrf=XCbi;8;?vzx9<_CZFZ7(<$_2d35p~%YtEn06hJl)Ux?S59^>DpEOIcR3q?-rX? z;)*HTd?w9|f6Xqb)|Ga>!zNk!M+QgHja4^-g^wckZdmh$nPPij(nI-4wb z^WUv9u=qGLYnyA>fmh`rSzR|$)*M|o^TV7OV%OIicQyarsee`Rz^#uxEsJ<}rT%#% z;BLFP#+qfq`qi}!joIJWCH8+kzB0jC^+|xRgulpzb54pg<$o9_{;Bw0^^SK|renFj z<;y)6x2NNpC0v} z^*q+RQ3>lY-gGo?iNY#51CjRyBBA=$CQpP8$xpspcxl_?8)q|GZ0bvAzBSRiekD}d z|HqZhvW{nMm+mh1bMczF$@;dY@vOy%wZEUO{AT8TAc}*V;d~U^`gcq=r>yxlZ_)Sm zpL%sup7)t7zuZ%s8kbg@*nVabmz2Bt_1LjfyWTzem|sv?bYQn}az+q?d3pFP`8=hK zZ@<*qXqY~ij%U3vi{p2~?{yAa?kqc0;I?c+zG>JLmhGRCDvb7Wzhd0mIr+g9|5Eks zhZR09wo&=;PHXYLg0{!G{(5UK$$YRn#~$}*TI~f^38B-?dTal7>m9$!9`nL8*FgKo z>!T&jwx(*)VI9G)46i=h>lcar5_6vaJJqBcVb=A#F|Fs!1N7 z+4GYPmF~Tc{@zew()Q+EPJ!{$GnaB@BsJ5g3g2<{wY?oT|Csz=xg%?|4ej@oJ^SGE zKK4cOm5Pb47QTo)YkDtj+V_oHnETI76%}}zouaYpJJZ9(`cJj z1h3%RYwo}O+T?fVMmFQG%3Z%cmKOXT84EFf%XcXPA}2q&G~m z;?JjlUUhHt`#VcZP5U*P>X@X$RzDS(e6guwqJ&?&U<2PfcN@)#+ZR~R7N}czu4dB; zDTh05d}dqcyfoMB=%4(2?d(7M6y#jzJIa0H^}I1@*F3)szZ$>y#tWtGI;A^HD5yw2 zyfSou)|&%GrQDU9GG_)i=!Rr+2i90LaBe%=xRmL{o+S$RY)`s9Df97CeUyFj*Ygz< z_g|i_c<=d4M&CpBT;J{_iR@c&sBoI+54Gp#4cQ+0ms-ZWRrvi;DA@QwpZaWm@%qO{ z%hI=t#&mo>zJ6VcdTL5!kkVqqFC}lyS}QKU4iS6yw4=TF(aBqHC*KkaJ1}pLaADQT zj|V=pf1Eq(n`z@`y_3QV#N(_(&UI;C(B!$az~y_Y=){};vRh7e>q{||XcslfHl-F8 zik+FsytvwF!To9drw(?fS^iyh+r5&_?el~Ew`4ZtooZfW-uLvlr^eq$=G!&-o_U_g z-F92DfYt8!3~no?{7dB`&E@P*u1f!P=1z!f+mp04r1E`~D*KXOzqf7Rf3|JAfj#5T zfGOo`Wgomg!}v(~lz~%A$!@i!x3mStf6kv%xB1VBX>sxH0oND33QP6YERJ!w6EC*; z^h;me>gpYL8V)yKTOPc>@_eYE--gn*bLLZp*Ua$v;Qj60@{dbT?34;;dZ#)&agR{J z=ZJG&4gX(lzJIRaeva!ogDosO-|cz0SZ9uiW$)LwEoQN-Dn|tZ7&5*U_A@Zp-D!~v z68NyUj$ys8()z@$3JDX}Zl8EKL{(ZU>*kS~2St0{dA%iu%HM1v^o;h4Fukmz+I0Yq6cd68@;NK(U?!MSidd{Jnjoh}K-hE8!(B3x&C11B4Oa9)!Z?^L{!_T-^e>(d$3aDD7Gnm;$wq#ot?s>_`dh?cY+MXAW@7>-1mFFm{{o=2U%BSlj8jAnd zdRs^|yyoBIJ$ZI{EbF{EdTbGAh1Ts!yEyM4L-B$8i}+T`o~&JR$97VM$U~-`^6x(_ zh$vv%P-UBP}&7rD65Mkg>o;HIQ$Kp|=B-uR z?JKgqg>>$no6X&PQg@NhS7|A$c*!j{lsz|Cc;CPIAll((;FPj2BLBtuRR14azpJ%L zbJvrYIQ_t)%8Onq=VIa%PKEqyWVxNmxPgVmW5cd*PlW#NJX-NyUTTAzHE)t(<1%*> z32ocBt-Vu!NIz2e5ce_V{E9M1Cf$wZ&kFCx+7*;t`x1AgJ1O(m>}^M$=+AuUtir+1 z%6V>r;hI@@@3v(GK3U~a`s|uFciXS1Ph6!uEmiq{ABzU><%@NjeH2;ilgq<7*tY0g=QY20 zEmqEm>%$Vet?PcxuZ(nJJ-ge{ZZF^T$$mK@k7xvoLjWNLVDX4H;brt3cK zdeXe)nw{tDt*J6!Q!KyiJ#Jraq}!H}tbF*;dg0U~Sr?8Ox2IhDofcie&HCS)F*qyC zxp!~6(k1hpx;ZVYc9<)BBs-fJb&AGrd|SHSW5ctYV!5*gLQ-?m+&0dsf861b<~h6S z`y@WIbNuTU+3$Hb`SJNl1|^TR7dgyOytVRNA!F4WyEV*-Z%(Y$nRj6SvW)8{H*SPK z3t6*Ou4U$z6gHoeRS&)9b(ssM-AreAIPdOMPn)NDYY)zS&uL}Qw(#RKnMKbkzDm_U zx&2?Ir~fE_;+^jYW-L9!o_s|_VVQ=^gtEKyg}SOPz72NV6rb|VVfO0#+$=pC7hb%% z*w5_e%cnLw#qOIVeU*|IV!XZ2{%6Y$i??!m3(iQ&M>QI)KCxj(&l8h6ma5}j8#EnP zFX4=v`7lX$JJabulHy+v%r1VzXP5SW%IUQp(qC5nms~$-$=)LAZSRABu*A-4FHV{H zDt6VT!gu?5H6{rCe6ytLx%{)`%Nbb?_|)C<&~)5ieRs0Q;&&@79epNT+;wS>?(|3Y zVfkr+tE#7pYZxDxrI+(~>GU>@QlAgcOl}nWc$~Fp7L{?`%o^g+rfZpNDS*qK$5O{P?nXbxY&hqwGf_H~*Aieze4~ zXlmk-nJa%)WEX2r@bYIU^jdaNwOgaw;H6L5>$4hfJ^IQuBsLuj`m;Lq{C=yyGOeDh z{6#a=PPSwPpU>vry?ImHt0Kwn8Vj?D2hUAuba}qfFLc6=S)DId6!|Q#*eEjB^7md9 zxuV+Bfnj268W)J=y3Wc7Fv^vQ^=m)VV|Dy~e4G1~%+g;x`&H(fPkQUO#j}OSMd+vU z#IX2yrMVuP&b!s`;$+|BXZCQ-6z4x%3%EC*a^9)3@l0pX!V3AoS7Lda-BOap<({it zKdxt!+WqF0`U1Jl!7pdI_u1UH*vNS)lTGygsmBUubF!yD)a0CRWwL`oME&c#I%U79 zq7Qts{Yv*Mhq<18Q^RJEzU{5I%B>|Ac*JrWo?NQgQu$foMS!KkwyZNZv#XW*7rGT_ zYHlmM_wJd)p1%=^DO)xuH=Xd{(L3w8FSkf&<4(Qw6Wlp(53ip8{MrVIy-zo#ZSrBy z%iWo%urhMOy}5U?!k2wh*jku@88D^{54}O-1*~-PfbbY!1RAzOKtXy)Ns; z#Q!o@OPxN>%Hh1A>3M>6Qs}v3C-w454$I0MzLCB~aeu|RRO7?EH_WFt$G<&cCXxO{ zN^x0pZ1HBN<9n49Gk;%a-u>!<$BdP43~ay2t!oi{*q6GU?Ud>3Pp=ya_O_Z&|1o7% z`8%yu@pt=Xd(?bycd9w0R{0?(Yg^dov+ReyhW#mREKn8HJUizDPyTrYhaJn*4y~K^ zBjnJbN9C>C?}<*#yJOeyQFkfPNY zKU}xmRd==Qo~GXt{Y1KMNlo;W^`6_(XKKB6Eb(By|LMsY^Q$_g3wB>;-FNj6!+sG) z%gNFZhHJE@0|VWJNf^WUgdJ07WP74U}sT&Uf_iHJ%;CR zIPQ~t&Oc%O*;kJlPK0w^&X^S=!5@F3<5bR-NnVfUmd;}N{pjsNM^~wdQO<|zmnB8= zo>=zCBqsgU^QS`DEt_la-+cYtJ721mW#R*4=BC#|voGHH`}yh4?Vo0PeE<3D)w9d$ zdMEj=PBVSP>0PquP5Qe+MelhjmD5g4Os;Qu>Af{RKD*45aT@$ycw#5}7YWv%2m2v2;rEhaFAD?rKpwyBEKd3|aV) zZE;KSA>OQ&jX!7A&UafBpZ07n-z$wf3+8PUUVeF_r@OA;&U;(qk9`wyiCH<@<$j67 z497`rc7ny(hkYuO6r!E^ZpDkFpIQ*MHSyCb_KBM9yqo(S`WM^e%qR?#b6;`ONJ*Lf z;o@@7NnaIainpzcoPGaNLie_plRh=_tgE@rroxphv(3izTgLTbYKQ4wTc)OmI)h1KFxka9pKUl0bpNIP`oGW0+k8GOmI*(X?zUo|n_&3n zwkLk!P7gw-%#rZ8&nH@F8t_kL)~76yLQ{oNeakMdWXx*xnaKJ?AC1CpOPOuKeS zl{|0@DFZP&{xzlVmU4|b>-Ky~z~U3DXU<%CJkxiZ%op3g|F0_lRx6sgqCJE6SE}ui zx7_h3Jnrmk>sYOsBPak^kYwOtm{-1hUY`D{ba0T6IA5>jqde2NZ)>+)K z{@|8?uoa4r;>GkhgUdmd&E$^WA?sSx>m!zE-&N6OP`Yc@Z0C61IXl|_YCOsk`z3Gn zE=%O2>4!~%aj}Bu-B@PHoLkzFEM-#W|6kX+hSy}-)Tp z)tXOLQo9nm_L)b2RiwSj3J73;kJyB%ZVWS@@ z@(+VsiypA=+WWZgJx`T?sr$6*Pc6$&JuJ&J*=Jsn{Z99O={xT``FF4H`n^*>D|(yy z{`OsKcChy!5!`#u{-5l;0-3tgY8yYe?sz-#XG?&K>#JMxOMGgdg?`PbzOG-S_bo8X zkefY)@7k7)JSXK7O7!l0+I#dX_o6pz@7l%HGaC8FeVOwk{FJq;Bc(<)U|EEIs?L%)r7$~H>%$|`gsxe!2 zbBOb+e_Qsy`CG4WvSTLq^_PEziVNnJ+2pzsDCcSZg zqH^v2)d@1LX9bp6<}PiVo2Rr?V$v(eYZ(its_5V7JDHoasJ@|4bnCq72a7J7X(&EW zkf~zTWY1V!*N`H8Zn5h^GX?+K-hMG=)A=X7+qCMNW+{KklS?b-?l+fBdi%%mnaSQ8 z%WbVV0_;8Zzg|KAoB#VR|58f@=j>H; zrwF}|on`hxU^AD(u5<~fWMA3qMJACpE!$XBX5J5-CUW-^H!ol0o(+4>y1V~Zn!Nj` z{?pJkDV|--fB$xEJ->s2g=61xWwUcHe%61V;^nw9?z?3A*%UJy4aKEFq31kvw$4nn zuDjF0%a~eYH2Hn_qPcUf&6f;os8rIb`s6hK%tp!oe_pTu^gik9pViuiX?uJ+1#3=b zJN86=ZoW~P#vZgf{M&5DkLlH2%Om7{^7Z|h(zf!mt(>UCp_BCUV2dapf6&BpZzo@z zYU|;;a8FF<%|N?TrK$;Or{$I;ExP2dCKI*SEoMn7f0EDpzs-^-Criw^_~7v5hKtkH z4c%;Qewmo_68sq)bnr3K4_V>itcEtGB-iGzvcV;h5o@T~m&)L?<@t8H8&rbfG5pLxgWbWcx?Pu|vj5;JeEQc+uT>SF8bkaZ<7 z%b6-?&YF8lbWXdaQR&{(Q#ZYi?Yj~Cy6EYLsOj1>udj%StThbXRLYsV&+O@{^0XBn zuJ5>`SCD(^t;kGE-F^3^<)sD8o|Y{YS5}sue*5k^|DCcQj#f1-ZeK^A`-$ZndHyH!L@f~3^W*HEF4mFQ zEI1>Nna7|___$Y$x#6-6`u773j!78n?ks#U?~kwP+JZMH>>i(f-|}R0!teS(@8;Br z8v9u@w46usj2{O6@P3%;KF`ZMm^gmavE zR;$g|+sCj5^Q0N%I48TZ+-cvG$+^j2M!iVzOo!-y4$} zk;T_`Wjo!|Smyou&MT`JU;eI2@>Q3c>d8RP8!9#m?;5^4mISJ=2{X`+ zyAv*RcJt{s-wyfr$t(-Wy810(W6+J^}0?VnuXoAOd>qDn4T zcIGCLJ%v*1CNIqP)l1Xuy?BXhj;XA-NV3SGEj3+5t*o1}r)97QM?6U0+OmE7l7N*7 z*A^Um!N>clD%8wvg;+Q9Tb+3onyL(SA6IDW#d5B-JRZ&>xL4(6VYWQW@@}15GxVPc z=6d|z^0VoewdE0ugZ*P3L@aE-(>%KO9_1g2eGHka`ME=AVg6o)=g;P$L zp4VPi^8C=X)2HeZZ|Z-YoA!`f|A3y#JxAMbrxSbK*6UelynOmAhyPu;QT9t;_gXj0 z85{LxiOo=1cjLjXO)qwRXug$nxJP+H)Vk}<cCD0uhk^(84r=akLP9FlK{e#rN> zM$?r~I&LE8zYA-NE^wWBlFFEJwehaMLXYeO5Bfvmu zVN_hC*|$=y9>0D2-X-TRTfM$jY-9Top0-~+~n?q$dfHL05ksyUroEtoI{_i5GJl zPq@aP09~o3Sn=>TOLJbu^`(hD?^D|^v)!c1WuN*ZI_JNsuupn&G7c(>J>|De0w(9`g{$WE`8UZZTBA8 zc~Vy%u^zAtNs!<2^ZAiKOXu@kdSP(=m_*#eId>u%y}w;^tJpNh%EYE^Pr;h{j#*nD zv2RnlJni}Uc*&m!LpaT^HLks3DmqU|vTxCEmCT-XzOLK#%kF48_V60sU$=Nd)6cSH zT{hJd_%E3L_kG5lqsF(F`F2dqhTk>E++ud`UGU;#dV6QS{jz7`%XY5+SvK)T#!Rl` zs+DJB-sKxF)(gCUK61a&qAyj#hO=M!z3QuPdtP&O&aU9E942`Yhbjw&Uv6w$`iXs8 zjy`*jU|(&0i_M4YlQ$h)GR3yq@6@mSYwD?mukL83o>$F(9q_$b();?H&HgEQ?Y~dX zh&ng3_>*{A?8UO4{qkX8SAt1~>S8)8`Bb?@*m)u~cC5zKyEOXUn#jQ<(^p7j#5#9HPu z$~`na_CT=Y*9XQ!_Z$9~^&DFu!5dfb>g0yQ88@bjZNC;Ozd1>wwd9SDi`ysFW$9PA z%Pp<>guk`s=SdWm@(3lxpOai$=z8`#+Y`Y{Uy|}9^d_F?n)|u*$v0)gqK)&;UOZb7 za6j?yUL7~CNf|rDEBCe)Cfhk3R!n|mi{?aV)paMj_>wwj~4W<`SvYo#}#45)}m~Mo`+AhG&v!%X38!Jks0@!S-x#x`L;4= z=C)A3^6gJgEBCVInKShpiQahd&e->;7n^j7?g5!DiQhlh*q_k~ztwR-W52{~ImQ3y zjwIJ7Tb*V<+_mn}{Ra`J-W}b3;N6q!LhOrU*RMC$;Shf!B_TVtR9?;c)xPg3=S$!G zykhxD%iwIyv51|E5|8$**;edpllY0{-6ZR0C-kLvCO@26``-N7X62b()BB6RXn#I( zch<@WpWGJnyLnDdG`BkDaXj;G-tk}wF{jUUyQkz!@}4i)EgSJME~`_0-h`(Q&YUy3 z+W9_v=CMyrYQMkkJSoufHBHLN#OdjoIL$fydWkh#cij{;JZH~pzUlBgNwqsCl9k?tQe9z3Lt#&hJ9t+tt@4Jn0i@W1#F73pFeOYf6mvl(~ z($wjF7`d+4L#(Fx^qe^}E)<5}b^Y3;w1;=mnQM3cAKG$R=E=^$8!v6bOWdx1p8MP` z*n#uv2~p|m#@Rd`Z#JHiea==T$DH(ia-%|<$FhZ+cA14rTwIcK>#n20(U0;@VM$vT zST5{YcBt%TpF8uixfNm2Sz#;ARUEr*ZJRHnC;Gsldg{sOeYeyt|GbU8T*z^=wS6A% z!5OE|I=R}LIc}_f@#^M&!{0OJiRE6NX~}n3=FAJ#)gtdV#b)-zOp_^YKKoI-&?iL5 zzV&g*%Xi`YCOhtL@IU*MTYS@PkMCXDw;s;kUmp_{tMc3PB+J=*{M!|$wI?L(PuB~W zk!^moaboGYh_lw0!`2zxW=)}fxihhp>@5|{2NS{A^0N8HS3x4P>3pi{Ed*#4-Q0z9MYiiN>x|iaSZc@W&b;?`RX-&jUVUZOEvbP>>0TYjzERC03a_0Ni z*XqiNRi_-?q`rMwAl#|5w@p}0WtEVPM*5DDN1T&p)|$PLP`|EhG0P&vZZZ3eYx$QG z7w8(F_LSDSHA{B+nT6TL1{WnI#q(+}+bAc6oMx~4v_wMa#reJyDSMBsEK8WUsnw3t z^71#U=9rKP@w=ZJ1wNSAb$v~(p;p#nxn~ZoUq5}G%kSp8@>_Q6)jKkct^v)Hz8V}~ zvudg6@-NF|4ZswhqFSQ0qcb{!NAob!D@5Mbni^J^-u0QRmIC{qN%DHtiJG3`# zYJGQmwfjrahZ9V16{#fFPG--3?mj){XTz(+EJMew8X?E;Xcpw}P(69_h?LWmCR^=) z(;E%W^PQF8{T;q;-p`utGy1MCdp@i7+3VL2=DfUCv-U!U&9{~*GbZ{=xj^D2u@eOyqQ!ZEklvA%Z3?&hbD z<@Op})(&%9<2^sUN2{=@O;~50nJ>5JvpOR`*{K;n_o@E=!*!f7hhE_mi^>>e4fS^cj-OMoCQa8t(g?^lvn-#Y5%MF@QZAA7zq}5yn4-nGfMr|0Y{#u>k+RDb*VP_8{8d1vd(Zrf z-E)FAl$AD5{k2edl1Z?fh`}+X18?MxeE&b?)1xvCDT(C2ca}aho?Np$v~_lz$1?8e z_iWDiGS1UE*KoRqi)B@}e=c`tF+*l`=ew-mF`Ae#hfEd!MO4p1WJge>DdoA*zF$A%66NRX=l7xKJrWJ z(*J4o_r6L$e$FYwxH#i)`j68$pRL-N z5!K;vylt+jRC>l*l?8%+SKC|+zqlP(p?1Xj!F=t+<{h6!rTunEh3vg_HE#b?zi^rN zOM2ES*Cx*VJ9VA9n!07ZQO+iZ^&x+HGrQw`%rhmzcYRyGaedC)WqqHgu00mBGpqRM zg!*?EIC74xEH}8X?<+CeUgCU+M!W1qU!myJ+wbq+n589=`(jgF(6_S77w_p$!b~ z&Xudy9GUb`Z%X`v&p)l_b|0R)&q?&W{8Wv(A6Z=0O7mIj=9wt9hFeQ_trV?Hkyq$9 zEL`(CVmi;M2hRoWIJL%A%#l61#O8Qu^^E9u5j#%a%bxSrHvG>0gBv9JcAjtE=sYz} z`}qbr!c3Kj|eiN6*u3=}J$?thvwnyhQ9sxq#i#V^4Qq|6p{vCbi|=+=KO- zfp!()QMf=~RKRszl8`hR4{`IPkXo>yy zrab@W)Qel~XN3MWTG#US)u#VPrgm<uAp}obmVG#orZ= z9p$Yfu4T6-ILjt(QLYoTTk=yjAmhMy{?H%)&i|j_be;V_>t!~+&4GNv+*5wEC0~;e zY!Pi8`a+N2qUYylSuC;F}*p0=*j`Tcu`s|!3n}nrBJCo$~F40NC{uic9v^msi z{*XiV;ya%ci^X51|FHJC=k{>d+UC-_HwurgbLG#`_gNnF_1vQWi^TSpdu+ZIpu~G@ ziRqg5+cKO!t+forHmiz%&z$?R=hfSLyJX*Q61s7)cFOdKlRPF&hJxIC6kj)gWU;jF zx|r-DeewTGz3DpMPSPFcszvuQ&1X51FB|71e?HFtP2=|bRws_s&`Jp}1xI^58RPJ6 z8Cjv<>LND0>z{V*x_GzGzuh9sa^%{ub9yM^t7Ar+1FdX%8Kpx zFQ4~Ve4Xx2-~MC1JevECMc6IUlQz^{UOM}B>Fg_a)z3V99u-rhr>D7fZ%Og3ozouc zzFoHXPl{(;{ukW4vPu#?!vWH2T<-)_qhBYp#Vv)fObv3Me zxI*oJyM`4R?2dFdwtd;jW><1{nU>MvPnD5rE8}%eKfJkp$`i+D`!ick2u?XUgFU-uVZu0ZvD{z+9hR<dt8_Ja_)y!EKlGOZoNfPhZ@8#QMRJ1GZJWACzA|7P$ya2ITSUFvU(Rs)!=B~o;54iFLblH3+M@mki7$>_TQu!wLEEoq=I0`g$Mf}uzVW!c^t9L>;ZqQxtXq5K&>EGck&|F zdd+F}4{UC988F;UQ2yq}{Uz`87ZJ7v5m{P0KT2Ly>?WPu_Iyq4oW#D_<_pWqYu}<6-2s$_+O+pPTex;)R}rE54dGIXYP{&wKR0;+7}3 z{whPuroiLQ-a7i<4mV}&u?kogC$PHU$dq%}64dugU7vBj;I!N4mUmxbMX$#R?08}G zeUFoz|K5Lm{(KMQ-*(-~HJSSF_w8rjSnchvT@k#S82)^^rMF34qE5%{4?Ws#p?yT}{_`K7U)xuCTs(6?F)*ZR>oz5^ z6Z`kSx^&^yhUA}r44y?T+xYqUb^EJk{}q326@A*D)-Pw1zGb@1>E}`N*7_cLr&^u& zCr40u^ZD4HyH&%k-S)}f_Af#1(($s+-F~+jo-I7Vo#8WCysGTg+Lt9JF)P0- z?5|GkzW+KW{n%yQg5v0c=2y8C-_kAS>3g|t=3UDK zTN}TbYULl-8lKyeQ1EM)M((b#YwH$De!KR$BWp*Jc2!4%=&kQ=)9m9glC= z+fk)bA$x&bKyUQ~by8SNbZOQSBvfFYdaoY2T{`1b}mTPyEM=m-#EpV;y z(l()KR|4EN%6RfFeVnUdS>5+^TmM4$sK4&sTlzPDD)-LQaL(7#4hcJXe|qZTzL4*S z_M7iX4E3MmRQmjIipH0@-YRD^q?gVvnf^*RL$Xa|{`94f=Gl0^dbjKUzi`j$?1zRz_vDY|MOJ73723!zk(*I1tNZEm`pB}6mv1H>^*H)3 z$2xdj)*rpy^GZ|Q_?-I>?X_<%yw9&M7NcR4Tl+_7^WH4eE!9_J{vWxzSZ+=2GQp_C z+ucaYU~u4@*2pKCeMV z#d*`ex&M5X&-`EUyq39z^|$A`hb)1!)F)RcmiaS1R7Gl;fGk)nj zTrD)M{pi1tz8Tl%PmfKHJU!E)xvF?$c`Wze+G#eezs}{oUdPSw_0ZN0OWy4YNH;C| zwLbFOHy-C>FLh4t*phZ&!t*szZs%TYy^{I3{K2GG_aZO%d3Vn>F38NSHT~7w?4bJA zR95V`>Y9YohkKUXVydk4)cu;GP~ll_X{`THraCq5(&Tk#ygyujtXq6Z`0rV7?$}@D z4=x>Qoms%SuI90jnvL?|z??s`pT_0yIydKY_tJfZoQ*Y)FF75a)9C%{b$U!xl){8b z1)7h1Vh%lgz0Y9Fg+K8-mherP=kAj&-{|epyh}(=*Ci=F#wji(hD&zG6rDEjjZKe( z{wNh_nmydn;+q!ZbmjhzEfbO}TiQ;1JW;?|SN&M%kfLruCS#$Hp5ynag_)hg;SYp# zisND~S*kw1G<}ncV|ees6I(>uqR-vpIkQzfY!j<$_}cul4WcieYB)t4+;qNC^Q>8h zq`2#X^4%YrB)fd8mkIv*AYq)abXu19$yU*bEw(Ic9lWI-wIe5ot$TXGYuf_Od#0V* z-@-jr3b(snYnYbK(tW2{HfpE)e&rWZ@rrZA|8snw6t?cSr*`D#&9%Ie8A}iGo?rTM z|CS1V*0l-OF1uggDk;oUT6^HqH`Tlhi+2~ezEpmj6jre7mDmNYlKIxZetkXv@{ib$ zFR}3vzD=PE%GY;>3QT&noME-Ycj3m98_uVzhBc=Ce9S7!w>Nu1*U6hgtFAPOhwz6O z-p!7g8z~&R?&*S4TLnUMgy)^#aYE1-kOeD7M6W4C4~C8130fQ6MRN z;pn30VhyKy^&F2r+8@R=b++QZmnRgOPMzJzthGT$-JqfCy8+1 zxs>V0b9R5khtC1bK21S)G@;ezb7sbu~^3N*R?ptr=@H0?A2kzn@oK>wI?LM)8{*W$9F<<&SYhU zqfPH-IQMMS_-^9h{A#XF@{{m7|b{};XqP;Cy|B$2W5-MxC=Eg|b?S!TajS+;x5(x^XAGek@auD(4J z`Rhz}^%B9eQpE*g_m=4q`^P0a>#N6}*7@emX+Pb+K6P+ko8WmM=vZpt@ePMJ z_r3h?()sHF_ru-4J4^B|taynPgu6N#>8=k+Ip2nCzaeCUp9cq6s={(r@rEl)zdB)Qp9M~qW#AZ{y--WxPe|oy2 zn*2P|wKtAEjXbb=&GdA~MF(r=ru)9;`z@q_=})b_(hqe(d*;yE$#?gAHp$ zSWX)8KHE`q^poFp?@h~07t}_Io!Mq%uc9Seo*B05o8`lG{IjNR+-Y)pk+{(ENcCNg zn|1yz47spovf|3Jw15k1CMUP2IWD@Sf7U4G`qD`LX~hfIO;58Gva+6kM(VHHHuJdL zi%0z)+fG{kaox*%|Ncv_muj7#|2XtdjD4`J>h`l*f287mY=5%lX3bCklea6T>ONdp zIYB3})Z%RL?B1f)tQBv)e?JH?_4+E{m~eNEgL+k0TYMys;}?ZU-D#e)a}HRS`Kwp) z_th1vIDUDh~i_|2-C^XKv{5{E`r% z@xQ3nW%1u{+OzyzRV#I7{ikVX)r|#>Zx`(-nk6kaTiu|% zA$MyI`~UCuYLSa=)f1K$I)8U4wGppPxtU9SeRvK324RC}So3`%U*Tddbopb!`Tjgc{jvh~(XArMZxSV|%FVllZ z-3^{c!h$B7d=<_uRy4Zw&`#&_#x_B*mUsK!+iCSbsuy%QBPeY;?Z?EDSz)EmC!RWT ztGX>EdwG4rl+~M7c+J1Ok(clACY6xnhKqL;3O}zszuS8%qyFy%tDGaVE0g$NsmdvP z7w=1W((5Q``z6FJH%fZVwk>P;^OW@h8eVw*-pT*q@>1LR4knM?v<~K_SBRx8)n&_T zlk?bp{oQ%S7LOS(cAHoA#jlvSwcuOAEiZHTg=Jo;kDSa87hgQFNXop+-jnn2Tm$&@TR!E%n@YOWNW!(n8;ey9Y zd5@J}ZJsH3`P-f1L(dX#m@Bo5*>5aQTPY|Ie8^s~_wi#~j*IRukSl5kpTa4YSX}8XKAKhv^wKXbY>XF5Bvv$wAcyCRm-nN^o zj+B1MndRl&>oMs@wk!pP*i(qVsyg(Tro|#-fg?(e>o^;M5-O$rt5JlZPD~|!dqGQZ}1eIk@=>x z%1^@dRbTGeuP)p6Y|ej?8C%Bi(^7fj>cfG*n-^|*QsaA4=jO5rA<5O!-}Qakr)_im zbYZ{GCbP+_BE=ZneJ|&hNNmks^5NgTJK7CGb_TPU*6el{C|}4Xb$ILNzowQ7Z2^ll zwLf1F$`3oA{w*%}SAJ6{f8(Z06)L>U$Np|84_alW#CwXXv)KHz?`oePUcRrB*j9@w z7?iCwm?!AgsgXYQd|J8s%3~913yLoMoO7UW+sk)x7OZplXYx5udLNN5Efb%Ytvv1L z(bQ)f79Fwj{<~AZLF(GK8fMQc#Z5un(U(@ZP88dDc7eRh=IHvmZEWXH3kj;+u}q$^ z@t9!b#EF{@{rD}#v}Shg^1qMm7B?)Ep8Kn8tGd7`$K3LgMcak!UDsXx`$MGCW6z1d z%jP;&K7RkcKPBXugRvCvn#s0V5xca{rTPaIo3YqNl$wS!^*h<5+gfzp`*Fh3aE|Y9 z?o$P8cLX-KH(P!2Qw=+_-Eu`rw0z7bCRWx{UxF1Uta-cmy$$D`#b>5}w0)p8Q+VAq zr`jW&cZ$xulWSv5i`wz>^|$)+vz3Z9-)ofjaCtsXcY-f)~>r z>Cbn3YPD1EhaUJ-<=1kbcYCe!Vz=tzurEiWW;rTqtq%Re*s?F^xY!Z9qQ@DsJDC@6 zTfb*w?5%TJ4U3`!Ywiht2*06N^^$*`pVs3x?+2&VZeDb9%0E7Pxz&Elzhx$x7xtc8 zzIdsMb=2YRAg-*u=WK0e$&(DreNsyAl<$!BoHL^^>(V^o7rcc@E9R6XSHxHCeY09L zdHT)`Wu<$X5`+)Ce|-|~VIp*8)A5{_hr~17zsqWDV$W1|O*)wLOCs-5lD`bQajjeC zeBo(+ecHP1%Vn=ua#j0yE&8n=rxBa9$&h9Dvz*&k=Q(VilCve`PyVE}wl_Qb`dRWa zOt!0vzs%$PRHPa|@oHtt`ORk}#S#r)EMhr3YED*bT&9=rSOS?@WG zoqjy)@_BJ&@7%T9md-mEF})&YdX2)gtunrPj+G|!9x#iZG@a+KFx6{PidN&nyDLL( z>IUs`yMKe7-TvZtmPJ=)&Rcp+?J)c8Grmi>`FmodIkp~q^(Zg%zsol%<(rxvP1oL; zFYDJkviXR5)rF4bI`*u0+qSnZU*LSGN$MIX2>zw{b^UY|8&yk4ePuPJ2i#;`a5w&OFsAh*kr~PH{^M5#|cO`g}e$n#(zDa z{Z_h;#OntUjxO_rx3QMm1z6s$x^v>>qs!-5)}D}zTle?^|Fo$2iE6y60=hrFPDR;2 z_ndLtLVma3@l8gbSBg5_{`Gd!fv+1+3Cw-q_WAf1k2v4?caL9QeW!2T^|ec$v-iJ= z$zO1yC+Ae4^J|{{i&tOh+WDhLMS7rb&;%V(Q( znelz!c(rJW-P_*ItF==$yRH2EThNA^aTl8uH{X!0zVWO;r&hdu;YP`Am6r@o$QCRY z(fAn<>u-^ID_u8t_Y%`h_sdt-u^;Wq-y~?o-T0zzo%&qskb`0s=PReKW#z~(RW3jO z)~C+v@bTIkf@|((-C4Hu`jtz!UM^j`Rd?P0ci#QXHf6V@?Rr`4{4a1W6=7cZR?lx1 zd&&Is4_@S*Q80XLAh6HHKP-YryYAhJUqLmqr)#FFuUmfo!VbG)qlMa5|La7eUsa^Y zoV|XX-{<$FXNDWEw6HIg)x6yx{h&m3p~&{!`Mu4b)w$kWw_N;L-OJ|Z`pa5MVhe7) zC_KXE+0vL`ctM#*?(nwXz8eyz%Qdpyzn^IGckY%Jxt7wKTav3ebz)y6sJ+uzrLnx? zW6iqj3HuLEN$e{+{-|iuQLl` z?$+y1Og{Fh+-3LHx3aa7j+sJ-cCB&0qmaoJeN0C3%(K7oPjhM)=xPeB%`sf^VaBHD z;M6O!Lq|-Kp%+&g7{& zX;dZm_>^q%??V#BzYiHdb2$sb{rtYpdX5+Q>;8WJx_0W)w+x1FHhn2{O={Q7_AGO0 zx}v1g)etH2#_4Uqg!|o^zUB_c3|^`%Ni<3P;mcaB%H^}+OTfF{+0(R2O~b9an^bnM z(iUQIUFfw=L~2*wKM9>rCJWE~)u?!?5dJM{RfVt^|FK&a`lcsai#`5eI=_JRv}eaE~SQqQj%6iefSkbs|Mfcfkc6@nv z>e0%sNXF{$)U%2LJ1;!1P}^)$(W$iZf=J>geUaL{qYDpRKY49tZGqIaH#ZqdGgJha zO>V!_+SnMP7`>(|_3-u=GuGy>iVm*ZetRj0S;Mo3j{6I$(F{Pga+6%(>;y4L^Pn^|-Hrf1^yn~C#xTutHNm^)v5 zvF*)2@4im!Z!-|D)##q3y-C#br=}^(jGup!%MNlxvj;f;t?~_C^7Y2~8LOr$+N*C! ze7~u9*DA@RPgQ>A8b>Zq-FcQt#Q9fB>49~PEKh_o~ z+#_APgU!8d&LM7%KgMJH7>aKsD9q~_D?}yIOVG_!EULx(OcFA4IL3UP& zvH7%lQGsr&9Vc1Iv!1>mzK{F(I{kA!Rw|s2PgG75^XUETq`(!BEp}il!_6X3^;dqA z7AJF6?wy%iqp|7yI+4}p%@+2O=OV4|*-5Vsl5JU-L4y^^p@})vw}&?P;%$ zv@STUsm3(^6`3*8X$JREsBK@{1mI z1buxPnEZ&~ zecY!q{nGxR3%g#1UGl9pV|ab&aVodgqYo9YZydjN=?ve&D*siMALbcM?sVx-6{_c( zz+^u$ug-UVbW@X^`UjSpz74yhV)2{#|Nzr4lAzD~^f zMuAk~;^{xv&0m)M(Qn4?LiQt84jT%T!zvP3_7_fQ%dpKAp0@GY9kYe!_^NI#3&^`I zVt#iUC;z=`W?MzqKe7wHcxg>&w9%v*=dXLSmtVeoPoI%%Y0)MyOGc6RoS z&GN^uubj?Qs+Btb0mIt7xJgxM?K!i3xA7koGBoV>8JGba^aqjfLHSOox zB+krllUMWPEM;q5X)kb~{5+44j?cqy3fvJ(jw?spx0E}${lP8a+gpzRo^jZ~u2WM& zEcQ<0jm9X49>4!jd3N`4wyCNrlv#+2ct4zN{PWP-?IDN0cF%jq-FExW1CGmUPdXJb zOb_+jc1CLFBRZ}@b#C%j^Z)9D&BnZ$rq zTPst)xNF|Gem*;4Rjh@*g=y&ur)pcDX8E`!mH86Zm6GDFev-$(99fz1TW|k`uouU8 zRVU~cUVp^9l>PCqEr!337_HL(<~Lh>{jS`&2O`>0FHdF~-2HJTbJme!KWh)}V{gAY z@T>RBz2JOw%4YZLj_hOWw>@6*Wp1vrq+>9T-4P}6z6X=?IJ~sq^k^SFX7c_)i|FNd zMQI^Ei_=5oPRWLQ^L(yTUKDL^lJ-t=-jfwGm26$=Jv!L=>O44#UZ3XY{8%X^wD(ol zfw)rU7DJU)?`pj+UYK@Ir7^EH==HW|g=_(xFF8x5nH}AHrAGDIvzSA(O4fW`C>7_p zv&PH%rbRWc^yOpLX<43uG1r0*KdW<6NQ;sC?HTgD>~Y#YvrT_n+FmpFGw$L(%n%!- z@%ZER{QcfjR>Xh%-v8R*Sb%Zpd9(lr(Ki)yCp$@9sUnbL^{8@ebwRnK9ohqQp-&zPmV^hk2s8B%5-+QO}L( zBFEFd?CzY+zGP3_`pXsv?;Ci1%`{Re{1DtEZ>~?my&c$+%ipbg zv+e4Q>SMCA&%WAn-FR8UxwE3zoD>euh?ShOSI=fq+&{6L zPuuzF%RH6p_g@W!{jL|)tg`y%`e%-)O~JZ3;z`v{E$7~0T76c172m@2b4wjgtdKuw z;vjwS%cN_%vkz4Lsb~p)*}P@?US)2F_XpR?b>9B&a=BDm{@`1a)ORQ5Pd?ThzGp$t z9L7`oYo?#xC~MB+^1aVVaF5c#dYQOgdy4-V?)a!`QI?q;c_HT91Qx&Y;$w4nhBo$i zS%)6#Vx1!Cw);)CgI@mK#Riwd-u8Q^zB}K3z#?1HAy#DZtz*pz9LHq%oAwrUc7Ih> zjd_$bH(35r(xO*Y9jmwaA8=*9@%6>rPt&T*TBjfIbG4fh7QgFIsn6Ok&sgrcYMb0$ zJgMg6kByQ?T~|&`iGRLl=|YycZ$1?v=KBws!~=*{!?!Fl*h{ zO<%>naX-<|4P3Ez|64!b+&50$8uhE6FE+}#a>8hemo>k}X3J9LwhEKC=QCZ7sZRR# z;g;!PhN-#J&d-swcRtJDGighbY{If&x7tVV`Tp^3HZV&$81~gR=3rl@U7YwN!}#^x z%3|{i_P#sTl~ua6Fd!p#ZLX=t?R>f{HNkEA&FuMXMxdk zxc-!l?C%}Yi*6*UZ`j#!`nJfvXU!?|`=pQCaNe^x_AKN1zJoUT$8$c;oWIGZqUBK4 zo+9TakrY|WwmK{GUS$GeW_}0fH0R#eEdtXb)99Q zVyA7&UP;+^eAqgXt7*@f*OpU`KJ~HwtheV_;{^2ymrG=2r>FGKwr$FLv%Xbs633=Q zxA6YY63@J!%cb3TnG>gc@u$?Y1)FV)1FJKAmext_ey3lvbbFi0j)U9RzaC2OvoGqN-og9h+woBAYGux*+|r($2Z1+z z+l!^=f2<9ao-MM4Vc`rev*@rHwJp|e$&)5Ue%*NR%y%u@z4w~h?f#uTw@`mtkKS`H zZR1kQ`WuO#oAvAiR~BvlQT)4Xh259J;`wU~)VA3l6K}765k| zKKtnF;DYOSpB>-hv*T&TE0(nEEVj?HnJ#87UOR^=_Q&MLGt>67o;~Y;o%D+P%l;tT^?|c-2Np_xV~r(~GjQ zvfM7cySayB&f3){wfLSZrrG{ZIN!)~RyXs^u36lnvv*1JeLTveX(n=-Yi)-7r* zmMq_LsrP7>{Ekg+-<}vq_lMs&dgf`6;}qMaH-3CuFr$1r<4N_4QEK{^BmG34+`W2! z{Yi&{9Lseb?k{b&#h#f~{6+|}!}`tRkJQ=ua|ybc^2g$_ritO4n3r3nTCaRbN_=eYU{oe2Ig9Pq>m7G5 z774sLcG9U|$1o;4ua3>Yn@Qe(daP;0lUcfyjDv%AKxxj!;WGRr1# zrTXIe>?tW+YQ5eNn1CrK3mFp z_=iWMTH6wqjMqOa__lpqo)&+|Y~PkQu?xhK1GhQsco%t@VWI1`qcPeGx;;t{%o5yN z6DB6HozHw-*uU-RM=o4h{?#UFMTzpssa%dhUS08Yj`)W=9J(UYVQnuUVd@Zjj%OC8F?9=4u=lHH(=5BH+DpvD+ zw7tv8lb=7zg!8{DYnfWv!8MaB_Uz8-k7qf*`W{iTZQY%#iLNRIZy&iGD9&^{Q@*65 zL2bKjh06xE$1_&rDa-HWT*3#pi)`hu?)Fb&-Zo{ov-Qm7m(OsY z6_~N;?$&MRYZp$nmdsFi?RlB&!eVjJ86M1wSI&_ss^8@i{d>lN8Lhseb3R-M&pkP- zXLp)qveb?rQ=Tb%doNK_=Qn;7-XgKDb(3;R%KUj(w{4t#X`yDYc7Rx5bWcai} znrF3wzg=b77-cC`yiSi-vF4iU1J}L@b<6(NzL}Yt$swD1?%bb{TaoAcm6jaYWKoyO zqje?xQ~jsP%}?(ficV1MZG7rAxp2p;)_X6t!gkA9uiG3wP5-*9+^d=Xf2~wsNam|^ zvb-za629h4NQ=lqU5^H#X7*O?XB>NVKfE)Vl1e3m4??qk0YR`Tvt$?4i#o|lfa-1*kSYx^Yo+T=9j9bKoS^y07XSz(`C z(^opxSy_`DnGOP;L`aYPbm4Vd#=)UPE!5(I)OdwIvHA* zUf#1iT_^K|wf+j9*$Y;ezj?X-TXFLBdz)2#ex*&Dp#8I<_@L^>V7-u>f(&OFpT%B} z` z$%9|bZQS`~3AquisR})+e}rw$_XR&YHEs5@QyWfAWZm57)Hh>GqTR~JduE0GvIx64 zRnT{vNIM;}zD{96oQ>crE<-BW9cIE`PDNe><11 zyD8_rKJE6yB`uZ7nsfX6cIVuWkeWK7>}Q<5!>#pm_7m073nSY#(%zA~w=Q81fvzs0uDRfiUM z=&k%Sw{}V3b9b*m>pgw?&e7^czMHuIOW%K(mGWNfwd`G`c?;&K?+=?Dc;ZEgc<}6V zCv%RUb6fsxm33Q4n!=VjwbGuB_j|jwoS6T;-E#U!&0Y71+uZl{xZeHzP#+o}@@&ht zo2t>gd22)CcfL0gI>=;_u`>SP`{Ejw`;T+@4ZmAdGp{>UE%qni{e|!QqSrZG_#P?m zIDO$)y@xyJIlHc1eKyhR%;dXz9GiYsFzLQ4-8RS9agp(>#k-~%1k9Y4svy0DdGqe{ zJ9_)Ro-ov8Uw-1EC+CWQYAtWJzUvpyCH~Y~GIeP?m(Kfd7Of}NCo)UC-}_20V`t6$ zndPUvl0Ii`Xi(s_JoJF`bYhvy+@)Whcw9Ugv-fu4tAemHLAQ15Y|l+ywQ$qs+@3Fo zSRHz|9LfvTPG7-k5%$o-NN(|ghl^GRUfAdG)Z-cBcb_jm1I}n%*m&wi*5B%oX|0Wm z+Run)ie3m>uOF(``#gMuX2>q(aNRuyj>fjKl-r&qtLWi*@fF?dPZ| z=ZX4xB%+7!h!JbNLZIPkJMVixBMjY&`X}F&O5VMyBt7%z0i!*(nu2Y2pH13vt=q_V z$p+V#HzbW$zSU3T zdU4JEkWUkQa^<7WOwHF&-tgczt4>btDfSOM+VVdeR`c||kY4e?W?}He zxzW$9>@p)rS5^7fgL}4`MvbX%0#To;8M>!Voie5D*6V*UhXa4vNnSkBcInQEuzf4t zY#9!ye=?lKE9<;H?b8{;oe@0$9~@Z+oK)Nqy9-1QnCB;pq)E!{mMR`8S8$*NB= zpIZdOj!g=?Qdyt1l=u1RDarXs35n-sO`Cdu$&mu{iTCezKl{ZbpElp*`x?pJPXqaG zZ@4OLQWBzj^@W&k_>xAa^K$N?wVM)ivX3$H$A`-tw=iT8ayYZ>=o1q&lSaPalj`XS z3^RG>?%L8NacSG8iYYIDPc>WrVoCg*(=o!cr|(cR(=R;hZKW&}##67wVsLR*(V2vY zXXKx3uDQ~f_HOI-jnf)v+rK-ntjPRs#mM?l$P$3@|_|A?^^A0PX7tvxW7tgx8&8< zzqLk3_MiXrctd;C*T=E!jNFCw30XI;S3J8lbN2zK#p$jK7j88)Vz+ykALpEPMWd`S^*G=du*I+CEfNui0Ix(zfa0&elmu^O|NYY<*j?bmal# zX-i}@cP36-zT(stvu&Ec^8=C+Erjh4q+D{pzR-4&(jT|YrfkO=KQ#5su0KDQk!$L! zhg<&btBXsTwf(n1$Fc9}3wA#Jt;La>wc%o{JKL(~%v=|iJeHj=EGrJN_nqi7`rEiVZtvyw#s+^XHdH=-%j>aX$__S`OK*b@ z&X_iB4x`Z3RcjW#E>KLaeR0srGvj{TCa!%y?DI{0Cb&KS&6v6Mi~Iz$vNA3auiplF zN}CQO2;CIfnybsNwf6iQ<`n|L_7lpu88b~}P9Bsr?l^Ppq!Ls9>`=z_uXks5*qAXj z^sVK2zFkBlaZQ-c=@`KYduF(p=RFn<_Wn4x_OR~6H(O@SX|mgYNK@tP*9FDi<-Jx- ze6MWg?`~4~#wVm!zGl}XlgYkW)8CxiXLRww?dQy1i?w$3X&yVce)`lRP3^-+a+kU< zY>SKYdd#qGN#9k)_4OLOQqo-)GT^;hsSq;Io*Mpfisofh1T9_$=J(vaaE8~ zThcfEEngR`O&2!I+g2R4OStp9`u)tT-*%q01~*#zMHnURmOU+Sap7*@)zSPC`!%n| z`3(C-pVq%IO8>mhlr_Ftm&WaV%E2wCRAKhxS5CnnIL%tiN|x8odAm_Srmb~Kje^(W zuRb!R?8n}!vn16eH9uioyJL0AwN>-B?VA7VsUer{wPjq3r8*y0xaM89_`d6i*ZEW3 zr`A|s*|}xKivtJa)?Hs|G)3y(ZYxE1(cN!Ke{jC{Z`^zB)yrJA$of~UuHDUsh3RH3 zy;B#z-&VUekNKwg!TXbDzp^(qT&&9|^Y7c`+8?=c>SE8$eKoYQR|SPeCd_zP zel-5B&!G75?uopHOLQw0Oh1)cV{?7Js{2NnK)|6LPHd zRO=3yT-rVPN@7xW!O4mC$*ZOt3qF1~_m9*;^O(6F;)k-!9{0HX3liG)t{`W@HTTb+ z%NDO(yvg)x#J#5+cMPW6iq*_jTrY6OiRGKuGskt>uKk(rQmlekRdt`R>DT;vK55;? ziuv4<(#rdJmYn}HN&K~fs`_ltrX3k)nF|l=e()}A+^v6nO_7SF!L!DH@suS{Wx~- zu5+d2Ok4S4)>AK^RodFSxi2p8{ploG_VJ;V z-<_)>;+JAwAAf&QUV3-lOa=M2-SH0{N+xw*dm(c>IR9Y$kF1>5fU^8^qG!17TKBEW zaIi7c>VNP-FHoq*iKXS#zYEU2_a8j?Qugs;New>*H@s zWu-swi>6l$|$tiQ~#63}&kv;}Z zuHLEE{VI&QOikySMY|be1jFPr53dpbpWAcVa{oS?wBK>b_Kdl|j;Y9T^V&|dUNqt7 znbc`DZ4ZBbj}4vYx10Ok59b-PuIAmy4y`eJb#>CNZAlk6wytzHDSUjtY^%R?Npsqw zjZ7;}-*!xV9I*e5Ys|k%Vc&HVpH4ZQKDqDkNr8j9;re37KHW22cm8A7%5afKFIz*O zP0iXRs}5xq+f+k`#MCcLwI z#1<(QCcf5p_kN?AnI1OZD%ZBZ&{&gqhX3NkCwJ`S7aiWeYHLr)xy-BDp_8{;tiPRF znJswX)=ReY3&Ixv&ExDZ*&O8S6aMP?nTqd0+Z`*jQ<{_|-p=IYyS%}!^V6X>v(_z| z>GZbi$dXh~-P?1I9Q=4d|J=Htq5CQ<*__XpmW1YQ6mPUE5{#cKmr|CryXhIzVTM*) z3GKAJge`40$-1$Z|5UCyqu%}V*JamT_gnXD>wEVqD{lLPBd={kX8l{s@blc9pX=PF z+TWZnb+GE`_nj9_3lj@N(vL1F7Px!&>e^)s8w~oFy~|mvvSs)084YiqBu;gxwUgoa z{%yiU%MJ7NIUaR>6J}Za_rZa(x}pU;-q$;P__~6-DL?gcjNOJGAwL4^|9n$-VmspT z|L^KQzkVB@;kSRM^!DZ}zB^Uc8H#^0zCQS{e7#HHl7`L8!pj~gr3XHeaAbMoz*%5( zIYnIRu-A?kM>eYL-rW_`P=2Ih(E`pq3;#HSSVPlh4V~Bq!`x{#O6>YbdX zY|b;cT6Aku-yh>*Svf14&;PC`G$eRkc`J8SyKUVRc_H=-^8zySPF_5jUaNIyaa$f5P~~JAEeh^ZC0a z7nl8>o?tk;pLy%;x4JsdQY;LYG2QL?GI{D+!{e>yzfZVsn(;PY%=pObjWawnuLrgr zmg#>wWYgVKyne3?x#Ape(2$+-|MH2OlXX?|?!B@O z{xYLk{ok&Q+WXeGHy^(f{O&`?euJ5(i(?K~KaJhUb-wDX?1ClpH+G56<@I@%d73-D zQ`~tPqi)#J^RnLy_grAH`EkK-VXZcEbjysGCu zB^{f%L00H%)w$5nnXdDM^R|_*H@T}Oqjp|p?%6}}n^T$j>??I{NAGC9Y=3QPOHpa1 z$mJDnhxKhH37_e6J!YG@bJg?3Q+yRfe6rVsn6GL$%+2zxd_|~0q9%WCtfbabHo|7vbC@PBdmV|8uH&kKjY>D&zv zU8X)SrBK>IrDxvxX|GbQ1^KP4vHE4M75*e3^0CuG`P1(oHXdCo`u$4FAyqSJZ&?(`+$rT;Fnh00DN}`y<2~J9p%a;_f*g3Qb{xHaE%T#g%O9t`qWyJG z+T+g!Kit3eXtl=~_rnnncmt%bhV{)?zJ4>k*Z0JhhjQs}f|p7BJfJ5ZKG8Yb(W=X( zl;zBi(1Nm)malH~-V>QB`QX5>7YzX~@7e6J>yy{c?K@C6^YiC3Maxfk&0&p7-Tbse z<>#{72@#3CYCYR($_`$eyY??b#=O6*7bIRgEAX7;I=sTrZk?ay%HK zXR3t1kDqjBU)Ag<+n#4Ta=kRz%<4GX{C9+aPt*1f*^Z|sT&&XNP+L{MGIWPrXN6?e zAE^brlBMZ4?7X@k&VBcK{o@6PZKnNhv$~(ErX$CgcDUfh9=X@`oql)Ut6EMt{(sR1 zCf?J(Z`+qdy@=qCkjYociv27ezWws0!%4p<8!_yd`uJ?}=l6+$mB-b+0@wArAI`pE zsN!-kLQXvrg;jWSw0&P1Ijj zc@OjSnpq;nx70t|tU9&%#v9>Pd*YnUHcSqb{QYe8)g=#7?`Iqeb2{Ih_s05`hDck; z{C&%-7QW2cbMlKv>?>&*E8f6W3tT0a-n-5qDt201%FkrUZZ5ZZdl&UuCfu2l`R3v) zoBBMPp!XqS2R>xi7#b9JF$K)B4w(`f@@?0Wh`I$CD{GmXi#Sw&g#Bw25p;2rt>0&O z_|#eB+m}P#j#~ch?lLs_DmqzqLq<`#qjiYiRK7PqL|fKJoZ7pjRfzZYySB-Zsqa_u z32c!l3;I1-?6Jr6V>=$Egn1|X*PW3|)<4PSkafE0`h}Ql#<~a6<;0&PY!UoZVE#2L z_pw&mwH%dxN7j}#9dZ}k`q`({FFa(+{%`;GfIud>)6P9gte%IxZmU1oD676hW93JM zC(-N9ta9k~`XTfodHuBe%ymBTXFsp?l)Nzew1|vC{l8L^zA0sqDwZbG>sxh~UP zd33{e+s`*`_EaRD&s}$eUWKeNre%!*jE-|N$ZkXlQ%=2;Dl7lh}4R>!# z(O$>1^bjxC`RH|@YxkGj{rEUjj(zS4VXt2-$Jr%gLf?x^>ZYrhf15T*wDd1e;j(ky zJ@3Bp*=_AGUZz>qB&U7%t!&x7#Q_;L8&*}#*Vr;IqUjH(_SIr0w`j!!7T=!DGXCC` zzdLmy+p8TX)(eaMj(N9(*=6^oBg=c8C!XG7uj%G^{QI66g~2l_9F&ZF63VS7S9|ul zND9rKTFrl>B6#VR9rur&*fMST-X~H46SEI|d~JSS*<{D#CEHu95B{&VY0ONRQ7cyd zft|fgPoJ&LeQ%vb3gh+Diae^#iWVu4k35+AlX;OZyR(4j#+Tn${Y_Zz>%AhqHRoT_ zan9+?r+DS3TS+|mxR6ibva?pg0cN8&R_#6tthtI=dV z0i$<211zHwjvMs}Bss|`94_`c#CN7Za?OjT-xE8Z-fq&&3%?M_Yu2i+`OAWV)59ts1bP$;_@( zt1o5!Od|%*oL%qk?pq>ZI7{Vd4%6YC%=cx!zW7|Z`Dmu`+@8rvFK2!{(i?W}`OI#v zw$=X}kG|E>itT?lyHQ4?_3NG#4YjNDL_0sH&HtV<*TyU7;*wr}77q)}7l!+FD2R`@}rI%m}L0s@|in6%odwyI6JBIyG<3&X&Z>PIs1w ztdUUfu-g-V&+@KEf1P<$rdH3+OOFgr{aey&q1TZ=Q}=TD%=yu5Jlo74r}b%@$_<)tsT zwK>~Y>*jZ$`{oIYPJ`JqRz7<9Xw$Uf>(4wV_HDlDv)pdpPu)6up#tFG~#DhZd^UCA>e z)6`(`R|eyy8mD|Rd9;rEK9Ut`O22)oP2|DN*u|!gUmw@qE`79o*em|`_!fz!uf(~Q>gs-Y(%jq?Yxh-4rgz3# zro*bgJVG|?kDJPKDC}|C`G7+bMju4#%${-!J$f@)a;26xV_~aVYxdr_#~0Nu{hhe} zsqKfbv?qt3yI<&@xa(~1kC~dYgS=VSh!-Cye7}#m^MS9X{`v*Cu0<^}IJtSVezg*( z|K|7$H*RX`Zo2d*Y+YuB2_KYwXR4-MJY>b_9r6Q`t5nKAFlN4M8qjr4s#_u#Ta zH!JqPnS0A+Z`Q@b+DgKCCK+36_L_GWS}a?>x!PpTikn8KEK5JX=qN4kFZ^?0<=4;5 z%g?U+d*Gz5=EEy_y8`c>Ea=)Z`9{j~!^@_-)Td8w)md=p;-BNE>h3W+{SjJw>;Fx? z?I|}41vv7au1RnbT5$ZIxtR#-wmXIU^LUDHZBq%E`A2|PzHN#WOPjE-di3sMy~0Ib zH|twFKb<2dp7fd9TFhddH}j&iXJ=dza1=PJvNf_Rqw8?xaTWDhNskvE>Mi)B6Ri>@ zw^CWx=Yn*Tahovj0*<=Bg*j4|0cZA3N?%>bGRsq6Wq)nNQ~#eE4iu`jvlf^aKD*C- zjAP;?3+L3rv|x*G-@N)gbqk+0_Hx~rV^i$4Ac+(Y6l~w(gQ%}n? zuKX5X`TKfskxE6+I0y_`-F8A`j+swsH+(whvct*WoZbKYhMTSl9JucAGCL`_-Sbo{55@FtZ0LV$ z(>(FSDb2#<+aF}gJB>f&9Ms%@P8qNXwWMa zx0Pjhj?Iw2S2ZE4cS3Q{`Kg;%DsRtZn&w~UcH-1NMG5sOkHZD8TRmJ^t5Q@wU3y;M zovYV*-Hz^HuKPJR$Zx{E1=;SYtJI2?&(_gOpYNhKVeO20Rf^k7!-4|NJd%~t=xW*@ zqs!HO%!pCyXUHACN6dfSV=RSozOE>F*SGv+-_0xKM(Ypk4_F;9tbMS?_l!1g_!m>d z{T7oJds;E3mtd8_Fw9jbqh-~XHVSQp5EHs>*5mcadryxysjB9RBtCZ zWr{yaV!u4!@qB%*S6W|y>5~Z(Gj|pXye)k4g6rnrbDNIuE~;~wf8gNEj!h98V_)Pp z@7-eDb8*R`Q)_N6efivf#)B1SYBtPn4d^QgTl#eUtEV!P12RoL95*c9`25#yH|-ry zw(PIA_`1}Cce(pY#UJ0(cEsON>)b3Vvc9|RRL9~|zUwnZ@7S9fu&HhQ`N?sc`GL&V zc%|JfZ(O%zA6D?1%X8vM_M)jjxEdYHc4|9h&5pduq4p$Ke?vBpMVAz5Q{% z4PBA{cW*hXt*m-hR{dFMep7J9`xi|7y_0XTJzF!M%kb~NRX6w^#@u|{r;q#$4{2#CHv@-Z{??mdxuKSC2zFox;_H$unXxB5_<8k#n|IapgFL^6?(zA$d z@~XF@aiId{K!X^_vo@$LUh$s)E30u#62)Kbk@?rbsg)`*++Gp%zdp@=BjhV&!Qsbgu5uP8M1af~k zhtBG`{os%FgLUU?zTMa=Us<;)Kb8N;um7H&AEw=WZuLoy%Psb`kC)FR-O}7|K1`-Y zJ<|n$K8!3`Eb!;T?Q>N%e|EfiKpS@_&soT1*^WnRz8Ul0w?cLGA`un;? zlIF2_zP-ysD;?D?H!b|zAi47M0cqRbdvKvb@CLo)OTOeEDx(WccR*?;54tZlO^MdzEk%~tqnC3XDVyUeHEx*pCfgr zvH4}L**!z{<w!lb>sqqwTNnxrj82z1?3ndP zkjehEjJFrZoK??{v!`kQG0%}(vT5#`7YVKNySetT&#HXo{``VqSy-I%i=T%3vQMwu z$M-Ma>QL6-?N07LmJ4dc+~$w;kQ8sYX0e5lYt0#7Rf##(v7AdTA2$pN~g;BB-KI8>5<|wfIdr-S5X|Kq_){Qoz`F@KY z{1kPn{dn@M-P+HEEfX$~?_&tuzegZ`|MR!4mCkXxE%!_OiaP&)NGdsSWmiSf z4JP&VXF4*4*ylwz28vxj)wt=qm$QVIyurCe?DPHPB}7Fw)+)R@Q?jv)<6D?!t9Hlb zyHT6Z+^CwXw#lzmY?|fk9l>(%XD(%C*=@dLn!E;o&BY9xigKB`-XB+LTvN6wxYZRt zD^5N9r|k0GT3>%I+nx0J9cRdoPv0%qNp`Q7`Yoq;KaV-_TGV|0H->xm+IDrxh4nm+ z;9I`J!*UXUiX9-TPAGD;DPNR8#0Uc4t4E z@_|RfYgZg$d7_*Ac(H->tfWxEBl_>Y?bPNrue^J{u_rT=FRt}`*7JW3{TyfcuM|i+ z|7UN~V8n@b!zHJMDRbL1DVdVdmx64HNb-Jr>>b(2VVTqR;AY z+rmGa_pB(f46p7~^jxj^kTI#werMzE_Vz`K9BXQ>Xw=oyNX+{?M9WVB$J-s zua6w>86|Xog&p3)aZDiP{iT@^cLY4&KNd8;Bq3zk6L){@jvJ{*c_lXX=+4vSnWLiOE;{^s8o=v}Z5T zFPi$qb8@co^~!{f`L_FBG%kE@JR^DH=Ssf+{mMVvl>e>z*{>gUe%kh_`z(^QD-Q|I zo!0r3*L{uSXKNWlnSd}J_pED$Zrtl98}G_ytNLAfZ01gZ=p)-sI6W?Odp7$)w3On% z_3KwZH{G{h*ZANR%ik{xdjHo==-qyW!G^Cr=<8oYC6|s0rn>8YA1_^gz((_<+JcW( zvyV7!`tmEsIrwmU^V|FVS592Bx;aPX#QAgi!NPrWZvFb1`zvTEgWJA>#!IqAZ+>on zy!6NSci)>H^{idQl6QA*zihj-fQCwo@Q-KP>ffI_H2LnaSTByU`_kRUCwBQgQ2U~( zE%@=u;?6lw(h>z;DeH9zm$)=J{eNMb_v4!}fA@Nx(D$ZAYuGd%`s{xEhGDk4$L?hc z$KRZLWO8%z4X4wN=MMgUqryJ-#%&vKu6Z8ac@2J{0^3%sRsQ#FnFFt^v6kbD79Xc8 zZ`c=|nrH5^+%wSkrNu3YrYy5h4W)|~L|K*>tUSIXw&biw$roqyiW$GwiS5ijAoeCE zTHzgIZk$lE#g?cQMi=>)wq889?x9@Lswm}vKXNTq*ElB64T`JooIXeTV^IG09H}GG zQ@Cckb^d+wK*&XQ=3^0oof%h_s?29Nnq!ig$5HI?>c*uxtN-tHV_UkQYY(f3Y>SRx zo0){dRFxVN_eDjHi=QRD_q?Jhc+1XV?mx=|>f8KISya2NnIAvT=*0fJ{Fm#e)r2aOYWULD|VT>O?hm-)Mk#py7Jj&VzZxKejAjWzc5itu`oI%&vAQslEBw3 zFTMqRN>Y(|+_%vEjJ}nv)VEp6oDUwZaPXeZ*_pp>*;oG3>aX+Eb=jDnXqC-~@q9F| zS&C`%|{c=mz{1(}+Kk?Evi@dNCd!*dv*gks2 zw02fe?lajR4RL~Z>v+$i^4}&cYWfr`+oR(swtzlSwN!c zVf`hyMg6O67jD&cy)rXLNATUsof8$Oo{ZL>#oemme>3V$*Yy;g_dZv7mu^?z_GokH zQ_YD_^OtO6UwNke)Y`l6ZX8&P?-Qn;GPBGf4mC#7(V_TPDlSQcumUX|t8;yeYMlRb48kV4L5`%`Yq~*2mfD zd8hr*PrrHLdP-qHM*I5Hi!^pTdb??5gF=4MH&uOJrIXg}#~k=L1@hdUl=Eb?_`2;j zxto#O9XNC2-p;+7vv{VNS+AJ!ac1&{{!hxb+Z>j@aPZsw^eF$lmr^;Ek)|_^*2I~e zntbWKYO{*ePMIGT>NA~|KfQ0(a_uqCbC&;d`%1$X<=nEK|G>SYma%>H8Ri{QBJ(Fs zS?3+Pw1cPJg;CsY>CG*wkGr;R4!c_wPKPzbL@}Aba?}hQ-0*xn6 zCTjRzI_=sTQ&O*{zVE1F@C2=mOcT3n<(FI$jnFZhEN`rELiIyjyrk7$kIPZvl2*n% z4o^j|D{5@t=Xyct$-+zZr+n{*7Zh!uR;0T{?$7R0?XFGR`87VijCEF6x3ZPv?q6oF zQ$Y(#a-(-lWsmcG&3xHbSLBkncZtvhMz6Ppm8DusrcQkkvox#!Gr#)9%&8{6kNM_R zJe3PPa(v(ER=u#5T(x%?wVoaN_TKkxMv|^xa6vCw$!<_1xjv+sr1&DrR5r{~W{uVXL%ee{|Wv2uI37~7kw zYE{2eH@1f_+P2_}Ez_4JEAKKl+O$6V&axntM`KPylz*JAZ{ih^I~RWm#)S$!5~+Op zA^61C35h#v3cuJ)sN8$=bAd?kj2DOcclk_cQ{gz9ckzRjt$$4B<>=GRWk2u!ye(IA zIs540S&q7!KTnn3`DV?7ME&QXVJuf9ZR;Z0J5v%|^-uKfQa-<$YsK<{7wn~?Vc#AZ zJUH&n++I8Hm(|nahXKc2Wv8z-*+gIjW()B9_YTrr?97V0S?OP}-_`Nu& zyVJ$5f4lw`{v$Tx^M0;-cJS~-!;RVfEx-N*>I(}dCz&plQ`xF2$LAZgSX7|nK$Ffd zjmz;2p>Ni_7VlX5pJAivWT|5(CtXfkvGBPr(`OOq=@Fk_9XveI;)`g|4K1Tt?fXkw&sp4~{V=@v&-@+FZMS(J%4^AClY-e+;ohYW zqElq|@~v4Gb>_eu_KAyRh0}d4rd-qKR&lVn@Z|nxy=j{4Z#<_+vPl_V2%oour{H?= z0n=vL^`GaY%*sEnUiR(w>t3V()(h8O5scNe`yXq_$F$=223-#RKap(b=eFEQf4W4! z;5)b zv(Q6+uCH?^t-r#QQ2I$c*|*=~McEC4}GRY<4s=a46=Jb?z~IZW^rCox4%GHzht_`Gz_FuNNXQJnsb@s{f}ssy)kQDiZv4NdMBq#m@ZE*|wsmZN|m5nq1#1n@&FA7nFE>V&@kr=ZnSxx8&cl83+DpOkT7> z`{-q@*t&@ME}2tA;*!=hpBCI!^=E?m+Gl1PjyYyY_;p@=-K3Lt=v=bWB-?}kDh>YH zPYk*A_ra%W`7uf7Yon%1&R7$DdVTlgoMpWN+Y@t=HmqL0=x*z-%x{d+6O8;`uc~(0 zJGbaqga6STLH%=P`s#1c+$E3`+<$UG(c7Inw+rTMbIS@|Q9b!y#{#AeQ+cX(#Jv^# zvg;a8&0gb)@!k3YZzg{Bac10fb?MRTpIiU;=iJJO+cfv+boMwlH2iZ0nCp2fdrb_>8w)efFv? ztY0eU_9=6>k2}I<>E3#HY~qE!X5*J%V-mdL%O~zUsL{3|`?K(^3yZ~mub8{hVe+Az z!uYjf2D7Kht$VH%>i#4_A-GV6Ikr{v^X4D_j+f0;^~yVJ@WCr;#oK@4+zu16e){e+ z`uMu+wo;_d995rCNsCGEUp8I(rgQws?!Vjno%=Kn2mh$e`>y;`?*5}IG6&cG2;8?@ zetz1PKNor+7(o=cAe9 zL#-bhcqV7R6)kT_$SfE2o?mDr^6vXbtMj6ps-JR6uGd)~DlxPDK#;uhP<+`81H@R&;Iz9S#E zDXmnna$NPcuzcCKBOJk(!_K{qJew%Ck@4`39r6~et2Y8=3njjfGaunO3{U zTP{QQZS27pYjo+wTc++Mj{C`{v!1&3LxDph z_`F!Y^TIWO0ylnFv!Al6W(eQ*C8codPlJ%Ro7+<^GMR7Pr!slxU9knr6Ex=6mYse3 z&UjYz`uHiDThrKEjQ&_H*x-EDaa;Mh;?FVN+uzPin(bY_lV4f!yUniP%rfCSzm|IT z|JdnQw@lQtJbym7#%HVd(=XiH{e0@nxVmuB`YHW~FC>1m^Ggk#e5{r8eDd+D=aqN3 zW^lTuo_v1dvZV9T?82JmtI7=J0>!;DnBh#O$AEvfi=9b1BT8 z_H%{ny*V@c&Fq^5S8Q?%Ke%#-=G;U1Vd~QCcav6_$%?6HH)_7&FWPQ!wupubxk+ zzj(z38$Fo`++nj<#@tnY!OLZL`>x^Elob;VPOi+&+&HJ+?4_LUxhpbx+dUaqJzLaf z{hBe^@Pv?LKCk2LVJhhHShaZX;T6~V%NZcfq%~$vDI8;*Myl}}b7SzPbrDjYfp=McZkJl z>v^XIQ~E_Vp4{j*nN?%vbdH(sn{UWpj;`)*l6fAn>*B56=7dxHfvcV>pTBmEc~Mu% z-sy2a3J!Sx<}{6#)A$g}tCMwQ)~5I;;mHP)`Rj~pPFHXFH7|VaGl5w?8WLw2e}4IR zVEwjV-#)thxpDP(MaGKdJ5LqyPq!%F(-Qt8{(M!UYjUYc?;Mkof4lqiW-&BOEL`^P z*{vAX#E^t*E4xT(Qhwjz!u_WXsZRGJPD%FC^w`7d(~^{Gt2q{>+#q z2lo8zw_aBL_nL1)h|aX^sC_FeN_wYj=g%>}eerB$%Cyye{6P$prV1O!&j6(>6XxpI{F{niLtEBx3g zl8xp4O4Ggx0qMH`SGp6^r9&fomC%?7wU-DkjWd%Yu`?=!p|Ge3I=+^ArN$X~A zd$e7mDAio`SyX2qPv+a-Go!yA5bd_in*}d_CsFx%AabPTsj` zA8^or&7!V(4js4tx^}eucl3Cste|4T`drsr^XugPx@m`gb1G!3={b3Jedx-6zsl$8 z710H*i#Ie1`X1}uA1EyE?OFKzSTH*iqlHuIs(E~e?mqZ);hW)`l;z@9yM9*ls~vsG zkm=;L^vHL6hJ)LFGfyad#;zc^%8o(uUQA$tUsho8*AMb<)_ptcJ)`;R{nD13v3i%o zr#!x}^IenoN(JfNXBP4F$+)nZa;lea^N%@H%y*ra+p|$|?)iO>X7oLChbOG>Hp~}$Af`9JcVg$O!;>YYmD6oFi@p0+$%cns$y$4z@xbI# z*JHvwvmVrF98p_Q^y&A^(!(D2*!_3CIn2fL`-Hj*bG?^m!8^q{clI25m+n}8+U{N5 zYH2(iC0mb{a@+K(vE2Dkap}&1io_~@LHTMGoi^X;y^Gk*=9pa<{iwK+QRmmh zx+%L4+<95|<3Zuo{o57>9NsY_BVa{k;zGa7D}i%2&U)$2eKC1ieSFoOW1fqhAD`LW ztbXm-?hZZwH*AVBtnDAC`)vx^Uvg-T!!5g)ET>*-{CKEj#4A}Qq;PoqnGaQWZaw_x z>hGgJC(37U`rE3R`S}->d^bc)o0;a5I&ng-NXp!AvsxcsIGnfms;^|r-EE=qTSB(; zb3ACxshi{wYq(|o&APom{CQ={SFUF`uXgzG;@M@^wSR8NN1bqwi+b>XURQk0o(&6r zRiFKQ$YA}CHlc5|J%zDoc1O`hmQf{*H**_J=zZkuLbcd+1~--Zy+1pmKlYpXw|Rj}SW&wQ>( zHn_a>|H}BVL=B0!Rk<^*#7_U*z_dC;do|Bj!wUzbn?+Ag;@PdaO2_f!vf>$EB3>~b z4!rcxv0q|lqFktFf9xiIn@#`twKuG|T^adN+1X`k^Wun;$(vtvPrlhFy*5GERkUjD z`r0(nBxMffX7|sx#pF2qwmV$lOSWp0aSY{Ht5A{jM0w`}@$&%-Eo22Pk6cxAu&L`( z3M-mgx?WN6*)@)PE2hmo=>GFjhC~40yNYu)p6wFRW>MkCrUdnu`(9ORb?y-fSu10~ zvi79rhDo2&W%8F)uxma1(-L=WQzox&qDV|cOl(C!w`pg+A-COC-|ii=8=TCJ$?I8Y z#_9DG9%-Gs`DS&wUe9mUE05kbEZ{s@Fy&E2t3IPqNbZCk{p=T|C#6kw>6!X2dNR*% zv$ua59C?2>C{ALYos+`6P4UzDc;nuAA^Z8Fn#8I) zZtrD*6IP09F6sX3cIJxBh1B}rE-^nOouiJPZdFQLF`b)$;5xdOk0X*y3-v;@^*Bj2%a> z6^L-wop~l!@buzIw^w49bC-ri_?5l5RG-y)=3jGTK)*Qi+0ZvkjxRZnICXuE{@ou| z@aWWr?2pgBeb8{O{JWZm^HQ{=z_dF~^UgHfW*2%_)p%Q8=xfs1rs?mjg^X+ij@h!- zOnLCO`^W0tKkUmKrhces*Y9s@+wa%Uu_DNBv+Apbt`9#%3D#{0)-%()yQpBv#Rt=5 zB>I0b+Z?ttWSVF9Q}mF)9L|RV%~vKG3u_*#VcL2jgu6MkV|8oVlp~K{B^f%YEw>1a z-~Ev1PhNz=uiC(eRYe=#M=HI0^|7hp%G@~&JkR??%{h$DE|lQ*{p0?qIBCq;V#(2x8=Qy0UxNSL;r5xzKK8kDOhL0~<4VbqI zG>I84>3Q^eG0TE8J8V;DO`bD(t`?tY)Ngj?;y(@wR~{d0@Yk#Mu&tc(@aIYHt^?P? zB{}9ui#S;5KMP`uIee>pc16QyE#_Gdx-LuzVF?I}7L+}_yzuJUR+AT65iJ4-V*NNB zjlb^O;rBIwf6kBfOYSF^>KB^an(CAw_e)FjQJT1~0d^s z!`F_4ZS-bi+uz84{G|i?GB;71hZ!rlp1bJS6h>ZPv|K2v?yw*vrPuntajQdG2p_k| z1*58t)~P+0r=&cL7I0dWY;^bZta&c~yB4+YPkFc@-NmkizrbJY!~Wui*yM(-x^+nt z&BgcLU=KL`_W!vX9gCi7AMUT3!6Rh*kBPfbccYO#>;8>TGn<5M_yRf-%j-;JZ(Uxv zC~4BI+x%vS8EcRH@13f!I*H*=59d}1?S~fI-mjA{;GA#qGh+|SZKVqbm#mm0yXD21 z)50d_I5W5(3R!$El=+%lw|h=WJBzwcd(-ZSas~KzyEypShMb4qQ%L@H(n_n>0J3VCCjIYcg~4ZosVy+JJ+dg(egW@+bZ03v;5Mz zUzJ^%pZBwEl|Fg-;MQmUM_vo<-~7_}WucYQFXNNvj|6Ue*DiChL--kk-!~Ka=<76O){3)pJtM%rdBuHW%D~@Tv6tOFD{njZzc&gRA_^O7H4etEx}2+?4TNX2xYM z)sK}QwmYYs-t0hc;B}o?~NhrUFwHZDHh z))}?-sDqkK^xFF-#lLTzeaFa>b0tseBb(Og&%A~kpX&yA^P8TKJ8AnW_&dkqlZk9i zAJ*@4_Y-SYmd$;Ue(CPwBBOO)CA?dr`OYjdU2A41Y;j;s``^iNyY*5+^9f^J^l_4UcbUmpuN!d~gK#YFjX#QPoEW*I1+vM2A{ zECc!EOYL`sRd-|=73wtcl)K&Jn*ZD-Ezdn6=0}!HnQxCp+wVGq-ZNxm7Zree}vAQ+4a+4)MUw-qo7~A9~O8JmMxJzMo5|?$e(K zabhO3zs)h2GRtOmprv&Fi910$m2H2XhdH=}Mr6HvV=bhpKZnbct+k0+*hg=DVbX=P z9c$OcS`=y5`bbAC4w)3}oNY8y>EMD4`#Bo@5;Z@Irh0~*JD;-Uyz_$7G0*EZ23^ih zO8@N==6Ij|!jcVaZ)QldMf>IX%aqO8;?vL}F2o`gU0gKFB7T{eWt(N}B993&D!S@3 ztqTr>xCyODm1FfKUh>s;jm2y3 z@8nu|9~@p!h_*>;A_15S0V zwE1=0TK2Q%SntcS`qeIPZ*|tFWTzS#g9SwJl z>XWQ@98NXvZwj2~5dZs0;o6rL_g4q(ouSqE+4%I4T-Hy~_qY{~O79PuXM3(NFDNoD z=G*)yEutF9S8j)$JZZ=%aEdD+IAj}hJ$v4QPu<##KdgeEO#OADL{vI0NowJ*Iuqvl zQYD51`RW0@@280#n9ddM_I&?@{da3R{}`A*JNwuE#PY7cwMX?if&<=k#+!fosq3?${EL09e16XU59v~W57;MN^ zY~Q`6p^j%m`oF`zFZrIn-+e0TiPDR!KU4e{?Dan>{rz^z)(!plY~LO5Y_<@3yZQW) zNmT|;0^8?KKK7gCmUi>Q7kgrR)D2DaZS$vBsQJJ8xO|7$mio0-#ZU68zX>l5xmopn zZ)(F{brso@GbvCf70)J4O44*n)?i#T^N9eAV>yRK$pyv)rXlO71{*xbi<&D}@B z?L7PIHZ$d5?_q;4Zk4mztxMnS&uvghUAf8Y(T-I)AB7Kl-P~^4 z`_=hdjL^4j%1cYt_$So$Lx8_Pr#^5qm%D!=SVx>UF6*UEHn&w`LEvuk$z?`+d4Ye{ff{ zn*5J1A;qGvtiDuO{ANt~T;!;r`{U7%>^_miYPQyOa#Fka1SF1!X@*aDB=v0O4~w3M z)%Pbe9@7$^^L*adu7?g=zH8QovDwG_Pox870zoOUrqL2AU_0cSYS?Ao0 zAKUkIMeVtEkufv(m+>PfZ6}kp6K?qioXF^m(9K$CZ2862ky&Y;@_WgxKTphczL441 z==$(8wo^E$O9+R&K z6ZF`%-R%(5BO@!RZ)IE;)ef@Nw={PAs#!d*@uJGl z(+(?kY`7L~^3gh^|efs4zt(^R7qwrHfaTs5}!;uo9}5yP-#0>kISn?7{xX+55G z=jazv#->gNi<&@X?*FY=$55Xdmkf7YU&rv0Ls4q9F8 zHfQ}E>ZBwy8D3p;c3XZcVkM(%_N%yR`&A{ot~0V{Zdt$M_#rEoOXrn7$zAz0GtHKqxpYsxTp@iz@`b4(;*NfgXEmz6XH^$WYEN03BQ?k1L}ZqWgy+Hu zMOTDuw7kuy%v$n)Li6KGks^Bj=FMB$S?Bd|T(-xh3`=#7(5; z9hBnt{b6HlD!2Nlw}QK)nO<3+@BKF#F-cFKt@QPNvqVliXKUx1A1<{kSB4m0$>F`3 zxl&NIz3@Y+Q&Y%NWsl?sXA&SP`f1!)dW=49cE<+~DL9 z7xChe_l7gg$EJxat&GvNuhcuy@UF*T>zhWsorxDGOyBrup-A)Q8=*I+?OGh@+nLa* zWwYhLDhKnWg*&QKXC{ZPGIv_)dNT22j+xTS2Y;_k`lMr9B>nAJO6p6U1;%1Q1**Lk z`gxa{y%hcAwQ|%f|1U^7&Nut^Tfy=LM(%f#qxj~&JpV;+I(M#BpwCr)wdYE*;tTAQ z-$~qwXt*4!7xRh1?`^-1QRmARz5fD-|}0sAV=G&(?N0tJ;S)m@HY&bz%3W2(P`n zSFGqMx*#N{(_QK>vs8qa?as^x8bPn3E1u_yedXkD@-dyZt8UK1MRvQKi=O>*bl+9H zSa}AY731aRKG*f^vfis)mLIbXTYtdst>HJf%j(wd+;6yEM80NCJd$)YpK-pK{Crir zmzsIvc0bQQnq9YxIbz#aj|YoOS#(-g2+9ASQoi%pfG}75@(*A>$0h_r2?V4XC6#A zqUo{H?Oe#7qo;fCuK(kFJxzky!uu{~*L*r2V^4NT+s= zOV57`&iTyhsrG^M1Ao5#Qj zD{jO_E_?2LG^BiXJcs7ZNkxT*2R>KK_;}7iFX!vVYko&JO3?_fCCc(s;-@>y*{c z7bo@1EiFFZtPAd5cV|w|-{zAy?0wdJ@oqT#Nr~aa<+u7wo94VwTA)!}=hmz}IrOu) zhM?holkUp%3tKLQ+zId#IxpjX$##a{Z#N->=(=aV(KqbgAHBxG)VAKFZZ0>^Ta90G zJ~cd3mp)xNS$E03g{;gHtM6SC7G-;Namy8%QpxF65B3{Xznfn1QCL^|Q&?)I%?++J~^nC_(D}dBQ#=1iadv#imSr} z9@&~(*{++~+;nO#GB~E!W?6c%C?tITF-b>ag-sHh&`S~i+3Agn(`0zI==x2%$JH!* zEx}K)OTkg1snO)ArnW$a|EAoYnSZBo?a4nId@{_QrTW4B6G!|U9SqkdoZRgH@yBi1 zh;s+*HB3HqbMj1l{n21yg=(jW&^al4#ja1OWKEv?Dy4_*icG-8aFZ)@pDmXApk>Fuxm_yp z>ABG0{)sJ&`<83%IA?Z;Z%z9IBUA6~&HYo(t=ZcnGL0oL;dF=gOOIyGpUsWS>WUMB z>n%1ME9h+Y{(T_GI$?%1|C`lnGpz0xFX?!k{^CWnbz7bvpZe`p^%B3fu>7)QnX*Hg z^<=aP%gw6e+w4t0dm2Al_vJ%X*%tn$L!u^Z*J{-2WLhk1_wg|~Zaw2Qb++BdBX79b zO1!To2Wb`EJby`lcPR7nefNVJpU?d|t;;R^M)_<@FM(-7VFw(vLSKc1oje{;c<5wV zvDzBV|Gk^v@4nACHF|$t>4InR3^{lB8LBt$d-V7B%Bql3rVXq6Z%>kD4A^>T&+4xt z6SU@^dE*q5sj@~QFN&-4rZSVzm%0>&&TdUHhATpzdV&|$$t~$US1ZM^x&4gsw#g0K zHv89XQFkvoe*Lt=8w;6t6?@-WoUNKS@%(Z9bA9gxTzhtH(~mHEH?{Wkp_%4E_hy{m zvr%Zd#F>S5yN|H2=Y4AOU2pi|q2=NiTzu6ZcGxYnkgn^WllPN!0dEdN#HF7bo+Y8PCt1F;IGxug9`vVP)Efj{eRk3nwOL z2JL*y_6Pg>`~aQCGr9NBKp+aBeT#Lnikt$w}je}jU^dIJe#dkKxbjZLx4&1e5~&i|6s zx=^~gnN_uA-^b&P2S4~P6z{8y-vs5;ou$;0lG__@}^5g9HtJg05Rwt1k!PCyL`eKXg z)irDC?N&CfEloYFR4K^7_jO~>Io42N-Du-A(5LBfY7UA302Q+pzKWJ4VacdELx&q%w*!muu)q z-;cQ2Zn~{~U*`Oz$v2)F)m-DZzL;y05q6umep<)lx$!k;i)Vi=o|k)M4V&<($eNTl zPaHQ^YIn(edw=MkfB8+->uV1iRJhA_|GFQ%>;H8o7R}Q$UtZo@I;mJkkj3r;x1Yh` zoBIwI%gx_mQW-bt=8?Z=V-gqdO`3DjhWmS_+hQEnlg#z z-iG&2H!rAo+LKroomU`H5MlKG<4F;{SnV9gq>Q9~gZRmZYIYkxur8d_(Da1s^^_ea zv&yzR_N~|+%{-%4J#U}(oIW32kGdM(@S~hHUY{>=t*`X>o&0r;vkcF^q7(K76Yn|S zP)z^%zF}+k`vzZ*e#Y|C5_x+ro^RMX_s8qGrzLOZs<-v3AFpv{@^vxaF;SK0=Id(* z{FMwR96x$}diI)1|M0Dednxx34H^rgWOUTOh=cwOS)b- z#P;Az$ZhUQg9kyP&zw(iM!#NK6XGD9xvuG3%Fe93Zw9WtGLOtV7l<5``0_0F{gLW) z-$^=NDS4k4l&8yEeiGd@BT67<3cKRG89OA6zsr5%VpYDG+bP<-NFj9+Z-{~7s{P_U zU$5{@pS9$FVB=@=(1IVo7jhojdizI($^Oktc(kswxvpzt+s*ww)#}p6B5`@$#+trg z538oledHF{-?j_y zH@83LxUy~YcBSGMjV~&m>i&2iIBy5%vt1HWV#oc}>Ps6{x*Jvq<>?!KezijeTw;n;(fbGXa58kv|pQaL~480hqdqSsCB=Zap6Fb zeEnI)h#r>J4;tCj-medC|IAm+=JI9rqbrV)S0b`1=bv`!Z4`0QZ`HZxw>f-|{JY1? z@@^jGi)?t1b%in3|Cx2l#zjdp&H29e&Q-vu~IhoO~kE^ zu)W&@*u-SI&c@E<`24fVQOGi7!q0a%%2zwQt6#l<^=SFsgj@EZ3pAeG`~5@Uu5J52 z8>faDEc0?U*{2vBP7X_`v7XEQ?aa|C=O#u6-ba2v?prgQsCp~R;32WrlsSRxYxw!A z>b4hUXQeV!Xs+qJ#PT6DujIfp@z!Ir9{zj0vRrk^QtL&BkEFy&{Cgat!1Vj0(6-9s z0$o*s=|^XluPM~zm@FOpI0fqwIG!BPr^_&j9 zKDYi__VO@E2>mjw^WMIj#h}V;(xQqb*KbO`-1z0FB%^jz(aYI6j(eQ$tACKq@wr_e?Rd-XslsHh+wWOgBYs4+ zP79m#eHyp^ZACS!?7gR1>P%u4)crX0KiPIYvfy&@UCtK9 za|ZM01hM_M{TsFQ-{qn|-iiiKle+TJe|kN_{7hZ{+q{4+M{j(2E@;$dExW7!E`!OVFAe!2yIUS- zZ*=5ftY5Nq-JA=Pssf7~r_5?QpHug>q2lcsmPaiqZJ|fb?o?Q{Hsb3kp9KnOYpTAQ zx=qN~n-S#dpYUkot96n!3!kn^{$f6B(uOvlrLW89Twl7{%&+ou$NuAMJKl4eAHSF02n@M(SF;WbhG z>GeLh}s|@HR`v%o7VnKPmtrSxw}>H^EzLyj8md#tUql0s!}bz zsbya@PYrM6p)28u4{Vr3Hh4w-Uc&nLq;MwR=923cSDEt-=QgU*RamI<0Un??N>ad+l zJIcN>WlF>Jv*L_#oI1a~7#8(zxG7}j61aHxMeo_W8=6?8I5=}^*A+T>r)YFHv9v8_ z-4}f+eRr|^vGVpx_Z`l{vqVG;wo4>NB<!GDR~dR@nl9A8+mOI~f?;cmsMGGUv_tbRu6_e{$APgQ;?-`?I(zbtU#TkqrP zPuBB4Iq`Aw<#$%+&zb#Ra^63RuQuQ1$ojvYO$9%_S#DIhNxCF>Mdkc`mBr&~+7Z3q zm8-DrP8E+!(Q2MoRpQ=f{(Lkl@N!MEoj2ow*~Wh#SXRcZ>Nt0K>Y?egA8eJVnO@Yf zH)gYWae-%Y?{Cj#zkY{v&tGhRO2&7|Zqo&7?6Y#(AIfJYME7^vPyBO!@=Cqg?QGwc zpYk=Fp%$n7Yqo{x&bV172Cwuvm+@ATIf-()4lF5adwdBflI+izt*)UKN8KX0Dn zf1b`I-ar4$4aWzP{$|#xw(nHd$gehHtvufr{_t`}WwX$}ugXay4o?0d7%Ck2;Hu$mMDWz3r zTZ_*e)6Vqig3sPxeNpRlyVoz6#a(#*iL1%c6-6Ik&)VOnw`X_zx`Onk<1Nz6V#fN@ z0`>l{*r;^;MPgR!abebD-hUdTE(v|MH#PWMEZBZ9FQC~!&H95EbBfdt2V0>V_ZT;5 zE%Gn1{3T<$;j7s(CQZSdxzcX=b`KA82ppXASDCx!98Xq;Vv}xKL|54!@5#X|ZxbbN zBrfO_^)Gm}@BOC6t@3-cYz%kGKCY@OxMF-@UDc_ypd)JiISn&*+xdUc*8Z2)7xC*+ z>C2DB8879ZKXVwiFoo7E$ObH4z&lFg_|Dk zIAF-N%b{aQJ138P8k5V@Zyt)v&Ni^;)JvY8(86AF{YWE^#(`^3b=PEs{@fJm{(#|d zvv%px1$si)CiKi;4&~4Kws-m3^OGe*J9?dO_jMTiKP?w|hk#a?0`E7vJ$!#~$d{*>K{eXJ?T z#rWxkW}3Y7fwiUc>#Q$-|7#V)pkB1NE>h6!@$1qn0g_LGoUa~I{5)Mo`N1sC2kQ>W zYRzY{FgVC^Lu>wrTXXhp?|Q7&+cf$7nR%QWm>k_s|J=TGWy#!0KmKbh+Vx|i%F6!C z;HP|-lBZVx@6dVE?y+}Ml`iM3-J1XJdrycddEWij<$26S<%7|-uH z|HyIi-Yv|kc73^$9Gk!TTYLOAe}3@x|N9*rY!$Licg)|EaX7WgB(=JIsQaR1vvJ-c z0nrJ)#)3JVswIL`r@j4emMKwoVNsILQ|nI)N^Cb;Iy0u${r>)S4lh18&6sjv*>nA3sl|a0%A*+=Eq=z_Fj&l+^t)eZcnSPMGOD+ z&uH18#s5N0yHkyoWy7_+Uk&U!^SS3mL>&0w)cBgCq{ZO*zB*RE4d0&!@0nGr#3OiM zbIg5TtJq)5-n8Fkyv?{XO?1WLyL((*qK!`I-h2?g=APherOMwD>*lnkKl&TR-CH24 zFmcl+_A7!ykvIS3cquJbV-nN)|El{W%hmmXatXmV4E_hkJ@cA1&p_ntb4{zV2TpHn z+MTB_F1&g2%Co6`Dwlp0vhTd(DZpXqf53B9Cb#g#bzFY! zjQWD&9CgjpSH2Yz*YGlWcPsax=L${D!>x}eiST=_k7PW4`s*j1Cjw!Q)Ne1ajqzT* zF7wJl+c%whP2JMd7MmQKU>US>;kKEke@YOq}4Yaec<09akS5e>`jD(IwCC zMn)buV6J{PBID!zfDI-UA2XUux!3J@-RkEOuz%H`G8v5}YxS3gxEz1!YO9_d_$bdw zc6rqPhfzZOZtK*&=7t}BSoJ7_&*pAac;iF6HAiX=A8mg8c!hvPpUme9p)R$%oE-c) z_oi)GaX4Qq_U`KG!V}!yS+1P5J@R`)zRuNcONtmdmoFEqj!T*2Wn1+m&zS$We9FwIr`<{)dlvTX{=0g1ooe1mi`zx+lU&yA=$)7! zU-$Eqwz3pf3oNTm^_tw^~iMf+B3x5lLTmC?z z;-7_>TOX&=j>1hAYHocei(eJ<-)6bKz`gx{$-4RJmuHt`#uaR^3O&Ilt$ur1;RJVK z_Tx;PIWb~v+gM{%f?(78F%Vh4WS`mA=GZDClRwEAtfb1GZ)e(af?+w8aef~fdx8EKBYud8Ho zxc!138{K?zgGck!#bYPGb=UiA{?`@$JLBLsUaJXwTLp4@SY{vl`?SlAjOGCJRhn>n^Q)kZpg!%8SQ5wm7zj)z^M5-6ankhq># zyW`%ehZ6Vicy4GE^L@I>P$;+HREWN`>c!Wg!tAr(X#KpQ)3LYarUs|kiqDp@W^Rjk zcQNkDopOYu`O)5_L!9E0C*Bw)9cg~R+tPFO?6S=-TpC_UB+WHFt)rARb<4t(i9#Ir zj=c_h88t6H7zl4pVP|LnEf(RBH>Zcq2qh6+eouW z>V*8|kkEhk^_*g$W#`eiekI4*jEbl3IMwjR^y{-&-9NrE)$iF_yf~$wH6`5MY`k$% z=-0Q;x0$^-;lwhv?$-NP5kG3@h5k8re)^x-b7_Cxo@@JCdVb+H_BYM;aff!!wEK5w z_mSugi)*LnuDfQ|*&nm^gn?wG-IB@YW-XP<{Iu+1q*vu#^~rU$6V@~H{+qN!yS!9m z-?mHgN>=kax7qnb6g8Vzvo@`o+P-D!>l-{Es=ix4H{&V?qdXJv@WY``#-Pp=K`AMFhBI~8^ z+vjX~>ZrExtmJXocy;drEzw|L9M&t({c`_ymvR^^SJkW;+i9=c~%q8 zl#1G&OZ2&PuYZY)+7{#Ni%Pr8ay`OUU7wrHzMUt$XaSh7&&5mIqtH?5s|C}x-l~*H12?7C zd7ZKekqcavJ~6n&vnn;K-Bq}KcjCMQS1)mIvWk$f(Ij$v{9 zSqAPd8CCAdmWxvqr)k-GO}h{>!$EOw{bbj`O$HK{Uei26HZ4f@sB}AdDCL?)WXF3I z_mhWG_R5}ByLtWOTDOyj?s5iB(OGD0bh4@e@@Qk_&gZ=%}-9mW|BoVjy3r+C!domqN!%5hhY^Uu@gT)TJXn%t$$lT}xV zX)RmdK4o{Jip|N}PUoCcf+p>$nQXN_pZSfapP%}wbOz1OikiBKKWR)Wy0}47o8esh<&fwoX{Sa&fE8R9Rh- zj!Z@WPIvCeYkL}0t||8^Df-`-G_T)+NmDmV`P|E;?y4z~|JioBC_dTxSS{04wMA-6 zRAooVQsuri1+uwMmgZ(FuCJTl^u%?`%pz_TF2$bim;0TUSZo&B#2mqR{}zXp!>0qR zr&OoKXx&kXzjQ+Nxa+Q1o}EPtx5@>4{x9Y&;N=oqyWsKH2@d<3AM966@QCF~@a#;x z5W!mZRY@u^Oa=CC*kEc|ov=WR3{j~iZE#R;u2bNplWS4Xn1DD3+ov8_c$iZ>7Qr#zUe@;va_xhd;=z0ayGYS@;a{!P4yl)#d3+{C4Xoe_InRb$QdiU2O6T^A6bUs547X zI^evn+31!aaD!&!6j#S=USfF!YkoCu&{4pu5iFz2Wms$EDnTO}e5te9m}s zcHzYE>F*lLenl+Voe{=q^*U=#v)BG(o6G$JUG=9=?REKo>H1vL?2W&=-(`7jQfW>6 zZRt990W%L<@w~nnGhDy^-JTrTrm}ifxc(D%&L7IBCp|PgnReCaKy1b8ME=c>u9>Eu zx=`aLwW&8I#>RPjP3m*;Wa%d-ZuRiSwJ+VMo7I;%xBu$Y%a@&R^fm|Rd){b198&Kn z`B%V(x4M$ANp+`bi(uQbZ96v>-?;eZ@}8pJ0Q(!a^Xez+Kbv)sPr#Q$xVz~1k`43U z^i5!!_$Ds&;oZtMM$g>DO?=CC7neO`%HYV$&@i8{`6+wq@|!1=w-mOw&ifR3e8vn_ zj(XPK&5I_cO6=j<$#v$B%_(y}JFdBn(qbYLt(QHX8OOc#(q!Y+u3X1GN_fJ&Cr?ve zeYDF?;*Q1%Azy2!siJRKuS>3BlPb!Y$t#$ne_=+T(B_t-&$3&^mQ7zGAo;WP(z9!F zA4Jw^#%xqdtXaNK;YpxSV8kDzX}8h}J7kw`nz&?nK=8>rUH2PzE>4x)xJguT%|yjw z`^6gUQ9Mf?cJRorQnop{|M#7}TD-nlT(;ki&)2bCcFCP*SE}mLzOO308w@wlnW*!-DX6fzraBMz5xIE_I);@tMs;aIK==Rj2p!uT7XCsK{-jy(p9+ zouk_*SiJZ;_o+`jQ~n1R*`3|knVo9*CAL9#=Gh&4%F0UUOoXY`fkS6{)GZ)3(idj{5FkU*Bmf zzjb6@xm0t|*Xs78g?A2Zn^^KoZt|v>i8|A-v_`wdW%W5*?f4w^@@UNwk4dNEcDB5A zo4Eg-@`>Yj55BmXJJWF1z1VlVS$8iIfA?y$piWSKH6N>5D1N@V3u;9^v&n_QRH%eI5(DYBqZKlrQKLbKmxqS4Z1Sw*;I zT3gc&f7_OG`1tAH`4g5F8LtjdZdRStd^-A#_%+52R}MtQZ@7B*>-MFey6qmY==2&b z?3Xm%l;U4LD>QjhXVMYl)}ySSS*_Nyu8jTA_~vKm)E`^^9P?i@a}!f7L;0p}hc;z? zkm&K7;wZkor0|7M!fmT1Qo0&np7Xt17I=RKXF;UfSqIj&UK+<1w>EsukUc3Hzs}d| z>+KUZGps{iXCIY$T>9*karLXK&$d6{+t%|;w(p_7GjsBnU5hVTEL-~2SZD9&RH5Z2 z;bAtR()$aSe|Z0TfCRF;AAb&AE8~!L^F48S=Gb}6uEyN?)Q)Vi&r#atU;Mh3Hh0XtQENNx{C3v+ z2V4a6z6U$akFR(qm>k`9BKzotpU1rSy_s=2PFv^v6Iq?8gYQo_`g}dUbT+%)e#67h z?f)Bgt`q;ia4F9`-R92YtTQ(7Z4ua~*_QEQ@?*};m;Ssu|E1}ZXXOjmTM6^UJ5#PI%x6AWvcsrPfoq{ zBPmk#Yi#PRbvhTN)=zXV?aZERaOQVq-)F-pxikB2mB@O3yIT4_@i}jf@rMlC^C$dy zPP1AiF}7VgaESkmS>@}UxBtuhT-VW*{CKyH%b(_lop&Zqd#n5X{|fskx%IoxbcEe? zX4$KodS;7BBH!ARx65;T)<6AhysP-_?fyeOGY;M6Upq6oWwLz0ZM$Q01jM@LM$VY5 z`{YvdLix{ITjl1|-mi{6_Q2e&gU@44zcou%?R?7}4pZA3#F@6=2~;m!by59X)DNAr zF_#XNCpO)lv8OBP?zHo#nat}AJ-DvS^M9YsFBo{fls`IZ^P$5tchv1#ClGv9L2Ht= zn}2suj?+8Vc{UfzEG7xdot{zMwq@tPq>ILnrv7W0ddMpOTBY&IpVM~USDL*x>(tMq zHknU*U+x+!w;=V4l$hbX*GG9HCK&Mr?n;uV_-4AQT|(^ev5X>ZgB8~Ip6+9pOFqJvpVh&r zqqNa!ZzH4jrE7+5?FWjV_T|1*7q?pV(Ve^OqLS_YY`69`m2+Q5>`0#REPC3t*YEm1 zzYDuxadmH^wA$UxE-&>GeSSC|KQB0$Z|%AVkAxPm{Fwcd-I4uu*CVM$Ia|{{QqcOqLGP=Zx&`Ozt-Bi0v+LT|9`1PS48ySBe31seb25$>?o<>` zT_dJ#@SQEps7qV?(YF2uzRF7u^`6T(nYd!AYL^~OzUlekmF4@dcQ;*5+I4Ej<+GVF z^H_Kv$=h5%b>i9tLpPyCQ(X=zCyDJ4b1OOL8!HwQ=A2YhmmP3%%c|?zKW=l&z5gdX z?Sp6r(;99YHBH7joHbk9?r&5+#5BnvreX5A3riY)OO;=4TDtvu*R^>06@{htN^HU_ zcOPTJk*I@(ob8_h0M~*|Fov!ZcsCoenyMX?{MlMBQHc9lv(dHBe=G zlFgbpt}RWsUeZCV6e~B8Xja%2`D8Kw?Bl(6&pyy* zTh=mtrrkM~HvaIwk8Bp{N&0)Nl-uJzByvU0Q;c(eFsn0KpS{@q{aXWj`DMLQXZYsS zCw{#U*!3DQo(Cd!fxN(zavm9 z*KO;^_VB2EM+MwgDf8XpsNJVMf1d5ERmL5jDn7B>FWELO@_NqM^zqrcfI}-vU03M7 zn~{AyslV%utNb&oZFeIQ<~+W0(|B3P;`)HiKdw~VJrcz4zojU#Z`awcjtXw+GBXZ+ z)`&V2sjXuY)bmVAvmk@VOOzX=HI@PSTVW+FYe#n$;P5O3o$?51hX>(q-mb)pI$owqG+Hm@FsXdeR zp2X*$A_cF_PYbc#b=}&;BG|IrWJO<3ulvFHh;0eAGp=n-+~6TSkL~%#)}q*37sM`? zn&wFqE}rgrWYgoTGv3(h*1Cl4T=9pkZnApBLh&C@t^|Dvj!j8gR%8?M#W}`$o}rhe zUvU1!CC9nK9_e0~Bm4Zrmi?iNm&9dfxQ7%kiLzhMyR+fQo&xb1&NKeSOMfh!CsN#2ay*S#pkY^w%%m+(QVO7mxMpReeAv1#=hkuD{o%7 z-0QO}blr&Z+!X5frkK55hX2`fqpZG^SzqoQwn;wFDRIT~P@c`Aud>axHdC*k z-Ev&8>*Mjzsjr?FUR~`e8@24U)>m7nKJ|z%P0tp3P3HAI@G)l#2kV^m;)a}RR=ZAn z)(V+6rswUHa(sXH)#jvvkY>S&?vM2~-!ANzo2UNPM^Sb6q?0@sC1%R4iQ6E_QYs=5 z?q7T7UW4%B;Ogj{*m9TI1!^iik0&1U+^W&lxpVeqy)3cvilVZ*AFGa(8i=l*RQW~m zKA-QF$o|At5~d$bH*tBL-z~SqEp5ePhza@}^uBEz_2The|*LkW?T zUly-aH>hnoC=_Lo^X8?YSWDFH%!oVR=byaL`R~cg^X(T?BC2{U{-1dh+q>%F;e=(o z!+*avpDJ)g?YP!9FFSRoRX(Rw9j+bqSi!CBy_RFeve43n9n-e%FHVr|NVpT;@qFKU zF}uG`Pn!<@zpMQC=K^b|cl~0YKPN6o|B~=c(V*=E>u;X7Awsk7#6C7n&R%XW8T<6i zB?HN4sV*&NTpyRkY_e->aB=jv^a@CQNn3+{$##e58vukF9K_g=-_c{>Zg8CYBG-L&kV{+T|%6Vtv*2fNij zx~jd)&F@(DuM#eC-J^aRtmYKo&8XdQsMOeh*KeB*c42kdEU(+PuMn_|3wE2rn=h~E z`A2-|-H%3jTvtCQOzDdMUpZ5Qb6?=53@0vYIqQoN54qkg;yFD-KqlOCO4GWBJEl|_ zlpo0`4qM^O_&Dcy@FBhF3sa=R&aXXCd+D~vbap4vg2QRM%z7^MH5}v>Vh@dfcxH;S zRBl8!d%~iE$)CRkUo(HQ^WJ`O&lMT_4pdu5w;OL;q9!C8xs*?NYs2+FGg>N_*N2(x zUTXGXapx9i$&^^_u-e``8@6nA^tly&Wa__HGuO-CE4Wj9_rC1RhVW(T*Ap71c1(X; z5pQm%-`MIS>k}Ch_=Mwe=QK%uf1dwN5z*5xrEmHx>l38?+Th9p_UBh`^{IYSyV@eW zW{sSoz`4H7$2vQriXC@p?7iJ1ZkFud-nS`3a-Z7b`BuprZY-GHDJ^%Tup>xgb>^8`>U}=U8bt>uZoTav!@t8}r^IW+BWt%mw&}6zGcLZyKY8zwJEjMgdT-!Odj03p z%?kcw-oeu&H!kv9m$Bi+!I@K2j5X$LeR1t{Bz z{nF}F|GwSkmUG*Bvv$|+gY(ba3-vp?)93n)BfGoPAMdd}T6k7oFlEBjuFo6pRUf+K z(lqN&!jE?Arh|JFPM5UJI50VIj$q}Etyh{W-QGUlylCnBzO=X7W%t&E^Q`#Cetu&g zZ_lfa&&Qj$bNo4Zq4|IHzVpc^v~S-(XtI=jl4!WU-i+q(VjHEjs)(rbTpo8mwWzuT z+Arqr^*!V1eP+j4jw7Lf2O@iQVh3 zowAr=cYpn+@HgSs7AALhAKvF4^;Uk5^Ygrlxw1k>YL4`NdK-1t`NR8!E|ws(MSwy-h;Ni}fs< z4~k}K*=*c$@X^^hfj>kqbIDF$0ye zCN?;~zB+l~nQNbq9C*0%`~QU-zGap5Es1+b`N*CA|=x8K*vF z#(ib1PQ2gH!!DQQTdQbt(8tTVWuk8QK`X&Xra9KuSF`S1&^)bp=ucteU-`m^eKQnQ zF6~G*7O8&rKl{hD`V@_C2YT8W`|e48XX#O5KOA;-dVpjwFI!$z;uqJb$C;-SR9ey_ z-UXbKw0iI$gG>Li^xc)r2A^4c9hgw>s9Bu_>FZcRy>EqD!zWSxboHc!Ka!| z&ude{p6oCA^3h{voAR7x({d}{|34P6p=sqRv)pqZI&8O3ldxqzzwE||w_EoF zIAkxV{CKMRuo_$cnINx~27fkrh3^XIS+)Aj)3^Ui!gu$j?&Ll5TidE+i}ov5&8>;n zMO!B4-Z*fpA>aL9{Q;HLUo7rg&sea$;;3?`Quk2{maQSj_*$FVUcQ>VLVbSgn!ed` zHNF$(M_Z{Tq^W9}&cDLP!|qwJQL3wGaBd6)89M8V_y zg1>&2v#n-oZ|QActYLLhYa&~bPLop8yw8(WuSAN6T-|J4d3@E$SEe&o%rg6$cuF_< zkkYYTjpCOjQrY(XI>2sYA+vK!u?+t~IZ+E)p8mM!$*!yaery#G+UFixrBWvS^4&zI z)0XF0E#_U@cUA<;TfrcB8+}8#5{!d@*_!t!PaB=#R{wuLgrcdXd@VJxv zF?t2}j@w3SbePOzYy^w5&U*gn+;r@cRg&ZCf)z|__U7{RUp(J+{qUtNZK+Go%#WNl z{pjOc?kf^(Yy-I-C9|Aw{g9GwyM0NQi{Ami&yCuCTB%c+g6{6`&97RaZ1J}n|RTn{V)C@jIr++CpE_Z8KumHY=PBTDSXl z$bwvLpW~%{-WS@Jo;lt%>HLz171@_MpKMEP(=PgYBxlAuGxpgI^PeZZOVo`%wsp~> zwQuvD1pDo4Yn#~Xac=o3ni2ZWuVZW-PA)xnz*Z!$?<5nSl_S^YgULqR zp@mMF3XSvB-UnD^EDBq5VD1_p<3$bX?Q@*w{9?KM-7bkW@oBJ^lj0SVA0iUJ)&#g8 z59ZM@>2$aqTq<&Zj#qzJWZvIB+fK7iWREi`)@jvV^=$3I#~f7|9CF@USl-^qvHm=5 zS6}wj-om$6t&<#kH$@el{WvLIdAew%(akp>CfwUTq4!P05*^o{6~PMDu?ZG(O`?lE z6V~=5%WK;|GuyMRQC5g;?c3E$r?34{cFH1>sZaIWFRw!fZ#34wow3wjNiedm^_0#m zdF?#KS35YrtysL)YgR{I=dyscTMr+Op1^KjYU6%Vn_F4`uF&4QDyrcQGA0{ds>;7P zy8c0faX|-{lf=y0PVwvUOWp?_NjzE6C-tS`gTnI*k2+;#l7+lJzZ3kSU>fxLiwE!3 zrLsDvs_(P7<3vniJiD()rA>Z!q9pS`Xkc&bip#r+u;DM^ZjFuZY{i+{3

-1EWD*PjxQ5k&;Pp_y}M#Li=~UkO~v9^xxEJ`u~;s==%ORk^gQrDP?+D@ zTic$NM*2C|nCySip49Kk`@}SZH}Fl*%)J#y+NT}8tUFy_EIs0Q?x|^pji<%JzIxDt4@vMBvwJ%oey8q^)%c+@%@=H{vRw?~nCNt^StVGfxZYrCITz~q8 zfQue{5#fyryZaBgoaL2KUdMlj`|xI&3ork&-AI@k!)s?9aiU?%oF#j8CT{t6*3kcw z8s94Q?CXXzx7MvLJ5m!9b!zTbZ3Fe&dfdfVm~33@k|N{O^n?BqSD2Mz=h!oWdn@OT|%*Wz+Ya{Q`+g;;h^+>6{l0iBP<_B>!aCvUkfD z{CXMlanF&ab3aNJsIJvb^7fv-z|Fek3)@!nwO>};yL>i?Rc=wlMCJIf2fDpqJ_=2< zQ2FcEn&NGwEGW4=&^>X6IPzzBK09Y2f{L!OfOK8t&!N*AAL7W+sYlSiQ98 z^ouvbe%6_@YacB>Blq!$rE|sZWm*?4H*rdKtVpVt&1&Y!{-@C9Ja5+tsn*%gSTZNn z^nCJd4O-aCer?H@hNHVSY|N{1T)>bt<4ZEvtl-xNi+3()w~Ajbv^=9~>*_Z$huAJ^ z+baFu+gV|H!!@>I-Ljy~y`5i8B_2+G!WLqjip1 zGHWTGbWWBN`;q4G=U?&Nbw^(OkQ56&vG?JpBjs+5yho2Y6~31!-OtvrHEBs%>eA`Y z<|PIA?>w|nC1g(c_j%%G=M3EsBuBpavLev2<@t(@s>fLSA3s>QE6LS6Vxp+_sUx#j z3M&~Z?Yozk$nw)p4b5jV*$y@x4Bq7X`p7(izBbY7TYH_h&Qv{dqu@;EI>}qVJ6S#) z7uAi3xjt`7gSpH~*a9llx~5EPVcm^+V^p9~Zk= zb3^8BV%F~O-1lZ$oc#JXy)`es-WQ0>)?FeuyZ5ijF>&vSxf~uRr&u*R?DI{X8teVS zowJeukVIUJPRWxeQ$kB~4;k%ne(wEh$4Uohjt@^&@=w3sRIyucONpP;^j79@-ny-| zmT_XN@+Of*b8lZ^Yrk{QU}@syn1ZjO+Q<6~c0DZRN!WSaT&bk!&+q;JzJ0qcpTGZ~ z^S!5kkIUyL-BP;wS>^ZkfA6On=A(DJ?CZY!mq8d40*i8G_WT--Ie_wTd$||`@~fza(922 zF=^wqBYX3D@8!tuZ@G1)ytyyQ!%^4a)iLR1TaM3xwbDs6a`dtdVS0;8HQ8mYyMGwS>Kxx9t$-)RVcw&2y%%+q+e zB@Vw7K5Q&oJy|0r>yVzI?7^t#R?{@SAF@t4VzSVE{Yi~FvuEPPiJjBlT|IvORa;$$ zO7E-qs~PI^ba-}1iGn322o zv(<%rha3+~4Z5G>^ZZNKbP<;FTee%`N+OHwVvQ}P-SR%8Y*attoQW9YrK%0KIU;H) zr1;2?}$nDF_=}3-dMy<2ua@k>+@*=#-O}r+oRFUvs7~=||e?q9yweXtc6b9-ES9sM7hV^FPbl z9V_~LH^kLdm+zjTZ+EXfc=3xeL+;~y7d(yKyW_u`Z@c1_wMuY&%FJ4 z(~VXZ*m>>KT(+2@ljEMs&C&@@K|wu1Jt-A#S}j$jX%%ecargfSCor%bt9{FrnwL^s zQk0sQ%bS{)lAn~tYiyukpa5dn*eLMohh&!Iq$+3_85o#kB^nqSm|I%trWqK==NDzB z>!lVHYx3$l7o{eak1sfX$eK$h|3lp#_^xcdU zEI_)06!hJU6)a&)69r3?^RH7~s+L&4C}(9FVALEkMirzEvVLEkMW zu_Ve73>gb65#Ua>*GRe%j-X%?SEyqd++^wDKE8r zL+fTgy8k8ja%kYQcVRn|p2p0(fA4+XrGiJ_zR%9DtD1b*j@R6Ko}Xe$ul##|bAHe0 z-u8R?(@xC_ow;VW^X7+6>q9>6@DP?4Q@g2GVD8QL_s5&+Jh9bED{n8BKlW>-)ZesQ z)in>NN9{~`{QFnLcK?{@6RQttS6=!hZ0Fl~{$T%|vted0w{@3)|KAjMI%n!MRh=K~ zUv8I5-`AODLP?7ebh?};T{-|JhG9}%O;alW>1`(l54K3FX8 ze{Z|7?Gq-O2sPOj8PKTF#x}<0;q4bJw>us755Y&ej#@;cpjN@fy_s*rs`j^UBYrb})85hi z?RrnvL?`XawRzXS?pqk*K6m!5^@wE~6r|Ex%sN?WaTo;S#6!msyr3pXF( zKddtMhtbN$JzO7o!;{&RxxGUD%->fiAMahGbM^i@`HR|fZzfs&JiIMlL)`gpkWFsd zlFH1PQ&%tAaGkSczk|SL&W`@W#dpJV|E{!JdHSu7?BW^A1Kjsd4n3D*?=1QH$(NY* z^AG!5?YN?`XdUPBRbSuVxOgV`e61Zb>dYyHym+rTF(>KA9Y16cis*J7cO^tmyPDn)+h;3L~R$6T5#;W^iiGm!D znVrsx@AZ6F1N7Bd&d&IpxNf(?F(E@Q&6WZS8@{V~`y-}Bm@uwxaY)dpiD#awdH3tr z;JabI9z4>P8#Nqbot9bdUo|02>*eC++q^9E9@_pmw*L68?1>)7J|6u2yz58vj5kcl z?shhz%=HB)6Bk^sIN~6irpGTLe7)SZUPPt&N%_U8#|%^B6pyT~QL~-F&6$yFmzb8D zb|mw}@$e(bA|K3^{c{WD1H{5@y5cntsY z53bZSWnH_!{&Vpv=ZNkjlV>H%mTIMhv>dfbRx^kTPd*Sg7F z*ZQ0-)+?QO^f}Wbuy8@BWX!w!%psHF#m*!4nof1J@5n?AEa zUaQ1bUVO!>R3$y-@b_9~oMN8wb5ylX|EZsA91xfB^R}zbSFNAZvJD-97LAltr(9{ogdH!(yjlY`?ZecYRsLT~Ix9=BHPGSAXcvU&=lC5=>GZHLl)G?+wlRa$Tci z+QD6qZas`==48^_8ozqMWygc6H4yJ5h5dY=OJMDu_ zPK#G=R9^KqyGuLd(Wgg|CYmazZio~GZn{)4N$T}cfwTiQKXv;iGDpvuv-#wOEB@z` zm3#fp@m=jVl3h7x^YM_3Rnx3j7I@dZ*~J>!B=mOcb-86+tCvo%nr*;W&bY7O*D1}& z8#AU9&N#gA%O3t`cQ&uL`t?lJV0&`%r}OVbPEBynjnnw%U#>VqV%4oke-oSbo179& zyzcU8v0pBk9Oqhm{gS`|%MBh;W(5g4|J`=Ywe?!hpO<6#p<}f|>(vGEA5L7cjS~By zzS8^Dj@8p_ZN7P3FFX4Alt}u#_zi2;D=u6x*NNNf^~!nLhqpP#O**?^Lt14o?<)CM zy#g%#x1L;&zt_Snsdg{f)^^3pXG`mfeLO^q{FJ*g1s7RNmW`Iw`*I~nns0KV%>g^@ zpcBQyA9}M-&8S@U=PB3!458SEhu+U$cxS@x0Df+#rc0|8|HxY@oj1F$_N85|Y)So& zDp|?U88Lq!eqOpQz9R1OcgY;n^sIu6=yi^IwUZagv%bq0FTbR3{9NS*V`J3fO=|rg zw(xULm)W@Dujekq+*FmtDrPem3I-S*Hn2TB)!_8exPL`S*1a`FI@9m1oRr_RWmf{P z?YYSe(?06>zWCYsV-jz;jOY*NLQ|EgXO8&VCd|1V{&v;}eQv(0I-AP-ZQ2_vIos7| zOfg%uRYlRYr{m8I$-}NY&o=&@xA2rk+K)xGbNap4( zbM}8zCT_cM^19E>3$vY$Ua)v6O=Yi399wPKFWt0Ef@Gg+lQ*}gn%lib}H^Eavb z>F19dvhTn4y8G3oI;B^~j5Jp#zPMH@q1v;s;leek)yqy4Mf)-wJYZG!w{Le&$KT(z zmw6}6b#bzBdHKwyCh5i+wo@BRE`|R7JK@djtQ)0Y({{{uF%wjH{$lybq5};N4>L|K zIlL<`Bd5?#`nYiNrSbyLwJ$I;Y(+y=TJ`yXgBb2F-0xKE87> zd}DFcTrj?Tvr*98W9ud>Fga;hElB>TH}S#apI^J|i|c-sT`vqV4!Eec!|ei#Kkwaz z@xK#yc^OEZjXVFn_WJ34jbdK~;$}U4H#t9*rF}coUQ^beKe+h! zz11_8=A2;6TP%NovEakU4(I(h?&a{UOPv>_>i9qF+WY!n>o~MjCWP*oc=&Nt&_=I= zRV;rkR@*;4_w?-J(|3OseETZ&9vwqI}7XK*&@p?9~R7OD1YMfmi@Nx)|OM}E%{&APH?*O>;JJA z)$f?DV-|0Z1b9KkNkf{U*EmWzpuJ5r}^BS8JXXGa;_ECFrQ3T`S3aOY3Jw1 zYtI?2DL%_FKQg@W*xQ480lPQNdj0p`Q_dekz1JEa?@el2{berW>sf2M{3EVEJ6~D( zYlZ$N?uh&Q>zKBzd*9;L#PA^G;nVC%{~f<95S%(IxZNJkyZP7Kus=SrD-J&F319T)l=VvPig5qMdX~k1U%o8Z zaXn?ZUQBVDm&^MDS5!K#HBQ~q@Lq`HM%!kI`|mDk`OBYgUw(epDaB~*;0|`hHSV@v z2@0y6yG*)&Pwrb9`(UTN?E(q8uU?iL%JOWEuPWsWT(S2qUo+dhvh7Lx=JQXwaw+WB zG}h;r)VS~czSpBDdf?~rt5Z{B1er`fRMgqUoc?S0G4-^LkGt~IZh=V;y?*4kdR>ro zj?8jWj(>jFcgLjZN->qj$Caih#e6<3|F1^q%t8eQ!(6w6_4UOfXBcJoeEX`?(Y1A+ z>%n)9_HWtN%gtkXpIiKGdj9-gLk8yX%3MBCzk8FeH}(ckFg)}2|3@y5z>ZFH^WW#U z=O5FsXFU1y)LFgbXX`?PR()hHd$Qc*#bP$mt&ct&|M;-raV67&FTX+;&5>L3_?gC1 zw-dX$N>9fXO_^8w|I?bsVb|XE80lV(j|h-C@BDcTb#Rf424W3@7y!3iWvO?f0 zQ$IT!E&10g{!Hr)+!QG6%jV|0C3V4GTiI0kBu#0n4Igqo9|?@FsM=-NX8vwfriYKk zhd-=8Yw9%@UFe&Cpm*x`4SRgkw5Q$P^>DLn%k9%C8uq_`E&2R)Z|vK<>&5f$->tW~ zb4Mnx&gO0WlCF36_U%8lTfT0O6W2ny_Z#F_+58iF`|qD|!EbYgck=@R9^TzwR{6c| z`@`=WcJHkC{aHWr`^y@^^5b_|8&9e}Sm$BBeADjz3NIt4EPwXyk@y^euM9sAZ`&`C zwk+0BA?rn6MD$E4)0W0F>n)V|wL@;iaz40V(=$P6UB%N4{0xasMNGGD#;5H6>R257 zV9w>L;NTm}wkniv?NPWoqx5#Bo}NI^g@SvJnifvv-B;V%(UPW;!F#xO=dzU>y;*iP zi|}-Y-M6jXrSPGjp;WQSizo3yfM9GPJ8K1>Ud(}+UW(VRM1&mPwLK&1)v|-fl)k5! z#k}$}bA37UQ(Ql%X)F)8Km>RN5L7_ywolRRnC`Bvmm6mORLR94xp zE|YbUyAn6DREHODV3NJ^DwU(~R1(9c`5Bv=WK`K~zT8X+P;J-ZDl3s$x=h<^qiwUC zWlE1_t;CcajT5ugdK9E{yv#W5WaoXBZTe|cZryZq5o_GSqHPfuBG#*VEYAF$U34bn zFz*p*5#3phk|ry|;xF=uc=qP5uDx9|eQx)u&{(}PzE=V2yDJl7C!V}F>!wc83TYYB zhrY`)w>8~~oO)SleSwLI#-!3alQ)I(Yi?WjaL>V6_d^fedOPP-+T@k1c&2Sx>2TLT zU&>W^j{uK^Yh&VixlNG^w&sL+{Nc?Be0ojxzKu?mFZYdI2F7s*%$_oCTR9^^TBz=di=wUdzFq0PW-zo$l-gs&{5$@W1{PV6OTW(Ib8gaeZ*0#-z!YK zknzEljDUAxTrRz5mR#AB;QJ(_NH3ZDn^JJiQ4Mci4N=R9iR-r~3T9n&lZ}c`^pxJ- zw#4_M(uA#x&%IxHrMFU}w3b0=!PKjwDmVXLa_u$_I<--HmGqKFdlp2kbI-rHHFB=> zjdz`UxUS}m8hEuR+J0fxp|kI&^$RR6?Us9cGSO^f)LXZ^zuUjLPP}++ z>->to?Gx@OS>IlHXPTX5aox+v$5*A?%`7ASwWeb7pcTg%xO3B?zdlk<*e+D&6|a0&w0b9+b3-CYxkSo!CPjW zayu86xs2_u!Yb)DrN*nb1$Ta1dZByHoUEenx+e@3LZg}<=WGkz?X1x@>)pXa243@g zb~SCdIw@NqxJO&z`;s{sb>e)p&(7&Oby2$Wj6=0<_1(nfy)2u=3{&?PD!bPoUbIn2 zMYv_-6u*>B&!qlUa~=}kCTiqyQg=(aW6JK}KIbjwDz%UQ_{}uCW;x@|jvbEcG9TWz z&D?%bdfC2-$E7D371yS2__RM`#-y7Yw#R&r`FJ73>+;pOqgRSEt2R}xaPkh`mJsyh zY*%4gw^pCp`#R;;lL||@*z$jQB`weSa^#^=%(n| zc_h6@#6@lQ=BxT<`!@$4O$c#UdMr}1M#7p+bE}YKnNw8TeI@#bGwg{!Z>ip!X}wqp57i5v1^HNvY4g?_Xyv?^$}-S>5i7vJZ1 zQGUjjZEEVh5b!DFZC}TNqV;^OM8-X^#P;e zpQmc~nz3h{i@W$WmBaI;^!+t^w_h(i5q#Zn_1)EOL5_bH|7*y3x5_9+FX`mHTQS>= zBfPuVw%+z5L6CmbbklQHa=Uhw?~7<}G~2aI#j8I+s&k=(c|y5M^sd~C zoZP`J(?s{B2z$n!3^P_(9(BiI_56$`+nX9j9zwZK1CGu0VZJrxPs^&LwQAS1jHKG7 zMEv_#or!v~XpiU?&wBwMck%^Z3!n0DOU-eOX})K;_qfey=wBM=cbc4eEoUmz3eNs;}3W@ajCCw+rgpq|ZmQZU_j{_B zx>N7*o;41x+{^JxYvuVvZPWMOyepp;dHqqJhLL=Z<;72KURKd7o7}H8^1Cemrt-Sm zYU+7~IX9N_{LcC$cKXDt#7fg?)79_CYVLc?wd8_d9utp1rxL8lQG`T8P75drYP*s4^yd1$jY}sxdm40JUn6gmnj*eviMyml zHiPwwt@Uv_w%Y5Dhip>de<3i>;_#iM+k9scP zeRO)XOmgm&FTEw2((`7rF7bS3CDYM*m~lPx)aHk?=IuQkaE`ZD!nXZP;-C2!EW_U{ zJu)Sw`6uteS<6`$KJ3>`XKYU4v*eYXG?jPu+wk@}sUK;ZWgWNunHjWBajCTk?kIc%k-Br`#VdTdVkGYVLBKne^;v!u{~1T^-R?Dt>M`rB>@L zqF?=JW4E7C;J;bz``ml$ANn0IE2_5ralTYd)n2~S{pwYL)qnohtL%6>>G@$k?a08% z4G(SGnP){wtMq@4)hk$S!phju=AFcG+iY{LhLgZb=VxWXobP^rR+*l^%1KwddPcwc z@nDOS+FNeym3wo4!$DWSCSkDzzgQKoUR4#Q^>fYL5+771mt0sPyRz(~$Vut`XZGQb zwrTFacW_QWwU}DOQ(me!%--7V!`ZoJf6}~3 zXSkykZvV5NwCCy#-Oo$Ywr!cMwXLx4pQq^UX#15(GtN1zk~p_Y;A!uvi4P_l8qD2z zt<`_ok|Rl*g1kK(LYcj7L#}>&$)5Z{I<-hHucG98*^TLsm(Ho1WjI?-WO?wZ8N6rj zJ>PKbfVy;XefAcSfBFZnyk|DQ8~t`ZQ-bl=wrt_@#%U4Pf7Y_3WfVWRIJ+Qm6SMfY zYoQmG=X}sU{_EShX}`IzN-gnn&yCIrul}#E^7q`Es+aqAx;kpg+|+e{nbr9})!3}M zz97?vpRsK24tviRJr6AB-LX2p$Z6@^wI*LyTf}E^pE(ztwfNxLzUK#c+QcIFl|4AC zE6S$BaxVPPhKjqa`G=MkSW0I7sF`r`=27_?rlzoa3R6xP)(38t7hd@Ij{o5g7tgRM z9SGHH6P|KdLj4T4bo>W@>tj_9jnyA-lI|>h%^~x5U#V@xx=8c{yROLj!0-Aa44_j~c73?A-MLuuEqQyvQMi@5(_R++iS@f6`mQ?&(r84rXH zpVLk`@H2UFGrG5S9=RIh)%kM++tTztWH@pF2waAZ;Gn%CU=j-mH%{AqJJ`KBXG zvG=n@gK7yk`8AciZXEgrc1) zim^{#8Z_Lu`2R6-qMzc?Uw^L`c59m^n&#bXnD{ec^QOR)A|cuG3r#9F=OrZCp0Qk+ z=Cmdsv%*p9fQoQ*1=*hI* zeG)gUWWy33uDkZ5g+FaYq`AL|hGMLo&VQGAa*kIM7TWh8Y0Esyd$D14V7qSP^D7~j z%6+C=D3;2!ltiB8pCOu(XKB7jp3UxLRIJ54>8$D_C9KDO&U+sHVX}Kr_?G0EF$({u ztK>^|UwN*$IBG6GFJ}xJ&wJ~;`wJ5@>6HH3&bN=pKTlw$s&l!7f-~3z0H{;WhjeZjM zas->7F8W_!Q&DDh=AqH6R-vwk7OY+SrGvLk75%Yh=7W@P3&gH0*Pqt++bVkg;YG_0 z4=2oh{4amD^K-FXOl4*5XWu30B|rUTE%>ZWIQfnA+0kNlWeJ* zzkaS~6MWrtTG1e zPmZyd`9`_wwH@8(r|e{Uc6d_yv5Kt|E>E2&dF1JukBx_fO@CSEDzx!B?^7@8+nVvx z*zEL-s5!}EDvE(uwtp$p;T2qL+BdBy>bknGaaROGyiH2&qnyXdX{QUcYQvVRm)>fc zmv5775K^rDYHgH4y|Y7`j+}h+=0lT`wpqq~PP)AKnnK?9mc8Eu%8wU^7UjfwG@gGl ze*%xt*HmlAnx@-L>Ujxy;`=r}kS>i+dt0zZ`00T!_KWi-^#slnI93o=Vzc#GU}ZBh|)XLXzEi&BBJpH+r%@3fzrL-NCna@2T$^f8v$iZ&W{8&0Co- z8Ze>I*yuuWLx{_hW>zyBp$(eqMINstisF`d6shjqr2fEceN}sNkAl}_W)055n%?vO zXZ`>DOYcFM)uoob1xevQmWWvFyz=+p^%h^fd)#dgrn+4IZ0)SazGmO5ZPS@|EkC*T zs%-iWb@iBvQUghm;^osk_I!6Si*nW5aMtg~TC46>KIJ!?LL630h|d%cJL}RoUFBGF zZLL|wQvC=O=E7CND;F-@uX@FAJrC>pd!+`GZghsZr@W3y7kJ$E!9{!y!%c0&Pw{U& zPfPdamKyEVy7fw6NqmlH&Xp@&d)Zr#d2yw$Q>rWXr)ZyNS{ZT{@7JwZcJu5 zZZ4|{@_d|-_d@7+wd>qp4IjBV{$JjG+p<`ZTgH9%oyyM-+$^hfzUWKe{UiUQ>h|r> zP05){gAy3rMYP{5ynoyyrKI_Xe;T`7R!^&S*&nz3TY{l&6*}(@FbK=s+rQ(*)7y_M zqgF<(Q*F;$Ic3xCWisZ4C)a(Ey2$_i*n8)PoRTjq)_uKVrK6_jvAVT<^C8j0{D)NE zU94znu$#tFxwhZpGmq!r!(sE@T5U02Y4&%^)x1TI0>4gPVb#>RYs!k-k7h+>9{Tn$ z_`rjW0X$pQ6pBiHc=K8-?RfI}!tRs3k&ibos8^Yvyf-JjnO{5lknXySNi_)v4+IsY zJI5+b@h~|)dC}S_pAIH(*_-^$->ClO6LFE`@_$(e4R$2kI>)cLv3t4eS3#rPH?MXC zTyVjtu8_`+wV+0mcBH@ zq;Io~;r8s?TatgqcCYB1wovl>#xGSz#hA97O#gU?W5$NOW!K+|wy#_E$>;FPlebr~ zJ~1ypwub-z&fVXZp6W}?`y9!5-h2PbAIsd1-icpu3gc#(=JLL z37xUpvvcW{wUfN!5~fa@c$4LCqV?bC&h{r)&nbwk>zI+~b?4@sD`t}~mabY6bdCM` z)hBOq7pg@%+NW0>p7?5awO3@h*UD8Z?skd?=h{T5s%1UmTJfxGxd;#AH_2eV;*UWm zqHGs;X@@>popJb7t#n<#;*OW!%YX5@t<&@RBs8;OV!vbZiuJLRcQ`(@d>14zA)sSp z`R_yBlFu0ayq_*)nihMCCr$f%xqaouooySLmR$WMsN%Cox7n*tXZBQn`80W-U)F4# zB_HOniGE&igfsQCL(YN6uDYGvN2CKKDyky$U$*=?d!B20=%ZCOFPAJ!Ty@&DcxAw& zvwG=Pm8!`p7JkP$7V^GMd?Igu(bLy-Z(+fzB1b{@H0%B+=HGZYOs_6_ntAV#PY1_0 z=AWyyF76Rm>0Gl_V&%=x%lB-4V!u?OU~LZbwr9#nQct&?~paBN*gzl8OK15(y% z$71g|YcINy6td&!@!8vN*=heudh4_FiO!M3*Q6aIjEc*QIBzd1|Nf-;&NB1Mn@%g8 zxVOgc?#ur?yxpg@dEY-y{CUx+!b`8@`n-9oWd7`83XY7uC$;G9SA`Dy#7@0u&i&@! z8yp|6+iqjk7_7+W*Sgf%?P$Q2WY*1>H)bz9ARuz+PM~x1JyF$j1#eiG=IDIx2}?fC zQPvkNna9{U^ZeGv&#gBac5blY{Xr0ux^VBy<<~1^t#rJofW3%z@j$U@*mTJtY@*^!zr)9+) zEU)Z&e&O)P-RX@pV@wxiS8d^rP3_cT?N*vE9t#_hyc z&b~YQ%dc;mdRuz&{fY83oqX!9vYoy&F~EAqBu#s*`LSy>$}Yb9u;xc?+AjseFUn~$ z1@-q%3N}rdc7JQi3L(j)%f~PL^wKyrS+DQ*m4%^kCzb_2d*W=k^N4Ep&bokU@%9T3 zoqD}IK(3*bC9icpx2IU&lUl3E{64Z4QxCAMJHQ+kETbg**pnyZ;$N@yo39v`zPIq- zy}x>qhM%rspu`V4&z%IHn8D&FX-7q{ou6}G57wd)UwdQLQ|V?4@vhkyP| zCH5?qxYD^o+-z%fZe8)OTixTGc6P~&+Ba`1QrGL;nz{SWE*H_vG%GuajcmqlReJyU zULKH@)a3njvd5Kg%a-{m)BNsqoDP}M8*)wU^g_L$yAqMF&3~>9lYBYr=mq}MEGc(h zZTVilYl-V^=D3#4&(0dQ%1iJc{!#lW<;GUq+s|f5B>$~dJ0?-}SK{gV+uP=3J%6Wp zd+~-pa@^4e-pilmmBju7HGaH>I{7mALO~`Ebk+!D^d&oyK*H- zFh9Gjn56XM*{}7RxSxo&<_GNGA|ms!(Jg##Zur_At|5lCqC>UT@BSyJ|l+2;47 zi?hpex^?R|Z&@hwP%!JDt$W8`A@6B7(_&U>ck(QKCgFTlndQ!=sg3$ajDMdA_mr?c zacs?5)4qr0ymd#E(swb<`B3m9Kal zDs5F99i$<1{PC967MHHg7TPgo<^L49sHx6RB5l2Y>~dPo%y|ERfj9$48`@R|Lvgg5I*R^rtxjRmGpFh1Bnp+&}RP(_j(t6v{kaZeU z?Y2Zc@{#^x)h-gzR&&LQdz;RqTR+xC{yzBSSKsNljgQL;w(fuX;#=&+-#;FO{NMNZ zqq(QmlT*e^4qTYE;<5gLZR~6>I3Cy*1+YmZonep=zjB0Cfw6t5%!#L!`|OM58s|9e zxVB#;pT{O*pWf9*1)1jG=f5NxTYQ=6e<$ctP1ueDy84lQ8|=+rO|-h`C~USPNkL~T zyG}|uull@GVvAXRCH9$Z<6<_vE&hCC`GrT#PVyg576@wjvU^osP1$uxZReH8r;=lI zpXPWDh)rjdQES$;?JkfVA4ho08HUHBp zvgX6)7g;}!Cg1$ok=pz-;Ah9I+v@+e82pPVR(UYpvnfU)FIn%jA=kf!yIRc?9$rXd zoR*q-w`RkU+@8$pR<@QmYx;g9Ea=d;IDYjTpK6}uoT#WJ6Sl9IA+MLGoqc%Qni(2m zq9tuvnT?wZ=GMMWT%0Nrm*nz0d!qEhgA0#+s=v9eD95r$V%mAlnx@KI(?46xT=4(z zWktpfOR}tAv2P2Rw1dg-d6N5~rB)pJa<5h$`?!Q{g|fod6fIqz`KJ%~UkX}Kkk8%H zr!!$k>-CtuaYEZ!uaogv>hMqHh~LsBO*If%J>w~5X5XDj0b z`hw?J?Wt9hH(}Ne5IFf#ZGXdb&iHo|o_^kRg(q!E$gkOo-y#&x{Yv%R#p(a}T7Bmp<2i zW)=PU^ZDY??G-0~g{y_1ak|;DQQIe0@};2m1=T;?!H0tWm+!1ybYcQuP+O(p!c)t( z>742lb=sKJIQ5c_dySOb+Wi}PUEXqd2Wf`B*Sh&M;_<|L2YJi26n8&!vy@^l-uU$V ziR+I{$1+6<;%w|!^O@~s=HQS z`PH~|M(~7~l?|#D`V4U*+gINyO=1&0w<=_+=$r#=I&EcJ|Cuz*W?Pf$^YrYUOnHIp z(@Mj`3)-G9*&MZKn{TJTwDOjml`$K=t+UK8*FE01tE?sUd86o3O>d$5Q?JNIXD_H@E@Q;#H7do~teRFx! zLL>KmRm)jDEvlA(W%(Na&5!fu@^U$uy~aAr%TIm!;&=FQ)?7W+>#IwxB-e+({*t$S zJ=?PO*tL`M_gCFZ4w%og@^^T*+0HjriOK=5O;S3hZ}NX!vT@Njoi3%jQoY7gJWS3V zSYBu+)?J%rC31fPYlW|w7YBd1$J2v<*i5c$Ws-V*Y;FD9h$MxLN!!aF=G=L6r|V_^ zmwk82z5e@i%l^3k)o$B;d94GLrWy9t*>T%@Hy1xixUKa=FHAt&pjugdZ(h`sC0r|c z3TI#KyYjW|Eoa5Ub0+(BUd;Q~>UHR8i-2wVlm*dyE>CE$5wmFf^i}MM@xl1W-_0+J z-JY(I$O__L_dAN?`2F9 z+Iu~9NmcE=?e1Ty(t3V&#Ld4m=dEH@tw2VNu@6p8bwt#gz0jYpZP+ zU$WRW{j5gHdhwK7+uzi#a^4mG^uvpL;guqV_m+O*aI-#c@$oy)a=yv$O0zEAzPMNM zuhZpUv!m*d&Y$M}ebFhq_j*oev-=9yPM@=@tgv){nv~EC*_<061>O}il!rA%Mm_K2 z;=HBl$@@I4VRO05Va-s@CANQO*X@`h)6pn<*LdrL2mhNt?$Ozs&MB;NQ=V;k)9YM` zzq>*m7c{UJUS0b}b^+_Tt)6qMS02c`Gw;L8UCs#)rPB%zam_Sty#7ka`}M&^-z)cq zZE@LSU3lLrc-CPfe*Nt)FRV}~d&bo{WlF`%NGHcN*W|fdAD8TUG4F&;$|vqCy<#_) z>Dwu>2%plu*Y|gt-RZmGicxM3dslt`UH|^njkpzpmzCaGW;>ti@x4D~Q}xI0j8gux zg`%Er-K+ABlKmYyg&bmQs&goAFS8mWUb2D`I-Da)Wpfh1I zOO3PXH9;*&Cl<%^u`4rdZvkX z`Y1)GR~ndysMfC0=n7rEq|`M$BkO)zVB`_iPhmQ)(`xrA-Zs%XYm_U!nF zF3%OR8zOE_R|;=YU7LYUr(W^J)~ zB_H^Fr|(vpy4oc+LMv`#h~_gWzE+!kk}Sxb@`LED+j#<;X^5y;ZE2BYy?Um%KkH zs^Tb}q8VzvYnQb7lVu#w3*rJ@+!ueI(J@VUa>bs>$M(E@bd0wobk!R{&y{kSks+Ip zmlhZDL|LAwjAe{U-TSAg`klE*M%alpoj0!6CCt2$`t#At+=>JZKc3Ul-~Bv`b$FFN z)hu+%y&;+5E<9(t^|fbxHan8@-<^;s`3H}+vu?ExB0{9KILQT z&p(;$M^pEXYMnmO~etdzmWX_az+et+8Ax-Bs#=l#vk>&4#vQdpIJ@4oJNZ=>Q; zpWKAQMc%ve^YmW0^4~sExqsd}pLKEP3KbRh?fb;Ne)+MC#8tKbJnS~S$emm?f6c#x zpQ}>CzKih7b=K_Jrh7WXFt0wp*2?Mh>}*!EQ$AzI&TwllR>ex0b(i zX8M|aT{0$X^q%N4TBsbnX}D9Fw{Eh^^`)WJ54C39k&}|KtkgNm;XNezHrUe zwLjdJEQ#z2GVrxYS$%~~cH`@O?SNKeP?PrBk zyD~pErKV2gT34|1@r|F2$@Vigo1{l6q}3GNvhO=NHK!=;xY@gCe!l$m@Bgjvos|(= z{d?szi%XifUut+HNB_Cr-ov&}wIMp}k>u)My6o?Y9-Ae(M@*QnaN_EQr|%!l+$;7V zD#`t7*FD#qXKeEx%`E1Bpn5M!+nC3C;;yRKOl-Z90!tffn@!)8h1JAO+qqh&c8dP# znB$Lb7z<1MIW=kZ=Xy`6&#UAnS^qmfc}IgDtK76wRkH&@6X(r8{pf6Yk$-Yj&%yj9 zSK~4hw@2N%cpzO@eyy9*)pNV&$<*KTJN-QMWXXAh`0x9rlg>LBS4O|u;V*aW+Ro*b zA9eku;`SQo9R8ua-fYi}H-*vjV|3$ZyjyrU$R#WaTV68BFbh9F(Qi1>M;yvOD zd-=+mzT6AEFMVq(L*I<&erH~+E5BI1{MUZN*zfnh8hOikUzC@LW(zKHV7Rf9WA8(! z^1f|yXLfz~SsWJ8``5pGYs$$@k2X}Uf3$W1znT2us(VY=BY)4|mO8WH#IEuXRaL$N zKa@|4_Dg(}*l$&?6nXxMjL%j{)`OF;ziFNQMzO$nX<_Tj4kke%PE~cjqqlsy4aG!z zGq3Hp-Qi@lere#6j?b;vD%L*ej*WPGdeNDGQGvH|H_olrx%ckhlNo`RZ0}uNk#uqD z;xJRL6E2gT);_O#5VGQ0ytdoo>TEv&W$nmo`vTgv=eIm6_;fU6hoXGMyr;pELaIye z<;;B_dVj~MYX?&1aeX$Jmok@W>isV&Z_>{%-`BF>Y}e$X%P#(lz3$5XxVd@z8s=lc zp~;U|&CQ#ble_!1oZB{$;MetPuLRd5T@Md5d9`(Q+l>9^Tcvibn`}L8Pc~n?_Up@0 z)iep%y3YSNG3-g_r1Rwu48_7%{PRf7Uv7W!%-!5M znXINM@7^)5Fq+r!@4J0MR^6h?-;8<39yD69zT0hk)D}F}KmUCzRom~^^|GHP?gy;nhi{iTE4O0%z-fI7j)24D}p0a^S z)dQnTi*oMdHIEkrJ=Irip*J2fuZr=;`muq{utIk(foZM~r?8X)kHfOh*O#_ha zOl9Kjk1zU8zE*noq4khm_-CDO%YSy7U#u{j?q7TRq)oQn{xwRLE{pF!js7>`#L0q% z4jeHDzL{QJ-MH2E?d$s+Zk#=~N0wF3R66RwEVktJ;g^4xNB(qNZ+<|v-mH7MSbyu4 zMW_EWWpA&2rgra)atKpW?a8RK_fMbdNWaatt};$;MTPT8))(^*+^tx2$?bvGn|XgX zYRvt*-lumW<&FPNImJ2RY^Y<;| znQMCAD4SQ9Yk8LX$Hv)DRvtR=G`U{ke$gJW3jI}IH8Vb(KBe2!u9Km%=UUgC*h;nj zf2$go2EXKc`TMW<)(cTJvqMd)pVT}|y}cl%So`h#&y4x)TZ_6KD{pR={-G$9e%7>l z%>sw#f20g|Nqos&w`Yfrb!1Rbud#N+^mFTVR+_CB{d7O%fb#rhDRRH}Y`hcH)^|a z9N&EGhM6Mc$u*4KFO9q38?6jzXct%fO}) zEsq;@?=T;`@agWRl6Or^95J@d`8k5_?H_MfEBEUwg#FcD!ej7_$*p#w>sisulSOyj z;M&7eos@Rq>|Uv!sphYRT6UaUS!kgg_v65a30K(>#{=cc-4A_pzC)uX7t*Omi4m-&m+TVM(m*?<&xzOG@ zQ_}UF=)C1ctV`7WWF;r;yjPXB+~E4N1+^C|6ZIE3UrsWX(ti^lV3ogCYRA!;ZXp&? z9#zXvcLd*lz!jcTQhrVILCu1i344?5Z!}-sr*rDfdeNnK#niL59etZEmf3%>LhwoV zf&b?s=JwcK(R(FwAj;9maJowWpu(od^0IcT zZ47i`WY%ncB-}Hp;2@L9r*dtf_!Suo>+Yuo7H?qhG_CZ|eVKFlfG*!l{#CmClAl%P z$*5{f;df^6eSK`RN7RImY|i_)PE0i4vGhxwxZfO3=aWk^Rv0?59g%79UaQH!OuDM& zW~5@|YF6LFo4fnI=!QMnU|hQ~ihsJ(0biB#9x<zZbXDXv$$3e^Sv?gsqV6gfm@*FDH&3DF*6E{fqQW)Z~HfY=Zf$g^Dj4$U69&(*l*e33C^pin<(oTt!`b+FO zx!9J@@G^70)^8gm%=0dAn#|b`7LQo2lwDhFte3_v@}=-M_vW<*o4)8DJF{-@^UrrL zJnh^4NjfZ|{;r|d+2o0nCJVE_Q=hxzqgnB`Eh|;L6Br?wtjwr)<&otE$0=jA3u86~M( zH+avRvwM+rs#}{9uiEA+oplSe%I>HXXy^CKru}9=<@4`QPXEg1-g|A9EiCw+!#rnk zzvlLjd3!Ilo=$RnZ~3O@<00+!na}?na+<7o2ayCV$07(_A0kdggw6}ZlO3^LdvY*imutl`ol@z zXI$O6=@9!t1iZ8X1ApuhNn`ADB&heMftGNxtgaCZ??fUhgIsZ*|nTCA$aO{K6(Is=$z8^15c9%TXw50Coy@fX`HgVhT&}?l@DVU^d zyE$o!MOpGz3q@|8I-9T2$*hadbgF$i)T-om%qnSe-6gI(-|mNgX-~cRi*56qlZ@_7 zZIW8uV>azX_U}Gp-%YxUR3dV?I~N|gnlRze)?j_shY@a_VYZXv3)WxoGXGFuqGu9* zE}ikZ@}kpONz)&PH$3Hw3Z4D%%Iym)^Sj%ucG)t8<}ZFPE_d%$Pq5UfC!P^=UP>!W za8u`-ke7Qyv{)f-fp95{$V@-x$;V!ZEtrurZU3%$qLM)-pKX;{=5O1d+F@$AZ_z&& zZk@xy7V*0lzdN^HO|c@&>8Wyz#=!*Pg&%6a?e#qKefRR94@R96xXam|2XA@)G`{a# z{r~P%r`rF&|NNc*>F4`?s~^n8A7{K-tNUg1ny(EHULTLQ|F=!|)1mY8&37hj?Y#B> zdjGAbYv(XbKG~4_AzJm&SsjTr3l8w<%$&5*HQS>i;Sp0Ue?sUjb-f1?a?-D-S2U^y znX}B#lU8|tgUMd|ZFlPNjUNrxKA5P(XW{m@iuKz1WbPF=e%UTu`07c-y$c%-tFFFu z+)pB{^s#dwO3@ z(AVYA+cl3`McIGc&^-F*aGrk9s)$3DKQ0=~(7re8gCwuD&!L=~Iqs2Pe+8`FdS-bL z%UP+*EJkKrZ|?FF+4|xjS62o!gr;d4*J!_p~Plf?+G0SD$gbl<|%IUhp#J!qsh; zF=k1ekNkGFD9UoJO0;oMRZyO`Mn$kD&93peUq(Vs$ur)VROMqK z)f+Azo!&di#rVsO4b?Y2))y?Z2sp*NG-i?4ya!UXZs&7KRt{&8o3_!P{~Zmz!5UG3X`P2z)r@Dju)rCG=FuGV%NarJc;I94RVM z7r2as*w4zvDC;eqb<;y7+g^K0@Z4UO-{qe+MCP(fbKcXw;gMsmv3cT=)(?&4ZcT=(~B%bcDcEWIx~;f1ky(7G(wzwbCtzuD1}9#Gt;%Gv&W zi|?&ek9%f6(kxoC!@A$+tlW0#8}HOFH4#;}7_aWT?{Rep_a3!tyAynN6h(cI?)TW8 zaPs0b>-i48r4bu4j1TOXQ_$iuRlIyQsL=}_0|w-U+r67`@TFvr&7&BDRk2a4BR9>w_Euue*2*6` zr_+-srpBoMT$}S^nsJZLg2`cT^3`)*pMTo-sB@d9rXu%RPN}ta72^H+)8}MbFUbwK z9C~}B;QHP_U9MsiO%}Mgo=|Fj_A#eV+Zfk|zcT&d5VLXh{RRoUqfKHpp;D<4 z&tvnMX8p7|=e#>FAt&nS^~;Wm(%;;chH3_%wW&-?I8w0wJePfOdGXWSyguvQjX~^@ z7p^6?_6qp*Wglk~pOW=4ynIvR{Nrv~hx2c&_z>av`M{Zusu_1>H|i804HnD)mQ$vp z*bwaZ=h3T6R)xv;7VRx@%+rrvANDV=T5}R()TD1g1^2)1vPst7sJQW)kzc^NUhO@5 zMNaA&zTx^-7qZJekH^yH(*|v!SzU7+^EcIF&Hj)YSq*cU9p`U(U)9{@-B^2c$?9b{E_y35 zo%7LNweg{CGz4QH(grnPnl7#o?EjhwhllNf85#ihZ4oSa7C*F{i?SGycUe&ebY1{l;lW)k1 zYKHw-k)>X6_U1C1qe|`d z9X{J-znzPCICuX133C%?p3S;YXB2&`W0q011n<2wX+1Bm7*`i?&lH-yyzl$M$G+Jd zHmfVY%gjIVx-j_6=UKj+tG!O=aTZ?Qc0cM>=iS;rA6S>JD`9XCk@k-hPJixG>HB8t ztWUQJpOkv&tpCX(Fz>0Uq~fwY&vx9^T)VrjW69f$vr21!#(uTYZd2EsXL@_`Rh4dJv6Pc)vnXyOQ?v+fr_aw zI9RIBr`Z%)e0F;zc+4!vFziZT+%J_i^0!y6dENCg#NGJeBL1ziS`+`xmjCnBV~ORy z^izLSSype?Gx@@vK7l_V=AKXX{QbXb#TMLjygyfr=L|`QYOtShWJ67+hiB)5e5`30=M!+-1jWL~daxHK@Fe_gZVdyTl$e=hzy z#wUNu!y?!qtmMZZ5uZtCYjuj-B=5YlFqo?1bu2-8dI$Rpg-t$(E}p1ebI*D)z*y8 ztO{$C+ty9rAhGVH>*+@>XSOwM@OwPZ`m>;U({lTsqo0{AE{6N~Y};19xWFp8@OrP` z35o9AzlwyCE%}Z$sThWN^lU76mZ~#T_SNBt3$KjAc25oDJb7Pq%2WOQ+6gnOnR2GT zYbcz%>CTS@Ygim3*YBRPDZ(XVwqv9c<94l7!?IN&r-XR)7*bDe+{~8R88>6glub`m zb5l+wot&wy(S1KII!$G}U%|8+@`<3#3)!du!v8i#- zqOD~svKUsalF6_4D@u`FxJarxByg#^*wY`oQi|^Q*ZCQ3I#nYfZME)k{>eqRelOc6 zqqj=P`B-F#vRPp15m!^?7~T28i&n+&_54s1I>9Bjv}4u#)2>&`-|?gzOLus8$=qc7 zg%JO}Sy_Cc!S-E8XPvr`5gE)XdDt}cQ9+}O-w~~qMz3@9R&H7)J4x&J3R_RD_gl_9 zo^+~kwc^T&(vw5no_XIeOUVAkZxUr1%EiKe#(m1;Th76jc@=wCF5@bimaTQ%pp{uP zy_CaKltpijY3L*AS+kO_hPcNBGY9%k-O;k_)TY}Wv$W=#?aE&DMReCpQRDgIS3}O{ zC3$>XxH3-uddS*@j8)+hv$Sjt+%JV>3&opNaZGv@`)tywj{KUe%U@(CNp198rL4D7 z@?wj>{|>oJ+qZ`X?R37jcv^eVpA}1)m-V)D?WuR3WR`SqzDL+;=W`3v9oau{{7QU$ z|C5mU+=SIT*BL5C2=%^tEv_Jz^7)^O-L#0;o=xu*zBR*XQfg z*k5-WSx$3(KOy^e7{{($8$%UCJLaJ2`x@`eS`__m;S0@{MfhIeR%C9vuIEL~yxg`$pATI>(dBnSCvj5h>+H6K>Y|v7mbIpWCoax9eb1x5 zR%9;smP4xEjQ;$t%PZcxU*x=Lt7&ySfoIB}gxM1e-6r`?t5EUuH&nShVM2+!!plEb zXR6G-&Rf{J(-X-P>vCeIrFbz+=}G1J7MkZ>Y?D)Fi1ReoJ*< zj>$yNU0WkPtduXPOf2b(o>bBwdx@9R)4xMarudg;?d)ikzdDv*FL6vM$ot{A)x<<3bzL_TB$&@a#?IpHDyAL%BNNKhDxszbBG^qG=_w z$U_<5)DzCz0v5k!|9(YfVbB-f-t_&Mj;=QSIudV>>CV%dI_utq9UtDV_~Vju#lGGx zxi$A;5YGv{RFk4*JDRU9<@vS!yu&_u7hg{0^!4`z;wPQ|BkXCHYO*cCw#JL$Rj`WL z!7L#;js?F&-1K5}e~a8p&Hec4$&UU4)p~EaXY2TromZ6pah$x$Uvh82&(*(0I&Fg9e6zT#!LX*+O4Lm+Mkc-{XjAo_l?5@02d=C%xb$I1%5tTR zOT}H^8`M=Ykq7b>7#{wT$iImzXsbInR_A zi%(f?d7UF12g zqa5Nq4Jy^K?-WA3ts^MP`pZhrLYPJ6Hqn~uUUip=<xP8er#Z|s zWz>__Y~IptSY7)#*52*LVsA-aCLhD1@Q2>Fw;sOP_iRz#99;viOu@|^Z(9Z1&hT~~ z{A-qVxbWKl*%hIYM;i{#n5DaSS>y|qnB&g3zn}YG{)0(cFL%COfa|#=P79BHM>@XO z^+|2{`MW);`}G}RRikX42OE#=u78`;Q(m0RkvvD>MuODgRiC+q%p#uu?b)ok>}m+d z>y1w}8G?NZS3mPmeRF|(M$&x+AH$>H`l77gcgf)3ed zQ}0iFYoNHff5YKDUuVB*Qa{ein!aBBxKH6;>puqR^>f~|b4nI$PFkobup28S6AaZ593pV8iMO!n8&P`7P|_N+8J z#8oU+Rsr^EyBUg~4_!-n*eZE5 zvDGr>VT*2wGLJ${0mH19i8HS){%N*#$Ai6@_qG11%)a!(y=LCK(R@`qYT*QohfhWPEf5zY6D*8lzPKQ|}4>W(R+PUfe4r(f6S8VB=moLcfTe3^v66yNsr^e#rng|Yq5o!Kl} zXMcJYDZ}Bl-0HrMp@K$z{7EB*?ze$Mn^?nk>D31%yWufXw19A#>cXBGT)O|76KwdO`ijJIJmqYoDgAd za>~6uFOsL=lY>COHJK*{T(F%5ZSWUaT@Y%CLCLp=IV0a_o)wYSyN; zF*-`d*KP;7C`W%@BoD`_gSGEPnCAqYjK9C-DMOQ!+pa#4q;pKwA_)Nzp@y5rM;jJQ zVCYE~V{SUM?#Ild49iV+ZF7rT$L#oWhw$7ahkzSBPqnNBM0QE%omT0zMZF_ z%jUwTb{P(?lLt=97b$3zbU(L^mTCFR<<8)!D0t$od_yqX@25vLSa7`Im1|>kj8tK) zT+7Gu^ufYMBFuA)Zc0A^1zokNV#9)-aA776uD`c-+VQcpswCLT8y(R6^I>k~PCk}a zmjxhor!I(RfP&=bgSoHYI0W$R+z^w_K4%m6OP70Fm>m_PKa}hTx$A^@K7-@Q-8aws zy|}f@cy%MQ+fVVtFWXLLZoQGdFgx46_Ps;E3rFjs?Un)}W*2{2^Rc8(wtMo)^1&2u zb?f_Wj4VqpKRj<)sGw1@WwRuwg2wE5T|3SASXy~rUH-`@u~gjZ&d$%w9A5udy-fo} zALEMiI&3VhED5%tcw#c}UncQDWY-SAli7s|8Y&Fh#sch#dsfLi1c-J1`7FuY#iU<4VI4?_DGf~87 zm+am97nB_z2&ziTUOY2Dri+_nSBJlY>hBJJho!%CCNyxJ`(~>hwalP)mPdlu(TDll zlN!9fbt*AVeI@M5q-F8vq$byj2OoCV`Q2pMv+B{@9HD@dcD^bLniki`PhknMTGSjY z5)hexz4{yPjHcJCcJIw^@cNYR&7|eQ_O5$U1J^(8?`1{~tjqt`EfktzRPg7$&D;jA zzVADZCpB>8Rf!w(1RVTXc1&}2L;B^pp^-D0ivE}IUuBs3Xnr3{h!oR-y>@IX6c~Pl zi3H5-5L_q9x=JJ_^6|Z!EFqitrC35%frwrH!kjbKPBEBY<}cT{Rd_MK3`kanCFE7` zqdlUmAp$J3f<*#mp10i_X2z(mZNsL2m|^Oh`_oxM1X$kvyl%wW((rqiiUI5OOFY+) zsV0!()zL}mmv)msS#IDV^NUda;D=kV z0geJM`~n?V9Uts7<6NP@a>rA%QBziN!QI2A4ywvtch*V-s3x6N(hEAWHa&q|huv}E z#5Dq6e^*WW=I_Gy@u#F+{U3i*)#dtIdLG11To->zahXa=Wa1L9%b9}-2J3gZ>E3kvC~)2 zFBG!+G3mmb#Vvlv7a#ZCB4|~-+;IEiBQiPP&0?+HUZk+BeJP__GC{)H`P84i? zd%f`a^Za*U65qGo;UX7KRQz>WuCXv!aLXQ$5ud8uIp=n&2Nd-Q6}#QhJpWW;VYBdq zZCadjKi&GMQt}~M|6HI``kU>S-f9@K@4R=a`d#vx7Qb7a=ih294E|R9vTVu)N$b@+ zWmR7-X^1Gvmt!`$RL6I>OUNp9e|w%g=iF~gp4|>~O1Ig_^IXGFy>0I8m_9+P%>7+? z?wqnJXAbt>=Hoq{awe~vW7>l zq4ciHrh(1q@f%Uql3VA>KvvHA`|fsN5?|iWi80o0FP4NKQCJupC)nKLcRPRS?La5? zj|+e9n=<2a*tbW=a$5M5TngSwENtcoygQ@!f}_&iyQ`!Z8qW*4yGq({x$^8!>4!LE zQ$+sxfRsFZmn~%VZuYLQPIAossZuZ3vtlwc z-#%-8m6A_&Hek>5T?Co3$oVrUB=|}#+&e9IymTvgZ0N*(aiQf?2C1i|&J!*ie4O-a z-joZDIR)z(Sksn#xKi*wSjg(+^SNvpBK6i13mScr)Rt>3Y+eztXYr9aGJoDCG_WN# zosRWbY?6=J!*KX%Awb1sOA&d|2j@x5w?plrEvs6hrqq$|-f6{Jey8B}+!nvOqas39UqypGUVI5Z=6NV*dCN}|^KO-EK|Skt zI60|<6VIukKvXg>Vvrn;~>y!EuW=Zh)f_dK1J@BQQ_ zWW{WF1e9a<+^dmua#G(Lw^F6#l=gd-g_q-Ia&XT5xTE_JL+{V3lappN-_F}Hds>U1 zn@C}-p6y;(w*F`Hv;y^ipP%>dSJ*OF zKrd0@?q9K>S8AN$aW1DMnzvXPxUTLwu;cXWTYtVLPuyp%>F*>hc$}wxw~WEZ)px2k zep+R?QSx!BLZkGh<6hIkE0t95)h66n5qNE{MoQAb@JP4D5+3(odi;`81yx>hgsh%Z zeD|r;FFp5~`&#QmoU>SDw(gp&D0#Fab$aj|qf;9DpWB@;-(qRLGEnQy$(Y?QYuG*= z2$kD$)nB~Y==Z(qRMLKIM3) zNi`9NH@%5-zVkHjwp{v(ORuY*&ns-x+xw_4{%O%NrMD{`yp{2YNrhS^{^;bjl zwEL4;b0(IY&)nG?-dnP5q2$8i=}GIqE_3}T+G6$X(S~D6<=qQUK2lkGaaNyEg|d0L zPUb$XHP=~qeL|-`wp{JAcgnAuj>Y?>zI~k9VHjn0G+t^% zzFWNeu$thn*Y<|LvyXn<xQA8|eJM@uJe?YNXOdsA2OJiS?S`eJUc6kPOX zb>GAHj(j)YX1je)pL4k|O+w!4+&vLy&NK;|$=OP)=A0CKy>j95ZRRT{c3sJMeJLi` z^4!mt%boIsGMQS|%gg-uKXKYO-G0?s>YpY}v0eP*j|rdT^GUCEX08=Hzq6y-VB-nT zu7z)k&i#xD`q*=Bo#x65pJ!fH6HVK^XiatATOlJcS2c~NoB2;gE?M|mZ}GkFM}J+~ z(_I3f5>Y^uq#-sx<+dU|`# zm!scXR5j0U&J9nhR5}~S-cV^eF~R2N6*}gEi)b6T1{WeOMZ#`Qp$TfJ@VAb`)iy0POn`5`50eGnqfnn{hUf3 zgVOM80Z+qUzdn9HVMFy+*Z=pHEUh^7bCyiY+sQiTWtlc6`YBmA<-FhJJojDCRe!77 z#d}%9cb4olx@0+DTkOQ~qdMI(mt>b)T1%Z2+>up$Oy~clSk>!IPt4xD)35?Wig!dZ@pjYz3fTt?_bP!F1`M*(qF{=Z}Qq~Uj^Ux ziy23)Zz@JeE=_CPy!i3FcGuh|yfeRw&Z`WqGrsD^Co_3#rl@w?Nul-YSQfT8yguK) z$Yh#4?<2=*X3fgA`xhNeNjmj_@52=5C4y6S&G1isetwF{$6N0v`ouL%t)7u(e{uQe z+t=8_^z{1owJNXnuCn{|>4fvL{MY}dPT#cP^z125o@%<)%-~SI5tC#6DSEc4Qx7lBw&OB5S^}>5&bnZg^O!eBIVFB^CIL*H- z{l{GVVoLa83*|3M-7L#qc<*)pEbF%ArRT4pZ&!9X$IGQEn}1n)!%EsSzU#OuckssJ zJe8i-Cr@u@`gG}gaO^VqfY>MwPv5MLT(#d*)hnO9Td2SF$>!F5BD+PyH!RaX8XU%5 zyV5sh<(KG#e!q;?X51^wTfOhk8w1lB;Zx>HO|6<#7Bu70Ol58#i%*^3=I!3MWbT*L zsEgN+o7Dcinegk=+6DWr{FJ`>b?LeE&qrqN6Y*c^neeLN{;!Ra?UBUs$8M+Yr*&Mo7<8!>#yB>$-ZY_U%E4U z!L!fX|ycZ(n0w#_cIyS$2VPW;3Y&JA^E4yx3=X1S!bG%a54r*>95 z=k#P>C$FXa@%!8EOGt|Bjt%$e7S|Q-I=N)co)zpz*PJr{+9*5QT()LQ_|dM|ON-yG z>~xQAjhjDTRLlNN%dsYLn^&`~*<5C_6-Fe*Eq;^w&84imRB@NZhGeIedFO7wvPhW! zJFfPP#a-cjxkqQRKi>T7_`J=(`#RfKcE?n&`2JX zw7-Auo69PFbK9GJqG$dE8r3bbt4gxI7s2yL?9BT|6}guUZ!vLXF?@-iTyf)`OBCxC zmRmlrO8&@8>?8Lf>(&;qqUY zaCl;0=%=EZ2}hcX)?8eW?=bQHD@W1%v*+gt-+vp~{n>UsU+BCtr_dREq4&KQS82Ei zg#^mku2@u46`=a7E9Bn7F0MC@Q#DK;ow%v^P$(quiS3F-95oI{uBfcIRdoDoWZ`ko z09Drf$IPMZ9lsWMd4BQ=P|cdKeoOMy0_G&a4PF&@qc~Sj$==2v)|p;)%slKzaQISW}?`spj$%kyT<6JduEzgQi zOx7X3%jNn)?kUS{{XRi?YI&r>Rh7`865pphyHK1eQ|}RXHjFFDDqz!!Z*wMWUUl_~oq(8DfvLgHbGNo7oH&{F-Og^C zpP<vf!JtqU?IZf_Mn=a$!<9qcOh_07c?{YW*nFPFCcI<%}{PUX?5Q9{9xn&8L-OUWoe#zL$5moG8O#A(`b3Joz zY_y)dYvbc}=|QL0Ocm>xwv*!#PsVKP0M*?5RpBf*6$K?6SLS723@?1>?7lamcbetu zy_>JjbCCWgd$(6Kc4h0fZ)r!r)-Lg#Ta^~2s2R9$Rd1De(6t2ZxIq6Lp9}jEUPa5- zy}iS|Zl89N+~Kb+E6u9{W`r5+-tK(wTepS!)jXb*wBPrt_S?_fe17q7wxEO2y#M<@ z$E0p+E3UP=Z7vey`0oziHhFD_HSz(I-hS@n+|)1dE&03HqNQ4I9;RGevDa_sogdF1 zue9BXuUR{1itxNu_?^#qbKiUQoBs9+H?K4F*iJYdUGqEH z+OJmoYvS)UuvGskn}t^wwt2;Z@G`$oBd*m)4Q^TNiD$_>(4Cs z&A-Ifn(^_H-E%JDuj(wf?(=-xB@wqIt3<@x~9I z>{WU^-Dqk_e6d~Hh3bvJ|IT=Q<;XYQsmFbD?#I2^JNIq$^I1;}w&nN6?VT*!_&Tru zt^K#JZBIWMtC@!>{A|0CBct0t*J7{D+9cPPk2lt)cc%RQrqj^2!Cfiq%Y@$BYx~Qk zdDj|mtle$)^^>Y7$zpF$FR5q=*pLOu->PbDqG4XFUXFvKib-Uuk^;OqD zZxo-OUp4E_MI(<@`rob`D_W)ht#wc7s{1UT-T7DDKd?&v>hifO{zW^k`tQeZb$a}q z*C7)OeT~wRKS?cqWw?E{&~2ZuM-3Tv``!8fX6M)NZRy$Z)z^IPTrIw}KIe7zzm2y~ zTF=_|Pklw5_Jqw#epRh6HNJX%_4KbR>Xf4kSNU59{@u>B=GR;GtLa~bu3i^7#+kKV z@to|on56AzzUca^&)9dPmp9R8zt)+Z-;9^VdnQXvo>9C#;a5`j`e#M1w|BcMB%M3* z`u~%Uu_?b&_bvMOui_m;wWWv0?g!PaqO*?dOsiNnFL%ls$-i!G`Wj)f=h-x+-)>G= zE~L?Udwuyy{>p@MzZEXw%5#1v2hX$Z-{NoYx8UWck2ku+~g76 zZuclu{-)UWMZS+tC~s`4tW-BBekty;_LxDv>!a;0*X+N|@{=y!=%Avtz>#lf`NoE~ zkL+)YxNj|5y*I%B?wVzn9gfz;r78$a7E7Am+8rV*`Etqa_1!YgSufWXIg57gJ??k1 z(Kj?o1C3x$9E)JeVzep;PuE-){#@{SGt! zjyava(%+#hZ4Os(VfY!t=g03Iu4n8QS>X5Ws^YEbfzHiY-=$uLJ#2gbyuv)YNOae4 z9?n-6{w;gjxL^JI+JsL>-x;r3%)V{8yPlXx_2!89eGV@ej%;Ztyr-m}wQYjm9T)cp zeG)$_)X!UvpdA03&zrAyd9LsV^EfRa1lPFV(DZ8RV4oD}i! z!N!KlPJV;pOzvmbj-CpBpY%0HeD(X%rz_RFMLSK8bh*4vYF((_EjrWU2$%DDVeOz& zA?>2_4$+-9OHNGwe1yx{KW-sNoX0kDjbDcrL=lf|Vm8{w|Co*V4 zn_QKhv;XvD&I5nts$?QWxu)~m2Ag)yoBw2@(e8#)O%L7m`zv-ezW4w2DZjsdX3Gjg zZ{^hiu@7fhf85S&GedN~Wm)p2gQxhU&(>f29a$*4=_|K6x*!+^cc58&)-&-8bNnFe?FKe2_`g_x@ zjMKsHqJ54_mNfaFaZ-@^aX5q9p+dl^KkUA);c=ISJG)-R+ZO&lmo0yOLrd2Vm))jU zE?&BQ`~T9Y1=)I<{?%^R<(SvKDDv6*zU07BS8pM8zdhEIqPX3fcOO#uvUaK%$Cp@^ zLh~EX`R)aMuFl~Rn%>6ns^Z#~aPJfCi=)$z#kWrh@t!}8X_eoC8!>Ws7&1z$`9Ddr zg@?Fj2){V*qphOM_2n1qz4+V>*ZDr(k`0`&c-yPRM>@>3%UsVCTVIlXda1d3<4G5r zqp!TCd{#PVny~!)4@Ko^aZ1XXvxCklD{uV0XZ`-}y&Q@v47yuPn|n&W?fI-}`_{#6 zV-wFJ`5SL1PRzS#B$3JUrjyN5YH|7egX~-K*_8KwHZqdPbh`dn>1_GVbFQ;iKK;vW zxblRZj?m`0E!A7(#f~!hbNzoGSuI@=r`oVfjxDn0d2;^qbv2>#T910wwO(mu{|%g& zSM%+#(#GdIB)cQT8eNmZ4|AHuZS;<*doy(U6L>Fvo%BR?H4ZJzEcc7GEmz7tHz zj#v`d^KXO4;x~^IC(cW*o*1*wt9E;%>#WY(@?x3mPG}ra^8Fdt-~7cj)$i4;&C_;z zlvdn7;~Lbp_00n%!{@v@mz?C|rYjy?YNsPq{l;a=7GbfYT>kqO-SoO%y!6ALs-Es6 z!PhHdmITf@ptSK@hGe%*+IoeZjHjEf-!RPai&%0#|7yGAq^ZICzI8}7yMKG9oE-S% z*8Y>vf9k&B7xmp)baAGO>zA4p8D)~(ul@&IbkX+>aq(ZYXy+DvRhD0GFU0LIV*Gpb z@qJa{%uUPFZpy8(p7LMuOOU)#ArHnX_ujoV+iMr&N#yX5+cSEuz@O@f|uUUc~$ zG`G_JeWU&N-n8u>zdl}jv8v9buJuOS_=O?Rkl3%`<{ja<~MQ{Jj z#P6on=I=L%O-&}|JXHVJ2vs*WFB>Y_CwG~&C zZTM`jX4&OThdp;T`j!PHcx#6xC-U8^bPQ?zFX6!Xamyj^XNJF6nT<6Zwc6jba^GSP z*~{KnsQz!m+ft8ZZTX2JnVjs!b1ToxORvj$tNEwB(uM0-LhM21wZ+@pUq$VmJZJk4 zp;gz@4n_ye;t85xaqs8a6}>s{Cxushd&)V##P&D8XHZei$Lh^#FTZOm_MGE#II+A! zR%yH3mgy60b~Fn)P2@DRkbLy_YFpFF>gcd@QS#N-9vtFjwD~@P`)+g04GtWSJ;i>%!oc zLra3yzld15YVgce5>Z>IB+?cj$mP6(qt$Z-N2_88%bp6G^JNQ*&I@aO-x0vb_4s5n z*JPiGT+YiqS{FLK-@3!EvaGf>eZJMx>%vy9YCLm4{Vtt5%THD>*mwhrVKwVcpUU1= zAHfGsD>y0?Lm(!tdhWRH@9cke`&<7mJhZkv&RFykvzCa>_4XZ0uPu327rb!Qf_oRm zma7QutL{m+n!CSu{g73;&M-o#78`_PoMnN zb8d^2{kvY|&n~9P=Z>_^$~ml-bL^R!wVC|JJ9*yA?peM)XZz^B+*-D8>(@Dbl$oUG zy<|_;PDh>0^vCB;FG~N?cZT7^G^g{|teuj>7_XiW0VF zmFjB)cn?0zZtRt~xk1Hw^UUP9gqwC7ZtprdO=Ru65TEli7|d%Ne^svD*r<~HgO9`E zRd)0d_vlqqO}NXxZzyb9wM$4l<#per{@1sEJSZ&7yv(E_{Q7m`&Pl%442s2b0$fa^ zDhf)o>&DOPD2x``cV56i>3Ut1$ld)XjdkiSx9&c3Z6QwbK-|m9j(3(YRT+)-KR;i+!J9Fp+c4A6aNf+!W*6wr%?o!^I|Rlx3&* z&E|MqCgWl{Rj0J@N>IT|=YF|gJ$FyZ!8H8OJ2F-%h8-`FAkS0yxO)p)`;IQ zjNRc=ZIeyuE0J!xOtzUqzg^L1Hg zY5&bm+M{(!YWwFsRx?^Vt*utw-RO`Ns~v8?K|!}R*}Jy>N%7mmQb!JD->8b?-SjRc z{IC>X;VaAV4!*g+Dv!1F+%iAv)_*5pvGNnUTCEK`j%?;q>tDQ8`J06a=GBe?6(&EW9%sq_K4vmSpQp;~!ikj7*%F)BCPdmC{k8svRrQNw3A-1c z(0wNN@8%*dwRtB!tk2vNI38o+v3GjC1#i1P_w=00-M5}TxwGQr!ki`dTfbS0=iIAw z^jQ1jviYHF5_=v#;F#=HAYOOxH2a!OA5TVWHk>(luq90YjoX!=?iBlAOMNwwah)XFTuu_7$6#y)DvV^}l?F*>|OLCnCpj{TLtjifgZ$<{M9r|KpyrZl3T&)62q!FSkzHoxEOV>w=1gJ(H*M z>{=3%Ro8pl@y+kt?`69){X|t`u1zg=zg=@b04yZd|NA+=SW@>^v)1C)Ip zOZF~1W;;`I_OlsZH+4VBaXBJ2p@5a&fNRZj{VP+=%0CDlTR8drfreK%uPfDGugbAo z>}eYoF{4HF151(diM7&Jl?8fBWpn<9};y7$+;e z`Iy0#yQc1Ay2E7Gg}qfbmg!XeYwl=WaK%H{T}ReEIZv@_-T|9MoZO3+Zn+i6u=!}g zNhYSt^H`Z@@0+HvGUnmF_PfueWo3TwuJ9*&ZQJMIg4#vh*SI4=|iu-xZxs-8z)~UWFS-ozP6UT=_P1&d?lc&sDRQRcIA7xy-BsFNI&74AXbo=F~sEdF`^*pC_-? z@!Kq)!`k_I)8y{u)A!t9Et3r2r|JJ)u&Cnt>Cm4aVkY#RWWH2-UjEYdlc6tvKUuXUe%-Fe zQ>6;nPOF7WE-EURs@XJo)sa0b#6utMXkMxF@|t7Fv#0m;7R}=CpS)tq;d{=`{n?Y2 zPf7Y7neb}e6GrPNbLZK#e$&?X*WIU(dCKjo!u=(he69Mvk=c3d-idxwyO-vy>Jd%R z+`L=n>gQW0gFE-QO!Y9D8te2s@S8yU<40PP*M{C3gp9u|lnF`QczyP2CCg9eW?FlO&WzO$ojLDHWx&*%_mU^Ax>UDPYhwGV zxCKZ2Rg9)=tz5n(cxw3BA2VM35Ibcru5_*7&bFeaw_n?0HvF1>jd6kZ|BteF_pmOB zPDtSY%#?G`p!0w3y9>LLj~7)p|0#$+_%HF(m9u(z5A7pz-(G&lza)8%Y4z;jME-+p z!uM-!&B`41y-#jkD&!wxzOB^hPhIYJ6^$anjnxN4-qsi{`IoreHko;1*4Fo)zboEa zJDs;$x#j6g1NV*MmMd*Kz8*SR+d1QZ@AW%!r*1FsvQ2-vcUSqHH1S{6K3_$5x&N5` z{@|Hs|Kz?_ZK!0K(`B->d4j{cb)Mffi+Lkg++pZyI6a;HBpVM;21nzU<7pSltiyTo zwdxKfOv!$3Uz(-T>h~{M&a)*aAt-cd?@6B5f^t?#l`*}?TFl(EZmg;?Q!{+`A^oP? zdF2fX$|lvj--Nm46|{W(^+(K6-p^n~NWG?12urEb!sX}LH@seU_ipuiUeO=t*NX>= z->Yj{b$hYFl5Cyr>1hfosti5bzM=E&Rr_Z}nUh@A zOVr(h!~7SjZ!y`PYOL7B-fR|stvgP8Lf;1UDW4{%OzW9B#jCnptxnQs=QZVz+^Y-O z_C_Z#GhVG)8S-mko9;Q^S6?KLiXLV8e>iUHH;KtC(Z7>7H$+eITKD2se@E0r(OZg| za#H?%2Gz!|%kro9T56TCDBa}9>OB&hXZ(7Z_l+G>jlO!v=O-InzZk4-^WVa&-1os} zrUx7S=bb3%yZ2M4^8u&z`Ga$(sCaI?{lvM{PWBDL)}O{L)W< zjz`7se|626_3rJT-~1HYuzNpbm2=ARkX7{JQ;BW2rzWB>pB zS{>mU85dDj^JmZMTbHwI8_t&>-PD%0-ewxhr*$)r{z+4M6g&CE#$~q*mKUw#d=hba z`S-WUz6!^s6dUETnJlkq%qp_I&Qi4I=F!i;BZN=vK4x+B#2(pfp`U-AJxf0O@W-Q7 zPwM4+u6|ygnw$D`r@{);J;L=?4Q81QZ#Epw_|If;km0}^GZv?ap7T9f2=nceA+Wc%%w?DEmePz4#I$8vN<4wo+-#ZmYBtpC6n{ ztB+x4ia*!x{P6z1BHudZ7cwv7l{UTj_)})_gHzl$17eO_I(;lsoS^yqq}cyYrPCYs z^RY`AU%egcRwgI4+P&SAv^`Yu+o5vTZEY<*w7|FB}IM3};-d-IR(5Q}~4G^_gf zs(CqC9k1VT3!XRg-XwXzg?nFLj)$=)V4EYc_x98q+QMC$wBH?CNxgdTG@6 ze74!rE3G9ZTazzuYyK{tGPU+^mhtcS6ft?d{#fDZ`~TSmrk$R6F-xIoPDqcBtw8I3 zy(6bR9;(gj@w%Mt`}c0ZhU-%Li@6*9MHxA(^B6AhRGxBb;Xks8u`;{kjiATxr0-j0 zGkex6K6=x>CcAM*U+_mpL67p870P?RXHP#HTr|Ij>E8AGfjd7(C0`DkecdwbP|<%` z)iv=G40o>XvvD`LAJfr(uq5X_V~$UHTf!H{B-K5IJ+UTEc}F?oc1_@ovnrc8gHc;f zJ^JO>Z>%@h#$Dg|NctCR=HLG@)1x=3C~~-zn>^%h`J10(*G5^J(Sv3eNHBtR2R-|5de~TBlx~R_D%SIRB|L$E34HY)NxoJEu(P;@(vKf6e2k zSA>PM8fSi7Q?uM*ZOE6+4`*`yn#*}~>-0wqNrB$$Kjwd1`FHD2-?hJHyD1!g;%ho# z>-E=L6n_2Of7WjGk8Ph+JulkccAon6UtYgI(`tvsefw7DO#h_n@%Boix5E24z6s}d zlpn6Rw?Xm;XOEcpvajJXVZk{LH^q*;;-u(i{_rZ2Yj#VY+glw-r5m5R5 z)DO8xd8Oah*{i1;Uda1B>E+Q^FTx&syXnt7)Hl-DaJI%Y=Vtqnc7fVR_A>@5TPkAtB6nAC)~#G;{_`cj;>X#q&HjrNw>!-K zWhPMKIzOM4DRNqA_DNac;&@Dlq^xnb$!RvEI5wjNk-%y)gcsyg}Gs|Vmk}hbTy1C$(bMVE&d%+(qJ0f4y z-`>gQ%6X{lLrjET`h@26`e_f1-2{ATt4w`^R?0)1C(xvjWm&d$XzR1+>Q zDt7IjaOB20AD56Kp5@8MH*dD~I`E%a^he7KA@__n*YcSzKb$0gT>81*=Ia99cg{Wg z3?@kb)qB0>TC=MPA1CjJrUJp5391qz0mu2;WH;UTUvk8JJGWD~hO!P@_&T-u1pkZ;29cM;9a$p( z=S4nV7dX4%oHq}r(i?LV@p~}>v5({bJW$=I{A%w@MVpV+Y+ltz|HZtY(d+&AxO>!+ z%f2>w&*FBr9+5owyU;mM<>Bfy8Kb$|+m}rDX1OFf?XI$NjP&;&L%a7@HTOAAKRv~9 z$j?n*`?CKIKCblLDSo;;nVlu0oL&?%&q-C^nW*_yK(5kNDBQT3uee1@T4)0eNc9I1W_-@cgYA-4Ej_q?KxAjO_H zyEbdI%s=C4)AMo`Uy|5)i>RwJ9#1g5d@gNv`x*l^m$LQFKY05t?&H7t(8t4dXL8TG zUu$}Frf>Stqf;-Q=IK>Fby@p{(v>Y?w?67!tZQIB_(Xu0vvl2F<=2xB1m38&QEz_~ z$-jehZ*tJ{$M4k=G?&@$SKVM|=WKJ1VRFV!9-X77r$5kmbLd~q9G6)&$6j>)>RsU? zeBAiNH0K+;Hb|_UtKPo&L+6!`p0VvbzDnXBc*E2^uWU&_k+%PP_!Eyc=N8Vt(a!TN zulE1lXM7X0-Hk83myny0{6%I?Taw{1f0sm!9NP`E*F0Ukarep6V{_Vh++6ZwtpDV$ZM##}rk@Vp3GV9)Chwf5*68w6M>l!f z$##q1d+(px+j?p~Z`rrGe|Zy@&wq1XBK3IqiFJwWA1#i?8(955_gAso(XD#PYoT-3 zJHIYEH8E$Oi~1E4z5=((4Y58=MdE*Dg)EzIWnS~=_So>kskLQEez3=e>$gQGeQ^C* z({V3xy}>Tzj}KDlB4x zxzDd zD?I!^D!w}WTXC{nyYrSDh8L@g_aA2ptcp=|JN%O36TaTuamc;>Mf;l2b!;v( zmnuwCo!Sx=ozr_<@f;I>Qs#SubysF3y{|jbF+1~Sum7rBO)^LQ>{kEC-7U_TRQTL} zQ{TFR%bA)Ai&ZD)T*%yKvgK&|qq(XkiJA4=Stl>zY+iA%w8xP3J zUVAaQygb;N(-wK-;2P&Sd`fS^jSiMAiBjz@b-vMa#(9qJMQ5E$6I157v|jqTNk`?2 zdd>DHnhH_V?m7MXX4Jh()iKb5v;UKiw$_mw_ohUi>*HB|p(e{=e~**u=JVf0y8EyG zQ+)L|cBa}%w&#i&r5gY5*Ev+>T?oo$n9{r9{7&VTN9=<0r(amtqI=rn2;20Jv!|J` z*>Q===5DhwXgfD8?6$8{6zktrJu~0PPlIr)k|&GjNUypn zzaiFJ;m3z3iUKvKQ_b$w)^%(RObav#3)_~_dhe}+(%Lv?l|_G@l_t)g`mn6VTtq1I z_nYI3k1C&>ap;6nw&=ClN8O^Hr6^wEQm-s4yyU-cugd4Q`H3n@gKmB8%1 zOwXmCMT)Uyes)evxn95Sw94s80xgTIR|#vqwaSv+`aje5$`8gfpYDq|Pjvq*%dZ(M zHDN8kNyF==6{4&a8ZiR9mrr+NtKDXmWVXaRO~hNEaDPiui)XgLaqCU?O%}^`8Q;Hg zs-<(*)xK?ej;P2>WU3u&)7p)e8r9 ziWtUk*f!ylP}jK~YaV9Y<-Vx9H0Npg^XU$(>z+0QG=`QR{bMP0@x`;#c6P7qGUOJ2 z)NScJZD*(&R)2A#qmS%w^DSFG`!RX1;yiM6bB^?*O>S=%7D-I`^`h#ssDPoFbY$SH z;1b7{b-gF%sH(B{9?Cc}J?*DA$5p9F)1MwZ>YD|(Rmtt2IOk;NllfEa)borZ;#`=8 z`c}DAJjr1CxO|6thez3}zPrzB`u^{}nec04efrhPxy7Y_mc97$psC}5bIaO^!lw34xHK%`Vb`p8_W-8~~ z_4Q#Lhh$IBys;vzW9MD3)S^cZcC#j>1}bN-OKRP-k2^taQ}VmtRz`oz6?HY&4vF3f4^0g8g);kpLOiXTbA0O4N`e)_vlT>yV_I%*?7Y~iwPADTe8np%ySGhx7`APy@YdE3 zFMgkR^*dt9toOHngqI}9Uy$D1Q8CdwY|Bi+vs?5m4ZCmH9@gz}F=V&>MTh!D>ROL z(sg+Dq$aq(Fe~kUgMq0)eXU(-&o&p)IU4_Lc{n7^m7?S%p0K=iU(mL8)%mP<+~G=x zXH9+gIOS2?{(XK4|NUfi-+en=@r5Z$mCa#_w87LQk)n-{v|qG#XD@1-K6%0U%za(A zPDhsZ{Rv>@+vKx(j$=iDvXtqM(|YH^<>VVhl6ih_nsVCr;Y^vvKbM-^OXZ$MD=KBT zEV-xj>a)gsrjr4cY*!>!^0gEvKlAqMld_Xuczm|#ZnH(k>P-EQj;C_6P1NkYutJ|_ z=FvZ4*IxLQSN6K=|L&gh)uG}@@0r;0xYY{U^)_C?x@qclHSWPH9GOsges{oJDsH^HAH^~UwCYFJaK2kqazo!-bk8txJWlH z+J9_!uj@;l?3hz#8a)>ym#ba~PMN!hbS^r*W@;;uw z+a53Ch_dBAA}P6HLaFkDtxnm$0+gjBmqkd0Z%Iwvc0|XtI@{r_m*|sEGW#{Je_{Bw z#_de;^qp)i)_W#OE`Gg!AIn2a>5DPT3?%osK};_>N1bmpV-ilVPr2 z{HSn6(CgcW)-P^+sVdlSu-t8jn@h$~DZ__JEE@}KeQT~rN1D6cyY7~oth@bFw3U(J z*`wvY8Yi|)T&lV$?Z{5^L)%m4@0j_R?f&_b#dB)radcfewKi^osj9s^$7<6>lcFap zY|DP)E^y4OctwNH*~O6)p5Ee!&YRlwLd>L1sqXv7PtptbYF|iizM!WYAyBoVrZewB z-Sh5*?c0v6h+0^%HuBF=kMm!DIw@CraU4qZ;!p~z;u3i57qeQ_<Gvs_>;XF=PQH4{C*KKl`$doV5I?5E=&IZu6d7syZKT6^-8TZZyV zHtQDED;-6iTa8;ngHAbJ*0?Fku-bzALC1@734y}1`g}=YUp8C_?-Tl~u$hO;@!Gdv z`f83pj@|Bc5LkHg+s3W8q|$X+q?QS7S12yeyuUqQR!Yj%h9BP^xQAW8$aVDE+`#H@ z8k0GzFIsj)Y1%3L%h)My^7^Y-N$C{M-kWPGrru#$RBlsq&AVpGi?|Cpy}=W9ruCIi zI66t1Q$X$HTlNmUtRpuzUlMP#*V1B?oYgFua8k#;E#rsp2xXQl;0HneVwej|<)IFY9poHA%wZsZf8MqTr2eLnpHbeqmqM9_?6sjf2ll z@4|T=Ei);>&e;BwcSDKPS;tzn$*s> zOa6SeT&O)a=$eA0!Svb*JZmIB_Wiq`+{ED>z1S@``Fd4hOMu9<`TdN~zOC3-$m29o z;9}J~x#K#E-EpN1Er+-}O4I{*@7~|_S9g64N94lhoi?{W ztel(~-l3o6qqy5|TCPr&@`TxnoK5vsH$x309X}k)?afqw7q>>?NA02e6BmA$&^LPU zde`?OQq9qIivy}F-TrKB{cX#6WM9`5%_DiLXB6J4_P+RcMci4yeEI?I-1!go2+N)j z$!jS~bl*9JyTbe)XG_lh64nI2O5wIGYinjX-@12Vm*=}x3@yKfWUoy75v+G|VcqF- zOp-R6vmMGLb;I_AMK3nZEO@a$gH`3$lqI5Vx6-e9HLQ3gIU%Z#L13crHN}t4SJu3J z9X3s;BS>my+#;4IUlz^Z?esq^M(Wr5BhL5kR~rc(nDNw>bJn75ZDsSS7dO4Ub|F5N z`J!!m(hlhMxhhpdA(O%1w#(`k0+g2;}P8EaCm zU)Yqga=Nnf-$lJA-W}L9)%C>^(+o2?-E$7_BIf*Ey1YYex{^~_^zWUvliE#_HkYvV z%$RwP+p;9YMPQrO%@eF&ZTMRIYSJ8yJ_sc!Tuv)uV+gJH ze8P0vZffDHc*SC`jZ)EOoM&!V{o7}f|NN&c+xr!p1xru5b-dM{C?6nqlx<;b(1H(| zVy!-MH^UWl?sXJxFIsinS?2YL<&F}kv%IHe#vTfttDw4Oaa(Avn_%^liT_ikdvDWS z$>sX`W>?NZ*@Y*Lm!(*5`m^i5SjHQMO(ngcn!9A4;Fk`Y1ARIF zczNDkFF0Zy%;2+#t7GlWBR0VuLAO)e|NL=Nuc&JIlj8Jn@BE8@lB4S1$C^7X-Qbt; zq>)EX`m)r*8L4&6Q>sm`SPOsL_C)$|jo7X*`J09l{<@je_XybSkw5FbY|g>Hd9|FC zf0-xl)JwcRb(34`=MyjTPfV>yo5FZ8{%hn@F^}H8UDXq$-FjC{+wNS{vcci^PnXW+ zPU^7p1j!+S9eOQr=Yk+BIqB$!C+4+Srb}DF=I7HJ!NR7Lv~A zDR4WAqiL@P_0i*7xquPZs^ zraV|5cuAn;UG@Gt$C_>BPBp8hnIACu)U)jw$J_ol&$-^7&)R*#LpeKm^R1AwdmWFm zS`^}LO`e=*_&O)Pm~eEn-a~D*_uJymzP`A^I$FB&>W{5Xo0r~w zb>d^Wum9#rPZWyhXc>#gJ7u#xEcetfGih#%Tl9`od{(j0q%%i#n;*WPkP{Ga=kT{Z zYehLGKW(0%DR&~Z^JC8KH_;#OnMz2yd^UR*sTCgd|>y#WuWIFO8)yY95WRIdyeA%hKE|v8s zJ|fR$?z!sJ>znoODoR9dH~M6|%-sLz!GTj!9*TJFK`!iFXR1!3w^M}KVo^k9pV z%9WePr|i|6F;Q~n9KV;pWp)Nm?)0o{YJAqSTHQvXTsb@1R47{XMsU1PquC05y)OM~Q+@m9P zlakB*td#0jpD^yQxhvS8d~ci)dwfkokgfF22dbL|y1VPsl~Y2w9M7DJTwI>+@hY$3 zQS;t?z1|jP=Uo0AbgbATJ^OWPRP%+BQk|A(8tFG*uDi_sF8DIHO-2Ib}_oxV*sPa-}Ow@|y z>bUlgJ*9u5Ys0g(KWEM<{4$qou7LT0$cZ0re^S`QVVZE&R^g{k?+2}?Y%V1xNk*r6 zC&+|VaXTeStgc{EJ{P=8Y{FLe=;WFGJWcIgjq%`Li$p7(ZNR$X=N#5AQk?xV?T-KM=+!>CX#k{LZO)OEYVvn6g}UoPJC zns>Fsy}(XZ()o(VT3!Y<-ki%tW+CfWX>go8HH-65O~=JuE{C#QRc(&Q>1K!RaZr=H z8MQ{>#K)5}J?>mqZ)f0$o+-L!Yd0^G!LvI)Usk3&uTNKBnD=rXhly-&$CNC_MGr6U zIcB|ni}B;u?Pi(p zJcp7#PZBH@y0`!LniJEqj^6uM@4nD}!NqAe=A(iRN)U%g?1I9NEMJ+3YP$b&?oTM6%-uJmWTW?E6QW8Irz`N>Cy5!KmJHXp=^Wgr4!3O{a}iGoe*d`Yxxb)pnR6O(MKOP z-E%m1`~D_YCo`#s0lXsWSG~7LRla)T_R7&?&JKnw(O&Nx(XG9H?=0sZ&yZU>@u4R} z(JHZqi6I;ID*Krgb;~y$cr)qc!pLhnmg(BBRUa8`4xI5NcJtmI)h3sl+8w@oQ>4s= zl6F4V?p3%H))FEn^wjX?fva!7m(27td%?6r$m6HglWC?O&m~WjUhrc5-HwdH73G53 za;H{HcO)fzN!%dNwdz~7kE@)ER{A5YA3tRpHXpxw*+F`vwBYk-hHr~_9ti3;pFH+? z(H>onn`_*hw5{E2_18>{y%#u9V%MhS4rwai^w&9vP3K^HC~z>J*GQSmP3<#-)MKW_ zUO&Q~o}cZ(vdm3m)xp_Q|NnWqe$&5y_wU#9*7fP+&S@2Ua9`oFy{K&UmkvI&(5BU1 z4EG*4NeWJ#UXT*4_Q*D8qtRBUv>)ox4`t2&?t4FB!rYYBv@FvF>q0%aZm##*{owk-qNJVMrS5TG z$V>6_wVfrLg>{@$EEr_Ml_d%DtxbH`Tv zGtrvxBH{kYv<~)qb?sdr%H^aUU0mPmGcCz9FZWFL4rx!5oi|S$I{E(l$({h61TpUN z6MDNBarT)hPrl4!cj5$tp4)Dw$Wn2uqo1RjavlaA%=}{~ozg8L-SRgt!A<$=%@6XK z`%8;=dueMG|pa|NEECREaETcKG5Z zt9qf~+{5A@|Dw~GLgP=Y?)x7V>^VVYlisG9_xgVw551{vX^rX5Xy`cpUfoo|_BNla z?#YO^O4)Iz-|RbWH05@o;LN>e4m}n>xXAg#t4hAe^E*0nb-5p3eWUg%!qPC#_qS`C z%(^)VTg!Ae^PAtz;9L?XrWJHsd}G{xA=9j@-s#t_^1n}1-Y?GnVzq|psl9K?CeAxJ zbs>w<-hw$PZwuKJPLwVFcJzhQqL+I*{4_TQc*SVcX@9;~X31}q+tY2bdh?9T-%81M zUa#4w_vu)D9KY7_b>=5rqMuHin7Ou%_0%Wjr>==Jy&tV zSu`4+KX+`R%d;IF)yL->FIcebET6Ocre}J|6I{;wUU_{szkJ5CWia4wkxcDSXmR* zHZ-nXS@b(LEm(U`c~Qffq`!8J0h%|gpV}&{z9G3m?(Ezn&ky|QEkBV|x;Xk``H8f= zODcZ-f-WJ8gD!0H^IWv2sN&Vc^G#1g)?DUw`!v@y^3d-;xAhG&zP~x_Y|g=d=c+gF z!Ja9v9-WkTS)u>;<0hFU+G(0emS?n2qzH!Cyql)d?H2d(;orHbA`)-!$9cr7?OoOF zF~LoG(W5HSmf6~mK2;t}xGJ{e(TYZe$yTc0a{E><;o>kaNSIjaG&9muDnC}E=)J^J zAJ6jdk}X^;2D?;dh%h?d$nj13BI&fX|MSP7f~3klfgF<-xbh!d*S$CFu(xX_gQUrm z-lu@)RzIQGz=}N2H$15tcmu`7zx%@TntadlW>pBX<|E#-AK z$5TUuK}hjb*z}th=h{-*HPjww--p1G%0 zPj{$X%zyU1b!I^I=_Mz%b(3}4-h9;CJok^CaL_?*+hZjv1v-}(={5dvzxeU_d(YCk z4|WsRD!AnbooGvPVk&sKQEzEdv%-Pr-Xi9nM!&o+EzDGT|JYGW;7@6fW6>+C=x{{= z?k5j!oW8Hq;Z(%-zs&bi_3jfhV%qm+`)^WcyHK|$l*w3*-CSER|3=bJj!L(tXZJtc zmY#agZ6|jIt1A2VrRTlHQa|r-%yQjX*3DvfPyEz|r%KIkFFJCbd=mcoAx>dQqt?#{ zlbjO^Hnd;t*O5B!Efu=yV$wDhuk0%?KD$kFjJ4lXQ+-3;i{Vh+3P(=kYvpP>d>1WT zJ{;w@e>7Q9Xx|C{l^!eP=FbrH*~7tl{+GAd_Fpa&Q!Xpicxml8mCnxjR_UWin}Yd7 zmA$MRuTAz*V@au5!_sY3+2ninXG`1%rT+Ru<}6VQ*EZ=fo^hM>F#e~Qz$Dj`g0Eis zB#E3{|As?o`po6J-3pBXgbO@4U{oZ+o28L_H!)%7wCvresWd8_zIx(hW|X>5@Tog zN$>XO?kTp}-rsI~zPfH=iil!S_3jhj7W}kTO|p!C=YFO4^80TKlyf}#h4bIXRER1~ zOSxDncYW*L=?_m?i!{hJ+~l=CvCo(zI%W^UwTUXS)8?gYFF&&+_jirz$wzyebE=Q$ z)VW?S*~t`}6B0T>w2S4C`N}2UYlQVCrCidTUMd#)^#-^4WUqjZl^(J$pVcyV-dPYl zv9DD%=#K^8ktO$!gw1r(HH_ck-qp-ux|09Bc(aCdKt(yHDzoI7ej~QCmrajFNz`z! zT_8MXanH+%>sx2A%oJR%Fnir|g~O+hUH2APai8z9I%DvkKejg~l|A#jV^B0NE68K9 zs`L3zGgKCyU$rFI*Wp)==e0@QH{#siGv{~xG#6au?tZrS2HQ&$=2inmEAMxH8~&V7 zzj@C&_q~f}!IfHJe|MAge5VI1c%C@f$nIzBO9|G~dN}d;=cR%|a}%RG_*hP5+zgm> zVM>V6%F5=<1)kTgO+LVCQ?vizq%2RHt6VR|l6T!Unl!U_rR{qwv#(Ol(gl5vQQHdz zm)h`HeA3W9wB?@oOp{mz+av+E*0M!HFAa}PQ+w(2*NN@+xr4iQOY)7Q*%_p_2(srH+V-(9EpKHX?td|L0&Cr*QB9tY~)sd%gtOlc2j z*4cev-ksSe-^^sOe|9jYW5%?|6SK=29SbegW|rGcO_(!T@}IDa`+g4Jr!pd3zDAnt z3R0=eX|EQVh+g`mSGReB@aA`Ya~8;3o$KMb5c-b$r}b~wKdJko+clHtu1l$&RI}dQ zd4>5*qtiM+{+gXz>rkeDet8bhd13A3BGIM=DHDIxF5jfM^W>R~`t*YVX979im1NwM z`M&kHYg*gE--0{Vt3H>Q@_U*1g-zxMBHk*gJw0N=TRXq-Vx?%=K7-tr{Z~D&gg)!$ zmTHnK-1uzwxguGcliyU@3O{Z04OkXgp(R-VW%}WR6^+6MbPUDQ_zUXGzSkT(T-#&uh);Px&01Zlr#YxfH3$ zJ@a3kj=1f~We+Vob{fx_{M2a@&$Z`HVf>R=IhKA*bP_vcpcMJgz@g;s<`=R2O`E=N z`2FLoR8IPDQ#Z*Ksb?NAiygW!YjW#}^^&axK~-Faxv64Im-l}$XIuL57WdP%xP))N z1f?bhdeom<+SIf5`i!e(lFc(N*9lJi)SzId)wuQhnjiCImz*t~sQ+x5%ErpZ+{Zj2 zDp#NU7ESWEXO>H;4*W03vTCa5hyL@sIJ%!(ax$9bC6!9L+|g40Pk_Lj6*^3~c+K@%u%6_R5WP+9bMsphrj#+B^*OK3 zepByAU{W!n^+lCml_r&;H6_L*~2?;BpYyjM>t>=MV4&ur<{w#p}# z)N7=8p7Ahq-#~d6mhQK^^VYGmn0%>}z}&w6~)tB7L>00CKcGn+lWO)3?N zO%+;~dw=q>vsOp`J>GRkNF~xyVb{_Smjv0(eY^kPm!1)(e(<`_TsB|R3SK*bzmnyK z(i4JN-cC2+?X>R}pIGX(eD0CSM?Ti=o*14nU)&^@{f>LfqRp|VDk_YZI9{}D7M!VW z^l#3E|Ch{Grl&JYuU`95pTqi4iAEgXj!5wX{_!E664s7Wmj|zMDVZdmk{R}$?dHsf zCyynW%-&)CRqo(KzcPavPT!d}y<1rK+G)q1%9XccST!BaGg}z_+f?&DZc1d^4V~r#GP5a(wqk_e%x}}^CWxa!nu~5`-JBIX)SviankPU zQ)}x<+k4&qgdBPQ#^av0lx35PR}tX4AJtz%6D?o3{og4) zv;Wdj<-2L=ERSyMUDVkh$yOV;X|q6zYc;oRNBW+|J#S+dL}%`Qdg4(ui{i$ug1wHX zl^8Z@q()wu@0${;#iBTIbC}qv?Y3-@H=~3uZg`d&>3k}#@~)TJ44chcbzUp{PA^p2 zbSy7!*AJ1ODyt`+ND~hIQ90?vWZrGlrcOTd=5oi9eJ4Eqzns+U(7&lJeIoOE+@qU2 z7S6FxYv)P1>uL6w%~N&KWVy<<71s-Y-prZb`{VVOZ+@Ig+F6Dt&xJ@&ocMj|c22KN z#$BB^ex~fTWmb}yu8^WU;dhS8xvwu?{+_hPe9I{-j{UaMg5^={tx2W{(X%HXU$9o- zXyno^-(TL!N}DTn-^Nu-zFlX2O{?>)exsfj``TuY^S9c{Ugg$5F)W$CdSY?&Z!=>~ zzd(kQ*S@M&nXNZ_w)>_FUuNqMU9S1!r>=cT`#h~PYqR{n13LnPP8#fUa(VJ5?sZM# z)|!-9PW!|Kp;zt$U`3RVq+u!M7G@5-h$jG6^X1Ac_%$NFtynBmQyS%eoC;p-*ZPWYj zbw{R82!C}$dZwQwU&_rTvmI)0@k*pGo49N76!UW@V%YfJLAl(rR=XR zW+ViC^!((tMd)gfqR@;AD{Cv^JMOCRh%u_iW7h+na3_SaiFYBSBGCdNn0lywFgPgBXbTlzG-llPw; z%acdJik;kd)lbaXs_dz>og?12L1Vw{iF=niv_s1$7^pLS%wH+RI#Jpve6hmow!`_~ zMd~la1=I&THdt7C*)5IbZQmXHwG(YU8Wpy=DHrb9Cw;o&gWEGD-(|n%HtNQ)&b{8{ zcH{(SfBoTy{5!7B3ueiG>m$Gy{%^hTff_aDow;AGa(ZY8XViY&wL?%jwRuIha@w^$ zkNWcVPo3D8-~3Oo*E8-ydoUkUXM0fJnsw0=Og(NZXziAhRWzFG$WtZm*m5D7X@(Bl zx+#7v$tM=2Dt@Vs-0$r4qS|az(uJ>YwU6&V!tkitROsbbRkp@2$F05BTIx-F?yG)& zlJ~R>W$X3)#y9URw-h{KHCb|^arGnl`{Faogd!i5m3goyus^RT40-y3r~+-_Ph}-LHs>mmww- zE4Td$7CjL)_YKdoN391hED}_H$XIb9tV=9-jbQI9mW0LDN0q;3i)7|m-Bge%y=0~F zP+RKcvprRg*}<7lL*`Gu?qYw<)6T)p<=N!vGpdyx*Dr6X%bCn6QkDOF`-VMN`%l#E zS;i^Q?U&@`E4=H&eowO(h4ZiGTw7A-82rys<*9!u!;>XKN~`Xk7W=BEkT*MLg7N%| zCzcd3J(z5?B}Q@ z$J8Uy2@a1IiX}hx-nru~Pv>o`qd)iY^8U(5kv9EoE$V*uPur6-C%6yI;61Uxll@8U zL$7aBo~7Ez=lb|umYR9}*|#!SXGKkjIBI=yVd*c&Yc*%2f1WL|*FS9FwOHxV zJIkV9dnRz~K6z{P#I<)%-g*{r>e<P2rTp4`PWFZod#NyQuG+J?Eqf;~IDJz~ zwdP67@A$Hl7wgY0uR3V;e9aS+X)i9!uRN$()7oPmEvjxZX_A(MXwZHazm7NYOPM!b zE({e?Ut_<%bB>X;WTXerd#y50F&`#((Tv=C{f(Q>Ulmb!{AZh_c*gI&=X<)`>)#03 ze}A+;YeN6WHEzc|Cslmy@V=KRl%Ml^(o|o8n|mHV*)A@Z!&1vX>Fp!qS7%eFo>_eS z{VIbwJIxoVAKSm&IUu(#|BvrXg}+e~az3P-&vMyhQ~QZIaJp8Mz-Bg^J#5Z$&r4q2 zH@YdQ`{|Hzm$~%ZdpS94(jI$vr1Y>Kbw9Slys58;udC44LeA*TZ!4KDhQt~Ujik-K z$99-*n(xY;{#@~kB}b9^BgrRm_5vxV*64F>T4u7T-DJJ=y1M#fzM}TbTSB$2rtJCq zZn^mcQ_Tp+a~YqxUH@zgj$Pe)d(ErwK1_kiEGa3w{~eXTG|JncS$t`tS zY`ylThuW_z4`Zgkc*Wu@z|m5!I-~KL=aac&>-R8cx|r1)`&{e)XIj@?mp&_a(lQhoc? zO<(UT=I{LZC&20G%Y+&37JD3~ol9Gs)_Y@_0z>8Lv+fgAVqaZt-Vnv0vc_`eS~tJK zlW(^Bt?TSD?>c!Q+Cpn%^v3$vDTf~474$YbnRZ`p-K`ZB%GKri;g=Er^Lz>;JAx@br32o++pI$r>&9rK|{ge>qYlo#~c7H$A?)m-J=9w)ao93|xtu>tR zWcuU#AI&;fntVF_!e0N%^c%fcqPf}h#Vm;bzX7qf)-M~b*wXvSxjA!?ry_;in z@;~eKDghDm*w_0WJgG36xTe9SYZ@;|Z z`s9C8o=6#ZJK5ByRYS)K_Tiz($x>TW{ z7^#0~>s~8qfs2*Bo{@jV+I3&G^EsVeW*NC@o#AfH$-)b((eqLa$jOe*^E7t3s%m(GEH45V4Y!_+|x44bhk~} zlWfRt3Irl|+b74T$MA7(Pu5YuhtDh`;Tc^r!{F!ve z^>w>=<6R$Zt>z0{e=fPh!Tqh$<(k797E6_+7X1_Cun!biH}k6N#=m{j*ZztQ?P~Ec zTcq8YK0(+!Fek+=tR_%HPXDM`TV+i0k*%wH4QHy~G>|Q{uvik=uqHRX|H3T46Hj=Y zz6qBexVZa5vAnL*#qSGalw5nP7ETFsnW~lRU$^%JpK^tpr%a#QIcrDjj=nOXs9N1E z%?26IXS_AK$8nsoE|7a~T}(>EeD;~XpOv(?=M;-PczQXaLPT9g^}6S`Z~9%Ucg|1l zsTNU*D&|q@4iGuwd9B#}?T?Ph9U0NF-ZB18wjA*`Kb5YVAGmU6b_!da8bLQZq!(>pbeb+PTxJVaYY)PxW6EI{rA!VGu(`u>6V}V zfVcdVxa7QN3RkrqmPMa6OWRpzen{_uu9tfJksaroAAR_elkzbuP(XQaL!sW%Y3_9OcR%D8h1nmr!~&&SJP2Y$xT{Pck+(=lZ)CO z>HSWX0rJhCZqyb|Ic_!kN$9ym$`iS)bn2|yLWi^_OsnSXZfEfx_(p6 zHTU4S{rt!ZWvN`LnExJ+q-Lc=yldO)pmELow9mm$(t=t-txd{Xe(BEXTJu;o(ONkF z`j(7$+RcAFr>d-aFg1mJbFEB;J+Rptz@4cD?BtlG2utF-ZA zj(yJUUn{Dg=ksiib1AnkJ+bMTjgO^Ua6tXvD<^e|zf25$mho9*lHJus-_M~O&8dgiG45Wn zehPC-xG-1QOAFUiZ!caj6>Y1?^TXC)$=)< zcT|1(@;QBBT*~@V*OO;Vt9KX!fLCC)Zs0*LGs_`8VvGm&*iJv~LS8dmPz6Z)==U`m;^XW;W$y zmA*T7xwiGEUR;sXt%t`p`@CNg%EG6b_V7&fgo483|I)5~`55{^>agF(BJHSSZjbx_nrESQa|3iyz#qYnCRkl>XF~_ZcP@L-*2k^ z{_+~WfLQ-qS693~>6^3N`P#(Le<#g2rY36XhKf)5HizM6m9S=F)pe;4M;>3vUApFT zGLJ~=7Adxw>(;H~3rm|OtC17sr`G*sABn}(5g0E)x14=V@`zNUDF6iqxi-x39DwrM{az(Msn<=kMLgavWSsu3rDNJYdq& z64%fR8^k-Jc|XtIq|{dYCDTo8jZ>h2oJuv(`s}?&EvxK&-s;2z{7OC8 zzb5-cS)u7)Rb82`-ZK6R!m_!VYo-3b6Rrw6{x46!SZFK1Yf$fwJH*0K_h?87W`tZi{C3Z)&|Lo8dpEdQ!rLY|b zS8&Z*sjt^-v&cbgf6MnsLp|F~=jX5*>M4DkxNe@=x$|rbf3^J5m~ga8ZkjZ6wj`(0 zl|G3jYUj?IbTQfcF}1AV`%!s(k7-;b@20=J>HnYay0b~e!%<<^V#}3H2dvU$H~+uS zDHqmVAG^I)NpM2dET>}qkKf%=R|=oMv_t9O=OYHfv&!>k-u7H)Y~<|_W>Qn7rOFYU z7Bti1#I&D17i*VmG>B@d8{gS#Z!VuXd*so_DSQ{thc}A)>LyJS znp7oGKKV@2Jl1Q^^`8dGyPo)C`cUF)b-S5DiEZ%}-OQT(I)(ZZ6+#T#XXe~E?XW5I z-U9JLf2Nr$oduNQkMl2ftvK!6Qhu8|O=zFia`A(^>vrzs5S5sAI>#=hb^WV}HXPhX zjsDC{RjCoJof;v?>;Gw)=6px*hrg-|mRy+bQYs!fjeX6m7ou4y6LJFuKN=^W@iadZ zuYD}QOsZn5K1&_^>I{tOmG1j1m_uPKl z344A!$~xih#-7Qp+S3BT_{>{_x{KucBi?Ic>9X)SKYX?d&!Z{ zUjJsh{hL;L;-8jcyXeG%&^^~JR^K==XT#p613rJa_KTDng)b|VnkhWXbBi9I@xn7p z@`D69gEwhy^E0UteIL5LY37p&OQRAVeW;IolTvwQ{aS%smDTyCPbaKBFTfjZ8~Nsl z=)35Zs*YQ{$Z2NFVC&`{?}N6ecPv6&!X6h&e*934}Nlc zf8E>iVZZ+EqDQq~;yp{0=B!lt+++Bt;#1~M%R4S^r|o}S^;2?l)zGoD9NpZKH*{#u=F2CB#O*=jD%La+hZ(~zJS5N0{5soWA{vu^_tm&Oj zjrgzUJ6%^lzh7#YU8DGM#Tre1@j3O)hfeB#eYi-3Q>oHvg6v+org}9`7TKqn1%ln) zKaOYG@GLR5>olBp?m?1KX7oXStrw-G>xHf+hEHlbajTrKA>!y<)8jrNm!^5e-FTt( zh;PL#TT^WzsdC|o&MlMHly)q$$bH^<*Y^vb^$C@ohxs<8+`Yv7aPIbBMpKV<>2I=* z`!IQ;ynU3Rs!MA!PwJ-zp40iJH`9H-gg=iy%jn*I_QiF+!m0URBGnrL@@mu+#P&yu z?G;`U?tkWD?fvM&Kl#=1vs_tK_A%|hfA(&Gj#_VN#}U~NVVU{N-wcbi&tfa_^`5E8ykTG6vd6sa;>pkahS-)3czi}diSE`+3d%%I9XLv<+mdLJGS-w=2BSsNl;aRGqc;UW3|ky727U$z7tKZ_QO`DD-go*UV{ zO8-iQUPmxC>Hjp^#`n;+`HYBE$A_9@5m_%*Pgu8MpSHHco~j?r>u*Va`*_lMTWXY! z_2!auZW?FOeuoD{ohkYK;YGle=_=Vp6C(Yc6?^@Hu9Q?U3H-lOdPw_v<82k=l*8<kTHFzU+0Iig>U+5Q>s?0q=p z=Tz$x=gQbkr2jB1wdtwb?cwoj*RtL1_a-OEd6kPbPk3UKw)@1pWBcydn4FlAKF#x0 za>j{LP8HkRrwaI`-!{CH+j;JISj%G}^N;ISSr^*aR{eYU(NnJJ_4baetY2Nb+EZ;^ z!oqdV?bF1x!9U&L4rI&NXvST-^A(Pi82 z4YM<6Z_T~4i1Fga+dA)e?&y{LA5sza?bj36Uv}~g_2pKU6F#1~c=Juq9lJMSItw#i zdz$+L1f3*9YTQo&#r|FZ-G_$5B*A(8?^sId{bE?w5@UVI3 zt<+4tKihoh-g{d@qU~(^g`KWva>GDQ}f&VlN0yf zuSvUk#q9LuRqvn1ZMtnW@A4;sl?(ozy`*KEo|;jfzDURJ$&1e|>~RXUvd)X|2w#t@ z{q%j+#J!)FMMu4n=l1>iXR2I%=Ye%Kwbw3s=88?RfA;syn^V_+$Gw@qsN{b4U*#hE zl;Cy7cDjqS-?wr_AJID3zTo((=p~h#w*UOXvvA+!+s(EvEw@$7nX6Asd@=Ls+9y>V zJ>}DCYxTFxPPS{AU-9$$p}J!l-}frKHQISfeZt1s432e0t3Ny3N)?=Ht6;j4i6ilS zy5Qw!zC5wh4^OpkSaY|ZJ=UJFBzAiU+r|EQk!EY(_ARLSBw&>H(5Y&Y-H}s#=iX_& zw2=#%XuKI{-?Pgt9FTES*^Xj6#G z`FoF-Z?R9>eYC>)a-C)h`+KInPfBl#)_KXii@L`oC=ztYAYe|PdL~n<>pcOjTr`e`q&Tb_X<}Rv&g#n zcBh!x(tSMt%&YfI;J@;?)o-oUf=hqP)Hh5kc*pYVOwz*io;TM#bGJ9yo!;wkTVjS| zse}3l1LoQ1C9bX0`OWzy|C(|@qhyA*yMpS4GckqQ8`Amw>rT8|$B}e@_vEkE9nlB> z9{JBEeO2uz_rK|jztrh5+*+&Bar>~fTa+!kLFRk)JpNx3ly4O~{b+u(&EU=fxdN4{ zX_2ZICr@R#%+=!@Ci6pWx6M)`aTU|*{*9jB5B*?J$aYTPKUB+cc8Z4@D?>PYK^{Z# zf`1`-e7`3A->KKE$88a3s0MoxncFcwab)P5?Mr#w8U|2b(>&# zva->m%_5(%=-@hrBhr!2h4MXIqh`b$y4O_KSoEDeQP^;LQNb|dH zc(h;rg00%KIQOsHliRZ*78@3b-a0KY^RtgB`t_nj?}c02 zae41a(tp~{+&FzE_JhL3?`3bw%lV=g_MT(7YY}MY{A79G{j_86xv!Tttr3={x)}Pb)9GO-b_9ar1zi;_P+Xn{)Wge@lI(}z( z{V`)^s$%N2axYnn{^OaFCp<$ot^Q-p!m{+M(XqD6#}{hMom`aWdq0K8?!}o|`;O1Z zkTgzT9IQ}su(SIE*YXAFfz~CrCUtPuX1{d5;5o6{_hs~q{K-LlOhV23_!v)Gtp9Sy z#pvAgTZ)R!`s_lNELV9u{rOj=!@KY{PimZ!@ylaCq zW`4W&HFEjimj9DgKd#-kR7=T_(+?TGesbkjP&Gf~6s@mq~Q1^UT;lIgqHRTfLC&PmPww=Xq6ad}B| zMt=Fv#vA_j4=-;IW%xM1j*V$Mr^@2=i+#?U3EeZiBGb<; zm=R@mtKWgwDWkn&&KIL6UvB1i@cpxBxwm#g#^Y6AKK{6!eqQ2*bNMNe`rmJ^eRq8$ z$YsN45heNfRrq`f{}j>sg9pshmX`(uX||-#{jqmyMbAVr-A85BJ+7OyQ~1pGI6k|( zL`-t!v-=XB&7TF8m3Ma72YMV?5*g5AGAW%$WbxgwR6$+kHTUZ(1@nVEJQj!kx_|sf z$Y0&pJgglZ(+uDFeAqXmWTC>|o(aDjw=_&^IHYB>SfJl;c4LeQpZt?YhFtPbl6s8X ztlRmkE}jyQ-{ZJel-sB!tkLkrcK)~{A*Ut8@0}H5w>vDvKFM{$yz~3|PdqVpka_dT zi2Karn0u|sMR^Csrzki}H+6Bi%vr=2{9{7Nwy*bIr}``@w0ya(?&7W+RUeGvPH$a1 zSInS4|07FYOu6^9im9qRj`2?4P3=TL_sGWYxjJhR$D_^n_wIHLd;OZrYD%ND@ri^+ z#)~G__a(enPo2c`=Esmo4Eic2vwYM$K7qN33xFu{*a z{K%|Jyv~j-+zD?>@4Z{3&-&46SHUwSy_Mf0x72brU!He;>6zQ!UqZP9Pt3TT|K|By zrK~Fsj?1{-R&ugjJ$oSf@Vo05l-}OhI5Qz7;QQKs_3Up`w`_cpcyBxFqj%qX`A#_R z+8DEJp=eNngWLSpjMGJT@+AbK6?t?1NP5=1VKTMXZlCmu_e67mZ^IYMcbC`&vqiX0 zI9s*%pLr8-^P0n<6W%=^rxnJ%i1-xHxkUPO!hv{}uig`8e)`A9nU~GnB>35nX~Ood z`-X?&cw9ceow1iSr7Y`(!o?R?4HigT(p(nMb7g|CtVY`;R`x(eYi^^<(`q)ytlZH4 zF#1aqQ|A8LRoo0I67{l^9Q`#KVvpW0)0z9ZoI}ISY};hEfF8GB3`TNUdlihf2)uq` z;IQXoXu{{_$?WWJ+%h}=Ph8I|uqul|dphf05AjdEoQkn>D}Gd}3yZi~mIfs4pME@i zW55(oHkp(t{Ue|EPP#89k~Yob9siR5Z;t$az#=*G?R}lEW$z_Y>`GJl)hXo z!18;}kLoABsY=ZSZcJycaeu6-TylUjPHt`%+me^D2N~whGH>9!WG-;}m&NSHc{`?* zHp_Q1*>bMppKz|!4X*U!ww z6CSc!#{JF_PjZUX`{ljDI@4tKr)VjKS^Iw0cx~3Kzt}uYLbTn%dx{s&5=%|96BU2_ zvL{@c;@A^EQDNS-M>X7+E~YCcORcrJXfstv_LAW#f&9Q}o%6Z&Y}K4`ZoPHnse|tE zmmJS=A7NAH+oHU`E|0r>@Av8F0;ZKzDBksmaBNxIrt^_wmvqN*oyj&QrfF??%u?xp zX{qcJQ-@9W4op_>q#up6qP%Xc`3bqLf2w*{ld;oMLtE_xl&(T z(G@G)q^w}Hw`Ze?Smpd(M;4vqvOD6yDlID;CAh>u;ds<@*B3(E`?bBNM|>z-AU3z3 zb!*0zPY%bNJy&|`Rh<50_B4O)$+KS569O1t2=UzOU({7;|I6%Y4*xEZAur49x(Y#azHn$*_q&L?b_5`oL!r5$b)LauOg>q-t2H>$MJ>|b?roN{yh^;=0^*NcP-p{E7h@T`HzM-GAnc9VZ)FEwsaD3S@1%l_kLEctVZ)oscBYmGLhrB1W237Ar* zpRlv-x7w4n+d`xSl3N*Odbu(RJxTMuKdtf`yY_J<;&mzkg^%q_V{4>YfqCo#Zi*pah zhuw$&lpaWr{qxB4pV^rZNdd!E#R8XqzfD>FVQ-CQkIsgNdrnPscxb)TPhg=se*@c2 zwFxtQ|Hr7ksta;D$6nj3qr!1ovcV*%NI+HEU^?FsS2geuHAi*ZrRR%sxvyDe%m<*TvtDCyKVk zCNH{t)~7`D{nYw+_i)3?b^)fz#y``!90PQI&7a82@S(D|Lm}P%`0WpM=6nV(UNKZ` z7wFTw&XJ$)IJ;?<`j?p@LhOvhct-ouZ7Y#?TTf{8Z|I*8btrLuYS;c|<;7ZWtQ$1dUI*N(nz&5#$yMbhp2&q8 z*149PFg-nmMexXVm94xF&r-?!^4vv2S2j1b^czdeD{|V& zyh-cB`)Gxrr)xGb9J#fZZ)SA;sU82mJ>MXDsyJ%vuKfj#9{W4Ler{u2#*r(rF6q;Z ze|2B}SX?>cdD_A4?5|@h0>vs;o!k@l?d9{YKMy#|r^hvHdGNQ#=u*7LLJj^@)sCaS zdk)3jdMYrrNO`K3!rCoc*GVjiww@=|5XK+j#Pvw$pF$vOlC8V@^oPBVSQ#}>2lPw1 zOgSQUWYw{$mCQ3Ids%j{Zx!HUOzdTQ8CvvxI}dNh{`B}8YtOL=%~O8$dk(cvR#;W=U(VM?<5ihp;#J0tMQKy>6*m8g zQ8n`5v2u0L?`d<;Yq=xc@#amx@0LF?tdc2OrYjWuDupI+zsqvmHBa;B{^@If?Y;3o ze$%V(`ga{&PTX#K^DDNT=aK2^cM>WsmuwXjLyvu1cKrGIY}qfyUV9l%th(=U{>J9C z$Yrk-9K!zoi#*e?!eZ+Rh1$3Tmc7{mf6p(8Onsxgy6Lg&+9ll~Q-3`F(66w!up+^G zRsWjptc&LISe&@im|s1&Vnrn9ic<@Yvu^VJWoMPcSsf~{_CWpX8Fyd*m>MX|S{;{C zu$((dOnhcy$-2m=KTm(S!@gIwM(IyLR>RxI`h=^`@^8kh`#fQV^u2uULl-=nmE~<; z)-Ew9xfS~-G-IFV=6Ns7HIJ>#_+(R&`}Rl0q|iCvjs1+C{k$@Hg>2FMgs_(VsdJ=E zE2BamOO1%DH(8V{zI`daa9!&{-b*jL-fExQ zc%0{{&&K%l-OL=h7TFn0+qsY2j6TJ@a>gD>kJhc-Cst14%<;1la{2!-`@oBg5~iLq zzOXtc%?Qg`;or2b-M{{MPvMKSNfod4L~_=S_-j)n23!^=zx2OiJAU-SbNYE8F%>D`80azEw0}!oivMg8cp{ zZBDDz{+&_Mc4hK{$O4788c#WoUFgo3o;}I)!a+rKCx*9P&x0L(r|_AsV)}2y;Bsbt zs*h!iz~oi2)#i({jBLtYcwbn1BkJZejZ1g=`X{(N%Z!|q@v~#E0>(BFYe1|Z?0vi^}f2@dNq43PvK?Z zgdE#eTXy@(=Zc3PNj>V1S2?!CV2RcTojY05*ClE*%r&_VCTOkaX050={6Qpn&g2E0 ze`hH_nxfd)erh@k>x)yXTjoh#4i+jZUb&TZTDafhG}mL*-_ z-WDE~#5+qu+pgPw4Pn`T%tN(cZ_tF$jzaxB*O;dv#S>=uZ4MHAq-1+dCwpzj2C=3a z&QqCFHd!^TIrUr6gK4(egt+yKr|`L0y%g-oS}g0tIInQxiUaR|97uez$3uK^gp>U&DpIPKUp(Eg-!Ne6J^di(eV)5-)E!yh-1q5ne8B?6$@YA_D`)>qTN&`G zA>!<>YlVx=nS}g$4^J@XNatX+Q@!rUrF)loV#Jc2VupE!j@y?1^VpO6KAK%>(>;&U zRSdBwI+{J!Wz9s!l>+b!X!L}z3HEEbu zFnm_DWc;}B`iuw3%ga8jZjzQP6I@%piq~1<)OS6F3$2$<%wjfbnZ)n%N~nha;*PLR zGrtK+0_mq3zU*t8;>$kK?K*!Fe`|0M%Ojg@OE@l6Py46!xNy5dZIAIhg-hqH83GnE zG@s$Bd}`uh`SZQ^!zD74Rz28azoIFym}QaHb&1(mf*LD0AK6)kEQ~q)Pb_5NoO5>S zA&IX{-A=6uJ=YZR{I7$k)L!uk56ab7a(z~6zU^>v(*^ZNxnJCgs~Utie!6hKPJ!9& zJ)?_?-lECM{IUj?@!B25ueDY(fBE82wR7{OoC$)>*BbdOo?reW`SNdR51-b%ru|kg ztvvGoN;#|g1#$e5+UWi6pOD<#4_X)Aoii5m6)vs}%3eR~_t~Z{kKG+5r2ybX{x=u z*ELSQH}br3m&e&#_nVge_*J#0i^b@9*V!w3{UVf^d<)~)XMJM(``b#YwJ3XW?jq5z z`Dbdf8T@W-^|0}J{wZ`$|7Pc4u?bJNG2Y9X%WkT>C|NdkzORRp4ojVEf|GCXsymn*2bR?mDt=VQj17|vyL_pem3x^OC0QT3kPkqqUq-YepTv-kzX zYA5o=dS9+!6TnX&4+#QQqg&5H}R^Plv5qs1b&_jsZ3g-I35 z?<+1)Eqt00HC?@Pmv2(FPyhYUZ!-HAXT__$`LU5J>-<)>(v+;eBa%m6*!1o7x%wu1 zs^Ijzg^fy^GiA@;X`S+8kDhFh(W~}~ub+=9cJEvFy|pF9WZNBuB`Tttt>P(5S1h~3 z<8{(1S>njN!Zg{A_1_e0Z)v6|7^kN$;P*Od!&)=N{9tjrLfAP2#sCk4>@T}7m&T-s ztyHXzm?-+`bJn#5lh(X;4w+ObE0b@s{t&~Zw{bIrjMlGr_SU;7RdM5C`a`Cb{f% zGjm40b=y3X-#r_*2&^jq|L^0Up8?+&=DzU!|MPdh)9dJ4t9kyjuB;2uYx-L;F@r^y z`$2!tnj5=HCr$Ma4P)37u)jWhzWZ9`jSt-$CT+=U7n}URVt!=tnQWh46^r8vx2DD3 zUL9#&_GjXjxgoXvFD1S9Pp$NPF2NG6d0pb#%IfxMUmx4-K}TzobdN;e#>(8>E7xS?eEMLKPi!(?y;%L_SZxwX`8FcHWNElrUsc+ zS11bhe{uLIId6&U`>IKTKO1jWn*WHuQN*@BZ_D9rnRAz~Q<=KmZsX-m$1SqIr5K%6 z(XILE$@aM7(Y>lB3rqd@*N;rLHI=;g%(|lxmlG+}y<}6tEhXJ5#aCzKF8}5+dLCD~ zDW|z--|-dve|l%GQaCR0&C^w-zIw-};+9wM$0<4j@1xQ+ zLo?D37thgtp88*{^}KbPf_-?NyCX}`^7z}0YE!ajehdH4BQfPzvc5peqw6vi*WEWJ zByRP{+M6W2WM}<}4OMO?YqNCIKV4Y0>r(8u2}`2V+~kT=g61VJ%Kh!hbT+%=p|-Tb z=Iy~zR;<^Z7tFgk$z{$1%TMVuc0DeS*yTBOzGuqIxZcIVvfqC8=-iEKz2{Qw7AL3O zH8;!adDiP+mnJQr&C|o8T)uza-hwST3bCy%c2`v{`>r&I5INqy<8|Dz8=G%w9AD1x zNbfVlmlgZgy}!`4t(a|&%k^h5{N9&;%~duppOkUqTUMD*TB?ya#dXG>O|*4{hzlFI~u>Qn)L6d?IDFZ*=zQEylT2ERqpUum#zPRbVJ~QR7?k=tg zQg+J^U+Y!bW|BSCcG+1K>7I*r-0PReOwLNPJa&TllF5{R-X>z&>!07f)5||-<(j$DJ_laT6-#=fXqbK^la=i*t9Pv&qmxr$lkm$|!4=+T ziUd|qJ5urdOZd^r7P>;6Rtju9(s2^oYl~QTx}=WV)UFqnZhIU2=5eFa$xO}EUq3rU z!lYd8C*Lv2_Q;lWERj)I$HFF=Q)@Yq~n+hqM0* zCxzO#krSW1k)D5Ib?fKA=$%Emo?4eX_O4qeawPN1tX6*Eh0hqy?DcwLabVNDl&1pI zbM#J}yrfl}6ZDuztV{pV8}apqy+R##Q>HZaM4jtbwmbE8=_-|c4!yf#9PuyYgd^+L zaN8z+Ze1?rwb#}5VfXnP%RN#otFP^`PigBmaXq)GV}>$^gHFEfe3>O1r5?O4ZkC(g zCo#dKVZ-6Sd({rinic$M>4)%pRVP;;$c#8IC9L8&XOmm5SVC1|dd0zcDVN?^79IGu z#5MKl^iMvzLVT+1>MuQe>dxEl*}-vDaI3th)#Q?A$4%3Mrt|RayQ;!%>9HuU?CXSC zd3Rix7HdUzn>ikN`MsyuJTt^|!nEIqV;`^2n-e?P$7{9yLl#d3^;uh{$T6heJ$+za zK$PslsO(8@p`WB|C!bib<*cAH&v+oM4 z==toZs3AA8iC3jVr#^YPoqx#gcg8)99XpR2_Z&ixxLc z(6QprPdw(Kp{|s3!bR!i{lAkc1OtU8esNb^X|66gCG3v8@A?y3l9K|Ez1;KlS>QfbH;(L1J@=H0AAfem^|4$$ zux_28dG8jL+!b$jyp3GEde64K2E}{67Cd2@GP&}tMCktXiRYr_ zPZiF&yhklFc*#4@H#T+ano^d1{;@QL#sKYrv61l|3IgmCpWIF-IlGZIR!zl>#Bb@%pw0z4kw^TKP%i z_{YMx{0E{e|7djf3#y1rT42BYx{9RtyjvpX3f=A%XA5+DS{3jAowRF9ftz&4=Sv&+ z2boDOTM@f!&LIzxOrax(g5DIKakmP1(OtSYng3%!d4yXfn~i#_&kG+59y<}CGVD0il zc1a=Igzs|_mpxTdej__=)7Gvt85~C{?!_yJXtiuLc`DxWFzs8}G4GQ7z8ly6y1i)E zqxU)28NY6rlN!?ZG4=aq;r$_Q7ZV{m@y4GoGgaHj>6fF*Z>|(`(~i7y$rh*9EB~L!sw4*ThM7y}w*5-bbk2B| zbjiKQtNe+b(BA#V%)I1rRcHJD?!PJ0zJJ85 zScGh6qy(K)ei`AQF@^KU%ihG!z<|z=LcPa*)=UlKJ+iX#LgdZ%8+8^3o=nr@=<4M? zkuG>|YH^E4OuX)qM=T0nJL6w;UVC1mXSB!5sG1|i*X}e^%kf33mAq-YKlDZC)~NOgGqz+k zFX)N8xsY>j`h=#Lt_Gi&W=~|wlI-<4cWvH6jcY<2j5C+l`8;U}D*Y5TFV6R$@E*zM zZ+9P@^_yplsA=c1&B88UWm6x%cj&n{b1{Sc1}A?d%RNgCPI67o+H==eh$}YB#VOjc zX3ysv#pfR{^j4ViXqTI*<@@g;lPXRgtFy>=6IkWE$GU}~Wml5OmhBzAcM@Y;v{e#w zg2c~qZ9I8&>%Vz(HfP+*61cUgq;KNX-`wKiN0!dDd7|PkdQ9)cDKmD%O-h@4Ic-^+xaiDejc7&IM+b+=9!xBVGj6d=gKYTz|P`UId?4B>POawSEiKXI);C6Ctqj z^Z~8Y3)L;pC%?B@xAWlgRSp-Qea=yyP_bj4ar=TBrd_WEU?Y|!vqvUI)U3=zgAL+kc=agQ2WyLCbdKqc0kiACkkiWHBN64+yr<-m}C>D6~>!Fy@zpPtULI<*D zFW#WIt#iU2m*Ryp_5B5Azy4DuQgtb7l9T@%rOijST8X91oL|eTwAA}*xPn$y7;A^| z{9ld%BHh6!vO68q!o$1tpNJ<;4&Li<&+dQPH!(rW2YZEjr@xtJcW|BZmy|FK*YI1S zNmH6loF_C)ZPq#6@o2}!E&KkpIN6jO_xY@}$Mr?e$!UGv7rSnJE6<45eQ=BYs9);j zT?LNIo-ZgeRk?a`zpS&(mRyPbJ7PZny0##o=MK+5b3KD_`4&~*^)qswPrhM%yG>EV zM?BJBR_nJw%Qf3B%j;2B4FtG$b!M*9D=p$^eWH14Ph-mOTiI6~!c-%Vc~@|sn;x|O z-`{V-UJswY`V+$Z->s2n{iT!B7$di>o00RdSgz3eJ9E|Rn>>DTg-6-S+)yFa_Yw!g#PbH*fxF!8M>&ic=GC1q^6_eg-pI!eSLeRZtB z1YAj<$JGTuJ?5{@rFTekGca-Rh~N2^dsxh zc@6fN%YQWc$cbyR$MDH2-2PR*x*_APU%b!En??(HST*0z&|^y2G}n$jC9>FEVa?|~ zr!84jHgE0dnz40zgM-7XL;p``=!a~#Jn_jUZD+24+}ZNR7s}706t>OEX8&mAIyXi^ zd@*m+?Gd4~|!#|^VDL|oUXJSMt0_&giq$H2Wix_uwG$lFOtC9EstXlRz>mcoxs7Yumb?aBo#s+-l>`uCP$GY~9)YZ0ng7Ha@*v zm+&%!{Q%Rwcl83V*D)SB{e6m**NG#V3mIO2&HN>_sE~Kk%jb0qIaT{v3)0tIog_Z# zfv&M4XW7vW+mfAyyyRY=n>L|k+NudH+&-D-I8vr+{^q!y@wsa2%W{wPW`6~1w|%$2 z!+1jG`P!umIqL2OD%hOvm?0vVXU1{l^t7p=TtV#>$xeb_cJ%(wH9NJ(a?+=Gx0{uz z%oBd-t8^9|eZtOmu}DC^Fn69)`qx*U9+yK5f(0ut?e`E9?zp}ze$y&b-l-N{KKoDJ zvTm`Sqd)QZ`WbJ|86QhmHxRx3q~-JzrDW|#lFre-hsw_>omst>RaGNiE$qONTN@X! z%$s(4-k(zeO`l@qBWGQnA*Qfh+eL>x@S18z?=w#A=ccSBiKlj&uKZ@J^kbo%;_Cmo z%Eha1$}0HPv^mI}3fQOV$bIIj^9r7)yZuEzU+T`#wVf_r_)fI>{wg~=r#bFAmpLch z{cXzrt?ru}!)H4VE5r0`7LL{+>8JHqeLw%5eKzW%vzpuIl?vAy993^^W=}AfuidPp z)xT#6$NJKDN9Voe`=z10Hz{W2Q3t^#m1Pr-e(qX0Pgh{#v%ij4-dFBXzpHlbQ&~`l zi)UJ8nZT+qQ&O5dCi^gy?q{p?d?vm5+p%*kj>_vy4qKnulr=o0L_?cDe*ToNieZtl2r}Xv7DsH`;GgrR-T_AsF zUS8qnYl`<~ZhZC1{raoV@4Fw>AJJXeajo!Z#Lju!_e?CvI)Bz<$G0yJ9(!f~-Es6) z=5N8Z%io&!cW<+G4yoCC?Bm->=PMPo`eR$fV?SqfUfwX(X7Pe1$f#>&@*A!#e@SUXNeE0M+oNOb*_+EX9BA(3I%-bd! zZ|(0N{x6Qri=5P=AaM88ng#v*0yq92QxjMtvVYg-X^WItZpbg1(!VUAS|GYg+AV04 z$l+O>HF7QtSJp6XlR7-1%TPWk$ZN*Jr#@@_AF@a$Pd(8d^5yH9M>W+;OBy}0YP~c& zN_Rg>G25b`Ipv1xNtUK}rzDbVtB*)@6UuAh?EOt~8?K4^G*ipo3HdGW%tJQDc^SUSud=#kD0Tk@O!eK%IyorY`pHfe;caT z-f(7f7Z>1HP&0jG zFAk_zcQ^3UTkdq`OC*Qa|23NzC^(e@@}lF54T)ny0t? zQ%ek#?t!yQtB0pVz=5o#ZUhkgd9r#<_yZd_iqPg#uuo=Eez2=bhLRUdy z@fLT#u(E9VlWYniHyU5vRXM}=cf}>nqEONQYq;*lYHm7`$&~roaADc?%{Lc{++DZt z(8-L~s|)y^%@O?|5q`2*>95v)KEKYsxRkONM;;ip8JFi9t$f2b_xOhD%oQxftX`j2 z-SpG>y=e26?v`oBRnG(Fa!;HP)Vk~Z{?pP8DYh?#HU~SCUQq{io>>Z3o1|laSmE5Biy=px7J0q ze-#{;wj0%zDKKllSrcF&a4(B5G=GxHrD^}&?8{25B@Py=xn5HWdGw2&#p$q5_Zrrj zhqg-!-1EI)n;j`|({_pQ+r*iN#F=f6iAf#VRxoMpA%DH_J6Ht`d3u$&=fZ0~hmSRu1PR?bn)&XYtw+kI za<~2Zx_rm?p8q((P^rhNc+yP1xI2>z+P-#5u{?Wc_*dL(kxa^x?>2M11^Q3Skv%dg zA&o6nuVI2)S;c?36y4p*^*buorcblo9OHQClZuy-&Yk3J)rEo0H>~sb8F4tQaNDQd zF7oJ7;9u6a3qA_W`aJXKnpEq!+@%#4y3M9KJJ|HGUzWTlf5SQL*I$dn(X+1i8BDb( z_^6R-x>xmV1()IMdrvMHr)6z4zOBFX^2*Csm2K6gxon+N>tq|GW5nv=?Fxv&55=*#d$)TRD!1 zO|?Dm^EO}i`UItTg)2X19u4~>=2Bu)wq|OxYk8?hXx?v>F?CS-zB9oRj*tb*oXuB3Z_lM)M7e zd!uC>PdxgyBy-Yi!_XDQJ9^4ahMrE_B!B&qPfm^kb>*k%8 zxV`>%zk^X(tyP(#M2y{c?yu3T`V(uJId=Nkbg+IlKBmDm*SJSPY-7%8ji#`IyEW@axc&{x-YO;V3}HB9><9#yH`#0?yzg|c%Q=_xjD~$d(EAn ztdb9nj(l76y-Yz_``ChFUnigM2V-5k0-8Fm2xhrH+41(#$6(Pi-i_7y3dLe`86TE+ zl zUwVAMVfIB?l{Z?S&TZlfI2PpFFWKSo>yNZ^XwQvMl{Y@Nn^kn@=SzR?({AfpGAFH( zdFD^6lm9wn-8O}1r(e@Na74TF!k*J+yC>Y(|JwJMo=Vm9+zIPG>%CP7Y^s0Dv3pv} z+=_sW-kr9SLmqWb^%Zyaj;cTLVAJfatnbX2bt8kmvFmR9c;=E|+h*p}gF#ETv%cKg z%TSqR%JKcu?M>aCcAHIhKPwgv5SD9o@XfgMi^=Hn`{&zA?g!1?x?+pBg3{lasg=>s z-E^zpo|pdidTYPAg8I#Uvg@7vL*#_^etT}{ylDFCr~r}fV;g!WrewTa?5MH(S^oyt zX3w9xkLNB9dHzM`#(p`ul%B6W3u_*ygftb@#x|`fwRd2g@;q6seEQp;Qv1WKpZCNs z_xovp1(8kQlD|#_mcBw@ik9PK^b3|4?ZCbPMl}hf;$pV!Ev-i$n|NnLRoG)j$ zGoO(9EUA2_TUtT1Wc}I5p8ECN6E;5oz}KWO<^8l8?}iUr?|B6hD?6U9+5GL+r^@xL zOCvU0q~|(*y?Wasc}MZbbH7$=?+l3GlsuWmqir^+=k4R!XClp*=W68JG`Pl;vCo{L z`oZM)oAWv$k0b@J{%DaDNeVPv^?U#CTQQ1Tq&99nrNVLKaXv>&n6W^|E3X%a^P>0N zb&@yfcwR0rxnRonj|!Ip6o1$LRk(eBzbC_$!#yu%Zi$vQXNtw-c}st6 zx1F$2KQot;!)SZRI$asZl(2?b;O>kBsVh%B0}$nn+fsNsahiPhXs z1*h{=9}{S`zCKAMyZnR)zx8I5^xCqXLq!n}*X+FiudwyyuE%U{Qm>8MT)RXgC5-}0 z9eTWVy13n9E}hVB+$&bNRms$0*+t_vQ={9H)lLMyENn=tJP{*!^XPl6xeANjANHkr zr0}nsT=7EJM&V+_|18apwC&TT#*{pNd{wz4+im54g~>l=9-TbTu={PWSdI2{;TL@e zy)9W+O>8Z8S+2Wn{Tr*LZx^g~4qLoCtJ$NBXMUph{O1y-S2gxAT8dieHV25U+2PYL z^{9P5mr6;E(9`X`L6skV}VEwH*Q_P?9-!Jr5ZVomPU?^4A`*FML%iA-W5{_PNdr)5-=ltU1 z^b-=U6(?Owo>`>?J<(17bI{m(fwXqNW@%}ge`Yk>u7jUv9i7sWDJ;0Rqi|BjQqMbX z(d?HNu0C62a;7dIqdn7_Wy|7_`secxzv=6KQ#N<{Q~$5e<}PCJy3-iWeYJ#(PjrIu zb_TVVH(eZ8NV5v8+xJy>@tsNBOQa%erIZwI9encHxjz0|_OXQjahqm;%$J%tr;y=f z+#hY13Gw>Ze9QFLy?YbTb=7Rgso?*&>^KT{YfQ*FmXWFHsGwD%ChoEAaeP`e$E&P^ zoICAbiSG{&ee_Q#)cD$VS(U)0*;C&f^Y~D*T`uUN*0G(tK5l>ff^+fP{?)Se@$F$f z)w1q?fw>*`( zE#%<2Cn3?-t5(;|Tyu5e{yUAQGqwpQd@EzzB>R5F{hR&g1;3>vYu#phWPE#O_!b4x z$7++0ZPaT?+WL)6sq)B$9V}5_qwn$_x&BAj>3p-7%<=T5H)Vge-D2?G+I+X?rg`AL zlkbjIx>PCX@yp9vpLlovzQmV3i`&^B7Mi?acvK`f`>};e)TQ;d{lDg>Rl94Qn03p{ zxc;qWv$)Fd&*D-Zo~||Z(m{tV?c>$FIq7GY_k^wIRJfdSuIsE!e-D=~!$*X$vd+e8=xy)>u$v;iubCs(`g*$7+U~i_R-{ubiv6FTmPNzerYQ>3w5$t@*bn2t3>;sp0u^ z$KH62&iI7y&uepT^qu-zYZx%8Hng-dKL*83m7oNk`7W80FJ8E51k2?*!6H_Qm> zzjyHC-5cKpZuEsIUJ%NP=hNJn-Bskza6fjhnYn`O>ZgJy-h5@8r2D%(N8no6V}+`} zX4&)Q1cYf|T~)qvPF9>DJjPH+!PMP z)J%N4{&EtF;MMLK9}+_|62wz)`=m`wd_G&@gwXzD6K=a6`NWeKc4Xe=Wvm~oCcZIT z$n&pHvbk%`b*GxmACxM$K2kAyANecFAY#hY>b8{;ua)wTI%Pa#bJ=lvjrmT8?L z8)wR^-%p-%UeS1oLiys#`3jjU7lubA{Cv~!b>3o8-HlB7pZUF~7Avsix6~^yU`~#6 zPN=^1Yyq?J^u%RKRxgzPt=Yy`lJH7$wWL+SWY^ELj=ok4y1waq^RD=ki3hKxxjwut zSu7A_t1qLn`|bO84n5IKO*^)+%+V-b-hJWBA+LIQ7ddNh7MImm_8H#vwLf&@=1&10 zBkh})&$2JnOuyJ*(4Q?^ea-Zk_A2G4*-jbNo0@$lmFaafh6(Cx9=f!j^|E8#S)-}j zjLrqG+@s82`C{?{KGA3S9N|uHbssODcl+bc<1>2QHat?!mHl)6tJ3Se>)zj5JL^rk zj!IDGWj~fFci)6ROr5>|gM+?N^`}_Tgi}A;xSj5pbL`y^yqz&;?Y7wyy5C6sytJsb z++*txqb`Nu=ca1a{(4RG4}H!_R9JO(Yg5I}rkdSrK5jnKz2bz-&FRa}Dt&q3T5<7a zyJN{StFKEKJ{sPd5jpMW^>dETa`fdU9KEixj61_N^i?ivl8wLm#xTog^R*cyZ~aj_ zp`{(x$I|k9F|$iaOtR0rseAYGi|;j;f3UJ!NhL{#xz~f4%V}QAC5wg>>0|pNjTACx z`9I3{KD_3;`InS^_Rf!leNJhL>Z}v1;hPv9zfWIT<&IhV=8HQy{PZmkX^Bq^IFl>r z(Ye*t$#ah@W9O+NL2YR>i*!fNSF=v-SsNgf&DjuTypJQ>xI&?-*I@PCl=LWpNxPQL z{h=sbH}TZ!xtSL_yw3OU*z&i{rNUZR=jfzu>%#Zjb{5RD_R{T~-mB|$UV8iE5QWwA zH1A8ST5-M3VaIWPm(%ItE1P~q^tR|!%w~<8@j66YKM7tATfF+dPfhQIs{9vhYRjiF?=YS2y^y2K%lw3p)od${ z>9Govm4Y^V?RI=~a%%E@&pR)3&a-%GgopVurfAOp+wLS3b)IEn<@rq;*G29tvVVG5 z(`Dh$^a-Z3T3Hpd#HRgtKJD}e!T)!PzNT}B@}EDOZG&1)>D9EHp0+c8QU08Z z@s;b7=gC^H)oH6a8 zk@wL*X5Vq~joPz7{?@fb8%M1-vpCs|oCE(Cb#F>nvLxht$X=S zF~_;zSDYfsWn|lV*0$~0o?|CGjEvbGOP;Pd@j%7y_bKDsxjh@1gmbkVY&a(e9NFvp zC?ny%w??v{Y$Rljx4tP*5n|n(ypjFC2P0si9da= zzp4e+t$45N944Q4WR-q>Cga~3Z+WKm{<>kvlH#fD&(X0($w{}Ec|!lJ&C0L#PrCQ? z)yu4Y{lqP?&Mupd>9)!q`4M-c_gw$!V76cCw}f6jTt2C3!b?||pCLAt_uQ@?-(hYl zeB$_PA%RIItO^%*@v*WkEG^;rGwn^rteyM`UxU`{V}8_qd-+1y(%@2Vg~{hvGcQmT z_hj!)-PGdnYJz;htJ|$*SH9MzRJ?9dIDPD9naYvF=d73mErZ1N=U#V8+t*U^W99;d z&r%!HR>uj*U3tWy{J&tgh{o|Og_gysIwxLiV%T&o>%07^g>QouW$V@^TR)q*P(g3C ztkx2N#{EdxX6{|HSM3zQ8<=rIx$&Yi#!OhP;M88$b z+_+!)VEESeEg3gl#mrB#SI#bsb`3Xn6xx)STYkb|(>6Y%(C4lhmu?m~>|pxSJJD<3 zD_I4xUymQ3-Kp}AOU>g~GVj9=#bPJ4${#FoJ@GS!-9_oH!@uHKy~yiR4Fuj=bGbig zYH^ontd(v5{65O{kZnuf|MKlEhm}`~l+HC23#>7*imbVn&~s|v`N+NV_VaNp`pWn> zuj5BsY(`++2qgQ`B)_h4T zwQ*UzysBP(<0iRH#owO?YWYsRbwvs(U-&uZsHELEO3eL=~c2ayfAM=wvfJ4?UmP1NI})~Ro!vy^sx zdiJ^Gyy~|6x925f^QZj2W}UTtm&q}=dF=b<8`ZeZG~eb@mi&9sf*-M86gS^%KPabQ z+`3AdzOTI{&snpRo~(19UotR^f>DKOh5H)56iCCbGWLSZpF#_Y-N*(p7!8yD$B;X+XH@7E&G_06#wC=V*dB+ zDOYtJTmBkNbjxq8e;(slCJ=LO4dXL0_H9SxQr>=XckVOvxD%VPqko;_mI+fT=1nlk z5)FRQ;CQ&vC+1R9MCR-(H<-V*v-;0F`>*%kQ9kRR_c9!%rcNmp+|NE$`_AOap6-XN z@=QB6MrFQx^kqTbn;j*+YuQ(psDw+57g z{mpNGs(Qrwy^3(0k~SfK0`rPjHA{QM64q?(Jdzb~!9?S??H0yYGykzHSk1y2pqzM7 zR+D=|we^BvQ3ew~nbS|UId;vd>|NEc?&8}Cv8xnJt|*l3dm~nJD=*$lX^q%~cags3 zhw~UO&0<}swW0mx%(QT=>V^4T`m-M{c`N#P?g3?X4d><)_n1!=+c$Z9sJOl4W#=mq zO@U{VC!gHoSRJ1}>*@aX`v-;ArwZw_2rT^8*l|u__l!i9KVb}3wrmX<4JVBj$j%f? zxo)KE{XI8X|Ln;rl1qx%6=L}V=UH-C_fNi8^DHn+V3|bc3CU!;meVC0noPduaxXt` zykG5D^3oH|J5Fcc+vfi=PCjqnmo4lk*jT5Cofl0AG`psD*`!0vJ8;G8soy#83V7ac z$_uC~IPt1=#|r7scHcH$ZcdmY>Y{01(m3y!!rH4cSK7}9B_F*o$?j6@!jd!L!PC~W zMLpu4w~gt_jYFJG^CIh;)V_YQlF@3H_bdOu{S5c7E~l^J>U!o3yN>vWFqPb5-Sr~R z@mbt`(<3VuTyMX&?rXJS2;cm++>4!;dX^c+9y3lWneVMG7m zx~@85&8zFXzv((K2kx(0%Fvln>oK|NC4*=FXT@M!-5mCmH^p`cI{Ji}qj7MN5zovZ%6-Lpyi2iNNO^rdxY+IgaO>d$m|W>+3}b7uNcy>l~m z)oOWKI$W!1+hXx8qG)OD4%dk(a+Sghk9al@9Ze6JU-Fl*9mP}Q* zzhi)otj3>YN&b&Y={q9@gw<=;DP&hK?ho+Knf&l6*P`Dpi9BJvo2EWwYu3MMa#qIH zm-*|8e=8%aCfrh*`Y36I`Zt%YYrXHE`O&@pZg%vK>}OM+#2X7PS#9X`Z#csy#Qo zuW8Yjn1dxf^Q`|(6HH`&!@qL#y+DQKE&C01L)7=Fs(Sr+no>8zUIvo4XIquKhZKzp7GMLieq0wFHa9B`qp52XywtY!`d3i^ubmhI!&+`iGRdc09_1*>EeZ`cKFZrcn_b=heDJ_$~h|8S(r1&pD z^x&??FQvXo9O3@_JloM^&HJ0mYCXIzhnZ(uUG_bsutr)#``$Xgr8>{1Hcq|5=y=WR zvX<5U6V4`gLR8c}E~l6}w)M0}y!F45rKu>gHeOz#c8S83>a5oc%0a)ltxSJNZ@LvL zv1-3i&uezieEHP1x95f`{I&7?8??ny^|^D%S1-YaJlp2Tzgez+JuiJ&N_FH!@_7aH zcf>Di%&2a-E^V~bYl7g=^*IJq`a5+n!@k;n{?xG9b>(@ovrd&%ulcgA_$Nl3FUe-OwClX_b&gH14F%;NF1;S`WNZ3@eLGZz7W_V_ zQ!i?EZHMg|-eeu`B9X3l8vUMMUau&9@^3k(&6)k4rd>a- zJMtc5PBB`-ay@0OqVDFy%YweDB!0LxL3{a<)h0DLL6)><^61177pGIkQ9mYKeRcLoO%BJ_s{JfQ9!cw`x5b<7+sL=L)kDq2 z^m_kwsm7YzSGuK>s#cjeN_pQ)KlfSL<%ajfot{}Dnh%T)_~;4oi z-3*VduO~AO4V zip~CZovqyt{4bx{xkPQWWY>}VRPVQLx@*X0{iKebZAIM+a#SDarN}R6OLZ;nu)h&G z@48xWcii)l;)IHpPEJ?P-B|3cL54{aVv~WlpF{3U6oWq(2O? zuCHgFaxM#BtN&0>_-m1@f{ywIJrT{D>HL|pY5|f0;wS%?K0P6~JDEdsnxabmKmT2m z>pG?OMBFP~a8~|ej`WSyMO-OA_vM_pmU>wBn~H$%B&}1+d-W?c)pn~mmI=JB3O(|n z&fAImW6>hTGZDuZD6hRGFx~g$Zu9{4Y%d+@5N=vV!oKl}%}MWZDz-45HIH2X$2vt+%e1jnJ& zP=h}#0vo>>I^GcIoFSavKVSQg$NnfC`+58gZIfB1oxFDK_-~=w2U{oZ@LX^~ztfh5 zJKguW#lcqxl`l`vCyEqS*2*Y^%|BNxcVH{?`wkZGCrVdZb?#|f$U**IN6|vV!4;5N2z25y@g3sXig|fn8@q&!Tfxd@P&voMf-4oVcxWr&PzDqHD$aS-YF$TWmreoq`~_)2 z{yg<&e}1^OYzXi1`1Coy;;6@>CGX>fmi|@JJS^(G>c5;rcE<|4p5>lv)-csf3=0!- zn&q~#;>2U;9dcFd7qd>bhv!&&WNq6L?<>D^PD^%+WrtpjQ%S>F#(Fiuh=_@I0`)I& z8$6uXChl_O_gg02St|Pq_5>+!D|=FO#rPSM(MC>@|0~LyV^nVNtq*y84%62(t0(-vQ_ucD6U zN&FRyje3uI9^b54`DVi_c27}GzBhi(6aIQmb`T=-75CvG?cdfp5?-;>1p-i%aT>Q>H?14XnT`2-L<2A!aTc6xBf7gzH!#` z4JyAX$(+_{$DKRIL_TgOiUrCl9w zZm(9Kv7S>X(7+7IG=y>hE+&g%e*C%cG;zt&5Cf|VSi`(7oUj?w>%PJ zrx^VgSDL)j{kPJ^TF>9LK`OJ4TKR0^Kf&5lFrzm*-B#SX(dyeubH7P*n_td(>V9H_ zp1qZeTu$#2uLXsS@e!^ons;7*a(McJb$>0_YG&I{UUQ_l(eR|xp07rUk;^-8?DVSr zGuz^PBGdFUPv#%~!*MqAOuSNwaA?+|N6s-0S^ro%Ezf69o?o!%Ua6MyBPFpNE6(pN z+E;GZ@l|>ehmiI`J{{qJBB8veX|7AIpWL;y-ZRH~Ptg&DT^&AA=fh@3*{~oPR(q7ylG+Qx&Dq%*SocLzfpSEF8;J)!-ngZreBEp>%Qdkf?16G7w4Uv zv_M6*a8Y;5jfYbsPewfFl;6~=Cw;B-&AiH+Pv3i=c@w36Z#Vx*p_g@Y)V-I?-F`yy z(ZthkN%3aSesAi0z9)Rzwa(AkhZlFv$>04fU}<@cqnM%H`RO-vO9U^~S{1Glelh9v zadjbkq2-gmYQN1+`fFn8d7;wt{q=*_)v9;M7@qe@v-0@!dCtlyojU1WX-d26=2n!x zw>xQ9q{R4|H7D=GuP5Ep(!ihE3LaPbYy1L^{Ga^Zb|l!%8qG0-}79p z>WOx^)KS-_pR?WG{GDcba+))z=ZwFb0<9+X8&3?;JM@2I?7JIcPt-)tR*Tp+#i@3_ zx3KzB^z4G||0{o9O*?RN_wUA#Ne>uG#U-D!O(>nwvF*tL^{NBsPade-(i}XK;ij-; z=E@%Jb-$Rz!lp`2h@C8`@%AUj#lKrK5|=VJINZLmSS$SCV%Lb@yO#O=HqqZua{ufx zsr~G2ydi1V9eYoOgW3zku*QQCkg#!gGEOIuyd#}uMYmd$!t;g|63nPO* zRYfZ7)Bd0H;)Fub)*j;@7hmbGciiH4@MhSef3Kz}h&VoUyeG9pCN5>+lJp6&Tb;#4 z8?BDI8^m33Q?YQh$ZAhLCG6-GmaBX%f70Da6UDD+eZB4U;fw1U=AJeCeH_9X)(RG; zeB7ELP&vt=FF0jWYxabW=+1)D1V@4Cb(3x9=;$QyH(fk+H?C(VpKX-O>28ZzE}Pos zoKtY$HGS(c?e+a%RWlFH%zE;0+1W#fdY7)vo)sAWaboc;qiK@W3{7_;Uwl3J@uhOm z)pxgV$7Re~!V?6P%UK@P9vG%ok8jjWl~`SSBLzH_JeA5LM}b|*ou zg)?7W`&H>7`5W);wr);s^J^;FH96zA*y-lIx6e&u=ibHn?&0Cok3Tu)xY@k=T>P|A ziM>F;W@q0kZ;s2}#R^{^9Alhv*;9i*b7OG$*NM8dlE1(0TGPK_-ovG(k*Ui4M_2Pq z+VuN(it?6o3YXnqYsGPAH^knp{kzoFW?Sf8Q5DIT>ZO218#Zf?B9y^^8QzM6SubMUHu zLD!5UQo^3#_1>$zDJ0Ie==4@4oz?ZUX z^Z&V=>zI1yY_p8GAwSz8C8_1VI-Z@#SRxluob;vQU@*(0k9xvM`+Tp&cd#+;y&l@V z%~^KA>E+E=+>~SP{}!Ccp#IdYoUh*gQ~8E~{kQ(iS14Ifd+yxMLw`4IzBD;?zu=0u z_wV|3r76eA|E*lv-!jivz<=?CNjEr(tDfFTR&cr0;P2vRbMF(gq3H#W6;GbGtej;2 zz_j+uLpPr*=l9Lkc>R?(C(L_+{z2utEm~@J!UwmlIbU+;;K9o^IvuLDL3vlCGhR8o ze&%w?{r{?7`vVhxXRP40xn^=%Dy4IMwyRCa;gb*FrSfYSaIDMLW?xb}Gxk!^YW^Dnw_-7vA+dB*l40pSJhQX3mqOf?ss@a=Y-SkYqT7!}b6YU(9trGzgiMV;Pr zB(85`pIq8+#aSs_RT=r%jd{*4J08(uCIbf7p8D6fnw9yKimcZ@*O%MB z^qhx!S=_$@E00=TBQcB8`|<~Q&%ShtzI&iC=GkA~Dff>}Wb<2LXRmu8Dlub!a>edz zCL33T|LNGYE!0-*m)*2$KNXbiG|9?>tS8J-dug z;`Z^NEy8nia=K>-dH(NRa@h5W$sxssA9I^r!%|NB`aSve{jUsX&FvePk1^&6EnYW~ z_2Zv}P?zrt>PI-=^p*=M$g;eyw$tyO@~h)()UCZbS>LvFMsA-dq24p+v(UQbzdNQ~ z_dD4%_i&!_hS`%nj~#SW$!CAH+->)F$%t2*W5m8W@o&FxS9V9PjBn$==J^ z$rHtw@5)v1YZd(OXOom7(34`e(n06YgzC4dt|~=emBT^|uHW3$o%0}Z^5)0s$(Fy? zI2Lgo2?$fSE9adcJg@YG=3%#@BgTu?`<5ln=XG^`t@8TFbJtMyJZTXbvzYcDIa7X} z5^MQ-VoG9XP*d^bDo#ID;|W|Pv!7fkzkPw_Yvm-brfY3e&$}DVI-~hjz*ehL;NZ)p zOy-K+r>ctAr+aRDrC@1uFYd_C)>8p4rKU*}rB6M(%q?ztUd~LgX}jkcF7pZPv-mNi!k3V%#2 z{PyKwhEPvRzxzBX8xF^H+?vsDOZi_>`8{4Pz_4f7up7%dhJsBLLJNIqMe~FI@%jJLO3mn~Y za0d6Z?w#JVCbM_{h)Fo`tApu5_;nADbrUz=OTD4JWMXfCi|udyr1ohs>Tc}pvp@g7 z_Dt!+lF8rKdtO+2;$(5xhewVkO}AJ+J~=h-x^;(v_|1!7q&t_L=X9yN&$3u}^8ry! zCE19Z7B5|-yWh-Mtn)8Z)bisLvr8{tw;FIBjaj9b=eK6t1t}Jl{->rlJF?fUah#B^ ze)&-Qd4=EiZcWLvw>e??+^%W$!-Z~p<}QDhILJ9_si{kb5en$z`Zd$t)E*tsxWY4@}i#%{G0gi38o8G%E_^aygyO8 za;kAh$fS@xyL;Ywp0f&{G{Jt!y~-!EIOpDQIjk%1yF%=pqm!TB`pM_7=1d7!{&%8Q z|8({=H-q_)zMo_(dzv%%l*g30ZaeNz7rd+c{pP(LOZPPf&-x^I#B|P%cdzfBlH20) zUfKKF-=otunath5_s=--0pAjDxzq38+BNytvuQ8o=iTIYb5Fv*ZHlk1#Vc=0oUrR` zP~pZ&9Mu9>o~5+hZj}}|U~PFct!>hgNy5sjT{NY<*wwlAAFpQYsOwp4U(4xQe|lkt z=aI+3HaE}xKcP2Shcif~9LhHi=%68it_-S_$T<%un2U%Q!X z-bvkTvZ%_o(+r8pU~1H!GwH#$5BKvvF&7C>>`<^s<@xT`8T7))-$~<`VBEUt99|+$ zMX`%6BzL?C?rEO!$a+%p@rKli+FYkqBodVxjI)~FY_{YTzV9yQyl#hzph}T|qF++k z2_OBNoEca6=6SZsE4^M9>5&^Evq{C{_Sy{^jR^scGmZR`UNAX6+vyv@>#K0!d*meE z1#jO8wV81=E&M9rZ1!@8u5hWWZL#8d=nKt)qlfVWJo&ed0&B> zb@>{_k}t=XBwAi9a=y7zaY9H@=fb2mlg(R-<}9q{yzOD|N$~s2U7LlTc&EQScjtSg zVDivhtl7KiY0Oa;uW#Rp~2#^U>PJfBI;UQ>Ggf{jas%0t~{ zhP+-vce|LF_0>1p{!I8`&DK*rNA=LWgmub%>v|W@JMhZU?O)n5caDY*+bG5Z|N7s^ z{J$(C*nLr@f8K?u47H0J=01F}L&r1ad}bi44x^et$LzxWuYUjf^}McaKf?^0gSU3Q zQvD+<{ZYZat-;5#W#*)StR3=+w)ZF2xI`p$ z@9?mT@;q}|C`8EG-PhkpRo_D6n?9snJhkt3p*DohZmwx~9 zF}3agT)C8w6}eXXWG^ZdYr6-KCc}kwUKh?!d!q7luD`>SNpq%1 ztdPBS;*P1tnz>>(-+d-2yJ;%;6(wMBio*RgG%-dndAzBAv% zbVH`Mg0CW7V7BrqN4^Ssr}sSE3a=#t7(;%rPW<6KuTZ2V*L2Y@z7-13eo5OqOS(nM ziEgkjPB{~)F3aVp`QLZ`$NwDrzfO|OKdt_;bDQKtbF0YvH&xYdJ-hKR`ud3to7imk zH*|1XP7|Q;R7$`mo7usr3q1Lflr&mEkwKWvv+V>Y+esP>pD&;+2ly(qh_& z-aK~Ga8^H@?HbW@lVh!U7W0WIn^*!Dwz@=Qbe=p~KkuiYXYt+Gg%+2d+8gzr((~x4 zdir5rznjKmv-Lezd$cb2eDpcjx@eo!MxO^hnOu)c4$R*>+u>5>ep9p4?V4@QpWRyS zISDwpY8O2FK2fCf>JmZO$EISAoK?!&u~QR;TBdI^RocAvX7kIBUzvvKqXZITzgdK4Y)8)031he;H5KoU>CcY~}eQ|8ULf^k9bQ%}nP- zPB*JAnwX}nqPj};*Pcw}5F@RIDRE*B>6%=I<$e?0rcK{*={-+t>yPk9T4|Rp?@9c- zpVnO8`slu|hnEY>#G2|l&c$;IlwUplGh@A)r}7prJtzH1=0;mZ)?Ltz&%NxpY-$v@ z?YBtf=-2mSV)C$haHr;ejY=^<^WlMfeoH*%Oh`7M)&4TLMyI-uY zylWaT>zc>QZ4BYc_f!MjHedO7;{M@c@hhETpMurP#jCDn9N7`Kv%G%7rN82Bohy59 zRIJ@+pfN>{*-2A%d$YJo{ol&}wtO7NYgbRaE#cS5`R}|0uTT9eF@{u!IhWWLMeeCT za_N!#$@QGICQ=)9MAMZb7ACmQlyV633rN4hkhs+?h?;9w6<&g z7q0B`bhGtv{+^}C(e$gOgGuXrOOk0;%f+kp&!P&d3P1kJ?2_LYI!BagYVoW;f?IcK z-?_fe$KHL8HT%NA^485^>fPO!n+;A%ODJYfKjX%6kVi;eX4BfJ6MnxHPAPXj*V{O^ zPT+92^u)?@lPco`_j*dtsNp#M&!F{TuF0bNl`KF18KmfxFDldPXk!sd`^IJyzqMq4 z*P&&b86{KwZ}hJeTpHNN*IL#8PxVF6z)uavB2$*c78+6{A(v3M3(i| z$Al|h3`ygR7TD~jq5Up@dbq$|o5Q+)1yZcGntu8k`|9h8j_o_+l#L&qmD)LTnxyoR z^p(~UqB~54+<2;#qf=~mJINO^zy4*+&(AvH<`3oMtFeNpvRvBkB%LsS5oUeEYlUL*A=yTU@*t*57hVHVe#8srzy)cfwQG1dTaay*gS}#wTP? zy_^0pJU@F)e$iTYSE;8iKa}%ak3`CR6ul|EyHvfIQDAD&q}N9jPOoP$nj#%J zsk^?k@yYS4>zTP*8{S;HXq9+*jbJNNiiy+izNX1hf{PzjZvA51<^I60WcoKQH}e$J zBCYi%Tx~yl-0lT*Uj19-93vmezx?!vI$fT}>`TnN+m=6KQxjcyd(YGx{eMbt%!qIJ zQ+q<{+A+baJ125wFKFCjC~WOgtNr!+s_lH6N==m(zP_)pbq$yEvMW{L6(4U^&N4Sy z%y(<^S*67qS01dp#p&L)^SVR-{$lk>hYufI{fMDrYWj4;3&}4d<`z6zxZBLuVEXq@ zbt!L4jQPqch1G90X2wP@IDe5N@}7Q{@5!HMJMDH)ye$4_POF^6+_Fu#H12HhR9?R# zxln&=8SBwK6F*P1*g0{I#b5J{VF!+$nR_F+%;?4WgO%zGDj^5A?Gnw<==rTIY_l0Nf)20S09AkBulbYL*8g_7=YlyIA z`5Ct~&CoeFX0;wjDBs!9ncS8V*R)7u_PplAQh}<|+jdN!QMr_rGwfoskLTAJ&2tL= zn!mr>q=_=FIs109Z;-v=Qyzt*f!o<1>wMiHyo!f<&Yx5u z>el)|ugi`xU{0vRw9Adcva1E7cX}xN>iW_DV^-yr@T2?hpU{u3bx{h*XLNW`teW>) zIbZTvwoH@V_lci)jkcCL6;BInDVOQ(iRga&=J;-tJcYQ=vX5OAQxBc@-(uMDe173^ z`3*a`Zn`u52~CopxXDCn`OUiZ8`elD#Z^Wq8}pdBH7+nZ^V@ay2M$xC`9;qaL{5HE zj_zW6qAjHN^ELk)W>1FyO8@39K3D(ubASE+=Rc3v|CgvZX1Fi!mo^6V-py z)BWzvda=&%&smM^J15UPd--5(c>V#)oB4n1oo;rX$U3s;)0e8?cN*)bd=aX6rg~YP zvn90og0b|?JY9v^?gEmRI&913Zk$n!Ti@e0VK4tjtN)YUo{ds8dO69k>BZlaOLN)g zZCx`lSgP{lT5FEYW<_45>cuRUfj?>w$LV=17Z=BIr@YKiQR|as-r#8`+Hp+rk=~8_ z$G8sOj<~ZRbHd6g`7`(W2RV?)`yJ zB{EK7`2-(}gwwMnT_`nAPf<)5N%xOcoh zdZ1vNsnOPZ@5A5h`+OiiMB4D;pB)AlKCW>~t8n*l`sSY_|L{ZK1hI}A=bBhHM#gwv z_*8ZXCHlvOQndoTZlwcgh@V}|Od534)w|GMyV?<2uIcdZicO$d6w?cD_R zvi8LSrcKWtPx{&S=<%-|#*-DCZguPmwTLXY-tk&^){43m7RjvM3$jn1eq#My;jWfb zUbt^%*kVT?6)BeqYmHBAP`K{y_(kPtf5rKV@a1P6|M9P>JijxC_2%*yjFpVXCDV>{ zw=YY1G-4Oz0wPaWAK4>qnQpy*{nQz44*P?(p9JNz*=1~=XuHLO``J&AX?7j!rYc_);3-a# zH{fUc`-XM@^V@-{3>rUF84NWs&tR(LUj)F%QqMADp6{ z$6ow&(V3H7tNy4(t6Q)7bo;P{=G#fkyr1S}xn?*yoR?)0zYzJZ>Dat1) z=&3Ic{{EEr5Zfbx?Y)h2{>y}|W70F&5p&c|)zi*0CgEw)jn16RBVO5t@)iegM@2M9 zZvW?ZM*YtIuB#`f-Q6d+Y?Fx4(y8oj_p7wp{0oE(do%hopQxCrpRaR2Sc zkFc`dk;gH?{Et)~eP)(<%Xd8bqvm$4g&oD)j6b%VyrIFeQ+w7%309+wr&}GuUhbRI zVyU7~DzHuY4u|3Nr4RUSHEf*vSMjOq^)GeJ5m!US+T&h-dvHDEdRxQoKE>-5dn+Ub zg3i6?R9d})!R7GzbtMdEF1>I4e`Kapj>2ordt6T2q#h#IEf05P^{zHO> z@)tMW)>s^P%_(H+!bmejLs$K+C<{tZ6jzQgVP zr&SrIhipzO#=76?@Z2l4{n_0UT|Hvom=?uwbv~V0pBfyMmvx2X^(oJaof;;>hd4t& zX-EYuDpN|eSFj3K7PB<>bNn~w=^KT~r)8UTw$_|i@Uh%GIsC5ct0$sg^;pbS8nbg$ z_O9){u+Mv~_?wPZ9mWEZiv>?_^b8O;-O#=J!oSQ1%DcL`1!PWGEe!lKb5B%U?~7pf z%2~_Zt_A;TT`;*|azBsmF|Th0BST5KfadY~B`seneQy^| ze%{=?BU-t#*SLVku`p9POz6jv`EM6^uzmmX>FAn;)4I%z)H9ho`fhd<*3J0)=#lcW zE8z_~`3ru1J>}BCbBXJ)OSrFJs)hpTNU#;%RS&l%%4{^_&!`d_Kd+ zt%8gF%w9ayk(zj6vvzdBwiM+_CUuQBKDhl^6vwC1+qe0G`J`Kn9TU=;Z!CG4sF=2y zF|g{xR%bJ*jW(}u&Wg{mWjHl$Nu7e#l8L2(yV)OImOlAv*}R&_7vHqz*C%jw%6F_Z zeI)wAUOCT)VUu9B+P%kne);8SOam`)-{`tF3;O0-}_I-qw^(+!H!7cYnu|)QRuc_0B1LX6?|_ z*qU4i5e-{cbTw22i87u{Xu6j^x01&|yJodZLq>-2r>vXy zlO~(rXMULB@@n3vrt(iU`mBu$p0F28-R7mEHJ`C@feLHDMz?#GoAXw7s4tIJ3YshR z(&2k;;C=aw*{V{VCtoj+)zbadVV&FeZ^e>L4heB7^@}bnF)>ANr+NjT=nNVm$G~5Rr#3*pC5d^j?LzW&m$O}zi*;^QvpbqSGL_pG?yxev zjFoBWoS1h^Gbi8SQ~DF3knO3QC^ALirAVAG<8}=_hb1kql=DxAel#uTNc(+kwdLP^ zC(~LbO5!SyCzutPe>=`8*wTE7?MUgIM9xW*n+g_nYTEC&bBPG+sym`}Gw!_e$5kc! z@4peYxZt+i zWKs5i*fYg1ftx&0e+k zQJqetLh;8#H@39AQ+}qB)V9uNk6>ROgZwRzIFY+;i*h$lobNP6^wo|u<&%*~0b4z% z-)OnY;S$;FaP5)sso?t^Yr3yD+NtgoP*J}s?7SvJJ@V`REyv$XkCxx~>0x&3wDVE| z%iYa=l4Gg7JTaZL0|p8#j=Ine9T6f1xyzb zkLR!kFh702-G9~%hoZjElNq1J@DyG0c`lslCw=imu}R6#)skPBpBr?}U(FT}swq_Z zWBP)^9T^_1k(WGsY{ajn=UMQz7y6#i&JYsYxf{Ng zOD0-8R=RM)+icOC5`}EJi>>$9ol>ZoCn)(jFJ?whMEbr4kI331Ue#KT4)10@Qz(jm z>LD;;H;3TH*Bdu|U9-lc<6=keb0KfHi7UG6RlH;4w7)zy%+OyFrTL=TNn@j{^6Df0 z_fq%7%C3#F5=@DjaIxyy^yFBTC@*EZrgP8h&&GOev3wcyuSd({xwnl}GxmFZLWL%*zE z?%`AGI=XwY+YFOMhO@7(=lng9XVTFgy(tQXf&P^`|UUV9%=V&USK`&Y=NPdb)!;$}Bx z(;IvLeQ}@J=ia~-cdcXD=v=3^wIh`y)!Ob2^ZRgE8F#zIjJ8hv0#39VCJVU zB`z+HO(rcrZ{^5+lheJ&Z`p+34rkny3q3b`JuDS?`j^1}=LvYCqm*&0`rCO!YNph>sZtZ3TFztxf_XD!eb$$s+Ajc;|O ze+f&SVyv|0JzwdG-A@EvCU22kvh?%+oauWfrS9fz{an}8DO-}usq(-w??q9`+iZ5@ z&inQsoSf3Rk6jIob&t>e(k!6kV3M9B@Opbpx>L^=rYaNu=>66YGt%OWe(QuC<2>{9 zX7$^jvTx6EAKS7e(dFWd){Jw~Ee4aqJT{k<|53PIpm;4Pz_=x#WVQax^M3;vmn^@| zo208+du*!lT}#F#?tzP#--PWFXghIjR?dfAix<|OJkiSJqMW$zh)%R((W3_?46{=W ztmB!kc5aL2u{ONqa;)f5uIaT|GY!6{uxi?^71$K*WIgf9X$#A>hu#Ix*t;~R^~{RA z%h%34{+Th)d4bhD6MheSYr9#sCQMGu<=mRg4&KX|Ajh#TZaY2ocD0qKYxSO z>etJ8D^KqEEyNyp{ct=puiKNA(+i5O7leB#T3vDyUe~dqmeX}(2d}@3P1)y3Vh=^x z#i#!X^WZN(dPZSM`TZv;LigJlHkSAud^Bm1(30b9udhb4g1yL{G>gd^Pc_xkAHqV4|k5JwQ1M=&s1nzx$|UW%j0dqbLPA|!n#`c zU*Gf3O^btV_vact`qZo1;j;gyP;_pqcTO~md)QqUjSijCLgDDO%8MGlP4f>fp1ig* zc9pk4WalHb?B)vB;$HvaqQ-;L0px?fSh*j)DpD_*+vs_4mE-?U8!Tj!tt zBQUvSuTeSceh#ij5+}J>1EYVorEQfu+!gwjbyJi`KZir%$Mvll9XB~r3~!uwih6OJ zqrQ~WhTBrgVvR$aYW+&>rL0dZ-FB^GbKSA_LEtSeo+X9co5ButY0FwJPz~L9 z?vdZD&1b%z+SoqTV$OYLKcrh5gQnB=A4^;%@v#kqGaM%(600TBl$_ViC{7aG)qX}dXYQJyS4-O2@8?@2eLvH4VuDq_%bR_l zS1k39an81C@!ncfD`2o!{8IF{1#X+Gg)IJxwM%rhspkGWSDJUz>` z@M4~}fY{Ev%trEBE{|rmn9mCT`(%FElE=qe-+COM>^7(12Rk31QS|Pje&L0Y9j(XZ zZdSj$_-3xmGZn7&ynF|0!x?SOe*4BaR4_;WT_ZeIJN#Q&i*A{x)RNEtjyY!tcL{x% zWLT~#+1qqRBS@}mcE;`Q$?s-Xn%B?Y^uA?FgW#ei=NW!qjB%K(QkYc3J@cO1mb&F` z7Bf>?PwaWEtaX0Z5ub_^q1Wf|EOl~u$JM&#uk9KJ&s5&RzK$zSeR21THkQj=iBbwE zeS58Y@8jBIWpP4IW@7J8{8yY1Z?r>Q`AXWnRuj+90&<(rI`v#G>u|n%$HjA!=ryjl ze}ys{Z!dqNwM%r7?%H$nVxkm{F4tYy$fxCS>+Z4AEz8wTzUPUwoNRod>YQ8ai(>P7 zS>4CN<{yQ+{;925FeP&B1kIDS6Ly-pE6uQ!bWFFi;(DnW^rWNR`Cr7E-tGCnS(|zm zy?mpfQ@;IrY)z4V%JrMqxkMFi-I@Nu!;VEz(;-()S%l%C(EWcf$VV=px$a;J2!hPMo+6>v!b-}~VuXfp@ zuI&=M2+f1A^uml`grmNP%TV;474*_osexNM(D{-537P5OneI+Z=FU3=lFrnu4koK_v> zpbp#euM1b+&lPc)(xWCcXPc7+>zwo=?S|;8D+<@5mDYKuZ*uyl?sdOMwa@6Ku`0Wy z_sUeGPX`@yRMbz$%=%iiV4KEA^OsYK7(1Sbb1kwo)il{~&PhYv_GvgzlwYOS2|T9-yNB^MK)j8hkIgOxK-KB)2v@++FV@gA+4@_*1KcQ zMQ%aQ=Ps@b0#ACJJkWVAt|N1s(-!;10DP{>n}siJNp4iB(t3F1;KuGx?%Wqca&Anvy#M}B zzy6;~^1Su`|9%fYd{r~(w?wjPwv)J8hK)j_g6O~B>(}r9*Y;je_eA%JDL>9{d(*aE z?3?q6x%Lwu>o-1hmalHLPTtKh4{I^kGW= z)w%BtVklw(pm}v7~mLuw43e^_rZQ-R1{MOyzGU z`P}j^xbQ3Kg52&SwZ}hPnUK7(V|D-A-P3dG=Ubi^KAZUW`Sth>jvF^`+vj+FgOjZ2 z?)N<=h2Hk!iI>lt+t+W7>Ss$`aQ5#5!4NxPk3Ev?_VFKPK2QEE-MCzG-~H9WKmJXS z|MhQ-fbx>>eQJ*m%D&DjW0~-^B5u<1 zo5B5G%hneaP7KvsRxX>r^*}*a>{X@*^(En!n^L`bzx>y_$JH?_bSqPh0q2_jn{V!` zn!Yx9aHr$S+Ti9kpO>*-TP@g+?h58^xGxi`%jfcD3aiQ=k)(r@XPxZtWYu{swvoYZ z+Ds)e*4Ys)sz(+@s0b(f3v=6jo#*wWP=9gN&TrnD9qp|VM=sa4?mkvtaQ~^~vzW_W zANFRt9$Y56|ETxndFg9Hw>~o1yzUCugWKs@M;~@(hpauY@9$R;?gyp8It=SGJ#9oa z<&zk9JonSo*k`!0;kzBT$FA_}TowCcwW1C_-1v2o=z%NgS*!-zi(R$(+@{_R)@j(C zD9HU_Z2k*=q$$jKa+aQV;CB zrxvWACiiOUs`i}Cpt0NIxsUnRVezFWDpehv+L{K zUw-iq>psZtyZB>rCC74yQl(G-!%mxY@13jebgW!*URP#(^{ptW!_{pzah1pBzp7Av z_Ks((!uHv_^5aAw?d;!`uU5RmyshxARZ(ZQb3=fzb#m(C)#oHuPZ#A_Yr5<7r!!J_ zudjb989Ce7)A+OOQ>ABjk8r&Fawg<7|u zOs!d3S;^IW(zyNI38kYIcB^kcj(@S+WZopx&l=mdR4)nN@%`4)9f{hxocEh0mq+Z2 zREp(@y=y5gqr~#?a?!fWzSd2fBuFGFWms;br013zBzX|zB4bmO?r z>x^r%YEcP~*yMi{hQ;N*xH>&*VvR>Iv$ewpRjb_^A6Yl%{6D1g{?;_J&>SD>p6@pu z@7AAM`fJn7hRLszzRc0&o1UE+_H)Oc4^O!E{664=et*W&Z!h>bcY5!K{62?Q3_M zuYEr=|H#aHC2`Y2ip@8(eON3yWB&n$G^X|12UdQcD%)mrgLwtxYgY(@A^sQb($(#+;>V>Ij37)S5KPwFR@cn#p~IA z-G8FuVn=R1bCs6ua&>FptyuZWWu|Py^3*v?O}uaU_wapJXw6;m^dy5tmV@R?p>wlR zS!EKfvjiTjcy_tdieudyDVCYCdgX~0k@_)X>8mYa?KZ|Co`dzU)b ze#56`Q`V20GNd29-FGPFvGk7DpE%0bo#lI2Gh3Ex+s%jD8&19{h}``})66=?&QbT2 z_KW4>u7?j*%-(nF&4J&1uNyty-)gs;md<`)t8d==yK~ljegCMdPUGm-9mk%CPb*K4 zWaPD(HqUv1>g!J(+ZWH9a`Bi>NrIlNS~*olfb)K_!{&4b%!DjJXevm-SBa# zSHy-1feY3#OguNUg>}!e;6+RHbxh)g#6F06nIF=+!J)0=7;#kTUWaY(h96hHCQjZl z{Uh)F>L)Ri^|=pyTK=2qdr$s@b*Gi@>~xEGSfjkAsdqyi_Y5I1neX@7H$+Ux7ZTf- zWp|`-DnoyncH+lHmCzt;5iKy^e9Ld4W_IApYjq|$Kd<^{9Yk2MS$_wEZ&Az#mBlHNF^8k z_`SAAl=D%~Q_d$nPc^6Yu%51H-MHgVe4@_rlM#8I$Gp0YroDgJ^VK&eRp&zaZh4S^ z*m<2032vbc{;6w{7rpN}+WSbOWs2O6&Wiqd5v%cfA^RE4#{Cr>`TA47uK8Vf z%InRPr_+|K*`ks9bDm$M#Z@V#=feA^8}q%cNmZ$j44St8ZupM;8us$Ic@N)}o-6up zovvDT?pK?S#p~RaO-pplLXO>v`sWvM+en%7wTt)SmeLKMR1y zj@vujw%F|)SoiOIdg4u%_6arD#EnFkzr7ZCdJhL%Os}Cj<6%{aAm)cFD!jDB4<8hM zRBhrAe*N{o3F|JtWp;YK^Y$NZZ~X_+&I>qRJ8_+ro?-8>QG`4BhtWRwIS-vJ7x+i} zuYWCSaMNI)`}!>ty+r+=wkJKDby0TPgKOL7IzCgePcAQ&=G}WaCj7%i{$EmjUoYzO zzGVLYN4V8~=9eFQ9u;P~BG>m{P1+vu_@(a2FonfmukGsG#PjIxfft*!AByz-Us#iN z&^vQk#5w6rivs&!bS{38sbOR0{;{HpRW41!e_h(Q!*z{U1;5YP#H263`AtK~tZ962 zZ-^)Ja&K7o;*-{$iPzZu-(KxndUIZK-uHDf7fnT;NS>^nY4MIP@<7S)3cK3U-Hcza z>KrL`T%H$k*#6D`t2Xg$b32wj+akMCbJwhSJJc$tntW5K@V9KuS8NaQ_MI4i=Tpu) z@Ad0cL+4N9JpXT!Mz+#leQ)QLe zoE47Tt6He|<=FWcEt?}d);?L-G_}3Uu|mVlK&eZ(sUu|EpJa_4WvGcLi6MPH}7gna06JF0tEYU)OfPLFd1^JbK3eixoO$C5Kb z|H!6UE+Xf9{vZES6MIO(=7_u9Dw`wIH+ggL8-B~Vf4%CJlk2B31ix;=4L&Y;KtT>=|?wKa0wc2 z``_DPVSlW*fNP(g)~lVi+Jc2%9D*)Wy+0e-Ps{JixEs9Z-(BrWXQOi-dvDYj`dn-G z3p&3w^@qyU=UUna9;@#^zGsoj|9e}WX3t)lDZKBtCeMT)I{CNnZpvxZKKZh&DeSSr z{)+{yQ@1>n*1F?7e?xdeZhn6Be9`Ao%Rhd(`1{qw!%kgoKP)w0h-a^qFOQbb5uM9c zs}{MFSENxkkZGao+x7+TZf|;!(Wzj0eA@awI}@&5fAQvkn5mJh;ZwlVVRkiK> z{X*{cowql49b@l%D8FOr&4{i2TIW>%CizZPi8{P*hVSODCBBlmtOkB>LY0<8++Dsl zVx2|vDZYaF9>wz?5q3k1_$3+cdPif!M2Mx!^<_EUzDkMFKoN*qQKu}qR$_KQ?ui5$d=xG;B@t`xNFLz4RYG2*T%-2Ydo(ud8<$P z+69csv-W<`eG!!+{r-C8nX7Nu82sd4+C190>f4+Nd+MIniM|Y7zv9oS^;4H6?(CG3 zGyR{({%uueNv3hHvDA#MBDyE7zB;kH=6^f1Tkyn6pOx!2NsHn?-XU;00;I|%|CLEfyJjTt+O*7ii{mpXz`8H3D zikzamIu}mgnz}7CI;|yjy4(WG4Jwo7Z!p+sB_i$^<86NBZBWqroT!kx?E*Kx zsq^|2*R=F+P|{0>sphujef9+t zcVuC#>KLp9XZ!!mGeMOSn|MUa+mw* z+!7zg+ph{kJHA{tu~go&B!>C!@>@XyHWu3!CAz&`vBB)~1nsYZ%hH3rZ?(sC$~;+} z&n;3=rm%cpqm(<-}JbhV5*}IbMGjCbG$umuE*tS_V;cZTQN12>} zb;fZ=<`Z6Ly@K{{Up|*TZehg2$C`W!EBg9 z?5n@m7-+6L>$5qtx@u;_j2BBna&oTlzssJL6Wu&zdntR6;E8D2OJ|-3UF`kSBt0qq zgEJHR`PAj>9))&aiBY)EAJieWKlS>I-{D7UKTWPzD%(_bQ%j@zj5n>~KmJqvHsf1stL$fqUfIZvJ3>lZAvXHyd6&9hM}vbo%2f3z&GF|}A|eeIfc z!J`}ZqRZc8aeij(k(`{n#zJFOx7)t$iN{+%=xH=@7hbHY&e_nbti!Qp15c!Levw*8 zxZ!?z-y`LFO)I7)8@hcc_`+RrYq2!9Slpd`MRh+Mat?6comIAG+4LBL-3}}<+DDqa zJ1)mLSed$Zb|(EYA{fC#7&5KpsoUE~}xh1I{7eW=h!b?(QJJ+3f`>(@p-4;vX*pC^4$%*g8KTKu6 z9v1Q8VE8<_$J!_3`44^i(zHS4ud(nn@s6FjtSpB<2^k+sI`Ho9751dP3TslDH^>wo z^6EIYyK2u?_xroj4!x?q^#9GSl@9KcxZcc7S@&ht$^-W-%iVVspKVTh|9Z}; zZ@M#stM7-*JZu^IX7|CBH-r3mmsD{uKdd?0d1~dav$KEb?Fn)VS>GJ|IPTcW!s6(} z#*M-{B_DZ@glU>Ot)DV0cj=Y$C5B6l%%YZsI36qT617%Qn0-0Ny2LCwq%ezp@hQ_R z|DIFgx|caNdTK=Rx}9AZ=$4wYkK4@5VDY9}hl^e-C(XB-8+3D>t;W>1Y<^*0qEB>| zhiqHO!SA)~{5*-!3AJ;Aj_z|@c{9w5_lSn6vd_w-=?g*%clWxi49Zw+z0@nxapD*2 zd1ZlKy)TY&_3jJGdcrX{|T`~6EncKg26wLM;&3f8o1^WS~>(2KoC^8Ea(-`9H>ES~#Y*fXZ`McLnn z#m+|a<;DK${@(F^e)E*WCtD7v-@1A|zoGic^M5XJ^4YdC&kHNnoHHv@ZmEl!vPNjv z{b0_yXF{6~+`JZfn)C04Lpv{V>FsfOk#d`x*GWBPj?0Ub^MySZCbK$~AK|oB4AQGp z;+VUC=GSZsRx`2X{34W zf>Y4#`TBE5Uc50svGv#4A13J~eMdcd=KW&rdH1kaRI1Kkm--2bSfd#dcZGS})OXKF z3Ub@dWw?HA!+{rZNylFB^vLy`EAxh%cCq00%xjDCW4Ra0U-I!VYM-558=%PJ{v)Pp z|F%;K0`imV8tfD%-*~2QD>^yy(6txetLKXre|z5Y^!|=%>$8&=ud@&~K3elOalXL+4F+_`8(<{a?R0woBr@@!Cfo zm$Vj7w6R?gc~NWe#6NQyYwSC`gx$`??N@phJm-%v=T;*r?TzoYet+*6v9^QvQPS2! z-!lJdU*S>~e>E*?&icscp7}Z71#dlB&yw`+*P0s-vh_r_o!{nP5ap&n$st%fNndyF z*N9bNOom%02`)Qi5qPz$&iM4y4_-&xs@5{58VY?k+9_ndT~tiM`k<5e{S6OR#dJPc z9dmNqsj25%HpV2bng4dnI!_r_+r&fS(vRg|i*8GAt=kxE$QQ(L^UmVBnQ?;0KYmyp zH!faFs@hoe}F?>b`EA^2hvX{Z#Eh#Sgc%J-&Kf zk@(WZQ1*72T}jWHHQ}4qR;dbH)|Q-D@Ox&)rT#-{dk;Ol^Wej_B{x_Pu3Fk!*tTr$ z{LdG)XWWpUDll89V|Qxn)@~8?o2yjz)Nt;sUMgCmz2?E8gx~htPOEvA2XiheUjJyF zgW|{YRyHLS&pxcU|8KdzVCd8(>(bA@{H&<5z+=Zj9E#XaluddeJn#T}bo_)bj;Q77y8$71f ztzyep+a3&ZI(b{8bbI!@OL?Ysi78i3oo_mn*Y9z2o74Gk&3ji~FHNog`BM9~nv(6k zJD&s6?ElZ7>}nM!mZi7^3U--mJ8`_4wzXMO#+6 z%{>0ACh70mZGV;C`x;J^sq53<%lSLzZI*xP?PHbdhFNu6?#@52|0il|Z_3l}mBxqv zZTVfb<xbMpRC2?pY$HhSbkhMv+nlI zRc%KfRUDV?zPLr|V_KX^_+QJQ!sD#vR}N=PfB#do>*ATkf2^DgPw*9rb%o#dik>{J z^^t;L7yqYu+b=F|ef0H=WcrPFN;jJ#8_Rfqp4k1-ukgYz@8BErkJP`H@8$n+KC98f zZa3?r#kq|?j6?Gk-tE|XPIBkNdi|Lv#Xr3gf17u_`2ObN^z7>O*Wwy0cu$v|lJ2;E zAh$e9foj&I-SvC%Hh&dB)I`7Nb0zq34hwD7k2o``w1!iKlR4DUJg zq-}q>!C{Zb?bto+;&5$y7c_=kINp;i19xB{>g2Ha;d(j z4-bEPnw)7NHe>li);C+jCF0K3TI`FQ;oE(PPl;3b&HI=?*6(XqzW#ak;NHh;zZ-WEp|NrOX718uhh5IIKDKG!q@Fe@1R-dqy zD1XKyi-ngrrtY%vd*L%@#V;N8hg+W8{^V2VnA>AH?~%pA=C_K+@;?8U?ev)cxaFM7 zxl7M2IG5W`*W$}~vfX2Tm$221*}<~vC03XASoyv1dGk`GZ*sx0TYj6gnl2nHoSnL? z>4KxF#4C%1n_nde9_O6f7_;)P1!wv?X0JI4C1IkIEcu<5$E-bF!n&|I_BT)AoE?+z zZGIlWbiv`GcfW?;3y~P>Nfv%DwwUYB>l3y*%vW#acc?N?CiVI3$rl`V)pc3;y_oX- zQ>m5Tiv?C!bozv?R`9w0E_7nQnwVwpcgS-`u83r@fYr@DFDt(nYkJgzrCRv-`ZVub za>#~sEIeN%bgsI7aysk6W+}rbk&Z7ObW9H~cUWBiii=Y=gyW{L%0rPk;YNad8Ed{Q z=n}T#{p!dj({gUZZXQ|nhaoK6RsOOpoNOoB+~W5$gh$A#BP;fq7KiMW_GRabg#4Tv zR~S80C<#!^d#TPbH)(sQmEVg8>-9FvwVZR1ni9z`zmGci%)NU!Tvnv`dxt*Kew+FzKXY;>$>-8g+htds`fLf z6AIMI_Rd+LQevdlTr*ptWW!t4(-SVd{NepflS4Ko<}SbEos-%-Pt_?b+?*#8ETdi$ zAS?IwIHzn#`!aA?m3BN4L+g8J;5QB>|#cR(^+0ZlA};n6W_3qfB*S^Q;M13!T`1 z$NBjQS$&?Y?s@3o$EC}eIp_Ydl=XOV#ebg4!sc52_~VSdKRxHDJPZkGQ}YwB`Z?Ls z^TieaXDSPuPffT|=)^wNQ9f0H=gw_8&vhy#pVSK{U2u$@aCvHrpZnVYP#Usc?c*|` zpkQC=T|vheOU~;~YvC(unX^u%WP)d{=nLbA`?Gze>r5ukAhR9CN=; zxAJ?D@P2iY0?(b(DzjJ@G+Mh(`pC90*seT8$cp!>BPjAh+WqbQUigFvyglA&&6<8^ z!c#vd_4+I>&bhxoXWyryPcC;{C+?26S8{z_jSpfmgd{Dp9u(A zy)5=tg-NOi3Ryj#)U3qN`*Y{XNiEHn^GBK|23hroDlA*8mmKDFN>@l)YvFU;)50>`=auC=g%Y-HeqzTxEmVD5 zCKlT`zNoRg@bToKgX){#w|v+m_T=N-IVL(AKl(ZDOS_u?vW4&7vpi7IQ#g0hd)bzA zcNkw3%xP&py8mCfh2x8qDVsI>gsnJkB)u{Ff4^MQnn%4vEzM*8V-*>lnoyYwCwBPT zF0xn{9C+eNq0{pC^Pp7GDIF?w+|%OmO~Fn-0jnGAo1#2lOgXvhY?a(T|8U_Wzg>Zo&m9$RaJv=0%DK>K`5W!4 z4=om6UUy}Syn4y8uTvEJCKt@BZkM-me6gfJ3fscV zTE1?=g_+h0vVD^aPBm*Ou`gwm@;DbMs$O!7&%XU}3*Wc8>veNlnlIO>fXbCGD-@ox= zlf1`^C$)1y!4*JU@v|e@r*@LC)e7Ds!2$udUF)mnzn;?Kcj=B~gWJW+iVVCeoikku zo!CPcu6V36r{?ubfd;m$rj&3Ys}-D)vg#!p-amb!ve4MRa*~RSOnjBqgbOF0Wb-ae%bS-^mvaUXwSPr%*CMaLbZE^WSQ@Ps-We_|M*T{(|P;MPjXMCW;vS zvfj0Sp^pwrq;Z(*A_qGG7U9lhPWe55uOH<(&Rl#``D~w}jY04f^?S*j^S>D`Zd0vc zyYX=6>SRv&4Tq20<#EpEWvl#N*!|n&%Z{&8sv{09uPgA1IJCSTM5fnioZHZHD>Jjc zU%flg()#J2gW8Fl^M8TKe|JCC)!Y%XOX&FcYlmvhx9^i*BwNVMxNA^+Pw%*p-Phzv zyxu<=6z8ojaIR>OpC>0h?Qyf&w#%_+5;^C8Iw+CIIse;2&BH==6~BLfE%g4O^Wm^` ze{`R}x4dyy#3A@cs9J+;%d;Ib9?OF5p|I@acY$XA#S>u+OEip#b+nI<+^-j@t2^K z`8o1!Myfi_=R+@j%H3M>?aU(skESWgHNgjVXQ}pHe6ynRbzt>X?Yy!tX1C``JMI27 zN5B2&-JpxS7k+oNua&sGdH>4##7NKe7TR}qbFTTO!gb7P@5gIjoL*m%dO7RNz0z9w zT?yOLxZ94jlw8-7TWnTaUTl9u?*^~5@Y`*(icZV?@|E+~+Wt~(=FHTk>g%6O-TLkO ziJ}iyvuysyxZ8-e&dTz9`&412di)u=>4$kgYVJL2cy-g8U$$+l_;>gm-NO`{pqP0f z%&sQK`?MoBPps}saVf6U7aO^48>&U`9An-*_m-~5(!jh3lbidN?mf4CMg7Fpdla9v z{hC|uY;gLrz>1iimoqsoOFJ1ctuwmtXRX+&?>-xk{g}98>5fxtmA+tGyT$26W8E%6S%qZ(qs94{0O)eyq5rEcwml zzkYX&CdW1Hv3R2PR4e|*n);Jd*EQ^#;9~O7GKp_#LvY5PRd1N$PK%q|6J)7B727ulrRoVRC*<(Eo^o zVbwAdR;}va#9N&_$;-ye-!yvLo~Xp%tBhsiOY`{GY2N1AD)N$fSF_R46=gf4S1x^* zs(nesc^V(fwb@>#o;Rdfr+q(I_GYd=|CBWX8{a=Lm7l+$?|itxzaATp<2>u^_xtUv{-{*t!~dp7J>8coyY&?RcbTlIN2lIi z8Ya2ZRVzz$ZOPjzPNjm~uZzNc9$#9uTvYz()$6gZ#Bzr~O`M zguZ-cy+x}(AlB2Yddt~o)7SYId=ZVhy6f-K(3x+hInVyY*y+N5XKlgVray|?<{#gb zw)4oU?Tq59Jv_ceg>AG7l=&>Qdd0dhrBbf^jZ%EGs+L^Ia(kb~we?=o)Lr@Q5lg+^ zPmgf@Z1imVrwid*pJ=vL6FDxOCaqGRPuPV38zdZkW z?Td04x5WDC(Q9Ts6CT9ys}BDc`0kl*tu>`q$KL7r)T8aTzt*KmhU%U! zxx8qTcE+7h=^x8NSk|2`p7QgS_f{eHd$AwReLnOe_+5U*3Mt>I8@gqLZo0o>%i9`p zex=Cd4L;dcGLJjH-s^> zn6=MIH*`^;Z$RXN`V9$F_q^raF7B6K>$-nYpj^nS?%T`j*RM*MmAhltJA+yCjCJ$Z zt=e|7%iVfVM`c$x) zag)XNbr~W82Wo$IS?yu@EGjZ@%Cy5%Cj6W|e|6U`e($+g@2#|*cAsb0vmk-8x%Kwb z%$yuPeA(%yoKlsOw<+u-%c;j3!nA(QZ5QQ@lX_$kvDwZ%LFo|JcOgNZN0$V63j5gA zz5AmBxNGl7ElR2E-l+O2x1~iRvf|YwffLuHOjTGuOqrH^JgCC6?Z3Clu{OF+IJv#)!M2_9tOws;ljUNvn3;A>?eGD2ZdS%S@AX*E z1iqdmptIJ<*_mOw;k!EmAeYQ&d%(7}z3qYev5UPOt*Wfd0f?NcWRtSRx{ z>dA4bY`vl)-`e@dAMJU+lD9o)Zc^mg7f%zMljSE1Y~a~l*S~Pu1c3vU)sj&jQd_3; z%iYeocy8&=v(Zi;t{An>R8U|(wNOUc|D^Pis4kB-ZpO5Yo z{ZwWj9KAM3zgkvR zb{lFmzxjRW>5Js;3ZLJq#Y()I=eX;@%CFs}=8J0C%p-PvWlO!=yL0u?-vJey^DH!8 z|6)70>m#Rsp3p_vlkUAszCE})|KM4@Hw$AcQf1yQyUV*)q*?lb*4IUMdCT6Kzs<{T z_S+r(LoM!`Ti}%TvcNdY_$|BlwJPbFH|1U0x_@r*&Z_u1r~iIGyt5Xj!n37? z?>KK|wdb#0pRj*b)rUth`}WoLW_p}i_xj-7zPDm3#rLLEZ+aX3>vfIyuZ4Gx9s7GG zH%;)=)69zXDZb(p^CCi3T^?#LF^j+Y=`ySN>tiPrBBiHooVG9d$-IixqZKTCUnhmV zoX)&z?@RS#VV!}?A6;8@weds&TVl`g$41A@E;zHe={Zut`dvKHIQ| zx2yGz{oWb}iRBSzI`&OG{m*dDy&ebukeVkw3$7e7nyH*|a8Xw4G^dqEpQ>D`O*ytN zFQt!DCI9op=ncX1Kf3zQ-D+~#M?&uu;HXHEEy z>~DMz_q^^YSbuj>OxB&%0s7M0@7t8M=Wx1QS3KviTHP-%+EhO9!6};?mqM0JoTZag z{`bk+zC`nPjW@H?yK`zfa~=i>PqdOq>)d`lNdEl{-}-5bu5*1ADXyOO;PffuZEfCr zf~RwA{uGpa((s|Sx&5pqg7z!rd&P^cygkUDa_xuHUq6fLfQy;4-@RAWo*sLBDu+X5 zzhviA4yH@Z+fohwPd1mj6O~~u>HXV{k;m-Qv0sYp^QvYhFP-Y*x>odE)#m02!EY86 zpRAQ#^L5?RZ1?N$4APFww-$@^d9&~C_CB6NtJOO181pRiisrQt^Dro1F7DK_Gc#|} z)a@=0PAV*EzHoix<8>F*SIhf}WB~RxHacPOCgKA(gS=rj1sH(mwe| z_a7a#Z4XcW`{wZcIdh+PFWj%hM!lQIQ=_YIpSmIFamFmKmBD3_Oe=%+=}W4Y=Ney@+EJmu!~2N_ z%Z;G*auVN`3ak??IeRP7^8K8Rceo9-F@d*mt`Ohs#oUNYY{`MQ|@ z&5Z^5*V#9et~2bDWf7lV$HMgH)z2MO6Ey!;a{`Vc<5~`Q}|paVAUg zvc72LobvUy;l2A-zExVd;8;$Cwwl-j)i2$jQYSn8|Mk8;$8l+1(+L;xFEdv=h(F&r z@qIS05p(HxrAJtXF?a=R6iym8Lww?6c)d z=7|1X^X+1yZd_Jxxxlv1JYe$is|-D>)#lkve64JAY{q-xo%_0^>y;v`f37+mYd>-8 z=lgX>waSzWfBpKZkhHkbmZ|r0&UMobyA54k6<4II3z&8>2j%=auy#@)Mi?Z!|A^b4h@9ndv zM?#gqd!#BII+wofWQ29q1wA?O$iq&CQx8p7pFJtzw7~Y_8^zJ}RbO(&Z1*=i_gHUu zJm>7&JlWHJ3)q+!E!xu@7N02dsN5v&Mp<)TRJ=~g-hX?(2uoW2*|=$G(?><&`dE$` zi)~wTz8fD5vNZcyU9jusCZohF9e#mIR-2F4msBN0ZHwIYB-wcPvp4CjsnH9?-NU!5 z8t$L6S#N?-MVm&r#K#%Af!}A%o|wE>PhRu8&PJ!(=K@!Yck;|LzIOdY#cR>D=jTNC zmLA(VCD+(EYGS(UtJ?ROU#+$3^*akU?~N?CoAquMJ9qZ(oFhHOPuwInzVDaNySGXq zwz2K(ix>O(f(l=YEqQW2JM2XF{IzfYvmJEbG-J)IXTMn-6gKVHAu1R0`LeX##2xp( zA8&mtSpUbm_HU`$wG`Hw{}bE(DnG19VLWp6x_!;GqrYxD?mIt=N3#D!TsG6rYYVh} zG{4VsSZ5l>`Qqnw5ThdD<$1ftJJ}O<3pjk2Qo1kSzyDgyJBQkZLI1zIivP1Yxv#M< z@A^fy70X|J2vIdsom6TiIOA3Jl2g;fgH8mSof1$Gzt^E>muorU=IPCBF~$+Bp+-B-TjZVUX$!u)9k=sX{quOZt<~$Uvqu75-W+sE z%l#g1`}4pTCGXuw!X1`u|6QW6OT>M$Lz`Q88UHt)P1mgNH;TMG7cDZ6;Z?%%3%jOq z?9>ac`})Q;qcp`>a^k~E#`9uwu}(=6<UBU!$8m(9M73n%c&NjY5q zXTklyv@$MF^ZGpZ2Bt^6#_R#M&H?kRm^1aBom>52*}=Yh%UO)J{EIMFFV}nX>+YYB z`G?arn%|}*H~frYmlpf`aiZ65yPz%WX2mZ!@tJqRwI3}rmNsx4q z+ckDhf3q_tSu$z<-PzMQ#rj^>Q~P&Um=<}yt6-Mge9v;>ivJ%9ES$Qz51l^jkd?c= zy|JV6#+8}tYE3Si?_5*+EV)_Pse5ZA^U0uj(#S>(6ED*1J`| zXWzTv=f^(5<28QUzx~`GF+ptcA;({558bNK+2z4~g6EZ7h`v_fh1oM2r_9WkGJZJa zer*cB5qspMc|5CrsP8XZxyE_vFSelSos(H?6u+crn+mM`{BilmBi#~#r-WlKyggCg zxccLfJ^eJ_^E+6wo#%*_g95fZ(?^Y|f)SeW41M}ZxVimy%ltGWax>=iP4ywX*drKxz4 zq||)1g%*dG+=@=VX85 z<6kv4UX6%!rrtf4i(W{1+LV|rO1+zyu;>5dpLch$v^jegbR^3y*ZA& zW_)0Lg^#zkMVBY#{QJI%8(J6EuW#z$nwcn)>Y>o@cAjC8x?lrOemJXdoBtGLg^iPRvib$}?&GH% zp4qY7`#GgbLByBugv~_$Ly6}VrbM@upZQ#Me`Do@nse1{m0x6}ZLaefJ>U7HUpU7$ z{J=#A9+vGMLU(UHsQu@>ZO+D-?{7>yYl`e24EI_7m8e z&c*InAEWt4rO3!@Yk)yuXcWC*^kbtPps^9HpXpg@xCw7 zvU8i2;}I`gfdfapA_Y_S|BUx-K6|h(E!ykb>vE&iDKfGxo0iz=1`C{<^vm3OW5@V`=&Fp)lLDx0#mzev}+sMDvpo&EOJvgi}~ z@!DsbT^RqZ-r1y+ozJR1G3-98q5M)U7uP0(tL;2ixn244T${=c|BmK9m9Fg@JV8z) zkij!vM*q!~X_snsOOu{_3KpJq*Kv;S^Siz8mcKi4JWKfT%KaZFSZ>W_uWWdtsLWs3 z^-;k)%TTUmO&OD8$=tNlCXJj^g-X|Hr2kNya`&NTZPSSru`vR_`%<2p-BEaVYhP!L z(dkFpGR4!%bU1W%9XS<(y&lRQaTCs&vh2#eV%JkE&37%DH?dtHu$N2VfKueB4@~U>2i0tuYKDwPt*8cBUYF58FXXezu3o}!* z(;L#Iw+3EZzeei1g3{LYT#KejCf}JEyYy(-7q`u6&7w@(+70GzeX?Zrg}%$qHGNf* z7g#fAvuWLsy`6vhn{axbfNWtX`?rb6~dBVU9mP+xD!sIkhEp zYe&MBpE^(PZ8F$$=zhhCccFFB%T}aEF)4>!i{H&N!RDtdi}DQq2U{i=A7|Xss_WXg zc~zQ5&4JY-nl%fqDz_vopSF&}Gu3qS0*?Cn6H2viA6I3uSQ!4i%{Ra3k9wj&cPj~zmsY?@`AiQ*crNIB(T$lZ)jn^;ldbg+J-$#ayB~l6;Gp|iyQp#NN{mzd1 z%k4V3(>M+t$~`m2@MPdjwNb$7tu$(HVC&tH{sc(FKLr22EXfb74XPv>uIELrS&)PdodO`p)!Ly9J8 zy7mrb;#vxm9KVh?USg{qW5nvK zEebX-6<^lxcXZ!VZ^!s(=FQ8uS?nI>3gk4+%JsbAvRPN)TiDU27h9!wF1ATO#}x8F zcpd-DX)`lDgkD|af3!Gqzkrrj-s;0F*D5%8^S3h#E38xFTXa{zagC%>gZj?*oJZF$ zQ=FiB#qA)=4%Jjn;SH0l8Fl^|D7y=!URuYbmauv6)P#K(pS9}muv?sRu07(}gWo0r zZefDvdWR&|^fvLa+20rVdUfHvn_BJ@loM|AURCt_Tb96ZQ}0P^OX!#FT&rK)K3K4{ zjH9A;i&NMk?Wm(liDK<3Px+0OPL)?Uo!+f)&-7Q&^+|NM#RN;a4R>xYxKO}*=YNjb z4-R&wpZou_J31-B5zEgXgkx`&k3CSm(GI%=egD>0TLTR+-wBvFzIO zCY`xo?>e5y4&+g|_R3B`S~n#0*2E_)!ODN;cK@*RS9*1a0oOZv zS&Id>N6x<=D7gJ!&!nZf)>Ta_bJz=KOYQrtz@M?%Yr@Q}kKao_s+-RdvpQG0;oH`a zZ|CsOlzdZuoa5yyrypk}UuC8#Sgkmh)L~u4xxVbU!X#VwdD2HbvQrv&m~A$9*|=qw zRLaLSSA{uNUW;I!c*a(;U*Xl-DJ+H3Tdx^>33{|ug<aJ2VzX?eGjnOb) z`L&tt=~?zOYbLzksBrYERikh59z%xbp49g!ozK{<0-SKUNH9C@<~ko#o*WazAid z<{LJ(NiJRA*5$d2JoOZea=Q9S=g7790$Ha`%C0*dn>y_ePxHF3qo8zN{n%SB*}bZPw$u8rc&c{$mz`^pZs}RA z=I9cA{qaIi{W{hMle1eaRaV}b=5+SQ+V%`Umej`{($#LrWXf^^BU12p@?Eb~t3=@$vRy>&K0? zK^v4WOPw`Ua9*j=AhBA`V@s8DWrCQj_)DdyYg|(<3Eh}0wb!-eO1qxX)qM)F2bP*0 z>prsPsJ~pshm0*7=kHNBn!hTpTVmx)CA+NuTK;p&|82^cn6@`gVA&fle)h`cGw!=z zUL~aSXtPx1M3JV+43{=6tmOReYVt(sa&~Iuk@+jyn_b+3<*q8k#b)px(a!$Z+2qPL zm*wTFtp_8H%#O=;%FaDDZ-)GwZ*Q$%R`f3G?YGh~TB>oC$?WA+**KMEGoRhdws0?t ztx{g{`d`Y7$tM+KH5cn2+;gExj`L-e+FRzALJQR$cU#RC{_M27f%`V&rK>-i9v}It zA1!|J-)~cvDcb3W-Y?$C+oM!p#C2q=pMLj|C*f;FK4pFSc|Eq7X|l}glQNt+-Bqe~=Vx6u^>)rmwXD9bGqWSR*Jt_S2mOgllOvui z`7C~9!`f0K*A%P&W$y&I>{XJ~1Q$y%NcwMOJmOxn?{t21*3IYE0Zk1}5O(jC1cT&=gH zaJ}uBn9$xqPq)%l7x-H*~KdAL@#!=1 zr?!>PzU;_sGf(B4dw|OQs*P{uXGiQ37ThA;S^Ak}*Y6FxQt}oj&wl2)=WF(3fyKWc z);?xh_2rc6gt)catJeOWePiyea)B*}UYUEB|4h(m^^Y^!RJU~L0^!Z^yLW}3e`k38 z)ojOKmrrfe)@pvloMLfP`bb&+A7izS<4a5fI`3uhhAg^T!hXWw_W{jy_Q_2ZuS(l` zlCHd%JdeRs!Zd|p8}q9!#kudAE+(Jpz7ckOBl`*GL+8Ss&)=NT!V$&n`JqxU_xSd# zX(@I&_8CqWST8#739N655v{+wB-n~EWB-91)8CA5WbNv_*FB3|DA4?F6N}P|UCP|A zpR>$R@eVp=ePaEFZRNe6eO6rP$o(=urfG|gXXFvbCm-uiiEtYgrJM}nHrhVt|12(n z?at?H7I`Z-Z9BNo@y+g0FBZ}A2X=`2c{1yDyR3$?kOEcRp zZ~kbJc-g^p*#z^2Qd_;RFO_u9*wo1SvN*=YJv1*?Y>^w|kvB|oSLX1YXbYYz?QOPb z9*a`a(<+8Yr66~PHJQD(6DpR3o!%JIyv$&NnMc2aNw9J$a|*{+28C;y;>Uu7sw_Na zTw#zE=<{pb+F?Dn@7bXh{fsk%S5Iqb5f(`Kxa6>+jN?T9MRAYQbnaTrt>*SmDm*dy zTT?;F%8jN9GHa)wV{?!*`z_QrIr-)t{(X z3MBeAt>RM9z5ij?sZCt5{}DoT0k;S&+!$#R{5frkfp}ybQH=G|4l% zy=EiRqw{Mrd4+tg%z zRP3Xa-z%>AtCZ}<8!RC0ChlUsI8;ns<>(LI2~#}3GPvB)Gm6k~eDmvm^@OcDufL>A zN0{a2t@14TAgkWV;I==^NA`(&gjw#rzDK_2=l$NTU#I+&wc_-b-G+Azr=D|@iR+7M za>CFI3QL{CP^@#HOF& znv5m3HNM8`9gbnjF5YYAuduXLc3AS&=<(XroBy8jd&Ku?{WeqCaXok1lsR|4s(JdP z_4-dZ;imlM4qNis7okdyv*!M;eD9f3y{c|$-TIkJUNLCic+Yk7;UO2PnQs4Xlxg38 ztn_-;SLr9aH6r~thyUwkS@!$UYQs;$S!SEI{rjao!Os79)h%X*LaFBtZhjjrOB!$3 z1pBbDi1o{4pA$&dzMomf{IdVrCvK&QcRzie^suOQYWjYEhePc5`8n@<8aP^Q-?vTZ zUbg6lsUKB@6_zLd^XZxruDB`4F6-j9sh|9QHq8nDX7R*pip;K}dB1oBte|6bYtZ+DM|A9FWV@7Q#!VU5|!n02|KI@6usC+ud%d zEQwydihEJBo9Bd?O0!cLkM!J96X0L$u4p^WZ^~@nN%&8Mcn zOYiLQ7TA;&y3es{dv-66olMwAHx|F@-&afI_~u@zYh1C}u%IoFk>%s^*m&8>I_m`$ zLEZJa!W}7@Cu$fk3jE7>mNU_lKPl$04w7m z<{j6!a8H?&c{NnQ_V%)1+kbc0d|kij&-Rn+*tB=d|85)Q)Ri-9~-VmKSR%P zDl9ZvL$p^ML1g@ z_pA%=Tb+zvk@-k`=I49IjcfL8K6Jx|WB*Atm#QTdr%vVwe2tUuN|_P3TIPiH>y)i5 zmY@3je@8a&SSQT+@4byw(;UAS*1tfbkas3YvmB~+f5`Fd@?>`zzr*M1UppeJ^U8u47%_8?dr@8j&mA_GldY5S$ z!u52Q`K8uL(uPLPD{Xk(%v3uK4^-Ppds~$DKg$xBvMtz7>ZR2s#@+>g|NN~CQ%+?u zaPV6BuII#ym8Zg*7nQ8{ohZ8Gc+aE5vnE;=$w}T^YSVL}^OrdH3U`+aTd#EFX<0kl ziY?z`X0%+~AfIp3A(^||&&Tin5@K{{&wgpM1*UHTgx{_->+PAr{a&x&#F0wz6`jvQ zj1C!jO-N*n;x)RG^6ts|o*wl#9~kzk^BOtjF1ciKsCiPRq0-H#>)A{rA1f}`|8KQ* z;?C?v0X^37It$ePG@QtJB(mC45_>0CUuKgHPa;&aWpA$h@jr^c@|Hu!zwy;=IKJspf) ziVxH}pT6_!%2Sc5oU`h(;Rm_ z@2U96aOar}C(kC2dF>hRcj=!#Q#fOPUhVqKh4J5td;@qFw(G=MuHALAErpl);pzo? zoC>FIPF%asP`~wm7l*T%$!|4fZJEd=mM8i)9%WZkma%(xJF?7{zq0sTLQC4+c8#8& z-?dI0oA=a0NuIwD?W$g1ND$%5SMeuID#0DEsNRqITYvYX*rI<}@#E zo&Qf%@WhojUwYn1l-W#W+~GM*Q(!5Rf@olRps~W8_(i#CsS+!G9eipM_Eoh;p;&Y? z)28&y*$N>s>jn9oi?1*E@LcQtrbGH+nGsLDJ6W~tZ6bc~31mH1+!Wp??lr%gg-^Ry zcfHfg*HtH0b+J47o?5>6OFGYld!HQkO#K(vcdB2m_;KH<`EzzFosgQ6Dw7hvpIvFK zh(?FoEVoF0i?+A_4#doxEO`0YUi&F_)1R?yT3M%|*zYCT$Z@?^fo?=1q%y0;$` zN6c$4TXIL2Atw4nLI`h%hra*Adxu)@K6c>VqNY`6yS=qpSIfMsI#@Hjv6yE+*E~5V z-qStTjPxu^Cr{_m`p22_HmZJyaDG5yD?`e;PkF)YCvW@Q*tH??qt=9jbyA<07&adM z<0JlWnXyDvGRJ{8%cVc-UEEf*eU9y)A~oe@(eLLotgc-6weIA+quC7~Ui{qbXu@`Q zMZ4u8{rgo663HO~W=c9t4pZK5XYW^1SJ>oUnXxPKpAq+x;`$SN^w!*8{!Ocr#c9r8 z;f8>f@dBb+3nQP0@5-BS^Vj{8_RTtPe=fRqUT^n8wu0?{V)c%sWZY!UGCC#Haq`yF zUFBbHzb`VZ?U^+1Tg^_9Jqy}oyqq>JiZv>$WOEAIQaP(nWOI6FOz!%fR+>x=f2F1u zZQrrVCdDi7Cd2IR?_2V<*PDr6EXoa-IB)H8-FZ<$w_IGj7fdKJJzvlgrn9KlOQqli zPo1lIUth|hty^4#`I7f#e=GL~P!9c2V=`k+6?P8ynC3TNf!dXUpd@HAGu*FWh^QOvaDe-)rCRdqc_GjhXhf8W+M62VF70-J>Xma#po z&^pJwDCpi+Yqc$p<~p=Z)4ywR{&QJhm&=hSLb(V@9OKS3&*of0#L-!C^WGa7 z-IU*S*m~oJE2b%HH@r#Knjdd>&i%RRi7COoJ6=8Z@9{BymU^~t*2Kc^8zZk@+j2kH zD2CfdxJSWw*Lz|2wnu%j2j6{Nt*~R_i6X|y*V{QoIGj1w$ct>c8K0Xyx1cuTSE}fy zq{p>)<_f-xx;DW-z4gPD8V9xSd6~UW|JHP@x_@Sl-vpCu^Y^XTTv}hv6?j=RCE7DW zKiirkGAgQniT9G9=a?S0o*m>^W&+fYW`~N=b|7Nc7elE>>Ch_Vg zcq03!Ydgto`Zw{e?Sf)2fjqej2SuLvl-xfps%W>eZ-IQF=_UVz=jWo_9|+j_>7|6y$>ueEo-k+s6)kGWe{ zI`+LjETzV`NWDRx^LqNCZDA7H5KX(ywUuRo4$^1M*>+&{8c=j)2@a|$WzL{4>VlXS^hW4!cU`Pq++&l*l}O7+fD zT^(z%JGa?Vhp$6qQ-6b*9;btt?&X)2(`CeGygL{3!0zU?o6UZ96Ca)qzpT()RmAId z?Na-kiEq@mx%KJ)d3P!&v63zC=g-^O4^Q<9Zadcbx$3;3lKV#A)fy*eHrCDRY&!0m z{mRL0)j^{}o8%WQpMELxn!;Y!Wy*a<%|5GrCp=Yu^U&V$i-o6h%3cxi%g1Aj|EPET zDZ5rYm*uHl{KdodO)sPz`~Gj4`%@_$|(F7S~lZ{G2{r@SVWNJ@sc#z;Bj ztnsqs+~mJ6^7s=46+N*n?}CNyD{M5*d9d=l&o9BFf88Iw4-SdXc)&E9J=)z=4y9_T7&SYg z+U1TjKUQ?Cus=F+iNyYv&z**~AM2)NM7N$;dFW43=dM%PVcOES?|jO0{=)EfvEAbD z27Cegn@`OS+`qfdY|Y7!8!CAP?ORHpmGg&uxyAqT&gIkY-5d4wBR|uxi3;T`9pBhK**|_dDJ8wj`C;YSMaN_>^2sqRDXrkWYOCp=^}pH9>5xvxt+o1@u#W$N*St?^ zSMq1tt(v!ffg8K);XU_tb{)5FdbCuz)u-%&f%Ycvi*+kE&ABr5+q+Wp`93?Asqrb< zDax<6IKXoRWw%y-8?_6YT#a-d>OL;}mgA#MCt=_w& zuNoe{av-6|sN&e`Mf+N_;wJBRJYn{G*@osY_gfr-*~?2bSKYieUvzbm6~iuXF|}L# zZ8l4Sy9D3*)h;#7c=u=0Oa0P2j@G)mZd?7hdoO=o_@eqt>?QA0tf8EHkA8P;>6?0w zZ`aw_eexeqO>Y#K>$$5r#J)w^?PmPT5a;&`>{F(cELR9l`t$O_#Y?LGE}r}J1iY@Y z9#}S!-=R}$rHr3!>@#P!<;IO`k_wZP7YV(4DJixq=-MKMwRQ`tYfbW}X(e&nziYp7 z=f}>6OE*V%2d+8NUGwm75I5_hC`NHsd-GM+Y-YbwvvrnEJ8H-9Hmd!car(X3IHu4Us9o7(8M#3%=xi{@Lo7xJ-Y+#@7`mG%~Nm zyf$u%HLC83XfUmgIyC>so|K!Rp|5{2=vcZ;SfTsO+9CR;WN&rdiB(g0l;3IE=_TB(l%}>tcPVbp_?nsB^`Q_dnnsM?ce4frVP1$qcb^@o;ynuNt)*SW@vQ|*L zVb{p&G*4QtN8$48V}tunr6=%Kw*tKmzW zvlLTLY;*y0n3}`0Yg`%KMICkPmfTpG@;01%CD$XxS5x^Gd>3I>Fgfn*;}+Y0amor? zmzcXhwsPwgtZ6sNQ{;DL7p$Dd0yQ(w0=gzsPye`s-f1;LRLA7P_QBDh0 z-PVomr)*G4)L9^fl(0N1kI<;;PM;iGDfp=5O_w+m_mnt=Hx(@oftR-Db+zoeDfpd#=XJMDHOnSuOE!j8 zap*m`5(6A?94mxWT=7FJ6pF-zO}Ez+D=`+9@@o5jXGF}t_O>+WNI+rGDP zQA$w8Hm++j3%#`xSDyTEW3|2H8i&PpZ0ByQmpEs#!OTlk)hJr2e3_+SW!fxhi_4Qg z##w!;3wZI!Yg+lG&pcLF*SMSuDfZu5XR=#YT1GVBp@`^--}B7f^B?_`n0D*(TIZfJ zzlm!f3oTz?5|i~Z)j)RYif;yPk5+%1@NQ>%Y0$|JuS&0rrv*dcV#_`-$_MQ#>S~Ao1m))5< zNAQBPC#&zqfbD@no?n-#Uv^xtndi_^bxV@p^|9h&_qR(@mfc+LY~pe0cdTpE>)P^} zr`;Lmm}->!${8(w7PjHigQYFuX3YZMPhJe3wUx=OaLJPOV*PwZK~q-zuvql%v!H&T z;DPN7aY0Lu3WR>$_(aj{cg*R#>GM5yEWLE9;=(Ptpx-{zwz6C+DbcOaf2d|?;E?jf zyEW}(;~4>6yQ<1_8?LRA@M8$s)GVNTDS16hw(TqyE z=Iqz`(SlV{L}X)=W%wsHqg$q@cj}$s_dBU!5wG>u-hA^NqlX`|g}T99SEm1)aPZ~YYkj|?3#ZNrD&Y8?P|1JF`tf^{1uF64LFcQ_s}^sGwiCJG zQTRmPucOz(Lqt`#R7Z7gm648p##IITDQ6_romAD5*ByQlq3w3g;qa^}j+0Ar1fn#H z+P3|kz9raGcUoK7&VW`CpZ&J{!V|V$wQyQks(z`*WaHVu!d1WAcdwAl+twK|($-*yf;_P?@pbJMF&W!r05_kNYo za89l1QEj;Fzt&naQNHq=pn~IZpJ?Z%pgEdTwpb=tC@wwD+&2BOaQ>>#(Q!)Z8@hEP ztD7hADd?V^>9t}>34>+Q^=|ePURtx*{(B_FII4TiUTri-^V-&f%lao=`m1{N^p%^^ znzea{`1_{t=?2tC-|q{%vETCC3YMh-@oGZ1UN{}u7m7G*E{k#H@PHz zXzW<>VD<{;(j!)^mttk+t`A_Z;yL~@$-M5c>Zvf*OYWZ{THSRP2VeF4=W8q7$o-hn zsWLruozP9EI*ziZ zY~Q$!$*o>_b7sngYJWGA&EZCiR_gLUtSz_tHFtf=EZL1wCZ=0euidC@G0feV(xP_s z7pIYXk-*NgKezjMN-J({mAh1-@_pL(efz#{6tq6@fj#2hPbI^>-!$(`uD{{kJ+*!1 z%K5)O*xa(3G}GJY#4B67wOQGHmR5nh8ljRCc1`-hs5rm0)Wguo!%325hFnG5BZnKa zzpE-4`cIq2%=wP-%cf6Ulcs1WOn$s$xl4=i%6Sv!?_qnnGMS-ghMKpqy{C@Ax|bIe zoB~(s`qp^LXFgkgJEo(mYxC*z_61r0F8`OTm{~o5KKt^iIPH4*%LgwM#_PX+ z!|R`RORC=Q@@>_MZCB?`nYqU^?4RAV#frvvFL#um?Cf}NewuIR$Ba`w{U(8NLcX#lwwpi2H?(&mL&pplSZ>LVbQ(=;Nta7h;-V?ibUYPMo$PfF&XQpcID3r$ ztqGr@)b+2|tH0hY&ujjAJGpdY`TvVlH`~Tv=JUB+zd!sN`?8CgieabZs!zQO*?n2% z^|rgSKHtoreD1}*Nwyr<_PLi=6&wbX|cyD*5qGW_?5$&)HI46GOO9srIq$Up=9|(JzT3aDeBaM`=-V+pmyZub z?!JC4Bwf6?{+89I=Gh12Tjoyw8~Vxe*3SwF-jbR=CpLE_^7FPWK zC^O>;r>2zY=E9dHpYmr$Drv@h7J8ptJ^Lb{z z=E3LJS}oL{x!>qL?9~$_HoWHF~<{CkG5NDUVH6V;hgCd^5(Hc-kNmRB~Rvf z*`Hnz{r+dTwtM|cK!}Dgr{{M zww$@Y{_SyyU3Nib7U~y@Wx-ZGcbNO)$y$5wx#^}ml%G2E)(aWe)O!^*ef{it&*}W~ zdza4rtSs>6jQi00(evKy1ZzHR&A1PueUsX%uT8!Xeco66gUPxd*RA|H@6Fz?GezMM^*r%TNu5Z0-qI1N|E9rR9+_RpG&RWU0{dCHT_Iz`td9$VBs-;!4 z+FGw{n{?x7ywJTLQnml<=CsyM(fikRmxX_R`(G+$ulaCUG=Gn%X{CJe z-w8jXPW-XiHuZ>~rsZtmMZYq|t_9w-QhIJQ=M1Ok&gqABau#oCZCQ8o@*IJXXiL7s zPF>Mi|JFP`f4^jEUj2k?Z^WcBH zi=8Uo9?!htk*nP~H@nnK{r#;yl5Mq9woSN@>f&DPbSd^yro^|v+g?e#Yr~sv8umQa zd9!%S?Xs7wZ@-DR2v7PI>woxKtoTCD%dc-bLw*ygmQZj5M|``9Dv-L9cSBt*%l=_tA}WCQLqV!E>ud{xpY8 z)BcD#Gi-~@xn67Jt?ayfs`9baYR$l4xF(|WZv!$Z- zk-|A`y&~uHf>(#1y!mjBK8+D@>TP>$lCxyn)FbQG zTFn;T{48%-qT<%IDrM{cbrmOxt+;EFvt-9oHM{$~9|SKQvFY7i7|~g{gr)raK9*;Z zG3`H{ymqV4U$x`$8a0)rW`2jSJ(p8l_*tXx*%6zkyAv~QFDR*2^q!k{aEUu8KE1BL zc=GPvO%ujU$*}2PSriu@|FB$%wApx51JzXfals#kK`&i_?XcIJF?wC9^S-J2~Hcb~Ym zb8cHNs7zbh8egd6aAl89{TKVzxVZnn?_d8ldCM>Uy?r*7R?_!tHm}Gx{aDCi%|Bix@pS?|I5udCqGzREXgy55tUTk^Iqx2)`+bUQJ^qtKi4o_mpn z`g_F+Q2CIzvh(=scOBWE)}6l%iGu#}atrnMWxFMxgNx1JQ+&^#+|Aqmc*7)6fVk90 z&U>=&c%e*K&>oli$W_&^Oc!d)Bw6%npZ@l4#m-yp_Vvo^teujGDt#>XSEYpG zyz)z(`)QRN69g@$yh!jnqr1QFQzSV@Q*s@${n5ixBhpFzn%ZZxq9`=`+xaQcUG<|yU!l|l0RGXp!;VF^|aRe zeXmb<@~rGk-?j6@sSKv_?^by~E;lV_>ECNHXL87T>*|K5 zS9)3deBa_%`+o{wI3_j!=GBdB%h`*a0^U6}$g+H=p!^|2?pe!%I+>Q#DcdeAIW3xZ zhuZ{H3`(?>&T#X1VbQeMQgOwrhiS6UxIr~c@e97^M`D^F-uWW7==hSo+XHsKimm@W z*{o}|MN)~VD>VJFWo6b%9X|m#uce5$pFiZGj zvo4jz&(vzh-FL;lffD_hP5l;aQJOcz&+{CDiQww=Di|nOL*j-t*PpCBON( zOdtK2dZ_TZE$7yk+h6PL__6O~vCL=L9a?n(D;{h!_k9+)cPaBbZVkCR->$tVm*so@ zE}*R)Abv&dY(%rXIMfT19E>%r>E?j zaqTfUMX1@`S1&kSDdfHO@dlyC9-MMPB|B8U%!;@Kt(4<)`0mN)oAYpM&P`a{_tk$- zRaJb%@u{2tCz*d<6!J0s-F7_khI^`w z<=3472bGd1#qcfuvoUkOqE+;=qfvKE{O)Zn&n$^B*nj2Y?l&KuE4w-8d;i;N6J{~} zzuWYdcdzF7?fSnUVCm2MA(PJE-FS3k11N($JoVX=$+q?>s9kZd;OWAYDbET#?RH-( zi-``CbN8*ecVL76%qPXwYc6jPysgnG`~Kk@bxpd6RjZ>d# z{rR2t$1i^WIXC+)+h_ey{WZTy__M~_ef--l-9Hr6v^`Ab9B1I>%b7A^ppfmiwwN>7 zb!17&5Kr!NZpIOJd2 zKuYb?C-|PLOnvS57Ub|e&4aV`?V3Gy@6*%YofzTq@>%xx7@4!4bIjc=c(Z3;5}Rcr z>-Rz7vx??L#@%x5iHgT23f;M@E+i0pEOFZV#hZ3}3jI|&d~%LU)$~2L6R%aZFHkPZ z`&U&U^jS38?%W}}uIJCzyRW_ZaLy60`rCbvKm9tPtXiRe@!=c+yDE#m!(RW>_q>~^ za=lQ2AwE@a1J}p-HW#`}ug&@`&CM7fK0zgJy0P1_FVi)=mZ*T5a#F$tejTTFwwBhZ z9M%2$VCuRa`!yz-B??=muKk=S@qNmJO3?$B3uAX&;(1j7(oiv1vcRv)=D;E=dr&~s zL{C-s_>yS;$jE-erQ5T5t~NeXxfuM$FYsojtB%T-S-cs39$vMrsdWk<)8BfXv^O$U zta%DE{HfcV$u;rYYm#L_rl0PuI4fJ=mm&Cz=k}?87T+e_;5FN)ma@NpgY#^8kGE{U z_gxg;)^yghF7B__jcea(-)kOBO!t~_d1}~=r_Tc=x1}yu{bIgQ&E>mL$lK^k#!Szn z7@s|1&h@qExg;jEi)X_819$k^wd{LOr83+pW|}$qdDB{<(y6(dt36%>s$ZC6k*WWg z8B`WMKd|*#%ZH-#8_xAF*|AivCZ_y*wVQD9`nj+Ec=S|zeJ~M!FsEkQ{d;Y~pi1u{ z+mr(`F+SL~v7f7!lFxKOLQz*6y7ZK%c6pN*hWyIAQQXK!RN z*XutXUD2-&s@F>WOpX>lbbMCgT=~vIf6jSgk1}@#SLGk>yyD0Gc9QXpIWuZ2GQ58W z-|$Y_&hkY#rRsLH?VC@ZHSQMd{2k>`?38|Qm9AEH`_XL^E*P6Husr$Y<%)QY|doSM%)_eL_f+6PbyLr-H)i$3{TE~{Lp*U05i*1gu|J%~v=e|yPu$uRPrJ?)d zmEa)ah~H9k^BT0Otm6E z;d`2WKwoN|!qRHyN}eT_iq_LNta*Ho)#Jrh-@PHf{`}i}hJVSArk$5de;fZ3%TtrXyY{@TS-_INn(-WGU})Lt zjbN9t$V*h+odpDb@y>C-*Irq!pfSu<}XyZ-f9+jS?6)8E5l zIpKF!Qr^$KeC|Ou2fyite>{K9+)(}CO1-zYuLn16zs2~xC2#ZY?Hks;IUnZFd5?Wv z<@NU1Uo(r>e^%DK$G-08k%RLU!mCWqZ&>r*Ka9O|kJ+rre`+LpR^-UF#W`I5->$w| z?Tc7VzsR(;vfrmXczUj(IBDITxOQbw;$B^ES||MZgvHgL6F~{GR_B1_!n;P|vGEd$dzY}^Z=ie?+05vw(a_0DX zL~RAhf_kv8nG5{nvd%zqDU1AC=5w8q4}#~)gSwe^>1=a^cNs^mhS+6mu~+AJ=)?oM z2jiZxC*5*XTHb1+UU}(r;oQ>+GE*-*?K;C|qW)#UnW~mKr!MV#Z>w4%En48`wJU8N zL_eq9I~EJ|r5{$;gn-@Jbbcqp^Cc-&7kO^~amk8)x$$|a`hKlhB2}lBh;04Yc;nlo z8$aD<3r|X0=_u_73K)HD=5wAqGk>pzx_0^I|KWG|9YkvPowfhPAKPtT|Nr+^J($+)7%?pvO74RCS&7@3`+*nlGnkezSh&`(m%@ zb!bG?-@9q6$C*1}1ur-vp9db8)^ab;tM}F)2T(6`n)QuI7fzpjlQ?_62dEh5rf zm%a(r5m5hdnX#8xoEMw+vvJBi(I;1>FHGX8+OuRuPTuW1&Rcvldk)Go*8i{k=f3a# z>$2#to?ctMe|x^D$@LWexw>4Yk*L5( z+1)vc3)`b_`EOcx(LLfBd(fSr^Q@WmFUl4(|0;I8wl}7B(bCv;al%^OU;iq83NKT5 zow0X0%lVy5=Qtl$vgBG!ycH(2TWyP_Viq`fudL&ITbI7U(lGqNm9USF-BTVY`yWtU zSgfw|nOQSeabdWWgSV6Z|5}#RI+>-qUoMoaIee^ka?wZ0!grrOZ+NS^vDh=gd(!%C z=Ta^DK{Z3#lKUy^M5g|%ys}R6E!*?6voEmA@``T_tD-r(lJNotZU;ncCstjryi)p$W1qhVUbnd!R`sT8 z>6W_9wY4>?|MczWw7rld`#)fXkx{^;n!dNP#~DGnyp;EV>ca2GLk~e}?LFuDEYy4Z zu83^=*$K+!#t&B&TzYZxw%3(s?4VLW-(u^%l$f>CH=Olf@}tRl$wkfw;W5ICUd0~T z)q0#OsA>8Y#^*~e9=$A_wf-=;6ycpGJZp>7eJ@bzddtS&RaRQD@Is58oNQTO^kH>Y zucZDq?Q@-#t+rdg{+)U#xM_V?w-V>tS00euWm~aaUwFS(zEgI=`VHs$MeLjQ==bhS zR#q?Bx9_`>pXl7K`!9b~_f;9xzI$+AM@Vqd++l^3EKo^|)8`)_;ye|zfoJtBTFU)43Xe4j1<;Ct!ML-*=VALLV;Uw4uH zZuY+g*OyGNJAB`0d-nsyg~jp?#X&;rzwG1zrO>A7QyHHxxv;xf58_JBe?E^3{k--b zdjsX$<;4{GWi*C^>TYnE6V5(I_|_ZE<&ZosS98h#>*+25X+n)a8{&RNT|6@~I-fa^-@gtq7_X@+K7P%w7>(6(7 z`wFT>BZVJKx?t}24(fn?R`>WOr7*dH@^H;T^Q*gzYG&>6-1SbrW_|RJK+!py?oB@y zq-|2-(mU(=j8AjgCyLD5Xq&jS?ZJaZCGYYtUDVTm+v&`? zXX&d4i$3sOzR9Pod1n#Jy~XX_m)6a>b&*e5b5C-!pwe}2jo|f8G5)VFuG8mjbLODw z{cvScGk@#vo3r`y>?Ur~^}Ml^?YP*|y{grZ+Zw0jdLCNm(x=Py-ON(vuEE4Zx?T^S z^!*9h@q1a(mct%g+gB{tToiw#-0RQR{rgj0_PvwlF5K6&J92r@j+BX7Mz6VB=FI2h zzk68N@|(a8y|y|N?$>*{6cnfLw%VdG)j!>K=F-&j0xBN%&~ zw3+sKSM-!QxpmKXxc`4s?OEnh&b-6$+(o_z%MSK;O#OGcW&cqwu~Ivx7S~#>`_^XZ zwX5CEoo|VrvTlKE^1Y~%XHTRato-2ew{GU<9GTOVXHS|Q=v~j*;{UYvV0qq_Z~Hxj z%5siwbp097J)0lo^7&c6w)ILMwbsek>(lsa-XW&dqj8$!)Q_AOyJBVMp876zCbI0} zw8hyjQw}Wtoi_Vad(_(+l~(ufXOG#g0`Y%ql;suvO>v&I!TVI7ZkMZWUgh5;=S%Na ze!Lq$*D|%}*&>P6QL!_2g+xBFxz@YZ_s)!``Q_)59tsWClUn9> zrFVal{dM)MIw-Jh%!>*Fb+WdCWAnSptY4>O<8sgKE8TAvxG&u#{iegT&$ptltP}V$ z@&1kD)iK`3{)OIaH&MT7Bc}YWPvuR=)!(6UR~~I+3EHN*SN!^RBe{tyExt?rIpty) zXLRz|#u?Y|PHOSpp5Fb*ZqZz6wji^ekKV3Jk-NzGDx4>rqhRMAF7rv>V>-@ks?>3R zE2#RRM4esy>FuRg&$)vgcl_OhMKzY?prkFP`a$Z%LD!8du0pd=QCUIYz301&54)V& zwxrU_xA3W;?LkYq?HgqU*Y9>%__3qn=$^7F3#H`Q=e$;aSouTie%G@#T4dXpXBancQa9?HTnv(|8-vRC(A$FnA2A#(fP3EPi5pE zjUtKjQ|xvAMgDjs;a%A0>>2aGyP4;}^K#$+B6aou_;Ovrk5yH9{x3&#*LlPByXSt1XJ<}qTK?i=FlXi`!zQ(@!l|P5p22qF!N;^y?sBmo z%8n7WYqOoKRebG>J2*8T2=3yu6Dd9h3*?v+2bT+3$-Xt11j_BE+wUJTJh0Mg>T1*d z`g_^j=bx&HExaau#jhsdD;I0vd?Ws=e0_{;GJ#C}Yps5SM6G4FmIs%pF}5{YA}=#Q z#o_Aq>F>6uYHhyo_RXhH6JG}~mFFJOe(~{sWulzwZn;HqfA#uorv7{pw%$HRLEztw zt*_tRSY3C@=B3@Gm#Y7Tf8`lU|1z_^)FQ9B^NX|L^4i#be^WV@MJ)50lkJ%ncYXpD zgI4VBdUIu}G?p>to%!_Xo5G8mtA0)SEwa!5P}$ZO=4;vaX9oY=mT{)ZX4>ap(O16h zTByBaS%cm@j(_)OyzJk6ZvCD47nd8w@8rGfFA}14bK$Z{rziIQJGD(E(f+>JiFv2i z6ib`)ECD5(wNGv=s(JhP9Ir5_==D4Le!a#+uV1>`HiPpI`@Qwnk82I48b~!wmUXiV z7kJX0oN>_7@9944lpl9b|41*{KTr4XgnO4-=C69ruljNIrAvjjGqP-WTsUne*Go8i zzP+SBXKr-VZY~wh-P<1Ba85MaI$82r;1*WSSy^Q-786+e9+Vl^!lV>GdvP{_;b&Ys7<6&-|M9#KK-UFOX^dLhBy^5^_lvw?L_T z%7K?^?DAZTlk(i51+4$ggY8VvY$azQf1KlKh1PrRO{IrjntN3emp{1aoEY-1_Wd(v z&D)b&<^~tPS!l3(DyXd9rpmed*sB}P57#}|cljhQSpII;{mD~%|Fv)W-Tr0ei_-0j ze|I*$y1^=?I$c@%Z@=o@hw_Ij5{tia-jddxc<%S7=x=Gd(%;N1H{3gSxuniUY1*ql z#pm)0gE{Ah%-sB}YT{?(hhnM)Z@fc(%=)}mk}b%jOjYMfoNSfG8Napj&(!!oa%@u5 z;N`d_Hq7Msa%)JjO1wQNi`mEFO=J0~P-P7E+=ll(A zjFsA~F!AXM`$a5r`TU?D)P$w>DWEzu(Ep$XSnHGn-MeRn8ipS|2dds(_CGiMoh!+; zAZ+)hxN{vs7OMR6Tnoa$fnW71=jYe(2W#KF=bpMgZgKtd0*{?e2c;LrtXnShaQFGr zF3+9`^F7OWLw6Rf?XwYa3-(}NzjdxtUzlm0(Wcl?-Ftf`e$IO$X86oO!n^XWv}Muy zy9?Ws_4C`!n@_*aa+-2Ly7EVWTnGm!nS5}QyBA&hVd0Fhn)K_} zPICqF?}>eQY}E>`#a_Pd);%Tu9jfZ$g&Hy|jx9Ph zBh^Xyd2dEwe(vg(lK-bI`uyI|;{U=LQFnDmh3?9?x-Szim+r217L7RhsI8Gr+Vjw} zz{nD(coELRsyPIR1z=0El<^W_A>X5!30oC>27TKsu`De6d!g0 zCA^GF(VIUnP7IHnE~uICaA~T`&V^hb)=MRF2LGJ?vC4Cj3~LiZ)zn=Mr;o_{naqwm z`&YcVLqYW2ft1``XYY9F+g#+|TYk>w)!)D;f9CF3%CcTh*lyByp_|}Q_*VyG@6S09 zoS+7tb!O|E@<4CGTc#~B?S+a-a$`QG*3xg6@-HFLk zTUyUH@57coc^yJ~mb(1#DawFMliOD8c*k|SaPpojR(#sLGMWef#&S+yVlN+K+4C5@ zZsCH_!%1JNR~~~*EU@_73Fvv&@7Yoz1DaQ#^5CfDA=Ql_y_$KNm7#Y04*x5cwQ=iT zt+*>UJy)%E;wrzaE2%rZ0tK({c3G$L{*nIV9X+?ggsfc_nXWi1o1Q4Y)LBK+e24Ld zb4FS^-$e}`Jv*}6aB`(^uA6RjbW_W^iQ&mh3;$FEJg-yys;#nXV`A2)6>e`oUM^*i znQUIDxUyf?Ez~B!JoSA2{QSHB)b&hfiG8TP^5^WFHut&l*84A~3uW29zP;7S_fLe< zPvw{TXG_v&{aE`q|I60Dkl6vt>QC-TX8gPFH?RG2B+Bbs+23g|<@w&PT+jLM(DJYT zQ3pj&Oh5f&!=)oRUSBj`K$YbxME*r zq+62Tpr}b_gwY(;gQgKy)dX-z-eTe-95!2EA& z>q33!G+QnBGj~&KOP`&f?d0E}*>2E)&AffLE&hL*@>6u(!J5apIaWS%s;ZmPf@*Cq zzP1xmTsV8Z%lVXdQssv?On5YH(&}aU{`a-cuU-~ce&~71-d}PY$M&C;`6g$|z3_AS zqiI4mPuza^e5p<|=amMHU^~1~;OzSW2xcF1GZx0VoD?3}Q;yHJT=~lKfb<6eb z)0^c_wI8Zkl-{QH?BV|3mWj3dl~pV9YUa6LS}FFrFeYlglm};=w{nfjT&h1)Ay4rF!HxJ%cy}@_b$&1~;XxD3V zs~_*ff4+Y)^M&};W6vJDoNDyH<5O~c-`2u?pn<6>yF%?g);@FP%>Ms2uRlE5+gaD8 z3r;o~;#z^m7iCYgJ!k5Q_9~eFI9!HXBb8r7Ynj6pk9*6{8u@8fF9_(YFKqhzecG{) zUh4n$np!M!zqIsuiCo*#v+uW0xWH@9Va%8*+tw zu<7?BPI=Gz4Jq^a9`69nnAmJ_`r%ZcaG(!A2D8~5_3^e?%+vGuQs9%vx~-^NL{lk}ce$$%EIT-tm*)4sl@{?+fFs<;2E zTwHA&x3vEKqaPDno_81hn^ZVOcgnSLO|PWuM^2jw6~BD5EK&KW_TJdbrS5xpO*Wcd z&n&IoyGUi*>DD(BX9REXc??=6lXKtZrt-^4{l^m{KubkrwQnoGyfXJtrj!_HKnSSlMfXdCtesHdr$W9!qQrQ#jg*Rt~a$aH8td)bk|~yNx>49?}kEl zlfI|LFE0cygvjZ9GjWFL4WGkKS&_Xcre1p1%1|Gu^#7Zf(O2ot z+~6;NzliA-e!ji-%ZNnFG-Jd0yt@k{ zULNcey3^|R!^7&S*WLbTEzk@@^LkJc{@T1Anh2M9{O~wb{9JZXW8sAiY8S?F= z2`^~P$lawowcF2Uul(=HJMY-`Bd^USUC6&^onh41UW|AjsGRJr`u+OY?`S5CoqXBZ`3)}LT3^oGG2z?c z6@90~gskp$zL3M-%`&5zq z606_KBb&=__{i;9`gq5-c>zmUzS{}d2^D9qfoA_*?=8e$T>0GjVe$VZ7v^jI{}VOe z)8R}Y_m81y(q zLAAnT=7)(hwqJr)Nykr}wwu(qJ)$4#hZc_?9%t-QpsSFy*LzL14L|kJf`?l(w$k^O zllfL}tFxVTWLjmypYhosBC!sPM(AqXl;Rd)!MA2yrZCXEfrdO?x?aKa=$d)d|R2! z^lRnXK~2|Boi-ARXn`aw{(HACNQVg*Yr`tn{mc)IXG-5Gl?ewK#lGuvxrLZTEzcjn z`JP1|mwaw?TKcMEmS^s}j`pvbO`wUs7Vk&v1kOR?^pE|q)2g16MA#OEzvT9b_|VRL zb{%LTtHy*A6S%KTote^eMj=~Q=6J9EyIT)?{8Q%q`Q*mC*KJ;_r+&@axblzh z->G$T&NtS1QOb9|G^j@mt49Pn6t*6X%Tmbi`nic8gZv#epU(!05Jb@cqC03P|RQWn}1 zx7qJ5lkj{X_4UAEQLZc7`h{L>Uni|LD@Vo9x~zE~lkWSw=i|)!CM26bh-p{cEcEjK zqe|CkDV~mtTW?%gb3~i%J`Xcz%wmaqRYnD2SD4=9&G5J}>&TmnI(64qk8cx;oQ>(AC`KAmu~U?z0qCd zaP%p*b6i(vzT1_kl$b5F*?r5KrF#s`&3ROEe5-E!+-0nHYW1GiyLTrl?LX{fXWbUo z^EfC>I3>8!_dKp6fHe;4(X#G;&wOsx5_Ow6}!#{cB!44*@u;T^zSVOhk@;f zqN6=uT}4h+-aonZu!nG;M%!{R-Wsj<-QN?SKJ)bzZ!OyP2;}zk;7g}NcgId$DWJ9W z;m)Uf7b$n%w7uavlWStt>vhsy8TIbWcgt+K6YES3-J|j$hpS*Q{EO}%#&<3GSMy$LTzs&cY4#5P>u>bVZ&pYdY{{^jB?v7QikchWM4`!Q$qq~5aLZM^f6uPy5Xmu=bkRndA$Go-x? zA1s|Rp+C&5XM$(^Q9`^=!!cV>O6 z#J`{=U2@NxSEjg{c0IH;XP(cs@KkK9b&pCxZ_i$^PuiQl0imc`q%bX}t@eGP-V1=|O`_3vMJd+x0U1;{g-E`b#nQpM+f?_yF=+n#9N zFPe1x!OXYmf{s0M8zoG%OYTj|Z);>(7sziDTYgYA(o13KZfL?vdG$T$g~y4x8*ktA zVDewqwp{yo-h(v(=O)JPPFcMp`00f6eWoUlEkr{lbF|(Y|L@y({<%Z>rEICs(c5Ml zik5o#e?AzpNmA-<9r;N@sum$QC(Vox^4) zdNq4K)Vjqtrq1SCPzFvolla@`>Hm%0S$5Yq{_4b4@4ro+@*yOMIqJhIG1uIsh`^ZD z4GIj?pJ4AF{cx?R(Vw;G9h7G`tI^-pw%Q-e{d&M!v~mxpYoPqWlYGj)7KDTV4`&ukWjey_va3a^1RV_M%?*m)_nc`RB|13*W!6@0uKUc}D!MyEj&@SpVBZ z-bYn>bs$gvLWv(CSJ*2yfxM~F)_;55nUE{JRbcK4c0bYd2c{ZaSAWV)f)ozt)21wM zc=9LAeOC30U+T&KUCq8uUR8EV?O~9U)}k|kTE<0ooTgn5b={cfcUesY6-@=bNfqbs z9+>_~B;h=`eCDuw_xjkW-6EyBbKe+TVm8;PbicFNbyDua`7U22{!X#@4vdOC`R9+;b{5ffSN*>#QG7>i8sgXR)l? ztOA#lnazDobwaNU{;lMBY%gkM*{FZh)JxUr-0}Fu67#AJKdc02%S3Pyn(fVIH}$(} z=@y9hw@U0c#FyZ*ug;V7=0d+*vh)no#f z%T24B^e*Mk=Z<6bTIXHw?9wQn;?**zf4^I;Tzu!N53l2$&HtU1Q4hQ~b&8{aN3z|w zSx4SXd~;{nBD=H5LXBNYOAkD7K@uVogP>@CY?JN5Zy z?t{kOw_iF6EPk!QW-F>Rbym#gP2y56hJP~83))TH?reJt6jE21^{?l0^=jl7S8jn+ zqU^yLE`iSrw{M=vBImPIbBpoW1Is_zS@xAB>YH{XRdC)su-s`yQ8=i;1T|>hWjyfS z`Til;FpC({s@wW&{Tv&!TmEK~X2`xzy0NBZ zwRiQN-8Wr8MV@+a$uy_AZl!k(CT^I#()z2`#Z8e5gQRCYpZ4ugvr5|a9Pv4#s~i^Z z%$wl>Dqhl;aipupem?;%UTQ*iYpn^G$+Hh!+Sq<5W99iL_={tmB-^a#%O~l}E|5u^ zDPPmnaIWm+74yIsOYF;EotHalJvV;i*%-eJ^&M%oQcqlBpJwsgn!1`dz|Da1S$;y% z&25b5-t1er`P00I%y;>os6BuA^{P*l^s(%a-BZ@E1nttW@!Fkz?s)9t8*}3}f4`l0 z@%4rWPd#FTk8^Dlk-F*nz%gI$$RC|;YKGSL4{wOPxZ*4?^G|ucM>juMzR$1_4ZZU( zeNWsZmE*k%4ev_3_8nLvSpUG~))uo}|D6(C3?$z%glv_3&AGbfou?6JgZJEdUH4zU zzJBvX`?t8@{YPE)`P?bX_+GnV>RoPsO*^Lh&lB0F%{o^Yaq@#>`{JLC+J8Fu?f7KZ z{XYN8I&2^UMGBtBK5iQq*?(iia`yOmX+ShxD|cT2Fl?XSw8PHrv! z8UMg+MdqBGUo)&!%bQAs>|DR8Mq6DC{Wjs!*3?C%LaFSfT!)?7s=YqO{e1RP<n4AB`E*8G@0o9tZf*UndfjuDca`1JM8(b7&$aLA@6)jIoImBY;o498 z`ZSLoU(xdViKXVd#~UU+oVV+v#eL=3rYVaL(adzkaj6m^OKh`n)=|%~77qH*DNaBc>P4!8z*fqnQCQZ>VRbHp8b2FT?>4(C}373?O*G{f<^tNwHR6NYS zcJq@V9=Hrj$lTI7* zN_X~7x}~VTY5vL0&2g7@Ot={r^!wi21#2h2KVKu>)_U%C=@U}}@qGbCGut;5g|7H; zx$bZIuTQ0BKNi;L)u?Bs#i@PPxOM8|?I&MT+a}#w`!P1J%xbT;?4=D8Zm#_pD>wE1 zCZAi||{z$JXy}I-Dx**E** z*)jWO-?!RtY4`1I@kO)uGxxkd`8;^v`G|gN4^27cn}Okb=UrCp;g*zDKKb*N%j+k1 z7v>*&^l66Dk`m9>jJbQZmx;Hvg3_I?+M&`Q`Eb!Ny_hQNyzj?fu^!T*rUf29$TIe-JWAe|k_qM_9 z|Nndao4c=WelIwiMsqzmowCh8S7tx|woS7iY96hAXss)}{lnWw8zw!R%ct_VIQ7rV zTPb?2d%q^f#Ph3oXv#&Y#HhV5OYnW{mR9ZgHiY@+d6gwaUWc7PygS-AjT&cVOPPTZ z!S!R|F>1o+lV!k3KWI;U&Cyh&{ClNKlc64R{AN2Np!canTWe3*g(-*kbnwc3OgDNP zbXk+<)g2?p@A=#Q{!~9R|6_&Nm!Imzzg@NeeNwMf(TX^{pvkDRUgZ4pd#9e%XjgfC ztTWV`{QF;fNzY*~Q1&*IdT3Ocf60tbTk_pXY5vW;I`hx7tT5%%=IopDNYmv|YSH^k z&K5@sRS(-PtvI&z=gb|qw}az1X7=+ZY68s(FT9V%=ZzlOGNs^Rb$lN-G(KQAf*_!ci(q|yj|_} zQAqirQDOc(NJ{(Ow(Q>a)F~hK>i!HaUi@bs*VEH1m!1S)IAMLi#{X``<hN*#}Ca z9z&9ymqLu%`;%$Hka9qCaxMRz=q&NJ)*io^Phzw$8Z}Pxj);oWkgb$n|9RhoxI=31leT#uc1v2kr0mVi zoSA24eec@m`xunga&N`IOgOc6OS0HE!&znFUxPnXeDhg$<@s~|#Mk$@6qiQlyPRfO zV!CDxyU7v}`QE~rXVmp>RP6+N_|-A>!iUUxlTH4cT}ze;6Oz$9n*65abjqWva^0qV z+LG@yj~1_JISo!TAddI5(@MhSf@OsfCky;p7{`MPYkXj^rP0Hyfb$`DFOMElDn1pab^F6+Xgx* z6~{_T{j}zto!7aaAv-GWTIi%J?+hpDPX5V!e(#)1uZpacJ>O2WzG+k$FL&D{CuPU- zJe#_8ZT+3THD^sBwaCV_O{t&qbg!A{rEHsi#jp8=$%D?@sfqH7FDvZa;v#Bl6o&CQF^hk?y{G`NlH;_?-K8~E-f{5 z_4+8L^w6lXyzn--4;kVpYBc?3$hoSy?GsNvS2%v-3(z+5li1!XhL&#Zj*zt(Y5Zfeuw_x@iybE;GGBqtnjVf(&VyX=LE|LA*V{m_24GVa3!Gu5?DrNK{hzwe&#`F&gUlta;ZEaFFHFR5Giq!jcA zRpd{6uxLr>>VKK-6M5bRa@*C3m&OLCotwDtt-+)Nf=fSKkUr>I=z8O=#iWC_UJpBW ztpgBo^t4Q28(!V-ii+)3ERPTmwtL`U%%K#dRxGAW!c@Y zLfHOqQ{7Yi?l0eym(l*N7nIr~WB#Nr+jIA4irKdNtqQKkqd0X>Ra?lPv6ukz2HD2X!RJGNsnkCOX{;e&#>oW7c{ngv?_nKVheg08B<&b;g4vp*& z8T0dIoVYP>%ZD;ycc@igX%vtv{9OOI8OLwTGZBCJ zz|=}xYDdc7Q&03x{du3-zG?5%&lP7LzwkWB|=MfYNAo4~zIw(T6GEtW;JTwO7Ob z^~%3ebG>uLc1+x_@&47u=?Ve2&#S7)_TTxpJL?-bvu%PungDE_o5gwb1pWV7dO8H_WR({7VCS(|DE+hm%r{w>nFF|+rV94*!`zQy^Jci4`=q>SxxVvfIA`yTMGj}q>gIm8R?^&^rnf^Q-`oNee%H^4 zzQ6GypEY22?A<;`C(Rm>e{&WwWNm*PeOUcUQ+ws!7SlTI>=mz`UglHglnJa#{yV#F z?bh9zXWf&$|4qF2&3(g0zlB8yqH4@HhQ}l%*u2bA%**Bxdpg(5Kdkh214q!88%Eua z_MJb;!z@`7@b1TMt26c6Kjn2!zI~%v+4JT`VXH$Qw^bL)C?EHG5M#MTBQH>P&!cT8 z1iqX}^WGC4@Mr486MMhucx%5#t32bOJk8qf3opxN=yExUF9I~{#A>k*$! z^=Vb7bNi*=1%AFS^fY1a_N&+J-8bo95%i6me)OL2$%&tyti7q^adE4wQ@4@&U6Dh} zBX9mzTqJVuw89RJ*N@EJFN_D5W=lU@1Qpua4dwD={afpse%%`!P^$_2NE z>-?9;J~KZ|d$nBF4HUI|wmB9A-g#wtGf}0vddi{SM^gol);^pJk*wiq>o(f|!F2oA z>9TG{KNj3GmQFq3n|G?^`|7$|y?ehacs+cXv_qrltv9$@dzn|XLI9jD%>m-XK6 zWe?<9ZzvcurSxO=V`%Ac?`2Wysa-#9U2lLw+WPLgXO&ZT=qz#&EZe>B{yKrJ4|2=& z?krq(Mrq0{ySK;o{S{pLL4@m|>&y=s(P`Tsdw`10bggd9?1x+ZL1}SMXzMu_QMJk? z{_AVBIAuHDUgw$~J!PihjgRFYZuL8}XjTQ3n;uQSv)7=1Bm36t|8`69`7QG)I}@Ll zoWG7Es6=Awg+)82%$9s^xJ_Nt`m#Z0m-TGFycs7R%xpWkGa*`OhsL`Q+nY~oXShr` z6rEbJ*~~KOFQ^*KpZaibaiq&f)_Zqv?c zZNE|Szxhu0GE+W@J>6?_%iCX~#pd3;#ZR1UuZoy&mDyv^x6wB9+}q^8>+IeKzJH%3 zetpYwmv@WKNG*%}_Dx1re20(Ssn41IVKa_hV9nniyi!#lYD)PQ`pPMtAC?F%#`xXH+gfwX5X>e z=vwIg_(5A^&s)z^>%_%fr-anyJ^{saLH{iEwDtA>p6y(9?CyeR%4?muyKC!HSnfQ2 zS^jY5s-|d$Z+tG_M7TK=RF5Cb2)ws4+kCNwTVM0V*Oe~apXC0iuivq?R!MVr+}s=6 zh1~uZ9dOXAu`z(_{h4j`^jV+9W~$H3H}`%` zkGy|^BdBCa=0TC`T;;}mDIYwTo#**#3dc;T^g0q`_x6#Uk%HI5r3Ha5GcCP+!L5s> z1(7QnSAMu>+n<)2-^UPCv_7UFa31%gliBZMPXvCFXg#s$K>KY-0@!%k=KTi+)1$gO zCQGXcSu7Hn7p1a8BQNj`w54bxbajUP1M%P}2vooU$|`U8^l zx#OM-wiE=<^FDZzhnZ8#@%!Ghcio>0CvK?ZYCYpx=zHT{)gy(chTj!jr>_=_5-Fc( zH51a<%6_z{^HJJCXwKi`-d6s)sB($Fbx+C%IZ3-0`!Y}63HVswGu^xBi3N|#`b**& ztv}TLO{CX9``69LxT1ySWMQsMU(cn}Ps9`Q+;{H_3w80e;1yjS!xH?fJT1Alh^gb> zrP5#1XKf6!ukM^@X=wF1X3kHMGuy7_`^YS*Ia6HtWY#X{%|^@jf1ex~XC~Cda(9*g z*{+#?=0dhY?cqN@uj!_VwK30<7k&M)yK0Q%uB@7Icc0Q z;n%gF{T#}}&U|?tuEt+v_fJgq!=>it&7Z!_um*3O5-R)rLUYFQOUJk$YwWBnkgs!# zP%PV36o)B1CD_KCtexgD-&FW-OuBYNvU&iv#cudZ|RML+o~ zt~eC$xM<6r<9wx`SAR8%^S6|McCf9F*z1{j zc;oChJ-fdwj*MMp-t~^PHv}P!3z| zUKzhj8obfPG=GB;`}BL=^6rw>n={vH zdlVe`YZC0bX8r@k?T-WOX};kck`Gp0;JISZSC(9vU^V5yWm(xdqD{-A_{!`+yKixN1t(YtREYYN)MdqXEH;pS?cgkv~yT2HG6eAygsJC%a_Z*9m-Sb`uscUom?(zxdxCxtHuKtzQ@YF5H+jEA%JF zr6sAS1XNyFf$aSD7?OHe?(J^hoV4!uT*$ipnkO$FtYOH4Y((Q+zeQ)qtyKpetpnRJ zi&fz~tNfKUw%l>+MJ9jNUuaPuc4ptz^*%~ZYX0cHdK`b;;GZe)b9;G{7w5ZnGJVzd zNU@Z!@1FIc>~3Dcsu|r`>FpCG`ZOBb=g7>N8oA>4!L#Z?+f+HND@%lmyPRaG0?0bFJ>Yi0I ztTP|CHO}Z&Npv^YToqv0xm4y(jZ&+-xn{FinuUdS8edsi;apJ{&OJM<14K7hScCSk zPWm%t`-|msM1v2Mm!H`gJ1XZI+uVlo7Ts03$}nMe**%3WYo4!=;F#)rckqRQb2aGLRiMDu03XDFP^r( za%jps+&^t<<<0FSCg9ySocz~&`A@np{M|U~@M2jvP+=nX>IdsPW`QoX75^{Vf1dH@ z_xbB3frmnu?0ffebEtX^-<`<5cF?xD8xL%{W~R=6IOm`AuUU1@_DlS4xJ;Z>T~rg6 zAsKDSr>+}2MVWJV+lw1(_MBe}+DZu8eZ*_8zeb?iuGuedh6iXL??u}=q7G}pfob~i zBNy-Y#ab;{OJ(002ptA(E=*@nZw*lX4%@TaclTf<kl5zKHzx+RAO9z z@bGMG{3?d5t*gE7KM45D@ZG-tCCB}zmBp9*+g9HCtbX;sO0438Q>yP;bB=^pay8b0 z_P0E5jGl6!c-8(xh6i5u{p$Ot@ss2Gea@9v9(eQzIoWNz7M@$3KC1DVb*wSpP2U8C{(n}=&=Jl+A_-t+y5_!QC2HK1f&0M62a+ZSn- zFuUzt0xN(DY^Q5|`LHHY=1q-CYx|qY$HPFyXn)Bz?(D@a8ja6iJzNuTZughPkb>sU zR7F9bvo~iZD!58d*mkP1@7r?TyzuP0Yi@7P%@NJ2N{{_lxgWGsuyFed&gDCp=QFMn z*t2XiG&RS*Uf7j+Jsec{U;HZj_teAivM;{Jwq^d}TIb~Z_{_a+J_m#i?#_D)ATFA52sIa&7hE%}G&>cOwiY>#cC*tYNW#xn{<*Y{;%AVZZ9@rtGT% z&e>eL$fpdd()u@ASZKFot&{_KD|*U-&Dne*kmNcqw%A|?zmtXbGqsyHpKi5um~tTc zQ$ZNVy=ePeqWkS_y&fdb6bpOt=kkB|-P_FAJCrK+ubjPN|DpEzEpG+?Hswtb`ZRN& z_0m4IKQk6R-t6@9bnM*6|Cjxr^zPF8m+fDssr`APp3XJJc3P1PZ`!QWT?&fR@5s)Y zS{_=Sb~0X{Pvym}E@%5wHIj4B7)$_d65abtGX3e=6Of8})`tVvx3sSQG;h{gXpk-7 z{Hd||PJhvc&l5%DHs~v<-aUFyUUf;)7H;qOCjm_7mH%)ZXIO6hMfPuC)tmHR-*^;# zf8-tRNbu|NFF5y)wYqm-qx>TM+Z*qH-TtEPwd|zmNgIxT$O$}j^_{xauh-u;$oqvX zQDpFJ_26GvpKo#8y}#^UZLIja?dinRE2z2>Z+G&wvfO2J*ItoQ0h z*M(E|&Vz2`vaQ&rF)==0-P~tMLH8_a!~YBYSLD3>-CgJS`^qkLtM>`(nBI!)W&a{9 zeazsBq`{%Ns%!@rU6?j8E@Nv^;*=c6rgN6oTQuH(c>@iQt5^TKSAKsC-u}1i(foB` zvb#fX^jmM%qpV9UAZd zZh-93+v)xC(9*islF|EuTKNR%7+hC)(0Gf5<&9xTqX2<9lL$ zf5I<@`7cW@*B^~z-`ps_NczSS@mp7S%vcrhO+)|q-2??8edZ<>+1Q`Kt#R>N<@eOc zrMidzJ2lmHGAt;1*KQ^$4;wxmW#44iry)`gYPpxch$wo=CA(pOHIhp7JjkH z(>3JS^U0Zw6D2;_oL@fwfy9F?2kV{xPnq<&^Bh0dsiSThfxjAO^5=XD2i3%2gw z<+UphU6(9Nlkm8>CI8e@A-xlecdWZI`Q|R~?dqzRj-J2nQP=+|CdBgcOYI-BbML2l zgNx1MPCq)fpS*iJVcAYT2BD&5l@3$S$pzmym?LW{pz~R;q$FL#VkT4UNbKQOP+pq3$(fV&LWn$B&8oA$97F! zEUgA=IPDg5;(vHs&|1G|@slWyJ5rOECpmV9K2`IZ=g@WM#dg6G-?mtT6ga7(kSJ7}M$O~UosDSckMCWAMwGe+ly zC!Jxb7n%ENTUlb}p%$SEzL?J|Yns1+cDI6jFnv?V*`J{mpgL;1hGgKsU2-dIwx9bq zS*$Sf&{L-MKmYLlxV^kD_|5tk^C!jFTrOWMcCqDsvBJNQs$akPp8WWK`G4QJm)pNM zS9uH9`ONzfY`FFQUjAjXxVtqPmj`j!iGD79`v$aUKI_Wbe?M>U_Tznjj4S-)#eYlI z?$6-#e^7B(^z>@4^Tykb?7ts8;bxJE;-Y&k3-vEOme-FzVHdDE^y%y+Ulk{_Ypk!# z=IdCuYgKKEPhAK3m-P_5#K9R!TtiLz#G!f2xn)IoY?TtV|TL4ty?U zx49kKIA^siXmuawouy76R?b*ovh}eCC}!DbEe$c8d>K^e-C5)oUhp_V?{C*vnbSYJ zTI2Q7*WC$u5E`^%%88=5`fi~LU!M70ku9L6e}ykke(Ut5qBc*;%Sv;1c1V3F+SyYO z>QjE}X5tb~_bCTzKeNp5+Uc^UOa^?gK!l{-)b|!Qb|xx;TH>GQcG^zu+ZAlPGf@G= z_fGy6Vs-m?Q3+^Iu12G|lwgRYd+&P49%f~y{Tm-;>N~mruK1Gmx`si9u{!I)su_RJ z#EG~aoVP3cttZpOY@23W-*-{uwtZ=PPNkcyv@wY z2w(DV#i{VdxijOJv#D@e8(UQ~>Bbel?L8n^&>8b)Wl71mmru5S<7466rTaDG%7OAU z36F=oTte@E@7lcf_Uay{4CcExP1kWQW_g#T_9Mh8-)?K(+iQ?;e-Xd_lU!^ysM*h; zTdI*<<@h6H-r?-`VmlTadEQVptk%kJ+@2@l0cw9nX>DBosjO?Sv|7*(SKb}3%ez?$ zLhnT%zXx8w%JOc(>iws7FE0m$^}5O?_B3|KaPhvhzT-ShoR*eK>XtK;vej3Az0KHD zP<)zYo>zV4{7WabbmjS)SYmC{=XtreU+PPn`JCI0cgOy`_N8G<7iaZ?_J=?05Zb}r z`5;*Gs_xf>lF%_hX?~pY1dSGeQ#jcjouCyP(JfT*RCed4i~nP0 z#vfSzU{^uP<>cnc>#dVo<(HoS@YRLweepp-y)wP@P1RF==LtMmzUWV%pZ?}n`9sk& z9x(fMubL5kEs<3r|C~$oaixi!n$X#F0T2wE`7=Y=7ook>?kUD zWO9nvrMGv3^NSgm9^FfqY-~`x5W^L?{F33mr<3_r0ynX8?z$KAXyuHfw`L|Pv|gX> zeJ6t<=x9tySy}1a1_9FtUyJz6w`kqh*;<_anxRD{k$qK{R$4~H9g7K@m_<{0d|Gb= z8wMXar@O}0amoSXv-YcIaNh!zP&U=;D)verT+U<}zWaZa_AjJAlrnyRBP<-lKAPP?gm{FbuN48Ul= z$Gy`2;aX|6pt1w}>$OiBR%_iqxw)A8bh*1q;`F5&uE}+(5ui?~ZdT5PPtVuyKNk9M z{&R8D2W(&W?)p))!jlBeK9*$9+lg^h zE&cGXAksy0Ma}fZ;OQjaihb`|qOVSA)cTmyK9QwQqm|vN%tvy?gwF^2lqGF09Gtw~ zFe&0k?KFyH_tur{?`(V+Ix0^SE z*9BO5+JAofX>NVox}L7b7o*oLf3(fu=+2wLdV)p&_J9^V=rlf9w8IM2C^=~B_0Y1o zDDaLNXm|rOPx|eqlpE7#&;QaV_*x;c(6=zX*_L&o?Qta~ zuZI)!x|i+P9t&C-p?p_7ojae!zbs{+WqDcQUVSC6hpo%Zf*H2nTKcuc?Mlovlj_^H zyB_S;S^W9loBPSC^??igK0!S&>w{&6Si@}akS(W7AQ%5n#T^=aTW=MrG*@5wF?(rI z|85pj%Nf%iJ@WT@AyPQcK_YO9;ER2WH9v{8e48`BLvHDZc|r$WJ3ns+&&m4Prq~2* z+_sD%tMGL;x8tNu$qFSr1u^U6<{ZCZC}4T<>_w6AJH3%H=NMQtt-}3uyKYBW8}oqI zg6Q(Bzrs-lolCf;bVqMI%oa>Hzf92eLWW*@sc~i9Sp1kV0&;L`VO<%3v zn6~)+{&cN3*X|V96KSm zpR z(^=N%xE15fYxgbV3Gw)vaeaDcV*ppbh0&fa>lxwJeJLM0oDT;G-8&VRD%a<4f9q&! zhQbw_icdBbUcV&mkNb1YUHNgsediMR9T#kpTjdc{R&TV?wNU-wFnMx##LW$wfIuQq64?z1_<5Di%*@9bkcqEhC6wjOF#5%za3u4{^Fe8+F<5I zB5}bAJ2dWpP0DTuCxQId(@Lirp6>>y0o$xYrz0d|&iPj+*@1RdD0@9r6m9B$w5;W7 zA84VAh}=iEpIYngz5_W``JO`iq|?p?fp-KqZSFqJJ1KxmUspJ0%KK%zw}SGuM(g%d zrsAw!8*YK-rmwVIZ#=MR#-p;Y=fFz`xaOZ_dAMkY(i(7_F8vSzn*Ro!j|N^|Wh1~L zp1R;{pQj9J_sU>sDjstV6fI zme}m@X?zNb=L3SK>9fAP{=TF1>->pn3NP;-V_UNLtcdx68^L-4MRjk4Wpk4!b?}HE zy_;TMmT7xSVCjb_p@XiHwp)*Zjs;};Vb*)`6o6w>8tDaBtN;s;WJ%V z^iIU~!c(U^*(9EBo5!icwdZ$I==7Nkj?A*}UmrX7OKU^QYDuo>_0v=Vtsye0Q4(ad(lS3ogcn@fpZTCtDWZU&3??%MO?H&@W*W0yqPkH>f zvRHVTVOi~t3xA(wbr|h`bb0>v|HbYo=P7+nooc z5t{(#p71Ol@u$*W+shJjJ34|Y9!Z&LMx z+)HnNSNk8CEB?%|VtK!9?D=N-rJDC!wrqX<`g@;7>+#=;J2V#W|F#^|4gpm{#pj%M zXsoMz56TF(UJsvYvWP#;zGrRjlak{fROUPJ#-bgSX^$aO;qMj-M~i42eAU*;^Da<$ zp8g*7nG6fAf~I#Jy!bSQqo%B9=oVjUxZ$~m<;8}?uG!6IaT3RGbUy2@d3vW)_tf=| z*7X{r@Qj+NH6m_7whL&yOO0z zM7Bt6i$?sBtKFX^Zcm;fE4^^}gIlMLaX*%@G-G;xsZ*yb`-$}W9WwG9K_xFIURbna z+E(Mk4xr^3+m{Q)h?pyb%OcyXL+<|#_^(~ppDNKi;k&kUWwm-d~R|LN$P%dYD;1F>y$>7)aenOx?R!t=R(&U zYz3`9)7c2B`}40D-YUIZl6a~-@XpSyTT>N0Z~DJEB6c+PnV2~rI3#(_h&{E=D+jG7 zD_rS$Dn>XkrqVpGFnscqoocFv(IVxRH+L@ms@I~?dR>Y`@6?ZckFOb!g6)0ljo=xg z6~8X>FiY-wyyNP6^@mZj9^E>6Y>ob9u_h7OETt_PeOqP~f|n`=C+^U=zYf$D2PgW~ zN5qbnF7B0PGuo!Ex%--1PT-xJTZ$oT|Gpn82)t8v54_;!N<;tu-PSoD!V9bOU{$QH zV9XT$t+yZ*tbe)k4vk{xC*Tzp-!)pFpDPI5r?wYVKAxZZ(A1@=`_tA3Yh&YP87&mK z7xY(KhMDJzg!(Q0-;D<+8S;DBK|&6_P zEdShpIs1e34>OxXBJvrL*FVTS6!~}m#d@Ky^R_ORzr-GO^SPJ5+CGis`$uk_{Fwjp zf9t+w_b>3jv^}f#aAS$?zR4ecc=|OeO$pL$`ok7?!T#(2xDW9!)(3f8Ui|6k`gLj8 zs-Ca8?qKF6eTdDK0svxaO)ST_scW-Kz{Qdjt8nWS!*ZXyEG;KXR=M#&U0a( zKd$_e9C3yBynlSs!&Ni%Jug-Ap!1=RdSN@NV(HKD#Lw z&*{9d5m*sZ(U~4Ht9sYde;-UfaK~EDFPaxS)uueIP9eb7)XBDM&C9><`Qn~sA77kT zVR`P=`A)56&(^=GS;GD8)@X$1M}y{;#8`jCmex1@X4ozJ+4@&N(7l6|G9Id_O1w*3 zwFKP8W0=}+CxH{Q=$n~P-ku4r&H>p!~Zo$BXZTaV;ue9E)>d~WTT zt=A?Wco&l0F7#x3;p=NVei^-LE02ujm-n(bv~~OI;+J1F4mfkOw13k50QJH0DnXf3 zsAeLZM8>-vF{)}<=W6F=YDmRGuO zj?K#&tB9Qe>%RA-UR<;NPyLH`)%#CXhrgIH@u=dz#ZJOfX)m=>zG=jV&SuJ8byWZ5 z=Mb?kzE$4L_Ueby!%e1d{y6iC^b?mSue`SeZkZY}Gj-on4wf%pDnl=P+OuUJXsdA~l#o5@-| z&3R&d^sSvg9Zqdi*^vDtpWQXCK{4-cjZ$m0$b+>iP0kaiXRQZE)!A|uOPS^G%i>f$ zckPXx9mV9tSoc%yf9Rw&*|%;KsML5d zc5eTY4_7K9m&~jDro3eFw=JgLmroyWe&_wLf6XG1M}c#eL>nIcv9IUym+pIi1$&C_ z{oTZ;dQwuZ((n}9Hksb%fen}Uu5p_3Xtr6JjK{?i{o~5>d)k!jeN)rT?w^)pDVZ6@ z;$^Yw+QF$a`Ime!TI;df=-|Q=$IljKhlgb+1)AG<7JlwF61ll@WA0mM8sB>N@WK;I zSKdzA1|HQt@Hmu{&vn+5C|Dd$5jwcAMtjeu&l5%R0vo2E$mV+*{ctMy5bUaR+jW-2 zFhBmHR(YGP=>5tG)*?F{yuw%)=gc#+jpHmm{Q0s@#E*a`lV{Q9^Is%Z3*A^KV722} z{kKOJUVJiE+x${A-Y-slDk?Tpm*YiDrR@Tb+AG_#QlEiNxn@}3`Y>SM;Vn>mzn?kH z`}DR5G&LXYw#oU!DbW>Dwzo38%Ai``eF62&M}s2I`K~*EE9z6g zl9jyIubqBg3CgZJ^qQQ1`dx%3_WQSQ9$r{;ygn70*h7TvRpT?WpDWw?uU9hlHA~$! zZ{OO-AD{j#SQD;z+`aQ}hHhZn|GHa$`|QrAJKkTi-DJz+`lqtt`;EiBzEg603%?B8o$k0^%n$R|-;DnTACru~P^l2m zShaRxO>1^rF+(f+t8Kp~N^K1FsC+H@EbMe4gPyuR!{p%EhGilaTiqWy{N&@W);z_> zvdX-V<*8NG%}smvZ`!>-u=`ENW!)#MJ#=$3pI=+MTpcFl>0bh$o= zNbo(aWz>6HqXNoXPrX>$KW$s#4KAoyE8fn15O7cY!6oonos9RG>-{yvOmBl0d99Gv zOV|8uD(^L+FC+iCvTZ>>lZ{H7^UtDlpwVkF)(V~82LboCzl3U?SFCCwGP`&iB;j74 z0!khib)c56WovT&*>~m?*p|Bmk`HFD3YQc=dFiZr)s1;2;?KT4pA_`Btm{+v>d>No z(}~to@|BXW%s!qRSMI&bJ45`tR(<`uoi0WCYbRQZ6y_i1S)3zxy7H|q*N5Hbsx7AE zGp_-adC?-X3L<;|`009;3%%k0b<}>xuKo8P3F^z|YY43u3pIGf{l@Y?&kk3{dH!wA z8&}*s=N?pHCmFXQf!B54_nX_wD)l1dSSz@B@()g5J~ehG_cZsrA5`X_oWFJ9jX9fR zXLC<;XRJHwRiLpc@%OP_Va?l<4)iGsOLyh?ZZXm}m-o0ijiu~V-#yje-yaPBX?IW}^;5)|*Lj|g*Id=! z_wK93;`kd{-KCb_7uM{~?)mkp;+#EmUSPxV5Dq@qzJoWnLk*M>KDdx$&pU7em@@CO zg7Usn?bhYjUc8d`s*zc6C-_sP&hygzlCS2GarKORsvgQWx0U7Y`(?}ZVYNt;^G~lU zkYZp5O-VqAzQ+plF$@f(Et@d`4a6W&g-A~5|lE zpEYhzI-nP>ZZ_q6;kFV;^0*$t$)|c^dN#P46Dy6M8oTaPaN7&NN%3D^*mve^d2~Hj z!*SP%HE9y5%#nS!szn|s8q1veT@wwe_M$}|Y)or%u9Tk#%gTC<51ca>=7K|9E{J#i%!e@RgYA<(U0dt7wBN%#+HA6Zt=rEezdXAM8&bc2E6ESAto>fA?t9_C znhno-xf34(lcvg^5ajuvRsY4_^4S0ObC)A8nZMNK{c~f+e~pbNxA)xs`6J}~_755d zUS>E7l&sFpe#Wdhi!W@#Pf;iSrNb--^8)q!=AGW?&iJm{SM*F=%*?CxFV_{R>@JIWnJv1NiPcj; z=Gw(H_vrW1_cdM{{C7imZyb%hmq^V7=j$*=NN+NFMezwNbu z2_<1qR=NM*a!aNE|9<;#5FPPfR^Cxrw94@R*PYi@G|sPz`T1`~wt^??_vO#yCNHpA z9ds=IR?N~*FZHG|{_mCXu8DuHF!6i#>Ipa2rd(Xj9zT2UzEyutx-WaRP0Q<-TvEng zCEi^=zQJivGD`oxJGcIS-QN{!78}=>PMasXHg76lq~gziAJ@zO|MuBxXU*T`HGl8R zuaiAFO-JCS>B@_}p|18Vx7SW?oBVZIx#s3oi2a_BVh1^Ut%^Mt#Pwz52`YuIvB* z`{&iViP>A3rP;RiblJQP|K z3E$YeZmX^OtA@5mJ2QGG*v4cO&n>BPRNl*5xY{ExenaMlRTC5s?dwQun>kZ;r$5dEIyd;{rO+FOWxE>Az9Z~$`g6M{@KIf@o1{*`^RY$KFIaY+^MP3 zIr~*wcwI&Y_xkshnI46Yy`3BNc~v_v24rwZ9TJ}2>Jkuct)n!-ZIR+ZoA70d6VL3O zFI?TbI>BS*wlmI3nY-iVglcANvK8(YTME+$R-hLtjFR4>0@y6kn3?b1{=A#}K zDDK^NtaHsH%kpK46W`3N@X+;9S-f(~`BMuOr}q4tBe6AJDyV0HHE$;4_S(!7T(k6e zGr#uC%=B3O_-$3~7w1pc+ROj`vAh@^yw7XD&nB~3t)_BbmwVD)wY|>N%g>mrJ&!r& z+Tw&Ot?F!gXWH^vH_x5%B0+ywcjmPnjGY$G)Mq_5`oPvvGhcd_Z{)*ssp=UG(@*4I zd6A%WMG^Roq|cV1N)EHqnx#CC4jVzJJB`|U12 z%Tp!-SW?Av`OIdZp~-HKAnTaqF3X5ZJS`NDg$E-8F;aeXCSm%K0{>Z7#u#g9Tf zI?uDFIC{8!&%PC_towfUrl2OCsyEwAmFnhy`>=Q2LYec- z!k6b;y;uMBMS9Qe=C8#M&8tk3K1=&(vp)27U9z0_%#5iM=IyePEe+kRn#{DN=+Nmf zrFwIfJIm*0+>OnZo>u;Styq`St9y6<{oZsk6bpI}?kO@=y zjw9cpy%5hGNM9ySr=SgA2CUJ-chw ze*Lvu>8~jZeO`6mer#hnC;3##=I+g5+Wabch4)zZyb4{>`$B9j+ojiu7azQvuPQC6 zazaGd@SkuYDQe5K=|y41cLn->SKENXBL+CE)ws|;(# z77N#--)~6$Wq5qr_@Mt@`h?}^pX7G>+UlD2 z=vlgrL-}u|lPaXydv)C>yJ$C)x0+aYzyc?(HnJ1mGPSCn%cIrq&W?iVC zI?H0u(gPteg1>}9!>-@;Ses!rpMO5J{#|SM~n= zyxX%>wwZ1Sv#XA?RihW=FD!VfAxYO|+fmOS6HN}eFMSV@QujSRh+}S2P zWzm-}Ti587pa1bRFH!l+HnBTVS=oGEee0&(U3&G()lI7mZ0r0=0!qG4tqAXK+ZPn> zy<~&GOZetek1r|TKiTVQH@^6s`AW~N|GA6j5{0WR-xn?SG`Vu+@~63n$`4ondh{aG z!_U8)ZP%R4e3QCaQ8_D&O}DC~KbbalYq5>3Zr;`B-wm^}G9$gC-(|!GTb6DSE6K{> zluFx>@j~xO)ckLv!aoFUt|q?SQ_}e2XRzF)KbrAIt~x3XY?ijBDqCKA?3=tK!fM~! zu*2IwIT!hIo!#%BL{^W!zE349% ziN{v&^9pF?GWIU#{N^6jxph_S@djI=XH`~-6FGSWcYk(axt?<)Uj0Yb;tv(ab|3GZ zvmyWKvZcSDSa@I5pDrM_Yni1$Pj8^7*VY@`Bg3b!p8mcnd0OuJkGe4{cHHJYcy5=H zq+3H!!jo2`=SM!3G(TQFm2JJ-`HExG*9;X+T)O)s z<2L_ovuvxE1?X9tZDWq%i_ zAKO@%cg1~%?APYMFGFU0+Vg$7$F&mKD|-)Jvv?iiz|fR-Zc)61{x4bI9(Sk4iIF{CqI2!|T|y=im2MFVd9UwbIVS zbyMh8mtd8HD?69z@y%*dxp-x&g|FlDg_^ZfjeQTUaSl!@dFbu*@Y>Rq1vYb6=xRFL zdB-hxU123h^@NZ^3M>0VBt1KOj9oSJUI$Hiv{T=eQ*N%2>&mcY-ho-y)=gh@gjb%K z-*sj3F~$WNr8Son7nZS?&Y4%cJih#O=c1IQQNI^zoa8xY?dtjLnU{#Gz4aq85!KBO z@zWQvp7Ot`f|H_oq@a-`ycGPwj-1y>=$tPJ)sh=Gwb9795Yg~jr_+}dHo+R-h z#OS!ZYWe}|S@qMGO!Uu{vi_VgO`~7ySjR$}RRNQWDyL+exGLqcYD1v4%gP<+z30>= z?qmP<|Hir^mD5GiFV1WJVv)Twz4%1PiQp5jcJ9}1h!CnU4HNzJ{4rC*$&{_;%KRJZ zr@#0vvElFL2}O6rT1<{9E$Q1a!L8->)8thXPAzfts104!yy?Y5qnEdf6uIEV`spgGZtcx`GTUz%#x zR%RHKTWF{)op<#>MP#_<*IhfNcs*5E8W%Y=XysqNpjUSvc3*oJsQL9@kzwkR`0JO% z-@S`^wJ|f3W!^NV4Kb%1>P(8=yJy6Cs)l@eaadTZ@{eZLtcoYRAA~t)X)yn1SmZYE zTlJSEPug5m?Wb%gU;abNyz=wLM^dsMMK6Z0?W=d%pd$TK{ZnMBtgTk1!@NnscS17e zPYJ%0-Wzo8_pS*=T+^#wEWgqo8!+k9<)=%mn*TP>eD&{9R%g|%vaby}D;fB;F3WG@t|RKtOgvUzl-Qs6cG0dNlbt_9&Qz+Kc3LVLXZ%cj z{yOU2%0S)cSGK;|Kk4;e$J3f}W|3Q8t-ZG3Y0U1zg-=E1OV%1Hhxh7dTefFAp0>O; zJ9_J%p8HEpGc1q)(y00+lytSoJ?1p8q3-j@UrjpuQm<<~yOXkb_bmD9w=2VbM;4lH z-@|r{Cn>MAaYpgeXRR}$Q+?0Gzs(mZ&gF~W@~tm(XQ}v>ITJOW$!upe+~p(bpO}AK^L;~X)X9(~rkYXDweF?98a*v{_`)>cLxfovC6aD3zWcasxU$b`jZVrCVGoAe>)7_K0&YxDMPfGro z^xCR-;yj@k#l1N@T7ovOdY2}*^5unp_R2@UMo3Erwbcb)W!vXHmF8nnD$@3#NUHIGf;8eW5kAt0S4wKvCQg(?xEyWCg2E!&{AchN-WC|Ax35q$(2lsZJk?QHv_s(t8 zk#;+3{><&@_IEsId-^{ZwR4(m%nG*om=&C)WA-#!XPaivSF>i{$`d8i4?WblntQ6- zRFL=ZyT@j&kN=kGnLS4aGd(~cXm(T{+VU$n091&fz5Z0{qGXxo_jsY{-U|w zMB1+Paah}Lk-qAi2bbHV?Dl_HaOJJt)1%3(^FImvZKyrf&0piyb96a_;rvG(zou;O zDE@n@UUvCaq4}S-RlS`y$*17u7p_Br8@*3`mXgqapB1vlC@&=L?Ww}WkG5W29kfcm zx9fYmZuD*U-mdS{rA6It<>rON?O87^+JAP1%L7SKhFQ7N7tcLgzWnBj0<-m1FP)!% z&39dLYVzCI_3v!w|6ROeswlsPVr=}37zwVYYd`&(v}m{5u5Ftmzpq=Gku`ar!|dhL zmfq7W1x~@-{qW8|RYw7%z zOH0;oNtpTI2D|s|=|{ij9$a$d+wQM>Biea(_TRC}T_^JWalFQ+Qy;bzWEYxNvIff@ zeDllk`oHy|b{W^+$7&VqIv!-O@mE5D^9hEa&Fjn`$42ir=>KqK_M=tiPgeyM8=K{{ zKIt}`tz0j%@wMBr8LqwZ^JV+KGUVu{i^?C|te3erI7M{3*P3VZolm;xste4L$dYd` z3N4@2bYI0WMq`e*ZVXqTjC0h)d9ts5&I^7f`M!XEUAEP)0~(v!7QOF2yk7bClw(oz z?g~Ags(oy2-F^*a!!r$@v%@?$9-9^A`phy)?swZni)UAo_ul??H$f%Q#E*u-@gSIeaf?oQkKGE4W> zgpaRGRxAEBwYegDUaEe6ddvB(&kgIQ)_rDuVYun5qK)ocpS22{3-vBjYUk!7w48gX!`!CJ1W*darGgV;uXK^)hv!=HSsob z@}1btTjKHgfX(x~gNtr0I&<*TB6geg`P|`aa%~LS%vSX*n0Z)aR#fr9X;sAs6~n~; zXkITqI6Hoa^{xcBYi+#Ceq3XeKC|)G_h*l%6(=@p=KcCmZ8l?i-I*1Bf0Mp3O8b1& zyROr$?#|1qx?X0xw8&Og@iQy)pKV-Q<$v!CYw(`8wujUkA6?EWIoPuz^J!>cMRhax zvx-AgPq62wKWo~`cYgBA|F7yob+7(>6Oz4$fj z#WL}Y6>;6Vd#z^8KXT{5`A_e3-!mUFo7z5m7XQI3wI?>Tyx>edH(x&fBk5a{C;0ZQsk@fk;d?auUpk9b?&kk4Z&v^R`}O_*De?dR zuJ$w1T5nW#nn7~Ebm<9sCo9wcJ~GY+X5KpWK!WL<*kd7!wuZy{cWkCBo{LOL%9A=S zSg>oxp96+0GM8>2nIN%0ziP>|N*>1c7@zZ>B_7Su^;ZwzVOV^5=ZelG4vP}M{AUtO z=hUQUS++G4zxn(e zZ2A<>W&UaL%r0Y*32NUhbX=goL%zsUmNETu=!8#iI4qV3sGm>mDE=|^;^mmWhRgSx zO^bLK)9vhqHMkl!+V5gwkqPQ3QERYBzhFC!E0ICs^WJEsqXGrfcJUVQFt(rjckZ#o zBbhRN-QLF>7H=0zI2@3aKgz&#u1bIA2}2ecv%X3_=Q*2i=r1+3X5!Oy@qBE-#HV@0 z2jrZpxo<*B-47&|&sp`Zqu4BRM~#{cW4ny2op4`+GuOm-*$NMq*uLE&zw7xspQwi& zh5uY{{GB`dG=qHmyPb3Wo0T7w1odC3?`v>ARd6|^uVJ&NZIG^P;kl*3^Ya1}9+U*N zO_6p#ka&Oot0x>5Pt2-UO;&y|Ve*;h2L&I033?j&N=D&9Nzq>OLLSEUD+`~2sl-%p zpq-g)(Pq(}w=4Kkl?-G1l|wt1KZ)pk%wh5Ov1Ma} zvHd(@4vQr`y2U(BX-3grmt&% zODA&8{IVx$>GI$n$q#JT{{|~IueQHa<)hdvcQCq3 zGo|3WZ4ry|2fgC8GdWd0Ec3|QyKI8ydFiQKGug@u(o?x4cN{kE*Gf^7IdXn+ml3OJ z-j0&xPHOh^oLYTqZCbfz{wtXia^vk3gZ*b+Cw83`dHh&AzO~h9A+o5+{>#dzSp6d^6B%WrA};o5Br>0g+8!{C$E%fHZnUr_e{u%CC3d{ zOwjcA_iW{P_wP%ORtnpngX`Tzlf5eLtq3{sAoSrcSFMy&m&=0`FVEXInQJB^|HscO zl6d0s_wg@uQnOtj0+;n`;hOoewDk~+(C5mNL56Hs^LBW7xB9eo@9>}L#Kw2gb}^Tv zMa$}~Atw&V$8>uioxxY1k#~04goFPV%|0%Ys&r0&-79W&Udw#8zKbh#_F@E?Ev&YnNB$gXW=;-^wu#uF=&e4G}GZ4fY8HbF9DW0V~LOxQ$UF+^V15Dmk!9!`aezU*p{nDcbLw0 zV&fCMW3y~RqjSjiwBQp9_P%>}#aGdI-^yLV=0|7rtvhv}Gx)@U#UIKKi5L}dgs)#Y zp|JW@p8bmA%~tCTTxb4woE<+uM(c*nisHNX*@91`R2IedXr(;hx%|Cl)da`nw^g!Q z$9(Qog*&dCaPrd}ko6&zejp`Q^Mc>a@liD1fAT(i@RXB`;`i^eYo%N`a6Q4|)y%P7hIJ&M)9+6z%bN7=3u| z@{kiM_seHFEc)>(fr+z3$k@_F)Tp5Kkz{Dk$%EnS!X5{NW8QnU^4KU=yNMd@_`a?v zNYQwH-J~u1Ijkd|E~!49N4Y9>)ceXnSV;=gq%1a9#gv1Y1v_Go5fr+8_ic+a|HJ| z*1rDdHUpF^BeYU3xbJx7)yng$%4A;@qP-DSEwT%Bjz8OP!WItbe!0N0GU_;#pwpnU>}sl_7!4 z798W9{ti^+1h1H|vVVDi;^p~$leu=!6?(RPr$*4mnMpM@tz0wz{NNHb`WpSH1QbmI zXN^})m>DmgA>4D|HgEnpX~R~Zy0}dtCk`my30&d8^zT8Ij%aegv9ukNXL8N_V!99Wjg~DjrXk!nBkCQryr?xY{4zw@XVDHP8JA$*9<;!Kyg<(sI)BDIt`R7 zvI|#ATz<%Z7L-*aH-JPF0C)`&1b?WHW6Owl=7Dk=ccZrm}*(Esj)7)xh ztMs2?AuWHePA!#4&vAY>p>%E4&hLgr_dd?nzP3wW^3=YR$6Of+=iZwZ{b@KR=6xV| z>PG$Dg3l{#9gqJ!S{rBo|A)BLJik!0ZDv2RwQWyK&x(6^u!5sethE1lR*iw*#`%@s zkH&gWUz#TQRrB=<-?DpEmVZ1p{fv5YCV5JsHq`A}9Q%Yl z)4x-~-`qxX=^?M~oxxpR_sd!Db4>cV(#z{>U7pjGEjq42_1ktnHYxA&IaB#`3Xf`@ zPz0;VhvM%AHc~zjUo(mXQlETzcyZk?v+objZ$2Sxah5N3YZ^b3)f4tf@f?*p&&733 zZkFG3h^%V)dPhC2VBD~6^L~S4a{Xod z7=GJKPxar~_wdO-qr+Q|*{uIq#PGLOLohPoX8n{+ydlqzTsE2d`RdNcrn}PiuhCwx zS4{eRV29MFt%j1`Dk-m3RE(^ekM-TZ@FGd{_HUD45liD{7|&A|`*-9>@I?04^P0SF z++Nuo{ERnN$4Iw6Yjy9`>}l<9)|&6_*lHSCJ!$pr<$sjq&-1u`n>1-w3g03Y!}cn( z|1RnowO%Vf|1UUG(N-*X{7iaX=>`SvQ;))SF@H>uaGDzNZDGyYP4i|Rb&l2(x;=MB z^6sxvs~3OUt8k=>>wb5N%lW@j>R*In>oW=E z;w|ossu!C~YZG#!Zgu~We|S--rlUki$7H7Qk-A<%tr_=zx>`S+a%1I!kJmK6w*6XD zwyx`0$$~F2>#9TwLv^yAzl#Zt@Y%X_(V<^u_oO5DM~TKwiF19qd)=*;yyx|#5AG{syN+p{$+juCp1OVEw0%LINjyb&8}^+# z&6YHy+M-OOV6;1-T<>% zDV>~;kMIbu>-tokx;;(i{Fk2B7Ty{{*DUSLoGv7l9lnz%b$oh?d#V5Q@crAq-&Q%Y zS=;{hjcC7(Z)Pm5J*9oZIZ0wuZ~X=@sfmHfk4%~EVkgVamI;oYp02y-l;vB#RNYOY z=6%QALk?~)Ta_^9nB4Zazh)SEO!2xNKV{*~a$T<5uP1ROS27%XyQFE3sPMgGE1zDz z^g{OM`c3u4TiKsmtpCO^`()}S+lblx6IJtCm#?b-JO6Fg$xXVUjlnAguY6kH^So^H zv-`DzHQQ!<-)hwSILw8EDYuDdLEN?3D$IATr`jA3m#^X8!(Xre;Mal8W-pmbm0mJh z?Myp#=8z7*z6y^u^`VCl&nNZu9DZ{F^}b9~o2TU1i*^`*#(y+#SCl_D}1B!%GAz?5c&> zA4yqNO;FIjrpz}Xu2i+O;iNaQ_5`Uz;qFT92)mwQ$jt1yW9P9nNJd@0hXvkyf)< z%(l$Xg1+dklB~8zWM&}`@1`Zd4q4|#vQ2M(Wf|> z$-6UK{-GGhg`&)>%O5RsdYq)8woY2YdiBTL`?L8XuU_ll_jl{>bdUAW(FG`*H)Sh{6( zYfTFb#&ii?-B?@rQH&GNXm?8I5S^(LuC(^b~bc%!Ef)3DLz)V@noo-Pjm==b`E*X8`iY=^vn=Tn#2 zB(+`&kzJ`;KUE|4%&93)FFT!{#VVD$#(h@TIj!(nU6<26f`97z{#4l&%bJ&2QJ6y1zs-*21&>(9tOUXR0=Q@3Z$F5;?o3$9+c9eWOVRqPc758?>go zXN4^*sqI_s(#t3+V{;yQ{zvC#HDtrub3ZW#yxMr*EK$#?>}>0 zUN61FAhoP|OYF=|-fF3*)NaiyvebQj>Gy88e-oCRtCfCt&2QS$4K|yme7$yS>e2&G zUDUEN?C0AyN93=QFg@PzywkXAy~MoaRfab&x=mVnd{*(Lr94mX_3KTI-(}+UeP10fW~iDbRusEUWKVkSzFpHSx-C`yUuP9`Nu=gi8KpSCV}{$=?O5s#m3eC+-EKGXB?JcFjj#~dfO_^bcgXXCHF)OLr3 zF6(>lIj?7a=hu$ad(T|Hcg1JBg15S#?UX9cEv-Eu!MxUvSN)N{_8P@sY!?mRb6yO7 zcz9;#i^V_LkLmWMJo?UF-60=;HqQ8Car}I}wQHJ-=Kg5(ww?Lo<*%K4_$^d>_Z(QU z`OI&h^@e)ynYXv^ob~FL z?R4f<96sfKtnO5+#mBm+g$vbFGp_x3T(IBL_~YSCbB=v2eR;U!SibePTSg!2~2G`)Q5|=S=rpT{7}*<+O{rZ&J&iO202k8Z$*8+zx4AhmHxT+*2DcVk995t1xx#tloj2C^3U16i zCa$p{Nxs8%TW;X=X10YMzkcbg3*45wa7o+qkYh8gH2!FvwD146;m+^(8{h1j^vxl6 z{S}ACYK^4HavodmPWmEn#Hcr|Z}OK8Rz=$l2R%`T6xd1y)ZUb`K0XQ-TE ziWm5^#74q*uiKl>jO(RS+wI(W*q({Wtxo+e=*CK5qmT?oM|pcu|4~$)ccP; zuWY5^-*?BZnp+)wrf0iPRL{2KsTRN7#8&p$8DF{ht1NDb%I$GZ>Ez;Hf78FhVB6BT zhX*x0=PWqXe9_LcV#9)2HWk+{97tQZ!?ORAg~IAJHZGa(wD@}h^#Xh=HC~HxzI2R; z^)M)CT>s^SwnWv@wabqmJfpgh+ovjF+UM`vueS>8HSM-ODUtS4FwdRM@k^R)L-wgR z{ogG9S1p@$?ZDq|n;mtUX<{+yTh`d_t2jO_aIt@!cD!kYPupw_Lz{Q?C!5lr8#8B1 zG2{nXe`xbiSNs3(qCVf`>P0p)D`g8?j8xM+1<#im?rV7ZLUQ9GB`xc>40+dN_ZufX zj93~M;9gSZ`#I~%OoMlcZ|3Xt{5fBIeZTG^TiK)c+rRZ2S_}C|{@Gk}|7%*~-~D2S zia#PJaH?o0+40%lV>8uQv25?1#4ui6p1wy}iModkw4Itu9(8rsaCnPzbDfI*_+-T~ z13&K9Ms;uIY&dhM<(c!F-1Iq#Ka{FhggyD!*HGy6V_&*a$lQ}p$s^z1iE%G?oMw`oxqsV5n}|cxEG&P>@jffuvxo%@nxcC^DocnZzqq$Kl0nikrO4+cJQ9R{xbUqMlrdz?gtFbmkZh#vj00- z;Ze`@dHc~rA3kdb2wLerXuTx9R4`6%y*u|a{jVv!huaT*I~;m+_f9df{lAv2i#;1L z)BS>g^FQ>5J+XWKug~%Elk*D$PuKA^tjc}obe;9k zm1WJZkKVm?GhK22+4^^EI;*Q2SWjMC&3#!S#5Uxfb7XH`c!vBI?fDxoF?q#!O7D69 z!JU)W&nG^3w(u;k_%&H?-W+g#lWR8hNc;Pv>s(L$eEzN>Vrr_mtX$RP*Bf~D=6pAn zC^_sCk(4{3Z|>O>are7c&3f>T;r%rG_|Be-Sq-h9yrs_vsGq+lx$6MG^F>K-`}xYP zim!tAd56pu&wQCAxou|RfhT|eUyOZwW7|?QgZF`Z1os^E7wS2jsPDdQ^Xns>%imvO z7kIv9adjyBjRpQIpM0Eo{F_X4?`5u9AFBtwty>?&#;@`9SX5^7RraSR$4!Ak?(fnT z)n+gMsxI2|Gv^nBL-*UipUjKQ?~2zb|9g8zP$1>)LJp3byM$C7PIzs5?##cy?%5H3 zfvzbp5_4-yUO2km^!UPXF-+xS^X-`m-@48U{BDUo@LhWMfv-Z7G#IDH^hdJU@-!xT zus0VsbpQO#Ssb*8gW=Arr5rbQ9ADUBAnZDa)lu+ygE|ktGsB{Na%~C13ETf&6g5h` zQy%Nm-crpFb2VCtW5r23`KE}EoeCU|6EE#y5iC>c*qkJM#4b^|rEakuOJnqvDoMua zI?A(`dZ=;iDca&9P-Aa!`(v;Yhr-s2svJ|Ea$QV^=sLvtNajP^BSntDjb@vbM6aGy zG|Oc;+i=pG{Y{)w+P6pFpS*khJ9n9JSPRR0k#D!6F8Qq8H(`<$Go#|iwtZh#Za5li zyZin1b5G8RIu~q>IJoL{!gkMo-(2ohy=(loKUwO&am6gt;*gsUC9Vpr*SmApXj$~L z8R0GcfBTrSY-JQ3j>Xk0{jSXD8-o0AJ z^7!M~e6#M=o~cf|Go{Tf6Tep;sroJ(Cx3LM^OjAwk}topzR&#fV{cmK!p&Ya&X*&b zJ${ERu9#x!)zX&kXydH(O852I+0zrNwf@(rZZGdrIJh!tNA#h?oU!)JLFG}gd91qm z!pC!`nXt-tZO77IPaK z`oGmIwzxV!TH%1s_er-y)>+Bw3rK0YhGiJkG`_6R%!;@y%V8RCc<^IZ@q~$CYi6Hw z6+Zmxr|q1AZTk~Hgf;eD&Rf>A$$jT{ zoZz^a!^3GWvOPNGsZbxUdP2y0s|MR;-#t1%7^D_)sf3<(c~fh3d)7Ps3A?>l{$x&A z_$5{LQr4X_#fI)TcMB}Bdnv_c9@4$XY$|ibgfF|lRJ%Fd4t;5U?&jSYvYMC0LsHLL z9&lH_`GGsXasNa)-UXZYxg6)&CtGhOJn!Jf(Ia@D=FwhG?68UFvNV@}%aGqQRo9!&F&_quVrG_2#U zt@gQc*E=x_i}fz;R%I0UF2WbUJf z>#DhQE`UHnv0O2_;aEE(&i(r*8sy3Hu| z@LrJ|7B^_>B+{P9hbSn=H+Gg#zg=AvT~|JlxJqf!teS#|0_TEJ$8NPDxZ-3 zM7n74?z>xZSKEHmmT^pZ9T;Ytw0m2J`Q{^Q-C45E+1gkBdJw?L%ffy`ck!X^vBxet zv{mfcQZ*SdFRtMhJq zm$_8F5j|tfDioDI{k+wsrDt8Z6;ro#Z0ZbmxxK67h|A8V*%@tfUj2KwQB`JRe#Ys{ z#qPZ;J+`?|t$K5zAdtE1kBZCHUmPx#_b1FWnSSitl~>*~m)-tuv0)cyZ1*PqivK^a zCqDWSxPATaY$3Vsi>lxDr2jRaFrPirMri+kQGx1nYxfB@?OC+vCAY->A8 zOZrj1KX7oA%E6hvQsX||SAWqsqjiNDqqK6(B+G1IpyYh&Hl`|8%s+tnN#iWBtqb*3{cnZwhNF@KThPo?0rdslqEJyrEG z@B6Z8qTR%#mQypU#WUG#cUN3IzHa4|`FT9AR(y?oEc?o}YH@$8oBk3_d4|=zFJr&U zU1VclvTbkr$~UZ=YC65N?uR^gGdX-&ZiUgTwl7i*mtHV;^yQwPx3pK-vFOI3262UqXCe);C==fx8x7u!GYGCz=hS*3EG!nNBb*H-^NUdobf z`77eg*W}KVFZZ-$ztJ?F5NYSvxhMMc`$f&t^$L406mz9*kDLEPfA#ss{YTji{+J(r zx=Kan<0HHEPm+F5&TrVV(e7H0UGX8Ng(rUhuo77Kud$+Xe!xbdPMhZqo*nb^udaA6 zYZG?#_eLl8y?>Spe7GLJMmgvFKc+`^^0~KdUuZ<|a$H@0Yw8X6zc);89~N9=V`TiB zA@iX7Z?gvz@97$u`n4%6o@&v!+tV`kQY{mUQK-eef=@qUrP4Ps2CaO?@Ogu!dAo3k zP>aY)zLv1x7V1i(smD&KzP`z#7x}00g~{}CM~9jlmtG{FU$xI&-N9AC(5wEMM(LX8 zoD2G_>;<^E_U>M?{rKw_0tbIuvpdK=ektN`%h^$9`J&4AlAnwDx%YdkUEZ9MBqQNJ zE8~>(g>840J>PW+`ku~YWZ3`bu-Dwbo}5ejeqLcJTC;a%|CCj>@@uYqRFR*tc(3WU zng_KLOy?~TG-x-xu#x@SqjU$*!AYG*Ap+iiFySn!ko z&OVk)O$~o|8GbpJF4`j~V*gz;=*8nZJAW1HbtHeQ(W`K7*L-^WBJ;~r3oC*P`I#3! zJO0AsaR+DO)9uYVn@=9y(_nt(`AOpo@>kwWv8-08z4E;3uSoF~eu0(!YnY6jFR}JB zMt;hW4Se(=HZ)D)ti_bv2gNBfmN}n2C&h8QD@rBDu(na}tnGxa9#$)^MEyHnx-->N zsL7$ky*Mba5_nWi;C{u{w+DtFZ0BvF7bHrNWJQ$)KbND zQ&sDPzt6h)XYI6^sh$6gq|^WXx?3a`zP9sBP@l+=$yvhFHchkm;jMITR=bMD&Ue2T zhPAJ7S$MIOePi4y(IO$`68q3ug~D~`8DIYDliXawzj)RZZPRO)y=$gT%h2uqqtEX6 zE8J#Apnump>Fn>S*=K)WZuoJ1UCDO2)H+>0$IPYO%^XXoPIJ*YS>n}`w_B{`+~iMB z*d?Y;eI3tz+kCoho~VPtt~Q_XjH%%{4EsEcO;!thdp0+q{%; zOQp+o6CC_syt&c(_#($8&9yi9WaB0z_B_7r%zATjows8^hEayfEzUP#<{Yj!FRglh zluKz(NshtlTM~iaCAK zcrrcF<@S+J_0fe#y_5L9wCrLrGTyjS{o~4@-3~=B^W_XQ*M7(nn=9h7H;(tyg(%A@ zuAQF)UQc-DXy>b7Yqw*ov&JM7zMp#oV?|Ua>1e`Yi&F~ zN~p8MNS<+}XR8K(-BLTIpr#E|`ZizD`*=Ty&vN0WOG|oYE?IBHopRyzMpJW7r=tsX zC2S9_E0CH{cc`N8q_aic6-l(wJea6l6YkGEv z<*aw_jNjcjBOrWz^0zgGT;IKnR4=XHtri*kehF)*RC;)?;e^S$UiGcdr%d)qp6i*i zZuJTVwdjNX%?>4BcPBaMYP=L4Gqn!B_moif2SlNSN~N;rKeC^5(f2tRH1G)-B}hkves5@_o+G-CiPZn$i#4 z(p|jZ%F2aP-c}rI^3f8wo$g_HVo}?r=o6C3AqsPBbk{_SnB4Zr5c2rnlp)5v&*uKL zoU4`1SNOEcPwjs+?JU3HDvelgjlRdu@3Iaw-uAh)V$qh$g`X6h>fQOp#iUYPY5k)TF zwnVYB5r23Vu77mvu)9#N&SW9zVkG1|C(Z* zt+Pctqh>6f_`7+@7J<3v&*?mu{IM)kP_n*tQA>k>2lwNPw-i6`Zk^ZSwY_vjwUE{G z_^io4IBaMCv@Mj`_i#nQOjZNs-`DnsI8HKDntf}gN%`+Zt(#S9^4{fXrT0`?s)?%3 zn%b%MQtEA}yZ5Hke=69TG8s*RJG+t+HyHh0s3AAqI4P6E>-}_V#g~;YFUEQ<+CMiq zddiRa-71l{Z_T~unxw2VW8KUnU*9zr{Ej&I-$(NQbVI%UUPh^JlzA;(md79KNLgz8 zwo+}yNwe}z>CId8vtnM(N*B6W*VW%_%ofkvVmZ-a`_AUB`Ig!DEf&>IJMx|L2Un+O z?)T!pnG+cl?kcZ)EouC1?&Xd14QI7k%`rGR>BY%w{2%3>T(13e?3i9&iyFPVPFh~=5IU~XzliDK=4mNUraJk) znCh_4Xquyc*c>HmKt#N6Ycdnn5ec|3+92M64*5|hTl}BX@G-6MmoTwBm zXEbfj3k_i|6Wad3Tr7mE;e}7f} z?&)_6KUn;JrL)TG%%$8<9#gixpT0|B_m%Zm7ivu^wE1?YoPE#rMXMqrSLfUAQ+5tB zNjqtitYKN&Gu`Xerqy5fg`7C`#PNFOJ%ueXDw)3>o}HUFTVuCW`rCG)&bQ8gI8s_a zndHi=c_arjaIR-|*sHuDz(8PCg=*mI`b*4**!4Y6OSd>LegAmPivx6W@udO);iOtj*zwHzlW%v_?cTUc;^RjOu3`}R$;Q`&P4 zcBvM8^}XTX5jM?g{w&U2SN|qf<*3DmE?*WA$+0Nu>tn}|St3n8SNh(pcQDZFdpXY~ z?ai{*?QAon6aU*8n5zDAJAdeqe=YOZ6_O?b+gjrPv)wG^yL8C6p<~-7`;0DE+auj= zEw7v|eZKT?T8Yh(#R<3TtV@5E9WXpTZI^=6YpzLe1ygb|cXj5~%2qUZ2rY}0eH=Zj zZb|CQ|JRz9Y|*%J{`?F@!_(7MF6wS5m&yJt`S|zZ|4QHM*XHfaZ{NN>XI4s1>aW&= zoBe(ntDXAO_c(c~;iS}m(#)QkvllLih~#X#bZl*`g7@RBF6}u*Ss-#K1os2_EF6y@305KZhs>th|GMt*jay;P0G@%*1sE1yxy~&hjnJqx^AvV z{1f*)*_^5|;iPlU*Ys(-@3u<_@I;rFHG5o(N>e@Y=T>ciz}F&4X8rT|b}Ih!A{i9^ z+F2a<^Tx{JVAgq=*Q$Tnw;p_dMeYh)wTHcvX z7qBckKjEXw|5H_akKed1|7h=*8;q(mN()1NM(}UU(M}hOpS5<*o&Q}Q-Jk4qZ1-JP z`EY;I7vs}GdY=wG`#w$GPr?(Ju^dB`^)@Q{y$yvQoHe`@X@t9)b{xs&p#*8 z%Hkc_xn4lOapum~oyqqr(kk`eb#J?Hs!iPIPSuGIk%tsYtE*2)ePj7|zI3L_=}nIu zO5D#gwd^YWQ+nm!@~3x11b3v(JnkZ_P~NG-IY(ki-pL<1lCD1P-I>qD^ZDj=PJI7# zZoJP|k94sm*7vWxTWG00;jQYU{uRY~Z*$I@`ESU&kYRsE@88yYmCwyORPH{HKkOI9 z{PFlL8^tNH3MbqW6e{?16*`nYk;>zAJ=T6_z*-MD6T%Dj-9oBG^RCg?V=Ir{m5sn(?v zPnvS07hX)d65d@n*-fe9$~BGo5-KO3O1dQ9VdYqI@`$3tHvb8p^Pfi7-*hVZ=D4gj z#BTFZm2wfg4OePo|Nq^%aQ^Fm@5Np3act0$HeC9fDKqKQ+DjQJn`9exmVaV;bo0RK z$+O(z=1%$NxMbUBL2cFfyiT#}de?X!<#U;8&$RzWWKFhal+U!yb8MaCPHV7z`gAiX z%uV^25o_nc)t?h1JD;fi(vkbvUwnJJ+{q^nlXQ&VKFtQ}7rC%l(Sv7@;=c<^}Yx5QJDipLXCH36*RtQ|*+n-W`!x(dUVc~eo}$*)-(oJ5w?(AR_K)C?sWs8JC4XECtdP$=GAUp7 z+=1hH5n57`UllBy*O>hA<=HK<`RI%~ZaMp_rNWKPD)JICOZfij@UgFK{+|>Q zHv4$GylA)E)6dgQeVz#(%@;Wl_|3g!t7FeyKV6w$URog^ugmgHflN&ei{x`*v|A6#$s*!bhN341PUe+_-1 zSkQd%er9Ou{;O|;UwD`Fne|T@=M;Yndmav^4-z}e@?nHhHlnwe)2>2-KOOe z*;nax-`@0RVr1$6?=xqI_}x-w-E!ukbjs6$d7C|ETnGv%oq1T&H12J!%c)1_YywKZ zRjxVrMLG24IX1=5ueP2$GNCd<*@(@TdFJWTYUzlbM{n|mtlMMutD&e{cys7H-Lz?k z=khu|&%W#J`0Sq2BAuVgp3`*BS8e^i`+@JWvu-Ny-znwUy~oHMa}%7_Iz$BSklNu}_$^=)rhC`33Fg)k>;= z?EfWDzht6^97|{a5($q#hEW_s;+ck4KYuLvc+siv9bY4pdj0mYyNw+3hLgOuPK>yu z=Jz=NM$SNAhi@+^QR|b^FyYEN>uKEL$-k6MeUw*Os36>(eVAhbzA{o~tG2 zDF%6QMdd7h!Y;Y|bVag?RbZ8RPEw4yV^g(tqtMQa3^V;p*X;i%;-Xf1S0PIC`_UWs zEf=4k260>bTq6{In8RRWV`zIZOyvHMlUl}KQQYtD17>` z{V;z^m$FCCO%JZp+NMJ`Kj%CYwBglh+GWl#`=ZmFZgY=$X3N5yRzBlBY&1ofd75BK zufnNb@s8U$!tDJ~8+h_c9nwUf>AMweljyzJ5xzbmyU}Il_s+&tpIu24DyO^u5nss8 za>A(3;^@XnOe!~aiAUw{)0nXER?@4ueFCDVJOqNXo9C?N_xSWX?c{yYyM`aSH;8TS zE58=i#J|jjZKZh1)sO}q%PG3+T9<|78?&ywepZrY`-A?d|2IS!=ggbJuw2=;ykU)U zIrEH3y#=kT7qr5kH-FLHnD24p?L+Qk2iaJRnppUo+SOyb_PYLkc|6^GL$9S&=hWPJC02oR>(k24@5z1aXV&oaBHPT1 zQ(tf6y=Rou+~{zsWWU1ZxrQ-|j})BC-|eP%VN;Qhy8A%f^R3kho?ihI zzE&vD+LA6XfAd-4?y&72!=7xmy49B@@M^b%pR1lU%SG2zfg?V*SA1^!d(Err-i<%i z*X~5m%b#7ljfbBzj!W)Q?UZ!+sgC{H&7BqMLH?WK(-_t~32tlW$!>o1aOnd@r+1kK z6K^)~WFxwd z`|F#-3V~|Bwyn8*wx+o+d}hDOH@SzOnfIO$sCTJZANBs2@05JTBEiQ|DSpMe9(x}B zi%#V?+a~MmGbyEG_S5`a5zYwwy17_SZ`FHO-QOQPmrQ1B`toqg-f#21 z?}!t4J$V~*s({swhciFLeW<$nP37#P9(j-XCT_Qdx@}sg%zrsOdHZSalnbxDCveG^ z_<6YQ_StqYXwl#5t~jxKH#!%E=gltgzjV)&$+o!MHrh*2Jn-!kNw14j&n>Zx`k%$6 zawW4}`S+*tf(&=HGFI--jn=A+TMn;~ameY*4(0i_XG`;B&exycOkMm#`^zTDd-~Fw zPj74&Zmig2d+uJ%O_zIyKe-!UB-?dQqi zSZK9e-|=JdX@%W^|I0WQUGhJ#u=#G?i*4hz$K?GN6;0N>u5`K9 zXGNWm`L@WWL-Oql_7uN-zs}*8{pw?Pq~}EMsp0I3J#sd)S$68a@SUm|8)a{YxlXWc zxP56k?=jJm46i#!j9;Anrj_9}**MoRYJLfu>)h?#Jw9cc23uqEk^*ck?rERPQ&4b| zWpZJ^ZyA+qwo@ldz<6g^G=B^Ht(*HyO^0 z{)G$ziN{Y&XpiDQaY8IC`q)*k{b80T7dhJ(ZPO4wadbjAkLWGFCrMIsvre|gnmw!$ zzQFxBf~Bk3)>(g@hO_>e6&_5Uch`kpU0ob%v;W*2GX>kle{N=cIi2RUJI5#g{Kc0s zj7MiYVQX4g!XfZ>``H;P%N4>J?`JYRnxe^ga7LNn!X5u>Z{|Jx{rUgiCFWUm3adVU z3enwTr@vop-gnj@-93GbqATsDnf*1NRBtwm{d5)cO0j=}t2?g=g|MH`;d{|Fc~3Kk zJM&_%(A;d#RgLv#(`w%o$H>~G?~mB!WGsE+-Glk^JZh(Q8f|Kxf5fP1t2~by|5<*< z*q0&s3Z~1i=PLSDM&Dm`@$aUYpT9kp{Qk@8UCZ+64b%MkB({_k98oaUn|^jq;m@1r z?_O5Z`ZUvjhL1%;ALlv!$x_o^Kc1)iri=Q{ zkEARrn|Q+Y_C`DYtWC1*5ld$M$m{GbvHn^#(eS)rm7uhFq4n!{d5yEiFJ9~J{*l@2 z=UJy<`uuW15I^#1!3<&JA3BG0wQDC@IlpMBAOK+j+$qs}A#`%EkE#cIhBCqtjI za|u0vT`)20)z_~}6{_ujZ{6jw=da|aJKN^3SQgi9usX$Y3)8A6DJR=Ex2E#{o^vI+ z%zc@o_OF}L;uCe+&M&Jfou+icfQzLgcE7E$O8NB#vd8KSm)Ur&ULbo>&uCWsYMt<_ zeTs6Hf})X+1h;S%do6zJV7Tih&uuf8%)cC+dT;WKob&Hz zXEj!|hi5eBnlno-SLbi)PoxPbJDeWz_YFzxL$0OzbpRh!S7k@XsESkCE z-Q9?M&$g3WPdqJ?d3=T;Qq*rc=O*k=WqWxvBB7k;akA1h9frS$}0+%|7M%0 zCVr5oSdJ^@#Gafrb5F7f_%BypaKJeA^jWPBzBN56u}?Qi{#7du2;|hV3jU&;d%^aE zR_6X3li!|Nx+mT(+JA`oqvIh~A} z&`NJEuU~s-XRT$pbUv|I(6_XDOU|(c*SH?}FAwg$-!Uuwz^5AjKMg6)D@}i#&gfy0 zoUA4)5d3PELf#b>*3kLMxvku(@?SJV_FB3g`q%S3&ZKzNSw-F>o4+pq(!F@u%K433 z7U*$Y+WEFY!{0{1_)pYR8%xhWZ4Y<(zhFPRlfmeD>Y`?DkzWTZnSOeRu2PBp^zivf z>wDreE#(ClUlevZ@A2TfOp)N})u(uyk8ECkP<2b>Y#g@7L+Wbesyj}g`jU|;g-#p9ApP9GG{l5OY0PfE6 zsV~$5x^=|_l^b6y=y%q==W=ZMr%MwnH*L2$-OX#oB$Pj&A@V;{#!;D){VV2fJbB|S z!xHPt$SA>**&Ow3dnbwgKi#;B!|TF|CBH9mX}L}~w~5oJhs{R7Z?dYWb+73*)^&>u zFIAa6{aW!+CHB#TH42%}-d4e9B5&`>`^zCHPTBeg4}WwiE0; zr#c+F@cC3}CcCCt$MUQ&l?Aevu2&4dUTt=6cG%T>+D%!{=yPw#@`kc4b;l$wO}si& zb*;D68>PLLvP`!MTT3$CW6Y}8{1ZxD$*%tN%*J2bY)_K8emd%A$D};@5|(&uqPo0D zz3XCGy}uk*;!OsY2^acbJYk>yXpZl+$zQ*hYIsPz72r~Gs(i ze>X3AA-PU5pKmUE`;wH~r|+;CzFl6@RN-cuTKMIA#p@aOx;oyy-JyD8@i+fiM>jv- z-?hvJpI0q=BcR=Ow`}6KHj8`T_ITFEC;ZqZDtX>U*4e(w`Z?f`HuHs$)yz1sQmSR_lCpV4HR!QhN&a7zswyD!pMaFDGfA-Zo$)+cS zT6|5yzw)qh9sYjZ{k3P#(H}SXjWY7i+rDS~`EYWWqI6i=`t{Kh|AP*~Jzb>y?7HSY z-Q=dg+zg6COIszrJ(wXX(C{`977*l2u1P&JLE8-)RwKQQTP4X|AyL z`fjZmnYUZlt>yDEvS(21@i2L%sVlvd^Q7Xp8mL>l~DeQ#`Bht2DF!|5Ni=gH?wTpR42_*69oRq#nNPokx1> zt3Y2OqzRy1YVchjod&+qILKYhpL2 zb~~Tra+&;Q-zPSumycH}33P5fws&>t`TF?m9O0yi*9|8NHBa>G3g2#V_g#a#Tdm$j z(|MBSy?hG!1-q6Rhd*hZ!FBxUB#&*0NjA$Txg68?Sax8CpX98wHb-|0otNOQ`rLTs zgwo+@R~B(MxSgt4$0GI8$|5U*S<~~YrRkc+kZwz^73)mbZdd1iAh=vvJyzlJ%8Q)) zCVR}g!+3Jx{ZyVMKB8rU&WxF1jk`BA^4u>yH?#PT^8)wx@9%zeDB5#_z3lJP?{1Za z`Vt%O=&+}V?VR-W)vF~FD~l`Ddpk;2pOW&Bvr~3SbcoVB&+4J#{6|uD#`!yMS6qpE z_mNkH^=0p*)yhZj8CH=G?ULw!43fd0(mMjJcc|RE#OCm7`!0qFpBI-l zT$v*Gzw7k->a!=_TV8ej7|Cq4;-|RE^yu4vzIM<0Ed23(e|@d19fRfFj}EVX*r)Ss z53|40^7iv_`~7wQxvy=W@$d7`E|EiX3>0q({L4JP*xBsRT_;vGGjeJr?vV)?Dkn@IBYtCy(qJ*57~Hi?oYl3_zv0zR=C8cI z{wm3;Z|9}7Pt%va?r=H#xYG)`jN+IGnFSVaq#syxi*R^Yi>P1P`IAF!>D>eb3GxAHU|`RW=fvv*Pk6W8LE}X;RO^bMyF*w&{z`dvwuRw`JM;FFmtA z=BCd3<*UE@^yS`!il2QF;cU7=r5e(Su8Uk!b*3klZ-4OEX{DBkYF@Oe!`tGpgn+Fj zvKOwitMff-ON&j`3%MtBE82AWAse;Lku`gnFHZlyOZoI;=kT5%YLlEh7A%?;azt5U z)ndQhOwVs@ntIk|9_vw=mb)TNS&rwI}aBulH!X``$2zeP@2RWU&?&3jXVgJA2Gk=hh@X@!aa-i>(puw>Uo+2=2f5 z>#XY?X??xMx%`(4;;rs1seU~#z4g(CZ~J!|=q=ixc_+qY$+5$(V&5uubkr@cD;E5G z@AyNdYhfMdeW$;T*&_H{>6qzNU$>U(T_-uB)1}(I6Q&39T{n>UTF~DV7_=wsz~6i8 zgablX-YH>G={@XbkgU<(w{7pw7fy@bd%R6jxl#IM_QV%1FWM*m@V2U9zO4MV#wB4| z`oTA!1%&p={5lo)&EcpVzoH>~h(`AWi5;{13X*D~=APSM^1-`v#m|E+!B6jfd^o@D zgMPRA;oi)5mzAHSl}RPv{$mu8ceXx$W7Z-58O{&4|MO)0yz1wHL)o2Wt1>Si$Zbxk zZ5JrZ|NnwzzQ#>^!>`qnCu^kwgN>u#`m6uRQopI|b?+Ph?r%A7qYUT7|CGs13;&tio}k>w67f7nuZ=)*I| znJ?FQT>R<$S%Ae<^v{hSQ|q=QX!OS}|6}7}l6Gk3!NsOi?@q84%e@+t=hVa-c}gU+ zuW_E$#mQ?cyiag!>^ZZ;f5F?Ir%JazUvaygB~)P1CF#f6+n4aN&x|xR?Oql-XH$Fj z+oUOeOH5t2i+(LG{A%Y_{mVLHePm>5Y4Vx7d*$qAp2^9Zwr^FDz2Yj}7qNfsF7O}E zE7QLJz+*4pk(%JE&vh0G9^U1oVb|KmbieKV+83#Bg!;AxnP=?^6iO`dd}s znmuJaT=8b9ZhlMGX}=e*WcdPXo%gEdX8Kj=2TISH{B?!*-9`D)*Ev2$ZCJE{ufo`I z(_{BjleE?J&Tf40ezD1ujIwH#@|eDLFBD%#-e0<7$=#E+o>wBilGU+|X-t{b> zgl#>oykeqC+KfChPs~17b42CsBVF~vlc)K_S41_Qj{h{}+pi@@RAm~g=cQV>?+!E7 zy!v$G^j&)dn{AyEm^cd69WGYipg=_Nv))@1=R)JKI0)?RUIRuZ~o1@9Idd@XIZ~PwfEZ_YpzdA{kuOW+;UQmInU|;n!i}|-ky$(>3dUTvadd? zX?I%P6;_k^VqHuNf3e(IbhY!E+y0{WQsvUNUldQS5=z+pqM{;UfnL3Som<0BXMcg6 zM*>3k?TAU2h|bl}eGNv-mtLDO`&bj-EI1atcXbV33o7e>rEHdT~+*`jp; zIyd-oUn_Y`n;W2$^`~|jhf&U1w;e?cOYJ7Ls?|7eTK3*agy>V8S*&?|e_%}le?B!y?C_GF6bef65<`a16UMIEa>b(7O3F1J2uzf5}Z ztfwz~JCfG9al7-KFy&ranw~LDeq)x{^#h)>p1LNT-X;}v_LEleStjAG)+MVyrXBT) z5Irp!zUD|ox5dk@eWkp6U&*=}Oy(_7yLsSVW=yGX67$Iwfth#wXKYP4^X1{{ZxV+S z&U`s~!hYt4#)!)=bXR5>WKG~azcD7X@w?f@#cRL$HE!Lxis`$Yn?S|)3jsA7|F1}1 z+HsaWeG}K7HF}ZZ2V>rDyKwbhzg??KIP>gvY{|Q3%{(W)(a<%#vHYZ(?lsj-CtlA> z{G61owr1n^jtO^ea7^1XY7^Iu zD~g@#J}r1ws2D0MzJJ#`ruoK`)+J?^wg|Jxd73I)E?eyp?-?er81G`g%3B@t!mi(Zpo@MYo4t-^}}cXGs*5%Y{{#ndRA!p z-&%HB`1;+meiO8FeZxcjTzJ)IYH4STbt~$opy{d?Fi|DFX zs!6N2F$o2J{8EevU*W^A^xDs^qA+$ zGmh=B;j4K2HTu}oi|+qUsvNZG^;bH%%P{iV_oXIt_nh)gU#Grgb;+^oTTagX{ww;} z^(V^zQ$A^ZRCyJ7ZEj$sy|4b_Q&tbB?J@e0qaHH%gQU92?||v^j8|J3X5UkHiql{9 zs@-S#H_p(~q_$NStF01u_O5!>7khPXVW>aP^q&5etIlms+b;7u$oJT;@EH$p%v`Eqxv?uDY zZgOmBuG(s=hjr;;rAbe0SFEa2nEP;=vgNv0M||=!1q-M37W`z$@e3`L2`t>sv*Q+5 zr23xFFQM1?Q@f>q+02@8l@ERJvX$dfT-LuXc&g zT3?Y>*20WQn_!o?Cz!QTOx1rm-xI_?d>j#k9&|{p!YS5$J^BP zyt1O%{*ZRHH-8GtlY2fdH_U#?^M2ypi#m%xy}CU^=HgG0mvgQxBjcip{{qauDPDd{oR^f zQ(eWnT^`9!p7&-UYu*`~I~E2jW<8tF6Y}EVU+K8u>4v*vq_@4{%-?s1v;SX> zUN`QGJGi;Bi!`Zl1)EweLm{gyv{oraAen!!V|j=Pdsw& z%;qEabPp9RR<8I|!{@(##x#%pGp6-ye{L-=>2o?`NA=Au2F0c2Q`D`{bfTw{6PFLrxs;pBFmv`>aYTJiK(F-mYt{q0baHp6HW4v*vH- zj;saT*WdN9^L(!}_^h-4&4ESxgQ_L?PG#Fc2>=NmlCt(LgM>>&puha zay>V(>cPK$*G0z}U$eGaPqN&yzu`xa)2&AdGZ%y(4QRGcxwNkD-;|}!Gc@j~p1u?O zcVgP27jBKJqVG1EB%PV&cHnlpZE?V-v@j{FqFUYFIQg9C$vk&2Dhtk*@0xtyA?BI) zzxj0zf1FxQUkbfqwWZ_IHi=gs?>zsXdM!S&cJcGde`dK;xm07eC;x4byu~r~S-960 z14ETp`(IBvzA^MdozlLArSpF%o)_z1pb{%t$nSYl(&+J(UkhiKU5O0a%XX>k0;ABJ z<6E3M!=7r1=eA7$E$6!-z{@;$fdvDtraTFy`DnOi8m zM>}=t|7nHNZ#a$@M;17Mj|AtA9S2$Dn9>upOMe`$C ze|xT*F=OX5;ldKPvZJ$~_?UXeemrJvy7SRq%l>y=vb(j*j>Q%x?YRGI#;Y#F>}r|S z>%DDtudUrT({}y)GqcyezpG?oYSyq6T&QbqyR%xIZ^g79wmM};T)tM@ofH%{KK5gV zvYN&|f7y?6Q5x?$46}UuDi&9BrMd5MojgfdElsah`;efp-R9Qx4_9`qR!DpE+vQEJ za*SWSC^>8||DBZ^-uz-{`poZ2d_6KRu6x6m z)#~4vi~M_(-yGVY{!KZ|zenkTlwt6j(4^Dbl!Aiaq&{0F(Q_-s?C1gCpu@{75>1bu z+o9>#qjKli7VlqT=CdEwW_l~_YmQb9|4n(by1xGJ&+wmrKCkxM z<^849WI@6TL6e%;bn)idNj;qsMh8FK)I2t$W8tRuV@oBHmD=R0AJ084(I0u`*gNAs zW5LT$w@wDBn{-0mso;;ldhxx=p3WKGpZ=ap?l~TCyVkjIxGV{aK&$$=jAIfQem^T~);R(OF9lOX0I2cb+Spi{xMB z`oO}8FU7unhP4x4N`6a$rPH}BnXezoJSq6}dBLn$5%v=fXU}T}@Hz2a$$fIblEd=C zZMp9t6F%SPnbT~cZkw^?y}r7W-?hf)&tzKWta|$HnM{k!3TN%cVu7M1KF4Z7Iuno9 z@;#cv^L6#ZbA1z(o1^&WG*7r(612;bT`~QINl7uE6Q4-ZvCVvs=1f|k^iaqB#KeWF zbDnZoN`xFgZvlSlA>8cWADr7KP@~~q{^Mq!xj5cm-C%$|CI)2L> zv3%QT*HSB^sJ>sMnZxqyQVEw6j`k)_Yh)DDUpW*P^F5lw*O&ov0ds4`A-lc_%&lPF z<%LR$ulgn!?=RvGEI(o?VI5o}+&7`QPiY^g`-w)UmMY(tIUjtLYx=jm)XivBZvQO4 z;j8H6*9`mmOT0dsS~&5gt(E$8Ua)8ZkG9NH4ol`&f=MqsiZ2|#8sOMDp}B4&%Y6$c zzInATQadInFLvyhto&qwd*Azm6Ax?t&~5$h&>~avx{~#rQ;eSnkMVJ}15{3t3OG&6zlV{kJ=nUM+KE ze*3YXSh3N{!lCUOn@M1)K}ZRh{@u7P_2sJaKS0|J2DG zmanh+3l;L63SYzLazbRGCosoyT%F2c$$U!?6thWbyp07% zELY?!@8fVkadN%pG!Dxb%1))KPJF*Qq&}S%EK=arezIHn+{_DY7yb$>visM!{kCx8 zt7_5E?3>WMU0zeVfbH3)3$rX8*wVUW-o56q{A#*bNO8HdEGSahUwydsT;Yk1hR2=f z3hm1K&rW#fazazzSJBC@I+IJV=-BGVDu?ox+r3`Rt}pa)Zcx=rF2SNx-r*e+F7L~V z0wvD{0=7kbPUn7c^_3lvoN?En_@0RS3C;DM(>N>xIt03yCotA>m`>{`4mftLSlw8# z=##f$$AsW`TUEiL58uL{$h6GitnK)2*-`xJ^Q^$m3C$~&zI3~sSh;@RWDd)}SIdPI z)190j*|8V$E!%#hT|iNN|FRIJCs)Gnd$!E^_sXSXg7JQ*g#`^gUuUIsTCiWuYxDAM znZqQ?>23+i4xngibZUw6ZjpK6oKe_mk^W%2+`Bg%maI}j-wL11I=0~G1f7-qlNOle zskD4iNHRC+%zC{32J`E_xv(_ z$bZ}ZrRc}9PaFE@dB2Tm>92g|nOFb%iJI_B$2z?uGT%Rcdwc%)|EW`UR|H30S@iGN z1H(zmW=v{9U-XvF?B(dToxkdv%k|vt^=@Vrl0zlzS?u*GCoJIX^Xx|J>4YOaP50n^O;EdTz2lPxRd8Dcza(wQ|(%( z<1e?Dwdr2iiN*Kcl<&B(Z;{yNA3oa@csGX|yPs_IU_BE&ZH4bcV=M3Ol)Y!#E^OKRK*6=? zxpat0^Xt!|J^40PdY1j`Y=mZLckn5sb}^=(oi9-7+U8;KC3*9_m|cRulD}=%dF-xv z+j_Hvk!okceDjS(#`W*AJ8}hItc>O9N$Z!jEaUmTMfTJ;ey>k=-usovd^0|?F!g!s z%~d_y9x$vlRn556#s1pz(ImUG!Z$sisHN`>p8ZYb%eqN-jd$kWzZ;}*!@Ak_b=j1^ zcENWY&BDd@q!g!G^RqP_iAb=LGF@`?ubws6#e>t1$$r{;WUgfAT1A$n&!rn~oRN8C z=W~?P;c-{xl6C7iVy-K*zuz+b`l{bXRgRgTbxpV>zxFdN|CAcIN`>>Fm&UeZN3@d< zicBbLl3)%#nB>%<%kO?ZVwZ!+u}{uzq8p1hhp*rD(Ckz4JW=+8|L5Of)aQFT**&Cm zUF@n{mtar5own1KY&n@er$DV%^3y`ySf0#-zqTI!CenXk&&H?c^%~nJE{pvnc~H*y zy=dD5=h=pzChiZji$56faDwXPzOxk%#TJ}9bA0XF)^4`5uXmp@^M4Yl&$ej){kFFO zl}`81Z9D&N(((<@lJkw1XPmb&yDy-U`pf3@M_%=y!cWSdJyXUO_boQE)8uQ;v)V$tp zxxVbh=jl5VG*mtmGynd3a@OC}{S#ZKS1MnYV!lyXzAjWM(AevBvEg( ztuEx_|9vcHmbw0Bcu`VxTV3z(E$Pf(3wSSD_uie-@kqTS=69d=&1FFkXUi&26(~D@ zt$bSL?Qe6pEjnJr{^ZK4`zH!D!?xNp#<|++?Vq@rv+|v^)@Jc&0{nU5Wy$>8GFkHHF=-W@{ zm^lj-Ywfoz;aBXQqo@B*)jWT$3P)1**31YZ) zTI{M>a9Q+&)1@uCpT&x5vx;19Ez16>Rjv`Dy)$X&6(74rPom#9ROoMz%)Yeu(X>gr z={~71tz>3R-Owf4bZvE&RciOq$*1Ek6qP@5pJ;UcM^g2S;&y=`s#@uo&@k3-%&%4SY&mCO6x^gjOn68#M}FPh6_w@h5+ zF*CuQ!B}^-kd=Pwo-Y&cOv_De+benD^yTASlMcMAJ$^<_OJS*$v%1!evSagB=vDiN z^u6gkRes}e&-{mv`|c;5cP=`8jMHm>a@qF%_CJ=+R_wc>UBX^Ib$;Nbu*uYU0=3`IIn4Ps#i~r^^SgWBLt2kp^gr;9 zXWl)(X~E9IH^!l{4X^g(eR%0SbNS@fZcAU-c&hnf@>T6K-z);nCM~^OH=EC7Xa9_3?S^?x6IEva zpT9<**W>njg|kb0HlFz(`6%d#-Pg&vOBpKDFI~FF?0xOs`z6*>WM7?YT$MIEr}*uO zD4v&x^-{m6olaPK_t>_rFEzh#s@~pZuW;u3+xGZ|O0PN7Z!P{DwYI=b^!?SwN0&SQ z)cpDS(cDOCW83@V&+F%%|Nk#>rZWGrX-aqfqGGLIb{7jge-bsp_-FjC)oPy2SKHne zcUc|``Fy*ePbWBXZ-`d+^xyf)%$o|-Z}yu0$}n)7rr)Rh=s;%F^!*ktbDC#4#P9$9 zxWmFAe=7^0;Pa4>uan>XwNN^z?ihY*PVia&s9Eq98>5~=q*KoSak%O5R z&gbz77QXRpud!A-7vuKrnLwf6aSzkOR(&18)AH`fC_Or$!E&tcYdy!Sj{AyA=VH!3 zc_vVJZg!n=YlB2Z%!Qe=om}Q@yZ7s?qEg>W=O+S!>3aNC#T^#u2}TkNwPXa@-z$Wy z7ASnR{8ej5^1kJ4e1e5+CU)zbk63<=WIp_NR%gfLg(eTr$qF7nQ@caY{m4NZZt?Qs zjtP_HGcLv2@O3m^pBubDK=8Pg_XT@8A=BzTkGh%(X(7Ie!9q6dzsbPvQ_{FFq{&?v!BR0)E@N z?vCPJJ7;W2cR$kTWRoZhqPBo|hVpWGcLfX26t_p0AFtJ>lyx*ey$U)I* zznGGr#bxPp&35U0fB)GF7X9PO`FHG*(u3Cv&hPzbYN2%Q+d1?04vT;`Nn1t1!i2TW z*99NV=?s^*S|Lz)W>xzg3njjJwI7U}j#OT^s4nj4Fs?7I;qRLeEH``7yL?VT_Rmi9 z8l7EaRycRP77%2AbwL?qSi2chdq?qwm&b&^J?^mhX+C8EbJ7+6b^#^6v>wU*E-o?| z&Jrvf7RvVf-|l=J(qUow%a8rYijCG53T$(ZoN07&ky+u?E2DHy)Bg=0Uk9Tv$Gy-F ziwiA6mM%vQ?&hBx++p$gv3jco`&;cYcEv|i{L2ND{C@xNRDAT{Zu=Vnf#f=wdC=pVxGm^X=mtrz4Fzd&K~1Jti zx>9?G1+#JX4i5J@&Hug~6MxuY@zeMymms^HQc1YtqXX_&0^<8Rm@{WAyeC_DuEC7u zyS|Hz&0j%~KR<8;2FVDr=i3MIJ>WT$dT^Gd0;rAu?RAI6SL4N8g3Fy{55-z4@m+bi znNP4#O+;m#bIY7AIdi9-+=9z%Ok6uG-Y(X3I#Oxh7u<2jul89!f27DG?WJEp>1Rs+ zIu60*57$dtxEyJ8`f@^1>D(XQPDB&`h~|9HunvoWjsj7ZBM0_7^@~1|*|PEHoufMN z1hrg5iSORO9vP)aJTIK@@C!b_@*LzU_F&f!-A+eV%HP*?ne*@CT&E+F7bbwxV?tH8 zoeRkOOSuG>*VQZ+DExK2lS455Pn+Ar28qwcC%FpwcHQNe8`fdLswHIi6lA-3QAY=J zE63h2PzFgTY_)jaYWD?{Of@e|*wCl^MCDHWrgz*^b9TJ0=eFE$#QXd9=jhwNCnwm~ z{rmUl&*S<(YxW7u(mPT&ZPnj%1`!?-nmT;KKcYVIH}Q%HAD+MTz*@P4S$#IQgKsIF zykn5$W2t?v_W0VR^Xdw@tgjHUisiR&t(<$eq8%`)Y0wsehstKgshWg0k;oJ zXy?rk`+wv1mdaz#q)I%yH)raL{682o>%+daCjJ@r2Ob+T79IL+y=LxDCjE8U$7eMD zi&%Nm^sVg_--=_m9(CW3O>|p+{}1z$YvGRqJpRj9ewUMY{#R{jU46@9!*6kKr*{ zJae6Bf%(cGZ{NoEY`R|YY3F&XawG4ahl=O)JC>9ix9!xsa>YjU>>U|DIR-u2wN|=ifKA?^VvL z$E)A|=y%l4TGEF%JmJ$9-euRz4C|--+cR%R(wxOxK6n2<_3zK={bFJBYPT+X`&-IT zTW<-|#)_|nM~=?ZPSQ5*4%UykZnN_3T^H7mHmqN+ZTU9Ozq3?s+qc>qR?n37JpW+Y zKS8d$+-Z8?4vEu`qHOMqo)0^x9v8PqGVivF^y^9A3@=qBiGAPFKhw>6f5qiGsikj% zDxdrLR)6DK{4RdRu{ZHOTUYOyxAN%gk5jK|uiG%M%AUdM(3<6&_&z+_vVX^GTl?MT zUgw@0Sre#mWo^Y)yp7nH+wo0zYJfSsS6RRZUeKWpwH_V&- zYiU@{~ouPX+=!TVr8h1>c8o2uim;TFZTH3qKGeYB==X#3< z+3PKJntQuNbLlJh6Dvcm>6~8bJWq;C^qtMp?uNhzC#MJWPMs9JqQHJ@tdr?C!4<)e z%jJG9^;@|7deKXf9?yL#T#5OP%N_{vC!ZF1bZOo9#WS2-UA$CNyhY7EPJ8_@`TAD2 zjZ&xYdaq45_$$?Qrd6kCu{Tq(|Hem81J-`1-Fx3%l) z)2OR;w{PpOb=otFXRDXt)~=2%UMJ3(UVrksM|JO(u4Las2j>}FlS%0{{g5l#I;CL6 zmgTcLg$@U0uA6k*xo0m|(Z4_cGHkW{Bu~EizFY2Uv+cgVKav7^OX6z(Sb-L>PnVtZ>v&+WNM|5u9K zyqw~EJ@t`a&CSc*8?`Fd8l?JPSHH7#jp@eDODXQTlZ|5y`vPAEnI+}EDqGGFRrl0y zGH3d9YuA0>SRU+dVywa$NHIa`VTcl4PxN+{fU%#nqOxjdNr<|yw%3$sFv!412 zM%(Y&oc!^rul})5%eFa9Hr?uf!Bj7u>wueI`Lbze)lbg6rFm-4+?8{SO)P`Go&AfJ zO<$k#Zr`O1w63O;9DwSDs`by!9DVlAQ zG?gZ4DxEQ%{^WEItE^9^=WB-Pnzkp*mKH~*9)9-b_*B2$&nNjY$?tf(=~3uTuK9oD zx2;yaIVq$)cWKy#i4LEl{g2PSJL}6o_Vb%k3f!)~InmDYM_BB!__X7qm+n3=d{fCUV*{k34r5M^Tu6CZWR6ok*mBbS3 zj}^vxdSO3YBLa%b+3jNL*z$Sn{_NZ}r+Z=9Iu6H{3(>z1c5c;6W7WA( z6lKVr++W2a*UA~Et0k!`{W2vrUv;u;u=)8J%3W+%zMDzEj4J<|lJjnP-0AHec3r1( ze)~M$lEAR9>C}TMaYdmC68=s>A!Pwy4V`x#D!6>(g{6>Rm)6>XUq|`!_jhrnzwn&? z=VSDn)e8zv+6tMOpIdY1ifaE-bx$pm^3~x%lIvE-dA6R)RL<54xtc)#D8AIIo7>D8Km8yBzre#R>OZLa9lNQ<{x>vuTky9Y_? zxPRDS^yplm<%)mbPe~tMuyV=D2gTXpE|Pl2$wIzDp^*Q>YeBjg* zS~^PFzW>_SsPGC!dfLcrnzX|rFW(g#CM+A3f1L`>(y#FQIAKl2zxJR<3dm zo)p@-Y{_aq-@tI$X_MA@>8Qqv>bORhdU$Qpnm8rps-mXnlFK%Y`o67CKZQiNgam~y zf4y{-P^f39?7B&-tb9tMR9ARSwBP8Bc;Ol3{Y?-JEeKOVX`U%_+Rw`cpck5!8_$<&p^%v`T> zq=@}3lfLV*FQ4BuEw2BNW$Mx%eaQ88qESa_p_IQThv`x0UB21Aot0sw-mCXSM3)@V zYOUM*I$`CG^rfQ5#C9){)tU58>-+<8Zs+~}D*F-^$Mb#*wcl~=N5ixy2L5)75HPVYFC}Sd$-mg+;`uaOJ84b`#8S{ zm-|>@w8s9vnEQ!Kr=F=^nYT8bWBHDKn=HHi!#6H0UHl^1_D_8m!-r#sl4O5wI^(Ub zcaL>iSJ}o>JC?D2>#6*o+Pt21_Nnfu|xvghK7FLfU8x-Z?b zd0}hk;*jS09&MHW_(g`o#h<&c+I7x|^YByeR=uSa9J#n9IJzKaTELfdGnd4O1)P09 zc=C8EyO!^5`;$?Xu!}{9ThcjbZvQDY@GUE~ zKJNVVXqU72rAMD$sY~V<%@An|ePf<=ePPn!rO}_lj-{6VeYE!K1b_cJL1Q83=pt7a zwX%*IbCs2Lyw#9mlTS)f;R&?<>gp$PJoTkQq3GlnzjQk6zDUPZthoNm`}!-6*5^V2 zIgf<|UmaYx=ic`&j}5}}rv=P>pl@?#p;PmDzY4y`J8ys9%(Rr-M&_*^Q|`piUQIF0 zmVD~-{A{@9uE~Dg9XVs+cEhE`#s(3bd*bRg&ReB_O=)SK{GEICe^}eTL`!~?Qs2R7 zl)hqBN`%&;lR^0poW$n$M{#}b&b-&Tbi-3ff9n4wJ516Z$ueoQDvW?|*$E>AC58b%g zef^Nd@o5)l-|tcj_0&*XwM#5$>XGLQwN74k2^HGVzDlKlUoddJ%Cb%I)k|1UmmW*i zs)^)nq*dL`D-RXT(Bcv7yMDvkyH-*Uvc=(SMj z4_R&{y^W48@8$?B-PJ0rr2>GOsuEH54^v_6|8Vl?-dk!je3DZZtPbS6%D`s{7zk}wO0z9_T$et!3x z9)GtT2{fB?#U+sK>k1avn{!r(F3~vCYy0)wQOBUfojRquOEh;M$yxbwq3=EZz?rYK zYz?ROx;*x^S+XN`QP+WEO&m1>p-Y|#iE1s5T@;koyjVeUFE~H#`n`~i ze;K=k?)s&(>VEvJ__>@lzVdK*cmKY_-v6y51HMf&J1l&j_gr1)^?7~n%gYb97eq`` z72Co0Q~Azwn;G$M(wB&aDXqwRbD=%iMEU#&{$<}6#WQWq+959Y)1gSFC+#|WBFFpn z%j=^a>^^?@k%hyV{)s(zKa_8ZxFYxeU4+lko_9AZ)HnA(GJH{zuwk$5rJI=ttD5hA z;@NTF?KJW0$%k~-H+ovE-5_l_Pa*Wm^Q6YFp-!X{MsZ2$yKYTxYyS}%G(Bp;?W+y?NnNKeU-}>Bmf!uCVYk&Y$#b2eN*=cC z+YDpag6}vSW?y`L*S-aiE@>$c7GYo|Yyg&koqm6n_R`ghTeA5RuEiRswYFfF>l8+tYT z<)81V?+*D#*4a(FYb!R5A$)oL))(5{yqhQJX2)?S1slv^YOdr7zcTURwy=Wehh5j) zSLGf4mGou$y)TRO!xr1WsOq$)`O>zvaD!3uV&kK&IdFyvP3)NND$#eBMt;bKzo z0g=Y00N(wR^VS~Zxwf}-<;4umR_(0pzWKN6?oLzrXWlw_noNS&we#{vk2i(f6no8~ zd?{~BR9&QN#L2(k?L*g;i*;3`a%qXZx>vMIdsg|&C2bS8=*XY>oV#uQ=dDxj+Qold zGrwf_{>U!dg*$KjOY2;3=eOgrM)sG`t&V5cc^nV8A$s^>?&_?}H^ztW6-CcXEG|8M zBzmC}`|dP>{TpRA8}ZZ}4K4p#`s&lEtrsl}x)&r(vC;0Cd6D-58U?v?U# zw;nd#S(m{kRQmePhnvCjTTbcDzxFMLGn6yu+`r^9ag&c$w;-%eX8%bu1p z7rJ$jVdk?F0kdqsC@UGV+a~XyZYKDiC#Az{LtnYSC7Y7b-8DA*+FkCQdue$+O=aKy zXG=u6A5}h;QSX|j!^auUZlnBdE&J9JCthFNu5`zC(=Cgrn=iif)V3DP-N?W9{mNPA z?D9S<{?TDdbamjjtd=~lxYI{t>aO(#M;)&5?RR?;Q=O+MxIFh~!JS)KceaV|KKEGi zcb6akhsliZgc?f19r?CjIP(3)qo?+#mu)qet8{OL+=XZRxr)mAYtNSM>xet=u}iM; zs*;_K>fz}tSg+{RtCaA%_mqY=PHZ&!RA42o$Iv;;t~P4st!p1DB##Abe!Oy*n7zlx zB5k)k!sT|4i~ufiKT~Z|K4+SPe6c` zz@{h1B5c_9-+TLE`g`^xFFG~&iWVmI-@K}5tpAbkq~((BRf4tW=kMRU!8|*_<w2wtKa~(ak>5 z7xr34-CIx+Iy3Oto%c-cCpKL)yP(xlcsnrW>)fgP{hMzroYj>vJ2gGzc3zgUT!-Pj zLXB?=Oq6@}yxTC@@1^;|(2eD9cE&u~dh)`?|KeSI*L#1W+5e^YD{}rXy+60`WxMRUFE_V- z>~xo&TW4{^qBH-sp;-Bz^o8<#*Ny(he3Ac^*&O&XePZ>??Ppc@Zcdz7#0Khpg6dArFPnIl$zrdhsN|E;Lt)@@svBNtP|g&uv_u58$M^y#IDb6Pqf z+s;nu)>!muQUHIDXGQ#zNd@-PzkA!1tlVBCw5szj>$HcZH~*}-UdpiN-Y&ZbSy7UH z?;YY7w5Gj!ly>*p=1SvBKdX6tS1{fmg+sOU{Z@f6Kt-!2H?# zkd$pZ$7>OHpTis9d&eGmmm#~#U4d)e%(onY71~11-#!ZYtm0feyM5O)t+vE<7XCXD zcSuih|8d#KUkee59H>UaD6JX zlUnBf>Rqv}-`OR{tW=!dF5K(7UpuUN;`}BbmHAyqS~gs;SJ>#acP*Q`;;cyZTIrbO zlIh&vr^`jgzLfu;x&Pnq^@_J_6VjB8FVycnabWRGrT@R<>rGb3H8ouS^OgT}hFP|z z-lxy!6lIo8wQO8sS-=yWHc$A(`TKlRo-I+%QaHc<|KCs9d*h|1G4FFT$!Po|QM5~0 z_FJf6@;at1;S4=?+m&MXbuYWb%HhwIlDmhkwC2IOTd&xJ4(WMBT>Ue5`7dWzwYr_f zRzW+Jgm2E!Zxpwy3shOmPS^Z>sgCx+9FGr#U6w>0bJI;Jat4_|x6> z)jgsoBIf6=5n0OIe}B{IeG$I$3vw3PUeSr4c}@Ds4xNgt{~Tw;vY+2^V!>SbqMff# zG)R1vzspwC^Q$A_&1zQ;AOOgk^rseC_M zwwl4!Oj7CA!9cx*4i#Q@{1Xh*mWfQzoYHMPq2s~skCJr`lGAdSI48{H=V-b9Lt*cf z{6NkdJ0qAUnw{Q$@|Ej8=4juQ9NS~xF-UUoe^QE)oP3Z$De&Ur2Ih}0_nu@cFwGI= zWboCyt@Nk))Hd50Kieb%7gZIy7;zM?zp%FQY{#ktn!g`xU)Ap5wqsfKlaJL?wO4Yy zDYE-u(p0zKr1`Ss!^g`x?U$rY%<52-d-&>I<^uVLGv8fbD1T-r5673q$7DWT48JL{ zwMaCO-AKJw;N|np=O6y6y5+uWPU~4_r^G*Vo+@4Yaz(SaPEhjG%^RM7GZZEW#~BE@ zK6U;yy=;Qb*%^TsoqHQIf&(Y|2JscY+20lLe9y<9wZ}^sr+(g*_BHZ)j-2X&=jAr3 zOOAx;T2^ui#HsF!{ylS|aP8`8b97`K&P{0w`0!IuSmBP}xlZ3_cAu}GtjV3LY-C^T zxA>E8okZ<>*0&43I{wm7VK?fR{&3e{A?x)8!?N|24BJj=?DC4VJG$G$_0S^5i~0*2 zQ|s@qebiW8_I9DggoWiACxRqd50y{+wumbrW|j5gjT>d`4NRPQC7*raU|qM|i0jFY zzidX^-fy1HlGM$yvwHc7$hMxkiJSL!PkDHKP8pADn2dns{e34A?z?9`IwB|jaE`PNu>A^oD&^UWWh&GMPRzskL> zre~6dmi#=Q_V-g(YO$pBNuIbgoB5*>Z$kOMoMe;wiOn^#lRk@aaMwTUan-!ZsI&jz zobp~4$9tyfp)5^8j{8?Dh^5yFBx)`HX@5O+600W%(?#j8-hs=CzgYhIcbjj@8kX|V z|10j-U%eS^X6e*gho6z+vo7v*1Rl+7!$s#>P zld2ObYo9S5@_yyo*fFotX-WHxD{l{KuE}TfD?BPZ^^o(|U5<|?w6IibG`>*uns#JS z9`nPWLfhR+mu}8iM^y=2DaV8aSOKA_iup;esqG(t=^90MMzq&5J zJQ^nSu&_4u?~{MQA9mVR$!YA6Q#ui|xkfZ4Gt#=Dpmd$WEbqD2{EzylFP}8efcyU* zodaP%_5U}o+2|$2GI6<Tyz;q@ z++L}zZ(TM!=B}N(%dJe$TPe}i{y0ZcbJuE?k9RiD3wF)Cv#+t4XD7#UVcn@Jo0|W` zvUHhT>;Ca*o0*J@`)(Z(X~`!(I}8N!1KS%j_%(T4uDPCx-g3x(&DtdqFW=~M?RMU_ z>a^v@TDQM*EqIRTB?Y=qNjcOju=V$mRn6-RU*DPQ{qO!Pz2DAL*sfPQUR!^$(fdC4 zAEWp0dM%G^4zpHOG3OVI^laIClIxUd-tNYGrB`qCsGI)%&6ViVO;#Nj-%8$ml<#aNy*yEgIAFuuDHnYtsRfb8z=M98! zKRG$!uy2`zHfQvKJ!!KXmc=`l$Ujit(5IMd-V}Sm)nmpeV|tL zO!A*laV|?)QdBdudEmPQ+vUoarnq<1#-^MWb*WK{j5Mi9-WDS*xYO=a!E_^*D5aez zp4{Ab$XU9N)cHgFkgS! z;o;5I`<$IvH~Y$Peb4Smxti*})+DIn{-cFWkyjlSX6!z3O6v7o^+itNfy;s(vVIJ$ z3RQ~P=P_Gi(la%iE*oj_hwiJFI3D?JGx7UprR4HO_BWe-9&MXH)oRs|Jz`xhJhGYA zVk*1ServI0iC?@ZcKo*9T!+5M$@}CT`=YdODtPA|de2sDJz;UI@a`|cnOd){MW1AB z_T{ndepT7ip)Dr5oVoVn9A2Ow4W3+{M~-z*Mdt*m+q~&cD(rh z#GFraZr^Ttl-;xbq6bIJtK$8&Nn0xuQa0OtzkM@HT=K~DYl@#&XteS8JH4G8u>2}l z;(n1L!P8Bu-u)F*-LzF7GuCVob61$7deyz8CyKB6#+9fr{}q#?6xob6oj7$#Q04W` z{1aiJDeL#SY8J$6rt9-LIUm(M&(-=G(oi+r_usjue=X8OxpW&9?c2an=*ZBhk^^ zNzPgSHyxX=Zhg0$=S{*jHqnHjm$yI6FJIhp`uy9*H);A>>&l}R?>uS675k8N-^n@8 zIW$g`S9i6{ozhaa{rGNC>y&q8>-#R=y%YNAqtNlqTh6^IXuf+V)X6_S`_a?S+r;8t z8{|#M5aYMBT9^DQ?*aer(?7zR?0NQ`2rHbjb)G|e?2&6(@(1OfIpwQYr~BGv;<6@?311J___MUIWrG)uVIrr zvf`=gVQ#l>{{HzcpWi5~cdpWod=n92R=04l;LT)#CiXKK1chi362%F zOx<>`Z;&{@O-v`L_m@i(&&8d8j?9OX5S+Bla#V^zmTpcFKmzZ16mHOH=#WLO{W6RqF>D5=Y6zpzi zpZH;?J*Qk(W`cX=UxsU|&MPx`Yd>+A!Y{efy~4xp#qwXt5gz+Bj$5UBh)qM2_o7nl`)R z9RH4&8U6|4Z^anWj@jfhwq(X8KS`Ob>sb&I*SUOV+pXpc^OtwZB$!)+<%F{xAk#*sJWCwDJ@)3SNWiFCI^ z-fMKvt^AN*_(R?MH&*#@!0Pm?ZL&-fG|Q z+{c#xN`dS38Rf~7IkvtMb=mytPsev9zXelo-V@-o&g9?IGC!jBoMXgw*O029wuM`m zJZjW^)i+PiQOH^R_CoO0c%iCQzqY5hHbzt@JFZx^sjc?OZlCw&J~8FYN;X+V%|D#4 z@0pjH{;aF5K4jvbyEz}iHU3yHUZZPYCiVVluBzZRDV_<7zsxUku+iRIKF>gO^-JbY zUVrDdZ*#rYu+ZmZ^Iqe_p?l^|sSB$2<6rt&z4Yw=C(rHW{n=*b}kTiYtM%d{c^r8C(bWDA}qinKKJSE zYL_FSE0;1Tl^hjkOVU+z%voajBhou6V!{~}Rh~&j|DLtnm?zve;g+J&>V2kj4zJI& z%`KVZ9`sPAcmM_j2zm?rQZTr!OGMm+V{#}_P$MEP*e}~f&b0&o;y$xv=4`tT( z|Jzsf_3tvTvFPh=SNM9Tm9)eJ%U?50roSAz)?bT34bL>CQco|FTN8OUWlL z2Bq#OmWzL^lccV$U-9eaqJ5iY2d)bAROmkRbk{A`hqiVptFNqL2<)uAGuN`w&SqoQ z)7=Wj*Yw0+of5o1{Ty$LeBRCGq8nMyTZ+znJE`%@{kF0I|K%_Z>*`;=mQ@93!s7Jg ze<@lW*1x>#z0teh9^Xn-T?#Mk+1B9V|No8Qi8#TubBm7T8$}s>(4Q>kWYI5r)#c(9 zg^O3(HtjmU=I%P9SHCXirFG)Y2Nz85P0&;ohLt4av4i~GgUb^ zt=-RcxXkpfSw`2ENha4tR^MWATIpLZ|6OLS;+f}ZvjvasciZ1t*e%U&dQru2RlQV> zwba~s#jRY2j604_6-?QENN5>*{GxRmD$@FY$eowkHz6R+#na8^kd2VQR>lN5pML^n zjYrLlvrn$hk~8{}my`GL6uVRKggW(IswZE5-o$mY%)cvLg}Fb^@>a?7S(Te^pE2r} z+0Idw+&8V%<5bRP_LS5+rZHw5>&@iP_U~EM;PBV&#iEt%Q{+5OtxCRj(q`J@u%*JQ zmcD72UMKc;%JpI&_E&o6ga5HKF4|%6x9h;km!IOB=3bb#=#t+w*B#65hW=jh`uC@g z%Y#}@Hb!#DtiK`Aw5ZVME@wv1dFAdUD#uRFvo#YCnWt-JpvphBt-xs6)FT!%SFTIq z4C`7gJND*`JtG}~2Jd7*-mavLAY}IdCbRuhcOPxsc zJHqK&xD|fk$cV4ofi)zwl zWA16Z|9(H>e0k!g+KmEj^_OnwPF6%xOV3|1Os&vYYiOP$#`#DW7hIuO#o80Hv zG%svoaccj6t@K^9GTyof#D>mOzoIhtSj421b2sgdUv;rRZ;*MlcEVe^udF`{$=?rt(9p9+C-gEa=l^-jA@oUYk+p9``&ahScYQF97%b3#djq{%DHEKO|xJbWf zCdZ#=pU>#Ks(F^(>&k1pxTn%|N9cntrL8`(0b8E3&5YUnZ9}@zdbaOR*J<49YxRr0 z^r`*pl^WK2A5$L08%^KZ;23Pz=q|tPvWMrlL(fCki@bZkbSq0;^|sLIPkEVE)g_wq;ww9Yfq^b0}1AUC6k| zB~;6?=eJ$J)HN0IuN~9&%QsZiPbq2K@TtAyM7sR#wX-@m-K^g{AtrQ-pW%e5a{Aq@ zExL;m?UinM@f?{~maf3z&1Tolno`EiwCPw*JV)Zf*mjYQGil5YI?E6B8c#_z-OO*a z@{}b*VevPGJ!Ra+$?MFx-Su=XZqxJj6S#NPM*4(6*8HALH*?dPbh_R8s&x*${hGr# z!QhGgN4AYIQ_>sOJW2Wdp2w+wi|dcBJ(ut7bKLPrmho}itOzJ8NCcI-|?ATGutLFH|Tk$`G z;ojGJv&`p&ylj;|_a>g%@nPClhqTv)41UXhO`7{w(3MGH*D9Wdh<3`gunUW^o zvJ2?HsN5lJzq-tHcg+^R$D+o&RAkR?T4Bb!yCI^xkK5z5zrg-k*D4D6UYgsiQ`l=1 z;}{j%wBpS-y(9` zbbb!oLr2|cJ%zWsI2Q%my*GMypP4msbE=4QM$~CukrwBDD*yLiUlqlwblh|S|GeGn z=f*7L*VuRCQg8p`y-h9B^6nR#*E}}8SNrD3fs>n95|3TnwQ14~Vg2umm~I9LEdHf6 zp)$ub%Gva!RpR^!H-Ga)b1c1owCTjh^3Qi3G`;8wbxyu|!t?Jw?z$&G+J5=?yz;8( zJ-@2<$ro`Rfv4|ReQsn3{9nCH{P=xW&qF=e)30re{Eqjun9bHs5)SB(6b{<-_1`fE z+oXK!#|ke`Z-}yVKEcbgyzd)x%KDDxy+X|ec@@P>M@?_fv=C-!Jj>8;Gv)8q(}x21 z^}a9B>-)a;Mw4Sygn7rVFaMR!eG8AA@%C8FB)3wAfcWprZ}2^KIK*>fi?aGxV@<0^ z#kzMcFRwqyBzY~nrkvAg`joe&{I|t*80PJ+k+w3tCYyLHI<0q;^c4Bm&d=7R8@#;m zTgqY0Wj*I5G29JVyuG0xz0;;hv>s+yqtRSf_uerza)n#Jp>|jMTK#3ei*ANEpW3A+ z{Yzj`WM6Kq%+!RyvU~P{36ptuhW3P4ees`jbC)jH+_}alMRq=IU%UTVy4d^D)ruYK zc5UKppEgxdW^J5ki?jF4jivmb*A)uvTPw2P_3*@YwvEqk@5tp$`4S<%(cdWDrLv8G zLucodHBVpcUH`jzR>~cJtxkK<^+g7T6Qg|{)YcYh#MH-ysqOFVytjyJ(#>zR9y7gu zMx9zSiDg@$u4jVgVg8$I<+$!&s9eq2;iX~K-R`ue;ArQO#k@y+clRtboNu_B{bu*% z6R}E{7TNw==a|5meUDX9O+Ax$_M`w)?g_SX2VBY-9FP2NozK>Jvh&_Tfz#Jw&3G&y zTB!X^TWdSt@b=Tg>$a*3PIJ1@w{^xC>QVkw4g`7e|)IbAEB!@rJ$XV36OgLhZt`cg80_rTp91>QP#G?c%o6IvU4x zoNvsR|GxF{VqfnA3KEjf{Iogye--u_{bNu{U(1^3caK6NymsXX>( z?#EO2Hz~2-exRcDRW2YXhFc_c`*B@gg(+bbTAq7n@2g>P`LuGGb_livEqGUHe<({palx2Vy+$hqZ7%UH(_U2T*HKxcTb|Z zQl4w)Uh;T!{*L}$%ePUnTY467p1ih2-e8M~xx)T+6>n4?UbDAmnJBjH))xWUn%VPL zZLj&R^T+kCr1MSfC*Hy-{l7VGxK4YcndIU1Qh&wP`Ihx5MQ0Z6oh(z_mm&GkRA1Yy z=#1qzcV4bb*S5ZWMiOwJTk5 zg23932N$P)cAoZalk=zDYhV94V|84oyxr^Aii-^eU*pbgwfVfC%QR_by?beEw7lVh zZI@@~8(r7+a}#^}>Eqw+KN&Z9dnod4^72sRle}ciDSh{^q;u4?hZ~-03+?#(O>d3* zF-z}1o@MD=c}vy`>8jLiOTNG6?~xl<9OW0?6l`6;F!@)u{*0y3rcT@4C2p*Hdt9*R zL)7%&5)&mZB~{BlGC2H0>b=V0%m2+eRcd~yb^rdWIicwO58aywpMI-4AO6~R*)gqq zmn0)%wG!rku9duGP<`|L2a_*`_YO)*zMo)u-TB&r)4O_eE}eeg%W-%1!QhlPpA=s> zaq2rryvuCsxu7?lX;b)Jo)pF1ZAXu=_oa6s*WP;k+O_{-|0XZD{zDteJtn;Lx0zrzd5vVtGL@U% z@`v`Nhg|%0Mta3N$tCVzc~<9fDp{XY(R{sN&(3!R%i`~6<&NPtJ&qm1!nRZX^7=@Px6sVmE<_u*LFdM!TV^r*1@M9gj(Mn}bclbKw; zRdk%vTiB5IMJi~8@9U>Z3*>)I`f&gKDb3#xs%2%P*0KEx%$NA&_D z^saai{F*VUndj?`)iN?siu@7Lr?n<@^}OKdWfRO_KY?4>k74bHYKL8CW-j^NwtKsk z<1+RCwrL-|A1#ye{3mu%h{MD6p0}8s$Bj?rY?HZkt=(n|irn)`uEq%ubwIa^eUhr})2G zZkOsiqE?#fYP?n50w*Ls?Qf>uIY0#PRnNREH+$nb$KQ7vL za8db8gT$PW^AhXBZ(FJdJaqDrUNT4K;@y(xDv>2CYh(gXMhcyG63C3P>#N8f94ooa8sL-}U5Bs}34>#FZv}PqrDc?@HJg_Pn$_a%$VJ-#<=m z`_;YaWa|{~`!^%%li!#co!V};FEqTZ#bA1ZgOi!9iwUc9@-)wmX$HpomOf=tRJ4-c z6x6k*kXz{O*YcABf@^;_cJzFlaMAr{|DQn1sZ03pyR4EGtm;-&jhnUZ_gxm1=Cqsg zv${pj7i<0fJ^y3Y?ZU?vi{Ag~s+D288G2v8arp_72;93Bow!oS?FZltPg_kg}-ik$9yDo=hUf- zScOc?9?wd-#B*}h(&fx6m)duioiRSLae8M{mr~%Zkl>MSV zUTt@X*|6F4;MB}NN>knEWTt-ovm*4$=UKKBPi(#4zQW}EwG%bA@0g_w%i2_W!>wga z7R?J^)yWvV{_V8}w^g$h@0C3fei=C}&EwOy&srHSpLZXfBG+2jR`GoI<^zHU&rNug zRjyy)@}|SQNjb#(v!$Bs{NuCLWaqEn%B(WY!nx?(`*|1Cs@FFuUs&xNxa7`(1eRa$k|Ki-ESig8=+YQM$7E|%NoHkThhW4_|e zrQFG9O3z%~#-K9A#yQB|M|IU>tJ}-3omUxe)ss@7rw`nq<-ZFESwc@(Fqy5C7C_0rASY_wt3PInXNCLdvxp!Ui50s+{zVx z^V71kUL9+n@=RG#UwbOuT}_A)VaMv9sPzIxUm= zdDSHMLpAr;E;yuPeB}7L1C3jjnJL};Ju@sbWc|^GTP2BYE~Qn)g-^?$nmp1-SobUY zUHX}KYUd{eJla zqmWhY7KW8p%eKd^sQLOZbgh!!spP}A)^zCSwW+M{-+X7wrmS9$>O-IJayU4q2YMaV zeAJV(CSP7bvF)8k&FR#(l&hD*MJF73tn@F+QbzRbTanONO-gTMeGaeG{dmtXC?;BH zuEI%o*OX&()@jClTe(T)m4*dl&X>7-tL9m!-~Rsi(47nQ%l)~zk5~5u-&9n|xP0D0 zV4FgR`_qX&&g>`6RHoGm-8^6{eT`vzdix8p8h5eA+(?&G6Xs0l_FeY1O;jx)yYmzR;HBb?CI;<6zLF8rPjVd=Ic;5FQOK)qEp^r4kIB+t z?l>5WXQt!Bz?U6m-T+;=mfOM<2E$%*BU-pvVl_G)d+Z0lOiNBX|X)AyWkT(hBU zifW4K(?Zr1&zLuwo+7FHlcI!F{bHtcsU5uPw&7ApSvV_e(iPqAmeneSbH9egMt%`; zJS_a=nrWI?^0pwaoiV8=IfWmmu>MN-*yJc0`CWOFKx@>Rw#i}*(-)oiaz*84=Sj=X z_&|}kcL(xXXMCAt=$m43cKWgd9oNrUxHe5Swux@t?7Av2Yop6u#xv@3CRI8HIGw!O z9kaBeIEU+^y5kxN)u){E)+?#sRlHiZIwxzp(()D78zQF2zqqN+HKn3QYo$eHxpTG=91T=RYgi8)@Sk(Q<2Mz>gCqdLFh>YIaUM@0sTbm}xs&+}qf^{7u+i z1;LGKmc}O+=Z2pAd!mvTOVe#=^7Xr<)2d4Xj2lZFT*Pvv7O-1eplO5w7;Zox||B-yz%_>`sck8Uc~`TZdJ z^SY)MC2fsf&t)7&6Q>_2Dq35vqF${QsqoPAPurtP$9|Pak&KR6>k8bqpSk4IQ|CWz z<=q3R8;ydZ{8jqgwHv2;3ZC4uUhw2z+w0#uE>1kJ%%mPx#}pW|;=IryW^o)hg-xVaV5x!EL{SsR4{s9xgy!9uvRl+;X-%7;)sp42BA!MoPpHxPWLtDD zIDAfr!IHS!49b0#3s*KT^p)JMZvMn=T8_h#ZvtB@H$^Pj;+u2H?fI>f=`!3+%7&La zJmfxwnVrrpDvB)Yu;Q3KXNl8ZAC1d91j_gP{&)7#?5mHiZr|`PjaBcUh-b2j@9nqc z3#T}1F1U42jpO&L$mfOCpHDx!S}yLSU+ny0-{ISzQ+NKVw3&Qw?Ft*)FWh{Q@nvskuxRV~?>?(v z!Vr|aqy6G<)6<+eHgC$?b)#oq2yTlnpRT@*%j>oG<;olL%2I?^w>~g-Jjuv0AYmX}zRvD=n2$Idn@Km53lnYquk zD%tm;&LrXYno1>o&GY$Zi|-J2T=+<|F@kl z>z~Er_g+`;PuriSUj`WqL*_(GJRrPK$yPhfTfRp@=uh#ymvZO-=a&@=t#?NS8n%Ca_vyEh z+8Zwpp>$pEgZ_vAo}R~bAwX=deg1a-@=b|S_v8h-^8MRN-e4MZSwttk?|8C~NW~rxTGjGF_$+rFC{-Ii`Uph!9W4T zu(46#)ep%m$w^hvFfuSO$x1XZG%&Zc&@C`9(Mv5T*5uW9E=o--$uCmSa7@WhN>%X8 z$tf)^DFO+_XavP*Dp=?lX!7bimX>6I6}g9M^4i%cz-=-`v8l2kRY5->F+Ej*S3e-J zC^fG{!3?A#NP$;BD784hv?w{XSi#s#!9W2dGpVYkck_-h)BLi~zI*z0b({ARwN{mX|N1AD+??l=VSZdSSZChd zd2=?02Cq-L9J*1~f64RKgr`Mq?#sImtTMB=H0%DHC3(3?*JSmyFH0i+ES*!px^qplW(uRwcz5c zk|x$2e&3OgtI(9H2vnU4%QX+uYcHbUz%wDtoygm%o~TYmb*Vu3VJNN zEJIdBUn+lGS=t(s@AnR1?4 zTCO09u}Ie;ur0l*x1g0*Dz0P?#}t9{8V=9PSYO-`PGA<_!;mAg&bZ*;KF0mpHzXEF z9^z)qNcX#;zxk^mcSBm->1weWy&E#ynAhIF^wvdhM_`(|8{ZL|D+XWv=UJ~2G@EOa z9^V_t5azV9*|XN*=2E?y`A?i2bRT^54vJ-otJrc`eCe(yZ2X7z=v?LeRPxG{Kj?3< zz)SBSSu62b3a|f9eI?W)cD>6z=o64>C1O9 zT%G3f^n0=F%6Wc2?``~`^PxdTxz~sD_p5!;Tdv<|OnVmciu=v$#&c7Yt#;?id$ma1 zQO;0(`i`0Kb~Zta<)Oq>&r*Qc+_M~Ftc@6V6b#$D6!PldFQds2P zktrJ5?3dL&oe`r|fmh&?vk(<+A_A?8$2B_nkiI=)LY^i}u{P$Npv0^@^~2N0#mJVY|%d z=s9aziQdFL*^`&Nyt+}UJ!8MbJEilcdo`Rp<1cVoc8T1}DhbxRc4KMd2enRS`GyB2 zg0@oM-ml)VB;9*o*6vrk&M01dVBb99$=j!?!jDZ$GhVQ%ekwn$msBqO**9e6-F-r} zHX#BhJ3s9ER3sgzl`pEY&U@j)1sd`ZS1+zl6RkW{9W&|7SGHsRub=wHgn8PmEj9hy zv}Hr-Y_rBDX3=e2TQ+1kswv!9Rc^5NqOY&8xWP`ftHDh^uPx?>U#{8xOoQ#ozy0_2 z{k5=LTFzY_a#Q>Cw(h4rc3NB_mD5k#`9$BmD=IV1xZ}|lt=XHpE#Dv7r!%87NlpLB z>4l1SH|nM-b}Rfnyzu!%rFQieW+!gm0_XQWuK!L4wusA_D8w#s%s7yBY3F6d-5PVg zDQOpa*jcFv99X&V&+f&aI^84n|2X`s<+(T`^y;>M+p84k{@JitHpq|BzN3_X%J2Jy zPfZdxTds-Tcu|+JjgN7m%e5~CtYQg2ZD-t?%CkJ{#L-@n2{}`DCCvUT9e-q9OH90j z;+wvJg<9sB6R%#kJgGZ-YOH6r$)Ba$RxFs4zWu3O%-PqaySxRj_GKJXaTIJ@uz>9y zYx%{r2lwRppUCM<)of$XQC;f)Zm;FMYKLA0lNXa+K6#YZOIW4XtKSt7d0N0H6*AG5 z`}d)J(VNSjt4x?N_tW08mlwGvIQu6rd!u=6!@;cT6?+@kdFZ`)@Wk?WrOigoXa8R? zDhiA9He0TKq+2MOrDhuUeD+pbkEs%K8MrcRMSsf8jx61~YWBJqzsp7&)eni@(zubj z=JxKVUskQ0{&m+|V{TSUpVhl|uGn?uWew*9lZHY;~CZ=K7_Cjsk{jNMmFJ8fv0&ZW6> zzkkoRhOmjUnE@G3bgFz~E@klFJUhciQ2+A9mRpsNt!f!AEWdyH>~jUb<6LSMllSdD z`(2WgwJ%`egovz-AuN}z-oB1c{~7c{o@-v7kK_{7sKDzX;;;2KhwPfNOOVYYY<=eo zsn*RqrIs4nx|)V;5|3v3{g?lJ{i$f(&&z*u?#iDZbW-^>18>uF^?;Y6D?Uy+A$Udq zdF)2*H!O~)gj;VJ&c2iCyNo6G-K4z3lgo42TD-JA&IxMYct>g3iL9kNs`I8FT(PXD zBqT^;sa(EMSmu56na-CC{Ue(-%j182lxyA>p&|I@@}*P(_a)55YY)rp)c;!{EXcU0 zFyZIlZ_5_UuUWGP{!#l6}S2wJYXARYA#m*&6nMz>wJ7Qs2dG z9GFPhK#9aEE)sSf0b=ItbOaw+LwBnFWVxomc4$q=zY^QBQJ$a^E*}# z*QC5Zy==GB^o7E2pC#|kdzMhj5><(CCyJk=J?nGa)b5(Q2Gc&SRnM@Ly zdA9P~VWazb+cqC{QRr>G?{e+SlubS-9TUGwU;8Ni`s%jF+e%#8f06zZ)DV1z z!{)oQNM#0-xLE+R%qc2G_5F+E!uLP^Heh^l;=utW?r62$PE}0j3SZuET+O{I zzrSRcq5I|!V&9IWUVW5TSgCTv^4JT@`OVUaOT+uG?#g`ad64(>Jo`Ua-+w(4so}S* zOR0YUeq~Aiva^l*9|(pqZGT()cjJ1?jGH$&`~9CJh{Q&md&jWaHgf`de)c5KThpw5 zbl>s+bCiGbUYYD!thWjn&z3Q8WQyllKYCd{M`VVT^EELa8Qxm1JyXKoSwu~VJ(Mhw zpK?s^<->WgLFGJFx?h{pXPlguA$xoKFCYG}x0|o+4q3K3`_cT}r?v7Ds{Va=b!~>R zZrLKQ2}(;9>&5uFlnU=&{~l}h+1#ylUiPN1DOYL)9|Zmmk6*FEw8Y**z@slLao*y4 zYFigLsBbk;^5DBI+x%Q>E z!gRK8r!L=aluj;q7tmBU+s?OT>8uyu*NSfOa`^Sl`rq3M$tMZtbNi-GWcz2kzvAPw znX2Bd2|PCMA6{XQR!l#`qL#BdeS3Y?x5Kl8li%AfF*FT2^``tYv-Fn4Yud+EHxxJ? ztNvlnyKSSHOrP6wFO$=YqgpOpZ!$_byF#qpv_QL+>)C~E`+bgCZZu|Y>v#B2k-b1V zbcy7?pH)W8LV<$ahWdY6->=WOv}cRhH&xRghPC4C?@sr!&ey3qa{tG_)h7=z$*hzs z`F>mS&i7W?-*!vYnKky!)OoX8{qL5O4=t4Z?m33cN%MW)_A5?iYwP`w!iC3}=dRV> z7(MTn!|E+sM?W@ZR?kndjeM-CuhFP1>CLZ^d~I^|u8S)UoqePp^>QHEMJ$v(FktMVBvUPH&+Wk1JdR~|FeO*wc8R5%s6UI|pSgV} zz9>~V$?|1exn`X(Ydk4n$l-3Lb|F7)MW@vc;yLz*u>#${KVbQb&J2GdLMdllHN?08CH;mb|egp60 zz|&`Cr(Kq_c~=^JuV#f+Ra*K{t~@EeB}bR{yqz*5K38?J(Ls}<_m3L1_jTPoU-8wd zcAe_Y(nq^u73Wd+3da`Dvfjh$S41WjC@b9j z6lYvq%DevC&a;j)O2562jV%rT{bb`b@h#o+PhIu1E7d&VSJ5K&yFP`V`4tb#q~OLa zZ|bYR8A#n$uUx>>5M$#n*Z$P+RITNc`MO>=JPygQPOlVKoU(wseyjPBIo$ykA`XXh zHQw$^;rp7v(7#8~>Dc9a0v%^OFFf}0Df?A>YtH$iIEAB3TTicg+ADp*(B;PLwi>a9 z`B6-#lxmYU)#rHnHYJP19h5w?$2|13h1;H@-FMg8mrW`VmE>A#7RSHws6&*A`mM63 z%dES0&U*GHC!cHS3*qBG9n$;5MEQ>1TH5)6;h0ECb@#j!i4O+qPBT{5_MG6hz3Dwm zwAN&^ipYu*vH0`-nom9+>AKM0xWuP?1LLuKF%?EvQiT|=f8M$Lonm>ny1pg@a_xRDZ75fyv4SByDsJn2zvSbmK|aeG;i#H$OHb_7Yesc{?}f}MJzI4&udPq|Gf8BXfxyj)Vp--Vo>c0J z@K4b`U~{16X3W`yX|@K;U5i7yo7PwgZoHl5{&jQXy$-)qZofWfhiPq^bo+R2_}bI! zrWHtRO1b)B(xuKD8jGanYRr9d(jsMt$It9_+e3e^oYg3m=ga>3oQO!8NlWMZeKzTx z%c~;FzZaAl@}<9BG{Ud=q=J0U z{O#W?Dr%(bX&=Bi<1pusgpOU?_T5vxpHfuygYD_gr@a12FP>@HcHE4; z$}=;xFT`+pkO{Z4UdGPdf|r{YPKYnhjn0*DTv?TOUgUOFq-@ix?oFaMEc9x3W~=sD zu`l?*zEFH=#ODf?9gixaW*t?yvGGY?-HqH|-J*{#FJTnTN$1^@8+_Tq{g89zs{SML zQcLrBB0aXg%`%bt{_4W2HB85!I!btR-#>J%}ag?PujM@a*IFP@2s%DFM4dJuKtwB-5eLQtRZ^IqA1q`*Y3tyCbV9e zk{#Vqv3KE7$NyO$E}dPa6eplcV=98kMhe!{L(f9+~^y98;|PY=Rg#BiM9YP58B z)w+INyw7Et#!J7vvdoTmg%Y2;oj24zHGY}s?th7={%-ewC6NtJmPfz4aQF61eg|Il zgunW4uWq{SR^%$EaPv%f#Z4}qRrmTCHh;KbXu#3KpqwgrM7k@-^T>on4ndpd@}KN>DlFB1 zFL2QUt&>lpWo z-E|FTIz=}heY1bj>oAACH>JAn+r>`v-uE-pEN`ucfN;!;HOVuJ=0ARPv?%KQ`Sq%? zCqDR=KhFK8d(lqWFv2RM`S9io(xIDfZ#v{9`>Wy0_ z|G#tpL&c?e!n_{YZ!*mnv^+RB_iy$w@#;Gd7hhvr`RIK2g@))E_U!F)(TKWt7hKY!bm+;#457q+&XRD znv*>YO8iS(RI`)rr)}HBezRO{zk*KV(X}Ft%Ps`ur=Dk0Tln>m+m)=p+hVdji|)6X zE}6LLp{gpwp~Q$LgNcfpzVdlJ-(b+hqO2grZ4>j~!n)jEgD>N%(E{}@?%z{*-5G4S zS-$^DelU+=CLm)9vnlU7Jms!r#`uUGibqOp$cW=|YlE?%w_4JMHV) zvu|`Br%sk+EAFT_clvZf-F97Z`;*l#f);sZD4gTp*}B79$n!<9QY}-I{EC7H^Fx;S z?^`yXW%`Y*zdNcT&R%;ktFrNlCC?njD{On`o|%3{V72l*qkXYgO_d#1iQN(3x2&da zp`qvl^9hF>CQVx3dVYsm$+H>F87t~`SL(msGXJ~6&R+fJsTR||Ke^|4GxpTx3)T8M zyYzM!T%BHJm%qN<-b7AX-r2h>^)au?#&nGhIbDINnvxi}=ulHuvHh<(Pp8T=qlSTfUrjLS0jk4}cx&Jlc*ePC~ zipjovS5LO^NbZ+xt;_l0|25q1^tXFYBzCOR`@b;fca){quGc)wYZuP2x)BbXRN>4D%^j|8&p#tvc3^I#&AroT0yv^R^dY9DQy9(q*G#Cn^?6gn)!0H~o1M>U zPUx<*o`2^C*QFTqYa)Kx2e0=QED8wIf9~dQlJ)Y3?AyoB@_trm^USq=UlM))`f9e? zR}D*-{(1VUal5|x6!ga5m9JZ)W$)~K$5r)z-u;L-kJIA< zs$1@F+I%L#dEY??#Z0^3CbBZUfpgN&?|T;Rqb9e|dlILUmY?yiy_aiN9N)h=blPXr zdpv7JdS{;2d%O8g;r{k^X_mf6D-5#v);cfwFvIqi)=!>v*D^+z8inB6o!a-$tCj!h zddYCyr6}sN@%3NE|3crM|NiMCmwaQm?&%G`@*?MLzEv=Hs=x#1oYIT!3M^q_j&2_h z?^#omwQsh$y;!A9zS*|zf4|K+^leU%^||w;KeSNY3>i-~NL1go+=tjW2z-6lR*v$nxQYb;?=!&{KCKSKgR&wf*bNBfSfQ zEgRyv6TcmpX4b)2a!cQ7{nq=e>klupP&G-5ocjI2^c3%d7p(a{CF%T6v)Qf?>!jYn ze)`Iey!wLy!$-o?B1`ni3k`=zYmu{P8C zc`0;JHRt^Lz4_<33$EzNwca~^?Tuwn*7o>$)dS8zy*a z%G!ST^}6|pjNJ02FSV8{wWY=RmF?MOo4kJFyHiT{Wdn-E#QwD{-}Yeb2iv*4haWAx zIQ{v${kmdbm&v@lzrK#?kkT`qCNW+f?mvG#qBki2Y22P4_SN6~tq^xD->q-cD{Lbg z6(v>YSSd{{Zf2EwC&_bjt;5MF7h_K8G4yf-=P~V>x@6;OmuHXH%=16J+qrae%v5h}eer~*ElJ-NH644fuxNVk^XaOwq6=!-is#02 z1$*CWNzK&K=1NQcnz%>ub5~7yqEseGdC_ONHj%o9%X#KlR($}`u-aN=VH!FinS+v*s!iD{B zUYwKDDSQ|B)Lc<}7w`V*3%Betc;@uHW*Os3EuMb!M|)3wk2zT9#Bow)L+CAu1szPX zS{B;gOV3Z_>h*Q)u$2vUX<;~fBh2GK#v>Vnr#lk@Uvi7w2o*11z1eEFc*yjCKF%%y z_WorD9vNl&&yTbUIlIYZHP4pT4|PjjTG~Vo`*pqx^*XaFJ}K<>zlScn|8e>rpL|rZ zcF~UM^YnB-e=Fg=^|EK_muC~*3l$Gmg-koTQ@H)L{*{%F;;MG6x^J1!udKhxV*ho^ zj=JdC-_~ESc>KG!_@~0BOMJ%{RcikKcs=xkcuadJsd0>wX8atN@fP-wzci~)$l9Nk6&HRerC#c_cv}I+0TX^nA~?>^qcVZA0E}x z-UV*@H*U|E_FsV)2^hTL0Ayscl(i8(_orv#I3;(+8Uv=he>&f_; zCL5<4)FudLSJj?4Qd4%ZcuopqSa-I{HuWY(Ygk}UniK}PQF(FtpKVis-MI8nIrNyxPA-RD9gZoN72 z@{EYNSZ3f(^G{lHrmsEd`S`ZP49UfvhZPE()ef+=sAr@f&}oiQ3o~S&DX(}$=hnk3 z`qpAc9bUcvBx7h1Jn4ez&RPGw&Eys@X~_~uU00&(si|oioV4iHtm+e?il%ANKxi}C2_Z*_^&FD-a3}PApf$0Yla1Uk^O=*r`t|r%DDWd zcW?BQ^4AekVNEYiPc;u-#4B9P6e)3R&)1x*rCU=^EOWJfo;s&|-orzDGv*c@IAP!; zFXR|vci+OFRrJ)s3G<7S7ZtwS-Foc`^U}zSiLLh?7ykBa(aUx$ar(YSRJZ%tuimZw zEQ&#AdR?DincCsbbyoCDsOqKLf_?!KwG;f^&wh`*c`@$1$HWD5*Sl!F{;^H)b5!{v z*;`V_gyQpEW*PPH)~a&(>auOS(6^>DL0OikO2_Q?x5KwTFmYbyS`nYo?-urAt`<`q zr&p`^qN2QQ%kSntl8_19WBcw!$CQTC@&5H?=O0!U>|I{qwBYhf!#}LL9@}axWWL`H z{?TaUw$t8bzT9*B?fRdm-}Pxzzx~*!)p|u#P)hJ-<*ia{47a(<{<*f}P}VKY-tUab zI|Vonx#kGY&8Rtit-omVzkitm6ruMYp*O7(AHj=fEHSTR%20d?G?xp=-MV;ed?~g0|X%L1k$O4B0)X}g7S%yYNrWS_8EXkS^ zetXjG9inUAEZ(0aw{nW=WQO%y{rmQAKB+eQ)~2s!kJ-DLRE~*gem45_#QD?Smv#)A zUUJr7ms^Fb_HloB z_t%e8+qK`>?XUX$`uKyq`+K8`w)XpS`K&v?UT)7eoljXCd8WpxR;>6g^IQ9^sPpYv zySDc){Qjc$&xdzkcN7HkvOQKfxuCp1o!|5$@2}i9pX0A|B9~f}oeeG(JJ42}?ellXkIFe~X5TCD z`Te1_|1tm0npNQ&ZRg3m-K%<7{r=6VGqo6>+x<%Uw`EQ*y|MM5 z@tT#N@0A!tvhQ%I&zPNfUV24{T&1n(Lv4weZE15Xo~52G?3sC4@qNz@-9~q_<{!o_ zqPcZi+ilFRaFvxGUZ%a>BHL=$n%`*~Ljrq_&ffE5&+&&})^-KGnQ~Z5G;NQ?*#N<_ zKW2YD`2Ks%LdnL3Ypr*Ca^xTU`+U#cLo%Z5GwkF~ow~90WsSVcucY?k>8C{QY&CVw zE>O;!Wq9ZKLW>(GuUMOXY4kGAxp?q#Xz?*t<<`xWDP2dt%-XzU#wn#)$GMj&K0AHy z?TkL_Wt=vhvOd*@tjnK&m~m;Q#RhZj-xDgb4da&AEw$^%!s0wwJq>s_2EeZ!wUGIBM+5tK1 zTNeti&aTeQwun-7oVCbi;@5k>*Tt{-Z>s$vbdE~r+&M}MYVUnHb0T~G*QwzWoA_QF z(>XkQuCL%*V_x^@BJ0_TcG1C|ze@!Yw2!Tj-*!Gp!t7F{%-QaXw{46p^_|6g$DegSI6Zbg+cX4^rm{u-Mwex z2K6KBI2Y%967#*gT{UZWPL^Kcj1Fa%{?t&mGkNOMTyxn<#(U=B9*;9O z)Z`W~{VLPHwQs|=m8@G#c<=Lx?f5C;JtI=4g0Hhj=-D#cvTObiIu*R1*M0D0zsEe6 zWrJsl)|Q8D3|vQ7Xdeg>V`Z#NJ*E`*yKYi1GpmxN0%8ysO56oog+{fzo@z>(*XLldI)G9CM zGg;c?hS^^2h*Ryn!9@a2i^JERij1uBaI}~tsHq$twR^Xq^|o)?^QBUfETq3o;n`l? z5X8~sq7<4p(OrxyS$}t$fYIYCM_(SViJ!eshoPCXx1gLiu#_Y5b`JY#-qyl=(}yu` zdY=*xZJ6VGJy_&}<)fJ)SkbD{Il)f z^8F*i=gDENq-GTVKQW1s3eHVf0Dm1}N2dw%Pgut=L`L)KzR>6@O`?(rMGmSpXk z6d{pSb>U6fvKMO|wyK`|?)N8Rs(N3{vrx|em$V(CpNfWF=3N^t+!Mj*GF80u`?k$B zVzJj<%|mQw@=aLxyvp$Xu4Nj!wk=UFKA)cO{o2`z#UG!o-?aFEZ*a8Yy2v*F%IGLx zFW!Q-`=`9)7^;}<6%FhiY&tjfJ4M}@?ta+t=#OJx(w%L3oxI{&k_CTE%X)DmbM6kl z(%$ro_B(s^3QyHV&aQnYc7omCl55%HG)LPm>#rrP%R zt+yVmoW^exvSf=r+qJ!C9GCr^_o?4HHSAyERA0R%Ci0!9CY_r;;mqANk2{#Am8Lw5 zS>@?ov)feN%{n=oK{$|G-7?x+wb){L2XHAqfXkaXq%QQJZZ0-ZTn5P zEGgb2$M-99+QjeQ_Eo(4`_sA&mIBp5c{xXz;?0uREIEJm%wvbWAB2`<%=_e>e_(=G zvx;ygi{DTC)(9TfSuHQkt#p3GTjhLv=+kyr*jY5{(hbA@6+iXtcNIR^_%Qp`^|DZl zcvaq`ytd5ZHTFOGZ1+zvdQcqy^I`0vo@*12#ObvNoc+u{bLp`!)^WLB_G-zOoHo`T z=k;oAHJVy`ypjK&oK%O*x*J=4XB{hbH!$uElnQS;_)L+cLU_F)L@w z3-%_9-M;G*yvR;^-W1D2w%vgXCLIX>pr~Nz>zplI>h*ocf;#R+-9>zxJS|U$aJ_C( zC^*>hMJIpeqsenqt-sBgE+&@E;eWp&&Ebxj^=aj4NtG#YcDfzkUlwz9j;GcXyQ#v? zwVh#CIxZxpcSYuEHaT-$?A^Hd%5Ni%#qL2xP2Vd5R(6!_zFqLhq?D26hG~J5_R(ae zn=ZdE=bEYRW4^Zf3xm}~t50|8Ef!R8UHJP!E^e>equv!uE^LUMYP#V}q0x#mPhV%x z<4Hn#y*tu#<4qp>C)~g3X^?MXw0@68(d>>>!4ucsN&6JIbGtwL@5{GUwST92nJjTj zm-@syOCoz>WWahq_K>B<8Bx#A&C1#3-l6&WPT}D#{n7IKG#I+re%^JwxM4B}vzA|0 z%7q_u?&oKn)RV4m&E9kH<}dfR4pObb)(NW(cLc8b=COMD?2Yyfw|ExK{`X)CzbvQR zRq3;;3$E#GsW;m@n`d2>{k}#&T?LCUw}Tg=M|O?7FzSem);3_BoW!th>2;nsbV> zdeZWDb<=Vse^jY$UYm5;#q<50Ew}p$7JXTAPxR@d&hl&-lMFREU$fm@6$iUDw(0rm z`Zg|F^-kexpSO1GLiL2^iDn1a@-N!>^-*l71^27az6rJa&-QqpwFvjhKE6mQ+Bzy> z-#jgM?n@%`_|F^7DbIWtwXU?st>TUJbbYPQ%m1BGn?9#@YShx#@!SMa>uT>0_xN)o7k4QqJ+9AO zKke?0KIL5}`r-|}xhAZ<{r=rjWobqw4Q}rSaW}EU4?Skha8{BD>iP85a`~!X_x4SZ z$bQUg8M=M7{8x+8tUCr9xfnJuZPUv*!ExaCUEQK*-Ln+d&EKXT`ABtZ%X-Tq?%AG` zlbbKP9pUH8KM?zE`BT2yNeZV|G;Du+_91h`o;%%L55x8`B%YVglk?-hv{xtSQc#Vd z%j9WAOPsRUCoFzETih+fc(s1&(}O?FmPem+37go@{<8YV+bt`cX05DyP}qO_{@d+- zQxuE#Cms|{-*Wly;k&Aud#mOxQQh@ktv+Y>yp-#UwWOD|u75GVzVG{n8#Mx}w$9*V z`EXr)r)FOJF|h-U#ntLBuH5=_$?eSUy*6*(+r3u5#ISJpLe@QjD<1Gq_h`|U-Mfls z)$P9J;;Kh>oU3Fl->^%LpXtEmiZiY<`UV`W&kO5jIq9dfC~&^Ly~mpb<-ur^fr{l2OhxQa_wd0NRo!KIax=8Nz37k65^jU`ftJ?Ql@ z)>($9L^|*K^c_0fUvlg0!yg4P?KhRrd;6R}CfOKWMq2hUV8y%vO9?S~a&$9034C&|zDgtI%!R#I@P3GJv4pe`YYr zHYSB!ldHV=T}N?!tmUTWcXDSwosfSr=X#Y{xoRbMiKgiM^x4<%sC<^!D>!$ut9;wy z`iuP)U;eE6c~gI9%Uj;hkKQ%5IP`Fcor(?a;C7zw&9?H#?BC6Cdmhg_S1S16ceCJB zkw`DMc-GLJlANFC&f;_ZdNA$6A-k>rx2uH;USq5hF>-FcP#u|ccjbiI;)Z~yymvnT zW6f#u*|T$kz5=U*W@F(3;m#K&7wz{>XF0QE_4Vjq!ZI%&b06n+fU5I3H%AtU%X*MEl3wsEI62%o5qVRm|Pu5#v9CPkgIM;;a& z68ZRa$s8x?7eOiUdE1U3?vr=keZkD@){aFpB*d>?ZRCv*w!XkTw@i@v+{wLRk!=6w z&92rv>oMz7@HvrHJA=-7JyuzLjx{yq*}6H}EL~S@Kkal;*fi_J$M=Q)$DSr{zFGFq z!04Ap&Aq$#-pDZ=H~+pX@Rf;7OP5Iu2lLKAl{arWt{qV`%b)*Z$g#X*J*EvVz`NhQtKJo9i)2X?U|30_f zCOD?|&8?O8`|Yd08c*WdeCw+J_TB8~(r1U~$1gt{UtiVh^ii&~C{UTHGEnFRe~i3& zen42g`;ULDk_tO2?;JUM`)vOIIcDMM>;HW_mv1-k+?{6|ER`pTw&*CA1^3N<9LdsU zqTq8qX8zv8hNh<(8|#-(`XSExi|t#)(~VV3o31K+tB8*?$+~ZJTK50!_P_r-_gmIDt!w%tQoZ=!Gyd^;-E}Xe@;)6G*PP)abm8REtm-RQ(t2%$muZ^)E1g*HeeX}5SS&--!Kre0 z{PY-FwYO@oTlk@Xqq#M`QF8V&i;D~wLm#dZcjZlVzA0|H((}lKAo21|cE3#O`c2oL z34ZZA+}OjFU*l%jgYFZPPo;EEF?L!YX8EcsqI;c(R<(J@fjd^x9c;d3uhzekde)kE z(%HxH7(p~)`)a3i~J2|zS)4cr3eYWx_wyQ7Em>v>kVq3WB!}k2_DlNum zH8S5=leU`7@n+fFZCUL0wW>!`GRRX^Jt=Qx_pW`d+iLX1 z{kE^S>w00G;kwo`JiI*lLU&v3~ZC@OB()Rl3cK19CkiVK8@c8Jubq)%-veG`0uWc;uUhqGtGsjj@(`oC2 zY1&CIavpOtWSs1uzu1<;dGQIk<6SaVO;-8&TDK-F(f#BaDjl?yH&W}?gosy*ICC>5 z?|m@6ZEBe8n$4;_^X@5fuDxotaP$dzbfY1~E{7Lnu<1p;Qk{2TWzw??B9rB_ zCrVG>lu{(TK(u(eYhTveIp5~0Ip4VBK8r`{l7-4=am!;FY_W?OSZ-SMrE{J7e^2i> zr`v|*i`Z;0sxMUka#v>+qk2c7qk2|t^CMBFxmBUdTW2<83r~^WwPDh9^N{80PgWHl zU$jzhrSH49q48H=R~Id`o~6>TZjOn;zQe0rCfx{3i_|TO&|T3M8GJdwtoG`pi?{Tq zOz_g0k=}ZMZ&s$^p14W<;)_HD|PabN>&%blIG;_w8SDs$c%+g8IPOr~r+r=fctDsNR zs6U}}S=a8hPIEKjHzp}u|FvfN^{|c)x3jN#=a{(Go%7?|S=Eje1pr@p&c2 zqY|&pbxJ24w{?{9Hu}HM;Mv0Y^?BZNk|x*|vgK}{tS_8(NH^F&%*u}0U%qko1MXSs z9QQ-Z?{W6-ba^YKcVz1(_jeWH{dP|+L|EE;4>VS7yJ9KL6Txdg%OI%op_!`r1*N8A z``PRQ)b@llmDZX)5q2`06%zHMmi>M5vCxZuZZ2H^Uh&yHRx|Uh4aL7Il{3ztU(IbU zwZ>}q=NTK5Lhfknc$M(^;;K6nr-hk@m1y?(SbEoNV0v zNwU@~Eu~j<5_6K|$9IZ4-X<2Cx5PX=JpG|mddk0*e`U)RXX}R-J#hH7X3-Tj(+@|^ zhZ>7*eii()jXk?Ta^8e>wr$H!?7Oor^xgZ{=YD_qV^=BfvCmLS&f(mAvyo5 zi7ABZuwH9^c=gipt%s80Zn|krV*R|fbmmFkn=5ANEa5+qex#fK&Y3W&8=q~@$xODH z^>3%EuVH$cd=cw3{!fMPlRMwc%HN@I<9WDM+aC^%$FHvYiG9xC$_tpYb3)JJOA3$r8!v?v+?+Kvbc^1$Ld%f-Mr@I5A1?Hm z*(LHiSH4Gfa_I!^ZLell?^`@kP>65g*?nysz30jA$8$Q4))mJ{mEIf z3A$U_1exDAzx6itw$a@@>G_T4sj==+Yf254ZC;Rl?ckP=oFBdvKHb9Xv#C$Oc5dC< z*UZmAa`panJGk3y`G$n;l2=PD zY94VMm>;2^eP_RU-}aq%*U!J%$9pQwls)Xl0rBHu4~|ydymR5^Ym*}l$s#>hxa~Gs z>z0+BbYIHan`*Zyy3>-u_nFJS!_fh|@8$kYPIh1U`N90tlQ-1FiSfTuf3)$}|Hz{0 zTWhAiR!N@KyXx?Y)QFCoi+XNa2QfaL{jh2G&KuoZBYt6(EmD zEw8fpuTn8NzHjl|na1Hc2l;vnv=6U7mk~H{B&JrQ*}ZAl;Tmtb#c|z zYX$h+jxOC|Kke|{wlh|aTb#{}%VQre+1-6v*87Cc>xISclYZ4RYwrsWvtsXWf6B~# z{sL3`q1p_o_&yHbD?SO9@!nfsx1BNV=5NpIv^-Q`(0+OK{wpRjwMQjNw`3SstS_+f zG@WR^Oi23qe$6`<)OLDQt?_szaIo*tix7=}r-M{lW<|2GU)1kb_y4=?$d=jS#jDB; z-_GbwpErF;$%CuqU9;@^)c5e5^b1&>$XP$z_@>_NH;tyQFW%fS%&J{`fbo^`oP~Q= z-_FS%5JGRlB<4Cb@TqB z2OD=B`n{*DHhRK``TM;X_GY)PbLCs46UHM}7Qjjy?jFIb6P*z)-5E6_4ohvxb#J6{k54^wsUp+ApjoQ9;qKkLWr=TN=C{3dy1pUc zg_ZXY)=laDDa)-kPFTA){kQU@M3(jMwyPP`{?w4%b>j0u|KDAo`?q&L7J0Gue!blG z8*^j+|K@cvjhL+Y>rm*YE?(7Z>g#TZrbgAe1y4`ZSYazwo}!W_vdwf7<0eTXCjNi# zB;IG842uyAI_bSZ(J}b8_w6&&_6f{d=pmk((G<-m(@`t+=df|zdzr`u_rgxRcoC7a z&n#KYZ!`0~*h$Xknm(u7n)bMdaG4ccwiAtM7Od5p)Vwj-ta9xMw=)5E4tC3>Ynm2| zbVr#T4*GKP=$zYY)8j)#xBSnUoETB`KQ8jsjXbXP6Sy4m^G*u0hwG?q{Jij#;I75t z?=pDrzwqAB^fu0Rm-sqkeb#Q%8$w^oBUQe06cmR4)J<{<;%^4zN5DC-sbhYjvl!f_doe$tlGwDaq6b~t`*#G zRGl^H7|(BE>#QfcBexvyiu(D_h-tdO!G8NQMh^_s6WU(}$j9ohIn%Sn!Kh}PbFY)= z_BAWKo~no5N{p#Fblb0>XhJvl;n|CQ)B6iI@0b;Gz5Dsq`^S|Rv;CT=y83a?zx?HD zAFd@E98<|RStb6B>-n#fjGL!Pa{qF1ZCPy{`&K2ia_Qc$K6CosTb^BTrgq{c$x{{2 z{Bs2tE_fQp%+I>i`)owi%Ejlz_b7E)ecx{1c;jKSwn^QQmHn=U6U0s*;Z6F^`TFx& zQA4|mh7kXc|CB6GvKK%65bDVx+PUp_V@2NGw^0d#I@cepp7&kkU3Ss&Ah(2`h>hw_ zCX0jZcPw)+*IIUViA4G7jU6Vd?oYBV*|1bcMlt5%a=Y~mE$-=a*R$GM2OQpf+vVB0 ziPlSk#Ps%R6(oK5B(c=x`EJ{+-(FXHw9^hrum82m;kC@(jZCeFwAEJn%vFf4dDN#K zb)-vEXI|Rem*UfoI(@yD`on(PYE|z^B5kot{VwpI`ERpzrt7u8+mj=k6joJF_4ngA zARj5`ohrdNbKwE=W4?db%5*8g}#6P zS095vE>jn9FXYX6>>|12g{bwb3kE;89=bN|Rd>aUdQB6K72kHXKGklUx3K%kq@x*m zGeufOGTuZAI#(Y&sQEl1Cez|&ecZHLm8*SLNH5vy_wh6L$xky`m8?#l&gWf-Mb;_Ei*$>Dl4OFeuP5Y%hmTb1YNgj z69~Vd%bPT@?ytcH4OUn8S6H&^vycQM|?KM!RWCt{EQrIWKZoc&FCKJy|7wS(XJez5mH8 zZcCex)M6r0Rb?X;ylCp>sXG^!Tzc%$qscn=_mW%O)6=TkbygO#r??4xuq(c`Fz4>7 zv)&6Trg`k2a!g0Cn^DVQ=N_>w2l=NQHIbU-{EG9!miCy3XHr0^LCbf51G45?Q?zknOONR?|P$eOQ%Sj zdTZiwKjgggtIGO&Rlltsi@i(t5y(EW_gna(ALZ=on{NGhb!A3T?vvB`^P0S7auhgJVL5*74Br0PgZ`-<5057@zqy*;rie$=lqC^*3J^?5~gBc05?4 zDVLEik(K8iLzuM_%f4jyi{?$7GS`*Dj!a;FV!RRMzo$3z$Ri08e1bK$kx z)6c0Z7Z>=S_xH7YXDu7~YJFf z>1f8kI9Dsb>DnoU3TQpw&Q*e z)`_kad|ql$ZZh>~T%!xGjc&osr&H8I>V(s>)#?O0>-!8M99+T&7xt8Yp}00EwsimA zYgHHLsIR)`B~_BYwcY$>{Oqq$7yCD@KKASJo>%u)-)Y=7ef^9^rB90e($}|cNsbOn zy%2uF-`{oW{giiRsk`H?BQ9^gZU2$;v|R6`i^8tPu4%Qi*py%IR$BV4dy<0sIY-^w z+~4iKvqj#REb~5YW@S^FGq3K4trks23j%K)_t^B}cN~9M1VviHZOvfZ^B z-PNRZ(^f@m-Op;~-d4hCSEBzq|Krkl{~n3|yJz?+Wt>UsJN?W(ROXrLyom6AmDzLO zY;9T~ALCJyh-|Ng$_ zcfurRu8gP$8qeEYV<&h$Gd&iY+kMt!hIoGNzOXrsDF*X4uiA5L*W>LgzD(R=eVTpl zZ0o}G(w#@k{-&%n%w$X z({Jh|4qPwl#&mRXmP2-pv)-Kv$vH3oStqw<*F0(Y zf9-3NM`_*yRaa;BzKzVxp8Pws469_y{E-7sFIeR5Vr|;FT+&v+&-g{`ap%HD>&D-=CT6#4OMU51*068is!^a|c6|7MAhUeoqK^!uNICmnHd0Vns1xmscMA*r)q8Li{n;mMtB&FH9=8b6&6d z!2f77_m=Zt>)BWt^sS_lnC_pR@}NLRNG$!E()G_rb~!KBp1zkc)^uL$vZjc#oeRy} zsxN+?lcL=F$*e}NxtxJ7JN z@cr0(D0slesktIeD4WTowOTKo8+@vME~Hr1jvnM)d^_I>s7 zUD9DEIY(~ElttYJHM(1te-@}*W5zvW>MLpSsrQpR*Y)ui{J+w+ zyJwYllj^R`U96p(q^>-=$|n=7F{4FT=~>r`zzbDd3OiaJ$mic)@mt_y>s-db@-sV4 z-&PfPXZtK!B)j*r#nK&>jkO}3vMpeR(N>r;Ejv6-N!f9#7&#zGi_C|y!ZA>9a9rS{V>kwkB)9i zmEFA6(I|!|tK`GRpRC!bzfLlhEezSGbMf~?-ltzS98kTV*%+O3>+PM3S1)_)uA27Y zDNm%GKKCtVoyl*1$+zuI@6yQcUOM~3-eU7f`Yhb@w%wYYGjY|i>t7-auF9USc&w;& zN9@D}#rluJTaGC1?6h9a7t3CM+%(z7Qrlq3SMzJ)^JRCQz0M`AA5m-{p5Wy^$^PAL z(1^m{@Ap6N(P#}gQ&*HUEzRS*gvi?!r!A`brr&x}@@dTnPM58Rro@3t+>y@*ocXY3M7t@%3_R`;<65YEtHd#n^dhgy;E3$Q-wFc{5k7We>xFZlk7}3md2k=R z&&{#qmGQNN3cij>jbYoT8p+-K@9_v($n#u9r zcsy0}f|JUk-;d|+Y*IIAT9aJgx}!8PY~K0PkKRFO zd%?U<^RZdSk&U)?JC$w1Hk)x5sJ&hDyVY)mnS@6F?!tXdCJ&V-YMhOG_ zop(P{cy@0o?7jMH>!AtDQ(vi{+Qxn>u;8pt^l>fywhKDU|5a7t)ib4s3F$UAn}>Bb@LoOJO83t|h66MLhKjb;g~+>`9@-7tq` zHm6|SlC^Bs2J>c1JH0adzTfA1>kWo}e}PU>u02<#vG=S|TAO|`fhD_fZNAgnNt^xC z@5wgYa{Uykvm!Qs;e-FX;~8E>rS50ga^xQ4g~ysZbS_p@yTyw)RK3&tBlGc@w7t8} zn&$bcIo$UBu|GJ^_s&1g{71%6malHs*)NCuFMMsDuTa8%_`?Qidv~RC2lqbK++wnG z(f_wAY}JnZ`t$H*Zmha=>Xo{K%ejMhJrwr(c0m2f$;R`^;x*IKkAL_RbN_~=UwXl# z4W6Gb{JpVqvsA41g57atwI6Rj)Z8Dgk~T&2rfD6k$ky~9T=!WS_S<&cw|Aef%2WUN zg_-_>xRsJ;!bEnj`FUfxZ(Q^EyUJ^Ks^3pfV`(qpTdB@x+HQQ6%lo`(?dkbq zI{i8|!HdtXof*q$@oA0oo(+oy14_*Ls->s;J#jnZu5Ubfis#Dz(z2H)SsmMZM<({& z|Lawewfn>GC$c%IXKvlF^6cjP3Zcr12D|es4>UV&kY1*zTbZdTUL||Td}Yi8$L+>5 zTRNWyd4Ap6lwRjp;C6jUzvsv4Op{eO_Ho#km)%~tA}536=I{<+P^l&ZlB{CVt(-D)Qr_PPamf{_%jgg^wTkFrE1M zwqW%<8AFk!h0hp!f}0pzE+2MV(DE}XvGMi>_nzpCg})wo#wp}FzxdAd!=uATeEN*- z)pw&b*4dV6&foL>*^idVT?aO^?iT*gci?c$qN`WrcPta0xg*SL$GOKFCtkezBq~wz z+=U;d%7>+=Ob$Dm$9Jd6yku3-q_QKErhXC)QQeSM;i8bTGV$oG>6t%scAJ@a&HJ|f zo4aFAr|>3+Z|j6j3_Ur*XSwQSJ`&WH6zQ!oTVHD073k_$DxA3Jl9gnb?DzfA!p7>h zJNt#+PuY2$*J$<4Tk9O2qzvdL;ah#VT%8(K;Y}dMD$ZOZ@tQZT@a6+gWZW zny*xTu<@|;@(t1#1NPe<om@lyy}mB*VcZ%GrID?A+bHhRs~DuT0Q%^e{swW zYgUElOVe5V*lqgeB(k%Zhx|zWTvgU`e9|YI)&DgbKNU2beSYif?dGoke_kEPJNc~&<_zpW?lZMbIIeR~OKsHS!gugRUXcQ5w6 zR5T4UH6q!)@-zJ7na}b6nVHyGT;B#yEoUmi1wq4{s8L(%x&g z9zN9>Z+vJ+mfE5)j}3XZ<&!g2j=uNTlumZL+rye`{c-=2EptVmU0V5YgW=vCDOv6d z+7P*TT=L8mdmZY%^MF#Udt_ix3!s( zaklurn-|wF?mHv-Y|U!DsR73|Ud+?BT5J{4KX>NK&sz@_iUq9cFHL)ui_uq##M^%m`?FL*k5@5Pgk{)eNp0U+cnJg<@bLY z=&g||PgdBoT{osTQ10xiXLlza(%~#*F|S^GOHd+Tb;4Q`NwbA1-*#vpbD9}(qNn}y z0j9uT)mNXKIOg5nE6|)NvhvA?c;@&8j_ViPN&MaQa{Jm1d(BNJytlUTEvwL2G393O z;XIe=xe+4QExz$wSp7F_-a!pBjn12He~Q_UbX0zDEX#Z5T=~G^;oloK1dcq{kvR4J zpQio3{hyjko0tABJ-q2P>xT2(8~?i~@HupBU=%kv|Lb?mc`hZZt?&4yUt8KoXbUu? z|DVe|WryrV4fXTo0&I!33U8UuA6sMiq;YXT{;m%y*LPUzT#gA*vp5m7>;HY1^>6Kz zKKz|2T{c&vBm1?5!}OS$?+Z7t>79A`(AOEaz1RH=+a~&T(k(%`)vs9HCd_M>oN0UP zXw4_FJoB~H>r{RlemUc3#m2FzU0w6qzm`S4+$B0wPPQH?jXrAicD?=fcFkpR=F>jg z^WA4|-~aMwR{5Kk*H`*2Nze{o`1XkI*;C)o^-V85a=G%)-*12Q?_Qmx>$&RivwYFL zO;$7PU+c6-8@xh1pH_V8BT(eK9pUX1( zOe@#@`+H8duzce=wEo>TAD{S;EqPOmQs%nrZAg9k^1+hV6;qq*GbUD7uGO$Kc*MIy zd%gQDu~4S{hixP8R!nDlw8F+KMj$XV=#Tx@0~hY{eOsvBn|$GY!JRXF?(YgMYvwrEkREbgfWM(bDU|j@=^c9ky|otbZ=>3~1|jxlWoO{Yq1ZcY0>M>cI)#e^$o zYi9XG>SRWD{1%xPEVlaHy0a!Tq+EAu&o29zb}g>r+uE|DAysYh8ZD(BN7hd2Z2ziz zOQPxC{a0M6P33O(mlyVI<^KEZjBbWUaFf7}vcyb5dmgRogoqi|bu!OBC*?d#xOPUL zE%=BPPr=JVBeP>?`1t26y1FYl`;Kbqx&|AzWk)I#I3>4A${Xb#T{ipV>6F9fUO75P z;wLtKf7>-ztGma%JHuL>yJn~IjPu$IYY@tQQQ-|6G8&hn!3wDaH`*}L) z$TG}Mvc&t=ZyB?Vw`Q$+u;8UcvWU0ej+#iBRjr4s zt}o1SVO?bNDSKMY2Ah5NQ`XI#-W^{-3@7c0_%>`81ICdd1x74Q~UF z2Fy`$pKY*ut@nn~gcUo=^c&7~^B;*2I=}O@92@WDdCpq5cgZbYF5$AQV6$<@hC|g~ zBW@|B=VmINY2{WejF?cl>h$3!H%#5Hdnn%A@j5hiP9qniu#(=}tj+mptC);a6j*Xv zwqJRf5vb>tE*kY>7ddX1+MIv2_ zchW^B?K-r`eCP2M+hoPpYG|w!?_;s*dA;h+;~8_`mlyD5U z8=JBOE8M)FHyGE6er4Y*#-{p<^OD@jW9er3fB&{B=A~San3rTH9&BOKIq~Y*4C(3D zLOo-BEJW|BsGIH!{dVxuC0`NyI5i)0$%wmc#PPa|1Q)eBwe9N(y5SZYgw}6q-p+s0y6=DMO}WqJ?_PhBXq)hnqw0Z3@@uWabz5IMowxZp=i$L5{ha4&vk$6& zY!r$Wo68lQBfi?lB6#D<<Dh)cYCO<>&Ar6xCw?wpsbyusm>Dg8<}JnQ`bdwoT=t-b!c zOI)%oWz3c171};tQ@atlxw6ZwTpwI$ihOmFYlr6T=C8l@ZqIJ5-kIsD z^|!M2#Iu`^Wq);T)Y(*hRpOAs(bcyU@~57D{q<gn_4;DV<`NT{IA|To=1zan|heBEN-) zHW=Km0o68HJo(RJ&G$=8pO`Jnw&RP%OwRDIC4Q#AoV&vw>&Y0)Za)5NX)Nnqi!aX- zYsyz|e4QpGBsU{JMQ;DCt+lRfUy8!th(xCBo4M%i&Y2(H@*8fq-*ZW|@Kc)jG4jT1L;&3J(4wCVaK*(BGRDjEwwOUcc$j{8hig+`_mx*w!t%%qGcoyU!iv z{MlB!jZKC2>gt`ajlZ~G!4F)%lp<#IA>o6)sDOZ2xSl|MYP za?^}$YUgc}k2Yi!#w@zRbXxrN)e#*1YNMXZL@a>c92B-h0&8*wb=Bx1Dj_Ha`Kz?HvqH zzVhoXs6HSurQ>mCSLYKg;fk4Y1+FWSmrZC_|FS>X`{OZb{)dZpo}8KV*+Aat|MK0p zCgyk-E{I>fLUa$q7shJ_X|rW>ze*&B+}`|m;uN9w;IGGa3a;d4S5!&O;_&lbYiJSj z>Amhs(=$fDexxn*X$z2V>(?uqn-UQ;S71lhjv4pDTNZh`JD5B?Q}AY@beJ<+nfSjx z_fu2zEuNm*D6_LD@`$^yed^+~6Q8Vf{kiICntS|fW<kIxdGfk9w{WUZ-r*_taBM zKKoj}?s>iLmKx(P-j_d2m?IH9RoYMUn&|iGJ&FAvl?yI4iBC(8wU|7ksGV!y!JQ2o z9FA8#6tO(+bWr|7&}J|B)0d7vnt8`+){gX=D_-7D=g&==bvQy%`l_(-?8gbqe|9@e z(%ZGMaZ{ zPI_XP`*`s>+eQ8*0@J>4Qja=N?vnU(m(GeQ>+|ob{o=oA+Emn5F2BjseCpdC&g+L8 z)_kA%xN+IOooQi>zrwkUH9RHY5l4>eHLpPcjWjer*w5*T)w=` zXL;SPf~dBSKFhq4y}GyT*6aBYd2SWql|-PKQhW8O;5t6^Wm<6q*_ z>T>^QX62)&vvT4;8Xa2G_n`H;MQT#K@!wll1ykCdYb*OX$KA-#FQ4LSWBG@>MZZG7 z(^%_BhG5!5wp}r@igJS6wlBS8{;a#$+}r2#`}q}OjMojH^YKiJ`1m!M|J0#9m+Ry{ z%SW(fgevcRYj@Jxh(TKZ-Y;u2A5XRW8y&)(j@I!o9JrydXuW96qrAu5DjMm1VJ_NB zH}8CM>DGoA%a=QrTz5%cUU@_+>`cXjM>(_ed?eRS4|Y@gtK?s_t|4mny&XK+(+@a1 zdCzPWS$oFw$VY`OyB-?-Oz5e*!FZaZ_0bIFoo%ra>1+Bz3WeIjr<@delJz~KOJ%-a zz!s-OQMWZJ?AM|g`AjbE6U;f~^{UcsuYA_zXtO6dy=|FJ#(Wd_ub)ZGSFVg<-FWQteQ9PvMbn?dMeQVafUAI7lJ>!}8x^TC~S1w%Z zT3fmb59DtMI^X!>%pp|<(ek(>q2h8&F7h9_?ELQef3c*4|6Q&h&JK{j=U~p()9QYU zr~Sln(duXOeBNv+wztuVmp?zNUG^UD(b+wz_m*#;_jdoYjenz@{+@o5bN0vn`St&< z+Wr4~u~H%U>XIhb3sDpGLL#E}+5P+RLwNR^scSv{pWnC1=epQMp8p23x8L;_EYCl# zWbP4hg=_EeP>l_)RvWe_+|(?&`(WkMX=#6+-*|0RaJcQS!~F}3ljgD7)*NRKOL%IN zl=+V1>svdCeCvDbw(*|-cC7lEWMbfFId>iTXkH;k|M^-xpP$?@*xNtT_3f^{qf2`p zW?tl0*L?75t0RZ{npW0VNmn+w8*TWZYct_h#(+D9G<{_~|LzbfPs3#?LFY&$Fe zhd}zRuVLq95Qre860)Tp4|~Vyr5dK zt0&=3h+0|2_ixz+=Xo7>X8!czmT^Dk5$DZrx1fdp+_uvv`@R+{FTZx6Pjq3 zfxo}*JKg!V_5O!t*Ewb1-l;v&^Kj1+le&k`3r`tI$+ed}I(Yqnq_Eu`@8-4VxO7Si z=2_k6el@vM{Ot8MxwDTVFCG+nb#wYdIg3eKwW3(8J2vlQOKtt!yqEpMsw(f(DK;xl zYd1gVa9W(aa?Zjww>z+@S z4c+Xf6Kt`tI*{ zlqAER?>+GQ!o0(p=I?i=ss~nS@ox*%{d_v}tf6{ut#Cf4O%1(UEee$w$QFboX_f*X=&8Xm@J*fQ{ zXL0cNhd7Iya(z|nuCBW-^LcO5ls{TFUw-#(i`Uj#uk0;*zMb88$LGYI>-($wqu=FQ zd9wPQWS44=|GYP8pJD00ZO&@@!+fqf*G#-A{?@frQ1({0SB7fN&x7sX^197~Y920} zW3jNmd-9?7rR`fE?LBrlYhv0J{d?WjUiE8N7=L6<`B!>mlgaJr!jaxjpR}6qU-kCF zo$vE{GQIKE4ruI-=`&HmiSCE#uEii=QUDpYqAo7Q51OVA+@aH=ND9sV{#ldL};m z8s~|dbGIbht+}$2cfN|>+*LbT)-^@k|5fvEd5*w7*&SCN-1ErVyk*L%-N(5?TQa|V zJfxysK81DrlFx0ga$nsJ{`2?a{MRDd%j`Z?hH>R7zBy!)QX!nT?c2ehHr{dCPyRI= z4f<`V)I4|cvyRmtC+@pjxpITL;nnJCsX=xxTAods`TpoimnCHU7KHdB*Aot{f z#F0`j86~~TM#i<%&VNqy{vRiHEN*IYwOaRiR(Yv(;fdmEtF))MR>a)ja?W&@p-h`;Gfw#MenJi zPV1J<+H@zmH}mh|w-VV2k?Cs`H(oUjinv~QXY=iZb%ox%jo&WtrOta&zGKR|PaD{B zS88AHN@ZLUEZ3(xoA;R1_9rq=f_o27^|L;DS3=NE%*S+Ny;7XZfnA%qkB10P%Q3gR zYVqtf=b_^@3_hkClWeLC3nor;7257GRlAh?<^q}dS&z;vQJJ5W=M!ap>QV67P9Hzh zhoO8t0bBDVgG8HVCtZ`0jIQqe8Nw5{UQ0>5Aa}vP&f|NROKtC&W#uwaU`ndZ#>M=< zYL3nN;TFd7Oe&%%=J3oG{a-P{l2eNL+WHEN+*Rj$$xL^O6!h}nRB2H5#&(_P>+t>G zq@zBUHnHlhjxbJrQC~CNa#PA~UYEadN23pNpF3=|Z{>umlh*v}`=vBQ`oTmtIZ}2)daus0OG;+9eE#%^ z*SyEo??2<7GTBTs^_tl~%eso#i|)R8hrQlSmRGQP;q)eY#om_hnIGTD^S-m>To97G zIq>-8weri>OIgN#%S)Q9rM~c%>wfnm6<1SQ<#{eO$DWc{{8YVNCxLUi%IT~6J`-{_ z39gs<|KY2E-Lh{9()PWM?dji5xUGF=q#h}^InLWZ(Ud8Enmuw? z_8*rhu~Yr7Vp7g+qH+B1jOYis-W%gqNo9A>73q6FXJxyd_>Ad_c?Z)1f6M&ly4Zbe zZnslcx0t&|*@GqQcW=&qFWU9=?&+1cuBMf~73g2K`Bu0;w|(jtYrdr1h4E4@+4=mH zmN%?U?zHhcC{xsYDsXwDl*Cp-S+N%9Gt2^`K zrIase+(G@OEB3yAHmUaVzW#e*TVJR}ELGkXGv%{D>f0-f)yFfPd2VN%{>C}ov~PLt znz~=Y#bR4oyOw?3`OU2^wI@@1TkZ0XZ&&ZU%sMM-&6B>Ts-~|W?4B=Deca;U_6a2q zL&}$<5&1ini_iBS!Oot@`>;G zHvW9561mb$d)p+L?Zt_z#cRTZx}rQe&z}9ht}xa-(o^z_PlV^ZDe?u|CK-8_|1Z6f zKIirJJwoO35uPtMUQJPT{bwQMLGvc+`wTVL~enwKa=xC`WpRZJU2|*~z(^ z_-Cn3pLTfdvNuU#S@E4S?w23*diCpGifStV4&K?`-&?M>@7#J+%QVvSWpewc(^FEz zg4)(do5p+#czN`WXXp9GnP)cY z`)j;$H2Eo=7IaKPcc$me)~o4ela1a>-!s^^dI{^=?0qi(GZJ0Zw`zP&#b>Apg1dEFh8PHFM)R#??{^G)>M1+pK_gPw2eGu-_W!sakABnCVccea@e_VmsobauoMz=PatXYlXMV+lioxfX; z1fOx!5o_A#bo%e{q`!;AMY6A+`Lt+ul=z0SyBvSyCf!)|`azXXq4cdJkuTX?;(jw{ zUj35wanstRX7feYe{|iw=V{wR-cOrp@~KEtmPjZ_h)IuV=SZ@U{jmeeSFO{t3GYXW%t}UJN`y;(b3rKz`nT$msu~F@qcal(iv*&=UHi9os{17{PwORg0<$~ z{8xqj|B?Rl*Y$oYvzwvw`u6{EQuJ4?Tj;k>>ho)ZDG4Y3Y?)rj%Co+7{me$8Gb-XA z71SCYTHuc<%8`-YE$$boOj+WO`PzYpWcamqE$ObJGi1&*a`uif`N@z_Qo! zw{fz@xh+o7UiW&=wFvQ4K2JAW*syZT>(4m~EQTv9Y+E=TFPyve-7$vo^09L3^EC@u z4p0AR9Iug3_5a=ZoEVO#cdyeG#2tFv(%#P0pOSFm;eC+#UyiFwXe8WF+@I{onP&I@ z{B!$No1W&r=aRT}eyJVLl!Oy|_MYZo<$3#D{kPch{~^4`Hb*XKSa|l#F&)EzrpPLF z)nlURRS&D?eirgF__9axcVY}<@Xu){lUs#&t~RIhI&rqGfAiH~T|;IFzu&s~3t0~L zuTHlMIPk?y{KRGcDG4i--aNm(utBm!&~~amhJ)5>|O?6HmvclThQ?E z|1Xf*7n~paSXs}!yT91ZvPI~On)v4$aS?;%wf+AL0-7RAI`{QxC+OKPoR{Aq=~ zbq%XXx|^cec}V*7)svBgx4n!+6(!`ne~|_I!*oE`DDMu=(JwBU|2F31 z#UEmi#Uq`3I2LW5sQy{9L;GOOIrTJ&Gx73v#^+CouG+m+ZT?INje{#zpXt#~I1{SI z=4FtiZJfl!Q9PBiQK)CvsWUquB-62&)T9M0i`N+$uWJa5o+%*S6c9dBFnms7_{?qW zQxdL(rX3SC$kG;mx>LxYC6{Yv>g4of7dCW9mp=R zc)ZT&su`;LUuhXX_A&sGD7GWJ-!L56)6c4pO@+E2>;{R_sWS^%dv=~W;=t(^o0=Ab z;*uGweR!bWO}`VmY_}A|E(l4ajcRON#t)5+pK?_R#n0sEeq3KVb!LGo+}<}AVj7iy z6tvg>f2Qz%|M@d=-^#y-uk3f5*IApp^sc{Y)3r9M-Opd||NrmfeEF1?7i_jHF^2n0 zYV=E9muc*mTRL6MYpLQbc~QBV*^6xdud6t3^Y6zz_uFr)QvNu$-#lXwyKHOlM#)?J zyayh>$APC1>}vM3j5mXzB_EpSrb0 zY~7m0wdam`F5R~>=7hwjiUe=l96$GGKL1i)u5o)R*50$B?y{w<;r0c-QQw@;MEx4!o@_F0-x+6#aFZuB(_|dOl0kihx zWY)h+JQX!d;h#>Z-_&**)?193}M=pV|Ld`sb%jyiq2=wXlR;BXA8Tl3_*UZHbt_58 z`*_QCwM%)$o(WTb9t_p`-*EKYHm=>)GgcQaw>hkL*=lakv~|nx8{R*X(l+f|b76MA z+WW4sz&q-lyB>8UF+Gr9vRGrzi;V}oR32n>Z072!)?cT;bSdLZP1!i<TXwAruBn$h-SzHGg+HfF`|(p+s~U`A*6vdN9d3~(pVrG-yx_u-jtyQL z6V5lkW#9bb&$yuJG6-!Xmd| zxAm?Ef^$v^X-xLhyL5KbONBXZ|JrP~R%<7;Bu-kA?Aq4)fBufAjOrVt{!}sN%lTD) zNL`)3sqX)e_!~>kOfFFg5HZiZ7s-=-ylYeS1IOdr=GES|YJIp)?C9Ms-VatNE8mN% z46V!OmW*F4x2VpESx%hC|9tr#z5lW=^}LeYT`P;E=1t}bd%*QAN`)!UB9MG zF2}*B{`QRo?tQ1%{Ylifnf9=J!?I|t_~6<6av$^l|18wCo2eyjqa*h4RPa`|dx6T& z%Dx4i-DIN@6A)6Tc-(LO`{=@+0Of5l6Bn9GxE{WevwG*TudH(wc9!kf6}KRHP*7auwpzYb^5NsY@0yfpE(HB;v_r!x-o-~KT8AAI3p zP>9RoihW-LT{0_0C*Gd*y>W5Jvv9%Qr1!_Uerhe+^5GTx3Lmy+y$N#v_H)-muY%21M=h=dXkTkhk?GlXb&IXG zn?Zigg$q96FKrY}Lj-pO92bmym^9({(e1wvJ-YQ!qjy8e?VA5K(PiKM3#J`kn|8cC zd|KMwjCEZF>+I%NGb#%de%#Gac#_ws;ClzpT1&$x&v|Rrt<|?h_vEb4-{r9FTB3NK z*{L)x-J3VIhkd!zRU3WWQe$e~li9g(-1^S(>FjdBE0-5kUR7pi-9GtRe?!R~_x~-+ z`+as_J`roE^kt*-^0rs9={+GXOG7F)Mn72-+B%(kNB*77X8#^6c8e)-aC+&I;S!+1 z{9VqrUgF_o*FBC|{jJxdj{SSEF0yL_&t%5#sZ*yde0<`o#(ln}#~-Dwi4}arsC(0W zO@Gp*-7keL6HaaW7u$HF`t($F>vcy}Q=^+xH!)3!|IXXL<8kZOxl22QJeO~7d2^C+ z(J_N}0WZF`MT>{{Xm&VF7nfcs3dEZw7Z(4`_hNlhgxq0#FjpEju0to->C70FWGiRPpMA(#=h2z7S)qB zY4FM0S=LP~T)@Y#IJZ0Y*s0a(sc%yZ48q*r8HF7)lhjV0-!t`x(KYk<^)@w<+`Rvc z#8?ib>YO+{eWQYsUb3TH+%YcRPeNfG{inkx7_|4!doW?WhQNK%bprhHfr@rDuB{b6 zy0|`m5EXs&RGZ_7bGS%H`#KE)`F)EVY-(ILmd9OaJ{f+z=*O##Eb)N~^OpNJ{xA?@ zeUzxfb>y(SdfD`iM!QZ%@YD&3O)mba#qwzBYM;DIq9Tt@hes-$43BhpvU<&i)8PRn z)7Ohh7`*KIut}76`kKCl1q}!5PKMr}^-seku={$AsFLnN0pDpq`;`pU;u?1ZDctIe zE5BshmhnFBP+msD|EKwf6K3k}a(*wqxL#-Gd9KMuH#V$fYxX5~G(Oeo z&pqwlb%`w|pZy4*uvXY}9*d-;j~n@1fjB*P5GUvYiy36&OBZMvmp8V2flw@`ghN}-U{cwN1`hx9tzTL7WZBh))jO8 z9^2f6`_~^yY<&HAGs8ynb7>b9thJx+d+xtM>B(Qu^*J}V_M{Kn%@P&}kzcz^5Dbw?(=V#;w+x;6E zI}X3L;5)(e;itOH2bO0g&;EVopEA|{KvM3;ut||oF+1+*t`!b>I#YYYvjr^6b>@f~ zKb`SoVP0(>>z^~W>8{6A%N=fB@&0M5AD?N?^x-bMdu+yuSe;K= zow081({~kmz4-BTZAkI;HqqX=Fjl>}XU}+DQkinq>6!Jt*^$oL#^nc^*TtQxb35H)ZMaid#@_9?sr1S7sueNG?{ebx^v)Pbd9f_bFT623rNjQ) zxr=Lc*yb#bDh)Hx$*uda#&i0H8`^QrA#B}GH+>3WoM!u=oHcIN)SESPqQ#apZHlU8 zb$fo|0b{U^OU3t>x*Y%eE`C{7?bi}`-yCo@%Vr35+P=B%K-2aU z2bz93p5SM`@>sFh=CpYE*+NFK`AsL%G6m)-R?UB2|LRw&@#XX|kxv^UqYk7^Xxe=9 zm8pfz%1njrJsH=wEpI)(v0&4Lb?nX^y8`xW&(XCmn-Or?ZqwPcy)$(W9$U!O9pbX# ztzgARy938q=lHEp)xKA4$~5cjo|OR~imxA-+?5bv{>?ro=Y^=${&NQ`RZnEGKbG6u zbDm4P?|`n?N%jE7We#lyea32E)^Fc(fR!owu}|-dqE|^_du}GCH9h~I|MA$)B9&Kv zlQ(*3zPs&ObVW)^ES)`~#rxQkmhH^hM`KLg`E8>5Dm+U4EaT!DxS3D*wG^CP`+f7> zot)c*!ww#~`+J_H(8E1i5{+s`yIxf+3|Xh9=UO*!e(>vO?`%U%u05^^t|@KXy?T+> z_mq8G<$AcUXr1S(5V9_~5W@Oy(#_Yb={@r$VnsuDcP?!|-Rtu(sz{#uli8wWJ*R(n zaGpx_niIJ5_-DD|7NNV#-~Fr6xyE|IdijIY?;=+Y*!>I&;9l*sV!0!0pw#W8y+Tdp zuirf1Z9cwn&phSJ~N&C9jy?=*c2P`h{O!^sZ^eO0Bogzr30t8O^@E9$w3*#V(l z3NdNy?`&^N{4q-VIsILh`!?0>i9gpQg*~`5ebTju1*ay)_RUMqzt3>+-LiK*i-V5@ zzIJX>*>Tk&?)^=V_mlo++$~!>AwH@7dhvV7_4$(CU-N&?yX@!xEqwL63eQS~;?v^g zM>m|gvAuoLi-RneEpuPwuHE~4+vlRg(YLR>F1zUKclGsK&Z=0ZWwV}kY+vnHf3MT) zoTQ0pQQrz{yYMTyQE&FoUtyklVO^Jz*5*Ac8&`y@=1RYo?1-wpeC_RG{$-iXmS2u; zN|)nG&wga|UV5SAWZQ4W4FVy|dwyPTT_d2E+_iGe^t$I_A=Brd+`QsqdS~dI=MlB9 z-<-_f^faULTeRYFI>yUvVwA`xXABBYXcB$3wCc z9a)T9o&?IKuZmqOcSvp4)rjq}x3%+R9Up3|mmF{QSYlu8*7a|}*6FLe+-_UEH&rof zb$7dAcxRcLw9eIMX88`gS8o)uJUr2}J#5>PXJ$)T-Wq=WpJ~0%V71-(jT)Dq89e(e zdpof8{;FsDHT^{hBtNzaq?{}KwQt{VW2OI9m6;)zzGzI@S6Nv(kxgsYFTWFqB=d^3 z9^|Iv-OZgMTOP?ZY3Y-uG|q6jKJR<5L8i z82GkrzLTe-!yNEDTRSB?I_luXMOp0&j#_d(4E(F0JIn9xm0S7~9SVgvM*Pn-&wS5y zcR_ij_S!2>Tn{H@-hHynHtFx2s}rA@G{uU{v(2l%@~`G$N7L8W{ttg2HCeR(?~|8S zc21{GrfgWRz;soc;jHDc)cMc)>nEx@p60cV?xe?RsAd}nhBpM6rFWzXlU+r0=?zjcApS3K%>igC+X<^!C; z>|Z{$#2w8IIXX)?T(AB|uGN7i-s0C@w|AWodYyV%^xUmgoku6GG>#G$w}`)_m)jjb zalhD~$olRl(TU$SPCjcg@8iK{gP?tmN1hf|7v^oayT9&+duH(A%Vu}(iF~bbn<8+F zD|PGSunDq>>s|Cehb`w1>vwK{QPTCoY|fzzQ^Yz~Y&xf7;JP?3)ie5&4}bNPj&qe+ zkJpIZTb}AIvVG;6TiN@z8Eto&^n*+6vEBZRL+{k8J-YU?{?Xtx8EEZDj1u;U+I(_G&9&w~zb>!cZ~9aA=+eLS_1ACT z7hSr;=YhG*ss+K`u7Z~%7$Oe`8Y%`D&GF?rHe14DVT#rFgQq9{axzn2(&Es?^NwfR zSJ4w&UU`I0nbY}a)ovrDCKczEdnQKyDwPjewbXiZsnEj^1~-{0+*5KCYy(yMGmH{Dd`-@WR+v38o^lh2L%x(wm& z(ykHLXYx)~aOPS5M#>{y{f^AbCkCWdT_M2}Wb{}3@ zUEp+RBa74~<$X;-#~-kLeQl^%w z(+!@)ZeAJ9^DoOv)-R#fXZd0aW$)aBw?mgN4h^~_`ER3a$M&W#Tz8UhZarVPvs-_` z#43f!Ys&(a&N=MSto>(rr2b>c(-Z(dgT?md$BtYOC=~<`W@mA&HtC2UcrT zoeBKTv}uO_eW4hxx3@0DEsv6`W(sA=D%#HQ?cugFu5XFSvV zo=GbL{%ms)t6G?uqTG-%p_}(?(N+hw--Y^i8XT5yye^n6=5(CLSGcjG%HfP2L**$= zhLgqHSdFe7)mAtyEPADHecSS6w+SsG595WH4ChU~robI(W@p9Zcp<1vUeC^6;QFiD zA1od$NAK@+d(T zi-hZ^ck(iTb+?WS;M-Gn(k}{IGD-p8`31PT!W$oI^kN zzIQOI>@h8U_3%aV9D(^PiV3#YTf-(QJow0B*~RUoRC``NTcg6R{n{!=q2$XKthKi$ zeV%f&nsw7nzWoK)+MKQxTL_x0kDh8&$9gF7>W=$s8sC()3a{4weLvd2!{^iq?wji2 z3)xOh$j_8Mx4Nu0<=lfkZN=wzZF96*JCDoD`R0npPZluGjAQyd>+tgWkVfHKQP;yy z*skBNZ>Uvt{{5dz3>{tJZf33*#Md7CaNdWxjX~ESu(kLVQ-jr-#Wxx*FsdKto-fTROQ)CfZ8C4F zkqJLz-7fsQan5aVS;GR#msGNe#-Y3D~e^$|Jmt~cJ?;IgXmxmh2Ys+&)9K=zdEsgr9u>|9*X2#b72<@JQ-P&(6G>=?j_yb!$z9PRt0mT$Z%|w{}UL z?CYq*)pNNWrT@rZPc6zg&B=Um@8Tbd1|Ce03Z%Z>db!)HK)Unp?&pkW7cA_0&Li)x zl%;dQ$iK74B}VVQ=LQx%Wxa#yD}?i>GX}o57ASnqG`;(a!<1usp1cC{UTxE#(c^Tx zR9cy%|L5gtz7tEnL@4OckK-?C`0yx-4ve-(}6MdEJy7wBj0deF;anEvzK1iiXt`H9VDi9Gis z6&}5N@muV~ne(|P#LL~|*GTr>>$u6dN#a^#!O;v6k2a4t7ussCgv@q4B75n2zvHtE z!&s9b1=hxR9g9+;ORZjZs6T}JMu)VSY21s zUrm8f8Sjkh+lt&-27QiFKOHrr`4jH7mnv%B;8rlZ&1WI-@~h(HjdjlKvsN0N-hYBE zAogCC;OTZ9^Zw}%Io+yyP$rQ-yMoMF4fA^@u35ov#g(5gw9nUQPjJ$w zSAH9Uw=qX-dAF$DW##_|v#-o=OWCxmuJYdLm0kC1CvGUHyXd-MhHLzUvMcY;@qIih zbn-!Hz@@o{%l)`iYi(Qn%y<_*Gtro7^liKU%$AB3M*N0xu1b6C7hbzJow?SjlVjzI zYkZPloD%DG<`~aqJb7aEi!JfLy(U(jnYsSJM2TXx7`}a{CNJI-v^if%B!Ks4=rP5d zjo+_nzg}`Anmy2rW5UkqjFIz9?jN7X**ob~UDwWsk)OG_TOt#m)Eu4XlI1<$$zyY> z$rVffC+D6Wys)z|C{q5qvsiTUjV{ z3mZ8?K3Ptzek1UZtuV>W%YtRo#H*$gIAy~gCx=ekDDqaJd7;od*_Recj>>_@US3!7 znAU#E{lg88p8@(FdxHLXRUeNPJ9aMI+Oy)EbOA%iPPg!~wg-Gao_Wk#^jIJ@erM*9 z(E(TuylP6>geRtOk`n-K%a+TJUj?HN=r#YI42eU{eTix+XSKBZv zNdNzd1(O!uwo!Ngv{ZxP!n7vNmicl9(sIWIl;T8LUvBkp2+8CBz$Nia;p`v7{fZ}y zPPK9DVYsKoCmLk4MmdrF-?InvRzJP}>imyd@syvX_0AU<_Po*W*Aoh9zbbDukDotZ zXr{;M%>vya^E-9Ey{P{GBYwHg?(gf57ppzGx#q>;XZ#KOFC36FTCwo3PKi%-gU#s+ zMa!P8+S08nc)RoD#$wq=oik6QyjWS0Gx@^rt?fI$9~Li(Z+rAAqe57at76Ud?_V|c z&Ua1nI5YLu{)?}+wwH({PuS|8wWZ2aDdO`Q?*p6le40FBGdY+JPgWHw+qGl=MrZq; z!rxQfc+$KTI$T#RuNE$Q6Ry;~%leGd^Gmaa>qIDoJ+aJ?zC6N-|^5Cv#;-*8Uo_^4Wu(gvyv-2 zHfXd)zS!$?-QmLR57N22w|uTPh-RK?z3T8BDw?h*-+CC=3+lDgVGqc69W3R>puNHp)5qsA}jzxsWdR;h2* zZm+4)myc@}Cp&TQcqB?PWR}WYa`!2kv~U*3qA6ebBK2JP1Yc&Rp15=Ka-Bx;ap#`B zHgmWq#=Lg^FBPZMPuJ7|1Z=3ME(|m#a zKRnXpGsRNZ*dD1lUw-WlE3auk6ie=_vuTp%IS4@8HoU_bA;MEhce0Pm0y7v_J z-mK~T$5r=r$%Np9+i{|SQS<-5Pb%o{3Wz#CcRuxuvNZ+&Oc2isX`dC_^(9?;X20CD~W<^d9i3cH1>&TG%qt8)2)i)Jlr{)4zG>|GGV8Z#|A= zAD^3=dcE&=>F<{RoWj33|9kg+_;1^CHP+%?v|&hO15@Tbb&qHFdMc_GrefS;DVG zh3?##;-qg-1P5G^~(|XF<`8R})obQv-DcIDuUH6yrTvk5c zv*%7poK0)%^I~^!nz=ZWC)MwB>9ZB>J}tF(_*4CK=Bl{ae}0;NG=AyR$xf0}X5}>- zEw^>)-}SXeHA1!Pc2~V=*dG1M9y(u-W__KpDc)SQ@gpa9^w)!o3&dV|6|bmL`BFMb zbgGA|XNEDC-K2+gjjqYUdro}h-u?BuuyLVSUi9KUt8cia`u}!O>~w2%-4G#i_}`iT zT`iMVFYga7YE5!8&}@Ep`=M~@5h>rKKmmb2=Sz2{dI~i;l(-j%h$Q}(p3SjE`{4SO z`;ybNK6MmuZI6HbUT}&{xyK>5e`zttKT2JG;;lO2WLsdzMwfsOw&!{|TDq5Pxmb8I zO4Z%bCX4O6;dv=8^R#aV3g1pT8{i<7XPQ_MC%i z`*nwVr?z+>%ItF4C-X>0G9x>GqDF?QQ@4lfyYyxa+i(Az#JF2d)!kM-w%GY^@&nd| z71a%!k`k068dXH{e_UBm^I|&3REysJm<^Q$7BdRJyMMeUzbV4dB&|9|XxpaEE00xQ z2xHG?OWTw==gx|2atdoE^lhvvOAg8A2!Afpwc@tLsf~;C^Y^RlN_y`5-TP3env$Z= zmdKt0p)TW^)rv>oHf1#SmI~fX4N3Z}ct+L7efRsN0+*d;e6{u9p6}U|$J2Dq#!o}z zNSLBW!Zj21k27o1jys7x5-H(*zBj$#+u}Vfr`8DY9Cd5`ZhOS=<~`Hfr;f`i_pJP! zdqMM@iu{$C>phmWjkZf&N*@SmO$rH|MdBx9imk>L|-7HKj^6@{y z`|ccA-&w5p-1W5Tw109HRUDj`RJXZ5N)~ULba1D5-=#I|j*Vab3LLhH5y{y&yODYE zDy;Gou2 z6@33Q&ni{0f1lH~i3w>wCmY?ZWqvbmnI%|m&7b+@{T{X|>%1wtk$N|yxehkW_+!CW zW4_~XR@kFLonvovB%k&=ZoZHcmXRrRA~hcN@-kO~1!;VqPVy(^;LLaZFB~6>YA`~6*^J7A_Vq||91Z~<<)eB$!=LTE=!l( zlUbH=EB}n>o|a*gGOhpcoJDKon(l?m zEn)GZb)wR50`nvO-oTn5S8yN0=_TbjT z1+Szoe@cp)ere(Z;oDk!oik%?t_#>a?GX7hRlDQZG{IY+HKlHPIGVM*IA$>QP#~Y- z+P_U_=PbDw_gwLbS#eQt;TrE9y*?NISIjqH*?j!0!NgDTFJx3CKIF!1dM#ud8h_%^ zoAyMD&;53jUe4I(J^ul}q4w|g<|H#bV3)rweb=lnRK^@4@RyN^9}8OQFwaNRI_ z>cVp$j^DWdHvcG}Y4O|J4|2cER6V}TK~qVn<&df8bl-HtO)R&zh-r7;X^hxz;1ez> zd}iC^3blPKOx9PWpTY4gY;M()SO1;pu=IPGkO*=$xvY0Cy z=GFbZ{Ih=6?xy(g;1fL;Zy)ZP_`qs$c={s66Z`UC+OL-qo;W$qjeYLo>4KfVvZ9vB zo=Exq&r9Zr8z-Al|J~oK3zwgbOuT<%A7A0O&-+&k-r3p{{MAIbJ?E^buE&IJ!HWde z=!r^HeGH#<$&ddp*DROw?KL-9_h}uxvS04`J3jYLo1fMVTW*Kc7b<8@YdYX`zwXKU zv;SCUxIFh`RQtF@WXVOb%2%6ItXV9zjML^`IC9M3WJ;mN-!{(9;|4!Z%-8+pEiIJF z`PXfU$t|UG_GO|wRdNJ9u5%}){qv1m*!r~O=e&W%@ zA#?3C`CStCYcU5}%?&a#VOdqmnWgpR@qG>DnYQk-3DwgIn2e*Im>ty8nsUVbod}b@ z)eNTnE=(8h`rp3w+?(y|<>GIRKKJg1b1BTW{IFW1QS@!}>EIj3v^wwId~bSIq0!P+ zYdNR$qHkN18YAaU`Y)HE%dlg;?(a#Z&zWrRE9y;p*2I$`u)4)f@4WaV&DV<8+$*`h z79A6L!0PS(^GDaAli3yRvyRDj&Ju5G3e-Km=;7z~H63Tai&#xu+rDD@a+YGxvU~g| z=FI!flN9EpVbT{g&nf%%FM;@{S}d)BeXJWE*Zoi1&rzFP`RvBAT}PIvb1F8q1lDuh za;fApb%~tvtzG7O@j`3iAOSHU6@Y>7JBiT z=)9g{^w{eA{(^9$OetIDj3Tc)=ML7EwFk-R-&}Y?=MEod)rEQd3yrRvW0~$PGdJL( z;Wb;4fBoj4C%Q^^W-RPJaneJ;Z>^8Q))`)JbT;WN>{a>ra=MGVXNxhzM=6;jMJJa9 z`Lj&!^`5Z$xd4N4+~G4a((bU<4&=I7c%k=}W%~ow zpUygbU5%CI9f^ldYq~^MzuO3$afyU1<%F7RU1lQU9F ztJh>tn4WFd5@t}(UFrFKLdW8?YRjWro9@r*_31tE{~nJ~{08NB`+48VnRah`W_@qB zqTXB8Rd) zq1O9+-X*fp`BBMVaya;;qV2_#k8e(G+S4mr=l@k%U&wNuuD$BT2<<|%2m$L$++6`T zzFlzr-YFsSu*)_*X?Fbe067(pm~#)E0@4)? zoiqxA=RBDAOXuUV`CZCsNqIk~Etq>;j{jn05sT4|-lBZJ+bR4vWx_M@|KL8>68QGCcEr;tk3Ic+Sep8SjF^{h`dgd6ExBH+GwjoC{mzZ4|NJZ; zhFq^{$k*n7sr%DMEIqS|OY4lEW2MD(PH%-&){vGblV+dI3qH}}_e}eWC!^%_37)x( zD({r*cW;lFyYF7~jGZNIe$S2MlC1YjY%1O$|IbS3Wc|9+PrRC>+ZL9)Kjir1#qFxa zCNJB5-tRuc!B^9Mnf-NNI+f+%)WXkMYA5%J6dihzy40favb3!H**8M@M!`98CsjD- zx34*O?A@~1q^f&D%TrUgr9^r%G{6f6fK(J>~jFbndK~d%NcAJ0^>tT5>#Y(;59kajDOwS92@P zd|P$#V4CVVSw1uEzcI2Y=DRu4dMv*4Y|79tO=QW*_%ti9iu=s6;|mw6I{EbllKx?X@)b&)z*jl{Kvq^RAyc6Q6bQySBhG-rsDp#+S|4^{-m^ zQ%3l}n_ZnJ>yGIis(aQYGGS`h?~{v9)-C%#A#&F0AP=R`pL-09ZLa-1R6K3f0qHkB z+cJM{GN0JCLHzQ@1vc92W^U|1UgzPm|Jz})>&_ogJGsvC zhRWA$p506SIyaTQ-yO~3lm4aNKjqDmYpypu-|k@#i=Q}g;^#_Dft#z&doPrn`fARR zi2lCHH91$y!ns*y;sJ0nfqGs zt}iDiEUkOPbhH2AM9Ebu9;>hET~c+5?~Kej@#cizm-Xj&v~O^Zwm%YCwNI<1Z`;~x z9-kH4yVqP=dOoON^52Nx^X=!o`K+M0qThl~<6LjePwD?NKcxKs`;*;?n~!B7^L{Cd ztNRr+PWUMPxMyHz;CV~F=jG3e-c0|QM`p}S^fHRv^DuL|IL9+thZ!6)9LnkaCTo8<^&bQlcD{5d(2+>IADHs-miga#`#xPU%{#tZ+%PIzKzg^wj=rt2EqpD; zhbN~znQ-IN>lf1B@7AAK^z4Drt;t7Tc$T!*xC^e{y#9DMiz)l^gktYYmjo=%{OZwY zn!|RmeoOjd-|Knbw-s1g7KKS@uw_5CRV6WvI z-O%2YH2Gue&#dK$oqRcV*0rY6M$tzz0;`w#N_zf!<@)ELgw_O(+OEb2uQOcN6sKie z>`>ZRsQ2s0!oL=CuAGp4l-8~A^OITBUA8TIU%z?F`XZM>K&iCEWB2DE#pu}E3-7-4 zT*kz8MBw_LuCVBqxsuZ-eK2|9_lcneWx% zx^RMxP4s0Ku@_qvtBS=UXGW;sG)bO4Y1!z`KNA*AwDbtJ=Dbw;+VAt#$u>86Cg%Lv+GMJJ{;5g)v=nVchnl|ZXA8?dDHZB3 zUD5tY(Rq=_w#f=&`Zsr23585m;Rv@f6VM13Jf-RIeUGDi)wg&dn{)&HPpWg=v>m74 zVb%%Dk13jLW>GtBUAA_gBir9^X*T^zc~u=hGmf8$Y5jKL^Uji#grF?F`r4G2{!?wl+rw{NuWqVnW8D;#eYt8Y%f|AFIeI&bcQ$nNyf_-`dBae#R#Y#+gVC7R z#Yej^zNA3mcGbi;fg7j1Os&vdsB%kNU*P#`(MJC_NEz1=U%&dy)Da-^LNACCxND{k@qHF zIs9PL@^dC3O*3sOg;&h|Ce+&?c>H}|&1>bp<0_Gr{2W(x_*HgiPji>wdgh4b6me@#~||ITUI@Bs^(Wc*Zj$aF7il^ghKTlTzsD_}oq<6n<_q3^+JR)2J-zLi| z1zj)v~Vqi|*>!-I9?h=kF>+ z|Gj6(Wc4U2D^0wjF7@W>+HT2{Ip2)ca^l(@c4-x@iDsPrI9i3X?2h%f65Z#ej@^HE z>DqkRTz}%t<0z@=LE(Y?_XN8R*PqDx%Of*E_BYQQ$KAI5PF_JreZOt#pQd|c`=&`g zRlD=QG#}~8el&0I$?I1p%~+eAcH`|XZqeIz6E^(QHTd(kJdAfqcK&sp3zrSo-&Kg6 z87d!tll@ZZsZY^m=_;#za&7NLq<`UkvT8NU*X95CBd30#`x{l;oaS}%&Ryi#5 zx|;HAO^);|u1y!`_ZRbc$O#)=X1Q>MXQJw1hDp!cR912^R-BQ!RGv0dF}&J0IJrtL ze`&tXhUn9Z!Hqc{p>vCt?^Y|Qn)?2##G-j&@1>a)?)>~%c5Jtt<+9akQtwh$vd3)d zQCMx|{q|ebM~sUx%6_mT3?5gX?;JPMX=PEaHBSPi2}?$=W;j4xL+F z_@?XT(R(3+zfyL4Zqie$Z;@q6XJZ{N`S z(!JPo)32{{RJq?Dnjp9R_y7OJv8j=h-e~2x*B)YSzFv6!u#spro58?HCf3EUP=5dZPfYxZ<+&7 zYPw8$mTZCOP6ef#%8eZV(j@ZaDwAcRk_=5<|4Lrsl{MiB^AD32SbE)h%~ggCnM<44 zR42M#|Lx7n!0+}~>&gw;y{CBvW@?JWEpN=Xx_9-c#rrkcvQe`ApP%}Pz0=rcr$5R4 z=1uVrw=KdS{KaLbC8g4V9J~I!|0||LOJq4-wnut$6BRk4aAdokYJ%3%9zh z$4)-ocw)z`?jO&j3l?=hPMFsCmUU8{s$it`KB;G|G9p3~r&>9N3sgR+$ZlQH7spt@ zT3??(`NZ9M`iK5qO_3z`Evo&m)#n(GGXRFvrC5vvV zJ?37#*HG`e@qx`e(t?X${(kZP0mF>7JL8`?DCn@Ave|fiUE9a9{SAGBp8mDVou|fC zg}l|=Yt#6{xXQXkg@5zCn++Xn_VMK&IU{uM=YxPfU#C=_xWmAi`?Hg2?*x^{se4bv z-F$3X$$6yP{%W^k&*AdrilUK0$5mp5CTzYW8KEK@y=LNesaLHTCQIkb$fariT$?FT zd8PFJoTsx*tUZlq^=Ei3aDCevb8gA26G7@57i;cabLe^YkFBCxEUJX=Tju}E`lzj^ za%Z1D-=VYb>LVQ0LqqF3^nMB#Z`<0Vmv!on?rRsH-S;C`+&{i+wxUw<)~THp8NXJ0 zzW%wTqWz69=T0{NZ`^YpND2igX8icfa%hce(y5+H-=05PdDQH~`ngUmITg=6nEFf( zs!lIz*Pm1bL6921x$6ude8|Sp^ZPy>T9Wh|IRl|F(O5@nh4-+Cg&cr;Qsej0D zy>f;7W`z$Cs|EUU%x?62IvbqP7QTrRtyY+}Uqrf)9aW_+C3AKJ0=sC#uP&yQ6rgU>&1 zz3{#Ml5cC{@81VlbsKNV zJnKAd(Jr9*f$`hxqE*4)B#YhAvXS_l+|2*>*$@?Xz+%&5hAy_mu* z#k9o}nz>gOA2};wu&pa0iczPi?Zvs$k3Z%txN&Loq{cT8L*TX3a@g z)`Yu{L}R%HuL*sVdM;9QW97%GE|+7u+1R5#{=H7{iSPwkfyK&BuFzNNHJ{Eo9 z&Ge1_JASuud|M!Qdwn(6*H2%jHtu*9ZmsGzfpz^igs57q*2jOHbX)TzIn@3-=% z%w6&|BA@4Xy!(OU5zlvTUsAMfs^Q)_ziqBOyDG`$@?ADrbDsF7^`9Gi%QgmnTvs$- zV!eg2+r0^g89z>DYTf(sqVoaQiTgGuwwwM__^o8gQ2bVN+sE}?KUB;aPh1M?V>mZs z?-icO-S_3sUO9XJxAffkv5MNIlZD>0-q_jCt!@0*O15H0y1(dzVAg<{h93;9E{Y$H zT>I-B50hlY4r8}Vt&+#DO>UaAi1&zJ*Eb(y_I3QW^#V6qtHY8?S3GL!^DQY-ya@yN>G7s1-!|rz2OrOr+ z^y=GGM}N=!XPFloU)Wr?l6rdmed-Nc-e;4S@pri0c6C0t>hK0;E^5P%qriafZ7vKJPSnFFFv!(o1qf!YT)lW?)XIny{7)8w*0Y>we>J+)k(^1q%nb-Z80Y%kfoiQoEnEvw*-+{g`=ZR&2H za9tq%e3#%crfuKizkO@InfhEw$V7S5@%s|>p94Ck%}CPV_^6~5eM?)wGDj!jpv+9$ z5T8HOj9+cvXuUOm&yp{v_4Uk+kCij7liXw~_(Gq1Wo}83=fS1v^PKoZB~M&)V7u`v zg-5zV=@e52$G_wIF6}$?KWv@xUWQ#~-<#jq_4%4a5ZA>AhxDr*&Rwi)W!#olxoQoQ zPgUSz8?W&DE(|wL|7+Rt_TN3`n5h@NnL0v5LreJzzP_wc+oaR_=7eU;y3NNMR$pEp z9qGgJ*JefRdGUHJYq`z-DkfKEbga7?Uo%H2?AEeC4k_QuMoKH!h*>eG*j*H{o2#_x zX?{=pwtw$TKjzH(e(6`%l5KUNRtLkbsZ7*SQ+OStZ1&)^iX|J1w%uVvP9F}w+nesuOfx6amShd%88k-IqL@5!|*H{81~+;QfO zQS=^x_}J?2TP_@2Z!HiwbMK>N|EHL3oqnQjUAB>@xT~6kj%UZ`Jsnq!RQFD<-<^`F zs6B7#o=rLp8Cwp<7wT&q@VfRUM)JhI)7%|9zjy2L*jPnxR#JL>DNJGcl2sPFA1t`@ zTeo3PQM5~Zf!1%Xn=7})?`7P$`QQ1{sj^-@%^Uu&P4e#GKd>(G_xp5J7qxG{XJ^zT zsT^6kmU-GK{bkG>E!Vd`H2kHi$Xu7G&Ahx?Q7&DyrOxB;eimk<-xkdLD%-aFd+D^` zQfA|RfkjnkRy#4=v|V?1JInVStaWG0?9Q=7=giyAV6;AgA!6UTR`nl2Y!76a!&9$& zGu(Wv&Gl-*Kiw&Shhl zJsw=|)a8YZV!ziNZ`kxk+kP*@p?9wp?zhOi(|+M_M*rcw1#dS0S6F=idz|VH`$hg` z?S)26C+5^GyPje$@w}3!b6R;s7tg-h7bd>nPR@Gr&B?9*b8N$sJ4U(6rbiFlnDn+w zT;TMrzuI;V*SvN1HZ^WMzvo!P#?XD*yL)7B+i5bT@a#@IyXo5g@21*~e~*fEe0{Cj zuw<*OUJi684uWmD`?RPqCZMy7h#N<&=vKk((F$2y8TJPyN%Qy-LE*_m=90 z{M}AR*4rij`W&9nc;@s@hK@&9tyv^rKR0EJSn8O`Gr@P}zo4VLpNQ7-*zOScep=Ux z!}^-1uEJ+MGl!(_lRfwj{d#)5;l`WvQ;d~gzwVv(_siGV<4e{bpZRzB`iqMu+`Rqr zQR9*IQJzr!hk9^6kSyH|HkbnEQ3jFaLR8et!2{{QJ-E`}PVfb;b`p7ci<{ zPzX~#$$x#;(msz__pVNQ;F4j|*%0*en9H*ZR{p=(m9$lv*JVd5b-2wFG~XKA5opBJ zW*e8Xc~Z+#Wi_Yeoz*SZgdf$U_RMtFzMQG_oM~O|8>b%Iga`9|VwJl4L_N&!Hu+sH zx|Xq5AX)TiTy0irinOqu0*_oP4_C$kl{K*)pQkeae7v*oVrEkL@i$+3TzW1ZSiNJt zlNjq1%Sk_ZG@CEGm`u2S%30}LkkcjmsCGZ$%|&I}DFF_eZ+5j_%zR{1aeJpJo1bvu z$2FH13nW`Q^42};*6DdRW8NNzg9j=%SnHgsiBp;TKH>W6y$NR0i?~)_zO9#HusCD& zH*2*Bx6D^ci?hB=>&V)5G_1o=%4AQM)`YEv`Vx2ME?q6@UYu&+ADRB;$qsR&D?Zwf z?WP3$n6b9UsLJ~e_p$@YVnSb5X#6MVFG*8Zo_Fm}n|RW(W!t3hb*GsG)i)ZX zzllAu%y#Sbc9RPmfTHj!*FuL1aYS_JJF<+$|nofZYeGnFk^OcJ`Z<{o$z$WVOm@+?({a7*D2hTM`lr4!85X0ix9TmFDGHr0FD)(XLDmyGpO zUusRQ^HpkDba`@!#m@a4<)vF(tKzS%n>NWJTt8t#a8AfI4V4$)4AVUsHnX@Xt=*@( z#$(Cfz6DD@mN*w}{;_J>>o%i=i@~q_f@kiV!L3&qn8oOs`1eTO$JVgEN}uExn(0b! z@>-T`YP`mEZPC&%F=J7dm=$v-Kf5w<=IX~w^aaZI^Koojw&#xob4pjaTJG&HldTqL?lhB4 zJ#Xk6!tzM6+x&=P`R|XFkLUXG+*e{2uvq$f;fsbXr`9nmAJrE5xTnL-ruY6|#!zE{ z{2v_^tWI^4PrMVo@JDT@&H4M6qlFSZPg_R5`E~e}+`=D(}fpSj4e(i`t|`RWVFo>$bjLq_L*VO~gg^@tu{8 zE5sLf^ep{kbm_DJr#)9nzV7xE*7+;1x~w@Vxk6QG(=@Sd7s71gpLE2(j_mGZ-X6H> zmzRj3T=P7QG?7iaa_-)fVqUk&?td1$;NrKf8&*D4*tG4=HIBEfS(5F4l^WLjH&iuy zzIdCUB^cGcB}|vAbArdm$WE7I4~%fU#J^G+{@T0Za3=jRH3T*I~A!bzfV zip3l)LC;s^FX!66zMlEzoZW$Qh7LI%Wj9}Q-dz6tjckeb;ppRxkG@nMKP1p>zuCbv zROo9l%e9zx`S&kmXKl|GTC#;_eRr8d*|in-Z7;@`s9iGTPFWkVV*eZ2)UTG#TnT2o z#g-}0xGpQebhdJd9>bbTCxSn9zR?O=n=O>vJohEXk*^hsR*QSH&f699pLo-?!uI`) zsS7U%EqK{sY~EP$tL}>MO8yCR^`4gB`M4zB@(_c{vr4ls6}m6K_&U{J{;K7B%l1a< z+Aq@9(NoXG6`nfLV^ZmI=80#`R;RLK4@(tfV_$SM+x+NDxvc--1-JCeFW-_`p3S(f zWITWF*#{z;4{!gvzD}2uiDvvrS{FG%iDPsj4pkxpS}6{t|OV7G`B3iC+wNrW^-e4gX?F;>z&n%d^Z>LIVt^`xj^Oqm3NOT1(Q3S6l~*CHk$qa zQ|Vsde(ce7&nw2U!TNqj)A%;bf5CcY)8Er!iU&{CM#ZgQqubGZ*wsB-%bJ|FIlTfQ5&Hmr=DeBiND&U%+w^BV0I zU;P=9@^Y$(Eo+-!zu41iAG2MLtHczHAL;CJn5Mb)+ck+58{)MXkF0hJ-MX+dqcEeP zajjbCDocge7S>7@5*)8~edA-voO6ji#gnyc?db_OA}2Kb2>scUyLkT9iw8pAUzaE- zT~pk1*if`lYwcXkZN^vSp0Z4sy7Qa29eZSVh+bzo*DRqcPggg-Q3~Z=+dO6Yebvn0 zS}K!5^2Mxg-1@ear>Z|kp}vbVMRj@I`IiaVgNxa-m2dEuYF(ou@>_SVJgX^ZE6eK7m&%0tWzzP0C?x)>exVc45QNQf& zvB7Ndj#*!<1zz^B{+n3LlJrHxK~9k4gqLQfrh?0jqb|ozyTmE{v%j7?xpXHl)5S`$ z$;q654_IyLP5FO0B=AS%tHAHO=j%jsbR}slTPAW><5~}^pC0%A%)9Ph$JcFNJY&;} zy2wp}JKdcG^IX%e?~KS(ic9*`#{PcAzd!GoH@nPEpTbjX%qDYx`L;%l6SvpY<@<>o zGxBSY&is`yy^(q5bPHye&d=4x8rLqaZ&$edImFD}wXLN5xSr9xxt+#SCMlfb6zW^H z(%w4Dl=-8z5Xa&9oGZkh>{;ZI6ujhl>xbfb7rS({_|6`?WT$cM&)unuf7rfLV)}Tq z@4}B0(YEr3a*W@JZhSnY#(iU$%&NN$PquCi(PEmH5;rmOW`$j9q1d^rUuD^Ez7?^W z;5oV7V9nQcojINni(ej$%scgPo#O%9&Cdh4`1eg=axE2>sGVoVaAf|ncS`M&{;yKX z80Rvk_+8z$}{$pz4`{yPHKmMZ_WW{qxTjXI(hl>7t z|3fblJD*NTcxUx?UBvPXYEbdQn#0juk-D4<-p5H5=s|ln95o%I+K;N-0IM} zFhhf&0;!MSqgHT1!rU)7TW$`*5<)aVPeSs;n35q;4-VOY2#M=M>!_ZgUqt)&+K}=CEk?tBEJg{e5#`y^1C4-b;=T&fC47x%6?FMf#-3 zTo1V!Dlgvbb5@l1nt#=fBP{Q8x0uoTjrxfltIoVrZf|dOOncSjIOk+bVv<(rgq}A} z-JhfXK9eX|pAf4M7%%Fe6}5~Z?{b;oJ*De!bekSMS#iYC@#xLcbQKwO*EvZ(?d!j| zdzFi^$kw%ThaXvytn&^_@WuiCEsM?rhOUqQo{C=bz zVJu@6!mlueQ)sJebL?xGX=29%w2fl3m%UZUT5vS%y#l#*<2Y`YvUMY zTjqmLwzTBVx+3PnIQNp?EmN+S<%Vaftah6Q9rjodu%%2PSJXo`_I-%+CS&#qsjv7- zo|mYnMc`Xz2SeK$qJdY3aflFn%H*h>Zg)B-&W@8N*ms{xqMsNz^EgJPZx&`b7(`?@oFVtI_Pk=-wB#k`dadF3x4l|u z^=t>}2O>Lut`{w|s+zEJ`3k9prv1OfPZ+Ju+*A`VY5B{yuUU_Y{i!uN5%;@l#qyja z&mQq5Id$m^egy>RB^BDY1})zB|g>6T3RpMb2`=W`}GoMJh?=keVcZZYO}o+xVw7tdpCVX?V( zZmy%7b-dr*53g4(U_29a#4WFHR>Er@F^>;Mb7f8J`MEB{W%4|vnE^qisVw!BTr^H zmSy;^*H78q`MO%;W7K7>1uIUST4Mfe#h%pke;c{J`3n3qJHICN-qFzY3je-*)~vhv z;(4jjjH%wC2Nf=^=Q<`DF?Z2ENtL%x#pREu7_I-&z!PS9?b4P`i?x#faRYT~f+SxsQQA>CaJFj!&*mT3C&wOo9s*t4o z^COjafuDwD@{wP|3tQT1o_GMyD3@-WOn*695@$S zu*>FfMaF#RG^N(|lr*tD@6|lt{+TNiEVj?>TT`jRrfYkbEkCK&sbf0n;~B82{{P%C9`U=24ru9{Esx{$@iP)Xk`1ivRrK#N&m> zr+t*S>t0f@=;E)M>nyB4%=LQOs%lgI&OXGxsYt2&%MBG>=I=kNCQbZ&=JjjOqE|o6 z+z$4Y=JsfOt*cY;*dYD4ZNWu>=(8fWX^nH0C5`TVU8b1(*H=m9@Rv{D-YD%m{?*dB z_?24m%O`h@+@)Wc&c0|ZF)?D9(A_`Y-$L%pUzq&XMEg$V4pGU&>&hJ`-Z?irV;=91 z+21^--89^>u+%&D<2t!Oma}TY$v?c8tlQu6`btuG(6cjMM$aq{PS|mL<{eql-BWhV zn(wh>{r-%Sketgm_tr&k`&?e7baN;7sx6t~+NHTO*DGz7pV@O?F6yJkP3x|L`J&7U znQv$AQ(19+o$^K9jvkR2;q3oB)pp8SD*c_FV$ONTV6U91%|275&Fh0dIovUsZY!$i zaV2hfT*De0@t%}>KHn!r^OY_>u_9{rDxC>;uL%Zu zs_0jd6Q}$<7Eke)47+WiEtX<(wQ|W_g_}2b-(IcBR=nxg&$0=bp@RFmSvEKQ{&J@N z@X`YL39@l6P2KNr-C|!Tlb*=9#}Q~lCtdk^)e1+M`jkX?esjJtvN%fIHWxyPQ_@t;0awJp*#B19lz}; zs&t6iwEXX>7xn8-tNBj8!glDlWvl-M|0ah6l6$_GzWJRmYkx{_liB6ZdtE0jnBt^3 zLGZgXgZ1~jRcv}Yyg7e)KfAL%s$tHIazDN+?>4{R(EQ}w?`pm?mXU|?+!t}CFtz(PW zZ=Li5M?N36&Q}*Y5%PTB$+W=4`NwCPOe_mh&2kg*y!&us+(d<2ThCXg#aPrFdN_|s zDgA8qE!8ubnZCPr=onqyoyeDS)ZxjRjpwzRnqvRWyL*#ODU&tQj8B;LwtYN*%7${| z;FxC$J=~icvRs;)=1wi#%Eo$oubM8ag8R)DnOXaOZ`@Vqv2Sm*^J|BgHS13Joz+%Z z^O8Rzl<)9-?(k*b)Q_rjc|=cc+aPLrDdWVfwTjB>xxMyV^RHiw?CQ6k7?fY%cl>Bw zXw-BGFUf=Z)wmk7XO=f76u9sAE++JyfdS@-K9L zVzy?&bRV+=XFZKw9tg;c*Eqw+VuRRkh}f$u=|EHdyb@^ zwR`QH!RG9LHpVr`jiIZ!CS{8HRQ{Bn={?J9uU+{2H9jTi`MS9;|2?|Le(2Kl`=(2; z`Fj1^$$Hi9R(fyg>?eWy)e`G>asC!8cYAqt_ltkW)|>t@yDl_q{~y<|*uS+u1Csv< zm0kIL!sEtGyOw|Xb@LYe7w(wG>UY||B;)_1&1$Mm-=(xah<;!4_prnaD%m$K%WYkt#(M7b)Pk3KE(ZU3+)V*3%x^Sjn$9F9%8T9ExPg{AJ<*<}Jh%eQG5g*x-|UGILg zRqy+)AB}wu>*5rC?>n~PSV`TT&3>+vUv65bcWp}hwmo;7w!ip0%Ofhs@!4a$(vBPQPBKxW8c5l+4+iwy0?5zM1zyDr#@xO$(vQZP(YEecdRMsh44T zB28b4wMggYnW~GMvM$BXWjgq4qCwikqbd_Cw35GH`>(n-=I^tpe|;yE+S3G=nA;cs zI5s7{hsn}++2Mi$wkp>u|DP2?zaCHdw?A7feM7g2y)J&cl<#a&bV?61zBzT_P9+!^~aPUY5dt`%P1X~8PCmqWepiF28-6Lb_KCcKqmPb^&S(|LV?_3O93_l~7#NX$rd6TA5CY9sU6U6|tiPz>S!Fpv^W+=<=^@WFUOO7xn8tC-+stim%gNin z!a7Wr6m|J%vT}CMD}H&4Rb|oRw|O(3d@x^MStJtK!y@yHGry-~!A$1J&7zVzt2ZuL zuD1JVyMp!d`9<6+o?>Eu-sbi3Wi_|5ZaStZ)OFNXOgnpz??!u#h_Gv0)1p1>Q#NmU zvQ+lF^6K*U&9hQd|4w+;sE~Tned3K^mZIR4pP_4iD{_cff2#Pce{zX6mgVAEaiUoTu$Hq3e!x9Q~>hfAs#(%h;v^UdkzXOCkSM^F9! zLUz%abvz%g7;8lS+I{iKYL5@*wk%5g9*2%uMD65nvi+9MsS{Xr_QDJoqrIH)Tc_7QI!yj5yq=@9_-uU2>NPJ!ML+d5^~NXgO_tNQT(wGm zQ%b(atSDv9_Hz|~gWnsRyYs`@Y`yII#jj+KO1>8Nye4p>U@oig?H{hw9Ir=QXAVp{ z$a1wt?4kSLNxsHHCiz{3AFSI?gq>HNX_D`_dRv#wJ>!h$Uk)n&dvPTCaKk~VpNbkx zVrRYzRH^hbcm6TrG;K<`#u(VCBQfEj8q*|`O&@=`u+86pNm5|SYE_}ns@+$GRx-A? z6t`dBQp5RNX>B1pV`5q?|HBzN(-!=k<2vc6)2AOA$7fZpO}yT9-cBMaLa)Mcy6f9B z(`S5_n((rB=5)5%df${*IGdT|7~f%yjM?}uVuRbw4iA%<2|RE2{OgHLc>2et#Y*O_ z_{`keIM!UNzs2k!N$;$eD0oI!uXTLCWd81Vok4Sc^I1zDe^t(+`Tk4sb*U?l=FKlx z)OlWW?ZM~czxHr{|5; z^sSmT-_+;4z|3o56W-OB3^SzI_ItS0{bEU?P(+upX%m%i8? z-lr~Ky5x0@g7x1|iA$faG5ZrTeZAVruA{q)gSF39u)B#EoGW&5+BYj@WtPQ+7rzr{ zSVEw`X~}zAEwXeAh{OZ>>0ZzyI6Ay=>0eug(?`6H3aPTvXfiuVl|( z+{n6U%`fAds}xPFzAtPoo4enk?c|3e8y~2JgqU-dGXKf0X5CbD=VPqJvCH)nZ$7IH zoKSl!o%i|9(s&V-_V1GKwsT8{9IUvb;rOWM_acSp(67a5A@3d=uiw^n=3VvDXyp@j z_e~A#vJRejzF+0|KIZ)fD+{Fd%yZgX=hyt~%)tj$Y)@|;(>Kzdd#`#?+~>(fuQl$K z@98^NxAx|W>%!lq1m0DIigHZ$-ImK}3O6tpk9n)vO*thS1=)B$c8h3c^I{C2Xl9zn-f~{36r8y>-EM?y~b+4xM z_rmkj-X7ePD0BVROkI`Me>dvg>b5UclH0!QyXOLl<8Pj47TB$dz3pJ}>s;S&&!pFr zM4UzY^gd$&Em)|sex3!2haofBog>6f-`yOt19y&*%=!sIs zYNP7L8Rr*AIvLMpJ2CT$>am)2TjMS%Y}yo~xmL2{;vSBk^Lv(Xx#Yw?xp+H%Vza>0 z%a*aGCw7WE=J~F3U2!zy;QPagH6FLkst^3o$&!EQl4{C&kNIM8{fWrR7Gu7;{_t31 z?l~U%;q1q*bQSV*9N09i$uDHplEtO(K6bngR`T2NTbTX$52gNXcA-yPJfdr@R;tZq z-N?RX!p-&-m$sf*`ZeZ$!>5=_N6vKimI_{3{;D))h5tQYweJqKdb{}~S*>0;FRI)f zb&T8ZdRSKGtCsTf-0ESqYIAf~F{$0eCgGJ+Xw(T)RPQ_ni@1(xi%Kd7y zkbCw;KJVN65`Nt*S`%e_F8|lwXPdve-$^{&>>^!!$Z+YRZHs=Y7PjkhFRx$GaelU6 z$mhd>^M5hM+&*(5Uj11t+mZG6INwZoF4U1G)X<^*>C-_ahH2+3TNhZ_vQN8z!}&@v zr;F)+#?yvoND=pUCmpNfq^R}ma zt2SHx*|qXcQ_gRi!8&)&s)bet`%Q0N*Xnpb+5C8y#QS;X0TX{+s7lSBsO=rYLjiw;e}o1m9L8_LOL`Exqk4zMc6PxV>DFeNUMV$XvW%+#bSY6XhQ5WSHuWD(5hnK}C*1z4C z^r7P?=f&c^1`7q2?v<@H-(e?xtd<)x)Xh?9HXx0uZ=uzQr@^B%QZ!xVd0DyR+j3^=gXvQbBK6b z)A6R~;T3yF({pzsgR&gIoszKi@9Bz5S?XpNJf&I0Q~qh#L<4Oh;YG|U7k4-Z^d(-s zxX6O@okqxt$+?osnvbvdi6U8FNV&p1Bdkif}n8WrkMt8Q=}eLqu5Ps(@o zWZ|rLD!GCT*VXJ33@<*s7i`A*)@l>W?zfRgTu*Z@4|&U%OpA^cGU0GLprqOLLfWv^DsZ;rj7Qd@v4(ED zgilRx(VSoRLuBJj!)cF}u5g{kKhYr1V*3<+SKUc99KPI6&lR(Z1ov<4nOL&*)$_TA zvlcNY&9i(FWV|}2kn5A`BG0f_?TbvS=Ce7@5?7S>*?aq{R>)(ILy=F}U%&Lev6<85 zt>Uxv8yu@H?r)0e3ZGaoS(nYYWB$VOFg=H|b*?Mi%G2^WR$ctcoUqKSp~G5i!t?SM z&)%DBU5pm2E1u;mU|A)2<=H6-&qRiY7VUn0&sNU~nbUl$WOkY0$FL{4_HX4nDw}g% zKH5ocUeOTI=5cEi^UACI50unxB~Em%ujAb0Gb!R%xj_84gDM6#vQh0 zw^h`VWD4XkayGf!lA_I?u>L{!jtr(bI(~+>R~DVamvLUdUt;@Y?QH zgNAL(<6{$7Z+76&Y>?r5H19i?W83Lh45^W`BRJY8Pq--eNNz#9!r~S?6&I&P3Bohx zDO5i*n-ItCu#kiAh_x9>cx3$CGEVpH1$>D<4u;dwAU94oiuSZ{do0eM{o%(eH~_w0wwtDq8fOhk1o$ z^3R3BGi852m@!T4p+|f9)Fbh=qMsB#J&bMTE@^(K;{3|9^en-fzm>wgUd$^McTE3rWQoYXvbYsHYJX`7tnxRnO7iP?=p9frQTxP%3yJEQ zZ6_uOL`F%NzVY4?R`|t^Cswsq?D&);Z}*>fNn-8O&QM-q$h*NQNVY{{Q@!^--mEjM zTXdazPi7g`vvN1;eDfFRHQq8qy=LyC#7~Mr>v#Cuy(V{V6ItAk zdmh=raoy}s%Z&?c-#T8df6Jt_Mtr8B>o(UHm%l!>Kk)mD`tOogNez{SNA7qTrqAQ& zRAi2naetL8!+IlIltZ>ysP|CkE3@Iy>1(~p-!uO= z7frmdLX0_e_dfSU3BQXkww>E`kM~g87sZ&}HvUC#xA1>_@^ZDGS4g+x(wx5nN;~&m zJRNLZSotE`=JxlUN)v8RwoeJSy5d=pbm5o4yl?Y(7YAu2&buG6GfI!Ur=#vFV|6HqqOwJ=~K8qw{MV^ z{6FhWu7a6S+vd%irb?Ag%4*S@^Uc9+rQjT)^-3o84$7^Hua)B>1ME26ws|y!tnoY3 zDs`lH_vFy7*0_CZIx2R5{Cqx7$KviS_os>>=O^XlD!j^FeRRPwmvwVjs=QYHz&-J= z!p#WQx%bbxUhp!DUmc)0#W3bRtNz9vwtv^#|9c&@=UndsC56e2&?(CbNu*^2bUy$6-isJ zvc>%Cvz7N!HsAgsy}FUBen$Pd+h5djw!bRj;GHs^VZ*D-n>Tw;Qcq1tS^Ok@;ez-F zAqwfmo(5U3zHGlZF<{P>pE-GR=W_5%T9xc)Q*vV5^4)+^{h%a6$AHJ@H=JA;ak#apxZNj+pHVG*~fI6_TP}{ zVfHn-$#d+Z+#k_t)mK9d%w#93%&ayE{C4%Rjli$S`(Iyp8%$T7_)%!_=1teTlRh=` zgoeydH@_*OUoETb$+!5}?sLLU_RC!F`B_>Eoh@1P4Sfn@_o>c`)j$)U?%ViSpV>JZ#2iUY)pLSY}dh&3{sAYOB_@ zBbkRC_b~DIN?zIA{idog)Ub~I>Y1C9v+`qdPqb_7HtM`~Z%g=hsavbFm8ZP<_PU}Z zymZga`JL5oPF2MTm}GXeod1jCf#8u^31mXfa9URFC!PKnXZ&_-!;8rs)z54 z!!J&)a`|RF`^l1D;U)?bTbJ6}^4*SHr4pSky!(}L_H>p*u`7=pjSP>7vOIO`Y=lG8 z(tVBBbPm2zog(CKl=jvo{n*~hb8Jrf`B#0rBHWTvT|6?*xJ~lv(h1gU%+^?Yo;y)x zf|qDg{iju)TU<7rHo2a1zPbG0^!rDCPh>l^=#cELcWTF0vbkKY;dv5!%SB)%%a@z4 zex(HKPMWOK5oUkF=!WN>`pX;{X|b|w_fIcknwc5s*`r!AA+}iOgv3_!wKsnVxc(5e zd>?93UUH#dC7aAMu*;#pfiDpqGr3cdc)B>QtzbK1^zs$a5R-_Z)F zGCudX;fVyd&^q5U$A7+T+*GwLfn{B<{4eoC3xur~%b6s(U-?*lb64H$+h31paaT-~ zcy6pQU-vqfM9=wsE9O7HBR=iK`uSq7s~YCzimhzpSoC*q&{CnWybm1>=|28UoiFEF z$vQ~PHQwgYlYF%1$Cv2_H~-ITj7wJE&v7c@##fOwekTg0ZoH|tvR`oI#okRn4+OsW zF+sGjrKv^lA@BVflcT-+bya&^mdj~R_~;+{cC)+iL-s$fW*nI@V}I0qextf$3)xjv zP1bizs8Cb;y6c|v-0doh?zy~VtN&!eu6MC~(uCeKigrDV4jJ^``b7so3EmNIl z=ythWe)V_l#Ay>Jd-S|MJ1KAa@sGH58HM$?l3u1(K&tA*$>8PEUQ-nqiJNaHNu9EPg~Z}%ik z2$|LW!-}=;-122ty5HnDZxUV-)!*@Pp=zuOum;bkh_te^Y-=N)z8i* z^PXBL{9RRpW2chGFZ zH(B06rj5FL<($5qFU<9`E}CDlRMhH{ zZ`rM-D$jgN-YGM>u4lJUzWJ3QOVN1R{fP^n-`Z~?UbVY)8n=hqk?c~1d#2Z#T+XOz zJ=O_b`29=p(w5}h)mJJy-$p&26|H;D>bLVZi&mZke}gt1Jy`bdrYY0ZZxt^W7pirH za7OO5o3!=#Pk~jbwFmN+-*~j$;_$idg0{UX#f5FL*QL&Fn4Z$K=B<2ES?9+`HB#b^ z?t;6Mnt!cKxOhjn;`RCXEdlns?2o+RvpRmcbZz6_u8)czV*>B5*r+O>6kcMs{BmWT z`iV{a2JzRUEh^&fCM&nD^S>cu^Yzb%vj;Dqzrz$6wlHGjtRK^imCf1xZ8wX#%;!2< zG5yGfY|gH%*X`4x6Vo zFRvR~99hSIG4kF9HQf;FKa1--N|tB8Up`0UZPZ~#BfBGeoy=d^l&lS(QxS48oAdec z!f#^#O3Sm$1op1sIr?wr^W4wVj@uQ__3NT@o~zN?^lAIwy69gCAs<(K zU-YKv&Lxw-u4T{oR^8a^nZjly`^r|v`e&#|`=)otb{4BgYWqLdI6KEb;o<3ZR?q$R zN&1JYHvPEeIm1Y0#n~QKk@B}{v+o_aDU&`q!RqH^-Ki~`SE>g_`c8S*Z(SjHMXgSG z_LIMRBTVgzA~YWDzLvB4`ywMr?sq%(aAvctudnkyq|`ZOWr5!s>yzsgnm@d&SeCW! z9d)3n>yF+Q(L$0phQ;#3KCgfRmGG#-V$?L}d>W;k276k-l z^SE0Cc#76-}Zn}wo)+@1Je6zOxU}9zHMDM7A%6Vt*@1Lz`xK>HtaFRpA+O9cjJ5R`k zKAC9b`AG9g{>0OtxeSa_T_#_7vHcZi()!nmYL!pAx0<&Lt&Trl`Bgl1!D`Q6)heg> zE3QoM7Oi~xUDQ=5R&{prIkmvN^Fhr|4nEFxKkYDi##-lvPZ$20cinT-?G>TN6*|-9 zZnp9<#M=Mn>D(5$x@I!_S4-{PS!#-rwo5y*gjc&sXkIkZ*#FwVKqY#W;5se^51YDu z6%KWKkFA@be^J(blk)NhX8!J8n~uG#^*nR>RhDgw)rHD0YLj#WXUgbzzB#?WTjE0e z{_77~tJXUnT_$XQQmX20>*>Cz$-WV6T-W$i6>j{T7Qd*$rEF1na>@Y(*UsrP%mP>Q zl&qdRVeU$e{W`3XGg1D@8BH|Ma~D^+x%*m#8OJ06%UcV4uDrIW;%M9@Q!DuY zEVtLAYb{FOu4{VMoLL-t>WJz!q2Nph+w}ic$Gn?ne#xGi(QnZ!XWQ4Z>DzUi)F73t z-YE|n*VLWAwYf8R5r0$F-K}ZYdz*8;aP6fY6d*ghqYjJS*0*O$& z6k~q}H?xpQ|6`_GZp+=y>+;#2i@%Xqs)&bAv`Vu$f86N-NxyzL~EZk5j z*7SPq{DWIBFzuJ-?krj1$ItQWx6T+e^ZsO+7>Ru zXUbC6aqC{SJW$t77Wng6c5$NYbwkq)HCUU;I-!V02MUL?D%-@WEn*VBF&VHG< z{6^}fSoe!7KXPp-V|>ivFfZA!+$Q;3<%)bBt_#byNHScV*O;mNR5;go*I&i#^)<#B z!EMieyH;O(Ji-2f|L?PomC=6{*VUJ+HXRn1Y;95gbJobIFj78p%l@M)XDTn@ni13> zaOYD^-Rm=nZfEa^*+1E_HvXGLa~jBY7CDynYZ&aHB_Jrj~4pC>ebDbE>^uPU`}5i11lWJ^EY{4Dpn^O?rFTkZv0 zY%hJu<8N(DyJXr_KQ)rGCj0%<8P=DcySrJx)440pQCNQ>$~yjm0sj&Hk5hgfJvw8e z+{}Wm8mTb7aJK8a|2z_IQ91kb^@5$X$ER)jFSDrd+-{*iJgsZa3btgkG_6^|GkwNV z%|yd9mwKEMGL^W_R9Ie|aMOF;(w}LHljcXJ6&1Z*l&N<7{cDrWY${#uEXPdxA3N`= zub6fG<#~x%)j7{TsJ;KaVdk8vkF)vSe-zrO_WZW|s!3O57i$IDi7bsu0e!l#hUsZj6i)$&QtZSEZ@~nOPeNw1f%`)|CY>9C{ zLsHhYe~z87b6(L&g$T91%rjqVMmapIQt{+E>z}+!*x2@+&Rs#N!ihWAO+2yJX7&HO zJpN@H++q^!l$IYoyLo~^@9FTTTXwW}-0z80(5k+ev3p;n$Bb>Kqc(UR-tSyb_~(QX6mQODKLS-d=Zn%~RgXcDV`%*H>{@{gU~udAZtQs<1##-05h=`~^K{7M_<7 zJvZO+--Q(iM9lPijCK{fyXM&HJ!RgobJv|04?ak|4R5Y9Juzp_dbT66$KU^&;e5N! zpY_mU7KY**efNVm?i8!*$iDslivPli6%$l`M&9#qerdn<_lb3(fyew`J2g0{yt*yh z9J97ms3mFb1lEHYx=xCpCa<;To>qM2>RFrh?QbUTy%=9Fa3g|ytJL&sAFlWQH#_on z|NlSF-+x>G|KH1N%ie7`wL$lPLqJJ@-@oz`Sts9=zBsTz=aX9=^V9R$DevbpEuSno zZ4HlG%37y08#1``l<%bd+~jmStc$C~lqck`QIh8-zLJ#MY|GZ(irc3BQwx>cr%#x6 zc+#%TH|JDx#2$FAmoTZip)`b(adEn;+2qUohOEVp&Pw|{|73W0wt0!UwH?o0^H8RT z!Z+Qne33ljmwu$I>uBlRw&R?$-B!=Pe)87e36(c~ zpD$s281t9+%{(3_@y%YwncD<4RVB)}wM>FT4V@O}NbEeZGo;MW{ONYn>wHSN)1_P2 z_0Rn5Bk;I-xefD&cLJ^@^NO{d9?mebc{al_W9^)(EVUlKMoWt&?&Tf-^LY;ms!p7z zP+gs)X>BNcti2;!p<~|eA4lguvWS@!b+)zFdDrn)zxN9HBCBU^n0Z<5iOB?o)$bLm zcMF{O_FhSJYEjh+NkjIt_RT&rele%68F!x`}$YU{iK&n7m{R+6Q=}! zJ<+v%^Re(Z@kJdKP4oH1IIX0=8v5!*W~ViIOYPb0bMtL9Uu{xS{x$xD^)3v>o?$Cf z&CZCf;8#CvtEiW7UiL`n<#jF1bHYq}4R2rN{&?hU{IdCObuLRYo~#V2>v*^-Wm?h{ z-PPT(ip9TU19bBKb)LR>*8XezoVcs+P6y}DY}9hvFTfw7ck|C=`@+w2?xhKqh2;oz z8T{y2H*bFa;#Xg-PU}pu|M);MWj+^^;rFZNLcL!UA5A>8&gr&{h<(eHQz|FUUov8= z%d~YUpW7n7vE=U|5tpR;^5Yzrzf_yByo`A{#Z5))gKYDR9_1RBlBHAKn$NxcIYHI> zEk76c^r`%LE^b=iUWhF4S}nk_=gXAd#V0xUc%^updU#Qw@oeadt=`Ml`OENVTwZRl z_#u~@-Yqwq)9Z^QBTt8(h;mR~X6Gryd!i)q?eRZ-efBrC|D;?w5uT>*R6kpPDK72FAJH7;;_o#c6H4_D>94BswXs|GUMblmmqh8^Y?gEHi!&-jr}a(h z`w)6|BWsb>etm`Cc6VL4Ze857TD!&D)IcbDAHyxdqYwO=?C<>&cvYF(;JTWp(YEi# ze-3}$%@;P6)SY;gv+#I>K~7yq#=bd?5AuI2nxyT!)VO`#FM*ef&p5@boqOD;W%&hX zr?*L$T(*=~a`Y}@R`Awx+;RDg`uuCZr|zD?@vi7xr-$5MMU&V61Wrcz*{!wLVPsco z=GJVqU2A@24zI!~<@7T>_dc9nwKDy&=4Xd%r)HTfHvMx+)FtiWlAW;y`&8!tesN-X z5W^{LMx)LLI-&}9|N-=@BIrID0aNhY@$@w)^Z0lmt zs7aii>}Qurx-8bZYk2K*pk%V{yp%&8DvjpBN^-oo!tmyXN7qb3A5NYwb^UJLQs6-Y+81#iw$Q zEya`3W9G@9j*ewLJ6Zlul3~sH8`UT5=;D6kSozUgTZLGX-bPg>IJUK%IUd^Jp`Yrp zCRRJuUOn*N)*0^GQXa=j5jKhS8_A_>Gw`#t<|CWPcCcn?> zS9kr5EE76BYG+_Ov zj~sWfch#BCR_`>?K)aN zLRTZ)?{M?2d$GTKom2eL{Pv5yMSE6ueis)~X^C&$!NYgx!ZUkIPlfkqPWC-$dOTNK zY*`TBq3PCd%nQ{@CT?r8aX43C@I~?XTIR5B1`Cb+-SsCHrLaX_)N#x?V)gn++sA!k zuQNhq1>XL>W$2_8*ErX#q33t(gzmM!v(G)8%#&ODUP@GbELJ>)ZH?Zi)VCdu|&(t8q*J5#fA=f@`1xS3 zsfFLKu4S4Ns5)9`&3reVDK7MqT z(@&~#M>0!_Sjv;hUP4nV9@?37Zuei3+TVP+d)DNs`?p(*+tv6anm*e!BWqepZ^Y8d za}#EiFS@_xc;~9yT?((HUTx=_yTbD3rpX=I8Y=tLZhXw`J^p6R@u24=RaXUHSBa_{ z?(Zl!|7*BYJu+vRuX2+54(6t$oAB&{L9~ zRlaT>Y6p*1O%Ro2Qj+_dFV>i|Ilg_a?C)FO1#)s?JK2)<@o0VcXvqBX<~kSVi@~3B z6s-5E*!NC+k|ONaAouRw``rKQ`F4%DPg{hnEnOBE6{CW+Q<7!;i>g{$^+4N%?ue`Xc zd1T$u{mHY$FI0&>W4)4}{d>kqfm`xQMQ52T)2~leclNM95*D-RShTN8^VN378@bnx z&+cfOpyO%9wp* zf}kc}()IVUtQ%z*BBwjOwN&PE;WCY!bcFknY1;SVwar_it7=a#V))l#A~Gj1z467a z<6rhKsXt(MeHv@zvQl$~>^N(-jd5F_ig?^BwsQ$x7s<{2y1hbGdvn05_g_R)n%_uy zC>T9!&$(^t!g_H3ul5@gq!u+j$Txg;!(-9UI#02vi(S@RUz}7hdgI*pZdMhy>9;SF z)-&At&b!EGujRf8a=zKJ3^$8HXRuC`c2mAGA&eM*4+ZH7> z`?u0--H_u+%@>3#SG4E64-{C)@sj1$$)8MRhh-m}QMugwMV86(LEDOk;&uAkqCb8L z%#HfKIzv8k{^u#P^1dlm$3G8Smm%)?K5C!q`>KA<)lv2D=Wf6LCst%_>D~KvYhL{h zQkZs5D?XUlGbC5ov*POX9F`|y2 z`s~W~W^3u+mjsSoTz-x9vHS6M(3xXP^F7jd4$S>(x_*7|h5JwTF#dS+GljkKFw?!) zoCoA5hFuPRu(zsfqI~4K<)02M30zy>u&k=;*^-F*a%Z83-`>o4l2UYx*K2Xa^df7O zncaa|oH_HeIZA*0n=skEBF&LMLoks=`*rb^S|RJGs^$YGp-WHRug-euy~A?FhtOS; zo+~~qXXlccbaTa$-~jK~<-q~h^VBxj@4fEls#H8hnIYwKy_lBjZ^DwDc!Dr`~Aa zIPRZj|N6jPyVo!Ll5($?sToTov`eJ?4jjI<~`Z6Nk zR;ldz?YiQHG1GGop{{?uCp}&3O9d(x%{$a{)}mwSlB$l>(3*74ufM0C*xD1YZ~iXF zpC`ZX;h8Ws*B~!s#r<$z?uB*h`8r%SOQ%F|eEq$`Ur*%2ujj9wITvX?;!PKL^<6?q z&{8Q<^y8*sq!Lnf^eTfOGrgvVa8TVs;NzV5qn z)~Wfa(fKsZA7@Y6@Xt(+nQa>>STF5%tFmqJ?D>;j_V6EMe)_&R=}4DlLG0oB)1QNF zgFo;bU%qDE(G8O<%jRDBo59L6WpPBZts}U$I+L8f=ytJQi5DrgwEmgU9YuPZzar zjB*jvJ)@<#|3$)@u!&!b4FX-Kr7G5BAKRqUl7IHXwAKwmJG(mm@%W@I*~g})-S$nV zXKKWHE}6eCbbIU<-E=noId$5yTf&W=Z!$URQc~yFrk#xbK5zZ{?eA>cBl7Q_-W^c; zIxbG36ChT-C^Qni_JTV6z034NWOxWOv& zO8g(IG=ASrf6N5-&zq-me6`rC32Y1hz49wLtMY2=?K{~M1L}|Je4gZa=+WY~72D^f zY_4eTk&91%XrLbKCNzyx=wkYrgMYjhu}#o9pO~`x`8(em2j)DvzH;5McA4APb@p|| zvV_*&`Mq$)EBQ^^vFk0~=b7SU%$rwm$dH zqPjjg*dxTV#9BYDww{r7$&x8-H*H^(OI@yu7N5DS-o%-kY{h zizOmgEGh5Q)LSuU6^g^}L95VGlR!F|?gqBfFLB{^myk zJGNifc;XWM;>sVMtxkKio(I0E4N+A5zIn%<#Lp8qhW$*@-s5^_+Pxhe(O07vIb91D z;{CV!*1aa(6#n?1H>Qi;DiY+5T(?$+fm^cYiBj>ij)*X$CdQAhY5sy) z3A&mrem;Ac*2Yf$)vR&vq{8H#)pvp?|6*QgW9PNK)5PeTnvvi)FSWDJ8$-VJ&dW+a z!mKGA8b9~y^MlhOgRYtwmAlq>HiyZ@&wW&>F+Kfb>M^~Sdk-$`on7!*w{)SxswfVf zTQaF3_tzfTe&NFb@A+-llD6(~73fXwXwKa7HrQ%UT3N*BiOnwz*$jA5L)YDF4wNaNB*wRL6kA-Wh!?3oL(r zZ#+H6GW$E@{|cku-X+f}-ZDQIZ7=MIJT~>wy%RlJMfYZY5#__`LnP)8a?wG#O>GJzrzT$3W?}mbBZ<$u9hMeq4;4H}69ql7LS@K}a zj@}D}EdLs>EdE(j?rP8!qBrLZ$F$E%w{jg+Cu__%iafngeBy~Ug~1zM>R$Tg9$~3k zrM#=?;EN3}mCJrjym6$Tc6i_ z{V!N|D)7LU(q-Le=FMd_VU6wW_PJ!^wdSUFcH@PwdvgDNKl-8AR;%DmaLMa6lT5p( zrQ~W){i1d{_wVwct@^T&w-vrjiD6h2IQhJFntPOD$6}*22MfEj3R4Ele>RVV+1Ag0 zvR<3x`M!$>CQa?;lDVI7ZYhV0o8Gpr+ciNCj~Kf)ONsKkSZ?1cJ8wg0y5eqGb)R{y zX9BGvcRNm%UF=q%zuThW$QiX;L7KVcG2dF8Umbn)z+QLTerG-1NoMOA&M4o1XT-lO zlF?w&W6ewk6`|{l9+P4=F?86e2J6Hu69EMH*_yJa_sk{9FGua? z&$O*;|68*xuBGFY#+_Py?}rb){4;LI^)^nIR1SQdEcRv39Os$?hxIdr$Pptb3xKDAvujan6&)*X|e}7Pf2FcUt>A@I#&m?=AO~ z-aS@tWG?%b@qc>D^la_?*gYv;IknF(GJd`mWyvGZx$m983#UKT8Rrya)W1y>t&Np2 z){*D4_q^b7$K{T1yN*S;m-3X=(-~{K?mgg|{j9_E(45!%Cz^Kcv1*xU+}ODC=1r#~ z8ez6i`ISv9ZYnF^D#|yuYI(T6qkw_W|7qpr6J2%7X-}ze$iGx=PloTmqYI)U)rsY+!@I6@AgWu#4<|Al$2`bh`g|6`S&oN5{k$ zKAkO*&7Bh&xbx(rO}bN_ZhWDnq+73Ws;GPI@r8QY+W-1?9hi1i^z8KJOLv#Xr&!;9 zKWTdHO<$KKJx%RZZi*+^qQc$Z^v}Mq_~mTQ)E(OKDd*<7DK=K|YCpNtx<1b(b7{Vs z$Ro3tNOMp77I94kI@eQGN$ypE--Jb!@kgcf3;lM!z>*^0T*% z#q+ z@^d@Zn-HgUq$^arc}>($>&yMZc8@B5xwd6Q%Dj3|V`d<>Hk;MuX@g^k_QopJN`W(f zSFCr~w07#@O+~Ihw>hRfo8oi#)YP=zhJYNKDOcCVtaVxwQz)i!!jre%;n&0frxyxF z+LHN79UmAT)-lFfhA${Qn7*YupmVpqx%JEg_kN`dXRbZdTcGjtFvs^wL0Q!cyJQRW zqTJNJJDGesUM=}odvo%f@+DIpUdPY0y`G%9E%yBy_fIwj!nW%ymoOMP>!xw^L=@^h zG+$$}{k3eM?&pZocd5ERj!*Ee;Xl!Jqd#9xqtx)c`@NK>&zbcn zNJK84qY!hkViTjWk+SCTyB8YXzy0~|#2PQpR+D>c)E<3a@adS%#ODrvVa4p;Pvq{} z>d%{?^|JrGru4_2Z+n|xET(xGXGiCVv0C=O6kORI@%1<9wssA+Tz3z}f9N_DR>)&rz8Db@tES zH`c_zQ|{>r^b6m|_mJqzYAa%PMBn-U|KH!o@9Ps6B(XTJ z{Bb+SFPy?DibeQC(}bDVQk`+^gCPo%5m z9-V*Y`ZhAfKI-=;akd2o3Z}QMg#RwL_5Q5Cao61i^_zvC-*j{Muk(_3O3PE_XB*Ok z-+wS&P$Hdp=uU%TcJ-W1_P=Io+jGgx+P{y{XHMT=>)*NA^9xi7o%l=+C+*{=ZyTlyWjp=EeWuFPtJO2fy+p_pO|8HTlGk+WPVd z9u3}GpMO}36l3L;hCt=O`~MgNmlo1u-&o;8nu@om3y zb^V5fbF0hJ=c|Nf9^E_XRcUhhixbMHKYZ}nA~Rv7@%qRAPo*bSo6TT9z0_x({Ga$UH@m~)>*@^cE_})r^E|xGG|$;)*o`8#fhYC=BrX%Yj05`EcW-trZ=V0oH}bi z@NH2%Dkb)vYrfZt8K$c$uWDuI^_AUwdSmnECs7Y??)ot2Yx40m@A|34_qH4Eq$?G-&6PgzZuuSUSuf8tukAa}m+~U<(kioBGBFQI}bGZEp$N2J_k) z-&!sFTva@5W$xYb7S(=NxAbjOHdZisUE4LwXuh>qTJq`UQnS-Z!dhp-zc?n;mru=h z{qoB~an=7j3$-ur*~4MiI-R|I{h4IP`hWk{CP$0Q|KgpVpDJY~GBtYUuP?K=^Q~OE zwl4Z!a7DpZr5$|N-uJub>o;>>4A|S)@F&mGOXT^#yq)^ZW7edXiutXh}3p`EpfW-{(&0{eN)zK zPEwn#{GGF_+LG6=d`0Tb7n|4Egj9T~6k)qt;hcE=u2{MuU%|Psw^3!S0dqI`?03?+ z{lM33yZB9I7t`szKXa;|#R(>M{LNRZtNWW%yPzy%MXJmu;z=T$NO5xg<3q)b(Iy`J{H$8Mb?-G~JY1b5kzu^#Rq#N!w06RMc}aeC3)`yVGLw+xprc zTf<+koHqN~<`+*c@~sv9ZpXLQ{N9#(V#`haB;H<#datqi-j=Y_1wvA5uO1D0uK2d+ zW8USeB!xBCyV5S+*b)}wk{7kwHOg{JSWNi7jNV4g`&;HE&961@yvjd$c5-EQ%a&_w zn^vqfj=rnYoA&i2!~5W#iT8^lIt>r7T-zOPw|MW`6FJGhTi)b)zt=ch?(=Z1tbA5i z_->K9=gm@0fXUCZP3j-}0N`_DWO@%>d( zY+1eCasQ#kVYg=_8Wi5u4%xjlMmjng&MOX&WrK~$Lz_Ec$>S%bVjm!L{aoM zC11V^&E|Z3Po~ZZW?p@hJ#WX1b&WOYY5i|1(j?Pa7ZsfS({bs56`kpUcB<#!OV!fl0RNg#Mw+ANHyilns0Dh7hKz?dUBKK z$4}E&(gW`2laT&%Jwb^|R#?IeiiR z|0RhhWo*h=FD&}2(Y-d|{Y4LxNAKd>{yYk0KAQRAp@!o6go${YMccVv0QM`=K?WAz6 zqwK-{$1)frk8AAz5kL8+yV3P=GPKab?*yK%VS;g ze~C8R?;|@|B`>{**WA1DUG2KJeUSy$!U#KM7d@Um@-+vd>vnG5E zFISV^`S0`B=kYI(|KC@1^-Pdmq2?9+Vs-UMH-2Jv)(2&1^Q zrfVj%7F?dmVv+sfjJx5B!wO;^X5AuoOhLRo4pMoo6-SkK#je`p%)V8-^EdmvmAT6k z1h1YbVs*1vbclU-F#Fy|(o4dPL%v5vW=d>cyELhK~Hjq5ylb<%C4^#UJd zC*AEl`o(DWD;0AQwk}~UJ|9b-`*{fq!k)JNTXtpVe(wI$Io1V+pQpO+T05iF`jp7} z_1g>&Pgwtd>zzxxzG<7q&5<^k@UiVmgxuA69O6$8sv9T1oH}!&-Hh9ZnzWnOAM<%^ zx0Ce_Yg@?Xx^?bTJ(ljP+WNcx*~mb-bXjb5P}9~#Piw=C?9+aqF!_5% zP5SrJ$FTzLR`ZPJ@&3xF7YWapp*BCUnEO!FjovV>OIwcRnOv}OWL&K;5G|);yh2{= z?>!~YT?cDhO}1?oy)ymCH)E^*Gg~X$lU>)TNgv<+H1eSKHiYsS(%)7fY#apgGD%E@5&l%5_R&G;ry`Fi; z@bxvDeMzyi(x+YA{_Nwqji&F9y;*bI>8$m{h0kV&Z>NcryXTSd%-D(AoD|9QKk?a|HBrMX8pKPs$UBscS@ zZ9@{{X0a6+-lzPv5D7s3A|J#umF%P-N_qIK`DOwsk zDcx@e>!ftQWorYUhdxc&)bsrRBjfM`m+Yr4Fa0n7H0LO%O&?2D#BsqL@7GuJ>wKSh zLH)4ZlfZ*7u2h8ghqoRF&Z_8Et zN#;wM`j%Ey8{ep0U6!Mj>RpPm0OOV3nmpTuA-vnl{Py`p7|6G3%B|bcJ5Of+`acuD?_4j_^6^eM=hG_x z7ZMe(`G0J77J8fVt+I#TW&g(i4|XXZ%NNrz-mCr8WVdCmVvei!g0G#n)ti2AJ#Vzc z%yz4@d2Ar}6W740JEAvBSzYK|w8bifcghW6D-Y9soSRjTS*;IS{6v>!f0mBN+P>@E zo?kgOUfXP&b)3uj*}hX3EItIE`fYkOFFoSminL`yF&`KoCpj|S{G0Z+ZIa8>?R`>r z{zZJMn_<@;`r&RB=Q5Q!F&fN&lU1tUr^)j^nfEKlb9&)Ib=|27dv8gu&JdUOo-6S* zFsn%Lu8ZLLj{>{$Eti$a+}<#~PgHA9=nIcp9TTrF5}Uto=`u<&HF#ISlxQ8a9re+hT95Vk&L`= zWvh~||2=hyS1nCi*5t_1rjtwb6IU2q^mOIU*}Yc#T`vFQKUdQK3jX~u&mr;ff#ZvN zj)=~D5cq7XvT@r7jm3@bpR=P1OBY)6dHY7r2n`cnpa1oyvfZjkt(U9)f7P!|>D4cq z{WAZ|T}Ku6doQ;Xk72u z>ZMhddMrTjz~r8o1}l5BlY6%L8R;MLoF==hjLClS-sH9=>skyZxqSU?cvtzUY0{>R z{PCR&({J&GeJW&&opo1U|BcYh>51Pbub;`QcYp3I_s)GQn!kPS3~a03vwwn7!JZC2 zy*;b8eV*UJtGDs<{)rN)D<;%;EuC|2!DsQ)+`3&}Otaq>?+uBc9Q}8_eO$`L=Xx@@V$SDABn6H-kSrI=9yM>NU~djyLud+gV?@S6;>cNc5KW5$;{na=tJ6 z_N?#2jo{ypnorD~EW2fg_I{0&*E_uL2W#)y<$e0^1SMhp^{VSHr+g@+Q9RI`TxcD!@hi-Ej=&nZmH-E=6>}e7tQUpg1r0c-fy2}8-AF}+3&jO z=CbpPTvjV87bm;EJtYw6aKGq7P+_xb@zi%_O^xXXC0Nflq%WoV zt$upVW`0tBu857R=bg5+$)RoQR!FeE)iO^}o)Dv2v-7ysr=Zq`k|%-_lF!bUt9>QU z@QUHJ`?lkOACLW-_|`Oc-4p+$Cm~;?v>1c*On6$GQg%D@uWCw3xjIdP-FEh3i)+)I zcv(++?3LKCO5m0wv)s)v&Yw!$Esdu&;vIkM{*6{$GNXIKDw$ALDl8|uQw&iy5 zOW)L1jgt*WLO4%)ynUT`W`4I|cJ@DhzYtDM(FCS9erq|h`F15N4DM=~BD;-wKjQ*x ze%lRs`S*kDUx;dbV6l9`8f(AG$zrp^6|UKNue&zpC7s!OnJ>F`{zmpaGo)7VZau8@ zX{)Yz!fYFP856AMF}l zJMFF7p{}xyBS*O0?(s%`?7Z7{+oC9iiR;druxr!F-rsImxa4hu zsl0oDwA}Z?LwOS|CClu8&YPL^C+pg+r=D_$jIH8l@7e0dRL8w|mflKskL~68g|qZy zOPB2R+xR?S_SWPa7}&@pp+^ zwqdyqQ-5#t@eVV_&$r)NZr*$Dde_?MRSF4`J^aU~PYd3-Aire)s-By^4*a}n(Rr`C zqMsk$QL!?o{dcf(^{jPqTb15jDp}Ohcc*-Fmh40^; zf=;W$Q}YXS=WZ6AD&O&H$@6W0xG$KNEG}!zyVUb<@`SUWTHai|5#eJ`xBcAEvLTmG+WO|7l@SG{ zw=OV#aE&@H<+HP7;*BSbOtZYp1D0zj?~=#Au^x&IwsCe& zZ`6-Z+L}6lm*Qp1JvsN8s-HY?U@bnE?%$KB-FK{hU88c&QN3Nqvu1s{JV8LyWtSB1 z`g4bxszr9po%<+U?Bmo`iqe~Al$xy1SjB1aAefWA|Mk9;*ElsM9LxP)&h*2tlmEM5 z*qf4Cc5BToa*O9*xmsKGzc}{7Z`&QmHasYQyKA28t&P!k$1er{c2n)md*3g{VDffD z(3>CA|Ge+FGOM-xpL{t^K_~6U-R0ZotolEfgPD`>Z`RD@j$*NJ|60pFmh_-BA=U=t zAGcM~{R&kqnw_TaDO9oeVv?FKQ+V#B%2DCt6CYgIY-N00;CYPK(<)6imS(oI^K8nF zSoBU^&C_*^Q^jJ*oXO^m7Rxu?sL^C&NiHhg&%KOkg}Gu|(YO)AflDChXe}a?mo~x#tRxSawSn-a0<}reg02; zrdzpJ@!Y~HJ<~!NPQH`d=eW7gasE1I5x@1n<#`4{8!aBmXgxCmxlzZ)>!9Hgi@EXB z{~lAF@Zds$aoHn@M>1N^i|%h`;^h0=cJNmsiNo*#q@gJY~V9k7MBT$G{Rej!WEhO`bNBij^ z!N)venVNQuEa_bv>MYw>+O3Y9k#U~mEE*U6$U;cwm4J0IPoZD(#>p0aEa{gUt_U3$ zcplJtU1YvP)8-egt2>iBidP(Z?J48l^I1Ld%X^=RWk<>vN%{Xf(D$ExZ{bT7_a^7h z&pj^|9O+z0b9vgF^TN}0=s+}G3I?U!g`aa|TGxOY=0 z`(F(%mrJ2)ehTLnuJ)PZaH23=a!!jy`#PgSCdKw`MjDJ3&FhQ;nGDaBP7RdfEaZz# zeZ=C#mzx^ERM2+w)R7$x#xJylRRxOfgtDnCLd{sXmdA_XoI&(V32}wPv8e$Ol^Q$F=&C!15>?o$s`j#xha`n%$9h;iO z0#jNtwNtpGaNTO2TyK~vB>Uz#htITVobY&^kp;|wP%A+CI4s|3HBT0JegWjkCp%XA z)T$vkJbq3j=svb{ol#XOR0lMSj>o1JAo&mB4I~Fb0#!o&=b0m1Eygp~^Bn8_TfXbm z5so94NG`N$%76FaJU{zSeLLgI8}r}!*Ys(uc2Ih@sdggAPN|u%*YyAY`~157r`>Oo zZ-}p1VHuYHDewD^jyC~$i(ZMZ*<)lmUvY85+rPWd@wcol<-J%YkngeP$Of+Y+s-s= z_KAFHZ+ms?{Cl;(ddDA&$TP5X>6!Ov_P5sF=3?#*d!*a?H*@x!q6tc>is?GJ9-mBd zwr1S$-uZF)yx^_RjduCmz0C3{Ep4;vytT@=-rrrFoAgNJ1%udO)%y{Cji)yW_9-ln z-<9Rs{$Kl&eO#dS`-)%tj`B+ty>jn!mwdnDZN9SK-BTGwN^f?TMJIcadj{BF&`rW*EA8oV9&^)MEKE$tP6{9_?}1z2RO?pH;=u=G}8Xi=MBtI5hF! zjgGvPnzz|ZLK;Hu-i#BvdwRpsc`EO2KU%qSs-EuGx$m{J?hEeG+^t`4XfG(=TCSQO zXn5z<{O~>OpOmX3rp^Cl(tG{zEupo)t_Uvw$oHkUW7nBOJkd5Ea}P$im8^6=x00tb zdLMJ=^826P$ZX8*>SCJq;XqsB z)UA{FfAD$Bk)>BH#FAB-*!T0O9ZUak<*3xWn4F|Kmv^b%OZPo8lx9DYTl@Fd`gXLxtemghbV4JhIN%7{I)5~H4k~)uXP}_L?llJ-#uOe*KP3CuAnZtn;-ja@kz_{0aBp zuv_ydXqyWsF-`yDo7UuECd_*LR9e#RnF+!xT#NQ*sBt}0{q)u8lw}uBwT1merpJbz z5!F8%@64S1LhMC&*j=qfho`SUr0{W$rRov%GtowiuH&N$|Q!QrTd zyCN2+T|KH678IMa>0L)**WJypls=yKF6CCqiMcxULTk+0?mHi1B1>5#Q(Inn+4u#; z9`h{KKYUv-eFyLBb%oKha+Fr;Y}-+!)4oFg>ekm)C-Wk+3?{wd3VOzM^XM+mQq?<; zm+ophW8_@Q{l_gRw)3Iwv!@qQYWr4y%WRAKH5Q^-cx8tG+B}Z6B3b3iVBY!F8eXZ`JM_2mKalf4rP7 z7JGk__=F?gt#ehw3Oyr>KmJR*6w!IwSlMmbG4JAuC(AZHt6Ep z{7lI3?9p$jDXSN;z23*6@U}er8_R-I1*?wFNxl5y%R9-OAA6%8DjYSke6;N60q6JT z+q7rBcD2}%^tZ?0cw5jhuEW;(^81*B9rje*RnVPxwCF*Q#UX)ews_7;pS*W-qWrh1 zy<)1C{KvNS!;>&8(H!00^xojejLZwkzu%uZCA%)t`?B%Mh`L&ra~t1%D=@^#9)e{b0R{`{34rs0Xzg_9bN z%bk%dyKw2bw&Bv>rTw;XJQ)+t1?YTtz2Cm(;$HdE4B@hkR=0bX=6~9qX#eeZ<-79c zj6S(7n~%$$_F3CpRbj$+{b!E%)fyi|?kSE*9JNO_RQD?LOq8Br^xMlr_~r9ecONaD zrBy6m%~e{Rc&%3CV5f=rS&83uEnlTC8}v+-IJ5uA>h(Jm&qVxr%~HvBiGS#nk|Anq=GICt@#d%CTdgjg5f8|TOCgv$wedIsz z+_bqP-T2pq;J=<6cNq3xRC(F)JR-+KY<>av-DkQXQr1gu$VII*{ocEF#i^`=2R?uN z?0fli=+0wXx!s>niS@DLxAA>Sb!+~NO`UoXi{sX2?K}6y zy;f)O>y3=9oUJxTcItc!i;L$u&6B=k=V#TtqE!B)SI$hje?!%FT5yc@JpD5vS7Qv^ zOyAD#;+efYK=k7D(ucXPD>lA)_vzkhL$&=+pKUn&HOty@wbLEB?}t+*oA!5D^T&Ht zE?s^{?fV>s15KaHCoi&Gru!f#l=01ho-oJyLu}H$5t(Hzm2cy8t6nU>(NQ-|HSzMl zuW6Z!cC1`^DMvr}LgX5yvPjK$t7e%U5cqj5YI105$B!HB-F)5OmwAOxtNOkv>iC4h zHxJg{E{=R5`*Nqws=4WA64NR>BTdW9jUIoyXZO~&)YzhI`=<8PRF2JEKMLJbo*wkQ z|LNfJUeRXJ88yGYRL$OP7*Hg&ebL9qWe&-nA?2)QE|YF@iCz_0_WRsP_Frq)#80w1 z;fVMl2WDMDBTIYYdnnt3Y_;Peh|I&W;b8q zXSu)+vsh=`oi$CR}^%1_n8utH&^xCu0?U_ytQ<;E9yRW z?OV!w4ZCCWwLYHTEVTIa%TGL)JOd;n4tYh@8h$r8nDOi7;%c3*qW0g;=_x(Gq84^z z#s9W7{a^M+%=*-~{B4xL*(D0M43+d!_dG7!*DFzFS+w8m={vK7EoBb^PP4yBTbUh| zeQ$DcX zcp9_*$I5pTc_&uAu>RemDAyZbZnk{NofQv-*>*L}7QQ__CA-IfOKANx9)ZUxB0`6Y z4ol{JdnaYS|He_y^oH1Jvyv>2mjr(QUA2=%(s16ySf*z+X**cf%<^f<;hHtuhiTi{ zT)$~21Go>ksTBUVzneNqbtfi+S-*Yf{HO_pybe~0& z1k>YdZE>q!MCIBmG2UNPHpA^om&XqFB_0oIBKy4_@KsF@p3Z4=IJTfV<=574i-o5M zWrfW>kbUmk3zk_2XD_i=z9Z8kB?x8C~V%mU%P(OVTRpASo6DsJ57u6Cic zx;}*|w)+0MH%5&!t9#tl_89#Z)+>LvKlgV}Mx?GztXdqq_Nlw8QVnNl`aiB*{BKVQ z)4thvt4wWF`u~1XI1>Hp>IXxy9kH!U`gJdrd1kP<|D884vnybM<@C^n1=4@Ern$YC zoxVFDqr;$aF~_g)S%Q2w_gz^1_2<{~@iGcC&a~(|vHyN)Y;%seX1d_v=@uu8)_(Mv zRrk>9+2jYOraxI@aYx$h^-)FhlT}@B<%=_Z?2TCNh zgR=fUOwZqZT=T)cFUvQ6n(+IF*lu-}hqwD{`gYtzrTqpP%@B`j411P9J}^|30ww*600|h2L-HtZb>wJMyde zS<9XIN2kPV@3Rj1@tJq$vh^Qd@2K4QRQ=)JyJFi9H^feGvgd9*s-!KRbmj4ndA5G{ zH(KwnwmQtycyM`+<2RG~H%I4q9aQ=FBk$f1p8rN^XRb4R3_AI~oBxo7cmI~X#cq>t zBxTM>$(He|o^j^4P?XIq!($7NEbftWOZWamz?iU|bt;$FgP>cD_yzE8z1?{46`+e&txabSL|N8f1Q~9e$CnI^P z_pQ9oQn@JdnaWAQOOGb57tox~lD{G4sm`;R@q#gH@1J{go=LNE$ya`X_TP2ZI{p7| zzrTKczW?c}mD0bi`@YGa-d%4ayXa&6v#pAHXY)S&?a6%hXmEqJE2ZO7GS^llKa9ZyzUsLbjie<{3Z=W4cwo_^BHV&U+ zcw(V*U#Y<3vo&Y-IhOY?xgqI!E%mt328P-EX}kY~ai%8vPQGC`FHfmIP+hL&;bM=| z$=g*<@2Wn@7il^%f91Q=YvgKE6+Iknzezo;S6F<~knNakzCxDnrH@ZNQ_l%3{%|5Y zYtl@iRqdM3idH_lWgrzKAT`CwAm#p&sb^#-?N#V(y|TRXwwKY}$rCzm+oo+kny~Q< zbDm84Zym0Q3a4v1pX&B)RuG7o|DZ9^q2ZuJRSmiiz!P-?9F);9qIg+4}#w_#0k2h8|d^zV+GB zP8ZwH8O~=Tj5&)v84Ch9i#pW;uLVx9&3}|6#NDrQ!uleNH-0QrE|(>bQrI3KMZjr;)q%`rMAgX8on^&xG7| zseD|wWRBZJ?_-5YJ7$F3X1LMkt!QrLxMp3&S2d4@~2OXB+3 zH~F16G&9wmXRIaK5%jxZOGo8|+LIrRG&COHkonre`TS#7?aojS6BfM_9`UEV8+5Ga zlzd)UzLl?|D)!Yp|K=SJs$X4LmKVGAL_>w@4&kHEa%|l`NVf04w`P(;B z=Uu-&<>xoEwC#m=9QQ7p)Z^hb`(%b(vWDwcJHrzjwku}Of953i?TZs{x~H0N;mm61 z3A%3;o^{UTFI>9wL;lH+5h8jU&vkV$NSYi=jeFG;@sV-o1LwP^m?xhxY27j}<+PUi zG;T)g^pEC3uf846e>&+!_9-2kOYe?8^vHRaEbF4vZE|9s?a3*R8*GbSzkXD7u)R&z zWihAjX$8$Uf8Ex6oiyXZ5~a#k_05O5jFz%(jNu4q6Wkr~+S6+NIXBbZU3<<~h0J)s zILqbj9PP&EmyAyCNq%z3Om@MvS5|EsiaV;hcX>GlSBb2wuAPuK@zb(<$zfN_GZ_nJ zPANaTRIqc~iMZ^$$!Aunb90}0qk6?7?Y?Rt*Wuk~lVw|8<*8or@cFjUh^gdCfbzw( z{N$Ye)(j8r`)p8gedG1I)XO~5St}L4wiIx@ecSs+dDD$W%M?75J-XYzR7xM*KSy+C zhl+Qi6`LOE=@^G{esm6vNgtBxyQaijti!`L{QNYez}YguVUKUv?b( zs$o^PK5)zWl9oj+EppfWjDD?%cRuW z2F*=bI!E49pncQ4PyP$8TZp;dPGWZu$$Fzb(baL8`*~firSHSf?eS+;O!?cZvvt?G z9TQCYr5j&tG-!y7Dc0Zqy1p4Na9?{9{iK641E65J)Kb@D{%``!ziebzpc#*A0lv$xHaGf+Z+xM7sGaRp+U=_X3eInP17bfMIXl}<@<#HS zUnL4z%QtQ~uID?SC*(HQm1tfe(|(3|=JGJso4Z$KA2IAJ&Ip}gx+wNi z$Dz(0IqfA3lGR~Hd6T^Pnoh{HmoUt{)c;v#R>dOAlY9kxPIO5fkLyWD`?lw`Nkd%F zX5o(14=xfuE*)*$>opE4Ts|uGYnEuZOTfHLmL<`v%rQ-R>A7B zl*O#t=U&Zc*gT&laOOkdaE2FYrUi~--Udg`_Ic}8bbD8@oHU)Rv6a1Jm71X%?*#3v z-%UP?vKU?lo^n)MDit)JblP0maEMhl`A0M`|GF2*|v`Gzb7g>&)H1n(JuP)W%kVtPSvHItcJVHXS6Oi z>xgW9EdSQoOkAMz{w{e1a7=Rdwz`t;<~yy>h?jRCXP`ZO6YGTgSlSwog{p5@Eue7t?^H!CCAk4kO) zF^8$;=FLUL0c&cHx2tKCui1UzVqxwKq3!h@y%$%%IuMsJU4>z0{-R-a!BCf>V4U^q_QzmzFgJa6ub!`gi9_8Em^4pfx zFOwEX)(A+?vGt7E6xaXM*g)d(mm`dZS-+Nid&1{^=E1kCOFBBXs4!S;zQ03x2w7u~5W|-oQYttkBJ1@98EmtT??BLk*#KN@5_5<7I-^P=2mwP^{@@ls0owsC8 zsg!op7g(mHNsx)OmU9gH*+Yh?xu5;v_v`;qdsg~gV_r~WUYGxgL zbi&=fxiRFko$_1Tj_OI0daUlw+4Edm9xG1Do)g?MyM5N9nHE-hnFjg}^X?eQ-aa+; zd|jt|@vMc)Dh50{9ow8c8|r7@S(LqK>EAZXpd*jg3dXjk1W&werLk33UOrtcU}t}y zm$u`)uR=M^-@6nx+Uhka^yqC@5vpYPZLs7-n%!3C1LkjP(q8K&wwkC&S7jre%IGkd$F^&A;}+jS*pLQ@K*9&PRa zE?NBEIz~pnda|nE$7?d4ep^3xJ$zKNb6x2Q3$go~G+krD{jat@dvW%kz?<~12lV-7 zeC(SWs_^V|zH5`rw~3zdbK)PhoNRqKC2m1td%_f>$6}i%ojlCYGG(&P`M&+HIAjdM zKQm-2Y8%(3?{P@qE~HZDn!miMVa;1tANT$DLqDe;+2_D<;`=LyZzo>MepNg-{hBw6 zis%#RB7N4MAzK$joO>hAnp9Pl$f>p5AJ7Z@o#yVn%c8rRr@8v(9JmO+NDNUB0IK z`8+j`lrnLzqMYxgBFmoj)LBO@e!l&Talsl-OV9WLcTTp7HJ4Yet8#u#OHf z%ilqnu9dfbDDEqZ4-fWYZ1bL2%e^7WQ*)BBn$)BTm&%xKoG-5DI{N*M{H8-$wf9$9 zetLX!y3)t*Z(8}3Ouz22exi`Mb`5X+kC(AWvL^glwxDpr9Q%~BtGgxCPp%U;b5`Ad zdvm1LPfhp7GB@KLU)p{bo};w>i}93u7Pck|zuzrybJCt4b=*wXw`P&Ds^vTJl?y*s zhaOw_@m19}`&AK|S%xNcs<$mno=F}%6B>}F6+3-R+p+xf%pcu%?~&|!+4Fj4dB&fZ z_jQMkZd<}I@#1UNg!yr@)qi?dOBg)x`K=oEIV*PV<(&BTLmiv{Sc!PVI9I!UlDcJV za(nUe-pjf3*EvcQKAU$vy5#oss|OrDpSj6>BXhg|ew*!kI?D83Y+olYB!1D)Yxmx$ zJqC}??6&xuQk*sa)2{aKl9d^AzPA6E@m9AoW6ozui|tBjn>`oVtS_uYNv3Eb(e4ppo zyssYn{dp`mJ>$3BT`wbiRwO%^pR@Nv`7(vV?Pm8l)n*m+z3*_|P-^nK@%Qogy&F7I zOuwpHSg+4ITB1HDz4QwUOCrZFK^?I_*F;aQvbh+W@OtXaTd`GAAoVKpxxm&&$Q!eG*<~N*c%Q@3DdyAO&q`KcnDyF4OFMHmhy!lU= zwZz}DRU14Q`{!}p78LF)Fte?#Q#8Dr%O!N}&!mdee?=x19u@c&f3&{iyj`=RN~n2$ zyVA|@ZlQ&dQ}*$lm}}>>euk{VQLj^4MmH8WTsz{BJ^hHYmE{Mv1%Yb{pLz&dM=t1h z>u3!t{8pMNx_14hO&j)YY`Q3~-Y&Opz6w|OOp8ewfBv78=x|foA}w%s)h`QqLGG(> z9T)iSvEtCNJ^K4KhsTw3Uv;BA_kU|L;Sv1R#?|S%{$Ex-q2?Llf*Z4CqfXwv z-?Vi8U)iOT-z3k`n41#EwbbzBtm$&vbDu1I?WG-AYk1V>rRv|{)t-IJ56{+I>t#N( z()9J~lF6BMy7|E`)z-^|ofX>OG40l~7fwRUo-W?z^?JqL*-bOzrn74A{;M|W^Mma% z4k2mx6*|txo&T_Q^E(?^jn22P1y7s(y(%p*)4uilM zumIK`t82~mf7zS9iB@(WZk;eO!eT{DTg%_cF=>G@U4HJo$4-nlQLvZC#I zp$Aj{?LT##x{LPxt>gT@Yu$8-+FVm-CH2ReW?eF6WmlSCb2ZIc7^N^TeXq;Pu8bMq zDvvEzxYsq8-Su%~rvDc|q1}HD9Enj;vRB#md7gCfr3E)x6WG0ywEI{7R@Jjzz&-i$ ztWVBnyT7Qbi>WPdXVTGW3UqPTn%q(~Q6_5Z(ZE91Mo0eLzh4P-#?EiL`}MTdAzx*Y zTTWg{qL*%+dyrAI|LDfUbscVZm6tCQ`#4j4pSmq-+vZ*$a^_*ZQzq0kv+$Ytz~>4CEa)?oDut>Q2Wv8+0)h*q=dWt-1m=R?(5kN zEPI#gES4(Q7|FZ`G1YWnQPH=(z8{&uwP-Feb-<@Nu@anC%; zlsyHmR&t$6c9SSNZ{t3Hp?hZErSIa$k{Rn<7*1+6itMqQ=bpE5%aPv~RvgrRRypC4 zw~_yffUB16Tb(8r)F!>W@_k3P?@kNfZCq*JN9>uWYPpk`K-dHm07w$^s zjWPOuLc!$Kg23swcGPXMc>7ps<)o!G4}5udJ`b?k@3LifjQVMfD7$y%>`T>tp4I$q zy5hK3pU=+nS#1p>FE?H|^3*$Wm*lSZ&70OAxxAxUX=!nE^RmdhD^I`r=H|3A^QN!t zm9)~`E1Tm!J^FhxJ-GGq`bgHL_mj-)9(e3tYrW)4;GKU8hnJ+iQqn9<6*sox@~!wK z`YL=~U}nr*Hu-HD-QPdhUG7{qH@xt@mWUr~!SX9UUe5%NO!~O&+7@*V*I71mgv^Cl zuNq&MoU-ohqIs-Sp5`;XN|!X%n0w#w+*&U7>C;bh7;*A*EZJgwdk=FeU%8dWf|-|A z-{k!w7HPFUZvFi=Q9hnWYaeX8rCob6f7TTak$}2w@&;-Oq33?98>>ejer8qVuXkW| zQ_$&Cb6T4wZMpxWsz5fmsVS<2EJUUW;;Qt_(G{?_Mv&jhj#ciPKny&>AK|1 z!vi5Y!2wb0=ZA)x=sthB_@HKwSEJ$2>xG8q%2o#xW~BK7yRZcQ^b-7G0^>XaJ$WTRbw zmgxWVy?E%`#zTxh`nmS&>jf^iP;}*;9P2q@0UJ{YSUW*m_|{cyrKJ-m9_8_GhYTMAkK5zmqGZvUF-Dmzk!v=V|TQ zqNSJT8Ecq4s_SxD+7#w{Oqp@|o9F3Ws;N3Nvs2eNtnMgq3y4~)c7KwR?a!%J+Do17 z=4f+*IU3qauSWR_sVq%9dwcb2qiJVvPi4Cp=o6&2^lIv5#wk(8@0 z3$G;UE4JKR{(Hqs>AxCR+-?bZd0Efa+`Qz>%(s^^Ya-sInY`k-%bGn^JVQ@^%A?P5 zyR8o0ULELe@m6cWmN$C^+Os!#zPu%yZRZeOomT#Q!4>1%$?Zm4Ry@;tXCZTM{%=mF z%t)?^_0u<1)W7q-9^he}>@^$UYv-@X%m<=3hFC2Lies%5TQ!l;~@F>5m0nnm^gc~4f%mGZ6@ zs{gyd+Pp4Fv-O{Sq2CXA)lc)~Pq3}XJi26Qi{!c;(!T=NeXZHIYny6O-Txo&>*X{W zy(_mA1lp}w9?RqTP|USpmbdMnAe~p4&z+NYxO48ACiGy@f{cQX^_#mD8S6f6Xfk$G zJu=h8PWaA=dO5Wu?X#P=rmFJiwb$=&Ii~ho`Tx9=#ku-w^--O!lRPgk`=7js%c?!> zc3G~SiJfe}P{nJ_1Ca}_ExpzYwoUcJ*06@nO&0FAcm3>`lIwY7*}S!u+q6P{SKr_H zvthv<#f*?~0HH*?Ct zZkTdl_v`0*tSc^^x^}L8NkKQ$o{JgJ;tns}VKKkVPNj)`%7NMX>eHJlP4>>VWeO_! z?8%>x(E%KAD#GkEk;Q6l6`27;|oT)C&H;(DL zEy?j#GP{@fsd`bDv+bQ4hcn+)5~o`-&7RuwE9@6YzMxy^#|zT~k)FbLKi&hoVG-Ar z`hQL?7C-9$Pn$1t$Dn>@2G^&5s~*Ii3k!X?-p6I$=ig1yQw}`$Vm!z7F75y*MgBf{~R!^DEbmi9WpB_~M%RLrRj;zHEPYb)=4_2a&o>3f?Gp?_ zPYQe0nRY+a*wxx{vvBUQ=`X}CKbF7MpFe9u(8Z*lea4;gLR_vzKVC27Iy>D+aL=Jy z2Cz$ZG0mCkc3p}@Yp5~AKi_P}h z8T+CmSA7UqQ#!x%uWr|a*ABnR3PQ8&vhLshIYHuGAk*<&o`S$@hNsWzwJiY!;3wsy zYtJm6vTN&SMa`O@6Bk|PEfIeecAwr@ZeRo)7Pqf3}rP zFP!>5jBEP4xv~9k|H!v>Bq(kB`sU!YsWE-KCUHNhe)(dyT4C;baN6%WIYV{EhDm{2 zPt`$EzEZ`pyK&%@n|JxT+VrNMF28n|gOYC4O2(sH_g>G)WbS9wxU-1mUA2kmg!D@@ zx24%Bxc=r_J6+koJ}`uFw?|=(arKvUMwJ&2S07xf(0p~HVK-xKq4r+Rn_)58;hnuf zX@!k7pC8p6f0CQ4ul9Rt#gZ8z_6B>`sIYxH>a{Oj>6F#Eo8@XBogFXkvhkYI>9;oj z;a9^JR*{3Z8|(S%G@0jqymbo_RQaYGA~j~%9Y3bS_T}hDEAEdmE7>o5XFlJMSo67H zf9l7G>z5z;cW-dm^uqny<}*uE<`m@LF8z7nM}&>n1Cz)~3+)$ox_k8W%M4XOIks@p zRrhsVTt4fnt>uLd+j>2yGYM6EylMR=!)`{+Tl~xBs;!p1uqMUiWbWHDa>bbpf>P(x zetchjDt%71>1Rg6JBwNFofmzuW=Si{1~agcQx1gdF`nak@R`5N4s3(?yUG1AqDL%0 z!8{THfkWz;A$AQCN58qq5q$u1WKykYauYv-j}&4%k!ww2kbv{g?zFk4Oouy#*|GHK+E7Y@P-#TMsWk6WF(T z=kx+i&drB!?CNzt$D@*XeG>C*(Kn9gUf$JZTax1~^i77**J;tW{OqTP13!H!UnzI8 zKYaS66PHSc4p@Lqo#k({!E_0xzbzo$NZg{E{k_I$hh9M^|-KQ zuiRNK5AR=-#Wzb#IHc?Kz&J%Obc6TTHv6|V9$fPki+h!S9&kPI@Y%*~X`g3qm+?4Z zd%hvcJQ{{A(4Ntfjgb7Oe{Q2eU)GNeCs>Adpi^OkN!%{z-&?3}g* zv#v1vUS_A#+CSmlwTWHXPxM%4CiSkpU9rsCU#QHwI$?9tyQ7DpLBJ#FFPh_c)#=Z( zXUai8N+Q=k`1o40fTSnYIfe88ess%M&{kxQUgs>Wj>UH5QjHzxiKs-FwYsNlSo!Ps%!eu<22K}4f+dvA52~Ru23c{Nk;SF%c-vm z{OZ=9K5TN|BUiig?(YIK_176iv)Wp(Y`e7Ovat4^x%*ON75Xl35Pa;x8CP6jp}s%) zeB!M9CEKPho15wQQ0vN(nEQuKbdH#LB`u#g=j_Ql?Dr~WK9knW(>xgcmhbryon4nL z)-2hvR4s1aghI)zB)RFAE!G^d2x@wKy^Srq*oNnG>lD398i=BcrKANq`;a78- zyza}oBc>}j_x8-HX_0GBR6I6OXwS1}1%B5GUmKhY54sa1obU2r@0FCjZvBrp2tD@T zoOi6iLj83?p~Q1-&AgS5SI($g_Hg5l@?F;|;!S3N)AR`0bDR$q z?;rc=)fMga;iFr7aZ=o+<%JQRh2Fk3Ht#$X8h0LCo*2=Q+2FG7=;b+Ugzwv(xf*!W z$)$h#cL(Qs&WozgUK{9`6uNWH`*`KA>g$8)EOoL`@RuL|S_hI*Ol+k>|+R!~_0Z___rRTpg6*Hp=VV{1&v^3us(%y9`%dgkRWEi*@7BqGaaiZR zd!aYyy{cjh_1CUdG7#fF3u~=&^u2cTkp-W&Vc(Pos-^A4Nh@mStY5NYDT{nX%zvTJ z3iFO7svc#Zcip`*=-}x^oDX*{d%a_$>g!RXAA%5)+y)ip3F^gFHZXQ=J19+cfDKG?#`R>AoaiM>wqGewpIyu zuMe-bMf%=5w|vKEi+ImM?~95$DpoB^)i0b5<4^ozto%rN)#XhG%%`Y*QL8O|eD!{l z*R_jG9-MK}B^K(hc?uxW*?C!i$JHgAUvqThjwh-fn|G4xkWA$Zy!}dkBQ(nK8Y}9_^y+1|okaAZ)l|( zB^6t!@BdmS7ydWw<;u=>^@IDqc-N)>`wU5&*RRQ*JNdr&r3oah^?$kZDD~ozFE+i0 zy?T^YE96c-ob%`0-{p{a+_V4c!#Oj$3#1^yep$GfF-G{1yYKbFh|a<#EbA}cG(9xy zUi(icuj?(_r{zu~2QmrEx1=hscT`RIkK!}t9EGp7|E zoceq%qgGbZzlguO!BVoiomX^ju3-3kU1L8}>$~p-tW_TC7}OK%Hi`KD*zTiRQpc)e z`tjG1ruw;RTUe^4U{-Imnlt&n;WMZ=^3VT%wCak=rPjAEtsqI_WNzZDBRhRtPg}%$ zetfcRgWLaUvgbT!xKAySo&HUiXJzMi^&^Zs)DkbqRm^Scz2WBh=24k}ug}@sS^7)L z3Z*0JtN717Ygw1S{(55S{rv&6zAX@Keb3|DaBEqj;*EY_jVt){8?Ku_jsZzsEGSj@`ti#i#{A`K&y?mIgCwNh2L*m=OT`oALFI<#!RTDR z=SN~5LW`_<^Cx_4%W|ri7XAm8hhOkLKN9d8oRm55xtCd}KjWGY%0s%QA3r@XpUAdF z?w-ZE!y5!HGjzrjuKqiz^uqo2omN`m+b@Rws*Gu!6>u`@Qfb6p^Qa{({);W=2p2#9 z22DjrwAD;XLhGYtG+%3`vpa*Rvk6jATE17-F^EoxIg2f8|;C z9ro(t-+sF+im}4kG%{ZNcwzGW+=)VaroAZeJ9FsvaZnkT^{Dw)Lb30ew;;27lvRJ! zY*aYM8MqWy0$yu7Y-zaqmkA%J}b z{;A8pT6XS!JHJic`G>O8zD!?p_nk#v&hvbC&N%OK3-#B%b?^-PfbECs=L_PWpha16 z!8e|3CqEgS5f8FrSO0!T_AIBzZAgjXYahRHtJ>!kQIAR`#6XpjcNX9CmUnaZ#PD6N zQQo>%m}p0YJ2X@S~K}jp_Ca&L-tv|=SSA;fD~aBG+&5tJm1WmAU+8z1r^8_vgPW)AzlW{r9)-WvRLQ`QPV# zmnxb5;r;a%4XdK~<6mokJ9&MOT6EZQVYZ~#KByxX^Mf4u>rttcS(X>m)JNaVf$}z_JfBEm!Fq!vnbl--L^(U(; z_T4v{dg15q0&mWHtB+eo&VE`b6BcwQ=yO2CkIa=Np8NLq%{$5C&#k)jz`_sS*V>PN zk6tEZRWF~Xd64~`OMH^vl}wqipqdAMQ!X|8FJepFSG0cfv2B72l?zT^Jvm2U?(M=U zuNSRLRhu(kATj;dqzUuCOx_-Nqb+yJk#m~XvnM;eUvp0nlJhI_Pd=Q};x)Sv7V53n zgmQf1okG?=gce0h-P((tDgtW28F6LjW2KcoQ$p4!Z{S+I!$GV5Eu$9a-A#(Omq~A4 z%cH`Qt7DLpwex?@%VB z7}Gy^lU47s9jFZB^n170YL@UMw~p0 z_=&=pTYkIyW>r)<9aCL#GV086NP^d2XgO!{{j;}0RZg_W3%f;&EoYYaPEU+*&*b)< zl_wxKaevBOw!Xs~1i)>&G7EK=Qp-1T;096FqgF8yJ!ju*+sb9yr%JeI)$QWhFMRoY z%J#@h&6gKxAK+a3t31TFsBwC8F{sih+;vSde6reW-+HieuMd~H4_g}cU$Fz%oK4>i zWzL;^FHtzBtrygwye%v(c0Fb8F8|9L1a50|#@fcZu1k$c`)TL3J9oLgzTD$|DqGTH z(%)9|St&g?x0)$DDO%=v z-bIHTO5TNjVYA}@f4-?IrTWodejSxSSB@3olk1j04!PH%;wbbnt9_zGpGM>Jcf4~% zomvYvZ=NW!ZxPGASi^#_d)zfehh0v^c^)}u!mO5YJNV;Vt{Yc*nR&M&zR&A<}aoM8vUccPvHrG@}PO0t%T$@kI_T)&gCNrum+?H}+&7RvA^0tcF zH%mTnn9b33KjfbD+lv&6Og1 zn^^7^nPh}<%&p!xGf^&e{gQ)nvC`M0MU{5GSf4ke<6(zTMd8TFF--p4+?RL)NOC z+L)$`=~^M{o%zFe?+TA{;k4PB@nDUPWx2Jq=R<9;2WutDCeOVXv~O0Tf~$GVhi?^^ z^+PN9kEn0nrfc5B61zu{KXIk+?y0?tU$DCD-6ghfYY5lE?P9+?wZdtI*zc?Ba<{WI3soH4WG?E|8l?yFJNGo( zpela0b6t!3)kME!gm2rF9>6R&FXBVza8v23*dDxyw|I0|KWhHJC+vxp0&u z8%_G={@Gku*yUoI&-IxNzk@`Ro>zRnb?}5>QQ5%>ksp(fai;4_yWiCIys_5oa9ZoL ziFM|O9Zto0Hpj|K`8BTP+IlkR(OF(*Lut=LdJCn^w2$~j9Vs`T?eS1M>%i^DGGUCN z_smZ(mUTg^zqJ~npz7n&FjHhRp#{82fFR6WkG?YRIzjtTeNHIcirb1ZH;VFj_+q0FALwj zVEz=2*(-k?ue{+CTq(Qa=LPEt2UplmYLSgL&Ix;AHZj;{_f3%V53N&`G}FGKV10G% zY-u$}pl^)OUoIr%%LvQAmxH7%v|0RZdNgF5ppFZ#4 zr_0AD1*v?pY zW77SZ9iQ$^VHf_buu$se0Vn^)V^d1p7yo_!w@>WR%ox*Ui!6$IvwPl8dtuF8vwrd6 z<UE3K2gYc$v2tt&e0aK>%YhGL(#vs@ErtrrI; zMz065>qCPTE6%>mYM&@_?_<I>w|?~}nEZd(p;RRer$JY4O0T+u6}qjb^F<#1&!xyPOf{ga*y|wlRV7eFjy-2 zBP8w2U2ukw`tYfu{p50?`PW`ug#?lRvQ>Ud?LE`(fYVdTsjSMZ?I&FqmQKC+KV$m0 zU0o{}*Y~flIJG=zzSv`^mh%;VXL&7}ymkf1%!*^&5}LLw%;K$=PKH!$IenY;%mTJK zYWw<@*J$+~dsedbu!ns~x{2WJM|(G>w!ZVa%g*sBmG$?zBl~V&d~$jAniGka+Grz!S6lVK67nY#CFGC z(EdjV$5W?0w-Qy_l)WC@5D!_9>NTs#d~>5nZ|uV0^s@mAmp$Un{Ze3jyQ+zi)5J1KCbj3L`&z;vHTCBB2v#CGamyKX}qsTszcesu4#3E{ET8C*T}eQ#5i z{%e1}`hMjGgZ!!L?4Pe3xWM@?V)-(mc@l?O_uO^laX+D&<}9Xav$L&x`q|HwE~aWp zw}VZ$E$T_rJvL4BmEX})j!#eD{e-7L55t$1lEPsb zvwZAg@AEGHc-`?zgZr)9vJY1M_;ca=4rprGY67YnPW}eB9-;~&FFlr;#}Qgn6Z0i} zch>F2uADaPhvk}rjc-5DJ#lfz{kp%) z{GSy6`+9%=&)HEQD+1@{|L_c{JbPmO@@WnyE;4ioRcPHj5Xt#4Qx9zDdX2{N;BBD` z8Euvnfa3oBvOKe0en~~4OjrL3tt-157St_Naq{AU$c1Nvqxar`)a3Vm-rI60bfI); z?muW7^SB7_oT*P;-h$d1;ZqLyt`=(C7JK?7C^Po*p7Q=2bs;#i?C!ywY=1VDj9KBl zvqWzdFTJ+;rkKY=?N{}uPOC)E3T8hP{nPw`ji>S~*2V~PmDAZ&KYTM%*rUy}UQq@V z<>yzhJy+yf*5v*%hWYMAUg1)+NiDKTrf=4LV0nG&;90hyZ$3h0zwb=AD>{GugvS?o zg*9v3Oe=PLF!=qy_(;_GFp1^O={*U_eQb9`@7*eTzt*5DN!iY3O~{%J&JSnH*vhVb z^yz~{Nb~V~`_C1GE}Ok)^J?!_Q;kOTnyYPxR=oNQYG70x3h(v4-78wA@m_k{R`1iR z(*l_K^&~68EtVI*1UIAHIQNvQbG$#bh0_{Tp-WzU@UrN~(~bk?hehj64m-&5Dkx6A zSrEEx*OnPGExeXxIEM!(wjcT|dhuek+E}7Bt3UPDyQtgJp#Cz6m4^jY3zYt| z<}ue;KDh6*OXz3#uc{o7m7#m@_N;R$4=i=JU<>%slVnjo<6&Ep*_0VOQYG9y7dhiX4;)@ZN6K+qF3| zuI}D?~Z2`&JL}Ki#@G3&YEfA<(IbmajCk7 ztn1Hj_*CubCu!sTe?r{qy+H#)$W`5 z(D~s#tzU~}-Ch;AaLze1k6$%@=`v6`T;OF^$$RyH>qG9qPZ#^%%&V{X*Xy}C_psU? zY3GOKdXw7~_U|pWpZVt6HbcwxEEAJ1-Aj$}48OM!76DRoq}R1*OL#?>+uTZA!skBa zz+%g)(3-tTHal**oa#HsroT?2EPUAv>FpWk4^5Jq%~>O594-3Kd}&3=VHepxjmF6@ zxkDbts;*)O^;D+he3Hujw64JF`QeLw*X}U{^2X`c$uq3uI$UdW8)Ce0*%jxR@4jTE zD{I;$y5G$UZ+p`J>E7%q~H&$?I+%<;K^XRZyRJHK;NE zvdrO&YxHalnp)-*-jg_GeSB@2THhpNKj}XY?y&CKyRhIy$f1im`k&hzIp@TfeOR|e z&FUv8ct1$0eh|v}w65S>fyrTqF1;Je+bSyOShgMFU3{S~?bRS!94o+(>>C}q)x z@0$vz_#R!hE`)ctcFaVLrHiH4?(SW|roPWNA|NDl>y?Wa`IJj77O~8GpYDl&fe)Lg!TbGArw)1WK<}Om~a_78R z(eY`Ywb}9Ot$&g>>7+dVn5k&IvGN1+{ENvN-$jdT^>`(s(gW}lO>w#)iMYu)!+H`QDKlFpDx?kr%Lw?d*Kyh6C+)4jaTC7=+TmHTPkmY=JxEtYi)syLcwwM+ZZ z@s)>mvqo>;_2m+WP|>lEsT#E|H>+owaGkT*?NV=9F*Bs%{*Jl9actsGIA(0PW_K!h zW|;nDx05ZZ)222BpAMLJz4*1OcdO}=W6#=_KX@Dbw9>ykEmbm-$K!&gYxBEP(bL0> zXS?4t_Pk+w`$p_c&()HkGC1qa331Ni)rZ0lOOe`s5E=-olrvzO~lpE~y4QucZv(%e{{>a-S=z|yB2;GWo6-deu0Z8IcAekl3b zbuzSZ&T2^3v`Iaj$Fx}UXfvqZ<-Bsvdi&?H7>{F(&tLcbC@s!Cl2@#eBjy~s^nVst z%ba@l8aLDb7ydBUZ(m=(?!|fci63{ZHqs5NXYEYu`=#vlpoRBNz`d+ZyKcIiQpYxC zC$=&;@64r3deQ=mUq0K-+J7Nn#uUwYXAJz4r6+AT?b~*DYB_t@cGZc8(nFf9^-MRY z_kXgP7H!=FD(x&1&sK}%l_Xh!$|dzpC$l-&^t_}`U%J>gZB}{!@4KIF2d#}YRSrMA z22R#n-V`=_Eq?VOeo51}hf#Nq&*v%sGqLL6dlr$iYJ0sj9H-vi7yqo>No(f5NsD6b z?~CaD+T*(L@8>iZ>EhG#>%~%xJ8Qmt_-fzvykBiKC)>-)kL^v1p73~y)V~y4m-G6* z_=8&OZHK0AoLdslW*_-qNA6KnbL@eD7aNbJ#FxD^pPZU0-S5x6@e97l8jZ_?_8-V?(BJ)KcBjU9yU)8<&x z182$9lC7ITbt6lhmr+6ByVI?UrPYGI`6QJkIki4;erUK{bW^i5TUL&d;P z#NM6e!Zkne(t=M1BL2L%^Fv?j;PbgVBtLD)b^iD^VDGH2@s0~-F8ID z^D(HYt!BDyzf9h3<>Jx(#q0qCtJST#cluXrdE8^UgS|cPn*!Mat)KywN6?O)n8Zk#sh=?@ltU=+2wmAK@*e}`e_wj<(V`{##We6_>ncM;S6 z8SpAgsIZ_)WL>+t?6tJTUoSgeIeRz!=jZ9WZT5;z`LX(7zJ9D-^4<#3T$}mvXJPqf z{jGp|=Tk~IcTVwr7JB;n+l?7KuJihurPr>Pn$#k@$kDvfa>}KHr=JCubhOQhHF&Yk z;J06i5%=jt6x07aGM>Kw{ga&i@A*yti}Q=`SzIn$PMYgLC=IN{F9SHcbbn>i?TMv7H>SW

J2hr*WA~?b zAI|CN`R;Z!t$1SHdb0hH?~I;gXkk!s=H>y{hinJ0|JTr;uHzXd(~+lY{^5^BeMCUN zm0SM*W-*TkGa5d;@C;iz_e=J%c&i&PJ(%VP^5{n}^0&T-3ArnC%AZ>HuLdc9 zQ2HrpZqsI?TRm%IBc96yiq6Xne#rT@Yw7jxIqegrWCD5mZ&>p@-I)+>E$jI}u)5vF zRO?DuY(a~k`{o^6_&Aa_9Y2?-alSJ0Oo)tPb&ib3$?c&TVe=+f8}Hx3#})d!=SO(> zi7#n-_osUnm`@Pez$)RD#rrt@R~Adq9RGIqH;f*dX4)3oi<@rVYF)}1u!75c`fkI@ z@MF6{5yji5(RTce$Q;qC=ZkD1!6llPnS9``!Ibp2a;WFu&uQ9hw5kW@`5JN7^wzkH z@@-(>mu{}QwdTl+>Z$8uO!L32dbFj}K<>!Lvy<60=l6w8ezvY@>VtrJfjMWcX*vhU zPW`=_KUm`MqPt8_#W)QYmxsG)-m|Yd#PIa;N#hlZR$6rzDD$ZbXv&;52xwOBddR51 zZlR0Ssc#9(l{stN3~i+6&YAi#BJZuiqyy<8t(Vy&Z26z=Y$<~{^Fu~=)8ykjv!AVo5fkA3du+ zI9W3lmp{EZ$=bT-%7c!iiW0|zk)7ds|DbN&Q!#gr=&HHwS)eqcZ}Gg2}5q-5qV&5%Ykn^fd>^ZG2cm9}Pz~}a! zQxS`Jk6y|;t}MgMVUye$ro+oqb|^q+ui3YZ>7|`z@z<_-Yq2}q2YY<^ysY>0{i7|p zi?^TJru|)3kz>Y_h=V6hZSJ;w`F!qwd#Bv(Yfo-_q^ZoFvOs-<=C&>6Urfw;u7$A& zioVm+5pmt{^O5q-uZL`Ud1Tm@r-FXF9GHJ(iiHVrcy! z_nv6d@`UesRueWfU)@=Jvg@vhlI7$6yu_VnL{}Yp`Rl+PoimEz`e!bmIFMNIC350y zCzZ+HUH@9z;SDjX{<*)}RIWC_P_rU7F>ARn1 zb82rBQ)B1C%*L_*Lws}v_ z6LVqPNo!ATpLpg(mQ(qDrrM>4up_nK`S~KJG1wHx%C)`{!)-ryb#{4x#@w`drThDJ2bAv@7u9=GN1Arfs$uICC`=#+^(uF;jTJpy6VvDr93%eIT?@b zW+pCZV-uL1?8kLiWVT-NT}ZjJD#M>)54(%x^|#l!Kbx3Mn(;O^C@1XQ=^cA#o>P7y zdE`Y-NlsXXaC?E#VVgteB3{mRc&efIWU+_x*3#478`lT$@JGDO2W6+9|IfCFW|dvK z`MBoK#1nE`+{AxNt<|59)HYLFy2^oL3YxIeU(!Te13)BV_)iXx>uv^ z_#<$3)cKossB3Q#U;5JbO1zPP>Q!J3|j`ELy_efM^l84_(JXV~y| z@rji&i)!z`wV(Os*fxl>g@URiJNZ5t3At?Y%u+16|q*WTX?~; z=;IN$-^bj9HeZ$%nJwxaJdrQYY9gc(l3UlZ(58FmW=QG9zWN4Z@VYds2@9G-pTv~p zg#8hXwVc_S>Lw6!@yf9W$AlFxJS=h7?zwz{A*twu-@-^q-Zxpx9_^7)*|K8U!(F;@ z#r>D~C-HqNnowtWvo|NXNRCtK=8>su+%Ab!opSDJ-}o{kH&fu~hm#uA-mRo=hCNFLsin)rA2pZUa6_NId}DJKX9X^XKh|M$GaZ;TZt-- z=QXNcyb%3+{9^ap|Ns8-|My%px9^`wM6AN13DIx+?aqe>D?O>PvRS3A62JYhsCetY zZ96u{#^?*W7~Z)bcW}1T|6?(HWmc08q>CJ$+{txs>b|$-WfGpC()@JlA!`}tJ$J5K0FT-xaJjU%hpbz%Kp_RI3eKhAEKI)3f(ZHuN`UQe~kgXDY{8b9^6>eX3e z&FOihYzm8X)4B^^g?GB%*_F76D_o<^{mtuLP9GlKxtG_e@}Wal{O|j+88ITKB2V4a z)AOC-WO(Os@`lFO4EMjE>sO1Nn3tTs$UY_HROG^lh2p2?J*=xt6j^oXZK_htA?KCr zJ8W+yE&-Kk%w^@yoFNtS-;}5{vM--3E-W%f^!~0LlVc;SY+85eProA{dSj=3T*&hX z)BJZ`g4^rEm8SCgiTrzYvU!ew`}q}I-^K0pV?9FhrY@Fb%gSIdyg7Txg*6wrU;lw* z+@umMzlD(t+x34#8w{@>{?AwvQvQXNbBp_hdDA4K=Ptak_+7KcpR2+gmh<`eZ@iii zw1G*^D~tE+Nj;sjeNLejdvwaIojcclw75BS>8DVQw&N)xb3}jLww3`o`uqwm|1E|F zmEkM)!AmK>xzn3APtr)YxdCbT`Y+Y6&}J$BpS7b?>LkiMe-Is$1rJp0J%d zNx8>i9Y<=zrMM@HmcIWzMPbn<Z%uI^l5I_iN>_ni$CYyk^Yg$Zzm9WqV%Mk%Oi)S zO+qtRPHb8AcIGd&|9`(#abA71l|9h$#mR*yb#MKuYqbmB;rn{shr2RmPSZTxU%eCY zZLtdZ_1#E2-}~DUVNKH{{wqxZ^1QP;-z8n_FMRKF%9e{Q&#`0Wl5oTP6FbV)o-HeT z^JO2e;=3hB|9GC27Ro!n6An zYfahrz;n^R7TQ$^PFot@P;aQyA}%^-BLDXX!V{P8wC&h){z&jDj<#O26zh-Qce-Y8 zvYyv<^5x9(U160mlD)`r+pV(c-P3w%mIr+b3sw+sSs^tAmJ;OM zwbq@U$1(A{Rov4(s*2x3y!@6cP2k?7dngv{MUY$0vEHn)J6Y-Nwl7%F^3uV(D^1Jf z-Ur>|6SkIGx^^jhl4HhWf!mWqHY9Da<`q`2y0cTqe&TBP$|;}9TJ8jER({mq*cov6 zr0d&Akcp4t6I!-N&EWS-Z_gZ6!D zPER6UcgJi=dGcVscgvSRrkzS9asu&B73^jxiB1+jb@SfO)|8y}MfWC6sMbB1 zOMi6L#O`T5dwzNMJG5v0@rZjY`hVGtS{0*-MG2?!l?oRGiT>w`;t-tj%}I_|qVnT; z1*a(Q#+Zp$<7`e%y=|=#U}$;C^6SbhrPrCiHJi-tkkj=iFzr<86=K+T!W9(8nw8ng z6SOb&e(xlkQCbS+o8I(@v!?I-8=4A&Eihlb88Qi|5=6 zzk5opFS;i*nO#fuyLt`N7lW(r7h>O}omlbrr`m$AQY%DPx?gsGJo(1k5_Y9!%R-*a z zEwGDwvPf0Ay&&w=MK``DT^Ih(ihrswZ(6=px5A-KTWYVKf9dqfA^pi_uD=scT)rdc zaxeXnW+=e)EANcPgGdH2&mrZt<3n z%bxLaZch(-_v-eq&KRHajTt9)tbYG0+t%;HKHifdABFa;yn5q`yV}#X4fooh@`~>F z&zfK6-Z|}oBk#M{Z)eV!y-WVTTl9%ap0@^aS8uJI%@^X;_fK-Gz&_cppu(`IH7Wu7c)0n9sghZ z*K5Md#h+Yv&OenSR=wr)6b-dc&#&9p{SDsl&pzkt>-gu__sbvCO$jJ(vFiK8Dd{Zn z$9$uwigM0Gou?mJ4f>2vX1J{|XMExQ_Q%meeIcgW84b^-n=EU;_CB6RWtI%H`pQC| zUNc+a6_-pnf4W*H%T3TI&y!cNI(_$8b`NLh0x{_eK9l--Yc5W<$}#!WmC08US9-*y z=;SBY)xJr3vNG4_sT{kN%TgBGzKr?BUiHM~%0~>=Tdko-KQuju6#fy!DIE)DDf`#RZfmYJy)#HdOqLGF=2LH!6zk!`W4cK zX-j^$J*xN{BapM@U9{ciOY3{>F7lX6Xf})rY+iGGqr@ZSYq>7lJdHoOPh9mn$UX3C z@ctJ&Up)+Lozu(cCM2F76do$p_{i!_$yL$U9f_N->A$Gglx9B9K9}vRg)jdu)9J?_ zKFZEk3wq;__KG=W`^#4y$7X&paG1NUt&yx%1Sa5kqZp=KUZ?$7b8i(>R%We7<)+%fE-i&%} z>pVwX_>ETfzlA%>ci*b*emU1t{~60HSq2a1q%C)+toA?2^6ae7f|pC@C@gc|$`Vo{ zDm6{?d}jD}SIItyzQ1aPr&Ocl-l*wzhuiGhojq;Z|2smap|ZbL3Cx}M&qv?b_wUyD z6Y}i^vA>iT8`&w%X(~2yneqNaQd;e*?4$3r?>^ga_T-X#mG(pBL$704R!(W#?7TuY z`{v7F;ZT_eM{fqWc^}#=;+L?xWv2Ptoam#%Do;Z{ZhDg(t=gZwS1jz4#0uWS~lTlLMwrKh0jOeSvoG(_t@x1d%tGas4&QkXs zZ`MxTxJg~kYwxMJX;(I`l502kq?5f#v^3Q6@1HXTfA8rEXWzWMRyO)(GK+Uys=pue zx>f26f6NT+pP2SMdi6Yo4PEnEWWz2B^RLZU_2dhYU7gYSGB7M~a^yqN*IT-LtLqvy zE!(QZmK!cPIycpSoAf2E>gt^6&5AMKN}j&fs$P_7>V0}%j@#@|f17#XXLqHUX3tQF z_$w}1Q?p3=pl0#&Iojs^8Pk)Cr|xZCvuXP=iA@%3-8x@|K6xf7^{;tW%$##FZXVlr z)HW_&ziYX7cl6!K#d+5wCtujGYDww)uC?#pI&2ocuvXvwwx3LN;H0;wGpFj_)H$(w z)k#I|%+=LK=YzKCzj$zMpW%&@_f1|{&HZVVSe{wACrP(P+~{=7nd`HjZ&vM${9$o% z`7ZH!vKNhxduaEcSf$ndvoEJrU-^R5jb2|R{wXo((|;aKoVQ(Y_mPI&qx(}G&R(s( zxGY-r#o4TsQ)US(lAecjd+>c}zO}jAF#FYBfxI_U9Uh-CcUF0`?b*wfXT>&d(f_)l z+OUM-#>(r$$2YIp@PA%f@an4Nrnm0Ief-{9)c+|x;e4x1Mod(x;j6~m0&`O@I-Op9 zK=SDO!|&t&?{!(iS8{u{u;|Jl2}drK2&OA%cP8DI(eC-&9k(l4LRXhJHmBFy^=3~< zsNu)AafQ}i6dDY1k+XGjbPW)TQkmC1s zzI2rN-$vVg!Zix3-|l&sIgeTXS>LCrD-tHCXr0t)F$^?Wl9=zg@}=?I!usjqci2w{ z+Hz?<)2w)Ylh3rz^;pA{nzQ>B?_s(0tL)gm@Ph5yda@#x0^;*OU;mb1%c{5Neg3m6 zPJC;+gcrS6<_@;|qq}!0Z)A?RxHHd0lcQSHs$68j9LBiEdq_4c<#qlruELy=_lc^7nzYYxr%{4;%>$&@?&T?>!I zrQ5dLJC}X^Tk*l~c{j^$)N$VmdN1PK63la*;o&?9%Rg6Uwh1{KluX$8ExEs_Zq1F% z4Ii&($Rxi}OP`gbvwh!L&0{$#tNjeG9}}6}Xu5I16bS{J+0I*C^6GMfuFvRx{7Q~{ zqupeqPv`CU4_m*!dyvU~?navzhd7@I)$ZBmZz$e5^J)6tYnqFEHRaWL4WnKhzm<9A zL`T2QE|0^X{wv5tCOxia%xuZreCqnI=uEDE$sRNNPH?Zte5;sbbo1(BMa50l*PYjV zX7Tk|AJuf@Z1$%v`K;*En^MZFzdJ>ToBUj_>b6;|qCCKGM`TmY(HZZqTsc1T*3rP# zPt`WBRlOX}l5{f7y5iBBXYL~BC+(CHyYe#MvdjA8LiNmfztd%I{d>51Ui-y^A7t+x z4_KL#=ddsH#Q(<}M_Ra)H}Af^_1ALO{3|=p*t&Yo_%UVktItalv)#Y2Hu9|LFk6_P zQEnRr`X=>}#y|g3h;K>uxDzk3Zu9~;f(?Q6SX_LRK zrN7XGE)gC-ErqM=BxdK>2;G+EVOheo>Y$Uus<+0gPCEzI)UR+@UKeseDpBc-?MnHp z_X?XhPuMN}w8(6AL&)xig-oArDJmE*V!HHZ#*(i0A9|O_e+`h$SSWv%U1jDg_s@d9 zm%c7m%JxZ{xc0%EfIEFoKaZBn8-&=;;xV@b`x`Hjg6;+meIyTtVnaH%|ZWW-nRaA(6M8!ih}4$MazRP;ytZ9YHt;{#oXo7|5Lhd z`tyzNU$b1&(fayHTy@FZMy*#um*zEdU8+e*-g{r9=)#13@otg*d(Z#dn6$p!^@>mb z#fKMt7(H89@ zae9QWzOiMYg7F3chV1tO`DKSZ9-Wh0&vVMYdXkDOlOyBvhg z5+hRFC;aMpzCCN>qDiN7rYKFGdopk7aV~}6*^~1+f1bRxp{n8K7inSbH3nHf86VFM z+rWu3_hy*AtJu_z-P%!B6%rPySS<|4Qqo7VY{Y{V{Y>i1)svl6^1i`7eF#Ju+`= z@wve2#77@2-6wu7_0!zsHOYL}l-q0X?sN|qxqN%(#tVUOc#qgEHLNIg{d(O<|H=9r ztZ}8EU)|d3v*v@7+R3f`b@mf=zu&2UK5rF+_nciT_ucXT?49qkb?(nvC*e8F-O=r+?z}ZO1ei9S-n~%f+Ue}SiEH?^x9siS z8-7$$S#Gao5Sv`38Alp_Qy1exah(j_Uq3At>h9U_t!U$K^A*c$U5|I&J@7*KtmaHZ z4#A6yG|a!gc4XUj;huBj(zyO8Vf3-`~rCaiEKdLYYxlFWO&LYsF*P3jSXi}Q^dv47ISC5H3^?Lu5 zmUtYqmn@vPAmrqax!RAxqP2=bQ^M9hQsWW~Qh9#;^F^1YOG}U2hrU%>;&E>Na|I>G zi+x{gzdN-|Q9S!C`yQee${>Qg-hD758;i`{C9Wi_?$&XlsWVDV&-|mRvQ%Qcr;^dcc z3}l8tZ>R8yrw*oSehN=oa=2%=s@Er)xRwsa8SU>Jy?<{+P%4d#yD;aqIt;6`uZD$SG-eUC3^k;^hA5b^YBZKJ1+K!BBK&&7DVf;cmy)?3?z% zPprV*>CEiOf-8 zKh6n!kNS4%#S*#nN2#02_T?q06kV#Z$+*qOd_DXvqnC!}PMJUhnGnqn5wgcqOxMid z`X_$uSeNn~?dNwi1h3dVPdvr*02Srh;6$ruwD9VzlPDh9Xinl0i8jmT&_MwaoILIswW;i zu+t`J*Ud#Yzsat(-hcJ$^Y!&j=YFibaqe76n%IS#Q$qSxpRW0P;BEOb>3x$LSFbnO z`eAa~pR0?exTP)pCElF>yZ_nT;&Wsyt_^BXVMD73PDXnot86dfjZ+!^P_~eiCuZsyV{o>EB|oksJYE< zAy?+fioabKpRF)^Kcyx)A!OOpCXbBUs?$1i#g|3DeUV@}F<}bVaqGDX?wjR~?}#zu z^FQ7cyt?qvhQ-%-Pb=N|6(P~E`sx&!ge9Bj6eQeu`=5Eole4PvJO24Grb})An!Dtp z==WQN9lm8R7c1V~ywK;^!LHa1hh-uhm*3<%ZLsK$pV_vl==92O zXFG%5p86$I>b&;-%cFay3hm(LKDDZU*^WRh?ZYRwJ~OM#c*pvB&z9SXF@E1G+uN)b z3I8cm<#6KP-nn4eX$D<^{#&oxH*)kuC-j_tQ@(+J%Y#i9@2`Fo8h2;SkvoS@%AEai zMfdNic0t`=)4rZwzT~mRXH6YF{?$|7N1fq6Em8VGE^lJL{y&YfS-G=QuXfJunzH4` zDXDi!XO-+1ixuS0YgrYek;G`sdgK`6d8rEH;*$AMd68Jpa_krEi`beAM)bFUBND`co$-->V8aFCJID_*E>1=Pc!8 zvNnrmJuH@+t@7a2>lc!x+&oJ+i4m%<3nZ4#`mtK_Ts{r*aN4LaSe>}Wlk@B@!=WAWRwl5Xm zl=fxb&&-3X)`%CZ_SFB-`Ac%4_!FUHT{E}4-kGN(VbZS4()?t`qy&RGEX~zFQocnO z98D0NBhu_*I5}y8*U6^F{*Bj^C1w=+)v_>iAKB<^V33#Il8_LSc8z<^`rM}YuS}1( zrYn^_SRy`&eaV!!1zV@pKk70RTd8`wb?s&24J+Mj3hC17EX_4H z1Lp<)vEBo?nC$4e<)7oIfPNJdR!x7p66dgi9}KhB80 zeJ+#ZCOFwBe`(rs+^@>fOLk`2UIi9Ek*bG6HCwv-8BXVXT486hChJRH%JI2hnWUfb z>`VxLajI2!<4`z3fu+f)C<`89{*-MU9nW-;^%1B%)WH4Wsz5VPKw+% zi#nEIqp9YC@2BP)Og*+#n^ntD#>V1xlvMKC zzXw{ofh1q zf9x=8uh9Fj-L*_@wuP^1JwCp)PQ3K;vEe}@?WIQq;_8K(#H6S1{CRz&=;E5nmh7bd zZ`xm{8I5wa>K3Ec3#DU`#-j7tIT?*xhh!p$-(7{WifRZ8(pi6BMi2(C;l`# z9e7$pz{M+LwvQCwTh)WN?=d#33w*O+W?#w8-dORZ`D>*i-?lIR4m(RImLSogENV%Cyc;ErS2m!-|{vviEEbzY+Pg#g+AHiB`gz6{)sz zPp{2+cx|5O;a&G^ZHnWT9=^eTBdkQk?q>0U>j#9YyJVc4r#FPTzWynH%P8^JK8N&Y zUmx7o$T)wuz&h7&%kogc|4zTKPvJrFr_*749~cM?3OpAvs@aj6Wmu-l6u z$pyNJdGf)V@@Ag$jPGAMQ{lio=c6}8mzk+eGMeiBQhmxw-}M&ZKF0Qy6$-}N4xhdI z_t;rIcf&M~z|K!=*z=z}y4`DgDdd=*?WK^{OWRCR_xNV4GPxU+5&p@n;)~#^DT$`N zJYNsXFgSxr#;G=!6$RQPhDZF*9bQIV&v56CCpo8@OARkl`8x9oC*=LnQXMxvtX*G=IxZ! zQ%5iP1ugp%qWd{>dgPyj#@Ajqp4nWxB)s`egnQVsH!CI`fB!9GZi~rN# z^SV7m#I5zCm+*c)U(am4C7S+QzCB7jd`Q>GuX@_Dc^`H!|N3J4uDT_fjy5WpSz;cS z8QT`>r%cg6T`_JgV zn3h((dt>|C%Bx9B=iQj6dx!Vnw@<0B>r<TN2)^F40%)lPb|~zhNzG7hUz*@y8@KK~KLQ zlU7Xr5qHVg^vB%GvA3%}tg!xU%gK25%=es|TUqZHf4yeh{9e+3$*rGpR{PdGsGgLb z`g{6YEzfB>?1|wog+nUj&IR9I^E+Q!al^;+`%ejE{=UiM#ByAaeILK}i(f0d{<5WK z6z{LuZ=mw-^!FV{UQK^L^-tK7>iyqNDlA-Xr2qMparpU(?*m(`*><@>u2pPw1F)ZXa#!{54n)1^3T@~0jC9W%m;o4i=#miEsuY2E^l^yM5bG%t`;*RENYZR{uUvOYq z?RL<7!Nu(%>r|UBsJzpimbiHd-~6WVZRKl<4DJVBt_VvBnfG9&jp{ssrz>{+e6U?> zzm*vK-bOXnIhGt{zt#4fmYsDax+?G7wY-YY_jUIEEQrXi)d~H~{XTy0%~?$`ZYAz! z-kVilg?NO;>50ysdx49!SwBb1bh@ZVwZ(x4p9M@`*>o}6T|D=9jPLA2~W?y*(Sba9{)4pqP)ab z7m@s9oN@>K_MEHXxVU=z20@e6_a|T7{NPyhxpVm;iRWu|mW7yXp7c$;H|?SAbgM^e zPwfwEj`+sPyQx*QY_F6{LH^rsfd`9!&sjQGZ0EK0Y&U=0Q4Kk?z~N2(`!Bny;~15m z>vQFWbMJ7Rqt7~BgoWdtL6nHXqt2~mAqpRs`zhC{?MmY1a;Yg@7NaHbaQfY5Cc*b- z4FV+lxSp(Az_d}gkIC}B#Xi?7pF?GKr0VmR9jki$RYRb=IzXW!cD7^ViRtMA3ZGhj zaS1FtCaMs<`_J1#iA1@-iup2*brzAki}~j6{)*!D@qZh4=CJ)$Ja@+W z1^>^W`mgNV-(T=sB%WJs|6rMW!-3n5`3n{V)ql9RE<4lFIVZ4QLA3mWyhh*6b^jdJ zU3ahVaJ}{Ws(jON4gZ}C?0*HrR=jT1%``EyC}jJoxMN%CQ}%ZTx2DP$9gnSPUeZBP^fFK5hT~drqe6FXgrIKQ}(*eL7Ko zOF&&k`;7W3DYN{(J6D^wXLGMuz#Q1P)n>=_SH6dIB6m-l&+zH}LhjP=X&J)4yrM7L z^%ge1m0Gu&r^9)=h4vEf7tMcJzN9{SH+PGURM^svQ!9e*Y<$oDJuIg^I>7fk%g5%q z7pCr7e&tlvk|R@g8SPw@QMo$!kkT{dA3pJkaUb61Yy8uS_e}E3nRwx9(yI+luMZ~a zub;WYByRJKKAXM2*FF+I|Nm~@3;w+k7SCT!U!)ysuXI!Lg58g^XFg1Mb1!dl>G8sV z5}!?{?tJzNJFFJD*T{US%W2y=3=a>^(KHM2`=2r2SR>@czdsM&z0RC))7iay<(^0H zj*5q+eF-byyX$Q6>?C#H&tDRzeJeGTzZhH}X2LzKOWV`0bkBpd*WNePXU#G=YBpoi z&D%+qvGttqzZ}{1?}ecAt>`U#G(S}?>H4$HeWi}>NxO85wF29wt!kB;rRRO~NteFC&ZfV~ zF*}>|bH49CC3;8kl<4Bg%Hbcn-X%Fb?TT;{(0CrBzVVIhk*=3lmBUo7XLBa8w$2Q3R%C%WbMGBjic)qWiT;K2N&UDbqiYrW3Nuu&*;R?Gj9%0^S9nnKeLn_|{^qgYK z`zPnhnTD0ww(|wny}kVI0Pot5ejN!7m1Vabx^qM}e&;;@YuksHQNL0* zb(g=q8=HPMdFSsX(H|wB{ycoiD1S$LtOS#|#pnN~Zx3Z(Qq6qzf7NCdv6Wd5 zI+NPF!?yCu)?92ab1$7}nOjyDXs>X$tfcst-klBM*EaA7culvv+x4i+EN6zb!Kb^T ztyZt*1VpU<;dXu+*N%B{P12v9t+i%Z_29}+^ZOHAdkl;NGP`txg^sZuJiTW}&_>zS zhJpv~cU??nxqeG-&ZQ5sU){cZ7ER8*b5tdDdXV0#?-LvoGB&TU|N5~>d~?;}%N%V- z7VQp`%6j?i!OUez-?!U^W$jyge1FnJh59p_O1ZOr3*L8aoyx5@^}loPhn}c6Qgf}N z)Yr|dSfI;s?zKzll;oc*r$g3t>iybwL3Y0W^qtayCzLZ&|6E?oZsefjmE2^#&e+9v zi}?1*%kpkc%`tMZU z(^<3f?lQMbo%ea-nO1X+(EsrsMRx>>j33OaZI2FNnlF5Wd-pv33*Is3xjmXM-Z{iN zUG3Pqx&8-^B+ba5H;ZE*(`8RSb(_Wu6WOM}*s}CW&#e%PuBDC)9P6^R?(Jl)k$*OA z(adUpjZ4~M@=<5MPYGvT%6CS;qa=dMJuxHTdtdL>YaH57WW}`P7%n9((a74PRM32q z%X6x^mofXCQmrR^QBS6Jx+gX4j@w{mYX33F^5Wmx$x-fUs@GE`+dfF8wXNNAs4Fq_ zmHM8I3F_Opq#sSG%2MC`@Uui&U+eGL2e(Q5u9bem`||GR+=mR(`~T$b-2La@eX-va z3LGbAe>kyL%*;#w|IhSu42IIr+T~ZQc<*W;%~Bt7~5=5Ci=#_=|c-`Ypx zNA1mn1qtn&58Zeulki62`1C&;m`lo2m|rfhwvljB-PFA2;w}E02Wua^G5Evj#+S6B zGNwpi&gZ9Wha7nS?KeDp^B>DYMYhVPVh6=cUWx>57So$A_*7bVnZemb-<#s*%z1QW zdh7r1Z|=D!9!y}`w8b|^*Ohfbg2+70Q|CmBH_TjrNHjV-kVW9x63v)BbJn_tI!l(M ziC3}Y#l3AyFWa=tRb%Cu=(oau8?Np*+{`6+GJaxq_-PZ%3lki>`*dqWXrTfd(yT?O?tVdb#}9lTtxTfO;XcX?``9LmuY#N zOUo>(A-S+s^Yu+}wiDhTt~_)NN|1jcGW&4TGQa)o9(!I_*adoie$FLi;nVuOt8aT( zxi{lxA8C#|>>>##R+jF066$l>#I#4y>%puiH;nkUq-}SPNXYx}*N`Jec#l@{;iPRaZ&bekpWZ7b!Icr9iFTZYAlH<5}g z(cQ8e^e-w!ovd`&J@r_2bbYYJ9`JW2(gckd>KkS5n?w@VfG3q3qgsbF^$+{Lh^@pONXKEAPLFV`lZQo@dKlEN`6> z`(@bjG*sW~3-4UviCN7bU!MB0S>)BNyvvFyi*j`8Q@SG(udnUq4ZCcsY~o>2A0U$y zCwRx?a82K&H9E%@e?PzDTL09$cYQxg>!^fu$4&og=CoAwYYG4JS4Nw6Yu_vXx1-VR&BoN>u;nu7 z=w?+PkBCDKa^5FCZo4j&WaG81h2>YJE${K{{nG@J*%Tw46wD^8-VymU>(zCqb!px^ z7XC4gbn2&pwV_YYQCXw9Rb)Rp}}odt9TVC~*6vP?ArV?KFd9k>#x_cWqfe z*>6JF;Wcf-;{eu3Cx-2BcB($vaZ_5i$NP7LlZ=m?vW_CZ)U?~Wiu(EGt>WnlZ!XCl zZf}@3;f1x??s>nJZ1+8!Ho@QIST^U+w*J6U?-Sv9Cxwjkt7>%;pTurz(KOdz)bsDB z?(y}iHXoQDhs31a+cTe!$3OFG3QzcoHT;2GIm>6&Mt!kZcu3;?N~!o6n(WIt*&NQD zD_i1!HRscuq(w{mu?k(_)#U> z#jNYxbCr+id@9d6%A>ri|Cos9+8gEq!CITA9b39WGA6Xpc478~wuK(=7TuY9h0D$C zR?KsOW82nk;+Jsu^ERSJN;$zS2=Dsm#m5upIv7Q*A|rvR`;#nZO#8_vcQb0 z%^#`{ALaD;mQ-_a(dzV{Q&#q;J-jgEiv32R{K$aRZ}b2EyuSMMN8|ss^}c>j6i#Kk znXjne`ssP%la7DZfAJH$U&*~GZ?R06A6nlkvibb=|6Ds)ztgRAe|P=yx;Whct<^ls zVmK!zJ^I)EVdZ_{vxn}j{@b*r?%m-zJDjsN|Xe|o{%xkR z%Gt;r)>jPAa;ltNc-L-zEt6;Q9--QAoKK!_zx~`Y-=<6ZdHw$op8LYZZeLAJq8Cg* z`0tl(r$n~Ygv@{2l6PE|XIu4Ek|TQg?*0k9rlMbS55FtX zxv+l6eVJ3f@Ah2hI}*`->0E+D4D~EdZvdsBLThA8; zK9t$k7r;gOZd{TG9+rO-zl=t-oWoB_*-`7!X zQ*kx0lzWA5sB-4Lt%5J-?Obu^m3V{BDbu2zrf&~#Ud5c9%W8D^?_A*ne9o87%4Y|y z+9khJlea-anwMp<$l4|c(^%VmTO5DCx~M7W_=IQerA5^jfA)P(N&dJ`SHP=2u5>}f z-RD!DuI{;euJDP+`!yBDGn6=%E=c@bTaq%Fr#Tol0`lW1$7l*8HmpKHt7%-IV(!oD<4^ zbgsRxxx6l^%Ou}@yVNQZpPE%%&q8bsue7vv^GIB()8f-?><#5&e6v$l()YwPMw4Be z8P0T0Z8&^y;`xPZ6c%b|I`my)I#HCg@X9RZj%dkQn@cnm4!b_PnSQa6M=|U94+WpO z{6#;E9NO4L1YfL^e}C-3^9ziN*<&6S&D8I@mXy7+x8LH-jdkbEOrGdO?(yb6;-RFF zrY=zK`|UjuXXPjUUR)&N3vl8MpWvR(b86`_wNoZtutN?{^ZGPv+1!u2NXH)Z*OB@^j1X*T0r| z@kH*~THBB_fqTDyO_MkN71&>ca7ZR&1_F{EMGBv+qi{u#Y>(l zW#+6)Qztu}O5)i3I^$N^Lk;!Kj3>H|%sgyd)I2*lbJICjHR;)&a^D^Jq$N)j@UzUc zsPW1cYw%T!wc=VFe`}~ggPZOPRbE;aAkLfS3cbA{oM-;Rf z?S8fB%?zI&G0~eB$^xs79b52PYQF!*jIPS)&coLZRrT>rxcT*CR{6P=kB!r-=6rHZ zw62&py~p7FRn=#ItuFaox;iEIc+KG&?IXLlpJx=j+u^D!zA)j_MjgHr>DGNN3?DCF zGIMPz|FQpVuwQH=Pyf-+&m794F7I)@@zTIWN9p4^OW)ll>kHNfxSyFQS^Q(euWjn} z+6mcz^_n*9xLhyZxOUkat5PebZI|X7-1p)>BF!eUVk`56O-j$b%UM!l-)`o8@oFN2 z(CQm=G#A7*a8|faX^j2-{NA%NgS(w#m+Wpgty`+fC-~BPzFaBGra7S}TGobIRBiCG zQGRr2*1Ar+wl!5Vu5;ae`D=~UJ!YZEv*Dp1w!V06Akz57_Oq74mc;jkT342H&&=!S z^w}kR?&8*lH+ze(X!lH6Ib)h3v*D~*F_ZkKQE&SE%(tOHc#yiP{xajYrdo}A&B6BC;7 z?_prIkfM@V`M!!~-oAh%OB;G->4-Jjrf{w94#@s6<=an_JK6tjm?vyb7dD@ZpJ3~Lu8Xa1m0S4xPL4Adi+3?v2F})FS~l;erGmt?zp>f37f(sv z_xH`qS-0P2?_+v> zvnOaWJdx=-E7)jVzbSsgPpH|oE@*5+y1s_o7xzB|Py$CY2$l-ll_(q=kwse;g=t;%`{Pv`6m zVb~Z~JolBl$(NPE4pkEWs%37p?ELRuwlg(yQHEZwoI18-+TGn9%P${YJ@pLB|LGSUW?yBSK6Cz~SZB-gXVeyL&37>| z-1g+Lip1L3X6JgIIJ4WAtUV{V^jXPt7oBYj3l6@2Ori30c}8P&gT3yiRX>}bY~47! zhwWL>Tkf^zeoget-gJ0!#4WQ)63X>kSFg{{D4j3Qb0DtPr6PGvX#r9epKJGTT z^NZ)i`HHGGzRk9uuS{AU^7X;WK=JuM10uIS7Pq~2GDM^&cdEiM4bh`nw;dMEd$3aG zVR_WumCu%U3a6)CyWagX^yZR%lfVB|+HvEQUC)u1+RjUV`|zL8^45APx|=h2c4k}Q zw$AM{_Uspv{VF8GcbS!=ea#CtVMSQ}r@s@vqayr=b|p81V08b2T3 zJQC?v@Z_ERL&Ggx2f}g}1r^E1$#j(cMXxLjImVP7Cdwy}y7OeX55vkh?gb&MMLu{j3f%uL zr7?BkgT?2j2N)bbsbMH~eeQxVwC4b3^|Mr-^P4i;#Zoipm6xKP1x?s41e&A+m~&YJdZT1x-sHaTe@+4)u8-+C|f{Eo=`87(<$g5Jz| zpC+7lB3H@Oo+(>Gr@!mk82ADyA-dQgtnY`0KDYSBa% z=f+dgnXeY~*#vJ|ZxXPo>+LGLe24XCmfqht;q{E2r-L6d8yTkT)5nRH1`>@Y7QOtd{o?DU%4~=AnO_9=FZE4%VVFHB;);jH*C)&`v+56= z%Y9&2*b&{Oanro9s62dADJ;M`Om7Su^F5*Q%doy?(>p<(1Cb^^qowW%ITw zgvEM>?PWfZrWLDFwzf0y_W_H-WRs0?Ok3?I$cxVrvL;!7&=J1)hMsvfYFZH>g4*&p|)6t#xS>8_r2>V8O6 zvqtYdeN{0j?OwT#)MmAlv#M;kx6I=F@O65t@%FfWfzZ(XFI=x)iLYTb?vvO4uszRS z-g80c)^h=kCw^>J@z&bbt7XcxG^{St1}e6$3Se5g`k!KCP=EZx$L@17m4Af4|LkJ2u~gV4{#BgyT#e2YwmC-@ z9X5XT&O_nb^T)CZ*Um65iJ0GKnR?1q;o9=+SG;q!1YUd8eWK@cxWc-!i4(7Vt>6}r z{nnl$Xb0pZuU;wS{f<(OoN?YXVEHxnbw z)Oc>%-8b)ul|<0JzVl0}-mZytueWyAk?r{|bfNmreV)d3)x1ZxuTO7(AV2&1-V6JW z{$EqL|Iy+%Dc7aG{U}}E$Z*_7p1tMs{k_M&{E{>Isd#prYq!W_m=WO#2)o0s0QkpPnZ7|c9w?*q4ecsr~8r>|aRjj!?cbCGh^)*e_74NPy zP27LrU3Hd@0_jwCnJ8eFo3T-+$Y+Uw-rL z1|O%(qHmI-sRH$n_Uv>Pev}@~aMAMLgpBqp7Y|l!@maUoKxT_`)qZxbS>L7hAUm*#wJ z6j;(%%-eP|{g0~l?_JN|1RvS*eWj#WaptNgn|&FqMSn`F_pN)nL}$PF;kO~S`3#F@ zTFNR0!*yJr`UfmNERt3m; zD_l7KU*I!W|5Mc`2L&xNTz)N8TC;lpVb4_+i!8DyPE7qG&Lea+YV%SKma4NcDxo&_ zmn#%@W}iJZW#7qZ*^j4Aw6=FIIz0Kn|I>SUU;nvpdM~`b{Mx#?E0S-|%DH)c{Q|dd zye-cs-jd8(Q}C6mWZ#>g`zKUgJ(tXT#5h~LF!NE>dPhFva)+|MjVh7W`wvc2iD;f` zI;B#J`O}jO#w71q8PCsoEBJpC{C6r|Df?gKFnSR2TwWn>A^4MVDL`z@3oP9a0UvH}Booe?E56kB|Rm{J8ADi;Qs(IWeJ|wS-59OaNby!gF zbYswF=3?8W;TM#8CE^*5E&XupkLyk=Rrv*9h4TKbPMRGnxyN2aQqS-A;lP7cMJ_J8 zUoU);d}7Vx$^(q-zc+JNX{j!8oq4YZ znGFx^-M;;PP`5nSfgj&&*d{!*?Rs7>x_09ZZxi=Np^MIlm6xtP91!X7>%@7>#~=R3 zHT&y*EtEXJDeS_tu!ENm?_QzT=MjBguckl!vt6a+V>bT4qq=1hYaMl$wAL_Pc(q-0 z^Z6MGygIh`gD<#x=IrfQ^D897S#zmR}9lea>d~ueV+< zd+h6zOram!7be8M->zMBqfDN$@7?E}Y^<|YgbXHFp5Dx@viDy1MVGIVw^m&X*qC`# ziz&$a=eD%VZ)eP6;@!UQ3B!`D|L(A|&hbCWrDdkZ@aEryZBGtwV_)&qR#|@2*99D_ zwoc9Ocp`d<Ot-| zj$aj9In_3DPQ@0@S+={H*>t{F2s13c_?UOX(~>uZFOFt@F$r*}n*Ka5WSM%OJDW#w z;74&5qqw>6R-E}~b;E?|qw=iJFJhI?EmjwDFze4-V%`640dq!OPwzaJW3%{~EU%_G zt)649G|SqfebdCy9c*9hW^vgt1={^+@BZ`u`TcmwKj+0&uj@SVRo(8iy3qC1{QrMG zzy7{IA=&x(pZn*Z|$tm!G%)mvZ0nfVOL7 z$G@}wL6!&p`>3<_U2rwwe!#;wU-;#>cEt)aCDuPqv-cM?%=Osjv(T~VLYnRWA4*O; zRe~Ofy^WlHYbEau0m%)ow(VrjH2D;JaZUCG;iAyp>9-v(9^g}0EopRdX*!orn7ZfX zgL4u**OfEeG<{PZ#`U%>>PeySPoL@qOE+>`{1kW?<2ai?RD1>VkrjH+)|E}&%j~>T zX%1V7`&Lm|%_Z`In{Fka+~+)Bs8cyMoae7bSzUkR@4{0P1HCGyFZ{f6mqJ>&%HFpg zrv)6%J}f;RQmkS;yDDKDYyQjdH=-|`k9}aCcI!px+b*LT_if6;FD9y8^{;jLxq9yO zT2{F;W*v5O743O7eJ8$?Ox}M!DV%R({B=KrZ8P^6b=SFEyRac__S5TUj&J+(%F0Y_|NJT^wU*`td!d_1*Wf!B<~ZY}EFM-E(Y$=Ub+4ycxq4X!x$izx zw4`s_8ObGmC%(K{a7A=ZyzMm+qg%mV6LuXsws-A@rrc`Vpzt4Tt65emUpf_NHOuJw z#9bM)uf-lY;`cVD@5aS-wJaNzgNm$^+?P+YN=$O!y)$=1NBTVG zeeIZgFY=Vw?hL8rZY@dW@yCw%#jddIkQJ2t*&+K@>2bzPx8!LH%3L?UjGgG(cgt{} z_SFStF1zM??z}u_N0$5MwX1WtC9V~_(l>ocNZ+lMw%0CN-*UA-^VDN=);8U6lcVyB zGNO!5hF!3(tC*#|=795=LjH!f?a!N5y1uMh{!q^SUDHnGVur4{w!dwPmLIoXKKstg zzm>8(7a#ZjG;!H)*XTVWE6+EX9n0SSFW31q%N^}EXUm!nP0Rkh+G{ekNd?Vqpa zZt^|l*nNfhdGIRHw>GB&jeXZ;|8igdM@Pf2vh2XQ@71hX$x|L2(Np~VAxf=6(6IKm z-&MDdZWF>ko%p!&s)C`QVWaYKmVX&}Y$` z*1@|cU0xfO^?sjXXSmj4Z+Y8RX;1NQewDYriK?#M!1Tv%Eyt3St;^$YE>F{#aBs~7 zwW$s#xQ^97Ihb)>ZC|qTw}lptJqM0$k~I{w-}g^6FEe4|!jBJY!(t}K@Sgwt&UAL| zY+uE+>XtN4ZGl<$4s)jTRKDBr{q@PR2mawav#l>r$_|s&%iYUddh7iror{z6*Wdlc zZ8tUdgy|IN*pPFY>Iq^Cf;ap*6L*;FV`TaK1IOo_m*rV1`hd?v_g!jzZu-jRH}8*d zrnaS5G$%41T3nVLeB@Dc_}1s??JmU@;>#?Xd!yU$R!wA@c3F6K`K@n>sWUXMZN1R@ zBQw+u0_$PAT)){N~QM<^AgR#Qn`@A8qGt zYq+>IVVPO%FTOGdq3UV#mi^vx>0Gk*t9|S8TBV*_&YN=6Ym?RG9>FK#+ro3E7dvmC zHE-)I{>sZIs@}}{^e@YOmvOhbjOOfaqdkfzC7U5*WUvnPrm1^D^ z714MtXwPlo^Oni?jaIo^zkabim+x#ykL~U&$MtHLA9oA-DyqEakX`@#C$GDi*Gf;^ zn$x)Arp=a;-4hS!yDcx9qxtvT-DqC>1qPvFMl0GipD85vIC3*zi<)nJOykkh)t#)n z^`$MRsQ!#R`P%8Ygwoa54aq!j1N|?B2i5Ek<~47qsOHu_;FUaQ(*oV!T)vu0mn*xI zeNqoC`F1neXG?C+&W>I~n?zCRXp3VPKa*PtEBH6rc5Ur>|knZPQ%V zf^+k6eBI~8^w{NvWP zidqL8eE0KqU*vsOMcavOe{XH8QMNjKhxd)}`^1%c`*Y=P|E;czS2~zx|6Aw&;kU5{ zvqM#ui`QOE)yl7BoS3DmbMp1-=<+Z2yH?AdzI2b}+2*d@O_o*m*B)MY-hV6c{J-E} z5rvh<`*y92zSJ(TfQeIb8Na^yp{!MArxFSh{zmaj-nEH(y+YA<*5AUFiz7piKkrbq zO_ma09DVu&ug&@M>PsruR9ZgV>MY)W^yO1Gi`9SLT$myE%0uhb`7cfP?(NAcJ+?#e zoL0ouHI;u{YQik7|M$*$xwJ1Wzad6;pIrg#8P+vTw(rjDeY14^YsU{3Z_eLrl=@r4 z=(%X3$PyE~8=STwZ|>D7NM*g>aNzy7H$UD7mA{V4E6w6%=WcsCe@BCh_->Knjd#ts z7T)4=-*TvgoxAzn1^>3?nSOx_PcOc8LZjRAzA^vS%Y3tsKQrWCJmakFyVVUwVfsEk z{%3g^!rUcqTCPbwc+6O*>{-(xHhTfayvQHFW8NFyy;pg&Df8@xn_Uyb?#yFbwb}mp z)5aS!^F7wPGGA=7_qMsV?s%HQt*_Nn^NiPjo#cOVQ*G*L1Fpx8FBQt7&aBvVI<;In zCU40tF1vNJB9p!zJl&F@QvY$CSK6sC>3c%UrZVPUJM>KO+8qAm*=7E79Y1t?9-eIR zU1<8rCI5abVA*`DWoGws?`?cfzIGd?+n<=Mppn73*T(IsPv+LhIu~>~+Q;JsAt#(zYe%gI;Yxfbh436{c z1?{(O9;EV1$M?S9cK?iHz{6b!pQJt(y`-}JU_()0Y{E7N-9v}3_HD6FFM7M&qf)Z; z+4Xh5k9YkNk}&lT*kf{h+YYHkRUhLfy?TDjAoQMh?)Ic5{+|=K$ZOxaXCLn$Nmf!$F%jpi{eIrHgFlzMOD=b0bOXH@80jcfR)L&Nr>~H@D@!QhpFM|Ms1gd$yHE zyWg-ayp%F`<)=G`{Zdcve`5EO;mMULhHGPAb1N{pYLn@Ba$FD7fRF%GkCuDMc``0jU+SJkrxvAet9JYVJa zNWMksrQY=Yg6o_DPp&VVTYu=-gN`fhE)P=^Ry5vyQ)F?4LGm?^=_fUhhf(XMFD&!^ z9>JXQw9atJ^cexyqy=W*?de10HujhXI z!J~G@?C%~8CUrRjxy_0ng4`tP1;Wl6bST>CPdFbFQ1RQ=S5?F|Jv6p7N4|zn>ErpR zf<_PN3p_&d+e+2cZphdfR0VB2wdeSO_5(Y%U7c1J+GYBeW1X?hkIVCn_RHP8Xyw20 zobn^l=H~nQ@^X9YvqNWdX&D{a^NnRv-15c`BGSJyiWsjRxv(Vo_L7`c+jaY&eq#OH z({f+@(Zz4Nd(H0e`8Ubz>-+jk&+Yeb>M4>n(rw$*ERtJ)e}Br2DP}eNP3)F3nJQ18 zS_sXV_|)O&GnOKYOBZfC8!AXtyqGwtUFgI^5B;jWoKFg#NLKIVRI%_@39q(jlsOla zT39T@$@lB(4oyB8wq-rXA3Mwm{<6Kakgv!hbE3ydM_#5OT zy;WNF=U9a1Oe_)FW6>z%S6}!3e15dnhuHTX1s6VlKFs-~U|Pt7$Jq)8C)U(0%K!FL zHtUDyG>4|<@)h=T9QfRK9n9cAF8Dm;r|wy6J&;eEa_wZ?o0MO!$^ZJ0rO3j!edX-O zCmwp(S8zR5IH-Av|Jq%9{vwM@{BiY6oPMHzKYV%EEYnxg@^g;uga;;-we!xEPdL1> z{n;Z6p*izPyufaHZc|t&!^wB-&aXGZCm!m|-ICX*eDGlKy!jGrMHWWSr#z2oWJy0+ z54P{qwC&R$dlYQjv*Gr_jHIiSwMm+->vqS&MA+xXm>_g?>3AWcbfr zkVlwp%G|o}6_Fd4Z}Gh0;kZ?Ji|PbTf7J2eU?j4pbJH{8J zTxuAn`I;-xi08qLV9vEEy%uTPZp%%Qjd4hM#c-0hqJ8acb+-EWtuuqGjs3kA1#e!f z-oNCKlAXr>?7s zpEHs(($>AgfI794DmboZWgQU zzyH5V`6TyySsdGXYf;HIad(4lZOn_Vt?60n9%~k7693TS|D3O}WozckU;ofr)Xf^0 zXY@%$_tc8*4om*O5ty{=RlTByqEe|*{qIGacTP5RzkGT9(Z}oV>ewwdm_M;}!|JbR zw@9p?(tq~H_A7dAKlW70pU&IhTerA3v3!o2(}mWz?d@ypr!sXJ}g9^K1E)omw(r|;Ew+AcM@_tqwh)I5v!*rIJgCvLrM4_!N@ z?b+1(ttrW}{!w>KHGLgt%O!tv7mWPeDDhfoc7D+>)&#K=kNsM?mR`9ZGT~WZ#A)YC zZJb+vS6EC^v$a3*nlEOJXVUexN-Bc?G>qP4XB4ZO1<%Mn;3op65?9J`fpZG7Sl|QNa$h%WKe!{BPr}rH=ci`D_JF)EC z|EhaVP5g2vH(_1y8P1S9(~I|9cfCRpvz3o1wK{LwajytJ@fa_^02NrJI&>??vyVN zR6jgY|1Gon+bln|ZATWpnJ3Y4%};tk<3+P%liqDLjMl;%Crs1ZIq&z@_g7h&E*yKS zZ02ywBsN^TD#p9NJ9;Y1G{yB9xwGaO-kp{q|2C(^@Q?KNI+r;gIxm~tn(XQl((%U5 zx%JSzJDR7soU8WBZ)CQ+`~3Lzm_H9+J8usc-JyT(yzAnvvOjACc3+4vz17dr7rvjN zL{(33;TGBMdEz&&-V(6XWl7{NXw#9{zWHqVN zd%15`pLm~o`mEdhD_8newKFQ7{_7N)^(LyckwLI)E$d(5B*mkv{uw8Il3w|WOcN^Myc^?VP zwe+}qzs14B|T|+FubPj%9JU)eky*ue^EO2 zEQe_D(s}Cf>2v_jK4-Djd6g|F3nAKE@8TXkZO`TW=%U6#QZ&u&UvGorBa!clC%92%X9xF0* zCahnh`)yiy+N+%b+rz~^Wb^L+$a<-KMb??e3s+6KIz4df(RwOQ?|;gxd}GSooeT;0wWpRmxo6UAxwrJz z-TVC((p!b*=Dy@PI;~>sZeixG8C?^Z*Dcix_Fckq^rmWW?J15;dH&m7{XRawz4M7! z*&Gic&CjBWvCl)_2}rd#Kac!nbhC2Sq7|21W^>HYU7ma3nM72cO`Kp*>4T*oyNU|> zr$}#4I63X3mVo5?B=(tkkEG51w+P?%53J@1sOge@JZ+BCxlEoe=UWGuMCZTwl{G{7 zO0f5V%p+X4-PZJ+>5tG?zIHvNVEz;BoMTEUU*|o&FBl#j|5aGYSggMGgx0K$C+_)5 zm?TfM4J*x^`uUpnTCTGZG8-0syEvgu({jSGLmVe2h5fy#BUZaT<;WtN^$VN4`2}N7m z|KHEA`XPcrF_BOH$J+h-eAvp};P^UUTc6oe)fO#~c);_*@VA(V`<%~L=Ra9k{9s{K z>x`+_wVhwMT0OXSGk~vhzeAI={`1p@M=ZI^mtQ|qsA3_o>0^LM!7;rUv(85z1quo4 z&HGr`*WZ2Jt9;H;b;6pQ(VWW{*4oOrH*Mb0d|JkNPO)}X@AEf(EbX_xsEhYWq)%yj zras?x!h?iWl8+xs2+3$1sj+OcU>A+MeYjA?qJ8;{GloYjudLtq&q7GXXYS{hjxvRO zT6^}@b}1h`_-5y8kZ)FesFLebKK7IS#*shYTy6>8=QREIV{zG^KF3#Ik4=0K18P{w z6rOW(uD{QBR^UCyzLNI({iPHBFF*gK)V{QS>b!s|XYb#=dQD~TB}!JP2eQa1NZ;WU z`*L`@=BCR0D`&0bw{Y`vrSMe`fhhuJv&TPblp#e$BesG^$_u{)SA(smJ_yUe$)>G&BUMUKW4# zh?TW`NjLY2lHBlj29+GKXUm@d)KgxvYW^N}>z~XQPX9ZRX5YVa-7kX|zKlk8a;s}M z9{+R5KGx4vUw)zAHou9+PB%?7mU_()Kj&4pTZ*-eBXNm&d~Rf6zS4q>ZywSPA@4u! z@myrK%<@}errK_nmv4UF*qk4m=&^oN(|W1S`&0AR6zELlwx z4ZQ0=JrRA+ad*nW&P~;yWH*M+;Iy{8p*+7{KE+?l_{EVa452Qw-c-+G$=GNvdsOkj zst_TQ?;U%OC;jewYo;4f7231$#?cdua%+WJy|vBOrH87Y(7eN#b@_znIma8Z>!&ML z2^?!nG)y1sq5sR;si9eke^nP>d+wC`6zeSfcA6$6r*R0604GX;l zmiF(jjBM1|{pnA^zuiAf-d$h~Qhc^GR3Pt;oP1#NmpzehAI+b$`_#OxU8m0eymdC) zN5JLtiMc#3k8-PT$<}KB=JythdUI9&B$tcI>!cr6o}2V$JfEnuWyYU7v(xV0PhT6b zB=E-kC6NwGrZp9Ql}$YB^!VDXbF)}e)=17`t)4ewjX~%}o`Qp14apCGcg9_0|9vXy zk>1KX6HceMN&Q^twEoSFW#M9C!aCeB9Mf8_v7C0wZxY?cd2P0ypiarNRa?~}9G-bL zl?Hs!<-F#2LS@8d$+HO*wC*vLrZMJ?X(QBSr3A;GQ@8FI6u&6pi>`heoorNi@ z(<~p&nksNj=Tp+M+x~UirH3q9oaUeM`YpE>R5eV5ZlB8yr@vQ{gu zO4T&G>Lj>g`m(4nwPjIZZp)&=G8RU$Uw^G~)yjsUC9C!Bo(n9TSGin5PJc7GT6KDM z=;^lEY)|i2ZWDBHo2^tU*mkK=>fh6q$a%Qn(y={@Bky+r0E<_(=E4NbM1< zi{YzDJFxAeYJ9_42f8rrfkBTDks}bV7E}@>?H7UfoGQ z;pDmPMM&b}(7rP6Z?m*ZSM~lnEj(9???_E;*-@X`Re#t0RnUFz?tDAsR{hyK%O!=Mlf! ztfVc|%r+c2s;;x8AnEE0?~|Ujzt7$~{i}1%y5;_?tAA}c7|ZrHI_%5JFR8DC{~a%z zn&Lfa$%fTW1asuh1+Oo+H!uC~s_eivFLHH-(wW=@fkiiWe*U&5xUh8p>Q^BLORrCG z;@wj@DZsVpswd8p{5=RT#H64%4Ys|{8t->dTr z6Ipps<-OlIQ<0TR7JXl)plvrR#dZ0FwJ)|MXj@IoaXmhHEz{(+`wsrr}5@i@bPuE%H)L3|u;C!-}Bh4J(4?ZqTrZbmX*7v^}l7CcW^`B9GL!!AsZ@1D8zN zpb_NhzB0ihqC}sw`<;5Sp+o=1n8kLdl3F|?*98iv8hU#~o>2-C`>dmJ`s8?dIQ$1KaoH*1D{U_F3vx=G@q~QqOqmuCKdS_6kef8=L)eE=QsvP3#;h(^vyjI}a#QQfEcrpa ztGAvlTziX4w*SG4+{l%a&TdS7%4ED;^mJgT32)^kZtv;8ojC7ww{O!uT6+8c+e`il zy9-q|`Fc96W2l{~bN|l|pRgq9;^!x`0?K#%Vdp&~&D``LQuEI&$!}7Ik(_qsy$XGo zbH0ZC5NMXYB5fD*QqY_~{FJM9n`X?WtNe1a7v0pEFx8ene8nr#&7xg#_g`)ny_6Qn zbbIRrKEo*6xS9H&PuSE{uF25dxBT%VhFxLn0>XWQst*4>xH{;GTR_`9M=Bb-cO0W6QC0ji8z|)VRwmj;0#EM1ll(@}XEqC_!1eJ;vf4KH! z&s)8x?Q)E2W#p;8on9X-%%5qc{Cd!kIoILTrYkd6vwYt>={e8xomy*OguUFmPGq)n zrorU|)wV|$x8KOS%AUVLh$nXv+v@V{XXm#yPUdXustgV?H`=XzOr!DjJ^pw4`_Cw? zo5EjjCsu5>{mZLAYG2b=dBuo|o%7K8Cm;T^V#1D7>>ci5b_o-@RtPn(u?Sx(YIS77 z8jA?l$U*_7$e(ju)^WWEaXp;8%HWD?Bl#?G&kH%z>0 zY_q9KOkMk2h)(sn5XZ1ND?LEi^?bQw*cZK%UH8 zx*0Bh;b%52(4JrK5pE}EyNl~i{G^$xFSK;r!tY#q`D*q}uW;X0LFdF})z6eocze?5 z;hZqj%*OMkJd$=Li z_}D)B#hxKw)E+%eZ-+*>J7NjxAM9g43}_|4FoD%{{K2;WMAYx##JO_f`;;m704&i}VPc=@VNO{CpR<3w@k@y!x9|JCU1 zR<<~F{iKGRTbdqhvi%sy!S8+M+$a4rNrJzBYPVSh9-Pno zZ}q8~{ibSf?V8&-&N_V1JlxbVo9m$d=jkP!U$)%ZleW||p-*5>y7!LB>nEjVMwP2d zJlOoEyHRPq^SKo^&KqB;IL;7kY=0hkb6efLm#@Dr&GXD(A6yimtFhnc-({irg~8|S zb$++7zSEpx+i)?LHT>-Ig*yIS)@hmMPj}q8rxnf5z^%>^NZgbrG zH(X@d!}>|qXD7+#?ELyU{8y%zQK70q#<}1vA%9g{6<2d(yXn`~3CO z#G2TayJegPlW%lROf)@*oS}X0c-u zTre;Co!lgRrvAzX8|iM#G``0ltl#Db=Dp#*Ze!VVrGJW4!DV-k*%{yJt9y%itv4n4 zI6ZcF9cq_zF-!KgIPa2qVONr>!(OPX+}rx!muKPM->S1;vW7By^?z;tej`%9b{(IdD9f9?V{zC zD|w1tV%5SEuAAJy+`W21?T-IjCHb{kII42x7Tf2<&(Kdgs%h)GZvCs5HPs0Bf zv}|L#vuP{;J-y3^jJnqvTyl68g5^xzA)e7d;FVg_S?uh zyJ?C-$91xA=q=uP%UdQEib!jqTwhD`sK7rLqI z!kQ`5c%3A7-Z{`0-L35rA$34fe$VaprROL6Sfz2XrLL-<>h!)_a?_U;sim*avrh8d zP}>-@hu`|(+1X(~Ry4@Y>b$gCq}zB;%d)#KLz3sOGc7lH&3rnc`o{gtm#0^4kw2U& zDgCm|o2%pT*&wmFRqb0d4DTL1?dP^C$%fC<$t7i;>*1fD(`$0W9M5l`e9&RP??Qd< zo4Ib5VJf$e_#Enw(Ma6kD&a-Y(F3 z)Oxv-GM|}&ciIepI-ImFd*;?&sU35z z{IyO0>VjiR*%?4$h?DbGSe=nuh{*se%ET5=t(N9uS&bD9QS_ceJZ2; zO*+%<&###Jo}$_t5 zvLacuENcJeimWoP^&MjOPlSGAzWB`arRWr8hQsp90Z!**W-aWxv~K?Sc~je-bpF5e z!J#|&qqOpTGqI#A6HYl@sYySPnphJqc29JAtNPY+XIC?yUb*puinHGF6JP)Q=GA|e zp_3x78ZWkK^@8cGOlpD2i7xL_7yj9)bY63L{k)479f_rHjyZn(`S$68loUPo#KV`4 zIrf?SG2ppdwe9@#w_<$@tcyEE4o-7A@Y!>v_kqWz|5X*@`necCT3R#P?ycJ=yy5fv zirkfdy2Y!1mfN)H|34QxX?nduP3XVY_@}|0Qhxyn!n!3J-`gEaogZ`l za67;MzCB#uW==c0@wSKjArt98+YU@)+n=kZ!CR-?cSp)*LgngZ^Al=yHYvTUh}m&$ z@y@i{X5WvVSv2kM?PrHBJ^E}NZFA_ux&x77_s(9O+|N@4qA{TatOZuhEpG?!VRN!gG$MXRTFz|KFUWyt=;Ye}vM#OKfLE+%ira zZS;v+uh1qfw&0iV{G#%S>6hIFs+Ytu_MP9Dzan-~Gyj~>yH7f5=PzA)=VJ#R-eJE{ z`S*Uk?~IByb@s=Mg;&U@ID0rV|M~Ol`uhC=ZEK$HJoKl%wj%6EeeHz#<-E(pRLUZS z4xGRLPRsk$+iCxwfB#?CessR*wfLKpOZDfU+$O5O=T^V+vb{W(mruWMW1F*h?M=-O zy_eMmD|1*JSe><`iem0xD-M{cc~0=EOUTx>2OSQWW%;ZZYnyo7U7aKeQB1?6M5EF+8?0 zX?<>Qpz1Z5z1c^)iXF|)EG)a;mlZD1u~@M$;xA`PW!S#w53ae-vYqksTjsX~htJ(S zr+DKqucJ`0y<}ElwzI=~$vWSi93COg8Z-QMMZYp#7nk}p?3G&fn}eoe^*WneuK$W~ zIB_|1c89@%l7B0X1x)y7JH2gwc+W!4#RGIhS$w&R)A;tht^pR*Pj zO*|I6$SUiW!HZvWwr5BmsGb`BK=khmU!84!mis3>skzr&b>}h%hw8$0g*y~DORvwF zpn6nwNA)csgVK4=7-ro1!Qx=VGgGA}OXf^~9Os0~FKv&CeEjEh?SYiUhc5xv;x@i^ zdrwrZkZr!FyZXt7hULpYig2ur&71V`d8d2V@?+m8S%_X$65O}{^?XXD0pH zd6RARj-Q+#70vF=trE6+Eq9OE^?g~#99w;;sx@egd7!Y6@9rDahAb90f&KJvKtu-2S*G4f-3{riToV;+) zL*s^H?;6g{S|I$XqEcp^_hr`2Q|8RzUtzW5NsD51wz;{B$8EhMh3+0=V{kYWq0_j z%`_6Yn{!q&RU!Sz+l7C5KkmHJc3rky@!-yas|>duUNfCpv!SM4#(CN?2I0q(70(z3 zeC%kx*}isHTWx(QcgopcMP~)guU?z8vh%`A$E#}=iwa&(p1*uUpnm&OW6Oz;-~JFz zQ+RnKHc8Lh`NN-6xxzi`7cXJFbnFP{ZnmSohG!&;_WZT8WRhBRuk9U!Rd15ea~r45 z4^PU(cRZU?Avj@e>g1`@WcfEPI>Hbr`L^gvVDEz?YqC3dCpp)yGh_%cUdwglp527G z;dh%IO+Q~QTY7ZCtw;JTbA;9(o#7jkUh^l$U}~AEB*%NHORU~=1>dU~bVuzF+hk*V zegc!_vXl2-Fa&RAzx%r8iQ0KQ+Wvhc-8USTp-v!Nq^KxD(7@Gi-RXi)qd5 z&CKpgW0^1Yh8gpFl<#AhcQ-1S|I)P?2Qpl_I_6w0n_0Iw%BvyZlJb0^j=nm+j_IXJ zwG8jWPETaMXB#x#faTFD|H=cKO7~4z)4!A5?7|y{_0uX_wp%PN^Hqr6Vy1eizPd)y zWXHE0g;f^?Q!9UP7&m1fdztL1u&3Pl!2E@|;$N0r5?7jMDj(?hBF4JvThBZ0mNnrb zPqr9qtcq|xciEqHcElsgXTX>&HqdmZ_e?yBHY5gN$WvdyF=Rv^^> z;G#4`6Z`EY$sa|uR`Nda`R8OJtn*ZUHTS7Ww;W!~nKg-N)yrQ_-wt1uQ`mI-BvX>@ zEdhaS@2!#?7gucO?zkG(;IdrVEV0m9{8eo|3qsA+wTcq+XGDa?w|RQ|MZpi@`J3$e}CXM>TuDqGK_k>V1-Xu-_G3)H{|5^ zKKu2VOQ4JW@!kXm*?Wl_!Y047P!P(mRd?H-da3e5)O)k_&9C{NR-gEMAaZeR75{^l z>p%G(I2>M3|KRJ@`zkvsx+31a(2|i*w+u|4!`^ywTN$(8x)%!TS3AvDb6w=<$XD6Rhf?<)DR=T;c5iL9)89pJ^UfFfFP-M<_ah}PQpDD8jY#Na9TAhN zsAZND14Qnb^d+yAHUA&0&#-pSy}8SocHa8)Tt_3cjGvW5{E|;+?ug;kwb1u=a+C^(M|Ghwi98p88eJdC#Ugzx}rPPFwCXmwgP;D^#=Q=za33 zTtDtse9y*1mp-=}-2W(gsKoEK+_|E#^SbA!&v>fN{%8B6sk;h4dukYYE;ja9G|@{e zb-%Do+kb{{AyzAxK8w{Xp6C_ex~$>0#}Wn||1}*MeK#wEZybBf%k^w$rM|+G&s%2d zZ<`#KsBO-%w@oJC?kCMdiylW@$QDsM!8cLqxOGVU<$H!nmTh@G2Uoqmvrmj;VyQe+ z;NG*l`Mzj9wsZWk>}AIrrDK)C?~kmQ{Aup0e1+@JOQNkVXq$FEHedg6qC!>J_4kcY zM~_)~RK_Oj2fTilzkYJ^oylTP_I=Hc``H-P{*Iwy{yI$oY2|n4!^N`&A1-{}oL+kW zi z`NF^LuR8lbU1XeZz3gtG`UaAuha@pKuF-)&a7{_Y1?oJ_t+NyvUn zBL*$2s3T^*`3tV3Z_Qs2d|r8bd}pZyf40Tvd@+Hp?~>z`wXKdR&4JPJN|6i!mFFv8pGyql$F@Bfv2ciR$=l=r`V(7A%|Bd@|NnW=s((wncSRh>~PD)Ld?mT+up*SWr{CvPr(#jvx8 z{pQP6KOSc_Zn^4r<=0A<-4*ZTl}wg5#!T;oCm@-jgH}ejwci-35Z*F0E;MK?_*0J_3bJa#C-_H|EuH|dmfAHX%a6Qt# zDEBMN9yzAB&sh?0=~^&st6E*D#}cg{dNoBMh&9PnNW5w3y;Y1c(hQHLtU36-j`O(r zesSp|W!Lzx?u}g$?8eKfR34%wuK)5;9CyQnxArcp6Iaa?o#qfJvH7l2%--ZsNri1& z!?nBqti81)jji(aF&;?R90oBDYIj> z;QpVITiH6^Ep%(OQ}s0MS15ARO~3H`l%bct<*b`=z8WXiR>p0*$MkhB+o70C-`E%I zJz=^c_!vXSW|bvJT-W@X(=}!8r;Fx6YHWl5rApz@EOp^qoL57i&zr09^p*cx_P1RZZYUN_ zICiAt)Kx>4#?2d(JpzK7L_{TRBN~I2-F#xP@N0R`Cexjd`%W9hD;FL*a+YDvj8i|j zr2d@0?)vL}bxO_R)EV(t0x#uCrZ=#)9zU44`FmeSlw_KE*sd3cI3p_S?#a1kGNzAWSIJhKYe;lNj-=&t7^rG-c^sS zHJ(WMU)Y{L#UXFkjq|YE=JiE4O=?q$Oyk}H&;rW&S0+3&$8a# zN9Vh&a9O9}?;~t`Z@6uJmh9s%_(;ZC@$-rocMLcF*yZ_Quli+$hcnwBznYt{dfpUv zN6zboMK&|}M7G~IG=Jv!QP{VkI^@c{8SOK>3jAsgDL=L?c%6IMVMF;Dr_419m1-xh zo|XJPRb=_;1H8}N|4HlY5#uTUwx6N=Y5F$hi4z~MR=c;-t$sypW^&KGJ=)%_6*CK- z@(bR3tnIu1=$Um-Rlb}lR=WI0)B42Ash=GV&w0Wj{%}V7q7<*Be{%K7HlLLZ1(vD0 zwq*OH>8<;3Y5DA7a7);`2|Ev5734Y3e)F$@-08`NSAXSd=f~v99NfPy(oU%Cx9lBr z$7GJBxBC>Yzn-+sBxvKZ%JaQTx}G>GEz59NBlK9cpyagSlBgq3FTZoZPofVcQ%f)mAPBe(= zsq{biS$xm@U4{)UH=ArE?V4P#@4UZW;d=Y=I>qq2%?B3cuIo8&{_JO^q~p4{_suW* zW$M@4h+c|zyp;RVAgZr1=CIU;^(OTKi)^;Y1Y z$T{e~NzAdXNf!6{1@7&QQA`O$iE=|L~^ zvypAJmG(y050fzhi>|5TDTphS3B8@XInvCUHMz*+ z!^5h9CrIziRF6Q~eqPQjLYrr|(;{o>m?V*u(&weej zzB-Uj2~F zlAKfp4I={sldMDoLj!Y53*7<(Q@zxJVohFs=c3falKdhC4ab!Hq*MjZoSf3)k|K~$ zj7Ct5rh1PCc=dx)i}Op1l2eNnOpKvI&iQ#Isd**E3MM8{5#Q95%tWXB3WaC|0|f&G zQ%fTS3j=e7SOt({^9!)c1m%|`mZT~eD4@6uWC=VR0*dmJgHuZsq80Q5T-+4&LsBbB zz^1z8=anef*eK|`87f#nT%qq~q+kK^SCE3fo3Vl=jA^D|XaG?G3IKiAiW2u=u*D$l z?!kr%hKA-~Z|J)R8!4C~DGeyfFGwva$xJN{`p_D;_uqueG)k<_11c$Kf1}&moEHr^whM}tjz&y-hDTZjM@0>_}O;*|GM$H z$7frwJ6CW*YVvn|bN;M3zY^!)iClZxX>W*fdu3Kgt7F`frBXsUr$XE{{ zrop)UZ=r;|a9n0$@MYhxA7Zxt$qicmOI`0sb!as2?IlOJvkV{cO`ksV^XlC;XHQ-F z+{GSRI{S&=?gsbX;Mm-_pWV;<{ubWa8^XN2c3#$3%YE;z`+uH%=Hz?VgD8t^BI&=c{1yn?S)O^KH}dA8RCIr8abDu$ z)EK=umI)mydt>=6BB1!egUzL;r*5oTUN>XzRAnK9Uxy+i_pF&;#<}ca z=q~1&57ziLOFdOzcZN6b{bQ9$9g4@F%r!PC@G{!ETF7!<_uR7u|5vZcd-c;gN%BK} zaQ==1$*YO3>nuM?UVj zSI8o*`rPeb!bKzTm#2T7`gN26>_OHWVX>-*^R@_4+@qV#1tJ{v6RY_C}O zEjtv$vM*)dmEWsgK5|h^%aBjFuqFFg#j5b#X}edqTknkDZF1g(dHSt}2ric^v9>v# z+;S@nLW5;>Ey{woTs9V6G9zKr;ZK*p9#N``dA8TxPwv&im*$0wm&~(TyJ~mr)wPRv z?!3iw*7(q*uGE{Ms>>qxwY)DD*ER@$y>B*Kh*go(=4~B~+kHM7i7h*Lxcuv`L){Isf00slN4Ab=#(hO5c-LpHgUU`unmt=VO^Gt6QSw+ZVnoXktx! z$aRT(#;H{cn`X29ONuc&dpUTn$c~=X{|}tE6!R5qD=(B*T-zD%cRa*k%j1_kKDK=~ z?uO)Q2c%rdp7U|l>)m2I19_jHvF7+QLVtc}lN2ry|6o1q?zrEJj zx70k|A;fsi;`PUu-Id|D$vY;sE2mJo;rX8#RgQ~lx4wN6G9_`dUG%mm3oh$8oGeH; z61j4HcSFLiBtghhY{CFj&pSe?E`t&b%XBiSfg6H@9EM(tW`F2(9=Cp^?n4G^VTsoXm)n~Q5%gCrvZ!N=tiky?psfB?#OM5l< z+*#(`zV&ro{fgyjljb~U6L7QLd!=X1$xYi0LhIWUbzf3&EM`HD& zRUh(A+A^m9~>qdZ?TB^o$@z% z7B_{_nd{7o9~KWT-3)cR(&wst=fpW0VmCaNLs&;J8gzRiNP!3#MOQAdy68b9#ekrD6nbvs)wy9jttZE zV>|_BocouX?dUu&X=?A3*WwJ5S`N%fEb>^%rX3XQqLzQ+D&q??&V4VN_}1@l-s5&C z!)9yE_caxF_#ZXJaf$!2(F<^WwyAT6ZTI#)KUP+(KDIGlxowdo*QGDs&b5BBTU3%5HmcL zRw*@gx~6~Jqk#Cd`DgERO0C~4xm3FAgYf#j;djLNH>Vb8vonfq`tV=#oz0a0p@q?t zI<&p+uzYg3bH6l|<<2GU2j}v?y+81RZ?2Zm$~}6kjI9E%h^X*oX5Vym;lI`7Vduwu zb6TFB*UNQDX~Ij^EP2iov@L;ipU2x9GZxK0Te)8JSJ!f;5BiBkx)DoUCtm&SY-}>+ zhtU0*KTUQsC)_v_wMaziVZ6K0Ee?+j4(FFE8hVJo_&oE~nVprUuddf+yuSYW+bR#i z2a>z4G@mp2otjs$ApG>2itDRZvHLlvum_*9RC0C>W^(e8UGjXL&e@W*ld$@-`}E+7uA0fY*o*2UU`4#R#oP$N1I-@T+jS)^!#tT4&E)k46UWkThqN)U7q}4 zzZLC&;&RIPrpR4=e+K2M-nuur z?}N|0D1Vjc5uRTAVvRx7o3Ka9N&L*;U0?3&)pM8Tn%w`RQ8TikWdGEw8fu#-tbHT9 za=H2GeYIcL%GcewXW+w|q`XNj#n2+$&ynNw|4uHsD{mLwIv30Lwad|lEl@pY;fk2s zzpU3!j=AA_R%}USWJ!$wUU}EqM~r%R7k{l>SX*fM%=us2lk--p6aPInyJp!l%cEu9 zgH0LXjqNdW4;+~LW7^48g^T-F1y^g|*!XtVa<=$o-%L+6HJ$k&CC*|X{Lx)ROKRJ7 zV>8!O7QayA@`-zoZ=Q95TjpC}aEL|c+ofsc<0_Tmoi`lBNq!{ZufQcZIdW<1>G6q&wgF`CWxw_t3hQ zr8n{-zPQ<{U;6wgPMz1uccn(*oa=^1SAJW6K$w?n*0RsCRqGU-nSJ! zb9`>TlJU;=`LHe{wIww&{GirBxr=W$6S#fi{qrl$-#>k`X*%)t z=$Dd>ktw!*p|VC6BF}{xBDLoK`}^|M=Q}~1y8O#zwoN%at?&Bsgd#^4|Ld}*zuS1K zSm*9!T%sZ^jwXC)eLFYY+-vl*|4p^7lh7Ed!?J>fOv~*ADkxe=qphX8D(l z-rSsH;hz_tTxo3OcKS<$`rdlYTb%p;KfD*W?N?3lv3iGsi;{cx#@t)*xY6!kPVBNT zFTRD`Qt=4c!d#Pn_~ePgiM>fTN-EMnznPPh=J_WjKF{iRa{O2VB;AQ4QPY%iNi=xgWb) zg?*ek&ImsI^Wo7}yTe~X8lE4G&fY2+%%WKF{nD+E{ny>&Su@Z1@9a8$RbtE0U%Yda zuZjJIHCBb;OdLUI}K#l)O|er(8#9z@}4(= z?en-bB7$D6XlrNu`}ijFOTiyJF*RAt_ofA&e?0RR?^J0YX3L01G1HD~*M6O?teJIz zIlrO8D@sarzr*(zN9R?|;E&iZ#&gW;)b!2Mto{F8j5fN~l_f3qeomf8-hm&Nm*$+B z?Yp?|uG)u9#wOphCkFn1Z+&I&qyEWdv70Wu;^(QzEM1kCz2)rY!+ZB1+`4bawDRkx zn6EoXM(jIe${SR1E$V!`k1AWqmH9ObeYWn}z4-oe>lY5vRg)H_+jPp^aQWM0CaSmF zcV(`bVcU&Xr=EG=6^=;UZkyZks^;V`g~A^z;-??v`>J}QYjHu(tI}N|kp@CvT_R_s z_p7XO-aB zufIx`uih`c;RjE|&Na3E)jSV1%}RbvU7l!~cS-r%U$$3Uj2v%1JGCPs{p5MUgN27* zPP%s`)hjHj`$^N3+Ry2a)h3s&?YX;pzTUALw~gjzyq!6H(PUB0O;;v%AgTe);uQT0{6GXTQk7^g&i|&%S~M5B zowt&ECb=_T`=M$`w&bsw-F4r}eu;lORhr3L$-sD6Gd`y^C4T2|FZYK+VGkl?iK2nS!p?Z(F_lGu@t6-3a7W{>`a-;1rSv2oq zhc?5ycj~L$Q(s*^qqNcK9mnG~nqwMjOXBknzWx%*-gFrP@N(wi#^CH?%TG%;c1N#vU!8J)g3>Ro)l)5ncwE1GTNs^r z=Ps>1L4Z?}UE!@Zqx30`?Aj#N2A69uwk0br+ZeODh>w-io$a@-&%0eLmv-!a9rT$? zC06nJ3c&==br)yJJlS~nq4u%4N)KX{Jhz?|%{G+2VHP~`#=~Xl-4az?vnHRCdcBl8 z)5OhW)5CMyg(8%$zi>8-H2rWSDY9&WFROLq(G)fNiK|-NJhksA6vscEIJN!u zzDt3J)h4U2G~2$&<^C#@^A8-n7rrZ-`XV`T+mp4DJDkMqo4hv5K2T$iIk7-AZ`Y)9 zhI{g1YIh{q?6(?im1x}^bL1LV8H16|bJ2ze{1*dd8)P(RFg!UsnbTp-m0hjJQ~LbW zzAE&;<%|Eg^xVWoLJ&H-{7ISFcRsRWgPK(_(OCRE% zQBxJ&r*l@Xn$PXrX+8$CUn}QN*e?8BR-2-f5h0 zFyA@zt=|2a$2JI>l{e(FTAl2Yp7FZxy<6Y?TGv(PEb5lO{{$X;#<1P)nzGH+8>{6f zE|!cK7N)J>{&bs{UT}$_RIqa1)H^lq zK|6B~&e`dWR=&M!>Q#QkdrHx5 z!Ccb@w~JzXCN1mYYvpYCvbE%N+R+U^#Ft!Qymix7dxN?Dq56Z`(^ZWHMXa8+D>?h$=w&}p zKlGf-T~BrM^K;!9F3Y0k6?#wnBj@(?m9@%&!;|<6R@xbCO*g-7@Nvr0^&fbgwzT>N zNbvc07G5ZM^r~_bTPo+xxx7vxtJ^u}{_8#|QusQy+V)9DP&WHUx5YQY-*9yt<$dt* zmrUnUq2HEqvr|NummK+8{GBW^I-tM&Y0LGGD_5AVeNUUdFM zU`_iz$IxjHE0&q0FEP1(;*D`o7k|C$MLpwt8mU=Fx*|S(wGH+Odz2PdDx5vr?dba) z)8?OvcRJVpLus{L zi%DL`GuK3meV)U(tDc@D+J3fLbZb-j0XCl3D>JYCTb>(T#1eQne~M;2#{v73 z%_ke!-m<-&!&$qJ>yG8e)Tu{Rr%L?2tlO=*{ZqN+nnNj~;S=6)ch|fYns_!-HFJl< zns05qbDLJ2vXJ@tT9$FnYyQvS0`0SsazmNkZCk&qeBA>M(M4~LEiZjnp~G$2tKSfN z&v;L;jb(TAj;9a8*gv_OHQn`OGQ9KfX3@8+QGTm#9;rMzS!u6<%qj_>?l*)~mdT97ES zd4x<*PTjnO&8L>g&D?zRY0IIf%MR#F{uotvX_3e@Lv7Z)?R;NbEba?_+VJ^WmxQQg zlp*_b$1fTtH)b_6ZrG>);M(<8TiGp9wUI_;{;$owCcnC3DB=4~;`gKdbD3Qp>^#1H zw@+K>N?oI69J78;`1e{?C2yCPq(G^|d-w0Zna}HTy~{Y-XZXL7Ezf3tl$N)h%Dw~D zbNlXTuaP-?_)*Bc>`k@JNiyXv$3x_LK7`a>;}TsQ<=|}~SNLw-f3+1KW4Cg@yh_7{KU(NOIeTg**=XG^gMa1^Z7s79><~7EL(v`mEob~7V`Gg*^MTy9|h~3z8{{sqUATAN=F#{fUw1 z#kcle{by@8bkyIUm&fPr-qo|l?W5QJ-P`{x=KnSK^i?~1{<5{V?B1L$%9&x>-lonZ zT&7SoZHrZcoKD9tjvlcmQ$?ko9?EF$KRA0r_Qd)9s=sbmd+@kflmsl%kX$tH;VG@I zsq4$GY~1&`+DT2%{LrV*8(m!LjilVa#_MeLo+(y3>2+|k#3@H@gQF8AQdaC*yz)VC zddokSm=}Z?k!|nsF+10{K)+x2YPqv0Q?U390Q-9j6r};LYtxlE} z@-n{Etp5}_Uu0%T%2Xw}tU6&!p{RMm8r~Ymf~`DM!hNiGbpIZms*?I~!i`6^r;BxXkD-9wXZoXm9mG`-=< zjU9I3-|yr{zU0`TU9a1>G{Q z?9&sqf>ZPFd09FnshR4hvKsU5asE|V@P=b*rS6C42G?&{b{-Ab<+$cU$kuG(H3lp8 zPjl42Zm(rJmw%&~`juVvOwlUoQ@W1*d9Gklv{xuTBX<42jlmWvj0RSdW6Lx5t~y`5 z_CvQ)e{z|<=KVkQ+s-LGu+NPA{^yDK z!yQwEE*x*aE8jD_yH2d7>FnRg<%Y{o22TxVC@%{9wd{q0yW4s9ztaLl-rPO2HzrU^ z__aT~SiE8uZ$2&B7oC=F(Y-iE#KEH2 z@!dS;`wOd?lMmne6}hojp2O2NM!;8O<`$plf|oAIO_E)xveHLMUxxou@)KdR4C(%- z?DIA3T@tO|x!=>`x%15V&kwhko92A}Gt2$i<%^$gsT7r2Y>$YaFS=SJ#3StZWd3N0 zuZJwF_uN%B;4HhnYr}UY&F2Rn8MZfcZa12&#T|G0pHJ(Zb^9xL!)BalovS{*&^>ZfKy$>!TTO2sIc)QL+$v`M^j(ER zwfc^V2bc4=%;Q-bt9{CIp3qH>eH;JDPWiZl_0;S0^>OEatQC{l&bQM2SL@%IRj(Fp z`C`1Wsrlr&I4;GxuA8P>Ye^WUu;wkD(Y)O448x~{J-(WcvR#w;r4=jwi;dN; zrLPNMJsee)RIz&o|1m!6-%)~}4^+JVEbXvi?&>zTuh#>v#8vau@NOabtgRyT<)Vx+iV3 zYxWBG|Ey3x##o~~%lFZz^sZ@#-hKS`CS&iF!{7G$K;cy{gz>W&C=yRzI*r9cIU(c;(zjVZt6aLUUAQ7&Q;^~_>$VF;*p6M&x?}Hg){(cM;76J!zw3#JpDEeX zj~sq?-<_AWRz0q{^nQ!9U(x*E^@soKYHMYc#{GCW=d@Dnr`cDk7R;H<>>bp1MR2pS z`V?&z?q8DEr5hdw81D^xld}HI?~{9;iI-gGGvqpBw(eE2-JBKI*S+4E5_*5~a(@m( zv3nI0Y)?HZp0n{=$kXe_zOkOlI?t`Ao#eahUHfU}tTzwDf~Vz(?0sw-_~rO{PMLb{ z_TTL3>!JdGaW~n0(0hAUs9M+Yf_>)0X#xC<;mId9Wx4n1n;v^0Jh|Dk>#gOg%`QE{ zul6Lr6H8sbLUh5B9|su4e$+R8eH44&`otvjrbhNY1Iw+A?eAXHb=EtcoG0CuxHv~ko#;y3i_Q!!m z()D^Mfk7qA^=+)H@KXE|3Zw~kV z^#$FF`ZK-x_Ul~y!DJ*dIq%A6zp@`ka&8Fx5v=I7o?$2XRa|*S?i&9ct{u0%Vm4)e znkB&ef9dY1P1=!(H^Qn|YYpnJO+G1o=S}@D9q)jUqN*t;#JN7WPkS6B@S!(J!D8`M z?%mpMcR7{4&sSX!so^@dzJg<;VAP`%6N0AyUM^HW?NCG7wg>k*X5Y*_dFSB9%k7KK zbT~a>ku2N2q4=r6+Z)s5rhn2edD(Djs>^4AZF#CpoS98aG=jvO7301ph&t7;f6u8w+r}97fb0%b*gBs z=DM(@`{kch-?b~=pGjt1kvxxSVZA)h|NQtIZ_S$Bowp+bEQ{~F+ID?%tZBi)>CM{9 zCaqZi^OV&0*u=nP2V=~pE;;-0)Rjy1JMyZw)*niGb#R8`URD)R`#MQ{?0So zN59Q_7I(fR!sohed&z-xsxaFP+=~`LsI{Vf9Fy`z3-aU+6buC|X z%iBlZ=|<^hX>A4Ux?l8u-`(_;|8!Xecj7+X13SA_qYnhh|F1vVmh~m0zkADmYX!@I z;NMwuUL<64ow(9DutQhqFt}ugpChsc-wT zVr|`2%Q@^#d_|r-9-XpMEdm=fUKwjCF3H^&wq}uNpu;?sY4IgbPp&(%>7eKw%fHi3 z&I`#kw2WDKO85c$`}V)75$A2vg2l2=t=V{eNtw3s`L?xZ9<2=KZU3R&H&b(eSkJd# z4&ig(Hx+dAz5QeR+_|Aqc(460y9K;*&%cSeCwSUJG=Bk(XiXWv; z3A(@KhUqU$xzp#?9hhq?uly+djYO+;(k+&09xfrW-?o`O`L(VxbpQK5^Sjxno%<9u zXW5-3-|z?vg`ZdTT3^g~`$xlN`<09F+BqvPIDh_WWA<#d+jRDx?Q1L!7hazkY26W< zA9=AaH!<|L_!YiaCmI)Dwh~{ql6UpW_>j1+TPIF4xIEYq+@kU9-@A~TlMb*yl$^}* z@jAoxWtyMgWN6z*7S`x4$-dau<$(U1z9R`)U7EG->sQ=oH&n2AE#*@9@=F3+ z@(SLfqkMh!2m86~SBMzM7P(*2IQ8&!?9Qv9CH%)d`({|z?Cnqf86$Q{SohA?O&tf@ z`YsA&bRIWIII?SoEjNRBVN%?zsE}9c{D+m=nze5oop|Dj?#oww2`Ar1J^UybyY$qL z9LDL@PZHZhqQZ}Sdg$}yVzaG!PS){lChJXVCg0(+dnOs`q;|XRxQSZv<`?>TnW0L1 zwpDn(j4`y@XlHo5Y;NY0K;G3abk9pa+vz_=(S*}(`Z`Iz<5T}UpB4Hb>*bRqo0A>8fr)$2BKk;JQ`%Jt6zutIpQmk_UgEKj{*Pm@SyyqiUXhZNjDV zT}AWE7h1`Lw=%3^v97r>xyESoi7h)#jxLinUO%Jqwvdu+{0o)tNZo=!M@O|!JST;^ zcl=g;oB82Dt{v;qa`n~MyOxzTNyRo+uU-DX`1mQMqk9f*pXPC7f@1&s*qFe)gTGbf zlm2~>zBSqK=)8)CjZ9{oX?rHOi+wFNInCk!`1I~an=ds>&fjL*6n5j0v)i1&n&TB$ zclM{Xmhy&52*$)1hVM1F{N{D|qgsPAKUe8;{Fyef$CRznW806s(s>(Je_J*G`;|rS z*8STZ-lOE&!+7YUjL-dT_YzCIgMN9HOuyMFUU<&>VR5AR(gwxIn$?Bv5}6*`ZO+Tj z$-Z-`;`Ef4^1u4me7P)aIRB|izh!kq1^YA)zUSh1Ox~*{{;}`6Te;uW^?=a667FMC z>-UMioEfpLFMW$)(tSp6k6Y=k@iBr-XA8Bhl4q9P$SPE3u59_R>iM|?x?U|3)_0gc zM=^9B=1-{TVBCI$vw6`0UC-_7;?|iOoneZuODO6*(pD7tt*!Op!NNQnB}ZWujgKpp zdCpomR_n(x9d>f!Ds(?Bwqs&#b7^&iP1kSVJ|1H&Iol2QtwZkj`4%)sOS!2XXT5Zy zu*YSa(+$S#x|Y|5N0$k*GT1!2*4)IjP;1BJ{d)XwJ1np3GI#Dj{C3CnKZj=N=y|&> zK5DMLpW)sCQ3FBMbg@;bF~UW6bOXu+|H^G}$=xwRdnSZ)Ti2r9{*+yC0djSJM+!$VSSv&7?jdSnzGb}mi}^ShGPCb1)s{Etzm{#kqq~ z&Z6#b^{kS7uN5ty#}hxv@zS|VCyLicDa*UC`~A4Y7k~cA42c^PcFahTJ#P~yk*rqU zax_y%+-=6;N&EZV{Weyb-`*3cHnVVI$|se1$+kVmTL#A;4W#2{AVw^zMbSf`fOv3T=%bo&%{*&_z_ zUxlYho-|Khb7Y=`jZAojhVu{2sTO%@9!}fZmdYmYW(g@uJoX53pbjLr!b$( z=&_#4q!Veo*?Dd13+Ys+mV=^!dHSgjw6uQhFpo`%F00+17yB@(@=Wu_!|BJH?b&~e z+aB(iy;XkN!Z*#V73-GesKi|oYd(L%?~}=wf>6GVlKgA+J5uimh+R0%VYFX|^GuI_ z*Ojy%M!_-hkq@^E2)4iWiJi7(cf4!G9fuz~6>c$Y@E6hje|VAZI_A$6(i&zZDIZfV zPc%-bD$e=0n{B?ywGQ>8Esg5V{IL>#7x`3kSE-qQl-_bg@#7iEcbs?LK3KnF$`Sh~7edppu2g3Ged^osP_w5a_Xd9(2tBtSO zuKH-6+jsJKk72>1-t2yrqceZ-yndQ+)WgtHJE-#EmE--gn)mOQq@VkB?9`mSkKev~ z@a&Ol$aULg2a-Z(-J5*lqlly8`-bB}j%$DD>CE!c692N%TGal+wdS1*uU==8|I#6C zACP6gnBPo=^(MRM70<@7ljmiE4E%bk15Rph`4#!_#-&{zMf3XBdZ(_4-p3uB*ruZR zSdyi(ZCUc?%PSsD6UuBT%h;%t-X@UzxOc6|+XbmD7R+u{ElUpdv>Q8{SN)&uJzXnu ziRktRH;PkYFHZTvVZTFd`t>f;qs0~Cb8gSqw|mHZ_Sdnfq9e9Zua)#-Cv&oHiY^i` zOrPpslccxpaZ*ph>?4|*i) z|K+-}FJ4iyGtO(Jv3~w2z;W&I6Si;vE^Dv!GO11bcVZgfg%^%1S3T+TJQXH=E@l^B z<`;n}>o@Bj(^+l%{z&nJkOfNFYfl`vp7}WLp$Mb;i%H9W+G@OU zvtGOsn^qW1@ca1i=fBcxHYy*OLzpsp&iiq1&RzU?5ueGr#5I|Rn7#I_RY^4aa6Reb za^AMrlfJE45S3BQYQ`qLb<&QvvcEM%zMoN;)n~Bp@YaJBHy1zY`=WD@OZ5F2p&vZH zn-9Hvy&>s*Vd2+iZ_5uN`cj!cjYoGIwdf3`b?!0wz;<#Z~s!i-=Az~a!u^SR*(7K^rt$@N?2*=Ah-XZ_ggx2IdxzW8}|Ouc^Ue@{=|z2@hy_T-SA zcDcSsWVzwmM`!Kp`Z8t8dhJO|nb~_fp9t>!Gb{P=*6FYWps<{oBX=YQq1o;e|{;PE>E+Sa--+ z^nFrC+Z|K3-g{ZbZ>~N2>vtyDsw!8r<++yetkq^W=80}+=Xx-w#Gr~Z!0de1p1lsU zuJx82`C-U)zQmX5Hit?<|K#;ow#6+pyZ24!knGEwiXv>Cn|!BtWjm=w$oKwno87SK zB|}1);wha?<+&N}<`#OYN0fEkeVa4ofuvVz>;un<(=T{_KJesX$9DIhHB1(>gJ*wK zSe|`ut$EQdz0leTpI<~MJx>+3e7SSN=T831rg1Uyw`L=Qmr+4T* z=sBUk$J$JBQq=eR^X??STK%$}y<`4;)0;+mH%cZNK`Twos zw}0O~jFR5-?~8fXd@hY!(e>i{=72Sm&F^lScmHTy`TkiK@0~tUc<6$PMY+wX#bu9A zhE?874q4~#?-AK){&wT~rHS9K@*O?Y7B#Ux(LZA*%d4)O^L07b+P_+8d)41eeRaI= z(mP|_e(!r_x7W+Q_hC0t_cyJ`Fte(Au<}XTI_;Pn0`s>8`&{>${o{*}e_Ht;yRG(b z&bMBu%gK@W6s0hETfjWd%ILtNDv=#gK?{1_@}FPIyT0srTb>7-q_&jWKFTm-bBPulus@w(-5- zTXFt*9__}5HrG45{}N9slQ2&ZIk)YD(40@lWj(!@8g^ZgUu&2b`LfTg|4q&Qw6*p>t2U#l z-=*Y$Un?S)ye+K`oHbSa%_cW%b8pFt>X#ebU#*qpIlIfqY=xp7U&g^hd&6!7Y$Y0we4YxRQ{!T2hYg9oGCKtn`q|$Piti7)>Mc6u{DqOyXJnw(e~`SC6A;o zAGV!$tmEv*>YXblsY|9!SKcm@c_?`5uQN%J`-EQ#*RyWfnEa|@Z9z!4@Ct*j53@Ck zqmC}!)x1-iCr^TDp@?(c&P^89+hoq0+t`R?osm}$GM2XARrzd<&0)>_iaO`n56c(6 z`x3O&S2Q@DTTR?Tol{g48#`vlGnExqe%q@hHIHSM2YX=`~j_zD~KD`>@ODcSOYcf&c28pCDlCtl3D@Tan#a!ssuq0e}wWvzw+tu?D{ST%5E(ba-MVj_gwCYxqMf$E;d zUvSd2UtLSNiZPaRM#uR+9_?NC8gov6)|zqa__izkZ$5r0NeMIanfc>M#G2fb{w&AM z`pasP7S7045=}i9zCFUq{MYIY%UjQRGM#wyP}f1)dfA)nTu;qEwOsxBSlXKHP;s|y{PZP1T^!jLpSe4;#irg|?>u+T zymsy`$E3YZ4ZX4)pCTuEo)BK=wBW2NTZ-R;`3ra~#8$8g8JbPl{NAgdi9>Z=o}z%) z(Vxq2zn-C>R(&PAF?Pc}_8DgbwRn~Ym{&729XZUiyJz*kYc>Au8f8;jv#ws9uUUSR z$#be)eXr??`%f7ojjCU{wpMVze>;y;U&TDOVEv`*tgd3_oLSN{JBpP1RVV#f^X}{K zC9}R=Uw=C|hvTp+4ugeR)7YslWQO`o3;X`lAIa#J0b>+y87uxqXyU=eHNq z%YMBð!X^x)lprmO!BTzjQx?rO2lxci~Izt??TTzRA4)?)v^mv4@He*W_KSzFyw zx3`QZuJ-rO{p-PR{r30zd)}hvd)!N1|E_$bGyUPgBX|7zN?FgaYc5%98+uUU#s;;p z8wL5VR+SVd9GW(_Mf={m-dF3E?6N%-(VWQoRYUttN`m!|;9k3jGv?oL^t#gYW#%)P zuc^NU)K@M_-|lDj#y!fOeezcSKl9&Z9iOCnweer{(ddJ=9G&;8Zb>eF_wR0?28(Ce z_lQy_R?Zi~T#fPSS~^pYb7Xz~W)}P?TyKV1k;jDt-JeBTG>>(?e781amf?G=77gL@ z^RL*Goxk5qkURZ+Q-%-chKe&G`y;bn7)3Sc9`oEEk=>YlVRpvhk0KFb;Vt`Q?b<)3 zhTY#0ur@@w> zrwcz^q8?4?Sd{!w{niZj&(g9ywQCzr)jiaim3~~}z37$q(#m0P?=))4TGst37yZxA zeE0kLuU5U0-}U|7emk~>&f7CZ+wHPNWS7jDOC5E^Ydcovr!NUV_k`W{RrR5$7=>;g zf!+hFxA#b!ZH}4GHd94F^2`4e)lFaK*jt>~we)(51czQqkm}(OkJv=_TNcby7%jDp z5~R0h-Y+w`e4Q)$ac^$T?ZVx&Sl-&rT;n%4`oK5eP(#zohv7jk!mBP%^C|!0TttI<*Qr+fB8vQF`m6bNX=AN&7sKDZx(E`T# z`c28-WLNEx>OZO?ymYqnXL&%CgxcCHP z97|ftiDXB833X>X`%ijBfqQR1TO}CfxcC04TWk)e47bTWm{xlCXTe~j?bjvo~q!Wc>xc3m)_|~n`)4CYX9Mw^6ptOr`2`7UQN}Waj|ae9KF}mF5l~S z{cL!#{54m&>wVsHg{U3c4CKy)O-P^a&cG4#H|7OuOsZHFFm%vk-L1a&Y`j$YVwPY&FgoAoO;*!1`p=hFDL&@WV&>s@JM~dB$MC2s$3gXVJ%6eW-<0@y+(^N! z;b`B3ZvIz?_s83m6qmK6R&2W3epz<=#douI=*;|}vFGdV#OJ#|AAjfO*!u6to^X$} z1=M3^DuDSZ6qf0BD%iOM3%5_(~hS`p$XGa3Lix*Z$-Z-5kr*ZbB4zKT1EuLh* zdCnKxp6Bg~-{=^1E$vUN*QeHr3*4tqUoYpqYgr}V*89A-!|%BUPr4j_&-HYb%bqyf z$;SQnlOxM~OI#o9xi0bRkVI6mdz9ES(+9`wv@V|c)AQk9B1isLsi|Ri|IRf3UBGLY5zRS|BC#RXJe&4FXw&v%b8=^-O{gd5I{$Fa+aZZ2zPW^cC6Pufy z>!*Dcm3I3k@?_3oyPa}pH9y=7&@tcgFDfCp_&?X2#ZO`$h8{jS)%?(hCp%0n%h|+M zvnL;awtDZOmCNkz-r`X)i7OXc_9So4voAAOIbFCc^Ibsp-&4^!55#1*ggoq<6}0#K z*F!V@#bvWiZip%#Vs7UbPdK_HWrz00rggH>%a^<7TmR`!Rlkh7nfbMH=N zTB^O=+~SRw8|Xz$vsvWBIk85pI&qnUl->X8 zX>-~>^oCe8S6!JPQQNxZue8|5idNMvn!on5#cgGmQ=(E0DU4yTitM7&F%WibKyQpJQ zLZ8AHYfi3(`5jO19TrrSveRc4;+Xa@bme`WtH(An%>E$I$R_kf{NAPr4&R7rA7nXJ zJYH9G{e#8b8MhuuEO?YAw@Wu+-+{sv?lF~}3Tq|{?GVlDRB3u&@Oq*8*>k&v;?H@U zexCaB&CYk{yH@ocRQW%U zF6Zh=E-YO8JD{#KTkGxW8uBRJyS9x9U`3i?$0=ym@q&4XvSl&(^H#HUEcKW_Nhl) z&ce*z2L0L{RnE^tCOu2uaPldW>VpV1{)E3*1M2q#t@ktzN_JiQM6$$tR}9}dh17s^ zT|Bpr<=)yZd-luLL)R*jrSF&BIj81ZUT^GK-gBWjZ{m`NeQwWpY;cO+Q1;nfjkAA6 z*7h^!W^FY}X8qe=xQX>$*79RJ7f+38JhZZRZ^?B>R>N)08=3!l_dOM!X1DX$AG;gM zPBL@2Zgyn{|NMAimYsM9Q;fI7;&bI^S19+sJI1T%ELg@O*cb4KFS6?4U7Kx3IrBe0 zHSVmt!6no3AwWa#s>iCVW7*|FJD(b_xzhZy({vqc-At!7zRasr40~oubGw*p?PaHD9p2Cy{h9Bl z*U4!dJzr;VKFdCuQI=(9lq8<>OLvQ~*EYlFTRw;eD4CyovR@}iGG8-%=Yu0oaYrLg zSQ~0DeDmVfwi#QU!z$KIFWWxr^d`&m#T<_wY%0lbdn|J2xjUy@VO1Z^-s!FPkv#PBBwOcjI$M)1r$=sxh*5#XO7bi3rb0}$- z2kgH5iPL*;t9$IhNBgCM%6B|nF*o^Qq`Yd-!m^-FmjAnqr~WU#RCIX4zaMNBDg7FE z47!)9hrPQIYS3&eWBx2S|J$J{ddCZvoKC$sYyJwJ#Z%6Cs{~G~J)NiNqGo<$$CJZl zN2dC}T;pC8GwqD}d6C(V?R9o~2QS*E^J$4*!pct`#k%!7YCQMEE!X4UO-S6#^$OF1jI6~=BbjfO zUwz3D&^mWllUjrI#*&k~(_$BzOzS-AUHPfku%gf%T&=k}pSg4>R=;~f->XO7S8n*6 zdU954cJ;5z`7_Mjy*Zl<_T^mr_WySHf&BVIpLXi#Og_&)OYv*Z6z?9x73ozWo3FA7 z`uNKo+jj2fp-VIM`0aFJT5M{Lgw$jimcN;Eg1zi+~GbU(;u6~rBp|jJxYH2 zi~qFWpZb^U%ATAkl6mo3#LAJK^WXUm&t?c`XC|+mwD)?vijc}jFXiP|JF6bBGYEIO z3bnIdp7rRJ`sPZfjXtO59{K5~yEABxLjuF{nybBWsbN+Cg-TD1Wn2Mbz&oOV!?LVbkUj)sWG}&D_vVWfZ$6eE8Wlv1})}4Bs z`;w2-o(pEz=N5WxF3Wtr;*omv)%0z1-lm++pZ!eOnPo?Nv_o*)-YTsl4BtNR%(Ct4`bKEB(8w;>@nE+n+8oebr~P{I{ui-;ZZs51*FvT)WKJX8C;+ zj@!kI#+vh*=LRU~H#+nGHtK(PNk2QE<=tdC$s*y3>J4XCF8z9(y>wGy+FFMPhvuu^ z)LwIxb&VVMrl`W~N_i=R@S6hn^Y4ASKegz|mv>PsmpraCT3uv*aaHUgRkyiE?y`D( z63(ps{p5;)hnCp<#A~zoV^VjuSFB>6zNYmH_t&&&uFZGSzBwnJvWN}KpU5WfHaT;< zUl4!VjHue04RaK&T&xf6y8UH}`?Ei#VQbHa>e+`~Vc4yBOrpZ!+3l5+dE>(L*8QwX zsw_ztjXZKxI&0lcbK5DMYzvOdoYcHJLDSIL=jo}Rf3(`;9I_5fnseZCpOm`j{D%{A z6yGVl;o{ZVb8vNzhGfL|KhPdFWo1e{^0ZF=%(W) z={wh)Q=IyA!rras+YZmIlZuo7KKZWDyc(vii--PQS#-_e<^EfClUQHIXRW^_`S1JB z@B1%5ueUSOW0{v3d^qp!F8@`@+xOW0`}JeC-!G#tclQ6t?Pj}WdMZB4dEtwv(S{Fu z)?awG?&(so+L={5+fHuXk=W=q%PoMv&vlKfMpzQ-na%()uERPBVp}u1-f}luh2EJW zs4RCadEL^*;IA4FWsFb;T0vKL2{isycbC{fC|h#_O(}wwQMP z@TTxxaqp+)8CFR0uK8)OLQCW6TZh|4+r2Wx|0h^}ykY&13_A9wN84l4`Q7dF3amvIJMG+WO&OR`SfVhhHC*nYUr%c89~8lZ=&e;)HKCiu3O@xN7k&;f&nA z7t7e*bIJa?yluw6y_^VEzIe4NXPN12Wz#FC)eh^Liaalz(x$XBFe72| zo%I(O@~kyJH^yejaJRCBy?M*U`)2>5a~G7?#jN*hkcbWsXSn|Bf@Ido+E)Fx*zfBM zwnR@|VRGftvprtSKVJ1T$E3#ics72udH+8_)8^p836g@J9cQV&=xI1E9GK41{gP+N zwrQ)43!eYGASop}`_{IgfSkq4xH($_7oBsMbGd83vz*I!%lvyYBF-#v&tUkjV8T?k zP*CS?xB65ClL^262}o^NqF{1vWlV-f-deYX4^QqA-ESD3R-t0gXehIkL1MhVC-!YJYS ziDX50rey~va`*pooMf@|dUN2Md&$$vGz$_}ckh3*Om*#X@l2LUF~6EFHLF}T`sTqg zDMsM%>q{vI{H9!VN;Y-wCc#&>s=u$ z#ZDIO8MiINN3%oqG zQs_o~`Klx9qW3mwonJXeOZ0oFQs}&ryN~vZ?c4exsZN3~_EqrYKMPKq{uh}aG*>V2 zB)?bnXQN$L*59hS@U%&)L)mZ3o2l!r?|vH4A2mfrPVB^a_E@&lcUS*V_>yPIcr*I1 z0n4tK*EV`b9{+X@vO0TNBd}0!lQ&mD+Fn(5XI{MQ5W{eU=MPIMeyEaMiX&Zl-$0{$@8n zd~xjHisntuHCu2vqs}9FZFjh>+}pS-)4p7IzSHi0aH8_fo38WQ{{2lmWTc-TEB3Nz z(s_vw1zQ_z9qoMI=vP(h7|fcZYjf}JQVSVT{fE^I6J76o@_V^WsrlXb3z zl%`NytVz2^9-xXgK0k&alKQZ?hTq88bNmv-*Yj@6VTe!MLpUhr5%TxW+` z_z88M_d9R=TzM{LaYdEa=NqPSYdBKRdc1ComfZJt+ldF;uHIyS%wG^4BDwi|tjFQf z<7;}3Dw!wk>AlGO?R&t}kFGHXKW%?}_vf>anyJ-X31(GuK6OUVez#GVnWtNHTKoFT z%Fo|D)P6Uy%fDo1=%!7tMb|I-d+v1Iwc-m4ee{ogLLcve~!SFV&B#dh~gbPs<$5e+v5FqSn2QSW_|kd~fH^ zH>V{_uNQsZ7$|1H;@-DnzJR6IUcK9(oBTt3^E`t)tb!Uhqj!8-9b3Vc9*}V&x_BP< zZ-rt{&zcE)%uIUbf85uj|JGFL>W`mZ4|6+%B8>kp|9XCPi>u2@%l2b^{zX~y!#NKt z`DHCTASy2JHPN;;`g;)PZM~z`EL%F??&7SoGno2e>kOf7s>}Pgw(d|-o9K1Jud>x( z-Nu+xrMDeT#Kr4xx_VDIR`xOMFjr*q%SU<_mFJ5wDe~C-VRYbd_fh<_fumXT*8A7_ z(+(BO^n7+XQ>WdtWd5wc-T#e0?w1yrM?aixx0Pp7@u;*yq+j4w&#-h zlkb;H=l{@>I=truwb?%h>BUAQXytFsr$ZzYE^=}{S5B@ew_569= z>i07>svFrQr>*+_?3viFtutD<`yb2ZpY1kRbu50w_|T)M<>+ah)ODZFzHS#c(ckxK z9rKFH#7ON|7cy>Y$F46w9kyfJe>twy_>{9hKkS;eJN#qYpFGQtH=_R<#GKW>6zXhY zY2vnGet4tUvJKZOe|sJ9dw4Ku@tMd2u5WHK@o(OF{FnXR&`BzueTUzD?y5LABYXP2 z$!WE#{{7$T$+YCf%*f>i1}fr5c`rz<@!%|p4Pw=s-Tv@eRl?nkDK2NPcOB(?9Dk$c z_0{wuc9+!^3uo=l+cs06d71UY&Yy+6vFe-a8gv#EU+R;XJ2A>8DX=c-Lf2%w=hcr* z{Sw|BaII}+KeYeDxnt8q=l!@i@#WVWt6g*#2ghExd{p$X?ecTC=9aIXYZV^a^1!Tm z*XyINKW6NBn)7BwvAd9N)SRHdA9v@n-6@&+;G|}2q{hX9wC6qXlV(i|JMlLASA!W# zUyh2FWzTu_T4v6ixpwD1AF_M6ercj(zUrZD^#DzIKeLs0eebTm9xN`u4q@FQ<5W z@I=K4C9g=aj!gcde5OFRKF2pTF*vz{HF-*_cEuGrDd&fknLM^>f%9f9UX(7Mp>bJ) zGdQ`0Rm#~upn2OFMm|w5p3+H^uZlE1NZ)a7itv*t>+tyx0*}A07oD;(e#2hQ^@m5)W59W`~U2v2kr@PKlLm$xN@ncq>%k%mGX+-6vLwnXUw`K z(*7XKV!=X-BbWAmWee-MYqw5g7uN#;iHQ1Vf8(9_w>>XgJ^zGk(bcp`GPBNh{Y;sp zoaoh;GINc*_}i%y>Vpek%siZ#qcVSm#g)`DGgWsL?N@e@7t&Tn)=4;(cufDwrnrdT z`g`gttKxIlJQLj<{6-+(F6sNh+SxV=hNe0z7qeb9c~@c+ z{k%^>`P*-2x$V2AE33uZR$pAX)2e#gO|CDS0$1Esn!$8zibVA{1tPZM;t#&?l%ZtoW;4c;Fme~)2TU9_j%*Aytp@fIjcS;rgL`1Hp3OW zj8^bj#ilMd7fa~8m%nXug4cv@6N_|fmo2wmzpoQmbL@|K&+$#%)AgtG?cJ!9cIHJ- z`uABy-pAEHG6pt>t*dJhxiBxTCGgJOuq|w@JK1Y=I3J&DKiVeRT5`*v(j;q%<_Z(u z*UV`LJtiFpw`gPx%-N$YcR0Auu8no2=9I{*6lRZ+-lT;OwM1G()`$x=^woE&eVrR`eb>2XFAq*YI@sxhm=3u za=WYB+{5P{NcobKV{`lC+%U`JZyJ|hMwF+>MarCEy%qBOdE&vJ51!ri`~1F7_G;q( z*>b)eZ`wD{{B?HU+01h~+f4Qr*VN29t^2HI?Tx8>4t+m#=)Tsy8D(`vg=srfK2Pj4 zUu<#Q?b61Ji>rG%Zk}yzy{sO;dd{*e{=MIOiZE_m|# z@TZ&uQ$9rHg`^60sqYmEx*V|Fwcv2gVR@KG8|3ux%`dYC+U1n-@xm{&z9@bj_1_7C$4(b>M--uG4g$#MY~s<-7`Y-fCBYkG>``9$T*4S`t#ELD6W zNl9@RJiTgvKGs^cKjK0}`O#HRg`?s=6xOv)yZkZDzD8e+msVH&o!$D%ZFBK6bMBC=6_v5Z7B?3>`}*bB^1f3nU)L$wEqiuV zJZV+sd84Cy*cLpl;{B+*+R|l@RQKfn{QKreX)j2yyt*gCj5%XgsD6}p&-0#@&n7Q@ zJXvqA&)MUG3!fckUsb7l`gp2r%^J?+c5nGLH$uLKe3sgJNc?chgemWw&T22)Wp1j! zBRG-geC5Kdg)_vt+oX@~Nt{~neEh5i~WF1%zHWgK;)r5P77e4*Mth<`^ZfUrV(03KPbd@MEwF#L|&qwn< zOgiUyTC#cCX4hKtH%rz$P<-ArR^PW?3vTu1z$yq*KZc5I%jccb) zIxGI@Tg8?=AE!>%WiYk4e#lr)Rr}rQXZzJ9w;TTct>U%qkFn$_n-%T9lTKBXt=HII zA{G$qc=9{P@+YsEHEzb-vE{hFZbS5^c(wG*j(RDJIYJw7SDq`z+G2c~u63U^x> zQ`HOJx|FYaeXRSP%W>P8?^OIY$6DRixxB!-miNn_{q4NBx7Osnny~6t_9JW0XOn-v zOM1RLd*+(?ySyIl7XEzor=MT$x*cwxPI3CPe60L9H~rPMzgs8VTNJwQal-CpGAqNm zdp%EkCvQ{QSz#Jmt#V9#zFxKg^WxV>jH36(s#o;hE@djOEu9;6ZeQ&3<7Us-{5|w$ z*Mzs01m+RXcx?o*CH{z66 ztoo0Kzpw1lODv1sw&3`e)hScrb$IJouB|&Q5xaa^W!`PoJ@+_zr|Vp+ob`B?m4E)d z=yx_7&rFPR|Db1T<=y=A$vI(X%k}@G$Co&B~KTkf88w%B(EQD-X3yuS#n1PoDKkXYb-GJu<;rSr&3# z$D0eTz7%-ve*foxSIv7f{-1o+dhN<=L+NEJ*C?&CIyEE8IMT}dgq_1$N%xj(Jn}0{ zuex4Y!0Ea7kj{J+Q`6Jhu5_G%GZUEQ+wMTLxW`J0@6{i5(YE|TjCMgN|8&~fUUvH#@C$tKSqwOo1GGIjp3-BZ?D zUwW;^k#{ZNEYI~%uG|aLcyBM=uvLR|m)yP^z1ds(B&X(;iCs!dU+KSQ_pzSP`+~FY zdOR&umpgmYd0#{Jlor965p%EcS;bx0c&3&6RA%d$br-_y+28;8WUSr3^xL_F$?v6= zYs5|TJI-HlUsCQC{rYxKncOqUi|G|BxaR9wHr51ay?=ftz&mE6$eylk>z7SmBb@G% zzuxBWa{q{&!v;=$t2TV$k^7bq^!>12^#(8H1+Q1|eE9n!?tH79_gaphvnB|AN^wa( z7~=1te(Crz$F)aI?tc(X4!{0<^J`-!>t9S2Kg-#F?g?7Ytv;i#J-odBSYG0^dgE=4 z*8~)X?RddEG4~QV|8C{@Q>umuo6P30 zs&U@5mf0ARmnGZxBBobPygF8i45lO0kES57OrFv)nu^VJs~ zvUC@=y=t73X0RsyT;7C6jcF(AE=Gx5+->681Nf zBbyh`3SDIe6pDzoFa$cx#?6F%RZIpJQT$Ayd&?ou!9Fraod06*R0jj7h5Ab@44~l8m7K1 z?Rt0R+HIDz_tYZRY`-Y_X`#%UfR9->Z?E8gdu2_Q-TEhYdrqDEnUVKp_NTu8^0T%J zt#H3E@0nY$FuRJ+hd&FhdYzx}wdd|x&%Ar5c3j>cdE?ZJrxT{GOP#WO=S9OGBHzq* zm7kS=pL@l8+D^9c;>sxL{R!L5etn%Hef{i{j_K-c8>{~O-(oa%`}}$5+;nzM?Jqa` zCbw$&^A$I5vUne!6wxrZH~-<>-ron#xy9aTfA=uCy!GSP5SxGVt(#Xq*cYs{f)FAB<-HOKE7oA{(l=C=eouua&WJ`c<0mCh;v@$*UG#1d))oE!Cd#IpXoW!Ai&G} zy%?_TSlZin%3R=e>~vf;fY*4j!oiME*yK> zy5RZh1KbCb9@Ov(~@ZkDa`+j9RPG}AI znOKk^a66CR#N*0SsRfQDvOk>~GxD4>1P-4oJn%`xW`(w4^9_Y*_pTjfyV!hdgJMRK z^9BjC7hE|nj8am=9dZKH!}i@+;P>rK!~*$)KM$}OD*XBL-|X5^Hrtk~N@gpb1~see z2Q|wn=})+_Kw08_3rqPgb8g`cXPl&~be-pU_1;(zzC+pU#gfar%6=FznXOP)cF*~s zt!DP(y8dw{+tnsaW*v!BKm4C0WGyTG<;m@4-Xu*vGtuo=e;;jI(8+u7(gqbV1+yPw zeZ23OH#)}VOy_!YcHIfyU!8mHl~3)vu^|0g*#S1&%X9S2UM##`wb8NkrJ(e+1RiU% z6|Ma@HaM=|6rc4&tjmoz`?Ty=b(>bVZyXOb_Xy3b)BGH-+xN!h+=Gs_Cv5U-y5{XX z@A+xYh3O6xr#>+KBAM_0T%@=xrcx>0P$|K#|+H$x*U zxDu`k%$?0qusFCQ=g1F{q-aH(uL7@y=NUb0tor`b{B)=5&bi{Rjut)o=d!%#Imvf4TLz*JLGMnD@h`yyj7`-F)93)&(->W+*xw4W1{be|WO;`u|JVk1UVyySTMI zgForc51v^cC3SeclNgUJ&wu#wrJaG@SKnm~Z@*>fKYKhoT<&~_;K4ZmUdEFgQ=8}M zy1X!(wOdfjD#2zFThwmpg|`>W2x?uIJoqo#BCBKDof)h7w##`xxi)R}(Q{9)O>12; zb8$d#v|j!Cx5xjbP7XR8s=0mDIrWXRwRDqK=N@A0TD$D$H<9SYY}?|x6Ibh6G6Z|s zKReKD)-B}rTo6P+ez)WOhKr3dW7bVS!(mOcewEu z)atONYp!1RvmR8Qe*c!$93IiJ`SqEGdFzcTdc|rNl^yPF-@Wj=0~6z(S2vfO+;VyO z+_=Qs7r6K?2Z|ncKlkx{aZ&m=rPocdZ~qCs2)lXp%bqte-Bi zCfjrxMcKbFGd6EpE6BAtip`P5{8r`T6+MBAjoi9_?Spyb=%`7bv=R_gxr@}y}`;s5Em z5kIxw*SnT%RS(!S-R<)3%D%p;EuWY4E&a$l_07_cd4*n&zcMbp7_(ZLV*cYFOxlfs$2c?TzLoo}Wv`&{kL zYm$fV99&ejZpWd5O`gfcZvJmvi?$1{eYB6YS>D#--;1f=)X&}5E@m&=w6y40%Ihe$ zvKzhmx8_Z#b1mqCOCt!6ae;%Vy3z0<{| zlz#u%c$n+5)Aer-Zd2}UeB3r^Z{ABiYo~3uc;jtn2(C}PIcd`&jkbtn^ecETUfjkMAu}=BUt1>t5J>6zeH#R(tEleIra-T(C) z3oR~x|G{!=>TT~Q@rz^k`YsDwe0PE8?t?}@>Wb0?L|+{F@40)|%Q^DPW6Qg?thQTR zCRFx!)4SdK#Wv(}Op|A8kL}!ar(HbqNNn!s#~ZYFo$ubh>i^>1cQ&SYPE=U+T`P;V zl8K}4wM3zx_xjers{gNMG+WO|-G7a1^=yX^#-BglE6JWe`)?iVL_x+q?D^N9)$L?{ zpPl&c`IA@^TlO_Os%OtDTfgDZy1%#NH*T3-`bPM1;&rtLFH4uk&Q7rYSXS#e`{JLi zc00eH`k()9iuT)ETxX&my_LW6r2W^;{U6v%)T?Z?s=UUY~IM{8{y%$amzijO^)*}TH<{P>-M{~3>zxR_din1+ z54*_!+AccXeqw3v%hmFC=9VtpV|=ONWp>VYadZ2Hj#rN72j8=fyVlsrk@@SX>Hnry$9_>;x8rxx*)*&C%l8)@nW-^<`@h*j?%bLC(*g^^tDhcU zsPkCW@p#;N*XEULB1&Rzi59+W<9HBwB6io!%O~~w4NtyiF3;51InjG@tj(Dj-iv=; zJEoU=cuMxA>??)7vu@>Ga=)pTYui^6dyB0`YxfpkqshLHjnlNQw_MEg&5=4a?~7{L ziaxnBwd}u5raWA%H$U%L%logHS-br=Z;F*%Y;%6UR_gi3Th1=uxwp1T^W`s-t-H5v z^PjwFUC-9nJM41f?^*vgnc`#D{p|O&k|Ll@n*QKg$dl&zII`#f>=w)0*u|H)?>p3T0xjqB;N%YU1n z?cTLU>TRyxyQ|r<#?@adpPWmsT=v)csC?|7RbM_XRoTBh@7l2ny@Ji#F4q1#y(YIz zPG?%=?HC)&U6J!^%QkNl{ScL+YjJIPnNju`ldqNk`@gPze4}*s@i}+b%~ti@^tx2* zo%7k;?b$*1?mm5Y;O#G-!Z*Lp9Q=E0nZ@PO$E79ezqi&d`CTkv_TyuAv{_Mhbo%!9 zPp_3#AKO!wn|pqK-t`^Dzhmvna=Yd~Nxi;pw*S7ezop94W6QhKe|Mga@V#?s-iM3x zep}gz=B|I8vvSu_o~lo~j-ER8KQDiheEIsCZ%$4Ush>0R5_syHKYqJc7R&v1f5B0q z_gRy5*9h9|$cv6BzVZB}?C#UA#DzE$>zm>&vfsz6yf^MRe)xNLY+U!1cfJ3&PRk9@ z+;yw6|K?efmA3akci(yGytaMs2Ttj~djVy2 zH$FJK{&ZCQ8N>ItP4D?xZ@InCxs>bU4#6L6y%SSg*yrtByxKJ+d;89OZ_m(M|Jo*P z+AnN-#qITi*@Ds`^Y?}co9E?Uh_3niYF^|=>zng6-$w1~kN$BjihuKuwX)UA?s_-o zYM4#-vdikem|uDN^mDtc*K>CX96sH9m$__1N|mI~NzKbT0SA9{&)mH&TlQafK-IeL z6U#Gh?f1Am`IyeX?k9c|FWIRV@0$F>@>6u=qa^?DM~(idi0$8Y)_+wz-)B$xho$+s zzr|NptI1rNlX;B)SKag$6HDOZu7fuQ{Nq{LuZ)dwDJ<#_r<3_@~#Tdz8M|J+YW1s-|s%2Z}9Ea&GV6Of3y3anV8pBdA9z4P2Im=$_qDCU(Xg~y%{)5cj{8U zHR!J%TP5yvPHoVC z%w@>BTJgRdm*M*S52-PV$9RH%7q&_)`LCEQ!DU$cR>63kK=T>vQk`(U%W`+JW)^E4 znNiERiB;*-^S50)oOt54x|i9CB)yqB=`L66j92TQq{b*NtK{0E{>2(cQfgMN@z*#a(js!RGoYjL`s5Qm+D8;l?XjAsePqGEDXC?R9NtSo z1~XMoo6GUkh*|%f_TLsKo|+Bb_6r3j2lksL#wZ?h+Vdtu~KZOd1pm7(a39cF^X)itLHrp&@+B}ar#ClMYef&Qc9f^)eav|T@%pZsCT(pkjpSE z@RU}&6Hm|1lYhBeC8oq#&D9lXtP1ci(r7=~|J2^eN#W2ZZ{Z`NNnA~?LdQgtCTzT? z*rRtfWDeNSlGaT&gx zy!woVNYaFZ?QcRfjx1oSDA5V;a16RIS%%Ayck1FdX&Og*`tx>hyPWaAR4j8Um8+=9 z=NPNfhw1Yk1$3NT5uTdsq{wEu@I+mk6Hk%THwbvt_spWxW;KO+=C&wDh05 zDVj7vc-EQ(jp>zZk4@?2Xq6Dr^Sovtk~Bdz?(K2WqyT5HNtRrOCxk!&%NCjRB4VAu z<&9Fe`n8Yr_-k&8UnpQ4Zh5>%d%EMJ{7L$KPCoy5Y|kzfXkM~leUZiy1uY)1A-u0D z`C27XSZ&WQ6lh+v;JKwp(ge{jHtj_-(^6OWh;kWzaP~apuDGmb-kQHVoOm`lT?Iv4 z6HhXeGQx2!9D7T9re#q1~VTAX|?S{bt_2}tbP zqq9(e+5gIQOOd2o;d3iRl74|nH7)JPgCI@+j}(FUMu*A^OX#-O1x-uKJNY<0{mJzh zOo7Ykgra}7Ec*x?wLv1#!_f#y91r8*!-Uwsy+ z*BoQ7k}A_G@r1Q4A2P`HQu{1(vR7*~<1?*uXgl=Vy2w1MJ;=ZYjKAt?m! z0l9hQ2@$LL0Uamjt9U-qIHC~3BdINtG(qc&O}mrN(X10vZ6LSqd$3TTIb>q$eP>0s z|EodT4#r0YeFpje!e<#SL)NcLL4}HfG04ax3dSa&^fy6r-?PVDhL1n1+`Jsn;h1*e zy5*G93Y(Sx8w+z8{>VNR*W%>kHdnD)kjv16cl|d|fbmXR)9>W-ca>Ma6VIZf7wTdZ z(`rJOx?7&9UvPH)t}hzfmp7JNT(Uf%!*Q3yrsRbJlkII!u5ngmd$}mXew{#b$-?y& z8b=gjeRi%~DA4>wLG!Q15d}+=n^yz$nse^2GFT`ud0*DK#R8MB|DRFVIzwD^Sxq=d zMaDMH)){SF!M_VzXZ*YPw6L+`5iTwYMpUUG%`4UC+8Zn%^%< z{por{Q*-wxCc{c z&dg6wlleBurc^!QEA=>Xa(+~?VBrMOH#TuDbGZGplGOy+BNJ~`P3pKjnU$HzaDs^5 zd({q$6P)`ddu|J!D6BJEU+G-usY|~U1=%eRZu+3~NMuc+xq63%sqEQ#-7a(5P8O(l zSjb+Tx>l^y;)GD0(&P@~;IG0nQ>=L-m7?uc9?e-{mwQI#k%IRP6LtY+&qLphIxRee z=I1qaTn@6_J73|Ef>%UTT#BXoy@sBjyZGO<3I8s0%Tm=ZQonJ(U%l_{#M(c93jh51 zX?}g;hrAckr3_i-rA-~h$7OA1S~zZ-{9bt9{6`Zyn*ZLZ4pZ;2IPvW9CBw-%%N1JB zta+>`$iDnl;fuW$Y4lBnAMfU$@3Sbp7g|$&g;R;|Q^$I{PK&=MpTA-ed@h%0u70Ad;F0XNn(mHf zkD#^kLWQ3upTEkf#AkFe@w}fB-?#LQmMVhmGnZ7^J08jOcMAsvkK~o(GA?sEcb$1J znqqxp!OgONN{=3JY-%R_9;Mif+NI@q zy<&k3`eTx6DT-agu$qps|GLod!{ zj_}pa-We`)=A7CvRY`F90;`Xp?CN>2+^Ew+m-qfjl}9~KxaAyp{(P$S*)+FlPC_%M z0$Wnk`y`>lqE-94J&!p0X>6OP@<>75B-&r7aDs5#S;I~X+2F+4Q(Rt(SfmpQ_l6N^2R_%zX=@?YF*Ay8ZI_a&fn6I@>V>Wu4=m-DTP1q;=*v}Zd`daJOuUPh?!T#1=9f2YL>o_(`Dk7%A$ z&SEgsJJWhrq0>Ti>Qr0HP74pwIp##F+ui|i)Mae zGBjGYXcj1U{8{cNP`J)tbytVQ-PJx!hHP10?^Qc2J_o1jZJPVp!FQ!~x?tf1i8nEE zE;1@?r{8yXG#@Fbuy;J-m~`Us9EC>;h9RIxtFn446XPPI(gq4)J|X9ibxk?!EBD=s z1Era%&r|&b3MXjoy4&p{vxLify13x-Mc=;EHFaDzklqH$0iid(aVi}9ab3y0|p;g-9d2?On zG+Ke3YjpJKUzVGGuFF1roX|1(a;9gBV4;9k8^pEu&#OENIn#Dl5ge*blRKJ2Cg$Gt zJR-T`@Sgb!w;j{YPn#t!$liJIyK$!l>(`}c!4Wh4yReH)O53x)EQ0Ja9~#e7c+^ue zXWKHBM-QgYKc{lrG0pv7c)N>COIv2PqmrN7+(eMuf)0byIQzpYiF_#8Z4Z&S6DhxpklB|-L=NjJJCc1#Yo&%L7ZNFi1PlnXq>>$)a) zG?y5@^;H#QKY1|dm(n8zOOxo(NpBTyZ_ncEw0OS!S&Yk^9nXP!Ig$Lif zT#qA}D-1v>{mYZf!VWzXSEX|b6;6<;DT>?B!+mmJ^twowImW)Xt-Cvd4TLX)qCWb@ z?X4XaC&U)d6n2@@w(`SA7D4v=M-PKao<^xF??qi?Qo3J#=h`G2!m#=EEPW-uecjWZ ziVH4Z^5zuxkri?ILLC=BOxeb#^61Nzzjpcp%$*CX^g#)0Ls#O&w-5GT7E^4HuuKJ2 z+J26$Pw%n_KKJ^%NpNyUaPVeO?XIBjGdoGBaDwwI+?Y)6Z4F@xa*l^XrY9nC5qU#fLj=uW--n^TEzQOnY& zuG5Mi@t&BmzUI2Ehhx3&q1EqLe*gY>WTW+_{`vNO^X>mX+r@p=S-W!L?_I*rQ;%L( zNjCd!c){`bue-a8|NMDAfB)at+dtbaFj&x|y7N?R`J5hR^<)N~4R=0@-c8!%FS7lA z-8#z+HRd~y7jHM-_UUfkjkI#<)Tfu{J^%6ZYfRzU-&{3a)%87H7De0Nzr0X(e$OM- z7t)h|efhBE-SlUYj`RJ0>q*t^U3?^Q^2QmJckE8>|7NoB_Jtz>VXv>$`K#i$BSoA3962{xj1gsn2bG&;Qgf`68da{oz~7Mc2(9 z+gY-mDm#1c81qZfrp8T2l-H%f9*Mh+p?{T~B4f{R! zcd?)0hE>kh2X4ufuDw@%^vqw`!#!X3BpDU1zk6)z+T(Q!E6?{i^8cMXbJFR{a$EOX z>&P)*pC+|CfUR_Y=zBKH`C;3x-nu>SLEY>fZ|{dct@n&6+3)`&BDQwzi+HzZo439* zdN+6OZXWB?wOjVQ?J9pF=Uv-$)VTiq=4)5(znuLy@6nQVxm(|J->Qnt=m|_={O4W1 zbqVjJMF;-QS>$&iUd!&h@$ASyrT^bD2reiK*H`qt!q61p9=|ej_qXGJysge}sBH|A z$$FAKJ=WHsuEBk^=h3U@AFr(AZwb-4=HziZ=gUT{+kV4VD6XJ4Xrt0P#dGnO6F+8a^grnT%J}JF!>YXny{3YRw|5w>aC@^+UGe?2 zElaP4+OTKde@rG7h0pm-e*0|6}dX4``Y4AzK_he zVjP~dKdqg2Ct{D_&YvvJOSk;f-hBGv~2Jg&|LKPdPTyxFj_s$hx zelqBn%8xW#l_h1yjYSz=w%vvsolZ_KKA7p1Tg!9TWa&J^X6^0kXJpIG^RlkgvOO6* z{rJU>8IB>_va469oD)q+etu7Nr-t6N5K(jfbxH;&LtEZG(rTI=vY`Cj;@=&i-IP!+qfL%@?4a}sv79pE4%2DI$LX znNhKM&Amfqo4U52lX|uKdvyD}=W91lIXw08{}0y|`o(s+JdI9|kU#YCvqe-pkB-Fq z`VSgjs~qar?fC!2z@YWvv3&3N+52lZh2*Ax-r@0j)dN9SHMhu(mzMXgwAVSj)2V&_ zK2sZq_wHNQW?SjKp0?C=Q?i2o_VoQewkPIT_CJg?D*B~$s`T(1`8OA%&&1nr;p)3o z^lw$9MO`_+u=x+2ogZZn-&n(#X!5NkHi|>}vZ0vVE{~p$(*JuIW^P?Li%s*owUYOJ zGpDIt%KuLuUJ^WCww>?8!R+gf{o2yn<}d%O3=v6qdxh8FqSdN!-+im@?zfP-wE9LM z>$=Xv{fY-(S(}Ca-9As$yP!kQ<9~ZYY3q^fjt@U&E){){t>W6TA^RG;P1J1edW9yY z3+LIQY-_xZaZY%t*ZTELQR#(*;H;~aYcD(r5h+Q_Um%su+hcb*>{TZBp;X^%+Nyhf z4fZw!+D)CXGO9|Wb=UvK@Ok%++;GdyKC!?2p>AtL>Hd6o`NtlLTgzvr&&%F>gZtwo zCpV$3a+*uZ!Y_GLEwA-l7~^;{QSga|;{Bw%UMKhxS;bc!+x6VH>5813GBD)>;1G;PEq7a zjid9YHi1*`1)RQFo37+u*y>rssrdEGdKtwO_Yz+(#gyp|pIZcyb}th!5~;FuI#H0N zIQPaMCHEg1H}1#u>nfKur2m@y;`zs(i~RzdcIAHNP}DAVkoC%#*>uO9bM4zRRSnIx znhPT)UdWb;H1gS=I9!Cj+=@pvWh9n52ra6zR;1cKKE|1$CbGFy{QvocfV1t zzB29Kt^3mtt!!M;;{2>a=3URpcYmTI?^}6vW&C{a&EER_nq!cO<>ULQ6JBM8-hF(@ z@!`)(n{N>oo1Xj2g%<6N-SpglUWbqB5({rbzi)5*lRxa;smkwg09D$IqQUt=m2sfBSf2>lKM* z?*eaJlzpjbS7Nkeo5SLo)p=oirhW>zCETlAW;JW~wAW!97@Om*#aOgH);}mK<4AeS zA=BPh^D}#Q4rlax2Z?zpjRkKxjs7g(C@q{}k~Z&|Rp9cxqrR+xff`TOZ_0Af-NWUd zC3NPE<%(qi?#@9sO2fidsNdPM^{Yd&*@m2AJMCu?903ZYJj(YMo%N{Dv^c!v##)zh z2Rlh&>sj&qm46xY8)Krlca*$Zugh@TO49y~WI;aHherj|@5$}nTCwQhWs47a=W|q5 zc8TY?_Lg3$j1N4{wyS)>5~t~lI;QSkkr2G?Yqq08zW&^a&;{i?v_9~zQ~Ki= zYQi6U_vNms4}C)<-nOqW_%(UO0-pRuO=T7?tf@0xSl<>3i(c^*620pE=|U^d%u}ro zf4)0pklA(U!y-+t!%LvJdzl7L^RgA(lb5aF)}K`rJ43~_clz4mn<^{6sCdT8scXJE zlvDBQP&ZV`J%#jf?0>-bGCYdpfmVDR*eSQt!~xdLtm3 zaz}BM>nHAIR%HR96@1~c{ynV+SFuL!E&c1^?7H+-^M^@oUv`*;oK#yi(=|V@>I46+ zfXWNA&MoVaNHv5!BJuzk9%_|Le+XvM2cS=5GU0G(hLDus|y4OrCvE2TB6MtF!w6|UL zVQJx%(wX(2YuZ+rdRnZRX7gS5*?oU)UbY7(X*SQ2R!kF(J1(575VoQ~lBLv- zqq#Qc&&HV|Yb5x3kLNJAGHlM}Ja~G~RW`#%pF%$GIi3CaXGP_yc2T*;UdiYcH?KY8 zuVedq8#Xorg<7Qs=&a__Dm- z`V~A!=1+R~vvK*unC@9WH^18&%XQDCJlSc1g#HwrgZKN>k6kWZbRdUC;&JW$lISp> zv$p~YoDX!~-Qo7uGU5G9wTy6yOX3lXm6uEzmL6EQfpu@z*YgwHw(H5MS!KWbcH`1x z{_hd{&pUPs$u+Ac-)c1s-QEy1t3X|v-y50t7wbkeEbM>2d9hGEd!Blo!fW=3 z{X&)Y59;15SYsZ&FyNJ^l~9EBVXhT%5n^loxBIHi&^2AO$#0EbO%m^f_qRfPuYGsh z_ad-hk> z=_Z1Hfx)W3uZe0pNJQ96Ut2Htt61v0#4TQ<%&G6T$$s6|zptQQbduQ3^N%Bit8bO= zDPT|XNL3Gc#IQ|Fm5q^a?e17ji*G){9@d+#Gr8aEs6IPcn)^oji{8GxJ5FC881LB? z_3exG#qjXcKbVs{m-jJkO1r(~<4(0Y@pG#j&{t)u+ zq2gl8`>X1noZR4eH?Pu(|4FB8Tx^y1-Iw3rMy#nbbZF1}v+(4vw!3a7H;vY=o)@{` zdiP0>t>KTA&t^?Eo3uspa(Kkn^?e+oM=p9lmz!N`Ah}u0;K3&I#<@k;j^{m(d@eWF z@7MG5j~DK8^$1<|fBEjHNjf_nAJq9>R4?#&aoTcENyYOIug>1OZtmIS^;B;CuF1=t zI{cZMYs^|IuK3u^YCWqzd9Bs9m(Qyt3fJf@oUDGybfx0l@^=>RWH0(0{=K2_Ucs3; zrRxhOUg%+-k|y!`Z^^-T3ys~ZMW3#n_|VQoGOub&*t`Sh98NKB<4nES6T0fL?WFF~ zpiM1~;`KYv+I;4-D$L6~&ls=zqc)kr`Uji&nJ;#iPUc>a^3}_^b0 z%2s>k5FYc4!KnJEN$Q4^H8SEB$5?lKo5OKkdYXqMKcC1pl@<3iHBC=CM&=(n7HQQh zmA-9x@!>azbBVs7UOpN&tCCi57_1t=X3O4_&OMQxnW_iq_uY5$W?g?-$;(=WGpPOn>rn1tR^;dh7DCT(ReZgBlv;Wy)AMs2`` zpL?37C5CTVxKldRYubhSef2B1&Rwd%C+U}`=XQ-C^%>kVSX0Y2<|QsRu-+5-Q1_~`dxn?0=2^Pf+QTA@d!(5o)k-tG zU#rA~*{ppl%ec35R{R%-T{~XXCPW2fG@tWmIdLGg==#U!-)D$Ulr&j+s&}@!_2YSy z!gemu6h8j_>Yf9iR-|0XY^tbZ2*0vvd3nlu>%JNN?@IUhg#_rDqzD+UlbDx$+{n~% zsezK%e7l)z-~4PlDBkA&<<hs>Ku*O^WOBp6%kY>AR+L3*TF}<)5$ZnddsE zIKSFY=6Fln<6V0m{kWDCXVJWllh%OLWqLr>|(7CfPZ8LG(?Z<(-O04OVo&|d zcC|=B#wIX1H!0z4*U7*No~Tm01^I{HOtyBbXq|cB&8Dr<&St$ef2Y1% z!*JImsp=4~I}hE{r#!1K`Zdpbm%^{Fv#f&-?QE93bF^r0SGe=XwmFl|dk0xpN3~k- z<6gD1@ZzHjzhjHO{Cg|1E-W%O=j6twzm=XkOOJQG^O($?&dAN5aOSp}gxi(8uJwh7 zvn3*aeK^MKubP%U>vO3??~)kCuA^3SuSkW@(OkJ)`KIjg9FxM6t#1V<#qU_6w7ZH& zSW{9)ICkkltFjoc{DmHioDb_vKJ(_`v!~!r={RLOQ{#TUUTgdGduIM z)aJd~I`L}-N35e#g0m;w`Wv#^RLNpi(E9$5*Os+TTeP88E@>4@xI=F5@|J}sv>t5x zA)qaHTqt{vuS2u{>O%{%m;dfsU)W!K%BOr$%zNQ#q2zu?hMxQi_Zr4?3--@4I`xxB z$7x@-g;VD-y`T)?nTP-7x$P;-Gj@G3t?b*}O@|%|aj*MyWL8yTbbL}BXD2Iz&exqP z*H#~YvbJ~UE@|~2kr5@K#^$X}2jARhoPH*J=b9Uj4{d+$@O zia!5X^vFe-F{9Y*xW~lg(j@{~c}G*0|JnPxL*I&3*M0vkndybe*^;w%z8115ejelJ zxofu8W~cj=XAhpgerom_rwK8smru)yN3Q&SclO$xsj^=awX+jVJFc8O@gd@OnzqTW zyX%F&Ju;HpWn^<}$4jo>Qq|L&E#L2z+hz6RLa3MAu3ak4mlv(}*>z~?-n%iA(o}CA z$XUxT`Sh^du2ak9cX3^p*~Rrdwnp@wZHw!B`F&OfFJFnSoAbBquKqTolW)YMZ$3Y` zC`J49bi=rk)U4TYC9R5&leE9ieVL|h8}cqEReyTL&f<$tXD4V^y#KW~>aAT!tD~ls zV}R(P%fFmMCAMx7ZdkSJ$5HXfnJk}=C~6;`A4~P=`zNZdv{a2=$U% zWi@Gm)(wNFnpF{ZZ~2DKi1xOQVYTO}obf_y+JjYJ-aOQ@-8(l%bmPt)r<%-P9}N|} zb2#*s;f|eJLQe`pRW3YS<*~7Q^@Ama6Q@4Z6OUA_JE5f_9=Y_%OWt+HH($-YelBe4 z>vZO$tNqK|lPa5zGwDCd3}ky(Yjw}g)yXJle&)SZe-4=ZXXILAuxG>6Bn`FL&_3M> zK5tffTskH!-TCb5J(<_vwkv6Fe4cQ1^@Yw?_m13F+{U6L6Fz_S`SW5IWq)1y!X0_^ zy?Fn0&tp8Z-xeOo=BZaXRC=(;Zov^L`RDf^Z+|cJ>)KA%KUS5iA}`d%2^G&y`dy=< zzz+Vx1>c_ZM=}U;HKDW zLEBp!A2k#lO!wGzieb$~$wo82W8!H(k=HqkQx~4=DCB0%SU6EMLgV0r6{jb=pU8if z*pjiocTqi(MQL+v-V&dYfb!JfSP41dgljM{xi z&wm%*A^nd1>W26SQ?;QJFP7cJ3Xs4{u9XTM%R< z9b6((xQDHn!BldB;1PprK8blZ0v9@T+8$~$I-= zm$C>i(~f*Qt~qHE%*+PrvK#>~J~VGwW9YUHY^1ytsM~wQ=qd-??~Qp}~HQ)L8Xt{%PwLPFxrE+}P_5W8RXxS63hA$hr6~ z>>Bs?yN|l3oH_bx#-xwWMHdF#jGD~&@a;M6870#cTKU({ez@9n{=`WqpM1S0CzPIM zyvVpIfqDJObJiDXDzj4p-~M4Zdt&X8g3^b9m(NVOa<)A5{H`ziVmH3Ly;G$&{EF({ zkKKEBKNfqaWvn>=>h^p47f+LYSNn9vRp#HepGpD_&$;_KtVMjq{;0iEX127yaoWVS zUt(2H+u8N^{FfMsneM-lEBBsxHCx=1>s5)@^kqNJkw~`t=raF&)GXzF1!DFhjbD1Q zj8^R^l&^I6Qu)PT$!zTUTvq64u*tp`4_BMszAXM=w=ds?0y~5Fb*tr1K382icS&Xx z_tq;LN=&mRp51<**RCG%@^gL+6hm3-osmC7jK&$R5aJ|%CUXtTb@`MPhZb+eddIi z^ewjw3U5!IbbkAF`}Dl}2(ier|DRpuqt-=Ei@dis&HUoNJedXVp9)XPSSZ^~b~3WC z{u`v^?sRs0%dGe7%l@yI+xv!-bJ;a-qsQyM&1Mt(a;0_ql_?GebIxhJaC6GNd1deC z#qY9utIJopYS(kB9lP2pX!KQY|H&U$HResKzp1xf$2&-%>)eX4A5Js=ANj>l#ky&~ z)_c7p%nKE4+&2oY-Fxu-w)7L%7Fp|0@UmfW!IvMNFCvdnSUUti82d0J6laHv?!e$tn<{PWkln|m2F@X3`4%ojqSX)SfB+Nrl1fRUX$OOFv&d|8C-q3A1cIpIP{Q_FV2OGbSBypXYo1 zy4Q`YKcBwlMTrFHcx--8^%2qxZj7*SAXy zCfy6?5lPt=*rBeoZjzbS&71tkj;36+J;U+LZ|}q{l7)(#IJ6-bWt(azjW#rN$XXU_C8+Rneg}P6dr-kZ`Ql0 ziyhH^qL7>!tFl_gZ&}s9sgAScj%ZI&*v*uwEoOUZ;L_{i}mIuF2lX=W7nrFw`6Y4{OuOC)wa#0YWkMnc7`rSwQA=13!ljqInJu>fmit%<4r!uws8yObH zc6js6_O8p((CjOeOY<+<@^#5^os;_S)8iN=v&9}wx_|vp?Iy=>=Jy*T1oCgF=GrDL z){VRB_3e3;P^Q_^M?IhIT&xujB<*x~wP<75Mn&0N;hRQX$=gCJ_{%2mG5j7OFmZ>> z6y8_uKjJ3(NS8g<@;`Q)yZOBP)PUGf(MJnj?~&w)I{&fwF_WU^5utCF7XR(+xscWF zQ~c+*nS$QW)}_2&U1#MoR|F~<-!l`)th=uMu1%<<$@22M$1IJ%e5aRuU9)_}{m@w3 z?3aIk2y{DHi{1|vYc1p7e>}QcY+dKJ+hyS|_g-XQVQ$4Rd5y5tUDv8PV&{^i8GWXh z{WrL*Jmbf8?GN+jed&BT^|+$g!2>I&mvU@lJ=p$poxJTE=Do@B=E29$GhW`tzmb70 z=*e5*l>Ru*Z4%7Od)6gqPB6C1Da~!!xa#q%yzgsr`Bq!~v-Nb(x?0?vqW{CIBroSi z;yP!Yj<&l$*UfrmIdSPc$35>DI{2pZPk1l;XHn|I&3$c`OpYna*7vr_?yv1!={Rv> zw(*74$BzI1vHOV8kB3KZJryuIZ?W&~FU7fLm*b`#?3-n0zQ@)t1Om?=WV<}^ z+(ur}>+|`lj+RZ@<1euP#MV^Lpv|#`hp$_Qr_KN4D&7C^DL1dz@*7*eUwh*a|2SLu zXYnUb>v_`Ne3|oSoPF*a->Is;?$xI5-leuVtA{ow`kH2C zMf0RT&T&tuVyx(Q-nDGmVyO<9B+ui4%kB7Q?p=OZU%hF^tF{j|?``bII?; z_rwY#hmsAo6PdqEo?EOnWya$dX%p5RI(%n$*FMFHr4|=Cq9dOe{;^}pPJdFs#V{j^ z?b7AkqmwTvcd#tA<-F$S`7-#cvc)Z*K6QfzZGY=IfAlLIdpH05U2*H7#ZxxfzN%Bb zWfo^Oyd*v=rrdw1-?@6*i+3yBUNe{-|1G~=`@-ke)pu(ymYjT{HUGOn?yG9COULzA z#~7{K^j-3rnt8H*(4l*mw}smXO#bt0-lV;2%umU*M+h)qo%lq+@cjO^RVck*dtxf{^RMlgY$Ghw{Dyi`TU2;HSCtpO-Fy}AdcD3rw7~3lE29JqCInctw;9e8($tt#=d>s zdS>5gE$i)q0nw>~Px-Y@6n#CtWs~Q=u1|A0>TU|X&3L($ds6=D8q=2wn~OI_9{+gz zl=6?GDp41sedIg#u^+xD_BO*>Fl3|YqgH{p86ll)3$LG8FV&$c8}6$X>-6OCfqiDd zQ5zLM|Jl93%S=2ea8I`Gtt%@8YOfyC*yS#`X<=+{x9@dJh)A_7JoFe{^kq!VkI;Gg%@+LH-FoardVNd^UT#0c_X{6j!#ARxuoxOi81c_ z6Va~oS?2GL?HxxJchtpvR{pF}v-$$>Z9TKvtT!v_?Y1=Sc;@2sd9EtsGfBPq$^OML zE;$W9XKgT@lyT_hdb52~9UpHwZ&lQMbU~I;s)*CGXRf{b(({xGOW$iRxX?H4Ttk`D zulP^rgmymSIJR8v$BOwePCunCPW;1XBzy8=+rNr?#bSq4QuQTY_PksC!?o|(iMRD9 zPb=(`^z^ZgdYHlLVQ2cAqfR|R{@}z7s_eblrxcBL30At;>Q8ySdHObQTk}u(TkASB z{mf#IA4@TQwdm*ZkC&e4Ou4X;|KjvSCabfr7Hxg5DCS)B*l^FTU&ICf{IQCU+Vkk5tAEZs-r*AXD-{}YinQGGPLf! z%vc>{__4-aTGIGtM(~uB=4B_Y9`oEH86W#p^7xJ`-&Ge?1sr=jbydq5f0cPjQ&M(1 zJip$`b$wm(#*hX3)+MIMoIHQ_2j`yI$qrjmY#M)LKj&G*+*hL!a6qHxe&XWXKYF+R zm2KML{={;vq?~$#I_uj2_7e%rhgRRnSm>>meBJfygfsIW)Yg5Ld%2y*OZ&pFPctw2 z9dDIU&G$V!`? zS81u!-1%`4@7GAq=lVPP@0CB;V*K}b+0NAP2~7bdTDDDbPnj<`e*IJbyCH=0PL1l# zKo&3l15@9`mVN9`jr;oLYSqoJziO_(nVT=`CH%a9$NMeeg(fBw05#Pd5J zZcKY_GU>7LI`O%i11fe*ntb?oPhdz%2d{tZYi7|+rR!K1E_)l8AI1MqEyFOy(sJ6w z*x5-_&jel%*m%e)^WJ91O~(2^lo%@ZR!?{MKY!XAv-3x6ch>&fchB*EY13I3_On~M zyJ8;&p7{GDoW)Sda# zrPKMBW&hlZoBi%w{E_&a;Gc1=Zx*cX{qy9*_u?<}j{kdZue?@XI9Dg$I9bm8e`#w!x!}K9= z_S^Ykp|#?dH1{j4*!3g&LpLk${O3{=_e}HO^lt63r+4?hvFhBBva|X6xuW_CLp`s?V<-F;y2VJUeHxz^2t(3Z0Lh{AjVxQtrN~*25T&&3qip zXWgx?nl4VQpEX~OGdia5`lZ;OjAPs-Q5^~A_qac`y#4lFyvp6S6+5zbJlxtYe91!i z;Y2=neZQ@yJj~m)w(Gf-P|HzZF#agTPL#7 zVb*6gjm<|pUfeFaRGO09a%tP-i?aoz&Ys+IATe)m+esaDrBdFo-6c9)i3`up zo755ZY+708anb8v9xePcXQ|L!+ZL}EHIq7PJ7>##WV1S}ZzwRFCf(PPG9`9TxTRN# zg>UvWzv_oVdMe3FtGRyWvd)osH~GT$JCBT={^tZgnY#3?T)XO(sEtmSxGfc1e6tG~ zm?zzx^iOkQWXI2HQT8RpBB~7=cj(M47B~KqJj4Ctvn9q2lh5iex!8BO{G=p@@P?GO z;wVpj2F}z2)zfWPPgiBHxnKCg-G9OSD|c;I-J5g9X>V@Ij?Sj4?~&Jfrm6@(`TAW* zE{Jb^b=dr=Yu@z6J$ZBXht0kv$6u|fFZP$Om#M!z&vWgZ5MiE+&%dla?pYAE$+*F2 z%a(MxbR~(s?<)81Zi%|-a!698P-4|vnWYXVtzKPyR|P_8rap11mm0^`$ZH>T+Mb?l*SEKsl$X6Oajj{H$4CCH z#}@5!&s;lk)3Un#sj_t{QSO`WEtqhI>6h`P+4s%dTUYNrYrCiI>p$OKt_go;eJq-H zC9-+VT`t4&^?p8Ul~+%g_H4<|IZsrL?tHjwQqL3ocvJUhAGRd<&whTv-rlq3IP{&K zZgP8lO5Kv*YbsBEGkITESE)<;_bHGyS;rP z7TG_NySMqt=jXlLTo#}HPCtKmw_B=a^VROe$|W-U+*YRq7w%+ZRE=HPJ>yq&-LHTk zP48n8N6#$T)pkoS`$=T$6`j@FmhE1(-#m}=deBE|6P zU7}L-CA~QtR|sUDbX@V|nUl}KPMzBoXz;_L53&FH&tyW z>rCt_6k?lT8dLNnC138n&`Y!C+WyeaFHSn)+utstI(=%6-7y zAU56hs@|pdhCkFgGG4Pr+%Z3>H6f_O)ZqJS2SZg;<|^wIqL-qxY#cs0PS`rnPUhF) zoyHT)f*b@)a}Rx#*<#zjB(iuVi|!J$V+y$)lk@($8ExGgzIDROmMsUvTAkbY5_>&c zOZH83-F<8~TfXn_Q!Kl_*7u*4Xy?gx+rQZ1+{5{&*DO+<`XZ;0nbq>7hs&i{=9||9 z>&ksOmq+t(R)(F~RCaA~!%O))_M#oC>UxP@;k>7QM!cTcAzL!{<-9qs4La61rExM= z{Y;*@DUsv0PJ-RbXDgJdv;VNMrk-AF*kPiTayG2&?ecfGrmcJbF4@JTagTS%pCI;S zE~R7R%0EJ0WxJ?{Ll;e?GXBy=jU3YQUGo za65e~cSO?7B)3gfioIz%WeU&Yl%CyNJ3-<38;@&mQm3=ZoeTPVyH)1&{L{Cbj%5lZ zEZ1zh`15UuseRGsl~o!qFE9MMdEtY5(i%@D%isI7d4D^5uS)&-Y}F!t`>KPH*K^LD z&)MBPv1GRWx_u2QvQOXsQ%!1Hzr&GhYdPPf6;`J_g%&PeExO4>JoEasvj0K{UkN^y zSg=0qM9q#It#=wXS1x6+n#PFN)2}RtN~2YsYp-x$x4K>GCTM z^IN{Wb-Mpw{_EQ(FRV9xaQ*V!2oc%x&v#QCOTJ9{BzH7xhvN3XcbA+EIsEqS`#RK_Oa>LhbfPG_FZ)4Epn=` zs~7w;XMO6~>i8c&z6gD_oZKq7D*w*)opW*w5Bzhy$oYQH6IG8k>yGSuvv=CuIB2l@ zf`8>%pEDs|x7;(HSZqyMGlhE!kAxh5(WdX-A$g8s`*&~i%T`?e!`J#BJCoOQ9bL&e z`;OR@FMrrA^Ofo4H`j;fC#p?Y$XnCwbD_-Ws*#@C>-DLZ9!ab_WfQ296sThT`uL}7 ztHk`=#n&G8YmWb{Eamz^@_zjBjcsSvif2?^n)J9xWl8aY!#|GcC+hy>SG%%!gTkWE zkCwp=W*8>1VxoZV%7<+mSr_Vi##A0@;+QV!bn*Dk_uX+xWf$k4@=n{v zoly3%^?CMmHc?}Z=|3~Rn%hY`UQ@Nrp5h*uuP`BfpJ<4)anGbzhgN(oyy@Jot1fo< zkm=-daTW=e(*LTnN`F_rVyiQr{?#X(Szzm$Y@4Dh30vo!wAy`)+w7Ue*{?-=?;k(t za^X;`ZIrC#&h2*-JB;^dt8H4lq_(AP*2Vd!Ig5?IZ`&aJ^0Ln6@RqgHl^Co|W(IC5 z?-5$Edgg3tRf)HU0u?rIl{j*#N%QF%=MU@78DIau^7Q}9v1*ai?kI@d4V*V2pjqtc zU;n=uN-Qsra) z;}ZMd8SZ18@@$8x#c$<&kNBo@?k{5-w=4;_dZ?vh@7EAozy8aDnKmI4=eTK_Eb+X? z&r|WH?Bd0Fa@K1mOtsSKnAM(kFRHky(RiBCgo`Rm*P8@qB;DDWUc36Q>_XmN7MD8kxye+8o(uCb4K&$em-?Vx#pz3 z*S4CyiVywDB_k6qtbJC)YqRNSoo@JndxAQ}ulm}YQrcaMpWmHR^7`8suNS5+3Z83( z)p^x7b*O9z(bl>U>360kWM%&boekv@4^yvS3Jh+m&B`tny0pfy(Ik@Xox!0?%$7g5 z#PhE^aU-VV==WKB?jFegwCzV+_r=|AjAAxldQSS8C^rTBHE~}$l2$a?w2o8f z#HCe-XRggswkT_Rdv{Tl?czyl+WGGJ_iuZuvxX%s{j%DfQOB~WHSfk__L~)JW_}Qn zthumD=hw^?z70>(9G^w`eVI0?r_TE1itC=oIF4n{c62y1r-JLSA4^JJyK~An$LMtS zG#MMGMIuz7K1>!uqaVI5x9W zvci8M^BS)dtIp-iZWk}kI~=6;`lg}(vRWIa-`{*EKV8_dB-p=dX~21r?x%_UOO_n? zC9^*(V%niEnx@ZhwHw*EvAsQca$EhG$(5GRuU(7OoculM-OA7=y;O_cokDkmwHQx$ zNpS3L{4TJ&asQKL(yyOPJ~?6O)CuL=gkD|SGUbE&v^5)B_F3Euo_$2_Pyf|?#aAp@ zMthB39T9aD4m>*X1cNC5!iLq4TtW(MOsj%Ft@$jpOlfmUx2(pFYdcyxgqgo~o;>-| z-ld7LNsn1+@y+JG($t)YY*)8jKO^N#u|swwEW8a{*tRbiACF|&k0S*5H)4~Ya?%@{^1_Kb!7CJgNvj2zD=x9y!b=a zCh_bM?jI>BD#s*#UY8HPqifvcV=k}uXj}W_zC=6WRqbtBel2e=Tt2~B)~~Z^$#r$X z&ku`NRbNnkAY*%Jq1`?G6U(Nkr^sD!E3NSFWS{gV-6Eh`c;>CDdsoCZedBnkpK@8t z==U5alNXMk3yOs-zsX#m>E|Z@P?9t7Z0Cj+lb07iw5<1!F;Jhm(%S!uas58kxySZx zEsYmmG%sz@w>t)luYU>TeD1FEn`i0kN$)1F|DtMsd!xddbxSUm7|q}|oc-Q9sx02q z*j{(9&X@U-4%t70FV*ijF+nHP@uT;<;}f$tH(Y(SaBFzrpIharDegV39#%nmzHbco z2C@a7{jPRnZii7?(Uh5+MK{Hqx80hW%k}+u-si3EWz)P?wLahc{O`4&8{KDhrz+N` z{C#1_oj<4l_T&?bGW?xS&fGgejr-A8?j`+7PWD-CI%VI36;}6pnH|?=O^g%}wzN%+ zaGp9R#KV8*oh7+voOI&8KR#w0`?AgVsyJib}PS(|#<1|}ht-$6FyLAQX z+!U8DugO}m$<;V3Yai#Y!lpYrfjukZ1a)Ay!wtmJ;4zwOi0_!kvURcHVjOTXj>u56=&I z$yec1X1)?vn_@agXXgc%xavRAe>a+VEIGNVD)(LgarIL(Yy;i$Ehjp^d@XzN%|%Ye zoRF#pfx9!D^6?s-v}+&3l+Ao{^OEjL?#t6mIq$?b_r|o9nI8GV%bvY|{PqyT-apH1yZan7mod&PS>94p>Co%2{Ndni{dPBPPI`2;(6%cHrXMQ;Co zZTmHiV`{L*?rf1wHg@aZ=a~PP|D;zjy3zYdPmT5TJ^AroMS2R8R9U}Ro>qJmBiEOf zWAZ`u`r60Sg-@Q7R`i^DPW8!-lk$>5+b^eC%K5MGc(ZHYb+aV}r!{}d*Kr;Tsh&(hBo&9-@aeDIQQA4XNCKpEhv!Ja{1RaYiZehr?wXLh>lyj zpMU5|F0PE6=wt1-ZOZBOT^@6)E*811QgY6!{3bm0c5piBD3--4(w{`hLu_rvzH{Y7C-uW>7^lxR3LRI5ju4Y~7 zrb*vd-_O@nde~C3An=65PvhfG6HZi_`+fiM=jD__S-U8X_Y3U$esUZ2yzsl2G^ufm zhzDc(@jI*w?je0XK<(F^KdYt3y{Zq|IMSz)bEz05M#>%XLH{|@1Ia*fqxQrV_c zR-ee2pY{d~(Lwx4Vrl<@$y2YzS_gajCA$V}5A2>zC;* z&i^mP>YZ#_t-x^iRJ3Dwh)6`p`}$u$RGGeiGg!{js4#!CA8W?$^QA>qR?8e-{MRt8 zTHo>f>r2&mEzX(gPg_JbrFkZ+w)Eb(_G#&hYuA|PW~k)FaV!2UpBnM;%(IHL`wtrC zp6hc``Q)o7pzh}B@YXF(dj5N!c~?1nGpZ`4XBK#G-kADGJKJkRh_~Wr$=)@Q$AnZv z+5{A*O|iNc)3kc7CHHK(?@ISwOGEEk3w^JuQu5zln3T=E%0H|sU~;AZ3*-OUN0O`L z_kCINws3#d_l`Pa<_E@F3egkhombBlxpSg##qmeWS^Rf;{&EV_p1*BlimHgcBlkk# zYrTHye(|a1l|{O_>x?^g=1Sk>GCH4=K5du6{&yd5hIY0s%P3 z1ub0?|AHyvgpvF-QA71_m$?<^KJS_`xkh~U+3!6eb+cUiZCGO8ZE^PFG2-85+`U?S z`kDSWfohS8>0Sg={mIpC+xS=6yHD#~KEF^s&&o6GvyOiJZ7*GM z{gdez%BDE+J!f?3*xL}@w#1GvFC{}~(u6G&H$CEvSbfV~?n!jViTfUwn=;Kze|#|( zd7Y|cGuu=~`nmU#&VZSzttIj|jJHont$whzeetnWTiZ96Tpw&P{_&(Uyg{{mXIHtT zeZar3Il zWofkd=s0U+$y*+6SGd&1|6bwQ;oPehcb+&IBz-*QZL)6DY0bnFZ)LV_pYoAs>GlhG zNA4wWDrgfA|IDNRK-RGJfL^}SiDi>^Ir&9CV^NrPmwCB$q4q=pW6Oz8^}mSmTv->I zHCf>7vgp|Xv&H^A@8;gu;;(#r$-bghE{lUZu8PE3STM|-#S$Sd5i2Z{ar~0g%gWF15sI#UANqy;R;TU4*e$vD zy~G!~J<{{@Dlkv#jJvX7ZP|C8>OP&7d^XKIcMGSB+$e7HkzLzrbH4i6rCoChm6m>b zqp*8j*^1Z=Z0(1;Kj$Sl{Rp`p|LNtzJbJUE06rUL{k#v$i}<+*#ulcg9Vvs4m>ei}_mq@A65(JdWGe6%{>OBk1ydtx^l~ zEy1RX=RVwgnw42$BlU55`O+|zPgnP-9NX;q)^o0ax#sRaRjM1edel7b6o`sF@%hIw zf34WRj|CLZrS#1@DIoUWZQYdTWp>5iv^*IS&+!{Q)m;4i$+taogFNhvwzm3c_TAe% zB|}YIvm#{k9s_;xEr;i=kEwaGZ& zC!Chd^nUDTGW*EtABS&UDl7Ej5S5&=df~**r9NB}pIzm6Q8MozbDQaWe~pEWTm^GJ z9e-Ny!2IWpkXEL(i4@~q#~`<$m{<>+)fr(H znP*ilT>Xb@=3<|}PSZl0d>-8N&AJ^m>Ez8B-x-qn7w`x%NF2%ir&gu-=a0hj7l|_; zRiy5Zm@WMD_S6JTRwoAO4NGdBPu=P|HD9pFMC#+BAAcq5Y)))1*|_A9R#)opOCD2{ zKa?nT#|P=Ogj+W+{$+CLfDeb)%#>W?pEcnx6Ag7w*UnuLS*{tVwNu zJiX#pnyGEf>&iS-$_ zlsdha9CEW}A932I%NPI3xMJH~%iqdHs{4XcvNP4z^oeWMKM{)fAanPl%{$3V@vO}+ zZd$}GnteZ(x1!o>nsLIx9oxN`BQKcDzuXt$CT2QqV$sz^uAuGG)7p|QPIR)p?wzB5 z@<_~tPcMJZVk&mjIzPklPOFcOa`%;OTpC+v-#dNrOUfg$bj{5_qQxX_GcSi;>gda# zv9F(VM(OO-x6ao2dz`k+%JKZb%((4bZ)=1c_rgxc0O!DS3(AxNd*lO~FW-GKHU30| zM9M3vP|n=XiOMX2zb8!>sho4t^6T+{lw7r*%}4yD1^+c4aDTRDzn8S&R^zmUu*F^0XzFmt^$2N%((cQd%{W zC-!!b$rhjaU(}}Tux&M1K79$x*~{OzN*ekvJ#|}QMN8?nyFv2bt2mqHDw?OaTS~t8 zHfc)+t6lG!yDbjp%X$99r%GO8+$XU8UDblEQ=~uMh}qv-z-+L9#al~#3dekV^`yG~ zAOFuDSv*~Ia$oFIp2gzY+xZUPtDbx5dMH1iBj^G~VzRnjzhmWYt}-YpC7o{2akALKVb=)x446Xu*VRVTBa zus)L?$Z^Ae>Kb|Vj=OUYUhH)`A!p5T&d=uFq#h5)iZ90R4%;f>EADN6I6F)RcvdlVoSv38CZp7uyuZ|UWdaH{nGEPosO<3$d zjZv0~`=g1Mll$>&(K}icrtgu`zH_c+7=bEkv?ImMQo2DfvTzFgszf4wTq59x|H zotPVS+4S^;e+iXEm$bs{jdzCFC~E(^WBb@F-PSLUE#votIVzWICA1dQ&f*E)$#M8W z_8Hanvn9k+o95IvZ)00`KjgoP>&{)~+?IFF`S_i6+IL-#*Nx*sPRd~|`|w%J(^h6? z7(Z~UxKgz0E`yY$zpqLr$F}o(KW~}1Nlue7HhG`#nT}&l-?sbrmi_(ItE^k$rL$gd zW)jPqEuvZ*KTI{wE>FsTSikGE>fNSb*2RB&l$1||pK_LTKQ{5(+<$)^SBsQgvRZyk z%*92{Q)`iiVExMbDX$YIgd~NYsM3y}`91yqN-LS0pUTyD$v#$bn{mEU;fdzM9u9?v zdx}fV`$IUbUJ)0NA)=}W4t#Ip> ztg|26Qst_tJJl`KuW4E?)34TlezEJ^+8*A0*FQ{gYFV2R$G7+72a`!l(rhf({QVa7u&V5M z{aW?q`&m{lyr^dDS0{X_X6_1mTU8YS*_abu7lbudsMv-|s~Zd7WvpDXXIsyIh4*nY ze4gpJ?C@&kzZ`e<(DXm+G8g`wuMqrFIlK4lS25|eyB*ZG_iarNWLR~-TFXl5&g!0b z+bd5jn7AY$o=x=9_a!FZq}{(xU@Gwtl!`fUC9XwjhF|_?L6Li*`>a=a_HgCrzKioo zi*zz8BvLhhDDx&Pa=CzN`3>KMq~b9nUfq2!AjDQ>}a!kfiXavq&z z-WSj_+ikW<{wZP3cnzgb%83a|i3%N^c|wkpJL0!1?Yng+p-rl({Ee#JyoM7o&yRH0 zPVsK3vDmf5A>{O|RK8`KJ!g09NQ-%6Y~H!UBc;NhLo@Ye%FSZo-xqV-I&bWHeA+37 zu~_l7$aaz6N2YXm*okkt{O#Dq%{3K!vTi>+|FOqQb*f4J_4BIDC2@@o`U_^L?TcXK zWESRR_7`btY3w{RBWC{xw#dK=kLYJ}(jTQ<`n$v7+TtCY!BxlodblGaUrf6sf3|t4 z$IQRhmO(4xU#2p*uwNFc3Myhs+%;MFyXZ9Yh-Y_=!uVXXUz_Lu`hMn^VsNpl$)ufI z_Lk=zG%kzX+_Up~Pe$oJ7Z#((6P_QtxF(28^_Kn<=6TnPb3U5=Pz(9;$?DMF7Tu*b z6NLIJc08PwtS=RMT7AM-8$Ht%>~@_p&4sqjMhRY(muEkYYwVZUen!XZ`HAR+ z?wT{fp(o9qt@Xg|f2XVN8kX)^U?1nO`efLNGt>K%9DfS-h?bkbnB%3;an38vyJ}AI_gdM{yWIjJTFZhh_sB-I^TUrt;Cp2w1Tiv_;qyK7`U_RzZwfjpx?=fu-c-?By ztE8ILn!#g!|E=ZB&-)T5+M*a>?Yre3@zLr=(N!Hz^Jm37=|^FKr?(w{Gpv&F=)3&HPfO=fgXrLeFPz z-$odH!IcClLWSgEouAWbZ>Um_fLPO=U@JOUuVhlZ;~x#x2vyR*s#g%+thfMuY64B zXNmTFi8>a4>@S;ergo@v{X*OQPESHl=8NzBJfpQ@b=A^_olKg7Z&$__C$XNfd46DB z#~hzc6P~{g?66t6vdR6)%c(2w1-<(d$?)8{F(c2(u`R^(*c1=N6}&_xVi&S(@V@Zxn@s6G<7lCODt{l9ad8y;r+U^_J}7teoVPlG{3c)uzszmEAk^Cr$C1Dz({brhmCG=Zf>w zQx>wRdq*`LQr#>d&#CVEN6%m<*V?&#wJTEW4#e$yQN4Qh58F8jMFubT*$Dg#JoA%7 z!?RyhY2$anMYSt7e^<2TaA3uWKB_V{P^lHZ44-MbvOskUNr>iMU*CM4x>uZG+8dw9P57s5`b;OK zXzHekmqe}RwWlfi2CFi@jOF^c!bbC~^m4b3@>uq+W*E{|9 zbOwYTTFlis|I@8q`k#e1PV`#k&t<}$>96%mVQ=`#N77F|9ZT)BTPt+-`pcQOPf7j0 zm~8hewp#Jb{CRU27intLo_G<(;d#p1E@gt~CY?WWoF_Igt??9cn)Qt7(7w+KH9RjD z3u!y4tkroqk!u;hEPtpF+x?)#54_8khU9&}FcQIK-C;9b(M8a2J(ve%;|woQKb zT|&7fr`__qy7%Ya>Af?Te7HY(R-F2*$M=JGPBoo!JM-%iTW-NT*Huv+ZQFWFf>gdM znbzxkDVgujC^Rd7Q_T-wPCqxPx|)iv-5(gAPrW2j`a$5^_f0#JJ*rc6z9_B!SmXJ^ z)$gr0_omvO01w?}bH#^F(@fnrKYuHq6zczjyMC#A{oCEY;_9qs&Nh)ZyQ8qdN4gGJn)JS<{?~zi~T{V?wb=UGMdv%X3-Ylx+(qlTG{qKJD{Cm@my8GV#cDH5w zqqk)OoJY+sx}Od!>`3vGQS#KCoUhq^lP5cx#eCh8)@Sdt=49-$``>#?NJ!WFhG=zH z)ibq1j`#c}Ig8fau2ai(^535^FBWs(R4Zhg zKYLrFhTXaw>gO%v9(76ntlm@gNTBDi&n*?cgEK1Z7TK*ee3Zkk%E9ok^!4t_2p^9L zf4C}rgtFYF%@6zxuR3bot1O^b^;N!k`eo~TtoZ`!3=5_Pv|U%qxjV5Yg}L59ma}AE z)=hS;31;y#H|$@0C*yX?k1aPJwolcX^JB@k`dz1WI46m)EHHoN;VQ^?_4|L>Z9a{! zey&;}{$`~@@S+sHL(RQ96^E1WnoaKEGq^hGy|B@zmuEN4`S6h`c3Rt>H;)|h{2fmS zKb=y!w2k{_R>cWvGd+%7tDV~3b$WVFJGxUk0D3F*^OJ=KJ(%C12dHTmGymW|#PvS+GxNn)9c%msi$x2n(hs zef66E%!M!V*^8>_eT{wwIs3j$P!sIZuVKEzcuciWF>sD~p=`o(6~DN$3AbP7b1HVf z`goo3*xVIQOEOP5v+XSSw?@b*YF^3ZC9BU>W$&0iSNVyK(ORqfca!z2Kj}LAm0x)> zTeOrN`$=%_f;L|LV}29$&67x5xUv zt>OafEJeAE6*1}^U3aD}I>2;JNhD1#Q8wZF_nsH)I(YUntH#Mz-RL-8zWK_^_BiSN z)k}nVXP-&TI&yetl+`7R`wv~#^|)8;@98tiV%ZRrbZKJPuAV&AZ;Ev%ZLO>>?>H%N z?%C2ZmqMw;QH>2d#7>8$SF@?eMlC1B@>LB; z?`)MZttr=13`@AVJLL}B#t!X^-(TK68{zgOZrgrc`A2J%C-r_fr0`({&xz89(_b)! zcO2E3{jfOhboF|-HLuF6MIJ?_IHg6VvAt24cXVo`;OD6m1ubK^XEvQ#dUe9Nv+5n` zin?O)3G0L+!sh0%9?zUNVHU^BA1A^z&g`34s_@Q@Ep_f+*WZi|Sz6r-1>c07d!>|L zFx}uq`J{LDe^LtA?GBJ)1Ea%Qywxz;c@Q-0n$l>Suf4n`y&n|k(xhKWWf60emK}H#7k66z~ zaW9xGv{~rQx^u6Tz7$Me7~J4z_RDL{fA+JV^=tBLgFSo_FR?c~hfg3oJ(S`DUl)K1;= z+|Al<`Rzq5ZbA;X6F=AYznOK#>}+q&nuUow&K{AyU$cdMzFR_15bN86H#p0!->nu{ z#X5bRP1@vz!Tj>B&t~#$R&GB!ugfbfr7-oto0OTUy}o=*>y@0!{`X%fDKN8l7vHILXxbUoPfW*S!Wom3m}9!k7Q1;e`32uRpOIIP zwE5A&RHt1tMRaH16L;tji%zqwcY5|Mm|M8{O}bgrW}e*(e_zaLag)sT^2_XSo_En- z%IQ;m!B1{w|0LCS7LzwGlw9h3)N4;~oM`SeYum)07mtLVteUImRXs=mDGg-|Mxx5w!O5jRDIQvF4dEAd`#Oo zQXbv+Q;Jva_f zk6*(|Y<-8oexo()3W9IH%{cqQSI##jFNcLKTy;bG$*;Q13vTCfp16C-N@R0N+Rg!$6G%fQ_$9le3CndRmE09hxGqWLYo@?fOwt($B7L}BJciHTIn7jAECO^Zi%fnA! zy38mwbJtf9UHt^bUF-{0J_k%#%e`nqai?g&o4JB5&-gj5*H5$AxKLRC#@D5~e@q_T z%WrwU`j~25?`l=u>M2*2o;5Tx%4S{a{JJR6#b(y;+$HJq8tkstCgx7NJ}hDB7dg(nnxlL`XY=t4qu*!LE;C$jAf;AiiqzC0$fLh0H0=@UA4 z#xXT)=*%&m%*kYS_{5!*Jx$YlI6nOPc;r>A#LeLuTMVSB+7b_Sj56tRS(yMrZ5WTrgl%vgQg&F}KU&Z|1_CpLcj8C$Zg zJ?O-iyDzHQ8@JWz%`2Upm2myIa8C7v@S=I23Yy=3RBeh|_4`h6QfB(hpCxNMV^2Gu zOX;5~Kila>*;a4AAG@NCm+f_Xr24bUKG9M*#<%m?%a$D)ne+A6C#veo{Lay=LiY4RfRU>r4&b7iZTf)+fxqn>&$xV^EE}>xs%!C&isEFuX5Hnr`yLRQhAW zKH=S44hE}ln^ZTwF7vg`+!EFP{{KIsQ!`JW=RU!-K8|tu8!;!Hd$-%BZ~J`pgxwrj zPxJn#Z<(Lpyn0dk)N7Bb?@_&HR&B9)&a`6Xj``BFYXT+ytK9z(d73R)YQFa`OVbbX zcb`s6J>BJWQEsl_z5uDx-~Xet72Pz2crT`Qr}j_16+sPIZ}N-R!?G^$}l{z~hfCcTUtBF3b~r}w7*d1@2y)}zUA%P@M=f5+|G`ZKG`d0pK%wCoU?BK zPe$IAMHf3#+B%zR!=B$=?eOj8{wF3o4stIR^f~t={`#~1J9e`!Dl)%hXd`OA@+41J z!r7GNkFL#Hs

pPgK_CKkf#H*1h28dg`&@Tw(jkMJp6dHM)Wpb*M~@j0(DWuJ%5| z{SDuIcCg3B^NDV};*)mm)x#w})y~hIdD1e(d3NglH9q@Y%mX`b#=g7bdrIT`4VFv) zfAq3{{wKH1Gc;P->}Kb#lbdu`+(_8ddCTjgxMuF}L#KS!9=~?Px9nBk%&fxuOK$%v z%077_<<^ORt_RcQj=2g<6Z{YsC}8WzVFywcH3_k6%H}!ZJ+vX z-yH{)mp!|LJkM>6a-aB-{bI$WAMQIGUMB_%U)weF#4FPy8XZ<|Vh)|!W;9dEsPELb zFD`Dq)4wVIThaP7PsQl$r{61DpXRbPeLChj$2c_8{9wY0*tsEYT$kc6Sv*cY5R+~7 zGDh8E`L*QZHd|)iXe^Na#VukR7Ixmna&Ph_@vZ0dU;Vp#r0CSy#l6lP1=eYW8}4$u zY&&B-d-B1rN&*k71h-6C{L5WU=z5-NLzKzn&`Ck{DicdAI*-2$Y|JSS;Qv)(bk@jE z;`GT!(=$)xT2DLsv`sSWe7kV!q}?nY7hf&msd?D7yTV1MqpN7at0f;Vi#%B(r^>zP zL8cG8nDfg2OJtO`{7w*^;A}C;c1FpujYd1S+VCpf?X>)(aHn$estSqUMQ5`VLyq!1 zJ-PB(VW`M*cmBqwt3GTNQwTPKsq1=9s=o zyL~rYPWOyz?v7Wm?0OfN@aBt0;QX_nrt|(ey01vk=Uz;mp7rD2M{`=ML$cLYw`&+= z&3dYT{_x@*Coj}K+&b@at9H!6#}e*oMYVh9oxBk!VsoPOTu`<8d|96lX+Nti=R7dI z!~0R=!`)RDj-Gx-wolz{K5tL`{PQ69C1qpne4DQI_tPhczBir~%XvLgheONrX4`Vs zLi>~unLkrc-17H~Z_+Q=tNX`n_x;E2<~dgmPM!H&MQ}A+|MXLt|L*0Bon3uCR{mPx zrJIMm-Hn$#Ty3|(c3pt{H9kcF6L00X)6-RLrS8eqziYT)kfb5Ud_~thUf^`IgJaCy z&S^qT7v3f)xH?@;uAU+=HLt%pXuhq?(SI}Ec1&?edwcTSt63>q?(B@nSh%V)WL9JI ziQ|ehO!THZS}F6VYzep*|A~!pQ*7PmeK(v{Cz`(FXIxNxqg|sv_HF2$r}3X;TiXNN zm2{=tW_j&>|5oeW$Lj5lE?JkXo?M=lt*WaVxcZ;=%kO3HFIzsbF==>vk9XOf{NjzV zde!@P^_@BQ!S@;0S%H+^qVTp*-J{``<9B?`z5A6V<@)rk-)9~z(+pcS%|tyn;_vI~ zKE@Y!l$j-S?}`e#ynA*0{-t+ZJ7+EZ{>ob6RoUK4lYBVKCT6Y6o#??kZFhTtaL zMqj*NTcYh~IX}&-Toh`Rtw58*jZg?KeI(ciRH* zEsuN7WxA9u53$j>^0dFe{%FPTH=a^0uTPu5XSy++v*rB4&@Tr}=M*gFbjT1-c_+0m z#a-aUqf=3Va$U^7^%&+Q)cjiR8nE+WjnF@`y=$tJG*0vZEx- zSb*7$ue34PH2G3E*BmIp_a^ z``${=3_GqoU9yem%!l1JTDzn6i~E%QU)k9q=~j9>w58>~<^;}emDj4-JuYPeD|-*HBRZy3ME799U;|ALay<98bx`lJ$rcZk-?FJ z_LGvP6<(Gry|iOB>!obZDCv!+GD;6>ZzMHOac-Gp9qFW=JOeSVc z+rK%&d69jqa2m_p*H33xOp-nFvq5D}z4FYec;4A!y0+VS(yvFisk*GY?UUrVr+-RI z@Tc#;JYRf@Hsq+%Fm{tT63y15A4lm3Ur zJKsv|TQIA-MoZ%43vI!^7v)6-8IxDXNe22Jx%BUv_PIU&*Imj4G;FW&dcM-k(to+N zz5i&IoWfD zAJn3Lhbru-n{r8L<;%Mr^Z(h}*WB59Xz|ktt2~d{WlnfF?W&bhp0)kuZyP+Mj+Y8t zeClE$!2T)QJ$%b%n|1F?1h#)ZdBdGArAO#ol>PGL6;BpjnP@rJZ=3y$Lq{3EuZeEa zcJNHG{vmm7eoDfUYOhH*Usm>Cs@Znyk(9sJy@cp$iz($QyUo;FZ#ycK1^31NxuRcG21OGL*BT^V z-RduX;{Of3?K+WRqFvu!^nGbeSnT(|{yh^9Yu5kJb4<(vl_hgeaO4($P^>>_w&9pv z!p-T6POP(ve!gNsOV1>)Um;Bk{@zk_UVc@@xO}SNL=GK+jA-!=zjK{AAr)^-|Gz$c z*UfyP&SCYMi92covtOjlKVfoy@icbzQ!|bVp2!zd)ilb8*}|2nr!<%Uh1DlDqaC74 zD{bnHmQ2=6e82O_<{y(UR&Cb4xY9TybFZTECi@L#Y{lmnIUiqH{%+Hn9Y(RQdBrbn zdj7XO&tj78C(9GAtR8Vv>>Yh`I^P)fym9`psISvhq_?MBkpGyVKiWU9Aw<%MPLL`?J}1S1eO~^z7kPAG;$#Z_mz)<-VztGH>$y zY3?SIuCB~jyZPwclj1IyGWa$eUzM`FbWJ{YA(L;-t7*mW_SyA#KbyHiexYgCv>O5< zo$eoI8BYkU43_w{pQ%l3_x47Ohh91{`L`J(=k``yW9rBg7ko4E+J%cYKZRdrCNc{c zt4&&K&2`P@S0o?LnINm1s+V%s?%KUjXzu07J-cUe1Yb;&ohMwleoJE4np-%CE|UGq`AuC<%%<&-c#fnQ&prtzJBcxa>lC7;MesisfGIw~bo zPR#X6dGbd(N-#?CQrJbIXG)vXtHL_A{gg}DqV~?|nTI}0%S!P_@%!_oj_m)Ma$~dR zi44vuUT==x%QF0NLzwfg+nUg_?XQj=sQ=SfxKnJtN1H42_Op)#&hD+B9PInHjQfR) zXJ+)Ff8Bff-xtSDG)Pt7azf?$+gWLfifX6TiY@7z z$|kor(hN$hFJxPzItyK$XE{hKZ{wZdw=%aOgTtwi{bI=mr(^dm%LHd;+}P@JiczkU z`@`9^{Tn-FFZ7*Kb{1Bzky=))n!V&7OOmC)og-(iBquZ8m>g_z)cNx}ha5F-D+%2+ z#xJMu-<RtX>y|eSlg_sG%)1k&B=^zsw_;RpTtjYEoa7hL$KG#cq&wqt zFD$%f6p<_@d-0}`;N0z7&5d_X{uLCim?J!G-}$eo>JT_h`{oL=@}(L3cWHJX^KB{*u9p1lIBG0pCAX*eM|kIrc>?}ov$O77 zMr@V}J*2(#-!~b~r|c<#ie~rj^D!8#6c=asUTa!Yzs zUKFI=Ev;cWIh*sP%evZ0&lSHV2nk*(%T3t-ShS-r``WiVa(8CToy_60EKl;8gT5-G zw`p$GbROBq!ZTUcXGAQSyMa%&v*V}b8VSpryFytc*ZvIZa1E#qeD3Vwe$J8L?ePVTPwsLq`7Kvu#>LPdsxs}*!YvDhXB?fFbL#m5VGq64x9$IReZ1ti z;qistTZ992K4(|otvbtiM95&G>G>_U_O1WCUg-38^JTiZtU}eI%Hq}CMqW$AXa4h! z4LCXJhUU-bhBbGm)E|F#`}9-~83qO&M&XU()z3NpRZd}Kn;m}V&OVn}#}+-7yKS>% zv)tm{XBm^%*Ej!TG~WI=@Q1>gvunGR{@gz4u5xweJO49N-*}lV-JR^>d&%U$-TP-w zGpfFFR7(4JT4sW$%x3PElqvaZBmL9z3dzk`dUz6V2ES_K%oXPakYTte? zcB7Kr9O~KcZx%{17V0ZSZq6#ynX=|?=21?DBf51he=6-%86sag@0$4JK|@5rJnj?i zb606|d<{IOIMX%zY?V=T!M&>){@$t*N9I;Uy}lvidD`prW!s5~7c1vqns&_f*kZZP z*?)=zCT`9Ryr6Si(dg4=#+#GoiT#SH%dW}#UG1*Hy>{vLWwE*9M&Y+u96bD{PGjCP zVLwxkRH}EnO5R8918*GbUMn7+Em!V!?b!CR!l$!R_w^mG6Nb`A7 z_SAw~Mvgi+ox>gf$E>ve_|1khYK88UTa34s_uV^q;O$CTyE+f6wyLOG5x3Lzp5C6z zq01}3RrH(C#cMO96g$)pmU?%tZ4OLxGyga{C-!fULc>E_=9HU85-u~k`<{db+%kNp zA9=q>>tm|prV8xdqwq+xn(@?cznQIV?k}%4elhFrnf=@D%fy0p%X35` zO(yk!4!I{jv+_;v5#G9we@=As%r&XI@6?>FX;Sj(SEcKQie>Gd$De#Ruop_TS-<#9 zIE!6V-nG3PTlVp1KC4oZyS&1*NHpU30r9f8X}g6^Z+pGmZ1WaLjgyrv=Tfr|>}I#K zl=fUKlWbya{k)EIZ_YQRN6%b0WlU?{xpvC0j9BBnnkDPxkJjltV&v5iyz|Iqm+YT& zj2HJBKM{($o-g`HZLw${|D5N)?cUiPX-@5P+Lmj*{?UTqw=p)`+D$^{{5_uXrqo`m z#cdn=eFZ(EKhI^hf5^%;Sr+S=FBB7gz?zvq{L0KZsu@r2cLy~%TEsJTh+kaYqGsa8 z_BKcNe)+}bF8f=}D%yp&S*PePzVD;8{LNHbm-3rawtPtI_J3i1>GASkrth1iEWga2 zSd^AsJ<%!U+@hzIU#H*kxqVo-ZsxYF58o&~_J3IW`hUrE-(9RLIoqD^?TT}>U#euE zeZt_jNB`!(H7i1ymK*PWzPF*{iu$is<)hi9x89zgzQn@j^{YjDE7smSe8N|yT_RfM zN^hAt+wAENmiWuuvD$0FtM6YFmFkx=@A$Dw4~e(a_VCZ{uX(R0V4J_^^9I9PseCE( zSoTj>^oW<-r?1cc{Ns4nR{HmI=54QTf=f#vF=hl?JEEkw+V6#@>wFxBpCzlkWd{*)=_S zo6M$k1eHaV?wa{h@KvHYO&f}N{=Lv%cO*%7&Knlxh1U+96Sv&D z!|ZZ=>dCg+AOH8osxSKZyKIwjjp>2TlOASzucj$EAG+?RESb8zV~3p1cBu}HFZCy0 zKP_6*`XwlI`s13I36I5oT{$RowPoj2gWXRT^_~+ue8F-p!>!HxjYBP$te<}2_eBfI z&Em6bYa|w&;Jf)#byHVQUGCorSN()HAK$*~$1!2U`#+A%wZFGD%rnurRcxm9bDuv? zg&!r{o4Z!vlY7{S<4dP?^BRjP{d?n;y)s<+=9)Ph%dM-+zs}9nwbL!nU9eX40;jWl z5`)3tiL6B2cQS_bvJpR@fb*Xflu3O`*IZdhwI zvmi>QdD4Ed!$DQM3yxU1_!WV*j(Om;Y>@9B7?zhAHE%#;-Mf=UgtIVouyS!7eB^=Fv`}`L8EUj?i~W zkCVQ<<;kOqd1teomMiYF4YXyv#VeE?Fxg3M>lA&q=bJo#y%eyr?(lv&MQC}*`KNm( z1?~N5`oVPJG=J$^Z{JV#(Gg9WSJrA{Ue{@#;E)#my|j3tTo>&5>)&!5<-^2|f! zmO*rk%%{95jlaBATpEjhZ+;_x;yH_^{N5Qok#kSnpQb2jdGgPs7pi8Tg2KFb7FFJ_ zs?wdfCtqV{p`qg2R-aS4Tz9AaDRtO>Jj~59_TjF%t$ep`FEZPe6TGS5?lz}i3!Yro z^;Nk0^fK4YyWcgfPy7;5nqb&{Ij*e8MK2upNObTClIYodq;<=*cajqhP7Uz? zF3Pc8UTJYfr{~6vak*i^EVDOe*W^2?U*dYX>}d9r+?@_Zg`4ha2X;=cTwXh8X2h&I zhZQ+YE}t_mhWB_Mk(Si7&y`s;$NR;jW1S9nqofpeua3T_=@xv+DPl!M+T&3ZgHS!s*tUjr>V@sUy zw3&?og@Nx{*SK}r>2J`Tb=Pm#ec!9Gr%cq^Ilp8|1}uNHx!V8UYQ~oEn2^x8^?Mno zG~ZHO%_T2!{^El3Cq2uU7JjYiNLhDXlzt;NrrRp{Tw>kX6^X|}_?ZFU(W7wdp^eRJn1FTB_#o~@dHuuuG< zRn+c|B|oQBtY*A)U2oqxhMU>0Mzt~fdD#}(eNj!aTg!izxEz%p8ul>IHtH-g$M>EY2>37EEpStcgKkKpAyoSiEd@1Yw)e#I< z-JZ+6YToSp>$>j1)Hf-MCa*2_IN}y{C)KLxaOsb!?#S;N$Jw{Oiwz?cRgB~ z$0XUywNjLMW6Z`nqn?(nRhh4+daN_v_rpf;Y+;dGe-G2TllNQ<4nCdkxNjXp#ASys z6Eik{@=dw^quYD8ul+`bjJezw9yz5+`Ye01Xj0Od47=}Kf?sY1*)CY#%dN>;xN!-S z%i~2oYkM;u23c-Cy8A==#%N21Mbl!#X1g4?7SyZQWju3%U~w;_h3@03aL0Lj9eax6 zHNU8w-1t59x>HqM(1Z1gQ5;XtvpU_{Dx_U#x_{e;=}*nsjMj2xJb&{3d(Yi7fhQ)c zVXBz>%cq!g_qL!fkDkA=x%K60*$%_!7AfoWjVG4!UChoknU!(6@pk5Fmp%WRr=MOX zy2)H>uN$w=l=7=(`Kn6BnYtd9ob%-~RHQSWEOBzXEV6U{z7Dg`o`0XVTrTB56n6bm z+SClrkN1qoP#n8R7JLH-;G9vV8}W=I5JS6lpH-(`8AF9&znJ{ml)WtEP}H7pQ4`;6-M4YJV)6h(q<`mBU zQg~wa!^Qb2WxBk(D?Gnk68>3rv$N*&#?qGSZTsik-@91w_O`@H({mOi%Q@)z~8X-S9y zY75pdTz~En-{)T?;#j58(`Nhq46k17m-x?xj|H>+vK8)3yewJA694JR4dxA3e=G4! zEZn`3{ef3spOC(KHN&hsKGIw)M=X0DB=8@2`qR!htZ3ISZhOB+cE;glB`goN*X*e~ zEpGNmUh0j!7DvSHy{tjgqNjGNIcVK!o6W=}GBsKM$QcLujnT$9?+3x zDDO`TVR|IO=ehRC(}?+o_Y~VY)J4ow^F8)Y-&DW(`-F(Bf`hDkX?ic0BJ0dw} z_Z6lj`_GCCMMd(o3y;foUa%7Ja%1OIUTY_zuQFesKEFbkbl+yMMA~w77k9Q<*zR__XA#{X6Yf1SLG_seH1+Tc(aG+&cFn-{eIu>%s5bVs^#BSnag>C!Z#+q zb2LBoZgY>@oR^!IUb>jS<&K-yh7h?Fqu8anpH5}2@^@MDzU>+7ichy*hzU5WL>pRU z{NHYIdDop!t31j>Wp1C9-k|hISxrr$`OuCDCpDt4G<DPOQLp#O% zd=EPvc*rB-cx^kA_N8?Hod%V2GeuVHnRNdCjLBN-uP)uYbwg50ySdWRdmObVes42! zd14v-P||ZNd&I3HA}q`*St^Y_l+a_`T+&<(s89=OwRCUcNy* zsWyD-Z-=`V*_4CBBh|J{{3iGELsehTvGbDtm7VGwp)J4Pc3Yj$VMqxox-;S9+O)1I z>zDY?+!b`nr@N9o9;+y^GN_(Z4L27O2iYB}@1a+`$HU%vB8t_FYpS?nQbcsy%M z|A{%Tb&3(}Nw7{pQ{LxaS1|4}}3wo_Qf!Y! zw&=Efd~(Xw<#n71Up~nwN^R$f_#3wG=@EfKZ7yZa&um*v9-0RoTyUZ6`>YLWoJKBj z+Wx=m$|Q|89{g3bfTQ+roH)9qK zmw4prGaTOEs@{qJm-BmEbrglseW(C*G0rq+72TUOF!rbF3+t=Dwo z`IfV^?`&i{Zo8-CN3XtU%3mv|cp+|Qjgu>8o=z6|$fo|c+ndX+RkSZ~Yuki7x0?zx zJ12Q+s~(TyDd4%gCH90ygyngM3`;xlb*z_9#j3S&m}%ylXdj)V)-yHWz2-bNA@iW= z&-0&q3l^Sj=DKx{M{MFZHn9xt*@E-U)yq7b_jDP0_Yv=c= zo*f^KEN=So^O0Ev!^*XHS5H)Yv^(Zb3#X1X_e=+y^Y`BgOb*`n-mNk6-PN;YN*~|q z{c4ZQ+iJM;GBD{V2a=dP8oud_W_CHVWyq5?6`=+If^ zJdc0*_}I?cCV0iH;eSAczTQtQoeN^N%k%Gu zNw4sDCHU>sPPaaVm(dSJK2G>pb@~3*uTR2lo`+|JcxTrNo~zY=5b%xRigor*A0O}Z zRZ&+jMa^H&{repM`J7j;!X%u#UKs3M`@{KOc}thcuGcNT-p8AHEZkhRoSxm7#?G|C zV$LB$mp$)qR(ni5dhpcQ$c>qr%Z;TnJ(u`+9q&F+c-yV_)L)k%6$_R^-}0y&-WjH; zr;nIyZC2VN^Z9ASDsP!I@$lybx8ejv8;)GQG9@oFD5Z7Ja`xG?E*07Au=l8mG2NUp zZ`raE@h-(fn($g*Xh^~znt&barP zZ8|PFdx6)kImY7?s9$LR{ zk! z*;S%%v7B%GruD0dgWEW&u;b-#T7!_ z=MOf`ZMBsxbW<%0sh1UDNVUASBxi}<@mW)@HEuco{lE_U%Qtr3sgX(F#uWJqGo)Gub(zwmN z`L2)P^9_%KQ@#}mhqu^^FW&c;W71`t#zm9!xBN~!qGG1mt9W_ss`b~pDsEXyofIh2 zzS61`d+Kq!*Qrg4lf{e9S#alua-QE~(?6G2I5P6Y7yr-+62H}ak}c&|elrQ$&m6g~ zBf|Z0hw;4cg>wt}l;=q%Nm+|K)iTUH{rN_C%*67qhj~3*YR+{WSoKr#>Wzz+B`-%r z8XoUmwWu!6_GtD6fm!|X{WHtX_^w`l|76CFj^DwKN*Obc?CXmcl2x2v5Rx=;-hy>P zx1+tX*gHS3-RHSQEKK&LW!=3a+K2iD_22I7Z8~B&Nv47`i{>$F^;e_OzgfH>(s>fN_wy1L{ zCQS7$u~d9iS(~MNV#B<5aZJVa-6vO@E#v#!_;|;PN{a;>LX&r@EN+%r{mmlG)wS%A znW!LtyFue~zMVNLPIh%aJ|AS+8R8Pxw{&s2ox}e^ zn+fxF*oR*FCE@$SHok~2-RBcO`%OW2$r;DIeoaxj6J)V$qw&|h7VWXOmTh?aQ)p^U zcvnH~K3SPZ>q3&!EBC#XN!oP%J#+gE?>3Q&Z`B4W>31i5yQ`b%k^iD?Fu#^-M!%Dy;mq z-1vT{jOSkcx&v_&`fjDa-;r{%Ca=)BZ_$)h+J`jycB=1BbW@Y5HTtKrMt+6f(VY)? zB=0OV%9_{gC9@-j*Fq%k;~ATuJ16mWuIrd46aKhov$=Cq*1TF920& zkQUzZ$~d(D@L6k4p*fyPTLM0RIq`jstyn<#_m~ZxMvpmi-c?Hd+_RZS^6ke2=Dt^v ze#ZWd8^f=^dB6Cez`Wf@rn0SdnWz8MMSD}>CzFd;7d+C|bg7H_bM4f+gBC_<^QBF$ z{ax*7Ieqeu-c6H^^eXq%?w;i8l6L;5+coRc%I@c$&F9%;5gC(GWt%_eRFm=Z8B(rG z-c9;ub(X(SO#G&tC6~s@M@qgM_MfpYcXaDq!}e<0t~90U>87iL9e?;gNf0bf=Ib(6 zJohMW-m8@l&bGCD+UWgvQ*W2S)Yz}(S8M;jlq(IGV`?0r_42La`gT*(3#R|d<4fC2 zD&tGVJ$H(5a?MLHW?nn-;hVH?J5R}_)HX^hfBL$~#Pl@(th)jwJFgkVhdWKYcqe>L z5$ig-#0JD zTCwXqU152<`k;mrw_cg+wY;Y*4!^o9y0-ZIE#Y$A^@o>ko#djiVzPtqt^+yc2j6Zm zdVV6{|M%W59j)cR%OCS9^S)pBbm`9Njmv%|?wOI zuWwSX3;yeC={s%L`+EH@mwT6&8k$Hf|FF?*k}J=olyl|2>LNN5ZU;QuWuf|O;;)0< zhbO2OoL}+!U0|8(?>naLN7uGmy=wowJ@%(~X2jRIn)eMBCwi8bop;T6cxBZ|z86#H z%2dtM_0?i}cX|Jk2kM%a9!$+U!1hY1d~gkGd{2Jq%Yd+P9l;l8LCL zOp$`<%^Oqi_LLu#+IsWiy@jDmf@6(u)$P6{uyXea<=;LMo4#3_cdfBKt@rW7z2$8l z`n$_w&Me=(J5vAMtCLD)rKtzsUtN6S!->4;E}#B4wl}Ib?U;D|#evv~zNx;RH+!Zj zJpJhYW1{A73F$|Tk5^1w+A+m_Qpe%5nM+;N^xE~`pMH>ejobN>d)T9QTz8XurF5Ma zuR70nCN1k2lk-Bi+Ygyur)>!l_$46{(z5a3mEP}F>m^-dxk8N1&++wx#_+kvf% z9i-jo?AEk!k-d`1IxqL`9I?#{7gya=;965?_LF(z?2Ct-BLrXWWw|G3p(ke?)jg*_ z)peG8pGDf152Z^^O#B;b%#yEe997{ebtvIjZR+;=o!(WeI}++&{^Pu#9~*9L<151X z@UhN6Wt;SKfilHWdf82`8tWfFn%KPCQnz{4oKx{CQ~IM;Twc_YwWaygq;0R&{&RG! zT790Y=8|TS#S`~Vr6Y^iL`FC4{P{-jrH6a?h5VbE1;6H*u!x!&c z``$)C!Y}c{o`JmD=7H-CyJUVpSqc++=|%_p;#fBngKXx;1b`sa0>Q<_)Unw}Q=SLNukK_G2P#eR=vGF2<}tLA7-vs4vbvLR^sl3krM?!WTf z=6WZ3lH~5wJjSOsWeR^e;Kw#`{Vx@*#b!SnD|t728n`-}iJXd=^uX+n--EK-*BU$D{`S;5-<>&E(m5a3= zz5gejc9~^K^{Jm6!ApEAuAG0Tx&OomF7{H_GX268j>{#K4(w5H-|h0NZIL!Or|qiV zEd6NL@2yKbCUE$kwPF>LnOQU^^;+l88Kv)<*8Ds-kLgdK<(~-)o`3LtF!%DFV6IDQ zd!CEDl=s=H7}vRC{;cQ6>gKPjzL(Z^qI&YVnVR1t6c;-d$E&EFJ|n#DV`jP7g)PDb zZf9)1SHJc-)$)E;^BJ2{cY+f(y$RTHW4UY0(=RH8>n?fDEHYSbuX1hb-NzBj6YF); z3wIybcmKiZyjukUojyf&tbeqN*3DN>l9Al2Fk9l+++&og zRA!!F`y6)U?aMr+mlvAnXtD>E&3u1DW79_eo1QU&Ps68}r~dsm=fk=%mK?wO=*;_n zp189;4!X^{a;?(-XU;Be`V-9;{(W=5N7Utmk$G@x#)iL_IR&l1N^X-~<=*)HJxfov z?&q{U_1FKb4paE9cjM&2_TGK*V(0Z-mG*bbOkI9D?|}ZppW2TcS9~vbI;k_|e&piw z(y3CrnLEPY>rFhXUu+b7H+}LSi-6yyS3lRNY`*Z9&1}C4%QE+!)f$Uf3Rr3xj88t7 zTJ)^SZ@sXo|2w_F&2MBiW=48BTHWjF>QQQ$smgUR_My%W#i9r=r8{0$?T35xmi>$F zaj(>k)!ypG|Jtd?p67~Y$6r&IoQS(I zU%Yekvf>?@*=M7gFR$&|yN2^({+tt*9dSph4=lN>YGC|>^=3!_XUr;xnT0Kt0%Z$6 zwBIx5DT z8S9>M+8>DF-DEu7MyI*)*Hg}<HjN})xEa; zh!w87ACkhcY}0iOcG)LJM!S#9PThT{!Jz8wKlA-zj{@4mW0bbLUNPu4`4xGp;`pq@ zyah|!b}rcAz2Av--n*`f$=*zR&o=dJ^q%3Y6rC`$wJ6e=Y28wf7ylH_JYDnG@wn6@ zl{qi6Je97Qs6Lbrd@j1&BmKv+;3pd*K2`;!th=ne{1umrs*>#2Q2rY8LhJKF^B|5LBG=WGP)wJ%Q|Oj~^7;@@d*f_A(Abgn+}=hy$2dXsgyg9N(XY4~?|ZC-Kf z|CWrmbys!%`?@+bwJ)Eyfb(@|i`%=?OuY|f8U(_wiJ!R)@_W*pyZoTF9cx5|#|V(ISW z${K+^*-2|8zRl`N6h5{3G+W+Ine##iv&*(NJgj;W@hB}M=U5syFD!E`#R1~^HYB3ocb~8)6PW; zd|ugkPYqQ1R`W|o$!;@yqgeRG-yWCT_Xn+b^y6&%l=kGCj{EiES~qxZ^_zNJkmYgV z>iU!IdCR-5f0?-c(gab~3gna(;O2Y@4{xyM!KABRe~eOlt9Fw-h7e%qu^JMxpJois6QYO ze2Ib_lWF~2mX87)HIH~7DNfkhR}gtL@XI=n^!9U}v&zo;y@?V#(yZ{aTWN#xn{@^afHwx2b{dezVcAa)QVt2&rgJluQ(GW>0}DRd%(3J56@q+4ElQ;R*TFe?EFY zcg3q-S!b#?y&~@LiCs4}sDO+#|r3?xTCMf7N=& z>XzQf7P}ejihSh>YdZye+_QTx%yqbYe#4zheScNuj!ZA_6Kt95XY47z@$|d^N1Kkt zf(grN*W5bzrfor3S_Aro#UPqy9HG-Fn^^9t36A1clIKcp22F1#)M_es?ot^7C2Pgei` z)V1)DN$b;gms_{Fnl7hi%d_4oi06&m-6DO>;kwC{G9biVNHHTQHk%rd2{F4y6(C%i-Yl+T$0Ucf6sddBive= zY99RjYNqtxd6U9a1{cONTh+QP)?Zq(^kC)GJD2Xi?F|z-wDK$a&9aW4I?}3_?wJOf z%{~yn`;C*;ntKLuPwp6BT6ZPC>&@Ao152i!&-d|6si~FDxg-^sc01_M=PV|knO}a@ zMcnl|{M6?>gVy6^Ybs>dI^Fu^e9HFfK9wI4u5b7|zigW-p}XPQdIlf&%}W+HZ#wmi zeO<8SUI|Bw>Q$3IRJ`n*^sY1Fa`&W*ZQkMMv~rxJ7Ej*G*sRbOeD6k!$ur5Q?2hE{ zQ|pC1Pg{PL*tq1qVQ;!i;(Xr@``J@2S>BO+IOEi*zHbvapFdfq@@b#i;^v&w6MxQX z=Bb%zF!^Nt9DySR(;rWn7;tjVTM>`h3)e2(=B8m5I?eF?GbM?t>CSyZ6JBQ-tWWFQ zHfhDb;$GXC-!v966wdq1nA}z%H1BUn;jtYv7f)QdrEKS}&Z=KWPb=CBT)w6AR;R2> zAnI$r*~;F2t@%Q3FD~(^PWK%b4bUkWnr9&baqlVb`*z6F>inS!%tE z3SPqN7i9P*ws?-!dWQYKh0Rv(4T&)j)+!7PM?$WH6H_H~4Bph9ubo+ec=?0sBt{>x7t}i+MDU;{=k`$JgQ;ZG2PQ9G0 zTKnztrb!3+XDqgzE%1`Zi!;=B-C@slcI#ZE=5mU>4al_A4)A0ROwY8937*Bcv&7w} zp}pQH@}E~*y1T5b>jmCy1Doz2y!G16uVyq%)^Sv|d7f<9bYr*4Zf9GUy%Q^TYIN>- z9eH8$f!#-9!<<6A_sp1bAUxZKL-nbV%e`FQt?e}oo_8EoV^?sr&-}8?eG>oSy?<73 z7Qaz_>Y>%H>bWrqeT6@hW}WVj6*68UpIWt@vrp;L5zlTh4J#?Wf=?ekF4>(HTN|rv zqqcT()TMNth5eIzj`_L8H4EkWX>m-wV^Sk9<+#zwfn_RLBBli+ME z@l^*ie>6{Hsj9vfB9IypzdmQ@hU-a@^A^YJ%|0+`{mZ@T3+L@Nk}PK3=)Yd!6yLJ* zdrrw4zu#>T;(zzkI`iNgyZ0C@zHzm0W<}(D!L+Y$maLj|sr2Oxz43;$2F zxWh74PDt;)gX!Kp_qh+|rMT=<`0Q%^zB?rGimdp}tvOv*a~ZBmb#Bg_t9wV^c#hoV zEb%=y&vcmMGXEQ$tn&Pv$EUT@X5DEc&!emLSFJADo^bU_9q)Cw6uWGebCu3ldK;fl zP*Pj@#yybnh2f1UE*>JME=~@$Uuc`nc6^T>CFFTfBxcI-RY{EBx9}K-SJ?(_}k}E=5^COWr=C(RZ9h56-MqU z3p9I|8_5uNC_Vb!e9aXx(|jGz8x<&3oR~GS?|Aox0}pl{4`3EOY{$vjxBeE#NzFdD zih0vhT@>_8ME2DSY~4JWN4rHsP5HukFT+d9O*0&LdSpZ%nLclM9(clS!Y}7TkIO0^ zTiO*R|C0Qdsuf}%y<2Eii=UwJBRS>uPfEW3V0w2y$X)re>DFDXf=eQEx@<{O>snq{Ij>*2Fza#kMTz=d%O^{i8lGEMzs88Fe$gr*kqJ4u zQuWR3V{8+XuI6<9Hr@H8xO3Igy@^*(9G}2qWxGV#g7dDikYEB=%S6j3MG;pw9bK2P z&Q0m~4kJTj78@P!C_dYQNjo(crEjS_F#bZPkPH?e}QnfoRltm#p3)9Tu*eaX+# zRPv$zvd)u_m7cHbTJ$I={(0%atPKY@vslGzh8*7z-)6p2WR>*iQ=3+$zV4S)`C@8x z+NW~Qb&eymYNu3`eUWn);ZMK!bxld6XVkmyJ&qsxPw!b(yME?o*~`->evk~0H({Lm zy07vs%lAz(fp1O)u=<{!GrwWYtCiAIpBCQ?ls)xFMrCosnSRd|F@-1npFLIo{AqHf z>W%rPuk~s?gD=i3sLS(;+Rf#|xhJ90XKUtxspZN#{0GhEEuQcr^02(kG}a$y`X=7q zz;%MB{L|;)Npi;vDjIyMjDOB~Ub<}>-~5zwIc%qWEMndZD*ySqnS*cA(|fnL6!%|X zJN;P4OLgtp)6St63TuDy*42c4{eR4vMajDIsoRrZ3{mGVf7c6k-s$(gzF=Q1&z|)FDL2m5#LFg9V+b6@kRL;d+*jZ1ac zIe6Uft~z$`oa(&@bB?QrKk=CeMYiQ>NSa#9$hikBYtvrcCRk}U>3+?bcmE=8Ry=dz z%$Q$PcTO^MlDw%~#-1g~pR>~s6g{b!C-ZrujcUIcS6JO~sR{G_?WHZR3%$3y^0Rr> z_SQMxK2LHN`kb4w{D|$oG84`HKWnajoN#pG3&(u<^B-g~xIOP1T1Zb!?+iaVQ@%Ih z?A_}8`CklwoBJ}J-?N=7aqDU;3%5?s&0lP*^0tMrTXXmwED`AU-O{emvgNYW7oCas ze_uRS{3>tX_Q@QVQ!dCyJlrJoQZ-t7@6N|3Q&Zlx^Qb(JN}HEj{@44(Mj5-sKSb9U z{n5TT*J$DWm8Cm;)S4&pUgobn|D@1TaL#fe{zoC=Gx^@dYKk@II+=k9sj zG1X+%P6I`qx$Boa?l>%OC0lU4LS&}TC({}of6aaeB@utc?xK9nPK`r-oU5j+x8nL& zcXi^A%M-n-^6dZG{;F8x!ZX8rsteEa#iq|TPyE5P$3wJY?wTj>@42#NDl{!-_p)hH z-r$wtFs)W5=u-Ik?-n!Xc!il5+1`zumbu{H=2VV1e>2L@1@o+&bB^6)kCWs_5U&PUqEZH55F0X@gY9^l!G0zOv``Tn=_!8gA({Zz|e>%UH0UhT%Zv^K=0 zv%O%wgk$FXZAPwZx6jnnnr`j>N1|l4ptbKKc8=-ure~bXFur{G=Z{V0Z(savf2iAc z>B$zK**#URHhD z{In|MQpe}eWi3Aa^vvtuulQQL^=sdn`P@;Q^*aNXW=p3`%3XKyo#2zxyh}~v-gqT_{%gPg zW9zN?ez#sI_&(d*w(rUd&QB~avu%(3%{}QSFpKGt=XI~CY@2SB{r|gmr^Axc|F6WS z*}g32J)FMw-aQAYovCf-d)B01x~=hV#;$YyYn%@~Kgjdw@2u-*?#{cr^sLZyp(oF; zKU!@Y)tNm{BdPb~YIm*O%>w<8`cJ;zou**VRPPh_Q@QxatoM(ui2OU$WB%rSe{z1m zW4?}@!n==KH(gl&UBxH%sd8?>g!g8_hdWMPxvDE{7O&oxJ+prAn{_Ewsei7qef)L4 zTKAhp^$gDGj9=oM)spf>FUOtH+VD7~+V04t^*gv9-v7~&!!(oQ&#jrW`_9hBzCiz7-%mfs|0PlSyqwy9s@Ga9-2B~5QTrv!rXOG3 zZvFC*d2T0{ygu=j=FcQ4`z?#_t=!N0sCABK{y)*PvM&3grYAr1{=GMK%9(eK|5}<9 zITygh;8HFK?g!?x4AojA|t zgdY94TlUMoX&Zj+++An*M>_IL&XcG0YL_=&*!1e|&FBuVHedbldog$J8_(dI>@B}k zdf&wVS9ZNpo!S(l5Yy$tdWC=K{QN~(k7lrN?k`pO5Z>96D7gO7*~A;l7Vq~i{I%2O z)C!%;{+iXfF>kfyb|ugE+8^Kh@Sh7~&J5+nN)lH(koa*nRKa+Pt&; zK;`63oolA--SynIl{IOaG{emw_4)#;bC0=aw9d>c{+-nsab9nB9P0z`-@lHYO*t}Y zvHVxr>?3^6vpRJbHlb!xI>)zGisGnxfE6=etGwILqRXqK-@!Q78B}LY{`IAeQ&lG$A zXyHHB(+~SIKk5{&{8aUHk@}bKGX0_lT`R8VESu!$=szd1{i(hB;(A}L?>(7?Gc9^L zrc}ELIIC?w{rT#zug5nD>~}eJb;bXzeJZC)lsk4`b@RRx7H)J?-#})?&X2V%CtVLF zRGs;tWh|KAuXwjvT6SZ<#taGXo&KS{JD>k9nI+ZV&hp`asK7IuBbg~heO{bNJG}SY zI&YJflK3lXd+%iX9;cwwFxtW$4)fc95e2KL_+6xljH18S$Bu)`tck z?Gt9wGg5uMUGDUy_|vluXDhNzPB?k?php$cm&cp7PueMesr;?H@PpW>(9Rv^fwga1 z=h=kqe7mnQjIzOvM5v(4!@Yqz@dnH*Rv92~BBecD;` z#ak}e+?CR`TYP0Phfhqnrso9feYMF!r+xEZ{m}a;@Q!th-`eB%UN4co?5Xtd+^>5o zJ16+YmV5sGB+;i(-xMb|`zIF%Ch2{4b{ykkbHPut7>A>nQoWGVzpZ=?F zrm!I4e7fsI4hf+P+^R2QoCR9{?42i>6#c#E>64V>Puh=Zs08$<8s0Kp;otJT-crua z)5WIdsoWIulC5l6^~02Hpkl~z36)*)_f~#g@U%F z*{1jTDc?FqPjEd_nN1Q*>xKPJNk8!t}+y*apOkDNK;v^ktTr?8XVkM&*VImDfa<&STvy=JP~k z?TSCGy{U@cXMSoWxoxRv+Zzz0ULJZSbf1uG?ox^5{Ttaos=RYwz5V%$t*4dmUJ#bO zmU=3@qgJ{5hTyGvs=5+=8b3G9-}&9$Rq5-_?^|;pzX_CE+55(3we_O>ta{dm>F++J zoS(+3#!^(l z^WoN^FA7i2s1~{0KF#-MPU~(9+p5dY4*xQow^4c8k*$pVKke#Lb29lKl!#BhCM$W^ zF3KpT+N{N~(x`}E5P)a{b01lle=x=>YZbntF$(UBe20d`)d zS8pZQl<5(`#N|LR<{#J6t3Js(w{ zevt!#eBwX-59_?z5w0ffTC=$HsC(%4F#B7acLLc@?x+usaSY+OWYd?kXD4%q!maC{ z9%l7M+E46#UGBm8#7ps$TIfEudw=c*U3~Oq?vbe>Df(60E}Bn2HJxEM>m}>Qd)9JX z+G`cZ<0?=T)igykyl#EmC7%;p8?Odm^=v*+GyTikcXPG0Izs>USY5G6=&80iAz8OV z^6L9A#S;>#CL%7?*W~_N&d* z&3pIlP2`umyrP{mzAh}9=gc~@QsByc18?15VJ~XR{#A8ou_m5-BN)R{o-3CvN!s-GR*$-dP=^>#oymP$?jhrY+0Ri_Rj6LwfZJ?wi0m< z+4dTJSC;y7BWD%2P>fJz=_3pG=bDu+#@{~#O?)|B(sjQ_%$1UL_q&BkV;?&}3J# zQ>75!g98Bil-FxF zPycBb^=*d!To=7`?f!U?r<>U>?)k9DYOyWHnnUH^wAPFCweFde{Lig2M{B_hK{3YE z&5XxdRLYAf5 zx#$VcmU13{n(p2vIJ?K!R)Pu3kcof#{z zLPboiXVJkXht$VbHv82Me$GCeDwgC~ab>vz$L!=8rzdLsG~6f>mce|ua^}Hm3zP3z zEB($DP2JR?S0}UBx-X7Ny|scE}DeCeDhT{n?1+hStiwg}3s6zWA~r0ca4#vMuwncN`^)$g85D{3fq$2`(m z8PD?9D%4@6j49v7W|mb8DmMhBY^yTYnlb17Gp6f>Pd3;*d8pXDp112l)>5%W3nOxu zO=kBK+LT!LcH_&xf3w!ay-TyIHriCPx3zM@^SqNS&AGA}>3YRTr1&^6XmeOgsk+nY^ubu5^=>QF7S zpP0qe{`D*?TiDb6bJDwh*d+zGGCeStGG$Fazm{*#uK43yjuo3JPh0=NMaE2Pnekbr zu9EeBcjW)Aw4SH(>!Zw@&U?y5ugrJ#$=6h9dZNYJ6TaPI}t(R8|a~@wbee04pCHvz-96ma>+5fA%@-67uN;u{+y1*_+{yRk@SKdA@}td07-#x=0kboYtQA3Hc( z`glKm7To^T<&0^oBBQfs&7W@{XOz5~X`;3K!wjD+{-h)Omj>D{owMzP=JS`~6Ibkf zT@q~hbket;r{@&h!<9C zABYDi&TZYVwPa~B=OfOT1M^4NJ1MJw)7_*HP(A;J#^Gk3^{y#eR$hB; z3O{`-QWlXtY81oO^!RU=m_3Jk?H?V{OOf+tX=R=bnNo5_XrY3Q{Op^j`Id3~Wctm@ zl(wnr&#|zmz84zKFInF3oBTE{n*Vp<>9SX6ukQ}{zvtcZmmETtch(;}CGGnEPwT1A z+h%U9Z@+!Lw|olsg9uA@*Q{KYhxb0c)qJ!{WZ)~C?Ys~0a_6HTm{P{B}G@p;jF z^^3PpKD@<{R{26}>C>;Aj~?F5pTXt3D`)xU3t%Ub%0i|%UD-1I-BON7D;h>@W(5< zGD`B}pCdE-&eWtFb}9YW=3>^i{lGohd7hH1XLr8RS!!+bdG{-~vbX;Q-u!#-9&)Po zzJX9dVfwM7&Y6zsf6w3Dn0X<(vY?@0W)$P1#P9B(PaSrddm-N=C2iOL*$#p6TCjk>{h96yWAy3Vqc zy_HMMnzk#W#&qA*^kWO;4*U2TcV6wc*}18v|J-M7^FjyzuwCC*PmD~H75ILho3p{j zdiDa9^D@l_(>15~BtB0y_FPx$6*z(Ojm_+<9rjj#51eG#7Gme2ydinV$foc`{HNW!@X{z#X z`D5>U=%Gc$Z=7|L`^M{?}A-%=F-?AM0!;pH&i32s}73{>XD~_u5%GueR>A zDJk1L@!;|e%|CR_o_9^&+_LzLW6i@C-ZD}3{!^8L&lYVItiI(xn?s4|Y0hEaH2qzy zO8ztbPK0beBk8t9)X1nSqB2Ef_Jzyc=MQ_=E|+}ruVZJ~j}v>|_bYMumZ$W*ULE@G zw~CL+N|k#d#q-MbJyh)cN~#2m-&M|%bWy3R+WS1$=ko8be^#B-XDCWNJ|$R>eQ(7f z`;$fedmW$XazEDm)iX(ULSenAp-Y*M#Z#q;-~V3y!v03>VbPRz6_?)?FqWv}8}H!@DEdZi1mJUT(f!V&iXXAD4Ld$rrV? z(;1h}u6mU!99XgB?@5h4s*dY+AMe<6-OA{h>y%rPD+P6%?%$WUYxbygYH+#zO=a$> zHOVf&x1M{|IGIPYS>eQ+nwuTZ)7P&#mHt)k$m`|KX{URyMyuJyn9bDP%W`RDtcusY z{=W(ji%u(ii~E$ET7RbUZ0Y1%bzYInpMJEHVyJJg$Zp;e$J~D9T(A|xBbh~7zL}>B zn2lQ2tzBmCyvHOL$*Ur3@%5!-%?IYigadE$kcH z#L8OLuN91GySD{RExO*BzE|M9Z;k5B85i3xT#k(MRJc2N^Yw=x#n_K-uAB7Y%nSJ! zE7J|mF}`}a{lGVOTic5dFI*0LUvPF$@U4KE8oXCJS(dDxqI6-!*S{AheEP<`Qs0AN z6+7O%T#^L40T(1jHKos&2xG3$^Bj(*V2jd zfi7Fw8%uuOzTAJTWBKu?JT0%z=BG@ndVYOz!hR;kiYZzT%umn#wD{&<*R65^3Xl9( zO^esO8^2b;EK}}C-0>qJr>z7of8WMAoqy45(bxPz6GUC_yt!l3QS+i{O_9A%N>JqV z02^)be?=)p{hxo?cWARrK7PUYDm{F7ulAeJ)Xvnk=6Xw8j~?@#w!89nlS!TT zjUV@S=j@U&Weq1@1}ZfbgZ{6nYg{s^T>~fpHG~-ZMJv6 zYS+ZI+xJUVtvB8|_3m^2dLPcye;6;#IAx{QS~Gd&b*n#nRNEDjW6Ye_uYDqGKJ&Q@ z+k(Aw9X9bOz1`$o@O?qc9X;t!i#yjf30)JKs&h-ynm0bY=x$(s*knh&?^Z7B_dk6X zp1*l-Pu1Obza?D!V_7-{FvebKR#;#I$5s{;68ptYd0w z^vg9al6(Cvrie&;-xcpzczbq5UjJhtxW;kcz0OM4rZW{bDuVuJc{UWyTcFsq)XC1M zdC&bEmzfD355CV>`sKVzfSr({iT>ZqZS%K&zg;~+|ERzumB-a#b6xJG3L7?@c-p6z z-*L@P;Ar69MwYtu(Wmw*Hpb^g={dhFd?F$ALv{JzS$RgKSGU2bjt zv}%s;jqZARmj52RJ(sS#J9UoB%Oi1bj@Aj)xp_*Q(8)Y*y6COZ#P_bD|fQp za^GKbQflt*Uu@xVONZZok^la0m)`qqKkG4HIY{J>ws~YjZSj@go6{yuQ>&fR+#@)j zai8-bXLcCmTKkNnySyK4=YU>1FVkmE1$hyTU~SINr<=d-LIX|4T{my zyc;epJngn@kGP=t6*2jh=LHM>Ua-GCek0+Du2b%ky{Y*n9p?=u`ffQt`$G3i-6=<)pHmW54nlN*LDqFLPZup6A;bxWd z+0P5gP4^1EG@UDBZB=U}+2f8?*=Z`avsZ^D1| zxVmMyM)+i2SNe5AQB;0r`<8uwcJ02+609=+RBB4mL_t4F~uRd*)w`Tv?$2zlUpFnTM#Pj`UzTers ze0TOIqf0eEGM%|^zWeg!#_ZD_`ZDcJ#}@xvyZOqU6F)@$f4zC=MA1*%vg!VN11&Q* z$GF}67Mjj6A*@i&C4Hr9MyhqYmGYJ8XFqVI^*@S9|H)HdB>OMS?Y-@rlpiuuKNI_v zmX#=1`E|?BSi7V$Mc^UdvZH}U7DjD1GE;bFf63SwGh=`2eH-15rOQh?ns2^PKFrK6 zxUZxAL!QCPImEO3YqTXVZZDfy z!C`oIUk+2$RkuKkwOe*p@!XdEx@Ngd)0avv!`W?OdmCH&!itzVb5o}zOuk?w+VJAG zpV2&@UG=FhUpHm`zZjc#b84%C$lSndTNls#f8>=y!t^Wg_xO|)iuOF5DZJ%l#Fr1= zwJM!F+s<}!c1^#(>rnUgb%Gy{O-sETH(4%k`^gTk9O?BR zcb2mKnVn;Qs$}A}tT*p%qy^)5ZZk4mx>`tA`P{ujzM6j(7ytY&e(#E7hSjoAJAqgJ zCOYr6bpNr2>{Lnouaup8&sf@Ye!V$wWXqpe@#cGR)4$dz-C&jedWET)*LeQnYwI#E z7kAxuRS;jjF=xjo&3LzxRnz+f9Zv7KvtaRW%^lai#M`>>m-X12a=c?6Q+lphP0`c8 z5)%*2D!;}Xzx$HRL?_#vi1m946#{4b-V@OX4wyf&EX~Bvb(`_(a>v4Ni*1+qv$CCZ zeJvt%A^d!2Zp(`~$G$CH{dCSO7r}zM{SpcC$3D(%EYqCdzw*Z!1E=W)lR8(&u|D-k z>|~xfW#0PC*N5f!?M}M7JT`my%4pu>e&tqGXN9PDhg%B1-F8!IpO!gm(y6OI6@KZx z`uM8Te4*gJ>eEv`S2Z`DVeq}Wg)Q)Na@5|=pN6cm`>dyIzV5m2kYm@}c`GBh4YG5b zzCT^m_Vluf%xdXa$Inw_|29ZyQl5%kl1#_ zkt=J1GMmBD`v)a1{Hn-2eErJPqjJpOrf6`wO>x`8qByC2!?yIPEstl2C`3KE#dYZB zZD*s_SEg*8GEq|*BtNRz%DDe^aI<*!bcUV%*%@VSI-Ru!3dWqusqx`PN`o<2#Rei^-q5?i9YA+cQ_1itGKJ9$mOO?s&?QEs1X@=SZJF zIFDI4!J*XnpnwpkQ80t%>1BS$E2f2d8Oh#u-o!T3vt-NkC1-sWC4ajj)?)DMgYR$W zS=AGpbB&bQRw|osS9>dV--0o2&BYscgBf1_V|)D0mEBYSZt#l}^*0xkO`f2(@!UI$ zkoqo(17dD=(+dU8Gq@jR+;Nq2*6NvpK5MQ8bg*!7X7IlMqi-Jc=e);9?z3uZlP8@& z%DBXA`^gL+&y(9%sdg+cn3OkfV#wD*CZjW-CqDZyi`k{S@5Dourl;wyic7D)R{s~3 zcuR5jm1dESDS~~k9K0W1%$j&r(Vxj|$;;(8+jh6nbs1 z`@s{N4bH3nePMGUe=2+Yvb)_;O64as;~78sDczYd>s93u8Nt_9c72=P?`sIz_HUBK zg{>a1r!IBr{m6ga)$HY!)ukVNTOq{e?B1@!AMc%-9I=+=k>dMh2Bu%PrHapU4QtRXx{>GO^R%!z z{B7mMBS)sJUz{cQY27)sg*{1GtIo#>&D$?}-X|$O@ul3Sc}o-o)_y+M@lrFM^|hRF z*DY)Imsd+GZ&!$QEV`y3_c_zqMo#+tqV;L*4Qqhv-ks+ z1;0?8s`AE6)v3AY-2Isft{J$wjr9>h63MeO~KMbtpUhn^^Ft zFmLJ9b!%0e;?`euExVYiE~t2#%kth%w-wcfUh7^hI=@PAo~J3tRJ&{|i`*SAZDs{# z3Cx@)7(OLZse3P%c;%JM$@3J~U*25%?utTb)i(b{LQ87DD(?NHa`yfYH=8+c+fG$% zQ~Ks!A8Y3HSn*Z0JKwLh9o5$rDt^!Db9^H`Av}HjBBhd;r6CF zt^R9M#gXM_XUsFSuCDsFYyOeq17~D*PWL&#-~_HqOvlyLxuZ zez_x?85I4Dz8?ym&QKf1K6#DW$4&BTDxb|=xmGMWd1Aw{t11t-ty{a**Pv^D_sb_U zq%)uN3cjo}-XX}D@T*5|$7_?9Ct&#Ix?YZS@=4JPFL0>}` z-BVjO?S<~49bfd_CP;3&xkcrwU4r9^=UUZ8j86hP+iP}8hRIBLwLV^8)%klif9G|l z@ono+@pv|2b&2boK40z9NjX6RHuHM7oH)4UQn=@?nVJbtelYTC{^b7{$^uiioG zorf=bF#g)?)6$*4m+6~`!A|?lEANYIChR)Dwnt>8yMC2- z%{ROCOXbRM6}2T*q7wC<|M@-b1ukj$ybE1?V8Vu{JGIY-+Su>y3HUmrRL976`wKhe zxT227e?H7^dHvY^>TIW3x3`=~3g6&*#@eZ-%&m5tZ?e7QMY$#0Ki)WU_sqSliAP?} zu%7??rc!%tMDEqU3WbMmE)uvTrK`o6GN+gM;-1?q4Yv!I_oO^das1t7Zfqbc%YTxm zCO|?k@A_K<#l6~$s(W8sh8+mx5DuED`PI=e%CcBy^@CkHyH0K9zxppnH;JU;62(lbi)_@8+#zaKBZ&3)g4N7JTlMa*#r!J>0X%6Go*x;WwN zmpy+{#Ab?DpE+LWr1pC6sg}v|lOj{jESppE^ytK+ddBN#EWXQdM0{(E@=`f16VCgU zv+`bDy}qgF#Ad_0OR}?O<=y)pzUZC$%eQ&CKc_ZxKCdYIzU%#L^@&I4dtPItDu zrp83AN#Y7V=hT9N9?S60_E7YjlydCr67HaD%q{a2eOVtao_FDg*Q$mf#Sj0Mh|G+8 zcJF}Jqn_{T@mEwV>mM|^%LsOun4XH1g;x@_FWvT%-KMnoQ?tQU zlV2J}-Tm%%29k$rT&F$!v^rDBI3++TSw!Y-+V0v?Q~gIT3ld zS9xFdbHqSW_o-_GV!ZMG?HhVNLRqs48VT#o< zClBRgJ8OJbbDx+k@=)vuze1~px>CCc^Y@~2QudZS58o)&?_m2HbY`t}U-7-puEM&v zkxn~4>{Utg=1W+luwSV9Pn_RR&d&Amp^My3g-=~Eah-Qi+neWBm8a__+s9U>@lxy{Al)e(XqL|+fFPqe=c1wA9TWF#}50yTx;g(x(KZPnmxIDpSqA^)pv^-TUZu0 zo?PaVlD;Q>Zf{PpkV=uo#PIUfE!)GlUM@T;_<4(+wer*&-e;RvmF?1NYw|I7I+NaX z;kjFfdDO&>>+T#4xSo2t>CB^<^G+0pIp0!JSe-mweresVyoBcrd!P7q$S+aMo1;?R zyCa0Lf-ClgufpP=YJHQBDMc4OQqt*Ky=wL^p$*v=_Pn2+^`LqYM^fSKYn$Ijcihf7 zv4A~Z@!whX4XJmxm+^LW=YL^r+4yYElkyA7C)o~WPHz!NWu7o8V)e_SLtfiVcr*Xa z;JB3a(KjIY?9`gGU9l|((!~pR_Df|;7<``;IbWmL%y~kC)ym0|bD17$cNpZ)T0BEg zTw&tDPyf6oq!k`N=de~JrNC_GqetP@moxUQe7pDt)9IM)htEXuE|hB5=hk_~>@xR? zvj3f>7Me=#GNqSF=h`Xks!-H(n{ZRUWgm!F)%Up6Zrh1N%oBw_30Icxlkl>udH+ba z=1mfZ{k9K0=iGTsgI%6+schn?Jz^#J^N3{ke2aB8ZZVY?6MoftItQ*(eYCDu?;uO$ zV=wRDle`@buY3C6`L|+muS4~<9@F)kLdw6|?7!J~=GHoX@3sqe>-ozn`JVrdIgwZ& zek)J9WK9 z>S;b*vrYOtL{%mVUa#Hn()HnM<2I&qpM1V_*l64G$lgr7wIzR71J_M|iPGzZf!F$$ z$8~n?zV>fT=H=k_E5cJv zFYq7Ee%rpoaHZG0w^F zezs-h_Nv_tV!jhk@;fbE_RWpat({HrSA5-}b5=#-i%!g0IWzN?*@DuK@At0UdQbDB zAH&*d3Z)gRMT1suU)26NY(wVDm^W8EuQz{q9-D5U_F}j79XEv?yC0Y>_;6E|V~U2| zMw7oAYQ(ETUEALOVk$Uh+NSKd;>+s~jY9X88x`I-di^QuG~To#?u*2iFR3#ex;z!{ z=QBTOdgtgd;Tubs_*_e7w)-Ma)j8_FavEvdXFuDsV@3QWW|sOpYj-R@I#q*R@{59p zA)nBGmHS_&I&}QxwAsMDdAY*8CYu{OrgVzf{p4qi{C?z?SkaB*bqdR-&NzDH{jZ<% z`o$+KE6kj$ddjtaI)lgJNk$#E(;5{Piz}=t^i+N2kT$n%i)hRjc*$8`gxcB!ySTE}iKan~?X%wm07 z`+9E_?@c{{H4EmHn@)9KwX(`rYg5hjMGh+p)&;rNT#jLk;ETGY5b>7n&Ek*l!4pes z-S+N$*L0-U%>Pl%_q~-u*QIKEFCAC+a89Y&6uWkbJ%?c&cfD!#=8|`tzZ~AuUT6G8 z=bQ4q*(Z}Yir!B<-#g{qd&8*4d%pKl6uWrpu5Ec*lTfwS`N!L(U1w63?rq+v<>2sT zr{U#$h0KlCC11}KzP)tq;VqYMH&xl+rG!n2*(J>J-S@qMx`AlF%%;gR3yq%oefx4R zyXlkVUCsR6_fI^uQTW|yyvD_keKEtNhK9pFSKio%m3-1$v^8Q;`LwH2Wlw5Nl;7ET zaI2*oyjefTJo@3&1AB}+j2`-0JlY_5dX;g}joyBRkobgackYzlvz&84@7Kf`xl3$) zr!&lRE}2*xB|r81371>z^?W9r+WA)0VfTwGm%nA+{UtiRi{E?U2bY^~X0G<1oqFkq zW=HqD>pGuIXZY=s$kEj|TEB9`>e5Q-zHgC&-(pYOZqvU#|CxcK&zD4Yh7AX*mkFkn z$gePP=P-({Kg3eR*RQgn%`V_x`o(n3``JxKA!0{L<&QC)D6%t2<_$gXRBml#_21K3 zp;lw=T=Cj6w@L03kMhrVecctKlXT8${+H~Mke1h*m+9_OT5bB{k8otiNx$n8zO7@d zy>;*Co1;zsO{Z4dh!(v2tz+0d%iSz!^4ygrtSj!Hk!QFX``+~1mZLAX3LFT%uivON z`O|Yvj`;OEnC3j!T6N6mW~%~2QvW&IDSvyUeq7IB@R)xn&2Q(Qh3ZR9H?vQkcT+Cq z%go!cm#!BsJr~+=)9qa@Yvkf3=S&+e-w9$*){SG>y2pEu+rA8)6}t~C|Ge;Bi+}kP z0h1X`J^PBDdsUsb-9BeY{2#0d zPJyi8jAiOp%4ZhDFh5%Qbl<8*o@u3}eJuBPXc=C<6`%5Kqeny3y1EF#n8R_8>@U6$ za{jod_1RS?Zlf2g>^6qUg`eB=+GfJeldQ3Ze!KMjdNyydk;ssZyDq=qKV;P^)#Va# zmn9QjdRK?tp0lm3e2(cX#loNLKWqM6w4S%iJ6fJ8NcVlum-P}&551?Z+qbOltK%XY z*Sb%!td-q=%+~VFE|HyS_W0T6YcJXqg7;2*nO!oaWJ!RZ({Z`kzBk*#+@p#Qda*yS z+|b+GH=)eLUAFp>-qcb7E!}Lb6Pqr6acYzI`?vMRh9^CS`?!L(tlpr%nqlPyCN8c= zQ?~Z!Iqa$pcJJO4>ZZ$Sq_fFJQTJSuu(I-H)um1h*RKEh@Q`bj;<@gkyPgl6u0}gO z722(JzB@s5=IhPfulA&frPv-&2%ouUTIrmm{j+y`eq||h^Qy>Rt`Ab(_I0oAZ$F*H zV$Q>KQF`eb{el&D>SwpHMb0}_bkBoBU{T@j_cDui*nNF}pZ#t5@7|EE>eNcBwq z`|_9J^%wk!Jj;2H8Z5DQxj8c|ZpZ2;`=(xbzAkS&$Ilz{PHGx!H&s%D~&n_?| zrlRD2R?*x!_UYKPyXBrm@F!2K9B* zS9CYV)+|(b__^U;WYfdzoC>SY`0V$aaIUAxMc{Fz`P&WMa|-S;eC+SzJNtrtg|NxC zyOUZD%gP!b);V;fWLJG%>tb0}8$QnN&q|*K?|*cUTH^YxN_s{X*;{Un8bmb@a9o(Uwl9rk$8NJpE2Q83Sn}#=&(5C18+6<{ zvp(J4lU1C`@q$O@vO`t+)2(ZaC!F!Uy6CjZ>g;E=>v$gd_MKkRlB#WdTV2n^E`6q; ztmBkJ3_^}EKMy_qeR;>duGLHKoImM$>Cuw4u1ah=kvHpNR8)EN&&}E-dHBWgxo5XD zXRJ0Y*%`|7!|6rMim7D+v5u=e3O#kd?Fo}$>T1qXpQQLe%yNFymv<{2uDLUAx4yu= z)NJRO`ZZ@ZbWfjbxbO{|d2iSe)jyjx|FBBVDLNWD<=mOb^w~Y<^)jCQsCulm%28~; zu!98CJzyAR^S`M~kV`96kX|G_Ro+PYsruxl>sEb=FOp*RXla<8HO)cE{Kfx2 zUJRYy7Ui4?hjyP)U)n2I?YJpV?^5J1g}wD!LMayt?#Ud;u{}|hB`mw|`kS++m9xcf zhP~@}rOtN6DeBzyS1!+v8wDK*pO*f;hLy}FL+{md_)MXnwV zO`858nBC?2dV8PWFV(vK*Xi`zzm-e5vUO^2;^)q09;uByT-$HlU|n&+>QcPPr-=#w z-`tq(`^L77vs^INbIsp%hBwQz!@kU29{f(j%kPiY{pZX=j4`Es3E{u@@GaSRR)RH3 z-t*c6fvHCPo4)Tku2q_OS20g(tM`LQ@_uf$%RpS{1$>%X*%)%+h8(~jEpbIsf4uV1EA zlcp?xI4$J*Vy2s~gBR_{{T=f0+0`8jA_Vuf1;+^7mrOO>Jkz22@EZS=tu2CgvajsV z4vc$!)ALbMn=I4XuiEqFmZ@g`D>MpRm#p^k-`gkI78|S{E-RbnbDp>3mExn>F@9l_ zJbtD7?y&iLctyj}_xnyse&zlzz`c8(zfi{8p8n}q7*mfiZpxZc%CcZ@Eyt$m>oV9H zUY*=@&BM~c{`ngZ9h&bvPgajICH8U67ft#6 z*6OCyA;CK_)jPenmhtKzKQA?3?!(4k1#6fi?2b0-d}AnHI91`$dr<+-!!rb`)(Sq> zdsx7b^x{qOK~A&e<_)`^ew}kzx;etGK>VX+*22r%Zi!g3SI$T-e(TyN-qLwI~ba;vTePAp%u@K}rkw*kwP!r7iL3{K5pUMsw}x95yy zl}M?)%ALE%@3OpB$zSsS$A*bYac2A4yErzeO}}z*-PV}Taw^9rZ@JyR;M>}B+tM7T z+`VlebmpJ)t;Z)XZ_d7yY{Jady7NlW$wfLdyx0C)GxJu{4XsU=3oKte%D!_nk-;VB zlF@U+*)KQkUl^7A%aB>L@6CedC6Xl@&iWejyKDA*+uY`OV8fKTD{VXaShP=lythR@ zEFJsnSC6XB{5IF{ zO>wpL<-YS>Jz42*_Y^usJuMFZefF2(8gI#~k->%;(^?JKo-E?oy{T@qvgF}x_MSCJTlQPG=l3rbG2u&} zOKBaqDE1Vv%wG1%%G_PJxbW_LaqiFwV*LBp$%q^LNV=_ax`*+5)wwQ-d+B}IK8LN% zckalNiPJm$)9~G?jlq`6#m&<%M$cIJoO99R;MjHBk4bFmjXL&0Y~^X~yDR_kn7)k( z4(FS6b7Avi$CEzO6qL&^Es1q~+2R;-*XrQ<*KKnRxO_ZjHDs>$D%&K#*Q!fc^7HYY z8F9A9I=}w&E{W4kwOP0RTj9;GQ?nzcIQINIqmifHd}&L&>Wp3Meia>3xOaHr`b+Dx z%9YgYcbD9}$~`AS{(5fj^7M}h;n!7k-&Z`*yM8_T(43ajFRmHapZA*@roBLh<5%P( z`Aw&vKetNfPUpXwI#uvN*w$+XFD=$j-@k13WVdyV2h5`6DlIxL%-$I#psHE5X~a_YBn*PZ6p z=9|y2ax|@o$-i|nZ~mkil1`nC!c}W-+Rk~A7e2j2$kY9I?&OsPjZc4XSd+xDrv9DW z)#6L-d-h&Ec%%Gv`5}pW;%}L;IxhHl*6Q@H@1D&oYIGK# z-u5x_G1Kn+>E8=?^6Z}TN>#w`#iy;Eo^{g9aStxr6{=YVy;QL&lT4XWu|&I$e>P{- zVy;u0Cw*~zdFA3Ho;}NMnASB!3C`bTE_HET^S0-VPcClSl*+zRP4%VzwJo<&=Vtfq ze>Rix#!T(hruB;*E^SB)n5DR$_{;mVD1=Gh(yp_`Umnl)%3QQhp8J+~p4Vh4Po57reOR*}a|=l*e*S z(Cl4yAz``6W@RDE4M!FTdA2e)UHC0p^R>uPZK{Hca(E}BYMYnrMUTAm?lZp?w;e8s zv-6vpyF^*U`f>X*rH1ztzv#0Iz-t7v# z)sD}U%Ef0p zx1IlTLuT_L*MCapk`}psbJiPNn))w5<*!P+QCqQ!W#O3*PoA&Znzdllv>v53O=f*J?h~~_DX3B^(4}Egs$-a>!Yr*vyPgZU z?l=(}y<5zfYwD5E2(3voUUs&eJYm_@#ck9)rC9l8@%=K3PsRJ90y=K*U-0|do^_i} zY(M|E+W7wdx5fA4Rg2E0h#dcv^M2;tpidm>RYD&9k9+l19=#FrU1`GlW7@BEyDYk= zZo4V>Q<&v?&6~c1=VwZ`-FD;n==kGtwUWS*ots;Ce?L*>e~j}|RbpOvu1vW=(T+($ z6QdZKQUus%CjN*qm0a~O<=oGXmG*M!JTK?3O79hJdi%)bM&pU!J7b<~j#GWbSy9a_ zc&K)A`-I-jtILiRJa1Lw*#2BDy;E<~j1!BR9`q&favf1_kZoKueb)t1mJ{b|?l2#G zn*OOw^n9vE5oh!7?{6O(Iqzq@@pH=8py{z&ciZ?x>Mv(JEZxkowt9vOW5u!l{mOri z=7w**V(b`SXS(~i$zf~JU=x+@ESB~DKFWWrBjs;D?g@HYGF2+bvUG2k?uONKE^XD| zO4wtUoj8A9lH(%%jv2R@PVHRCVPq=md?a;=wEb_y;@^mZv$<~ZiNXzr`^6H=3y#2WYHEq7@9yIj9F;uNc-iSWfEJPR$?JDdP z-Fp{!pl?d=b?0u=M%K&rr~XHMtWuJR`^OQ)HBnkLNNeAk4u?$MMv04GpXIWZwric3 zQKxok`y(E|oBU{J&@Ii$AI-Px-9q$ojS9kHLDih3pHa#Cw0Yd0Dgbx##qiCWl12 zvgI$Q-|)EnT{Pto&yxOMa~_0DH@@SpFt5y$Q`Jbva<_v+X~=2ED(f{aI+m9j_wTuT zQcw4W^mK*QCcBwk+F5ocS~=1ubo2GYt`?kLi&AdgL1Y*0?4;%{XJ0t5N6_y*ze@WT)QaUr^C*wU;3LN{kAF*Ov zwQk+T4VTV+NmXa7V_cJTK1-|PXu&mk$1_irzdFQioSrx}d|$Yb>y7DWCX@wK&i%e? zA;;QkLD7_&g8uhiK6}Kq74#cyJ-8f_ZQSoXZT7G|U$|bpX^Rn;_J&)wdd${4&u5e< z8qVM}vYTI%{DLVoSl%Ns-gG+uqnWASm~`Liv>Z=$cWJ&bKZ3PXOp4=sn5K~8)@P3v zt&}l)`YiUP)3JQ9B6X$s_vePA0&pvHz)>>J!yXU^%MUA>YO?Rug zT&{-fvkiG-np~;xuC}FGCnRO+g^%4_x*kiO*KFNT!jm)c`{$`2YJMKzjH_F*=v4X7 z#BL$m#LiVpHq(xq%UK&=QWo}7Sh8tpVXk#d)EWkE@82$>q2)6V_hg;Adxq6u-~5A7 z6XeWgS#})Ll=-(JX5Fe&=fjPUeY}{aV6x+g!lqmI){9l?)pWRrUQKmhCf=Z+JFmjx zzG&p)8I2EiE6kNwDdTF1Wqi3HL!-j`_qL}y7uaaDoK{~hQ1jn)iG91hgs8%#M?#t& z#&1P07VmYtdNuWg)X%BEbv`}K>XEQ}Kk=JWO_Im~?F9d~D|UH(-_a%E_=eX};Jo#- z4Gqb=-w3xc@IIIoCK|Et`;h~^t5&^!e@jthBWt$*Ws5@(_xdm7Gkh#JRdnN%Eizp! zh5z0kbrR^CXm)w&rdOLY`fo44TyeC&#~^8>K?SYSV1uBX5;n>M>SYeYWl5!^O*)zC5?DJanTja$&ty z^Wt-1KY25X1GHHhcO1UFNvuOpLz@t%sKsJ_btX7@B3s0!hdX6mY=VyHr>3* z)RB4Q(vBqLKeX-&9z&v*?e*Cy`zU)Ys>{!YuYo* za&5BiQ23=0cdydz_MxjYMJ^`BMSJ+CY}swf+i_&FXpO?Oc{`a|lc#;J@H=wpvDJeP z!?@cy5pJuGSO=8UW$SnTzdNaT#iCCy?{YVt);Rg}`I!vA4FRVc;}$M|zS6}%|LvK~ zc3sQub4_pE{pV`F|5^M?-o^_W@hdm{4xi6GWmWDJh8prMP=t-}%U`r_Y{w@Y~X8?c6*3id<0@lho(D{r|J`LGGveW0woc${h=~ z9Pi^(FLyn&qGR&9%=2M_vfA%X&H8AsxHM zWU1(uCwERLe4p{%-FVYv-$Ga4%j;I9u0G^@Aa(U2)9{;84d#U`oC<%06}+wP1y8hG zw@8TLTI?()iOc;jw44m5R!IvSnNg<}?z)Wszz#v}7slRa&N~Mrew8`@%;)+=#ee1+ z%D;2Ym0Z3j=^^ZNd-l!|lQIg1Rn!IKA?@v`ajyEp9UhHoR`va5dlx3X`gimGrAH_J zDlUth;_sOx^xoL{khGYQ`a)5^Z~tnJcA52C+Rl6BYq)mCR6&W0eDj(aSzg5R1QkrY z^)2A`H0$)|J(`Z;ae=cEHjAlsX54@2`SM%j*}91jU&^)E`1SWs-k%;{I$106`*!8T z?J?3JkA#+IZ`psYa;hS4vDI`V7u}He^*{8sS}dr^m~B#Rn_bPh ziY@PJ*>ug`=bLl44m-{q**b`yd#4@ysyp>X_UcztA13b&n-h|7Zi|!b_9qWo+>KhTWW9KP zU)t*1?sKWzAa4GqW2f{N)~PNqz2e#Tg?qI1bv?{Z~%?&mti%po_)>(E=PiltVsme)M;VtBpg(}a6UK?YwR@_b*r+3xm6%UAv{ z1l6ayUJL*E)5Lb)LlZ_V2Fv8yw=29@em|8yd0^qMZDN5OJBy1Z`917-Q=%gI%DOL= zwf?K=+f}kkvMV^2WoyZ&+zjZOQ1YwNE$91A6>-m#IkBOB@fw{c0-f2#7HV@$IrI78 zSMwV@OH`~sI$jd@68KfzeaX7TwZf&z5xf@sa?)kf zieHv)o4$tZRQW#t=f87L%hp(5xOh@LdA-p6qial^n6fsWsxy?=dU*33V|3?}qUiK5 z>*boOEZsY|6z_g2_%chy=n%)n;D>nUA+I#TpGl7Ter=2fRSkhEK@snms)4Im_YZq=3UZ7<2+j-HF z8%%;$*=OHupS^ZroAIW4twM8o&Q(XBiW=|#&QW4Hd!1nCu|H3LM>_ZR&EMT8Sl95w zsi@A&z=LxcN8W1InLls!D>5xk{}$=|)Z6i|Th(%*16Eq``xY2D{r$I8f6L-SH5{gU zk|M2N?cwSOJHfy1#M7tWPD!2P$<@BTX5pjI3sVYq3wdfk5trBh{vl}Rm4_dGPmJ2r zv*N+Ssf(uUuRQiH>S3PlROLIHtyXBO9-3>d%DKJ2xrH}MRZ2xNZvU@KZsGIvUxiN- z>D_ZNuVGtH!`WlDo)&kjl4~_hu3d5UQM#|+q}Z;M>YClq6TB(HJyl&&!|jgww&g*S zKKxp9#oXzt#EI@;kxKs(;E27H6zs4cq`8h zc8hebJwN68=aoGkHC#$6N3B-b$m=VA)7|#;h|hb~o5t7fh%Qu)`m1to%Zl_QSyA~* zJLji;HA(uauKJblw@{BkiEL-Ud~f^gm49L${hX({J-y;&gjD#82{x}5P~#fada(lk8`Io858M*Hu`T=v^QCDsrYRhX=r3sMNYdRIQJ#|;vXNGz7_7FgW;B1GlGq>?F~d`-W9trPk%>P!+yvAe=ClNTnkH;^Vw3b?wzWGd zTa4D^%6mR2y{e|@aiLURaz*F|Z6lvGlgz3o&2*n2+;H}$ms{u831JPJIc8>0ak#6P zJ^Q*Kr(*nL<`qR#@(6bfiyG!Nb&X+q)*EdXETFBZGG9iEC7njAR zzLk2O+2?1bHqD=Tf4dLIbBWBCa}4fyq+88NPO1BJV&;^5*GVjF_S;W&sLr@#K6{E_ zv}|Vk(_L0stL`O5vDMwoTrwx_*Va^L@7yif%gTREvbk$L%j2~ehy2&$9FHo_1sqGU z*)Y*y(W}LRh3_+J8x*dYKKA+Ec+BHP&7_G%iyWk8?t3w}=)m5EQp@gd^-kihy(E20 zwR+CW_`6*N_UAc#)uW3hPRgmB-2cEVsIKqTvzDiyHh(*7w%%fcp62}5S*Ld&dublf|GuR#0@tC_kMODIe-M#a(GDWImwzIjYwjc9Ulbw3Uf#tj= zo1xu4d)K-Bn{rz2+6rC0=Ws(od-9t7ZFOIB&s0p8@$Z>(|FpQ*6E2aMg~3f*E6*AG zZ7E%rtq{x-{^X7I(=SyvxyuatX63katUIwVq@woJu9tsjUGw|dmCQ9?{%Y4W&aaxk zME~9j5M0Nxz*_fL@#&XOeCu0uPhJZ;t{Tbt@u_2++m+~# zU30jiU$3mOHPGK*Y~}p_csN7W{~6&AJlOtME-Bx&Pv!L6uc|lAYFrb(J?E+W%jFrl zk&kd1^_3O*aLsP%5wl6W-X@4x@%=_oz zsZZx*Zg_1nmwVpVnLF5@Tx{|9Ror%T_s=y8S!#cE_-lWD(bv7CZ#Rqj%a<`Gwnl;0 zMw=JSe~aG;lA5~^3r=n6Ym{e zEne-RWObTZfyuJ!=RU2Oi(TfPa~8^U%KPj&nS0Tz5R;#lX+~4Zon0q;-3(MIlrg^h zD0=U7m%Ou&534e#pEMIa`%A(1{Nrc(#k2S8?0eF!T73MOo0I9})1Ng`9DjzL{`^C2 zvcRKHvM%g1=b0XE7LMyoTNkzNwEX1R?-tFxe5tms@SM!H*Pl67r4^kN3EYs@^;kAC z_~Mo|UtX-pD0=mU5Jsu^?C&;5(s8Q1xKe(JAWid!POta98)0+Kd&BC-~@!J(EQ~GS;%BG(E zDe&&`&D6L%riX+6o@@0=tM<76aN&!>)*lfS{f(h+$L;QPR?d-__x9(Eo#!Vy9_0;r zxn=b)@!dPVr}OHUhNK*1yUr)~V>g@4{r8pybAH&ISv23;=2Mt3TjUPTZ3-NJ)@(cw zuYVwWn%~rpx=A;Sb+@$af8McZ+duW4g2BB@KWVz8WZJO&QC^(Bx$BKqyt_-;q0QPS zVv|iLoPXFi+vU{i6H=WLlidHU3!J#s{o8**An42Dn~RKehQ~N)5M= zn)`tl(}kyJWc|t6v?8pJYvbBZf30K5kw%XzyJkN*XLIpoepR@`ahnxfjyn3czHHjJ ze%=o2XPZx+*}MLp>c=xavtsW_>3r?Y6&jn8`wLzx9bu<2bwK>Q$^~%=?C*tK>S^{Kpt}aO_diSq& z&H1XonZ>O_tDdriHNQ!a z|AfFf8)7H^TD4-UL2H42i=XT<%O`PnjD-LGc@zBOhN?=C?IzC?+ydER6OP9UrCAxs zAN%Nabds0pg_B=@9MPJ#IAy`Ar#hy_w(rbuKmVv`RJn^^;F*tq+07?n{_C#=yIwAm zJzuT-=!axu@tZ|kPbL&?GJc*HHShJOxz*g8ZmF@nNU7PfKCZ4uU{TSBB7P&sEvIj0 zS5;nky82Lw(f5Se*Jqr(v|6ruO+u><$DwW7ZxYYT^gQTDX*#;dQO8jINT6`C;-?*A z#V$q@yIwoK*rB>;XO!Ut|2rRr`hOd$>&PwJt03Fpe%xMcMc=wVxelS1H*qubJo@9q zWhn1gbnv;@d=`!KYR(++AfBk2!StNVes%71Y1YWppS`R7&n@-yceZch{j56^O0S%b=^T{)$NNZ? zG4$HZIC;i29huLe5$SsQifQ#meeRXqQwvmAt(mi)&HVd3Zn^hPX?k9a2WE6fcU*t_ z>61|G-A2n$u2rk2%$HLAeDjFSX*HWrsq)iv_fFjv8awy=EJJs#dPcF2*#>O~CpvH1 zJ-vfFVnVj(o1F9SZx*>d^nCy0%co6WXRUGy6HHU+|Ne62RG-&p_eP5=*&g3~Oz6)R zaVMQe=^l(zL!?E2thp&@Ke?AdZbr3`YU#d)Oi%sAeP4YHY#&sftYa}2*s5pFnfN-V z#!JxYF8{Yj;zHkg6;|7pua})&Bf7aa(r(G2PbYlY=ub|S3yXmfcLV^6pn?+u>3yBKRYBS6(Xy1NU3FE z>RutojZr*;Zr`4q^Nz9&56!n@**`JVzf-!VGqvcR>DTO2`xi>)%#7i1o|t;~zvDNr zt7n`aCawG5zVz>fzjEB+g0Z~(2i7kScp>kyv;V^9AB?Nl{)zpf|9_gEqE?=@#d7}; zCs(Pj|HbUHb*_G%wQZa%ikc((C(?K+e2$y*bzS^PY`sP3#_<{o|Rh96{nwjC<*sQ)eULTXXC+3Zz+rUoUo|Ik=w z{_cbWPiWTE-hjlehPO{_S#8dLp0!cB!tzF&=TB~iZqrqh&GtX+I(;^&XJ_bfqb;V7 zC3bvM5H+4B$5HtrSbLw*mzVK}zb!aBeOE>KbdA*Qb9nlFTbOLuUu3txyH7oG;#O9_ zj^EDLv+oo6 z{5i9iwLh}In_856ySM4#&cy{RTen#W7*<4NPWe1vtV7;Zrux%0>-$Tmn>9VY{r;!# zlImxLJl}k*IwyV7+q9tYW1mIQ1^2?x=ZY5R`mz(xKdF9FlXOodiSPZdN454XPj<%r zdKAc{tD2=Rr)spr#@tojLgm$y{q-61FV9}{cE`>A^VbD_vpQq{|Ch7I{{Iv&T$-LQ zX#1{IHb1EQbWfCHMeLW^XWm66?<%(ydD%JT>Yu)8GBbU%YNv>tndS0pm+AI18LEO( zbGDS7&|BPnOdEE?!z2r!g_=^y9x1lrLLOzF2i>(ZhWerHaa%gO!-9FRx#^);!myY|4pfr`%gx z)n@kX;k)_qz;vM-mix+DqP@M?{>T~rWm%y+Ym!HwzrD)2lorV&%m0?AOv@`!r2H(Qqdj|i-n>>~+(}b$zYA4qn7h3Ij zBIi)4UDW4@drPjRKQT~JJ$b=;g@j^V(meZ0U)_bz|E*=r6BPNkT5s`O4(GrV5$cOn z4ofuhO?)J5sV7mtVe!?cTtU%n694*xqN@cG59zE~{d|GTuRY={%FNt7{O8;_7O(C< z>9*si$SdU!O6SGWTu$v36uY)=lbM80FWaf|{8?_VjMmsb;GWqfTc%yf$9sFO;CaX7 z1)NUVe=fzGQse8J#J~o#Vy2|eE)<2uW z1EweDKGt!}5!=kZn=R7v#$o$IKJjf|f4^r<(K)>BcBnwn(tgPU#T#gkoyVb>@o#a%mZx5;-B=!lUXLng_?5fCHjhSoaykXW>xXO0Py{&EwN7QZ6#Rmj8#QCVyb5I+efmq zWHmc{*K!GLY|3NaH0j;dK%-sSvi@6muAkoUe8FOctqP|@cj{F0slGDZ+IsUv?rf#d z2|+S7ib2yK>aW{2F*V}wBfdp<3nt!UJu>;nqix!a9;+8VvCOz?!L#}7>s@b8G0a%D zq@lbbY5i=$BjL8K-fqvM$|SQ`g4Uks_i285ka>y!^v(|c&Z3vq;hV&^>j(?7ZM^P# z$4Ki&SxaD9^_jFunP%VZ%YHpk5&r0MM*OCca2a1Ghj+C6?Kjp=HH*BubRA>&=L=5A zn(ev0d|7iv%XXjjk*AZx)=KWPamr<~O*vsU*}W~-x4J{;w3K3d`OMFqk-PtR9GGn3 z#q4>B^-UN)HsQ%KARt5w3o!G4a;D;0LmaYR{h;B-uSb-SJ`C%y>_u zB=1|UYDzXy?MJ5Dm7ftjf2BfY;zXmX(lPf|FBXfwHfu_%&7oxX|7Nd>4ZqYcwf}x! z&dhU3?bnY>_pa&jnK9|wpI4K2n+5G`tl>x(_j%L#$mL#s#6byD!Tx7vXZETXf37|k z@#be`?90!_x8^qA`22a!M!|DYyp?h@^;8A5rsxQtcPTpa?OuxRN`G~s>ew`;t@g`R zzxfp?-I*`8$mNOZFTb9;`oBrUZn)`_-!+GfoLzq8m`7ApH89U1CB|U{dx|<)G@Y zER)GXE{m$Jy-8P+G1{Si_;GE@lBv~dLR}er8QU&vb)N4iGifhb(y8f}(f-+c!=Vn- zEUzU#@{bLoHDA7MzcH^m%|0<=ALsYF{^q3InUi|9%t~RICT%B}ecG=3QDLBvpxn$` z?n=DOI(i51oa5(wzHZUo(zhYc%YWZ-yW`Kfn7yQM|K)NCRg-L`o*Rn}RXx03CnQ|) z_sg`ivpUj40wtAeb6fc*7M}g)wnFWIecH3AM6FXRV?NKBso=1F>cqaghsBwc3rbyf z1PgWANS@oumd$VNVk}prYwC9DO{YnV&2{zUmaMZZQTte>I$iV+MS5>o?Rr=GQRa@< zZc#c(vrFF8WHF`$Fttq0zb%@xfc-$}i;VUyH={h~G*7Zzr+U?+{hH##ml=Xv9w{8# zR_qabI{G&I!rGN83cc%W%LFT@mguQwJY18pds3idRN>68juH}67;fG$u(H}FxXtpH z;$+3cJdZxgO1hbtYks}D>D{r;ikjMblWXragg;h1+E8)4CS_Ug6Me@swJp;Q_#Nim z66e+#@4HI7P2svgpNbie;!*?xDY`OB|P%6nAzb=zfzOfyI6pHTwK zR37(5&HZ@$+g$gi+-LPCTBfQo2+B2>SrwhHHJQ*Pqp!5yPg~csXT6HhRH+p`Tb(?O z1m91bX(nm!Vq?=(oa+-{wM0~(cX7ovPSuGYe=73KQwXuV`7m(uHJ3$-m+QBD@$37R z@$&7%pC?{iynNz`^|b$SORlVG-Sl{2K)}PSHkan*%0?YRikj<#SZZ7ry^40Js&vV4 zFZYoB8@8#<%QHpct@DXsp%})uz47N$&Yrw=n7gsU&wQcjgzS*LDouV7TjJLy{+jQR z5y>t*{o}pGDPnaUdN%X3dyO2fE#2WL(KmZ7^9`*BzHFDQqMoEZx~Cza{^aA;{NHv< zY`oa6u`l8e6rEsDd?Lo#z@2e5?-JFC8=nPSJ7RglN~dpL$lCCfpjo#a=Xw2-TAwd8 zZFY!2l<+%U=j@a{smr=~zNx(7o;ULYQ%}d&$ztEn#jZgq>W28YFz zFQ&4_C$~gR@_9e+iio}K?^o$+&%CC0cHU1to6N=afBrk8lTA9T3txm~v6k-Z;^7#%m<)A(Wf;rrbk^XG;$OfNmR zN?dZ?RQW6yHNQz^i>`(F2p1de?Wp3JY5(WdFM*YEm1!cInNO-VFF*cNQFn{c@fo}= z{+B+i>&nhtuF@h~urF=a?Da+F zf$S5Xh8=!9dCIeQ0WPVlh4-eMo2lXM+Vth3zGTUb@AlR&*EJ=s+mrC)q)g&s?RiW# z-}gwLd9~et}pEt7UkCQJXqBjwbZWWNpV9cKc+Fx~lbX`*F%oKldy z?Az`CpFL%+dO1BZRy}{_$F1&etM<5@Ug>&2huz$>T{%=CGyU|E)0)9)U+q%^KL1yF z{E0o~Lq*4y&##5wg-GgK+B5y@@0a7u4tG1^7=16-AV%pGa}H z=oFW@mU6SJ$=dzhKi@lRzR5X6{dCn+eQVQMnYkqT=)T6QohzSgZOAFR?!N4$cJj>q zsh>Xhe){k%@s`G={0m1*X9Z38*c8n{;Qb@(r2MVVG8d@4ytY$+Qrh&Os@<-i z7N}gibH}GHXA93KhBwucj;vF^O^|Z$^y|0o`li93d3NiWZiQ3*KI^|K`lRiA^89TD z`(itnS?bDquG?3wo$k|nS%1;?^A$2rSr^CYJ>F`gmmK)Wo8`RgFK4ckOIxaAZ^wH) z5oz(1H)5N6f7$J)`}g(c?*24MD(d5t+=V%Rgs!@;4zJ>H7m4=X8OO4^>BG|2h5PN5 zE**2eZUB&>vGe+ASAL!_RF95Tj#%LRN3ET@2b6YYCZGn zM!y~Lp$EO5TgZR;v(S9O`Z-}|+JC+1xg;kLw%F+=_m5YVn*^72KVa>UkG0iTFnyCV z>D^NEr}14q`PSO+mLA<}7q$3;YV*gHr@Wu6+N1ErrO_;Gz1x9rZ+^Lcc=siXMZxym zt(NNDe(vI07U4Ij*jQqxsGm61Pj^q59uXO zUNrgMDd!!(qf(6LPgZ;ybJ?Ngmh+UaG2f4EkGZ!*Y`S8-u-g(Fqc0zwFCF$+IB|oF zT+@>CYqKVN*;x^z@UmE?wC3UG8O3u2ugER++m*V z{zYd4?{~5XK6iW4vOHCK?d3kx;@KLrR5nDm=SZJ8y!?2I{N6Yg-sL+VzA{YkNWQ9Y zIdy^ovjOkpx2sqbr6(B7UL?u#(riKk&$KA{OD#=jw%p#cwsOaAo=ZV)IX0U$|9YP` zyME^2J>KZlH-3iO$w?q<0dG;i~jGOo=s ze;p2|SASRS@O5FZeYNAOzk2SHAhwOE8a(-zqBC5LotRV0m%Bt<)BCFUdD?=oivJ=d zr!(19uU2mryj|IIWy;EJX$?mL-BNslYMmJtKAL9#&aq0`o^#%pO^@{!KmH*u`g*>N z=kqBuGwmDu6z+Xr(sEjLa?ONia|M=!UDujrbe3`2RfdpPi>Jut&s6**z`IuHr&b}i znd9C$|MwT{ST~t3sXA(Nm+%7fnGRk;{@1ooN{!98Nn5hty>i>M#F9R>=^otgjSR1` z{`|B*b=5YGo99X=-g|fCfnbHv@e}{=$W1zVre*QN*1P-WTz)A2<@0R)jEZe+jZb63rLD_d~Xk_ zonrHTc}M)$ZTsY-IBk{AgtxLyyeBs)^Zeoq$7adPnMyCYk=5D1Zl6cjRvZ5Z;_dxk zESR_VU5__fSH*M4U+dVZk7epbcdmO1%`X<_J$zB0#kOyqLF&?q$$QizgSv66r66;arljz@|#Kb{ar)(*7{zu&11}}{16#1b_vzQw876XXIbq&)>A2&v{d??AGEF?Q?azI!Ct=3ZD?Yny z=iA)fk*gFu-Kvuh9E10!tg-*(eCYlUm22ET*+R}phFs7;JL$)r`SJ|w z3ueWhZW6rK&a>1r>$$?a4=27J>yQ_X?s#-}qV`cgmY_o)rmb9Sb0pb8HP6$d=JCn( z4Zr>O-G7q4;ob}Dfaf;ZCfB8Gw;FZ$8gZ!dHyuu&@_NJJiKUT^kFNQi-c+;g*$w$e zfhRuARQ|Z)%Vkx4`n+C!xZ% z|CWl~UX-1p(jg%x@#=>rBZ`X-G z9cJ^*xL$71*()w2KIy?{i`^TZDYx!8Kg&f~r#j^L&Iv61`WNFi+Zm)cT&r2h$iDWf zhvMP5OnkrNe=?Qe48>yn`wGUT;->Xl~!t|E?42yjJ{Gy#K1|@5WtUr^a^f)ttKKnO(H_&DNTO z3oPz6*4imd>-#Kss{2M}L|sULBk>VZF!R1YL2-+J+PPVNUxl z%~`iJlYOnXjpN&?jtbwFoH%e@ERo?5AB(o;M5ZHh+?VA=`RfGtl`Vz%#m}r8_#+-&fF{Manx*k_V`Wv7_vA;7(Xr!y2RP?wsLaH zlklzI%s0H>92o1Y^-<>PMCr<$)^c&9?Z3}lahzt$F05Eszoh-Ct$)?jOH#+rnf2?Isy#M0cx)m+I3cXe04i_Z{z%plh{t*HD1hr3(2)7&P`QI+2FtS(iquy0cnX2?^BeSKYWV&iP_eAkq`zpkY64i@>{QTl1U#%93)cmiy$>h?t zD5lV$yvKceT-U$6X8LLAz2{;__uf+X)_)lK#%s2#$|2VF_G`6S?;m+Z`Ik*$u~1t4 zRmmve{yLu{{L7cOSnU@*@A2mI2@W0mme;SU-?&7v7)+5`cUAL=*M|0pXy=CBc&E9O zCOx~kUi?zdwyUr7?;UO{?Fi-A_i%3A<=X~rraiG|K4rCXoQYd|qs(FrZ*$e8i)|No zPS{sfl)m7>UZdh2VrlxSudm<#X1ON$&Gwg4f|b&rH$3uh{c?4ZtoFYck2Rvxp3lFk zuJr9xg^AwASN4;qP5nRj+q%}8?M_PqZ|xR(=Jf4MRLQk2iL9Nmdj+=FobS%JlD)KR zN%8aIuj|ibgru;&SK3^+SZLNuzl_8sp&rsN1+E-TWbNg0 zv~~}aGc(!l6qa}Y@~NH>riSxhXTO~7rp;CNK)*BD@%OB^71f@%SL*v|%io+@#`iGm zr)VXozE;^1@eS!xy30i8zUebPx&5_f#*NS!7v&EgTz+gAIy zSG2Xr9&*!9ESi5i(tAVjoE4L7Z9mA$^$8!kn64OptS)tCl?xkgl9kAp>+7!_t)MLoS#x3PJimStMzyulTm5i!rvX?L8`@G6F0`+ z?|qecoX=c%W5NyFB^NfmsqXwX^;s0}&%OJ8&FyqO_5KgbMpL^cmxx!dHCl4+T)%ZN zUH5yyx!9<9sp?wJPpZ$toByayUY@8V_OV8<*EC5-)`Z35WjY+!p6_eYn0R1vYuw%c_=>IP)I!Bcgt%9?k}^`CjR(j za`Mg9$vq0%@sB?4iu#m#qPpr;_;V52`@U*_q+L(ns!+U9neq1VdDVG^=K4Cx;a2u% zKgS-3na6gK`At3h$gI<64#ZX2z1c_p{F5 zmH*}b5&sCz|7jC{nq{4Bb#`-OtX{i4d*U}1PbKI6RpJx}Z~xFJ0Dn}E*hrTcR(dev9CN;Lj{D5ZQeE~vTui6lOsNc_ZmJ|m{DKBrC(-8ki{Fx0$kH^)nFWp=#ROR(|u2$VG zE>y^G9rZa?OlUU8>E9~3BDvWTuWMB%T)h&SqV%q?b4&6WlO2;oZ+h8e=4amcHGfZQ z!`2nw!aA3@Germb_VX&MtWW)?_-TF5@0w>N%AfjPa@qWjS6a~+uIXX#UHQP@{y|yH zz9nZ(9%{Y3b1!X4N>0`D$h>z&O7q*d$7(&iuUD3`p!Ms8Nw(c*;v&808*Z8u_TBr} zk30S6tz8a1WlrmC{bsU7okzhdqbMvX&(-r&aP!*4wN4W>1UX-aZ=U4)^2?U^zZat_ z=Eq37z20fmqb~YOJ$nD5DVo1l9sJDuckFx-Anc!e`A(JS?Xwtm)Vog{5FYSNCsqM}o?ZwhuViV7WX7;Qy zY2oe^aN|`p|EYTClE;zNR|{1qdAF7Ao|E{-^?O%FcDCj7DF$LjE|-KK$bWcI^W6Hy z#hon*w)SsJ_f3)85LvGvPTpX%hTJrThYFZnU| zQtGp;z)$m*vYe{_vi8HPgnPnM1-?1m_&ev?ljpDOHct>*f3wfD@S1A)vf^99Q+pyr zEK?3lU!$EYSi_m9A0;!hC`E}~f8zSAPW>diq%&9hcT5oLUhQ7`Raw(0;D7L|>0TQy z@7B;dIeRhFx$ZYt{;n)my)?=2@Z?Xb0e52F9xn@;zgBE!5XV!AZ25^yQ7T>Pjq99v zxi)V8YI(ES;>lmWUEzuI*Ev~mb-w2L9rk&mlCs>BADhgkwN3qTnZG*VZKKmG<%6G9 z*71DSG5TtmCH?ZJ(&`|pJ|wrusZvU)0xii)^}D+;B@u0^Z9Al-#ESGf6sfN?lW4#?e<6Z3$OQ0 z=3FdLsQ&15*32jAI_fqHRgcT%M|rVrDX$4*k{8pJSu5aFcV0;MndlGg!rv)V^R$%S zY}}Eu%QXD;kC#SKD~@X{*=hQ&dD4$hs=^<>#@zDUFyUg6R)oi45q;I#Z%W30^7I4+q87i)Jm~m!~mvLh7-T^Sl+r1fo5sY>2M#OzCG4m{jgHDb#*)N3(T~ z=F7b=cl zw31jgf31-D%)j=(v^<^X2=qGLc%1IJM)*|W!%2*3y{ea#F5H_O#=7WB>{^E_To3b% zisc?TZjWNRKkH?hVxsSywWcdWn-0Gb?hg}KyOVbgN3c>HcISQ z*>^{CUvtutU8j`x8uMp_=r4-OnGT>S7x|KAs<$Ki_!6Y>DS? zPv?ldkE%BN;&h^RM^u?`=MMgf?6>*_xdgv6-ahw!S#A)QM91tOshWx3A5Q8_`}F3G zi&Xd{_nEc6-cP1a-Eyl}M{s)qgUR-zlbkxMRiQY&x%4$}?ALh96{U+7kNp_oDrYkX6@9^rFqp-#4 z#o|S-M_M<0@wM3(#WE|Uq58n3!j7AqZ_l;NJHS=Z`^>ZDd&P&26SLU$FSzFS_Hen) z_xoiq(eFhIE7!~n_up$@dNj^qT*DZ~D0`^7ueviw{;KIbM>Q46+J8>1JodBqKV-S1 zS@yfcPGYLhne>;x%h&5Q=6!VT@3VUs-w+*`Wd32&%Z)pt1WVOp+0!M~3wudOQTrp8h3w^S7ODer%$Gzm^_}eik~(_LHj7&5pfW`Q&=EnfLQu zFADSt+r++0d$IrKuTHyeKR)Zj`S#&s|0Ryahw7?MteJkc^~lo}+a=%5I0@){2>KvTw9PBwYgjPlfHka z{_a}7W92~?ri$GZD^|H2A(||f^na}huP)zD{WpTnPtV?PT{hA0cUarLDvg9U3plI{dtNT$ zmkf6~DW~wPFt|9?UqHVx&uHG2?hsWM9i=0oo!JBNoMa#% zFt?>KoNeQ&3A^i3CAen%OZ0!}njxlCHfev$MmbqkLDkKoMs`|J&8x&7>8L23khhp< zn;WC_-05br*7G&q30oGmW*9Y1bvbmB^O&=ZM7Z{wLMAJw9pdX)U;hldv@nZzl9F?; z*3H1s{>1&J7u0vRH%-5>);nd!q@DZ!2;IEA_(%@NtzF+^z6$N;?)Bo{wE8gj5q|b^ zr}=g36Ow{19pjzK^Lt%YLt| znzBEX7+Cyg?|;VAJJ((4=JEy`uI~~P-Sm#<#1et?(-$i^kal$aP~--{CDnFDLA`Ig_M%c9+gN@dKR)&VOH8b71P;01jWzs9P18f8>qIO0Lb> zX!ViXYF3LlyK1uNJD(eVpB`;UV_W3p(KX4z-zC~QG3XM{fw&V7BDXMbb$G<67A=>1 z#CE*C@f(vRBcJHnt8?d_c)|bw*iZY}b1!ACp3s*k+93VfYL?<9ql6{bWmTD8GObvh zJB`n|=}ct9l46t76O1}6cGa`|>W%Z5^Co}VmTkRp9`4;t^)FH?B-Z&<)NSe<9_^TZDr?=>FcMxSzVRdvT53t&07}LH?^8ac*0pAaXb82BY4q_w`ZYtfFyGb?$pQDokK&S*mWd zUvkL>Ej87kY|icRMdwS-rEHN~V(@#*#FI}HT7Ly(TYX-gKI6)Syq04=>1ih$lBc{p zE+fL@<-W;u)*0oA*B&2t5?`e|@tX6h3~?>a9x?snA&#bk>pp%?WP52mcc!XGW_!Nk z{i$bWp1ZOlQv1J$yVZA>V?1#Sz0X`SPORf*+2!&xOHITyyDm^Ew?&`v&{X4@`B53p zS`U*mf6wIHBKRq6H-E9xm#r$QCubF|D>^?h?)J)4M;%O?^)nZ@1}vzG;<9U5Eb>aB z*To_%QTM+me~0Vwr2+rWI)&t_Z+ZV~)%=HF`!3vjW?(cu&E%-E>GZUSU2O}URy1da zIBT2QO0;zdtt|EKHOk*rOh8!&)lE9 zxsov`n$38}(O({JN~!(vZJml6H%rsi~cjL0w<-3H%OPqS>S4b(OYmB(|LG&g{lfOUoffv=JlDbaZk%b$Ui}YKGgE#yXfKsmnd=``JYn)q z^(}U76W_L+Pxjg-Y&Ta+asK7M9D83cXi7EcILh{P>$>}E)i!M3b*R?5;h)mglUzH? zWWnDes=HEwML# zJ^T44=BhAH)u+|hkGNLYPv7gOxiXvQ%U9QvT!tq$9Pe6}zFKH<_Ohir=dtTrA5r*v zXRGeIep{n$Q?B#f%=|cEr}G~V-_1X#an(!^ojcv+vd&tmm)S4&sHV>n*U+xJTE=90 zM2pYv@vQ3sMpfmT4t<`K*)=;fULg3-$z3s9ct07X^O*%*dr-qO%Y&P}{F@gZAYzt#VBGgM=NBCpHrdlj!&Ogfow)#z~a+>V>Q zIo-DGjBi|2r{DZ$r+#Fr#f;UVv1_lMX z9h-LhW!JSyw>D%oPj=aM_NY}yM)U07tur2Zzi~GG{P2tU#eZrKUn?zN(Z+M(-!|g| zZ?n@1zpkn6c)B8^otvN6#pko_=Gq-Uub+ML`HKVB_k!JKmVQBbn?>0#s$F;fR{ojE zaKr80H*4Z13f;?ppLH*8%VXACF?aRfX3bNo{;@$~(Z^oaKdTb`4t%lgIBB3B$F#J2 zhvi|PcV>q>w(Z@?P-^d#?b$Lnr{T8Qv1jT6k(V!<=3U#^k<0CL`%a;cqj*fz`4dZ9 zzDwTja`-mmnl4w$GyeGjuDc)YyS3JpU*|W^{MjeI#BGw5uoG(P$lP~r2X~&~u1B~2 z9a~v{OH`A^>Gq;M$;uwTzbU-DKl|)6;Ucri@(&odnKHQeoL1d@Nn0iD-rg5N=5BR7 zV#e?5tOZ^j^nKfH+`{y@rS;I^)_oCGKPp~y=eC_!Py3|$qG@p(f1_ST)w`KlRWX~t z*_>19dCw5?=JigoBrdxIuAf;a0tKWF7H`?}v+1X7vu;eVwcK*!!{=olUAqygaOZTg zd_#>QzfAD!(*eDB_e-JV}Tk~#KX?wbOTPK(O zp(N9-i#?UL=1n*B&C+~RQQNPRa(t|5#*Zp(epS{ZhUbZZsbyDHY ztmk)vKOgZ(OVRI0?zSveBOl{PIg{Ta`i1&7XWrg;vqYYI z=IV*JqLuO%Zh3b^XU~$^?>F6MgE6dO(q7qut`9pMi_F8hb4~=IPt=yJE?!@3Jesy(R<&`M#R;&2z$`4VM3utP{Lq zKCAAp+7YaDNcGOT{`o=+qnbrJz7&Ydsa$ud>b`iOc}W3F{*sgf`9<1_lAQ(56-+nH zDqL5lxTN}RXTf~`UD`8)nH>Kv7FzP8-eckm(Mu}})r##Kew}sQ5H)QYXMgxAg~}DG zK~HMyyjBD$*=MD7JDreS)hTmSEp*)!!7b8UiY$`xo+-17omRM{DcPI~{yK%D*y8e= zb<;&IKMsm0nI!ilLDK(Z=%w2}DK%d;?|Q8$QnITWV&+=F4H9@+TV2zqe>X z-?SDfZ!70(TlEqrONsp`JoGqy!t`fHRF78e@Lm`ay?*zS?~|4sd)zYdiN>*~k^hy% z46Y>3=KB-8;MKPug&&Ic{qQur_D`s5W!EO}IUb$;NwcE$B}G={9S#2Fru6YIGZfeef!)5uO;oq20GIsCS0nTaOl6=9&Y7-XIk7>D2ZOw?=FB(;G|}Fz*E%cl>r0`mhuK@pboR6)YqHE-c*fKx zQ*{g91gX<99+M|5SNOR-f^l;bqtV_o5(h6o|KR4ZB<)eqw@p$rYoFVi&7JJ6mXdxZ zX-|@N_4J-k=T3XwdFH)L)L^>Pj+N?{vR3eWxd?sSeTTd8tf}y73BA_voUgBhvMzEz z+4Qn-_QYMbjaf%C^Mkx*g}&Nrqhlm2agE7__4&qSb?au-`dg+SS@ry?@menFml}#; zyU)r9Y`)RIV13ld+K#nGdLf&_y>bE#&O6RBZS`&w|19gEns!e0jrXJbm1OY%`UA*iCp)D9Es~P*7slImL4dXG|yN zp8xr7@r~H&3dY&BpVKqayp+C9Hs^0oQ&Ts}I*~4*Cs`m-#daycO{s3Dt=fdZXr(L8 zo~#e^)s%Gi%AX{f_@(%|>J{g;jEV0$J*4wnr5^wI>a7#$uGuQR$XJf#=r51G9uqY+Lp~@ZJ5xZe8Age!rT0+vVTl-7%XKJRLQ5Ew);z zaA;B0|I2k85?Q7EpO*X#7M8N`wpy4}vHM)j(zx6!SsvhWfNvCt|&tv6_ zC*>^ap0aQnSCz2Wg|Gi)PkoRwp0s4bCl;;CQnUS(l`I6Mbs-0O?rL()2SUXmIj^1aVAyhQIx_9fm zmb*`#uM5bg{5-b%irS+|?Q2-oJNgYXuJ5Z?{g8Rloq3{)cdEQki~gg}RT1|NbIiZ= z%VSf>x0`Sbz=E>-Q_1{xK6wOx5sPJ%tS!oi0hZcQYz+uoSEFClGw7&*4RU0VfIGuMe7qj|9hZ(q2s%2>xb)q`g%+puWyrD z^83TvU=KIl4!1SI>y7uY#HZXWxF_}cXl`_?x@2K?p3(JPzoWHtC!`*pdVA` zA62h>->O$rUeo8h^JnhQ(`@-+9}Ud9T6ont*WXsOG`aToz==Ee^w&54Fsa)k_bYsN zlEb04$FgY>50!K4xZa+=-l}}hVcLV8tcw@A-k5fb!P}r@!o-vx{|xrry}o?U%wHSk z-#QZ_vF@E}`1IlrDQj77FLA9B({kZ)eRng%Ri{XQa^PhamK|9_Nwppoce!i*g`|{) zHg9OwIhY*XI%}88=|Z)h1K#N~k63RjTWZ;n@7k{a#(y$<$<)`AmY(8hGn-V^i8XHOUs3L8dDOzN+T;CnD}_1J>QgS%+1N_gAQIIT~-jTu)u7#eFWP z@HyixF~vf0zqPNmugY1Li^%ZY`0o(kWuu?XmI{%$y7D(`(U_9Fc%hDoop@89PW{GP zgV$Rw8%@*ORKpnmKWu|^+qSP&>JJ6x@aM=)Dib^+aD2H&P2!L9?mxOO?0EX%>lS;L zBkQ8y=~s4~F|c(${(xuE^cy?!4%+_Rn|g|Up}g0g{(#?Ne=o54$~hIqI{m#?DDiMf z2p_-I#GCy4t!J9`iM#vs9*VJ$*)W7ue_hil&D{8Kk>xd{!62KvcP8L^K)B@?V8RVD3d&Qo5NH6 zbJ$OXW$tm-iF5fq-%shUT>WQaP=K+{h0GAWrnHI6uD@RR{mjP+exFa&s;m4}yz{e* zd&&HJ8=K3sOP=hTJg@NA#0h_nD*Th?&sZDZ*e$x~wD*@YNxxqH`{DSkmV4^NbT`=H6=b%1e^s6P{AZ1V$?cyn z6l#u(pE$vOR)S?>U73cuv2*I1{MK{U>JB~UmUV?bKmXp#zTw*XIjjr6HC3uwov5hu z=F;5lXtdhi$dYXWPmsXeFB3jwoRyxjLom-!@$5{6FS55IIfSnzUn_Ld{_b~3bH|@0X><8CrM-Br^_KW$Hm9Y0 zn=tWk(#?e1jh-BDJ#STVFZp^}Yr=kpt#!8^q#alnB^0zqdb4qGH!{;O%Qt2W8_KcCh zslSewweH>e!|vI8@iUvf%k8OOj@)i^{h)Lx{UgIm%k27=sCkjy9g`W!)$DIDxOKReIWfD^5m+J09zgo8)%o^FpS+j{>>ZW1LsW`TTc&o~TaPF5)TE}&laRX`y3lTdBG*jX1k9_pI=&L-$^tdN7$MejFR_HR5Zw`!=L zN*8>*(R7VO^O2k=_LD-QrlJXbtBV^}^tDUGKb`$>MWt9p!={JVbv)zmHL@>iXu5Fg zXGJx;<&na)YZEuJtz|wj>GW-Lh3x4zoqG2lw3^fyJMR_Vvd5&V$<$-My2o$TvbtS= z(u5ZNn_#I|8(3boKj+Aksb*nQGBU&aF7lk19I$^6=Y;-G6W=I*W!WYF+d9coLhRsy zDTm$e9y&7R@Uik|Q=2ELpI6;`MOq{6i}=RVUIIZ?Cw|;~siU5~Pp6)5eO^`b%zdZK zCF1VPvp)8H;+3ENHN8N`FSyX8ohP za}<7Z+@HSp)LpR!r((_SssD?7vh|jFd;Lqj%{e#2Lc6bJY|nHHS`q&LzBz|uYw5f6 zFB3EsGPQ#)?G)%W-p#DDIy1=Q|EIS#^S)0~oR#N(a#5s5%Yna}*3FBHIoDks&>>y5 zSR%CN*KD4!BNk6*?9lgH#WgQEMWJ@-BnG9G7J4EZr*Tc07_-pf*Y$g9X)QteEFWLq zkk&Zx@!!+a zdA6!QpYg|`F7_4cugf!(ZBMMy5H+exwmja#;7ub&$~Cw@VEBm z(x!J>g#Rg=Ub^R)#K)y4C%3gP|LLityif4tPVYabr)z9AKVRAY{PNn$e_e-yWo|60 z5ivSe)y)%K>c6yed2}I{)ccQ`!g=|kDbC$K+QD8zVdxnFzvg@sYx7jtuOtv0fjm=)ag-#6>$2_Y@_vZ?!Kw)P!eJt6m? zjo60YKh8YqIccZABBxd_cbbCj`%JfrJ*wgVDp~(M`u<5(*K6ulOU?8hTfHi#c9&(` zZ)vrfHw_}l)D-x6~#l=pvVDRrvtUa;#JKL@}2a!2JQGi_=* zXKP-Q`d)77@csQSXUUJPr)?Q0d1=?JKli@a{>Wbjr+pVIJ~SG9j*dPWwRq1~(Uj^R zEE`S2f3W;=-ZRO|I`OUBLgQaePyaHe{0b9GGyDEia)yJ`Q*W;{uj2LlUH1PIi&oy( z-D12Z{L}2uNpl0aZtNr6+w}AtSiM??&9EXs+9(k1XtXj_%8OZuP1~ z@U{Q4o9s_lK4dWZE*O6*MV6gyqr3NKA&(!gCk3`T+3!F3Ypz4bDnmibP z1s1LNYVGwdx&NYc^bO1FI!k^}Umv1T!TERMBe&Ly{N7UydC#&_TXyaEpJ#PqzKYQP zSE^?+5hq|S2mhvP1c+0BY!bff0NstHQv`|xN6P&EA(;gqkHdyi)9Yp?yF&OSt;=Sy67sY z%ksT}{53NBQ+Ajsw!YDiXZyHRN$>fEANmFI$v$7NK2e+$&p$a^TS3lZp3GOr6#^ei z^_AQo8;f5#pD^F=Pp?6{I5oH+ti z=WV#{r+jz+XMyla^;r{_25}s%IHq{?pV97^1eONlD8<6?a&0Rm_siu0vufOK?Y()z zOM8*vqG?|wpP%Lz^etN`ur>08)Xn4>lftxJW=@*_{NpRtx7jaC1InXR3$OEim%r%s z$hZ8O#KmvzA8I!7zkP9MU7mG^|MKrVfm0vpxq5}^r%(A@zNRH*?%I}sO9D&eA~!Q= z{c94NbGhZb@559dH52Zad55PeZT}+q@4nwwWTveCBa|DOb-&c}aBSqN z%A&m~+d`Mrt^X%iSm6KWcopaM^QTt1JMFbFULYrW$z4dQ-Yz+F?s})o`txVj+jOy9 zjXQVZRQiPrv&A;0m9b9p4_ExiCwuoGhwMu4j!ow>_H=X4^qnLkvebM((!bSdbOY+6r-cjje-)c(lM^Uvnx$Qs^=R-JTdhqBh^iO=||ISaFn z%Rc_J#3{;KR6Zp@b@Tqqje?H?Ievc;3hHpuXP^G$7^A`Elq8qS9KV$hy47em&wRf!ZU+63*D zI?G#o((H>@Fc9* zv61hku`TNf1znc+f20@}Ee>C#>#1mDqG=&0X&c)o-uvx2%jK%m(-$wv{B$m+;%g4e ztzQzYI$BOwv`^%Uy6g}YQv1Q}zo)>zFwsRzGG29WCimZt8Af z^IFf?T+>^!F}$a}Lif|{@ZaW9>su}_V=&r#Dt6O~{o9)-6e!vR&t{l-$IHQFduQu9 zx!d;@3#&aEGd{6(Y>DGsZnfvwetouz?M!p;@2xs{B3k-{Ow@@*-#r;UzSy7SWD&^R zJHfzqNx-3f)6OZdT7@cwdRe@l9Col(WT9779P9O6ZgQJ6OqaAy{j_>XrFGBjmn}zC zm)unQ^_X*x+|Bxoy)h@X_Ax4IrMK)9m}|M?V#aQfOW}On2j2#r@L6oYP`c8kyJt&i z$GK@OSK|Mu>aO2$T4*kJlMzPjs!k6dZl2OT z@x;mQ*Pq6bQuWszz$G~;->h=p-^L}S( zFW987=@j+(q0ptnE#CxdmHhdqPy1q!zS1^apfrz+O2b8-95JVD^u z#1lDnMJsiL>wTY8ty91!8D*jD~#DOBV}QJo}^fE!@`4s=N)H+D}Aos6qofkV9#r=_V6DL z2Ul0sR=CtwIHi45juo|6}bf$-!SRh%cJLuPTDyw%~L(jKIeq@$&ZZF)~{+g{l_DD@+0Q1lQPw_FaLh3 zVfE-8r_Ar&x8mO)j8*1a^sKCuVf!85u6^g4?_6jO*xDZ_DJ81&iz8Rq>RWR_sL@N0 zt<^vNlqvg{**=T-a?JM6#C?n8c;?o&Y(CaGmA!0-q(*HTtNH}Jw-xImm2=Zt{6CbO z>Y8t|NI-Xw%+=o=tj8DW<)+O&t-EZ-b5DkMu_rnC)OvEO`i^?+`hE7F$>gOvT6Ok6 zGqNtkrZF8)Qg=?SZ}`&dYdRzE$1=AYlOG>CU0kB}YGw`}n||*K^{sCfNTys%=r7sv z;>aZh<%7pVE?uwO8+Pi#L%XxzZS{K#w_o3VWnW>uK->GmS4S=vO?q^-bFJaNs_jyD z)*sBMydrGr`0kpzV^y}h;lzpOS!Zna`CQ1@|Det|vu4Ta$Co~({YsntEc?^72N{)- zmspl>7hn;6uUuui`p$;z3634HKcg>wJXdPBcd>tcrNW<=u2C~C6gHmmRs20=Tls}T z#*_ZfrC(M&KY7Mz>XiVa=_Y$VC%MJCg>0ObF0kit|Amzk6^^$@XE=TluARe_<~?8M z?=#JN@yn~)w`XsZ?D%GO(*Bd`Tip^S0pklc)BhdYS8oxte%{V-rQ`E{OHDUf|KXC& z#nVb#FHBxG>um6!{@L0J-m|XrL^iZXt*+nDcSF?sw^e)gcBaTxH`dKqC%kOue*?*% zR@F+qPCFS4C%-LunXoX1Bl5Csc0=-}soadkKZ-W)`eiU@+TC6Cz1b^j=gItT+spB% z`=tFV(Qf2MA+Iatj z3;P&$@Xi0lAl1!1ZPnHX4IenJcb0AYYkkMnc8B4;OJ|pf-+JoyW#YZCOU5Qb{WA{w zXMKBh-{ypty0_{7?OWDgm~4LQ`U01%rwf+<+pzPVg!Q30U%tfFe!OvM|Bd@S6L$Wo zZJHro^*lOC>i44!OP9{QbFsG2{OhBzc3s`vpW%CEN4+@N`FX8^Q`uKh=9c}IS0~?` zy_NUEpEYu2ht`{sRdF%bM)R;|u4^>gpLxlTWBEbdnCxVa{uJ7vW) zcfTjg_iod*%~dPPnYS(U-8!+Vpw|;Gxo_Bg>#^s58`oUzXwKDFE^prVOYQ`}?d(J9 z9@`9?PF8elH(uK;Q21|IFbCg(WdcE&iP|l)t=(A)mlj&QaO|2QuOfSH)y>H_lP4_Q z`NqXWL~QoTc6-ww_g6V`%yqeHv(nFW^4-bvvd^imF1WO3W$L0TpUoxHXL@WCcpWU? z86b9w&8xUG(5*O=^Nii33tJ;j?)!H0<_q0!p@l+cCz@?Ej*R?l`S)hCn_;%n#d%>D zSWkH^ne2b1|II_8(2iYon}Ql-|DDjk8K9@gV zJK@%!eTrLePQGS2r}dQWV%rsWOoT4p*`{#0_|c@B=|OYmD)1I7SbHs;Vty*6SE2P$ zobe2iq>K4+JbTyH`If0@x@kUVd3Q6bcgm-!9-Gqc{IJ{!|7Eo3ZZVm%j5=eUQHH@D!GmQ>-k674J^;;YvC7`d0lT-#4$XDr+VAc?$AO4>i<#eQ22?>&jglUb;5S zFnm9I;=gCdJm2$NV|=pMkiFRZNS~Qz$kAKIGZmjHEc|oozRyeUJmra&S(mcENjlDb zGC@@#^sdQqN2es_o*?0kH|7+6Q-19+S23bv=I0Z$j6L7ViFmW#>D;n}O>~3Y`RI-L zRzE%CPG~%rJGVu@<+e`>-(R=MP3s!n40gY2TlCkVV_kOtmANe|p80!(&v)N-KZte1 zyAb=6!n1bGpTR$)ywtwZ#W`!CMAnDjEK6)m>uZ;MpS4eNSI5nV8jZU;Y>i4^8c#mn z&+zE=hK{XTsgs0HE?1Vk>h#&^RLY)`B?Uefd&JIipO*bndbdb!rLI@v{ta{U!&F7e z>=a|mO}+1|eE6}Y+&f)z<055I%M!~8cOTD=y?)637KiHjiQjo!=lY+}uoaHmr_}s` zZ?ocwotLZyLw$CnrW~q!CK{yKxXd~%bn^Cl8`Yh!&SCXGacS)_LDuJLQqPR0VOVX!tUcNLdpIN$|NK9(rt`xy zm8HKA{7%v3a+z1iA>JYRgJb0s%f{Q`lVvY@-i(>Prsv|pIRdQ{3bIu$ReurYGy&^kv6 zwN>|b*)95fLHT)!zN`J0FLGug6AY`Bd?LHbr&&Gx_@w1I+q_k`-gqwkaKpi`X5Kva zc~`O?|DT|~RXIayo_b4TlSS=i3!QZeSCRr8OB!lY&TM!w!RD($N0ZLg#~v~nomb@i z50$CZA73k?65YHo`O25G7mif4|5>(S!|$Lhmt->mO^*72juOq!UE7?>Oa$e3&GS;!otgaS)e*N> zCTdk{TEFPW>Z>PmD4%q5xLs}HwxV~t$D9H!Gvz;ts>+ep%1o>pOUvcIas2FPoY>~s zwPF4Q=a36agS0r8@7$gjbTcU3SZS7u_*v$yDyRJ-xFbKx7@9LhaSH9*%NonEwZ>TB z)R{klikCiXT({L+lK5(7hq`_B`(>Fy4C&n2E(=5#O_`iHDa^^N+O()4ZN11p1#8JT zxd@K-pFEwe^==7@5`0ztpSq_=neAGUsmS!R;Lf4H{TY47SytB_y17Z}Cg<+vDU%jE zT;B2~ve#sZQrWTV z_n%AAt3O1%FoLFkGl4I*ldAX&Amv)LX-At7@I72mM*@s*_a`Zre}o|I-3`ub$*gw?Y|F4T1u^gIxRm8(w z=PJ(YfnUwPrmUai@#>Wuo9Ka?Ck2oHyeDk#Dy_TJTj{~mdERDoG0~TtGUY1A`|lj@ zD_L$wr@5J=)t&HIKcg}IYkQB1oZF(-m<7sH7rosfC~_%U%TM`7qN4R%>-aLaUhRi9 zCfj6lTGz~ce{%+t6JzrwRf+Va%q-Qr%$2wOlO2hx4p`~LifEKzSY0$j5W^ZSZS^m=ShN`z{-AVrt9WC>|*|d&2=A*4Y!z zJ$JPC-Z|lu%HPEb+E2{nHM`QI0= z2l-stW&g}#QrzC;Zs~PW*!MD<|K8e-tTP3x-ShXHoO5%P!*}y1d|$#3$+OLj^t=Ct z*e~@&9Zhr*}@rKKTG=S@ocpkkNNB6>SMkr7|aj;=hL8Ik-MdQzgWw&*C*Fj zH#i#kzt65NoF`mvy?0~h8sqQFA1eJ?8~8hJ0jmYqOi7u)bEf@#_>*tbJju^Da_78P zs5fU>aP!ccgm#ul#(5ovk3Nf^l2b8!AM3e1{`>axyBe3-fBsvre__WBwZ6Ht`@T+< z`FBih(&3M8i&L-MJKT4CO8KvUNl2ct%EI;ic$2WEDh3=b= zR7>u!JrpM#S3^o8xYx>o(*y{!`~j^B$knYSeI&fE`1-#@AdblJZ7-chkUdYz5W(#e(| zD;*>mU;Vf7H&)hu`rP)rfW_xEYx>_B&#n1e^ZC7sO?dtOhg&V?9yOh}fcg88Q`rGF zGg6MM6Y5mgDCWO({fJPz`J;qmbu3bmOFvBdx#7WNE@`{@HTsc}=0cX+_CL$qv^1OL zrRak@Q~o}_te|bKAG!16^m{R0vGQ95Itm!}*gP>6L*oZ@`w z)jB7WZN1F;-A`J++S;f)X`d|DeET6r_J>bs(zCtOUfx*#-OuX9hq!2UgL$*xGW`Di zV2;bR*SS|`PTm-2`Z~@3zCvP#`Te|hTQMXsfJrUg>K3md)7g?P1lnAOR*e-BdXRZwhvFpl;$sZTCMh2wfE&p6Lr}g0up~U zP1ReXPGsb-vS<)ft8 z?)GHzca5G5y93jY*pyAwh-Fdsy=Gom-dpnIdzU0*UcRXG!5vcfXU=r1m+G8+aemz6 zhR1d8yb_VKEvDwVBu*7t$Mj}e%Zk4hCNx`t>Vqrs|7bL0_BH z=CEbPMnAT@XM1zDgK6raKeZO!-X>pie+n{e{v4UtyQSm(qsUF1BlwD11A z)D-qT=6RJo-Bp~z`()2`m{hc~z2|e(SDwZn_Ov=o{yt&j(QR>;L@sFshxyGc2 z9dS7m@3#NO;+}$EN4!J0GcW2tGP4fUVtHb}>$K|aCXv=f#-~a{MI=Mc?vECb6RDVa z_J%j_li~x@$^>P^Je^BrO%=3dI+rdv(qEZ!C}~QH%7@lzLOd?Alcx$Df3&>vY~_+( z6IE$Pl?BErN2gx7$FWOuOYBLPWJmRoO>URUl!fN4VKck+oYhIYOMR{I%+=eu`VMYy z)_nPS%}m*ZFVh$oYA#+k<;?w;lFonbv=)bMbZkjevPz#*+<)(u`SbUa1q<0{oncP? z{v~00yb5jI(&0orTW=rD@9W;uxR@UYJX&@bTPP^ zczH+pALc*jSEbL@x;e*OcOsA3pGWm_+fT`VOv(LXI&Gy@Cr{-OV-|jMRoTanqcvL|0K%8>i-6uKIRaHw?x1D>Eqb|OB&e9eR?J0lW zuW3-W=?(e#O|RuaNBOy&&1(wNEg!ztNm-+LN6-70zI29^IhSPgrKKU4Zmnq9+#dS$ z)%Qi4ju*fF>zTG{XRYwb(?#+BEBCH`xAsTV47KW)7t>PI1A{mHUc<6kJ0CAs*OC2b;Hmt`iy>iNQ*rCl%N-L-)r@)md$oxaT=G|c~vBbJ>FIbpTnKg)w3&jf|z?4JC1fBHxmM=kS;YYgu) z^%q5+`1kA0@12v&{iXfFKRx)hNsH}}l68=Rk5r$(xZk!DL6*l)-Zs7MXSn^ZNb&RA z^V{C*Pf}F3ziqiJS0Qhst4i;-`Q?|jFP?Z*vBAo(>ZXa|#9yLJJNG}jzmCOuulnwj z$9+=jkIF2|Q00BkF0y7)-J93@l6sQmmz?HktKr|!>npR=vD5l^XU$S+6}OW=&10X> zh&WQ1c5->Eb+hC4^?hFqnB>_%U7KU=Qk2uDZak-Xg7(eFcTR^ev)oI(uOg8kC>bVs zOY?wNRh^pTLos9blZHQ^%@#WK-uYd;ZR)0uWLu3yKh-m`(?2vl<(s^GwIu(Pt8e{s z3TL-|5mR+PC=oJkj&+RSqmQBG|E}Ko`d~53>CJaJzTe=etm!o|aZ=qBCE{wQoFb60 z?EE!_bvdeLT$0RtCt7p(cCMYkxqU}(zrTvJbHJgs4Ypx#s&f{uUGn%8hOjN=)yD3}>6h{ufSq_Y>RSF4s2WRc>1L z@pJ4v$$pv1`R)OS*0O7+b91^#9!*oc=~ysxz1MDujKf)(*UXyK-M;%O@4qnR!m8QN zj+JodK2pD2$Mad|_?wCIJiYq5k59FDn;CC0pC#IVvWoSs%eMkQ8O{>6+x_eO^)r4` z-zZoW|mx~Qd;zPo`jTvAj_rNlZPhQzf(MuS$FH&<1&$W z)#K&cEy|krZg0@rX}T<>$Lq!PC*dbQUY+Wzdi+rIXD>g-*rhjkIVC&)7;MkGud3bo zWZSf9&%#u5pT%Cgq%wES*-Wtm6{~k}Z#56>_FC_<;k5p$vnz{>+Jrp2HnYEatkoyz z*R{B%F1>el&fU!A6Qar|NqqgtFIPWL{Mu}lZ!dGF&XJo{eMjZ%pG!-oPibKJf0xn0 zGe6{-O!H&II@bT9cTH+j&Kj#!#9f$rvCzM4@?BAu$+aFG49CyR-ZAgaFYYf)`VE|^ zwfirfeByp_@n`>)wvY7Yo_JDTyg6IFK6Ay(HH|s%D(}8yi#p|@`1bR;%l)N)|D9N% zAP zzt3m8v3-&@6iCv|4R5Mm^li$8{Hdm!H>T5%M)|H1dij0Xf2VT?AODlNDEwM7=0xGKvrXQQ zW|@{N?y0_6+EiB@uqNB%jN`_2hDpx+EK`>(`Od@^c=O59uh)Eh{`Jo}v*T>k$zzW> zyB50CWpWv8y7b%indyg#eB2-B7&W!uQf?_1kc)7eHpNu->i(fJk^gM5pm=dF+`~UWpS}`WsPYkPf zB(L~fuxiTmEdiS*AJS}8w_*G~)zxF(q`v9PmapY3*PGaD)9GTto1D~iy7kMvU$ca= zSm&th-L*Dlso25;>tBj-|9jg~XaDE+`^=UK5u@XJyFaYn-eNsfb#~HomA~p} zW$(FvtCtr4+S~kpb@nx{P41<8zLxl3{y0@;h1I^OqTN|0m+J-ij~uu!e6age`N|2~ zXZ&+}HsQZQ{`Gll1s+Z<6HNMZ?M2T2?tUrdz3ZLY_FsL#>(sONT<;Fscj>B1j%7U+ zQJ=Q97k+nN;`;OtM@_|*(Bm_*ixnz5e(IfNsCX=xbliwRr8{wf41vzkKPTo=xd4A7*`VdKN7<@7%IGA=gS` zuKYh*ALMhqV8_i|v$t_CU)4-Lck)`n*DcxmMSlO3(r?<{c1t6>qdfAl*uMHo2Kk4v z7!QZj>e8ciP(T_O4bwvLu^F6h4Q7q%W4<(akC(JAQ)Wx)Nwe$BgstIeA z`4q3zWu4b)xuw{#angHY6Ys5M zm$}9B|IYh8{fAy?+Nvk-EvL(ierjT+E%WWvESSOM96UKdGlEFiHs6z`+a#PD@$_B z|9|S)m$~cCh3}EGWV4(6bJm}08+tzJYchsxoE~~Y<9g6WcMZ9ZR`t8ZwolQ~`lf7G z*YjqkRJTy(%8RCR-?N84TF-qa;IPZf(x9k&3^hnwV|V;b+*gT9ijCBAHz;;zqXBOV&s7@iti=Pn!M3T+Ix3> zayv`-1x;VR?jI$BdAHUzM{u3p)#tR&$(C`E`S*W+1*Y!a{~}{kC%0n$k=g);&M9(- z9)JGq%f&D$t&?@nQ+u<^X;GOcw}?%uE^kT2|=Fvv} zKMbei6fVyVGEq47^3Ak@<(v#IHAYL`rq7y^9}=awER*Slx8GKQnLF8<=5SPAcSvFX zRu|S@; z=lpLQ179A^4>|kuney@8$|L44r`!_}=sJ1URzFtu>Fo7#`SzwMTTY~XFXmcg#P!kt z53gFs$0ts|(l5&wAGpIk@uw+6?Y`{b+iubUMvX01!L@>OGgCWWS=+uTa7xnfEs=X>(L`<$4 zEd2bmF5J!|JIKTTt|5c%)r=o8Pp9*=SZ;l9@`}8$#O^z}bc%Atp>PXOHH}9^?t&Ea)wLHx^8l1JvCeBJuDSK0EgK;~keztSo^uTO;I*#5S5V_dXMxSFxbSWokr_iGcCH@S?J=cb_ggxy`%m z@MucC(0Sty4besZt6CWMz7f^9-^#G5*UWHHQfg(6jQ8_Ps;r5c4pX`(KKsRH=)L}I zf=AXp=4Af0HJ9DDE}D5yeuCrFf>+!OD&dR`YHQgpPV-_{IA7TOed1<)7SGq2o1%{_ z*UdlguutiR?_H(OzmMJCr&#yIT=4zYS}iH>r9DO}l6<9zv)xmCKNS=FtT|4y{MySkXg@MMu* z%$8i^Ov@7ztVaTm_8!Q&y;VrN?rM2yN3TjxPV|98y>H*hI2mUe+~#{eVa1#sFT8D6 zPFT^LoT{9;Q^(O)T9jjkm_bol%FFOu8XXarQYT1$+UL3CIDg15yAJ0c4}b4u6I|@H zC352>lRn0Z`Ol{ZUb{NGwIzQ4m5Th?>YZ%aPisrp1l+y&c;6HI{r|WH+vFD5eV9a}+Y?mwy5H=LjJWbL|bULTE(%-DVR`G47ax%t6f8H|fkHcQMRYxAr%-^VgsW!&CWyYm#YL6~D z-B1s`cHTJYuVYf_yStw6qdG%ZpKx2lYNY#COPN=N@|0anWJltE}Bz4q6=zrR<-tyird+ zD@Bb~1-fiLxFj%V*-|bC+v+{iC9_YmO+C4DQ^CU$5vBg6RafSA92a%3eXHB4aH@=3 zv*YWueH-U?e#o(YVs^#zd##+%&918(58ms3o-h79Z07q%D@$uum zJCozRrr$VcEh7+fvpQN~V#R$Hj+1j!V}Dt53zk1FmwD1{F|lTmLi~w#9nXE<>7eW`E+V`W* zzU1ZnyZ+1dc3yV+Qs?#Yw$=UjlNPBz{e71uV{Q1O>QB=}T3+S%n-y&h34K3Z)I};( zsBU{`&V!1ug+c{62WQK*t|{`q?Iv%ns>)rfb2pZs!B%%^&ASQwof96vc*gfZp!SkB zUy|+CmQ~gVKGaNnw!m$T^?@6r9X(q8~Im%B(8a-77iy{^-+POS` zLBhM|HO9ZzsI)V`&7Gqq;J-2C(f7mUspsQGg(DjgI9G!i`yi@7Pnf5uR%wzn{lo5);+tT zuBU2~)6FwX+mg*MB|k~Idn;$F-h$9Y+e7QG**VJ9}sToYhx#kI07 zK=R*N#afR|hgN=%J0W8n`S40K>*RGsQ7%)sf4+3P`$|CBGwjcE<(I-XM~_UMA-33Z zjllXT@4ddT`!9)9)X|kp?6lJg^bA|E?3(t>n^~d3s?9}u7kGU2RG#yD`DV`M4bm-H ze^+6}CGN~wYr_mZ6*HfHjlPt*jc@r$;EV0_O3={XZNhX|L<)%67*u`{&&KyN={9&+8>Wie-z}*l%;yl zHu7Xydh^WsSv?N(HlLY4eanPTpM9_VjciML@4O>j`FG^81l92LnJtUEWtA>^rI`<+i$4AaRyt5Qi)KQ&CwbzP48~mz+LbvvF)G_tRhC>U_hk;>C*PYbS{7 zw7$vTc6E=G?h(y=yZl2!2Yt7sv`p9~rZg$JQK4M#h?BQ+lR~V!qF+rsi{qZU6Zf*C z6Tk4h?Gpkw9ddcLSK#eRVdJ>%k`FFL z2f5AL{;oCPT7p2X{Sx)m6cde0PHo$EXGjWP*!Iig^raKU8q1uvd{1fJHIeCs=P8a& zy?ieX_qKm(sJOP;(@i@iuDoWstA9oF6T_19Ql>($Ow9>A3!P3(l55CVQ`5mIzWQIrue7v<;+I?|iEjFE z(Q8v((+cqm^*wFNR*7!ezi0cQWX&b%KSfM5uR58iZOUy`KQNiANa*xMNB#w2ozE-I zro5Z_B`Y!W*2w+LJ`nU_^<{8#OSrPnORLuaP; zO!>%luuJlreu`_{MB8~&*jl1iFA3f#t&>EX`0uinCgGh{GmyjB5fz{xGVZjKGj&T zrlw<0^KJEA3d*N9ob~ZsZlK{WSK_E~pQR(sm35=;)k3a=@4`H`I!Rs7Sn{rq{g!g; zn$mNc3nceWdcS1#HlA65jYn&2yi0|aczyPY>vVOpQSJy*U8a4;_^tTM+pm=Wo!a?+ zV)ie?AMq&_0#)rVZca0w=+1rfU(1CD*X^#ycf8-*R;l#(wrvYriu>c5x zntzpie|w7Ulx-PtSoCw82j`n&k8-O*3IC-3d4o{+!# z`qScwx*?p_igT%BFBrkjjGf#L=I09JvD#n zguS2c#qOKRU%2s!@vM`R7c)xEJo|Q&lX;=0OWhik8ao$v{jg<=C%l{Ew{U*@?>7ST zcU<=6xp?Bb-R|2OEgI=fvh(eOk~8MFw}08h7jkB+K;}t~RJFJh_iE&sRL@48{4nMI z0;Lr@0*>CZ*>-?+t{}qm(+S+jO>%H57i$zcTo*}h+rbS%!Q~SOCE7z}a zd{S$1*X8~-``J6$46|EH-fvH6*z+!yMO5mw&Rxcc?v^82s>0l+B%dW=O3lRLhW-uDoRb1FCh=KL zO%l=G{FS#q_v*@Bmur_eJ7^|7?LH#=rssl1OT8q++XZ#odpv8tuC6Wa3chePogwVP z{;-mX8PgQB-^FLoQ8AmZ`}VwdRgPS4{-nb5oD7SXRwhrn_kQM)x7MLPMw8zp8r*5T z*TZz}YE7`n39rBT-MEP(HloL);(%pJwKtCmjv z@`a04vh{(*%Um`GLtpt#;(g+>C*sm3f3%cXe}U0+Qdq}Lt6#fx>I}?}oc^HnxbD8+ zq3^{-Or6&+S{+u|HGi`F#yb0tYA;_pns>gojq^8pQOEG1+0*HbSF`6WV=l#O+WXZK zcTXx}T3B6C+j)QSE0t^OnkpRkr=Rm=3slWJ$)$8NO4T<1-2CJ1BK&0TzdNm2sxzVBr`l=93CEk) z%#ds1^m?~yrpw`{&TB4)noZ`J2HB&6$pmIz@llIp&x9HY_nZRDZhE&hyGeJ_SCVzj^@z z=Ue?Y^q;bFS(Kt2CAV>B!^F7UAF6RD|NcvMTD<+w{!0JfeIB!CdxU)XCf|JG-5vRx zg&o1ha&f&{FH52uCBAwcnxFjC{&mIm6jsUSd-ziRoD7o)TFdY`u!k+Zsq@MwqYGiL zS|`j~m@3Fw&Udju{SwQO7xR+i9@VK!cbM-K7D`z%B~@eP$+_1Qwk)64U(n+mD5r3G z?)nyoGr`#`FEh8yJR*Jn=t(K}{hZrXwy!BX-q};;&3s~lkIuQR?z25r+?F_BnZ#4r zpRv*s0+xC8leX?mP`I`DntRXfT8_*cbGa3LtGEx@ z%EqR}gNz>FvXfx76>Zs7+DV-tuhXx{$Q4UZ-zy6FHRb$F;xN?Cx~ZXJg&+ zg)g@MR_wj}!QiBam!9!UH`U17jyg}iC@F`Ed+_&K9QhoeVjOz;fr`h~xC3RDU9v4( z#1CD`>tqmo*_vUp(Zf(6d0mQ%F3U$VF3CmP7jdsTv~t4U@H-ms!ni-!be&qGqMM?6 z?B?zL8{$)z{L^^+e9q&|T@f#u_pX>UF^TKYxz>!HcgIgH>Xf^5_<8cvi8k##Ctokf zNq%SB5>(Hau*gY;pGjd>dbz-36OIOpLdDy2OU-MXN#blg124WdVFU) zge`LZ{lam^l1VQv1TIn#`+QLG9~<)~N%!X(DgyDOJh}*E#1+z(%827?frdrD;$5`zhVE0o#pBc z-P-1&J>p02XZ)5gI3>2ib+MC0zn;Ra9Rj;+X0mM5-`ArbWc}Sy=j>4h8?Fg6CON4& zZdqRGetdi73;h#(aVyL^f@i&PY+F{Bz`ri~-8@F2V9zHU2doZX?@=?DZoO_+~WQfxW8gLE{$*M?E3FW1BBL zvHq!ObLsV^2}k?I9{FTGb>4P5W7;e?CFjj0UJo6=Jr`tYStEYP`IOb1b|Hb>moGVz zCgtCKB%*G3LAUtbf=IX3eKLDao(k6aQBkGQ6u`qcarxv3{revlZ0d7c{ZG~UOg5kP zk)YhY-&hOYP1}4Zdi{~h*>6IRdwsjO{b~hsX??T!k|k}a!MtvYHt)8t@iq0}zxw~B zUh|zhK{8zDH+Px8b1XS1@woJh(7aVwf}Zr7+yZcX5 z$@?v3zpik;~SSBHsNZs^3&2EtV`FvzOtBAXYrS}1X8(fY zViGQ17bG@nI~iSEVYNfqX}|U(tIAjM;!c_muQYJ9PfiVQQM**NO=!DSie*J~W`BCw z(zkZkr>XcZnYPsW$-xaQTYUB?+lK{xin@9Dp=$Y}#)NMYX|>)@1=ihLynCP1yXxPa zI{fV?_o@XYU(a)?QYyFZRs22m)mD~EmN9(_N(<-8EqnX0kaN@ams@R5y`CqZEwIRE zmidjkK8G@mKM~DutZY-RubdwsQ2VO(Qg6vF|6eQSw`MDannYYZKP{~%Oeip4aXW9y zE-y8yDI7~|O$Gbz+Il=^aWP?OzbAEr<=3k1MvQN2ybE(><>9^#ZKXauk zT}-XZelGBF`}sK8s%u#vCfwg@=J+`#d8xzaKTC@_QkB=u>OA(z=wi2Ca}UcG&R_N{ zQ!fjxJjs<5TBW2co%!bE@ejH4E=k5&Eq~y%`d6)^q-3REb=9vvkAI&sri5L$J0!DW z+BTPK*Um>({i)>qsaUApYNV+ebb3d)xsdIZS>=p}MEEvdyZ+qw&4!P%@)I7uU*o)G z{nkIcOUpEV`9G2LbDQk)h4a1X)AHr*SETN>DeP5On0FwzrAqyr%VKK_M$=};lOFpf zUbKkJywkLY@lNoE`x%`(F7}CKZ3t3Re#WS~ySnB?M!DRr=Gz_`g3ErFc5^c=x0oz< zUz4be<+-efF`u9aPBz0wC>6g`8)t&0LzKL~c^E3|J+mz*!bvot6 z)H&Y_9w~Pkd`)0=d^)RRnpoKT_23s*1q zP`K#NW9;JVrewKd!UjPG5uG*>rf*YBS}i7rX+(ZquBKGl;__m9%ECRdI@dkjAJ*(T zCcEIN-HV7Hn}gV-uCcw;t7`8!ZyBa_aQ3A#jc>OqoJBobqCMT3RRw#qKbQSrc(g

hIBcQsEYH;sBf?|s1N|Mh6m4)S z^AK9NVxB^7kIRl!ZP|}auN%;2q7TETb!ZU4l$Dz(7X4sOp~OgwBI%c4A6 zCJF9eXwfp+`tN3ub1sk60&Yrfn0|?m_1#{j&K&mgw1oHH4=P%}I-d1qV#oU$X~&0d zo-Okt)WVKWIq~nqwoB#D+pmZfue-mm$7z{R)505J{~Kjie|(~!Uw>zn?FaSAQl+~V zc3+;bwoPvxo3f2i#UF>7k8T`_>Os*QY$qz*l)R>_2~p0x;j%(>f`n|tJhAOj(_B0b zF|vBjKPW1tC7Iyi>Ef(?Un*;N+qo+zPPEJ`kZ<^M;k5L`8{+1F!i^?eIB2S&?x`lF z*U`3U&6E>-ebI$SgG?v?$VsqaoY|8?}MKdB{RO@(uo_N-+|I+ENtKa^=p=6l4XJ+)u zN0D|B^KZ}DxR39D%i$dt3c6hdrYd}X?`2N<8<(@JoBVzDH-*5+)r)L$|8(q{eObTy=Z854st50RRpp*Op7!8(U3x{# zH+GwX>s)eC)l9b9SB$@W-g!9P=k%xV+e>O||L}XZmPT49ny}T2P23u;beZi>Q~S)` z)0>Y4{VqAP+TVVwKIhxg%DCUFgr!W5Z&Q}OzN^^oweXXT#*KTUvrX<#yR`1bnvY!1 zLynZU#g@OG?H~VmW6dfT>(`$rGhbY(ecEpEd8@`NV)t3!uZhlkZg+cz@tXtZEIN8W zKGD*?C;Qu+TOcy!jEtknd^6>^DTih(-E~yyv*3?X#ubgRde2(c6>a}kxa)2zr}6IT z{5wC{ul{svO}+TH?|b%K+TZ;9+=mCZz5AaoVSk+d=G3Y^>*Q}AJNJH9ZQ8%glgho1 zSPisOtoLf4P&q$obM~2a=CAS`&z@iK&9b@1?O|cB;PUkK8&4QN{i{9UQQo=ycgC}{ zet#FynYVK{YxZQ_h@RO~^bfw$K0ZC+YveWe4F%s{sYblue!YX0`!Cb>&(>a7?02wa zpLw){HT%r%4;*5BHCMeieEY$1P0fA7oIOoX@7J($ukI6ia^&x=D(3Zn1N1FF<;FHW zg+|7&YKw1Na<{@a*nC-^@HRx|VAso8O{ssaSq~a5s$$`OT>2$;gF#&DMpo{I_L!zt z@p})vH~c#DRX3vctNZ$dpRB)6UF2ZnwFX@@yI{x&<)%_*m)a}?CtE*35N9^77A#3lV59cSpo~qh$dktsG*Hb|{uS8FMi8X&E z`cUxcsRiNM%6lSM6X!O5|NQ)?n(6gbto?6gn@=q|wa;l&VvzRs=bo%*ZkVcxCd}GV z6U4ah?Gw+|a~kSuqKCf!Sn}wC`qU#ImN-Rc?Whb|*jRMkWMzW@8E1OJ$vo4t zU~?FcmgM}N+5k@;eyszi*;u7QUffH6;>bF0rSVq22RCa(75_D_l2)i!*l%;^~K4joZ4S4DtI+&qxwmDWXta&SPD-@PbfT@_#4WBr@WB*?C!f1(U5N=Yxg&f>a$pN}4WVITZeySCjG1@smMGmrJHBVfhep zCWxt`cj{6WiI;9#s%6(#I#|aX(o&scsQIwPi_>b$+lh zO+x6|a~-R;S=cXLrCZk(x7Fj>(?x8G75;yEel9+LdHE7;%qFKPe5^KSjr)J+nlw|HDxbtdclx_q;!^Id?R?(`o1Bb?g~ zN_X84X)VZ!S9&5g>AAN=8Q%=m>B~0=+>2fCPbYH6QoT(VR*T4-4&J>YanFjP(pJOn zSE>b9B&C-2~UkT;sKMq{?Wy^!kzczc97O$&qhyso>LR$9!6IQ~J(wc_*A#c8^kb3Qg| zoINBvZBD@Luh%s>FaL=2(6LDraxLSY~R{n=Ed6ZpSLaV_wVOX6|CEnCgCgMy!_i ziC3GQw%*w4bp6KOzuaHDa~Je^tFOrRy*}f$@AV3enCms%;;*F&Qm?MbK5%7P3$MXx zp{u41wd#@1v!@AfV*Byx&B;w{ZQJcOudy`w@pXdff$4KsuR2=$co*B5IM3@cRlUX~ zysUd|cCnqA>3LnDVQc#u#*#ua-Di*IO)x$1SuL`7MaNs6>;nO;rIF4Nf6u-(OVkxS zH)BnqQ!20Qs@6VLrpVafyNgY%J+CsH&c1Z$W&cs{)jzN854b;j&BhlkYb?L`Ogk;b zz5bL`-@mh)+%6yXz4pd1GWn2Emf5|b@Yqz}q$AgNE#H6Me0Ah4 znIr$a3Uf3j#h-bjw9-~RvMJ}n#ilHCt3&&%YVT>dai0C^b@ffs>X{;z1?N)M>=4cN z|J5Y2Q>@TP=7x&hOWr8K@P+Mt>n}WBr#>%v*Rh9Nym;gp?ZsZEURhr0+~?6MbGzzD zSekMz2Y=oT0dwyjE$1bvlh5omS=t-Gxy9-B%Sq9mVHZsbOB++Pm<;vnH|~B=cE0&} zWLn7dLuW$|+A#aLZ{+ml`YV{obic@V>2-&lJT}|1s$SWO^hV2G=9+To>U{kti*6*! z^8Hw66gFoe<9n-cpH~;vO==V?Sz}x``|EOfILOJi{uD{`VBeGaVUqQ<)xnz@vnB5a zUy}8aza;2+F*fVjr$ZhQ7uJTEYUE{nKKA~^j;f^6ui7`iW&AHa+PyR*e5Q7uEPvkx ziD1i$P;VBa)iKAsO_$7W=}Ai}Gh8GSdU@|sZO&=d=k4a{s|0awf3N+kGQ8uuj%%ZL zLTsQ*Lh!^NKJ&!XzOlr8n&-~HMsmyV&qrnS`5Uh;um-=r@$QrB^Gz*pWTX3LtdiYjD?3luBc^2AO8rn}_u@5X z$E)5O&(n92KgBlfTOreom02yh8>Xk2{W^U}*Q@&8tSisY%ZtudQ9m|=zv$=E{X1;G zUi8b6!3=>9p$k`6DyrC4=fc z0=^guI!l_~G~mA36a9DFqH@bb@txOnn*4>Or)NkSY(FhN+fUtm?&@{-dTy`mJ32Ah zUjD<8S!NSj9$h&3J^f@;=cJPdbBdhie?Az>w&aKi*TD%{XJ1|xG50(Xth-}&w9e85 zZ#P}NyqwKy3aOQSVNYreQa>G-5qH|(E$naq&eK}0%c3hQU#xw#sI*d&qij>nr=Q7! z{6;@kZJsE6aAU7nW?ZVB{IRmG(EE~4w(-J!L)x)Vsp1-b)H(1s~em*^@@DRE4EX8R~pYIhI-6RT#GVb{8k73d$|)NuKL-GRI3E_~C>EZXgKTIlOn+egzc zn?yukd%yDa^J~mYcDlMoy!xAPZ^?t{d$_N^Sz^?4QY$%j?}F7mt!af#2j2ylKEI=5 zykS+3uo3f)cL9cUKW>b+?C1xYNG9G9)row%e9&}Wb?4EGGOYSv*2yXM|p`Zhhtad zjm3Ho`dpIW+7`1{6|angCoW{{UShuH ztdZ@M`90h`HXAoBetvoJ;h54eAqkf^?g=%~N0^x7dnIk-%x?XD`LT23+@!1J$Ff=H z#?P;6>dw*Kyi3clFf8`Izqy<2B)|VBcO1GApl15%v9@8NveuP<#?7J4oqcka#*W1= z7jqsga8r9`JNxZIp=P)Fua+3@^b1;Qt$f|{*4DrC-)Ws(r^4R&+pg9Bg1+g3hc@?i zz1yFwz|{HWebmi^*Qf9}UMM~laeJlq=OzEb!yb8hoA;$3YRN55U$$kc(sWJU_eZ9% zvj?j+8!vtM+-T|QE#jfKw3U@tTnd})-O`mB`{!+ZSNMI=^FARvcXM~UOwF2UDEupa z@}b`oQk#~X&SA8@wXpQ>*+-?*H}H#aHXGc%q?f4nre&rfhjHW_1K!=!loEFt+?;9P zJ9|pi%X4!~g%W33KfR<}c4l9^_JPpCLkUT&iBV#KEgY;VwbxY7w0O=q`KTpR{Y)L_ zWrJ2#&dYjBD@qU9^eZJsu^RJx&QMP=|G&QV>$FwRE*E(O$48#-HZk2S#U46gndGVN z8+Exwm#&0vieIwRSNw^fdi0|uyI*gAdZGVc_*2tqtxi6>*FC*=H6m&Lw1N|R|6VTg zD1IND^lF0re~D;U;kmOGw0W;qU&(X*YVfU@OSgZGQWUW$Jd|)>Zg(;J)^`;f5=6KB z+xMh3I{%Kqv`r2xC$BoIB@!O+r>garvf8Db+&MR;g-SX78tyl4e7s~`dBN8+vuqNr zmxV2T5Z2sZp(1^}$^F{${RNXZJHKoHHL+yh56|@pKSIj%7=QnBJi^r#{Ni1Ei2j#2 z-x-Xv9&b(Ba-A{w)y}4OY2qtOzOO5AUCEiHdHsgKw3`xvMblglu6HQmlYI+4HN8Kg!GaI)@?tTuFN*+jCyY8-`k!?x*i+DewGo;L-g~=2L}- z-$%IASl!GvwDNsnb#QZ3>-%ngt;VmH^!AwOBtN|7_wVJOfSU(OkM(&*et*LhUeUHs zMm+Sw>z}IcKh0?EPXBsUYtOB{Hw~ip?9JKpL9W?4>q1@jzC}4zIZ5shE3VByB&_P22oilz;sO%jw}QE9OURu-vmE<6rm{3sc~`Bte3A1BllhU`$nix_Wrd>!^_)GZ>-qG_52u_i}$*#j`D{rz3wgC z4+G06B4f|g6FkSKWp``d-f6knZOUQXy?y-Ee)%zJD^B&wj$(grf-_i0n%^R8HrL+$T z7ar1$GO7I6ku{xW$vMsYg%Cbuqe)p|ZnJG=Z;PQvt{_XROp9vj^5 zJga!9@M8nd_2qRA+7H9_KU93|@FMb@-m5!T{~SEue8N_G;#wJrd9so>vuf97D3^6S zK6n4L@Xbr<){QQH#jKOtqi&g~pMGL`@R#wiU#TZ=J~Y+!nl{I9g~6doqHQyhZbv44 z`J116{nO)YrF;#;D@;tOhqR_ixo&Ly?wxeQ_Ke?ji7xfI?}Z*em>_ZTfzV;T74C^Q zn5({QKljzt`Pm)~diu5cu4jUV-cwbBUqR~XjSDL}Wf~_ceAbUv zP=9mb-v2bi#)%s_dwLWN&N%&*=I4Loq@3K*n^Jf%amK7$tnH7&RJi%JmWa(i&02gd zE8MRn_&|7E!g0CG)?M;<=c!llsUBUpqj!mg&VsG6M<*JHx^LR?XoK)KQ5iPN#X$u( zrW&n#VBx>$!3OosyH;BG9q@al&h4!$dS?043_jhh_ZB#>NeQS~ys0NwBc)IQjo?M2mR!=`H0PVLT75lc#BYRMpn` z^JRwY%X{sA@+8h>y=Sde)=p=Y%Qdo#v3J(-P&sPxX3j_9kI`oq9u+QZsHom&zC!Ds zuF;2-66eDi6Q*9PuzAG!c(wWa16_ywwAMYmlP_!i>!#v~qPK@Wq^z%C{d-OG>vxSi z4WC+B4{E*%Ne;c=Y^VC=%x;eTdktUrAB_{xoU^;OwE|9M&7k+Bc?1(a93@;n-pl0dq;J6zZ9M%aJcWi(5 zkF&d?@UC&|(!A|@Y)e1St(e}nwoiYL^o~=0@oYV^Q!l%$sjx7A*z)1tUgba8jqI+j zR_E>tpPMo@`Pt?fx0b9Eu09gj5^pZ(o+$L4bCL8RllpTzH~H25I4!1etE#V_J0sG1 z^@r@!3Z2G%y+`KO9G;ro^ZE3u9HnIXph=^O82qyirxM5+GIVY zs;TAcTJ@KqFp_hn9at#NPp(MQ@_e!EV2camZ5 zy5HL0|MwrAQhjXM9pkp5a_-8W^?Ywm*(PgzPbqwwSFy-{N7458Y0DQDnV+}0ID13V zoJli2s4kV9`g@E1t<2VY`>L%H@4Zww#JX-_iMfob(x*dH-kp4O>Fx)IQ#;GHYoD;a z@-B@t^vjhm8d={npR)P9l@r`uS*Ie)+V9&bSqPbn4C5uIj zayGB}aC*&)$wx1yi7(BGH|uKH7rRY+-4VUp{C2hmkulqDb51>U<;K-_4=ha1SKn}p z-Ksss>0rXFn8K$nZddc>2S3j~dO7KfNKNI6sug96mmHK`cI#|#PuJ?QqshkSCcO1a zs$fm|Rr$UB;fa#&6LR}?E-Y5OliNArVqa>(nZk#8{;NOqbC*|h7`9fki0!&-w{J4r z%lk&R4;F+cdmZC?IOEBoyMN+uT^D_qDsOSh=J>S@nOMt z&v`}OO`FXB_4WZy)5JF%z0IO#AA)|Fw-|^hwC?^{6;x{fA%&x|{LZE0HL7>lwK=VH zy1Q=LDY>V+?jDL6`=?5lKM>hKB*Un|9d|D$=XPs z>&fYpeXK98mo&a%JxwcsCpQAKSK59j7O8^7^?hi4V`4n?0Jn_ZrzDr z4|O`1ok-A$_wjEOKmF?2^!e3hU+?8Dd~~a$j{m&ai<%&jl)VRvVskcgr|xHQJa>b| z(pVtn=-yolubCHA%uvw&oFksnfAWjOhncD`3-5&6{7KNcShTCgD173?j2D?s6A$W` z1zdRY?ab~?|IE5m&gU3yeKS9`=i)! zT@0_~opB|aW7EC=c8Vu{u~f)jkgXQFsG0ibP6wa#_Oqh7jKWWDJme}mlF+oq@ZGzj z)$$vog;M@zy-QS1NM6ppX`XUz?(?37>J_XvKRtc5ana7n3eAZZmL2yBSiIo)f!>vg z&p-Jcu%9*Md0tVgU&_C=#TzC+URvBPUtP-gE=6UobzJGXb0_uoI9=X(*kj#=*f(C{ zEuM29EN{8enZA1arZPVbTPydPW0{J%2P`J*lqMC-`zI9`Hf`5YccG~EyHS^{JlC2z zzh;VC>&-LOS8V;;{SsGqwS>MFT6V3`GwAt+DS8U6=QuB0HfF0YY+fs^zff5Ed&uHSxaBl}qOv zJl*5I#qJVUEC1_d^97pkgP5k&IuA>hn8U-A~_aw=M5~^LfUM+K!!X z=hW3DfBe&&xNYf@pD9X=uityFTyjw)jbAw0be6{nU+bF*e?o7Wa%DC|eXKWotNEkr>g4*1czr3F1C!GHAg2k(kr!ud;yrI^!FJ3uJbzR%{ zC#!Au9Blu-aGICA>x{)cen6YZ?&)0vjJZ)e7nxkXNQf({Y^T{_4XSM%n{Fc4^&Gav~ zd(NIq-nISRs=`l))Ox>EKHhARxaps0DA&Q(&buOgX&>fU-0R-UZT)d&d2;@D4ZUf+ zzjs=Pc>RyNtyZ#3wLIteYr}Gd;90&ercC_B9Gu=Hk-Ri`qRG0p*P;)vS}tC}-n>|+ z>cPW}yz8xGZ|nA0H!Dj?pUW~2G|mZ)@ym64d$4Bm!bZz) zU0T(hkvZ4h^cgcZnf}@!`T9kJDpAvbGn^QPTJR)OZ z;#{L|r+2zoev3P`IaqSKtk>^ddVT!+0yMdr(_Y?+I{x0>cfVia54PGPpXXit{?Bmn z@5N6#HeON|y(3%HBq(t8eS9U`j6IK@IDQkJ5f~)?uH)kU39RMIcF)XgkqKRTNk{JK z9@Rg~{A?$0I&)`M@6EkJ$8^Qd?KqQF_VDdSCPT6Jlg};uKKp$CPM%DzH@y!}MrUqz zxAZTrvEQ@T?T+nxu5TZb`8}843KB7&nKz|T@uTJ4MeFuwZ~3)S^V#m_b!{$r>Bj`m z%bcCeBlYRZ`a~mp^Cg8fecek9yJP2UGj94mwPuTP)A^dM#y8r(x!jg~U}`JKbiYhZ z@YcD6lW)@^%1g@E_R9pCg>5|U_GQ*B$%Co;Zb|+Oiv7qJA=1A4z#`Fad2Ta~`EH#p z7^D67d!1vM@yw0)QgxOcjh8GjmUK2W+Lp(5#yS7Q0sU)vYRRwDgcjdDvtiSlyF7Mt z-%Y-05g-^DwY=9t`Ky-2*?Y3Le{TOKb)h^f?Tg^r>Uy)fyM0_|c??SPdU$T0Vp%ws zM?rhiHlv97sh6xI1-8~!sy}AjI9V_zvhl{rAGt?Q^S9M{pPKG}%v$oH*XoHcgKXi^#+@txv@DP3xAcop-?;i-f;y3uR9woylb}_)-Atw z?7`{$;2m$L<@;{YbDOdAc=nOEQCqqXKD6K2Ex72*ucxs+cAd{!EtBh&rs`)DyGA#} z_Pl=(+jIPY9-E-2aOA;-dD$1uxqs(oUkT#g=9TQr^B_+z z#cbi`@&z|Ii{p2h8Se0ATloBw^4~3;GehGfrFSJ~Y2>Q?ePZ(~r)7rSqu)DcD-b><|mc&*7#Vve{bg#3v3?TwLE<5Q!|l(XxDVNE=e;C&>Fctev0SIl zlsV2gXM0tT!%RJ+OwsXH>zNsr2NpfH=a|vT@=#RBWHrO0^BcH0SBIXsvBoLsiq?a& z`6;3wE^bX-t#BsO^JSq=N!BYCvtK(3*vckcvpv#LT~gk9_3rDNEwkc+Aig&n>n!5kNby0qM3AHG%>Hf$5HWe)2|EFn5 zT;@sroRS$wYYrZ}7{6cP!Ia;}zdec;G5suh-H^lh7vFJ(3Zd1>1#kKk4PQxYV7hHl z%5$T+mqC^}>4vHd^P^;;74i-r7N;Lq=uwU9c~RV+d|>(I_REG1oQDr+J#AxjKi<7K z@j%Dc$&Md3*mJDkYjph9`GhCZH{)hG9#}i~jfBDTvNdO!W}Y-u=!x8v{2|)(c!U1^ zhwKF*Te3@ds#o?M=eROYw2!g<{^n$XMY~o%oGqa&<9z6!OV5Jj53DaFYS_zpqmA4|Vodnnk;f^AN9_B#oN*C+ZMXLzbEPi8ngeO(`8 zx#b~)KPT)>d46ZydNM~uxhUa zX7+1;gOf9Lu591z$nWu}kzv7AIAvTI8AiK@S^nvKsSrz)PWbQb1|zxdrFw{m5F{ub4lp4(n8xiCFu%hTR- z)3z=7ea7kEcDX0}WJ*u8aLs(>F=^%EvR@wrmcDVlB-!j)S$^f)=NSLr_M2Al?A4sM zGAF!RDbDcr39V4SM)uVq8w2as1RZYkI?J#+5nmG}&whGdZh?X1^#i=q7cHK+bkz;(C0W}-SEaQqU3DW?UBo+7lktr3)KyI) zK0hu61!#rdoL6k={6xC@5x+}oX5P&A9iE|i+ls0dxw_rrTX|~RmNkEF8EI`jQxX5i zu=mqyiN|YPI(u|F_@23JGtYT;WJ9m8@u7*Q_#Q|=@Q8G8ZLFN5bg)Y(iH>G~@ zcKw-j{>nM-{?_g^zbWUo8E=^r94?T)#k;jgOxsAL5%8} zp(~rh=87EMcX)a6w!I!A0YN>yQ$!xKC?D-`^bAbmN!60y*v$Cx>~?#(#n!4`LI=|i zi(h%!qp^2W?20bQRUy{(k9V$U(cq|R!#%zI&zV>Uk{jSM6 z>ah3rq{I_?zcSZGHqD;L`1I(N+uL-s09+HVW$ zFnIl?M)7H9(NMEcb(m~ z>UK-VuBX!LRe4(3_{H*QgUpszO`=(Vy%srt^=W1;DRJz|5Opl!( zm*03twDh#Nl?hwm_LFV9d^=V|Z_}1qxiZ#Z>cYIAJ{P91i0xw|j% zvjmx$o+&?aRCjCC+|xfpXRmMm<#K0|?NrI9-z6_Edz6u(_pd!Fv{j!wX4A7nr#H{g zKO|i1t>zK`WbMp#dCUTZr&k-kbGh^BpS$rU+i7*%`}I3>TW3u@alQ1n_rBuyKP%QW zGw%Ev{k-@2oOKU`3QA8WuR889Z(oY{-v?`iwOA33PYhBFkqHpS4-wxHr zT)rPBa9h22+g>}hSI-mN?=sxF=3kJTt>|#8s3ABvaNQqH<0)(EJ|7Z%X1LJL^-j^X z1L}vvO>_%Fw_nnc7v7#zdYAvzv~{m~UUkIXi=6Pn{pWKfwzH>i*D2+N8V+&OHCp@qE!6&Z@H8FDx0I&hJsaHRtC{ejPVJ-O z=CeF=b5k=MvkXc$wJzMemS?U&V#c=ToNdqi?^_#xN%EBb;`L0z_QmwgH@Dy3^Hyu3BDOi^#{V4j!On!!)4f7=nr``zic<_Adf`@Y! z{N1cKD zEWRgpnoCs0R*GA=?tUvXS3ogy+iAW@&y0IiZ06kzpYSDV>okv9Z-V3|J$t{>v~q$| zi;~EsXZi0JdX*kMBqK6O?e+|}h^S51jl7d*9bNF{zF<0li)7w4uMB8=&bcV=dSzs1RcvO6 zdX{F7#KoK6tZpWpZI&%%7T7xffy-ONhLx7bqMO^7rsbz){qviXD3`q@AOKCTRaQVJD!dcXm zd83;(JHvPG>gaQeL`#?DT~KA&TI$;R%cOskRM~>cQ<+g0zs676F*$BQlDR5l*tVPR zE{8K*(!;jP2}5S&uwmWTk8Iz z$-2aKa*26?-p3?wwX3n0SsUN16E6yURs6WkQF_UXH%$R|_Qvg9ux#s{XFlRf%=9>J z-L&Ca;ZVN7XYRK-fgRafU7uenS-(2{%{BSi$2YGFV3GHdcG#XNcklED?pdzIu8Z8? zr!UxY>&gx*j%A-T%B#I5eZ4Yo_q6gIva#Je%;gwwhuzrhaAI=t!bKM8=RU=3|6lxJ z$AwVeV|6~vZc(`}QzjjgNPNBK__MSNqOy~>e$$gXJKtm1qI+#qLf5Q#(5|`NVQbMr z`MqxW#6zH(%9os0bO+$s5cPcBaIzvq~HcjCDj$GZfJL%&FcM_pfO9{3^6`LD{7 zyoxnqof~*9gX7+FCkM)!Eqi7cwTk_`$nNf@ZA(wDx+PfbtSkDr>k97~{rW$VcJ+T( zeCd-mQGE1Ml!HGiO@Ej1s*c}3B!ukN7(IKO?D50kr}2^##cI2^{(7eJvi@wX>b8_*SS=)4}|GbHDP#%N{$| zfPD9IN%=hKQk9x#=f5lQaPTLc+CEK|Q(o@n`MK6Yc3=3i!M?E#y&qL}q*jmr?{gjZ zL+uuowl@n^YNS5?D4wSL(71zT{_P@_8js!{_0xSV{1;DG{W?GK!@}p+r1=^?EO37i zeX?%`|Nru$1AHy)ucv?AAt7Wp_e)A`4G-sh$M{M)dFMmvUE9upLM`xP)p;Y8nr$z3 zzDf4@apCjUZ6GJ^R7tuwgST*g{Y|~;$u|pAI9C}79q^d&BcLy`@9evm`iHw;1xv;` z&c2&#f6r6k1e5Z4f4}~(Gal3gC27Pr6u$KT_)N{hOQc*QzTx9cmPdPi3!bI__!YX3 z!C6pumqgQI6Tw)XjhCmYE$UXZSiY#S};Xq(`4U*DI%LE z`xe+uG@GJ-pu$A=Nam~?JEsUI8L}FP2yg24E!cIa=uIzYU(q4a=b255=NLS;@hzAl zT=r%oXWyb9lD=6@i}fE)%+>=*CA0g!xif#K5#J#e_vX`*)fr8TbqdqxDp^e5rBG+4 zW^qdB=4lXVJwKEsJ=1)XpWvLk>$K0EW^vC z)|y9WeG8^&eabUC82R>Qq5O;o8sRDL3^ku$x?feJtzh9LW;{jzz>8a5f?k3$PrE+z zEay1)cb1Eyh4ykE=AN}PjaG{stc(j*J94fvW7(g#G8}zE&Ua1=$f&lRcn>1MA&~UK zdXAEX7mxDw7?$*{#_t?C`h*ToEbV%rVHgv+yhC>BFTuS$2Q5u2?>!Vb7`Q6pqmHo5 z(ykrT6)l`Mr-MR$t8`(UnuV9>MLSl5Z`pCJ4{UP3S(FM}cm31WljAtIa&L!~n#C#Z zn`c2}p}uoL+HR#(hk_~MX>(R^_I)}83dqlUmiczbKK&)D$=tMfkAS%`i+iPF{}mSZ z%ETk!0KQWw2GR~P#Cx~k`@E*jrs*kjl`Kw)lwZ?KN`Dc*Q%-o!y>lK)0y3>#vgeHs z2Cf1n1Ib&xH=IH4-E$BWl2vndbDp~46z#p^$(mDBI~9KrO&ro~qZ zKvxJg@``?$mB^@F_TV{S4>9m$M8W z@AWCj^PTY#6xe(-bA1YyshwF9%#yzK&O9cG-Mwdo)GWOCc3Q><99wI@_JpaxoXxfu ztp(2ShLA^tLV;oN*2HLA1+xr}c4w)+?a=6DN-P19^D-d=dT%eTO7_D9x+2O9b|8;^n_&)Dn&C|ZBtIMQeI zd*`F==}n8@CrZ@+KYM?7nbN)6Ebf&`)i+q&E0a>^Dp@#RPM@=b^IVRzYlUJFVxNAJ$A-UZ3})^q+;A#jEFAf2{|_Rn7hV*=8GyHCt`|mfNaX z>W7 zpXEVm{v;@CE&jJBiQl(iil-YWd;d53)gR1~uG#!-R`&y&S*Jfmy1rTASY2Yr;vVjx zvz(zV=%m+Dj&on9U#Op>WU*bSYR)vyzMzvG!R7~N)^q+nuGzHtzYxd>_mwKv_l}&q z^j>fGO_t@aeLwr@G!<)h9`l^>;LfZwNw#Vhn`O&EDKW`2rF~5KH=2?dqE>>Dl_5 z`~+oEC%s7(wmyIH8n`%6o4L_i&4NqS-{v&S^RS@)%SHz!Pp#f~TFt^s)wr%+&El8X z)1rM0k1tjq$V%Pf^k1cf(%+G6D>{8hNiB;m1 z@WtZ-GEX~WPKzh#ymdBd2 zMSb>zGuuGbZ`o;P{f3WQjDO!aa&GAyfo{!)g)=6^<}_WteL~OdV4&ZQN8nmFZO(E~ zP26W|b};f*S4NPqOf6?W$dyl9B&{=&o`-SOKT_~1__BV6xPrwgq4H~*O~os@AEhTZ zE!F|2ZJmuEubEtwiCoTcE^pTSLz+#CO$;CH@p+^1@%#yKfjRfe$~JTMO>(+-O3k8+ z3sh*%ob{|oNw;b7nhAe%kjW(X%(}G|(>VL~wNGqOw3t;|4Jz{17=RwX{Sxv9m=7~7Z*cg;S^;(q_gp1HmS&$7?8JXmvm4(Gv2 zlgOidvu*@N)my4rq+6%2InLr%_X;La$wD@+pGzbTbnU`fx|)MaiCszi3*WJ%we ze!MoJX>rWNoyV8V@t(Nv_;#kI#VLl)Kbd;gt(90Paxie6#rcA+2Y1$ciZpF5I%RU; z#w^XvUV?L;o2ELwnbV$j>i)UL2QT75mERNzrTxwYQzZJ<1hcqzE_`1ADn@%^iUsFf zJ-34$R3W*8Lg+|A>RhF=DX-kW7_mIR@}#mon8kf%($UR61yi&h#kD=)IXe#&Ial(I zRL*>$5$f_=Vu#rKWIuk|}B6fBm1Q+hSyfrfsHIjE6xWG~ObnQyzM zFdhtyn^Cw3R3!V`t>!rQd6t=C*_7AiOL#c?J~`bvBOvp%)h0+-=4mUqG}u#cJQ8Mz z&Re%Vpel3@xPcIS2h>3L`})M!84tdcxd}D?vA-MImlB!B{MXWT?gRGkPi2fmlY5s; z2z>kEUz-ra#!&At(NE8n9R<8ESqg}%zfJ8ZUZ7QEC;eznXT}laYyk2 z$+{nlJBrUOzf!Wi&4PWFVtKlA5A#{Rzw(xC7VL{2F57Kz#FF=YPlnL6z6SgbVxraG-f7&C7M{|BXKKrtx zSSoJD%a}Hc^argo&w>0bvuT^*5le3UGkf}!&fT0ZBgZ z=$vyHq$KHisYv0uBd?9`?od1zIe)guX61919!(2tF^l^U+Vnb&j!p>e6D#M{`;eQb6Hc5xexZ(GklFLOYeE zAIG>wbbB&XJZ0u1w7db!fvsIS` zdyvw~RQD;tfsDP6SWPcn+*ohKZvrU!Q`uS^$;wtHbJIP2-1&A0!2blhufsFE{l>4x36-*>lPDgIIPN80Jp ztf~4l^!CmEJ1OJqkr$=uzt_mevoyS4bc*R|#*?Kr=T9q639l5jiP!vaapeL34Hubi z)x>KUEjQSm1x{Pau^C$ladOY_>sm4E1$S|1EyK^-w_MC6( zOr5?=e=)auNARq=iIPNvF5XWTpB_9msyj_FP1J*H^AKR$(7 z9)1_!nnWfCDL36sZNFrPS>dRwMq|1HAoW9$BS!!^_S*0Anu zXzFy&yU5G((nfqAbCb%RO;2YX{%!yBPMoaA3eDr|RQ~M}YEwM?X@bpXC&gfY6V zj!gdNcM7g!d;RvO-e(`jXS?fm-Z{yyx9^{3^tJ1sOdU(IGMN&Wd6}8~EdBcNM`@nr z)|9nh>Q_vX_Hj9R$y>l>lc#);i&HMQSM0Kuf8AA6yskz?)UmDnH9;p-|M-oiufkS( z&FTwtyLzyT3@jC_{`f^3ItBD|cBG&!4tt$vmVIj^UEbP8VaIsDSQt54aFCaqgu zwf?5izaaO7gm3p{!y?vv{K7Q<-vTXV{d2p6RylwAbS-82$}U%dBa6)I6%MFfJojjB zFhge8mu^cH(bsnmYA?x}SRC_h)~$1W=3-n2CRQzB*ppM|{$%w6<$Gt@WE+LInpb@D z{&e+_!;?R&0^I{ds>@{^1LN$%=1G>c2$dwfHeJ!T;+xOqh5mjQKD(GQT2?mqElBQJ zqnz=1jq-!I-Hsj$B!e|)PO$i~x~^-2gU2`CphpWl*)~7XnqtkFieb|F{43P zy^C|rmGVvRH*S>A)9LK=UVl$RP0ycuzUYnVQ|EPc9`-fr;;g7^ns%VwJd0E3Ps`3e zlO@+@IC{%?{1i)ePP-!1pAgk_%!4H$@z-CdgrtSSC%@gnzkThy2t8i5BT0i z9g^B3+RfJ>e#7Cxfx~hBOFv(|P!+6ho6V`Pm|gedu?d-+H`Oj>t@*s=;jEvsE8FuvS@%qz->_ENDlc2drcO2G?1jRO!nTXo zWN$fle$9o#lhdW*@-|%m(D(byg~F)|=JtwZEPVV)Oua0oXi;0Ax8J*YZ>|L$U%KP` zmBQDdxq7~Tyvnb%aqqrbQ5``%4dOF60+-T#0_Oz2r>l-)T(-PWzV{ ze7%ydc}sWCU4gf|@-{8~E_vZWc`dXF(+PJ$+3?8-E;Pv;-#FE#SSmH9!F?0G)$RnwIJe< z)ca8D^*46kSmR_SR5U+n)#PsuTl#NI-t^^Wk^S`RH9V(2D_h_Ds<)$S?`p07v)N@{ z+J1kw9zAN+d^cjoY4)ZEhfnv~DAaaUOjPa8x$$C`;2z7ZUrwkhY|h9H+xB~9-HP{b}%T29ly3VI5CS^{E6WD z@J(VS;hRlQx}LY4yvAeso7~mQ{**W6l({Q(GbhV6zHf}rbh@e8q#pFW#r%A* z-|I^0c@~dzqlAOzwB2|d)V=b$kFS-!evO>`!tx{js=6!p&*N}@xcYMWnP*QI{^ok- zm%6h0bnGSeG;30{*5wGWA~6VY+6h<7iL9jB;B}aBlELL zF@lAmasrqw!qUY8A>0u{71gDr@-ITRpO`i9^Im-5JJ7seB*l8a!Ej(0sZ|CD3)1x$! z&-~o6>#2K-=+4yESyqQVS?Ar;ccGzp)l-q>iDz*N5-T_Dw!S6v`u^efXYOyEKmB2$t;dabQHFce zZ=VioRd9~gnkr)(d+?#x{0A%JWR>@LkYJLXvLaJKyve~tM}b~@|hCw2>OvSfv?C{yN{Rr1PAXwxch^&P(_P0Z8$ z-RH1tH{Zfz%RU(gEj>2zc>A8!^Q|WBG3^quEt1Z^xzbHxhW(qyS-yf|T*2xaN>A^; zId}5vFdglvzx~thN}8Q1dveR>Q@sCf8*R3x#j)xSYCqZNuaI3`)uC5^S+9Olk6qEW zJ=gjicHOIp6i^7>v~GsMjYVh9N<0(lK5|8G>7-DXQ=O)aMK8bBZPNb7%vgTwVEz=- z`x9?`Enuy`e&2jUcEqMaWea((%*Cu-Gc@$emC5y5@t9P1tk z))ca8UDVs;p!&V;crn$m}6eQb%y)K&aw&{O-wp=*a=QFIDkc$aYoEjTDP@w(eUG{uhqfNrzkZ+mwgmAvvvmVn z_sDH?h=10tb75NPWLAltr;my~XxXT@ZNu6fF*%LQe*11P`rLl3>aT9ow?Xzx-DcKn zO`-DJ4xEtvo5{<@)zM#l6A>B@S_H~QP)=DR4eW-{s|9$83zgpJC?@a2$4*r}L-FZROmf`Mc{e2Jk z>}w7he^K7htDlm>G%dx%aZlZL$H^s0e}28+|6^~74a>PRhqW{(EnJXhbXex+u4@WL zpK26$+_X4;Gjx;bx9qe1C$6}>yj9CCa5vPvaNF&&V5y%`lN|k??Q2Xt|NHBvm)1(N z^-gmiVu)M()OGEdiR-yv9$V0walQP>O;)#~i#{_Km9;Ls&v0i)oYnt^BRl_ZyDho1 zRrz3vGDpZB_LJPM%lMz18U-G@HXD;Z!T4Hshd}96II>p&f zdl<7G%l@1GpgC1JXebV0Do5y{rs`Lg?0p79$^+ReZIVC~C!U)DXbSGe@<_3V9H9-gmX z692zO?OKZn%l!Y9ZGVLwJ5O=UZ+7^5)~+YLqpx(r`gC8n28B=SO#5Q86EfDV2hkEM zId)|CDqokHG|TRtX(KCfPQRv~5sHEw=t5PLi z7PVXz^q60G?#`>VXTLV4+05)+dd1<*lfr8Y_^Rfv%eG|ljc2tvXn_*(#+a~I5c^$zqyfG&gi*l&E`WTYgaB><6sn}GqF@) z@#UFkGgy+;5AU=Txcu|dhO8AwEp0>H*(x|Z^tdwkQ@Tp@r!O^>%IXc4P-CcimA@eE zZDyXMwb??2+4-xsrYmlG5Es0=#Iw$z%hRxQyEH?>)qd5)1I<3G7hRQ_sl5AiORUUI zm9CjLqnHyHtC-#oVvk)|>U?Zn-;}7l`wTZ8mxkJ#O=;c|8kc`v(DLqtfaRy3pKt!2 z?99Tq`bCwcWayTZ&59EWP5d$~CV6HxuGzfoO4jE9FJl4YrmyE3Z(Tnv>YS(UnYA%< zNqHN?%%9AL+v7#kPH;?HAgKQSt6#Ck{kGK7YZ9iGx-0wEMI@O`*!<2R>-v(dVTCSQ z%CcSx&&oD!kY%4OxIT8XnQ_V7-D-QCv&sbAtf%?>tT_34#TMt!Dih{}Jm33CcwzB{ zk6ouz&+l$xHe7yLu-IzTuYV42j^>`acsKf-5~p=XUeznRIk8vwPWvS};a8!NmDk(( zC#GGu{KIi`NuU2528FFm0WRCbW}n+Lcb|uJcZ^I!q~E>x*~+16S3+eoRBl;p-}=tu z`A(msQpaZ;%1_DmJ$qYFljpE$i=NrkueVy4O|oxDV!uDzCt0b^;MSQRcT}f-lvBQT zW76a_mKUAsf5d*D`{gi=*LlY#efMo&cNEz~r7*Lf+#-8Y#@OQGyQdxt{RLTe^11t@ z2Hl+_o0+YlbFD(L{Sbqs<^9V2H!dDie-zdu+fkDDJf+M;)#cRFR-0cT+aFC>bF^=p z-2|(yjO&)m*ZyqucrF>DF+qKYc=fHipX{9WE~~>iYY%-+3@@JRugNgU(j;#8jjJXH zMGJ)#mVGX*o_y|q`tCcEay%V1tQL2LxTFNw{=a`uL#yJQzw1*gJAp#x&K&OBSq?oM z_Q_YO_d2*~9Am4Id}Upu_t>x3szNe6b$YSF6Wcd&Q|fy*mn_|A!}Rj#>+`qfo_KS& z?@F_ZsdTN>bO+6q9i~d}CAzN8skMI=l~!f`s&!uJa{Y%K;u#Y%^%m_AwwA2DyKURv zzH3wUPQ=R@2~VF<)|R^L-vqDKlEpV!7Uu6=82XnlQZ0I)g5Q%8E``qm%l4(7k5apT zymQXKsS%&~Py5*3eIKFLzI%6yHP6x7On$*jCHqgf?!EiR^w`alo6j_Ss+_*P+(~Uy zY2y7?YHg}YzE-Sf|A+lP&^l+!u6vu)>y>A%s+hGaY<0aDaym}ei_>GZ@-=3KH{9_?=L@VA1Ts@6y`S)L zX+pSn#_H##lA#r|HBZfta(ex7j+@IOeTQkc1uu9@_Pkkl`TM3Lle1XXX0N|3w@P*1 z*H_28geO@2b`0VFxA&UuUilMW{Gyg-R(j|QJ?3|bs=ZdZH+cQg)l*Csc~*&D`tAHI zF7&*l!=C_W*`77AZo6z$zVFCNI`h&_P|+19 zZ@gw=-;of>+h543R^!Kx83u+Jf|S?f~mDw$7|^hapte9 z`JO~xcL|JBddab@^Zk-I6I~voYr%h7=AK!rAfNmu(s_~h>-G&&Ulm_Ju;%KyAU=8T zL^neXbMDGRjODlcOd{Io@BCvg; z&U~qb{?4W8Df4Ug-tgSA+}Yt=7H^=z$&BS8o8MO!bkEuKUGCBL@@Ffy_f*IJvSfah zyplh2_r}k`7w7Nal53#*+3#SA%d91@mn1*1*gPew$a-gEdGV5KQpU$rnlGPPQR#I{ z#zEufA(v`T6Yug(zG>fEJI(B8uXlDaI^w$P{nV*dRxByImwUbua}T=Bwc{Ay8;)nv z_DuTAtHtKr-#l^Wbk4K$N?BBzzaKMtJ?Eh!<59hn5C8B-hq@Q3sqC3wHC=vbl6+|qBF-!2BuUv5?+RDRx0bJ521jTavOkPWD4X`OUjNBpC4 z+kC;>Z_AH#eUm;@A^E34(K3F4&G%`Sc=ZDI`4xt3%rSL3X8U9pQ;OWfIG2q%U;7@W zFORD(G3?mBOzxlb92sVVw|o0EZhY)k{i|aAcYU_z(YLn0c%1I_-8EGCtLQoD&Fo)21o4V2+ED;lqY4)BJAMz1e%@ zvQCGAYJU`$>`SBD^Or4;y}`RLy0PZJUL3yCF>3YsxXX(j z%_g{-_DkmZs}z41P_OWvqf$TFdiAU?FTMBh7bh}5j9vJ1#xMR$nUObkk|trtIWKDfAbvUN6F?WumZEz6x} zCD^W>aD835N48LYqTOYc8)6r&~-A#zsAgL?up@Jdo+=8Qu5qamcLY6!`AF*YPb^jxU@0gU0_c|?TYpdOJ4QA zdFvVCCE)o?vG94*{SzKXZ4`^2cZn?tsB%+yDf+NFQrz=#4R49w59`-{;_u!2@?VNf z6-lxBu}@OqsmYSFHqt@DTYvIA6ShfS)|`K6fm!|O$84=A0EnK?0e$?n5XT_iicJUL^R-8q4=_lxOil~h5gm7AD1cFdl&XL{np^u)?# z9y*gh?#+A97JEF&v`hJ z;`W|dTyDzB_b1{(_wRnMaOjF<7b85f1vbuK@Z*vPZL zvBBlY>q#e@UHc#Yc2y8wYkhBF@9N(gI;)Mh-q^lWP(96qKl?+>R{xJhN}t~7#B1$5 z;gX`#%YJdvJMX_N?gg`+t}DFT^#0PKI}ADgyQLjGyk}k7^K13LvzyKC&SQPCb_wIA zXqo?VrYk*u_sz|2>&)s;-7I+VMdgHFOAj6Nm_B2=H_^qe#t*K-21nv)Nc?ok&rpPbS*;tYx;1K_O(xl&v z6K09Gu?g8aOPzMUQM=KfRW|2sr2D>)J(3}p@6HhEd*XP}ZXY8CxKOL1e z{P`PuDSDNLBiq&)Ys?PDeSNd^-;SE{e|P33E6%>LbgJVtTXz?SY2oKpr7uotaoln3 zN5Ksh|3$Wc=6dW+5wLyDL&-`jB|JWl6jE=_!vlRl3zCYUY#@<+kb z!Dh1ku3QHe$i3zkc>8qbmd>rLZnJLJ_j5?amb^FIni4sAzV(Ft)7Hh`c^vod*7rBo{<_?k z!V7Pg>T7Mj^?tKrY>I28iuSVq%Xi0Y(y?;XxOHB`sAo3 z>Gm1^YX2`3lJ7jt03bX`GXM4~e)E1yof5&OvTh9mq&9{opmxH*BWb2O2nV8`b zxJUN!rOkVeosYV-FWp6D?gIg-*&P$_T~4>)k+?lm=H0&Y9d{0MDwJ)~|8!I>egB_c z!$?!l+;{K2vzp8POjvsQ*W3HH`=?Ky=JR%vk-%lY>|g7At^Mp?SgV)DDt)_lbd6)o z*5Hj9ZC_+w_P+PyGTLExWN#5ynA85*S0+_$5j?rp!D;T@zq@;ltuKdtzt3_pnDf%x zxwASt=4Wntvg2F_pKk4)wx5mvsFS_mjcjuDbC0$#ymWNV#_C*eEpQg2)`mQ>!>7~`>6?g7!YP_Z% z(b+W7?9T}gocK)g2PbQ!)ck1O zLy}>QI|MWQb5|PoYH+b$Uz^F|vHa`WOczJ*Kg({jI`b}{D1D+^Ziz|CDR%KGrD;)t z3GwkQI!EM-F5gx?vE`BTqgs)asEHo)Ck48&{_M{>yDmZ9P_l)4gLCNymC`9 z3T+eIdrB$T=u({6!}GjXOIO}JEm+1U*?C}E{@j^$=JT`ojY8eFELz^tyKBp>hK#6H zN84g&nJaKS+iTR>yX||=l~0o8Gp=yZXa!}NmY%BP2AfGVv|bF1-|KcQrBLtSz4}~ zcI2r+NX6RkFU*bhXs`F$)VVBp?mpGsf~LQi9WHNq(B#7^9Jn$(Sa5dMj*v5rB1>*` zh3E*Fp18u#vi^X=kx5zG+Uq<7BDYWTUd-Ed)^x6EbjI9?nv&ah=`>BaQ`zPDJWX$U z*>=Xf=^2VbZV|IrIxgViSmcp9QS-(wb=Hj+=k$FL>Di&Tv-cKD>gla3qhDD*e0A;h z>EvB(Kh>pNTA$4fn!7+fpqlg3b*~++tECbdr+Ml+b{yvs?RCBLQvG^+c1@^Y$1gES zZG(=G`4P|0Y*{qTw9jG7lq*e+E$La0XPR`jox9dvC2(6xF#f67fE>1~j> znN-2$7TxW%`Q-KIl2S5DzJIzi=~VF3_tK7RuboYJrzK84&t1k7&Zn>KJ!S4}4ohQQ?YuPhtc_v0CDX(*qp*XEP4WJO zMfVvCJWt=$SXgj)rfb!D&%LfX>enSDA5UC!^!NI5bLKYeG~38z0Bk855^A8El*K`?0Qw&k?&+7VjJO^%vO11@b>_pDfYvX{y4LY1bv0 zm~Co=3wwLFSRN7FamsO5jG2VM*Be#Kjg4m6C2jd-yncdDldKL)yTp>`&v&o?#1XW3 zWl+s-zt-<+c@5gJH!V(PgeUZr_?xVH?H&8V%U}6)%evRMqq2+SPrQ+m()5wPv~h~I zznb8#{78v3NRdvfcR1-bGh6;E-_K`x zIW5bJugywX;%>6HOnqjzu-aoCE#=43B8%-Q#1r;#_hA~Gu1BI zB)e(bJKq&|LQ@rT7WnQFE%#48eOA@%4!h94PMc%#Li;)oZPs^LC;!OLzD!vmSEcoM zKW9YuA@hHHrcTBCw&XH5$xm8*qIZo&%k_&wNk?Q(<{i~boDjIqyo*uw`$ww8LauVYyIFj}l5+(m`6!}^EXx2C;9S58cbwx1CAN|r_WlH8&tFT-wjzDwMA z&-l~QM`~}x^7g7fk<;|~6qEIEcJZ?7--9o`I?3=SPRvE9`Nbq@xnnIqUpad{weIZY z@ei24&27b=?bCRlpE>`2-jstal2t3ae_rzXWvfzZDo}1dY2_}S>e-?9V`^fWr@ZRj zandR{datp>k>VgD5m8#(ARLQN#u6d%f$?n|k$AQZgF8!Ej%w>DOX#IR+-I9B@Q*YJi%$vv( z5Pi1cka_9fY4dC@Zri8rr+ey)(50;^%oifO*D(o9-2Ht*Xw<8zSGF^H_w@$UdgRvd zvu+Yx#h+M}zx7_;)LgUJwC@+b|B2i6GrzOSMkqI^Z_1iYx3?Y1*Vf2nL(z|=$MU6aD*X8H+ViHX-?JCzo|sO~ zNm*9fl#}KqRVH;R?~s}C@x2Kj#Fy^)ZC*d|Fb_jl- z8QOPIvZtl`kfg$?d5<=}DCC^~eno@G-cxP4X?@nMJ6$H-Z&BXnp7;Bf?Xn#%vlcUQ zuui=8zL3W#>yzO!wa=lKbDWJ^FL&ILWm}L@CMK7a&2UY%jm>uZt^PUJYz;Q9Y$#b& zt+R>u+{YSk%eCusnu8{%@SIYgqi}1Uu}JhYuIGvmxo@r9Da<#_8+Y>7Ypz#3C%a~RlbB#2lCrOLL5r6__=kO0pZ}ZF@hkc9?V_+EdEVm%bGz+l z-VnO4dileIGXJ!Drk4(L%$h#;%C~t7qvq5|wfwZb{LK5}BD1D11^#O~-L|Nv-#Bq4 zCG37*zqv+q-yQ{aZ>61gbN#aXGZRln1P6I($Xvcz=k1q!^W?su=tWZbnqt3Kr{xqZ z`+4l}RafKgS=)BboVQkC-i_rlZ>qE&7&=$XPDy@!{49h z%IPMNmPOX9KEKTn3;jL+n)3yQ&1sV6f4hFX__W@|&2zR;_>T_NM{!L4-;JNoH7%KY za*nBM_79u&3ulPz-@LMd2%Br zOv}{!KF9g?30{3h0&&0I=m>rlytum6-+1E=--nEsUPc!A{5#QkB)RCe{rcM%W*j}R zEqr-KY?$P6=aQ_Sq4yUCcJ4I4ecAcc%pFDc>0b(7`G%b4l7AY;-lF+DgCRVRDeUTI zo?}xpPiRl)W=LPY3^lmjhwDkI{jm_)+x$U~2d8gLDsm~x@dC4Ea z(<`PJzn-NSv%haLI6U3_}`feSyf`6U;=Tfy(v^3AShn`MyQB9=t^R~@$}*@*|P ztM1(0+fx2S&+?Yt?F(1GeVqPs)s{GgbxS?gXSS~V9v?5LU%bWTqfxxlqPx1!uWx4A z*%hSm=wY|yulB?B>g(3re3C97yEH_vZ~9Kz4T5~}E!P7XzDHEuJu0a5c*^C}sa~%q zU3K$p+S7je50A#Qr))o#MK*OPJLT2yT+{Pwj(GFSNgeGzcV1V`N)hP(Zt_4+d%i{O zpKZsQI{u&9^5Dq(1DWztD^(Ae|4&*Z^W6N}gXORCTx!BzJ}KYew7=`C)+&Zwk$XBES5ZCyo;zuV=M4$DfY#TVV>TV%Ml#fRhn6uk0T4WT9InT~q>ifh@y?R5HO?&p1$Ma(Jcg&S=JobohOMBU+wdcLQ&FtGN+Wk=^ zB}3nQ`|<1P&z%?Xvpl@JwZ_g=Guw|>;gNCf6(u9p>dDW06&+8UZB^3qoM7htkg>Bv zPP`{0S!iXj;LN_Cs+Z>X{yc6TY&lWF^nAXHcQel;zyIraW#_9M+pN|RpQv)_Wbo1V z4I8TivJLoVo<8}$+^lT=_sKR68UA`RKb-ee$q)!HyTA2D=ekKRBO^kHmd|F?A|@izEbtk?}9hUcRSLnJ{>#6 z@%?$Y^WG$vb?lMXl$U!qoT#aD4K500OqAPsYU9$B^#W2tE?#Q;!#_tP7tP*Z!no-) z*CPeHSmybaCyqB4?K56vSN-ir-Cg&@cV~|&#N2k-_UBBb1%sBQcB6)<>PKHu!Tkz* zw{FtsSbs-qt1k*Q`DDGkRt z*ca$W=-OwW3s$&Wb2%sLZTp+!f0YF9-B&-mLv_-}%mwc~yUnJ>~Z`{wQ zkoWQI-svY!E>?(cxc23^`PyH1F8BWQ-nU6b`_SXh@?4?OPiJXA`Tmn_@7erkG1}T| zc1FIKR2pAV*`P8#>gA_10?Be6KJmiIE7olInI_?=`|@FMe(w>l>lN2z=F2U0Fy8DU z`cpMXZo{Xifv(Q{f&E&u6XzCaD^Hv#bx9-4zKS!@ljV(O3#9{#MQNV_9HY?96(o*K3*!<7%&sUM~8A{dS#A)!`sk~F+9~%BwoU3VnIjOXUeg@-aC?`}gQXXX z>RFvuPmvY)eqY>8itWB3ze{~RN8!E5iO!`@4ur4v{Umhl&jE#Z-(Kq}&)Lhj!EM*F zsLVyrGp0?u&v(SQ$S$M$@8r%!CcPh@%G7M1`pdp%_s{#^XDEw@Z8cK8`B35AhdpVw zc?a)Yh`F2|Zx{9ExY11Q*FLk4&$;=^aJfePu2bvR{0ZH^;E!j0UFo}mKbPJ!%j{pk z(l>Fp=3Da@eYRoD-ECL19_YNkcKGr4hrdMseF$20SpVb6n6)ffefi3hQrCqsTB@5( zc>7hKi{G zV@>*T;CRUiu}Y)&%Fkas{j|EpYdh7W*~ zio^TVq>$C&UvI4lH@zWP)!bcmGd0}r(Yw_C^V_EcaW0BU`qEU~S8;GdLihW7?wqyS z1={I36AZq|DC_MineY7Mp5)iwU!S$bs(L1#xN(2|l-eKU){d(UMlX-Ufe1KSi$)j}Tbg%ka=W<0Ia4YgLbjk)ZU zrIEJU{&&vQDe<|JCwDL3tv#{yyp=zzllE+$ogTH~J$!|$`+c6xW`A4F>m_-R<6;d* zx#s$YrtMW9<-Ou&r^Y{>8rSMH_x|t6yR|aeT=I`?J}((vb59;Q8Nuru+-#PHTAV-i_}1pR zb4>cU!vD7JIA6S=@te)EPz$}4G5F##{Gm?er_pnP1N0XP0>W_hOEIC+B5p zALbP0yXB|Tj<#>^cf2F~GbeYcnbgBabJ|Y6GMBsL&R5U8D0Q}&Sp33wodiEM}cDKj7rX^QZWyw;#+gbw5?K zHon`ru2V+*dvUu*B7;AV7LUx zG&x+$r>N&RL|(c7e~TO!SK2k5M{=$XR*q+a--+kC+QxO3Et;9vd#Chp-TgO@>^Z)w zd}Z1m*nCa$(b&1Af_km%G;&O23hExG~Q({M>}fVB!D9 zz8VbL=iavjeN1>chtKJ}hAM~S@qqJ7Y|kFE4&NSiWlrMStm6;Td8do0dAW59Mr}=f zQtjBjLid`Rs&Tu+?TKKf z-teQ?hmMt|lB`CD|HS_;+&TY_|D50R>UeIriY|EmEoAHW6VBV({hzMA8}wPuR(GcE z{p|aOvOX^9nx;ojsLtDSEBl9Huk+Hw_3MAm|K+3h=%R5|fy~^3vhR-_gEjAJpI9Q2 z{^y9koJp>V=Jbk3A39%T{lA;`vT{jK{db-FZ7nI6zgNAR^zqN?v;W0r=2&j{oqaVe z^YZ?w0#|CQ9O`y6>HHOb`Sq@gbb&B)%%$Y8*#Xl1GuEC_&1g1zwcTotjpH)kUOA(x zQ+5^8vNu&n>F%BVM5fd;*LZ69k6+&T6IaQuIUalK>f5tVT~>by+YoG;H2aL!->!WZ zm;PI^Bc<;}pzQ%Uw`FmcrRKKTPPq8Y*@opzOPC+Wj+7~xt2{SNd%33YZ{-`ex&JP) zT;1ZgTwR>w;_mLV=1*np?x{|Gsi>sNnfLx_hzeG zk5b-n9+i?m@#og!dq#>H$}bn*JdyNc7vqt*m^{H%Mduk;hFZqo{UOSj?CxNZy+^QN z&ito}Zy(?Am}0P;W3E_T;dGBaPRo@qcRyJAhb8mVYaNx^(;wNN=1P1Q+5cqT(SFeh zKXSeQ$~k=6%yp!68_UZbre1=aL0-35gK~GR{dWJ8GwYGu4VxWL$OV-xRM4Jw$up<_ zuD4phyZy%HQ*N$w@%mDvzwG13>62!@V_Pz_JjN(&yV!fT&M)cH(>MHP3jH|!$;IH^ zucAbs-c)t!Kj#<2C-i?dzu@HyUX4Q40#Oy^zJI>7y_oe&o3BG!jd^KEVJn|>CxcF&Skm=v#4n-|}1 zeZ|Oou0(zD-NAX8bjQ|x`A`rE!s zvB{m2g-^^=+_XnlDca}f?DQ2+jO0IwIO^V>bBVF+;^ve-IsJwQSJu0Homx1Xe%Q++niJ8rHc z+ws>+H?6&pS!aLTp+om#{~X!p6MOar$H#owVtz+-^J6y2fZf6qrOiXOb2>`OrUq*@ zZ@DCYDO&2p)Q%$+%!+==#vHdVc>2EWIr=Z~s@>{k1_y`_e44 zd!`Z^^EMZqXL#_lt1xM(e$9+~Q~wpzc>H9X+?vUip;YsxZ}<#p>GoqDNjll9fU zf7z1U^~asqHks^eJ>7fTPJsEX;?iYiEJ2!Q#g_O^iZgn0(>1>Gn!x8`vF8pK%}#3G+2a3f zgKOqX)3r0z1@<{l6I{M%fp<`Es^{z{J{Mcmc4nWOvoD=BH|o&09iJO!pKh2?eoJk0 z`j@HUlO#5tGwzqzxZ~)=#{!%so-U%ca`45t{_A5nT{z5L9icP^gS z=AY*LqeGD$^JHK8qAx64Wnw?3UVQ<5jM8G0yTw>lU>HZ)Hy8Tr874dCDJqdBJb5e)B9y zEn3y5u=HvPm(-HVV|%Y}+m`A3ex=!FvlBD(82@gtO`7&AbMo=t<0a8*Ec-L+mz1!- zXtU&JSYkiB?27xPG|%+Kj^AWdZYkuJ{aht@{l?u^Hc#c5ootq`m5(1@_TFNV?5{*l z+4Z|6-cJ0qCNgmHwKpF2hebJR|GY8!%l7-Bj;WdTgqQudH>aJuvTcU{g5P>}3yVDs z-`|P-`jPL}3!lSAn_JKI2H7>%m2X_~apu-uFRs*k2j!peSldoYo3=}4!pykhHM&Jd zZcC|8dZ|-bdZ(lC%EzciG0V#@PTmrDs<`y&Z)fi(DWbdFCYDUu=Hgd(J!)REr0j;H znLA5dzQ5wl^}YLFY@t@S&T6Fvk7m#Kwrnng*RcvS-?zURHv1`W+O%x;%%#eA!jB|= zzAl%PB=9zM$!5W~YB$cS88eC|{EXntj{5JY)%PiO-Gf+VZ$I8isdo!(-8N`;{G2mu z;;v2avp9?e`G2hLV!6RbB+NO}u$OcGIUnQLQrz z^?&AY9yoQZ?u&Gq6aVa2r#=_+ANFZD6gtO7O+h|IKGgpH(bdjJOp`g?syt0M<#xO} zajLyq%qZol=##H$OLR`2;QoBhMESzw3aQN1TuB+fZg8yq(4Ufd!}M(J^$SN%rM&D> zyVxZdxs<_W*W{(2W0jYEj%7ZZCB$Q3zR-CW*Sq_H0xjFE!VO+3OytP6eZ7LuwMS>_ z#$}$yMpq?0H}zClI2wNCJ2K^Ms_Kjb%?T5-?im^?_}*SD_jL9hHf!mWowm73FDoyb zDe6f+lQ9-{*|)RfLV=NxhI^vT{2r0dyfZnE?&e zy6Gm}6~}Wzj^C8qCwB;?^Kw4TGM4?idjmhe)v2v67pGcJ zWj2%Ty>QMc^LJ)S z?M!NzvTs`d6sd_b)%D)l-+Q_^yr8^&zvZP9m&$#4QWeCQ7|u#I9PwN%m(o{Sdt!25 zahz_4^`9mE)|u4~sgr~B8v9TD+Ro`Jf1^N(5PTL-<-R4kEQRHyBeu9E%-Z&^`hGQ zWw{cu$~?!tMUON)Shgn$U;e7L=6EVgrEa~aYiQtpkM1S!zGSq_J2~Uaq*{?>g}>Mo z&vO`M?rDkn=I}#zTHznViI*QKc8JxpgqNS|&WOI*=U}wr2;Zf7yH0;eh&^I^XT3B- zodtVhi*0M28N;H-n;zZ!QoFz{O#7cBZ`|P>Z|myZc1#iW_+G-9Z=m+vigjUVpMQb( zwH+Mx^JMmKW;?R_r68}8)q3CTb=@zdes1Da^Q)FvVjAXKG|}*Hmh01|3BAuN49@+q zYTN8y+-&fv>csAyO&xnX_i=M>T2{V%p>4;vSv*%>F6i!we8t^zPyB7Trj%Tr`of0~ zcm7fMz&k3CBmNUz={M@?V zj}_iWe08agePWZQ{+-p2ts~J9oW9VcR_BH5-2G zew48LuVM3V&%qbBo+#Od-!xoRhVCY!SJ_6 z_8Qkh#TS7wW|7^qEazWa6n3+D^})AFGo*q{rCu(%K1;DgP%7xrme)n^FLf{Yv~#&# z+LE;~NB2esesE2*v;BQm)tonOisbPVLMKBRg7S*<1-kUaCklN0tEtgCg~iPK*PfHY z?;h;?!`}4l&W{Q8`ifaAy%^JOiL`uv$hcv@?u)m&Y+=QU-ESm2A0EBB!~Dy$_O943 zcV!PLicCJq7yKc2-?a_T)_tA0C(ZQaa?VADr*cng|FN9QwB+qf^*0OdZMzot#M*ZC z0h?5bnTDTTycjD&4_IBgl6ZvQVzTID&m5=DV_OzXEYpti{FSuir^LSGOCQYhrOx`d z#cwr!q`JZM(g~i!)@om}f+o8pGe3cEk->i5uEpGOgsc$OnOqJf2*qI)B>~!Vy z>2@>aIsxJNvm9+Y{_>a@#lO7oe{}i@R-4zqFQ&UJo6^%~(Y`*&E#+^?oV@q5Cvj;{ zC=*;1$;W?G;_%gTty7=x?VhUtscmO<``@_55r(-Mxd%FyNcY~)4UkiG_!YDBYg13C z6d%XYE1SJ*|DCzi%~gIS$;;A!F{Z<(n_hb8Q z8g%UM^q)E2|7r7M$>Zj?|4kD&yfaHA$f{J!v(`8oU1fql-PTs)$K~WqT`Mz?SIW4lHb@MXI$>gPk|3$K67@u*qp%5#5u z)DmsonMV5BtM9A)`u=UHyOaN72{m=ocOThbsw(|iC%i-S^CyY+4yXucMSprA&mTEv|1~Q#kWtr1{L%QD%ywA+Pw4#M+s9{oQ->zM({iD_?d=`{-!0xRdfBU^ zre~C>yIyY-x4E9uc^yqzL02`a)4RKU+Oy3xgu+goI_gqlx3#!S<%ov3?TZPcP4c(Z@1yUeD)C6UwGKd)tsG(7dzA$>>9 zDo!uSG^GNL)HAuarTO~(=QBxuoyn!tf2XDUMZ=nl>rJITAK1ntm=l$^xTX2Np5?zc z7K%;NQ!VA*?P}n-=lyI~=MfpfUXCX!AC#l26dXUjP}}PvctGNDl+o+BNjHDBTzD`?z)9lN>4qad%i9k~S#E4eh`#BkXma|khI2iq+7zcF zs%QBvrv`hxe`{%4Q~qJ4_lZ9m;%MP?3zRXDDL(v;pM9(W!-+C~&(CdhL{PxvvzP6P3uKD>^ z=&6e;_r*o|DH(sJ=bwq*b2?e+>Fl@qit9EttY`nRneo@%*LPaVwmw_Sc{Xk{9`+?HH$5=Nk#%GK|*Rl$QQ8 z&EDrygw`hm>#bqZnfEoyyj<^9*2l?g=VV@7&pE^T^~dLqN(ue38)k2w`1TXyL~f^T zhsw7IIIXsCnOJ14debxQ-7=l1#s&EsfE*nZ1!?JSOk zsf%w|B>6m+JS?!$vgFJQBQJ(|`M=~+&oii}Tr2eL^!^s=%2AW*5wL0Q#P^3j$~ftn zZD1|?+49<4r~2~tIHnodvnSlMyl$qL-1{a)@$#Xhbx#xCzMH_Ab5KETf$*Is#U=;N z?d>1tF)1@eimlX@_`W0SNY06r_sNsgzwvP0;H#7rF#5(EJVimV*t&gD0cWGG#V2RR zh|Vu2!cBLIdqtd1YdzxHnRZZfqE7P3d3v7P1(~0HUhQMf{m%98i_`DUziTYX+9kBz zA-zcXLDO}?9Infi)8GBNcu#Onz{Rv3?d!AKUbZJ5fothg}PQLlcx$FhM>lu?;%SB$ZHAFVva#^_}oMWr+t%*$ctGOEH z2QQ3MnzD7Wl}Y-$5+|vGcO_20GLD{jDm7nWQeaz_hS$m2i|?_>Kij9x;$F{r{`s<8 z$6suH#}b8iw3pU0sMq>uET5_I@TU#r;eJ(k;Q+W?ckO+O$n3mixV!Y~3lFCnCH})(+dnDa@Y%tYeY!>Wht`ScPm$B7 z>?rp6^h1R|t!($CHnDBro_U?=$Z+&J_Grn%NiWM4kE|@%ow9EitwGF;A zE(t7Ysowu_KjT&BTP8a>t}R=6-{brYMhpEpk1s!K`!2HkNwxLlr4vKHeLVTotSk1G%YqY} zMwiXgj+X8zn|No})ET1R84v!gnIF67!`3Tp#+k-`Geu=ORX^?u`Wb$K-8RL6cZ0Xn zx-Uz^dA67+N}Olvh!59bKzufKHi@%{``!6BjsiL>(T6wk-A%ZGleBobGNt`6iV!# zp0DwF7Hia3tXtP) zmS2A7!1t5<%@?i*?+-at{dj8bQfGmCdZn71(%;JJTP>WF_r2kD(Sg574W_Sl?h+0z zcbUTxsrS9huy%dA%j*0meAOO2Dqd%rUO#*%6>qsIeCyQiz6tNLSBi@$F8iz**QxV; zzE0RuCT<4tnxiuW)hD!GFrR<==J#0r|6Vosdr!AZPxL$-XXtJ1Q}=aoxjUyD&YcyP#K82#)S1zwW(mVo34!~+ zUWur6R4y&jd=RH6l&*hfZM28-{p~i+E)PtSY?ov%U-JCIlejC*kH3_5$aj@D%0D~n z$ymEO?nrgC?cX&Et8JntH+0O}Al1JsZeAREa-W0+;{KD~ZeLd>OMk^5QQ zMNSP~E*|fn%(RYC-nh_i$`?N^M#Z(o(#mTV^Iz#uZ6_(wwtbW5rn! z?-O3evdZO5j4=({g0zqS=vCNf;p+AAG zIlJbXwCcV|H<^~TBsXte{&If%ugJ-}wgqMXU+t^@?7Q6B74_>rNBRhTTjEB}``G^Cme1*g+q2n!zkKYZcG&sa zqA!P-&b$^96-X*LCu12qTl494;iQShUMcV2eVrWc6qV2aviRwD5hJ@ZAD6P6{&8iu z^u(tP-rp8_bN0%J@11{x^Kxr~e&NNtUDDRKd^O#-Pw4pm;h06=^5U$7O3s<-Zk*++ z=e>E%ADyv_{jF{DDqw5z9FN8cr+XxQwm)clQo^10r90~KzL(EuH!eQ1q%2(e$2G<5 zkIp)ORFn2SOVO^e7rgqAaqagxe5dbLu8&)HMw7Q)#?agA^yhl%b?aCT$SZCVSCIMi zUhQwT<=H7e{=DoHF#2I>5`O-l$fgTHC$ifGB$n>uaMW;KE%2)BRI>|*e)qmiZ4Qs8 zpH9x<&lGci$H{p2yBL3o>g~4RQ!PAo2eP!Y7qjTTza#2&;ksD)N}&pW!KnwMJ8l+; znPlwdUXrK3Qew5Yc{r~S5vOWv)6!Y`W=k>qv?PFEPw?(S4 zrsrA?g?kCiaMKZb|Aw*l`$m(iT8)u9FMgj35nQ~yU26ghb3x4K2QR|7lclm{4%8!Ube%|>~@6A{HEjIXeS^VG&>jR?BckkVPZlr4S zY2nVNOLvBIzAf)^pCR^h*20giM=RBm^_^>&9D+IJl1_TPRNLIJt-I$zp6C?6iRTwj z|FG)f_HX$&7oVPc?)kc{u@k;tG&>z_)H-8hZLv~_yG7lTb+MuOEqeT4W_Jh$Eq;E8 zRcO|iNoMZr>JuhszH(gP{A|moI}a5V-REz#T~Z%$i81!mPd3x&=guD<#}u_p_;&W@ z_ql#II&P)6Y~}TxyJ1^>z`sRXJ-7cjl=th*w%V60x?x{ZdwI4+DDL-W>$N@f;eAJ> zN!O`cX>0G+wJStP{jBT0+oO@Px@I|-O!Uu?mx0D*Q+KPRuD!I~!uVLtzKFehTTZpK z&YHh8P5a=yvsb=sQF?iMxXpYO8r&Kg+ou=X?dkY0ZCoN!7-}~!bzm?Dn z_JyAvq`z9OmzBNjaE#OX^4=@6IrOK#{IHwt>CDNxpB;D2c9pu%DeN&j`CHff73X)f z6?ZO~th?CE?{S$;6C=gIpo#QAbX*u3@6^y14WS^c;o z;Ng8UF1*%cN}9gEz|Ku)PddKpS?;&7)iu~(>!8AvO_I!P4}*Le*jJj)e86+5sMPAkQ%%-GQO93v3kV9YbBx-SKWBDE^N#r& zm^=1WO>0*0HTLm+sH301=dVh*XY-RgbFDL&W%fT(Y7D9MUuo@IzVDu+xnOzB3f=I{ z9EbR~%5h|y&k&Sb!q#7?TEOY@X7xn9Df9okZL@uNa#oJBbc^Tut!iGcOiyax`O;|h z{_gCO+xyvG`n+@b*m3pQl8K%bo8q>u%YXEpbCPPqA(<47o9S;AWI|Q8dR&?+qmV?t8xL(L!ZCQnrdM{M0+pV-W_Iq&QNvw;vc=&Tt5n2i*|Uwt?=6Ia4Q|1^iTff zw~yVwde`j7{0{D?8I>nhe<`fpxqidl)3IBce>6!7Mlb&0yy-sUrJqHTR&oAQm^4e- zf>$%QeBs@`?WF&bxJ^o5>#l0d?Blzz{*52^b%%Fqo$LbF%RkzAye_(y(PYB8Bt~T4 ztczEsKj4kwXGnPFkoCDUZocdq+lO0&R-fLs>S4{v7Yo>&aDr*3GQm zV3p0EJ>S>()6REZw~aQf?WsxK#kD@S_n4Jmt*sE7VByporc-5Jo_s3wZqw=I(jL7k zM-sP$USH~UJvsjGvYu^GhbG0{&EQgs%*kVX;hYmXFGsbH@8nmHdEE?4%E})$emT9h z(&_L@U4e^|&iv^D@lQ>n{Q8$z&v*3NFtsk=<-`u@9>=i7Ro6p8_sL!AI4m{MIP$8; zPxaKFC~{8rf&=*Y0}~`?=!Iw4(C!S7w`(pIAKg(%ciX#6y-H z&v2U}zQbMBWUG#sk>*Tu>l3!!HcuH0`0olm+vzrAickC6w{FF!uKwgw$zzmVuw!M9 z$K8!fV*c%Tv3$#h7L~dsoqG;7{9J!qQD#BBX~VNQ$}-E zok#C>G6ns;-R!Pm>&O(l?(^r4rLW8QH^!&VtuDQ9(8)K0K-c4!#rt)BoA|wwCW(r^4f| z{Q0hbQ$QM97d_tR5Vt99+vc5{j-T>=C_D3FVEvEp_y0%kzr99&|Md^mseI>rlVUe! z|NHgNAkEzVr`XbKcmHV0U6yV>T$Zw^f7 z)_NU-_z~qT(x3V6Uh?ypnmT#f%mVG1=E(==F4YONy7pTsf47~~hob^4U^LmBG9@b)^m~Y~>vu}6b z^Y;CC%Cy5jX=zz;4cGFivmWJgKUb-!_xNY>JT~a#wxh<^{wkThEh~O2av|b7@AUaB zA3bw^lohw{`X1ygb6)M^*!huE|>d|UfNeB%6=-^+Jy zVc(K}^nM}pvE-R9J@a?(bpBecX``S0lUHA0nQ3X+l{i!FV^^fY3r-$97@_UOA$F-K zy)HF&n^k{vSeE4pjrG@SybW`cOm&s)_bzcg7Jg1~_2(J=SFaSV-=bj0d8BpU*|%4p zEDf;e0ekDXW*c&bgA8w_fe$D$dGj&EFWF)s!b+RGfOwQtP|#F8|!R zE#}FU-m3a0OEr%KaZb4vy1(~pvqft}Q%i(a;}xqrlPzy0zg+4j_~iblV1tEgl?1N% zaXr&MzV~j6ke}z2JMot7YtAL#^YZ-|k?5rmx};{-XT6mbYYbF4j@s<)v|e`i&cZ`` zu82&p(7NPQQJ#EHajICkTF-_Z-@XdWaai;z)#p(si{ezVzDvz}+ILIemWg_F$kAr^ zzV8#hvz&XT(wE|x)g|6F?|zEQx|*od(dv9&!PX(~mGZ;ptf_1du@=$i$UnHJv$%Ns zHu3xkL524_#5d->yY}t2p@#3pVYCh4v z@x_EL^}f3H(}jW_QzzMahxvD;T!S|=thH|EDsc*)>CJh` zyfH}imyuh0ZsbDE*q!VzXYY7?ACx!lc&+sj_Ih?Eitn2BQJ>dUF7NH4_}*>NJ-zqB zls?rd^Mo#OKhIb*|54)7wu)o9kC-=|Fg_@MwsLx2q5jfG3;&2sd~S97tn2h?6&eR* z+%B^kwd~7%dv*HZ6f1{*cO%cEJ+tj{a+@CiLfmSe<{3#wcg^wnzXFT-{X6jIz65UMefYpT(-Jqox=`>r)Kp_ zwX)*e4R%~)37;Ze`gQSK;X54Z@h|@V+u>zCv(by(4QA*6Ox<+f zvj4Avwq2CNj}WW3XExvc5LV-U_XAJ#ufU8mM_12#JL_i0O%;v9b+uD+FGO1Fcs`I= z*t%$K=r6wif7>g1I-FK$uQIAneXKbtGv~3mf9t*-{flQ8_hbld_C9rB-l?;GA74z{ z8}?SC?Ya?zov71V>xt>hy@h`CCGEKPqTeZ7;L}aN=_&JPC!?Bm0`>*CcV+wCf=-g_TE^KHqjFW16X9N5R| zbX<%tEn>m~XI7)M@F}^UtkMpi*_^c~+PB1Y;o-d}AHJJud2_AW?yFC{MVi*{e0|gM z;aau$spkyeJPpb4Z=2Is=C{wJ>!E0MCHHNS4`;frpYGb5W5`&gb$j+f!_|KJ8>ndMa#H0hsM@}h!aS`!aB@;F;dW-Hwm9*tOtBpjHwy&1Io8xcN zd2{E(MLw+_ufrbieA&gaZ}Gdn<@Swn>rA}Ej!U~PZ>nF*_-FZ|JI~gKxLQB|ct4OQ ze=k#w*6kl(-jsMU-4En>zf3#!+RNDGTQ93}?wP%f=kheg+{){jZ+Bf6^NC!3*h9Zt zW2PRTq0HMkQ!=LmjXIkz3NIm&NcVSW&NGwjCZ zVxu*IJm(p2SiY(Jx~Ig}=^W#Mqb8eAyxN!TvOdSG!u+Dj(UKyqop~v*pSlDumgw6l zu4-Qu-s`yV1J(98`I94$_WpH7n-ivIqy!17=k@|{0e{Z zjxMJauN@<;)xRE|v#z=C2+xO=IsVM&&soNrc0E)zZSZfM=l$C0B`AyTTPzXh>%4r^ z-sv{hv6Bw0&dliEp%Z-bUF^KruTr}fv)n6;wCH&cid#*0Cx7k_eSiZ^sWZ9G_D?upwo9e)d(Ua6oiSVo z*H@Ihe%8dgWVWmZb5*Fz&eJu!((lX($r9T9@J`IBZLilzhp7};n0t0^WT??%$uE_8 z`(`JnMw@zybCiv7?1TlvlZrhW=5b9l;~G(^ zlRf2tuXChiN&X4<-49Jm9Go9}$9{SGzhwIUS2s_Y6(2VcOWrxf?Y8C4uw5btlTKyT^g6@BW)v%hC3dH&{f`yO=9 z_VbxJ9$6xXKWd1zmfgB~_~N=7H)YQT%J{0dD*mVrj<9~N(Wf?v+x7DgN6W&`bsdpn zsk1HP4;!97IcM`CjVW7;H_bWY=)L@(D1)77)9KeoHy)nEvTw13Tr%sAkfI8LFcep#1& z#lA5tZ^`qG6XULaSseCf!^$U4X^EPf<*Oa9zCPZURMD)d&9$(~D}DE?nwVzI*%{`^ zPlE$Bvai3Hb5)~pd)tTTlT*!}-ps4Wy%}h36CCnoQ^%sfYkpHr9!eekz`!fonilW> zFri(Q)5gJhvuA!C(^j^|bnzSzd)XeB2LILvj(!Q}&z)TFW@zK=?7Fj`#j@EJlzKL2 zW*G9OrUv{zbWyLGS9jUMuZL0-Q*%nAc0V#LaW~xK8Y33=tN8UtNWsB$JT%ieR^G-q z_JY&nSv>&^XT6s97Mc}@rLf=4IMveE&+-2El=P*iXJ)V_6*ai&Ee#H-(O=R_zfuS1xart@P zlkdIjzT~=n)_dDG?Uriu?O4?Pj&>e)TJmq6-Dyd4(c`{LgSXc_3Nwzj(>)hn6ZYaw z=G%nE{mDXo>zAqoy_&f8FKgfDZoL3i#yL}ec-6|hox`~-kmvkDrW(z~Euey6y6j@# zBikM}`Lz6HDGezBS-dsJ;2UktDfRe=}w(VtCvtRTH{Wy@CsJh?DZr95$vFZn_dM-4a^|~o` zW7o|O*_Y0~D>?Fd*L0`Mp2shiY0oO?O|odK*Ze7(ZF?iplj-<}@0CHB7TOc@u6@i% zKlK0QiOXt9)&&Qr6`j15oVj17GJe*K{9+%wx|0XqEtzz%W$N#n!sqU%eV^)PXmdE* zRb-dsl8SAYRXJ@AH!r>1*fZ5%_0rMx#}>yPQ|Dg95+{8qzxBb=r;B5^mZ$b6S@dxR zD%l!*wzwUto@b%{;vDPs$iSp!t{(2z=>Zv6&NG^R`1ay&LBO1^Uvo9ZV^{88wK*@; zvYJtT zSM%QA;c4@HYOpfKYf*Qs#VyN~GHO%hPI=Dx?%eY^=#uf<|BTn2 z2iMLW`FXkED#+v4H*d;6)8_kokKukJ!~4%>)cl#$xLZD7e$kQNC(b?3m-dr;@av+U z44-%BcU~R&w{N~O2iVJHu*B_oU3)D@-$dS}TeondT|~ z$(wX4u)$>Ncb+Gkq|e=U5Gp&kb_SRKgxc(7%)hF#Hf(3zx6N?7_eAjpoo}+4=FPaV zG_rqpYe?~=4O6SQSK3>9`ui+9#JzBv@j-s|RkNKfr}~$Fe&A<(b%n6svYC3SpVOwS zjor>Z)yG`9?nz05zv^e%t(y-|V5xKUwMcy6+;J!3Tbh-Eqi~ySG2@qzPgS9nX*Z6( z^IN)Y#Jduh(O<(`vcA5@8` z7No7rzq_e?0ar}-k=-4;jYZm)yF~9!(s%0>s_^HqpDO(IURCyT=co_!82S!R)#$P6 z+p_)j$wP&Ax?=jQiUK7>f3DrS+4!;8A~l->rkY%fXB}88+otk?;d_e7TXzvV>Bu(C z^Lh_lJ6CWn@4Ia@@se9+l6nbYBym43*^}5D= zzS7lYewUKu<|j`+aXm^GUmCyvC*Sjp5AM(ZD!k_A5qC*(Gm*0Om71$_>_1wht`1~+ zFZpnJ(Y2uEYv=N19;{}o;I9a17cvSDzH__Om_K960qMNc0Zvc3t#aR%cyQnQvh9P; z+%MZY4t==v_};pixffS(KL08I!1?DEx7TfgoWH$h<-B6O;k+~DeBotAFn7(pKYALc zs?B959@toA={mtLP_MZ){rQ#kZoU;}FJ-t6U*Guo&7|q)axO&{gdem0K69JR<~OOE zAIwX5`n+6o-R%>Go403~mCpYul-(eA>Z#eMGjn!bU%~mlg}p{2rbB+m*2{{Vf4Zz5 z9-Wd_DSo7{Qn`pch~W^VczCE9vUIDC8FMLFT#Ss#*&G9OwoxP6Rn zIQ{%Vaos=LSC!uKJimV5NYVP^<7v(R$IqicU8nW=0^8jW9$Lh?^d{%o1bxu@6v6ub zPW)rT*z6-bK2INb?pkdjmw!oEI6d>)lRVY%Cng8$)VRKiPu&tbo6mPr^WQZy>Yg3+ z{l4q|GIcfYmzHmQ-)-ZZt^R$@66scrD{+cp8)|n{E_ZI`y$aVW3+se`w?bv;N%gHTA4IM=Eu3zZpdh&5&byCvxXEW}sWjWrEcZ?x$hv@Y0 zUT<#AX^%3$UT<#eDw5~ld+8XTvyerZ=)6}Cq6Ax|Lv$0fpMMeU6{TWH6xT`$)! zV%ax2W4}qYc-iIqzgEvqHWf(=*0VOh{9(e8H^;KQvWlk_&Fr<^p64gJK+PtE=|{l1 zk5g;Rg(q%UzvN_FWTs{hm*LwxB@Tz$EZe3=FvzCA?$yoP`zB_w<7A$<>6&|XYUZ9* zGLvWUEis!Z)YgWb@l|YHu&%KdH&2<;3*-T^juyBRJ+PT3#Ql<}ArZ(`m zc0bpsg+#9DL$wc#kG9_l+zzTEW^dr$;u_ddQLx6^SpS8#$Ezv7+3X|i*g3NeK0NK@ zmgf4n?z!5jA6`cvUs(VuL~WKiCtk_=FfaDASh?%m0wYrmuEU=%ZZET1!gzfJ=W!{J_)!?yrx^Zjb-cXaQL&6WY@wA=` z3;0%c_vW+|p;=OSrvoIW2Hn4rh~B!9=)tsqk;?O#(bt|&>RT426tBzj&pGjb>7ggu zq7#F4rM`Z%_uBVkdDubw*=J?BJ|1xPobqvM*Nan?ztcDGj0ljkc^r1n=9=6rpVt15 zy~n?;Wjpe+@Yo{TwxY~_iR0H>Z43>$3vJ$s6{-65r}fq?@vd#PQM9*F8S8yH| z6TV;mI!j~TTt3eSHYchh(tl`l=(kG3*K-w7njzRjSdjvA()% z>t)4S&E6ENM5Ed#i)+FXe%-6(n>WKEd$U@(_CdEpUT5ROKP}Gtdf`dPrH@^O&l~Ui z2DJu;i>OVVvh7V)ocPI}kdt3_Fa4nRd`GFV^3__l4Z>=2c2YO^T5olSNc4aI-`N^F zGr4GcpY|t{hc6wUS8!dqzxqJv%LQ&>A}K)|r*<6@c3XGSxXGcVTeh!VcZZ|v!^*`+ zwrwq{n&-wTb89)f`W}tx8ojGk4Ys&hTm7ec|?zb!X4a>X`LGO8UU^L%AB?*2Zpp+~Vf@ zqkPM@|Fat3i#`AUQ?&Yq>PtfAfrl7*bZ?w)FsM_D-uI9W@Ty~53&REZ*XS)&vk83&Qoci=r zYoC-w_6D)?>;uNqr?;EV5U$?d#QtO9k?AH{hmWsUQ$ILm=4xoG<&?N3REF1vNQu4OU1SJ&~qS>woGg;l;k`Hnw}^|>$F z`r>Nv-CLHrdoAwn5H@RAXka6h`_`x3?F#4mJ4|1Hdx~(azx2Hfl%QedK-1MJ3p9BASH6AwMtSipuB4@p*73AH_F0+#b`IC26`c8M zbDa|_mTcMn`O{4wyJ$}i`>ChB4{y$nb6UTG^Zi=p8qMss(zjie%9&R<^ZhELcJMv$ zeq5KdY08P&f#qsH9=fnvD0_RpHrkx?Mcgc`##nT}h~8d5YxCugX0NOWd(fiO`g=vs zxp}jLKS`NB#u+1O%>0+=71ksrH$t{)alA* zlwF>^^M8^@bIwPHZP{04^-tYr<`kIumf^Za+x3RyhrE`kR=o`SVDLzN=^L2cS}3sV=pKXOv_3Y@ zT@Oz_IP>w$uG)pOW}42eTlqp+u$3*JGuzy{#>Df+@4h$doz4e(aGUdFY)}{4d|9lq zR%7BR+a+6PcX>Q8?s{mM^q}2oc816AOMdMtA0$;j^u1a4E#SNlyUB%$>82tM@?3Kd z+}L4b{9G%2!h(mgf~`$5+1=^On57CTJbtAg7y84+a_id`v(4{2m<)G@+Dvp-EbA^z z-Db^d(JXQIqtyN;Ewk*UhXqT*uiwaQ5)HlOyio1srlXc=vg-vMdfNJIM5UJOF^@JD zo^W8Hs%NL8;Z?$b{vk ztx@c}XZndpPjtvoXV_|!Y{A8 zwfaOTGW};NDLQBe~{hFiN>>zZG? z$%AK6-(==Ltl%tP`|(`MRFB!EF|+S%J=T*VJSTd(k(&bBrx_=ug=cpr7ft8%JLwV4 zAvgW(k(r(4Gxr!Krk*=8<3W3T$fA#nqN_DByRIK9Wnhn4EFt%euORGF`g(0^9i>N~K@(%RoBcW&Rciv?k6Q??rS_N~~@J!M;TU5BpKl$};T zSMU51`=jTUU1J>QtYDMAV~eM~l)V1!X34#PPs>j%v)#9g>C&8fe~Xehv$^I|oP?Fu zzs-4`df8#gfl|Ju0asg>&b{m)b@aoW2Hisy*JF+MOx~^T7`Y)`lhud6HEij|cE=cg z{zKZ_lc$&N@J?deH5y=zJ$iZr(}O13vQuiJkkG0w85azmy+hiJO5+2%Bj ziBtBZ{Lfl>B5lSK|Kpq9dakXMxbawU?}iPXmU88pC9z9e@0G?bbza!-$3Hp3e1Dxu z$3@1nif*^x?aEc@MpFV;_HovoSi#YJ!g*$5P5B+ElWG>rPX9F4nyV)GoT=`FhVZ-a z1#$j`y=87i2QRuhnP;qQoN(*Z8E&iDRjU^=&YJo)YT}Buab@PmP_u%TmLrt#?6%RvZ}YYQ2U{{c$X$$*dz6=``W78FD|sv+PW&P zqJ5J6^OaHC`>qyVpK_}?cA=W<4msu;4fiw#2O zMejvDDEILa?N8PS-!Lur*`vRlOS?Fqh#V->NWOjif*k+L-p;dU4R@YSaogl+Ses;g zvC$^&)3FqdaJ6GB_9-HLe;3BA?qS!zA=HudW1jJW$c6E%KQ$lRT+FuL&2Z0EzJjn7 z2EQ-)x~sgIdE`ysUlk|c+NVnoSFVvUPN+V);h>s{JA9@W}! zyV_Zr5!4R>1z=$H4sh6Fp&>#@=b$ zKh5ZrtoRPfeNTUFeK6xedykiN+>Zdaw-p7l2Ob-qRmELtEms7Ij@6j{WPd9kW zZk@_pcWlA7hn)ORvoxFUZFHKb@}|o;am}LejnU?^7aROnycJ$?=*59=e?H&0f2?11 zePyZfq&6Y@-SK0n|iJb7w$S4@U^IT+v&V*r}LIA(3tqlHRkrrTH!#R{OXF9 z*^U+U?D;+so%3gf%l(j@yi4=+!k(pf6SJ!m%R@B_ZzmM)p3<3e)@mBxq#3eG3l7IL zA3NPv96ja1foW9-cTMpP6BoYr_UOJX2APrVyH&mv{R|b_nav$`%;?SY)M?%>hBnJt z3c@trT$xs8rP6p_qp{pZ22?6tR^+WXo~+5*-zsW#X2SKdAFq_V9&UZOaf8wP4WJQ@ zJ!Ur3?p`^gcfEY!n%JY|@_{`0Hx9NteBIExbmmMOhNPnRq8HYjIi7vyR^CbD7u|eU zUi{K)H=4X=Cf|#OY>~sxJq+ospTu@-Jq%7;a>cbRuNmah&R7eFoeO+f@u2)kz~%Gb z`MY&4-`{_rQQ(Zjjwyj%k5`|(JCpt38RlQ{FAt=t2I{W6JEw9%AkX@W)9n-Nb{<(e zlh5OVXuo{>!GKHZPo|3h({SdS{B?7UX5hAn`=|Mu7^<86jl3KFD}MXAwCCFHeY^5b z9(X@*XF{68l0#S03pKB=oYlAg{gQNHee>ffb35I-JWtQ))Nu64$&qU%(kC*zIamiw>KpoOvm5t4|sgnare{qAD6nFcGq!oKB{SW?Co!S zCg$2g0UN!ubIRkICH6j-z0m&2_4*!z)%RS_D!6U8W%?EH!rc3OZRRp&p&va-74Id? zwLia%vX-56ApOdHRPpVTJ~j)> zf3AEm^JRlv+r&)?=jU+E;7j$9>v;X}PkiKzJ!=lf3K>t(<+|s!GE1v6^5upnL0tDd zTb~wa9LdW~4LfshrDIcGh2EN&{iQaWv&1cXlPa3i9YnIem$kjTVfx%h%7*!*&-8^c zzc;2|e`7r1Oo?aOt{nw)RKKhKJeH#Icy77xyH!HZ{g!RJzW!;zi|L-63BQddrwi)~ zLxPZV%Bz5Nw>Iuf%sAefEpj+Hk0Jf(s;cYfrmb=_w0T>>-fm=D4esR`cRjSY>GJa( zQ*|t;!09vAee82O`ApBv_cJZQ?6hT;8P*3k-8A~Nyp=&AY@Ph}o3}N;wD-K?yqx;< zRTcj_W`Q3)LKVlkHW$bqa8}-DBA9BjD7i_#F7W7=F98{UPiL3q&p5E_WOwGLq*;6B z#F|SnD_2`AovvnOdi}APpo9kNcMY+9{uigV`JU;U+_c)qkT?FE+?px>5AjTwX5o}N z_ZPzv0rgym)X|S9(S{rML23|YY!{K5mbKKwd{@7RZzwvC`;teZTRc_Z$wf4W0xiIVA+pMS+^Gt1}jx}4qFEiB* zSsAx6EaK+5^!N3rPOC+h#jqZV-YH!ny0kvi(RR<|d;cFKHs?%Km|k7-C#hs$eml&va_3b21$BpnRl29NdHZduE^eF`yXoX5 zjkfd|50-5@_VUKfluVJs-n|UzPxl?N-JNq>w>QZmY?{Vt)ps{vPGITVdhHCW+0^Qu zuW#nO%6`U_z3f+BYMIvgb2|^rTDi~da2E5AkawFC-_Ch;S)-Bv&a{;-ug+QTPOQ!` zUV3-#rLqSRC;TVBk)FKL#Y#Cjf0KOb?o9T(ccyJOGG}G}xp7jt+76-XPcl^vAD1l^ zIM_0EcX4%g_qP>UB8QD-LiyJ*|JdmZDriHZ3e%h9xw0PgMNgTjKCj$nHglKl=6K&6 zK3$29Bi*u_f~^lN^-mSs$6ju=#LaNe?8z5ZE1z1iUjubu@+P&(ehN#|{_tkkbhkGX z?wV|@&zVpI1DcxkTUaE2W>f5!x?PY2;Gx#hsL=K5=*tBTP+{=olT@P>UaS7A_Hbf(VJ4R@K^LmZ8!#o=_8u^!j-76Al5v9LjspwVi+_O2InF5n{JI+6Kx6{V>@;8Q( z1)A%(v}#vr-B*2lZB6tJx4)%<8QcE~bbkpe>TH;_Fopei5^se6^n&I!GlN%gm6SaC z^Ss`@wB=^!OL5HGY}T^uJ|z3S)@N?lce^#R-)BzMH|^(|{fT+sB8hvUO?j;kg4)4>a(B*zds>J1 zTf6ow+qU&}MVdhAfyFO17YW$BI~(GlZZ+$ez z^$qRb^rpeoIJ8f}E!nec(Kd#&bDDaVDJYu?`J`z7S`w+fT*kEHV#I5)y9T-bbHB`G z)&3||A|w1~Lf~WblO0@fj>#!& zp4b^3_xja&@|eet6~T(D-}Y97x1spVA;>VWUKVH#Ox~@cU0)S z^RArTeLBRH_fK-?gL~TmRL^z-<4z$7Qc@x>B&Y=gG1)Eeti*J*|}8{Y>k)y z6X`g4^vMzrzh@gu&up?hCUxY6l=OnvckYCNhHV?eCwpty^~V|(`iI}O=Kq^gp!@B5 z@UfutA&YnXUUO%2fZ5i+$)fvp-)Q|iyxX1m=%Uh?qYDF!^7wbJdpGyIXz2lNUEgx& zz$=v{Z$doOLEXS4_8%*CG_u%7=cMLQQs#AUJmSShe-**=heYFrKX@b&x& znRf0esN@4BJ0B~5(4-ol=Yz8)~tbDmjl9F1(Q2eA{SKokmsJxg84v z+4s!5{*y~Qb>|%0-HF1h0(p*~5>LI!0&<{?_WmHtl!p1ICfS`ox3ac3se()N!SW*C z=6Rsjk#@($i1}h`&(_~@d#@9*Fx>B6^_%yLv#cDK{##0z1pGkHw1lK4+X{ z`j@wg?3lMo^4y+Qkv%>0#6O*S67pi>gmO?bG$Br?@z~Kx+fuCGhR#V`H8XLUlYak= z^0;rlA!pwNoqb~@TD7Kim#OjQ)5U3pt1_nu+*MrW6d!y1_!)!qGymp3T6cEVoA5;w zlY*qzEqV2QVXSmpS(^J|3AslMKUV5oo{=4X_V1!Vp5vNcB2HUpZ39)Sk7cf&kujaB z&udnj{rpVe*)xH?Qr>?!&4Vvrep#7rG}ZF^PBs7K>8_hR4NC)_tXXo}h5b{pYQE1K zFPX{9r-}r#mp&-FIaS2w>v`?UR{p5WF8;OH?eEpW&I4PcWT<5%Q{yC*gw?ndU&H| z*`()lUhI6?(Xw|^hI&TZBF8Shz4iZh)&*McxIXc~+^IhO%{xE-xhizNYv-NtOAq~0 zozgXQ-u?LYW?86D>c>a@*9zt=PdDGYIC$ZsQxTpf(#z-0zHDXkGJ)UtvXAP;(7olC z1?PT9Oq=BxZnA;7IqhkbF^|Uu#>2;&=AM#Wk}Ni7!A2Lhy(g^}M0%Q>YF|4uSV`(= zL5;AVYW*dSXi($x<6N^9Sp~rnJ5Qh8Z0v9DVz?(s&%aS`^~SH4K630#(%P7}ylAi9 z+R##=okw(amcwf?&ctaDa>eHACRTj}`Xx2sj+PW`?2`OE|!1;^EC z<=VyRYo~XnZ_;j)bz?Kr&WuxDH~Zy2homx{6KPLxF@naMK8PMI*deH&dY2hoTioeb zl5%&aeyVGvb+sx}*TbbrPu8r_$e!-|noZYeQ}bDjrS{8bhCg;p5?2denfb=&gR^6(kA=2LYyD%fxIK%z zdVB2*+_#>(8t8QQ_RV9<0(ss)TT$lu{QJRmw`PN;@stnwKb0zs-QBmGJ&;FUa(nC4 zJ&V@FmRFtcvU)J_UFBZg;GJ%a=Y8EvHko$bym5V5(cbvA(rhX@IoT8QezN6+iA^#s z-Ze|j(Av>#d67KNabI?oH!LT6N{*)|Y@TE{SL*mV-J2;{B8N9#SYEWZEoOJm&6=#F zizclet$n{ur{2^w+#>J$W^QNf?Bq{dCW&gQE&dbJ$@k>BSKQ1wr|w<>S2fQToI1I4 z`w>U}&shNqYW+Qqn}VhVXP(&;ysL??#Ax%CkWWQwYiIJkXvr3_)lT~9e7Ca;RNF6PhqqVGPKa+^k!eSb|xt-t5@Nv^LaWWL2|$u+KD z!5p`NyK}-jiM7-Fo~wwzv2D$=XPzl4CDhs*cl4#}tivg9T!Sr_eF5i2nQFniYbG39 zdFSY}o0fY$7E8=ioE+?Vz2x;x)!ClCNfkf&8a4~9S3I@(bevJR$l>fmxih_dlRcz_H=C|2xFyH>r7BA5%l0kUsHOc?J9b*| zLSymU=gzG3_7yU_!x+3%IQ_1{BF^@E@hb(`4n*!$-~E4coSNsf#})#6y9TkGGddVl4>7)aJ^QMf(plp#GBO4iwr;-bu=t-|z^%NWiCL11l2n70GOolr zihqziT5x9f!Z(+h)`G@aXOtf`d9(1syw+V?ia)KJ;THQqu}ZsS>bE`HKJ%?U;JhZl zM8ZIe0l2khZ7AqMl4)%K5*eX@jFa*i~TB0XPQp=z4zJ8mlLe^ z%sR7b*?hjIb(P>=){UUmnJb+aYVMx0bnayk`)bPlfETsOFCW~r)ZIGk&F28Wv`YD; zTh~_C_bw_w9LV^i=T@DwP5rhBb^rdR|8X_6j_c$4w#H>wS)qo}kvrdx-u@_Adh7Z8 z57JR{-)t-oy}bLC>GRy_MzgNVPIwvT@86vD>sG+F*PY#sH4^u)pRmkh|LHrW*XQdQ zgDG#N?Bmw51oH43yt#8q;?x?@dZ2=YCm)TiYd*(SJykq(gY$Y)Ed$pHzLjqi45w5} zeq0^8XM@4&4SfFHGa7RyF1*?y)PM5uI&XG0_PGnMnq(c~d=RTx(UrYBC%V_|VwcyC zpTaBaWWxVuEUPh%`p5V$R&o1YzU}{}cAe0Smpb}EtgvuRK%sYTX87A3%K~F&{cpMN za{o@Z^`^WC_NhXt`iI=OCFA~_l{xPtSk9VMWqENn{d80cVdr3Jt%jwlA5$@ zQk`?$qOE@uA&HXUVHq3@?A=DLbrtlldM`*gLtGyAr+Z zLxpmcwq59N+jQ}YaEQYC_h+?*H=7-QQmA_251&-%2fvL)-vi5YxBbi%Ih@V7jpO^< zEon!0hiqloY3j1s$@|`+Q)^}wIy9e)lCJ;vBJksZqABM#2Y>#&SsiJrz3<-4d^n+D!G7)u zX3=#!*f~5|H1)2Vhnz}^UMN2)Bzi--=MMfgbLwZ6O6cn!;pX0~_xi(@4oMBM;~xt} zt$O-TSELr5klrK}%B?OBzLuF8R4%h$y}c1&pa{gMBZHY$#~x^Le{XPp?^BQpYWy&5iT1i9 zbg)HqR;5bho~^968%(<%YCgJIqH5;VxnT=<2!wM_XiNFieedVZ<;y&vE^_#L!|h8` zR|@VZ(*g}TwoPxDSiaPr?J{Hz@MwWc_|zTqrt-NT=*WGh5qWdj>5eeIZ8MWw${#E} zqmX@dPjU`#zPX5`pvZ|?H`85?Y;wLFd^M3jbsyg`p3{6y60-IU7ymeCRwfHxb$KBH zn&IYIrv3f!$)>ZSe#>%HCf{_nJRKVwop`fCtM%lQnpdt)x64w!oOs?oKDXa+V|KC6 zys$|Rb!Yf|-8D7v(B7@7HS$Vb4in3st(P}t ziX1LX6MA}wCDRVvYqU78qGPI~F~PK0ZBENlwaaR+Yz13yJiNu2oaWuj#<}ZV$2uRc z!qhfK-io6;louo)pK|3|*ws!eCNtNbo!VS2Vb9)W_B1Sf)8VAP&2#;iHIr2!H-6z-l-SsZLM0@w)X%FtE zT=QFbgW=v(PVh1{c8ha+=kISTPo1^Mc6S1Q$YP0kw-`UHi!ncJe3_B6itTTyLa z-}s#Q^SM2)+2nWckvqQ=)|`Bvv!XdIb@#8?HKl!5x1QnpbzYW?JdlOppnim zJV_?stOGgrw(c;v{E$Ox_uYHT*&OD3t*JGNpK1BmZ?QyQrzY3I~pUIppbtEHa_S09%$+xzrT@AaLG%IbPZcjs6>TB7A)MqBXy;cveK6w`K?$&ci zb#iCTmxGKS*7+1hfky2ZS5=sH>T?}DzW2kMrnQf+s?@2nGo zNwHOtaio7epS$L%ExWJrFbh?*99CKShC|O`8_(DvRC6spSFIw zK)%|`^UF2mQp1;VUaqp#T<_Rp_l@Pnx+9xio-d93>{sMA_rvF_tNnwf-1w!kf74~f z(j9J`d(2wG=e<0BGSZqS^FTIp#T}soyNlkg&kpmweNn+t{Eo;ur&*#-5i?#Euq28W&!0Kz*_&ih;w|>V>B^*Q zX;)+3F<1X_Y+-t_aL&?<#5C)rY=*mB_uO1_r@12?GSF_JwnyW6jO1xhiBsV5V^5+V zU+Su5^XB?iI2gv9Z&DJlTJmc4%m$XV>W)GRs_jCzH7e)LoXNs?sVzThh!l z8C5?hEBu+UOy;`I%*iYQi@ygj+?~3*vNDd{FXTXC(MgGtaJ31Amkx4NJ~NP%`VesC z(?xH0<%|~xmY5Xx#CE1TdwLt+Ze~<1DDH_>tcaO)vxP-qvEuFaqD9_uGb^8W?3B~k z8nRvT)ZN@zWA*E%T@NqR>p!hBummOhh0OE4R&t1|7A-A%o5Rm0a@bHkwxW^GdA6TW z?2M9scV5-~yL0RO|G3#aPv>ZegQi12&9h%L=gc*EBd+XYYwu{}s%z*79Te$Yc;w%& z$b)mO1byamT+#gar(MbR%w|Gtac zvta{wvCX_`7Y!;mL|C5AcsVE{Mj{}Y1SyZ`8&+VS-0vp?;H(ZXR#?|ZpH^{|EK-BWut#nv$kSoj4kkr8|t+gTz# zE$^JhQqME@oLSAZpTFNzV*SYcxOH`h_PcB6jQ_q}`S@4Gj(nXnyJY&0r#{%3Apc?7 z#eGpn)7is}mO4g7JSg`$w9RPBo%ku*+l(9Bf^VMhZWNy~^-lfzH$EHPMRIw4RbQH4 zRR90a_}`-&UyapfdRa}GJI~Sa40PV_q)4Yr2S-8Jw|f_AL7CdP>tRG=+otb=RjJFJ zg)FYA+}g(SM(<2ul<{&UO@YaUI?|`^wQp>VH0mv%n{$$<;AF_Eg*o9D4isuy^oevAOUa0o)HkQ56;C%Shlrx+UVrNb| zvUM}B_hN~8<#$BFp1s`)8ew@ZyPcJL3j6sRH|OO&wVrHflY42eEGT{=UbhvUPn5f} zvh?PZg+9V8_j1Bk+&r>tOEK4EH^V(k84AM6PW5hr)bxgbZg3xny!o;`4m6Epx7hDT zUe~FBcaosFkkTJ{T_^jFy0o~=U*0OoW^%#fSd!6{xqdo&XJw4UgtP7yOmm*uyd}-g z@S;Yev!Nu{-@fCQ^lomx<7;SXf8g&w`Wyi# zM+;u?1xLCb*)&*A+?Wku)z zzA?4Cb;z(Nyov4B;fX$~Hs6D0Cfc0&Cf@e8*tty3IP!sku6e)ur@U3`+T)Wc5!zwKd zYQd4(AAcm&?gzV2H4ZkVgGoMz}Zk;CoW$u&}jK@1K zHLd>n@vmQ9veDG7liN=2o_plvrb|ou#PhYXRrgE9?>D}vZRm4v?UEJU?Z%%%u4NyI ziaxlyV+G@SUFI6Ccae>W%b#a-R^=6IRPH{jd-AC1s!*fV%Qo#kyFSdty8W+e)`7pF z40fXao@uueL2<{U|4uoE?Zd++&nE^43)ijWWM+O?Q5cpP!mYKSZPPt>v6x={4yg|< ziE1pFn>*Tn=ow1+x%CQZH@^%?)6U5fsM`NOK4L{_W_x+}jmE=^R%Blh^?x#{|MjHC zj~hiwYqL5S*NFpKHI5Nf@}`#RtmV~_dUenuS~$D zcRv)D>1sd9P^)oGJ!F_`YpSs`C5+?gyw&U8_H3D|(dK+>lhcYby>7P?J%sr(U%y-x z-catkXv3 zUphi!gJ+gwRGN{3+v*L>GAi0i9;s=pvJWIYGj}M*-ds03RqTtS*Odl!d4_va*LKe= zJ9}fY?9l>^scQuO6#dIkcb-+CF|~1?74L)CkF9P?HqTx+Wzvy1O}j6NCavcU%X975 zoMdt%R5m@_Wky@Hq1n<^k8>pRE5bS6^`~96IwM=MSlLvv@^IwMRqbYzAC_!kS*tbY za&YV7Q+GU8K02^hyFa|fsN79>?U|_y8u=8NcWH0=d-ZtpOrG|O))@QW5wwVdHwyll4XZ<-Xj6iM2we50<(#l)En2GMA_Gq4g{G1&2N_ z++u9EC%v=eeOLDFWmnW5`(4pUxwGa@+SUz`|GjR!m)SO5qs_T%iMngrwoGfD%tP5s z7GKu2ygg#FdKIV2n^;d(2JL8T!!srCy|fs0CKT>n%b)yBAUJ%R-j)ZOOJyEdXB`MW z%37W(T725q?Z}(CCO0IXiHB`7pY%|TIjO8oX+}tNQmS^C>z~W*GxIjsXoYRN_d_*i(K{uncgx*%pRN@D`Bdme_49*u8salk!`}68 zt6+I*c;At^SNL&|o_K$nkwV+!Gc#UpvT7)A)hl^+@Y*KhG`CKv4^Ip~t;_j-Xj6BU z*n|~~=TDq_yfS>g?gdb!r>lsIGu)jzJNETS9qA{sM>1Ztc}LD(eKy5GnD4H^eyIhw zcL;GWUR$#Lj-mOs6@C^|yH8EBj##M|5hAYAY9-yUyXa!e8@@1!b1nHR7>~E;`1d`z zaIQ>Ar7hWOQc!{Su1!-NPM`De?3DT-P!PRq(^>arbM3r3r9RAHKCs)Vpx$IMqhS?0 zZ%NSco1*hysyzost*5NolV1WHbDZs>R9|Z-Ugu7AU@Hml5J|S4`7&nug58-r?CUev z+>+DYve;mc$cY>O%q5o^mG7%pOj=o0pgCcq$#uuOsjh1n*M=PP;%R=^5qVST3dDug zYUg*ve`#y__8Xmvyo2nbGV=XCk_+zQNaOuI>*F>GBzUeDF_S$a|+n!jy z2eAu36u~hUD8RPvxScK?S5lU+(6WUs9jmdnnXj=5{+rt9Eu3$EKp=k*6=7^LV&SuBn&J z-R8nNfvmEG)8{HUy{HD zJvjaUHX)6upNDoCO?}&&yw+D-*THa)S<8K{gWi1G=5l2o%4XhCF8CleQh7~o_{Knn zu7|AKmuk1H`j?~bJnKW#Z6T&S@9-CmVt=G}C*_>(llm~DFnU+f_5Bm)E`#JpxfPe@ z?|&Hj^4P~Gj`p6fB8omexIfi$;rVkWKAvv2rt{jrg7M(?Qq5k)1Xyvl!GH% z@0tYPY+u2cFP`TaevKjdR_IlChSI~bsoi%(!d&Lu@@u>DQ0VA$*_V567vJlB_>e6l~vc$zoX**UF}m^mQziAW|SSPoxXyxUCnmtRa4*HD^@Q) ztX8YNLpxJs_359BXXafLGC9HOrK~;WquuevGdC);axD(FJi)av_@w*hMcj*nBVW7- zV{71V?YjT;T$vTO>Z`WuU3ZO+MkI%m1pisNLb~ChbCa1K)S!DY;qsfehRxS$3vp@UKj#fz(yP`W~L8ITR zMI}!&wWdwwX}@UwV&(G2e>09=3a&o%SwpY6I{cb;LfzJ*lhsyj99i+N{KMKMQy^0m31tKJ$c;mqfI zu&GhEb=g|h>t(*C{R^tH4xEu%~N2p@jH+3 zZL>0Fy2duCW*rcok{~=Uk^SDDllx30xm0&|s|)`rSWtARcAgjCTaNI>pJubm&)~Vu z^tDd&-Nw+bPyU+KCNH|4He*k;XX7)WD_ah5U1h9~iM)7Lbwy;ONNM11C*_or?-J5{ zxP(d;FP3tCWGwz;^VEHTfxL==XF1p0kqlU!+4j&tYI%#tQf1~{+R`4;lEzIeyd@oc z7h)IA?L8@bX3sk>A(IP+$yZ`4`Oa>d^w6M+{qGEg%+fzRljn)DT)e;epX`Mh#euwh zA74Iu`y}-YZ{S(pz*J-H+Zm}9e@|EJREeDQ%ArJiYoizUzYPoIzOFub`~L!42SM?j z0bzcZbnfQKh;w)r?661)J|Y=9xzl!P?hN_6Ig;5|c=avr?27JQRCfK=%L!^Ri&^q+ zB;St7KKjt+L4VnO!Po2W&sdi6{k-hP6^Hx!A}&8v&s{O!<+t#6;gQO>6Q`%`Umt=PdN2FREZ3>!O;j z|4)`F3z_jZXT>f4TB~5^KdJe4qEyIdiM2c2KP~fNU9vj${@HC(y+RdFeIt)zKRnR({X_DlFtg_i z6}hGfURr!+eTaqi^RM>Fce@Hy3U)$vP-p8Xp)k1H5X?CcmGSNR~j^}$3TEiZ@K_=})bG&Vs_%`0mI z_4XJ$mAzf$n_+NN-r&5}!R1UpPVAe#w$^vjzP4K$Z!h0yTKVum^QXXdyKbIc|E+`1 zRHnkuDYIry-osC|Z(6QQuot_;cl>b8L09Ed`xbHD-Ts4Ro2aw$`@k!!daiFwD7!Ry z@1Lvp?zjdAU7Qk9bH1Y2cgoMJV*WN$LrhdfeLXvi9*TbJy}NM9BF&W@jKLgsq6^&0 z?(&H)_3WNo8Jx$s^rrLIJtY=S=k_S8sw(-bE|4qwu;){vec6Ns?C+0DVmA#C) z>Or%4%c%lRiId?R`)*pi@p#O9W0&K7uOrcd>^BTIPhINBeb)4M;JWWB@@IZAo=cq_ zz%<8`+dQ;u&9$~$IWPZJZ;f0Y{{QQHeqTGU{;S3h`B`0$KMvfGFw-1PL{Cyg0Di{?JQ@Nbi^y|Lw*v$JZp3+1J8GEXi}3{Q%>{$2ZL z=gAEHhzyiq&7?Wn`H;Lf+X88Wxx`Oo?Lyt&1vc7JV(yWZry zzAGUYW>uegcdI00(%ihhD?2Q#gAXp=^!?SXua_6z3N*Kw?WV=`U@hBqzjl*{H@95N zxz(@X(0WD2n$PpW9YG@_mp9QJ<^6o?ZZ34zm@r|t8CNb|3`?^aX$C!?*isXZGB)H-sI1^V#22U^!83S-5(D=?PT3D;mT~#c=(qK zM}vKC+Mh~KlRwj@IWMVe--2US3zrKW5AT{M$*%Ij;qIOVLPiIdH!11s?k;QmZM|5` zCQ#4y;LO#U;QXt8D%Ei&Z<9ak2ZgIeo4n0tOKpA7>UWBB9rKUVDt~953@Q+wAb#^; zi~XIz`KMV9-{qGs{p;@7R~)cn{~_tGf0MF)22Oaay}PW}`hWTK_M}yN5@vilIfH9i zrGzu?9F*`(=nR`AmcpM6sWE-sk;dgNxRAJeRZ&Z^&Z7x*|A?Xi$kZ1;L_W2TL$&o`Bw zTjLJinPQqgG5Fcv8D2-;9e+^uvVvvbVlkWTE+1At*mgO&47BFuyxQcL9g7|;48CW( zq3q`r&vke6vcjiSm^Z$g^Lo*@>mjqTk9<*J!zsJ!_Ji;oEp3_@M6dyxw`&7cMaMdZ26kC#=EiV(IDS zJa3mA)k_wr*3$BMeeKL%_sL?rUHhuF6nbM~&1EMZD8C}lzVz)K{_1C<{;Ab_|48gx zELJlk#Fy3ll3W{jy~%~0uf(UnT70K<=B8|OpG_QFA1rhOWvka&>DI!N4wPSMI)0DC zZmRzrchKA<%)HD1JFcjbsN|2W_s!>gk)6Y)I%QJD$zaFcYvteLc8lk+t1e_&$NqG2 zjnsjQe(hfln2T()nHInQcL5pE>NuU8;ulz8&a-k?S(%QI*MnWx?YJIjrd`*YFXUA$$d&IE zdi-Zb>hCvwf;mrlXL|WWx8#)G=!vQ{j?!V7*LCZ9^VGK+q_#dVF_LGUtGz${CMYrQ zTfF3M%Wv76_uGWeJn3Fm=IY3>(Z;=~ZmE-%&%TT-@uP9V2bVW(z4GKHINNf|Y3eU} z@TBKXEXYa9PgQ4a)Z%)ex+Cx6GSyiRC465V+dj=~O5x_shOeTCR z19nPneb5v4V7Xs^*x4x&f0A^>XJ{~d6+aust|KlkGWp0#7aRWT%1<&%HS~I;KEyE{ zoZggu=BxbEr+unB` zANM8w$e1z7y>otehBc^>UE^N+p!1dYdW%IDjtPANN0@2X!-!9dE)>iwzj-UsL%2_M z{t6C*qCh7pckAU(OuHVgWcV$3?@v{l)q+mH86RW})YrUml-m4cNj1CSt{I!RWaRp5 z+@eSWm>_x%0)%@S4f)L+cFaQ1(({q#v|P9?j(-?X3Yq?)MCtIwi} zrKvw(um5rLKwWe4$G6g25?g*;Hox-!Id|Q$%}(Mr^MBkwbieXVgKn(Af#uY8$(GZv{oYNW{sFEypHZn_KaiNrdtB2;%#gUs%CzxKIQ8tt3P5%OiYiDL2 z?S&m;h#qI{|#jlms;LywAIJCOPxCv zwZz6;_F~HWB`1$9v2j{_wR#Sy;diVjCFB003*p}vPo3O1*Z3sw<%3*T-80nnW&1Wr zFJnHwLF3AcB8%Oo>dF@Fvo(DJPhCy6zh&7RvG~Q6%&&{C3+;9M|9k#ddFQ{*2LCT` zA2at!id>kgaD3&5_1`+m&voTHr2Q^^eQBOkq`u1eoEv+z1SS`%b$w#XJfkqj^Pb~( zQ6;slvwMR@X5Cly-?Z7c%KpeNfzAgqaS1p zio!l!b+>^O3BDFGD>P| zuUYaqt3o)sNki6n_XMpAD*P(^p@;iIi{B~iv1_la?ONn;?3Bs##JKrOX3S_;j5L1! zb!FguP5;S1q*k6jBDEy7^uH%(Xs)8S=BDB`@oO6zKKCCe7dgE6p8E8l7lsr1K^0|x z)lwDJm)nmAT@xvOyXdACzv`l;f8;7Z$W3+)`}}pW?Yy*Ex)bc) zFqD4^ec@^N=%g?Emkp+!*E6l2eXEOHa5D6Ot(rmqoFnI$Gygv8bqk(W>Ej{yBX*5R z(65s^vzWOp{&;v+@kVj!9?`!w>*nVR8g1!!Z%lK_eqFoGJ8d?j$l=vqcUPY{e5LgC zGG*q>O<#>Ri$pQJuPR!7FEVWJ=?RzISj@DWJs!SEE0c6E+#~M8rTtjz?~7&1v);@- zlCvfz@Yq%HQ#)QZs7Y&^2km|NNU*i+c8N)`R`}!@y`O!jd_N~?&XcjJaF6SnpPGBv zpI2HQ)=fI=9z3Hk^pu9XarEblQ&Nw#mTPXga;?s!_>|G3L%#zTJbS$A(5%ZB&*|-H zNV2$A6B8N{RwZj4{YC2N=I%5mUdxvszQ{k@va!VVWj5F8_1_v+mEVilb#cmcjk(_z zRctBFGPn9_YPHGwj#u`xY1aetCrnIe+I#ADsjYEMBSXfb*A8D6n`j2VZvDuyn=irn zq1sB-pEc)K&&r;%A#d`^+bL>u9;d!Go4Lz($3(xx?h96yuB$D0^dythS}!Qe?%7n_ zV%>gnYtorDZw#aKWzU0h@?$maQ_;UcE7cA~AK|{lc26Me-ockQO@D8@pwZUfFmbcf z<=iKm?-r~(+4t*!aj)Lpr7n@dH;XR|+UEEsmF>{p5LsEAaK~W5$$Oq>+9u686yg57 z@@0jZRMw=H#0wK*j-R=Zoi8Ko-ot0JZce_kg7ZD&!+xU`rArorMjdP!_RLzG zlG=ZH`1U(-D$w|wjBdztT6%$_%WCR^#^ZEDR{!Lcb{<&XYp*PYaO+-%pr zEkR28d-6ID*yxnpEY%lH&DnmfVkYxt8MVh2bG-It{<_*Me$4ox1wZ%QZwv)t_v9Yl zv{VjUEHTfE)j~V_{+N&rf3N;~`l?Xf%{Zg~Ij8Cv&aV%#u};7FUZd@C$?Pt- z$lVWPLUitAy;{A_T7T-Ro0eOneLEvXZpqe51h=e+$P8c9o8W$R_0?az`xgI53|c35 z@9~oV60C1F9&m~LJ?l?KfBJEqa-9uXZ4)$dZ3|`0mmgR))A6d#yhR~d2_IiPJF_6G z%-_i*!T!)Z#_VS~^SF+rtdR?R!Rnd6ta)ZFYgn-L*H=rKXNfv}Upzh7YSxjQHQs^W z?ns%-UPwufGz*@#XixUu=g+338ehGdaXOnJ{i*Nzt%oP5)wmnVcyC{ODYx7XR6f}_ z&0i{ips?!_XIy{T#cz?lkM=nP_H6j&wA*Oc;~bHtmpS6SS_sGc6s9C0c@5-`U_g3#=eR}Jrulr&NJA;S)4!kzs7DsNbjc8Qc zsqSL$b=Tuqj>XG+j`AhToi1K>p0ep~`SCTgV_g_a zYRQxmBkpB6yESk7ZEXwO>?EDf=We__$F%F=&h&=Olh$9lbrIBSw(fd(bdIX_OsQmW zX}f2}<|A`Mr+km9C_8F>wkkO)%8MaAwg2+1(A({%S%((BaP?dr0e11i7uI5bMT}g3 z9z7#gdwh}nGNa>K)4nH37)O6OeC6o^#%qjcz2Y3BjCnE+F`E+J)e zQ?t(nO#zKW7GG+b{l$PedWw&y#V*U)Tht7#ow>!AuKD+5hwAS7Org!MZ5z&>niv0i zS}yMJ`^#ldb>I8G4!tM&L)&7Jgj`5k+|skQXKvk`pk`yzW3#I7ht?Oribr4G zGRcW8l9+dj!9u$zxpsGluT&tq8D-$n}e>PxO9$yQzG^t}XUm z_p;+%e|C^lc4f}$eH=qn{O8| z-S?b)*HC*+h?IuAx$J}uyZyWjj>?Cb?)zDKr@+}+ z9H;Iwfo!X~8GYIFe4L8jv0msG%53)ipS&k#lZtnu#IC7Pj&mOHbH7UTulnCy*7C4X zHF)OXODlI2F>U($>#UCD6X7KpyW{P>a*Vn^Up*sc^04gbe~qbfSHcBMdY_DCU>mz)pcT^}fJT^;*8GAU5LqDAy~ z;5p+2^XQAyWfNci*LY~#@HcePmJ@es&2=(19j<1uK9uXHTDPsIrj&b!ic;30#7RD` z0hax%W1qa8 zS4^~g`Q+acn>~+*9@b*thHTC-Z%N=ok9@`!@Z7lIs1Co6pKLKlx7h^)|;wSNBeD)9Nx-gSs?r^rpk=bv65WZwVJMb;=$c(zlu-A5ba z<@RbhNu9H91f@J$K3n|z1{d2L&A&f`T-Lwl&*li2q*Xipi}yFrpt8l2LtNb|{mjjy zFQk}ToibzFw7;w5Qi*Byy~KGcsgHv;P0^eD=bc%`AGKSan`{cAzXzQ&x_LIzOXpR* zcx%~p`6QF+mr|_Hv#I)*{t@j_=|5eAec<9CU7f&ZKfjImyjaGEeC* z?Fd?*<~PHL_nyv14TkWg`<(c~t)-53{5rtRduM6L&ow#W*3p;5^8$^6l7B1LCw12U z`it8ZD;I59Jy$pL zkpGpI?_D3(c~;pMY}>4=Td|&DJ!8M?)K9NA-hXSQdVP^dpK`9|Z_bLcZA&?-Q>4(7KUkbd|K!sZuN}w{q~193I%kt4lNAVTWT}&+ncuXh0ME_h9o=Nwa(4B z-m`ltqo(B+o{Z3MoD(Fc7@t)4xF{%hDrm{X=_RI{S$!*7+JiKIdf#+Dx4HXIfR^fh zFCnV~p^`<#f3u#e++QRTm+&|8RGhYrb@Zhc@f%56Z#R9tsdruN=}pmlNm{y_zy6+@ z{BTuI`t46|=Hy;mBy#V5#7-^eqIv7edZTx`YRXLBKShy$ef--TPvO3k`4Z~|m%LtBg-*PFV||`qnXczef{Io|mEe*G5v_75@eTr{xdb;%68ocZgf-WFGRLa>!8I+f!(F$=1!P zz7@J1;9#R5Z16+Y$%tKP`Hy;YdLRijmW*99a0idx|+P-@aISt#-U zeR93Yp{pRCr=`X}Z_B`(=RKzyKk{Fi z(S6fZeyNPcw#Pr1y&fv2G_3yAGWYF@C7kwwT>U5dy83Q0#u`UoaB){zUe2^d%k|o+ z0^`MJCMV75&3!B793s2dV@Ltv-XkcGB2;L zdbE7r)0zX0K}qs2gDz9f;p?aSDu$B ze!HVJ`btZf>0wcq!N;am8M<3Fv^Wa^lMjE)s+KIfbexlCP7bB?sh z{+lP>{5m{s;gaM~0{e-rddIN|u3!1g|qw8cx<-+N5`yzS={f-G1%eFK3^as&6;G9kZ%$NPZ-A_Q=vV+aBMv z?DRGfc9mp&sLasycFxRM|D&i?u=Cg~`_L#NQPqpO$6+%td*$U3Q3;M=T{8nr2 z!K2LI`yhMB;M18LN8!64WXpE>hL$xKo~ig0 zIbo6EmzibW=hsx1cP!kftzFm2F>tllMls}(Nao&iuE?fOI>)Dfg4Qi78D%qW?UuK6c zyBSc>tvlt%(mC}u(U$FvmD3;IYmC`i_{M(j+BsXKCrpawYY0nKzhJof%LZMKi!;70 zeUtWT=FKKGna_G_+2zl>E5bcyKZ)={Z`Sm-fO%e)bg|ns8XG;lInb6`G)vS&r@H|e9>b* zlYL%?R&{8>8H-n9OI}E^EeO52`Ht!1Wx0V|`4u{jBw?kA+(7qu=Wo!c*0cY%X4u7dZd@>JRSAGH%}w@4fa+ZM{X~UajhlS?6!< z;V!zC)*V#Q_-^+U+d7-wXa0g}z3k6H-@^OT!*~2Qi<&+Ai3)Sf)IT+xRb}TMTKj75&Y3@8md6j$I(#AAWSx>Y`tNE`8X;^*xC>sOWUW zR;{0*QM+e`E`K4sBRVtaa+s?^9JY2Wk z#dF`>oPHtKli|A^@9Q?qD!82~ue#1V-C8U2pmi8u^XEX8d&lqgS?MlNyOZ`SaM7C? zAG3}x77pM#ugMrQRipRqJGYr^lQuoH{u1aXvh!w>nzWs>y%+z9d8afUzB(qqs3EB0 zH0uNJmmBZBwc1zYpt9@)Q@2{-`m9_8x2gl__&RU}(GVj#P11ClAmHOQMT%YH3 zVFGVhs{PYdvGq05`U*21%W&pfY8Tozt(z zYF;L_D{{(wHvZ!hyL|hk`XbM8Yju0mu7@-Jc%S@o=-%5!E3Y&}%?*gG75H0kmOhDn zUC-3JU*D`hSMcUAr$$>clYVM>$-cVy>pGVR&QqRTe9TKa^^WxuiEU$ zD^p^fwBh3p>++qMEwiWdrB5_uJ$67gap{`O(_f2(9yvF$`5=6>;LN(EZ_eG`dRdWEX8yGu!lkisTXxrRto;zS@9u9?nc`VS z_hiB*-mR`+DS10*&NYp;>k7wFtrdH#9(G2B#4efsDb(zG-i)p# zflTi?AKI>r&V6gJg!Mh=1J155LHp7#ZGD{Qwo2naz(TXnzUkJa*3ir&mXMSZ@8& zK%VQDA1{Bi@L+NFw!N2@Y~Q=;f52q%{cPP`mo9vrRJQYl_pT}VYa-%hKhBXTysnbQ zzT&9&PqhHhf%P^Hy31~r;rPDw8iq4zM*ZJVQ|B^k+7+cyj zW);4eSXn2RW%V!F=Z4twtNxssD;%bHuGinOv@`$xP5Up4@6W!m)l#iK%Ck+qF>0#O zffP;c?|ZhU{#MBlIlM9d`va?n{dt%3eWnGK?*SiGIE|k_RqDU}dy8p;RgMPNU4E2Z zUn%*@_@N22km}Jg=W_Mc8>FVz|66Lm_kGcnm3=QlMSexHeE&N8eC>nc56>6>-F$xn2p`m$IpVC*h#=vChy8&CL9^?CWR0-N_F!WNn%guzdC0;72B154WZ___sdT z*|IuzqyKU@!#z(KKde0B=Cuo&0PdYV=+_$H-w_TPY1wUgVItRoO9q2U$%d*GWPbnaC1&dTVsgGuiIHWW~IK@Fy>kEb@`#!id}Az z*47iUrW{CA5Piz}q;Tu%Z?+dT+P3%HHkxX_{rHaCHycA1KPg;p!+n2EpzpV^s^E+D zTCW-`tIv1Ld2@AzxF5$~fz1y4b)<98w%Lk+F6oKVIpt`SCeSy5IpmR>@L`6MDVJ^} z@0-OM-D%qOaKf(K)Zkkg*6&k;8_}zxGX2+`1YxhB<>-?$pkQ_u41e)ZTrb|6Z)h)<@h##ecaw!*%Pa z+dVlyrln1GZiD$xKypd|Ea`m@X(h36~_AcofrLo+_%rE5PYJx&gx5c$>Hn^ z&TL;o`l=qyxLLj4u_=%3?xtO9=FQ~GI5@j$`E!>2|E(^a-kQl_Dd#s?fDvQ*KaV`O?|Jm6SP2TzDC>OkgZeR ztCoOf-;S?b^-`{@jxk?QQ<-{uLrgXEhmf%Nr_!M{dl-+r2vb_H{FAR$-%LLD3+f#g zs~m2fGLPH^nzNg~V!KMu_n8%0H%%4)+4O%?XYE?4aeu+)eO5}B=KRmAaQ*Q+B=biI z$JC@b$@3$B**2N1DFnhDRF4Z zb6vY;pSHHYRoJy?*3T0U)}(Bhb$>;H-zhWss`Dn(X0BZ}`=o(2tHtD^MFLCR&mUnD zby73b3(0Oa+RMyXbN|wc+T}$uTWU((7Fpc>?_y~4oZ-XDIj0Mt>0Cd6(bcl=5~ya} z7DSWLbBmf7OM(E_Td_aeGYUetOMJs$alpPjJ>Yb#nbJid%FZ6Oin8%d0d;YD| zXYE^B#kdzf7_LJc1mAX+fJ+Q zX=(nc;#|j1&wOfWTj7~qZYV$2QgN!r5fqmC+8^7MhU^aR6m00^A>=$o>K4`2I^f8*QPZ1Kh4+#DKSM3 z8!mLUyeD_wuU)0U=cV6W$+Tl3eJtPJ%$ag+#rK!||Nlsb`kS8FVfMoBHMi=iiH|>B z6}qp8Z$$J2bC?)Wlq=4Yua zk;A8(3;mzIh=|?&F2}3VplHswWAhG7y5oI*-3=@2GY8CHe0#XfM>Qz=)~CDY{A#3* zevkuQQTgGkTm_`W^lWw#-5{TNVc~CiHD1@w)buSiOO;-2`+HrZ>A5*uX!vxe6%miG z`n7*K#CY_B0Q-UEP9N^A&QEs|0@WZ_N=r5GEA9Z9B+b~Rf{Y2?V^>d87+?iw&UZ}8V>OF^WiNg5H zUvBC9sRpSJ2mbm@oxirm_WE|?P{{!9K1r=pc|LuTY$_RN{KKkTz69*^ zJ!M$DDY)6K)FZj`p+ND8(*=P@tnU9I#_)0#PUN0Gx=h7r)Y0-)2%R+Pt}UKQ=JvQJ15M+LAT;+_vx^G+n#{D9QXCr zA+PKMa!m8{_g9B*-kx!eseHw;MK#GCkFU)B zR;Km(twax|_J=b>BOJFM`Ve*K>bbt-4N(Pe)-GCMv372(6QgOB_4KwQOBMGnZL~1t z_+u;*5_n_nk-u7>HAOF;to&;%5@Pf=T*U39)Wch;(LpD-#2ekz?)t^iH#c{`l&POy z|77heeUr0a70ef!JKte@SIxmIQCmezr>u^i>u7z~YcUJo(!eRqsc#LI@U~x)@OA23 z6nO32v||}UTC-Y&o=TY6SgS8wu`tXtD=@YfBMCeH7dnNByiu`^Twyu*cWFOO`Pq;{3Ybd%_!sLCo4aQ3EV5otU0{r zhT@)sw*(9O?{w`dyteM-I{cgGz%l2q!`G8i>Sv>obv4HhK@WYjBztn9l zo)ov3C2nG@dek+g^V+u;swSQ*PJbnNBKV@p7bDH}mW$tBTz`M&W`+H^`h{HA{(lwr z*?**5_VH}4cHw(J!hX#aw0^lfka?aZ+uXWE0?Zxj%AhL*4Vh}ROwRS|fesn)ztR+Z z?8Nn`X%^FOUj^m*J50vs+hrdFFZ?+5_0@AXnM|_|ZZz#$^ay4zNqeXd+3ZNq%7`UkP`*PXTGsvnwqTnG?#wbWadzKr=+!HVuV>MU;*d$KhzZ^%wt zy@-i(=fh5)R=3<;vrLVzWnXX*-+Zd`(2M2Ac1Iek2c6Lh_o?f2x>K`MAAD%jjCi?I zCuQF|HhJlu>Uj84>zuKcxL-l#&WENoPeCh^l&fn^vknFyI&ZTl+pfs- z@N%PlzpD>{7u^eQeQ@Kji{+}x>7Z+!I)6QHx>Rvc6dC@||OQR=k;BaHajzwr%=y%eQJ?PXX^XTZkhS!m5uL9D;=)i?;D-w1qoXITpGwNm&EiVq_21rBzYZHc9PO} z|55;_hR|ScFFPCjC zoy^-eb#AcLvbegmyY?5NC0}Q}4>z7&)e!YTfb&7{!^-+8oY&8_sC*Fq%J*{VWj~#N zoGN1422=A|{~q7->3Ox6Yl<*;05_lX-LQR6FKpdBS#yEg#Rc*EkL%3npMKh({r|=9 zTmFX}6T23dYO_?y%5wex&ZrNUqz^1#bnfKF)e)u)TOag(IOp3MnC!9_wC|^G(GsP8 z+t+)<)~c2k8~sx`z-Pu{yEp%7bjZ_%%1;u?4H$GwI#@3RUsTCXODlKiH8<9mPY6s_ zG}|)&RG~X4M{Qogn6c1M@z896`_&P~vJ(ynUs>7k`$|~f>*qIBqn9(i3tl5)tCZ6k zsCe(~8#~q&g^G_op5Ey5XOb4z?p3cks)Ym*G*2OeTGK%~;^Kji8_4EeDI>*fs za~OsC0-`P7b=Z`)tg);&i|G&WGZT6z6&;vY)?XmsqME9``0kOSMSWhyjq_KS-%NVz z{vcxU$txLwH}(hKI%TuNSZTT2GqUY_x*FuTKE5X zu;1pi=-J=z%&0B75&Sdl$n?K{#^ygdr9NbEZP&Oz3pB2y7PDAovhe>;wv$)9`?P7f z(7`&bag$?eZNkMriZ z2S$C{pp}z)ror@G!xFYSM$=Gr*1pqDvtCvla$RVVHh=c)&Dt50HtbIPzKUyc;o%0e z-O97Q7`}zf5UJX^`zG6Jkkgodgk;>Au^ZGGR?j*Z?DQj~DqJlXS4_!T%>3>os^4H3MbXQ6BKXrE5&sAo+>Hb(TSISN_s`qDF zc<$V*D_Gx4u73n=h}>J4(${kBxYDVKee+_shXyY`=3(&s#*{?8Xt%G%4JO2z|FQVc-3C{^E+NP znC(uu!>hGP<9OPOT{l^-tzfnPzTAF((VH#vVmFIME@qpPp10z}q7PecMC}Bvr-@lC zW^;t?!%Bla9=aPKB|%g2tL~znMc{_#jim0(jf;Bn?*6`dE_372EjK<*HgcPnvW6#r z&b4!y8>O~Bcx=x*|CHhH%CeJTDZNo2gt!lMi(J1OU<(@j;lA=IX`6Ro#+Qs;w?v~) zn`Rx94sGyvm2KL(dfSZbD^1DWqE98Bft7AN8g@C!)$*J4d62QHA8rZ6&DILO#^-$N z!z~8CfU~YYU#)%}cGmQ|N}{-p=%in}+Jlbw=9sQed%Jc{rtFR2K$YyY?wxA7WoGfl z?;AbS^uY&i=GdjJW4*a`McT`qsqd5Ltzcc>uuh9Vc6FA~=OY~3R9L286`1EBu07dI zYV(2K4+hJezOKE#F4S3ePlFEp$Eb#~p&kG_kK-I!hXciH??kL0SQm$!V& zU$(K!skZK{{rzBfmsy|F4{zLPw(lg%hm|}#?s%L(m$^o2>jS}8AHwEY-T^1H{($z` zFK;a}$ntSE-<|Qgz&LjI%rl~`uL?Q(=Dxipwe`W#nhPrp=B!Kedz5v-={o!4d0dN+ z<=1Y0RC`8v%Y|N}1_qZ>DuMl7B; zzun!z<3XO#j>FS_{CoD{y;mV&I7;1e%w(?mEhPelsKCZ^tUcI zeCNJ4E;Ompv{|yWU~93~TsPexJ1$G@n{vWy=dDm{;jAl7-+LzNtA5;h3^qK}n(rIH zd~NlSpSNev<;y(4xb;DsEvp<;^@p=Q4ozk$D`M9RrSIK4A`n5a_6VCx-D(VS>g^&daM_nIXA23pDl3^j^jGe{nIg`^KpKE8Ed(= z1LvJTDyqqIuC04hH)+zxs0C&Es)BdszuoXsx$9xT?&(hco#i&SZr)-IX}5m$+v?NG z3&D$87vEi0X4>`8&wroy!slt9*+Him@ol;jn8?zw`O^KUry0+4=4Fc<_I=>&QNo&T zoFBE3P4|iEqF9G#t66djv|jJERZ`Drem8ZZ4NKLjomE@Bw()8SO#YpkX`-Fob4(}y zgm%ZpUvsOqw=8d8JiX8ThIZ%8i2Qe24ZoRsX7hR6*mg%JGurFN!sUxD^pKmUJ}~1dD6(_s zocj0gY}7chUwBW^j63%$W}V@ZJ+yuDbUv_u6fF`qZ*t4LTjIhLAIOw1VWC~=7-=ng zsl~j_FbePJ2Ox1K+{4?NtSYhxduES^B#GZ<*PZPe%-8a{n;kn|LZ0=e2*KDl#9TBkL z-Q1Jbdk;U74Q9)i$qrt5{qNcJ*DAu!J?*=!IqTGHFIm~QDcfiIU7Qjpznk^Jnk%Y) z+1ppz_P!DquQ!T`X|0pcTxk#=v2*&)pI4;FDvryaO2z~ z@gv~YSLq1QCIRk4wmLt9cWzG4PQPCvrTXEHfZdc^&;Ok~d)qXA@(kGpihfU{UX`ca zTw^75A@<75vM_b{ZZ_8M8;3O(`h`{~QC ze%4)m^5Xs^uXx7jKR?zW&GKn`X&jizV&_vHb|(kV^*bG-0`ypm%{i)LoBjVa+%9-D%I8+zjs= z{lMDCSo5=S{>%-J*0)~(&3sI0kD2MU!0|;tXltYG6OOl=8S|^OrmFooc`muH#>+QX zX`Ak%+;9!S)yEy={;~D@oVjVHChvbqX@-i#v_%1CQ{S9R&rXZT5;?q)wd>JJ$IG({ zHhGstq+M=)!7MRtkC-k`XnSVZvI`mQ2pszmiWFrt3{00HQK5p+;nA_e+2oS_lY=peRpYg z(K@wWk;yqeDGshX3wfTr_LQ4BV{(p<-8_}Wo((3Vsge=5H{X1?I*_NI(_cWbysYft zvQ=(|GU9H59RKt_W{8)s?2=a2&yup6lFEGZX0DlAZ&JlciJt*4gtE@M@6J(Q>Snkn z>A_S-y(x<$H)>ZM>A4^>1G^Sw8vqW&ijNjeW7g1&@~=mdx=LDswH7 zox9P?D?+~~eUbKrzt+rE8mA?0&73)Nx#Rokiw){7CS9rf_dER`s~+!F9o|Jck6rc! zJ)B|66nNL}&!0u%(Olj2MXY~>*X&!gVsqd65Et#|pZrDnrz_uk6TmUm+3xmD+t9@l zaYkuJ0yMV%x#+{L@*eg`wSe97Q;SSmeo-DW}gwa;ySE2USBa?3~V+p%3pV?#f zTYH@?J74Nqi)K|9$IklT@;ukwVu8fF`@9dF7g{i<&)I4Wx@+L#{0j_=RTso&UizPu zS#0$9ga3nzUR)}lLf*}q5x;WA+r^>*^?Vw;_vPBRTz?nxPOSJK^Hi^YEbZ6zG?!X5 z@V7qtvQqBtn{4p_p7o3mofr1h?Or^)&jVCe8!TA1Nbd&dqD$V-D=mWA773gzoS1+2 zO%2l(rse#_!5`ksAM!5NvekOWfBxZzAIhw4=R;nE>;HU_7T4?{RCfBrJFc_wl|pas zym`YYw0UF7-B2#`le0{7E;uBaiOtg}e}8*t?yGY%cNLo`8|0lf3w7h1!@YI0(69aP zjb_R7Ub)}z8_~Hwc73*B=Z{6oy$2{Xh&xczd7PUKlkot4;+#V&yqaUUj zd|G(qU%lO}(A!r`R~=rtIb>_NZ)?Cj@wuQ&pg}8*BR(v0@!PalwoRo#ry^*V-hb5e^75(BU2{R`{i}=TY+N(lKTPFXp?2L{t9Q~O z`~SHg#!P`<7%QR~9d$cCBYks)Ea&DXH&x%Q1;vB4-Z9V>WTmCwc%&{f6 zzTig*m&UY&ZTf*VOTPwH+Swgp=C)}u{ZYae^SLSV^Ri3xv)@&$IXh4M%sg?QEe46szfynj+TGepVh(d+g9}6TN-qbpXDRp%}%G2zohSo~!55cueKR6-f# zZq+txiD`?D%sc%vpv>#u(~(lYf!*U9<5cCnYcQYOoM+%CbjG_T0MrA?m+O9h zZPO8I-L&sl&6e9brJx&F?k*CrX)oGvc!HWtRN1oQvzUJbOsl$k>*lnzfjs<-%JN)y z3w+*XEO!>F;E<@yV0{?-a>e4v4c!fFhEn0Xa_$vMZ%+GmC&$bx=uE$*h=2L3KNoX0 zU&;j4S{;vUQ%fvwzpeAp`J3YvFLM9;;l;O?ecHV8kB_wos8qcEv7+d<$UZg0-49#K z8&B-qx;T8Ruveqi&Hz!DR*mG=?Nb1h$>^4SDnbSq>x2D{A=e#C8 zP-Auzzt*`gMMaO8WnS;RFy*K+f9gwX>)pPt*&>H0`!mRQIYsWyklx~EXyd+T+QJL| z!P$1VUQS@yw@4z6%gs)t>3LWms13M&1*@N_=$`0@_wCnQsB!(6-=($MV*erSE%&pQ zt<<=;w`P_5?kwp7)5}w)L&axP2|vRtwUbQVR$ z;oO5)#9I6Gy{8tu&Eb5fw$(cJE6)dS#fk}!KfjrC<(fw0_r4G3m|qBj#urTnW7fi9D?UBnV0@52 zQ>yQ+|F00K=>LCzUvF+W`ukkUE<}()CQ80&fe%^WO$t%xXpOyWoq`H7jap_~p7_Pl_O+CgEC(cjZV`QjZ z=pz@tN#T6fgnxfrg`Hmq@tvE$CADse|I4`<^_L8;FgEtBp49hK|Ge7kXBJztmU3)O zdoqvf?sR39`9cBVJp3l>{6<)<+Tm1sEht!4TZ zlo4OdX}!7OH;;mwv+vHS$=?jF`>?ANtk7JN61uu}$4UkMlbM-4VmesFPhOlcNfDzws(jun+%qtYxZ)T46ruE{l_DYaf>R zs$N@?6TkjRZ)a>L_=byzHR0+&yM} z_S~-C`(8`#zq|X-Ii8)ru=SjQ=&t2Ks|+^DyMMUkqJQ>lMGQxY;x0qQ#^Xx^u4~@8 z@Mq~wyCs1<{+!|mPHnFM&r7Y>XnU^wr{y(6o!mib;jl;QcheJmK(~YJS+S=C37=O?fi}rwg5L65N({*4lecv(nRSh966hc&*s7ee>jr zZgW4lyp49(<2qO@7ri^Ny2*{RhNXqScN1t^Eq{+q8^;H4#gNR(eDgUc!lxXN&O5#I z$S2O^oVO(&!uJZI3p4~(pZUKp%}?hynOWHw7k5F}rL$A7^wup);TF&pje9g$^ou^) z?CwdG3gl@&lis+X|d431Ic$3s?Z9My@)R7l?=Qf>wcJ1Oe(1=HQ z@igXDJ2YCjR_4ClRX&Y*mBm_-RXa3Zor~O^xO#^hXN^L2%nPlI>^9IXP)6U916OC+HyHz^y6{8;hnb+1Flf{2R1p>#~2V)H}iL zpn@=Y`S~khAM-YUs_m;RTXxyr_uws;oYfoG7M*qvZ`@<|AY3gix9{X*uLa9QXMHHW zE0~&j>D{dy-^Kio87ed+A57mQQkK2k(!9pi(58*)gLmYtx!^gFt|SXSnME#APl|4X zir+qF_l57`80$1!xEANVozv*NSfa1hS48XGaoOeIWqjFunme>pS4bW(F3y_3WVmxH z-wSWco5yd=vb5gR^zUZFmYd%WGxB6?0ff(I(KyB_W=YluH(^sE{b zE9*7d#5GkskDX147RI0n6^b_ z^VgH-0;jZGXtXZWyzg9E!xg9Sz(6wX*UB1qq5ItG7A~B7l5fnZd|eo6ZQa1!_3&3? zwf24X=KORubBDPf9L@&FFV<-JbuTGF9 z^nnxlsVk#kX*G1}?r6n|JD@dJu?zpPO-@{N6g7PufdDXkg)WmyMkqSxpOIzf`wbr-$jw`@-e;dzz0plON5+$C5veWM0 z(`-`JtxY=qwyU=G-Y)NAtyyY@){fn?PC53Lyt%XJZNRJ}Z|)f6g=L(Y{O|ov)!PeA zx*i_Av(P*8SORFd%ZH>sQSMn9r!8LI6urH0l4iz9kuB>dCEdP#vuT=-xnH|2tCsnm>U)P3RI+@}+PwnQOmOWEnIMl6svi)Sp zqoNOeC+k#i+U)j_JmzARAF@pU`o~L5*B;KYS(m)PQ$yA#!t&k6Bat(G9e9&UPDx%^ zBUA1UT2sapAISZuXJs1e|DTC@0#{Togq;leEHzhp!fB0$d8fYb>4`LB-pFRS%c=P5 zgdFE7)WFd^}X_|rW5zR+$y@n^r2*ygOPxjivC_4w~3 zwLY)TW!s}fqW+#p&Q41caN(>8Y2mMXBvX`ijn8@3hd{=@)}{AkEBA@S>`vq=HEmsb z>G2D2GyjeSkIVO3uJ{9@k9_1-gv;Lh@vpm$B|u3iA@pzWW9!9Vgk%g1YFlO-ebVCu z9m29~iCvl655>hoXV~PllB6rApO-qRw)0Wn=AsL&>lUe4i@xBO40U6>vh+gWSLxJ; zRt$~nHQKHlF`VOCSalziW%ezS;Ct%Ka_f|G&e;-&rnXOkFFTu7o;c-Yl(wxQLtwEx z!zWdlkcY>vtxEpMe!(+uS)I?*nccFR6TO0suP)x}#9FlC)rmEtZOShK8fB6hzAV*g z-kdDv^YDU#V|nvFuFt^_Y(PEW@|N_Jbhq@Cp6h15W#&>z*>P>roWEPI&W-$bqF}A` zQ_*?K+OIcSrhQAw7C9V!WQTrhfa%t?u^W9I7PH(lKIGr}ErCyVUhH8;fk2+)^Ypk5 z_6vM3yDPFXZI_iM?@iuw=Vn>j#y0vDng6`^o=xtZ?1r>u>Lrukvovhd^~(AFYpo=k z$_Iwj-N9|D4e?wDgU>|oPT=0|W@wYz^CxK9ulOv>`;0pr~bNvBY)4X6KgA)wxk`kKArR~q4|^UsiLPb*6+p4G#)JZ()A%YurO+O z8ut!2!~FFI+Bn%>L5Xy~!qd%}l=MPT3O{v^$=D_icyq;RdxD1({uc zX7rlBTl>b5@6E?Awj%j~)5I5V+$0;9EHS5u{lik7zjrowZ7awYIb3{rMdZSdF>ZF? zY%Y5AgAv<-TYeEA9|~%4m*d+EvTbqArgaa__(Y zudY1!YgwU#f~9+$a-Kh8 z>%FsQ$7l70ZXf!y!gfx*{r2ChJ`T(6^*tQd{SUg&oIE36ys*YeB#4*3-nt(3e#Kn3L5epnfome-92VjEBdSdw=%AInf`J1>6=P*`cfXc$?2t$H?6o?7qE86?qarm+BmUepB`K>=%a{CW;p? za4oaAwrA_d&7R&yJ^jY7G-JN&Ie&!eTrHN0bZ?c(hW3B$z^i@mx=bDNsF^}%?&E{Mr(RbKw z-|qSe>{GTLp1{&~*ln5F9maE~HgnFKYn+oIayYn?Vg4y$aD%_b)lla0{pQyUb|shJ z`z-r(BpXzlB)ZPz3Vmh%At&0!OjI?v`KU$YLhrCk*Uqif0Np7kc#iAq*FB||1vz)S zrW{_Q?X)l5^7!hT-xgT#9GiYRB!eeE_jxM&{l6ts&UP=GVfY~MSxIkW?Vic=efLbY zRQo+u#JKo^_eQY@PHq3ETeA;eShx71Mw`2Y((+F|J>XV`c2`(P{oiG2^)2!B|M%82 z)-Idzyi?-}e{;zv&~(<8+GR7?xiw4J81{?Y`l6ikb`E>DTj1BF+5czrP1yBn^NuQ( z5BVFL?X}N0nC_2Kj-{0iL&P51Nu)jE5OxcW5JnH@jm^n<)06is|C-r zd^hXO^Y%0@Z{zn}W&FR+d-*6<-SG2EJ<`tSURiC}cgLX5J95>t zKUuML$0T_Jd5+(Dcqsb+Nx!<}L#J%ZtmS^posdv4$4e>b#>Tl#OFYjUi~6qd_?*dc z-si`@n=`yl*j=|gH*(=`#l76lzblyT&j4*wdLOn)>1GOx%^dH@S9yD7ISkg0vrvxB7!^6&mkSDP*r|FNTb^541dmuht`5Gm|Y#*6GSTB~-St4Xk^;hsN#k08U@Q;uHuX0g8c+mTeEHUFVi1OM}1b5Djm z^La7jL3_`kOZHQJ-p{nPxoKzT6S{2jNx=teQoOEh*=k%W709!m{ZOQ5Nk%nj-3zD} z^oAi_b>FOz#Pgu5=tYlyh%?AsW@NnxRM`CJO8Q~Ie#&b}^;Ph7%KXI(7C(fPJs&3@ zTkU(oOys_N#4vH6mENIw(O5{kA>b% zzQek^=GdGyx1X$l$hb~vu!V645#zV`1;-fcxs4_WU^x_7@T z-=~e|&C33{oOKn8m~4$rv$V43Mf~XRnq-!EJ3#t|pX#R{$xgpF_}-uS;8x6JP(sZS z`pq!eJCg5C^lZMjRj8Q<5&ZnAX(&2GA#<2v}%t-9=H zoNI4V#ah+}Yi#yj2kq>raW&kN_+V1!TaIYZ<^t)qyWDMOPX+tQ8qfYFb>xMhz}Zv5 zGi{7zCmaaB!s)+WnVoh1sjf|sx|E0Co%P4k0Or?4x@$l?UPO<6n9(3xxz4LFe;Kn- ziH}Fy7V%aO)2(wOP10xjTvE@f-k}_M>eZgp>t^~^^$JxS-<-BZnOVESBJw^jc;pjZpd|PoFS7{+t2oyzj-&?CRdpU z0`0rbNVK#_6$%T<%-2Ylo%FZl!o`~{EbY_(FW=)cN#%N>Le3-?nZcec)JW@ZaoW#$miweayZt(%K4E4YcjU=CgwJEbfYRA}g3U^RLw zGEY|9U+~kJuD485M?a+Xtv&f{n{?{iRd1Q4j(&(M*suSzrlEDq*6e$U>onT*vn9H1}S*f9v-7|No5Z z1N)g?a83OcI8Wo}>gC)S=W_Qi%DA7sY`^A_qx+UJe4DW;_~hxR=i&Yi+RwKgU!zsh zt9&4Gp_cWbYv)dC_gX!i`fGZdf9tYqdrB`0#^(4YZL6DP$0fR2`DdQQgbm?Bn_nt4 zp5@{Vw#iH_5`}Yc$9AYf+%2yl|!YtA)R`{GPtt+&44#m6XbhtP6{d z%rZ-pxX=>bay)R~;f5!~EZEnPb#I*y zyIMN4>B>Nsij#V+tD?K2jiV=f|n{eT*k)NyV*2o!i>r6W?s;WE0do9@` zUz?wHysS5=!dv3|Qh`4liJ)d?g}1~`S5ukUfBCBqTGwh$Z2MK+s1LeHe(~eFIIg$% zijA&;i~Q0|8Fq^EEDgsG-J+3C_s3;Zl< zCz!@eS^jq?tbAm=p|~cW=Qt0uPzi@apC;q4ppLsK)v}u#O2r(S}QhKxr)aBYnc*~)qC+)1Bap^9z}d(o!w zoyCx&1X(JiC4Mfo(Y>)fds%me$YJYc=QRaZ+=)&AjSra3w6vP{Z0U;4#%XbJd>Rif zs_fOs`g<+s29uocrQqP)1AM-$nV{`m?QBmtSYxKBhRSSC2y$b^X*%do)_es?!V7#j4)6!7e?yC4(D_tR8mr*od>%xl5`{w-HyY}BowGYRe6ix+k zKh+k!cxvb0jS3=O95Hv6>g1l@Y|P3S_}nJ^e5IfMx@|oFc)j*(oHkL6U)d3M?(Kb{ zLmy9dZ|Z5A7rVK1*9`6WjAgnE`=>lre0?|J>EUyH(0WlJJ0&C?%~u)4*A_0 zS;8{A^BzbY{V+r7fPQPh+GV}a_5{m|C0+~DmmU@@V9IG*ERt$zk)0~!kj!$&x~aOI zV{PcR<0}Gr^d-xG1!)BKSI5il&SPWkO{&Pjv*0lB}-PXzs{Kl&hI;ZMD7y%+b-h~CN= zos>A^)UL;z+P|Lb)+aw&b9z=y6ld6?Z_yVPf3V7ux;@ph)T41m%-Oj!y{0UBJVUfS z=B#Pf1#g>@qpLqx{=PrM=jlz(2+XOx}I@(rK! z7pimeC>9y$b8}RJM$Gw*}_H|CE zzswPB{Cw-BjeQrF+!i={Y8Ue{p4T^?NAHZ)>~f4fHERiID*VH`hlfQ@ ztz47-^2XO+|4Q0dW|=fC=i4^j>HoQ3Jqv3so6FU9m|cHz*(*$Cwo1l@U`vmax3|8$ zuiZ=D{*t&Y#+pH^=I#1_+nH{xzenRuTR^~U=M}-qq|KD4FMt+`C5F9=Qpix{}S!_{mbKunKKwwGHPYE7foI>lQZK`>1V6%8n$gQ zC(4fOl`J!6FtmI*uT=ZXt5?bCX?gYy5_3zfcTTlfzc_oEPcx&)Vef-GA|uNW+)BNi zz;M*R^@H`L+TZ8dqq7t4m(1KZ^=r=0)us!k7T-3Hop*k@`U1(CnhjaYOtg8D-E$by zQt#GoDcYdzcA!?_N05@}r)^s=J*;_`lu&ew?Ud}?!v0ThcJRF|UR;^_Xx-UaphS?v z^s<)wbHm$H1{+@IFfB6|WH|G`-}G%yPS*Mf#QJ5T3< z@w1WxC8ly#H=f<8)REu&NN@8elc?+~|If}_&-Pz^@0m#&$3qo%O}*uCe?wZPuYT44 z{k^>@oh&!kRoI)R#LQ*kZMeC~lzrNoHSZnTzV3P%@6)qq%gJCh?N270A@dGps~JtW z?sLy~nUVH7ql2xotiEL$#la>r%n}7N&SvV^8Jt_#^F8aI5Y>lTZ^88Pn+P3{t zAzRVa*OE0RfjcGD{AafGEEl$&$EUsJTfyx+O>)92ujJ&k=RTg%*rc_i@!2x2e`{pC zC+*4V^_ZIAVkpy-?fWg1Hc zw41-UvP8p-bDv;F{g%&0j8VTkYkf z|5udwdIEWSoEI(^T4nNg#!+_esjX!dUQF$wK}K?)mtIIz5#LrRd3cqJp^a+K{~(S! zpB>vyM;;D7bV4$;UU!@5zkLSN*#cv^jy@RnYOtdOI7-=&-J=D`{4)X1(WBzSbB0pdy&rfh?y^glpOza1*`~N5HEhp z&3fuj&R>#!bL}qj9&0iEv;J6TzS^1#0vFqJ4zq|GakaNCZ24_{pozWqhbJ%ZOMc(R zbN7v%gZPauzICq-3p0+}%9di|(fO;q`ILq3EpBa*`wM@lwlTiX&po`3J?%~ntC{u} zQSt3*q2jTguims3ZZ=|1JM7D5a>Mu7+^gPlT&VK($NH%GHU#L2XrG;0y79 z7~`#TIlis&*}O4}O~rD1ZG)xm>hC5Zzm8-_Z(neH%Nn_ee@EF~crV~IdcXI}YoR&C z=U<51S0xso4suG*DRW-<(eCHE535XPO)Z|Cy!o^VgLT7ZqxjjW=_b~lNfoUpQ#2Z* zZr@w?qDwun=K72Kr?+iYID7iN$EIHX)VnHiTiZ4l?b_*Lcn7p&AfwJNF}Yo_^hZ~c zh1s@+Ycz7zonIBav2?XPu<(rUhBrNWAy=4nu2@MOh@6>!bCYr00+-SqNyb$*XCu=D z?WfFZ%T7EvPjXdi_%uWIM^!VK>>^+6`KQ$>dPDbBwvbWRb)9_`8!l)Z>t)qR_6z;K z`5U+Kss7fmwf;?3QAba3@wQ&fJ-e#ZdUe&{_0H$KB+#>ldtx;7saigYLXZ&Z+jz->+b3(ZI(|j<7$mBg0sOI4>QgSE0!6h znQNO%M%m95JzAjCB^JZ>VV7^bkDK9|+~p3H`|-V6TGp+U`JFDCI{O8U5?imy z~eFT3;V8p|)c};Lb;3JWGG=X+6ylmmjlk2II6@D`oyRCS|O@{pG03^RyW@sZFK1 z8n0aqyQXaw=)M*blmB!6!vHfSSDo9p*UEgiNxZqzsY#>Fy1gLmoyFF z^-%Xm_zs>2JI~aZNP5*7-JB-rP&TU6Y^G`|&Zya_pb<{mC*j zrvizdtyLNi@3B8+y;x!tmhqq4oz+CU@z}||GXoc@t~$*9jzfFiyU4q@PEKIk^I+ML zw%LbHYNHQc6Zc4yj@g6N3Iz*~B+`ZYR}EUv9zSg~tuYWDOm?o+~5Tg6r|r?&FF z?F+uWQmJ_bpZ*EGB)2VRR+Y}-?l`Hd;;?y=$I0l;i%x34aAB{R7VGhatJL`A?79EK93I0T-yFUP2J^C>m_DISZ`azX*IVNn&Yj=+LH&=>*0ztP z;xB}a8_K;h&Ur1`CBOU7YS3n$xBC`J^!cZ0d_JRNEg97Qc=E=8W5pZ99z}D%`qdx$ zar&=l;|Kn{wkyIVUKBk_+fa0&_N3B;{@jnVJI|dps64e~rS;`mr=En=EPi|H_MKU! z=~7odc-&9)J+QmzQ0$G{FQxPXd5*i=Og((GSGMiS!yi4mQ>vEuAK&SIE-h8*dwaU# z!W(y-eE7xc#kX$yvHvm$t4`A4W|^+@iPIwjN?n^I=6=$)eDvr09%p%*T?T2nhnc1s zs)yfcTiD~z#H@S9x{_7)%C>XP99QeE#pe9FC`zBaNeF*t(+UVaBF+BgWcW!e6<;~Ge1o^*_9$J z&pm_Z=-0@zr+nMW=JvT5+Du_62-7$rz4UF0hwQ#Z5^~IklJm_Me~SX;r1-$+XGH%0 zasI#1^zo~U{!(hwZEws!bgBQ?EYo>Yi+1ZP$lds7X&-$%XLWu?-OzQy>=?k^2N1BRy+-Vzcye(`)6t6^`}>}7+SS)yzq|n zJ8LwV5mYHuG@ZILRd}E2WX95xrb9D6KHaz>h9h_C1|O!jovLOG@mv%Cp3{)7-k2m2 z!_N}WHL+-gw6>&=`+5bp)9dd>M;2WVGn&&E=O}yE;FY)HmlyW8eA9oNw03dz;#0NX|6KE7yK*s7RdXIt=Tzc!Nx0d~@{#XnguPfe}oHIB7WU9otz zQ@N^I{;Wg`=2*dA*=;NREiSK-DtNQe*Y@Sgo>R#;C1b-DRZX-#;vT!$FXW(o>IVOq z?@sG|i_i9?FTL|lli4!dWwVjJAMfTRU29kjcd01EA3Ajr6g7IBCoZT-mzf`4wZi@O z22ZoEX|tE(#HV`teE^H+?3d!)D?Zo%%emZ}7rWo_<$*r;u71%!`l({S zH)gr9%(-3fYG`x9$!bcZnJ=guU~ivzc>1%oca~@0Vh#0RJo-VyUME>dp)EbiP| z&gb*pclJG8QUCAz%@mDdV;1)u*`ro?UwNjP7bPMvb;`amI6}K4zbM`*u}fX!w<%eCwV3=GNF9 z)>>{5^rZboNZ95mg9WRW892->D4*ISYB#0&gUQvco zlv_vtYv@3Im+ zZwZZG+-E5A*Q>TatZD?N%^o87fxM;=U$2Stsx=c9`?fzqF zPV80CRaN^I?x<)DeEKZ2>&m>sTu=X!*+Ti7KThMycz)-b=lPN)36o>Gd|t1MH7b@} zAQ88~$nWWmM_bC4O;+rBI3p!^=kuuRpkr0eZ1Q+(#4ty6mPFo^t;Lso7E9b?%H!6) zvNRtwl+C$^_0F_;x7>H^e78^9W1n%N>ZRS!Cv)zrSUBnByx`976CNHcWsqMcn|o+m zguyf;ex_^AKbcA?R{9&RZYi5zqJjwzWD34&v51`ndzXpvV%_3UwoQyAVn)% zb=jJ|@h8pI%2fMK?w+cWv1G}d9}g${OgHA-yH)kJhiTWtr^Zt3*T2vHa&u9S^Xx}I zQx?Q0d6+JrFRI16(YE3A{hQ@7dpt5Le3oz0IWy;LUGY96!`DSV_tq_WXn0g^;ya^# zeJeL_ON&Z3dir}-{6}W~)@SV^^WV;CS{Ep8bNSlKYnD^5w#Hgp2WCt;knL3QRQu(g z+u%*6*-RA;olYWMn_Ir*g!^6t?XGNkR-HC`_Jf!EFO8(-?~z2Nox?^kfgX~=$=*X>kz zY?l1n5)bBefjs1m19`x#uf5(<(g%$Zdz6@3*1zEJmT@Ko%4Quo9w_Y zQWx~nRyIl2{_nwnKK=HNqG=>iv+iz9={rIM7?F6Z#1va0* z+O>SPt^}=^eLQph`ZA9_-uY@0vF#Pn5A ziIAuImyl}~8u__k$J`HOYPT|<8X5{-U16SHc-=g%yPH*fy5E=d)bhvMzjc(Id%J(J zL|^*9J^T-yz=IPX&rA-|K9t?spYV2$@%liX<1Ip|((bXlv(Ej=6neF!S|RUrz&7oM z^yey5+zj`y_UvJ`-CI$%9OTar^OO&?FABJ}?&d`2#d;OS#!EDATYv_V+4jto+%!`~ zto1=C-#qZz7f&BA;}71QB6l~>o_u)LkvA-xyEJagyxnQqJ~tsG^BI#S*T(3YGVd}F z`=-Wap#$xppv zOj{}eP=bpN#slICC>^bksC!OW_Cv?x(?|b-*1N&OunnZ#Y zIV@z3{JuT<=BioAVrR-`K?CV_nwLT zPiJYQbbSM@)w>_avVO{=_AKe`o1WF5_iHaX$f#N{_iAut?af;=C#c1wn`&CEc8#!n zGkfNmYYJ-18xr|b=USaVlVaL%<4<_a*3bLgV(c>$;`%tAIY)ktj0?J`VzZQC*V*$z z=EXD8JsU;loRTVg7Of>`eV(c7;e@8($iEl2Zr0?`XxlEVEPv`0=k;^T6c)UjyF1S} z`?x*0!0~*;X7dd>o@q^ORRUaZCXPNP}gx~q37@%}tAv-K5 zHbg=3d&7%!({CU7?tgxb)$P5_61=f_!A4W3x^M1tmRi74_sB7^RVzEIziiuS#;%7K zobpq*%3eQr$B?1)pz_kl(1O5q#^u-Ct<^u9c0F9E-oXF#)v-;7!J}q-PiQV<-2b%y-PYiMdaZG zyN1M?nB(GNWs-fzcc+%j{nN=c!SCP73r7xL_smbcyJR1mq16(OjIe7PH>F8jFqYZ% zJS0rMZX0t&!@rqlbWEnoKD}`h#G2x>b1qly4rQBLmYV~NrW#y)QOGoBs_D-iW!vhr zL=Gp4c@^74LMFS~B44nr?RYci@t#uIJlP8Y>+Ti(u6MoX*pv68cUE51ys3Qd7kKvv zvYFGNe7+n)t6LZDPT8MVeUO>EbMW5Iro&-7Vs(z>#m10 z%7QJoz0U*Zq9doToR>N<`^q8EG@hqzZ<575y-&99mjBL)*q!E`Z??VLsW;~E@=c4^ z%q`x1L8H-mwqE)3IkOYq8Z6;#kBjoj@(0}@_;%^hlnleYTkf3AUASiMyK|pUy^MTWp!SQU=%}#9-TZs9HrkUd zSfz6fCF9?T#3&@EO6MB>jC--0#bNWNdc*8zPj@=<1K1ueZ zn(4!`jhmj?=I2_O{Cr^T_2BM-hiNZvzMP=8NBNIVMTo40S?l-v52S^|E@@BykcH|#~D8#ozLxveR99s=nKjW*B z>ihJ@w&S;EuH+8nIsWLvyPRJ4ifxb(A5ty^*7xMi`tepa9T|KC5ApM2>`|IIm5Y5AsYO|wtExBvI? z`20V=KX~o^`{(nIpVL3zTl?ipmdLZOaT}QUfAL}86X&=jyx(<-o2F1vovcY|-1)uVKKj`2xMx!&-9K~NL;Y_ai5g3{eC#eb z_OYgI-8^Z=r@afOgl9~gnJ#(0vLb*(xA(bM^iT12%O=gmSuy8#wtT$v*m7R8z`E!A zk2%e*_@MvdP0L(|XxlGFC3VV|6s#6;RQ^#?`N!(I!}hY3(^T_iMPc`B7ESxJWX?-> z+wUvpMSD1%ZEd|#_wD$cE6JAM=ZkCECjP1C+|yN27FXW4X?tLt#d>Equb=jJuTD}4 z?_v60+-2A3{QrEVjG-a-?|-)$jV1<^R)?o>&STN=QK14@zmnF4>P2{YGyB7BzyDxPWIiN@?ljLM&ZZ0g3ikE-k-ty|NA4kWIpFt^Af`^ ztzeZ)RSwmByF70BZ~Y7Ar%LtDlpmS%FZ;qao-k#uy#nOS-M!mhZ~vBEaOXe4=SttBEB~rY@mxqTK45LiOOa}2`|M}ODyH-J^e{KOM?UP^z@uno}Kp zt@cx%?1Sm4p)&AW2yg?(3A&Rh$Mv@LMgpCQ)$eA1OI`X-uv zQ-!=PYj;Ik#$9n!a;p}5W8%ahd8YCc_gvYq(`lvC*Jg;yhUW6cR-0H^Y_N_BO8e)z zwsz6Rh}P&shtejW$(nrP-8l#oIff`G$b?)K8*E+VVEBtXxnf zuuPLvc-z|>1s;|w1npMjF;wRM(rvmXu*B~icdu&MOvh}Q-x<9P0g)M3V*j^he93tK z>BbeQE}bQpkGO4#uFXBs+Z>SpB6&Oe-i7J${r4_>k99iatDCWH#Z@2Qj@WBg@G3i?PjCb;J%gj@*axlwH zG%MwDuXC`u^!1kuUn&PvnpKBP%DzITqWz)Y&Y$o+@$*`_ibmhcDb=BG@3VijJ*A@Y zS>9uP$J*wd_8t>sw?F^A$l;W-ko~?q>sv-TW!*h5JyOo-^3+$mh`)ULc46kWH)VEf zc22$gIn{UL=U45fM|G}9q?~Dfm9Y_=Aem4TKHbq-TZ z7wTee@JvR-b0NFeot}A%DaEB|SzYP#(=*e(}X;nNnuVU9xb=k6#; zM)j`|73eS7Yd7(*-LJowC*BijZK zb+HNu#|Le<%ul41c+|9cBzr|CPF}z$npD=4eQ4pgZ#o+P?wzz~-G6AoZc)z==2ND( z81Ma#-ud%J)$9UC{ib3s7Juh|zjWH{E@Y&4JC`Zyuj+WE;6v_%P%?AoHea*FIx~FcKgzi>9HHCOWBz=Uv6}F5W45}$1Lf_ zew)Iz6UD2J%5J{gdG}kwg?~3{f7r8!RZyI*H58~8A(%(*2t;ICWi++&N} z=iWPVhxKXas#_KNqrb%}Hoa2cY!SNa&Amroe?NPwS@AGj>jty>)ikk$)odT-%3S7m zn=ktyamMDS$IPplJ>SbsQ|dlRI{Ur48sDkoQu*J1a#iH(#idWRGkNko0Id&2e?>IMva-{;g3f^!!A><9_;$!Dygg)wEL}g)B3kc7D^NLbgkL)ztv;9%{RS%UO^s~=@G6UlDGf5 zRcj|Fa4?O3NpR?fxwZZ4S2vkj|LjWezQ&j3vU%n@jkd!+uOl0`Pj7C4yIFXsAT?TyU;+z#iDYJZkp z$Z>6VSnZja9D1(vw+6CEA9~1n^5@H?N)h2}yBfI!W4i3EVguZcD95h%Kcc!`sh8=Z z;LgYLg?f+f2Sxpp+{yVdzt+8pLr>{vtm93I>%}=j$yW;(m(41_!&1GmQ)c2hxi1Pk zXJ4_tKVh@los*hbYc?8ougy4nzxecsX!Sph{xtDdWV ze|17@4)GMNS#o^$jt3dl?+?75)DtTAZ2taNC(d_miSAI~-+#34M9wBdb@N8G!x>Y3 zuL-{K{v-Z!)n*eWQOC@V4HKq?Sbv{l#iC;o`)x)+{4(FgndT>RD|qbuYmY8ym@8Uq zyL?UmYeUnx`b8gtu#kMk?w-$E?+;-18 zp%l5VobQRY_N8@!)f_=HJhEdpMxS!8Ug62K@Y{v{0Or}>1gZ;EW_;r?+j`t_g{_Ix zr-vQ+A?Gx+`q%NFs9EZKS^Z3|Ia&P9pRUSX%=@}^p)H@&+l8)qkF)q~f8_*Lb4)6q zz&C4+;F8uGe?M%jK67=x=H@{{Nl88)azFzW1Wx8j}+qC2m^UD+ZZdq;X+PwA5 zTHR&d%a_X5-OpTdQ|tAO6Jfody*{7r+G2Er@yEY6B@rb7ubjQ#9KLcMQ;>F#Vn(TszzRQYyg}H*NcOoxA-j1Q-w5Hg)fxZxDay^oF~q^XkHHoc_W2uk5?@zgp`qCw6Ara6KhzuNTlb>pNWk)KU#njiUgBT#l5c;y z{e`&GVm@B6zwCOx7xMi$p{*9OZ|bxM+uqi1Ddgibo3QK1LFM0zHd#O3s(4{rI)`Jc z*lh=oe_n0dMN6%DUz$K}tX5yL)ykrxV!g--sXS zW4@hv*ukK`BjWq9zO6a#il=X~_F1g8o8k3l#Fwfps3j+j>5(b8z3re51yO|E&7I1e)WQP1~~W5#mVxc-|uYpMLGa%Lm1x0`II* z2n;#)np^4KieGDg8Fha9@Y`RkqwL<+s^8O>_PZbR{?nJ8@+r2((Y<6(1@juKxIL|} zj#bw#eE9U8=a$#Eb+~fYo4(%M@Zry@hpPXCA1d~juk<{U?e-?)lBDwy_3o}87K}=E z`yOi9&1vWom%knQR_gO5=G%QySy2Z+W_lhyJ-czsf=5q7U;l7AdU|*H6WvI@Gg*F) zM>iiewF3 z>puPeclor-?vgY<@1$pOO9Y;!rq$&>n^h>?yC!2of!o<6#_3$f+;cWtn{vl!7%oox z>-N_1T-S4+qH{M+{EX_E^Yu(+^zJH#t;wmY;)3{#L}Px5<`(JBQs1~af^FYJ?WmLL z1v%MC&*M_+79^w}WMNczQ?qe%@iqzZ*9+(VOMA#|^J5FUwDs(xzaRaRv-#DnZfo5$ zSJc_gi~r(kbFVi#)9jj~Sa*rNdM5n!S8Sfx>6cT&dTuL!W$;`yYe%GxY^UCxHHxLS zVd;m?oxQ1aXN?3`;EqWDH@bzJ>q_T6c=mc~;pU3HokHgKJ6ylTH(!lfH)Fn7!R9Hq zzG#N*jMUk(s<>ERX-3tC^$+6S>8P#K*|K(b(tEK#XI5KwO!*P1v-jJB^n;7PD!l0F zUAX?JoP&Rcu0~WrZs)?Ioy|dFePQa)Qxo>O$#*V3dg)eWn1w&5`)lVVfBvWDW}SJE zaZq~k=}Q`)ydTYu`y(v#phu?f|G@;_pl>_w?Vo0+X}D#brm^9cr~@|-U3kU)Wud{A zs-Ry>Ur47f&fNR&gZfq*k2Sf{YEF;1_q6w z@^_ZSFMso1_)>Z(BWms&5tTKG;fl{p)_z~3y!Ju+OXG|v`98lznYB^5PHvZ@oRV35 zwckyjlH0y<`QJ>0T^e`s`fJhx%)qUYV;JmsBHUG+U|?TLr%N5 zVsVEw_H0=2;mMiJN=3h1Pq>K4MJwcP$&v{3Dm}jamIXuUak0wXdzgZ*@;%5DYVF#T z{pZMpRZ(ScGt%7evi2SF7P~TYj@R#ev6XvzmVOd)d%E(eSX|R$`+}gjzEzVyJen6( zTJ-j*>BS9+Z)&^SKF(VC>WOB4@6F5NQJIcM*F0h`V7hoRRh=^=_$KGQ?XP6qF2*)r zo8yonyw7!%c2wJQ(m&}zLIV=L)6vpl&k;)hu^j@uIIa+?YO}iHebRs(0#+3cej#emfzhId{T2? z$?L|$%@H3{v@D-8npGuiG?DnqvQ0MImfP%@+SEC-SUZF&ue{ER_wYO0E!=CB>~St7 z@T8==L(wtwn4&h}33DDPtDe-{J|jHgR-f7J&5HyK4ppq`boTJ8d^1&LdB}xh2VACc z{E+UN%v-xfU(;`+jy6N+9HEQ7)h04CyMjd3?|+>mxcm=uw`f=1q`pk<7E@O9rakMP zS(AYh9j6c*r+35d-Yr<Gb*n1Y zwdd_J=RSDTv-Ictf>Szwmb?sI=A~WA=v0(jo~4sK!}d%!+cC>+3w^|yIqvAatbbVH zuWtC$##&T{3+^PV4Sz8hY= z+?DiL^xA=?$BusE65akyly`FT+yf`slfLJF*q!@3%l=#5L*=XN_iy;{Fs0wee8>th4|2FJ*ff&b90CmVMh_ zGe7^tQsC`guxIkM)(?EyOI4eUxqeyZde3}jdoGFf=|)iQFSi7hT<@e`@TS+h@j^yoHn7P12#~^OoV!u@6fxw(%Z4t}U7SDdKaV$$N{#zpG^HH=nSW z{4taNn8jkT>wUkgA*Iy;59JwqvSp8M{;}c4hUA6)FI|-QOWyG;_K$eik(__;RZUpL z#$TM1tOQMNZ%DW}(d|&gd2wUk2NGG6T$f8(Cf>gMB1HMd?YPgfo0qRtn{z1S@D3%1 z8Cml>pUq7Rs{FI%hsj~J)Bk6r?YPiW=Cjct=lB9Hsbj_K^*!aby_x)M?*GfNdXby% zCv`R&?5dLsbZX$ZZBM17QH^t&F1ljo(1xP z)wVj>FVZKSZF^RAdUtxev**-&cL}Pxo!!#6Ou7ul{>$*~_5Z`(7uwjuFGwEv z)Sb^Sy5UxE=I?3GQ#Q@zY%en|x7t1PH{<)XJeD_U0`Z;iT+0iNsh1k>xbj&pu(mD! zp~Adq^XBAQpS4?NA3PW=ymfZt-#M$(%oe|2lm8)tG1(4&`9Vb zTKDTa*aat6|B3D`_;O-&C1%~2ELo5B+7Yb}!*mQOZnJ6^eH8N2+Av{SxOr<_YVXUuj)$7#&l7UzzUP z6yVR+Xjc$@Nm5*$W zdep%?!~US)Nj3KveoH3pF9$ek7VR})Qruu4(BsgN&7zVZti0h-|GTPhU!@GI_RygtR&#&D^Qp}Q=swf`2?0Z;c6Tk{r&5?AAG74Q9QCvUAV=f>iZ8a`J=w-_JcZRBa>;JoI=al^6NkY(G6_P5HnG7bt@9NcW={9wv&o;HVf0R>YO z6Z(4u9?i%}=@j_zMUbO$^&C}!N6}VVPB{nrEaNq+o-p>zUiAFpNpr@dd8QZQm;}%N zF-w|1Wr_QQHS9L1T;Dw*3*2F0jH+_jS*(`E9J@Asvk&knJd3I{a<@?qi`E+D` zS;FkIy1}8_zHJd)*|m0>b#h`H=dYH>DTTLgPvQCY zPN&+oGqrl6Xmz3Nu?0$%7S1!OS1v2)+f*Q9w$C9_=ivt}<^-{CTaIn|#cQW_U`_4k z8kw}sxdzg5&5^Oi8-g$9hb)_Pc#Yf3xy^Gpa?&+7XuX-0DE8atPYdsa+WC{kG(P#{ zwjI>5>E+;<(VBa<>0r(czRfq2U#wakbf@m4$J~mW%lG9pM}7@i@B91nrt0e3$$Qfz z&aA5Kk!IYyAv`V8V#Acl8h-B|UUOVkHOutG)pPqdPya0VS#!N;*y{NSkrm&zNHd*z zHFwhu#Ju zo>IE(GcQ*C;mXIaRL*>C;W~8B|Jup8Cld3fx_NBg@awAQjpX#XEyuIAy;OMwsU{nizm_v^xvsV0Vx{+&%;)DgLKzf6$m&nO?YuVUvtjaE+nw!>)U!8a2;dB44x zaB@fbWY4>G+%vB{j(mHo?2vzCX3G-x_e;X9Ke}ZZ%)Bx^z)9_@o#N!1W;4&ook&@e zU?h2efsdPj+GME|rm*ULk!q!j`wC?)HfMZ&5az43(mi^;*Q=Y`13b58t3}dpC`HeE$3no0M>X@P}V{|>$}&6yn#DPPkv+p6A6@PYUnUyd`I#jXUE9#~U0C-$;l z&WgQf3(j9_daHfHkZ1Gv1ocpfOP^;fKD$(LYVz}Ip=~L`sqwed&is?w@bgk_V~uG2 zzhB3{9el@s@lW==dy)LJj(Xmiapy*1$FqG_-a)lF@?W=Hx4S#<`&Tq{XznA`#BU3t)fAi~I zSqIDaoZ9POecd>;ywaujThu(Q^!;30YrgLB{{DOF3YPDO0>$g^PX4%^`~LdBoPTno zxr)>p)aG7@+CHo9<(%{zj#~e_V#_|PpHXVW-&0?0(tm3IhLuvM_McSyAIJZ5d$qai zzoY8*opq`wK5uyLyfnN0t@gvPH^+V+iT`Nh;vl_oX_#7_Saq3o%A@rayLbbBiEb7= zIkj$m?Mw5@6T2d&WPR^u|1$e+aJ<<|@p&&#Y_!+ky?uM`mulN3@i7}0HXPC~vpc7L zaeal3xr*EsE`QZgbz?ST-p2mQb${K>_f=}!CHbCf;Crlct@fW;qE6K=-xq6m zqZGcX-`tIT!cs_w6XFXV;i!h1|A{+`3%gzz(HeM~<~iPnj-{@!Zp-KR4LJeATU_@HDk~ zoio;^Up!`>#eK2OH!}R9pPB3LDvetaMdt)^T^=YU?(Ehm=e;;Lc=ErlO*d-S>D+## z`KPT{qCWU&ZlmJCw`*=alHA&!Az>18>qm$&Am zgHp_y&KP3-5~w_j%7KXgcH{`u79SAOoP`}nR^15O`K&lL zH|<65_qrF)_uSlXd#{xBdS%tw=jr(q&6Ll4jJda`UhqlfwKc|V@8Xy2QBKh^bgp&3 zeQp2uxa~&sE*m=De>`u##fR?+w*Nlwj5x>luJ*U>{i50DYu7wapT~2&xbho6)0*{j zc%LMT)aYINbH^g=+l{^1bq?>Yp3?DrR-Ac0Z|jZXhet)9+}^&q^>5AdQr)lH{Dt4` z+-(-OteA7j<5f1t^5T~jZ@8>@X4m5%wrcB-6^cf0dE+0yp21M7Y46I%J9};{a*T?e zZE;L*{ZIYh%huNZ{(Wz@_3!G|J;%!aRloaSepLJEHtro8!`|v?dFS6xo-*O{tUI<} zc4S>w4E&aA_Dx|;`jJC&-4-V%U%IH)x9RJQ(^|%_cCCKy7sVb~e|^XIU3K=~B4-BK ztc$Gp^M2)ng(3lmeUk(H1guiq4sD(wGSN8w(k;b_llQMJwsL%; zFzL>>w<<*j{{6j*oib|{JbKGAu~}&2ZHY-I92aH$JLmZ1LH*(1Tu#gH#UCuRP$}AA z`KFZV#DTJ$bu1H`XO!PwGx@|p*?GC!Jf55h$=U3u#Qrq&^)r@4$Qz_E=w(Yy93m;dA^fLw{0nc`A$0ujL zy)`uu)f!*b57Um zE8pZh=j==Bn8KT~;Lqo&K0{Dz;r@|l3^%Af=A^cBI`b35Vd$fp3(FC;|(e4W;zl(SBx4ZCl%}vVpQDU#$aocC& z3CEcId)F%zO%SP3oqS@YhDeT?=aVm|)omJj8h2ezo7{4)c}{}9umf9C)A}SKOXC~2 zZ%jDh=vR?r=lMiIJ!H1OkmU)^yT@j@_#F86n)r!{8_gP-zArgKb00X zABoqE?>KRC#iJZOk0%P6KUVrErB7RY&riVe>#2S7JfA3N|EN-%*u3V!>zOWmo0`_A z3t4%5UK<&&QdA%xB_uZSb4>ZSvZfP`VHzMkC%DdDQ|z4cE4aJsM5g`L6&*4xU7)mQ zT$dFnX!Z8rN>|q>Pv%F3xSab8QsTJm!|o;*zn>ssg+wXv_(zu7#LqEufy^f=48_cvREoH?w0{=~S$c@pnN2>CdHqG1 z+=LU3>pt9Z7CP7LG5_s4fr-s2fxb5#+>Ql^1UH>Rj?=jf3UZLoi|5i;W_MQ8pPYFzH-jkrdxkKg&>-->)mZRW+K9pVTsKj1* zFx0O|q5JJFe)}e=3JO|sh~5QdyO4*kXS(pp5ww7;e=y`gqgTXk$EQHU*>Z75{T>SS>|T>j8I|^|&0bFIH}{DZdpub(e^#)IpId9@ zeOIODNB_Us?eRpxvSOR!#NfchDr?6lTTZvDH}uqro)=OnnjlkCV8-#-byNPdY?miX zvTxiHocQ@c{b5jK>*kbqo^agu;_4iQBCWPV_tiUO?sRYeF6!dv&iksCbz*Z);GXpg zB>{{*W#@K+p8rEqq41 zr~Z1&2PRHJzwj|LK51QBaQ%6Px%sp>MXO;s3618RwMu_5W)B|2)6{PhZOS zwrzpz3(BnLDio#NnHjI9&N0`<|Hm}Gb{D>D#o0egnoc;Hy?_7noJxt@k_i*fe^;E? z9Q<|P`F$Qw68@@Wr!h;)uCAQd8q{>b@!C&GM`X6IbKwx-TP>EQ#rqxb#XQ>-mM=KbC`xuw}7XwBT_mdW9E z_A(O-CV1xk{?^>m{PpJz2{{#+lu3`?cC-YCyMg4Sj8^R5>|t@^{o&t2H~GXewoR>{ zR8YWj<26T1W5}f#LC)uqoPP^k4pmOPkh_gfh%d-?*Qh{MXpZuPjCYrqi$sk6R+&t1 zc1lwayLCSB#DU2fdhDsjpZ8Tw+}PyAHgAb%Ns|-XvXoO1j*7t_=D!IGI1%zAw6iGS z#DS?Mmi3N`&D%Yef96tAyQV3~(`Ec~-+DoH85SYV)j3TvtvvruKQe7{T9z>Nk#dvM zvN+dur&dhJ49~T?7I>m0M8oR&;t7r2o{wsqoYD?0e?6yv)66Lkl2Ys(6({TOENgOj z)W|<|DtjxBjH}=iQI7-u9&+xjJbzlwJr(sRIpR1;Nh9Tfno9TLO*47S6(eOtjX1A% zp0UtK`Sg|N=E?;VDg)-eh;UbAUcO+ajEK=&saYo-6^-@oeo&q;Bm9yL->EdYA1pJ^ z2zne)%MfF4_1U*7tuWxk0d<>A^BonL=U+&%Z+2p{OZ4bzc3P$^GHHpUV)OJ5*DU2* zd1{;{bFifvvzA_*(#yd$vn9iWr`d@uZc&E4yJGYGBPU&2dG@qC1BH+`kL+uWlz@wO zKq0$;sWN4MlM`FsqEmIOsm29=eE+zHoOqI*VaDFdGpFg^DMv--)dpMUFP@OO;@K7@ zTQ128*0awSOlS83)_`6QeG_= z>*bQH=vtX9+v?+_Ax8osF}Csx7%@{#}j3ytmIaQXWXiy?w4RyK(jU zNv8u9CkIrDCH6V7ty^?D0^~Tw??oXeLaxjM1)zzG^EYjclm}WWwS5jrHLtF&m@qT^ z^rqL2H+k07Pw!UON)bv@{L9kH^QS4TIN-zq{S$j-M2+579Z7X*<@w_@S(X;7y*IzXH<*MU6gi7a6;^^8CB33s#_&4GwvwYC#dB58R+|yDZ2XSsieK=ZYlA z83%$zKn`B{LBwkQf(a+Xh17*ajSNJck8yEH?%)C?mX#fCM+`s?{ldo2CAp(Z=eL}Q z5p(H`Z^cv29@v~-cs5Xx`S^mLG9pI&ue>|`15O+;1{s<1Kyuc%Vo+qw|0&aYX2&~~ zYAFz}%9=gZ_`{nI|0i;CNzQ1~1UXEywC#;+z=;E<5RFntBHdek{)Q|KRAkOJ1O>U| z{8c7e=l(F?`g3Jz;7wcJ9o=fStgSqEj!ux}=9*daRb?|Dm*k&spzOk2zHoa*z=;E~ zK9(yT6`7wa=-FzeJdm07CM&>WFmwokY$Dr)pW zY%yoCh!O9?3qNIAdF~yJK5oS|vr#JKxD}UVMfa*?*;L~d3~Bw#t_O29X5&C)R6O&8p znPx8U-IiQ4i>@je^Ks3rGOc7>ye@KFM%0M;zh_R9Q(D~47jybI zNmf+-=sUpz%G9$06`9v7d@l?+A@WD97*t@iYW|iKG5RZ%EWjdEz~x$P$tC%Nm;3`xsD#Wn0u@iwCm6^#vdn>$c%C)8EV*Wu*?NMCr3lW# z(}9I*4_Q*W!wti)9oTc~-zk|l_W9eBH@ta#egC`o|Nmyc=UUbN?Me8?_d@4(=W0zl zE7!BXuVMFT8J=1Fm0qV!b{k(@x9wckyre(B_S#95t#&vmTwiG25cl@0(Sp5xKl5&j zU#`{Syd!$E=G?2qHD$i{_8I!uFfLthXUJW=K7)Vt@|+>#qmGK*xbBqZzk2T*EAef&_ifnvW%`YUmDM*6S|=Oq zG2_-&D*uu@Y4aZ6=oWUT?XREr|95!xPwUZaqhq(6_B0-~J{z#c_N}awwW7qelYf64 zO4EOH&FHe)zaH0$nD+gC8Q*V^IW{wd|N1({I<$-@IOb()H49r#|TWa0>IDg4s`r`R{uhutxxSyLUI`vK4eKy^Bf418$Hp}Ir+m}r|)mP z{riPipWr-x^p@PNJ^WLIt-oaS&o$2ecTJh;!R+8J?bSb?e7n`S`>(+LqsM*D@_+Ob zJU3gjrIfdubu!P}Yv0-TzNt=n9&x_Tskkrq&H?M=D-`C;_;)@~qTt&}t!>}gap%vWoJ{wk z&v(t&i~3Knt94cW{k+cABu4W5zXO{Xoc8Ut-~ano=qi)%z8;JRT{hG=8GUD-`fYQ5 z__pWaC;$C^apvT0IWOzFo1a%k8eE7omtDN=w%l{kaG@USTmG8q>1&Q3IbIm1{%+^{ z+grCSc|Tf9Q}d3l4~khmZKuIOjYZ!=Z@sO$*A?G%_8aT{hyU05 zoK}5(a-I8^NpIX7s;6$sc>e6|&nJIvL?X7cFwY5_vip8UTE}dY>dGGngK{3G3ihj> zk80s{n%?p4_t@GSVk6XfDtDFLGdi%S=SZAv#qaOC{)JzNV@l6HBKM&s;%18T z4-VGlcb`A`&ZO1;u-NM@=i9!9rGHtc?s5+Qko&8?OSb)n+^xJiA>W<0QEPv=+~3x! zux)t_L;8kq?A3dAx!m%3pYUv3^X#&mOOKCyx|%V4OR}NOtXkLGxAz|o_FPnXKcD}` zyes#4zv#EkU7TiqLBF{_U%iRNrzPD*GaTzyIr< z%&-5JPZtPS^Dc01KwTGyVu+mKLbZu0SM3AJoRyp+<(FT0GDAgkv&yMA=ezHIDevak zV&ijjLq=WnpVg~{-$btWJD|Lzs+39Y;4HUo?oyfV3l}J!3D@AcbRu#8(M9$~5C5&d zdn5ipXw%aC0M5hDMPC0XxahhyY3JcD`WX|y_e(hzynLL+!r8Ja@;XP;@tI$*tSr-r zQEhs_^sq+HRYs+0y+vSV`y)wn`$sHcH34Otb}Sa$#-YCWgWZ+I0&G&hx`YxPq}X~J zg2VSpIU1OxUf@VtnHe`x!D6~p)Wj#@pESG9dM){XCR~N#xqwt_xYC{dfA8;H?{wj9 zc?d^=gZko{bpg!|2YB1MPk6GY>xC;Ruw=(}HYoh8GEru^CDQS&`k-w;`})O}nT$94 zR|pnmsoA`g=+Ljn6xHrQe?2y!1v>ihIUk_MbD?mEM`P+){VK<3Qz# zJ?E!|&5rl{yQ1Z0X%UCkL7foJsb|Z))G`bi@{dNAAJgC9ySHif6{P~>sjBfx$C6IY zh`11M@cWDsSK{XR54;aAdB=3hPTS$>wnkHK8|}UqdWNT#rRsGFSSjwADF34Ly;$e* z2M%4$EMdOfH`j+AUCi@a;q97frZ*Q%`=t<@vT^s9l^eF?mCvYP+;~M&YTARiH$oe@ zx4G%6XDFm5F2C%_th;|%lgwk!yXsLZJZpS=RD9W4Vz(%Gt?$+?2lb7HND9P57Y*(o_Ts{gk)^5pDq>zAxpJ@3cS zcd;LJrpQ}F!VG5n|nQ zBIcs$qz^^*H{y@$3h0Gs_`WxM!8>UV=M~$Rm(!d~uKt{HYzBYnngZ>ldyAI-T=O8B zHRjcI@uQP2gc}siTQb)q>BhblXMXGEeC52j?CHCkp&wqa{OaJnaN>N{RqD!d_v15m z+h~7~S+h53nVaSN#me&{ zsul*%$Z~M%Tqy14XxCrHX1T`WRQ0~b^nbQacQz}(Xc3=mUHS3FTg~lmzTY;KPFb{I zrs&caEdhK%AqCNnL5dgG&Y$_h$@Becm#t-a{i-}(U;f$mGHl7;A$0WL+rUL160Wbd zd6>xUCDJ-sPE~7r%5UzrT}>jQbA0Yk*m^_0N$hCyl?ASAbMI!~HGB4bo2a_Zw!@rv zEFZUo?a2u5Idt-_QjBg_VD&2Zo<+CUNgmZGN?EJzramQMXHv+A8R@qVt;sU&2t2ry z-LUIhl)RzVv?)yzU+Zd`imkStytv^&6Z_xFFDvFfC<^?lQ6usDRp1Ycb#g~l%dRZm zk;+{qvT$pr>sJlwe^(a^H#=Qeykd@-+@9Bq-39-Cc@Y>;#aneHy5V)8Nw2ZuN;%hJ z9mjsZp3<)?MIS71uRYpn6KD7$@XZW)+pfOd->xp!*e>!#BkFp^mlv6_^BgDhzIrkv zW5LUGk?6)X)~|%tuGzC=zRY6RN0y5ezBbI)UF)=8=(pe!?|n1-6->EVGnMzR$!ZFj zb3k}KW7V&S)%UhN`23Y|b=Cycqd_kB{;rtfM^Fz@AWU-aX6UT!@T^z};iL@w9) z*7sxHw0A6DFvVWy>3o;}mM^y--M>p`|E@^~QY$&T`1g6aHff6Xt`SRl)1#yR@A)MC zv-%vf3>u~QT;#(vmcHV9ZDf0HhO&|E9*xGA51+;`Cab)nvBsTu# zPqX(~um0x5mk){T%i8<1<5wNmJ;f8!pM9=urCj2R=`RJBi_MVRc#L<>*1%GaDb2I* zsTlly6d^F9&QXkgnftS-?E%Z&mn|2Y8K<*%{pl~sRLBck|x`1P|As#N#2zr6c?vSU!bvB6&{t0>lG$Iligd}A%#%``1yE+~?AmMy93 z|8euO*B9;0@~iG&I)Aw*B!8Oo*QixOyZ3ETbJ3Z)a9Y~p*vuoTcRc$iEZXbf{Oi9E zhlfwix~aBLXB|1MC3#TnwBM!aZR;-V4F3@D@rlLjBPaCl7;%3OxxQ^mi`d*b8#h0? zx60D=;g*Q9PaoS3dSoc>II6{7Jf%USQ#<4oWBKgcDSn}IYFaKe9h2l}V9E2ZTI$Ts zG_zAMs&3)qlVY5vtG_x_{hOY;H1}*NN9g`(J&z9lEjIR+k5%5{ZF>657rpEdL$2JT zt=GMqqp#Gmg>y$f5s|9{C@CPV!v*wcKxliqyX+ub6~#3ti8hIeqiZ$*F}Mm5-49_qS=GVM9x zSaIO=&jTTHcN^8;2bMoL8hk;Pql|x-^ZdsXWk1E)p5o(_<9b%Y@kqlu=jcS)ZHGDM z$`>YS+x4urdXThlm9oLr&td(qHmLKjVxGNhfmK0P@2X_)>y@GGmmjU_)4l8%BI~rP zE^wRO&IHa`%`&n~&V1!Z3;%7a&+cqup1r>*S-$b$GL7SFR+~?_V)=?!``Ti2fd(lz z@0Jy82OABh8$@y4Q|937tbW=5fI)n^9BaEx>$U=MnG-i|t$*O)_C9@!$myKKEh2lo zYge&YaPY-H3}g@PSFqTST+7lP;kK`eIhE~Q(cX=Qn{2BN-?iHrT)Jw<&Cu5Q@_QS* zmoG49nJ%_*%gVn#(>R`Y6&-$DyKT#mZ>W>{YP{v&_w#HzFMe$qr_I^$ zJB&9T1uj=x5;4JigN8ms`n`IksjTXUvw3&lWlI0%liBp+!A2{uZV4@i1X($Uv%DKk zUMvh+S;eBA`EX*8?Tquc0$3AUS54pSocQ$t&oq0cT|1pB-3t6?`+Z`bt60GOEpp?O zqv4@T`Ew?|?37M%5t_K@SliOi-E(I2?EH9FTthQKCO3XdP288yuY2vI*n|rA?o+9L zxZC^Rlo}nWi+S2+#bK?f`dYjaNiTZuER_@6@6ndMZG!%zXiJ{L&{MxII5B7Y)-B{` z6<@I`D0Ca=k+(aWyL>7xuD!;#H_AdfecRHCHJ{gPmOcG^;|Uf~greG98LU%|&T#(1Ard-&(ScdP%qMpEm$8X>&+M|E zwJSk(8_(uDW?OzmDh40xvgXP9P;hKXTcfx_&B01xbCWL(!SBAY>K0jb{ePn{@rLr8 zg$oa{zia7XDe#-Ca;=f=`hkmWmAzLEGj%p!Tb}>H=2-o)JS*D-PSf6qS^Ko37FKym zH6Dp$JYKysHKX$vThaZL?>S zGU0sYlkT@%i@hXx4&n*@W6c%^GdGTN)HAWsk84-d=<6);O;W>$=_GnO!G<#xBdOu zH)p+{$bCWkze!ySXBFQIF$`hY=FH1%oVf2>#NTCIjAk-F16beOyS0$(#u7WDqYQzs z+YgFt$kuAt%!v2d7{0;tJKvi}#VogDYF|7RX#S<~cGJOGZ=Z4UUan9ybCB}d>G#1U z)`f9NRR1K6wtZ>06uEA-YkXr8I(qNH-tKnI2GLVaX1ms9Jq|d0!7HnOuW~WN*=3RU zr4_8?NO(}xXd&)l+9KA5b#!9r~*JI&b zv(wF!esy*1TsDt4U*>F@Y~K8vyJTL(S?;|YH(jl1?)FXkhqvn-K3=*l!BAuJ{1ut) zH~-#DW;)tnslkzIc0`X${m|a zTMJ9iu8EtrTIc8y_11ZIQzuBg@AbMDaMf5o`f>V7VNaVwCNtvvR`@?Yo%qDwsO+IQLCbKin1x5Ksx z#$_u^4at!XnQ#5OC5eBb!mXr^rLLV}f16^RCNABRE0n8!oh$WL>DvbD@Kd|bW%zx+ z&Ar1qU%g+~a^2O599vxF*s6DAF&hP5JlvJ>`Lp55Ih?!wK3%-C?D*VEd&FGilA6Ek z)x?Edk9x&+>c@A@{WmpKO_ly@O|QIpb(i6(^MYbqI-X{&Df|^vy!*+sn==n`IBrSn z3q3Ehr1s;RIL3Kbo0&1bv1dfK9s zUw^N%2=wJrIRC@=`?VEy{C^YGl;*Pw?z^($O`Xf5)oJ{*r7y0Ex_z zo*v*{nk??Qpxuvm`!mNkZC@N&ck{1*w)M`rHCu0#|4rudJY|(;shKZrb0a;3b7F|* zz4odupC>hL|K=>SKe^@Cnb|wuJ&ny+#8|ffl*?L;Nt^1QYP6XOKaKo;xu`OW<@oig zlnFc4`)yy{NL3O`61wjAjjQ$Uk=I9_NaSc1zV$qAdO3}Eg*eykWdd&&@p4s9;ZT|o z@~4UYa!c&n(hl2cx95q7M3?XWy4Gj&@6b!TP6;dbO>DDO5@l?;)*Iuw@OD`8JgxH0 z(v^*~R&(#WV>7e!ib;<9(pO$>rY)l1eulNmCog_?XT|-6VS9|G+E?a>&6rj!qhq(u z`|F~Y%3Q@OuZ299ZuOK8FF5{A$m^Kko!7w~+^nz9KKRTosqgr2ZCp6h*#qx7U+8wN zj=s0UZoANwoT^9Pn>p0Araow%A*3SY72wOK72LF_f8(a*9n5RxY!`2nQPf}+-YuM#E;YOuN%+w_Zt>^^Z))J{k7N=y2+ z&_1yc`^y$d0b5w|bv0I<@B7kx)2;rEjoE3bAd6^C)~{6>Z+y63{dL_xL+HwH-M<=+ zYdfO03#IIh_4=^tWOIg<-Tf@k)iZj^&p*6_ljOg~^D;M9-51#LUVS*;@DP&d&Vv&0Tn1`SkFw zzoKszPl`Ra#47T=vDK>SbIYqIro8VsCH7`#&h7mlbmoYD%erN5X{i&ldBf@K%8Y|o zddw#7`8GrGG*h7%@4SFVg|0_ct_Y+~_FVMn)!ohhJ0=&|Up z)idAuzhTb$7dQGn-p1QiF-8XDy|(*pU1VpaSi}4$<=D#N#6%4-@vwk>QU6!Jnag}o zil_g!V{O!44vS4kb+u+cTHMBS-`nPndF;3z={>y9o`Yj9nxvwM&&yLy8 z-?Vkom)G_GKC0j2y7l)O-~Z><8Tk{|<~%9BR&qvZ%7d+KC$^?7;8(ey-4T<$%&7Se zhz|L7CY^WU`RymxnTD_V#dB)^zu%`nPnNcbS{@-DuwgITEbWyJcH&LP{REZNTpD{q zI&b`D^_acUEvjAIHgIkR5RGTNu~Tl@P5 zx3H}Eb5U9z>*gN+W|_qPF~v~jTj4b30=ukJ@yhQnOqJNm^Ci^5VXD9zLpH|Zijb*Z zd}rRwpJL%Qt6teQCQ_@YeOv$gMZ1nq)4A8(cP`7@=ga<|*SD z>5U8%6jvv^?t05(pRH*0rIERX_kPKh-{(?~O7SzrZ+A;sdC0-`dfwmOdEQp~8Q}&U+I|rlrg-@m?HUEE6LEO{*Yyo=e&f)TLpd3 zu{3YDIF)o@)|I5QSKhp^`@MSU=c=r?9txK;iiA$QGo1EeCX34LV;;XXTy)+>EM9Nq zZo^U1&!coUIpPv$No~4~^y>{_E@q4P&vt5Q_cq+vSCRN;vJDGI;QV!S^AALpJ!myd zSZktmR9{WHTY7&dUQzN5MfC!I}836tC1%KaI<=HC=}+3m4@)&2|aa}T^&mTW>bzDA?(v^v-Bi^|4v& ztXF4!Q@p&}y>b09o+FEPNO`3Gyez}8#`@H`-w6WA>5-K;r@2gGPiFYP-StTFj)`f~ z=kK1g^87vbTVlWUkq~zo6YttZEJ}AL%E(8uNGK(q`?Vy7edUdVlf_#%uDq@EbnO*~ zC#ejz%Pg6DBt16I{roPJr^RYcXZ9Q8w(Id(8`Dlz{D@{>DRFeVRL9R64|yZCo9Bw_ zRppLK$~owC886z+cPTY?>de4`n0?Fhr@t-A+PLKQvFy)HfBN5PSx-`BZ(O&ARd%WH zhx;3!PH_-^zh2#ak%xndMdvgDhYLOK+>;bY!`iT=f3L z>C;jh1-mPGmRsFiXX9dIlv5*{ZKV)BQKqnK+kuy|{2`wkiv8{6o9xSa9gUn5r$3rx zXwhu=KkHRD|8*nh?^B;AIZnvgwe91q`rhj&SQcODo4K@cr^;@2oB4+I=MT)CkZ`l~ z?#cAF_8PZ&PvVa;uCToHd!758#QrHcjGs5|a#KC27`Rzi%$#@9U8UQKPbUAkr?gea zlJ7LjrX7v9gj<%rnCzOF%_bXodU?9%sa;={vtFEtu-(pbcF)Ocd=8!sA;~d8)7Rhe z@Y&T{yH2=iLe{Qs2Ift3J0->W^xmIeb7XF+h{GvCnU{B;g@{+i%6^hra9(Y@LFLx~ zx7^zK%I7aOX*3&4ysAFav`*TyULe`PZ_PGC3t6A=xl?~{GMN$Q=6v^@n_TCX;#}97 zB=IAbKim|1Uv4hjvfn~^{b?cjvL#_(zskDAuH$&JHZ1H+{uFaozenGkE_hvGk#+H0 zvWzwAqL^w)%F3Ll#vZsyU3QM&5h58Km%TMA_kZ!(ke8W9olC^hl|^FT%~H;N7jE1&t_P+lF`YO1b#~2-rkrSo-x+-~&I_E?M zpu&G&+wQ(~*4n?7{Ke%H&dz(J(0!n;-@|I1j$y;;E069>bP_r6_|W^;v&)X3j)-4( za<2B;J&x79mnF^0zk5v2DagAa*W(xQl+#dY{TD|wyR@Ez9XuZH89#ogFZ9=1V!I~l zoz=`pZT=;kqtciwizC<5Q#amlsEZwlA7~B_FoJBe0+6d{`@wRnpvtZ z9=qFimodcdp3ZPt^2_|M0TWqzeJ+=!br@#cvf`EG{d>sWHD zY^Th`r%uyD{zo(E)ypZLO3;;E&U^5v>ZWDuLfQnlSIx;Z^MB#9!6ZV^eYc4d?W8%PuzUmzC7dDYorkV=f6Yap8*oZf@Nq zmU{EPfb2w1wa+Ooi=DNWx0NuteiJWib9ZM8cUJQ|J3oAShK#Md(i?F`|M(-^rEgYu zOg;72V(td_ODALZZTDDyG={C@k=(~ehhF`4EwG!`>}s8!(r_kK!6++o`pH`Yuf%>l zZFRKzwKV$2%M;oiJj>cn+?lzrZ$7(R$qloVH!)foUb~C}MKoL4Z(b<2eE3|&&yw@e z{GvrY6WY}UUdn{E#M$<2nWo&KwCw8KXEG^8+$nFq&EXU}xcTok)h}{4<>tKRz3`g% z)!NMhhE7U7*{^@8dzAAn-zAyIdg45rtM6XJy1Nq#B;Q_KbmFC1RJ?0m-Yz}6nbTfm zzLaRv=>DVo`RBBQ7iu+)d7p^bC?9(iC3aAI?u3aOeMt@o&}+>Z0J^N&jYx%FB1)$R=r-z(*p ziE~=N(8&{A@Vmw~CFOk3?L}K$Pe??*-n;d-&d*2T<{ta6p3@CEeRF<-;P!~DaLNA? znOQUMUw+qDvehQJEGeZXcA{%ydRahA6nD#&g7=9P+rKJF%`-MLYRZ#%%<(RiaZyd{ zzQYfUr>Pia@4K<(e8aw~cUiSo2G({bg0$~kU0|K`&gi&ceACTI`aBQJdoC8XS&6i$ zmiEpO6Y{+Ke`#ZsKt+CJL%5Bgn>Hl?NnX&-S7-ac`I3I~(lmk2W<9fOv>1yN}a zmuzs3ZMxGp_nl74c9}kttu^@@SDZ52Qgw#$%H8KRrEF-g)9U9u{d8M3__k$=O3bq48!^uU&qZZBRq?YdGhKcDv@gq*S1Plv{@eMG z;X#Fr>8W3xYYTRq*lT*{gRQZxRSCnarO^jIS~zjl+lc+#V)x|J0S?~P`(HTsT+oph z|JgE0=g(uK^9jYaCmP-u?mGVSNY{gkZxJ?UXKFZHJ7@6v-NN7S;bRb%Q+7O9)v1twr9F6uVOs9n#dnfevKMZiv~7|WTf!6*pY^jJ-?!m&&+Oc^ zuIh+J%I+6s%6yB~Sf6zN9}!iaxZ%!yY0isbIwxc7-@g#w&~bm3K zY~X$6yP{zFf!KZXlT_bsz2q95ZFkUnahqm0>;SyumzHH-;cM~UHcZs=g z+_=NMN20ms%*1p($7{t&-{wH!-Riwe!WY-XfM?}p_iHU_Q&gsDJfen zWwSQU4L*6IYRwwkpql8{_dMU1eWi-TGG8CXr=AH zuU|i9P7Kp9J$P%^J>wTwEB2>~_!a-0|F-D#wA9eXjPNq+<2Ykkt>6E z|Mt&g+1fKXu7>l;&eVVJRhJgc5bS--&AeH5PhjGhB1Sv>WN>d(%a zU&od<>@0h?wsQKx)wAqPeV*L$)Y}|gWHaHPaHWmzATv>U+gKs?- zzxBB#8V}lLt}U9elP$ER`RL$=qUWMY9er@NVg;En(9Re$u|5REx_*30zh z*H!PAFE?MDzai_MR%TFKW0?qlQ@oRJvrY6;gA*keW-?rQl{fJzZ?>OR(43DKwwWlY z_Rj2%lUJB!zwXwH$7xHwCc9k`_$}mj%PRL-Vb+c%nsYy0-804f!jEFtMaF6voiTBpru;`$@y}dQ%i~?MWzG6T-s{V zI(6H`wkcE9fBN2;+&EDy*3V&4Q$(V~$`4huCKlbFHF2HGmTh0&Uah>=CFHcP)T?7r z!jj2(tqN-=sa`7$>Jw|3IBinr6_af7!n_3v6F>c(rnPsm)S0aTkEJI5JG;|%IoE$N zkEP*q4#B&;%#5#3J;d`;^GuHAxtQ0{EGP6H#i-pbF8N;VroFtw+iP(sJLkjqGko)& z6s_8k!d)-7+$|+O?=SC_Qzw7+UG(bjao)FCtohZh`vz$nODr0%ME<|KThL+kmsh5X zN_I5A>3J_S`{<>OJWjmVKdipuqBQdY|NcuIbMNG?D=X?`ns8X7(9Zs2_+=S>zWbHtXBlj?YL-x(C&%Vf zA9btea4GSuDY|63eP*a$5P#T7)q|R`v#c|>xq5T1uJKa3cu4Vxh2-&1=aj3iFdVvc zKvQ{xoYBcUw{1-C7%cwsW#x;9-YRD&dh#zbJ8#rt_Tl8l>qQkJmYnWp&nD05mAR^) zSz0&!RL|sfQVM}iB7EUz0=Iano#IYjcB1t4*&E_)az7@BO3eHc#hkfi>4UDt%LJWO zCcd1!=<~xa{`ZxCS2C`9;eSD5vmft5!<>oJ#n=5PP@k#&$t|Wncj=D9k9Yl-@-)>+ zxpQgz)>qqI8N+^NZT4fG=VR`D<^4sTpcOZNJ)Yz)(y;BsCdXe2>dca<%M3S*^KDjj zKfP|o7H*4kjGJrdd_R>*V{g!%Dx+`L{mh-Otp6(+`K5qS(sf^NvdjKhCIQtuic#WIIUhAH zUh!bZIQ`##2r?R|_BG#)M6%oaOi zcckV`K985S6MtQpW;Q8IB5YSwm&~sF7S8+c-t#|pacRLhx9MA)^X5KVdS~*7prr;M zE}g4Bzh}z3S*iOr$MmC?i4n%)@FCe(9qxaFK za1W`*@>APOB(k1HK3n0n^l;!__S%b%QIn3#ga$nce94vNvNPb%BIgTrJFWh*T>H8= z{C5A}`|n?WJIV1n@RmR43%`ZMcdDwM8hQr4*?DWa)N8*j&-EZD!k=$Q2u# z=Xm}N5vXN;t&{1o#W&@8y~umZ`wZqY`?$iCluDlP7+;=vY>BU_&BOSjr!6zN%H`K= z_RXp_4xYpx7iGQna>3dB%Lja7XG^=)>gq>M{>^bdVCiL+xLzYRARY) z%#);JJH1y~&G|9cKBzH&+O!U{gB>|EdD$*&GWmWvUa283xoMzOU|j@+CSI! ztj_W6Qni*P|Q$J+VBzR8sfYo0j!85_2DCEiY&H$dL2C zzNh83n#A6Wj-5~MRn%QJ|K!E|{lovehuz8)ioc(jW2hc}!Jl<{#~Z`F79W=FRGxO6 zcWpv%Y3*|!ahplf^Xz=Q+a`Z|^-1;bOOteUZsQU`hkLE9o}N7umGnEs++o-R`14y` zqiOrzS!}qlRb0tRlVi>DRggPZ2n6u=8NQ%h5w$cS@$Wn!~0g}V%y1IeWIj` zgYphNwY)zq+Wk9!pjOh{DancsY4c2?76u=fGbQhq!lKqbO^eL@5`!6&FYVMS2&%d$ z6=C9e#`EP7!$tRB_s*DjPNY1&X3o76i}tc@%66E1U14|IW>tqW-V903P1y#%_l^lf zynLm9@#36>WBZwI?|q_ssONmKo^`s^=Vv@d^A#>XK67*K4d){qWFcm z=;j-rnk-d2X7c$)yZm-iGC%<=AMs=T7Z_lmbP%Zm<{X@oIuL^gTOSdO{=o2tfG+tBLH~;f-@rjQ& zE}pVGEL>n-xLdpL%B-0ySvEe&aFpFa*Et`3$dEMwv&75rI&5WZ-otOc3%j!s=e;?czYDJI4 zh+T4E=`}V{^v_p)9z}4 zz@%yC1y2-jSrk4!;<4bGlt}hgl{H?|ymP-4x1Fz^C6uK6$nea!Nf+l|-+QFVLiMy+ z#q)pXrm3rDBnM63e5bm^<>b*5-#m7%E%0=EvH9iQQ&TNCKJQ&}ZC<*h>J!sGu7&4C zB9yJtLRj9%`e|5c)XE(^$y}@U|7C*DI*vq^plruKRDHgAvn8K3{Ou1!K|@!469uT-20_zTTf z+B`()c4xcNce^DBjGvpYmewT(oluivh4SvB(uSCZlj z=3?QkE3&I16>i<=K4)R#(Dq|h$`{T>uJI*vw0JgM+2m&;ll|qBh^)>xJ-r*QwjFZK z|5jJU9A13ko1yLovGk)KiY1SPqUuK2O}`{BLI zg0FF3yQFh|S*vg7hpW$9GcKkdKB^Zi6s-6#VMk2ejJW~cTtEKpe3g4%SV_FvVVRSl z(f*0m`-RR-ydGOFp5}*~lfr$T%WKrP zPEGe^5o~LJnJ0Pmo`auT{`qx3b)zp&bkscZZ1-51oYVB!uHHX6b*5#h?yi^r=WT31>2H+Be(<5N zS#EoLkyOK;Y57`Fv5;-02*e4=0ueb6nR+)zRPij!EMF z)7@&Kid(nZlxjTO9l4ozY37V@r?*8BsZ%yz(01e~U4L<+#p+2NDmwG)4HH)w2z*%;w-*Q!7LiMZIj^R-XNnu|4T;+*x*oW{zrx_Gnvjj-M2<+f83sT@`6H-Ll?I! z)Q>ZJyIMnfW45hhr~88ZnVdmy&z1`X-hDV(yY|eM=?X1BcA6ZV^scFK>eHysc7e%_ zlRSQYY|C8s`;J|v($Y7}QtzLBU%XcIh;qlg^+%K(x-aFIZ(mrhEjjm{YH_M&;HFzO zXY`(>_b#uQ{qlnuWBIy8y3&cerhmCLd6R_V*(q~gWGPIG(-iq}>0$oO&Q~ASEr``p zysf&mZ_!JS^>=1Gb5WhL&NS%GuNK+++tvu}lDm|)wZ3-QH7}cv#|yny{N7v;5Ttvw z{4D1K&2!#L9UU?2EH^#2z0a}pLCu?~s-mG$LBgt{(+)pXsGQDT_-UP#SN~j&M>jqm zNw@wo_4Hu{^{!40za@(n$BE19^?WHyQTKByoifiicU$`O$$L&OdpkE};?zglG4p%Z z{CsnhPuXYc#md=*n<#_C^t#a==yZD|Iujgz(KkMobFP68# z4}R=)4=DdEEGqlm@uS|H&BtQxTo3MNI~*vor}@F&Wy0}^AJ0{_oU3no@V02mqzU%Z z9?K-`?C9&8rOU1PRLfIwhjHp7>sM*bapC9Y3q3l1Lg(+#i!oo;EL?xDZRbAkAKSEj zleg6Db9$g>RCC})^{p?jH~o3xb@QK`QG$3@5Z9mHj(c_o?wc=p4O zKU}GszsdcoIZ=`-aNz9nT|X{5O-y<8?yX{k$M0vGmp$~fo+w@E9#xbSpvNsa%{W(^ z!>wNCsnf(ak`X7ru(PCvDxUdkiIO^X34{xz-+H;yH7h?yz5wS zZIb?8p{hF{7oAMFTC=>xg=2?)Xy}#qYE_daFzudrp>0X}rE5>;Z8>%A^Zwg?3C*2X zTpCw(#ML@+#M(METt89wO)K&J{U@>8zR5DWnJLO0e0Sd|Yxx>xr(0RmQ>R`mKP&O) z#>ZRtxs+KBS$#Xtcup>F9rx9E?a-itm(v=8vafBkn(*oKV#fAl6AuMHKi85}T`{BA zrq?tVW-nXA+`5l_uhoOXU!e?J9<4Gub$xw^o2^ehduZrI@61-0e*3htbJ1_4Hpea3 z)QWl?x=?HJl#tDSEfeaWw(dK+W1YOprb|p3TVt=Pwfy>;Kk;JH+$Y&02b=^hPU z;L_v0Kkw7d+p|u++F<*cdy|goqPg006s>(W?k}%Acl7-;K>@D6CO%Fa&;10s{;GJl zezm{-bdstkhttKiU$|bioI3CN_1|({Cap03&uJYE2ZAg1H8x&1nPS0m>)*;XW&K>= zrTQN(@!u3)JZZ+NpqWX=uWhsriA?d%KXZ3_VR*=-+L>z?RCzA_@LcZ|?~T>Q>;7^r zam?JgbG89j?uvw<-PvxQujP`j^i1me-VudnxuU1 zl$S(p@q;bOR;s-}TqGVy?z40J{=O#Z){FTCDg3qvTYJ9gNWC%SRPk&-zv$}Jr_!_5 z&YI|^>ZLld(^>6@(z|=yU)mBbS)5i{yTZfwUGA+Pb!eLJL=@>`}XgjZQI z)BS3}9))wp%@@R%vm~K6Fc}dgqx3W;P40KfZCiEqOlF%J2D(AZE4p z)DEZ5vvkuK-hI(L@O9Q+2fpWwGA$EdxqY%SUw9_Xz;?;)HB9?V9O}1wc+c58N$z%v zSP0Kjxg}lqk8jsr)>fxx_-o1qiGE49|7uSHI=7TxW!b|!Tk72Ix~W@Ax3v1`v>lIr zEPitBv2`Cy0=1cQ>EumsS6*$t=*i|NR25TP?q<*p_uXRb7#C z#9Cjjkl~^68z=uw`AlAWzI?yR>Z9^^R?F-Pk?-&3{rG!{nP>ji6^G=fo~-zgl9+s@ zZr`K>Aw_Z51(?6?W!_$M#`UKpB~+>-{IwQYOAo1+Fw7nCvua+f7kJ7 zeGu@|@=^OM{m#=Z|GYWFQ>JAs_Vwyd#pB-2$k$dDmRDLEBhaYy@|E+OwOTLx4_1gs zKCr)j+uxCUcV=t-wW~kPjIJeIu&=6n^lnvDt?kLG;5*i9U)lG2sovYLJ@w_^n>9_= z66eDOzDtyU^D+Kgp?PrK7YpxNhiSjJH~ta}X?m-t)4Ay4p;Ql}k9uyL`45X+Q*6@i z{@=VcOY6FXZ^%-a|6c^__sraVW^-4_n}d5hr+0AvROde_vFS|dmw>I>dw*CTzQ6ZK zTJY|9L26AC&&-f=Q@j7uEb!&i!c>=ce%lJaolRGMA`v;M<&mV6ZpLHNJ~Ottv93zS zw?DAtH&=YTq4K;={rr>63Uzl@?UyCxlbZyWO5}&z37_I=#_5*A!ddnUu`T)jelLdc5?}J|R7>jH&;(KI)%V zxBODwvbA5r3YqDj_O>V4IlCU+X#xqstA zmE-zyYvq>f3E>7#a(~M57aJHAUsL#eSKrIx&9R*lm2bUd)N<;Ln=CZ40$)^5%q$R8 z$_jk`d(M<2>g)_jg~v>82pgI!Y6QMI{Oz#y(<_V4y?1^0VclY1zc$~dojVpc&Hm~! z`^dY>60L)q#ZT9!|6Nmc-cj^>bGqpDst~2edP%IpANNI0=!?3o+7y|f@k{iKM* z={T>9X?w3+KjGJw$7Peh)=0@TsHbZG{)rdm>nEig`(m%NK01hXTAb0cI)^|dquQs7 z`F~ZPDe}GhBxKIYY+3PJoD5ITXeL?MI>o(BUo>M+k>)a$U42sQoAi9id0+EACPjLCezQ#37818~Pt%kXo=6tsuD?ezKXs+P zIWyzirtbtUck`(MuA zugPMr80p{P9QMrDPKq_sZuYNt`4_~`vN4AJea+Cm_vb7lv-RJfc~;GL40|;7N!Zy~ zv(%2YA*s5y%M30wmE@gvd?%FR^PjE4E`_<@@&23^$4gI>+jOnXGNjoBtEWa9_s>g7 zbyv4|YA#$G`rAfQYxC>KWuFY0)=b+PX;VE(v{`HwOF{d4e}>wL3T%$A_hskTzGzba zP;>b7hHs0vD9AN;u`WsdF0p;?L)+}tQIptS{Oe)3E4z%JxhGZpyPtBB0pnDK8+T{V z3oBUqEN)9%pX9xB2H#z)mK-vfw#s<&o!MumdA^BIF;0{^eN_7Ep?Othvx-?Hza^Lo z-Y83W`Yi6L;R}|=7}p1mTlBwoUH-Gk%{TdEvV`ZQr!g(}HiXadYVn%no4hn4Y}2OV zzEdV)VwS5nTz4|;{kn{8ngUDEE|1BXFE?Iv5pZeiUoUaUD@-Ka#Bk^N^cu~~)MuIz zN8`kLA9f1}`IKqvp7h$iw|!ScDux8#ji ztynuXL?f{#toP;ml|Fp`8K$fY)9yVf)CP|tVOR?DUvUdxYM-dEady1Q1y zdfBGUH!eXMZgT{Ep8DZb-?ux8J^Ycp0dIU> zJ)JGNbg}q*7T&ub8YGvj7e8%iy!Te=#5ehK<}3(Fv7UCoHzm6$jis^D_~}pWw_2N6 zRNuC*xt}Ct{rA^n^H5dWNy7Ie68%{N`I*X{zM8N5J)zI^9Y1IM6oGH9cKeky6Tju3 z^E1*Bwt8?`^8C(KP51XKX+6A(>p&|HZxPGKsQo7;{`v0u)BiThb6Rd_qp{V-kSE3~ z%>Tb@77DnrJ$$Mn$IhUj(g`(-Q|*>yHy-MnGwCY7>NhL)Yi;LBo=jMG@!qswFUuGG zd6dJkExDfTv)e z++5ZC>8C?$XJ2xzN^0{Kn-t$EdbyKBv2pruHddiY4OhOp7ObE3BO~Qlca!4lz0q@< zLRUUd`lxVQIREq!Di1Os+j%6Q9_A z(Z6>@Rz7QPK!saft#gYl-haQ*F}+58Z`AYcr#MZGmp-@Y z+O={`xwfJC)9o_O9$6O_-d(rNc*3-@_2mK`m74o_HJog2ol9S{Kd}At?uk*)qj)8E z-u0LSYYPQmjr=tCrNZUbKRSy4%gWW+q8IsGDp0ZbTlBv9j;VHa$J#f#TB=z;Gi$CN za8La{bx(DpI7iVLo4>-x?>)J5M@KPdzDCkJO;z3{eaf$t)_Lx}uuuBtRPj^p4NGjC zzun69eDUL*j7N>-kIX-oWnCW0Y@f7U=FR@yC8{A}i!a(?~!OS-&@acgJ2 zI1qj4g+kbh-D~?=#P(+Y>b(^HxU0a{U!?MJ!iL*UX%FwSkzW*5S3Av*Dde=E- zUwyyrUbZjOeKUh|(`WWf-Jbis>(bcNpG!eIzpFY$Tx!TpPdobS)o-_G zWA$nL3(sxUK0V=9=cI@JCqGn&?wQlH+SWU)p?boP*~MuW7XDST_O>&BEZ?+y?aY|y z`?rp0JY7*NIMr=?_w!z-mbMEv-#^XVy?HXLm_upRen;A%Zui|ovP3F zN-3Q`8vOS0{qV^huYcv`Ui0MTY)Y>3C=+72@*`QGap181+FQSUXo@{!W&d7tlIKd@k1 zn)BO?e=FZ9IiBgMdN1^Geal4GQ<0M1+4>7u_BiHeuNtO2I`H!B!4)UkKJt~jemE?4^~vh>+wL}0&6Idn z{Pa*_hxyy(@e|$NpWFO2ZY@WT(FxI;0Y14i&L&1XujWy9ep2fqA+-GUJ5?L`cKH>y z0fH^N?yS0hzh=EzNjl^U9{zhN@>T8kBJvKo`u*2=LdxS5$`maVjGk4 zR*tp#_AG%y5s&RpBm-5}%WEn)M@c;_GM1g={KN6X*9g{SSB^z$A2U8QCvdCXyjdiC!r{bQ~U7E1-)x!{%Dv>jRY#XcY$~U;(o-?QC z{Ow6LJ>r&L=WK%IyZqYL&z!&c&$`Y@dk-&d*G22!0r= zsr0Xn)8+X+YuDvJZ)IsO3vhNiVW%X@sCT`=GH>rrwv{p+nQ6y!dBs_^6m&QC$*;&R znNYz$F{1sA)^=Cdu-XTjMIj&Eau2jU&@k6@{xkJdBtNIAOU;9OD_$s-#jkv_B0zA} z*BRXV%+pz4Z7!X~9;O%eO<>BpIw{eGp*$6{I6qm-h)lG!KJ=yMEvIMo3bCM@7e&5^ zU6FX6#qfSwYV#JIxg{qqOZu)1eUuTn@N2~4YZhrIizogFNt^b5vr}X1YL$C854)Nb zc=!BMD&6e!q?hX_`|+&a;{7tS!^Ifpe%bOgGtTpWXN=d!RrkMNOIN<$bymB(SyO1s zeT`Mqce3xSyl49Vx8fmFulv1UXJ6i5)^t@nn&r&h34iYyf32T$b$3(P&KAu>|8(CU z+iSM<=%-u84P6I)jlDGG`(lN@D;IRBYXh!DvQiIH?y{``meMw@ultz z?`hR-O0Ttx@B3_er>ptO!ai;G>My!Cok}wIMdnTFGMF}diPFX=46jcIK8ltUx-(~) z$jqnnmNj^-R;-?`{>I4rN!yg=6aR_VE6T0o`A{D7CP!?i_oR#2lK;bg^MBsEL;Ao` zBhj0`zt}K2Xtk~L2&r#&Ixy4xi?rjZSMzu!neWX_n^GUXCjXk~1N~VnWwpEYJ|DZg z>5G?ycK)m8pmmYiOG9dvHy=FJv@5RmfmD;O#>;bi0@n+tnw=0;$WRQ-tEn(P_{fEO zQq1+=M&d`5(m2YTPd|9`>~j80?oa%Y2l`}Q?#uq*pQMt>QJ?l>K>cyJ<9F~^l+HN_~vPSa@n>&H*q)oy?x^jN zD?M%+HE-`n`-$2jrS9wI2T%GgEgE~|`sC=(E7`w|+^#H9^8&uRPSCcu%1YdB z+H=XM`%U~==5)tA+o~mLp2m|y#JOh#e_EW+df;Z^+5XNH-I^+|_`>AmP+4nqUBbQ2|I2ru znyM3>wcvhyVQx?7t?BO%sBDniqtGPD-hN*_*gMzOqBgoRE6{V5&((_p0z0ZYoSxdu z-VyXx?j4VVWw4F;vVyqvh6+35rFfs{{{D41?;+c**iHtwou|ZiRo-`G`0KjoneESj zlT+5QFi3W#cq~+s$`@(-Br)+{pJQ@iX!d3)`|p<~ z>=NJGzIpwG-TDG&D`Imp((=wPFR$e(%n8&JeyxeEvgE<~+KbJ^)c>lb)mv^_bRGEVEwDf87ld4y2-6yyz!#dcR zY4evzrH(IU(_}cc<6kNZZqt5Q^S-b9iRW^$-VJHJaq|r0w3fYcc~dvbv)$gBe zFWRo`(=%{`rl6{j@_*83HyFYRq5}m-7~$a3xCAjjET$N#++&A za(;tLd(Ms1n+m|ib%>B>4~hK&z$ zj+{@>k5PCrG5*NmJiTD=)1pr{#q{l~)DPbsr@1UVIZ{7v)r3pml&TtJwKFn%!z~sr z{l;{2v(1xi`5m*@zuqv>_89+$<2Bzx_Y z6Lz@wn)BnFk29}kSCz^0iw4-fFaDZu7i_E81UtiI*f+UF&H zwrBnFYE{FTBF*@@WwzfB6;IthS$x7zhI#Dj)m$0%(^fuQ_jKpE4T9_Q_%%hptZUl2 zs`~t_Z`Ta3Wr|$Yj?-PUAz$U@S+lgP#H;7ryeuVI9e7`+h$!UR9q4#GbBUb3RrbZK z-%htq-s=5jneUKXbM9ogKmUR$-PfhBey*C#aPjrdyN8>;J-P8ZWA2=ewu%6VwXyK=4l?A?c}uj!Zvg$qXOt!~ZV?JPUzyo&Bc z;gz3e-JQ++GW>@^m9ed}TUYuIh8u>qoM*X8{Ij$lJ~ME+aO#A2uhNRp*eWBH{-UW- z(V`FBGr|@;e|FX=`L5?;j;uzp`AbBr^^8x;a%Ls$7JH|CEN)Bf&NuB1kCs;C@}(?c zU->X=V@E{Ex41fv<&FFJHXiRO>~DP1TFt|<&eowX-2D2A{I^}!EbES^Kb&@+?dSUV z1wX$8uG_wUetrGX9-Ga~=Ppb)v6tNc__FHN|39B!pI?8_BHe=4m z3$8UhKRN{+ckN@$<>TY|@S@?3QbUa5gGkQJ0RjnXBAjRX=G&LFE8SO@)nBvY&&&(E z=lE}KdR)4LAuxOGigP}TI?TS!OZvK~`|+`Zt2uv77fudUN&Ylj1r%b!%{3@QYRZKe1VOmqe%%eSl>E$Xjt_rW>UGMyA z_1U-FtMymB7M^#AXT{gKQ)18YH3%J_P_#|@1MdgTdM2m)9p%dJ91clV9{muIEz~5{ z<@4yY?(dHI@2AX<|IZZS%D2&A*U9*#{zu===e{@1ImCTNWy|W@W@)v|KltBwpXO)0 zrdA;G^!wR+$G7|LXEbYmc)&EPXzAtxx0yn0Mowvd6QqMqTrfXn=6#7NlEHXmT5|2S zU;8SiAD_#|@98JNKAqX|q0>R0(vF$Cqh)Mcs;)oRE8V1)94hO#=}|$=3n{)yCT9Xv zvKxI*nt4l^-Dz+P{dhBY{`weO&y7J#N-LT#ZH(xCXD1k3lzjeGm3Q8%_eCcE^Vq-N zOuzDfLX%Uc*~1=@sXrMTWGgD&rvDYnWA)t`^&zaiec78%J%??l=iXa9S>pK3X*17S zGcVYfb3S2Pn2GlcHu~5RzT2-`;U{7KUd!UqW!Z-e|Of& zcPu;>){Q5^+}1Z}+ReUNre*hgRe_dWL+9Suk2f8UZWEdRcQV%=O}pF6Cr*E~eQD03 zAGb}8mLCwAfBNhWk@>ta_9FAoP2FfRdv8i?(>cAeW6mFz#@p=+FU<6HQ;$ET_=BOy zOYcXGV@8YXhwYh7^$bcMJ{kO&>$&s3nD8cD(dt{ux*P4!*ysfxtz%aDX7GE4_uHpy z1NpW-w^rH}_xWIgt;o?iirQZVs=s|Hu77ul>37VgOxrEhiRz;-gFFt)E!wwRh>`70JxgCRM(yXXaa(pK<=T=2uzXI*X-p z2NYK7ckW%@apk*;>!u}g-()IRue+ViJO2aI?|tQV5tkSfZu7Y9{3DQ%EA%(%{x_?A z`M-E?1l`{qBYO7#`rQ2Or~Whkn6-*&!Gl*ejZDjIto0atelpJ4-6b!4GTlOKt7Jjo z?IT+|el9SpF#T9K{fNu<#cwADN-t|M6W@B!$5=P3IWov*1+T-};y`J0pX9*XX1%v$ z46+^<n&BKhO(#Ak&wPvuJs)HR?`?a-|ODDnvWB zToOB6xN!=9Tk;|27@qWf7KabAoR;ND_q059v!S%`4_gg0U)y2XS*G$l=7rM791FI* z_SE^#qqu`p{`aHpA~%Bd?iCd4FIX&JUCdS{6TZD!Hs7k`z|J1KS7-OVtu46wX{-3= zr2>0bROHN4JUO{>YD3%fG^xX{ThekfuM0K?-ulas&?2Yr(LIc~wb00j(2#gk;V}1LP^{bkrKRzvau&Q&x z0l)g`7xu1Lzs#s>-m)JaypwIG=ROVgo}23SQ%W~E-O2as+`s>S^~EWlv$g(r;pDyw zk-ra~1=>HK_4n!KGYij8K74I*VbPuE`xd?H8GQ#?)8JaZ!T)Rzsmi- zR%z*qBRYp#`^)G3+wCWsV=L)>iXwh>$$>&~Zu5wvXTBmXxeG-F{(n%($F9aG#z3@zTxXUPm;4ZMg93Wzf<}?h}g- z{I5vgUG(13G*R8W;@7wH?bBvlyO$L@Tl4NtEt|8K_nGJRW+is+m?C!fQ<24{Ejhn= z+rQ{sH|pfSBNMlkFY)!UrhsK(yQ*F{yB;ceQ*7*$mV0*kwyj4rCu){NKD?ByV>LxS zTg2_}1#YhZX_?Q2Sw=iprdaLP3D?>6d8U8xtD9lv zp&S<1OU`mcoUWQB6dt{FU*Qo&weTN*?R+_zf2n7AE!a0b`xMJc&CQHbLJ`)h>k~v~ zusBw6u3C2G@`l=$WoI_b=U*|)NV3n3QPVUgm}%QA7ge6czL#4acH0;#`$h6dL7s_X~~tlZQ5S;otj<;;+_Rh zk()IAR9?Ydk(2+=eh^WW<9*_;aq8MN@os)m)qXUt#ha(eXm&`=RxM&H zaQRqnu%*e$>gk^^nak$y(1^S7(f?~yXsAzi_>1n9J7zgunBn+y&*{1tpX1emlFv4? z`srP}zTrIo?uA`d+8?x@=6uLg_&;TZ$IHu|#nqwAF+N)ix7FTF@9pYH-WV|bWVB9N z;l?G;wBWm z+hSRLUfb@H9h(guS{MWqEcWc2FQ%P$v&SKO<$*^F`(hdtPn?sU?tD#fGwZFi-E!XT zhjuN^+V1!?WZHwCHB7S^|LmL@?P}6&86=(`W&Ocy=MSlpD_0haZEFpFJ?+Xr!3pZ| zd!K&v4Vv>@!=`2R57&d!cxI}(%vB6yy>{-$+EjPT?C00Ze^wm+Fp=q(-0}*~Ip0p) z<&l44_ax@6N|Ag}#xpLde8j*@pr_n$CCTG z5An{uFTdrD7u(Zfo$_1uhCgf_KU6n8DVO-hQRly5KK}`??>wj8H~($;Y@K(?D)WzC zo9Es=FFI=F8V~1RF?IWpB=IJxR%Yk3$*RWZ{CN6V7DffMxu3bk(N=#!;-BQMRF`O7 ziMWKf=7u&(=dzZH?(BD*zpr+dwOHDkyuV{Q>y33mZ(Y|Gbj*i4p z7Ec!3F{3}@{gwDTOJ#mn1uOeW{`-5l|L0u+CbwlJFN-HJ=Iq^D_nCX!;z?|6?vai; z7KfKvv}`#bxJ*n>S-AgE=&mcjHw6c7YtTPe;_>{=?;9@XqDzgmCbv~=e!276m#ZaZ zuf?WFx|$w5sZ!roWVvqh)0tUpHy%YB9k4%s&m+S2h2S}tb$M}mQ9`Y{?gnPLPf{yUQAfD(U_Te%L)V2*QznT=S{nO>;1iMU$hKO zj_~_?vTbkSzMrPswVfG%-&5gT&T&oU9m}^$r(eD{+a@k~IK_MY?_&?oyf*c{kQesj z=i8@IqD$-LrYc*Al^kon+vLj}_abds+rllsFHg5lQO;W?5ZZkEp$-Rk`|C88=bhaW zPxe}ee=gi{Q2nxZX6{$TZFY~BTT8HC?q>aR>64&fZpe|4F7~O0PB#yB?R_OQ)iB&r zVS?d%Q?VtCf$T9l$DV)MvOVMX*6*8kUp-ovW3VjwUAX&M(e>w&Zib|nmlOwIoE5d? z`$wJ~K@W}=95ng-<79SXNcF|)(rO;}nK$C*9$MX>m-+9+?YF;v&iwb&rsVB|=c`vN z$$rr$XYw)F@SY)u#T%>FLxbbPXX%LGfK-os}# z)=m@UU=~~a#C=Aa-P+rdAuJa|B$CfW#n~R8qWNdT8G$|XPR~$oT<{^w{NFB#>8r~= z-Bz9GkZp72)u;7=PggFfPiMA0ef81WrzKalHoJO1-m$Rz?1zQj+f|O9+Eu~7EoGtd z6K>z>7mg-LypazPf4|hOICjtU(+QW4-dNao;b_D1cD=d_B^#xE#JO$Ow(5ylc>C^> zSbp1l$=i9ezR2Y_?%g_tzsP!vx}n{Y4{Ob-p=6`Y+_>~hN0TBx@6x*`UUdHS#s%Sfo^r4!Z8*N+ zz|FE1NsZ6fEa~d+n7GkNlv~EuW#d8xy~ApqhNV|09NF|`sf4j-&su+tB*)TSO7{Y~ zwM8~MY+EhUbfwf$XT!DGA{&1^S|`~hk-F?#z>!xgmvnqAJ>7M~50nifmi3fwa@^zC zo7E-pai_UwlHnOcXCdx8TiaER3BLE6bb~3QOG12~Vx#Fior+~0M+>TX5S52+gORynqHMM6o4 zpMkTGvX{AL(vCgz1CD%H|2pw!|EmvQHn=2DR`lUNykYh0M3!t@+dn_2Oj+4?WtFIG z|DJW1Bg&N@T+*#P^`_T__J@0uqQA^m6#M($U4L@vdCg0_GnJ|Z!z3ODE-C4{ zH*JI6mrMJjcJ?bJGWbfmGUb)6THxU@<;4OIi5YtmJnrVlrJrCqIU!NO`Bm2Uil0~4 zey`(M**^PV;a-pHUql2G_CGgN(QE(H{c+VTyEJcKf0movTY5e!ABejC)6nr#vRTO2 zpsRO&i%&Z=>ERst4?5PFw%30e9n3t+65p~SKO&1S z-sp$mg;VT5H;QX2thKghYI@V7z-;B*));>6=3gsUrfHYtTwlE_wsvRQcFg3_LCp^m z5|#zF`D=pjG^>0)RcAef;tB(;<{bjgcde4kRPJw&v3)lR! z5Ng}_{jrC{wCPJvJI5^dSld!<)77IeN%`x(-IkoIvc0NhIFF0&n)^88%CyNU4{Xdm zge1OR^9V}rI~o}vJZIYDLAO#DRN0*v@$T@M%X+We_-=jo_bphzvTv8;)M@%$EE*Z> zuXqZy&)BqZvQU7d+TM?1MnA=uDoozYUskFD*Gt^c8#~; zy)D*7vX9bJzusthkr`^DTBV~o#Y^PER1M};Hhb>u+MlG!#Oc~8G)t&3K}^-l;wAGe zAyjrFo3-v zC-WAKg`9zG%WOOB@;C&=vR88mZd)v(WZkVD=sx}PLYG;S7rBUWJpB0mzo>?n$?|(1 z7FOIf7Q0r;&vB7@vhCKldA_SEg*utNcol_|FWGr_9Qm*}>&1qHZw{&)nC|11;q$4% zurqPC{){85@5jw-IlNakMq85e zX)z|A3#k0d+w95ON2}lxdx%=9!wi!PTT~{0Si0Mw)9~%voCnzt-33D= zCoJ+>$~bMF#C+e~adUOvFE;4>cx`WsXN9i0Zmd&s5L=69gYC>C1$(nzZn*8Mb~A8} zXU&Dxm$G~|&3Tgj%|YNe=LgXhK98#GRxf|duyMAr|M5Li`nIx%y?0maI(he6wdKAa zUze?%{o6lW&@A|PW9g+UhBn#lD~lzTonuaWW$^o*L1{$o*Q8e)tR<3{^(~wdVwhJ` z?6zmj?@46i(ctveC{uY4_`Pm)!n&h7`5W_!xuBm^26QR8Dz^#{`{`f)VZs^_{b&SZL=-< z^ghgITc;st$8=%Yna?bjuIS&LWiR0ITjxqy+i#H|q4=!zOP>5*wK2o zHsR3(tJvx_j~nHAUleH=H&}3={&8{o!e=%8xtsgFo-R~Ayd=JMz3rTPvaixt-~0I? zta;Jo$n;RF+QNNHRPEZD-jN zXB`s7lyjkM3rj<}yZ3|(QB3?1-WwcG$m%kFt6RN=#X`1g#>`)}TQ?e?-hcD?*Vrf~ zzLK|$C3EhI?47gsC)>&`EHW9dE4(*|i$4?Ab#%(+^m2$|nAhw4zb)|?my376f^94u zTZDBT8zxORcZ!@I#GOLg+J2E{op-&kZSqSX51uDp2pQ!+2Nb&dLsifrxU50(6U zp2?JG`5v71{IxA((Xw+vRZT6|gi{=Cg`2BrNk*d_RuuKLP+Bg(ho3p3C4sI*@{Z}?kBd2%1N zF3y-Qda2}tinsNFiVU`;vJO)-jc+l=OwC*LmZ5Gf@6w(1)=$e7?)XU(*4hoM{F=ZobgEIU%} zde2v=_q(la#q?x$UI`25TICZBB`kKgqnP4tqL^++TQkkcZhd}yI;T+65SwKBRlDQ@RHk1^0$1~gx}JgRd)Hql*o;Xk5)># z?y+?E72>+5vbD^=!`%6DmT>-?1-hLb=8lVl_6X0as6KE+`gA6j>z>N|$uh$Ed@`ZQ z6XV-<1d6B6iit@V%;#&kV`#TSdEp$}76;9HCQqb&_egFvbOvdi-q2w>?e>1hD`#B- z-nnSqIS>}QJMSr|j(B*kfy4apX6Nl6CoX?w7VotC?$YUkeGhi^XlI9%%wE4GGkeM7 zZd0=o>Hg&Ti*C#8xK-I%@ObSW$wPB5v{*AM-DxOpD@fj0)?JWneM|99nV5K<-7bl@ z0(ssZm8ZoxuKoD@pG)Ln+lh5rcRt-Oek#^myYS44oomIPx`n>m+_!(P^Uj|eHithw zw*9W`Dc;HrvpO%mHP~{SS?yktvF5#q*!&|$r1!tJJtCd19G)?!=B+^fl)JB;Gxlv- zf8^noev_}y4ul+5ebswAdgZ;Mc;&0o`>%ah!{>7F$!n*>zXc=yihVt%&nEiy z*@4~0SEBPO+NvJ&JQn%-&16>9<8Jp8rVDI!gY#ERF`HrK_fFPj-^7&cjCrxu^_us8 z>?w5GCp@br-QmgY^w~APA1U77xAT>`pWA6ssq8OvfAMPa*-npMFd_fX)pHl0NS9aT zoiM+*#;bYGD-BEM{gw@VCSPYWFD|{F@AkR(!h8R)&br0V?jJHhqJ#f-!|EvsdLzRVR!_aq3rd@wvv_eI8NJX zuufXLZ_AHe+Fu+>Th~0Tzt-C~z5dFNf6**;Kg1XPPvmM$Jaa}QiLqM6ptZqy^NM8w zW)kl>S@%Aix543Si(r61hedk%WyTv-QBIaptt**jzTEk=_FP!Xo-HjL3vT?XXufG- zID4VSl4vKEW0Gl{ja9GnIJrZ-BbYxl97w;genxSG;_@X<8(XC$^0>9Z#=o|+m2oo4dqsMsp7T7Amib0z*S*bV(TZd~}dQ~gWN6Yp;g(FZF2#5aCv zS?yovs=Sp;=hgEWVT`$4x=DhMkADeTEpX#Y(I1VIp{p5o-dPf+*kE>S3)hFUucJgS zY}I1=b=K(jpYvr?lLLz$Z`kAiQ25Jbr`+_9#ZNfr{P_2>!Fu)Wi~m~!v_xG6FBGqR zG{Ho9Rp_U0)v>E9a;synD)a4{Iwhd+@1n=a1<$wd4lCTjzBJ6xVO8;(&`arU-cz4x zPx0EZ*}@_I>H7w5;rxTvzqu#O(h1c{+%nheXnx?@#D$MCc&=+kIxfDl@`m$OO}>0- zJ(o>OryYG9?NxmB);vkPMMZSIxMyRVz*} zN>%&z-76kq|Ee;kzFBl_T8|R9w#>pem#SBWP6|@Gu4T!l#l30GO83iKyBZHJJH6Gb z;j_=`l*8YO*Zz9y(;2}lGWpdJ5lN>#SL90kqz@ggF52k2yUpau9hC#y_f^c&H~!l{ z!^V!!A^+FM>EC-y{X=VGIXjh}tgkLw+xfA3_WM)If8J7`nZ%m%tM!rBqMu0z6Xka; z-IC?;Sn6(r_Q{RQKR$JSSu?}ZaC*9S?C&1a>%MMMKK$?Dw-4&C z>;M07PfKq;?7nk#Cc}lJTfSA7l!o^ePoLHsV8yt;F}^+j+G3NX){FYz&YdszaLZN6 zf+fx;FYojJwXQ66i@Cqf%8&N5zE^8RYrj6QYOVMo!^ig&?pOVdTsM7X^a@tSj~Bcd zbDxz>tXo%Rr!DvC^~o1(HevZKN;;F=W=4BYk6(Dz?etkI_gwRGg&t{_tSPZts8cy;s)G$oca`z8U>b zZhqsF@7!=%%T1_z_Y3JfR`vO3O(so#`dv)fa;MLVK69y`CSEx`Nh<2!zZgvFIJPHI z#n?nSlEJXg=C0j;$;}U}cv zn2y;bb8DX^>kiqfEZTS2|7qG3BQph^#o_<*9X?KI*?aG()1xP6%I-KRSt;u(@mf~j zJkGFTX8*^Zo9By)2|b(@qNCEVdXv7`B#&)pbeFUzD#{vgdj?0%i}slJSA@N@;>OO$ zj~*|zEuXOG!(2Wg#qA-|$=UUX96zbQf2F|q#_o_~QFr9c69RqDc|&f#UXvtQI&=Tg zi`PClqzig4czDaGyP0M2MP0s0@|CtaD)~40xKDBi+%@5TS)Cy^$$t7F<07qJGmknk zMa(LZug?lU>hy_k{cJHI!%+z0Xbm-^3jTc^~_a{C%~f{>j@{ ziSqWxJ?|(#yyIs4)BN$B{5yHq{_rb!vpr9(%gS2Vx~^yg;~s16fcskPweeG~YD8ro zaMw0ht8mpa_j|D7`<1;HYWyd9*<9Re;i@J0YN`JeA;G=jQzkvXUO3UKWqF`SYMa_r zz8N7(F(Pwk98OGH7Swrk?=|N)0_(Opa|w3sX*0uk3O?@Rm+;msv&bz64qTfDRk~PXQ;Zcz}!1k(M5BgoWF9) zU@nV+`OaI4w@REj1^1PA1u1o3{?pl`KVzme|6;2P;z3#)U3q;kFP+r=bl!ziJia=@ zGs5_5djh=Y`K(>DQg#2kC2_Z+VhjZNqFfDf!@Ufp1(qK>_5b>g6RLc^vzNb6Z8-T| z|LWyI=hvxUWf4BG<+6I{3EBH5lbDTfr@Ve=eeA~nH3B~W(q6e5?A&-Gw1HLl;iV#x zgHKxK&TTrGqid0!x9!~h#*7ISOYVm^D)XwTPL^D(@hq)=yR+eU(M8^B`U~$X&D__k zHuJ}?Yw;dR?^lUU^HgitTP0gx-jX8sHcxS8$IEvUeEwOLSYJQG<7*-;aP`Y_U(?!8 z0lxJ+SE;Rkv%~MyvaDLu`x;X{C0&Hhab0{O@-@S!?0Gt?GvoHuZ7<8FIIFIzY}+BC*QB&nh*CLe!+BO`NzXT zg?4o(f8DqL*ZDH?{`9;f7v{A@J?d+J+NO-kCzD;2S?p7V7k!U$@h$ zrYLY`@rfUAlgulw3Gvxh@_i`vOSkv!s`tO^W)-ygGw)*lNsHb^i=RGqqSW2I+{roi zw}tWX_Ah%Yq-F+|ez=(!=-Kaay>M2Q%aXrQ9b5I2qu0!DYkz){|NoM^<%jZ|W!rzm zXMTSaeR0h@G0Pp{ht9sWIh<*l*C6LOFL$NpyI;AVXBGBtdUd(9*FXMz^}KYgl3wpU z%iqbChW#@zdl?{?Zx!&Y#+c`5n7OZH;p2*9rU~9Zm8Ynb@3Nk zYLBy@TRz=q^G9aB;?at=o-1;;t~>hK@6P9(B38B2Qu}LGL~d=3u6S;^i(!X+-yB}` z?8xSwNvq#|*frnZblppfa+ht(g0+jkzg-xbCT(f=f%Q{Kb(nY6G2Q#le6ss%GW-+n z)>L)(Z1`*QUg~bc($d@KPoCelbC!i^>h5{wb8C379$H$Wx%iCbseP+8H})BS`Dd~G zl6UWBp+7&ve?P9bx0-n4>W;l44>}K(#59V<1xhelFz5Bn%{O8yU<(n|)b3%JQ~1PN_gon%CbkPHnIhS9_a9S`&9<Dka}Duv^DUVQ*!VuI zmGnL!`6BQ6=1UB7J|5X2;>K|7#+ua9rJNSbze1)9ZtP#Y;#|8xgKcMJIfjL| zvd;+@u&uo4;l^<8Ky8m*KIZ|+38!XV>Zp}T`eE0?Fo*HJLDo58gJZ6<7g@P8olCeL z{@mk$jBof~tMxu0IiY=4Pe-lH^qc;@Y7clUI>FS8PakK3ytTeA%Y-qx zVE*!7(^%#(-o0Te&1um*H=x#=>0E+yK)EVoy3WU>R>1~ivy?sama)t^7`I%==3C*u zrmHoo3wkatxSl#w^0$S}wcAq#8jKTq-PZRo%yBH@)$L)Jv+)6Icq+>S9*fm~E4>-c zJ+Qu-zLe2|*==M0DUJh@JBrVo_hL41dq3glu0EDIjQc-m9ZZ&g{@VBNHI_MynajOC z+&HfIW~&|d10Igw>AZ5ke@x7FR%Ch5qy3*tnIW0yMAh1JOcskz2PCpQ;3>OX>Mm5k zHmB_O9#w{Phb{J^vl@)eV$$wzW|>o1UuR~TB;PLo`${^~u^AKI?CR*K-E;cyA_1lX zww}k!t%M8M?(4o@r}}`$Vuxu&#WaGEtn_m&E6+u zz;@7Y|Ey0ea~QYZ%RVMlz~(a7u9)RPPiOBsc16Z?hb#7`vl@)I#oPuNAXD=%y^mo| z?IJ zw$)EPw#l--n=hK{*!oZ2`dCZfj2W)+|F=(W2wJc&KYYoi5)}uPmO&ysW&8n?dp^NZPFyEL~WiwTn6B3s_v>``?o=`?6zKNJnSI-$4Ev&x&BkfbC9y{lb7;M2(Lg=1!kuIUu5|t7B33c+qjIqfyd)d2g|J({Ty#Mm1kkLrt-q)Ltnc5rEb{?1E zWssCy9M#>!J%O=u{zq-T35=Efr6vq1B|O>SaD4E~P!BBlvM_hu`tn`e43g5t**$BR z+Z*eujvW$YFf!7U|6b6*;{oOb8?`sSbF5cJFV@Pp$ ze0}qA))Nu$MZ_7B|FB=Ed%lBVPOMl;-H})s1!klDNhvZ4i)+&Q(n}k7PSn(bE&jRu znUw=uO5O4B=M0hpA8-6;YvAel(Xp}kfx!i%emP0L2@~&Y>N2E=@T7j!;+w!ISU<<{_BCm#XOh<43=<~WTR(GS zII&{KuRc%|PwZc>%8=slTTm=DocR7+Tik+Y z%hl?(9c&Fe9${}LGCR2aozm_w`}NQftvjdyj`A<28j7GPXZ?EuUKk;I|V0J0PiH4H*FZ|d~G?ete z&;wESKVKe5Tp)SQc%KUUiH4A)Uz3YOo6|eZOB;ANeovmwH-Ry6J}9skC&zRLmNxMG z>5|Q4IB}q0)?$4bh2(m#YQL(+!w#!?e)99MpU`+;BF12(aC>7NTSHIV>7$cD!CQTN zg{1?V+xZt8vWsOG-JK_^=fI}&`(yw+-(u%Y$=9VBjEveg?r3LDaoCi+U6R4bpyF7Z z5<|)te<@I)Hy+$<0}8H~_2<~1rpPL`0b3~pkc`cbce}-s3Lt0dpsfqoIA7-n1H>&$-=q6lz+WU)PHSbS- zwulz#w0V&?f3zwuSQ@kVb=AQSin40E7AB0hH4`y2kY?J{u* ze#Wx*`jPz?RP+B9|5CZqoZPhc$#vE`y@EYoKHu)Q|NqC|Qlj<4{I=;I+%*MGCI4Ts z{PZlAE0=FyTQ1Al#I}0-Ddxv77+m_UZeQU0(rDK#du^CUd4KSYT87H)OORb{bGN53QwL$`(7KS`shcDm38>WSG-(m{=F6PyXJi6 z`MFWy^`p&Y>og8C=X4uPTDiiqZK?OFR}XK#>EejGo)WWl#o-Gat1Tb;ah{Mc*)Q3b z{QnQv`SbSwkG5s}E~uZ`{9ubc*OO&&qKpIPscdjjzcZd`I-)nK@*1LDwuU(SbC$4AS z@U~!E)_QMane_QvT5`j8pWadN_FsCj&kdPezF9MV7mA21nJ%+-dd9aq{C^p$0)KD5 zv-|n___+VmrWgPCSCV42@yYYsh78Z&MxA`8{*P%w@{T6P3WFkN-*t^%3;s=L58UFW zx7JmCr^_1A7n`GBOt#7iInB~D!{qGk;;?vklM>0bGupCD{}!M6+_K5ES5`Ux%L5u_ZmC*S}woIp$IE zXHm5%+dgT7HrBd%>IIk5qGx($w;ZtV=Xvh;OWY(>Dtd~+m7dOL>{%a@dmfb?4Y@Jf zecQ4n=XF}7LTg{AdvAI(;k3=k2FayQzUw~}DcaC=u+WRuJs_aP;6jq0&o*wY*%9hb zl>C$Qyg7okPuyD`!FJ=EbS)+Ibyq5k>{4n4Q>IHXmj^X6K;w zxx0Rvc*wWAF-A(g#bTW2S4LND$t~sFczN-6r_a&)U5O^^mP`H1t>fIi-GBAJ!X>x2 zY>!=Zwaoen^P9vsX{E_$*2n8jU#=gJJIiplf3H*UON*B}?US!LUp76yyCX9^f9;Q5 zJ`%V8+itAhKB?xfVa{`T=qtom{%BTB-h?)|RVn16TA7C)MiTHAZUl|ie!W5y-UIZ8#oEJ?l2;ts1$ zM8*Hv?o#@7eSF^kYu^`~57@_U$22kZ#T=G8r33Ans(b!u8~mzjysK*Usr2fTJMFV< zS4S@UDQ$UejpL2j>(f{8aVd12`)hY*pr0t$P=7 z1-LTiv9c=6En{d)+aRy=-T(Z>yn?5nCUvby?3T!3@L0rQbNs?&(Ukcn6)(=T@ra8% zOj5diM5l7&^dlddEM8n)qjxax+X9y<*>Tf8Jj*w9F5;}sI$U+V@b<;Ge;;g2dues( zaZBu4d#9x#?O%%G&CW(2<5O7g?xbJ8jcLt#_iyv0med*v-rsgD?sVUroa(?sCr|U4 za&O!EX zV$TM>Nw$3X|FXvOjMo~SQ_5%5?hHENnzO{xtEqdPRgLVXRNl=$o>sBSFAknAyYIQM zqVO!!vog`gC#>4*enySKe*b0fG`+jd^9n9a|M6VDjjeI2i&*h&hOg7Ux~OI+TZcBV zyfB-rcJXPkykM#KfuP$P&sZKd@(JJmg;V|D5v|K@*PYFdXRmwxDa3hJnc6dc0KD#7$gqd#73G2i|As#W2?+kb@0@_*g@ zU1}neU2MX+tXGZk!t7h~&u4r({qoj)nSZjrS&rMML}^@L|8VGp{~y)@lZ)r0G$-G5 zvEOZ;F1&N&R99)=Bkz)nO$0ZuIdjqZ@Ad8dYD^yIi?4qS^-h}Ud&DIFc7{^fslR2S z6-nA}Z--v6So5NP#p5<3reFK~ zpTBpn-*?w?GM;KPdpC2mW@2Dhq3_8HRle-LRqB@T1|}Z9GovwuVS@3U6<=a(waN)OS&F zCwABH{bx9xmY?6S%5TD3kvTuURe8PW`5$TT^x{GD;qS}+1gta^{Hn_pOEzfd&vsTU z;YvIFo6~9exeE*Y1gush&+fP6n43Ot`74&2eBaVG>8@`%$HBgAPXk-umSSMiI3^0>z3Op&#j^0S;FMgp)(esgZ>0sCD3jV}b^ol>izSuftA$(m zf+othIK4=bxosw=Sfcf4wY@fn?2(Gu&lpU8?J*4HbYd6v*fdpO(_F#Jo4zWy@J;HH zz325p<<7;ca}-MQWUg&n_LWNRGJ^jo$ngc47~o$p4(xBp~sp zpV+23B})5VHLzZAm{Gk-)A7Zf73n&O91ACZoHk9q<$~sk$fI)%%i8-`x?)HQ3DO?Z3f1gF^y1``3{8gcH0&9{!0ZxpaP!MT0y zau9X(S}=#~la{<B7#9+;27uIV(i;kONlDybMYY@+;F9p z#5G;0v1~X9me*ZNuNMl2H+HUR;S*|pTCQ3$LBj97I)|)E+m*ANPVAivf6QpU zka;}y`2ry;51!?q;1W9g_Akp#zM$HTd)Ks_YdvK=8x-nHisnMR%ht_w=#U{h04BJIagbA*e~wCd2n$H-@j{Xd#tDsyy^P%xPg_2)|aod(Ty-+az@lq$n`ox)gg8ll&0%f1*x9?$^7Q$m8D)~{<1F@ zMfp3uP>3ywHdHLRbWu-wtALe<_;ygZUuvEI2qb0mZ7J8n<|hf7v7E9h?OCg}QmjvW z+d4zJ<=oemmQycyt}uAJx8=e~2<2GxAxF8z&$adCUzUZJ`R31KF!>c|$j)jH{?AwOF-8FJ#)aeo$dHt##^! zog0sxoug24sxYitU$I0>?eJWM5~)?%(YlHy6IB1Wh&esC?3#bVXc!xtZy$MVozH|RrEST`W zc%4bxk$d(3D*yd?J>UNH3fWh4IgYJgSMBn-dcj2F3tw&XPWv>pKjwJ7W7CB6qS=cN z`s>}f%aE&MGRvGRs%2*6^aY)N&1P|4zp;Mh^yg9w?s%`?vHQZC{KrmbEUj}V8S&k} zc-P{?dBZhV|6biNRj?{gCTRb)A6_$;^eJb`?0oEDdHhhn*`td;E|gXOdE_*IyJY(A zrR~MFL60RXF2)xJJu|d(3%q5L_R++x^4a#@=~7=${yNAetNo$6sj%>`cEva2@XrTR zvNk`toA|o;*1STochBbRn5e#`HvUtyw(S+~e#&N7zE_-f{8sp`Z~APK`L_RS zwpprgUHeadjrFXZs(CHdZ};4?ka=@y<6QUGRcV{!wyz6#^I2R)=VSg~lYflY{Qq&c zRB4N^dvsr4;(fvMjRB7%=AQkv<>nK+Q@MPLWmF4qT^6Z|+x>N)d$o=2{1@FD4e(E?5$&+U1gF#Gk6O9erNT2-iyD&R(p+SKl6k6g^lm{F8Vy4 zGs}O@+2VTLY>(u5$BLgf+|IZr`24%{+h?}96!t9re&*jg(;v1w zw9lu>m8;KM>~He^%)x6$_fyw#&hnoZopZ;-P%!-F<*=x!`@dO5f3|TjIC=fm&xecV z6<_)k^~ExaXZ6`@H7Abq!7QzS*0kDI-Nsvi-mfME zyjwPL@nPq+ua7SMJ>_kDEC0P4XXLiZSGly#n|VX|!J5a+@-wYoH=lPnepx=6P4403 zhsyJ+-J}}Ti|l@N*#18AMezK+w-?zbJ$>UYf2-f_9mlU7&5aM5{N!s2zp!xRo&4D- zdta*L;Y7LGif0S@TUA~p8+!lPxPYx*hqX_Bvs`Ua6OWy{*0+=&9m%}y{Wf8b?S90> zYFu=`_WJupcK`d${UTx6l6Kb(*L;}RY-YXU)WeSEgY1c2|6QbG)cYk4zwrH}@UPaQ z^2n|hb19z6)L!S5ev4Tz1k?Lx?46Uqf5uX%`iNnZjX_lZ>j!BQj>|gASvA@G_>uLV zD|!9i^iMn;bN*deJZZP>h9%q%UktkVZO!N1KilLWW>lr(y;|){gphod%IVeh7m`yy zTu3(kbRpSw%0=aF;z+?fwkYY>$r;VLr~=7ByWr zO<^v|zc%5Kp{y^jrkU0H3WrR4-kEF}g2|1g^V^Q7|9BMSoW!q@c74K)q`UIF^X4y< z<4p3G5^}dMZtu7f5HQur^-$htHAzl?P2&=kLzRA$j%}GgsYY31M#Mp->2`?|uiD<3 z(7((5jp>`kdoSLPKY6N2X!EoZ8UMgT$(#$P9ccG24doPm_3@-v&Yx+byM(^w{pFO} z7;CipfnfC;b)Bp0?q4`i_sFQz2k-pN^tqdC9Wt}3?P)A?ikeOA z$qcLD<^n$sU*6yXKCj@zd*@$q*^zB4Up-~&5w%18GwtQi>wRA7t9iHTTk!0&DTjh* zKeAZWwZbfVvTF4%oiz2WlFAY_H$uM7l37!+=|+y}l0|9a)i*wO`noQdKJ}Pc*;yu` z-B;BA6`Z;pJCCn;&CesMId{D`o&MnGVau^>&iCh!Hx}HUROq-rb*@OdTc|}0!^$T- zA%R6|VSzK zn(#iUQ|BBe&VPOIl)v1Dq!gyGp4dgAi=}sLdceLm!!DwB)6}o&X`)A6H*`Hxj!0E9 zIo!phmax?5%f>D)jR@D)Cu@pWpQ?CGR9qd>z3+c$FWZV0?!qfHJeWhKEMe5@y40ez z>XL(KYUYBjT_y{?S~D9?wJy6qCq+2qUF8BVIo7G&!TUey`N^+{nPaswW{y?+qg5;` zZMHaSwb^+byrt;+v~@y-1ck9 z$2iy&!+tD#wEmOVsf=55Zu@>)yn*9JlC>?%JIT{!=h{>A`P=U0-L1YV_;k(r$h&%X zR#x|!MQr%GE~`Pe>WWnRlB3n>lF}9GPd@ye#kR@D)8I>RTC@RM`i+ibkAH9l1z%42 znAshg7VmoAtn`T8wv|^WX==`udEd8mQQWibQV&~m1td2YxtB-J*!FI2tsv7{`HW@P zGNL(S_T4mFG>fTat$FM_N#=TX^*2_^v%{{*1guG8%YKowerE5|mTBoe+ahNjee(0# ziRCLNt&VehxAH?xM0d;bZj}$m61J?!E90x+{IH`kov~}ay3pAg-mAZ(cdmYa;-Bze zk+?;VltOmP-)$(3xh3luv0=*{JsvaL6Yni|E-te8H7n_R^nVxk)~3$bSNj4&u5Vda z7Sbpxr`?!-?4Ox5Z?E^7ghucA8xFjZ^9jznA!=iK^V5YXv#hmFUs=BJ(AUY@bEUL& ztbJy$ic|ZzXQ7kvh3dQ&8}i=;OKWXmj@+!Ac0Bsv(U{0{D}Ft0+IQoJXqxv_w+!!A z(I2aIMfV+)%vrf*YE=EArAi(*f*y+0sND#9IOF=WOz&0$f%mNs=f8e3P0Qi@H;x?b zugT{3JgX`?gS}g$Z2n}KPYvES_juk~k?Qp;mkJ%X<6+6IWxABxI5%pQ#K8xL>rNi5 zdVM*tGo3d(U$6D{1?>ZUT#LH4q_iGc7U?)4GWAcVRC7g-WU@`>`@0iwygid5of_oM z8mYJ6UcTS;_Ou@EUu$3A3AFWVwbk)m^`klX4X4nG8>SX3_N-Ruj8SG=v1j(D|2MZ; ztlTrRYRRW-$335}oj6(RrpnZ6xs`_wJN%gCx2mHu;mG%=b3T@xvV8KqYRRW&_LUMd z6hxh;2ONFCwp!;)qt>kc5X;c{d0LIHTCNxe1nRM`xZ$fB6j;Q*a?Nb6fWS@a0e2gA zEbUoz-*AePb3mlM=>KT@r&B)Fy$U?_TXXr8@4B-12$H<5^>k|J>gd7O?Q4 zvv}05tR3}}(j5v9<#6=PSe0<}*lxXNMxnZVYt=tSFmv{*2Zekq*y^5JaXKTpX0w_} zuSM?hnv(~&UY&N;WAZlci&uFUu!?f>9((z3Q?B|3$!Csrq29-4)>Y?ByH}m*%pWf0 zn>^8my;|&d*fF-O6dWV_o%|7gBtj%6bfL3#b23uUztcMpf)# z<=v}&CvV(!^LIqiuIYz!=lStIG_mnMWS-V#TbO%v-Hx0sYY+JC&uodAm}|^tpi;KI z>eXHKkZUom>#`Pfi{9AOF)zXAecF_f81XGQZZcciYpscb8YNWv7tRLDh|mAz z`_HfPIr5p~=EXk|^EqM%mPLsEy`ZD&YPippT~{tiTj?Uh z&5hP64L7Ouc_kM&G%YY|L)D)#D1cwWb1+cqpMlk8uf3doypVZ?>PEg@UNGt z=c}da&-P4vW}1B?j3bu+v)dIvY46h)-#uxX$`H1(FaMS1pEu#R`Fo98I`&!3H9lr| z-p)3JjnDKg_uTsar}JOTZA>uSmKzWv$}Mf~_vTXDey+n!wX4r+IBdDGT>8uVjsMGS z=CHH!^E>pUA9_1$UfeCSJzseR03PO!wU$_Z_QN2(>)qN|<~+ z?N9r=tmEs-%oqN(=juP;t*;{Cerk7KY4EMmW%BccE_rIru2r#fIM9|gF@n{3%jbVJ zzl_s8KHtt=Dl?gv%O=_3o5bHms!y}RdTt$FGX3EfnVvN&Th@fQP4zOIADeZSsozmJ zw&Sq!dKV`#ow;gDM3yq|&M_CzoIBy!woB1Qg$qtbB-Kp&s_>otDWl=XNiCOz{7)Dk z*|GL+(_FRJ>Q|c;uB4bvZ1)s5e8^jCkT~mQT<%3Zp8Tw)KPoNkTseI&mZ@+|^#A#- z?ChEob1#QU{`e-eInngU)B7I|esKV6DI@#eMPjEI*fjyYtwK zc1C!HJfFCgyI5C#!HL^{wuESPcLg;`7C#5$%8%Zb~^K%Hi~3V;1fCj^6$K#s{cA= zoh_CZ&UdPn`6p<$AaYgx#i$ieR_1M9A$#Go$Qu{kc{6UgEIoZi#rt%JP3eN;TxxDi z(Mk70Yo+Gt-&V`kO}h6f>U+u7Q%>@VQ#Sj4DO>AyoN@M}um3UwKQ#(APrGV0n_(Wy z3$b%`Cs}q!FR--Sv-h>Z^_Idn!n;^K0~D-+g0*!EW(A)0)A4_6sN2KhsMzQ+XU+Aj zB{P^;?R5QCotf7BPRTcI#*MSP(ynbfYNFBnlr8h8!2U87rp6al&njf|zO=|{7#A&S z<(nh9mb0ip_iCtYfx`6k6^gUs?DLtTjz5^WX;$C4rJr9jGrm>7yyi;5;qPngG&40f z##XDW`Bjqhv&V9U+VMUg)jSdY`2C+Ie6EO`8u|0oGBNYCv+oav-Rdse^erv#O;DxG z?~|-IESt5SaFwJ?S2%s)nx^BlZ26rmy9IvPs2<8^)f0~*9`86; z^pR8BYl6*(z@{a||MVPhCD%_$koh3A)W){U=fh2K=Tmel_Kl*M|&$muTYi6kD$sD>oR)|iH# zkn-r$-FqDld9&s0WZ13asLY;aIXi=~YDN&FQBdYwrYRS!erF%-jH%LdJimT^zs#Pl zfOny%TwnBW>z?rRna)zz6GkQ{Tu*R3TXg%Jtfbp%*ApCTr*ymtIU3xo!`v6s{M&O4 z+s(((pX+Yt+p<=s<)7KF!yL1yMS=Ikn?E^Ud5#F_#apamuer%P`(os~tIztPbna}O zxAU-Te$}VLb_%}dMZSq0?fKT&7JfTfc+SGoBw^v|Tfu$8oQ(7BOD|8<2+5vvIeu}# znYq7@KJ)QyU(OVDZ<|ltZprnP6Xv%p*j6g}=coPGx5Ad&cf_Ph?V4b8{HK{cW7WDZ zru*-OPZRvQe*fv~`~MfnKkL|{KWkUp-@FFvb?XxC>;HXyuK&*A(ZWyf|L+TH-@w53 zq4-Nkke9VP)6btj!mK9mi!)jM?{g|!ar5J&fjg!~OSb}S$U0ZK9xFd zY$op4HW}}=UQqqKwB=cli-x~|Tnu}tr`r@ z?>C8$)|vTvxujtN-*opz_6dJh-?=Vsx#+Yr+Zlm{`Rpaa$q5b_2NS0o=qN_MXHnSP za(dZ*22P_HoXeEc{J2>%Sl<=dh$6I$!FW{niSldTCBjBR-Yoq ze0r;#Y+C&;=hs#T#V(xjO6gl|DJl7KU5dP9>pbPe+jc_R<|;QzZRf%#3cpWe>nXq9%TjBTt`_i$pQmN#J$Z+Y%zN&K?pQFHO`q?l*bqMAa9f;_I{aqM>gAct~>2(ewH%rduci|Ybd>OlWiA7)809icvmWPT`=18hW?obH znjyTZr76g<8BiDc@Oe>f`9M{wfigD)Reec9Dcnm*E)--aMRpFmB!ld z&u}7A7So6;P4r^a_;#PWFR-EAMhkhytbmBf1#OyCQ9in)j zVY@El+MDhbrQ9uY3!Fnw?|EsEG)*>or{c?XhoX5~lQ!!rcfa#jw%OLQm08Dj#@#df zALXmOVVkadS=M6Wlm7>DUfN8PHhNW)*UJ8}?@x5*&aGUFWH>Iax)HnS9rtaS%`;+W zOPo05&C9;&%bK*E{I~NHU3VSYd8f4`y=Fyg;`$&hOQYqI!V?qtaw=wS-^Lwncy%gc z+MdAm)<3KiL^`f7mt0uYDpP(!c+-n2mNc9Cdm6G29X7UoJ$oUC&Di;3K}(2nu=o9r ztTaE@-(tlNGP*40`#wBSxmWh{%@_Ph-*TSKampxZog#QD#wwHj!qqj8+=AD(9HD#GB>L@kK78V}6R-F= zL1PPf$%PflVxQlN6vxc0{2-8WuP*F+;_=OO5@+V_KO;W#`f0;Y5@(jQeRWh){p0PF z^+hIf@3Uiy9FdD}Pd~FKR<8SGPEUv<&z3lOg(+{WWuMimoZ;KLYH#dc^% zap$f7jDOC3xRAPJ=jB4r8?TZW+}uvTjbnJjpY-h=--ed?FI+!dJKS%mAS|T3cDwk+ ztHvGqjkm>Zr!_W~rB8jzvEyECx?T9R`eU~*3mrSet{9t9emLs#*}G>uCPoDa8b$rq zzZp6~*PVlD{UqThof?N07X8m%z$lvjy}maoP{~#MlHh(Zwq)f;zP(DS#fJYT9J3V= z50MrxP)M1$yR2zm`o!9&TAR$~tA2Ler?YF{gJ~TRDY2KGWlCdG!vwR7xi)-HWZkD? z;xlc{&S@4xrn~2CQc8X{%fFP{r!z%Jm*ukcrE_^4tu|@VAsXw~XYD@M`{?|H*mBov zTnw`|9@O2WG~eQHKKITu+pmdFS1qsI^m^Uqv=1K+=svz69_em(=CG#H_Y9^zl9x}I z+SG<;9gMSyeZK2mxQ^oP&~IEvELTsOlKpG>xjX5eFYf85e9`K65&O2axiLj-=JYD* zbBp?S&V9Yv{G@oq*$g$uhlSS_X8&JnUFy0;`(9Ha_e1kk*9q^u5EJ0z-M?hM#wJdLHV^xlULh!#DBB!ZoW7)Ecw3 zSQPT-v>o4mqRZf*?Pm?8`E%bMJAAj;g4bE_?YsL@$6Tsby!pP;!RXwPv!X9KAD{3# z9o)je<+#~ZOX>Su7n>wkyHn2>ZvMIGPHdX;?v)y!R0~(;#J%({DdS;TSbKjghY|D9Tt8tUj%XN|+ziw<_ox9}muKW9x{3P{K zz654fx(F?w<5pmIb@7Q=Pk-{Bf8=wf>xB5vjx4=sefOQ`ip-5CS+Jz5Y>eKnh6E-t!>w$*k6xmhk1ee-G7MyC1kiD_F?SC~I?oXlTmWpgUQsRCQdL zb~A6DsWUw&$eUG1^Wrs|)AN-Yb2oJv?2J4vvHHaHCMCmHn`XUf`E=z>%HNMikDPh7 zDP~^BuAF9}O3UY)P7BI9JvtViQpgf>@MnpmY_`;tRR+_SPSUh~zS@hw=vqzW6w@Cr zVJ&VaPuGN<>ec$)Q6tb4cq*h;Z0U-Hci*WOrA^Ft5uLyHL*V?@!g9CGk(yiA@~^tO z%XD_^(gPwBFRi(fnrN5!BG7$z)oXtHWj_^^zN=+UJfv4{I6ZdzM2$3hlJtkRqQB%1pjnS7&p%8av@uAe%u_wrM3{Mo&3RVoXGe@itU5Ra^$ zR-jP3BlpNxPyTbag+vM;Zf#dmRr;_-u|Pap+dp3L=bNI3TMGl{J)Lv;CC`L7rqyT9 zeN?bIb=Pk>$F_%l&-Y#w`0b>XJ*jBfx@9sG9~bn@wy1jO&zH7&b>1hDV|~_UkEevh znjNvs{&nC`z6;;?b!QayV`Ia#<_d0_e@66Sx^VrsV)?0-F8Tp38$>2ozWGz^`@M^y z-aDeGb9q6ZS^rnlpI1Uu|14UN<8aTHCFWFoCa+G`+4&+@QUvqf3mZpj?H01^n)H0b zdq3N)KUlgp(Qo1RwiFL;PWX*NT=p{+H~=yQN~ktbl%x*z%<{K zdEu27C8K?@8l5VSYn-(uvSpo)J#;&-cQ8&Q)aBIoIWrbddw#&WbIIc5|1(NC*A)q{ zKXg9-X39K`EAk1hH#VRADd%Fgdkw>9zshSbmegD}ejoFFLFx%D(X4Bh-Br)#e%e}k zQuWB*F9n>3zN^K3m@{S4?{)X0mNa~{Oy#JV_*jEE<^lHsv3S`z)ohPSzqOyxov-Mc z$Q+bdU)okM+50?yWcb|gX~!z<`=ljB7+OrWOjOa4=14s^NwJ*UwB?@06>qm^vqG-4 z1pHaCa$V=*jMR0SslB_@`e)x`414Ub!P9b8`;+nqieH}B@JKoBwRacXUlQ}VY0bYm zs*hZo9+|gVciM2@S1DntymIlae}bv+obXmDqx-%ynR{HW6`1L+Vo`1nuG^7%{)}Of z#l)+o*3)D}9{yC|P%UH?n|451>p6!-Q&C+^?Fn&<{jYdFs=PC83K3Xqvj4o?Qakhg zR}T4Hvgc1NQs6kRcKyc(O5FU3c3ubrdvUrl7;pJeGW zcZDj`6cLfg#Tt%Lq8}7Qm}@UBOsG-*Bdo6ZJW`uup3PN}-x{q+W|ieR&T~GmWZLXm zB{;DtGJEx$t4la8Hyd2J6=~f)#D4W1(D!C(6)`rw2sKNXm> zLyJ-h*Dti|Zrd}}etEjs-ltLrzaBZM^GRoG@T;e6s#ESCT@=Ro_3W(5d)v}IbjxpU z+J8dO{cN$=zGrhcXXM;FX>J|xe#xb#gL@{w_quuFT+l>yR)gv*4iXGJAJ&vdeGdyfY;Gr}ltB{vr2_ zr|_KR0;xlb{)hM+lj!-p`ij7hN6*~56l?D--l@p(oqdubbM5t}7~|;w*G}~L z)Y@iW`(moQ%GX-t!Ql@l9i!u4^E+(TSQQp2r{ANnM|y!`{*519oty%07w$S=ck6pn z;bcCbd|tTiravTjH6pTE5!#jGJ2vuQ&XBt7SRk{;B3AZz_$oQ|xoD#JcPET%TrZ z-Lq@;mrI$#mPb?Sc6$kBzn(X%NM&KF*xerU=bM+E|Fn1W#LJ7$<{$PBXV~1Eeo{qG zH{fm929uP&TaB@IWIQt_%hv6P%AB1#z2(F5sjGHAVpe&4=G2>M^9?3nYZeeYCe)MP z(m4M>%$|_DM>(^XfBUx3V`+MW$X1b$N&6>G`OzZDJb$s;-t0*qJ16%Xz9cg7;Zc$1 zBy(%s&+C;M0+gDKmIxhx6Ee@@L_zfS$RwYC;!dCDxGr>iwK$yVlTr+umTOAL(K7+7 zrE1d;-kbC0UfRz`o30A}TqC)d=gGJ57n5tQ1f<@Zn*IBC@s1uN?;8vI&+Op*Wo_he z>O=CYbD!R($j<(~InAt&>HOC@zWyg?&YzZ^(#HOD_u*N;)Q@@w|316xbv)yNxV}pl zQ;HrgkKJ{&U1UbS2ll@I^moBsaWLur`C&S^|KQ`d-ux-FFR}V zVy*EO!`*B0+nl~`TN=>fe%EC7l+Bth`vvvCS{sz_xV=bG@`if0Yf8wmSJS!WR8r4x z4m+`KK7&f5#nWl?Zk^S?-u~iyvckMprE2kq71t(|Rqp1TX)JL4@4ctHvQL*>e*bEE zfL_R3p}%*x@33=ya`(#06YKI$es(l!Hw;%Oekk0wBrCBj@^i@UHxVV*^DjQMyMEw$ z$Mb?i9#0Amt%wy8vC5h*J3rRbk~1oB|HS97{AK(fEjuh|dDMViw`pON#(~h~Y-=nk>=Y z=Z_29q@)+subLH>?d(bXo1@DW&U$zC9JQ5=N&EJj5OICh6d47iI z(VJaY?XtrPif;TmV!v_Qq+idgj-9zBoHRezrm;{b`wgo^%f9fwP+M6yi%I2=Do)Mg zxO(NNgRas1*G?X9K7@5lWXb0jX3CwGcc@rmd)lAH=`4|j?+TCJ;OKmPeaQsYy#icE z%X7b;|2jc#VmaTV`GS?}m-d}HFL7S6ztf<+@K?;a7qbhNPg*9hZuZh|oT{aEsrPTI z=l%S;$@JCyt%fOALw`Blog~*}_)IT#QgD2M$GOd7SGsFtPgeK1)j0fj%akqkt~#mp zeUjh$x~(?sTbCPm?wc6z;e2*dcOqxx+nK4BcbZMF>RLw6m=N}+xGwJT>uFAIEbr3K z^gKH9$Z0`hT+J&X-QT+fR{gfzKlw=Sn@RrMeskaF-g>6EMeb4Q^f;G0EH5RKBTekG zO|Q@SvLbrgBCdt`)3P`mt2p}iEDnBKJZ;M^Z@<#_YC5Lp-zfh4@-pQAlbT;s)|88F z`BV~c=x58hca}@c0+@B52cFbQvpBx;x14d^D?2}-=uNY<>(!RKmrUn2 zxK8ud5)uubt9)O}X$wc`v~oqBp*_v&+x?45qGFMa;Z|9i*kb+;0Y zx%{KvG5lGxS9J34bpmp4=RbL7x%QrA-;OL_N1xKZNftN$mz)u=Wpw`_`*|6|HP_0* z4SJ_KSFe6#oaVhRdE1k{Vr~=j7rj~-vFX6#N^`ASsxvn`baE`Myin&YzDgig*NJ0qTi32_6$^;$ezWLQuEWHmb6pqyycS?{S!ur60*^;x&i}4@?=8vEe?Cj8eYW~s zt$5Qt4-~E2V}rLXJNK(3^u(`}4cl|Oe>;_x^`xI;(c1l7G+@)}a~Cx=?5hPf*}0xR z*BKtWYQNhA)|j-DhHu`gmd#%jyT$L<^QwJi99z?QzKFZb*!yGCY4iM+`+xo`EsxO_ znJ;x%{MR|V1L2STXL~=EGiMPn~s-oUStu(G@xMt+RdGro*;HClV_j8f%(W{5;He z#8I+qUt!UXWUJnqxs6sD&zG;55IOG@(}L;K3po#lI>w>XJ1T7UTNSz@$pB6BcgG()8DL}xoFLubxs}6jJw%wo~$%#c~YICf74p0 z>rM!`nhzmR~y3T!B|^Pf6-uJ5@HcT8BO4z$5o_hd!w={d|_<%jEaJySa(6BUz=) zGoVjU?&w>eSvTexCNvtd9;<3IWJ!PY>s_hha!ap`#R7*yPU*R3zSq(JWV_(g{`8jV zKSaFi7p8MKz2yAa`yuk??;m-xuJZRU6}&jR#PO$sz@^(76D_}7+y9y8#fP2`a_3$L zxb(_w<=z=nU*uCTW#6up?^EUU^rl7zewe-OmeRDfG4-FbD+|AR>UhU)n(dayQBXd2 z!|@4q6U}bSFJIucv**j^D~D!Ai+w#5RXJ_Kv$N)I+!t=2@m?tP)JTY_wSv!*r=%*4 zas8hk0*_Md=jx}_{#A_#&sUWE9=>{ln11(K_uh%~43n?89F=%HqgLj?>N)KTSkJXA zk|@`lw=^!PJHAq8;Vq@At&aPIgKIs3VB zy6X*Jm7VXJ9&-s@QhKLq-5TMUl|R)pq3-j{&0p(|%wF@YXQ7*Zr%0KiLe{)#Q68!r zMCvom`|dJiwO>BaBzMHR;>cOGg!B#5k9jEiSG`)0XEA@NZL>{hdi}AAv+pIi4w`Se zmAH1=t%p@8S94Rwy$>8O7|Sb|Z`Y0Ia?Ws57!?OZ$kV+?yuy{7mYOuVO2-8#YW zwENTvKd)-fbv9fU8TX|6gxNvu_Q%CV_wPSykhk;JeNyy&?SvXTvjW$vpJ$vqFA!d{ zS*YocfQ0V;m;hVB&40NR^Y|amoGW)#D7;Q?Ld2sJ)7BLmAt1WXEH14)zHEIlzgID{wwSrD(_1ZDLiMgH z{}$~to!nFSdYU*lT2!9-bE5P2B!LU(Pd+T~71n;`@HtOCnt#p-n}Z(RDo;*dU|yZ8 z5iq-D(+}0N`P_s4%f3K{bGI4#1qK)^fS5xd> z-<~XX)iY~KgxcARp4~rsw7T~`;4%7=9d<%OCS{WPu57Jm3;COzY&tX7YpBmV;xqB4 zl7IDe>&RD6o!YATPqt=QR~>gqF??%%*z^6m%KTP=dHgd4Bjsm0uCQgvx&2w^ih8Kx zk;5n6d3WgK)u!xTnYZ%SQulX(@;0;dB`0^u@tiF$?XkLl=cC3F;dY&(KIb*L7Jlj- zj%Lh%TMAG9(lU2g_#;mHQeUkE<1=5KyzS|`gtz`!m>+lJz@uNEuX6HKFs+VUJ!9MA z9rtcqXU#}S{&M>G$wjxsi_-h8yk#%*OCNQ7bV9LTaJRqwY{OF`J9pzKjXb*9rll= zaaNqig}?jl6k96yN3Nadt@z8|_NvrNMIPO$%jPrH zFAT3Sc=T>k|NgLRf$>M$c{Dt`b+=8NCh7i0Oi6veNccaudX8R=%O4({YS!YLJmKmw z;Z#AfpN|^m=QY?Qv*#sAdoFKGSDA2}NBeZFcg$K}<=<;osO!z&`c210{&Hr&V)vZu zN^x$tmMCZ|sVB{LP%rP$$&>l&VzkM0wfeeto)@az9lM^Nh#fz`pyqW?F?u6rrgDj+d0=wjyJv@>LFCOn{*ipKv`M0Z!`n0AW{KA)(YrOcbZn3d=NA>B*-<-$&CKVhG z2@LhEvOhNU#*rMg#Y+}hUUmq&s=_;F6OI;Z2&W9hCm7Kn*J?F$G>$`h%m$2n1 zulSkiHL+@|6f+zc20l(ZtKPwIeKDmj_$PH7|*7!&>gWY^5m`jBWsLKt(RA{ z*f?P#+q?$Ls=__fV$XVR%xG@id^n}}d_#4d@}!q_`kf*r91@Ic8h%&DN0eU8n{d8X zG5K@xTb4D`@|I27dhfP&im`}OaQN8^KJVr=^Jvd@(3xM%Y`@9Y|HGpB+IlPoxqRx6 z+#J_Teiv3yv?FiLi}h!_*7nJJKiYaR{~-H<>pz|~2+j{b{eQo=&b`?xQT=y%U89bB zc&?ffq&WMdYz}|t;gCY#!~IVyEf-9<7Zzo@$U8+;V!W>4pFDeNxI zxF6^v_rY7|fnrvBr^j!TqNZZ;*^ZBuZEl{FS-mF8dVco`)g&#=N+JD^os!C4c1w-^YCWzvgh{zsb=J zr6()HwSFEFm%eeE^F=b>(Qh|u9=1haJbqqxPS3$d?i1JVo%6z5#MMzlY;A5gNAkp@ z|0k`#**K6{dWoZ^vZ!#lG%6OR7RaZ$fx5%Wn-T=K<( zlyh-8`x?HMDE`TLGR3U&WIp=^&&It^7A-Ko{o$?j_cQ9xPB^)hz1DQHi#!q&#`@H0 z+Vu3^55lSZoDYJ(xwY$58~hS|<(t&zR3-2KkhP(6;$8*O2mR9-zeRkV9N-jl;?=YC zLyEKG3PqfF<22uBEx6it*6_{xnAk3B!81LEY~#D{w{|wH=QY*2 z$Wr+B-QOhwEPhAMX6tOO`{JZ@Xt$Qf8`bS|gXd|@+B}Kl=Hv+n@49VFeDG+7WqY%| z;_9p-E`i0T#3PRU-qM$Gr2jF;&q;G19}d2houq0zKQ30KsBgG_w3zUU*X4Yrbh9s7d_srBo#e9k*{J`*VKw=vzAJ@;%RW=}uL4KADFD#UIwm zXL_-Hdz9waU2&--sCYsZe}!C;*NRYSH=W(a%grOh7d{c`7dW;0hW_iXYn(FmEpHq? z`QejG;8X6$+Wj$2PZI>EoYj3&E?8OlNX6x;pq%-IJvX0TiYj$zoqSJbLFL`2vv2nC z&vMsMe*A;8C|8GF(pAQ6_4QD*qPV2Lc8^qAB2N6Dc*FbNybsS-HavK15%4xf^WwX= z|0aF3^^ZSZ9JDcVik8NC|M#bMi<)YwRH-wutp9!1%PwQ#^0gtp>8tuO(l>`*=8HY~ z?r6X2$6t{by61l_ed>L}*8P=}nMhLPolvdiQ*ti+{yWdA>S27-HqkHd5*BRjs(+~Y zbCST>BM*;E5;)5<`EA{L>HKBfYXYALIz4QytY>*+^=e)`S4EJ-yhGjzGkWW5GmNBz zYqU0eIkueXwC2i(fB(;@IB@+?V}Je6qZYv*pG1UPF$;!oD0X5|57099-*LRVvHaqL z*b_`T)%sFLH*Wpqt@Ox4>%`jSS~|=3h9stE<%Hgd_1IE%Wb>Y9>(9mnoap*AC$u_1 z>!FqSw}uyAEIMRU(>w1tu=`y1;ZVJMS${!XBmWb@gnf?`{!g#|D!HyD?Phv^EXU8x zdoR{JD`&a5b5)|VdUJMiZJq7v1AUva{#0xWw(#uScgTm!Nxjpfd(Gu|;bWnHHt}!L znBVnMPerLO^v&E_+to9QB2B}E@@ngu_6g~v%=Y@deS%%-{{9=EQyJg5#(i9~~jfsVa1~mStWwhwdei6 zZuot6PxN<>2TUc~;}R5^%ge08h0GPX!wNU6i%5GvxDyhhc=vs-o8YBsc{Zyi^rhd> zRH$;FB%u8>IZ1PlrCN&EdSgzZRc)WNxtzYeX^lAO`mw@#V^ea?-o+U&nw+duCJHeb zAMH+G(4PEd(tJ(rlxe3{v=wCuD#p!vVf)3bKKGCHxpYM@+3OX@%~z$U9TjBStZuF~ z(^~e~4^D#gIX zQfhyFGw+%1N`ZGr`M-vq43~W=F~_gsOaBKG`_r2z=-b?nO`UB2=zM^p!P&H5djfAh zx#DXy*NcBuPS*Ty$3L4ZK4q(_*WEw&FVCi@o+m;cK0M--mtK{#f9`d+(#dw0G;(rQ zolb~(!*ciY4C@oqk9em|=J?uMY~!!nZ^tD$x90CU{{wRKzR$U@WwUx;-F5abb@h0$ z{`8CIQdgJF_S=;!Cn~Zaea(BfeD6(l*TWyhbnaQ5CY^fq(x(pJ#m*8z4Nt0ry*7 z`0f=sU!B6WF>XX&S1R?zvg| zt?Q02Opb1M(x=>V3u-z1H11pEV*BO#dmpOpP2J+4^DO#T@s2xB&n;dq^JL1uIdKdx zbqu5CxfW(^`J-Uny>@P8(!J&9=j$vBcX$*zSIpb@%;B0Zd5%3lzlgeAytn>H)^QE1 z))fufPFrs!rF305qnqnwGOI^N`haWiWV1t?HAELN^=;*JVmbfPCVb`Wt*r94z6}14 z^49ourzRKPy63fDX!+a-C$Z&!vy7wkenxw}S{>7<`@Z(*i-)NPw&uO*2rZHQ7`KQoYIT3#B>hF{@#P^63#N2L zRR`MdRGYNvs>8w%)5-%+RTh1$N!463YohZ;dyizTyIqSX-=BN4H0Iiw6*G7D$GSvr z-n@h3T2pHFla;4_y2xzh2wJ}Oi;ZK{msKkgTqQOau}JRyV(hwT`u+6}9@iY~dT=I* zsWhPK+rb?Vr4=upF=8zZ&`aNX`1e0AnUXc^oLlermkCur7TY>QFyrmbwBDaeJ&_3u z*sSJl)_L+}s?`hrCey&J0eVNu^&6UI+!Jp7E3iK^?6eMZo5GG;oB3_SS55OwJzFp< zIPS5){^IH8N2FBs4Nut3U+>oQS-kOEO^S)S(G|m=mR<9-WiM_oKC%03j?odrLebcB z7rqzDJO0YrxwO$LEi<#}Or)By98KH6H@TvKlO%BcJ>DrB(*!EBBbrN{>qvq(w&vx8@^R$|tTB>>cud3tL z65=_g%y}j2^cPKzBh7``u4}hxh4x(CYW&S}M^@&;m7R6_5;d-IKM|d9PVKpEXs5;7 zS5I|HZy9~iaQfGCYtE$S1^2oagn3u~VNxxhvgAtE!V62oqOE64xV@m|aNw~^*X;R@ zcrQ{o-M)Xueg|Lk{`dts-`N@0C>E;}x|uv!@%oSG*C@d#PUZH^SF&s4Tyq+?%xpjP zb*@ZOva6WQZ5KYlUIu|DEU{e*&oWpJdi5!-mN@=v(W?G3mYbGuHqTleD_QR+z!R=%$1k@Cj0e#Z_;63@Ln}z{mr%Ot~$MOuDiirdEk-L4KAg= z=aH+%=V81ld=+`M<{6+M< zOl$E;YI z|Jm%i$KH9gNc&31(L+_=SZmDhX|_~yH_3~w?0(r-p58VyINZjztOH=EuLyLty`Dsh+`OuK&7^1t6?d%DWn_s)lW<2RSHu+#0 zQ-0wmw>e*pugN@l)_cu#Q_%$*P4l2Xi;ec{_B`5SJ1OVzlVwd?Ea#i<-J{JSvG{qT zgW$ZMkvmSD-m3I*K`@();oAEXQ(x`~WfO7TVdKSWcu#s}lgPz~snh1(oV;V*9*Zk= zZM{d2mHSOuygpv_^WM(QZuO_Xo(!}9sx9@`a_+*O+dm>@?Kr;H9RG1sGBe#(%+}+o zeVx0OxQ5fg_bcq980#)3ZRuRgzLR|}Q-S+oF-G}9?n}?AuD!@#`EA2Z$(6t5pO|>% zsI%KxSD#5==lC`F9G@CT@60nnjPv{(a`Z0*AJs?{m@?sa^yaRF(^LCwo!EZgnkac! z;f~DS?rU?eA9-HFQ&o}w#`4KxzY`nJewejaUUTO>=PQd9_TGEGfh}&|N1k_%hkvyx znS66hxDzAT^TNv9+i}D5bDf9TvSOL{vL9Og&c?Urr}owe9mQ;M*`2ewjNE$DZ*?s8 zu8Zc0*gVsDhdcAjbFJgIGk>nVJ39tPR61WTXIAk^1n14$vxeM&g+{iZA?Am^|i1rKJUd(^zLdEq^g1!?MB5fhVQWX!)#% z4qvvLh5W6SmP(2L+H7%OJv~eCbzqcJnVoLRx!tvsvsypj3_ib9ia(XtVkTb#`x}VhgJkxZTdho0lg-Nutwp6j^LFnxN=Z*y`+n;0 zc7?fKtz1c#Q%uYF%Rh;*96Rw@q5S&qx!WUbr>$9j#OA=OO_$SW2rv9tr{2QxIYLZDbn_yXPE9J-tWmKv;DJuk(q& zla$q7FMfP3+NLaIC-# z4Gm3uU!U77lB7_f6Ds)j6m#FLrOEz!*B7W+d(EowDwAnh$&ixNe=y|VZu^~Up6XR; z>jvs>t7BaIBJ@|!e*5P)kA&3OFTD3!bISsq2j%VUzf;YodI-;cy*ML$ZK)l{lH*hV z+izsLlp^iA~%oj9qH=}NBFOWkP^Y*VhinW)hdAvZHamd7 zrzZ-lvTt56U-YI$T+5(RwNb0dVv>WX;`GH+Cn;ICUv3vklwu9^fBK}j%OvNdzUWQQ zDeKt^_yTUZycV6oe44d8KWW-Dr7MP+Wy;)>n>7zjVSCJdC-+J~_{EbJPW-$p78X5> z__cGt-@bdYGk+hn!l;p&@hV)pKZ&Cj(T|6Mmz{YlFM9r0ClT~G5` z?%wn|$~E0(>859b{6FelD!wh2z*7Hbt1ZQ>nvPa-Y)fg!3l3hYmobD^Xx_(md&Y6xq-#b>F5UX;X#=D@Hb>$)A?w^Wr5%yPZ5c5Vjq zOS$(e=eHa=c31l|NBjiC&yPa{Gp77rqab|GRPd9nt$@CfW5?#nTpP4MXN3uV_ATFT zrjk@M!S>6%kFJdGQpHU#Jqqr6k^Ma8X~EofZ`0C?Q)9gZ9{tNnnlpb6 zgiSZkw9w-BZSH*bj_KNYefCK1WmnVcvXC3&s=4R|u zljY0)ak}!pn!mcE*zJeol`WI@uqkku)J@==V7q!{qnh*7|0YojT?OX3rhJ}~A+ld# zwRlr-@9g;T{00A}XVqrgA8qvI-LfsQ z^g@IHy%Cq-gj2TlFg}2PluP`poiI~{> z(`>iO9WS<5EAGjjpLFhv!ot4^i!7hE@4si$e0aXX3;i3r`3q-yu}01)Rd&#@-8S(C zqx_PsMRS`<)Q@vVOn9h&qwHGF-I(f^S*vEW=Q>`v9~4*Fb)jOP($eR4l`M(nC#27x zdsKGc&gZr0!mt;C@v%GCu}DVbdFP6L_PE)uTFC7yu;h<|NQ0Z?&D~P3Pp#AB_#U^; zZG!95yaylTgjmFXPi3s&JN}ua(QcmUhG)$_51y|%TOBE^DxK1?Kgm-h=G}De!pqmZ zJz0vf{r`#5op`NfO_ua&PnWdzk<}S5!*u4Bw%##BZ z|C6?{1{wrq`$IUtH5M z6mux?zufe1R@&ZscS{We_bI(SzBnT|dgklvrz4^-XoatRXLowTs=50dZ!Uk&a>*=d z!u;ANnk(&#)~Pu@Yk5<0OX+rvpHj3D--5f2To+II{(rqXWa5pfJ98B(B;xARJEN3y z7cg2H*+mOI=Xrhc=i*w{r^?;-^(`q6zly~R+Q_@^F}Ep8vXW%-`?1t(tzhy0OPTy! z!4F#Ev#v;*O7WZ*O?hqYs$;jqe4pTI<08M9oDZM#vf`F-M6Lc)wI)&Tx{2?ja&g9* z+nH;FC-CLAw+o!;*!@Lh*<`)gLq{!aTYGY5-v73WUnoQMk*4LB=Oyo+8NZ!#?hbd; zydxh4U2VEOLgsvIPVeRXs}av|t~aK^GJV^`M!#Qc<-f?}&3n}xQPQOMb@yhgWW#9- zuSMKcd~7SKU&(j8hHb8lp3qUL%1Pp@-#mZnt@uqL^3F$Nm6kPiJLj36St>Uz`){4f ziLBOA!CURo*4>5z>FRm;bK8n1TAu!6cul+P>*>I(w8|qAoA)b(ZFo`K%Vgs<_4CC2 z=kuFNYWKfTF=gtM*>_KN;y3LRHs3YPt#f;Se|OZ2FWP+i)r;tjn=j7$zEQ;}$#DL9 zhc5=Fr2=M~vgqmu1j|Yn&TZPImH))Jie;nD67QZHH!E!@^>^QRXwQ4oaq@3b;lzU*&;Pnsd~K1?d?~FI z-a{3Sg%i%|~+alg&=&KXau8n$--5))*ZpU!GLRrIq++?1I!QuFyQEzD64TJTY)v7OzL ziTmKD9roG<2ZhfBw=rGlo{_MA-4U^B{cM&<+vD2b{rDA5}fA#$9(f)&X0%wHDgI@~E#Sdw--1OC{RjSKgYFwq@qbgE(bU&(Pi#i^Nne?gy4U!mdad}TThGX-iM#o=1Xc3IKsmFa<${u)K1mD^0P<2%}Je; zex$2l&LvU*95H_Z4Ka%qDH~&+m-o(iRCn=S?TyU+l^^Ffenad0 z?ng#Pj@vt~Sf*0!W||ln;q6=m>ty$su&TVE?NPp8}hBmLEGm>s9*{rg>TI zb2f{y%$@mLaNXB6k-YO3D{(%rsdImE?x@K3*8!J;?2n|MU9o*7$HQh9q3^3Fd~-c< zaz}b(%crj2OonqgoER%k9L)UB8Ts~otnsYeGyh+%n|9YCPod)e`U{0DN6g~ysuTz3 z+$?NbBlzZ)gTRvnX6@&UM;mpY{|>gjJ4aEIWmiwu?%97eHhE~Zo#AAv6q$ML^ZM_X zl(v;L8CIW<_+r54$MM2V>WJ=Bv(6n$?>rMXSK7|v%JACY>x~tAtP58<>z6GtTk!Vi z-IZ^Twk_$slbb73l6XV8X-Xn{@U5&3OBL!jeo0@TP->*;=j@y5UC}>VH!pd5#*-Pm zyf>W`XR`5c`tyC|gDJ}UmF!Gas^$s2t;kSU>U25w-!Vzmc}vs1WlxM0CWMH$Z*>t? zO@GrkOZ~_?RR@#j_uR_k@)s|8E4XfRxZ2i-ODxk*FL(d*>%mdKYrhpIIAl2=l@_w~ zH7l%D_{w2v@2d7plkdFW(bb*4AtCzx4!%)N1+Rj0UQ|DP8ptWIcV&U#UZbOt@^SxG ze&!A6d-u2b8S7m2m%g483bVVOTy(JDi21}Elso%v;w!hyWpfx-GVfmHyRf{=(%BsSJ{!L$2_Cw#{%BtI?xT!C9ly41zC9y3mpv(W zdnBWRxY}|z8E^IuLHEdmN>!;`x4kxa>;CS2m8+^SNA1XT#SQm&>}TA_bMoL#u8h#; z`^t)qTjuVlPJMK8nc(u$8}_d(_r=I{9g4Z$Jt6ygltLq$+~$sinK@Jb%-}bdF505B zbXnUP+ha8v(uZCbuXOJUpZ&m$rO|f9&en)XHr*4PG4;+|aqZAucFt1Ee>!q_&zj)YWBbYL zsiM*CJyMk}Qm;kQRkxQYZ?iD%o!V9NX+zk(UAOkQ*nPeb+L8KUvae2Jmru6&x4zWV z8{E6D-rKXFb=^6R{yE77W+xLHa`&3S?`Z;x-|=Yz3x;}3lK@-L1@`5o8k-};|g=Wb)~(8%|^p7+!3U*i)! z`F(aPLL=VU)lT!DP{qjR8C|#kMSkhdKh-~fJ2GE+dO4O`<|#A#m7-mLJ{Ro#Uoeq_ zGgOyRbeqds)`CDSD zUK3LV0|gMn#zuixKP0mxCsjei$iToPE78Evz}(V8x4^(mFSVdplULulC^fMpzeqvD zF(p4KRlzeSr?j}F2qYAv5fr1TV4-KA$*b>JT9N@)+(3=}{@&iQ#Isd**E3MLj% z5#Q95%tWXB3WaC|0|f&GQ%fTS3j=e7SOt({^9!)c1m%|`mZT~eD4@6uWC=VR0*dmJ zgHuZsq80Q5T-+4&LsBbBz^1z8=anef*eK|`87f$qfL)>QW~5+Y1Z5g4Si+cQ3Wf#{ z6`%mncdaOK4+dKd((WE?s9>JojQ)V%bP3+6>1%N-BTK6h^8NjCZS zadCH7XJ))wd2`*hZ5)v+Urp4VYZgr?_K+ZCBAOAe4>*R58U;)c>a9f@6Gqj>x-s)nF{}3yXt#n)YNs)cAhxjotG|M z!tu^5N-X4VZtBIT_A?dYdDpB?JAWuVd*RKjg)hwv{L@>rDimKAEPToNIQP5VJdX00 z0ZW&%PJi}=E3fdo^%{<)YmZc~d|8_2lbU~OPgC{ju6KKjmTAdcuhlk~$Gs(f&7Sc0 z;o0(9JKndiTb{UjtG0K^?ZX@8m+hKu@nDnJ+gE3=oK8QNS1A4bbcHluRm{fNgFDK#qpIlN~=GRMQXUvW(T)U(rQ}g%RbaR=hGJAUL9^NbJIBNDbxt*gY-r}q! z^LPG_XX^Bo#dfPq{t>BvNcD67jSj)&`v-Yv@4L-pUu$mEW^iux{_px{jVEMET!`+= z>bZ8KY|i$(X6^f;<9Vc(D^BdZ_=?fkUeA*8qIQj8`uDrR^%By%WIA({)fuGTMXyPy zDNSpwp8Wiq?aKpCPVbIPxXjUY`{foD!vV{D$hhAB|(vzTQpNFGv+< z@OxqVyP{g^QM&trc=@DC4`zL1a(TiB{vM-)$!Gft9~DjbCI9u|j{f;O4j*=}`&hJjbL8=b_Ycoxa$i3A ze|vh+lC4X04mM9=dvf*5mmvPkRe|}7Jx_R^@A>0)^27h)lNtv;AG`5r^`yW*+b0$7 z{j@4YaBfMuTZuw8z<@3UQL5sD>MdL$Kuku*CnuO(* zdL^DdD#`hKW&XG5Z(KTQS@qjHY_^~6wy^!adBF+KJ*LLC%XgLA#%IMW zWyM!tXuz6rIW1ULJ>`#6#iAF zGGdBEW4$! z?91mLMUNLa?hU`)R2T2E=~wC}-t?gLY0n-)*YfS_8ODBD>psZJvzI+P(^nDH zAHV1JgL@Oi?3r(+IpEc%VuFMVDS@$unFrth=6ye}VfXrH;=R>v$g zQP=s`m)ozZQ!hGP+HvZ)w75dL&bhd-5Q9Q%+mC%mKQ&&lUn9J}Nq=v&hxOF1LtB?t zJY^EP|MXu_{Em1JyDYX(eY`z0Yj}H(?;t%mmgo2-B#tlHsOcF z;#K!gTd$q7T3fws{g!66`m4^r;xudo?2e^AHNBs7`_rVQf3Hqf-SkFy8PhMvYa4{T z_8pE~Vz_d)QGx01nV#Q*pX~B4e0Nhf+xJxbd~S}&{_R#A>C;}#IPs-=%E?0xMdEo& z+4}rXZf3s~p>aH8M@XNa$JBV0H5=P)$~IZKTTYPuezNuBl1a0?bS#TM#p>uT_3@g= zw8~ULf5p8ye3MR{_gy3D`1i-+D>8Ov|9+mfHuIdzA~^HI&REONm$O>Cr~b6D&XNm1 zR&{*&fyA%+UQzP!fnmyB8 znDxWemP-1sSfuyQ>Y-ESoz$p6H|JlXGrw9^mUlcCtJv`7`K48lw;$LyS;%MSDxvk_ zO11G}Qx;ti?^K*%d(^2ymm}@^{1#W;*6`2kg(c_lZ&dI(XFfgn#mw6`8aWd@XX?BD z?>lsT)$N}@UFBWp|0oF;X*JsZa?_)}{WYFbQ|G0;JY*z$KC$rcHBSwZ<7&3NTX!z_ zqPPL(?u(3hHf8B#F1I|j z(@i>hDUm0Bhb-Cp`N+AaPdjIouQMu=n*1qe+LEP{r8c-asnxFW?eVZ%zG$?|;r#hvxME@G@3d=h(*}cykq(cxjP;c*6>>XjMyP->$;on@5|p@2@yi??3ND zBGarGP$MUBIaBwu+r>+ZmUZ~cIckfVcWtn`cHE6i{Yrb4BFBr21?hKq{y*Gvt5n&2 zoyMCB@rIp^Vg{2=R(%k(kT@)DVZg(qcH39OEZWz{{N^)f<4@@pAHM&ZQ@#4fgp`Uh z;ZEO8U7_30+4g_iC>Uz=k=lMuDceu?g%Xn=D(WRm0$Q)RCw<9Q%ii}IrhzcB^`9!#^b8ynV$zA zeYLU6+F`b0sg&1WA8lcsm|f`%2cFm(&onqF>TO(AR9Cv2_wV)nzASOOyprdpiTD3r;ip$*54CQe z+t!uKu;=UD6X}-S3ZI{tl^M=Xd~^T-cu6??*cm|#FR2RMb6Pihi9nBK-;KhBEb3Z)CvFEe?XT#xCEP=_QB;U!6@AE(ZKeewg}bgjKTr2AA{~T<4Xo!<|DP zTfepNl#G2DaV%j$S55xoip4!O&%C}pxfRUX`61VTYi#Yz{!OmaMZ84TUQ(4dUD))u zIB)jLIO`LtOTT;!zV2tNGI3dZ*xZ=fTnEloH7f=0$*g+)cUk>LVLk=3vkxWNHdXEM z*gQ?r@L*Tg#zdpPYJsy3?KN7{y5rOZ|I}UIf@iMzyF}RXS{L*4b!rORcH5hkemx}o zMM*P5tgLg*#f$u}D!td-_`2k@`98%jDKf6-74%{kR34c&Z|P(i%YPqJ|Nhwe_Ez?9 z{m2!jf99A?Sa@6bc9!qKyKA;hJwNU9^Zt_dT1m-s^2U01@-7`Xd2J83W5~X%362am z|JeN~ojoHV;YZH}>DezG&!1i+v+2{h`6rsnee@%iPD;#F;`hw_9+l+!ujIDf{W(7c z*(;_5xThMQ_S?f>qIl?-+{L8mlkCeSVnc*FV=ry^8pFKdlZ!vkxf4g9sI-48XEESa}3-5<&z>NT>bV@$jqwvrkUWM zcgKYqeM5W-n>1MVb6OgnzQ+D{(WTkHe1BxVj*mR|@u}8bDGm2o*Q~ZJEmK$*{!U@( z^C-_d?{=R)z4|Oendh^*!)Z3LJxeFVYF@qe*6h%GvA|HF1%U=Zyo`Nx#}JnKS0) z|5kA-DZM#;;;D!Pp&P-k4tp}bjum2ft^3@z$#(SwGqq1z2VbX7Juh@@&(oc2OkU>h zT<&?U`6+{X)+zU$?nje9uQU(y-WJp-ak<~?p+WfD60x@H$qQV59A3L}-=|p-_3QME zXHQ%ouq)I>kMTDrr{=ddn~xEkPm4EhIyuqx1LDtJjKgsqnG$J_}(`grl;a{fA{U$VsOG;HYaR@j`oiu^F01Got?6L zrRzq`y>kO*ugUv-Xsb}i@+DtxOMZK`c+b9C)i+^^8Ns`vGhSSIb>8ONvLokq98C=^ zRlU7PH+to|CE1z#uKV8cj}e-2@6Y+5Z?fXYnU9%!HeYU@ALmCyU*{p)SQ~8 zpSix^!KGa@R{Qwu%#XF*qPtVWGwlCyE%l#CIy)?yErll6H*iSAPusOE~pFLm9G z>wiwqJfb3a)mqSBbyXL`#wn&tS4hpCGc|BST_@|W^#_~%1{Y{dSK0@ zOx@1z&BbP0?|tID7qsZ{$JTPIJ;Cqy-8iE7#AIfD&yxzC)7|S&eXMw2UeYA}W{Sgx zqrVm|oxjBWBCFCbCinEnDIf35JMs2h5!0N{CI7;Bds5DQ@;DwhUoi2Gmb>e(El)l< z%%AoyS5@nD=#|>-A5WXkJ5VIF$8MrfQo4?g!|R0f=Y?T`1*-jP_kD5taOiZ0a`4rw zXQS^Y2K{f|$6W1EaCZ8gdZXI2ZU5>$P8;3z`#kgfMH|nkM`fQFJ5GQ4)6D!@jB}2k zoB#aE&ks+3Dd92!$0pA`&^$NDpl-U?=b4cf zrngVD{%c9KFhAS2WP4+hRFxv1@8ZyE#hyj!2QH@tJ>o4~9M5|^%XHC?^0NZUYRwWg z-pr>LICn3|JFTRbd%cH$VwPR+$5leV5?8PsG~Lctze6xh%RQs-K*;5*JU&a;ES6l} zZ^R0aSX>MPtI{heo6 zpY;9zZ@-|P0H)qE7W~Us<$YOxJE+~^{kwTLBwZ$~&6uv|=5auNpI}wet~LGXYxe|R zovfmC;mpE%nb{8`mn*%NbDrJawdqPecjjl4?$#q8Z_mm8b)@^vhb!N6I_4~iw&nFL z7OgwW-}Q9Pkzd>gYM_ zG6(w^@$a@6KbWq)@!ZM?$B5)4o-Br=FGRizKTES6T3{a78DcPb=rD zJ(UWmmrT-=&Z^x0>(+^aUr)5YXli}FbTwVn_=C6o<|(SF+vVk=E4@|rTIUtN_g){` z=Fh-%{_WCEdzH5fx1K$i#LRD*J*n8gJYo?J(t!#B<=i_A9G>C0DnuwOrddlU330&n3Zm-z>rpMttPf?Bo(^ z*uZeTw@m)3WNM{`_iLx(z$vRa*vlfb~L}bn-h3U|8~>tUf*j$ zVy8-$zj^V%L}kjNj-~(gpI+T2y?l~uy=uS0&S(cl*3Z*UtIV2gQ7qzaETvj`;BKlk ztGVurZT_FcpVu6%dA4S2xoF!q;Z!*t=Gah?-Phv8=YDfp(xh`uao5%U>5^$T%ch;p z`~7jjLeYKC%I@>GyD{gkvfUT}{H%=_}2H zOgrslK^F^YRbLx!EfGdi^11Z)uv{(EPLXlf1+8?;kjeW_u?ree&e<)NOxrcW0Lb z7;c?(%l61N=`Clz`rcsvag?RbGULlimCc=dgi~ETnJ*u2>xr9^bn6jQf7;@^%k~#D zH_!YLrFm^u`I}Syg@)3%;}4yEx1w~9zdF8P450 znEA(XYr9;H&+(W|0ztAHxAj&%ESjlnp%uK=GT8cF&%uQ4N%MdHd;D(I`)!NYO}KQ( zHm8MYtI;u*={Y=aw@0kr%ERn*xh8Sd6{Z@c%!QxVuH2(@da0+Qc50l>;=6A8DeAwZ zM5hVQpOWSgktPw59&GO#|0q<`@bgzeBjw$x_llG1j>s?eNJ;r%yx;J#I``6)L*_z$ zmh2N;mYUzwJbZpS4^P&tz7)sF6Jzu@Zm9P@y0rD8x%<&M6N7KEM(6s@)88rn>$dE6 zIo%rjmz~cS@6af{AAaN53WZI^@?C=5bu3!7dO~HJ->k3pRO8{B942IOeeaeTcJI=k zygtU8a%!dXi5d~F&Ly@?0lO8~roUAAscFq4xbd}nr$l8G=Pt$a@V8qpq>0J4t4U1Q z5+N}m^1_#}c~=k5Mk~`&$JUW0TD{#-IwV+cbQN9>pI%;@96U{8%}N8!D%-!ygS+H z^U}^x)fsmltvYct@b*Gc)uXzV`#(C|ZDTJ|xUoVdZ06LiYb9sp?Iygk*tg@v$u6xr zt)n^jx+=moQ>-1iBb%3poVskCvNqayPr=sb47@kyZC~WrAaFyZ=CAMO;IotW<+@KT z^G>Zk!18>?i@2!zX@@hCTxwsoe)dW@K5d%(nwpXy2d!6otx75?5)y#t!6nQPRD=B_cxi0^^?Nui%K1m~i;4?HUvL8|=SpWd3lk)=KHo z;&opbyw}&h-nQ{kM2XHwLz%0B52<}g)!wp!^dJU8?4 zb-`H&YA!Bh2nxJ@b+hQ1)UN;gmCQ1_-^}#fR2o!ptn)^Qz3}Wg9}De57@%Udkb8(|BJ#p=B`}iiGteG-d!1;iu1>2_R%+llMFWysit2tuz ze6@=AB`d$md!=3ZCx0X<`fA^1e*CNb{rvcXEM1+jiiz6}#lKHFUH;!%Ekggtl#1PQ zM_P+Lx^Cuog-R`7a!RLl{guGfF9&7CrI4#crR?3^_Z^G-8v^Z00dD)19EA9`k=q=bE+R z#$vu9|JQUT_+M6!Q}g{&@?NAv#lGt1@)xo7F?;t|n!Q@ELg4)z?l4ZnlJBJ<=_!mX z(QNvK3wRzFFEao8uKM!M_ep1(d$$KK+jvGe&h*Lz-goOtzwZ!NY2LHe{ZmW7_PiY@ zZJus#{vp(5H|b)9gZ76DM}JDQ%`7w0dAIImU+;JA4@>#q=~V=AIB!0_n_H^k0K>e> zfTz1wI3KL+yTer|uyJ9rTmBDc$Bcim^Ms#>7rDw+KD65Y`&Lb||0A0}H%xws zUpSK&_j=WytwGF@ioN$939OgibF=76WW}HPmkYb!?rD1{!@utC%edzIXN$hQD6SRl z`*Zd}jOF~iRYFP|EZ&_DG`jSN}OTWq10gTvh!83F<!X2M(>r51SpVyL+)eoOEKNOU!o`Tw57mo))XZ<)9k^tT#3ZiGB9`UX%iT+N z&0Mlq`-gALbtUO_jSA_aXZ7x;gefz~w#A*vaNQBNJI>*7KZ7~PA+1hfkCo+bAKt!S zlA`x8Q{6jZqkzQ0$_-Q7)zp^#)zdn*RWr~|v1~?(byiJKavo1>?&}}SPDeFvUr4@r z$K8#vt^Qcf-j^cbwT;HGFrvoH@O0 z;^cLjj$hi?uJMS4eo&gJ^I)l&a8%Z>zsECH&Il0IHMRe_bpE$M-?eulV{8&!Kix`R zb7jjf@#EeX7jB5MIOHDT=(*`g#$S1bg&8NhYbNQM?Pa^a+AQt;ZohxIhYiFxbA%VR z+P~U$TgL65Th-g-NxdvLr--#%Pb!HN_}lpOi|i+ltA_15;(^!WcLh)KtSea4rMSs^ zU&6ds?7uQTJE;BVzxhY1?2^?6-ZQRqby^>$-Y?Y^op41bt;JNiCF8Ec`x@(Y`fCw|-JEaPb{pC$J5dFkzg_x$vO zcQ?(?%5V3u5x+m%`&IC<393vHf?58*m9KC{TsdrEe{9YrSq9M)mn1F=zMb96G3oY! zRN0DC8=R;Anl1e<#Z7qigOfHdrd^#e{dvwLyJsKc{;vO;6`3d1w&-`A>-29vCq2Sc zZr)wGQd90gu4hAH<|Bg&k4HVS{QJ+>dh|^V3VUPIx8%h4dDU_~>O6isidSSuZ7sFf z9JskZ@JatWzIXh`f`7azG~HRxvZJ>`UcuJfDaLPx$q5;hIlHHP4I_ zzwWR6_dZJZ%IbebR`%c2PEL_l>^4bt{6&j@ zFDhO*?EanH`YZQ>%|)3sy;g;$@a1_o=5Pd76uUm-Wj;LT;9QB`2Wrc5e=A?(eb#HE z8e=m1gUvBfRvZ4%k4!QAvdgY)j{hQI`93Iw!_Qv)#b%DRCJyp~*Hlhu1X*PL`LCR% z`App7vQtX%lE4ohm!y~4Mjnn>64iF}eEkNG^jvF_iWwWkUu=XLM&I$S>Uq& zZs@+`N&opJu1UP<*iqIWbtWh6Qa1O4No@ZU>qT{2yj-NdaV*F_=CvmLzMNQU+`jrJ z9!ZN`E6;y0ytpc2dVhRUH|P6l@lJm~Ki$2l;@_P0FWeUVF=~$VN=#dDyJppunps7R z?uRFvJQPnjVCY~uxp(sGXRlY=hwSk3#Imf)QUQ5c6>$rlOhIdyP!>9w8iLmq@#<4= zp%d5==<*_7{efKQ1oj-%C9s7~W`;)Q#4L0=6Mnns&JMxa>)|g1eKIrdcuc7Cyr~@> z7kMuz@>Jf^H#PyrQ`!vMLp=KSY>uCD-e*4BiJcx{Z@jLCWyKk=TwwS$=iTMMzkaA8*;uG| z?)I`be;S53YJYP7vESD#J$WBYiNQ z_wM`To5yP|wfIX}XZPIK|2e1j_m?XYzUifX%dyS{brfkIKwK+~(MR{TBZ^X2vIx{TeTVJan$R>e*+ z{ny}nc#{O5;4Hboe|7QVq0VbA=`FW5kS}@0@nzo|Ijczh0Q7yl3UXTXWXkyTqD*ljm;kiZF$>=Ypb&g8AZ4Z<6$vet&m9OM?4@vWzb; zEv+s@Tsq!eB*C}C(Or7#KMV6ScBUzFp0oVnGyU;_d#Ulu8Jg4PY|dCcy=%cVtNMkU zHC1Mb8^iH-@KNkdo@0K`I6`C-(99J%J;?J&nfFW|Kdma<&QGc zN*0KPhZcvIP2Bh>!h*AMoh<8DSiU@<^3kql z@+5Y*0Ff4d^~Igt(>#_;*)h9yCgZdT;)1N#qNJwspQw)7aw2(_-I{iT6&r4=Mab>w zlC|5!mE(0(mUnhRo#$i48Tr4fbv7_HGQEyH>Sk=%F3MoM{OM~0&%=Fdm*gz{IN#ak z-Nrrlzc}xF<+!pXO#hnfPU#wDeOpoG7T;;A%Es}gz8!3(68hDNjyIWpeLbAG@ay-M zR-;qBHtI)Bc3M8Dy!|Ke%2W9*j;nj(enwAWP0Qe&H1C+r)XUoEZ0DL*Dlfky{?Fpm zy~^9uzb<mP7p8pCYo)~-Do&X=M9_6?~l$CoQ_w`yL7g@ zE;#)4vV^*nE#Hi%*q>-_?5=a3wcJo-_p7~2Wpd2alqZ*`?$&xY%P2@gSff8#>G=`A zC%;}#=BzmM)~4We-<__%reC(ZMEnScQA32EMMW4cl(_Fsq&}ugsemp zX17V$+n*7rm}Yu1uhw;yYx&)#6(?su^ArdU>P>evS^V_5w)X7Vu_7O*xnz_t+RAAW zlyKAMb*)1Ey(z1=t@isP8hqrI#G{->#z{OA{B(c*vT@Wuggm5gP-9e!4MI`({E zd%pGXqo2DLSCu?i#lB|UtlN|J>HG=%RC;|=@zMn@M!%OGx*8(H``Yzo@wRHKV_P1a zlFyz};SlThHRv;kwopX&n>t+?CO)%|^C!#x)qh=NS29Q9N@Cse_VmbqIt6-H`x`g^ z*WF+2x@L>)YYDH2Q>}mA&D`_0$}W&C?)N>`OI&K=z5n^|s#+|sdzviris{G&*C`z< z^=JK(-fviJ9eXZxgJ0r<)2q#9DYotXcDi9h{9%jFFI3egemchyeR1o**Vi-JR`9k> zTfr?<`2P7cSNpB*c9}oEX*!9tiVJoMJWn+!nBgIRG41&4`kT|%`luiXE;+(bFl<7ka%XO)*@=f&#CnZiBa zeyzILzxNQstBYHFeW#XQR8$E(+xq47+Zlclx4L)jjaJs*aIeLtPeSSGj;|Bc?|X?K ztyv+rDp7dphOhMsXWs4hvaekv{CS4sVtakAEV+QJnKDn`y7TXt`l3{#b{^NQoT4cf z^2=F!s^@i@hbTEOUi!$*@oD5E!Bc{r;;!Z5nk5!b*Qi?rFh)INTfB76jJ=w>5?}6r z=BV(XmO1xF*tGOnj#@ir-S%?+`8%MDH{iQ*?e2HaQX^hOFE%jNX|~kl1K(`TV*Wop|ES@Q9AC!lo#_$*6PM`kRGj)^ zgB^>nasO$P#RY#aFh1xPte5`3puYP4zl|?V z@U`cGjL}xU#8p=WRWerVnk;-5TFSl-N(<8Hwy704Tj;dt^}TZ4!pq+mTYaoC zlUn!kB%7AL-kxvTQm=9{HmY}8s4l&y&*M95hrHUO`G?C^t(mtz$@$b|^~i0(N4?xb z?kE4*#bxVmrZvZP>+ayQQN526UnR`X3iMl^YyXiW>0=+u^0avod>yh|4>4)I>~?(` zJ*j1a%AdT|vx1km1+gznFcSYC6+VS^=iWvxR+;&azHVEz?2YQFbJ}7Sb@3&v6IZ+R zuXg#qVwWm^no;ehU94>yb8D__N}lg>Y00blYkE~ZCjF~#{bAW9Td?HPxt)Lc-Z}^J z*Zve(nrA+T@m8Eb{G@P!s>|$sal3{0PS1V1o3EKEML%w(zl=uql-T`}&GH}Hr)qI< zv>USDsoFTRsczGQiyt5Mb{BP5bQ}rZ5chMQFk|k~t9!TvpK`RfpIG|m2(!tQlk?v5 zeZNp3(jv3RD{x~k`^nm77yh-E)fd%j>sGDS33__+AGh5Z{go$Q-)cK}()q0eujnN6 z{tynK=glm^8OnJ#JnI;@@~f7XtT`aIWS)ND<}b<|Jnf~E=S7EzCG$T2n`hc+BNF=e zlR=xCR&4RB6qWb8zG-&}9#k z!NvQ%UxqF^p4WIObk&wy>`x|j$%uTg+WutX{Y5oAQ)I&H#XnCua66~NcYK$^pZ#fQSnQgxidAgJ+>>?YOYQQfZ*kA%+_6#r z>z1AE)B4Vx5LK-23T!%XN%yMp!=%~CUEi;M+LfL5Im&vH(a+e8E`D zQ?7WnW@4tXo=>)om2^Srtk%Q34nO|ET>4y{^Uyy5#~+gy$p~@Q1<5fTd9vHw?*HEz-l_ZOcpuh&_*QVtMH-cYp#P}p~9-LtT3Y}?QIj- zw{5$wysM%$+QwDTwb}b0kCR=?`2)R9du*DcC2eZDeZ;(`N`71|`CEMM%GdjAGQM2C z`bNU+t)@@xQzhGcI_(UeZ=S=y$HuO64cFSI=ia5?XSC%_TGr!!Y5$|U z%Qu^R&6~2($oaFC=si(8nOm=~=I)NUu9Tdzx3#B`^|;x|_KD?Lb8OW4K3w^!zV`ke z!;_VJG*^5m*S#?aPyfg4_1B57HX`|h-Tb3#KCUcru&QEbu)3OZlfx%* zXVLk8i`>8dzb5_q{wvqdzTVX*&vLm==Mzmev<@^eIJqXyllAcD->zHZ!mOlx-{+p~ z^W;q9lz+SAy3(5`2afozW{zcXwK+Fof2jGg?jKL~yxI{Oz<%}2{B_THZ+;cf=Hq|- z|B%_|+S@WG^Ngm?{lfEm%{`v4VOAH4&cAo%aNi-3Tm098{n4dL=S{n^E%Q%p{(Gk0 zSMq}K$1@8bpDnT1G%pIw&%1pyD!=y2(J5}f*XM4%Wg^XR!dxol)DtoO+_2(%>9y)< z!DgA#w!(&&r&uvO=#Li)QmGe`+OuP&_+~ph^Vr>Q;`e0lvi>6W>hGnfoZai(v@3FA zAMDv=a9{b~LjP)~KdJv-t^8g0?r-q+rxzD0m(H8uHSzn5qz28_!t?S9k2>a@dhxJ0 zCj5(0go)nkyH91^42q*3ZY`W=%xu3}^hw5sn)@6t&R%CJpII|mJvH*ex7-r9<^fG&} zH|u%b?G9y+UtQ}qKf5jXQ*_=ZjjeYCE~Q;vCKb`!c|k|%F4}p!mzv5CRIYP zO}R|Z$*M$s`rQ*7Iy$lKK<7kiamPd!5O=^_ud1-7iNq!fX_o)cB?o@N*GdKSSXfp1fs`zeSeSM(qt1YU3 zms^~12$-RHsP5AXDUKN%wsB5*u~n_}T=~B2N=Lc3kCydCiY>nteo@YP-{dTZmH)zY z(@Kr^+7<~3xF?>fQ-6M&&yeGk z-VtAKeRlKLr!_@p^J3(7^xFFN){3s0H~&;y^7X212Y2;1Bud`X;gM@QF*Wn!Vpono zsarXwifk8Im~eE~0m;mzp&Ap;s^8jkYXaAzQ=P0*r?M_@ZTTjklvmKvdq$2cis#A6 z>@UKce->S9?amP2(4kx`X?Ab=+&Ph>XwZ?w}M+v z`X5~JFkRr--wwSwr)#b>wKF;1w^w5g{*di;&|;Fp(gd!3;hHh4-=5gr&1l&3xjiN^ zM&NMl!EXhVH?N!=e67eJ>A~ymb7mRsdS$O!xU2uPy3Qu!FICD*SVDXd}eGYS}(olM1BL4R`G8yB_ae_`vhOrt6ys=V_mgom{lpV$ZR!PUZ|R`ii-$jZaryK3u$S z{nVR3xve%_(^E_i*!^#D-At{2?`y8E-#YO^!rZMfA{xqv%}R2_&F$BGagd%OdZfvC z+LhbW9rh-jPoE)u^>Ef2&Ll7Sx#g0=P5w1We!mY+4-J1PYw_>C@;_D2*pqjssGf{H zr77`c+0C3^%ZkP4gv}00IQVtfyM3HW!vDPk4+l<@G5oWfBkSk6_~idTP3*gZ=YMbe zd7S6#aU&flcAXkAAKbnmN(_c9_+q z-1&klHZI*ZRejYaqo1V}dSQ=mEb*~me|o4m^60j_ecACBSvGo08a1o$y%g^JdB^Ox zw)fvGeUPv9V#1pDkKbQeR2g+L{G@lAp6}!Sh?6e+WUkE)h%A)(zq$MRhwNQdZcE)l zGY{{YvUmT2Z;^+uc}~r;RX%8Wa@jpOrtYsiX)I!|?=~#0R(+*=Um&GESH2+9Vc%DC z&Db!5jx(fI29e3EK|5(s(r8e;n%myf8R1+d4>6L zT+rTyuTD3Fz2U6+)~<9nYs$5xYc<)cgk3A<*L2 zqF-G<`jYX=f3u!_Yu>GntiIo8^r~uiM)L0iRR`I^|Lbi(ncA*bCbd9gjtJvG! zVup;<12Ru*8C}e8b*yP0)F~JvC-9`+)Q@=KF=6ial!;$__bhoB9ly)Gl5zRz&*tH$cTC-1!285~ zgJ4{n`cl*Xo7MlP?u#nB-PZVEZ~R4NUWul8A~S<|j+geDd2!!l?V2azS=g~+lHy6m zU*G2{K6TQ&kbOb==<%*QcW=(EJiY&a`u|U*Yn~Zz-g0rJ{4EW?!yE@fjjnVkUGaS6 z&huC&xvr!7{6qI{S@%ogJ0)+wD^*;Y95OMqdUu(`*$TOA^NAhH`xrbUwL|?e66Og+f$hft1quKEKTk2&~IQfv*dVKrq%n^)PjGlV`^I!Gtc3M zh9ydz7rhjtyZ?!Y-oK=~u)EYZSYFfd;05MMbH#TbQ!A)Ho;k^U%0`QrxE`4zF_pfX zH`!h{-Tr)@wKe$Z)vJ+U{u1ne*k-N{yAaAy&mjivqmas~1IYI6ZZl#L6b8#BSN^p4^)M zSJm(QqQ!0}-XF^^z3o}KZH-JemyL8XpYp`=UeRhRx3C))$7Z$Ymz(#9Rvw;j@o4t; z^I?`VcLW)1c)M!V3+;6O*!jON%y|6y#h>b{QP)bjC++I+Xq}$ocW1BLUe)3b0YA=t z!Z$^QI&cpY~sYN@NMy>j;c|-Bu0#2umpB8_3 zAIG~^`|HxU_n+V24&8Rr&eq~6+l7>J8Kb|S@7h)W*yhogRrpwKV$STZ$8)}a-Ei`4 z?!^qIUOjdrrfG_EuR2&|PjtPY!uRwF?=o=)d9OvM&-0yIxBKS)-?|4F9$bCmggLun z3ff~0ojKsu4*}1vfOlr|>Iau5m4NvmQ9}h@eYeb_;u7bK#3BU{&nFSeF;U>v56?^~ z$tYHcRxmX(P%tt#P%t%s(4hU}u6fD%DVcfc3Z|f`9MG(cQ(|!{*cN?PA74jjM{UQH zvH%lj6IWA^$sie*)Z*l#%z~2qA_Y^}KK79O(7a6WR&6ur^bXQqZ&PE;X(Et83dDQF z$Oy$JrbY@z1{Mm21_lNS<`#xvY++%lfDMBcnV6U>fUu#7vAKeYnS}x`h%h&@Q~+TR z+tkun0fbRP#SAtxg&HcZh)^*x1BHHmUI}ujKz6+I>LY~;C@zCg_Trm@w#}nOFJk*V zuYRzjLP=36=+J;*Uj+j_10z)3ppZw?4GL2vXYlGf7AJ#G8!!h&opWM=M`~tz2I%ww zkfT8=L9)7rmX;ttJi7{I31jExKw(6Wa!%JBh= z3@l6xjEsyz7|9zXs`f*g>4!9rSoZJUU#ovMvdS%B{NLRTA$iyz@V^x7{(e~qq>>wv zFBljY7^E3w7~~if8CV$^nWdcaZg%s1U-VsGY{{~@Yu6UcD=N;f$jn?`xmX?~>@iRD zx2|nonN(|k`@|VHZhq(3+;}D|ucSOHdr|p{*|R3jm@3EjqvPc7WYLbs&ek@m`pHc* zX7saxg~O!tMqUE-}1jTe{1<~`OW=Z`Frb!@6W%>eRouO^qb|ke8g|g z#sRN}$GXrCIG6bbhP}IYcp`odQu92mgfr6p2g}H)>0hVNl zo+k+>Ly+a5A`_Abb5e_o^_>m$3!%x;*-*c@ATc>rKSSTy&`iHrKeZw`Coxw)Q$H;& zQ{UOpQXia|^dt104bAoQGV@aPoeeGYV|b&`ld*mfYC;B`e1VpbK|;_V#CrY(EOi^2 zTbkfc-X5JfQ>p_(zKb4zAA4i>c8zG)^|y9Uzps?JsB;M?*C#HkO@Z4x`xZ=C5a`Cq zC0NQ5HtqPP1A4ov<#%iBK5;mJ^`NIujf?Eoj19{!&X^XczU-^*+`!3OQrvE56zR=* zy=3~Vmq+~m|NL9{?){w4e{1TW$IR+72{7?JekOiP#l1h3#?M4U)6{QHdZvC>u6N%G zKhqV#$Nh>p`^~tIU0Uq6sr_HzwE1(AeGl|B|A;?y=%Y2uVVfMaO&lX9}2`n(EpwFVl}kmYdS6V|$lA1SM%R*0E1OLgZol-MH(%nP)I@Pb z*FT0yDxa2~aCox)n9O5^=CDf#nsM8CV3>%H4bdGG%`adMabDel7GB&${NS#Ybbgx`ZD4m$!jmKYzL zAoQ<4EBoWZJ^o_Njjmip_t_+8RhUXAEnv)Ot(x^L^g#b#HIy!tyy&i=uJ6|(0Z7Ts`qRkqeTXk+`` ziz=t`ycfIYeKGybwCJnD$(wi1Up&Cny3;-Im|9$PL-I!N@6St>x)$9(Z{GIw+P4N7 zuE`5;+c$hQ64|V-uuVG6*(jgwcEPp}ho{buOSqf(+toTiNA2)AogM3nY)a&t*e9?t zKVds^e_!n*metCvO^ZEBOBcN<65P}M{Lxk>-QMd-`!79Ozrs#$!t3y`RGk#^_mX?x5M;Ll}`KhUr1JGU&j6p5$=;aK6~$3 zS7=iv{+QY4Fykk#W6PJVi#*)*Z~lQ>R!l|d>W#Y#-c5{Ju>iere397k0a%6F0Xws<-K7LHC?y&Tz$7^Y~;q*qF{P4$zyv!k=N{lB3>6 z7aJlq&K~;5B$J?RaI<^mj6>Ohf1`L*9t!+q5^gj2_Rn~Y`5KS+QC9N{tgad#I-%s( z8@2LSf)LNda79JNq~-Q0&T^hBH(sf9_uS6<=UV>6y`9467f-#K{^O6N%*9O=x#zfa zxt2fHozyJ+Ea{5RT~5z0ze{dSxN}kRf_bCHsps=!*_l%sOT>TqA7a=oKFN6km*$?x z&@E5zyv>VX<5p`a#zFi>K^BbzdY2L zr5pBgSsL_)Z}zd*U;ACijjvE(F8}I_j7*JQ9k#r!0!LTB^uK$>$Vc;PL`%0ppGk#V z_G=Am+a>2KfA$8S-{@{sc7D#u*VF&CyGU4``MZ|8>&tvUnVXVwrheD&38MSbrM zy?f2qZvEoE`&ZunyZi3lx9|SC_B&J-zG&TPy2Ng~1b>ymE-vO^gR8MI8?HRMC-G+0 zmVMV{UcG#9|MsQ0r*|IR`*H2K>U`e0yFQ1SXWAEY__ZiBnfA|UIq|+laDSdqO{PwI z*Swj#1bn4$=1x67J#n3D^??=ESL!9Aof;pM*(tEkj_TZ&SFtD1_9Vmq(zz1b=6$`l za_7c9+rI@JY%JL}{a}Vgg2;vmg&vo}_J@8t9m>1s*7qGQudm2SNxy!YD|BCA+U}0X z8Vv{A?~V`dzKi>J_)~0OS5dgMJU!vq)tyJ~H#Dg&d{|f`xo-!j z@wL~#Cx!0i+I(5}=u_KGd3qsShl4E(zAcVTxW`^?ZzXBF%SqzgvkUu#<}{sbIX5*S z{miSNtsW9~=MrCTU|&09)9KQeYFBLR^8N%&{NA?a)qB=wO@-CV@2vS?z4u|&^z(1O zO}x0K^w9Tg%g%$mPEX7&Sa0{?$O=)nb5h^mPx!qp`YK~$Pm0Xh z^>vW3Wf^$i6sh%HmCxmIiR2qZjpl89Y`G;a9;;%GTwUI$ixt(5$e$y5^yl@ zumaEC&!TqQZZT%u&~kdM?=T#|cg=_#ekoaB#nKJRPh8QFhQKESZ$P4Q*SNCEe(pg~7Wq(muz z+Fc6z#R`ySnF6#urT}S%Dd>aRZ?ISbH^<;HR}AYzbB5|GYM@{cDw$`fY;l`=_#< z;`ukt-}!7d|N76c@$%C5_B&I}CoNf|aJp3Kl=@x!*V8=z=<-{ZX5WdFtIEBRU7mJo zsg_1~q~n`6|6>+yiU_*;QSSaR1@YTSOqwQ#9{ZhRe8!-7B9uY$i&8@flg>it37<_5 za8-#qa&Bmga~If^v%p+1hrwh^Ujl!CW4PcO2A(aQ{{t9IOJw)=ZSzWcXK~u7;Y}J# z+!9x#pC64a)*Redch^+>z53(BLCwz#b`<{E{e9o-L=C@Bx(67P^``B|l3=h5B7hFn zD^}pu_s&cK4RDx)GJ22#q|XlOT?Z+E`X)gNhLAA{Ly!?c3WlI=V~~OoM9>JL&<*9TF=i=6jCLeLZeOTcLEF@xA=2I{H@ffAHH)MPW1t~^*Cze&ar zKN&+zG6r=Qf)q?ZX);K`1mYbNi02XRH&ejte2^}A#0@;C;OnFSI~LJU&)m#V!NR~y&(aK> zf%StFz=ngywZg&53{64tfE119ppbXxYxtpN4|B)$R^q7}f_g1N}rKw%Hp=8_8< zUb95C-xQ6H<{41hfE(bOs$dQ>5j9}UQIePo$Sok(g59F;8?0asG6Uo{&?umSzE^%y zNM>?&Y6<)VN#yiu4oW+43mrlJ1SJ88Va|CV!$HIw0F6(Y=^24$5=Pw#}C+^Jxwr)LOCtiJgvSe;_7ZD65pV4#kY zd@G7l(|8RO%*_>e4d6h*%+%D_R3VL*3oK+}X%0HO62w->gNs>!k_U>Iseys9r2dZl<5t^7K zs3t%WGd8s}M{}RCv6-PUntzRr&5S{n39?>O3u6-lw6HR@Fg7(rGtbn**bGzvpy{;$ zO#vW_nVXxMp@)mPxv4p*E<;mi0V+LE#mo%Q(}B5#sWGTJL{Vp9Y62?r(8SC@8yS$r zEDbD-4balArGbSBdV01rurLLcRA_q5LF3;@Vups6mX>I4F*GtTFfc+*Lm)9jv@{M9 zGe!$jLn8xA6HuXtY=@D7rI`_`n?dT((}AIpp{XTWUNAH=G&4jC7m%01 MAKES THE CURRENTS +C SHRINK OR EXPAND, RESPECTIVELY. +C +C PHI IS THE ROTATION ANGLE (RADIANS) OF THE PARTIAL RING CURRENT (MEASURED FROM MIDNIGHT TOWARD DUSK) +C + IMPLICIT REAL*8 (A-H,O-Z) +c +c 1. TRANSFORM TO TILTED COORDINATES (i.e., SM coordinates): +C + CPS=DCOS(PS) + SPS=DSIN(PS) + + XT=X*CPS-Z*SPS + ZT=Z*CPS+X*SPS +C +C 2. SCALE THE COORDINATES FOR THE SYMMETRIC AND PARTIAL RC COMPONENTS: +C + XTS=XT/SC_SY ! SYMMETRIC + YTS=Y /SC_SY + ZTS=ZT/SC_SY + + XTA=XT/SC_PR ! PARTIAL + YTA=Y /SC_PR + ZTA=ZT/SC_PR +C +C 3. CALCULATE COMPONENTS OF THE TOTAL FIELD IN THE TILTED (SOLAR-MAGNETIC) COORDINATE SYSTEM: +C +C========== ONLY FOR LEAST SQUARES FITTING: + BXS=0.D0 + BYS=0.D0 + BZS=0.D0 + BXA_S=0.D0 + BYA_S=0.D0 + BZA_S=0.D0 + BXA_QR=0.D0 + BYA_QR=0.D0 + BZA_Q=0.D0 +C============================================ +C +C 3a. SYMMETRIC FIELD: +C + IF (IOPR.LE.1) CALL RC_SYMM(XTS,YTS,ZTS,BXS,BYS,BZS) + IF (IOPR.EQ.0.OR.IOPR.EQ.2) + * CALL PRC_SYMM(XTA,YTA,ZTA,BXA_S,BYA_S,BZA_S) + +C 3b. ROTATE THE SCALED SM COORDINATES BY PHI AROUND ZSM AXIS AND CALCULATE QUADRUPOLE PRC FIELD +C IN THOSE COORDS: + + CP=DCOS(PHI) + SP=DSIN(PHI) + XR=XTA*CP-YTA*SP + YR=XTA*SP+YTA*CP + + IF (IOPR.EQ.0.OR.IOPR.EQ.2) + * CALL PRC_QUAD(XR,YR,ZTA,BXA_QR,BYA_QR,BZA_Q) + +C 3c. TRANSFORM THE QUADRUPOLE FIELD COMPONENTS BACK TO THE SM COORDS: +C + BXA_Q= BXA_QR*CP+BYA_QR*SP + BYA_Q=-BXA_QR*SP+BYA_QR*CP + +C 3d. FIND THE TOTAL FIELD OF PRC (SYMM.+QUADR.) IN THE SM COORDS: +C + BXP=BXA_S+BXA_Q + BYP=BYA_S+BYA_Q + BZP=BZA_S+BZA_Q +C +C 4. TRANSFORM THE FIELDS OF BOTH PARTS OF THE RING CURRENT BACK TO THE GSM SYSTEM: +C + BXSRC=BXS*CPS+BZS*SPS ! SYMMETRIC RC + BYSRC=BYS + BZSRC=BZS*CPS-BXS*SPS +C + BXPRC=BXP*CPS+BZP*SPS ! PARTIAL RC + BYPRC=BYP + BZPRC=BZP*CPS-BXP*SPS +C + RETURN + END +C +C&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C + SUBROUTINE RC_SYMM (X,Y,Z,BX,BY,BZ) + IMPLICIT REAL * 8 (A - H, O - Z) + DATA DS,DC/1.D-2,0.99994999875D0/, D/1.D-4/,DRD/5.D3/ ! DS=SIN(THETA) AT THE BOUNDARY OF THE LINEARITY + REGION; DC=SQRT(1-DS**2); DRD=1/(2*D) + RHO2=X**2+Y**2 + R2=RHO2+Z**2 + R=DSQRT(R2) + RP=R+D + RM=R-D + SINT=DSQRT(RHO2)/R + COST=Z/R + + IF (SINT.LT.DS) THEN ! TOO CLOSE TO THE Z-AXIS; USING A LINEAR APPROXIMATION A_PHI~SINT, +C TO AVOID THE SINGULARITY PROBLEM + A=AP(R,DS,DC)/DS + DARDR=(RP*AP(RP,DS,DC)-RM*AP(RM,DS,DC))*DRD + FXY=Z*(2.D0*A-DARDR)/(R*R2) + BX=FXY*X + BY=FXY*Y + BZ=(2.D0*A*COST**2+DARDR*SINT**2)/R + + ELSE + + THETA=DATAN2(SINT,COST) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + SINTM=DSIN(TM) + COSTP=DCOS(TP) + COSTM=DCOS(TM) + BR=(SINTP*AP(R,SINTP,COSTP)-SINTM*AP(R,SINTM,COSTM)) + * /(R*SINT)*DRD + BT=(RM*AP(RM,SINT,COST)-RP*AP(RP,SINT,COST))/R*DRD + FXY=(BR+BT*COST/SINT)/R + BX=FXY*X + BY=FXY*Y + BZ=BR*COST-BT*SINT + + ENDIF + + RETURN + END +c +c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C + DOUBLE PRECISION FUNCTION AP(R,SINT,COST) +C +C Calculates azimuthal component of the vector potential of the symmetric +c part of the model ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + LOGICAL PROX ! INDICATES WHETHER WE ARE TOO CLOSE TO THE AXIS OF SYMMETRY, WHERE THE INVERSION +C OF DIPOLAR COORDINATES BECOMES INACCURATE + DATA A1,A2,RRC1,DD1,RRC2,DD2,P1,R1,DR1,DLA1,P2,R2,DR2,DLA2,P3, + *R3,DR3/-563.3722359,425.0891691,4.150588549,2.266150226, + * 3.334503403,3.079071195,.02602428295,8.937790598,3.327934895, + *.4487061833,.09125832351,6.243029867,1.750145910,.4181957162, + *.06106691992,2.079908581,.6828548533/ + + PROX=.FALSE. + SINT1=SINT + COST1=COST + IF (SINT1.LT.1.D-2) THEN ! TOO CLOSE TO Z-AXIS; USE LINEAR INTERPOLATION BETWEEN SINT=0 & SINT=0.01 + SINT1=1.D-2 + COST1=.99994999875 + PROX=.TRUE. + ENDIF + + ALPHA=SINT1**2/R ! R,THETA -> ALPHA,GAMMA + GAMMA=COST1/R**2 + + ARG1=-((R-R1)/DR1)**2-(COST1/DLA1)**2 + ARG2=-((R-R2)/DR2)**2-(COST1/DLA2)**2 + ARG3=-((R-R3)/DR3)**2 + + IF (ARG1.LT.-500.D0) THEN ! TO PREVENT "FLOATING UNDERFLOW" CRASHES + DEXP1=0.D0 + ELSE + DEXP1=DEXP(ARG1) + ENDIF + + IF (ARG2.LT.-500.D0) THEN + DEXP2=0.D0 + ELSE + DEXP2=DEXP(ARG2) + ENDIF + + IF (ARG3.LT.-500.D0) THEN + DEXP3=0.D0 + ELSE + DEXP3=DEXP(ARG3) + ENDIF + + + ALPHA_S=ALPHA*(1.D0+P1*DEXP1+P2*DEXP2+P3*DEXP3) ! ALPHA -> ALPHA_S (DEFORMED) + + GAMMA_S=GAMMA + GAMMAS2=GAMMA_S**2 + + + ALSQH=ALPHA_S**2/2.D0 ! ALPHA_S,GAMMA_S -> RS,SINTS,COSTS + F=64.D0/27.D0*GAMMAS2+ALSQH**2 + Q=(DSQRT(F)+ALSQH)**(1.D0/3.D0) + C=Q-4.D0*GAMMAS2**(1.D0/3.D0)/(3.D0*Q) + IF (C.LT.0.D0) C=0.D0 + G=DSQRT(C**2+4.D0*GAMMAS2**(1.D0/3.D0)) + RS=4.D0/((DSQRT(2.D0*G-C)+DSQRT(C))*(G+C)) + COSTS=GAMMA_S*RS**2 + SINTS=DSQRT(1.D0-COSTS**2) + RHOS=RS*SINTS + RHOS2=RHOS**2 + ZS=RS*COSTS +C +c 1st loop: + + P=(RRC1+RHOS)**2+ZS**2+DD1**2 + XK2=4.D0*RRC1*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) ! SEE NB#4, P.3 +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI1=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 +c +c 2nd loop: + + P=(RRC2+RHOS)**2+ZS**2+DD2**2 + XK2=4.D0*RRC2*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) ! SEE NB#4, P.3 +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI2=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 + + AP=A1*APHI1+A2*APHI2 + IF (PROX) AP=AP*SINT/SINT1 ! LINEAR INTERPOLATION, IF TOO CLOSE TO THE Z-AXIS +C + RETURN + END +c +c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ +C + SUBROUTINE PRC_SYMM (X,Y,Z,BX,BY,BZ) + IMPLICIT REAL * 8 (A - H, O - Z) + DATA DS,DC/1.D-2,0.99994999875D0/, D/1.D-4/,DRD/5.D3/ ! DS=SIN(THETA) AT THE BOUNDARY OF THE LINEARITY + REGION; DC=SQRT(1-DS**2); DRD=1/(2*D) + RHO2=X**2+Y**2 + R2=RHO2+Z**2 + R=DSQRT(R2) + RP=R+D + RM=R-D + SINT=DSQRT(RHO2)/R + COST=Z/R + + IF (SINT.LT.DS) THEN ! TOO CLOSE TO THE Z-AXIS; USING A LINEAR APPROXIMATION A_PHI~SINT, +C TO AVOID THE SINGULARITY PROBLEM + A=APPRC(R,DS,DC)/DS + DARDR=(RP*APPRC(RP,DS,DC)-RM*APPRC(RM,DS,DC))*DRD + FXY=Z*(2.D0*A-DARDR)/(R*R2) + BX=FXY*X + BY=FXY*Y + BZ=(2.D0*A*COST**2+DARDR*SINT**2)/R + + ELSE + + THETA=DATAN2(SINT,COST) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + SINTM=DSIN(TM) + COSTP=DCOS(TP) + COSTM=DCOS(TM) + BR=(SINTP*APPRC(R,SINTP,COSTP)-SINTM*APPRC(R,SINTM,COSTM)) + * /(R*SINT)*DRD + BT=(RM*APPRC(RM,SINT,COST)-RP*APPRC(RP,SINT,COST))/R*DRD + FXY=(BR+BT*COST/SINT)/R + BX=FXY*X + BY=FXY*Y + BZ=BR*COST-BT*SINT + + ENDIF + + RETURN + END +c +c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C +C + DOUBLE PRECISION FUNCTION APPRC(R,SINT,COST) +C +C Calculates azimuthal component of the vector potential of the symmetric +c part of the model PARTIAL ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + LOGICAL PROX + DATA A1,A2,RRC1,DD1,RRC2,DD2,P1,ALPHA1,DAL1,BETA1,DG1,P2,ALPHA2, + * DAL2,BETA2,DG2,BETA3,P3,ALPHA3,DAL3,BETA4,DG3,BETA5,Q0,Q1,ALPHA4, + * DAL4,DG4,Q2,ALPHA5,DAL5,DG5,BETA6,BETA7 + * /-80.11202281,12.58246758,6.560486035,1.930711037,3.827208119, + *.7789990504,.3058309043,.1817139853,.1257532909,3.422509402, + *.04742939676,-4.800458958,-.02845643596,.2188114228,2.545944574, + *.00813272793,.35868244,103.1601001,-.00764731187,.1046487459, + *2.958863546,.01172314188,.4382872938,.01134908150,14.51339943, + *.2647095287,.07091230197,.01512963586,6.861329631,.1677400816, + *.04433648846,.05553741389,.7665599464,.7277854652/ + + PROX=.FALSE. + SINT1=SINT + COST1=COST + IF (SINT1.LT.1.D-2) THEN ! TOO CLOSE TO Z-AXIS; USE LINEAR INTERPOLATION BETWEEN SINT=0 & SINT=0.01 + SINT1=1.D-2 + COST1=.99994999875 + PROX=.TRUE. + ENDIF + + ALPHA=SINT1**2/R ! R,THETA -> ALPHA,GAMMA + GAMMA=COST1/R**2 + + ALPHA_S=ALPHA*(1.D0+P1/(1.D0+((ALPHA-ALPHA1)/DAL1)**2)**BETA1 + * *DEXP(-(GAMMA/DG1)**2) + *+P2*(ALPHA-ALPHA2)/(1.D0+((ALPHA-ALPHA2)/DAL2)**2)**BETA2 + */(1.D0+(GAMMA/DG2)**2)**BETA3 + *+P3*(ALPHA-ALPHA3)**2/(1.D0+((ALPHA-ALPHA3)/DAL3)**2)**BETA4 + */(1.D0+(GAMMA/DG3)**2)**BETA5) ! ALPHA -> ALPHA_S (DEFORMED) + + GAMMA_S=GAMMA*(1.D0+Q0+Q1*(ALPHA-ALPHA4) + * *DEXP(-((ALPHA-ALPHA4)/DAL4)**2-(GAMMA/DG4)**2) ! GAMMA -> GAMMA_ (DEFORMED) + * +Q2*(ALPHA-ALPHA5)/(1.D0+((ALPHA-ALPHA5)/DAL5)**2)**BETA6 + * /(1.D0+(GAMMA/DG5)**2)**BETA7) + + GAMMAS2=GAMMA_S**2 + + ALSQH=ALPHA_S**2/2.D0 ! ALPHA_S,GAMMA_S -> RS,SINTS,COSTS + F=64.D0/27.D0*GAMMAS2+ALSQH**2 + Q=(DSQRT(F)+ALSQH)**(1.D0/3.D0) + C=Q-4.D0*GAMMAS2**(1.D0/3.D0)/(3.D0*Q) + IF (C.LT.0.D0) C=0.D0 + G=DSQRT(C**2+4.D0*GAMMAS2**(1.D0/3.D0)) + RS=4.D0/((DSQRT(2.D0*G-C)+DSQRT(C))*(G+C)) + COSTS=GAMMA_S*RS**2 + SINTS=DSQRT(1.D0-COSTS**2) + RHOS=RS*SINTS + RHOS2=RHOS**2 + ZS=RS*COSTS +C +c 1st loop: + + P=(RRC1+RHOS)**2+ZS**2+DD1**2 + XK2=4.D0*RRC1*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) ! NB#4, P.3 +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI1=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 +c +c 2nd loop: + + P=(RRC2+RHOS)**2+ZS**2+DD2**2 + XK2=4.D0*RRC2*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) ! NB#4, P.3 +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI2=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 + + APPRC=A1*APHI1+A2*APHI2 + IF (PROX) APPRC=APPRC*SINT/SINT1 ! LINEAR INTERPOLATION, IF TOO CLOSE TO THE Z-AXIS +C + RETURN + END +C +C@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ +C +C + SUBROUTINE PRC_QUAD (X,Y,Z,BX,BY,BZ) +C +C CALCULATES COMPONENTS OF THE FIELD FROM THE "QUADRUPOLE" COMPONENT OF THE PRC +C + IMPLICIT REAL * 8 (A - H, O - Z) + + DATA D,DD/1.D-4,2.D-4/, DS/1.D-2/,DC/0.99994999875D0/ + + RHO2=X**2+Y**2 + R=DSQRT(RHO2+Z**2) + RHO=DSQRT(RHO2) + SINT=RHO/R + COST=Z/R + RP=R+D + RM=R-D + + IF (SINT.GT.DS) THEN + CPHI=X/RHO + SPHI=Y/RHO + BR=BR_PRC_Q(R,SINT,COST) + BT=BT_PRC_Q(R,SINT,COST) + DBRR=(BR_PRC_Q(RP,SINT,COST)-BR_PRC_Q(RM,SINT,COST))/DD + THETA=DATAN2(SINT,COST) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + COSTP=DCOS(TP) + SINTM=DSIN(TM) + COSTM=DCOS(TM) + DBTT=(BT_PRC_Q(R,SINTP,COSTP)-BT_PRC_Q(R,SINTM,COSTM))/DD + BX=SINT*(BR+(BR+R*DBRR+DBTT)*SPHI**2)+COST*BT + BY=-SINT*SPHI*CPHI*(BR+R*DBRR+DBTT) + BZ=(BR*COST-BT*SINT)*CPHI + ELSE + ST=DS + CT=DC + IF (Z.LT.0.D0) CT=-DC + THETA=DATAN2(ST,CT) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + COSTP=DCOS(TP) + SINTM=DSIN(TM) + COSTM=DCOS(TM) + BR=BR_PRC_Q(R,ST,CT) + BT=BT_PRC_Q(R,ST,CT) + DBRR=(BR_PRC_Q(RP,ST,CT)-BR_PRC_Q(RM,ST,CT))/DD + DBTT=(BT_PRC_Q(R,SINTP,COSTP)-BT_PRC_Q(R,SINTM,COSTM))/DD + FCXY=R*DBRR+DBTT + BX=(BR*(X**2+2.D0*Y**2)+FCXY*Y**2)/(R*ST)**2+BT*COST + BY=-(BR+FCXY)*X*Y/(R*ST)**2 + BZ=(BR*COST/ST-BT)*X/R + ENDIF + + RETURN + END +c +c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C + DOUBLE PRECISION FUNCTION BR_PRC_Q (R,SINT,COST) +C +Calculates the radial component of the "quadrupole" part of the model partial ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + + DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17, ! ALL LINEAR PARAMETERS HERE + * A18,XK1,AL1,DAL1,B1,BE1,XK2,AL2,DAL2,B2,BE2,XK3,XK4,AL3,DAL3,B3, ! WERE MULTIPLIED BY 0.1, + * BE3,AL4,DAL4,DG1,AL5,DAL5,DG2,C1,C2,C3,AL6,DAL6,DRM/-21.2666329, ! SO THAT THEY CORRESPOND TO P_0=1 nPa, + *32.24527521,-6.062894078,7.515660734,233.7341288,-227.1195714, ! RATHER THAN THE ORIGINAL VALUE OF 10 nPa + *8.483233889,16.80642754,-24.63534184,9.067120578,-1.052686913, ! ASSUMED IN THE BIOT-SAVART INTEGRAL + *-12.08384538,18.61969572,-12.71686069,47017.35679,-50646.71204, + *7746.058231,1.531069371,2.318824273,.1417519429,.6388013110E-02, + *5.303934488,4.213397467,.7955534018,.1401142771,.2306094179E-01, + *3.462235072,2.568743010,3.477425908,1.922155110,.1485233485, + *.2319676273E-01,7.830223587,8.492933868,.1295221828,.01753008801, + *.01125504083,.1811846095,.04841237481,.01981805097,6.557801891, + *6.348576071,5.744436687,.2265212965,.1301957209,.5654023158/ + + SINT2=SINT**2 + COST2=COST**2 + SC=SINT*COST + ALPHA=SINT2/R + GAMMA=COST/R**2 + + CALL FFS(ALPHA,AL1,DAL1,F,FA,FS) + D1=SC*F**XK1/((R/B1)**BE1+1.D0) + D2=D1*COST2 + + CALL FFS(ALPHA,AL2,DAL2,F,FA,FS) + D3=SC*FS**XK2/((R/B2)**BE2+1.D0) + D4=D3*COST2 + + CALL FFS(ALPHA,AL3,DAL3,F,FA,FS) + D5=SC*(ALPHA**XK3)*(FS**XK4)/((R/B3)**BE3+1.D0) + D6=D5*COST2 + + ARGA=((ALPHA-AL4)/DAL4)**2+1.D0 + ARGG=1.D0+(GAMMA/DG1)**2 + + D7=SC/ARGA/ARGG + D8=D7/ARGA + D9=D8/ARGA + D10=D9/ARGA + + ARGA=((ALPHA-AL5)/DAL5)**2+1.D0 + ARGG=1.D0+(GAMMA/DG2)**2 + + D11=SC/ARGA/ARGG + D12=D11/ARGA + D13=D12/ARGA + D14=D13/ARGA + + + D15=SC/(R**4+C1**4) + D16=SC/(R**4+C2**4)*COST2 + D17=SC/(R**4+C3**4)*COST2**2 + + CALL FFS(ALPHA,AL6,DAL6,F,FA,FS) + D18=SC*FS/(1.D0+((R-1.2D0)/DRM)**2) + + BR_PRC_Q=A1*D1+A2*D2+A3*D3+A4*D4+A5*D5+A6*D6+A7*D7+A8*D8+A9*D9+ + * A10*D10+A11*D11+A12*D12+A13*D13+A14*D14+A15*D15+A16*D16+A17*D17+ + * A18*D18 +C + RETURN + END +c +C%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +C + DOUBLE PRECISION FUNCTION BT_PRC_Q (R,SINT,COST) +C +Calculates the Theta component of the "quadrupole" part of the model partial ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + + DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17, ! ALL LINEAR PARAMETERS HERE + *XK1,AL1,DAL1,B1,BE1,XK2,AL2,DAL2,BE2,XK3,XK4,AL3,DAL3,B3,BE3,AL4, ! WERE MULTIPLIED BY 0.1, + *DAL4,DG1,AL5,DAL5,DG2,C1,C2,C3/12.74640393,-7.516393516, ! SO THAT THEY CORRESPOND TO P_0=1 nPa, + *-5.476233865,3.212704645,-59.10926169,46.62198189,-.01644280062, ! RATHER THAN THE ORIGINAL VALUE OF 10 nPa + *.1234229112,-.08579198697,.01321366966,.8970494003,9.136186247, ! ASSUMED IN THE BIOT-SAVART INTEGRAL + *-38.19301215,21.73775846,-410.0783424,-69.90832690,-848.8543440, + *1.243288286,.2071721360,.05030555417,7.471332374,3.180533613, + *1.376743507,.1568504222,.02092910682,1.985148197,.3157139940, + *1.056309517,.1701395257,.1019870070,6.293740981,5.671824276, + *.1280772299,.02189060799,.01040696080,.1648265607,.04701592613, + *.01526400086,12.88384229,3.361775101,23.44173897/ + + SINT2=SINT**2 + COST2=COST**2 + SC=SINT*COST + ALPHA=SINT2/R + GAMMA=COST/R**2 + + CALL FFS(ALPHA,AL1,DAL1,F,FA,FS) + D1=F**XK1/((R/B1)**BE1+1.D0) + D2=D1*COST2 + + CALL FFS(ALPHA,AL2,DAL2,F,FA,FS) + D3=FA**XK2/R**BE2 + D4=D3*COST2 + + CALL FFS(ALPHA,AL3,DAL3,F,FA,FS) + D5=FS**XK3*ALPHA**XK4/((R/B3)**BE3+1.D0) + D6=D5*COST2 + + CALL FFS(GAMMA,0.D0,DG1,F,FA,FS) + FCC=(1.D0+((ALPHA-AL4)/DAL4)**2) + D7 =1.D0/FCC*FS + D8 =D7/FCC + D9 =D8/FCC + D10=D9/FCC + + ARG=1.D0+((ALPHA-AL5)/DAL5)**2 + D11=1.D0/ARG/(1.D0+(GAMMA/DG2)**2) + D12=D11/ARG + D13=D12/ARG + D14=D13/ARG + + D15=1.D0/(R**4+C1**2) + D16=COST2/(R**4+C2**2) + D17=COST2**2/(R**4+C3**2) +C + BT_PRC_Q=A1*D1+A2*D2+A3*D3+A4*D4+A5*D5+A6*D6+A7*D7+A8*D8+A9*D9+ + * A10*D10+A11*D11+A12*D12+A13*D13+A14*D14+A15*D15+A16*D16+A17*D17 +C + RETURN + END +c +c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ + + SUBROUTINE FFS(A,A0,DA,F,FA,FS) + IMPLICIT REAL * 8 (A - H, O - Z) + SQ1=DSQRT((A+A0)**2+DA**2) + SQ2=DSQRT((A-A0)**2+DA**2) + FA=2.D0/(SQ1+SQ2) + F=FA*A + FS=0.5D0*(SQ1+SQ2)/(SQ1*SQ2)*(1.D0-F*F) + RETURN + END +C +C|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||| +C +C + SUBROUTINE RC_SHIELD (A,PS,X_SC,X,Y,Z,BX,BY,BZ) +C +C COMPUTES THE COMPONENTS OF THE SHIELDING FIELD FOR THE RING CURRENT +C (EITHER PARTIAL OR AXISYMMETRICAL) +C INPUT: A - AN ARRAY CONTAINING THE HARMONIC COEFFICIENTS AND NONLINEAR PARAMETERS +C PS - GEODIPOLE TILT ANGLE IN RADIANS +C X_SC - SCALING FACTOR ( X_SC> 1 AND X_SC< 1 CORRESPOND TO LARGER/SMALLER +C RING CURRENT, RESP.) +C X,Y,Z - POSITION IN RE (GSM COORDS) +C OUTPUT: BX,BY,BZ - SHIELDING FIELD COMPONENTS (GSM) +C + IMPLICIT REAL * 8 (A - H, O - Z) + DIMENSION A(86) +C + FAC_SC=(X_SC+1.D0)**3 +C + CPS=DCOS(PS) + SPS=DSIN(PS) + + S3PS=2.D0*CPS +C + PST1=PS*A(85) + PST2=PS*A(86) + + ST1=DSIN(PST1) + CT1=DCOS(PST1) + ST2=DSIN(PST2) + CT2=DCOS(PST2) + + X1=X*CT1-Z*ST1 + Z1=X*ST1+Z*CT1 + X2=X*CT2-Z*ST2 + Z2=X*ST2+Z*CT2 +C + L=0 + GX=0.D0 + GY=0.D0 + GZ=0.D0 +C + DO 1 M=1,2 ! M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY) +C AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY) + DO 2 I=1,3 + P=A(72+I) + Q=A(78+I) + CYPI=DCOS(Y/P) + CYQI=DCOS(Y/Q) + SYPI=DSIN(Y/P) + SYQI=DSIN(Y/Q) +C + DO 3 K=1,3 + R=A(75+K) + S=A(81+K) + SZRK=DSIN(Z1/R) + CZSK=DCOS(Z2/S) + CZRK=DCOS(Z1/R) + SZSK=DSIN(Z2/S) + SQPR=DSQRT(1.D0/P**2+1.D0/R**2) + SQQS=DSQRT(1.D0/Q**2+1.D0/S**2) + EPR=DEXP(X1*SQPR) + EQS=DEXP(X2*SQQS) +C + DO 4 N=1,2 ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT +C AND N=2 IS FOR THE SECOND ONE + + DO 5 NN=1,2 ! NN = 1,2 FURTHER SPLITS THE COEFFICIENTS INTO 2 PARTS, +C TO TAKE INTO ACCOUNT THE SCALE FACTOR DEPENDENCE + + IF (M.EQ.1) THEN + FX=-SQPR*EPR*CYPI*SZRK *FAC_SC + FY=EPR*SYPI*SZRK/P *FAC_SC + FZ=-EPR*CYPI*CZRK/R *FAC_SC + IF (N.EQ.1) THEN + IF (NN.EQ.1) THEN + HX=FX + HY=FY + HZ=FZ + ELSE + HX=FX*X_SC + HY=FY*X_SC + HZ=FZ*X_SC + ENDIF + ELSE + IF (NN.EQ.1) THEN + HX=FX*CPS + HY=FY*CPS + HZ=FZ*CPS + ELSE + HX=FX*CPS*X_SC + HY=FY*CPS*X_SC + HZ=FZ*CPS*X_SC + ENDIF + ENDIF + + ELSE ! M.EQ.2 + FX=-SPS*SQQS*EQS*CYQI*CZSK *FAC_SC + FY=SPS/Q*EQS*SYQI*CZSK *FAC_SC + FZ=SPS/S*EQS*CYQI*SZSK *FAC_SC + IF (N.EQ.1) THEN + IF (NN.EQ.1) THEN + HX=FX + HY=FY + HZ=FZ + ELSE + HX=FX*X_SC + HY=FY*X_SC + HZ=FZ*X_SC + ENDIF + ELSE + IF (NN.EQ.1) THEN + HX=FX*S3PS + HY=FY*S3PS + HZ=FZ*S3PS + ELSE + HX=FX*S3PS*X_SC + HY=FY*S3PS*X_SC + HZ=FZ*S3PS*X_SC + ENDIF + ENDIF + ENDIF + L=L+1 + + IF (M.EQ.1) THEN + HXR=HX*CT1+HZ*ST1 + HZR=-HX*ST1+HZ*CT1 + ELSE + HXR=HX*CT2+HZ*ST2 + HZR=-HX*ST2+HZ*CT2 + ENDIF + + GX=GX+HXR*A(L) + GY=GY+HY *A(L) + 5 GZ=GZ+HZR*A(L) + + 4 CONTINUE + 3 CONTINUE + 2 CONTINUE + 1 CONTINUE + + BX=GX + BY=GY + BZ=GZ + + RETURN + END +C +c=========================================================================== +c + SUBROUTINE DIPOLE (PS,X,Y,Z,BX,BY,BZ) +C +C THIS IS A DOUBLE PRECISION ROUTINE, OTHERWISE IDENTICAL TO THE S/R DIP OF GEOPACK +C +C CALCULATES GSM COMPONENTS OF A GEODIPOLE FIELD WITH THE DIPOLE MOMENT +C CORRESPONDING TO THE EPOCH OF 2000. +C +C------INPUT PARAMETERS: +C PS - GEODIPOLE TILT ANGLE IN RADIANS, +C X,Y,Z - GSM COORDINATES IN RE (1 RE = 6371.2 km) +C +C----OUTPUT PARAMETERS: +C BX,BY,BZ - FIELD COMPONENTS IN GSM SYSTEM, IN NANOTESLA. +C +C LAST MODIFICATIONS: JAN. 5, 2001. THE VALUE OF THE DIPOLE MOMENT WAS UPDATED TO 2000. +C AND A "SAVE" STATEMENT HAS BEEN ADDED, TO AVOID POTENTIAL PROBLEMS WITH SOME +C FORTRAN COMPILERS; MAY 1, 2006, CPS AND SPS WERE ALSO INCLUDED IN THE SAVE STATEMENT +C +C WRITTEN BY: N. A. TSYGANENKO +C + IMPLICIT REAL*8 (A-H,O-Z) + SAVE M,PSI,SPS,CPS + DATA M,PSI/0,5.D0/ + IF(M.EQ.1.AND.DABS(PS-PSI).LT.1.D-5) GOTO 1 ! THIS IS TO AVOID MULTIPLE CALCULATIONS + SPS=DSIN(PS) ! OF SIN(PS) AND COS(PS), IF THE ANGLE PS + CPS=DCOS(PS) ! REMAINS UNCHANGED + PSI=PS + M=1 + 1 P=X**2 + U=Z**2 + V=3.D0*Z*X + T=Y**2 + Q=30115.D0/DSQRT(P+T+U)**5 + BX=Q*((T+U-2.D0*P)*SPS-V*CPS) + BY=-3.D0*Y*Q*(X*SPS+Z*CPS) + BZ=Q*((P+T-2.D0*U)*CPS-V*SPS) + RETURN + END + + + +c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ diff --git a/Tsyganenko-Models/T89c.for b/Tsyganenko-Models/T89c.for new file mode 100644 index 0000000..c83c239 --- /dev/null +++ b/Tsyganenko-Models/T89c.for @@ -0,0 +1,489 @@ +c +c The small main program below is an example of how to compute field +c components with T89C. +c See GEOPACK.TXT for an example of the field line tracing. +c + dimension parmod(10) + 1 print *, ' enter x,y,z,ps,iopt' + read*, x,y,z,ps,iopt + call t89c(iopt,parmod,ps,x,y,z,bx,by,bz) + print *, bx,by,bz + goto 1 + end +c +c +C + SUBROUTINE T89C(IOPT,PARMOD,PS,X,Y,Z,BX,BY,BZ) +C +C +C COMPUTES GSM COMPONENTS OF THE MAGNETIC FIELD PRODUCED BY EXTRA- +C TERRESTRIAL CURRENT SYSTEMS IN THE GEOMAGNETOSPHERE. THE MODEL IS +C VALID UP TO GEOCENTRIC DISTANCES OF 70 RE AND IS BASED ON THE MER- +C GED IMP-A,C,D,E,F,G,H,I,J (1966-1974), HEOS-1 AND -2 (1969-1974), +C AND ISEE-1 AND -2 SPACECRAFT DATA SET. +C +C THIS IS A MODIFIED VERSION (T89c), WHICH REPLACED THE ORIGINAL ONE +C IN 1992 AND DIFFERS FROM IT IN THE FOLLOWING: +C +C (1) ISEE-1,2 DATA WERE ADDED TO THE ORIGINAL IMP-HEOS DATASET +C (2) TWO TERMS WERE ADDED TO THE ORIGINAL TAIL FIELD MODES, ALLOWING +C A MODULATION OF THE CURRENT BY THE GEODIPOLE TILT ANGLE +C +C +C REFERENCE FOR THE ORIGINAL MODEL: N.A. TSYGANENKO, A MAGNETOSPHERIC MAGNETIC +C FIELD MODEL WITH A WARPED TAIL CURRENT SHEET: PLANET.SPACE SCI., V.37, +C PP.5-20, 1989. +C +C----INPUT PARAMETERS: IOPT - SPECIFIES THE GROUND DISTURBANCE LEVEL: +C +C IOPT= 1 2 3 4 5 6 7 +C CORRESPOND TO: +C KP= 0,0+ 1-,1,1+ 2-,2,2+ 3-,3,3+ 4-,4,4+ 5-,5,5+ > =6- +C +C PS - GEODIPOLE TILT ANGLE IN RADIANS +C X, Y, Z - GSM COORDINATES OF THE POINT IN EARTH RADII +C +C----OUTPUT PARAMETERS: BX,BY,BZ - GSM COMPONENTS OF THE MODEL MAGNETIC +C FIELD IN NANOTESLAS +c +c THE PARAMETER PARMOD(10) IS A DUMMY ARRAY. IT IS NOT USED IN THIS +C SUBROUTINE AND IS PROVIDED JUST FOR MAKING IT COMPATIBLE WITH THE +C NEW VERSION (4/16/96) OF THE GEOPACK SOFTWARE. +C +C THIS RELEASE OF T89C IS DATED FEB 12, 1996; +C LAST UPDATE: MAY 9, 2006; A SAVE STATEMENT WAS ADDED IN THE S/R T89C, +C TO AVOID RUNTIME PROBLEMS ON SOME FORTRAN COMPILERS +C-------------------------------------------------------------------------- +C +C +C AUTHOR: NIKOLAI A. TSYGANENKO +C HSTX CORP./NASA GSFC +C + DIMENSION XI(4),F(3),DER(3,30),PARAM(30,7),A(30),PARMOD(10) + DOUBLE PRECISION F,DER + DATA PARAM/-116.53,-10719.,42.375,59.753,-11363.,1.7844,30.268, + * -0.35372E-01,-0.66832E-01,0.16456E-01,-1.3024,0.16529E-02, + * 0.20293E-02,20.289,-0.25203E-01,224.91,-9234.8,22.788,7.8813, + * 1.8362,-0.27228,8.8184,2.8714,14.468,32.177,0.01,0.0, + * 7.0459,4.0,20.0,-55.553,-13198.,60.647,61.072,-16064., + * 2.2534,34.407,-0.38887E-01,-0.94571E-01,0.27154E-01,-1.3901, + * 0.13460E-02,0.13238E-02,23.005,-0.30565E-01,55.047,-3875.7, + * 20.178,7.9693,1.4575,0.89471,9.4039,3.5215,14.474,36.555, + * 0.01,0.0,7.0787,4.0,20.0,-101.34,-13480.,111.35,12.386,-24699., + * 2.6459,38.948,-0.34080E-01,-0.12404,0.29702E-01,-1.4052, + * 0.12103E-02,0.16381E-02,24.49,-0.37705E-01,-298.32,4400.9,18.692, + * 7.9064,1.3047,2.4541,9.7012,7.1624,14.288,33.822,0.01,0.0,6.7442, + * 4.0,20.0,-181.69,-12320.,173.79,-96.664,-39051.,3.2633,44.968, + * -0.46377E-01,-0.16686,0.048298,-1.5473,0.10277E-02,0.31632E-02, + * 27.341,-0.50655E-01,-514.10,12482.,16.257,8.5834,1.0194,3.6148, + * 8.6042,5.5057,13.778,32.373,0.01,0.0,7.3195,4.0,20.0,-436.54, + * -9001.0,323.66,-410.08,-50340.,3.9932,58.524,-0.38519E-01, + * -0.26822,0.74528E-01,-1.4268,-0.10985E-02,0.96613E-02,27.557, + * -0.56522E-01,-867.03,20652.,14.101,8.3501,0.72996,3.8149,9.2908, + * 6.4674,13.729,28.353,0.01,0.0,7.4237,4.0,20.0,-707.77,-4471.9, + * 432.81,-435.51,-60400.,4.6229,68.178,-0.88245E-01,-0.21002, + * 0.11846,-2.6711,0.22305E-02,0.10910E-01,27.547,-0.54080E-01, + * -424.23,1100.2,13.954,7.5337,0.89714,3.7813,8.2945,5.174,14.213, + * 25.237,0.01,0.0,7.0037,4.0,20.0,-1190.4,2749.9,742.56,-1110.3, + * -77193.,7.6727,102.05,-0.96015E-01,-0.74507,0.11214,-1.3614, + * 0.15157E-02,0.22283E-01,23.164,-0.74146E-01,-2219.1,48253., + * 12.714,7.6777,0.57138,2.9633,9.3909,9.7263,11.123,21.558,0.01, + * 0.0,4.4518,4.0,20.0/ + + DATA IOP/10/ + SAVE IOP,ID,A +C + IF (IOP.NE.IOPT) THEN +C + ID=1 + IOP=IOPT + DO 1 I=1,30 + 1 A(I)=PARAM(I,IOPT) +C + ENDIF +C + XI(1)=X + XI(2)=Y + XI(3)=Z + XI(4)=PS + CALL T89(ID,A,XI,F,DER) + IF (ID.EQ.1) ID=2 + BX=F(1) + BY=F(2) + BZ=F(3) + RETURN + END +C------------------------------------------------------------------- +C + SUBROUTINE T89 (ID, A, XI, F, DER) +C +C *** N.A. Tsyganenko *** 8-10.12.1991 *** +C +C Calculates dependent model variables and their deriva- +C tives for given independent variables and model parame- +C ters. Specifies model functions with free parameters which +C must be determined by means of least squares fits (RMS +C minimization procedure). +C +C Description of parameters: +C +C ID - number of the data point in a set (initial assignments are performed +c only for ID=1, saving thus CPU time) +C A - input vector containing model parameters; +C XI - input vector containing independent variables; +C F - output double precision vector containing +C calculated values of dependent variables; +C DER - output double precision vector containing +C calculated values for derivatives of dependent +C variables with respect to model parameters; +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C +C T89 represents external magnetospheric magnetic field +C in Cartesian SOLAR MAGNETOSPHERIC coordinates (Tsyganenko N.A., +C Planet. Space Sci., 1989, v.37, p.5-20; the "T89 model" with the warped +c tail current sheet) + A MODIFICATION ADDED IN APRIL 1992 (SEE BELOW) +C +C Model formulas for the magnetic field components contain in total +c 30 free parameters (17 linear and 13 nonlinear parameters). +C First 2 independent linear parameters A(1)-A(2) correspond to contribu- +c tion from the tail current system, then follow A(3) and A(4) which are the +c amplitudes of symmetric and antisymmetric terms in the contribution from +c the closure currents; A(5) is the ring current amplitude. Then follow the +c coefficients A(6)-A(15) which define Chapman-Ferraro+Birkeland current field. +c The coefficients c16-c19 (see Formula 20 in the original paper), +c due to DivB=0 condition, are expressed through A(6)-A(15) and hence are not +c independent ones. +c A(16) AND A(17) CORRESPOND TO THE TERMS WHICH YIELD THE TILT ANGLE DEPEN- +C DENCE OF THE TAIL CURRENT INTENSITY (ADDED ON APRIL 9, 1992) +C +C Nonlinear parameters: +C +C A(18) : DX - Characteristic scale of the Chapman-Ferraro field along the +c X-axis +C A(19) : ADR (aRC) - Characteristic radius of the ring current +c A(20) : D0 - Basic half-thickness of the tail current sheet +C A(21) : DD (GamRC)- defines rate of thickening of the ring current, as +c we go from night- to dayside +C A(22) : Rc - an analog of "hinging distance" entering formula (11) +C A(23) : G - amplitude of tail current warping in the Y-direction +C A(24) : aT - Characteristic radius of the tail current +c A(25) : Dy - characteristic scale distance in the Y direction entering +c in W(x,y) in (13) +c A(26) : Delta - defines the rate of thickening of the tail current sheet +c in the Y-direction (in T89 it was fixed at 0.01) +c A(27) : Q - this parameter was fixed at 0 in the final version of T89; +c initially it was introduced for making Dy to depend on X +c A(28) : Sx (Xo) - enters in W(x,y) ; see (13) +c A(29) : Gam (GamT) - enters in DT in (13) and defines rate of tail sheet +c thickening on going from night to dayside; in T89 fixed at 4.0 +c A(30) : Dyc - the Dy parameter for closure current system; in T89 fixed +c at 20.0 +c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + REAL A(1), XI(1) +C + DIMENSION F(3), DER(3,30) +C + INTEGER ID, I, L + DATA A02,XLW2,YN,RPI,RT/25.D0,170.D0,30.D0,0.31830989D0,30.D0/ + DATA XD,XLD2/0.D0,40.D0/ +C +C The last four quantities define variation of tail sheet thickness along X +C + DATA SXC,XLWC2/4.D0,50.D0/ +C +C The two quantities belong to the function WC which confines tail closure +c current in X- and Y- direction +C + DATA DXL/20.D0/ +C +C + IF (ID.NE.1) GOTO 3 + DO 2 I = 1, 30 + DO 1 L = 1, 3 + 1 DER(L,I) = 0.0D0 + 2 CONTINUE +C + DYC=A(30) + DYC2=DYC**2 + DX=A(18) + HA02=0.5D0*A02 + RDX2M=-1.D0/DX**2 + RDX2=-RDX2M + RDYC2=1.D0/DYC2 + HLWC2M=-0.5D0*XLWC2 + DRDYC2=-2.D0*RDYC2 + DRDYC3=2.D0*RDYC2*DSQRT(RDYC2) + HXLW2M=-0.5D0*XLW2 + ADR=A(19) + D0=A(20) + DD=A(21) + RC=A(22) + G=A(23) + AT=A(24) + DT=D0 + DEL=A(26) + P=A(25) + Q=A(27) + SX=A(28) + GAM=A(29) + HXLD2M=-0.5D0*XLD2 + ADSL=0.D0 + XGHS=0.D0 + H=0.D0 + HS=0.D0 + GAMH=0.D0 + W1=-0.5D0/DX + DBLDEL=2.D0*DEL + W2=W1*2.D0 + W4=-1.D0/3.D0 + W3=W4/DX + W5=-0.5D0 + W6=-3.D0 + AK1=A(1) + AK2=A(2) + AK3=A(3) + AK4=A(4) + AK5=A(5) + AK6=A(6) + AK7=A(7) + AK8=A(8) + AK9=A(9) + AK10=A(10) + AK11=A(11) + AK12=A(12) + AK13=A(13) + AK14=A(14) + AK15=A(15) + AK16=A(16) + AK17=A(17) + SXA=0.D0 + SYA=0.D0 + SZA=0.D0 + AK610=AK6*W1+AK10*W5 + AK711=AK7*W2-AK11 + AK812=AK8*W2+AK12*W6 + AK913=AK9*W3+AK13*W4 + RDXL=1.D0/DXL + HRDXL=0.5D0*RDXL + A6H=AK6*0.5D0 + A9T=AK9/3.D0 + YNP=RPI/YN*0.5D0 + YND=2.D0*YN +C + 3 CONTINUE +C + X = XI(1) + Y = XI(2) + Z = XI(3) + TILT=XI(4) + TLT2=TILT**2 + SPS = DSIN(TILT) + CPS = DSQRT (1.0D0 - SPS ** 2) +C + X2=X*X + Y2=Y*Y + Z2=Z*Z + TPS=SPS/CPS + HTP=TPS*0.5D0 + GSP=G*SPS + XSM=X*CPS-Z*SPS + ZSM=X*SPS+Z*CPS +C +C CALCULATE THE FUNCTION ZS DEFINING THE SHAPE OF THE TAIL CURRENT SHEET +C AND ITS SPATIAL DERIVATIVES: +C + XRC=XSM+RC + XRC16=XRC**2+16.D0 + SXRC=DSQRT(XRC16) + Y4=Y2*Y2 + Y410=Y4+1.D4 + SY4=SPS/Y410 + GSY4=G*SY4 + ZS1=HTP*(XRC-SXRC) + DZSX=-ZS1/SXRC + ZS=ZS1-GSY4*Y4 + D2ZSGY=-SY4/Y410*4.D4*Y2*Y + DZSY=G*D2ZSGY +C +C CALCULATE THE COMPONENTS OF THE RING CURRENT CONTRIBUTION: +C + XSM2=XSM**2 + DSQT=DSQRT(XSM2+A02) + FA0=0.5D0*(1.D0+XSM/DSQT) + DDR=D0+DD*FA0 + DFA0=HA02/DSQT**3 + ZR=ZSM-ZS + TR=DSQRT(ZR**2+DDR**2) + RTR=1.D0/TR + RO2=XSM2+Y2 + ADRT=ADR+TR + ADRT2=ADRT**2 + FK=1.D0/(ADRT2+RO2) + DSFC=DSQRT(FK) + FC=FK**2*DSFC + FACXY=3.0D0*ADRT*FC*RTR + XZR=XSM*ZR + YZR=Y*ZR + DBXDP=FACXY*XZR + DER(2,5)=FACXY*YZR + XZYZ=XSM*DZSX+Y*DZSY + FAQ=ZR*XZYZ-DDR*DD*DFA0*XSM + DBZDP=FC*(2.D0*ADRT2-RO2)+FACXY*FAQ + DER(1,5)=DBXDP*CPS+DBZDP*SPS + DER(3,5)=DBZDP*CPS-DBXDP*SPS +C +C CALCULATE THE TAIL CURRENT SHEET CONTRIBUTION: +C + DELY2=DEL*Y2 + D=DT+DELY2 + IF (DABS(GAM).LT.1.D-6) GOTO 8 + XXD=XSM-XD + RQD=1.D0/(XXD**2+XLD2) + RQDS=DSQRT(RQD) + H=0.5D0*(1.D0+XXD*RQDS) + HS=-HXLD2M*RQD*RQDS + GAMH=GAM*H + D=D+GAMH + XGHS=XSM*GAM*HS + ADSL=-D*XGHS + 8 D2=D**2 + T=DSQRT(ZR**2+D2) + XSMX=XSM-SX + RDSQ2=1.D0/(XSMX**2+XLW2) + RDSQ=DSQRT(RDSQ2) + V=0.5D0*(1.D0-XSMX*RDSQ) + DVX=HXLW2M*RDSQ*RDSQ2 + OM=DSQRT(DSQRT(XSM2+16.D0)-XSM) + OMS=-OM/(OM*OM+XSM)*0.5D0 + RDY=1.D0/(P+Q*OM) + OMSV=OMS*V + RDY2=RDY**2 + FY=1.D0/(1.D0+Y2*RDY2) + W=V*FY + YFY1=2.D0*FY*Y2*RDY2 + FYPR=YFY1*RDY + FYDY=FYPR*FY + DWX=DVX*FY+FYDY*Q*OMSV + YDWY=-V*YFY1*FY + DDY=DBLDEL*Y + ATT=AT+T + S1=DSQRT(ATT**2+RO2) + F5=1.D0/S1 + F7=1.D0/(S1+ATT) + F1=F5*F7 + F3=F5**3 + F9=ATT*F3 + FS=ZR*XZYZ-D*Y*DDY+ADSL + XDWX=XSM*DWX+YDWY + RTT=1.D0/T + WT=W*RTT + BRRZ1=WT*F1 + BRRZ2=WT*F3 + DBXC1=BRRZ1*XZR + DBXC2=BRRZ2*XZR + DER(2,1)=BRRZ1*YZR + DER(2,2)=BRRZ2*YZR + DER(2,16)=DER(2,1)*TLT2 + DER(2,17)=DER(2,2)*TLT2 + WTFS=WT*FS + DBZC1=W*F5+XDWX*F7+WTFS*F1 + DBZC2=W*F9+XDWX*F1+WTFS*F3 + DER(1,1)=DBXC1*CPS+DBZC1*SPS + DER(1,2)=DBXC2*CPS+DBZC2*SPS + DER(3,1)=DBZC1*CPS-DBXC1*SPS + DER(3,2)=DBZC2*CPS-DBXC2*SPS + DER(1,16)=DER(1,1)*TLT2 + DER(1,17)=DER(1,2)*TLT2 + DER(3,16)=DER(3,1)*TLT2 + DER(3,17)=DER(3,2)*TLT2 +C +C CALCULATE CONTRIBUTION FROM THE CLOSURE CURRENTS +C + ZPL=Z+RT + ZMN=Z-RT + ROGSM2=X2+Y2 + SPL=DSQRT(ZPL**2+ROGSM2) + SMN=DSQRT(ZMN**2+ROGSM2) + XSXC=X-SXC + RQC2=1.D0/(XSXC**2+XLWC2) + RQC=DSQRT(RQC2) + FYC=1.D0/(1.D0+Y2*RDYC2) + WC=0.5D0*(1.D0-XSXC*RQC)*FYC + DWCX=HLWC2M*RQC2*RQC*FYC + DWCY=DRDYC2*WC*FYC*Y + SZRP=1.D0/(SPL+ZPL) + SZRM=1.D0/(SMN-ZMN) + XYWC=X*DWCX+Y*DWCY + WCSP=WC/SPL + WCSM=WC/SMN + FXYP=WCSP*SZRP + FXYM=WCSM*SZRM + FXPL=X*FXYP + FXMN=-X*FXYM + FYPL=Y*FXYP + FYMN=-Y*FXYM + FZPL=WCSP+XYWC*SZRP + FZMN=WCSM+XYWC*SZRM + DER(1,3)=FXPL+FXMN + DER(1,4)=(FXPL-FXMN)*SPS + DER(2,3)=FYPL+FYMN + DER(2,4)=(FYPL-FYMN)*SPS + DER(3,3)=FZPL+FZMN + DER(3,4)=(FZPL-FZMN)*SPS +C +C NOW CALCULATE CONTRIBUTION FROM CHAPMAN-FERRARO SOURCES + ALL OTHER +C + EX=DEXP(X/DX) + EC=EX*CPS + ES=EX*SPS + ECZ=EC*Z + ESZ=ES*Z + ESZY2=ESZ*Y2 + ESZZ2=ESZ*Z2 + ECZ2=ECZ*Z + ESY=ES*Y +C + DER(1,6)=ECZ + DER(1,7)=ES + DER(1,8)=ESY*Y + DER(1,9)=ESZ*Z + DER(2,10)=ECZ*Y + DER(2,11)=ESY + DER(2,12)=ESY*Y2 + DER(2,13)=ESY*Z2 + DER(3,14)=EC + DER(3,15)=EC*Y2 + DER(3,6)=ECZ2*W1 + DER(3,10)=ECZ2*W5 + DER(3,7)=ESZ*W2 + DER(3,11)=-ESZ + DER(3,8)=ESZY2*W2 + DER(3,12)=ESZY2*W6 + DER(3,9)=ESZZ2*W3 + DER(3,13)=ESZZ2*W4 +C +C FINALLY, CALCULATE NET EXTERNAL MAGNETIC FIELD COMPONENTS, +C BUT FIRST OF ALL THOSE FOR C.-F. FIELD: +C + SX1=AK6*DER(1,6)+AK7*DER(1,7)+AK8*DER(1,8)+AK9*DER(1,9) + SY1=AK10*DER(2,10)+AK11*DER(2,11)+AK12*DER(2,12)+AK13*DER(2,13) + SZ1=AK14*DER(3,14)+AK15*DER(3,15)+AK610*ECZ2+AK711*ESZ+AK812 + * *ESZY2+AK913*ESZZ2 + BXCL=AK3*DER(1,3)+AK4*DER(1,4) + BYCL=AK3*DER(2,3)+AK4*DER(2,4) + BZCL=AK3*DER(3,3)+AK4*DER(3,4) + BXT=AK1*DER(1,1)+AK2*DER(1,2)+BXCL +AK16*DER(1,16)+AK17*DER(1,17) + BYT=AK1*DER(2,1)+AK2*DER(2,2)+BYCL +AK16*DER(2,16)+AK17*DER(2,17) + BZT=AK1*DER(3,1)+AK2*DER(3,2)+BZCL +AK16*DER(3,16)+AK17*DER(3,17) + F(1)=BXT+AK5*DER(1,5)+SX1+SXA + F(2)=BYT+AK5*DER(2,5)+SY1+SYA + F(3)=BZT+AK5*DER(3,5)+SZ1+SZA +C + RETURN + END +c%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + diff --git a/Tsyganenko-Models/T96.for b/Tsyganenko-Models/T96.for new file mode 100644 index 0000000..9de33dc --- /dev/null +++ b/Tsyganenko-Models/T96.for @@ -0,0 +1,2571 @@ +C---------------------------------------------------------------------- +c + SUBROUTINE T96_01 (IOPT,PARMOD,PS,X,Y,Z,BX,BY,BZ) +C +c RELEASE DATE OF THIS VERSION: JUNE 22, 1996. +C LAST UPDATE: MAY 01, 2006: IN THE S/R DIPOLE, SPS AND CPS WERE ADDED IN THE SAVE STATEMENT + +C---------------------------------------------------------------------- +C +C WITH TWO CORRECTIONS, SUGGESTED BY T.SOTIRELIS' COMMENTS (APR.7, 1997) +C +C (1) A "STRAY " CLOSING PARENTHESIS WAS REMOVED IN THE S/R R2_BIRK +C (2) A 0/0 PROBLEM ON THE Z-AXIS WAS SIDESTEPPED (LINES 44-46 OF THE +c DOUBLE PRECISION FUNCTION XKSI) +c-------------------------------------------------------------------- +C DATA-BASED MODEL CALIBRATED BY (1) SOLAR WIND PRESSURE PDYN (NANOPASCALS), +C (2) DST (NANOTESLA), (3) BYIMF, AND (4) BZIMF (NANOTESLA). +c THESE INPUT PARAMETERS SHOULD BE PLACED IN THE FIRST 4 ELEMENTS +c OF THE ARRAY PARMOD(10). +C +C THE REST OF THE INPUT VARIABLES ARE: THE GEODIPOLE TILT ANGLE PS (RADIANS), +C AND X,Y,Z - GSM POSITION (RE) +C +c IOPT IS JUST A DUMMY INPUT PARAMETER, NECESSARY TO MAKE THIS SUBROUTINE +C COMPATIBLE WITH THE NEW RELEASE (APRIL 1996) OF THE TRACING SOFTWARE +C PACKAGE (GEOPACK). IOPT VALUE DOES NOT AFFECT THE OUTPUT FIELD. +c +C +c OUTPUT: GSM COMPONENTS OF THE EXTERNAL MAGNETIC FIELD (BX,BY,BZ, nanotesla) +C COMPUTED AS A SUM OF CONTRIBUTIONS FROM PRINCIPAL FIELD SOURCES +C +c (C) Copr. 1995, 1996, Nikolai A. Tsyganenko, Hughes STX, Code 695, NASA GSFC +c Greenbelt, MD 20771, USA +c +C REFERENCES: +C +C (1) N.A. TSYGANENKO AND D.P. STERN, A NEW-GENERATION GLOBAL +C MAGNETOSPHERE FIELD MODEL , BASED ON SPACECRAFT MAGNETOMETER DATA, +C ISTP NEWSLETTER, V.6, NO.1, P.21, FEB.1996. +C +c (2) N.A.TSYGANENKO, MODELING THE EARTH'S MAGNETOSPHERIC +C MAGNETIC FIELD CONFINED WITHIN A REALISTIC MAGNETOPAUSE, +C J.GEOPHYS.RES., V.100, P. 5599, 1995. +C +C (3) N.A. TSYGANENKO AND M.PEREDO, ANALYTICAL MODELS OF THE +C MAGNETIC FIELD OF DISK-SHAPED CURRENT SHEETS, J.GEOPHYS.RES., +C V.99, P. 199, 1994. +C +c---------------------------------------------------------------------- + + IMPLICIT REAL*8 (A-H,O-Z) + REAL PDYN,DST,BYIMF,BZIMF,PS,X,Y,Z,BX,BY,BZ,QX,QY,QZ,PARMOD(10), + * A(9) +c + DATA PDYN0,EPS10 /2.,3630.7/ +C + DATA A/1.162,22.344,18.50,2.602,6.903,5.287,0.5790,0.4462,0.7850/ +C + DATA AM0,S0,X00,DSIG/70.,1.08,5.48,0.005/ + DATA DELIMFX,DELIMFY /20.,10./ +C + PDYN=PARMOD(1) + DST=PARMOD(2) + BYIMF=PARMOD(3) + BZIMF=PARMOD(4) +C + SPS=SIN(PS) + PPS=PS +C + DEPR=0.8*DST-13.*SQRT(PDYN) ! DEPR is an estimate of total near-Earth +c depression, based on DST and Pdyn +c (usually, DEPR < 0 ) +C +C CALCULATE THE IMF-RELATED QUANTITIES: +C + Bt=SQRT(BYIMF**2+BZIMF**2) + + IF (BYIMF.EQ.0..AND.BZIMF.EQ.0.) THEN + THETA=0. + GOTO 1 + ENDIF +C + THETA=ATAN2(BYIMF,BZIMF) + IF (THETA.LE.0.D0) THETA=THETA+6.2831853 + 1 CT=COS(THETA) + ST=SIN(THETA) + EPS=718.5*SQRT(Pdyn)*Bt*SIN(THETA/2.) +C + FACTEPS=EPS/EPS10-1. + FACTPD=SQRT(PDYN/PDYN0)-1. +C + RCAMPL=-A(1)*DEPR ! RCAMPL is the amplitude of the ring current +c (positive and equal to abs.value of RC depression at origin) +C + TAMPL2=A(2)+A(3)*FACTPD+A(4)*FACTEPS + TAMPL3=A(5)+A(6)*FACTPD + B1AMPL=A(7)+A(8)*FACTEPS + B2AMPL=20.*B1AMPL ! IT IS EQUIVALENT TO ASSUMING THAT THE TOTAL CURRENT +C IN THE REGION 2 SYSTEM IS 40% OF THAT IN REGION 1 + RECONN=A(9) +C + XAPPA=(PDYN/PDYN0)**0.14 + XAPPA3=XAPPA**3 + YS=Y*CT-Z*ST + ZS=Z*CT+Y*ST +C + FACTIMF=EXP(X/DELIMFX-(YS/DELIMFY)**2) +C +C CALCULATE THE "IMF" COMPONENTS OUTSIDE THE LAYER (HENCE BEGIN WITH "O") +C + OIMFX=0. + OIMFY=RECONN*BYIMF*FACTIMF + OIMFZ=RECONN*BZIMF*FACTIMF +C + RIMFAMPL=RECONN*Bt +C + PPS=PS + XX=X*XAPPA + YY=Y*XAPPA + ZZ=Z*XAPPA +C +C SCALE AND CALCULATE THE MAGNETOPAUSE PARAMETERS FOR THE INTERPOLATION ACROSS +C THE BOUNDARY LAYER (THE COORDINATES XX,YY,ZZ ARE ALREADY SCALED) +C + X0=X00/XAPPA + AM=AM0/XAPPA + RHO2=Y**2+Z**2 + ASQ=AM**2 + XMXM=AM+X-X0 + IF (XMXM.LT.0.) XMXM=0. ! THE BOUNDARY IS A CYLINDER TAILWARD OF X=X0-AM + AXX0=XMXM**2 + ARO=ASQ+RHO2 + SIGMA=SQRT((ARO+AXX0+SQRT((ARO+AXX0)**2-4.*ASQ*AXX0))/(2.*ASQ)) +C +C NOW, THERE ARE THREE POSSIBLE CASES: +C (1) INSIDE THE MAGNETOSPHERE +C (2) IN THE BOUNDARY LAYER +C (3) OUTSIDE THE MAGNETOSPHERE AND B.LAYER +C FIRST OF ALL, CONSIDER THE CASES (1) AND (2): +C + IF (SIGMA.LT.S0+DSIG) THEN ! CALCULATE THE T95_06 FIELD (WITH THE +C POTENTIAL "PENETRATED" INTERCONNECTION FIELD): + + CALL DIPSHLD(PPS,XX,YY,ZZ,CFX,CFY,CFZ) + CALL TAILRC96(SPS,XX,YY,ZZ,BXRC,BYRC,BZRC,BXT2,BYT2,BZT2, + * BXT3,BYT3,BZT3) + CALL BIRK1TOT_02(PPS,XX,YY,ZZ,R1X,R1Y,R1Z) + CALL BIRK2TOT_02(PPS,XX,YY,ZZ,R2X,R2Y,R2Z) + CALL INTERCON(XX,YS*XAPPA,ZS*XAPPA,RIMFX,RIMFYS,RIMFZS) + RIMFY=RIMFYS*CT+RIMFZS*ST + RIMFZ=RIMFZS*CT-RIMFYS*ST +C + FX=CFX*XAPPA3+RCAMPL*BXRC +TAMPL2*BXT2+TAMPL3*BXT3 + * +B1AMPL*R1X +B2AMPL*R2X +RIMFAMPL*RIMFX + FY=CFY*XAPPA3+RCAMPL*BYRC +TAMPL2*BYT2+TAMPL3*BYT3 + * +B1AMPL*R1Y +B2AMPL*R2Y +RIMFAMPL*RIMFY + FZ=CFZ*XAPPA3+RCAMPL*BZRC +TAMPL2*BZT2+TAMPL3*BZT3 + * +B1AMPL*R1Z +B2AMPL*R2Z +RIMFAMPL*RIMFZ +C +C NOW, LET US CHECK WHETHER WE HAVE THE CASE (1). IF YES - WE ARE DONE: +C + IF (SIGMA.LT.S0-DSIG) THEN + BX=FX + BY=FY + BZ=FZ + ELSE ! THIS IS THE MOST COMPLEX CASE: WE ARE INSIDE +C THE INTERPOLATION REGION + FINT=0.5*(1.-(SIGMA-S0)/DSIG) + FEXT=0.5*(1.+(SIGMA-S0)/DSIG) +C + CALL DIPOLE(PS,X,Y,Z,QX,QY,QZ) + BX=(FX+QX)*FINT+OIMFX*FEXT -QX + BY=(FY+QY)*FINT+OIMFY*FEXT -QY + BZ=(FZ+QZ)*FINT+OIMFZ*FEXT -QZ +c + ENDIF ! THE CASES (1) AND (2) ARE EXHAUSTED; THE ONLY REMAINING +C POSSIBILITY IS NOW THE CASE (3): + ELSE + CALL DIPOLE(PS,X,Y,Z,QX,QY,QZ) + BX=OIMFX-QX + BY=OIMFY-QY + BZ=OIMFZ-QZ + ENDIF +C + RETURN + END +C===================================================================== + + SUBROUTINE DIPSHLD(PS,X,Y,Z,BX,BY,BZ) +C +C CALCULATES GSM COMPONENTS OF THE EXTERNAL MAGNETIC FIELD DUE TO +C SHIELDING OF THE EARTH'S DIPOLE ONLY +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION A1(12),A2(12) + DATA A1 /.24777,-27.003,-.46815,7.0637,-1.5918,-.90317E-01,57.522, + * 13.757,2.0100,10.458,4.5798,2.1695/ + DATA A2/-.65385,-18.061,-.40457,-5.0995,1.2846,.78231E-01,39.592, + * 13.291,1.9970,10.062,4.5140,2.1558/ +C + CPS=DCOS(PS) + SPS=DSIN(PS) + CALL CYLHARM(A1,X,Y,Z,HX,HY,HZ) + CALL CYLHAR1(A2,X,Y,Z,FX,FY,FZ) +C + BX=HX*CPS+FX*SPS + BY=HY*CPS+FY*SPS + BZ=HZ*CPS+FZ*SPS + RETURN + END +C +C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ +C +C THIS CODE YIELDS THE SHIELDING FIELD FOR THE PERPENDICULAR DIPOLE +C + SUBROUTINE CYLHARM( A, X,Y,Z, BX,BY,BZ) +C +C +C *** N.A. Tsyganenko *** Sept. 14-18, 1993; revised March 16, 1994 *** +C +C An approximation for the Chapman-Ferraro field by a sum of 6 cylin- +c drical harmonics (see pp. 97-113 in the brown GSFC notebook #1) +c +C Description of parameters: +C +C A - input vector containing model parameters; +C X,Y,Z - input GSM coordinates +C BX,BY,BZ - output GSM components of the shielding field +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C The 6 linear parameters A(1)-A(6) are amplitudes of the cylindrical harmonic +c terms. +c The 6 nonlinear parameters A(7)-A(12) are the corresponding scale lengths +C for each term (see GSFC brown notebook). +c +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(12) +C + RHO=DSQRT(Y**2+Z**2) + IF (RHO.LT.1.D-8) THEN + SINFI=1.D0 + COSFI=0.D0 + RHO=1.D-8 + GOTO 1 + ENDIF +C + SINFI=Z/RHO + COSFI=Y/RHO + 1 SINFI2=SINFI**2 + SI2CO2=SINFI2-COSFI**2 +C + BX=0.D0 + BY=0.D0 + BZ=0.D0 +C + DO 11 I=1,3 + DZETA=RHO/A(I+6) + XJ0=BES(DZETA,0) + XJ1=BES(DZETA,1) + XEXP=DEXP(X/A(I+6)) + BX=BX-A(I)*XJ1*XEXP*SINFI + BY=BY+A(I)*(2.D0*XJ1/DZETA-XJ0)*XEXP*SINFI*COSFI + BZ=BZ+A(I)*(XJ1/DZETA*SI2CO2-XJ0*SINFI2)*XEXP + 11 CONTINUE +c + DO 12 I=4,6 + DZETA=RHO/A(I+6) + XKSI=X/A(I+6) + XJ0=BES(DZETA,0) + XJ1=BES(DZETA,1) + XEXP=DEXP(XKSI) + BRHO=(XKSI*XJ0-(DZETA**2+XKSI-1.D0)*XJ1/DZETA)*XEXP*SINFI + BPHI=(XJ0+XJ1/DZETA*(XKSI-1.D0))*XEXP*COSFI + BX=BX+A(I)*(DZETA*XJ0+XKSI*XJ1)*XEXP*SINFI + BY=BY+A(I)*(BRHO*COSFI-BPHI*SINFI) + BZ=BZ+A(I)*(BRHO*SINFI+BPHI*COSFI) + 12 CONTINUE +C +c + RETURN + END +C +c%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +C +C THIS CODE YIELDS THE SHIELDING FIELD FOR THE PARALLEL DIPOLE +C + SUBROUTINE CYLHAR1(A, X,Y,Z, BX,BY,BZ) +C +C +C *** N.A. Tsyganenko *** Sept. 14-18, 1993; revised March 16, 1994 *** +C +C An approximation of the Chapman-Ferraro field by a sum of 6 cylin- +c drical harmonics (see pages 97-113 in the brown GSFC notebook #1) +c +C Description of parameters: +C +C A - input vector containing model parameters; +C X,Y,Z - input GSM coordinates, +C BX,BY,BZ - output GSM components of the shielding field +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C +C The 6 linear parameters A(1)-A(6) are amplitudes of the cylindrical +c harmonic terms. +c The 6 nonlinear parameters A(7)-A(12) are the corresponding scale +c lengths for each term (see GSFC brown notebook). +c +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(12) +C + RHO=DSQRT(Y**2+Z**2) + IF (RHO.LT.1.D-10) THEN + SINFI=1.D0 + COSFI=0.D0 + GOTO 1 + ENDIF +C + SINFI=Z/RHO + COSFI=Y/RHO +C + 1 BX=0.D0 + BY=0.D0 + BZ=0.D0 +C + DO 11 I=1,3 + DZETA=RHO/A(I+6) + XKSI=X/A(I+6) + XJ0=BES(DZETA,0) + XJ1=BES(DZETA,1) + XEXP=DEXP(XKSI) + BRHO=XJ1*XEXP + BX=BX-A(I)*XJ0*XEXP + BY=BY+A(I)*BRHO*COSFI + BZ=BZ+A(I)*BRHO*SINFI + 11 CONTINUE +c + DO 12 I=4,6 + DZETA=RHO/A(I+6) + XKSI=X/A(I+6) + XJ0=BES(DZETA,0) + XJ1=BES(DZETA,1) + XEXP=DEXP(XKSI) + BRHO=(DZETA*XJ0+XKSI*XJ1)*XEXP + BX=BX+A(I)*(DZETA*XJ1-XJ0*(XKSI+1.D0))*XEXP + BY=BY+A(I)*BRHO*COSFI + BZ=BZ+A(I)*BRHO*SINFI + 12 CONTINUE +C + RETURN + END + +c%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +C + DOUBLE PRECISION FUNCTION BES(X,K) + IMPLICIT REAL*8 (A-H,O-Z) +C + IF (K.EQ.0) THEN + BES=BES0(X) + RETURN + ENDIF +C + IF (K.EQ.1) THEN + BES=BES1(X) + RETURN + ENDIF +C + IF (X.EQ.0.D0) THEN + BES=0.D0 + RETURN + ENDIF +C + G=2.D0/X + IF (X.LE.DFLOAT(K)) GOTO 10 +C + N=1 + XJN=BES1(X) + XJNM1=BES0(X) +C + 1 XJNP1=G*N*XJN-XJNM1 + N=N+1 + IF (N.LT.K) GOTO 2 + BES=XJNP1 + RETURN +C + 2 XJNM1=XJN + XJN=XJNP1 + GOTO 1 +C + 10 N=24 + XJN=1.D0 + XJNP1=0.D0 + SUM=0.D0 +C + 3 IF (MOD(N,2).EQ.0) SUM=SUM+XJN + XJNM1=G*N*XJN-XJNP1 + N=N-1 +C + XJNP1=XJN + XJN=XJNM1 + IF (N.EQ.K) BES=XJN +C + IF (DABS(XJN).GT.1.D5) THEN + XJNP1=XJNP1*1.D-5 + XJN=XJN*1.D-5 + SUM=SUM*1.D-5 + IF (N.LE.K) BES=BES*1.D-5 + ENDIF +C + IF (N.EQ.0) GOTO 4 + GOTO 3 +C + 4 SUM=XJN+2.D0*SUM + BES=BES/SUM + RETURN + END +c------------------------------------------------------------------- +c + DOUBLE PRECISION FUNCTION BES0(X) +C + IMPLICIT REAL*8 (A-H,O-Z) +C + IF (DABS(X).LT.3.D0) THEN + X32=(X/3.D0)**2 + BES0=1.D0-X32*(2.2499997D0-X32*(1.2656208D0-X32* + * (0.3163866D0-X32*(0.0444479D0-X32*(0.0039444D0 + * -X32*0.00021D0))))) + ELSE + XD3=3.D0/X + F0=0.79788456D0-XD3*(0.00000077D0+XD3*(0.00552740D0+XD3* + * (0.00009512D0-XD3*(0.00137237D0-XD3*(0.00072805D0 + * -XD3*0.00014476D0))))) + T0=X-0.78539816D0-XD3*(0.04166397D0+XD3*(0.00003954D0-XD3* + * (0.00262573D0-XD3*(0.00054125D0+XD3*(0.00029333D0 + * -XD3*0.00013558D0))))) + BES0=F0/DSQRT(X)*DCOS(T0) + ENDIF + RETURN + END +c +c-------------------------------------------------------------------------- +c + DOUBLE PRECISION FUNCTION BES1(X) +C + IMPLICIT REAL*8 (A-H,O-Z) +C + IF (DABS(X).LT.3.D0) THEN + X32=(X/3.D0)**2 + BES1XM1=0.5D0-X32*(0.56249985D0-X32*(0.21093573D0-X32* + * (0.03954289D0-X32*(0.00443319D0-X32*(0.00031761D0 + * -X32*0.00001109D0))))) + BES1=BES1XM1*X + ELSE + XD3=3.D0/X + F1=0.79788456D0+XD3*(0.00000156D0+XD3*(0.01659667D0+XD3* + * (0.00017105D0-XD3*(0.00249511D0-XD3*(0.00113653D0 + * -XD3*0.00020033D0))))) + T1=X-2.35619449D0+XD3*(0.12499612D0+XD3*(0.0000565D0-XD3* + * (0.00637879D0-XD3*(0.00074348D0+XD3*(0.00079824D0 + * -XD3*0.00029166D0))))) + BES1=F1/DSQRT(X)*DCOS(T1) + ENDIF + RETURN + END +C------------------------------------------------------------ +C + SUBROUTINE INTERCON(X,Y,Z,BX,BY,BZ) +C +C Calculates the potential interconnection field inside the magnetosphere, +c corresponding to DELTA_X = 20Re and DELTA_Y = 10Re (NB#3, p.90, 6/6/1996). +C The position (X,Y,Z) and field components BX,BY,BZ are given in the rotated +c coordinate system, in which the Z-axis is always directed along the BzIMF +c (i.e. rotated by the IMF clock angle Theta) +C It is also assumed that the IMF Bt=1, so that the components should be +c (i) multiplied by the actual Bt, and +c (ii) transformed to standard GSM coords by rotating back around X axis +c by the angle -Theta. +c +C Description of parameters: +C +C X,Y,Z - GSM POSITION +C BX,BY,BZ - INTERCONNECTION FIELD COMPONENTS INSIDE THE MAGNETOSPHERE +C OF A STANDARD SIZE (TO TAKE INTO ACCOUNT EFFECTS OF PRESSURE CHANGES, +C APPLY THE SCALING TRANSFORMATION) +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C +C The 9 linear parameters are amplitudes of the "cartesian" harmonics +c The 6 nonlinear parameters are the scales Pi and Ri entering +c the arguments of exponents, sines, and cosines in the 9 "Cartesian" +c harmonics (3+3) +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(15),RP(3),RR(3),P(3),R(3) +C + DATA A/-8.411078731,5932254.951,-9073284.93,-11.68794634, + * 6027598.824,-9218378.368,-6.508798398,-11824.42793,18015.66212, + * 7.99754043,13.9669886,90.24475036,16.75728834,1015.645781, + * 1553.493216/ +C + DATA M/0/ +C + IF (M.NE.0) GOTO 111 + M=1 +C + P(1)=A(10) + P(2)=A(11) + P(3)=A(12) + R(1)=A(13) + R(2)=A(14) + R(3)=A(15) +C +C + DO 11 I=1,3 + RP(I)=1.D0/P(I) + 11 RR(I)=1.D0/R(I) +C + 111 CONTINUE +C + L=0 +C + BX=0. + BY=0. + BZ=0. +C +c "PERPENDICULAR" KIND OF SYMMETRY ONLY +C + DO 2 I=1,3 + CYPI=DCOS(Y*RP(I)) + SYPI=DSIN(Y*RP(I)) +C + DO 2 K=1,3 + SZRK=DSIN(Z*RR(K)) + CZRK=DCOS(Z*RR(K)) + SQPR=DSQRT(RP(I)**2+RR(K)**2) + EPR=DEXP(X*SQPR) +C + HX=-SQPR*EPR*CYPI*SZRK + HY=RP(I)*EPR*SYPI*SZRK + HZ=-RR(K)*EPR*CYPI*CZRK + L=L+1 +c + BX=BX+A(L)*HX + BY=BY+A(L)*HY + BZ=BZ+A(L)*HZ + 2 CONTINUE +C + RETURN + END + +C~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + SUBROUTINE TAILRC96(SPS,X,Y,Z,BXRC,BYRC,BZRC,BXT2,BYT2,BZT2, + * BXT3,BYT3,BZT3) +c +c COMPUTES THE COMPONENTS OF THE FIELD OF THE MODEL RING CURRENT AND THREE +c TAIL MODES WITH UNIT AMPLITUDES +C (FOR THE RING CURRENT, IT MEANS THE DISTURBANCE OF Bz=-1nT AT ORIGIN, +C AND FOR THE TAIL MODES IT MEANS MAXIMAL BX JUST ABOVE THE SHEET EQUAL 1 nT. +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION ARC(48),ATAIL2(48),ATAIL3(48) + COMMON /WARP/ CPSS,SPSS,DPSRR,RPS,WARP,D,XS,ZS,DXSX,DXSY,DXSZ, + * DZSX,DZSY,DZSZ,DZETAS,DDZETADX,DDZETADY,DDZETADZ,ZSWW +C + DATA ARC/-3.087699646,3.516259114,18.81380577,-13.95772338, + * -5.497076303,0.1712890838,2.392629189,-2.728020808,-14.79349936, + * 11.08738083,4.388174084,0.2492163197E-01,0.7030375685, + *-.7966023165,-3.835041334,2.642228681,-0.2405352424,-0.7297705678, + * -0.3680255045,0.1333685557,2.795140897,-1.078379954,0.8014028630, + * 0.1245825565,0.6149982835,-0.2207267314,-4.424578723,1.730471572, + * -1.716313926,-0.2306302941,-0.2450342688,0.8617173961E-01, + * 1.54697858,-0.6569391113,-0.6537525353,0.2079417515,12.75434981, + * 11.37659788,636.4346279,1.752483754,3.604231143,12.83078674, + * 7.412066636,9.434625736,676.7557193,1.701162737,3.580307144, + * 14.64298662/ +C + DATA ATAIL2/.8747515218,-.9116821411,2.209365387,-2.159059518, + * -7.059828867,5.924671028,-1.916935691,1.996707344,-3.877101873, + * 3.947666061,11.38715899,-8.343210833,1.194109867,-1.244316975, + * 3.73895491,-4.406522465,-20.66884863,3.020952989,.2189908481, + * -.09942543549,-.927225562,.1555224669,.6994137909,-.08111721003, + * -.7565493881,.4686588792,4.266058082,-.3717470262,-3.920787807, + * .02298569870,.7039506341,-.5498352719,-6.675140817,.8279283559, + * -2.234773608,-1.622656137,5.187666221,6.802472048,39.13543412, + * 2.784722096,6.979576616,25.71716760,4.495005873,8.068408272, + * 93.47887103,4.158030104,9.313492566,57.18240483/ +C + DATA ATAIL3/-19091.95061,-3011.613928,20582.16203,4242.918430, + * -2377.091102,-1504.820043,19884.04650,2725.150544,-21389.04845, + * -3990.475093,2401.610097,1548.171792,-946.5493963,490.1528941, + * 986.9156625,-489.3265930,-67.99278499,8.711175710,-45.15734260, + * -10.76106500,210.7927312,11.41764141,-178.0262808,.7558830028, + * 339.3806753,9.904695974,69.50583193,-118.0271581,22.85935896, + * 45.91014857,-425.6607164,15.47250738,118.2988915,65.58594397, + * -201.4478068,-14.57062940,19.69877970,20.30095680,86.45407420, + * 22.50403727,23.41617329,48.48140573,24.61031329,123.5395974, + * 223.5367692,39.50824342,65.83385762,266.2948657/ +C + DATA RH,DR,G,D0,DELTADY/9.,4.,10.,2.,10./ +C +C TO ECONOMIZE THE CODE, WE FIRST CALCULATE COMMON VARIABLES, WHICH ARE +C THE SAME FOR ALL MODES, AND PUT THEM IN THE COMMON-BLOCK /WARP/ +C + DR2=DR*DR + C11=DSQRT((1.D0+RH)**2+DR2) + C12=DSQRT((1.D0-RH)**2+DR2) + C1=C11-C12 + SPSC1=SPS/C1 + RPS=0.5*(C11+C12)*SPS ! THIS IS THE SHIFT OF OF THE SHEET WITH RESPECT +C TO GSM EQ.PLANE FOR THE 3RD (ASYMPTOTIC) TAIL MODE +C + R=DSQRT(X*X+Y*Y+Z*Z) + SQ1=DSQRT((R+RH)**2+DR2) + SQ2=DSQRT((R-RH)**2+DR2) + C=SQ1-SQ2 + CS=(R+RH)/SQ1-(R-RH)/SQ2 + SPSS=SPSC1/R*C + CPSS=DSQRT(1.D0-SPSS**2) + DPSRR=SPS/(R*R)*(CS*R-C)/DSQRT((R*C1)**2-(C*SPS)**2) +C + WFAC=Y/(Y**4+1.D4) ! WARPING + W=WFAC*Y**3 + WS=4.D4*Y*WFAC**2 + WARP=G*SPS*W + XS=X*CPSS-Z*SPSS + ZSWW=Z*CPSS+X*SPSS ! "WW" MEANS "WITHOUT Y-Z WARPING" (IN X-Z ONLY) + ZS=ZSWW +WARP + + DXSX=CPSS-X*ZSWW*DPSRR + DXSY=-Y*ZSWW*DPSRR + DXSZ=-SPSS-Z*ZSWW*DPSRR + DZSX=SPSS+X*XS*DPSRR + DZSY=XS*Y*DPSRR +G*SPS*WS ! THE LAST TERM IS FOR THE Y-Z WARP + DZSZ=CPSS+XS*Z*DPSRR ! (TAIL MODES ONLY) + + D=D0+DELTADY*(Y/20.D0)**2 ! SHEET HALF-THICKNESS FOR THE TAIL MODES + DDDY=DELTADY*Y*0.005D0 ! (THICKENS TO FLANKS, BUT NO VARIATION +C ALONG X, IN CONTRAST TO RING CURRENT) +C + DZETAS=DSQRT(ZS**2+D**2) ! THIS IS THE SAME SIMPLE WAY TO SPREAD +C OUT THE SHEET, AS THAT USED IN T89 + DDZETADX=ZS*DZSX/DZETAS + DDZETADY=(ZS*DZSY+D*DDDY)/DZETAS + DDZETADZ=ZS*DZSZ/DZETAS +C + CALL SHLCAR3X3(ARC,X,Y,Z,SPS,WX,WY,WZ) + CALL RINGCURR96(X,Y,Z,HX,HY,HZ) + BXRC=WX+HX + BYRC=WY+HY + BZRC=WZ+HZ +C + CALL SHLCAR3X3(ATAIL2,X,Y,Z,SPS,WX,WY,WZ) + CALL TAILDISK(X,Y,Z,HX,HY,HZ) + BXT2=WX+HX + BYT2=WY+HY + BZT2=WZ+HZ +C + CALL SHLCAR3X3(ATAIL3,X,Y,Z,SPS,WX,WY,WZ) + CALL TAIL87(X,Z,HX,HZ) + BXT3=WX+HX + BYT3=WY + BZT3=WZ+HZ +C + RETURN + END +C +c******************************************************************** +C + SUBROUTINE RINGCURR96(X,Y,Z,BX,BY,BZ) +c +c THIS SUBROUTINE COMPUTES THE COMPONENTS OF THE RING CURRENT FIELD, +C SIMILAR TO THAT DESCRIBED BY TSYGANENKO AND PEREDO (1994). THE +C DIFFERENCE IS THAT NOW WE USE SPACEWARPING, AS DESCRIBED IN THE +C PAPER ON MODELING BIRKELAND CURRENTS (TSYGANENKO AND STERN, 1996), +C INSTEAD OF SHEARING IT IN THE SPIRIT OF THE T89 TAIL MODEL. +C +C IN ADDITION, INSTEAD OF 7 TERMS FOR THE RING CURRENT MODEL, WE USE +C NOW ONLY 2 TERMS; THIS SIMPLIFICATION ALSO GIVES RISE TO AN +C EASTWARD RING CURRENT LOCATED EARTHWARD FROM THE MAIN ONE, +C IN LINE WITH WHAT IS ACTUALLY OBSERVED +C +C FOR DETAILS, SEE NB #3, PAGES 70-73 +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION F(2),BETA(2) + COMMON /WARP/ CPSS,SPSS,DPSRR, XNEXT(3),XS,ZSWARPED,DXSX,DXSY, + * DXSZ,DZSX,DZSYWARPED,DZSZ,OTHER(4),ZS ! ZS HERE IS WITHOUT Y-Z WARP +C + + DATA D0,DELTADX,XD,XLDX /2.,0.,0.,4./ ! ACHTUNG !! THE RC IS NOW +C COMPLETELY SYMMETRIC (DELTADX=0) + +C + DATA F,BETA /569.895366D0,-1603.386993D0,2.722188D0,3.766875D0/ +C +C THE ORIGINAL VALUES OF F(I) WERE MULTIPLIED BY BETA(I) (TO REDUCE THE +C NUMBER OF MULTIPLICATIONS BELOW) AND BY THE FACTOR -0.43, NORMALIZING +C THE DISTURBANCE AT ORIGIN TO B=-1nT +C + DZSY=XS*Y*DPSRR ! NO WARPING IN THE Y-Z PLANE (ALONG X ONLY), AND +C THIS IS WHY WE DO NOT USE DZSY FROM THE COMMON-BLOCK + XXD=X-XD + FDX=0.5D0*(1.D0+XXD/DSQRT(XXD**2+XLDX**2)) + DDDX=DELTADX*0.5D0*XLDX**2/DSQRT(XXD**2+XLDX**2)**3 + D=D0+DELTADX*FDX + + DZETAS=DSQRT(ZS**2+D**2) ! THIS IS THE SAME SIMPLE WAY TO SPREAD +C OUT THE SHEET, AS THAT USED IN T89 + RHOS=DSQRT(XS**2+Y**2) + DDZETADX=(ZS*DZSX+D*DDDX)/DZETAS + DDZETADY=ZS*DZSY/DZETAS + DDZETADZ=ZS*DZSZ/DZETAS + IF (RHOS.LT.1.D-5) THEN + DRHOSDX=0.D0 + DRHOSDY=DSIGN(1.D0,Y) + DRHOSDZ=0.D0 + ELSE + DRHOSDX=XS*DXSX/RHOS + DRHOSDY=(XS*DXSY+Y)/RHOS + DRHOSDZ=XS*DXSZ/RHOS + ENDIF +C + BX=0.D0 + BY=0.D0 + BZ=0.D0 +C + DO 1 I=1,2 +C + BI=BETA(I) +C + S1=DSQRT((DZETAS+BI)**2+(RHOS+BI)**2) + S2=DSQRT((DZETAS+BI)**2+(RHOS-BI)**2) + DS1DDZ=(DZETAS+BI)/S1 + DS2DDZ=(DZETAS+BI)/S2 + DS1DRHOS=(RHOS+BI)/S1 + DS2DRHOS=(RHOS-BI)/S2 +C + DS1DX=DS1DDZ*DDZETADX+DS1DRHOS*DRHOSDX + DS1DY=DS1DDZ*DDZETADY+DS1DRHOS*DRHOSDY + DS1DZ=DS1DDZ*DDZETADZ+DS1DRHOS*DRHOSDZ +C + DS2DX=DS2DDZ*DDZETADX+DS2DRHOS*DRHOSDX + DS2DY=DS2DDZ*DDZETADY+DS2DRHOS*DRHOSDY + DS2DZ=DS2DDZ*DDZETADZ+DS2DRHOS*DRHOSDZ +C + S1TS2=S1*S2 + S1PS2=S1+S2 + S1PS2SQ=S1PS2**2 + FAC1=DSQRT(S1PS2SQ-(2.D0*BI)**2) + AS=FAC1/(S1TS2*S1PS2SQ) + TERM1=1.D0/(S1TS2*S1PS2*FAC1) + FAC2=AS/S1PS2SQ + DASDS1=TERM1-FAC2/S1*(S2*S2+S1*(3.D0*S1+4.D0*S2)) + DASDS2=TERM1-FAC2/S2*(S1*S1+S2*(3.D0*S2+4.D0*S1)) +C + DASDX=DASDS1*DS1DX+DASDS2*DS2DX + DASDY=DASDS1*DS1DY+DASDS2*DS2DY + DASDZ=DASDS1*DS1DZ+DASDS2*DS2DZ +C + BX=BX+F(I)*((2.D0*AS+Y*DASDY)*SPSS-XS*DASDZ + * +AS*DPSRR*(Y**2*CPSS+Z*ZS)) + BY=BY-F(I)*Y*(AS*DPSRR*XS+DASDZ*CPSS+DASDX*SPSS) + 1 BZ=BZ+F(I)*((2.D0*AS+Y*DASDY)*CPSS+XS*DASDX + * -AS*DPSRR*(X*ZS+Y**2*SPSS)) +C + RETURN + END +C +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C + SUBROUTINE TAILDISK(X,Y,Z,BX,BY,BZ) +C +c +c THIS SUBROUTINE COMPUTES THE COMPONENTS OF THE TAIL CURRENT FIELD, +C SIMILAR TO THAT DESCRIBED BY TSYGANENKO AND PEREDO (1994). THE +C DIFFERENCE IS THAT NOW WE USE SPACEWARPING, AS DESCRIBED IN OUR +C PAPER ON MODELING BIRKELAND CURRENTS (TSYGANENKO AND STERN, 1996) +C INSTEAD OF SHEARING IT IN THE SPIRIT OF T89 TAIL MODEL. +C +C IN ADDITION, INSTEAD OF 8 TERMS FOR THE TAIL CURRENT MODEL, WE USE +C NOW ONLY 4 TERMS +C +C FOR DETAILS, SEE NB #3, PAGES 74- +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION F(4),BETA(4) + COMMON /WARP/ CPSS,SPSS,DPSRR,XNEXT(3),XS,ZS,DXSX,DXSY,DXSZ, + * OTHER(3),DZETAS,DDZETADX,DDZETADY,DDZETADZ,ZSWW +C + DATA XSHIFT /4.5/ +C + DATA F,BETA + * / -745796.7338D0,1176470.141D0,-444610.529D0,-57508.01028D0, + * 7.9250000D0,8.0850000D0,8.4712500D0,27.89500D0/ +c +c here original F(I) are multiplied by BETA(I), to economize +c calculations +C + RHOS=DSQRT((XS-XSHIFT)**2+Y**2) + IF (RHOS.LT.1.D-5) THEN + DRHOSDX=0.D0 + DRHOSDY=DSIGN(1.D0,Y) + DRHOSDZ=0.D0 + ELSE + DRHOSDX=(XS-XSHIFT)*DXSX/RHOS + DRHOSDY=((XS-XSHIFT)*DXSY+Y)/RHOS + DRHOSDZ=(XS-XSHIFT)*DXSZ/RHOS + ENDIF +C + BX=0.D0 + BY=0.D0 + BZ=0.D0 +C + DO 1 I=1,4 +C + BI=BETA(I) +C + S1=DSQRT((DZETAS+BI)**2+(RHOS+BI)**2) + S2=DSQRT((DZETAS+BI)**2+(RHOS-BI)**2) + DS1DDZ=(DZETAS+BI)/S1 + DS2DDZ=(DZETAS+BI)/S2 + DS1DRHOS=(RHOS+BI)/S1 + DS2DRHOS=(RHOS-BI)/S2 +C + DS1DX=DS1DDZ*DDZETADX+DS1DRHOS*DRHOSDX + DS1DY=DS1DDZ*DDZETADY+DS1DRHOS*DRHOSDY + DS1DZ=DS1DDZ*DDZETADZ+DS1DRHOS*DRHOSDZ +C + DS2DX=DS2DDZ*DDZETADX+DS2DRHOS*DRHOSDX + DS2DY=DS2DDZ*DDZETADY+DS2DRHOS*DRHOSDY + DS2DZ=DS2DDZ*DDZETADZ+DS2DRHOS*DRHOSDZ +C + S1TS2=S1*S2 + S1PS2=S1+S2 + S1PS2SQ=S1PS2**2 + FAC1=DSQRT(S1PS2SQ-(2.D0*BI)**2) + AS=FAC1/(S1TS2*S1PS2SQ) + TERM1=1.D0/(S1TS2*S1PS2*FAC1) + FAC2=AS/S1PS2SQ + DASDS1=TERM1-FAC2/S1*(S2*S2+S1*(3.D0*S1+4.D0*S2)) + DASDS2=TERM1-FAC2/S2*(S1*S1+S2*(3.D0*S2+4.D0*S1)) +C + DASDX=DASDS1*DS1DX+DASDS2*DS2DX + DASDY=DASDS1*DS1DY+DASDS2*DS2DY + DASDZ=DASDS1*DS1DZ+DASDS2*DS2DZ +C + BX=BX+F(I)*((2.D0*AS+Y*DASDY)*SPSS-(XS-XSHIFT)*DASDZ + * +AS*DPSRR*(Y**2*CPSS+Z*ZSWW)) +C + BY=BY-F(I)*Y*(AS*DPSRR*XS+DASDZ*CPSS+DASDX*SPSS) + 1 BZ=BZ+F(I)*((2.D0*AS+Y*DASDY)*CPSS+(XS-XSHIFT)*DASDX + * -AS*DPSRR*(X*ZSWW+Y**2*SPSS)) + + RETURN + END + +C------------------------------------------------------------------------- +C + SUBROUTINE TAIL87(X,Z,BX,BZ) + + IMPLICIT REAL*8 (A-H,O-Z) + + COMMON /WARP/ FIRST(3), RPS,WARP,D, OTHER(13) +C +C 'LONG' VERSION OF THE 1987 TAIL MAGNETIC FIELD MODEL +C (N.A.TSYGANENKO, PLANET. SPACE SCI., V.35, P.1347, 1987) +C +C D IS THE Y-DEPENDENT SHEET HALF-THICKNESS (INCREASING TOWARDS FLANKS) +C RPS IS THE TILT-DEPENDENT SHIFT OF THE SHEET IN THE Z-DIRECTION, +C CORRESPONDING TO THE ASYMPTOTIC HINGING DISTANCE, DEFINED IN THE +C MAIN SUBROUTINE (TAILRC96) FROM THE PARAMETERS RH AND DR OF THE +C T96-TYPE MODULE, AND +C WARP IS THE BENDING OF THE SHEET FLANKS IN THE Z-DIRECTION, DIRECTED +C OPPOSITE TO RPS, AND INCREASING WITH DIPOLE TILT AND |Y| +C + + DATA DD/3./ +C + DATA HPI,RT,XN,X1,X2,B0,B1,B2,XN21,XNR,ADLN + * /1.5707963,40.,-10., + * -1.261,-0.663,0.391734,5.89715,24.6833,76.37,-0.1071,0.13238005/ +C !!! THESE ARE NEW VALUES OF X1, X2, B0, B1, B2, +C CORRESPONDING TO TSCALE=1, INSTEAD OF TSCALE=0.6 +C +C THE ABOVE QUANTITIES WERE DEFINED AS FOLLOWS:------------------------ +C HPI=PI/2 +C RT=40. ! Z-POSITION OF UPPER AND LOWER ADDITIONAL SHEETS +C XN=-10. ! INNER EDGE POSITION +C +C TSCALE=1 ! SCALING FACTOR, DEFINING THE RATE OF INCREASE OF THE +C CURRENT DENSITY TAILWARDS +C +c ATTENTION ! NOW I HAVE CHANGED TSCALE TO: TSCALE=1.0, INSTEAD OF 0.6 +c OF THE PREVIOUS VERSION +c +C B0=0.391734 +C B1=5.89715 *TSCALE +C B2=24.6833 *TSCALE**2 +C +C HERE ORIGINAL VALUES OF THE MODE AMPLITUDES (P.77, NB#3) WERE NORMALIZED +C SO THAT ASYMPTOTIC BX=1 AT X=-200RE +C +C X1=(4.589 -5.85) *TSCALE -(TSCALE-1.)*XN ! NONLINEAR PARAMETERS OF THE +C CURRENT FUNCTION +C X2=(5.187 -5.85) *TSCALE -(TSCALE-1.)*XN +c +c +C XN21=(XN-X1)**2 +C XNR=1./(XN-X2) +C ADLN=-DLOG(XNR**2*XN21) +C +C--------------------------------------------------------------- +C + ZS=Z -RPS +WARP + ZP=Z-RT + ZM=Z+RT +C + XNX=XN-X + XNX2=XNX**2 + XC1=X-X1 + XC2=X-X2 + XC22=XC2**2 + XR2=XC2*XNR + XC12=XC1**2 + D2=DD**2 ! SQUARE OF THE TOTAL HALFTHICKNESS (DD=3Re for this mode) + B20=ZS**2+D2 + B2P=ZP**2+D2 + B2M=ZM**2+D2 + B=DSQRT(B20) + BP=DSQRT(B2P) + BM=DSQRT(B2M) + XA1=XC12+B20 + XAP1=XC12+B2P + XAM1=XC12+B2M + XA2=1./(XC22+B20) + XAP2=1./(XC22+B2P) + XAM2=1./(XC22+B2M) + XNA=XNX2+B20 + XNAP=XNX2+B2P + XNAM=XNX2+B2M + F=B20-XC22 + FP=B2P-XC22 + FM=B2M-XC22 + XLN1=DLOG(XN21/XNA) + XLNP1=DLOG(XN21/XNAP) + XLNM1=DLOG(XN21/XNAM) + XLN2=XLN1+ADLN + XLNP2=XLNP1+ADLN + XLNM2=XLNM1+ADLN + ALN=0.25*(XLNP1+XLNM1-2.*XLN1) + S0=(DATAN(XNX/B)+HPI)/B + S0P=(DATAN(XNX/BP)+HPI)/BP + S0M=(DATAN(XNX/BM)+HPI)/BM + S1=(XLN1*.5+XC1*S0)/XA1 + S1P=(XLNP1*.5+XC1*S0P)/XAP1 + S1M=(XLNM1*.5+XC1*S0M)/XAM1 + S2=(XC2*XA2*XLN2-XNR-F*XA2*S0)*XA2 + S2P=(XC2*XAP2*XLNP2-XNR-FP*XAP2*S0P)*XAP2 + S2M=(XC2*XAM2*XLNM2-XNR-FM*XAM2*S0M)*XAM2 + G1=(B20*S0-0.5*XC1*XLN1)/XA1 + G1P=(B2P*S0P-0.5*XC1*XLNP1)/XAP1 + G1M=(B2M*S0M-0.5*XC1*XLNM1)/XAM1 + G2=((0.5*F*XLN2+2.*S0*B20*XC2)*XA2+XR2)*XA2 + G2P=((0.5*FP*XLNP2+2.*S0P*B2P*XC2)*XAP2+XR2)*XAP2 + G2M=((0.5*FM*XLNM2+2.*S0M*B2M*XC2)*XAM2+XR2)*XAM2 + BX=B0*(ZS*S0-0.5*(ZP*S0P+ZM*S0M)) + * +B1*(ZS*S1-0.5*(ZP*S1P+ZM*S1M))+B2*(ZS*S2-0.5*(ZP*S2P+ZM*S2M)) + BZ=B0*ALN+B1*(G1-0.5*(G1P+G1M))+B2*(G2-0.5*(G2P+G2M)) +C +C CALCULATION OF THE MAGNETOTAIL CURRENT CONTRIBUTION IS FINISHED +C + RETURN + END + +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C +C THIS CODE RETURNS THE SHIELDING FIELD REPRESENTED BY 2x3x3=18 "CARTESIAN" +C HARMONICS +C + SUBROUTINE SHLCAR3X3(A,X,Y,Z,SPS,HX,HY,HZ) +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C The 36 coefficients enter in pairs in the amplitudes of the "cartesian" +c harmonics (A(1)-A(36). +c The 12 nonlinear parameters (A(37)-A(48) are the scales Pi,Ri,Qi,and Si +C entering the arguments of exponents, sines, and cosines in each of the +C 18 "Cartesian" harmonics +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(48) +C + CPS=DSQRT(1.D0-SPS**2) + S3PS=4.D0*CPS**2-1.D0 ! THIS IS SIN(3*PS)/SIN(PS) +C + HX=0.D0 + HY=0.D0 + HZ=0.D0 + L=0 +C + DO 1 M=1,2 ! M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY) +C AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY) + DO 2 I=1,3 + P=A(36+I) + Q=A(42+I) + CYPI=DCOS(Y/P) + CYQI=DCOS(Y/Q) + SYPI=DSIN(Y/P) + SYQI=DSIN(Y/Q) +C + DO 3 K=1,3 + R=A(39+K) + S=A(45+K) + SZRK=DSIN(Z/R) + CZSK=DCOS(Z/S) + CZRK=DCOS(Z/R) + SZSK=DSIN(Z/S) + SQPR=DSQRT(1.D0/P**2+1.D0/R**2) + SQQS=DSQRT(1.D0/Q**2+1.D0/S**2) + EPR=DEXP(X*SQPR) + EQS=DEXP(X*SQQS) +C + DO 4 N=1,2 ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT +C AND N=2 IS FOR THE SECOND ONE +C + L=L+1 + IF (M.EQ.1) THEN + IF (N.EQ.1) THEN + DX=-SQPR*EPR*CYPI*SZRK + DY=EPR/P*SYPI*SZRK + DZ=-EPR/R*CYPI*CZRK + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ELSE + DX=DX*CPS + DY=DY*CPS + DZ=DZ*CPS + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ENDIF + ELSE + IF (N.EQ.1) THEN + DX=-SPS*SQQS*EQS*CYQI*CZSK + DY=SPS*EQS/Q*SYQI*CZSK + DZ=SPS*EQS/S*CYQI*SZSK + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ELSE + DX=DX*S3PS + DY=DY*S3PS + DZ=DZ*S3PS + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ENDIF + ENDIF +c + 4 CONTINUE + 3 CONTINUE + 2 CONTINUE + 1 CONTINUE +C + RETURN + END + +C +C@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ +C + SUBROUTINE BIRK1TOT_02(PS,X,Y,Z,BX,BY,BZ) +C +C THIS IS THE SECOND VERSION OF THE ANALYTICAL MODEL OF THE REGION 1 FIELD +C BASED ON A SEPARATE REPRESENTATION OF THE POTENTIAL FIELD IN THE INNER AND +C OUTER SPACE, MAPPED BY MEANS OF A SPHERO-DIPOLAR COORDINATE SYSTEM (NB #3, +C P.91). THE DIFFERENCE FROM THE FIRST ONE IS THAT INSTEAD OF OCTAGONAL +C CURRENT LOOPS, CIRCULAR ONES ARE USED IN THIS VERSION FOR APPROXIMATING THE +C FIELD IN THE OUTER REGION, WHICH IS FASTER. +C + IMPLICIT REAL*8 (A-H,O-Z) +C + DIMENSION D1(3,26),D2(3,79),XI(4),C1(26),C2(79) + + COMMON /COORD11/ XX1(12),YY1(12) + COMMON /RHDR/ RH,DR + COMMON /LOOPDIP1/ TILT,XCENTRE(2),RADIUS(2), DIPX,DIPY +C + COMMON /COORD21/ XX2(14),YY2(14),ZZ2(14) + COMMON /DX1/ DX,SCALEIN,SCALEOUT +C + DATA C1/-0.911582E-03,-0.376654E-02,-0.727423E-02,-0.270084E-02, + * -0.123899E-02,-0.154387E-02,-0.340040E-02,-0.191858E-01, + * -0.518979E-01,0.635061E-01,0.440680,-0.396570,0.561238E-02, + * 0.160938E-02,-0.451229E-02,-0.251810E-02,-0.151599E-02, + * -0.133665E-02,-0.962089E-03,-0.272085E-01,-0.524319E-01, + * 0.717024E-01,0.523439,-0.405015,-89.5587,23.2806/ + +C + DATA C2/6.04133,.305415,.606066E-02,.128379E-03,-.179406E-04, + * 1.41714,-27.2586,-4.28833,-1.30675,35.5607,8.95792,.961617E-03, + * -.801477E-03,-.782795E-03,-1.65242,-16.5242,-5.33798,.424878E-03, + * .331787E-03,-.704305E-03,.844342E-03,.953682E-04,.886271E-03, + * 25.1120,20.9299,5.14569,-44.1670,-51.0672,-1.87725,20.2998, + * 48.7505,-2.97415,3.35184,-54.2921,-.838712,-10.5123,70.7594, + * -4.94104,.106166E-03,.465791E-03,-.193719E-03,10.8439,-29.7968, + * 8.08068,.463507E-03,-.224475E-04,.177035E-03,-.317581E-03, + * -.264487E-03,.102075E-03,7.71390,10.1915,-4.99797,-23.1114, + *-29.2043,12.2928,10.9542,33.6671,-9.3851,.174615E-03,-.789777E-06, + * .686047E-03,.460104E-04,-.345216E-02,.221871E-02,.110078E-01, + * -.661373E-02,.249201E-02,.343978E-01,-.193145E-05,.493963E-05, + * -.535748E-04,.191833E-04,-.100496E-03,-.210103E-03,-.232195E-02, + * .315335E-02,-.134320E-01,-.263222E-01/ +c + DATA TILT,XCENTRE,RADIUS,DIPX,DIPY /1.00891,2.28397,-5.60831, + * 1.86106,7.83281,1.12541,0.945719/ + + DATA DX,SCALEIN,SCALEOUT /-0.16D0,0.08D0,0.4D0/ + DATA XX1/-11.D0,2*-7.D0,2*-3.D0,3*1.D0,2*5.D0,2*9.D0/ + DATA YY1/2.D0,0.D0,4.D0,2.D0,6.D0,0.D0,4.D0,8.D0,2.D0,6.D0,0.D0, + * 4.D0/ + DATA XX2/-10.D0,-7.D0,2*-4.D0,0.D0,2*4.D0,7.D0,10.D0,5*0.D0/ + DATA YY2/3.D0,6.D0,3.D0,9.D0,6.D0,3.D0,9.D0,6.D0,3.D0,5*0.D0/ + DATA ZZ2/2*20.D0,4.D0,20.D0,2*4.D0,3*20.D0,2.D0,3.D0,4.5D0, + * 7.D0,10.D0/ +C + DATA RH,DR /9.D0,4.D0/ ! RH IS THE "HINGING DISTANCE" AND DR IS THE +C TRANSITION SCALE LENGTH, DEFINING THE +C CURVATURE OF THE WARPING (SEE P.89, NB #2) +C + DATA XLTDAY,XLTNGHT /78.D0,70.D0/ ! THESE ARE LATITUDES OF THE R-1 OVAL +C AT NOON AND AT MIDNIGHT + DATA DTET0 /0.034906/ ! THIS IS THE LATITUDINAL HALF-THICKNESS OF THE +C R-1 OVAL (THE INTERPOLATION REGION BETWEEN +C THE HIGH-LAT. AND THE PLASMA SHEET) +C + TNOONN=(90.D0-XLTDAY)*0.01745329D0 + TNOONS=3.141592654D0-TNOONN ! HERE WE ASSUME THAT THE POSITIONS OF +C THE NORTHERN AND SOUTHERN R-1 OVALS +C ARE SYMMETRIC IN THE SM-COORDINATES + DTETDN=(XLTDAY-XLTNGHT)*0.01745329D0 + DR2=DR**2 +C + SPS=DSIN(PS) + R2=X**2+Y**2+Z**2 + R=DSQRT(R2) + R3=R*R2 +C + RMRH=R-RH + RPRH=R+RH + SQM=DSQRT(RMRH**2+DR2) + SQP=DSQRT(RPRH**2+DR2) + C=SQP-SQM + Q=DSQRT((RH+1.D0)**2+DR2)-DSQRT((RH-1.D0)**2+DR2) + SPSAS=SPS/R*C/Q + CPSAS=DSQRT(1.D0-SPSAS**2) + XAS = X*CPSAS-Z*SPSAS + ZAS = X*SPSAS+Z*CPSAS + IF (XAS.NE.0.D0.OR.Y.NE.0.D0) THEN + PAS = DATAN2(Y,XAS) + ELSE + PAS=0.D0 + ENDIF +C + TAS=DATAN2(DSQRT(XAS**2+Y**2),ZAS) + STAS=DSIN(TAS) + F=STAS/(STAS**6*(1.D0-R3)+R3)**0.1666666667D0 +C + TET0=DASIN(F) + IF (TAS.GT.1.5707963D0) TET0=3.141592654D0-TET0 + DTET=DTETDN*DSIN(PAS*0.5D0)**2 + TETR1N=TNOONN+DTET + TETR1S=TNOONS-DTET +C +C NOW LET'S DEFINE WHICH OF THE FOUR REGIONS (HIGH-LAT., NORTHERN PSBL, +C PLASMA SHEET, SOUTHERN PSBL) DOES THE POINT (X,Y,Z) BELONG TO: +C + IF (TET0.LT.TETR1N-DTET0.OR.TET0.GT.TETR1S+DTET0) LOC=1 ! HIGH-LAT. + IF (TET0.GT.TETR1N+DTET0.AND.TET0.LT.TETR1S-DTET0) LOC=2 ! PL.SHEET + IF (TET0.GE.TETR1N-DTET0.AND.TET0.LE.TETR1N+DTET0) LOC=3 ! NORTH PSBL + IF (TET0.GE.TETR1S-DTET0.AND.TET0.LE.TETR1S+DTET0) LOC=4 ! SOUTH PSBL +C + IF (LOC.EQ.1) THEN ! IN THE HIGH-LAT. REGION USE THE SUBROUTINE DIPOCT +C +C print *, ' LOC=1 (HIGH-LAT)' ! (test printout; disabled now) + XI(1)=X + XI(2)=Y + XI(3)=Z + XI(4)=PS + CALL DIPLOOP1(XI,D1) + BX=0.D0 + BY=0.D0 + BZ=0.D0 + DO 1 I=1,26 + BX=BX+C1(I)*D1(1,I) + BY=BY+C1(I)*D1(2,I) + 1 BZ=BZ+C1(I)*D1(3,I) + ENDIF ! END OF THE CASE 1 +C + IF (LOC.EQ.2) THEN +C print *, ' LOC=2 (PLASMA SHEET)' ! (test printout; disabled now) +C + XI(1)=X + XI(2)=Y + XI(3)=Z + XI(4)=PS + CALL CONDIP1(XI,D2) + BX=0.D0 + BY=0.D0 + BZ=0.D0 + DO 2 I=1,79 + BX=BX+C2(I)*D2(1,I) + BY=BY+C2(I)*D2(2,I) + 2 BZ=BZ+C2(I)*D2(3,I) + ENDIF ! END OF THE CASE 2 +C + IF (LOC.EQ.3) THEN +C print *, ' LOC=3 (north PSBL)' ! (test printout; disabled now) +C + T01=TETR1N-DTET0 + T02=TETR1N+DTET0 + SQR=DSQRT(R) + ST01AS=SQR/(R3+1.D0/DSIN(T01)**6-1.D0)**0.1666666667 + ST02AS=SQR/(R3+1.D0/DSIN(T02)**6-1.D0)**0.1666666667 + CT01AS=DSQRT(1.D0-ST01AS**2) + CT02AS=DSQRT(1.D0-ST02AS**2) + XAS1=R*ST01AS*DCOS(PAS) + Y1= R*ST01AS*DSIN(PAS) + ZAS1=R*CT01AS + X1=XAS1*CPSAS+ZAS1*SPSAS + Z1=-XAS1*SPSAS+ZAS1*CPSAS ! X1,Y1,Z1 ARE COORDS OF THE NORTHERN +c BOUNDARY POINT + XI(1)=X1 + XI(2)=Y1 + XI(3)=Z1 + XI(4)=PS + CALL DIPLOOP1(XI,D1) + BX1=0.D0 + BY1=0.D0 + BZ1=0.D0 + DO 11 I=1,26 + BX1=BX1+C1(I)*D1(1,I) ! BX1,BY1,BZ1 ARE FIELD COMPONENTS + BY1=BY1+C1(I)*D1(2,I) ! IN THE NORTHERN BOUNDARY POINT + 11 BZ1=BZ1+C1(I)*D1(3,I) ! +C + XAS2=R*ST02AS*DCOS(PAS) + Y2= R*ST02AS*DSIN(PAS) + ZAS2=R*CT02AS + X2=XAS2*CPSAS+ZAS2*SPSAS + Z2=-XAS2*SPSAS+ZAS2*CPSAS ! X2,Y2,Z2 ARE COORDS OF THE SOUTHERN +C BOUNDARY POINT + XI(1)=X2 + XI(2)=Y2 + XI(3)=Z2 + XI(4)=PS + CALL CONDIP1(XI,D2) + BX2=0.D0 + BY2=0.D0 + BZ2=0.D0 + DO 12 I=1,79 + BX2=BX2+C2(I)*D2(1,I)! BX2,BY2,BZ2 ARE FIELD COMPONENTS + BY2=BY2+C2(I)*D2(2,I) ! IN THE SOUTHERN BOUNDARY POINT + 12 BZ2=BZ2+C2(I)*D2(3,I) +C +C NOW INTERPOLATE: +C + SS=DSQRT((X2-X1)**2+(Y2-Y1)**2+(Z2-Z1)**2) + DS=DSQRT((X-X1)**2+(Y-Y1)**2+(Z-Z1)**2) + FRAC=DS/SS + BX=BX1*(1.D0-FRAC)+BX2*FRAC + BY=BY1*(1.D0-FRAC)+BY2*FRAC + BZ=BZ1*(1.D0-FRAC)+BZ2*FRAC +C + ENDIF ! END OF THE CASE 3 +C + IF (LOC.EQ.4) THEN +C print *, ' LOC=4 (south PSBL)' ! (test printout; disabled now) +C + T01=TETR1S-DTET0 + T02=TETR1S+DTET0 + SQR=DSQRT(R) + ST01AS=SQR/(R3+1.D0/DSIN(T01)**6-1.D0)**0.1666666667 + ST02AS=SQR/(R3+1.D0/DSIN(T02)**6-1.D0)**0.1666666667 + CT01AS=-DSQRT(1.D0-ST01AS**2) + CT02AS=-DSQRT(1.D0-ST02AS**2) + XAS1=R*ST01AS*DCOS(PAS) + Y1= R*ST01AS*DSIN(PAS) + ZAS1=R*CT01AS + X1=XAS1*CPSAS+ZAS1*SPSAS + Z1=-XAS1*SPSAS+ZAS1*CPSAS ! X1,Y1,Z1 ARE COORDS OF THE NORTHERN +C BOUNDARY POINT + XI(1)=X1 + XI(2)=Y1 + XI(3)=Z1 + XI(4)=PS + CALL CONDIP1(XI,D2) + BX1=0.D0 + BY1=0.D0 + BZ1=0.D0 + DO 21 I=1,79 + BX1=BX1+C2(I)*D2(1,I) ! BX1,BY1,BZ1 ARE FIELD COMPONENTS + BY1=BY1+C2(I)*D2(2,I) ! IN THE NORTHERN BOUNDARY POINT + 21 BZ1=BZ1+C2(I)*D2(3,I) ! +C + XAS2=R*ST02AS*DCOS(PAS) + Y2= R*ST02AS*DSIN(PAS) + ZAS2=R*CT02AS + X2=XAS2*CPSAS+ZAS2*SPSAS + Z2=-XAS2*SPSAS+ZAS2*CPSAS ! X2,Y2,Z2 ARE COORDS OF THE SOUTHERN +C BOUNDARY POINT + XI(1)=X2 + XI(2)=Y2 + XI(3)=Z2 + XI(4)=PS + CALL DIPLOOP1(XI,D1) + BX2=0.D0 + BY2=0.D0 + BZ2=0.D0 + DO 22 I=1,26 + BX2=BX2+C1(I)*D1(1,I) ! BX2,BY2,BZ2 ARE FIELD COMPONENTS + BY2=BY2+C1(I)*D1(2,I) ! IN THE SOUTHERN BOUNDARY POINT + 22 BZ2=BZ2+C1(I)*D1(3,I) +C +C NOW INTERPOLATE: +C + SS=DSQRT((X2-X1)**2+(Y2-Y1)**2+(Z2-Z1)**2) + DS=DSQRT((X-X1)**2+(Y-Y1)**2+(Z-Z1)**2) + FRAC=DS/SS + BX=BX1*(1.D0-FRAC)+BX2*FRAC + BY=BY1*(1.D0-FRAC)+BY2*FRAC + BZ=BZ1*(1.D0-FRAC)+BZ2*FRAC +C + ENDIF ! END OF THE CASE 4 +C +C NOW, LET US ADD THE SHIELDING FIELD +C + CALL BIRK1SHLD(PS,X,Y,Z,BSX,BSY,BSZ) + BX=BX+BSX + BY=BY+BSY + BZ=BZ+BSZ + RETURN + END +C +C------------------------------------------------------------------------------ +C +C + SUBROUTINE DIPLOOP1(XI,D) +C +C +C Calculates dependent model variables and their deriva- +C tives for given independent variables and model parame- +C ters. Specifies model functions with free parameters which +C must be determined by means of least squares fits (RMS +C minimization procedure). +C +C Description of parameters: +C +C XI - input vector containing independent variables; +C D - output double precision vector containing +C calculated values for derivatives of dependent +C variables with respect to LINEAR model parameters; +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C +c The 26 coefficients are moments (Z- and X-components) of 12 dipoles placed +C inside the R1-shell, PLUS amplitudes of two octagonal double loops. +C The dipoles with nonzero Yi appear in pairs with equal moments. +c (see the notebook #2, pp.102-103, for details) +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +c + IMPLICIT REAL * 8 (A - H, O - Z) +C + COMMON /COORD11/ XX(12),YY(12) + COMMON /LOOPDIP1/ TILT,XCENTRE(2),RADIUS(2), DIPX,DIPY + COMMON /RHDR/RH,DR + DIMENSION XI(4),D(3,26) +C + X = XI(1) + Y = XI(2) + Z = XI(3) + PS= XI(4) + SPS=DSIN(PS) +C + DO 1 I=1,12 + R2=(XX(I)*DIPX)**2+(YY(I)*DIPY)**2 + R=DSQRT(R2) + RMRH=R-RH + RPRH=R+RH + DR2=DR**2 + SQM=DSQRT(RMRH**2+DR2) + SQP=DSQRT(RPRH**2+DR2) + C=SQP-SQM + Q=DSQRT((RH+1.D0)**2+DR2)-DSQRT((RH-1.D0)**2+DR2) + SPSAS=SPS/R*C/Q + CPSAS=DSQRT(1.D0-SPSAS**2) + XD= (XX(I)*DIPX)*CPSAS + YD= (YY(I)*DIPY) + ZD=-(XX(I)*DIPX)*SPSAS + CALL DIPXYZ(X-XD,Y-YD,Z-ZD,BX1X,BY1X,BZ1X,BX1Y,BY1Y,BZ1Y, + * BX1Z,BY1Z,BZ1Z) + IF (DABS(YD).GT.1.D-10) THEN + CALL DIPXYZ(X-XD,Y+YD,Z-ZD,BX2X,BY2X,BZ2X,BX2Y,BY2Y,BZ2Y, + * BX2Z,BY2Z,BZ2Z) + ELSE + BX2X=0.D0 + BY2X=0.D0 + BZ2X=0.D0 +C + BX2Z=0.D0 + BY2Z=0.D0 + BZ2Z=0.D0 + ENDIF +C + D(1,I)=BX1Z+BX2Z + D(2,I)=BY1Z+BY2Z + D(3,I)=BZ1Z+BZ2Z + D(1,I+12)=(BX1X+BX2X)*SPS + D(2,I+12)=(BY1X+BY2X)*SPS + D(3,I+12)=(BZ1X+BZ2X)*SPS + 1 CONTINUE +c + R2=(XCENTRE(1)+RADIUS(1))**2 + R=DSQRT(R2) + RMRH=R-RH + RPRH=R+RH + DR2=DR**2 + SQM=DSQRT(RMRH**2+DR2) + SQP=DSQRT(RPRH**2+DR2) + C=SQP-SQM + Q=DSQRT((RH+1.D0)**2+DR2)-DSQRT((RH-1.D0)**2+DR2) + SPSAS=SPS/R*C/Q + CPSAS=DSQRT(1.D0-SPSAS**2) + XOCT1= X*CPSAS-Z*SPSAS + YOCT1= Y + ZOCT1= X*SPSAS+Z*CPSAS +C + CALL CROSSLP(XOCT1,YOCT1,ZOCT1,BXOCT1,BYOCT1,BZOCT1,XCENTRE(1), + * RADIUS(1),TILT) + D(1,25)=BXOCT1*CPSAS+BZOCT1*SPSAS + D(2,25)=BYOCT1 + D(3,25)=-BXOCT1*SPSAS+BZOCT1*CPSAS +C + R2=(RADIUS(2)-XCENTRE(2))**2 + R=DSQRT(R2) + RMRH=R-RH + RPRH=R+RH + DR2=DR**2 + SQM=DSQRT(RMRH**2+DR2) + SQP=DSQRT(RPRH**2+DR2) + C=SQP-SQM + Q=DSQRT((RH+1.D0)**2+DR2)-DSQRT((RH-1.D0)**2+DR2) + SPSAS=SPS/R*C/Q + CPSAS=DSQRT(1.D0-SPSAS**2) + XOCT2= X*CPSAS-Z*SPSAS -XCENTRE(2) + YOCT2= Y + ZOCT2= X*SPSAS+Z*CPSAS + CALL CIRCLE(XOCT2,YOCT2,ZOCT2,RADIUS(2),BX,BY,BZ) + D(1,26) = BX*CPSAS+BZ*SPSAS + D(2,26) = BY + D(3,26) = -BX*SPSAS+BZ*CPSAS +C + RETURN + END +c------------------------------------------------------------------------- +C + SUBROUTINE CIRCLE(X,Y,Z,RL,BX,BY,BZ) +C +C RETURNS COMPONENTS OF THE FIELD FROM A CIRCULAR CURRENT LOOP OF RADIUS RL +C USES THE SECOND (MORE ACCURATE) APPROXIMATION GIVEN IN ABRAMOWITZ AND STEGUN + + IMPLICIT REAL*8 (A-H,O-Z) + REAL*8 K + DATA PI/3.141592654D0/ +C + RHO2=X*X+Y*Y + RHO=DSQRT(RHO2) + R22=Z*Z+(RHO+RL)**2 + R2=DSQRT(R22) + R12=R22-4.D0*RHO*RL + R32=0.5D0*(R12+R22) + XK2=1.D0-R12/R22 + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + K=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + E=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) + + IF (RHO.GT.1.D-6) THEN + BRHO=Z/(RHO2*R2)*(R32/R12*E-K) ! THIS IS NOT EXACTLY THE B-RHO COM- + ELSE ! PONENT - NOTE THE ADDITIONAL + BRHO=PI*RL/R2*(RL-RHO)/R12*Z/(R32-RHO2) ! DIVISION BY RHO + ENDIF + + BX=BRHO*X + BY=BRHO*Y + BZ=(K-E*(R32-2.D0*RL*RL)/R12)/R2 + RETURN + END +C------------------------------------------------------------- +C + SUBROUTINE CROSSLP(X,Y,Z,BX,BY,BZ,XC,RL,AL) +C +c RETURNS FIELD COMPONENTS OF A PAIR OF LOOPS WITH A COMMON CENTER AND +C DIAMETER, COINCIDING WITH THE X AXIS. THE LOOPS ARE INCLINED TO THE +C EQUATORIAL PLANE BY THE ANGLE AL (RADIANS) AND SHIFTED IN THE POSITIVE +C X-DIRECTION BY THE DISTANCE XC. +c + IMPLICIT REAL*8 (A-H,O-Z) +C + CAL=DCOS(AL) + SAL=DSIN(AL) +C + Y1=Y*CAL-Z*SAL + Z1=Y*SAL+Z*CAL + Y2=Y*CAL+Z*SAL + Z2=-Y*SAL+Z*CAL + CALL CIRCLE(X-XC,Y1,Z1,RL,BX1,BY1,BZ1) + CALL CIRCLE(X-XC,Y2,Z2,RL,BX2,BY2,BZ2) + BX=BX1+BX2 + BY= (BY1+BY2)*CAL+(BZ1-BZ2)*SAL + BZ=-(BY1-BY2)*SAL+(BZ1+BZ2)*CAL +C + RETURN + END + +C******************************************************************* + + SUBROUTINE DIPXYZ(X,Y,Z,BXX,BYX,BZX,BXY,BYY,BZY,BXZ,BYZ,BZZ) +C +C RETURNS THE FIELD COMPONENTS PRODUCED BY THREE DIPOLES, EACH +C HAVING M=Me AND ORIENTED PARALLEL TO X,Y, and Z AXIS, RESP. +C + IMPLICIT REAL*8 (A-H,O-Z) +C + X2=X**2 + Y2=Y**2 + Z2=Z**2 + R2=X2+Y2+Z2 + + XMR5=30574.D0/(R2*R2*DSQRT(R2)) + XMR53=3.D0*XMR5 + BXX=XMR5*(3.D0*X2-R2) + BYX=XMR53*X*Y + BZX=XMR53*X*Z +C + BXY=BYX + BYY=XMR5*(3.D0*Y2-R2) + BZY=XMR53*Y*Z +C + BXZ=BZX + BYZ=BZY + BZZ=XMR5*(3.D0*Z2-R2) +C + RETURN + END +C +C------------------------------------------------------------------------------ + SUBROUTINE CONDIP1(XI,D) +C +C Calculates dependent model variables and their derivatives for given +C independent variables and model parameters. Specifies model functions with +C free parameters which must be determined by means of least squares fits +C (RMS minimization procedure). +C +C Description of parameters: +C +C XI - input vector containing independent variables; +C D - output double precision vector containing +C calculated values for derivatives of dependent +C variables with respect to LINEAR model parameters; +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C +c The 79 coefficients are (1) 5 amplitudes of the conical harmonics, plus +c (2) (9x3+5x2)x2=74 components of the dipole moments +c (see the notebook #2, pp.113-..., for details) +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +c + IMPLICIT REAL * 8 (A - H, O - Z) +C + COMMON /DX1/ DX,SCALEIN,SCALEOUT + COMMON /COORD21/ XX(14),YY(14),ZZ(14) +c + DIMENSION XI(4),D(3,79),CF(5),SF(5) +C + X = XI(1) + Y = XI(2) + Z = XI(3) + PS= XI(4) + SPS=DSIN(PS) + CPS=DCOS(PS) +C + XSM=X*CPS-Z*SPS - DX + ZSM=Z*CPS+X*SPS + RO2=XSM**2+Y**2 + RO=SQRT(RO2) +C + CF(1)=XSM/RO + SF(1)=Y/RO +C + CF(2)=CF(1)**2-SF(1)**2 + SF(2)=2.*SF(1)*CF(1) + CF(3)=CF(2)*CF(1)-SF(2)*SF(1) + SF(3)=SF(2)*CF(1)+CF(2)*SF(1) + CF(4)=CF(3)*CF(1)-SF(3)*SF(1) + SF(4)=SF(3)*CF(1)+CF(3)*SF(1) + CF(5)=CF(4)*CF(1)-SF(4)*SF(1) + SF(5)=SF(4)*CF(1)+CF(4)*SF(1) +C + R2=RO2+ZSM**2 + R=DSQRT(R2) + C=ZSM/R + S=RO/R + CH=DSQRT(0.5D0*(1.D0+C)) + SH=DSQRT(0.5D0*(1.D0-C)) + TNH=SH/CH + CNH=1.D0/TNH +C + DO 1 M=1,5 + BT=M*CF(M)/(R*S)*(TNH**M+CNH**M) + BF=-0.5D0*M*SF(M)/R*(TNH**(M-1)/CH**2-CNH**(M-1)/SH**2) + BXSM=BT*C*CF(1)-BF*SF(1) + BY=BT*C*SF(1)+BF*CF(1) + BZSM=-BT*S +C + D(1,M)=BXSM*CPS+BZSM*SPS + D(2,M)=BY + 1 D(3,M)=-BXSM*SPS+BZSM*CPS +C + XSM = X*CPS-Z*SPS + ZSM = Z*CPS+X*SPS +C + DO 2 I=1,9 +C + IF (I.EQ.3.OR.I.EQ.5.OR.I.EQ.6) THEN + XD = XX(I)*SCALEIN + YD = YY(I)*SCALEIN + ELSE + XD = XX(I)*SCALEOUT + YD = YY(I)*SCALEOUT + ENDIF +C + ZD = ZZ(I) +C + CALL DIPXYZ(XSM-XD,Y-YD,ZSM-ZD,BX1X,BY1X,BZ1X,BX1Y,BY1Y,BZ1Y, + * BX1Z,BY1Z,BZ1Z) + CALL DIPXYZ(XSM-XD,Y+YD,ZSM-ZD,BX2X,BY2X,BZ2X,BX2Y,BY2Y,BZ2Y, + * BX2Z,BY2Z,BZ2Z) + CALL DIPXYZ(XSM-XD,Y-YD,ZSM+ZD,BX3X,BY3X,BZ3X,BX3Y,BY3Y,BZ3Y, + * BX3Z,BY3Z,BZ3Z) + CALL DIPXYZ(XSM-XD,Y+YD,ZSM+ZD,BX4X,BY4X,BZ4X,BX4Y,BY4Y,BZ4Y, + * BX4Z,BY4Z,BZ4Z) +C + IX=I*3+3 + IY=IX+1 + IZ=IY+1 +C + D(1,IX)=(BX1X+BX2X-BX3X-BX4X)*CPS+(BZ1X+BZ2X-BZ3X-BZ4X)*SPS + D(2,IX)= BY1X+BY2X-BY3X-BY4X + D(3,IX)=(BZ1X+BZ2X-BZ3X-BZ4X)*CPS-(BX1X+BX2X-BX3X-BX4X)*SPS +C + D(1,IY)=(BX1Y-BX2Y-BX3Y+BX4Y)*CPS+(BZ1Y-BZ2Y-BZ3Y+BZ4Y)*SPS + D(2,IY)= BY1Y-BY2Y-BY3Y+BY4Y + D(3,IY)=(BZ1Y-BZ2Y-BZ3Y+BZ4Y)*CPS-(BX1Y-BX2Y-BX3Y+BX4Y)*SPS +C + D(1,IZ)=(BX1Z+BX2Z+BX3Z+BX4Z)*CPS+(BZ1Z+BZ2Z+BZ3Z+BZ4Z)*SPS + D(2,IZ)= BY1Z+BY2Z+BY3Z+BY4Z + D(3,IZ)=(BZ1Z+BZ2Z+BZ3Z+BZ4Z)*CPS-(BX1Z+BX2Z+BX3Z+BX4Z)*SPS +C + IX=IX+27 + IY=IY+27 + IZ=IZ+27 +C + D(1,IX)=SPS*((BX1X+BX2X+BX3X+BX4X)*CPS+(BZ1X+BZ2X+BZ3X+BZ4X)*SPS) + D(2,IX)=SPS*(BY1X+BY2X+BY3X+BY4X) + D(3,IX)=SPS*((BZ1X+BZ2X+BZ3X+BZ4X)*CPS-(BX1X+BX2X+BX3X+BX4X)*SPS) +C + D(1,IY)=SPS*((BX1Y-BX2Y+BX3Y-BX4Y)*CPS+(BZ1Y-BZ2Y+BZ3Y-BZ4Y)*SPS) + D(2,IY)=SPS*(BY1Y-BY2Y+BY3Y-BY4Y) + D(3,IY)=SPS*((BZ1Y-BZ2Y+BZ3Y-BZ4Y)*CPS-(BX1Y-BX2Y+BX3Y-BX4Y)*SPS) +C + D(1,IZ)=SPS*((BX1Z+BX2Z-BX3Z-BX4Z)*CPS+(BZ1Z+BZ2Z-BZ3Z-BZ4Z)*SPS) + D(2,IZ)=SPS*(BY1Z+BY2Z-BY3Z-BY4Z) + D(3,IZ)=SPS*((BZ1Z+BZ2Z-BZ3Z-BZ4Z)*CPS-(BX1Z+BX2Z-BX3Z-BX4Z)*SPS) + 2 CONTINUE +C + DO 3 I=1,5 + ZD=ZZ(I+9) + CALL DIPXYZ(XSM,Y,ZSM-ZD,BX1X,BY1X,BZ1X,BX1Y,BY1Y,BZ1Y,BX1Z,BY1Z, + * BZ1Z) + CALL DIPXYZ(XSM,Y,ZSM+ZD,BX2X,BY2X,BZ2X,BX2Y,BY2Y,BZ2Y,BX2Z,BY2Z, + * BZ2Z) + IX=58+I*2 + IZ=IX+1 + D(1,IX)=(BX1X-BX2X)*CPS+(BZ1X-BZ2X)*SPS + D(2,IX)=BY1X-BY2X + D(3,IX)=(BZ1X-BZ2X)*CPS-(BX1X-BX2X)*SPS +C + D(1,IZ)=(BX1Z+BX2Z)*CPS+(BZ1Z+BZ2Z)*SPS + D(2,IZ)=BY1Z+BY2Z + D(3,IZ)=(BZ1Z+BZ2Z)*CPS-(BX1Z+BX2Z)*SPS +C + IX=IX+10 + IZ=IZ+10 + D(1,IX)=SPS*((BX1X+BX2X)*CPS+(BZ1X+BZ2X)*SPS) + D(2,IX)=SPS*(BY1X+BY2X) + D(3,IX)=SPS*((BZ1X+BZ2X)*CPS-(BX1X+BX2X)*SPS) +C + D(1,IZ)=SPS*((BX1Z-BX2Z)*CPS+(BZ1Z-BZ2Z)*SPS) + D(2,IZ)=SPS*(BY1Z-BY2Z) + 3 D(3,IZ)=SPS*((BZ1Z-BZ2Z)*CPS-(BX1Z-BX2Z)*SPS) +C + RETURN + END +C +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C + SUBROUTINE BIRK1SHLD(PS,X,Y,Z,BX,BY,BZ) +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C +C The 64 linear parameters are amplitudes of the "box" harmonics. +c The 16 nonlinear parameters are the scales Pi, and Qk entering the arguments +C of sines/cosines and exponents in each of 32 cartesian harmonics +c N.A. Tsyganenko, Spring 1994, adjusted for the Birkeland field Aug.22, 1995 +c Revised June 12, 1996. +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(80) + DIMENSION P1(4),R1(4),Q1(4),S1(4),RP(4),RR(4),RQ(4),RS(4) +C + EQUIVALENCE (P1(1),A(65)),(R1(1),A(69)),(Q1(1),A(73)), + * (S1(1),A(77)) +C + DATA A/1.174198045,-1.463820502,4.840161537,-3.674506864, + * 82.18368896,-94.94071588,-4122.331796,4670.278676,-21.54975037, + * 26.72661293,-72.81365728,44.09887902,40.08073706,-51.23563510, + * 1955.348537,-1940.971550,794.0496433,-982.2441344,1889.837171, + * -558.9779727,-1260.543238,1260.063802,-293.5942373,344.7250789, + * -773.7002492,957.0094135,-1824.143669,520.7994379,1192.484774, + * -1192.184565,89.15537624,-98.52042999,-0.8168777675E-01, + * 0.4255969908E-01,0.3155237661,-0.3841755213,2.494553332, + * -0.6571440817E-01,-2.765661310,0.4331001908,0.1099181537, + * -0.6154126980E-01,-0.3258649260,0.6698439193,-5.542735524, + * 0.1604203535,5.854456934,-0.8323632049,3.732608869,-3.130002153, + * 107.0972607,-32.28483411,-115.2389298,54.45064360,-0.5826853320, + * -3.582482231,-4.046544561,3.311978102,-104.0839563,30.26401293, + * 97.29109008,-50.62370872,-296.3734955,127.7872523,5.303648988, + * 10.40368955,69.65230348,466.5099509,1.645049286,3.825838190, + * 11.66675599,558.9781177,1.826531343,2.066018073,25.40971369, + * 990.2795225,2.319489258,4.555148484,9.691185703,591.8280358/ +C + BX=0.D0 + BY=0.D0 + BZ=0.D0 + CPS=DCOS(PS) + SPS=DSIN(PS) + S3PS=4.D0*CPS**2-1.D0 +C + DO 11 I=1,4 + RP(I)=1.D0/P1(I) + RR(I)=1.D0/R1(I) + RQ(I)=1.D0/Q1(I) + 11 RS(I)=1.D0/S1(I) +C + L=0 +C + DO 1 M=1,2 ! M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY) +C AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY) + DO 2 I=1,4 + CYPI=DCOS(Y*RP(I)) + CYQI=DCOS(Y*RQ(I)) + SYPI=DSIN(Y*RP(I)) + SYQI=DSIN(Y*RQ(I)) +C + DO 3 K=1,4 + SZRK=DSIN(Z*RR(K)) + CZSK=DCOS(Z*RS(K)) + CZRK=DCOS(Z*RR(K)) + SZSK=DSIN(Z*RS(K)) + SQPR=DSQRT(RP(I)**2+RR(K)**2) + SQQS=DSQRT(RQ(I)**2+RS(K)**2) + EPR=DEXP(X*SQPR) + EQS=DEXP(X*SQQS) +C + DO 4 N=1,2 ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT +C AND N=2 IS FOR THE SECOND ONE + IF (M.EQ.1) THEN + IF (N.EQ.1) THEN + HX=-SQPR*EPR*CYPI*SZRK + HY=RP(I)*EPR*SYPI*SZRK + HZ=-RR(K)*EPR*CYPI*CZRK + ELSE + HX=HX*CPS + HY=HY*CPS + HZ=HZ*CPS + ENDIF + ELSE + IF (N.EQ.1) THEN + HX=-SPS*SQQS*EQS*CYQI*CZSK + HY=SPS*RQ(I)*EQS*SYQI*CZSK + HZ=SPS*RS(K)*EQS*CYQI*SZSK + ELSE + HX=HX*S3PS + HY=HY*S3PS + HZ=HZ*S3PS + ENDIF + ENDIF + L=L+1 +c + BX=BX+A(L)*HX + BY=BY+A(L)*HY + 4 BZ=BZ+A(L)*HZ + 3 CONTINUE + 2 CONTINUE + 1 CONTINUE +C + RETURN + END +C +C########################################################################## +C + SUBROUTINE BIRK2TOT_02(PS,X,Y,Z,BX,BY,BZ) +C + IMPLICIT REAL*8 (A-H,O-Z) +C + CALL BIRK2SHL(X,Y,Z,PS,WX,WY,WZ) + CALL R2_BIRK(X,Y,Z,PS,HX,HY,HZ) + BX=WX+HX + BY=WY+HY + BZ=WZ+HZ + RETURN + END +C +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C +C THIS CODE IS FOR THE FIELD FROM 2x2x2=8 "CARTESIAN" HARMONICS +C + SUBROUTINE BIRK2SHL(X,Y,Z,PS,HX,HY,HZ) +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C The model parameters are provided to this module via common-block /A/. +C The 16 linear parameters enter in pairs in the amplitudes of the +c "cartesian" harmonics. +c The 8 nonlinear parameters are the scales Pi,Ri,Qi,and Si entering the +c arguments of exponents, sines, and cosines in each of the 8 "Cartesian" +c harmonics +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION P(2),R(2),Q(2),S(2) + DIMENSION A(24) +C + EQUIVALENCE(P(1),A(17)),(R(1),A(19)),(Q(1),A(21)),(S(1),A(23)) + DATA A/-111.6371348,124.5402702,110.3735178,-122.0095905, + * 111.9448247,-129.1957743,-110.7586562,126.5649012,-0.7865034384, + * -0.2483462721,0.8026023894,0.2531397188,10.72890902,0.8483902118, + * -10.96884315,-0.8583297219,13.85650567,14.90554500,10.21914434, + * 10.09021632,6.340382460,14.40432686,12.71023437,12.83966657/ +C + CPS=DCOS(PS) + SPS=DSIN(PS) + S3PS=4.D0*CPS**2-1.D0 ! THIS IS SIN(3*PS)/SIN(PS) +C + HX=0.D0 + HY=0.D0 + HZ=0.D0 + L=0 +C + DO 1 M=1,2 ! M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY) +C AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY) + DO 2 I=1,2 + CYPI=DCOS(Y/P(I)) + CYQI=DCOS(Y/Q(I)) + SYPI=DSIN(Y/P(I)) + SYQI=DSIN(Y/Q(I)) +C + DO 3 K=1,2 + SZRK=DSIN(Z/R(K)) + CZSK=DCOS(Z/S(K)) + CZRK=DCOS(Z/R(K)) + SZSK=DSIN(Z/S(K)) + SQPR=DSQRT(1.D0/P(I)**2+1.D0/R(K)**2) + SQQS=DSQRT(1.D0/Q(I)**2+1.D0/S(K)**2) + EPR=DEXP(X*SQPR) + EQS=DEXP(X*SQQS) +C + DO 4 N=1,2 ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT +C AND N=2 IS FOR THE SECOND ONE +C + L=L+1 + IF (M.EQ.1) THEN + IF (N.EQ.1) THEN + DX=-SQPR*EPR*CYPI*SZRK + DY=EPR/P(I)*SYPI*SZRK + DZ=-EPR/R(K)*CYPI*CZRK + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ELSE + DX=DX*CPS + DY=DY*CPS + DZ=DZ*CPS + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ENDIF + ELSE + IF (N.EQ.1) THEN + DX=-SPS*SQQS*EQS*CYQI*CZSK + DY=SPS*EQS/Q(I)*SYQI*CZSK + DZ=SPS*EQS/S(K)*CYQI*SZSK + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ELSE + DX=DX*S3PS + DY=DY*S3PS + DZ=DZ*S3PS + HX=HX+A(L)*DX + HY=HY+A(L)*DY + HZ=HZ+A(L)*DZ + ENDIF + ENDIF +c + 4 CONTINUE + 3 CONTINUE + 2 CONTINUE + 1 CONTINUE +C + RETURN + END + +c******************************************************************** +C + SUBROUTINE R2_BIRK(X,Y,Z,PS,BX,BY,BZ) +C +C RETURNS THE MODEL FIELD FOR THE REGION 2 BIRKELAND CURRENT/PARTIAL RC +C (WITHOUT SHIELDING FIELD) +C + IMPLICIT REAL*8 (A-H,O-Z) + SAVE PSI,CPS,SPS + DATA DELARG/0.030D0/,DELARG1/0.015D0/,PSI/10.D0/ +C + IF (DABS(PSI-PS).GT.1.D-10) THEN + PSI=PS + CPS=DCOS(PS) + SPS=DSIN(PS) + ENDIF +C + XSM=X*CPS-Z*SPS + ZSM=Z*CPS+X*SPS +C + XKS=XKSI(XSM,Y,ZSM) + IF (XKS.LT.-(DELARG+DELARG1)) THEN + CALL R2OUTER(XSM,Y,ZSM,BXSM,BY,BZSM) + BXSM=-BXSM*0.02 ! ALL COMPONENTS ARE MULTIPLIED BY THE + BY=-BY*0.02 ! FACTOR -0.02, IN ORDER TO NORMALIZE THE + BZSM=-BZSM*0.02 ! FIELD (SO THAT Bz=-1 nT at X=-5.3 RE, Y=Z=0) + ENDIF + IF (XKS.GE.-(DELARG+DELARG1).AND.XKS.LT.-DELARG+DELARG1) THEN + CALL R2OUTER(XSM,Y,ZSM,BXSM1,BY1,BZSM1) + CALL R2SHEET(XSM,Y,ZSM,BXSM2,BY2,BZSM2) + F2=-0.02*TKSI(XKS,-DELARG,DELARG1) + F1=-0.02-F2 + BXSM=BXSM1*F1+BXSM2*F2 + BY=BY1*F1+BY2*F2 + BZSM=BZSM1*F1+BZSM2*F2 + ENDIF + + IF (XKS.GE.-DELARG+DELARG1.AND.XKS.LT.DELARG-DELARG1) THEN + CALL R2SHEET(XSM,Y,ZSM,BXSM,BY,BZSM) + BXSM=-BXSM*0.02 + BY=-BY*0.02 + BZSM=-BZSM*0.02 + ENDIF + IF (XKS.GE.DELARG-DELARG1.AND.XKS.LT.DELARG+DELARG1) THEN + CALL R2INNER(XSM,Y,ZSM,BXSM1,BY1,BZSM1) + CALL R2SHEET(XSM,Y,ZSM,BXSM2,BY2,BZSM2) + F1=-0.02*TKSI(XKS,DELARG,DELARG1) + F2=-0.02-F1 + BXSM=BXSM1*F1+BXSM2*F2 + BY=BY1*F1+BY2*F2 + BZSM=BZSM1*F1+BZSM2*F2 + ENDIF + IF (XKS.GE.DELARG+DELARG1) THEN + CALL R2INNER(XSM,Y,ZSM,BXSM,BY,BZSM) + BXSM=-BXSM*0.02 + BY=-BY*0.02 + BZSM=-BZSM*0.02 + ENDIF +C + BX=BXSM*CPS+BZSM*SPS + BZ=BZSM*CPS-BXSM*SPS +C + RETURN + END +C +C**************************************************************** + +c + SUBROUTINE R2INNER (X,Y,Z,BX,BY,BZ) +C +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION CBX(5),CBY(5),CBZ(5) +C + DATA PL1,PL2,PL3,PL4,PL5,PL6,PL7,PL8/154.185,-2.12446,.601735E-01, + * -.153954E-02,.355077E-04,29.9996,262.886,99.9132/ + DATA PN1,PN2,PN3,PN4,PN5,PN6,PN7,PN8/-8.1902,6.5239,5.504,7.7815, + * .8573,3.0986,.0774,-.038/ +C + CALL BCONIC(X,Y,Z,CBX,CBY,CBZ,5) +C +C NOW INTRODUCE ONE 4-LOOP SYSTEM: +C + CALL LOOPS4(X,Y,Z,DBX8,DBY8,DBZ8,PN1,PN2,PN3,PN4,PN5,PN6) +C + CALL DIPDISTR(X-PN7,Y,Z,DBX6,DBY6,DBZ6,0) + CALL DIPDISTR(X-PN8,Y,Z,DBX7,DBY7,DBZ7,1) + +C NOW COMPUTE THE FIELD COMPONENTS: + + BX=PL1*CBX(1)+PL2*CBX(2)+PL3*CBX(3)+PL4*CBX(4)+PL5*CBX(5) + * +PL6*DBX6+PL7*DBX7+PL8*DBX8 + BY=PL1*CBY(1)+PL2*CBY(2)+PL3*CBY(3)+PL4*CBY(4)+PL5*CBY(5) + * +PL6*DBY6+PL7*DBY7+PL8*DBY8 + BZ=PL1*CBZ(1)+PL2*CBZ(2)+PL3*CBZ(3)+PL4*CBZ(4)+PL5*CBZ(5) + * +PL6*DBZ6+PL7*DBZ7+PL8*DBZ8 +C + RETURN + END +C----------------------------------------------------------------------- + + SUBROUTINE BCONIC(X,Y,Z,CBX,CBY,CBZ,NMAX) +C +c "CONICAL" HARMONICS +c + IMPLICIT REAL*8 (A-H,O-Z) +C + DIMENSION CBX(NMAX),CBY(NMAX),CBZ(NMAX) + + RO2=X**2+Y**2 + RO=SQRT(RO2) +C + CF=X/RO + SF=Y/RO + CFM1=1.D0 + SFM1=0.D0 +C + R2=RO2+Z**2 + R=DSQRT(R2) + C=Z/R + S=RO/R + CH=DSQRT(0.5D0*(1.D0+C)) + SH=DSQRT(0.5D0*(1.D0-C)) + TNHM1=1.D0 + CNHM1=1.D0 + TNH=SH/CH + CNH=1.D0/TNH +C + DO 1 M=1,NMAX + CFM=CFM1*CF-SFM1*SF + SFM=CFM1*SF+SFM1*CF + CFM1=CFM + SFM1=SFM + TNHM=TNHM1*TNH + CNHM=CNHM1*CNH + BT=M*CFM/(R*S)*(TNHM+CNHM) + BF=-0.5D0*M*SFM/R*(TNHM1/CH**2-CNHM1/SH**2) + TNHM1=TNHM + CNHM1=CNHM + CBX(M)=BT*C*CF-BF*SF + CBY(M)=BT*C*SF+BF*CF + 1 CBZ(M)=-BT*S +C + RETURN + END + +C------------------------------------------------------------------- +C + SUBROUTINE DIPDISTR(X,Y,Z,BX,BY,BZ,MODE) +C +C RETURNS FIELD COMPONENTS FROM A LINEAR DISTRIBUTION OF DIPOLAR SOURCES +C ON THE Z-AXIS. THE PARAMETER MODE DEFINES HOW THE DIPOLE STRENGTH +C VARIES ALONG THE Z-AXIS: MODE=0 IS FOR A STEP-FUNCTION (Mx=const > 0 +c FOR Z > 0, AND Mx=-const < 0 FOR Z < 0) +C WHILE MODE=1 IS FOR A LINEAR VARIATION OF THE DIPOLE MOMENT DENSITY +C SEE NB#3, PAGE 53 FOR DETAILS. +C +C +C INPUT: X,Y,Z OF A POINT OF SPACE, AND MODE +C + IMPLICIT REAL*8 (A-H,O-Z) + X2=X*X + RHO2=X2+Y*Y + R2=RHO2+Z*Z + R3=R2*DSQRT(R2) + + IF (MODE.EQ.0) THEN + BX=Z/RHO2**2*(R2*(Y*Y-X2)-RHO2*X2)/R3 + BY=-X*Y*Z/RHO2**2*(2.D0*R2+RHO2)/R3 + BZ=X/R3 + ELSE + BX=Z/RHO2**2*(Y*Y-X2) + BY=-2.D0*X*Y*Z/RHO2**2 + BZ=X/RHO2 + ENDIF + RETURN + END + +C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ +C + SUBROUTINE R2OUTER (X,Y,Z,BX,BY,BZ) +C + IMPLICIT REAL*8 (A-H,O-Z) +C + DATA PL1,PL2,PL3,PL4,PL5/-34.105,-2.00019,628.639,73.4847,12.5162/ + DATA PN1,PN2,PN3,PN4,PN5,PN6,PN7,PN8,PN9,PN10,PN11,PN12,PN13,PN14, + * PN15,PN16,PN17 /.55,.694,.0031,1.55,2.8,.1375,-.7,.2,.9625, + * -2.994,2.925,-1.775,4.3,-.275,2.7,.4312,1.55/ +c +C THREE PAIRS OF CROSSED LOOPS: +C + CALL CROSSLP(X,Y,Z,DBX1,DBY1,DBZ1,PN1,PN2,PN3) + CALL CROSSLP(X,Y,Z,DBX2,DBY2,DBZ2,PN4,PN5,PN6) + CALL CROSSLP(X,Y,Z,DBX3,DBY3,DBZ3,PN7,PN8,PN9) +C +C NOW AN EQUATORIAL LOOP ON THE NIGHTSIDE +C + CALL CIRCLE(X-PN10,Y,Z,PN11,DBX4,DBY4,DBZ4) +c +c NOW A 4-LOOP SYSTEM ON THE NIGHTSIDE +c + + CALL LOOPS4(X,Y,Z,DBX5,DBY5,DBZ5,PN12,PN13,PN14,PN15,PN16,PN17) + +C--------------------------------------------------------------------- + +C NOW COMPUTE THE FIELD COMPONENTS: + + BX=PL1*DBX1+PL2*DBX2+PL3*DBX3+PL4*DBX4+PL5*DBX5 + BY=PL1*DBY1+PL2*DBY2+PL3*DBY3+PL4*DBY4+PL5*DBY5 + BZ=PL1*DBZ1+PL2*DBZ2+PL3*DBZ3+PL4*DBZ4+PL5*DBZ5 + + RETURN + END +C +C-------------------------------------------------------------------- +C + SUBROUTINE LOOPS4(X,Y,Z,BX,BY,BZ,XC,YC,ZC,R,THETA,PHI) +C +C RETURNS FIELD COMPONENTS FROM A SYSTEM OF 4 CURRENT LOOPS, POSITIONED +C SYMMETRICALLY WITH RESPECT TO NOON-MIDNIGHT MERIDIAN AND EQUATORIAL +C PLANES. +C INPUT: X,Y,Z OF A POINT OF SPACE +C XC,YC,ZC (YC > 0 AND ZC > 0) - POSITION OF THE CENTER OF THE +C 1ST-QUADRANT LOOP +C R - LOOP RADIUS (THE SAME FOR ALL FOUR) +C THETA, PHI - SPECIFY THE ORIENTATION OF THE NORMAL OF THE 1ST LOOP +c ----------------------------------------------------------- + + IMPLICIT REAL*8 (A-H,O-Z) +C + CT=DCOS(THETA) + ST=DSIN(THETA) + CP=DCOS(PHI) + SP=DSIN(PHI) +C------------------------------------1ST QUADRANT: + XS=(X-XC)*CP+(Y-YC)*SP + YSS=(Y-YC)*CP-(X-XC)*SP + ZS=Z-ZC + XSS=XS*CT-ZS*ST + ZSS=ZS*CT+XS*ST + + CALL CIRCLE(XSS,YSS,ZSS,R,BXSS,BYS,BZSS) + BXS=BXSS*CT+BZSS*ST + BZ1=BZSS*CT-BXSS*ST + BX1=BXS*CP-BYS*SP + BY1=BXS*SP+BYS*CP +C-------------------------------------2nd QUADRANT: + XS=(X-XC)*CP-(Y+YC)*SP + YSS=(Y+YC)*CP+(X-XC)*SP + ZS=Z-ZC + XSS=XS*CT-ZS*ST + ZSS=ZS*CT+XS*ST + + CALL CIRCLE(XSS,YSS,ZSS,R,BXSS,BYS,BZSS) + BXS=BXSS*CT+BZSS*ST + BZ2=BZSS*CT-BXSS*ST + BX2=BXS*CP+BYS*SP + BY2=-BXS*SP+BYS*CP +C-------------------------------------3RD QUADRANT: + XS=-(X-XC)*CP+(Y+YC)*SP + YSS=-(Y+YC)*CP-(X-XC)*SP + ZS=Z+ZC + XSS=XS*CT-ZS*ST + ZSS=ZS*CT+XS*ST + + CALL CIRCLE(XSS,YSS,ZSS,R,BXSS,BYS,BZSS) + BXS=BXSS*CT+BZSS*ST + BZ3=BZSS*CT-BXSS*ST + BX3=-BXS*CP-BYS*SP + BY3=BXS*SP-BYS*CP +C-------------------------------------4TH QUADRANT: + XS=-(X-XC)*CP-(Y-YC)*SP + YSS=-(Y-YC)*CP+(X-XC)*SP + ZS=Z+ZC + XSS=XS*CT-ZS*ST + ZSS=ZS*CT+XS*ST + + CALL CIRCLE(XSS,YSS,ZSS,R,BXSS,BYS,BZSS) + BXS=BXSS*CT+BZSS*ST + BZ4=BZSS*CT-BXSS*ST + BX4=-BXS*CP+BYS*SP + BY4=-BXS*SP-BYS*CP + + BX=BX1+BX2+BX3+BX4 + BY=BY1+BY2+BY3+BY4 + BZ=BZ1+BZ2+BZ3+BZ4 + + RETURN + END +C +C@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ +C + SUBROUTINE R2SHEET(X,Y,Z,BX,BY,BZ) +C + IMPLICIT REAL*8 (A-H,O-Z) +C + DATA PNONX1,PNONX2,PNONX3,PNONX4,PNONX5,PNONX6,PNONX7,PNONX8, + * PNONY1,PNONY2,PNONY3,PNONY4,PNONY5,PNONY6,PNONY7,PNONY8, + * PNONZ1,PNONZ2,PNONZ3,PNONZ4,PNONZ5,PNONZ6,PNONZ7,PNONZ8 + */-19.0969D0,-9.28828D0,-0.129687D0,5.58594D0,22.5055D0, + * 0.483750D-01,0.396953D-01,0.579023D-01,-13.6750D0,-6.70625D0, + * 2.31875D0,11.4062D0,20.4562D0,0.478750D-01,0.363750D-01, + * 0.567500D-01,-16.7125D0,-16.4625D0,-0.1625D0,5.1D0,23.7125D0, + * 0.355625D-01,0.318750D-01,0.538750D-01/ +C +C + DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17, + * A18,A19,A20,A21,A22,A23,A24,A25,A26,A27,A28,A29,A30,A31,A32,A33, + * A34,A35,A36,A37,A38,A39,A40,A41,A42,A43,A44,A45,A46,A47,A48,A49, + * A50,A51,A52,A53,A54,A55,A56,A57,A58,A59,A60,A61,A62,A63,A64,A65, + * A66,A67,A68,A69,A70,A71,A72,A73,A74,A75,A76,A77,A78,A79,A80 + * /8.07190D0,-7.39582D0,-7.62341D0,0.684671D0,-13.5672D0,11.6681D0, + * 13.1154,-0.890217D0,7.78726D0,-5.38346D0,-8.08738D0,0.609385D0, + * -2.70410D0, 3.53741D0,3.15549D0,-1.11069D0,-8.47555D0,0.278122D0, + * 2.73514D0,4.55625D0,13.1134D0,1.15848D0,-3.52648D0,-8.24698D0, + * -6.85710D0,-2.81369D0, 2.03795D0, 4.64383D0,2.49309D0,-1.22041D0, + * -1.67432D0,-0.422526D0,-5.39796D0,7.10326D0,5.53730D0,-13.1918D0, + * 4.67853D0,-7.60329D0,-2.53066D0, 7.76338D0, 5.60165D0,5.34816D0, + * -4.56441D0,7.05976D0,-2.62723D0,-0.529078D0,1.42019D0,-2.93919D0, + * 55.6338D0,-1.55181D0,39.8311D0,-80.6561D0,-46.9655D0,32.8925D0, + * -6.32296D0,19.7841D0,124.731D0,10.4347D0,-30.7581D0,102.680D0, + * -47.4037D0,-3.31278D0,9.37141D0,-50.0268D0,-533.319D0,110.426D0, + * 1000.20D0,-1051.40D0, 1619.48D0,589.855D0,-1462.73D0,1087.10D0, + * -1994.73D0,-1654.12D0,1263.33D0,-260.210D0,1424.84D0,1255.71D0, + * -956.733D0, 219.946D0/ +C +C + DATA B1,B2,B3,B4,B5,B6,B7,B8,B9,B10,B11,B12,B13,B14,B15,B16,B17, + * B18,B19,B20,B21,B22,B23,B24,B25,B26,B27,B28,B29,B30,B31,B32,B33, + * B34,B35,B36,B37,B38,B39,B40,B41,B42,B43,B44,B45,B46,B47,B48,B49, + * B50,B51,B52,B53,B54,B55,B56,B57,B58,B59,B60,B61,B62,B63,B64,B65, + * B66,B67,B68,B69,B70,B71,B72,B73,B74,B75,B76,B77,B78,B79,B80 + */-9.08427D0,10.6777D0,10.3288D0,-0.969987D0,6.45257D0,-8.42508D0, + * -7.97464D0,1.41996D0,-1.92490D0,3.93575D0,2.83283D0,-1.48621D0, + *0.244033D0,-0.757941D0,-0.386557D0,0.344566D0,9.56674D0,-2.5365D0, + * -3.32916D0,-5.86712D0,-6.19625D0,1.83879D0,2.52772D0,4.34417D0, + * 1.87268D0,-2.13213D0,-1.69134D0,-.176379D0,-.261359D0,.566419D0, + * 0.3138D0,-0.134699D0,-3.83086D0,-8.4154D0,4.77005D0,-9.31479D0, + * 37.5715D0,19.3992D0,-17.9582D0,36.4604D0,-14.9993D0,-3.1442D0, + * 6.17409D0,-15.5519D0,2.28621D0,-0.891549D-2,-.462912D0,2.47314D0, + * 41.7555D0,208.614D0,-45.7861D0,-77.8687D0,239.357D0,-67.9226D0, + * 66.8743D0,238.534D0,-112.136D0,16.2069D0,-40.4706D0,-134.328D0, + * 21.56D0,-0.201725D0,2.21D0,32.5855D0,-108.217D0,-1005.98D0, + * 585.753D0,323.668D0,-817.056D0,235.750D0,-560.965D0,-576.892D0, + * 684.193D0,85.0275D0,168.394D0,477.776D0,-289.253D0,-123.216D0, + * 75.6501D0,-178.605D0/ +C + DATA C1,C2,C3,C4,C5,C6,C7,C8,C9,C10,C11,C12,C13,C14,C15,C16,C17, + * C18,C19,C20,C21,C22,C23,C24,C25,C26,C27,C28,C29,C30,C31,C32,C33, + * C34,C35,C36,C37,C38,C39,C40,C41,C42,C43,C44,C45,C46,C47,C48,C49, + * C50,C51,C52,C53,C54,C55,C56,C57,C58,C59,C60,C61,C62,C63,C64,C65, + * C66,C67,C68,C69,C70,C71,C72,C73,C74,C75,C76,C77,C78,C79,C80 + * / 1167.61D0,-917.782D0,-1253.2D0,-274.128D0,-1538.75D0,1257.62D0, + * 1745.07D0,113.479D0,393.326D0,-426.858D0,-641.1D0,190.833D0, + * -29.9435D0,-1.04881D0,117.125D0,-25.7663D0,-1168.16D0,910.247D0, + * 1239.31D0,289.515D0,1540.56D0,-1248.29D0,-1727.61D0,-131.785D0, + * -394.577D0,426.163D0,637.422D0,-187.965D0,30.0348D0,0.221898D0, + * -116.68D0,26.0291D0,12.6804D0,4.84091D0,1.18166D0,-2.75946D0, + * -17.9822D0,-6.80357D0,-1.47134D0,3.02266D0,4.79648D0,0.665255D0, + * -0.256229D0,-0.857282D-1,-0.588997D0,0.634812D-1,0.164303D0, + * -0.15285D0,22.2524D0,-22.4376D0,-3.85595D0,6.07625D0,-105.959D0, + * -41.6698D0,0.378615D0,1.55958D0,44.3981D0,18.8521D0,3.19466D0, + * 5.89142D0,-8.63227D0,-2.36418D0,-1.027D0,-2.31515D0,1035.38D0, + * 2040.66D0,-131.881D0,-744.533D0,-3274.93D0,-4845.61D0,482.438D0, + * 1567.43D0,1354.02D0,2040.47D0,-151.653D0,-845.012D0,-111.723D0, + * -265.343D0,-26.1171D0,216.632D0/ +C +c------------------------------------------------------------------ +C + XKS=XKSI(X,Y,Z) ! variation across the current sheet + T1X=XKS/DSQRT(XKS**2+PNONX6**2) + T2X=PNONX7**3/DSQRT(XKS**2+PNONX7**2)**3 + T3X=XKS/DSQRT(XKS**2+PNONX8**2)**5 *3.493856D0*PNONX8**4 +C + T1Y=XKS/DSQRT(XKS**2+PNONY6**2) + T2Y=PNONY7**3/DSQRT(XKS**2+PNONY7**2)**3 + T3Y=XKS/DSQRT(XKS**2+PNONY8**2)**5 *3.493856D0*PNONY8**4 +C + T1Z=XKS/DSQRT(XKS**2+PNONZ6**2) + T2Z=PNONZ7**3/DSQRT(XKS**2+PNONZ7**2)**3 + T3Z=XKS/DSQRT(XKS**2+PNONZ8**2)**5 *3.493856D0*PNONZ8**4 +C + RHO2=X*X+Y*Y + R=DSQRT(RHO2+Z*Z) + RHO=DSQRT(RHO2) +C + C1P=X/RHO + S1P=Y/RHO + S2P=2.D0*S1P*C1P + C2P=C1P*C1P-S1P*S1P + S3P=S2P*C1P+C2P*S1P + C3P=C2P*C1P-S2P*S1P + S4P=S3P*C1P+C3P*S1P + CT=Z/R + ST=RHO/R +C + S1=FEXP(CT,PNONX1) + S2=FEXP(CT,PNONX2) + S3=FEXP(CT,PNONX3) + S4=FEXP(CT,PNONX4) + S5=FEXP(CT,PNONX5) +C +C NOW COMPUTE THE GSM FIELD COMPONENTS: +C +C + BX=S1*((A1+A2*T1X+A3*T2X+A4*T3X) + * +C1P*(A5+A6*T1X+A7*T2X+A8*T3X) + * +C2P*(A9+A10*T1X+A11*T2X+A12*T3X) + * +C3P*(A13+A14*T1X+A15*T2X+A16*T3X)) + * +S2*((A17+A18*T1X+A19*T2X+A20*T3X) + * +C1P*(A21+A22*T1X+A23*T2X+A24*T3X) + * +C2P*(A25+A26*T1X+A27*T2X+A28*T3X) + * +C3P*(A29+A30*T1X+A31*T2X+A32*T3X)) + * +S3*((A33+A34*T1X+A35*T2X+A36*T3X) + * +C1P*(A37+A38*T1X+A39*T2X+A40*T3X) + * +C2P*(A41+A42*T1X+A43*T2X+A44*T3X) + * +C3P*(A45+A46*T1X+A47*T2X+A48*T3X)) + * +S4*((A49+A50*T1X+A51*T2X+A52*T3X) + * +C1P*(A53+A54*T1X+A55*T2X+A56*T3X) + * +C2P*(A57+A58*T1X+A59*T2X+A60*T3X) + * +C3P*(A61+A62*T1X+A63*T2X+A64*T3X)) + * +S5*((A65+A66*T1X+A67*T2X+A68*T3X) + * +C1P*(A69+A70*T1X+A71*T2X+A72*T3X) + * +C2P*(A73+A74*T1X+A75*T2X+A76*T3X) + * +C3P*(A77+A78*T1X+A79*T2X+A80*T3X)) +C +C + S1=FEXP(CT,PNONY1) + S2=FEXP(CT,PNONY2) + S3=FEXP(CT,PNONY3) + S4=FEXP(CT,PNONY4) + S5=FEXP(CT,PNONY5) +C + BY=S1*(S1P*(B1+B2*T1Y+B3*T2Y+B4*T3Y) + * +S2P*(B5+B6*T1Y+B7*T2Y+B8*T3Y) + * +S3P*(B9+B10*T1Y+B11*T2Y+B12*T3Y) + * +S4P*(B13+B14*T1Y+B15*T2Y+B16*T3Y)) + * +S2*(S1P*(B17+B18*T1Y+B19*T2Y+B20*T3Y) + * +S2P*(B21+B22*T1Y+B23*T2Y+B24*T3Y) + * +S3P*(B25+B26*T1Y+B27*T2Y+B28*T3Y) + * +S4P*(B29+B30*T1Y+B31*T2Y+B32*T3Y)) + * +S3*(S1P*(B33+B34*T1Y+B35*T2Y+B36*T3Y) + * +S2P*(B37+B38*T1Y+B39*T2Y+B40*T3Y) + * +S3P*(B41+B42*T1Y+B43*T2Y+B44*T3Y) + * +S4P*(B45+B46*T1Y+B47*T2Y+B48*T3Y)) + * +S4*(S1P*(B49+B50*T1Y+B51*T2Y+B52*T3Y) + * +S2P*(B53+B54*T1Y+B55*T2Y+B56*T3Y) + * +S3P*(B57+B58*T1Y+B59*T2Y+B60*T3Y) + * +S4P*(B61+B62*T1Y+B63*T2Y+B64*T3Y)) + * +S5*(S1P*(B65+B66*T1Y+B67*T2Y+B68*T3Y) + * +S2P*(B69+B70*T1Y+B71*T2Y+B72*T3Y) + * +S3P*(B73+B74*T1Y+B75*T2Y+B76*T3Y) + * +S4P*(B77+B78*T1Y+B79*T2Y+B80*T3Y)) +C + S1=FEXP1(CT,PNONZ1) + S2=FEXP1(CT,PNONZ2) + S3=FEXP1(CT,PNONZ3) + S4=FEXP1(CT,PNONZ4) + S5=FEXP1(CT,PNONZ5) +C + BZ=S1*((C1+C2*T1Z+C3*T2Z+C4*T3Z) + * +C1P*(C5+C6*T1Z+C7*T2Z+C8*T3Z) + * +C2P*(C9+C10*T1Z+C11*T2Z+C12*T3Z) + * +C3P*(C13+C14*T1Z+C15*T2Z+C16*T3Z)) + * +S2*((C17+C18*T1Z+C19*T2Z+C20*T3Z) + * +C1P*(C21+C22*T1Z+C23*T2Z+C24*T3Z) + * +C2P*(C25+C26*T1Z+C27*T2Z+C28*T3Z) + * +C3P*(C29+C30*T1Z+C31*T2Z+C32*T3Z)) + * +S3*((C33+C34*T1Z+C35*T2Z+C36*T3Z) + * +C1P*(C37+C38*T1Z+C39*T2Z+C40*T3Z) + * +C2P*(C41+C42*T1Z+C43*T2Z+C44*T3Z) + * +C3P*(C45+C46*T1Z+C47*T2Z+C48*T3Z)) + * +S4*((C49+C50*T1Z+C51*T2Z+C52*T3Z) + * +C1P*(C53+C54*T1Z+C55*T2Z+C56*T3Z) + * +C2P*(C57+C58*T1Z+C59*T2Z+C60*T3Z) + * +C3P*(C61+C62*T1Z+C63*T2Z+C64*T3Z)) + * +S5*((C65+C66*T1Z+C67*T2Z+C68*T3Z) + * +C1P*(C69+C70*T1Z+C71*T2Z+C72*T3Z) + * +C2P*(C73+C74*T1Z+C75*T2Z+C76*T3Z) + * +C3P*(C77+C78*T1Z+C79*T2Z+C80*T3Z)) +C + RETURN + END +C +C^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ + + DOUBLE PRECISION FUNCTION XKSI(X,Y,Z) +C + IMPLICIT REAL*8 (A-H,O-Z) +C +C A11 - C72, R0, and DR below ARE STRETCH PARAMETERS (P.26-27, NB# 3), +C + DATA A11A12,A21A22,A41A42,A51A52,A61A62,B11B12,B21B22,C61C62, + * C71C72,R0,DR /0.305662,-0.383593,0.2677733,-0.097656,-0.636034, + * -0.359862,0.424706,-0.126366,0.292578,1.21563,7.50937/ + + DATA TNOON,DTETA/0.3665191,0.09599309/ ! Correspond to noon and midnight +C latitudes 69 and 63.5 degs, resp. + DR2=DR*DR +C + X2=X*X + Y2=Y*Y + Z2=Z*Z + XY=X*Y + XYZ=XY*Z + R2=X2+Y2+Z2 + R=DSQRT(R2) + R3=R2*R + R4=R2*R2 + XR=X/R + YR=Y/R + ZR=Z/R +C + IF (R.LT.R0) THEN + PR=0.D0 + ELSE + PR=DSQRT((R-R0)**2+DR2)-DR + ENDIF +C + F=X+PR*(A11A12+A21A22*XR+A41A42*XR*XR+A51A52*YR*YR+ + * A61A62*ZR*ZR) + G=Y+PR*(B11B12*YR+B21B22*XR*YR) + H=Z+PR*(C61C62*ZR+C71C72*XR*ZR) + G2=G*G +C + FGH=F**2+G2+H**2 + FGH32=DSQRT(FGH)**3 + FCHSG2=F**2+G2 + + IF (FCHSG2.LT.1.D-5) THEN + XKSI=-1.D0 ! THIS IS JUST FOR ELIMINATING PROBLEMS + RETURN ! ON THE Z-AXIS + ENDIF + + SQFCHSG2=DSQRT(FCHSG2) + ALPHA=FCHSG2/FGH32 + THETA=TNOON+0.5D0*DTETA*(1.D0-F/SQFCHSG2) + PHI=DSIN(THETA)**2 +C + XKSI=ALPHA-PHI +C + RETURN + END +C +C-------------------------------------------------------------------- +C + FUNCTION FEXP(S,A) + IMPLICIT REAL*8 (A-H,O-Z) + DATA E/2.718281828459D0/ + IF (A.LT.0.D0) FEXP=DSQRT(-2.D0*A*E)*S*DEXP(A*S*S) + IF (A.GE.0.D0) FEXP=S*DEXP(A*(S*S-1.D0)) + RETURN + END +C +C----------------------------------------------------------------------- + FUNCTION FEXP1(S,A) + IMPLICIT REAL*8 (A-H,O-Z) + IF (A.LE.0.D0) FEXP1=DEXP(A*S*S) + IF (A.GT.0.D0) FEXP1=DEXP(A*(S*S-1.D0)) + RETURN + END +C +C************************************************************************ +C + DOUBLE PRECISION FUNCTION TKSI(XKSI,XKS0,DXKSI) + IMPLICIT REAL*8 (A-H,O-Z) + SAVE M,TDZ3 + DATA M/0/ +C + IF (M.EQ.0) THEN + TDZ3=2.*DXKSI**3 + M=1 + ENDIF +C + IF (XKSI-XKS0.LT.-DXKSI) TKSII=0. + IF (XKSI-XKS0.GE.DXKSI) TKSII=1. +C + IF (XKSI.GE.XKS0-DXKSI.AND.XKSI.LT.XKS0) THEN + BR3=(XKSI-XKS0+DXKSI)**3 + TKSII=1.5*BR3/(TDZ3+BR3) + ENDIF +C + IF (XKSI.GE.XKS0.AND.XKSI.LT.XKS0+DXKSI) THEN + BR3=(XKSI-XKS0-DXKSI)**3 + TKSII=1.+1.5*BR3/(TDZ3-BR3) + ENDIF + TKSI=TKSII + END +C +C~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ +c + SUBROUTINE DIPOLE(PS,X,Y,Z,BX,BY,BZ) +C +C CALCULATES GSM COMPONENTS OF GEODIPOLE FIELD WITH THE DIPOLE MOMENT +C CORRESPONDING TO THE EPOCH OF 1980. +C------------INPUT PARAMETERS: +C PS - GEODIPOLE TILT ANGLE IN RADIANS, X,Y,Z - GSM COORDINATES IN RE +C------------OUTPUT PARAMETERS: +C BX,BY,BZ - FIELD COMPONENTS IN GSM SYSTEM, IN NANOTESLA. +C +C +C WRITEN BY: N. A. TSYGANENKO + + DATA M,PSI/0,5./ + SAVE M,PSI,SPS,CPS + IF(M.EQ.1.AND.ABS(PS-PSI).LT.1.E-5) GOTO 1 + SPS=SIN(PS) + CPS=COS(PS) + PSI=PS + M=1 + 1 P=X**2 + U=Z**2 + V=3.*Z*X + T=Y**2 + Q=30574./SQRT(P+T+U)**5 + BX=Q*((T+U-2.*P)*SPS-V*CPS) + BY=-3.*Y*Q*(X*SPS+Z*CPS) + BZ=Q*((P+T-2.*U)*CPS-V*SPS) + RETURN + END + + diff --git a/Tsyganenko-Models/T96_comments.txt b/Tsyganenko-Models/T96_comments.txt new file mode 100644 index 0000000..f59d671 --- /dev/null +++ b/Tsyganenko-Models/T96_comments.txt @@ -0,0 +1,121 @@ + +The FORTRAN source code T96_01.FOR is the last released version (June 22, 1996) +of a new data-based model of the geomagnetospheric magnetic field with an ex- +plicitly defined realistic magnetopause, large-scale Region 1 and 2 Birkeland +current systems, and the IMF penetration across the boundary. + +The file T96_01.FOR contains a set of 33 subroutines and functions. The first +subroutine, named T96_01, is the primary one, accepting the input values of the +solar wind pressure, Dst-index, By- and Bz-components of the interplanetary +magnetic field, the geodipole tilt angle, and GSM position of the observation +point (X,Y,Z). The subroutine returns GSM components of the external field +(i.e., the total vector of B minus the Earth's contribution). The remaining +32 subroutines are invoked by T96_01. + + +The source code T96_01.FOR differs in several aspects from the previous version +T95_06.FOR (released in November 1995). + +(1) The T96_01 does not include the AE-index as an input parameter. + +(2) The number of terms in the ring current, tail modes, and in the shielding +fields was reduced to a necessary minimum, in order to increase the speed of the +code. The tail field is now a sum of two modes; the first one is responsible +for the near-Earth tail field and is similar to that in the previous version. +The second mode provides the asymptotic field in the far magnetotail. + +(3) The way of representing the effects of the dipole tilt on the tail/ring +current field was revised: instead of a "shear" transformation (introduced in +the T89 model), a radially dependent "space-warping" is used in this model, +which decreases tilt-induced spurious currents. + +(4) The representation for the Region 2 Birkeland current field was completely +revised: in the present version, a smooth approximation was developed for +the field inside the current layer. As a result, unphysical kinks in the Bz +profile on the nightside were eliminated. + + + ******************************************* + | Users should be aware of the following. | + ******************************************* + + + (1) A simple linear dependence of the amplitudes of the field sources on the +SQRT(Pdyn), Dst, and the IMF-related parameter EPS=SQRT(N)*V*Bt*sin(theta/2) +was employed. Hence, the best results should be expected near the most probable +values of the input parameters, corresponding to the regions in the Pdyn-Dst- +ByIMF-BzIMF space with the highest density of the spacecraft measurements. For +the same reason, caution is needed in modeling situations with unusually low or +high values of these parameters: extrapolating the model too far beyond the +range of reliable approximation can lead to unrealistic results. As a rough +estimate, the parameter values should remain within the intervals: +Pdyn: between 0.5 and 10 nPa, +Dst: between -100 and +20, +ByIMF and BzIMF: between -10 and +10 nT. + + (2) The only parameter which controls the size of the model magnetopause is +the solar wind ram pressure Pdyn. No IMF dependence has been introduced so far +in the magnetopause shape/size. This is planned to be done in future versions +of the model. + To facilitate using the model, we provide users with two supplementary +FORTRAN subroutines, named LOCATE and CROSSING. The first one finds the point +on the model magnetopause which is closest to a given point of space, for any +values of the solar wind density and velocity (or, optionally, solar wind +pressure). The second subroutine estimates the current value of the solar wind +ram pressure, based on the observed GSM position of the magnetopause at any +local time or latitude, sunward from XGSM=-60Re. + + (3) In its present form, the subroutine T96_01 is compatible with new version +(April 16, 1996) of the software package GEOPACK for coordinate transformation +and line tracing, which replaces the old version and is available from the same +WWW site. + + (4) This is not a "final version": the model is supposed to be further +improved and upgraded in the future. In this regard, any kind of feedback from +the users is very important for us and will be greatly appreciated. In +particular, it is very important that any problems encountered in adapting and +using the code be reported to us as soon as possible. Please send your +questions and comments to the address given in the end of this file. + + (5) More details on the approach used in devising this model can be found in +the following publications: + + + Tsyganenko, N. A. and M. Peredo, Analytical models of the magnetic field + of disk-shaped current sheets, J.Geophys.Res., v.99, pp.199-205, 1994. + + Tsyganenko, N. A., Modeling the Earth's magnetospheric magnetic field + confined within a realistic magnetopause, J.Geophys.Res., v.100, + pp.5599-5612, 1995. + + Fairfield, D. H., N. A. Tsyganenko, A. V. Usmanov, and M. V. Malkov, + A large magnetosphere magnetic field database, J.Geophys.Res., v.99, + pp.11319-11326, 1994. + + Tsyganenko, N. A. and D. P. Stern, Modeling the global magnetic field + the large-scale Birkeland current systems, J.Geophys.Res., v.101, + p.27187-27198, 1996. + + Tsyganenko, N. A., Effects of the solar wind conditions on the global + magnetospheric configuration as deduced from data-based field + models, in: Proc.of 3rd International Conference on Substorms + (ICS-3), Versailles, France, 12-17 May 1996, ESA SP-389, p.181-185, + 1996. + + + Please send your questions, comments, and requests to: + + Nikolai Tsyganenko + + E-address: Nikolai.Tsyganenko@gsfc.nasa.gov + + Mailing address: Code 695, NASA GSFC + Greenbelt, MD 20771, + U.S.A. + + Phone: (301)-286-7925 + Fax: (301)-286-1683 + + + + diff --git a/Tsyganenko-Models/TS04.for b/Tsyganenko-Models/TS04.for new file mode 100644 index 0000000..3deaf24 --- /dev/null +++ b/Tsyganenko-Models/TS04.for @@ -0,0 +1,2530 @@ +c==================================================================================== +c +c + SUBROUTINE T04_s (IOPT,PARMOD,PS,X,Y,Z,BX,BY,BZ) +c +c ASSEMBLED: MARCH 25, 2004; UPDATED: AUGUST 2 & 31, DECEMBER 27, 2004. +C +c-------------------------------------------------------------------- +C A DATA-BASED MODEL OF THE EXTERNAL (I.E., WITHOUT EARTH'S CONTRIBUTION) PART OF THE +C MAGNETOSPHERIC MAGNETIC FIELD, CALIBRATED BY +C (1) SOLAR WIND PRESSURE PDYN (NANOPASCALS), +C (2) DST (NANOTESLA), +C (3) BYIMF, +C (4) BZIMF (NANOTESLA) +C (5-10) INDICES W1 - W6, CALCULATED AS TIME INTEGRALS FROM THE BEGINNING OF A STORM +c SEE THE REFERENCE (3) BELOW, FOR A DETAILED DEFINITION OF THOSE VARIABLES +C +c THE ABOVE 10 INPUT PARAMETERS SHOULD BE PLACED IN THE ELEMENTS +c OF THE ARRAY PARMOD(10). +C +C THE REST OF THE INPUT VARIABLES ARE: THE GEODIPOLE TILT ANGLE PS (RADIANS), +C X,Y,Z - GSM POSITION (RE) +C +c IOPT IS A DUMMY INPUT PARAMETER, INCLUDED TO MAKE THIS SUBROUTINE +C COMPATIBLE WITH THE TRACING SOFTWARE PACKAGE (GEOPACK). IN THIS MODEL, +C THE PARAMETER IOPT DOES NOT AFFECT THE OUTPUT FIELD. +c +C******************************************************************************************* +c** ATTENTION: THE MODEL IS BASED ON DATA TAKEN SUNWARD FROM X=-15Re, AND HENCE BECOMES * +C** INVALID AT LARGER TAILWARD DISTANCES !!! * +C******************************************************************************************* +C +c OUTPUT: GSM COMPONENTS OF THE EXTERNAL MAGNETIC FIELD (BX,BY,BZ, nanotesla) +C COMPUTED AS A SUM OF CONTRIBUTIONS FROM PRINCIPAL FIELD SOURCES +C +c (C) Copr. 2004, Nikolai A. Tsyganenko, USRA/Code 695.1, NASA GSFC +c Greenbelt, MD 20771, USA +c +C REFERENCES: +C +C (1) N. A. Tsyganenko, A new data-based model of the near magnetosphere magnetic field: +c 1. Mathematical structure. +c 2. Parameterization and fitting to observations. JGR v. 107(A8), 1176/1179, doi:10.1029/2001JA000219/220, 2002. +c +c (2) N. A. Tsyganenko, H. J. Singer, J. C. Kasper, Storm-time distortion of the +c inner magnetosphere: How severe can it get ? JGR v. 108(A5), 1209, doi:10.1029/2002JA009808, 2003. + + (3) N. A. Tsyganenko and M. I. Sitnov, Modeling the dynamics of the inner +c magnetosphere during strong geomagnetic storms, JGR v. 110, 2005, in press. +c---------------------------------------------------------------------- +c + REAL PARMOD(10),PS,X,Y,Z,BX,BY,BZ + REAL*8 A(69),PDYN,DST_AST,BXIMF,BYIMF,BZIMF,W1,W2,W3,W4,W5,W6, + * PSS,XX,YY,ZZ,BXCF,BYCF,BZCF,BXT1,BYT1,BZT1,BXT2,BYT2,BZT2, + * BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,BZPRC, BXR11,BYR11,BZR11, + * BXR12,BYR12,BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,BZR22,HXIMF, + * HYIMF,HZIMF,BBX,BBY,BBZ +C + DATA A/1.00000,5.19884,0.923524,8.68111,0.00000,-6.44922,11.3109, + * -3.84555,0.00000,0.558081,0.937044,0.00000,0.772433,0.687241, + * 0.00000,0.320369,1.22531,-0.432246E-01,-0.382436,0.457468, + * 0.741917,0.227194,0.154269,5.75196,22.3113,10.3526,64.3312, + * 1.01977,-0.200859E-01,0.971643,0.295525E-01,1.01032,0.215561, + * 1.50059,0.730898E-01,1.93625,1.74545,1.29533,0.714744,0.391687, + * 3.31283,75.0127,6.36283,4.43561,0.387801,0.699661,0.305352E-01, + * 0.581002,1.14671,0.876060,0.386060,0.801831,0.874315,0.463634, + * 0.175077,0.673053,0.388341,2.32074,1.32373,0.419800,1.24968, + * 1.28903,.409286,1.57622,.690036,1.28836,2.4054,.528557,.564247/ + + DATA IOPGEN,IOPTT,IOPB,IOPR/0,0,0,0/ +C + PDYN=PARMOD(1) + DST_AST=PARMOD(2)*0.8-13.*SQRT(PDYN) + BYIMF=PARMOD(3) + BZIMF=PARMOD(4) +C + W1=PARMOD (5) + W2=PARMOD (6) + W3=PARMOD (7) + W4=PARMOD (8) + W5=PARMOD (9) + W6=PARMOD(10) + + PSS=PS + XX=X + YY=Y + ZZ=Z +C + CALL EXTERN (IOPGEN,IOPTT,IOPB,IOPR,A,69,PDYN,DST_AST,BXIMF,BYIMF, + + BZIMF,W1,W2,W3,W4,W5,W6,PSS,XX,YY,ZZ,BXCF,BYCF,BZCF,BXT1,BYT1, + + BZT1,BXT2,BYT2,BZT2,BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,BZPRC, BXR11, + + BYR11,BZR11,BXR12,BYR12,BZR12,BXR21,BYR21,BZR21,BXR22,BYR22, + + BZR22,HXIMF,HYIMF,HZIMF,BBX,BBY,BBZ) +C + BX=BBX + BY=BBY + BZ=BBZ +C + RETURN + END + +c%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +c + SUBROUTINE EXTERN (IOPGEN,IOPT,IOPB,IOPR,A,NTOT, + * PDYN,DST,BXIMF,BYIMF,BZIMF,W1,W2,W3,W4,W5,W6,PS,X,Y,Z, + * BXCF,BYCF,BZCF,BXT1,BYT1,BZT1,BXT2,BYT2,BZT2, + * BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,BZPRC, BXR11,BYR11,BZR11, + * BXR12,BYR12,BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,BZR22,HXIMF, + * HYIMF,HZIMF,BX,BY,BZ) +C +C IOPGEN - GENERAL OPTION FLAG: IOPGEN=0 - CALCULATE TOTAL FIELD +C IOPGEN=1 - DIPOLE SHIELDING ONLY +C IOPGEN=2 - TAIL FIELD ONLY +C IOPGEN=3 - BIRKELAND FIELD ONLY +C IOPGEN=4 - RING CURRENT FIELD ONLY +C IOPGEN=5 - INTERCONNECTION FIELD ONLY +C +C IOPT - TAIL FIELD FLAG: IOPT=0 - BOTH MODES +C IOPT=1 - MODE 1 ONLY +C IOPT=2 - MODE 2 ONLY +C +C IOPB - BIRKELAND FIELD FLAG: IOPB=0 - ALL 4 TERMS +C IOPB=1 - REGION 1, MODES 1 AND 2 +C IOPB=2 - REGION 2, MODES 1 AND 2 +C +C IOPR - RING CURRENT FLAG: IOPR=0 - BOTH SRC AND PRC +C IOPR=1 - SRC ONLY +C IOPR=2 - PRC ONLY +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(NTOT) +C + COMMON /TAIL/ DXSHIFT1,DXSHIFT2,D,DELTADY ! THE COMMON BLOCKS FORWARD NONLINEAR PARAMETERS + COMMON /BIRKPAR/ XKAPPA1,XKAPPA2 + COMMON /RCPAR/ SC_SY,SC_AS,PHI + COMMON /G/ G + COMMON /RH0/ RH0 +C +C + DATA A0_A,A0_S0,A0_X0 /34.586D0,1.1960D0,3.4397D0/ ! SHUE ET AL. PARAMETERS + DATA DSIG /0.005D0/, RH0,RH2 /7.5D0,-5.2D0/ +c + XAPPA=(PDYN/2.)**A(23) ! OVERALL SCALING PARAMETER + RH0=7.5 ! TAIL HINGING DISTANCE +c + G= 35.0 ! TAIL WARPING PARAMETER + + XAPPA3=XAPPA**3 + + XX=X*XAPPA + YY=Y*XAPPA + ZZ=Z*XAPPA +C + SPS=DSIN(PS) +c + X0=A0_X0/XAPPA + AM=A0_A/XAPPA + S0=A0_S0 +c +C CALCULATE "IMF" COMPONENTS OUTSIDE THE MAGNETOPAUSE LAYER (HENCE BEGIN WITH "O") +C THEY ARE NEEDED ONLY IF THE POINT (X,Y,Z) IS WITHIN THE TRANSITION MAGNETOPAUSE LAYER +C OR OUTSIDE THE MAGNETOSPHERE: +C + FACTIMF=A(20) +c + OIMFX=0.D0 + OIMFY=BYIMF*FACTIMF + OIMFZ=BZIMF*FACTIMF +c + R=DSQRT(X**2+Y**2+Z**2) + XSS=X + ZSS=Z + + 1 XSOLD=XSS ! BEGIN ITERATIVE SEARCH OF UNWARPED COORDS (TO FIND SIGMA) + ZSOLD=ZSS + + RH=RH0+RH2*(ZSS/R)**2 + SINPSAS=SPS/(1.D0+(R/RH)**3)**0.33333333D0 + COSPSAS=DSQRT(1.D0-SINPSAS**2) + ZSS=X*SINPSAS+Z*COSPSAS + XSS=X*COSPSAS-Z*SINPSAS + DD=DABS(XSS-XSOLD)+DABS(ZSS-ZSOLD) + IF (DD.GT.1.D-6) GOTO 1 +C END OF ITERATIVE SEARCH + RHO2=Y**2+ZSS**2 + ASQ=AM**2 + XMXM=AM+XSS-X0 + IF (XMXM.LT.0.) XMXM=0. ! THE BOUNDARY IS A CYLINDER TAILWARD OF X=X0-AM + AXX0=XMXM**2 + ARO=ASQ+RHO2 + SIGMA=DSQRT((ARO+AXX0+SQRT((ARO+AXX0)**2-4.*ASQ*AXX0))/(2.*ASQ)) +C +C NOW, THERE ARE THREE POSSIBLE CASES: +C (1) INSIDE THE MAGNETOSPHERE (SIGMA +C (2) IN THE BOUNDARY LAYER +C (3) OUTSIDE THE MAGNETOSPHERE AND B.LAYER +C FIRST OF ALL, CONSIDER THE CASES (1) AND (2): +C +C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ + IF (SIGMA.LT.S0+DSIG) THEN ! CASES (1) OR (2); CALCULATE THE MODEL FIELD +C (WITH THE POTENTIAL "PENETRATED" INTERCONNECTION FIELD): +C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ +C + IF (IOPGEN.LE.1) THEN + CALL SHLCAR3X3(XX,YY,ZZ,PS,CFX,CFY,CFZ) ! DIPOLE SHIELDING FIELD + BXCF=CFX*XAPPA3 + BYCF=CFY*XAPPA3 + BZCF=CFZ*XAPPA3 + ELSE + BXCF=0.D0 + BYCF=0.D0 + BZCF=0.D0 + ENDIF ! DONE + + IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.2) THEN + DSTT=-20. + IF (DST.LT.DSTT) DSTT=DST + ZNAM=DABS(DSTT)**0.37 + DXSHIFT1=A(24)-A(25)/ZNAM + DXSHIFT2=A(26)-A(27)/ZNAM + D=A(36)*DEXP(-W1/A(37)) +A(69) + DELTADY=4.7 + + CALL DEFORMED (IOPT,PS,XX,YY,ZZ, ! TAIL FIELD (THREE MODES) + * BXT1,BYT1,BZT1,BXT2,BYT2,BZT2) + ELSE + BXT1=0.D0 + BYT1=0.D0 + BZT1=0.D0 + BXT2=0.D0 + BYT2=0.D0 + BZT2=0.D0 + ENDIF + + IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.3) THEN + + ZNAM=DABS(DST) + IF (DST.GE.-20.D0) ZNAM=20.D0 + XKAPPA1=A(32)*(ZNAM/20.D0)**A(33) + XKAPPA2=A(34)*(ZNAM/20.D0)**A(35) + + CALL BIRK_TOT (IOPB,PS,XX,YY,ZZ,BXR11,BYR11,BZR11,BXR12,BYR12, + * BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,BZR22) ! BIRKELAND FIELD (TWO MODES FOR R1 AND TWO MODES FOR R2) + ELSE + BXR11=0.D0 + BYR11=0.D0 + BZR11=0.D0 + BXR21=0.D0 + BYR21=0.D0 + BZR21=0.D0 + ENDIF + + IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.4) THEN + PHI=A(38) + + ZNAM=DABS(DST) + IF (DST.GE.-20.D0) ZNAM=20.D0 + SC_SY=A(28)*(20.D0/ZNAM)**A(29) *XAPPA ! + SC_AS=A(30)*(20.D0/ZNAM)**A(31) *XAPPA ! MULTIPLICATION BY XAPPA IS MADE IN ORDER TO MAKE THE SRC AND PRC + ! SCALING COMPLETELY INDEPENDENT OF THE GENERAL SCALING DUE TO THE +C MAGNETOPAUSE COMPRESSION/EXPANSION ! +C + CALL FULL_RC(IOPR,PS,XX,YY,ZZ,BXSRC,BYSRC,BZSRC,BXPRC,BYPRC, + * BZPRC) ! SHIELDED RING CURRENT (SRC AND PRC) + ELSE + BXSRC=0.D0 + BYSRC=0.D0 + BZSRC=0.D0 + BXPRC=0.D0 + BYPRC=0.D0 + BZPRC=0.D0 + ENDIF +C + IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.5) THEN + HXIMF=0.D0 + HYIMF=BYIMF + HZIMF=BZIMF ! THESE ARE COMPONENTS OF THE PENETRATED FIELD PER UNIT OF THE PENETRATION COEFFICIENT. +C IN OTHER WORDS, THESE ARE DERIVATIVES OF THE PENETRATION FIELD COMPONENTS WITH RESPECT +C TO THE PENETRATION COEFFICIENT. WE ASSUME THAT ONLY TRANSVERSE COMPONENT OF THE +C FIELD PENETRATES INSIDE. + ELSE + HXIMF=0.D0 + HYIMF=0.D0 + HZIMF=0.D0 + ENDIF +C +C----------------------------------------------------------- +C +C NOW, ADD UP ALL THE COMPONENTS: +c + DLP1=(PDYN/2.D0)**A(21) + DLP2=(PDYN/2.D0)**A(22) + + TAMP1=A(2)+A(3)*DLP1+A(4)*A(39)*W1/DSQRT(W1**2+A(39)**2)+A(5)*DST + TAMP2=A(6)+A(7)*DLP2+A(8)*A(40)*W2/DSQRT(W2**2+A(40)**2)+A(9)*DST + A_SRC=A(10)+A(11)*A(41)*W3/DSQRT(W3**2+A(41)**2) + * +A(12)*DST + A_PRC=A(13)+A(14)*A(42)*W4/DSQRT(W4**2+A(42)**2) + * +A(15)*DST + A_R11=A(16)+A(17)*A(43)*W5/DSQRT(W5**2+A(43)**2) + A_R21=A(18)+A(19)*A(44)*W6/DSQRT(W6**2+A(44)**2) + + BBX=A(1)*BXCF+TAMP1*BXT1+TAMP2*BXT2+A_SRC*BXSRC+A_PRC*BXPRC + * +A_R11*BXR11+A_R21*BXR21+A(20)*HXIMF + + BBY=A(1)*BYCF+TAMP1*BYT1+TAMP2*BYT2+A_SRC*BYSRC+A_PRC*BYPRC + * +A_R11*BYR11+A_R21*BYR21+A(20)*HYIMF + + BBZ=A(1)*BZCF+TAMP1*BZT1+TAMP2*BZT2+A_SRC*BZSRC+A_PRC*BZPRC + * +A_R11*BZR11+A_R21*BZR21+A(20)*HZIMF +C +C AND WE HAVE THE TOTAL EXTERNAL FIELD. +C +C +C NOW, LET US CHECK WHETHER WE HAVE THE CASE (1). IF YES - ALL DONE: +C + IF (SIGMA.LT.S0-DSIG) THEN ! (X,Y,Z) IS INSIDE THE MAGNETOSPHERE + + BX=BBX + BY=BBY + BZ=BBZ + ELSE ! THIS IS THE MOST COMPLEX CASE: WE ARE INSIDE +C THE INTERPOLATION REGION + FINT=0.5*(1.-(SIGMA-S0)/DSIG) + FEXT=0.5*(1.+(SIGMA-S0)/DSIG) +C + CALL DIPOLE (PS,X,Y,Z,QX,QY,QZ) + BX=(BBX+QX)*FINT+OIMFX*FEXT -QX + BY=(BBY+QY)*FINT+OIMFY*FEXT -QY + BZ=(BBZ+QZ)*FINT+OIMFZ*FEXT -QZ +c + ENDIF ! THE CASES (1) AND (2) ARE EXHAUSTED; THE ONLY REMAINING +C POSSIBILITY IS NOW THE CASE (3): +C++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ + ELSE + CALL DIPOLE (PS,X,Y,Z,QX,QY,QZ) + BX=OIMFX-QX + BY=OIMFY-QY + BZ=OIMFZ-QZ + ENDIF +C + END +c + +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C + SUBROUTINE SHLCAR3X3(X,Y,Z,PS,BX,BY,BZ) +C +C THIS S/R RETURNS THE SHIELDING FIELD FOR THE EARTH'S DIPOLE, +C REPRESENTED BY 2x3x3=18 "CARTESIAN" HARMONICS, tilted with respect +C to the z=0 plane +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C The 36 coefficients enter in pairs in the amplitudes of the "cartesian" +c harmonics (A(1)-A(36). +c The 14 nonlinear parameters (A(37)-A(50) are the scales Pi,Ri,Qi,and Si +C entering the arguments of exponents, sines, and cosines in each of the +C 18 "Cartesian" harmonics PLUS TWO TILT ANGLES FOR THE CARTESIAN HARMONICS +C (ONE FOR THE PSI=0 MODE AND ANOTHER FOR THE PSI=90 MODE) +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(50) + DATA A/-901.2327248,895.8011176,817.6208321,-845.5880889, + *-83.73539535,86.58542841,336.8781402,-329.3619944,-311.2947120, + *308.6011161,31.94469304,-31.30824526,125.8739681,-372.3384278, + *-235.4720434,286.7594095,21.86305585,-27.42344605,-150.4874688, + *2.669338538,1.395023949,-.5540427503,-56.85224007,3.681827033, + *-43.48705106,5.103131905,1.073551279,-.6673083508,12.21404266, + *4.177465543,5.799964188,-.3977802319,-1.044652977,.5703560010, + *3.536082962,-3.222069852,9.620648151,6.082014949,27.75216226, + *12.44199571,5.122226936,6.982039615,20.12149582,6.150973118, + *4.663639687,15.73319647,2.303504968,5.840511214,.8385953499E-01, + *.3477844929/ +C + P1=A(37) + P2=A(38) + P3=A(39) + R1=A(40) + R2=A(41) + R3=A(42) + Q1=A(43) + Q2=A(44) + Q3=A(45) + S1=A(46) + S2=A(47) + S3=A(48) + + T1 =A(49) + T2 =A(50) +C + CPS=DCOS(PS) + SPS=DSIN(PS) + S2PS=2.D0*CPS + +C + ST1=DSIN(PS*T1) + CT1=DCOS(PS*T1) + ST2=DSIN(PS*T2) + CT2=DCOS(PS*T2) + + X1=X*CT1-Z*ST1 + Z1=X*ST1+Z*CT1 + X2=X*CT2-Z*ST2 + Z2=X*ST2+Z*CT2 +C +C +c MAKE THE TERMS IN THE 1ST SUM ("PERPENDICULAR" SYMMETRY): +C +C I=1 +C + SQPR= DSQRT(1.D0/P1**2+1.D0/R1**2) + CYP = DCOS(Y/P1) + SYP = DSIN(Y/P1) + CZR = DCOS(Z1/R1) + SZR = DSIN(Z1/R1) + EXPR= DEXP(SQPR*X1) + FX1 =-SQPR*EXPR*CYP*SZR + HY1 = EXPR/P1*SYP*SZR + FZ1 =-EXPR*CYP/R1*CZR + HX1 = FX1*CT1+FZ1*ST1 + HZ1 =-FX1*ST1+FZ1*CT1 + + SQPR= DSQRT(1.D0/P1**2+1.D0/R2**2) + CYP = DCOS(Y/P1) + SYP = DSIN(Y/P1) + CZR = DCOS(Z1/R2) + SZR = DSIN(Z1/R2) + EXPR= DEXP(SQPR*X1) + FX2 =-SQPR*EXPR*CYP*SZR + HY2 = EXPR/P1*SYP*SZR + FZ2 =-EXPR*CYP/R2*CZR + HX2 = FX2*CT1+FZ2*ST1 + HZ2 =-FX2*ST1+FZ2*CT1 + + SQPR= DSQRT(1.D0/P1**2+1.D0/R3**2) + CYP = DCOS(Y/P1) + SYP = DSIN(Y/P1) + CZR = DCOS(Z1/R3) + SZR = DSIN(Z1/R3) + EXPR= DEXP(SQPR*X1) + FX3 =-EXPR*CYP*(SQPR*Z1*CZR+SZR/R3*(X1+1.D0/SQPR)) + HY3 = EXPR/P1*SYP*(Z1*CZR+X1/R3*SZR/SQPR) + FZ3 =-EXPR*CYP*(CZR*(1.D0+X1/R3**2/SQPR)-Z1/R3*SZR) + HX3 = FX3*CT1+FZ3*ST1 + HZ3 =-FX3*ST1+FZ3*CT1 +C +C I=2: +C + SQPR= DSQRT(1.D0/P2**2+1.D0/R1**2) + CYP = DCOS(Y/P2) + SYP = DSIN(Y/P2) + CZR = DCOS(Z1/R1) + SZR = DSIN(Z1/R1) + EXPR= DEXP(SQPR*X1) + FX4 =-SQPR*EXPR*CYP*SZR + HY4 = EXPR/P2*SYP*SZR + FZ4 =-EXPR*CYP/R1*CZR + HX4 = FX4*CT1+FZ4*ST1 + HZ4 =-FX4*ST1+FZ4*CT1 + + SQPR= DSQRT(1.D0/P2**2+1.D0/R2**2) + CYP = DCOS(Y/P2) + SYP = DSIN(Y/P2) + CZR = DCOS(Z1/R2) + SZR = DSIN(Z1/R2) + EXPR= DEXP(SQPR*X1) + FX5 =-SQPR*EXPR*CYP*SZR + HY5 = EXPR/P2*SYP*SZR + FZ5 =-EXPR*CYP/R2*CZR + HX5 = FX5*CT1+FZ5*ST1 + HZ5 =-FX5*ST1+FZ5*CT1 + + SQPR= DSQRT(1.D0/P2**2+1.D0/R3**2) + CYP = DCOS(Y/P2) + SYP = DSIN(Y/P2) + CZR = DCOS(Z1/R3) + SZR = DSIN(Z1/R3) + EXPR= DEXP(SQPR*X1) + FX6 =-EXPR*CYP*(SQPR*Z1*CZR+SZR/R3*(X1+1.D0/SQPR)) + HY6 = EXPR/P2*SYP*(Z1*CZR+X1/R3*SZR/SQPR) + FZ6 =-EXPR*CYP*(CZR*(1.D0+X1/R3**2/SQPR)-Z1/R3*SZR) + HX6 = FX6*CT1+FZ6*ST1 + HZ6 =-FX6*ST1+FZ6*CT1 +C +C I=3: +C + SQPR= DSQRT(1.D0/P3**2+1.D0/R1**2) + CYP = DCOS(Y/P3) + SYP = DSIN(Y/P3) + CZR = DCOS(Z1/R1) + SZR = DSIN(Z1/R1) + EXPR= DEXP(SQPR*X1) + FX7 =-SQPR*EXPR*CYP*SZR + HY7 = EXPR/P3*SYP*SZR + FZ7 =-EXPR*CYP/R1*CZR + HX7 = FX7*CT1+FZ7*ST1 + HZ7 =-FX7*ST1+FZ7*CT1 + + SQPR= DSQRT(1.D0/P3**2+1.D0/R2**2) + CYP = DCOS(Y/P3) + SYP = DSIN(Y/P3) + CZR = DCOS(Z1/R2) + SZR = DSIN(Z1/R2) + EXPR= DEXP(SQPR*X1) + FX8 =-SQPR*EXPR*CYP*SZR + HY8 = EXPR/P3*SYP*SZR + FZ8 =-EXPR*CYP/R2*CZR + HX8 = FX8*CT1+FZ8*ST1 + HZ8 =-FX8*ST1+FZ8*CT1 + + SQPR= DSQRT(1.D0/P3**2+1.D0/R3**2) + CYP = DCOS(Y/P3) + SYP = DSIN(Y/P3) + CZR = DCOS(Z1/R3) + SZR = DSIN(Z1/R3) + EXPR= DEXP(SQPR*X1) + FX9 =-EXPR*CYP*(SQPR*Z1*CZR+SZR/R3*(X1+1.D0/SQPR)) + HY9 = EXPR/P3*SYP*(Z1*CZR+X1/R3*SZR/SQPR) + FZ9 =-EXPR*CYP*(CZR*(1.D0+X1/R3**2/SQPR)-Z1/R3*SZR) + HX9 = FX9*CT1+FZ9*ST1 + HZ9 =-FX9*ST1+FZ9*CT1 + + + A1=A(1)+A(2)*CPS + A2=A(3)+A(4)*CPS + A3=A(5)+A(6)*CPS + A4=A(7)+A(8)*CPS + A5=A(9)+A(10)*CPS + A6=A(11)+A(12)*CPS + A7=A(13)+A(14)*CPS + A8=A(15)+A(16)*CPS + A9=A(17)+A(18)*CPS + BX=A1*HX1+A2*HX2+A3*HX3+A4*HX4+A5*HX5+A6*HX6+A7*HX7+A8*HX8+A9*HX9 + BY=A1*HY1+A2*HY2+A3*HY3+A4*HY4+A5*HY5+A6*HY6+A7*HY7+A8*HY8+A9*HY9 + BZ=A1*HZ1+A2*HZ2+A3*HZ3+A4*HZ4+A5*HZ5+A6*HZ6+A7*HZ7+A8*HZ8+A9*HZ9 + + +c MAKE THE TERMS IN THE 2ND SUM ("PARALLEL" SYMMETRY): +C +C I=1 +C + SQQS= DSQRT(1.D0/Q1**2+1.D0/S1**2) + CYQ = DCOS(Y/Q1) + SYQ = DSIN(Y/Q1) + CZS = DCOS(Z2/S1) + SZS = DSIN(Z2/S1) + EXQS= DEXP(SQQS*X2) + FX1 =-SQQS*EXQS*CYQ*CZS *SPS + HY1 = EXQS/Q1*SYQ*CZS *SPS + FZ1 = EXQS*CYQ/S1*SZS *SPS + HX1 = FX1*CT2+FZ1*ST2 + HZ1 =-FX1*ST2+FZ1*CT2 + + SQQS= DSQRT(1.D0/Q1**2+1.D0/S2**2) + CYQ = DCOS(Y/Q1) + SYQ = DSIN(Y/Q1) + CZS = DCOS(Z2/S2) + SZS = DSIN(Z2/S2) + EXQS= DEXP(SQQS*X2) + FX2 =-SQQS*EXQS*CYQ*CZS *SPS + HY2 = EXQS/Q1*SYQ*CZS *SPS + FZ2 = EXQS*CYQ/S2*SZS *SPS + HX2 = FX2*CT2+FZ2*ST2 + HZ2 =-FX2*ST2+FZ2*CT2 + + SQQS= DSQRT(1.D0/Q1**2+1.D0/S3**2) + CYQ = DCOS(Y/Q1) + SYQ = DSIN(Y/Q1) + CZS = DCOS(Z2/S3) + SZS = DSIN(Z2/S3) + EXQS= DEXP(SQQS*X2) + FX3 =-SQQS*EXQS*CYQ*CZS *SPS + HY3 = EXQS/Q1*SYQ*CZS *SPS + FZ3 = EXQS*CYQ/S3*SZS *SPS + HX3 = FX3*CT2+FZ3*ST2 + HZ3 =-FX3*ST2+FZ3*CT2 +C +C I=2 +C + SQQS= DSQRT(1.D0/Q2**2+1.D0/S1**2) + CYQ = DCOS(Y/Q2) + SYQ = DSIN(Y/Q2) + CZS = DCOS(Z2/S1) + SZS = DSIN(Z2/S1) + EXQS= DEXP(SQQS*X2) + FX4 =-SQQS*EXQS*CYQ*CZS *SPS + HY4 = EXQS/Q2*SYQ*CZS *SPS + FZ4 = EXQS*CYQ/S1*SZS *SPS + HX4 = FX4*CT2+FZ4*ST2 + HZ4 =-FX4*ST2+FZ4*CT2 + + SQQS= DSQRT(1.D0/Q2**2+1.D0/S2**2) + CYQ = DCOS(Y/Q2) + SYQ = DSIN(Y/Q2) + CZS = DCOS(Z2/S2) + SZS = DSIN(Z2/S2) + EXQS= DEXP(SQQS*X2) + FX5 =-SQQS*EXQS*CYQ*CZS *SPS + HY5 = EXQS/Q2*SYQ*CZS *SPS + FZ5 = EXQS*CYQ/S2*SZS *SPS + HX5 = FX5*CT2+FZ5*ST2 + HZ5 =-FX5*ST2+FZ5*CT2 + + SQQS= DSQRT(1.D0/Q2**2+1.D0/S3**2) + CYQ = DCOS(Y/Q2) + SYQ = DSIN(Y/Q2) + CZS = DCOS(Z2/S3) + SZS = DSIN(Z2/S3) + EXQS= DEXP(SQQS*X2) + FX6 =-SQQS*EXQS*CYQ*CZS *SPS + HY6 = EXQS/Q2*SYQ*CZS *SPS + FZ6 = EXQS*CYQ/S3*SZS *SPS + HX6 = FX6*CT2+FZ6*ST2 + HZ6 =-FX6*ST2+FZ6*CT2 +C +C I=3 +C + SQQS= DSQRT(1.D0/Q3**2+1.D0/S1**2) + CYQ = DCOS(Y/Q3) + SYQ = DSIN(Y/Q3) + CZS = DCOS(Z2/S1) + SZS = DSIN(Z2/S1) + EXQS= DEXP(SQQS*X2) + FX7 =-SQQS*EXQS*CYQ*CZS *SPS + HY7 = EXQS/Q3*SYQ*CZS *SPS + FZ7 = EXQS*CYQ/S1*SZS *SPS + HX7 = FX7*CT2+FZ7*ST2 + HZ7 =-FX7*ST2+FZ7*CT2 + + SQQS= DSQRT(1.D0/Q3**2+1.D0/S2**2) + CYQ = DCOS(Y/Q3) + SYQ = DSIN(Y/Q3) + CZS = DCOS(Z2/S2) + SZS = DSIN(Z2/S2) + EXQS= DEXP(SQQS*X2) + FX8 =-SQQS*EXQS*CYQ*CZS *SPS + HY8 = EXQS/Q3*SYQ*CZS *SPS + FZ8 = EXQS*CYQ/S2*SZS *SPS + HX8 = FX8*CT2+FZ8*ST2 + HZ8 =-FX8*ST2+FZ8*CT2 + + SQQS= DSQRT(1.D0/Q3**2+1.D0/S3**2) + CYQ = DCOS(Y/Q3) + SYQ = DSIN(Y/Q3) + CZS = DCOS(Z2/S3) + SZS = DSIN(Z2/S3) + EXQS= DEXP(SQQS*X2) + FX9 =-SQQS*EXQS*CYQ*CZS *SPS + HY9 = EXQS/Q3*SYQ*CZS *SPS + FZ9 = EXQS*CYQ/S3*SZS *SPS + HX9 = FX9*CT2+FZ9*ST2 + HZ9 =-FX9*ST2+FZ9*CT2 + + A1=A(19)+A(20)*S2PS + A2=A(21)+A(22)*S2PS + A3=A(23)+A(24)*S2PS + A4=A(25)+A(26)*S2PS + A5=A(27)+A(28)*S2PS + A6=A(29)+A(30)*S2PS + A7=A(31)+A(32)*S2PS + A8=A(33)+A(34)*S2PS + A9=A(35)+A(36)*S2PS + + BX=BX+A1*HX1+A2*HX2+A3*HX3+A4*HX4+A5*HX5+A6*HX6+A7*HX7+A8*HX8 + * +A9*HX9 + BY=BY+A1*HY1+A2*HY2+A3*HY3+A4*HY4+A5*HY5+A6*HY6+A7*HY7+A8*HY8 + * +A9*HY9 + BZ=BZ+A1*HZ1+A2*HZ2+A3*HZ3+A4*HZ4+A5*HZ5+A6*HZ6+A7*HZ7+A8*HZ8 + * +A9*HZ9 +C + RETURN + END +c +c############################################################################ +c +C + SUBROUTINE DEFORMED (IOPT,PS,X,Y,Z,BX1,BY1,BZ1,BX2,BY2,BZ2) +C +C IOPT - TAIL FIELD MODE FLAG: IOPT=0 - THE TWO TAIL MODES ARE ADDED UP +C IOPT=1 - MODE 1 ONLY +C IOPT=2 - MODE 2 ONLY +C +C CALCULATES GSM COMPONENTS OF TWO UNIT-AMPLITUDE TAIL FIELD MODES, +C TAKING INTO ACCOUNT BOTH EFFECTS OF DIPOLE TILT: +C WARPING IN Y-Z (DONE BY THE S/R WARPED) AND BENDING IN X-Z (DONE BY THIS SUBROUTINE) +C + IMPLICIT REAL*8 (A-H,O-Z) + COMMON /RH0/ RH0 + DATA RH2,IEPS /-5.2D0,3/ +C +C RH0,RH1,RH2, AND IEPS CONTROL THE TILT-RELATED DEFORMATION OF THE TAIL FIELD +C + SPS=DSIN(PS) + CPS=DSQRT(1.D0-SPS**2) + R2=X**2+Y**2+Z**2 + R=SQRT(R2) + ZR=Z/R + RH=RH0+RH2*ZR**2 + DRHDR=-ZR/R*2.D0*RH2*ZR + DRHDZ= 2.D0*RH2*ZR/R +C + RRH=R/RH + + F=1.D0/(1.D0+RRH**IEPS)**(1.D0/IEPS) + DFDR=-RRH**(IEPS-1)*F**(IEPS+1)/RH + DFDRH=-RRH*DFDR +c + SPSAS=SPS*F + CPSAS=DSQRT(1.D0-SPSAS**2) +C + XAS=X*CPSAS-Z*SPSAS + ZAS=X*SPSAS+Z*CPSAS +C + FACPS=SPS/CPSAS*(DFDR+DFDRH*DRHDR)/R + PSASX=FACPS*X + PSASY=FACPS*Y + PSASZ=FACPS*Z+SPS/CPSAS*DFDRH*DRHDZ +C + DXASDX=CPSAS-ZAS*PSASX + DXASDY=-ZAS*PSASY + DXASDZ=-SPSAS-ZAS*PSASZ + DZASDX=SPSAS+XAS*PSASX + DZASDY=XAS*PSASY + DZASDZ=CPSAS+XAS*PSASZ + FAC1=DXASDZ*DZASDY-DXASDY*DZASDZ + FAC2=DXASDX*DZASDZ-DXASDZ*DZASDX + FAC3=DZASDX*DXASDY-DXASDX*DZASDY +C +C DEFORM: +C + CALL WARPED(IOPT,PS,XAS,Y,ZAS,BXAS1,BYAS1,BZAS1,BXAS2,BYAS2,BZAS2) +C + BX1=BXAS1*DZASDZ-BZAS1*DXASDZ +BYAS1*FAC1 + BY1=BYAS1*FAC2 + BZ1=BZAS1*DXASDX-BXAS1*DZASDX +BYAS1*FAC3 + + BX2=BXAS2*DZASDZ-BZAS2*DXASDZ +BYAS2*FAC1 + BY2=BYAS2*FAC2 + BZ2=BZAS2*DXASDX-BXAS2*DZASDX +BYAS2*FAC3 + + RETURN + END +C +C------------------------------------------------------------------ +c +C + SUBROUTINE WARPED (IOPT,PS,X,Y,Z,BX1,BY1,BZ1,BX2,BY2,BZ2) +C +C CALCULATES GSM COMPONENTS OF THE WARPED FIELD FOR TWO TAIL UNIT MODES. +C THE WARPING DEFORMATION IS IMPOSED ON THE UNWARPED FIELD, COMPUTED +C BY THE S/R "UNWARPED". THE WARPING PARAMETERS WERE TAKEN FROM THE +C RESULTS OF GEOTAIL OBSERVATIONS (TSYGANENKO ET AL. [1998]). +C NB # 6, P.106, OCT 12, 2000. +C +C IOPT - TAIL FIELD MODE FLAG: IOPT=0 - THE TWO TAIL MODES ARE ADDED UP +C IOPT=1 - MODE 1 ONLY +C IOPT=2 - MODE 2 ONLY +C + IMPLICIT REAL*8 (A-H,O-Z) +C + COMMON /G/ G + DGDX=0.D0 + XL=20.D0 + DXLDX=0.D0 + + SPS=DSIN(PS) + RHO2=Y**2+Z**2 + RHO=DSQRT(RHO2) + + IF (Y.EQ.0.D0.AND.Z.EQ.0.D0) THEN + PHI=0.D0 + CPHI=1.D0 + SPHI=0.D0 + ELSE + PHI=DATAN2(Z,Y) + CPHI=Y/RHO + SPHI=Z/RHO + ENDIF + + RR4L4=RHO/(RHO2**2+XL**4) + + F=PHI+G*RHO2*RR4L4*CPHI*SPS + DFDPHI=1.D0-G*RHO2*RR4L4*SPHI*SPS + DFDRHO=G*RR4L4**2*(3.D0*XL**4-RHO2**2)*CPHI*SPS + DFDX=RR4L4*CPHI*SPS*(DGDX*RHO2-G*RHO*RR4L4*4.D0*XL**3*DXLDX) + + CF=DCOS(F) + SF=DSIN(F) + YAS=RHO*CF + ZAS=RHO*SF + + CALL UNWARPED (IOPT,X,YAS,ZAS,BX_AS1,BY_AS1,BZ_AS1, + * BX_AS2,BY_AS2,BZ_AS2) + + BRHO_AS = BY_AS1*CF+BZ_AS1*SF ! DEFORM THE 1ST MODE + BPHI_AS = -BY_AS1*SF+BZ_AS1*CF + + BRHO_S = BRHO_AS*DFDPHI + BPHI_S = BPHI_AS-RHO*(BX_AS1*DFDX+BRHO_AS*DFDRHO) + BX1 = BX_AS1*DFDPHI + + BY1 = BRHO_S*CPHI-BPHI_S*SPHI + BZ1 = BRHO_S*SPHI+BPHI_S*CPHI ! DONE + + BRHO_AS = BY_AS2*CF+BZ_AS2*SF ! DEFORM THE 2ND MODE + BPHI_AS = -BY_AS2*SF+BZ_AS2*CF + + BRHO_S = BRHO_AS*DFDPHI + BPHI_S = BPHI_AS-RHO*(BX_AS2*DFDX+BRHO_AS*DFDRHO) + BX2 = BX_AS2*DFDPHI + + BY2 = BRHO_S*CPHI-BPHI_S*SPHI + BZ2 = BRHO_S*SPHI+BPHI_S*CPHI ! DONE + + RETURN + END +C +C%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +C + SUBROUTINE UNWARPED (IOPT,X,Y,Z,BX1,BY1,BZ1,BX2,BY2,BZ2) + +C IOPT - TAIL FIELD MODE FLAG: IOPT=0 - THE TWO TAIL MODES ARE ADDED UP +C IOPT=1 - MODE 1 ONLY +C IOPT=2 - MODE 2 ONLY +C +C CALCULATES GSM COMPONENTS OF THE SHIELDED FIELD OF TWO TAIL MODES WITH UNIT +C AMPLITUDES, WITHOUT ANY WARPING OR BENDING. NONLINEAR PARAMETERS OF THE MODES +C ARE FORWARDED HERE VIA A COMMON BLOCK /TAIL/. +C + IMPLICIT REAL*8 (A-H,O-Z) +C + DIMENSION A1(60),A2(60) ! TAIL SHIELDING FIELD PARAMETERS FOR THE MODES #1 & #2 + + COMMON /TAIL/ DXSHIFT1,DXSHIFT2,D0,DELTADY ! ATTENTION: HERE D0 & DELTADY ARE INCLUDED IN /TAIL/ +C AND EXCLUDED FROM DATA + DATA DELTADX1,ALPHA1,XSHIFT1 + * /1.D0,1.1D0,6.D0/ + DATA DELTADX2,ALPHA2,XSHIFT2 + * /0.D0,.25D0,4.D0/ + + DATA A1/-25.45869857,57.35899080,317.5501869,-2.626756717, + *-93.38053698,-199.6467926,-858.8129729,34.09192395,845.4214929, + *-29.07463068,47.10678547,-128.9797943,-781.7512093,6.165038619, + *167.8905046,492.0680410,1654.724031,-46.77337920,-1635.922669, + *40.86186772,-.1349775602,-.9661991179E-01,-.1662302354, + *.002810467517,.2487355077,.1025565237,-14.41750229,-.8185333989, + *11.07693629,.7569503173,-9.655264745,112.2446542,777.5948964, + *-5.745008536,-83.03921993,-490.2278695,-1155.004209,39.08023320, + *1172.780574,-39.44349797,-14.07211198,-40.41201127,-313.2277343, + *2.203920979,8.232835341,197.7065115,391.2733948,-18.57424451, + *-437.2779053,23.04976898,11.75673963,13.60497313,4.691927060, + *18.20923547,27.59044809,6.677425469,1.398283308,2.839005878, + *31.24817706,24.53577264/ + + DATA A2/-287187.1962,4970.499233,410490.1952,-1347.839052, + *-386370.3240,3317.983750,-143462.3895,5706.513767,171176.2904, + *250.8882750,-506570.8891,5733.592632,397975.5842,9771.762168, + *-941834.2436,7990.975260,54313.10318,447.5388060,528046.3449, + *12751.04453,-21920.98301,-21.05075617,31971.07875,3012.641612, + *-301822.9103,-3601.107387,1797.577552,-6.315855803,142578.8406, + *13161.93640,804184.8410,-14168.99698,-851926.6360,-1890.885671, + *972475.6869,-8571.862853,26432.49197,-2554.752298,-482308.3431, + *-4391.473324,105155.9160,-1134.622050,-74353.53091,-5382.670711, + *695055.0788,-916.3365144,-12111.06667,67.20923358,-367200.9285, + *-21414.14421,14.75567902,20.75638190,59.78601609,16.86431444, + *32.58482365,23.69472951,17.24977936,13.64902647,68.40989058, + *11.67828167/ + + DATA XM1,XM2/2*-12.D0/ + + IF (IOPT.EQ.2) GOTO 1 + + XSC1=(X-XSHIFT1-DXSHIFT1)*ALPHA1-XM1*(ALPHA1-1.D0) + YSC1=Y*ALPHA1 + ZSC1=Z*ALPHA1 + D0SC1=D0*ALPHA1 ! HERE WE USE A SINGLE VALUE D0 OF THE THICKNESS FOR BOTH MODES + + CALL TAILDISK(D0SC1,DELTADX1,DELTADY,XSC1,YSC1,ZSC1,FX1,FY1,FZ1) + CALL SHLCAR5X5(A1,X,Y,Z,DXSHIFT1,HX1,HY1,HZ1) + + BX1=FX1+HX1 + BY1=FY1+HY1 + BZ1=FZ1+HZ1 + + IF (IOPT.EQ.1) THEN + BX2=0.D0 + BY2=0.D0 + BZ2=0.D0 + RETURN + ENDIF + + 1 XSC2=(X-XSHIFT2-DXSHIFT2)*ALPHA2-XM2*(ALPHA2-1.D0) + YSC2=Y*ALPHA2 + ZSC2=Z*ALPHA2 + D0SC2=D0*ALPHA2 ! HERE WE USE A SINGLE VALUE D0 OF THE THICKNESS FOR BOTH MODES + + CALL TAILDISK(D0SC2,DELTADX2,DELTADY,XSC2,YSC2,ZSC2,FX2,FY2,FZ2) + CALL SHLCAR5X5(A2,X,Y,Z,DXSHIFT2,HX2,HY2,HZ2) + + BX2=FX2+HX2 + BY2=FY2+HY2 + BZ2=FZ2+HZ2 + + IF (IOPT.EQ.2) THEN + BX1=0.D0 + BY1=0.D0 + BZ1=0.D0 + RETURN + ENDIF + + RETURN + END +C +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C + SUBROUTINE TAILDISK(D0,DELTADX,DELTADY,X,Y,Z,BX,BY,BZ) +c +c THIS SUBROUTINE COMPUTES THE COMPONENTS OF THE TAIL CURRENT FIELD, +C SIMILAR TO THAT DESCRIBED BY TSYGANENKO AND PEREDO (1994). THE +C DIFFERENCE IS THAT NOW WE USE SPACEWARPING, AS DESCRIBED IN OUR +C PAPER ON MODELING BIRKELAND CURRENTS (TSYGANENKO AND STERN, 1996) +C INSTEAD OF SHEARING IT IN THE SPIRIT OF T89 TAIL MODEL. +C + IMPLICIT REAL*8 (A-H,O-Z) +c + DIMENSION F(5),B(5),C(5) +C + DATA F /-71.09346626D0,-1014.308601D0,-1272.939359D0, + * -3224.935936D0,-44546.86232D0/ + DATA B /10.90101242D0,12.68393898D0,13.51791954D0,14.86775017D0, + * 15.12306404D0/ + DATA C /.7954069972D0,.6716601849D0,1.174866319D0,2.565249920D0, + * 10.01986790D0/ +C + RHO=DSQRT(X**2+Y**2) + DRHODX=X/RHO + DRHODY=Y/RHO + + DEX=DEXP(X/7.D0) + D=D0+DELTADY*(Y/20.D0)**2 +DELTADX*DEX ! THE LAST TERM (INTRODUCED 10/11/2000) MAKES THE SHEET + DDDY=DELTADY*Y*0.005D0 ! THICKEN SUNWARD, TO AVOID PROBLEMS IN THE SUBSOLAR REGION + DDDX=DELTADX/7.D0*DEX +C + DZETA=DSQRT(Z**2+D**2) ! THIS IS THE SAME SIMPLE WAY TO SPREAD +C OUT THE SHEET, AS THAT USED IN T89 + DDZETADX=D*DDDX/DZETA + DDZETADY=D*DDDY/DZETA + DDZETADZ=Z/DZETA + +C + DBX=0.D0 + DBY=0.D0 + DBZ=0.D0 +C + DO 1 I=1,5 +C + BI=B(I) + CI=C(I) +C + S1=DSQRT((RHO+BI)**2+(DZETA+CI)**2) + S2=DSQRT((RHO-BI)**2+(DZETA+CI)**2) + + DS1DRHO=(RHO+BI)/S1 + DS2DRHO=(RHO-BI)/S2 + DS1DDZ=(DZETA+CI)/S1 + DS2DDZ=(DZETA+CI)/S2 +C + DS1DX=DS1DRHO*DRHODX +DS1DDZ*DDZETADX + DS1DY=DS1DRHO*DRHODY + DS1DDZ*DDZETADY + DS1DZ= DS1DDZ*DDZETADZ +C + DS2DX=DS2DRHO*DRHODX +DS2DDZ*DDZETADX + DS2DY=DS2DRHO*DRHODY + DS2DDZ*DDZETADY + DS2DZ= DS2DDZ*DDZETADZ +C + S1TS2=S1*S2 + S1PS2=S1+S2 + S1PS2SQ=S1PS2**2 + + FAC1=DSQRT(S1PS2SQ-(2.D0*BI)**2) + AS=FAC1/(S1TS2*S1PS2SQ) + DASDS1=(1.D0/(FAC1*S2)-AS/S1PS2*(S2*S2+S1*(3.D0*S1+4.D0*S2))) + * /(S1*S1PS2) + DASDS2=(1.D0/(FAC1*S1)-AS/S1PS2*(S1*S1+S2*(3.D0*S2+4.D0*S1))) + * /(S2*S1PS2) +C + DASDX=DASDS1*DS1DX+DASDS2*DS2DX + DASDY=DASDS1*DS1DY+DASDS2*DS2DY + DASDZ=DASDS1*DS1DZ+DASDS2*DS2DZ +C + DBX=DBX-F(I)*X*DASDZ + DBY=DBY-F(I)*Y*DASDZ + 1 DBZ=DBZ+F(I)*(2.D0*AS+X*DASDX+Y*DASDY) + + BX=DBX + BY=DBY + BZ=DBZ + + RETURN + END +C +C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +C +C THIS CODE RETURNS THE SHIELDING FIELD REPRESENTED BY 5x5=25 "CARTESIAN" +C HARMONICS +C + SUBROUTINE SHLCAR5X5(A,X,Y,Z,DSHIFT,HX,HY,HZ) +C +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C The NLIN coefficients are the amplitudes of the "cartesian" +c harmonics (A(1)-A(NLIN). +c The NNP nonlinear parameters (A(NLIN+1)-A(NTOT) are the scales Pi and Ri +C entering the arguments of exponents, sines, and cosines in each of the +C NLIN "Cartesian" harmonics +C - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +C + IMPLICIT REAL * 8 (A - H, O - Z) +C + DIMENSION A(60) +C + DHX=0.D0 + DHY=0.D0 + DHZ=0.D0 + + L=0 +C + DO 2 I=1,5 + RP=1.D0/A(50+I) + CYPI=DCOS(Y*RP) + SYPI=DSIN(Y*RP) +C + DO 2 K=1,5 + RR=1.D0/A(55+K) + SZRK=DSIN(Z*RR) + CZRK=DCOS(Z*RR) + SQPR=DSQRT(RP**2+RR**2) + EPR=DEXP(X*SQPR) +C + DBX=-SQPR*EPR*CYPI*SZRK + DBY= RP*EPR*SYPI*SZRK + DBZ=-RR*EPR*CYPI*CZRK + + L=L+2 + COEF=A(L-1)+A(L)*DSHIFT + + DHX=DHX+COEF*DBX + DHY=DHY+COEF*DBY + DHZ=DHZ+COEF*DBZ +c + 2 CONTINUE + + HX=DHX + HY=DHY + HZ=DHZ +C + RETURN + END +c +c %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +C + SUBROUTINE BIRK_TOT (IOPB,PS,X,Y,Z,BX11,BY11,BZ11,BX12,BY12,BZ12, + * BX21,BY21,BZ21,BX22,BY22,BZ22) +C +C IOPB - BIRKELAND FIELD MODE FLAG: +C IOPB=0 - ALL COMPONENTS +C IOPB=1 - REGION 1, MODES 1 & 2 +C IOPB=2 - REGION 2, MODES 1 & 2 +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION SH11(86),SH12(86),SH21(86),SH22(86) + COMMON /BIRKPAR/ XKAPPA1,XKAPPA2 ! INPUT PARAMETERS, SPECIFIED FROM A MAIN PROGRAM + COMMON /DPHI_B_RHO0/ DPHI,B,RHO_0,XKAPPA ! PARAMETERS, CONTROL DAY-NIGHT ASYMMETRY OF F.A.C. + + DATA SH11/46488.84663,-15541.95244,-23210.09824,-32625.03856, + *-109894.4551,-71415.32808,58168.94612,55564.87578,-22890.60626, + *-6056.763968,5091.368100,239.7001538,-13899.49253,4648.016991, + *6971.310672,9699.351891,32633.34599,21028.48811,-17395.96190, + *-16461.11037,7447.621471,2528.844345,-1934.094784,-588.3108359, + *-32588.88216,10894.11453,16238.25044,22925.60557,77251.11274, + *50375.97787,-40763.78048,-39088.60660,15546.53559,3559.617561, + *-3187.730438,309.1487975,88.22153914,-243.0721938,-63.63543051, + *191.1109142,69.94451996,-187.9539415,-49.89923833,104.0902848, + *-120.2459738,253.5572433,89.25456949,-205.6516252,-44.93654156, + *124.7026309,32.53005523,-98.85321751,-36.51904756,98.88241690, + *24.88493459,-55.04058524,61.14493565,-128.4224895,-45.35023460, + *105.0548704,-43.66748755,119.3284161,31.38442798,-92.87946767, + *-33.52716686,89.98992001,25.87341323,-48.86305045,59.69362881, + *-126.5353789,-44.39474251,101.5196856,59.41537992,41.18892281, + *80.86101200,3.066809418,7.893523804,30.56212082,10.36861082, + *8.222335945,19.97575641,2.050148531,4.992657093,2.300564232, + *.2256245602,-.05841594319/ + + DATA SH12/210260.4816,-1443587.401,-1468919.281,281939.2993, + *-1131124.839,729331.7943,2573541.307,304616.7457,468887.5847, + *181554.7517,-1300722.650,-257012.8601,645888.8041,-2048126.412, + *-2529093.041,571093.7972,-2115508.353,1122035.951,4489168.802, + *75234.22743,823905.6909,147926.6121,-2276322.876,-155528.5992, + *-858076.2979,3474422.388,3986279.931,-834613.9747,3250625.781, + *-1818680.377,-7040468.986,-414359.6073,-1295117.666,-346320.6487, + *3565527.409,430091.9496,-.1565573462,7.377619826,.4115646037, + *-6.146078880,3.808028815,-.5232034932,1.454841807,-12.32274869, + *-4.466974237,-2.941184626,-.6172620658,12.64613490,1.494922012, + *-21.35489898,-1.652256960,16.81799898,-1.404079922,-24.09369677, + *-10.99900839,45.94237820,2.248579894,31.91234041,7.575026816, + *-45.80833339,-1.507664976,14.60016998,1.348516288,-11.05980247, + *-5.402866968,31.69094514,12.28261196,-37.55354174,4.155626879, + *-33.70159657,-8.437907434,36.22672602,145.0262164,70.73187036, + *85.51110098,21.47490989,24.34554406,31.34405345,4.655207476, + *5.747889264,7.802304187,1.844169801,4.867254550,2.941393119, + *.1379899178,.06607020029/ + + DATA SH21/162294.6224,503885.1125,-27057.67122,-531450.1339, + *84747.05678,-237142.1712,84133.61490,259530.0402,69196.05160, + *-189093.5264,-19278.55134,195724.5034,-263082.6367,-818899.6923, + *43061.10073,863506.6932,-139707.9428,389984.8850,-135167.5555, + *-426286.9206,-109504.0387,295258.3531,30415.07087,-305502.9405, + *100785.3400,315010.9567,-15999.50673,-332052.2548,54964.34639, + *-152808.3750,51024.67566,166720.0603,40389.67945,-106257.7272, + *-11126.14442,109876.2047,2.978695024,558.6019011,2.685592939, + *-338.0004730,-81.99724090,-444.1102659,89.44617716,212.0849592, + *-32.58562625,-982.7336105,-35.10860935,567.8931751,-1.917212423, + *-260.2023543,-1.023821735,157.5533477,23.00200055,232.0603673, + *-36.79100036,-111.9110936,18.05429984,447.0481000,15.10187415, + *-258.7297813,-1.032340149,-298.6402478,-1.676201415,180.5856487, + *64.52313024,209.0160857,-53.85574010,-98.52164290,14.35891214, + *536.7666279,20.09318806,-309.7349530,58.54144539,67.45226850, + *97.92374406,4.752449760,10.46824379,32.91856110,12.05124381, + *9.962933904,15.91258637,1.804233877,6.578149088,2.515223491, + *.1930034238,-.02261109942/ + + DATA SH22/-131287.8986,-631927.6885,-318797.4173,616785.8782, + *-50027.36189,863099.9833,47680.20240,-1053367.944,-501120.3811, + *-174400.9476,222328.6873,333551.7374,-389338.7841,-1995527.467, + *-982971.3024,1960434.268,297239.7137,2676525.168,-147113.4775, + *-3358059.979,-2106979.191,-462827.1322,1017607.960,1039018.475, + *520266.9296,2627427.473,1301981.763,-2577171.706,-238071.9956, + *-3539781.111,94628.16420,4411304.724,2598205.733,637504.9351, + *-1234794.298,-1372562.403,-2.646186796,-31.10055575,2.295799273, + *19.20203279,30.01931202,-302.1028550,-14.78310655,162.1561899, + *.4943938056,176.8089129,-.2444921680,-100.6148929,9.172262228, + *137.4303440,-8.451613443,-84.20684224,-167.3354083,1321.830393, + *76.89928813,-705.7586223,18.28186732,-770.1665162,-9.084224422, + *436.3368157,-6.374255638,-107.2730177,6.080451222,65.53843753, + *143.2872994,-1028.009017,-64.22739330,547.8536586,-20.58928632, + *597.3893669,10.17964133,-337.7800252,159.3532209,76.34445954, + *84.74398828,12.76722651,27.63870691,32.69873634,5.145153451, + *6.310949163,6.996159733,1.971629939,4.436299219,2.904964304, + *.1486276863,.06859991529/ + + XKAPPA=XKAPPA1 ! FORWARDED IN BIRK_1N2 + X_SC=XKAPPA1-1.1D0 ! FORWARDED IN BIRK_SHL + + IF (IOPB.EQ.0.OR.IOPB.EQ.1) THEN + + CALL BIRK_1N2 (1,1,PS,X,Y,Z,FX11,FY11,FZ11) ! REGION 1, MODE 1 + CALL BIRK_SHL (SH11,PS,X_SC,X,Y,Z,HX11,HY11,HZ11) + BX11=FX11+HX11 + BY11=FY11+HY11 + BZ11=FZ11+HZ11 + + CALL BIRK_1N2 (1,2,PS,X,Y,Z,FX12,FY12,FZ12) ! REGION 1, MODE 2 + CALL BIRK_SHL (SH12,PS,X_SC,X,Y,Z,HX12,HY12,HZ12) + BX12=FX12+HX12 + BY12=FY12+HY12 + BZ12=FZ12+HZ12 + + ENDIF + + XKAPPA=XKAPPA2 ! FORWARDED IN BIRK_1N2 + X_SC=XKAPPA2-1.0D0 ! FORWARDED IN BIRK_SHL + + IF (IOPB.EQ.0.OR.IOPB.EQ.2) THEN + + CALL BIRK_1N2 (2,1,PS,X,Y,Z,FX21,FY21,FZ21) ! REGION 2, MODE 1 + CALL BIRK_SHL (SH21,PS,X_SC,X,Y,Z,HX21,HY21,HZ21) + BX21=FX21+HX21 + BY21=FY21+HY21 + BZ21=FZ21+HZ21 + + CALL BIRK_1N2 (2,2,PS,X,Y,Z,FX22,FY22,FZ22) ! REGION 2, MODE 2 + CALL BIRK_SHL (SH22,PS,X_SC,X,Y,Z,HX22,HY22,HZ22) + BX22=FX22+HX22 + BY22=FY22+HY22 + BZ22=FZ22+HZ22 + + ENDIF + + RETURN + END +C +c %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +c +c + SUBROUTINE BIRK_1N2 (NUMB,MODE,PS,X,Y,Z,BX,BY,BZ) +C +C CALCULATES COMPONENTS OF REGION 1/2 FIELD IN SPHERICAL COORDS. DERIVED FROM THE S/R DIPDEF2C (WHICH +C DOES THE SAME JOB, BUT INPUT/OUTPUT THERE WAS IN SPHERICAL COORDS, WHILE HERE WE USE CARTESIAN ONES) +C +C INPUT: NUMB=1 (2) FOR REGION 1 (2) CURRENTS +C MODE=1 YIELDS SIMPLE SINUSOIDAL MLT VARIATION, WITH MAXIMUM CURRENT AT DAWN/DUSK MERIDIAN +C WHILE MODE=2 YIELDS THE SECOND HARMONIC. +C +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION A11(31),A12(31),A21(31),A22(31) + COMMON /MODENUM/ M + COMMON /DTHETA/ DTHETA + + COMMON /DPHI_B_RHO0/ DPHI,B,RHO_0,XKAPPA ! THESE PARAMETERS CONTROL DAY-NIGHT ASYMMETRY OF F.A.C., AS FOLLOWS: + +C (1) DPHI: HALF-DIFFERENCE (IN RADIANS) BETWEEN DAY AND NIGHT LATITUDE OF FAC OVAL AT IONOSPHERIC ALTITUDE; +C TYPICAL VALUE: 0.06 +C (2) B: AN ASYMMETRY FACTOR AT HIGH-ALTITUDES; FOR B=0, THE ONLY ASYMMETRY IS THAT FROM DPHI +C TYPICAL VALUES: 0.35-0.70 +C (3) RHO_0: A FIXED PARAMETER, DEFINING THE DISTANCE RHO, AT WHICH THE LATITUDE SHIFT GRADUALLY SATURATES AND +C STOPS INCREASING +C ITS VALUE WAS ASSUMED FIXED, EQUAL TO 7.0. +C (4) XKAPPA: AN OVERALL SCALING FACTOR, WHICH CAN BE USED FOR CHANGING THE SIZE OF THE F.A.C. OVAL +C + DATA BETA,RH,EPS/0.9D0,10.D0,3.D0/ ! parameters of the tilt-dependent deformation of the untilted F.A.C. field + + DATA A11/.1618068350,-.1797957553,2.999642482,-.9322708978, + *-.6811059760,.2099057262,-8.358815746,-14.86033550,.3838362986, + *-16.30945494,4.537022847,2.685836007,27.97833029,6.330871059, + *1.876532361,18.95619213,.9651528100,.4217195118,-.08957770020, + *-1.823555887,.7457045438,-.5785916524,-1.010200918,.01112389357, + *.09572927448,-.3599292276,8.713700514,.9763932955,3.834602998, + *2.492118385,.7113544659/ + DATA A12/.7058026940,-.2845938535,5.715471266,-2.472820880, + *-.7738802408,.3478293930,-11.37653694,-38.64768867,.6932927651, + *-212.4017288,4.944204937,3.071270411,33.05882281,7.387533799, + *2.366769108,79.22572682,.6154290178,.5592050551,-.1796585105, + *-1.654932210,.7309108776,-.4926292779,-1.130266095,-.009613974555, + *.1484586169,-.2215347198,7.883592948,.02768251655,2.950280953, + *1.212634762,.5567714182/ + DATA A21/.1278764024,-.2320034273,1.805623266,-32.37241440, + *-.9931490648,.3175085630,-2.492465814,-16.21600096,.2695393416, + *-6.752691265,3.971794901,14.54477563,41.10158386,7.912889730, + *1.258297372,9.583547721,1.014141963,.5104134759,-.1790430468, + *-1.756358428,.7561986717,-.6775248254,-.04014016420,.01446794851, + *.1200521731,-.2203584559,4.508963850,.8221623576,1.779933730, + *1.102649543,.8867880020/ + DATA A22/.4036015198,-.3302974212,2.827730930,-45.44405830, + *-1.611103927,.4927112073,-.003258457559,-49.59014949,.3796217108, + *-233.7884098,4.312666980,18.05051709,28.95320323,11.09948019, + *.7471649558,67.10246193,.5667096597,.6468519751,-.1560665317, + *-1.460805289,.7719653528,-.6658988668,.2515179349E-05, + *.02426021891,.1195003324,-.2625739255,4.377172556,.2421190547, + *2.503482679,1.071587299,.7247997430/ + + B=0.5 + RHO_0=7.0 + + M=MODE + IF (NUMB.EQ.1) THEN + DPHI=0.055D0 + DTHETA=0.06D0 + ENDIF + + IF (NUMB.EQ.2) THEN + DPHI=0.030D0 + DTHETA=0.09D0 + ENDIF + + Xsc=X*XKAPPA + Ysc=Y*XKAPPA + Zsc=Z*XKAPPA + RHO=DSQRT(Xsc**2+Zsc**2) + + Rsc=DSQRT(Xsc**2+Ysc**2+Zsc**2) ! SCALED + RHO2=RHO_0**2 + + IF (Xsc.EQ.0.D0.AND.Zsc.EQ.0.D0) THEN + PHI=0.D0 + ELSE + PHI=DATAN2(-Zsc,Xsc) ! FROM CARTESIAN TO CYLINDRICAL (RHO,PHI,Y) + ENDIF + + SPHIC=DSIN(PHI) + CPHIC=DCOS(PHI) ! "C" means "CYLINDRICAL", TO DISTINGUISH FROM SPHERICAL PHI + + BRACK=DPHI+B*RHO2/(RHO2+1.D0)*(RHO**2-1.D0)/(RHO2+RHO**2) + R1RH=(Rsc-1.D0)/RH + PSIAS=BETA*PS/(1.D0+R1RH**EPS)**(1.D0/EPS) + + PHIS=PHI-BRACK*DSIN(PHI) -PSIAS + DPHISPHI=1.D0-BRACK*DCOS(PHI) + DPHISRHO=-2.D0*B*RHO2*RHO/(RHO2+RHO**2)**2 *DSIN(PHI) + * +BETA*PS*R1RH**(EPS-1.D0)*RHO/(RH*Rsc* + * (1.D0+R1RH**EPS)**(1.D0/EPS+1.D0)) + DPHISDY= BETA*PS*R1RH**(EPS-1.D0)*Ysc/(RH*Rsc* + * (1.D0+R1RH**EPS)**(1.D0/EPS+1.D0)) + + SPHICS=DSIN(PHIS) + CPHICS=DCOS(PHIS) + + XS= RHO*CPHICS + ZS=-RHO*SPHICS + + IF (NUMB.EQ.1) THEN + IF (MODE.EQ.1) CALL TWOCONES (A11,XS,Ysc,ZS,BXS,BYAS,BZS) + IF (MODE.EQ.2) CALL TWOCONES (A12,XS,Ysc,ZS,BXS,BYAS,BZS) + ELSE + IF (MODE.EQ.1) CALL TWOCONES (A21,XS,Ysc,ZS,BXS,BYAS,BZS) + IF (MODE.EQ.2) CALL TWOCONES (A22,XS,Ysc,ZS,BXS,BYAS,BZS) + ENDIF + + BRHOAS=BXS*CPHICS-BZS*SPHICS + BPHIAS=-BXS*SPHICS-BZS*CPHICS + + BRHO_S=BRHOAS*DPHISPHI *XKAPPA ! SCALING + BPHI_S=(BPHIAS-RHO*(BYAS*DPHISDY+BRHOAS*DPHISRHO)) *XKAPPA + BY_S=BYAS*DPHISPHI *XKAPPA + + BX=BRHO_S*CPHIC-BPHI_S*SPHIC + BY=BY_S + BZ=-BRHO_S*SPHIC-BPHI_S*CPHIC + + RETURN + END +c +C========================================================================= +c + SUBROUTINE TWOCONES (A,X,Y,Z,BX,BY,BZ) +C +C ADDS FIELDS FROM TWO CONES (NORTHERN AND SOUTHERN), WITH A PROPER SYMMETRY OF THE CURRENT AND FIELD, +C CORRESPONDING TO THE REGION 1 BIRKELAND CURRENTS. +C + + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION A(31) + + CALL ONE_CONE (A,X,Y,Z,BXN,BYN,BZN) + CALL ONE_CONE (A,X,-Y,-Z,BXS,BYS,BZS) + BX=BXN-BXS + BY=BYN+BYS + BZ=BZN+BZS + + RETURN + END +c +C------------------------------------------------------------------------- +C + SUBROUTINE ONE_CONE(A,X,Y,Z,BX,BY,BZ) +c +c RETURNS FIELD COMPONENTS FOR A DEFORMED CONICAL CURRENT SYSTEM, FITTED TO A BIOSAVART FIELD +c BY SIM_14.FOR. HERE ONLY THE NORTHERN CONE IS TAKEN INTO ACCOUNT. +c + + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION A(31) + + COMMON /DTHETA/ DTHETA + COMMON /MODENUM/ M + + DATA DR,DT/1.D-6,1.D-6/ ! JUST FOR NUMERICAL DIFFERENTIATION + + THETA0=A(31) + + RHO2=X**2+Y**2 + RHO=DSQRT(RHO2) + R=DSQRT(RHO2+Z**2) + THETA=DATAN2(RHO,Z) + PHI=DATAN2(Y,X) +C +C MAKE THE DEFORMATION OF COORDINATES: +C + RS=R_S(A,R,THETA) + THETAS=THETA_S(A,R,THETA) + PHIS=PHI +C +C CALCULATE FIELD COMPONENTS AT THE NEW POSITION (ASTERISKED): +C + CALL FIALCOS (RS,THETAS,PHIS,BTAST,BFAST,M,THETA0,DTHETA) ! MODE #M +C +C NOW TRANSFORM B{R,T,F}_AST BY THE DEFORMATION TENSOR: +C +C FIRST OF ALL, FIND THE DERIVATIVES: +C + DRSDR=(R_S(A,R+DR,THETA)-R_S(A,R-DR,THETA))/(2.D0*DR) + DRSDT=(R_S(A,R,THETA+DT)-R_S(A,R,THETA-DT))/(2.D0*DT) + DTSDR=(THETA_S(A,R+DR,THETA)-THETA_S(A,R-DR,THETA))/(2.D0*DR) + DTSDT=(THETA_S(A,R,THETA+DT)-THETA_S(A,R,THETA-DT))/(2.D0*DT) + + STSST=DSIN(THETAS)/DSIN(THETA) + RSR=RS/R + + BR =-RSR/R*STSST*BTAST*DRSDT + BTHETA = RSR*STSST*BTAST*DRSDR + BPHI = RSR*BFAST*(DRSDR*DTSDT-DRSDT*DTSDR) + + S=RHO/R + C=Z/R + SF=Y/RHO + CF=X/RHO + + BE=BR*S+BTHETA*C + + BX=A(1)*(BE*CF-BPHI*SF) + BY=A(1)*(BE*SF+BPHI*CF) + BZ=A(1)*(BR*C-BTHETA*S) + + RETURN + END +C +C===================================================================================== + DOUBLE PRECISION FUNCTION R_S(A,R,THETA) + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION A(31) +C + R_S=R+A(2)/R+A(3)*R/DSQRT(R**2+A(11)**2)+A(4)*R/(R**2+A(12)**2) + *+(A(5)+A(6)/R+A(7)*R/DSQRT(R**2+A(13)**2)+A(8)*R/(R**2+A(14)**2))* + * DCOS(THETA) + *+(A(9)*R/DSQRT(R**2+A(15)**2)+A(10)*R/(R**2+A(16)**2)**2) + * *DCOS(2.D0*THETA) +C + RETURN + END +C +C----------------------------------------------------------------------------- +C + DOUBLE PRECISION FUNCTION THETA_S(A,R,THETA) + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION A(31) +c + THETA_S=THETA+(A(17)+A(18)/R+A(19)/R**2 + * +A(20)*R/DSQRT(R**2+A(27)**2))*DSIN(THETA) + * +(A(21)+A(22)*R/DSQRT(R**2+A(28)**2) + * +A(23)*R/(R**2+A(29)**2))*DSIN(2.D0*THETA) + * +(A(24)+A(25)/R+A(26)*R/(R**2+A(30)**2))*DSIN(3.D0*THETA) +C + RETURN + END +C +c!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! +c + SUBROUTINE FIALCOS(R,THETA,PHI,BTHETA,BPHI,N,THETA0,DT) +C +C CONICAL MODEL OF BIRKELAND CURRENT FIELD; BASED ON THE OLD S/R FIALCO (OF 1990-91) + +C BTN, AND BPN ARE THE ARRAYS OF BTHETA AND BPHI (BTN(i), BPN(i) CORRESPOND TO i-th MODE). +C ONLY FIRST N MODE AMPLITUDES ARE COMPUTED (N<=10). +C THETA0 IS THE ANGULAR HALF-WIDTH OF THE CONE, DT IS THE ANGULAR H.-W. OF THE CURRENT LAYER + +C NOTE: BR=0 (BECAUSE ONLY RADIAL CURRENTS ARE PRESENT IN THIS MODEL) +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION BTN(10),BPN(10),CCOS(10),SSIN(10) + + SINTE=DSIN(THETA) + RO=R*SINTE + COSTE=DCOS(THETA) + SINFI=DSIN(PHI) + COSFI=DCOS(PHI) + TG=SINTE/(1.D0+COSTE) ! TAN(THETA/2) + CTG=SINTE/(1.D0-COSTE) ! CTG(THETA/2) +C +C + TETANP=THETA0+DT + TETANM=THETA0-DT + IF(THETA.LT.TETANM) GOTO 1 + TGP=DTAN(TETANP*0.5D0) + TGM=DTAN(TETANM*0.5D0) + TGM2=TGM*TGM + TGP2=TGP*TGP + 1 CONTINUE + + COSM1=1.D0 + SINM1=0.D0 + TM=1.D0 + TGM2M=1.D0 + TGP2M=1.D0 + + DO 2 M=1,N + TM=TM*TG + CCOS(M)=COSM1*COSFI-SINM1*SINFI + SSIN(M)=SINM1*COSFI+COSM1*SINFI + COSM1=CCOS(M) + SINM1=SSIN(M) + IF(THETA.LT.TETANM) THEN + T=TM + DTT=0.5D0*M*TM*(TG+CTG) + DTT0=0.D0 + ELSE IF(THETA.LT.TETANP) THEN + TGM2M=TGM2M*TGM2 + FC=1.D0/(TGP-TGM) + FC1=1.D0/(2*M+1) + TGM2M1=TGM2M*TGM + TG21=1.D0+TG*TG + T=FC*(TM*(TGP-TG)+FC1*(TM*TG-TGM2M1/TM)) + DTT=0.5D0*M*FC*TG21*(TM/TG*(TGP-TG)-FC1*(TM-TGM2M1/(TM*TG))) + DTT0=0.5D0*FC*((TGP+TGM)*(TM*TG-FC1*(TM*TG-TGM2M1/TM))+ + * TM*(1.D0-TGP*TGM)-(1.D0+TGM2)*TGM2M/TM) + ELSE + TGP2M=TGP2M*TGP2 + TGM2M=TGM2M*TGM2 + FC=1.D0/(TGP-TGM) + FC1=1.D0/(2*M+1) + T=FC*FC1*(TGP2M*TGP-TGM2M*TGM)/TM + DTT=-T*M*0.5D0*(TG+CTG) + ENDIF + + BTN(M)=M*T*CCOS(M)/RO + 2 BPN(M)=-DTT*SSIN(M)/R + + BTHETA=BTN(N) *800. + BPHI =BPN(N) *800. + + RETURN + END +C +C------------------------------------------------------------------------- +C +C + SUBROUTINE BIRK_SHL (A,PS,X_SC,X,Y,Z,BX,BY,BZ) +C + IMPLICIT REAL * 8 (A - H, O - Z) + DIMENSION A(86) +C + CPS=DCOS(PS) + SPS=DSIN(PS) + + S3PS=2.D0*CPS +C + PST1=PS*A(85) + PST2=PS*A(86) + + ST1=DSIN(PST1) + CT1=DCOS(PST1) + ST2=DSIN(PST2) + CT2=DCOS(PST2) + + X1=X*CT1-Z*ST1 + Z1=X*ST1+Z*CT1 + X2=X*CT2-Z*ST2 + Z2=X*ST2+Z*CT2 +C + L=0 + GX=0.D0 + GY=0.D0 + GZ=0.D0 +C + DO 1 M=1,2 ! M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY) +C AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY) + DO 2 I=1,3 + P=A(72+I) + Q=A(78+I) + CYPI=DCOS(Y/P) + CYQI=DCOS(Y/Q) + SYPI=DSIN(Y/P) + SYQI=DSIN(Y/Q) +C + DO 3 K=1,3 + R=A(75+K) + S=A(81+K) + SZRK=DSIN(Z1/R) + CZSK=DCOS(Z2/S) + CZRK=DCOS(Z1/R) + SZSK=DSIN(Z2/S) + SQPR=DSQRT(1.D0/P**2+1.D0/R**2) + SQQS=DSQRT(1.D0/Q**2+1.D0/S**2) + EPR=DEXP(X1*SQPR) + EQS=DEXP(X2*SQQS) +C + DO 4 N=1,2 ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT +C AND N=2 IS FOR THE SECOND ONE + + DO 5 NN=1,2 ! NN = 1,2 FURTHER SPLITS THE COEFFICIENTS INTO 2 PARTS, +C TO TAKE INTO ACCOUNT THE SCALE FACTOR DEPENDENCE + + IF (M.EQ.1) THEN + FX=-SQPR*EPR*CYPI*SZRK + FY=EPR*SYPI*SZRK/P + FZ=-EPR*CYPI*CZRK/R + IF (N.EQ.1) THEN + IF (NN.EQ.1) THEN + HX=FX + HY=FY + HZ=FZ + ELSE + HX=FX*X_SC + HY=FY*X_SC + HZ=FZ*X_SC + ENDIF + ELSE + IF (NN.EQ.1) THEN + HX=FX*CPS + HY=FY*CPS + HZ=FZ*CPS + ELSE + HX=FX*CPS*X_SC + HY=FY*CPS*X_SC + HZ=FZ*CPS*X_SC + ENDIF + ENDIF + + ELSE ! M.EQ.2 + FX=-SPS*SQQS*EQS*CYQI*CZSK + FY=SPS/Q*EQS*SYQI*CZSK + FZ=SPS/S*EQS*CYQI*SZSK + IF (N.EQ.1) THEN + IF (NN.EQ.1) THEN + HX=FX + HY=FY + HZ=FZ + ELSE + HX=FX*X_SC + HY=FY*X_SC + HZ=FZ*X_SC + ENDIF + ELSE + IF (NN.EQ.1) THEN + HX=FX*S3PS + HY=FY*S3PS + HZ=FZ*S3PS + ELSE + HX=FX*S3PS*X_SC + HY=FY*S3PS*X_SC + HZ=FZ*S3PS*X_SC + ENDIF + ENDIF + ENDIF + L=L+1 + + IF (M.EQ.1) THEN + HXR=HX*CT1+HZ*ST1 + HZR=-HX*ST1+HZ*CT1 + ELSE + HXR=HX*CT2+HZ*ST2 + HZR=-HX*ST2+HZ*CT2 + ENDIF + + GX=GX+HXR*A(L) + GY=GY+HY *A(L) + 5 GZ=GZ+HZR*A(L) + + 4 CONTINUE + 3 CONTINUE + 2 CONTINUE + 1 CONTINUE + + BX=GX + BY=GY + BZ=GZ + + RETURN + END + +C +C************************************************************************************ +C + SUBROUTINE FULL_RC (IOPR,PS,X,Y,Z,BXSRC,BYSRC,BZSRC,BXPRC,BYPRC, + * BZPRC) +C +C CALCULATES GSM FIELD COMPONENTS OF THE SYMMETRIC (SRC) AND PARTIAL (PRC) COMPONENTS OF THE RING CURRENT +C SRC PROVIDES A DEPRESSION OF -28 nT AT EARTH +C PRC CORRESPONDS TO THE PRESSURE DIFFERENCE OF 2 nPa BETWEEN MIDNIGHT AND NOON RING CURRENT +C PARTICLE PRESSURE AND YIELDS A DEPRESSION OF -17 nT AT X=-6Re +C +C SC_SY AND SC_PR ARE SCALING FACTORS FOR THE SYMMETRIC AND PARTIAL COMPONENTS: +C VALUES LARGER THAN 1 RESULT IN SPATIALLY LARGER CURRENTS +C +C PHI IS THE ROTATION ANGLE IN RADIANS OF THE PARTIAL RING CURRENT (MEASURED FROM MIDNIGHT TOWARD DUSK) +C +C IOPR - A RING CURRENT CALCULATION FLAG (FOR LEAST-SQUARES FITTING ONLY): +C IOPR=0 - BOTH SRC AND PRC FIELDS ARE CALCULATED +C IOPR=1 - SRC ONLY +C IOPR=2 - PRC ONLY +C + IMPLICIT REAL*8 (A-H,O-Z) + DIMENSION C_SY(86),C_PR(86) + COMMON /RCPAR/ SC_SY,SC_PR,PHI +C + DATA C_SY/1675.694858,1780.006388,-961.6082149,-1668.914259, + *-27.40437029,-107.4169670,27.76189943,92.89740503,-43.92949274, + *-403.6444072,6.167161865,298.2779761,-1680.779044,-1780.933039, + *964.1861088,1670.988659,27.48864650,107.7809519,-27.84600972, + *-93.20691865,44.28496784,404.4537249,-6.281958730,-298.6050952, + *-7.971914848,2.017383761,-1.492230168,-1.957411655,-.08525523181, + *-.3811813235,.08446716725,.3215044399,-.7141912767,-.9086294596, + *.2966677742,-.04736679933,-11.38731325,.1719795189,1.356233066, + *.8613438429,-.09143823092,-.2593979098,.04244838338,.06318383319, + *-.5861372726,-.03368780733,-.07104470269,-.06909052953, + *-60.18659631,-32.87563877,11.76450433,5.891673644,2.562360333, + *6.215377232,-1.273945165,-1.864704763,-5.394837143,-8.799382627, + *3.743066561,-.7649164511,57.09210569,32.61236511,-11.28688017, + *-5.849523392,-2.470635922,-5.961417272,1.230031099,1.793192595, + *5.383736074,8.369895153,-3.611544412,.7898988697,7.970609948, + *7.981216562,35.16822497,12.45651654,1.689755359,3.678712366, + *23.66117284,6.987136092,6.886678677,20.91245928,1.650064156, + *3.474068566,.3474715765,.6564043111/ + + DATA C_PR/-64820.58481,-63965.62048,66267.93413,135049.7504, + *-36.56316878,124.6614669,56.75637955,-87.56841077,5848.631425, + *4981.097722,-6233.712207,-10986.40188,68716.52057,65682.69473, + *-69673.32198,-138829.3568,43.45817708,-117.9565488,-62.14836263, + *79.83651604,-6211.451069,-5151.633113,6544.481271,11353.03491, + *23.72352603,-256.4846331,25.77629189,145.2377187,-4.472639098, + *-3.554312754,2.936973114,2.682302576,2.728979958,26.43396781, + *-9.312348296,-29.65427726,-247.5855336,-206.9111326,74.25277664, + *106.4069993,15.45391072,16.35943569,-5.965177750,-6.079451700, + *115.6748385,-35.27377307,-32.28763497,-32.53122151,93.74409310, + *84.25677504,-29.23010465,-43.79485175,-6.434679514,-6.620247951, + *2.443524317,2.266538956,-43.82903825,6.904117876,12.24289401, + *17.62014361,152.3078796,124.5505289,-44.58690290,-63.02382410, + *-8.999368955,-9.693774119,3.510930306,3.770949738,-77.96705716, + *22.07730961,20.46491655,18.67728847,9.451290614,9.313661792, + *644.7620970,418.2515954,7.183754387,35.62128817,19.43180682, + *39.57218411,15.69384715,7.123215241,2.300635346,21.90881131, + *-.01775839370,.3996346710/ + + CALL SRC_PRC (IOPR,SC_SY,SC_PR,PHI,PS,X,Y,Z,HXSRC,HYSRC,HZSRC, + * HXPRC,HYPRC,HZPRC) + + X_SC=SC_SY-1.D0 + IF (IOPR.EQ.0.OR.IOPR.EQ.1) THEN + CALL RC_SHIELD (C_SY,PS,X_SC,X,Y,Z,FSX,FSY,FSZ) + ELSE + FSX=0.D0 + FSY=0.D0 + FSZ=0.D0 + ENDIF + + X_SC=SC_PR-1.D0 + IF (IOPR.EQ.0.OR.IOPR.EQ.2) THEN + CALL RC_SHIELD (C_PR,PS,X_SC,X,Y,Z,FPX,FPY,FPZ) + ELSE + FPX=0.D0 + FPY=0.D0 + FPZ=0.D0 + ENDIF + + BXSRC=HXSRC+FSX + BYSRC=HYSRC+FSY + BZSRC=HZSRC+FSZ + + BXPRC=HXPRC+FPX + BYPRC=HYPRC+FPY + BZPRC=HZPRC+FPZ + + RETURN + END +C--------------------------------------------------------------------------------------- +C + SUBROUTINE SRC_PRC (IOPR,SC_SY,SC_PR,PHI,PS,X,Y,Z,BXSRC,BYSRC, + * BZSRC,BXPRC,BYPRC,BZPRC) +C +C RETURNS FIELD COMPONENTS FROM A MODEL RING CURRENT, INCLUDING ITS SYMMETRIC PART +C AND A PARTIAL RING CURRENT, CLOSED VIA BIRKELAND CURRENTS. BASED ON RESULTS, DESCRIBED +C IN A PAPER "MODELING THE INNER MAGNETOSPHERE: ASYMMETRIC RING CURRENT AND REGION 2 +C BIRKELAND CURRENTS REVISITED" (JGR, DEC.2000). +C +C IOPR - A RING CURRENT CALCULATION FLAG (FOR LEAST-SQUARES FITTING ONLY): +C IOPR=0 - BOTH SRC AND PRC FIELDS ARE CALCULATED +C IOPR=1 - SRC ONLY +C IOPR=2 - PRC ONLY +C +C SC_SY & SC_PR ARE SCALE FACTORS FOR THE ABOVE COMPONENTS; TAKING SC<1 OR SC>1 MAKES THE CURRENTS +C SHRINK OR EXPAND, RESPECTIVELY. +C +C PHI IS THE ROTATION ANGLE (RADIANS) OF THE PARTIAL RING CURRENT (MEASURED FROM MIDNIGHT TOWARD DUSK) +C + IMPLICIT REAL*8 (A-H,O-Z) +c +c 1. TRANSFORM TO TILTED COORDINATES (i.e., SM coordinates): +C + CPS=DCOS(PS) + SPS=DSIN(PS) + + XT=X*CPS-Z*SPS + ZT=Z*CPS+X*SPS +C +C 2. SCALE THE COORDINATES FOR THE SYMMETRIC AND PARTIAL RC COMPONENTS: +C + XTS=XT/SC_SY ! SYMMETRIC + YTS=Y /SC_SY + ZTS=ZT/SC_SY + + XTA=XT/SC_PR ! PARTIAL + YTA=Y /SC_PR + ZTA=ZT/SC_PR +C +C 3. CALCULATE COMPONENTS OF THE TOTAL FIELD IN THE TILTED (SOLAR-MAGNETIC) COORDINATE SYSTEM: +C +C +C 3a. SYMMETRIC FIELD: +C + IF (IOPR.LE.1) CALL RC_SYMM(XTS,YTS,ZTS,BXS,BYS,BZS) + IF (IOPR.EQ.0.OR.IOPR.EQ.2) + * CALL PRC_SYMM(XTA,YTA,ZTA,BXA_S,BYA_S,BZA_S) + +C 3b. ROTATE THE SCALED SM COORDINATES BY PHI AROUND ZSM AXIS AND CALCULATE QUADRUPOLE PRC FIELD +C IN THOSE COORDS: + + CP=DCOS(PHI) + SP=DSIN(PHI) + XR=XTA*CP-YTA*SP + YR=XTA*SP+YTA*CP + + IF (IOPR.EQ.0.OR.IOPR.EQ.2) + * CALL PRC_QUAD(XR,YR,ZTA,BXA_QR,BYA_QR,BZA_Q) + +C 3c. TRANSFORM THE QUADRUPOLE FIELD COMPONENTS BACK TO THE SM COORDS: +C + BXA_Q= BXA_QR*CP+BYA_QR*SP + BYA_Q=-BXA_QR*SP+BYA_QR*CP + +C 3d. FIND THE TOTAL FIELD OF PRC (SYMM.+QUADR.) IN THE SM COORDS: +C + BXP=BXA_S+BXA_Q + BYP=BYA_S+BYA_Q + BZP=BZA_S+BZA_Q +C +C 4. TRANSFORM THE FIELDS OF BOTH PARTS OF THE RING CURRENT BACK TO THE GSM SYSTEM: +C + BXSRC=BXS*CPS+BZS*SPS ! SYMMETRIC RC + BYSRC=BYS + BZSRC=BZS*CPS-BXS*SPS +C + BXPRC=BXP*CPS+BZP*SPS ! PARTIAL RC + BYPRC=BYP + BZPRC=BZP*CPS-BXP*SPS +C + RETURN + END +C +C&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C + SUBROUTINE RC_SYMM (X,Y,Z,BX,BY,BZ) + IMPLICIT REAL * 8 (A - H, O - Z) + DATA DS,DC/1.D-2,0.99994999875D0/, D/1.D-4/,DRD/5.D3/ ! DS=SIN(THETA) AT THE BOUNDARY OF THE LINEARITY + REGION; DC=SQRT(1-DS**2); DRD=1/(2*D) + RHO2=X**2+Y**2 + R2=RHO2+Z**2 + R=DSQRT(R2) + RP=R+D + RM=R-D + SINT=DSQRT(RHO2)/R + COST=Z/R + + IF (SINT.LT.DS) THEN ! TOO CLOSE TO THE Z-AXIS; USING A LINEAR APPROXIMATION A_PHI~SINT, +C TO AVOID THE SINGULARITY PROBLEM + A=AP(R,DS,DC)/DS + DARDR=(RP*AP(RP,DS,DC)-RM*AP(RM,DS,DC))*DRD + FXY=Z*(2.D0*A-DARDR)/(R*R2) + BX=FXY*X + BY=FXY*Y + BZ=(2.D0*A*COST**2+DARDR*SINT**2)/R + + ELSE + + THETA=DATAN2(SINT,COST) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + SINTM=DSIN(TM) + COSTP=DCOS(TP) + COSTM=DCOS(TM) + BR=(SINTP*AP(R,SINTP,COSTP)-SINTM*AP(R,SINTM,COSTM)) + * /(R*SINT)*DRD + BT=(RM*AP(RM,SINT,COST)-RP*AP(RP,SINT,COST))/R*DRD + FXY=(BR+BT*COST/SINT)/R + BX=FXY*X + BY=FXY*Y + BZ=BR*COST-BT*SINT + + ENDIF + + RETURN + END +c +c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C + DOUBLE PRECISION FUNCTION AP(R,SINT,COST) +C +C Calculates azimuthal component of the vector potential of the symmetric +c part of the model ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + LOGICAL PROX ! INDICATES WHETHER WE ARE TOO CLOSE TO THE AXIS OF SYMMETRY, WHERE THE INVERSION +C OF DIPOLAR COORDINATES BECOMES INACCURATE + DATA A1,A2,RRC1,DD1,RRC2,DD2,P1,R1,DR1,DLA1,P2,R2,DR2,DLA2,P3, + *R3,DR3/-563.3722359,425.0891691,4.150588549,2.266150226, + * 3.334503403,3.079071195,.02602428295,8.937790598,3.327934895, + *.4487061833,.09125832351,6.243029867,1.750145910,.4181957162, + *.06106691992,2.079908581,.6828548533/ + + PROX=.FALSE. + SINT1=SINT + COST1=COST + IF (SINT1.LT.1.D-2) THEN ! TOO CLOSE TO Z-AXIS; USE LINEAR INTERPOLATION BETWEEN SINT=0 & SINT=0.01 + SINT1=1.D-2 + COST1=.99994999875 + PROX=.TRUE. + ENDIF + + ALPHA=SINT1**2/R ! R,THETA -> ALPHA,GAMMA + GAMMA=COST1/R**2 + + ARG1=-((R-R1)/DR1)**2-(COST1/DLA1)**2 + ARG2=-((R-R2)/DR2)**2-(COST1/DLA2)**2 + ARG3=-((R-R3)/DR3)**2 + + IF (ARG1.LT.-500.D0) THEN ! TO PREVENT "FLOATING UNDERFLOW" CRASHES + DEXP1=0.D0 + ELSE + DEXP1=DEXP(ARG1) + ENDIF + + IF (ARG2.LT.-500.D0) THEN + DEXP2=0.D0 + ELSE + DEXP2=DEXP(ARG2) + ENDIF + + IF (ARG3.LT.-500.D0) THEN + DEXP3=0.D0 + ELSE + DEXP3=DEXP(ARG3) + ENDIF + + + ALPHA_S=ALPHA*(1.D0+P1*DEXP1+P2*DEXP2+P3*DEXP3) ! ALPHA -> ALPHA_S (DEFORMED) + + GAMMA_S=GAMMA + GAMMAS2=GAMMA_S**2 + + + ALSQH=ALPHA_S**2/2.D0 ! ALPHA_S,GAMMA_S -> RS,SINTS,COSTS + F=64.D0/27.D0*GAMMAS2+ALSQH**2 + Q=(DSQRT(F)+ALSQH)**(1.D0/3.D0) + C=Q-4.D0*GAMMAS2**(1.D0/3.D0)/(3.D0*Q) + IF (C.LT.0.D0) C=0.D0 + G=DSQRT(C**2+4.D0*GAMMAS2**(1.D0/3.D0)) + RS=4.D0/((DSQRT(2.D0*G-C)+DSQRT(C))*(G+C)) + COSTS=GAMMA_S*RS**2 + SINTS=DSQRT(1.D0-COSTS**2) + RHOS=RS*SINTS + RHOS2=RHOS**2 + ZS=RS*COSTS +C +c 1st loop: + + P=(RRC1+RHOS)**2+ZS**2+DD1**2 + XK2=4.D0*RRC1*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI1=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 +c +c 2nd loop: + + P=(RRC2+RHOS)**2+ZS**2+DD2**2 + XK2=4.D0*RRC2*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI2=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 + + AP=A1*APHI1+A2*APHI2 + IF (PROX) AP=AP*SINT/SINT1 ! LINEAR INTERPOLATION, IF TOO CLOSE TO THE Z-AXIS +C + RETURN + END +c +c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ +C + SUBROUTINE PRC_SYMM (X,Y,Z,BX,BY,BZ) + IMPLICIT REAL * 8 (A - H, O - Z) + DATA DS,DC/1.D-2,0.99994999875D0/, D/1.D-4/,DRD/5.D3/ ! DS=SIN(THETA) AT THE BOUNDARY OF THE LINEARITY + REGION; DC=SQRT(1-DS**2); DRD=1/(2*D) + RHO2=X**2+Y**2 + R2=RHO2+Z**2 + R=DSQRT(R2) + RP=R+D + RM=R-D + SINT=DSQRT(RHO2)/R + COST=Z/R + + IF (SINT.LT.DS) THEN ! TOO CLOSE TO THE Z-AXIS; USING A LINEAR APPROXIMATION A_PHI~SINT, +C TO AVOID THE SINGULARITY PROBLEM + A=APPRC(R,DS,DC)/DS + DARDR=(RP*APPRC(RP,DS,DC)-RM*APPRC(RM,DS,DC))*DRD + FXY=Z*(2.D0*A-DARDR)/(R*R2) + BX=FXY*X + BY=FXY*Y + BZ=(2.D0*A*COST**2+DARDR*SINT**2)/R + + ELSE + + THETA=DATAN2(SINT,COST) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + SINTM=DSIN(TM) + COSTP=DCOS(TP) + COSTM=DCOS(TM) + BR=(SINTP*APPRC(R,SINTP,COSTP)-SINTM*APPRC(R,SINTM,COSTM)) + * /(R*SINT)*DRD + BT=(RM*APPRC(RM,SINT,COST)-RP*APPRC(RP,SINT,COST))/R*DRD + FXY=(BR+BT*COST/SINT)/R + BX=FXY*X + BY=FXY*Y + BZ=BR*COST-BT*SINT + + ENDIF + + RETURN + END +c +c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C +C + DOUBLE PRECISION FUNCTION APPRC(R,SINT,COST) +C +C Calculates azimuthal component of the vector potential of the symmetric +c part of the model PARTIAL ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + LOGICAL PROX + DATA A1,A2,RRC1,DD1,RRC2,DD2,P1,ALPHA1,DAL1,BETA1,DG1,P2,ALPHA2, + * DAL2,BETA2,DG2,BETA3,P3,ALPHA3,DAL3,BETA4,DG3,BETA5,Q0,Q1,ALPHA4, + * DAL4,DG4,Q2,ALPHA5,DAL5,DG5,BETA6,BETA7 + * /-80.11202281,12.58246758,6.560486035,1.930711037,3.827208119, + *.7789990504,.3058309043,.1817139853,.1257532909,3.422509402, + *.04742939676,-4.800458958,-.02845643596,.2188114228,2.545944574, + *.00813272793,.35868244,103.1601001,-.00764731187,.1046487459, + *2.958863546,.01172314188,.4382872938,.01134908150,14.51339943, + *.2647095287,.07091230197,.01512963586,6.861329631,.1677400816, + *.04433648846,.05553741389,.7665599464,.7277854652/ + + PROX=.FALSE. + SINT1=SINT + COST1=COST + IF (SINT1.LT.1.D-2) THEN ! TOO CLOSE TO Z-AXIS; USE LINEAR INTERPOLATION BETWEEN SINT=0 & SINT=0.01 + SINT1=1.D-2 + COST1=.99994999875 + PROX=.TRUE. + ENDIF + + ALPHA=SINT1**2/R ! R,THETA -> ALPHA,GAMMA + GAMMA=COST1/R**2 + + ARG1=-(GAMMA/DG1)**2 + ARG2=-((ALPHA-ALPHA4)/DAL4)**2-(GAMMA/DG4)**2 + + IF (ARG1.LT.-500.D0) THEN ! TO PREVENT "FLOATING UNDERFLOW" CRASHES + DEXP1=0.D0 + ELSE + DEXP1=DEXP(ARG1) + ENDIF + + IF (ARG2.LT.-500.D0) THEN ! TO PREVENT "FLOATING UNDERFLOW" CRASHES + DEXP2=0.D0 + ELSE + DEXP2=DEXP(ARG2) + ENDIF + + ALPHA_S=ALPHA*(1.D0+P1/(1.D0+((ALPHA-ALPHA1)/DAL1)**2)**BETA1 + * *DEXP1+P2*(ALPHA-ALPHA2)/(1.D0+((ALPHA-ALPHA2)/DAL2)**2)**BETA2 + */(1.D0+(GAMMA/DG2)**2)**BETA3 + *+P3*(ALPHA-ALPHA3)**2/(1.D0+((ALPHA-ALPHA3)/DAL3)**2)**BETA4 + */(1.D0+(GAMMA/DG3)**2)**BETA5) ! ALPHA -> ALPHA_S (DEFORMED) + + GAMMA_S=GAMMA*(1.D0+Q0+Q1*(ALPHA-ALPHA4)*DEXP2 ! GAMMA -> GAMMA_ (DEFORMED) + * +Q2*(ALPHA-ALPHA5)/(1.D0+((ALPHA-ALPHA5)/DAL5)**2)**BETA6 + * /(1.D0+(GAMMA/DG5)**2)**BETA7) + + GAMMAS2=GAMMA_S**2 + + ALSQH=ALPHA_S**2/2.D0 ! ALPHA_S,GAMMA_S -> RS,SINTS,COSTS + F=64.D0/27.D0*GAMMAS2+ALSQH**2 + Q=(DSQRT(F)+ALSQH)**(1.D0/3.D0) + C=Q-4.D0*GAMMAS2**(1.D0/3.D0)/(3.D0*Q) + IF (C.LT.0.D0) C=0.D0 + G=DSQRT(C**2+4.D0*GAMMAS2**(1.D0/3.D0)) + RS=4.D0/((DSQRT(2.D0*G-C)+DSQRT(C))*(G+C)) + COSTS=GAMMA_S*RS**2 + SINTS=DSQRT(1.D0-COSTS**2) + RHOS=RS*SINTS + RHOS2=RHOS**2 + ZS=RS*COSTS +C +c 1st loop: + + P=(RRC1+RHOS)**2+ZS**2+DD1**2 + XK2=4.D0*RRC1*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI1=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 +c +c 2nd loop: + + P=(RRC2+RHOS)**2+ZS**2+DD2**2 + XK2=4.D0*RRC2*RHOS/P + XK=SQRT(XK2) + XKRHO12=XK*SQRT(RHOS) +C + XK2S=1.D0-XK2 + DL=DLOG(1.D0/XK2S) + ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+ + * XK2S*(0.03742563713+XK2S*0.01451196212))) +DL* + * (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+ + * XK2S*(0.03328355346D0+XK2S*0.00441787012D0)))) + ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S* + * (0.04757383546D0+XK2S*0.01736506451D0))) +DL* + * XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S* + * (0.04069697526D0+XK2S*0.00526449639D0))) +C + APHI2=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12 + + APPRC=A1*APHI1+A2*APHI2 + IF (PROX) APPRC=APPRC*SINT/SINT1 ! LINEAR INTERPOLATION, IF TOO CLOSE TO THE Z-AXIS +C + RETURN + END +C +C@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ +C +C + SUBROUTINE PRC_QUAD (X,Y,Z,BX,BY,BZ) +C + IMPLICIT REAL * 8 (A - H, O - Z) + + DATA D,DD/1.D-4,2.D-4/, DS/1.D-2/,DC/0.99994999875D0/ + + RHO2=X**2+Y**2 + R=DSQRT(RHO2+Z**2) + RHO=DSQRT(RHO2) + SINT=RHO/R + COST=Z/R + RP=R+D + RM=R-D + + IF (SINT.GT.DS) THEN + CPHI=X/RHO + SPHI=Y/RHO + BR=BR_PRC_Q(R,SINT,COST) + BT=BT_PRC_Q(R,SINT,COST) + DBRR=(BR_PRC_Q(RP,SINT,COST)-BR_PRC_Q(RM,SINT,COST))/DD + THETA=DATAN2(SINT,COST) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + COSTP=DCOS(TP) + SINTM=DSIN(TM) + COSTM=DCOS(TM) + DBTT=(BT_PRC_Q(R,SINTP,COSTP)-BT_PRC_Q(R,SINTM,COSTM))/DD + BX=SINT*(BR+(BR+R*DBRR+DBTT)*SPHI**2)+COST*BT + BY=-SINT*SPHI*CPHI*(BR+R*DBRR+DBTT) + BZ=(BR*COST-BT*SINT)*CPHI + ELSE + ST=DS + CT=DC + IF (Z.LT.0.D0) CT=-DC + THETA=DATAN2(ST,CT) + TP=THETA+D + TM=THETA-D + SINTP=DSIN(TP) + COSTP=DCOS(TP) + SINTM=DSIN(TM) + COSTM=DCOS(TM) + BR=BR_PRC_Q(R,ST,CT) + BT=BT_PRC_Q(R,ST,CT) + DBRR=(BR_PRC_Q(RP,ST,CT)-BR_PRC_Q(RM,ST,CT))/DD + DBTT=(BT_PRC_Q(R,SINTP,COSTP)-BT_PRC_Q(R,SINTM,COSTM))/DD + FCXY=R*DBRR+DBTT + BX=(BR*(X**2+2.D0*Y**2)+FCXY*Y**2)/(R*ST)**2+BT*COST + BY=-(BR+FCXY)*X*Y/(R*ST)**2 + BZ=(BR*COST/ST-BT)*X/R + ENDIF + + RETURN + END +c +c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& +C + DOUBLE PRECISION FUNCTION BR_PRC_Q (R,SINT,COST) +C +Calculates the radial component of the "quadrupole" part of the model partial ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + + DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17, ! ALL LINEAR PARAMETERS HERE + * A18,XK1,AL1,DAL1,B1,BE1,XK2,AL2,DAL2,B2,BE2,XK3,XK4,AL3,DAL3,B3, ! WERE MULTIPLIED BY 0.1, + * BE3,AL4,DAL4,DG1,AL5,DAL5,DG2,C1,C2,C3,AL6,DAL6,DRM/-21.2666329, ! SO THAT THEY CORRESPOND TO P_0=1 nPa, + *32.24527521,-6.062894078,7.515660734,233.7341288,-227.1195714, ! RATHER THAN THE ORIGINAL VALUE OF 10 nPa + *8.483233889,16.80642754,-24.63534184,9.067120578,-1.052686913, ! ASSUMED IN THE BIOT-SAVART INTEGRAL + *-12.08384538,18.61969572,-12.71686069,47017.35679,-50646.71204, + *7746.058231,1.531069371,2.318824273,.1417519429,.6388013110E-02, + *5.303934488,4.213397467,.7955534018,.1401142771,.2306094179E-01, + *3.462235072,2.568743010,3.477425908,1.922155110,.1485233485, + *.2319676273E-01,7.830223587,8.492933868,.1295221828,.01753008801, + *.01125504083,.1811846095,.04841237481,.01981805097,6.557801891, + *6.348576071,5.744436687,.2265212965,.1301957209,.5654023158/ + + SINT2=SINT**2 + COST2=COST**2 + SC=SINT*COST + ALPHA=SINT2/R + GAMMA=COST/R**2 + + CALL FFS(ALPHA,AL1,DAL1,F,FA,FS) + D1=SC*F**XK1/((R/B1)**BE1+1.D0) + D2=D1*COST2 + + CALL FFS(ALPHA,AL2,DAL2,F,FA,FS) + D3=SC*FS**XK2/((R/B2)**BE2+1.D0) + D4=D3*COST2 + + CALL FFS(ALPHA,AL3,DAL3,F,FA,FS) + D5=SC*(ALPHA**XK3)*(FS**XK4)/((R/B3)**BE3+1.D0) + D6=D5*COST2 + + ARGA=((ALPHA-AL4)/DAL4)**2+1.D0 + ARGG=1.D0+(GAMMA/DG1)**2 + + D7=SC/ARGA/ARGG + D8=D7/ARGA + D9=D8/ARGA + D10=D9/ARGA + + ARGA=((ALPHA-AL5)/DAL5)**2+1.D0 + ARGG=1.D0+(GAMMA/DG2)**2 + + D11=SC/ARGA/ARGG + D12=D11/ARGA + D13=D12/ARGA + D14=D13/ARGA + + + D15=SC/(R**4+C1**4) + D16=SC/(R**4+C2**4)*COST2 + D17=SC/(R**4+C3**4)*COST2**2 + + CALL FFS(ALPHA,AL6,DAL6,F,FA,FS) + D18=SC*FS/(1.D0+((R-1.2D0)/DRM)**2) + + BR_PRC_Q=A1*D1+A2*D2+A3*D3+A4*D4+A5*D5+A6*D6+A7*D7+A8*D8+A9*D9+ + * A10*D10+A11*D11+A12*D12+A13*D13+A14*D14+A15*D15+A16*D16+A17*D17+ + * A18*D18 +C + RETURN + END +c +C%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +C + DOUBLE PRECISION FUNCTION BT_PRC_Q (R,SINT,COST) +C +Calculates the Theta component of the "quadrupole" part of the model partial ring current. +C + IMPLICIT REAL * 8 (A - H, O - Z) + + DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17, ! ALL LINEAR PARAMETERS HERE + *XK1,AL1,DAL1,B1,BE1,XK2,AL2,DAL2,BE2,XK3,XK4,AL3,DAL3,B3,BE3,AL4, ! WERE MULTIPLIED BY 0.1, + *DAL4,DG1,AL5,DAL5,DG2,C1,C2,C3/12.74640393,-7.516393516, ! SO THAT THEY CORRESPOND TO P_0=1 nPa, + *-5.476233865,3.212704645,-59.10926169,46.62198189,-.01644280062, ! RATHER THAN THE ORIGINAL VALUE OF 10 nPa + *.1234229112,-.08579198697,.01321366966,.8970494003,9.136186247, ! ASSUMED IN THE BIOT-SAVART INTEGRAL + *-38.19301215,21.73775846,-410.0783424,-69.90832690,-848.8543440, + *1.243288286,.2071721360,.05030555417,7.471332374,3.180533613, + *1.376743507,.1568504222,.02092910682,1.985148197,.3157139940, + *1.056309517,.1701395257,.1019870070,6.293740981,5.671824276, + *.1280772299,.02189060799,.01040696080,.1648265607,.04701592613, + *.01526400086,12.88384229,3.361775101,23.44173897/ + + SINT2=SINT**2 + COST2=COST**2 + SC=SINT*COST + ALPHA=SINT2/R + GAMMA=COST/R**2 + + CALL FFS(ALPHA,AL1,DAL1,F,FA,FS) + D1=F**XK1/((R/B1)**BE1+1.D0) + D2=D1*COST2 + + CALL FFS(ALPHA,AL2,DAL2,F,FA,FS) + D3=FA**XK2/R**BE2 + D4=D3*COST2 + + CALL FFS(ALPHA,AL3,DAL3,F,FA,FS) + D5=FS**XK3*ALPHA**XK4/((R/B3)**BE3+1.D0) + D6=D5*COST2 + + CALL FFS(GAMMA,0.D0,DG1,F,FA,FS) + FCC=(1.D0+((ALPHA-AL4)/DAL4)**2) + D7 =1.D0/FCC*FS + D8 =D7/FCC + D9 =D8/FCC + D10=D9/FCC + + ARG=1.D0+((ALPHA-AL5)/DAL5)**2 + D11=1.D0/ARG/(1.D0+(GAMMA/DG2)**2) + D12=D11/ARG + D13=D12/ARG + D14=D13/ARG + + D15=1.D0/(R**4+C1**2) + D16=COST2/(R**4+C2**2) + D17=COST2**2/(R**4+C3**2) +C + BT_PRC_Q=A1*D1+A2*D2+A3*D3+A4*D4+A5*D5+A6*D6+A7*D7+A8*D8+A9*D9+ + * A10*D10+A11*D11+A12*D12+A13*D13+A14*D14+A15*D15+A16*D16+A17*D17 +C + RETURN + END +c +c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ + + SUBROUTINE FFS(A,A0,DA,F,FA,FS) + IMPLICIT REAL * 8 (A - H, O - Z) + SQ1=DSQRT((A+A0)**2+DA**2) + SQ2=DSQRT((A-A0)**2+DA**2) + FA=2.D0/(SQ1+SQ2) + F=FA*A + FS=0.5D0*(SQ1+SQ2)/(SQ1*SQ2)*(1.D0-F*F) + RETURN + END +C +C|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||| +C +C------------------------------------------------------------------------- +C +C + SUBROUTINE RC_SHIELD (A,PS,X_SC,X,Y,Z,BX,BY,BZ) +C + IMPLICIT REAL * 8 (A - H, O - Z) + DIMENSION A(86) +C + FAC_SC=(X_SC+1.D0)**3 +C + CPS=DCOS(PS) + SPS=DSIN(PS) + + S3PS=2.D0*CPS +C + PST1=PS*A(85) + PST2=PS*A(86) + + ST1=DSIN(PST1) + CT1=DCOS(PST1) + ST2=DSIN(PST2) + CT2=DCOS(PST2) + + X1=X*CT1-Z*ST1 + Z1=X*ST1+Z*CT1 + X2=X*CT2-Z*ST2 + Z2=X*ST2+Z*CT2 +C + L=0 + GX=0.D0 + GY=0.D0 + GZ=0.D0 +C + DO 1 M=1,2 ! M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY) +C AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY) + DO 2 I=1,3 + P=A(72+I) + Q=A(78+I) + CYPI=DCOS(Y/P) + CYQI=DCOS(Y/Q) + SYPI=DSIN(Y/P) + SYQI=DSIN(Y/Q) +C + DO 3 K=1,3 + R=A(75+K) + S=A(81+K) + SZRK=DSIN(Z1/R) + CZSK=DCOS(Z2/S) + CZRK=DCOS(Z1/R) + SZSK=DSIN(Z2/S) + SQPR=DSQRT(1.D0/P**2+1.D0/R**2) + SQQS=DSQRT(1.D0/Q**2+1.D0/S**2) + EPR=DEXP(X1*SQPR) + EQS=DEXP(X2*SQQS) +C + DO 4 N=1,2 ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT +C AND N=2 IS FOR THE SECOND ONE + + DO 5 NN=1,2 ! NN = 1,2 FURTHER SPLITS THE COEFFICIENTS INTO 2 PARTS, +C TO TAKE INTO ACCOUNT THE SCALE FACTOR DEPENDENCE + + IF (M.EQ.1) THEN + FX=-SQPR*EPR*CYPI*SZRK *FAC_SC + FY=EPR*SYPI*SZRK/P *FAC_SC + FZ=-EPR*CYPI*CZRK/R *FAC_SC + IF (N.EQ.1) THEN + IF (NN.EQ.1) THEN + HX=FX + HY=FY + HZ=FZ + ELSE + HX=FX*X_SC + HY=FY*X_SC + HZ=FZ*X_SC + ENDIF + ELSE + IF (NN.EQ.1) THEN + HX=FX*CPS + HY=FY*CPS + HZ=FZ*CPS + ELSE + HX=FX*CPS*X_SC + HY=FY*CPS*X_SC + HZ=FZ*CPS*X_SC + ENDIF + ENDIF + + ELSE ! M.EQ.2 + FX=-SPS*SQQS*EQS*CYQI*CZSK *FAC_SC + FY=SPS/Q*EQS*SYQI*CZSK *FAC_SC + FZ=SPS/S*EQS*CYQI*SZSK *FAC_SC + IF (N.EQ.1) THEN + IF (NN.EQ.1) THEN + HX=FX + HY=FY + HZ=FZ + ELSE + HX=FX*X_SC + HY=FY*X_SC + HZ=FZ*X_SC + ENDIF + ELSE + IF (NN.EQ.1) THEN + HX=FX*S3PS + HY=FY*S3PS + HZ=FZ*S3PS + ELSE + HX=FX*S3PS*X_SC + HY=FY*S3PS*X_SC + HZ=FZ*S3PS*X_SC + ENDIF + ENDIF + ENDIF + L=L+1 + + IF (M.EQ.1) THEN + HXR=HX*CT1+HZ*ST1 + HZR=-HX*ST1+HZ*CT1 + ELSE + HXR=HX*CT2+HZ*ST2 + HZR=-HX*ST2+HZ*CT2 + ENDIF + + GX=GX+HXR*A(L) + GY=GY+HY *A(L) + 5 GZ=GZ+HZR*A(L) + + 4 CONTINUE + 3 CONTINUE + 2 CONTINUE + 1 CONTINUE + + BX=GX + BY=GY + BZ=GZ + + RETURN + END +C +c=========================================================================== +c + SUBROUTINE DIPOLE (PS,X,Y,Z,BX,BY,BZ) +C +C A DOUBLE PRECISION ROUTINE +C +C CALCULATES GSM COMPONENTS OF A GEODIPOLE FIELD WITH THE DIPOLE MOMENT +C CORRESPONDING TO THE EPOCH OF 2000. +C +C----INPUT PARAMETERS: +C PS - GEODIPOLE TILT ANGLE IN RADIANS, +C X,Y,Z - GSM COORDINATES IN RE (1 RE = 6371.2 km) +C +C----OUTPUT PARAMETERS: +C BX,BY,BZ - FIELD COMPONENTS IN GSM SYSTEM, IN NANOTESLA. +C + IMPLICIT REAL*8 (A-H,O-Z) + SPS=DSIN(PS) + CPS=DCOS(PS) + P=X**2 + U=Z**2 + V=3.D0*Z*X + T=Y**2 + Q=30115.D0/DSQRT(P+T+U)**5 + BX=Q*((T+U-2.D0*P)*SPS-V*CPS) + BY=-3.D0*Y*Q*(X*SPS+Z*CPS) + BZ=Q*((P+T-2.D0*U)*CPS-V*SPS) + RETURN + END + + + +C +C((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((( diff --git a/Tsyganenko-Models/TS04.html b/Tsyganenko-Models/TS04.html new file mode 100644 index 0000000..32dea08 --- /dev/null +++ b/Tsyganenko-Models/TS04.html @@ -0,0 +1,2535 @@ +

+c====================================================================================
+c
+c
+      SUBROUTINE T04_s (IOPT,PARMOD,PS,X,Y,Z,BX,BY,BZ)
+c
+c     ASSEMBLED:  MARCH 25, 2004; UPDATED:  AUGUST 2 & 31, DECEMBER 27, 2004.
+c     A BUG ELIMINATED MARCH 14, 2005 (might cause compilation problems with
+c         some Fortran compilers)
+C
+c--------------------------------------------------------------------
+C   A DATA-BASED MODEL OF THE EXTERNAL (I.E., WITHOUT EARTH'S CONTRIBUTION) PART OF THE
+C   MAGNETOSPHERIC MAGNETIC FIELD, CALIBRATED BY
+C    (1) SOLAR WIND PRESSURE PDYN (NANOPASCALS),
+C    (2) DST (NANOTESLA),
+C    (3) BYIMF,
+C    (4) BZIMF (NANOTESLA)
+C    (5-10)   INDICES W1 - W6, CALCULATED AS TIME INTEGRALS FROM THE BEGINNING OF A STORM
+c               SEE THE REFERENCE (3) BELOW, FOR A DETAILED DEFINITION OF THOSE VARIABLES
+C
+c   THE ABOVE 10 INPUT PARAMETERS SHOULD BE PLACED IN THE ELEMENTS
+c   OF THE ARRAY PARMOD(10).
+C
+C   THE REST OF THE INPUT VARIABLES ARE: THE GEODIPOLE TILT ANGLE PS (RADIANS),
+C        X,Y,Z -  GSM POSITION (RE)
+C
+c   IOPT IS A DUMMY INPUT PARAMETER, INCLUDED TO MAKE THIS SUBROUTINE
+C   COMPATIBLE WITH THE TRACING SOFTWARE PACKAGE (GEOPACK). IN THIS MODEL,
+C   THE PARAMETER IOPT DOES NOT AFFECT THE OUTPUT FIELD.
+c
+C*******************************************************************************************
+c** ATTENTION:  THE MODEL IS BASED ON DATA TAKEN SUNWARD FROM X=-15Re, AND HENCE BECOMES   *
+C**              INVALID AT LARGER TAILWARD DISTANCES !!!                                  *
+C*******************************************************************************************
+C
+c   OUTPUT:  GSM COMPONENTS OF THE EXTERNAL MAGNETIC FIELD (BX,BY,BZ, nanotesla)
+C            COMPUTED AS A SUM OF CONTRIBUTIONS FROM PRINCIPAL FIELD SOURCES
+C
+c  (C) Copr. 2004, Nikolai A. Tsyganenko, USRA/Code 612.3, NASA GSFC
+c      Greenbelt, MD 20771, USA
+c
+C                            REFERENCES:
+C
+C  (1)   N. A. Tsyganenko, A new data-based model of the near magnetosphere magnetic field:
+c       1. Mathematical structure.
+c       2. Parameterization and fitting to observations.  JGR v. 107(A8), 1176/1179, doi:10.1029/2001JA000219/220, 2002.
+c
+c  (2)  N. A. Tsyganenko, H. J. Singer, J. C. Kasper, Storm-time distortion of the
+c           inner magnetosphere: How severe can it get ?  JGR v. 108(A5), 1209, doi:10.1029/2002JA009808, 2003.
+
+c   (3)  N. A. Tsyganenko and M. I. Sitnov, Modeling the dynamics of the inner magnetosphere during
+c         strong geomagnetic storms, J. Geophys. Res., v. 110 (A3), A03208, doi: 10.1029/2004JA010798, 2005.
+
+
+c----------------------------------------------------------------------
+c
+      REAL PARMOD(10),PS,X,Y,Z,BX,BY,BZ
+      REAL*8 A(69),PDYN,DST_AST,BXIMF,BYIMF,BZIMF,W1,W2,W3,W4,W5,W6,
+     *  PSS,XX,YY,ZZ,BXCF,BYCF,BZCF,BXT1,BYT1,BZT1,BXT2,BYT2,BZT2,
+     *  BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,BZPRC, BXR11,BYR11,BZR11,
+     *  BXR12,BYR12,BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,BZR22,HXIMF,
+     *  HYIMF,HZIMF,BBX,BBY,BBZ
+C
+      DATA A/1.00000,5.19884,0.923524,8.68111,0.00000,-6.44922,11.3109,
+     * -3.84555,0.00000,0.558081,0.937044,0.00000,0.772433,0.687241,
+     * 0.00000,0.320369,1.22531,-0.432246E-01,-0.382436,0.457468,
+     * 0.741917,0.227194,0.154269,5.75196,22.3113,10.3526,64.3312,
+     * 1.01977,-0.200859E-01,0.971643,0.295525E-01,1.01032,0.215561,
+     * 1.50059,0.730898E-01,1.93625,1.74545,1.29533,0.714744,0.391687,
+     * 3.31283,75.0127,6.36283,4.43561,0.387801,0.699661,0.305352E-01,
+     * 0.581002,1.14671,0.876060,0.386060,0.801831,0.874315,0.463634,
+     * 0.175077,0.673053,0.388341,2.32074,1.32373,0.419800,1.24968,
+     * 1.28903,.409286,1.57622,.690036,1.28836,2.4054,.528557,.564247/
+
+      DATA IOPGEN,IOPTT,IOPB,IOPR/0,0,0,0/
+C
+      PDYN=PARMOD(1)
+      DST_AST=PARMOD(2)*0.8-13.*SQRT(PDYN)
+      BYIMF=PARMOD(3)
+      BZIMF=PARMOD(4)
+C
+      W1=PARMOD (5)
+      W2=PARMOD (6)
+      W3=PARMOD (7)
+      W4=PARMOD (8)
+      W5=PARMOD (9)
+      W6=PARMOD(10)
+
+      PSS=PS
+      XX=X
+      YY=Y
+      ZZ=Z
+C
+      CALL EXTERN (IOPGEN,IOPTT,IOPB,IOPR,A,69,PDYN,DST_AST,BXIMF,BYIMF,
+     + BZIMF,W1,W2,W3,W4,W5,W6,PSS,XX,YY,ZZ,BXCF,BYCF,BZCF,BXT1,BYT1,
+     + BZT1,BXT2,BYT2,BZT2,BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,BZPRC, BXR11,
+     + BYR11,BZR11,BXR12,BYR12,BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,
+     + BZR22,HXIMF,HYIMF,HZIMF,BBX,BBY,BBZ)
+C
+      BX=BBX
+      BY=BBY
+      BZ=BBZ
+C
+      RETURN
+      END
+
+c%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+c
+      SUBROUTINE EXTERN (IOPGEN,IOPT,IOPB,IOPR,A,NTOT,
+     *  PDYN,DST,BXIMF,BYIMF,BZIMF,W1,W2,W3,W4,W5,W6,PS,X,Y,Z,
+     *  BXCF,BYCF,BZCF,BXT1,BYT1,BZT1,BXT2,BYT2,BZT2,
+     *  BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,BZPRC, BXR11,BYR11,BZR11,
+     *  BXR12,BYR12,BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,BZR22,HXIMF,
+     *  HYIMF,HZIMF,BX,BY,BZ)
+C
+C   IOPGEN - GENERAL OPTION FLAG:  IOPGEN=0 - CALCULATE TOTAL FIELD
+C                                  IOPGEN=1 - DIPOLE SHIELDING ONLY
+C                                  IOPGEN=2 - TAIL FIELD ONLY
+C                                  IOPGEN=3 - BIRKELAND FIELD ONLY
+C                                  IOPGEN=4 - RING CURRENT FIELD ONLY
+C                                  IOPGEN=5 - INTERCONNECTION FIELD ONLY
+C
+C   IOPT -  TAIL FIELD FLAG:       IOPT=0  -  BOTH MODES
+C                                  IOPT=1  -  MODE 1 ONLY
+C                                  IOPT=2  -  MODE 2 ONLY
+C
+C   IOPB -  BIRKELAND FIELD FLAG:  IOPB=0  -  ALL 4 TERMS
+C                                  IOPB=1  -  REGION 1, MODES 1 AND 2
+C                                  IOPB=2  -  REGION 2, MODES 1 AND 2
+C
+C   IOPR -  RING CURRENT FLAG:     IOPR=0  -  BOTH SRC AND PRC
+C                                  IOPR=1  -  SRC ONLY
+C                                  IOPR=2  -  PRC ONLY
+C
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+C
+      DIMENSION A(NTOT)
+C
+      COMMON /TAIL/ DXSHIFT1,DXSHIFT2,D,DELTADY  ! THE COMMON BLOCKS FORWARD NONLINEAR PARAMETERS
+      COMMON /BIRKPAR/ XKAPPA1,XKAPPA2
+      COMMON /RCPAR/ SC_SY,SC_AS,PHI
+      COMMON /G/ G
+      COMMON /RH0/ RH0
+C
+C
+      DATA A0_A,A0_S0,A0_X0 /34.586D0,1.1960D0,3.4397D0/   !   SHUE ET AL. PARAMETERS
+      DATA DSIG /0.005D0/, RH0,RH2 /7.5D0,-5.2D0/
+c
+      XAPPA=(PDYN/2.)**A(23)   !  OVERALL SCALING PARAMETER
+      RH0=7.5                  !  TAIL HINGING DISTANCE
+c
+      G=  35.0                 !  TAIL WARPING PARAMETER
+
+      XAPPA3=XAPPA**3
+
+      XX=X*XAPPA
+      YY=Y*XAPPA
+      ZZ=Z*XAPPA
+C
+      SPS=DSIN(PS)
+c
+      X0=A0_X0/XAPPA
+      AM=A0_A/XAPPA
+      S0=A0_S0
+c
+C  CALCULATE "IMF" COMPONENTS OUTSIDE THE MAGNETOPAUSE LAYER (HENCE BEGIN WITH "O")
+C  THEY ARE NEEDED ONLY IF THE POINT (X,Y,Z) IS WITHIN THE TRANSITION MAGNETOPAUSE LAYER
+C  OR OUTSIDE THE MAGNETOSPHERE:
+C
+      FACTIMF=A(20)
+c
+      OIMFX=0.D0
+      OIMFY=BYIMF*FACTIMF
+      OIMFZ=BZIMF*FACTIMF
+c
+      R=DSQRT(X**2+Y**2+Z**2)
+      XSS=X
+      ZSS=Z
+
+  1   XSOLD=XSS      !   BEGIN ITERATIVE SEARCH OF UNWARPED COORDS (TO FIND SIGMA)
+      ZSOLD=ZSS
+
+      RH=RH0+RH2*(ZSS/R)**2
+      SINPSAS=SPS/(1.D0+(R/RH)**3)**0.33333333D0
+      COSPSAS=DSQRT(1.D0-SINPSAS**2)
+      ZSS=X*SINPSAS+Z*COSPSAS
+      XSS=X*COSPSAS-Z*SINPSAS
+      DD=DABS(XSS-XSOLD)+DABS(ZSS-ZSOLD)
+      IF (DD.GT.1.D-6) GOTO 1
+C                                END OF ITERATIVE SEARCH
+      RHO2=Y**2+ZSS**2
+      ASQ=AM**2
+      XMXM=AM+XSS-X0
+      IF (XMXM.LT.0.) XMXM=0. ! THE BOUNDARY IS A CYLINDER TAILWARD OF X=X0-AM
+      AXX0=XMXM**2
+      ARO=ASQ+RHO2
+      SIGMA=DSQRT((ARO+AXX0+SQRT((ARO+AXX0)**2-4.*ASQ*AXX0))/(2.*ASQ))
+C
+C   NOW, THERE ARE THREE POSSIBLE CASES:
+C    (1) INSIDE THE MAGNETOSPHERE   (SIGMA
+C    (2) IN THE BOUNDARY LAYER
+C    (3) OUTSIDE THE MAGNETOSPHERE AND B.LAYER
+C       FIRST OF ALL, CONSIDER THE CASES (1) AND (2):
+C
+C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+      IF (SIGMA.LT.S0+DSIG) THEN  !  CASES (1) OR (2); CALCULATE THE MODEL FIELD
+C                                   (WITH THE POTENTIAL "PENETRATED" INTERCONNECTION FIELD):
+C+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+C
+      IF (IOPGEN.LE.1) THEN
+         CALL SHLCAR3X3(XX,YY,ZZ,PS,CFX,CFY,CFZ)         !  DIPOLE SHIELDING FIELD
+         BXCF=CFX*XAPPA3
+         BYCF=CFY*XAPPA3
+         BZCF=CFZ*XAPPA3
+      ELSE
+         BXCF=0.D0
+         BYCF=0.D0
+         BZCF=0.D0
+      ENDIF                                              !  DONE
+
+      IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.2) THEN
+          DSTT=-20.
+          IF (DST.LT.DSTT) DSTT=DST
+          ZNAM=DABS(DSTT)**0.37
+         DXSHIFT1=A(24)-A(25)/ZNAM
+         DXSHIFT2=A(26)-A(27)/ZNAM
+         D=A(36)*DEXP(-W1/A(37))  +A(69)
+         DELTADY=4.7
+
+         CALL DEFORMED (IOPT,PS,XX,YY,ZZ,                !  TAIL FIELD (THREE MODES)
+     *    BXT1,BYT1,BZT1,BXT2,BYT2,BZT2)
+      ELSE
+         BXT1=0.D0
+         BYT1=0.D0
+         BZT1=0.D0
+         BXT2=0.D0
+         BYT2=0.D0
+         BZT2=0.D0
+      ENDIF
+
+      IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.3) THEN
+
+          ZNAM=DABS(DST)
+          IF (DST.GE.-20.D0) ZNAM=20.D0
+          XKAPPA1=A(32)*(ZNAM/20.D0)**A(33)
+          XKAPPA2=A(34)*(ZNAM/20.D0)**A(35)
+
+         CALL BIRK_TOT (IOPB,PS,XX,YY,ZZ,BXR11,BYR11,BZR11,BXR12,BYR12,
+     *   BZR12,BXR21,BYR21,BZR21,BXR22,BYR22,BZR22)    !   BIRKELAND FIELD (TWO MODES FOR R1 AND TWO MODES FOR R2)
+      ELSE
+         BXR11=0.D0
+         BYR11=0.D0
+         BZR11=0.D0
+         BXR21=0.D0
+         BYR21=0.D0
+         BZR21=0.D0
+      ENDIF
+
+      IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.4) THEN
+         PHI=A(38)
+
+          ZNAM=DABS(DST)
+          IF (DST.GE.-20.D0) ZNAM=20.D0
+          SC_SY=A(28)*(20.D0/ZNAM)**A(29) *XAPPA    !
+          SC_AS=A(30)*(20.D0/ZNAM)**A(31) *XAPPA    !  MULTIPLICATION  BY XAPPA IS MADE IN ORDER TO MAKE THE SRC AND PRC
+                                                    !     SCALING COMPLETELY INDEPENDENT OF THE GENERAL SCALING DUE TO THE
+C                                                         MAGNETOPAUSE COMPRESSION/EXPANSION                             !
+C
+         CALL FULL_RC(IOPR,PS,XX,YY,ZZ,BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,
+     *                                        BZPRC)  !  SHIELDED RING CURRENT (SRC AND PRC)
+      ELSE
+         BXSRC=0.D0
+         BYSRC=0.D0
+         BZSRC=0.D0
+         BXPRC=0.D0
+         BYPRC=0.D0
+         BZPRC=0.D0
+      ENDIF
+C
+      IF (IOPGEN.EQ.0.OR.IOPGEN.EQ.5) THEN
+         HXIMF=0.D0
+         HYIMF=BYIMF
+         HZIMF=BZIMF   ! THESE ARE COMPONENTS OF THE PENETRATED FIELD PER UNIT OF THE PENETRATION COEFFICIENT.
+C                             IN OTHER WORDS, THESE ARE DERIVATIVES OF THE PENETRATION FIELD COMPONENTS WITH RESPECT
+C                             TO THE PENETRATION COEFFICIENT.   WE ASSUME THAT ONLY TRANSVERSE COMPONENT OF THE
+C                             FIELD PENETRATES INSIDE.
+       ELSE
+         HXIMF=0.D0
+         HYIMF=0.D0
+         HZIMF=0.D0
+       ENDIF
+C
+C-----------------------------------------------------------
+C
+C    NOW, ADD UP ALL THE COMPONENTS:
+c
+      DLP1=(PDYN/2.D0)**A(21)
+      DLP2=(PDYN/2.D0)**A(22)
+
+      TAMP1=A(2)+A(3)*DLP1+A(4)*A(39)*W1/DSQRT(W1**2+A(39)**2)+A(5)*DST
+      TAMP2=A(6)+A(7)*DLP2+A(8)*A(40)*W2/DSQRT(W2**2+A(40)**2)+A(9)*DST
+      A_SRC=A(10)+A(11)*A(41)*W3/DSQRT(W3**2+A(41)**2)
+     *  +A(12)*DST
+      A_PRC=A(13)+A(14)*A(42)*W4/DSQRT(W4**2+A(42)**2)
+     *  +A(15)*DST
+      A_R11=A(16)+A(17)*A(43)*W5/DSQRT(W5**2+A(43)**2)
+      A_R21=A(18)+A(19)*A(44)*W6/DSQRT(W6**2+A(44)**2)
+
+      BBX=A(1)*BXCF+TAMP1*BXT1+TAMP2*BXT2+A_SRC*BXSRC+A_PRC*BXPRC
+     * +A_R11*BXR11+A_R21*BXR21+A(20)*HXIMF
+
+      BBY=A(1)*BYCF+TAMP1*BYT1+TAMP2*BYT2+A_SRC*BYSRC+A_PRC*BYPRC
+     * +A_R11*BYR11+A_R21*BYR21+A(20)*HYIMF
+
+      BBZ=A(1)*BZCF+TAMP1*BZT1+TAMP2*BZT2+A_SRC*BZSRC+A_PRC*BZPRC
+     * +A_R11*BZR11+A_R21*BZR21+A(20)*HZIMF
+C
+C   AND WE HAVE THE TOTAL EXTERNAL FIELD.
+C
+C
+C  NOW, LET US CHECK WHETHER WE HAVE THE CASE (1). IF YES - ALL DONE:
+C
+      IF (SIGMA.LT.S0-DSIG) THEN    !  (X,Y,Z) IS INSIDE THE MAGNETOSPHERE
+
+       BX=BBX
+       BY=BBY
+       BZ=BBZ
+                     ELSE           !  THIS IS THE MOST COMPLEX CASE: WE ARE INSIDE
+C                                             THE INTERPOLATION REGION
+       FINT=0.5*(1.-(SIGMA-S0)/DSIG)
+       FEXT=0.5*(1.+(SIGMA-S0)/DSIG)
+C
+       CALL DIPOLE (PS,X,Y,Z,QX,QY,QZ)
+       BX=(BBX+QX)*FINT+OIMFX*FEXT -QX
+       BY=(BBY+QY)*FINT+OIMFY*FEXT -QY
+       BZ=(BBZ+QZ)*FINT+OIMFZ*FEXT -QZ
+c
+        ENDIF  !   THE CASES (1) AND (2) ARE EXHAUSTED; THE ONLY REMAINING
+C                      POSSIBILITY IS NOW THE CASE (3):
+C++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+        ELSE
+                CALL DIPOLE (PS,X,Y,Z,QX,QY,QZ)
+                BX=OIMFX-QX
+                BY=OIMFY-QY
+                BZ=OIMFZ-QZ
+        ENDIF
+C
+      END
+c
+
+C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
+C
+         SUBROUTINE  SHLCAR3X3(X,Y,Z,PS,BX,BY,BZ)
+C
+C   THIS S/R RETURNS THE SHIELDING FIELD FOR THE EARTH'S DIPOLE,
+C   REPRESENTED BY  2x3x3=18 "CARTESIAN" HARMONICS, tilted with respect
+C   to the z=0 plane
+C
+C - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+C  The 36 coefficients enter in pairs in the amplitudes of the "cartesian"
+c    harmonics (A(1)-A(36).
+c  The 14 nonlinear parameters (A(37)-A(50) are the scales Pi,Ri,Qi,and Si
+C   entering the arguments of exponents, sines, and cosines in each of the
+C   18 "Cartesian" harmonics  PLUS TWO TILT ANGLES FOR THE CARTESIAN HARMONICS
+C       (ONE FOR THE PSI=0 MODE AND ANOTHER FOR THE PSI=90 MODE)
+C - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+C
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+C
+      DIMENSION A(50)
+      DATA A/-901.2327248,895.8011176,817.6208321,-845.5880889,
+     *-83.73539535,86.58542841,336.8781402,-329.3619944,-311.2947120,
+     *308.6011161,31.94469304,-31.30824526,125.8739681,-372.3384278,
+     *-235.4720434,286.7594095,21.86305585,-27.42344605,-150.4874688,
+     *2.669338538,1.395023949,-.5540427503,-56.85224007,3.681827033,
+     *-43.48705106,5.103131905,1.073551279,-.6673083508,12.21404266,
+     *4.177465543,5.799964188,-.3977802319,-1.044652977,.5703560010,
+     *3.536082962,-3.222069852,9.620648151,6.082014949,27.75216226,
+     *12.44199571,5.122226936,6.982039615,20.12149582,6.150973118,
+     *4.663639687,15.73319647,2.303504968,5.840511214,.8385953499E-01,
+     *.3477844929/
+C
+         P1=A(37)
+         P2=A(38)
+         P3=A(39)
+         R1=A(40)
+         R2=A(41)
+         R3=A(42)
+         Q1=A(43)
+         Q2=A(44)
+         Q3=A(45)
+         S1=A(46)
+         S2=A(47)
+         S3=A(48)
+
+         T1  =A(49)
+         T2  =A(50)
+C
+         CPS=DCOS(PS)
+         SPS=DSIN(PS)
+         S2PS=2.D0*CPS
+
+C
+           ST1=DSIN(PS*T1)
+           CT1=DCOS(PS*T1)
+           ST2=DSIN(PS*T2)
+           CT2=DCOS(PS*T2)
+
+            X1=X*CT1-Z*ST1
+            Z1=X*ST1+Z*CT1
+            X2=X*CT2-Z*ST2
+            Z2=X*ST2+Z*CT2
+C
+C
+c  MAKE THE TERMS IN THE 1ST SUM ("PERPENDICULAR" SYMMETRY):
+C
+C       I=1
+C
+        SQPR= DSQRT(1.D0/P1**2+1.D0/R1**2)
+        CYP = DCOS(Y/P1)
+        SYP = DSIN(Y/P1)
+        CZR = DCOS(Z1/R1)
+        SZR = DSIN(Z1/R1)
+        EXPR= DEXP(SQPR*X1)
+        FX1 =-SQPR*EXPR*CYP*SZR
+        HY1 = EXPR/P1*SYP*SZR
+        FZ1 =-EXPR*CYP/R1*CZR
+        HX1 = FX1*CT1+FZ1*ST1
+        HZ1 =-FX1*ST1+FZ1*CT1
+
+        SQPR= DSQRT(1.D0/P1**2+1.D0/R2**2)
+        CYP = DCOS(Y/P1)
+        SYP = DSIN(Y/P1)
+        CZR = DCOS(Z1/R2)
+        SZR = DSIN(Z1/R2)
+        EXPR= DEXP(SQPR*X1)
+        FX2 =-SQPR*EXPR*CYP*SZR
+        HY2 = EXPR/P1*SYP*SZR
+        FZ2 =-EXPR*CYP/R2*CZR
+        HX2 = FX2*CT1+FZ2*ST1
+        HZ2 =-FX2*ST1+FZ2*CT1
+
+        SQPR= DSQRT(1.D0/P1**2+1.D0/R3**2)
+        CYP = DCOS(Y/P1)
+        SYP = DSIN(Y/P1)
+        CZR = DCOS(Z1/R3)
+        SZR = DSIN(Z1/R3)
+        EXPR= DEXP(SQPR*X1)
+        FX3 =-EXPR*CYP*(SQPR*Z1*CZR+SZR/R3*(X1+1.D0/SQPR))
+        HY3 = EXPR/P1*SYP*(Z1*CZR+X1/R3*SZR/SQPR)
+        FZ3 =-EXPR*CYP*(CZR*(1.D0+X1/R3**2/SQPR)-Z1/R3*SZR)
+        HX3 = FX3*CT1+FZ3*ST1
+        HZ3 =-FX3*ST1+FZ3*CT1
+C
+C       I=2:
+C
+        SQPR= DSQRT(1.D0/P2**2+1.D0/R1**2)
+        CYP = DCOS(Y/P2)
+        SYP = DSIN(Y/P2)
+        CZR = DCOS(Z1/R1)
+        SZR = DSIN(Z1/R1)
+        EXPR= DEXP(SQPR*X1)
+        FX4 =-SQPR*EXPR*CYP*SZR
+        HY4 = EXPR/P2*SYP*SZR
+        FZ4 =-EXPR*CYP/R1*CZR
+        HX4 = FX4*CT1+FZ4*ST1
+        HZ4 =-FX4*ST1+FZ4*CT1
+
+        SQPR= DSQRT(1.D0/P2**2+1.D0/R2**2)
+        CYP = DCOS(Y/P2)
+        SYP = DSIN(Y/P2)
+        CZR = DCOS(Z1/R2)
+        SZR = DSIN(Z1/R2)
+        EXPR= DEXP(SQPR*X1)
+        FX5 =-SQPR*EXPR*CYP*SZR
+        HY5 = EXPR/P2*SYP*SZR
+        FZ5 =-EXPR*CYP/R2*CZR
+        HX5 = FX5*CT1+FZ5*ST1
+        HZ5 =-FX5*ST1+FZ5*CT1
+
+        SQPR= DSQRT(1.D0/P2**2+1.D0/R3**2)
+        CYP = DCOS(Y/P2)
+        SYP = DSIN(Y/P2)
+        CZR = DCOS(Z1/R3)
+        SZR = DSIN(Z1/R3)
+        EXPR= DEXP(SQPR*X1)
+        FX6 =-EXPR*CYP*(SQPR*Z1*CZR+SZR/R3*(X1+1.D0/SQPR))
+        HY6 = EXPR/P2*SYP*(Z1*CZR+X1/R3*SZR/SQPR)
+        FZ6 =-EXPR*CYP*(CZR*(1.D0+X1/R3**2/SQPR)-Z1/R3*SZR)
+        HX6 = FX6*CT1+FZ6*ST1
+        HZ6 =-FX6*ST1+FZ6*CT1
+C
+C       I=3:
+C
+        SQPR= DSQRT(1.D0/P3**2+1.D0/R1**2)
+        CYP = DCOS(Y/P3)
+        SYP = DSIN(Y/P3)
+        CZR = DCOS(Z1/R1)
+        SZR = DSIN(Z1/R1)
+        EXPR= DEXP(SQPR*X1)
+        FX7 =-SQPR*EXPR*CYP*SZR
+        HY7 = EXPR/P3*SYP*SZR
+        FZ7 =-EXPR*CYP/R1*CZR
+        HX7 = FX7*CT1+FZ7*ST1
+        HZ7 =-FX7*ST1+FZ7*CT1
+
+        SQPR= DSQRT(1.D0/P3**2+1.D0/R2**2)
+        CYP = DCOS(Y/P3)
+        SYP = DSIN(Y/P3)
+        CZR = DCOS(Z1/R2)
+        SZR = DSIN(Z1/R2)
+        EXPR= DEXP(SQPR*X1)
+        FX8 =-SQPR*EXPR*CYP*SZR
+        HY8 = EXPR/P3*SYP*SZR
+        FZ8 =-EXPR*CYP/R2*CZR
+        HX8 = FX8*CT1+FZ8*ST1
+        HZ8 =-FX8*ST1+FZ8*CT1
+
+        SQPR= DSQRT(1.D0/P3**2+1.D0/R3**2)
+        CYP = DCOS(Y/P3)
+        SYP = DSIN(Y/P3)
+        CZR = DCOS(Z1/R3)
+        SZR = DSIN(Z1/R3)
+        EXPR= DEXP(SQPR*X1)
+        FX9 =-EXPR*CYP*(SQPR*Z1*CZR+SZR/R3*(X1+1.D0/SQPR))
+        HY9 = EXPR/P3*SYP*(Z1*CZR+X1/R3*SZR/SQPR)
+        FZ9 =-EXPR*CYP*(CZR*(1.D0+X1/R3**2/SQPR)-Z1/R3*SZR)
+        HX9 = FX9*CT1+FZ9*ST1
+        HZ9 =-FX9*ST1+FZ9*CT1
+
+
+       A1=A(1)+A(2)*CPS
+       A2=A(3)+A(4)*CPS
+       A3=A(5)+A(6)*CPS
+       A4=A(7)+A(8)*CPS
+       A5=A(9)+A(10)*CPS
+       A6=A(11)+A(12)*CPS
+       A7=A(13)+A(14)*CPS
+       A8=A(15)+A(16)*CPS
+       A9=A(17)+A(18)*CPS
+       BX=A1*HX1+A2*HX2+A3*HX3+A4*HX4+A5*HX5+A6*HX6+A7*HX7+A8*HX8+A9*HX9
+       BY=A1*HY1+A2*HY2+A3*HY3+A4*HY4+A5*HY5+A6*HY6+A7*HY7+A8*HY8+A9*HY9
+       BZ=A1*HZ1+A2*HZ2+A3*HZ3+A4*HZ4+A5*HZ5+A6*HZ6+A7*HZ7+A8*HZ8+A9*HZ9
+
+
+c  MAKE THE TERMS IN THE 2ND SUM ("PARALLEL" SYMMETRY):
+C
+C       I=1
+C
+       SQQS= DSQRT(1.D0/Q1**2+1.D0/S1**2)
+       CYQ = DCOS(Y/Q1)
+       SYQ = DSIN(Y/Q1)
+       CZS = DCOS(Z2/S1)
+       SZS = DSIN(Z2/S1)
+       EXQS= DEXP(SQQS*X2)
+       FX1 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY1 = EXQS/Q1*SYQ*CZS   *SPS
+       FZ1 = EXQS*CYQ/S1*SZS   *SPS
+       HX1 = FX1*CT2+FZ1*ST2
+       HZ1 =-FX1*ST2+FZ1*CT2
+
+       SQQS= DSQRT(1.D0/Q1**2+1.D0/S2**2)
+       CYQ = DCOS(Y/Q1)
+       SYQ = DSIN(Y/Q1)
+       CZS = DCOS(Z2/S2)
+       SZS = DSIN(Z2/S2)
+       EXQS= DEXP(SQQS*X2)
+       FX2 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY2 = EXQS/Q1*SYQ*CZS   *SPS
+       FZ2 = EXQS*CYQ/S2*SZS   *SPS
+       HX2 = FX2*CT2+FZ2*ST2
+       HZ2 =-FX2*ST2+FZ2*CT2
+
+       SQQS= DSQRT(1.D0/Q1**2+1.D0/S3**2)
+       CYQ = DCOS(Y/Q1)
+       SYQ = DSIN(Y/Q1)
+       CZS = DCOS(Z2/S3)
+       SZS = DSIN(Z2/S3)
+       EXQS= DEXP(SQQS*X2)
+       FX3 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY3 = EXQS/Q1*SYQ*CZS   *SPS
+       FZ3 = EXQS*CYQ/S3*SZS   *SPS
+       HX3 = FX3*CT2+FZ3*ST2
+       HZ3 =-FX3*ST2+FZ3*CT2
+C
+C       I=2
+C
+       SQQS= DSQRT(1.D0/Q2**2+1.D0/S1**2)
+       CYQ = DCOS(Y/Q2)
+       SYQ = DSIN(Y/Q2)
+       CZS = DCOS(Z2/S1)
+       SZS = DSIN(Z2/S1)
+       EXQS= DEXP(SQQS*X2)
+       FX4 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY4 = EXQS/Q2*SYQ*CZS   *SPS
+       FZ4 = EXQS*CYQ/S1*SZS   *SPS
+       HX4 = FX4*CT2+FZ4*ST2
+       HZ4 =-FX4*ST2+FZ4*CT2
+
+       SQQS= DSQRT(1.D0/Q2**2+1.D0/S2**2)
+       CYQ = DCOS(Y/Q2)
+       SYQ = DSIN(Y/Q2)
+       CZS = DCOS(Z2/S2)
+       SZS = DSIN(Z2/S2)
+       EXQS= DEXP(SQQS*X2)
+       FX5 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY5 = EXQS/Q2*SYQ*CZS   *SPS
+       FZ5 = EXQS*CYQ/S2*SZS   *SPS
+       HX5 = FX5*CT2+FZ5*ST2
+       HZ5 =-FX5*ST2+FZ5*CT2
+
+       SQQS= DSQRT(1.D0/Q2**2+1.D0/S3**2)
+       CYQ = DCOS(Y/Q2)
+       SYQ = DSIN(Y/Q2)
+       CZS = DCOS(Z2/S3)
+       SZS = DSIN(Z2/S3)
+       EXQS= DEXP(SQQS*X2)
+       FX6 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY6 = EXQS/Q2*SYQ*CZS   *SPS
+       FZ6 = EXQS*CYQ/S3*SZS   *SPS
+       HX6 = FX6*CT2+FZ6*ST2
+       HZ6 =-FX6*ST2+FZ6*CT2
+C
+C       I=3
+C
+       SQQS= DSQRT(1.D0/Q3**2+1.D0/S1**2)
+       CYQ = DCOS(Y/Q3)
+       SYQ = DSIN(Y/Q3)
+       CZS = DCOS(Z2/S1)
+       SZS = DSIN(Z2/S1)
+       EXQS= DEXP(SQQS*X2)
+       FX7 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY7 = EXQS/Q3*SYQ*CZS   *SPS
+       FZ7 = EXQS*CYQ/S1*SZS   *SPS
+       HX7 = FX7*CT2+FZ7*ST2
+       HZ7 =-FX7*ST2+FZ7*CT2
+
+       SQQS= DSQRT(1.D0/Q3**2+1.D0/S2**2)
+       CYQ = DCOS(Y/Q3)
+       SYQ = DSIN(Y/Q3)
+       CZS = DCOS(Z2/S2)
+       SZS = DSIN(Z2/S2)
+       EXQS= DEXP(SQQS*X2)
+       FX8 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY8 = EXQS/Q3*SYQ*CZS   *SPS
+       FZ8 = EXQS*CYQ/S2*SZS   *SPS
+       HX8 = FX8*CT2+FZ8*ST2
+       HZ8 =-FX8*ST2+FZ8*CT2
+
+       SQQS= DSQRT(1.D0/Q3**2+1.D0/S3**2)
+       CYQ = DCOS(Y/Q3)
+       SYQ = DSIN(Y/Q3)
+       CZS = DCOS(Z2/S3)
+       SZS = DSIN(Z2/S3)
+       EXQS= DEXP(SQQS*X2)
+       FX9 =-SQQS*EXQS*CYQ*CZS *SPS
+       HY9 = EXQS/Q3*SYQ*CZS   *SPS
+       FZ9 = EXQS*CYQ/S3*SZS   *SPS
+       HX9 = FX9*CT2+FZ9*ST2
+       HZ9 =-FX9*ST2+FZ9*CT2
+
+       A1=A(19)+A(20)*S2PS
+       A2=A(21)+A(22)*S2PS
+       A3=A(23)+A(24)*S2PS
+       A4=A(25)+A(26)*S2PS
+       A5=A(27)+A(28)*S2PS
+       A6=A(29)+A(30)*S2PS
+       A7=A(31)+A(32)*S2PS
+       A8=A(33)+A(34)*S2PS
+       A9=A(35)+A(36)*S2PS
+
+       BX=BX+A1*HX1+A2*HX2+A3*HX3+A4*HX4+A5*HX5+A6*HX6+A7*HX7+A8*HX8
+     *   +A9*HX9
+       BY=BY+A1*HY1+A2*HY2+A3*HY3+A4*HY4+A5*HY5+A6*HY6+A7*HY7+A8*HY8
+     *   +A9*HY9
+       BZ=BZ+A1*HZ1+A2*HZ2+A3*HZ3+A4*HZ4+A5*HZ5+A6*HZ6+A7*HZ7+A8*HZ8
+     *   +A9*HZ9
+C
+       RETURN
+       END
+c
+c############################################################################
+c
+C
+      SUBROUTINE DEFORMED (IOPT,PS,X,Y,Z,BX1,BY1,BZ1,BX2,BY2,BZ2)
+C
+C   IOPT - TAIL FIELD MODE FLAG:   IOPT=0 - THE TWO TAIL MODES ARE ADDED UP
+C                                  IOPT=1 - MODE 1 ONLY
+C                                  IOPT=2 - MODE 2 ONLY
+C
+C   CALCULATES GSM COMPONENTS OF TWO UNIT-AMPLITUDE TAIL FIELD MODES,
+C    TAKING INTO ACCOUNT BOTH EFFECTS OF DIPOLE TILT:
+C    WARPING IN Y-Z (DONE BY THE S/R WARPED) AND BENDING IN X-Z (DONE BY THIS SUBROUTINE)
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+      COMMON /RH0/ RH0
+      DATA RH2,IEPS /-5.2D0,3/
+C
+C  RH0,RH1,RH2, AND IEPS CONTROL THE TILT-RELATED DEFORMATION OF THE TAIL FIELD
+C
+      SPS=DSIN(PS)
+      CPS=DSQRT(1.D0-SPS**2)
+      R2=X**2+Y**2+Z**2
+      R=SQRT(R2)
+      ZR=Z/R
+      RH=RH0+RH2*ZR**2
+      DRHDR=-ZR/R*2.D0*RH2*ZR
+      DRHDZ= 2.D0*RH2*ZR/R
+C
+      RRH=R/RH
+
+      F=1.D0/(1.D0+RRH**IEPS)**(1.D0/IEPS)
+      DFDR=-RRH**(IEPS-1)*F**(IEPS+1)/RH
+      DFDRH=-RRH*DFDR
+c
+      SPSAS=SPS*F
+      CPSAS=DSQRT(1.D0-SPSAS**2)
+C
+      XAS=X*CPSAS-Z*SPSAS
+      ZAS=X*SPSAS+Z*CPSAS
+C
+      FACPS=SPS/CPSAS*(DFDR+DFDRH*DRHDR)/R
+      PSASX=FACPS*X
+      PSASY=FACPS*Y
+      PSASZ=FACPS*Z+SPS/CPSAS*DFDRH*DRHDZ
+C
+      DXASDX=CPSAS-ZAS*PSASX
+      DXASDY=-ZAS*PSASY
+      DXASDZ=-SPSAS-ZAS*PSASZ
+      DZASDX=SPSAS+XAS*PSASX
+      DZASDY=XAS*PSASY
+      DZASDZ=CPSAS+XAS*PSASZ
+      FAC1=DXASDZ*DZASDY-DXASDY*DZASDZ
+      FAC2=DXASDX*DZASDZ-DXASDZ*DZASDX
+      FAC3=DZASDX*DXASDY-DXASDX*DZASDY
+C
+C     DEFORM:
+C
+      CALL WARPED(IOPT,PS,XAS,Y,ZAS,BXAS1,BYAS1,BZAS1,BXAS2,BYAS2,BZAS2)
+C
+      BX1=BXAS1*DZASDZ-BZAS1*DXASDZ +BYAS1*FAC1
+      BY1=BYAS1*FAC2
+      BZ1=BZAS1*DXASDX-BXAS1*DZASDX +BYAS1*FAC3
+
+      BX2=BXAS2*DZASDZ-BZAS2*DXASDZ +BYAS2*FAC1
+      BY2=BYAS2*FAC2
+      BZ2=BZAS2*DXASDX-BXAS2*DZASDX +BYAS2*FAC3
+
+      RETURN
+      END
+C
+C------------------------------------------------------------------
+c
+C
+      SUBROUTINE WARPED (IOPT,PS,X,Y,Z,BX1,BY1,BZ1,BX2,BY2,BZ2)
+C
+C   CALCULATES GSM COMPONENTS OF THE WARPED FIELD FOR TWO TAIL UNIT MODES.
+C   THE WARPING DEFORMATION IS IMPOSED ON THE UNWARPED FIELD, COMPUTED
+C   BY THE S/R "UNWARPED".  THE WARPING PARAMETERS WERE TAKEN FROM THE
+C   RESULTS OF GEOTAIL OBSERVATIONS (TSYGANENKO ET AL. [1998]).
+C   NB # 6, P.106, OCT 12, 2000.
+C
+C   IOPT - TAIL FIELD MODE FLAG:   IOPT=0 - THE TWO TAIL MODES ARE ADDED UP
+C                                  IOPT=1 - MODE 1 ONLY
+C                                  IOPT=2 - MODE 2 ONLY
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+C
+      COMMON /G/ G
+      DGDX=0.D0
+      XL=20.D0
+      DXLDX=0.D0
+
+      SPS=DSIN(PS)
+      RHO2=Y**2+Z**2
+      RHO=DSQRT(RHO2)
+
+      IF (Y.EQ.0.D0.AND.Z.EQ.0.D0) THEN
+       PHI=0.D0
+       CPHI=1.D0
+       SPHI=0.D0
+      ELSE
+       PHI=DATAN2(Z,Y)
+       CPHI=Y/RHO
+       SPHI=Z/RHO
+      ENDIF
+
+      RR4L4=RHO/(RHO2**2+XL**4)
+
+      F=PHI+G*RHO2*RR4L4*CPHI*SPS
+      DFDPHI=1.D0-G*RHO2*RR4L4*SPHI*SPS
+      DFDRHO=G*RR4L4**2*(3.D0*XL**4-RHO2**2)*CPHI*SPS
+      DFDX=RR4L4*CPHI*SPS*(DGDX*RHO2-G*RHO*RR4L4*4.D0*XL**3*DXLDX)
+
+      CF=DCOS(F)
+      SF=DSIN(F)
+      YAS=RHO*CF
+      ZAS=RHO*SF
+
+      CALL UNWARPED (IOPT,X,YAS,ZAS,BX_AS1,BY_AS1,BZ_AS1,
+     *  BX_AS2,BY_AS2,BZ_AS2)
+
+      BRHO_AS =  BY_AS1*CF+BZ_AS1*SF      !   DEFORM THE 1ST MODE
+      BPHI_AS = -BY_AS1*SF+BZ_AS1*CF
+
+      BRHO_S = BRHO_AS*DFDPHI
+      BPHI_S = BPHI_AS-RHO*(BX_AS1*DFDX+BRHO_AS*DFDRHO)
+      BX1    = BX_AS1*DFDPHI
+
+      BY1    = BRHO_S*CPHI-BPHI_S*SPHI
+      BZ1    = BRHO_S*SPHI+BPHI_S*CPHI    !   DONE
+
+      BRHO_AS =  BY_AS2*CF+BZ_AS2*SF      !   DEFORM THE 2ND MODE
+      BPHI_AS = -BY_AS2*SF+BZ_AS2*CF
+
+      BRHO_S = BRHO_AS*DFDPHI
+      BPHI_S = BPHI_AS-RHO*(BX_AS2*DFDX+BRHO_AS*DFDRHO)
+      BX2    = BX_AS2*DFDPHI
+
+      BY2    = BRHO_S*CPHI-BPHI_S*SPHI
+      BZ2    = BRHO_S*SPHI+BPHI_S*CPHI    !   DONE
+
+      RETURN
+      END
+C
+C%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+C
+       SUBROUTINE UNWARPED (IOPT,X,Y,Z,BX1,BY1,BZ1,BX2,BY2,BZ2)
+
+C   IOPT - TAIL FIELD MODE FLAG:   IOPT=0 - THE TWO TAIL MODES ARE ADDED UP
+C                                  IOPT=1 - MODE 1 ONLY
+C                                  IOPT=2 - MODE 2 ONLY
+C
+C    CALCULATES GSM COMPONENTS OF THE SHIELDED FIELD OF TWO TAIL MODES WITH UNIT
+C    AMPLITUDES,  WITHOUT ANY WARPING OR BENDING.  NONLINEAR PARAMETERS OF THE MODES
+C    ARE FORWARDED HERE VIA A COMMON BLOCK /TAIL/.
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+C
+      DIMENSION A1(60),A2(60)  !   TAIL SHIELDING FIELD PARAMETERS FOR THE MODES #1 & #2
+
+      COMMON /TAIL/ DXSHIFT1,DXSHIFT2,D0,DELTADY  ! ATTENTION:  HERE D0 & DELTADY ARE INCLUDED IN /TAIL/
+C                                                                  AND EXCLUDED FROM DATA
+      DATA DELTADX1,ALPHA1,XSHIFT1
+     *  /1.D0,1.1D0,6.D0/
+      DATA DELTADX2,ALPHA2,XSHIFT2
+     *  /0.D0,.25D0,4.D0/
+
+      DATA A1/-25.45869857,57.35899080,317.5501869,-2.626756717,
+     *-93.38053698,-199.6467926,-858.8129729,34.09192395,845.4214929,
+     *-29.07463068,47.10678547,-128.9797943,-781.7512093,6.165038619,
+     *167.8905046,492.0680410,1654.724031,-46.77337920,-1635.922669,
+     *40.86186772,-.1349775602,-.9661991179E-01,-.1662302354,
+     *.002810467517,.2487355077,.1025565237,-14.41750229,-.8185333989,
+     *11.07693629,.7569503173,-9.655264745,112.2446542,777.5948964,
+     *-5.745008536,-83.03921993,-490.2278695,-1155.004209,39.08023320,
+     *1172.780574,-39.44349797,-14.07211198,-40.41201127,-313.2277343,
+     *2.203920979,8.232835341,197.7065115,391.2733948,-18.57424451,
+     *-437.2779053,23.04976898,11.75673963,13.60497313,4.691927060,
+     *18.20923547,27.59044809,6.677425469,1.398283308,2.839005878,
+     *31.24817706,24.53577264/
+
+      DATA A2/-287187.1962,4970.499233,410490.1952,-1347.839052,
+     *-386370.3240,3317.983750,-143462.3895,5706.513767,171176.2904,
+     *250.8882750,-506570.8891,5733.592632,397975.5842,9771.762168,
+     *-941834.2436,7990.975260,54313.10318,447.5388060,528046.3449,
+     *12751.04453,-21920.98301,-21.05075617,31971.07875,3012.641612,
+     *-301822.9103,-3601.107387,1797.577552,-6.315855803,142578.8406,
+     *13161.93640,804184.8410,-14168.99698,-851926.6360,-1890.885671,
+     *972475.6869,-8571.862853,26432.49197,-2554.752298,-482308.3431,
+     *-4391.473324,105155.9160,-1134.622050,-74353.53091,-5382.670711,
+     *695055.0788,-916.3365144,-12111.06667,67.20923358,-367200.9285,
+     *-21414.14421,14.75567902,20.75638190,59.78601609,16.86431444,
+     *32.58482365,23.69472951,17.24977936,13.64902647,68.40989058,
+     *11.67828167/
+
+      DATA XM1,XM2/2*-12.D0/
+
+      IF (IOPT.EQ.2) GOTO 1
+
+      XSC1=(X-XSHIFT1-DXSHIFT1)*ALPHA1-XM1*(ALPHA1-1.D0)
+      YSC1=Y*ALPHA1
+      ZSC1=Z*ALPHA1
+      D0SC1=D0*ALPHA1   ! HERE WE USE A SINGLE VALUE D0 OF THE THICKNESS FOR BOTH MODES
+
+      CALL TAILDISK(D0SC1,DELTADX1,DELTADY,XSC1,YSC1,ZSC1,FX1,FY1,FZ1)
+      CALL SHLCAR5X5(A1,X,Y,Z,DXSHIFT1,HX1,HY1,HZ1)
+
+      BX1=FX1+HX1
+      BY1=FY1+HY1
+      BZ1=FZ1+HZ1
+
+      IF (IOPT.EQ.1) THEN
+        BX2=0.D0
+        BY2=0.D0
+        BZ2=0.D0
+        RETURN
+      ENDIF
+
+ 1    XSC2=(X-XSHIFT2-DXSHIFT2)*ALPHA2-XM2*(ALPHA2-1.D0)
+      YSC2=Y*ALPHA2
+      ZSC2=Z*ALPHA2
+      D0SC2=D0*ALPHA2   ! HERE WE USE A SINGLE VALUE D0 OF THE THICKNESS FOR BOTH MODES
+
+      CALL TAILDISK(D0SC2,DELTADX2,DELTADY,XSC2,YSC2,ZSC2,FX2,FY2,FZ2)
+      CALL SHLCAR5X5(A2,X,Y,Z,DXSHIFT2,HX2,HY2,HZ2)
+
+      BX2=FX2+HX2
+      BY2=FY2+HY2
+      BZ2=FZ2+HZ2
+
+      IF (IOPT.EQ.2) THEN
+        BX1=0.D0
+        BY1=0.D0
+        BZ1=0.D0
+        RETURN
+      ENDIF
+
+      RETURN
+      END
+C
+C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
+C
+      SUBROUTINE TAILDISK(D0,DELTADX,DELTADY,X,Y,Z,BX,BY,BZ)
+c
+c      THIS SUBROUTINE COMPUTES THE COMPONENTS OF THE TAIL CURRENT FIELD,
+C       SIMILAR TO THAT DESCRIBED BY TSYGANENKO AND PEREDO (1994).  THE
+C        DIFFERENCE IS THAT NOW WE USE SPACEWARPING, AS DESCRIBED IN OUR
+C         PAPER ON MODELING BIRKELAND CURRENTS (TSYGANENKO AND STERN, 1996)
+C          INSTEAD OF SHEARING IT IN THE SPIRIT OF T89 TAIL MODEL.
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+c
+      DIMENSION F(5),B(5),C(5)
+C
+      DATA F /-71.09346626D0,-1014.308601D0,-1272.939359D0,
+     *        -3224.935936D0,-44546.86232D0/
+      DATA B /10.90101242D0,12.68393898D0,13.51791954D0,14.86775017D0,
+     *          15.12306404D0/
+      DATA C /.7954069972D0,.6716601849D0,1.174866319D0,2.565249920D0,
+     *          10.01986790D0/
+C
+      RHO=DSQRT(X**2+Y**2)
+      DRHODX=X/RHO
+      DRHODY=Y/RHO
+
+      DEX=DEXP(X/7.D0)
+      D=D0+DELTADY*(Y/20.D0)**2  +DELTADX*DEX !   THE LAST TERM (INTRODUCED 10/11/2000) MAKES THE SHEET
+      DDDY=DELTADY*Y*0.005D0                  !   THICKEN SUNWARD, TO AVOID PROBLEMS IN THE SUBSOLAR REGION
+      DDDX=DELTADX/7.D0*DEX
+C
+      DZETA=DSQRT(Z**2+D**2)  !  THIS IS THE SAME SIMPLE WAY TO SPREAD
+C                                        OUT THE SHEET, AS THAT USED IN T89
+      DDZETADX=D*DDDX/DZETA
+      DDZETADY=D*DDDY/DZETA
+      DDZETADZ=Z/DZETA
+
+C
+      DBX=0.D0
+      DBY=0.D0
+      DBZ=0.D0
+C
+      DO 1 I=1,5
+C
+      BI=B(I)
+      CI=C(I)
+C
+      S1=DSQRT((RHO+BI)**2+(DZETA+CI)**2)
+      S2=DSQRT((RHO-BI)**2+(DZETA+CI)**2)
+
+      DS1DRHO=(RHO+BI)/S1
+      DS2DRHO=(RHO-BI)/S2
+      DS1DDZ=(DZETA+CI)/S1
+      DS2DDZ=(DZETA+CI)/S2
+C
+      DS1DX=DS1DRHO*DRHODX  +DS1DDZ*DDZETADX
+      DS1DY=DS1DRHO*DRHODY  +   DS1DDZ*DDZETADY
+      DS1DZ=                      DS1DDZ*DDZETADZ
+C
+      DS2DX=DS2DRHO*DRHODX  +DS2DDZ*DDZETADX
+      DS2DY=DS2DRHO*DRHODY  +   DS2DDZ*DDZETADY
+      DS2DZ=                    DS2DDZ*DDZETADZ
+C
+      S1TS2=S1*S2
+      S1PS2=S1+S2
+      S1PS2SQ=S1PS2**2
+
+      FAC1=DSQRT(S1PS2SQ-(2.D0*BI)**2)
+      AS=FAC1/(S1TS2*S1PS2SQ)
+      DASDS1=(1.D0/(FAC1*S2)-AS/S1PS2*(S2*S2+S1*(3.D0*S1+4.D0*S2)))
+     *          /(S1*S1PS2)
+      DASDS2=(1.D0/(FAC1*S1)-AS/S1PS2*(S1*S1+S2*(3.D0*S2+4.D0*S1)))
+     *          /(S2*S1PS2)
+C
+      DASDX=DASDS1*DS1DX+DASDS2*DS2DX
+      DASDY=DASDS1*DS1DY+DASDS2*DS2DY
+      DASDZ=DASDS1*DS1DZ+DASDS2*DS2DZ
+C
+      DBX=DBX-F(I)*X*DASDZ
+      DBY=DBY-F(I)*Y*DASDZ
+  1   DBZ=DBZ+F(I)*(2.D0*AS+X*DASDX+Y*DASDY)
+
+      BX=DBX
+      BY=DBY
+      BZ=DBZ
+
+      RETURN
+      END
+C
+C$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
+C
+C THIS CODE RETURNS THE SHIELDING FIELD REPRESENTED BY  5x5=25 "CARTESIAN"
+C    HARMONICS
+C
+         SUBROUTINE  SHLCAR5X5(A,X,Y,Z,DSHIFT,HX,HY,HZ)
+C
+C - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+C  The NLIN coefficients are the amplitudes of the "cartesian"
+c    harmonics (A(1)-A(NLIN).
+c  The NNP nonlinear parameters (A(NLIN+1)-A(NTOT) are the scales Pi and Ri
+C   entering the arguments of exponents, sines, and cosines in each of the
+C   NLIN "Cartesian" harmonics
+C - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+C
+         IMPLICIT  REAL * 8  (A - H, O - Z)
+C
+         DIMENSION A(60)
+C
+         DHX=0.D0
+         DHY=0.D0
+         DHZ=0.D0
+
+         L=0
+C
+         DO 2 I=1,5
+         RP=1.D0/A(50+I)
+         CYPI=DCOS(Y*RP)
+         SYPI=DSIN(Y*RP)
+C
+         DO 2 K=1,5
+         RR=1.D0/A(55+K)
+         SZRK=DSIN(Z*RR)
+         CZRK=DCOS(Z*RR)
+         SQPR=DSQRT(RP**2+RR**2)
+         EPR=DEXP(X*SQPR)
+C
+         DBX=-SQPR*EPR*CYPI*SZRK
+         DBY= RP*EPR*SYPI*SZRK
+         DBZ=-RR*EPR*CYPI*CZRK
+
+         L=L+2
+         COEF=A(L-1)+A(L)*DSHIFT
+
+         DHX=DHX+COEF*DBX
+         DHY=DHY+COEF*DBY
+         DHZ=DHZ+COEF*DBZ
+c
+  2      CONTINUE
+
+         HX=DHX
+         HY=DHY
+         HZ=DHZ
+C
+      RETURN
+      END
+c
+c %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+C
+      SUBROUTINE BIRK_TOT (IOPB,PS,X,Y,Z,BX11,BY11,BZ11,BX12,BY12,BZ12,
+     *                          BX21,BY21,BZ21,BX22,BY22,BZ22)
+C
+C      IOPB -  BIRKELAND FIELD MODE FLAG:
+C         IOPB=0 - ALL COMPONENTS
+C         IOPB=1 - REGION 1, MODES 1 & 2
+C         IOPB=2 - REGION 2, MODES 1 & 2
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION SH11(86),SH12(86),SH21(86),SH22(86)
+      COMMON /BIRKPAR/ XKAPPA1,XKAPPA2   !  INPUT PARAMETERS, SPECIFIED FROM A MAIN PROGRAM
+      COMMON /DPHI_B_RHO0/ DPHI,B,RHO_0,XKAPPA ! PARAMETERS, CONTROL DAY-NIGHT ASYMMETRY OF F.A.C.
+
+      DATA SH11/46488.84663,-15541.95244,-23210.09824,-32625.03856,
+     *-109894.4551,-71415.32808,58168.94612,55564.87578,-22890.60626,
+     *-6056.763968,5091.368100,239.7001538,-13899.49253,4648.016991,
+     *6971.310672,9699.351891,32633.34599,21028.48811,-17395.96190,
+     *-16461.11037,7447.621471,2528.844345,-1934.094784,-588.3108359,
+     *-32588.88216,10894.11453,16238.25044,22925.60557,77251.11274,
+     *50375.97787,-40763.78048,-39088.60660,15546.53559,3559.617561,
+     *-3187.730438,309.1487975,88.22153914,-243.0721938,-63.63543051,
+     *191.1109142,69.94451996,-187.9539415,-49.89923833,104.0902848,
+     *-120.2459738,253.5572433,89.25456949,-205.6516252,-44.93654156,
+     *124.7026309,32.53005523,-98.85321751,-36.51904756,98.88241690,
+     *24.88493459,-55.04058524,61.14493565,-128.4224895,-45.35023460,
+     *105.0548704,-43.66748755,119.3284161,31.38442798,-92.87946767,
+     *-33.52716686,89.98992001,25.87341323,-48.86305045,59.69362881,
+     *-126.5353789,-44.39474251,101.5196856,59.41537992,41.18892281,
+     *80.86101200,3.066809418,7.893523804,30.56212082,10.36861082,
+     *8.222335945,19.97575641,2.050148531,4.992657093,2.300564232,
+     *.2256245602,-.05841594319/
+
+      DATA SH12/210260.4816,-1443587.401,-1468919.281,281939.2993,
+     *-1131124.839,729331.7943,2573541.307,304616.7457,468887.5847,
+     *181554.7517,-1300722.650,-257012.8601,645888.8041,-2048126.412,
+     *-2529093.041,571093.7972,-2115508.353,1122035.951,4489168.802,
+     *75234.22743,823905.6909,147926.6121,-2276322.876,-155528.5992,
+     *-858076.2979,3474422.388,3986279.931,-834613.9747,3250625.781,
+     *-1818680.377,-7040468.986,-414359.6073,-1295117.666,-346320.6487,
+     *3565527.409,430091.9496,-.1565573462,7.377619826,.4115646037,
+     *-6.146078880,3.808028815,-.5232034932,1.454841807,-12.32274869,
+     *-4.466974237,-2.941184626,-.6172620658,12.64613490,1.494922012,
+     *-21.35489898,-1.652256960,16.81799898,-1.404079922,-24.09369677,
+     *-10.99900839,45.94237820,2.248579894,31.91234041,7.575026816,
+     *-45.80833339,-1.507664976,14.60016998,1.348516288,-11.05980247,
+     *-5.402866968,31.69094514,12.28261196,-37.55354174,4.155626879,
+     *-33.70159657,-8.437907434,36.22672602,145.0262164,70.73187036,
+     *85.51110098,21.47490989,24.34554406,31.34405345,4.655207476,
+     *5.747889264,7.802304187,1.844169801,4.867254550,2.941393119,
+     *.1379899178,.06607020029/
+
+      DATA SH21/162294.6224,503885.1125,-27057.67122,-531450.1339,
+     *84747.05678,-237142.1712,84133.61490,259530.0402,69196.05160,
+     *-189093.5264,-19278.55134,195724.5034,-263082.6367,-818899.6923,
+     *43061.10073,863506.6932,-139707.9428,389984.8850,-135167.5555,
+     *-426286.9206,-109504.0387,295258.3531,30415.07087,-305502.9405,
+     *100785.3400,315010.9567,-15999.50673,-332052.2548,54964.34639,
+     *-152808.3750,51024.67566,166720.0603,40389.67945,-106257.7272,
+     *-11126.14442,109876.2047,2.978695024,558.6019011,2.685592939,
+     *-338.0004730,-81.99724090,-444.1102659,89.44617716,212.0849592,
+     *-32.58562625,-982.7336105,-35.10860935,567.8931751,-1.917212423,
+     *-260.2023543,-1.023821735,157.5533477,23.00200055,232.0603673,
+     *-36.79100036,-111.9110936,18.05429984,447.0481000,15.10187415,
+     *-258.7297813,-1.032340149,-298.6402478,-1.676201415,180.5856487,
+     *64.52313024,209.0160857,-53.85574010,-98.52164290,14.35891214,
+     *536.7666279,20.09318806,-309.7349530,58.54144539,67.45226850,
+     *97.92374406,4.752449760,10.46824379,32.91856110,12.05124381,
+     *9.962933904,15.91258637,1.804233877,6.578149088,2.515223491,
+     *.1930034238,-.02261109942/
+
+      DATA SH22/-131287.8986,-631927.6885,-318797.4173,616785.8782,
+     *-50027.36189,863099.9833,47680.20240,-1053367.944,-501120.3811,
+     *-174400.9476,222328.6873,333551.7374,-389338.7841,-1995527.467,
+     *-982971.3024,1960434.268,297239.7137,2676525.168,-147113.4775,
+     *-3358059.979,-2106979.191,-462827.1322,1017607.960,1039018.475,
+     *520266.9296,2627427.473,1301981.763,-2577171.706,-238071.9956,
+     *-3539781.111,94628.16420,4411304.724,2598205.733,637504.9351,
+     *-1234794.298,-1372562.403,-2.646186796,-31.10055575,2.295799273,
+     *19.20203279,30.01931202,-302.1028550,-14.78310655,162.1561899,
+     *.4943938056,176.8089129,-.2444921680,-100.6148929,9.172262228,
+     *137.4303440,-8.451613443,-84.20684224,-167.3354083,1321.830393,
+     *76.89928813,-705.7586223,18.28186732,-770.1665162,-9.084224422,
+     *436.3368157,-6.374255638,-107.2730177,6.080451222,65.53843753,
+     *143.2872994,-1028.009017,-64.22739330,547.8536586,-20.58928632,
+     *597.3893669,10.17964133,-337.7800252,159.3532209,76.34445954,
+     *84.74398828,12.76722651,27.63870691,32.69873634,5.145153451,
+     *6.310949163,6.996159733,1.971629939,4.436299219,2.904964304,
+     *.1486276863,.06859991529/
+
+      XKAPPA=XKAPPA1        !  FORWARDED IN BIRK_1N2
+      X_SC=XKAPPA1-1.1D0    !  FORWARDED IN BIRK_SHL
+
+      IF (IOPB.EQ.0.OR.IOPB.EQ.1) THEN
+
+      CALL BIRK_1N2 (1,1,PS,X,Y,Z,FX11,FY11,FZ11)           !  REGION 1, MODE 1
+      CALL BIRK_SHL (SH11,PS,X_SC,X,Y,Z,HX11,HY11,HZ11)
+      BX11=FX11+HX11
+      BY11=FY11+HY11
+      BZ11=FZ11+HZ11
+
+      CALL BIRK_1N2 (1,2,PS,X,Y,Z,FX12,FY12,FZ12)           !  REGION 1, MODE 2
+      CALL BIRK_SHL (SH12,PS,X_SC,X,Y,Z,HX12,HY12,HZ12)
+      BX12=FX12+HX12
+      BY12=FY12+HY12
+      BZ12=FZ12+HZ12
+
+      ENDIF
+
+      XKAPPA=XKAPPA2        !  FORWARDED IN BIRK_1N2
+      X_SC=XKAPPA2-1.0D0    !  FORWARDED IN BIRK_SHL
+
+      IF (IOPB.EQ.0.OR.IOPB.EQ.2) THEN
+
+      CALL BIRK_1N2 (2,1,PS,X,Y,Z,FX21,FY21,FZ21)           !  REGION 2, MODE 1
+      CALL BIRK_SHL (SH21,PS,X_SC,X,Y,Z,HX21,HY21,HZ21)
+      BX21=FX21+HX21
+      BY21=FY21+HY21
+      BZ21=FZ21+HZ21
+
+      CALL BIRK_1N2 (2,2,PS,X,Y,Z,FX22,FY22,FZ22)           !  REGION 2, MODE 2
+      CALL BIRK_SHL (SH22,PS,X_SC,X,Y,Z,HX22,HY22,HZ22)
+      BX22=FX22+HX22
+      BY22=FY22+HY22
+      BZ22=FZ22+HZ22
+
+      ENDIF
+
+      RETURN
+      END
+C
+c %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+c
+c
+      SUBROUTINE BIRK_1N2 (NUMB,MODE,PS,X,Y,Z,BX,BY,BZ)
+C
+C  CALCULATES COMPONENTS  OF REGION 1/2 FIELD IN SPHERICAL COORDS.  DERIVED FROM THE S/R DIPDEF2C (WHICH
+C    DOES THE SAME JOB, BUT INPUT/OUTPUT THERE WAS IN SPHERICAL COORDS, WHILE HERE WE USE CARTESIAN ONES)
+C
+C   INPUT:  NUMB=1 (2) FOR REGION 1 (2) CURRENTS
+C           MODE=1 YIELDS SIMPLE SINUSOIDAL MLT VARIATION, WITH MAXIMUM CURRENT AT DAWN/DUSK MERIDIAN
+C     WHILE MODE=2 YIELDS THE SECOND HARMONIC.
+C
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION A11(31),A12(31),A21(31),A22(31)
+      COMMON /MODENUM/ M
+      COMMON /DTHETA/ DTHETA
+
+      COMMON /DPHI_B_RHO0/ DPHI,B,RHO_0,XKAPPA ! THESE PARAMETERS CONTROL DAY-NIGHT ASYMMETRY OF F.A.C., AS FOLLOWS:
+
+C  (1) DPHI:   HALF-DIFFERENCE (IN RADIANS) BETWEEN DAY AND NIGHT LATITUDE OF FAC OVAL AT IONOSPHERIC ALTITUDE;
+C              TYPICAL VALUE: 0.06
+C  (2) B:      AN ASYMMETRY FACTOR AT HIGH-ALTITUDES;  FOR B=0, THE ONLY ASYMMETRY IS THAT FROM DPHI
+C              TYPICAL VALUES: 0.35-0.70
+C  (3) RHO_0:  A FIXED PARAMETER, DEFINING THE DISTANCE RHO, AT WHICH THE LATITUDE SHIFT GRADUALLY SATURATES AND
+C              STOPS INCREASING
+C              ITS VALUE WAS ASSUMED FIXED, EQUAL TO 7.0.
+C  (4) XKAPPA: AN OVERALL SCALING FACTOR, WHICH CAN BE USED FOR CHANGING THE SIZE OF THE F.A.C. OVAL
+C
+      DATA BETA,RH,EPS/0.9D0,10.D0,3.D0/ ! parameters of the tilt-dependent deformation of the untilted F.A.C. field
+
+      DATA A11/.1618068350,-.1797957553,2.999642482,-.9322708978,
+     *-.6811059760,.2099057262,-8.358815746,-14.86033550,.3838362986,
+     *-16.30945494,4.537022847,2.685836007,27.97833029,6.330871059,
+     *1.876532361,18.95619213,.9651528100,.4217195118,-.08957770020,
+     *-1.823555887,.7457045438,-.5785916524,-1.010200918,.01112389357,
+     *.09572927448,-.3599292276,8.713700514,.9763932955,3.834602998,
+     *2.492118385,.7113544659/
+      DATA A12/.7058026940,-.2845938535,5.715471266,-2.472820880,
+     *-.7738802408,.3478293930,-11.37653694,-38.64768867,.6932927651,
+     *-212.4017288,4.944204937,3.071270411,33.05882281,7.387533799,
+     *2.366769108,79.22572682,.6154290178,.5592050551,-.1796585105,
+     *-1.654932210,.7309108776,-.4926292779,-1.130266095,-.009613974555,
+     *.1484586169,-.2215347198,7.883592948,.02768251655,2.950280953,
+     *1.212634762,.5567714182/
+      DATA A21/.1278764024,-.2320034273,1.805623266,-32.37241440,
+     *-.9931490648,.3175085630,-2.492465814,-16.21600096,.2695393416,
+     *-6.752691265,3.971794901,14.54477563,41.10158386,7.912889730,
+     *1.258297372,9.583547721,1.014141963,.5104134759,-.1790430468,
+     *-1.756358428,.7561986717,-.6775248254,-.04014016420,.01446794851,
+     *.1200521731,-.2203584559,4.508963850,.8221623576,1.779933730,
+     *1.102649543,.8867880020/
+      DATA A22/.4036015198,-.3302974212,2.827730930,-45.44405830,
+     *-1.611103927,.4927112073,-.003258457559,-49.59014949,.3796217108,
+     *-233.7884098,4.312666980,18.05051709,28.95320323,11.09948019,
+     *.7471649558,67.10246193,.5667096597,.6468519751,-.1560665317,
+     *-1.460805289,.7719653528,-.6658988668,.2515179349E-05,
+     *.02426021891,.1195003324,-.2625739255,4.377172556,.2421190547,
+     *2.503482679,1.071587299,.7247997430/
+
+      B=0.5
+      RHO_0=7.0
+
+      M=MODE
+      IF (NUMB.EQ.1) THEN
+          DPHI=0.055D0
+          DTHETA=0.06D0
+      ENDIF
+
+      IF (NUMB.EQ.2) THEN
+          DPHI=0.030D0
+          DTHETA=0.09D0
+      ENDIF
+
+      Xsc=X*XKAPPA
+      Ysc=Y*XKAPPA
+      Zsc=Z*XKAPPA
+      RHO=DSQRT(Xsc**2+Zsc**2)
+
+      Rsc=DSQRT(Xsc**2+Ysc**2+Zsc**2)                                 !  SCALED
+      RHO2=RHO_0**2
+
+      IF (Xsc.EQ.0.D0.AND.Zsc.EQ.0.D0) THEN
+         PHI=0.D0
+      ELSE
+         PHI=DATAN2(-Zsc,Xsc)  !  FROM CARTESIAN TO CYLINDRICAL (RHO,PHI,Y)
+      ENDIF
+
+      SPHIC=DSIN(PHI)
+      CPHIC=DCOS(PHI)  !  "C" means "CYLINDRICAL", TO DISTINGUISH FROM SPHERICAL PHI
+
+      BRACK=DPHI+B*RHO2/(RHO2+1.D0)*(RHO**2-1.D0)/(RHO2+RHO**2)
+      R1RH=(Rsc-1.D0)/RH
+      PSIAS=BETA*PS/(1.D0+R1RH**EPS)**(1.D0/EPS)
+
+      PHIS=PHI-BRACK*DSIN(PHI) -PSIAS
+      DPHISPHI=1.D0-BRACK*DCOS(PHI)
+      DPHISRHO=-2.D0*B*RHO2*RHO/(RHO2+RHO**2)**2 *DSIN(PHI)
+     *   +BETA*PS*R1RH**(EPS-1.D0)*RHO/(RH*Rsc*
+     *   (1.D0+R1RH**EPS)**(1.D0/EPS+1.D0))
+      DPHISDY= BETA*PS*R1RH**(EPS-1.D0)*Ysc/(RH*Rsc*
+     *   (1.D0+R1RH**EPS)**(1.D0/EPS+1.D0))
+
+      SPHICS=DSIN(PHIS)
+      CPHICS=DCOS(PHIS)
+
+      XS= RHO*CPHICS
+      ZS=-RHO*SPHICS
+
+      IF (NUMB.EQ.1) THEN
+        IF (MODE.EQ.1) CALL TWOCONES (A11,XS,Ysc,ZS,BXS,BYAS,BZS)
+        IF (MODE.EQ.2) CALL TWOCONES (A12,XS,Ysc,ZS,BXS,BYAS,BZS)
+      ELSE
+        IF (MODE.EQ.1) CALL TWOCONES (A21,XS,Ysc,ZS,BXS,BYAS,BZS)
+        IF (MODE.EQ.2) CALL TWOCONES (A22,XS,Ysc,ZS,BXS,BYAS,BZS)
+      ENDIF
+
+      BRHOAS=BXS*CPHICS-BZS*SPHICS
+      BPHIAS=-BXS*SPHICS-BZS*CPHICS
+
+      BRHO_S=BRHOAS*DPHISPHI                             *XKAPPA        ! SCALING
+      BPHI_S=(BPHIAS-RHO*(BYAS*DPHISDY+BRHOAS*DPHISRHO)) *XKAPPA
+      BY_S=BYAS*DPHISPHI                                 *XKAPPA
+
+      BX=BRHO_S*CPHIC-BPHI_S*SPHIC
+      BY=BY_S
+      BZ=-BRHO_S*SPHIC-BPHI_S*CPHIC
+
+      RETURN
+      END
+c
+C=========================================================================
+c
+      SUBROUTINE TWOCONES (A,X,Y,Z,BX,BY,BZ)
+C
+C   ADDS FIELDS FROM TWO CONES (NORTHERN AND SOUTHERN), WITH A PROPER SYMMETRY OF THE CURRENT AND FIELD,
+C     CORRESPONDING TO THE REGION 1 BIRKELAND CURRENTS.
+C
+
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION A(31)
+
+      CALL ONE_CONE (A,X,Y,Z,BXN,BYN,BZN)
+      CALL ONE_CONE (A,X,-Y,-Z,BXS,BYS,BZS)
+      BX=BXN-BXS
+      BY=BYN+BYS
+      BZ=BZN+BZS
+
+      RETURN
+      END
+c
+C-------------------------------------------------------------------------
+C
+      SUBROUTINE ONE_CONE(A,X,Y,Z,BX,BY,BZ)
+c
+c  RETURNS FIELD COMPONENTS FOR A DEFORMED CONICAL CURRENT SYSTEM, FITTED TO A BIOSAVART FIELD
+c    BY SIM_14.FOR.  HERE ONLY THE NORTHERN CONE IS TAKEN INTO ACCOUNT.
+c
+
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION A(31)
+
+      COMMON /DTHETA/ DTHETA
+      COMMON /MODENUM/ M
+
+      DATA DR,DT/1.D-6,1.D-6/  !   JUST FOR NUMERICAL DIFFERENTIATION
+
+      THETA0=A(31)
+
+      RHO2=X**2+Y**2
+      RHO=DSQRT(RHO2)
+      R=DSQRT(RHO2+Z**2)
+      THETA=DATAN2(RHO,Z)
+      PHI=DATAN2(Y,X)
+C
+C   MAKE THE DEFORMATION OF COORDINATES:
+C
+       RS=R_S(A,R,THETA)
+       THETAS=THETA_S(A,R,THETA)
+       PHIS=PHI
+C
+C   CALCULATE FIELD COMPONENTS AT THE NEW POSITION (ASTERISKED):
+C
+       CALL FIALCOS (RS,THETAS,PHIS,BTAST,BFAST,M,THETA0,DTHETA)    !   MODE #M
+C
+C   NOW TRANSFORM B{R,T,F}_AST BY THE DEFORMATION TENSOR:
+C
+C      FIRST OF ALL, FIND THE DERIVATIVES:
+C
+       DRSDR=(R_S(A,R+DR,THETA)-R_S(A,R-DR,THETA))/(2.D0*DR)
+       DRSDT=(R_S(A,R,THETA+DT)-R_S(A,R,THETA-DT))/(2.D0*DT)
+       DTSDR=(THETA_S(A,R+DR,THETA)-THETA_S(A,R-DR,THETA))/(2.D0*DR)
+       DTSDT=(THETA_S(A,R,THETA+DT)-THETA_S(A,R,THETA-DT))/(2.D0*DT)
+
+       STSST=DSIN(THETAS)/DSIN(THETA)
+       RSR=RS/R
+
+       BR     =-RSR/R*STSST*BTAST*DRSDT
+       BTHETA = RSR*STSST*BTAST*DRSDR
+       BPHI   = RSR*BFAST*(DRSDR*DTSDT-DRSDT*DTSDR)
+
+       S=RHO/R
+       C=Z/R
+       SF=Y/RHO
+       CF=X/RHO
+
+       BE=BR*S+BTHETA*C
+
+       BX=A(1)*(BE*CF-BPHI*SF)
+       BY=A(1)*(BE*SF+BPHI*CF)
+       BZ=A(1)*(BR*C-BTHETA*S)
+
+       RETURN
+       END
+C
+C=====================================================================================
+      DOUBLE PRECISION FUNCTION R_S(A,R,THETA)
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION A(31)
+C
+      R_S=R+A(2)/R+A(3)*R/DSQRT(R**2+A(11)**2)+A(4)*R/(R**2+A(12)**2)
+     *+(A(5)+A(6)/R+A(7)*R/DSQRT(R**2+A(13)**2)+A(8)*R/(R**2+A(14)**2))*
+     * DCOS(THETA)
+     *+(A(9)*R/DSQRT(R**2+A(15)**2)+A(10)*R/(R**2+A(16)**2)**2)
+     * *DCOS(2.D0*THETA)
+C
+      RETURN
+      END
+C
+C-----------------------------------------------------------------------------
+C
+      DOUBLE PRECISION FUNCTION THETA_S(A,R,THETA)
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION A(31)
+c
+      THETA_S=THETA+(A(17)+A(18)/R+A(19)/R**2
+     *                +A(20)*R/DSQRT(R**2+A(27)**2))*DSIN(THETA)
+     * +(A(21)+A(22)*R/DSQRT(R**2+A(28)**2)
+     *                +A(23)*R/(R**2+A(29)**2))*DSIN(2.D0*THETA)
+     * +(A(24)+A(25)/R+A(26)*R/(R**2+A(30)**2))*DSIN(3.D0*THETA)
+C
+      RETURN
+      END
+C
+c!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+c
+      SUBROUTINE FIALCOS(R,THETA,PHI,BTHETA,BPHI,N,THETA0,DT)
+C
+C  CONICAL MODEL OF BIRKELAND CURRENT FIELD; BASED ON THE OLD S/R FIALCO (OF 1990-91)
+
+C  BTN, AND BPN ARE THE ARRAYS OF BTHETA AND BPHI (BTN(i), BPN(i) CORRESPOND TO i-th MODE).
+C   ONLY FIRST  N  MODE AMPLITUDES ARE COMPUTED (N<=10).
+C    THETA0 IS THE ANGULAR HALF-WIDTH OF THE CONE, DT IS THE ANGULAR H.-W. OF THE CURRENT LAYER
+
+C   NOTE:  BR=0  (BECAUSE ONLY RADIAL CURRENTS ARE PRESENT IN THIS MODEL)
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+      DIMENSION  BTN(10),BPN(10),CCOS(10),SSIN(10)
+
+      SINTE=DSIN(THETA)
+      RO=R*SINTE
+      COSTE=DCOS(THETA)
+      SINFI=DSIN(PHI)
+      COSFI=DCOS(PHI)
+      TG=SINTE/(1.D0+COSTE)   !        TAN(THETA/2)
+      CTG=SINTE/(1.D0-COSTE)  !        CTG(THETA/2)
+C
+C
+      TETANP=THETA0+DT
+      TETANM=THETA0-DT
+      IF(THETA.LT.TETANM) GOTO 1
+      TGP=DTAN(TETANP*0.5D0)
+      TGM=DTAN(TETANM*0.5D0)
+      TGM2=TGM*TGM
+      TGP2=TGP*TGP
+  1   CONTINUE
+
+      COSM1=1.D0
+      SINM1=0.D0
+      TM=1.D0
+      TGM2M=1.D0
+      TGP2M=1.D0
+
+      DO 2 M=1,N
+      TM=TM*TG
+      CCOS(M)=COSM1*COSFI-SINM1*SINFI
+      SSIN(M)=SINM1*COSFI+COSM1*SINFI
+      COSM1=CCOS(M)
+      SINM1=SSIN(M)
+      IF(THETA.LT.TETANM) THEN
+      T=TM
+      DTT=0.5D0*M*TM*(TG+CTG)
+      DTT0=0.D0
+      ELSE IF(THETA.LT.TETANP) THEN
+      TGM2M=TGM2M*TGM2
+      FC=1.D0/(TGP-TGM)
+      FC1=1.D0/(2*M+1)
+      TGM2M1=TGM2M*TGM
+      TG21=1.D0+TG*TG
+      T=FC*(TM*(TGP-TG)+FC1*(TM*TG-TGM2M1/TM))
+      DTT=0.5D0*M*FC*TG21*(TM/TG*(TGP-TG)-FC1*(TM-TGM2M1/(TM*TG)))
+      DTT0=0.5D0*FC*((TGP+TGM)*(TM*TG-FC1*(TM*TG-TGM2M1/TM))+
+     * TM*(1.D0-TGP*TGM)-(1.D0+TGM2)*TGM2M/TM)
+      ELSE
+      TGP2M=TGP2M*TGP2
+      TGM2M=TGM2M*TGM2
+      FC=1.D0/(TGP-TGM)
+      FC1=1.D0/(2*M+1)
+      T=FC*FC1*(TGP2M*TGP-TGM2M*TGM)/TM
+      DTT=-T*M*0.5D0*(TG+CTG)
+      ENDIF
+
+      BTN(M)=M*T*CCOS(M)/RO
+  2   BPN(M)=-DTT*SSIN(M)/R
+
+      BTHETA=BTN(N) *800.
+      BPHI  =BPN(N) *800.
+
+      RETURN
+      END
+C
+C-------------------------------------------------------------------------
+C
+C
+         SUBROUTINE BIRK_SHL (A,PS,X_SC,X,Y,Z,BX,BY,BZ)
+C
+         IMPLICIT  REAL * 8  (A - H, O - Z)
+         DIMENSION A(86)
+C
+         CPS=DCOS(PS)
+         SPS=DSIN(PS)
+
+         S3PS=2.D0*CPS
+C
+         PST1=PS*A(85)
+         PST2=PS*A(86)
+
+         ST1=DSIN(PST1)
+         CT1=DCOS(PST1)
+         ST2=DSIN(PST2)
+         CT2=DCOS(PST2)
+
+         X1=X*CT1-Z*ST1
+         Z1=X*ST1+Z*CT1
+         X2=X*CT2-Z*ST2
+         Z2=X*ST2+Z*CT2
+C
+         L=0
+         GX=0.D0
+         GY=0.D0
+         GZ=0.D0
+C
+         DO 1 M=1,2     !    M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY)
+C                          AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY)
+             DO 2 I=1,3
+                  P=A(72+I)
+                  Q=A(78+I)
+                  CYPI=DCOS(Y/P)
+                  CYQI=DCOS(Y/Q)
+                  SYPI=DSIN(Y/P)
+                  SYQI=DSIN(Y/Q)
+C
+                DO 3 K=1,3
+                   R=A(75+K)
+                   S=A(81+K)
+                   SZRK=DSIN(Z1/R)
+                   CZSK=DCOS(Z2/S)
+                   CZRK=DCOS(Z1/R)
+                   SZSK=DSIN(Z2/S)
+                     SQPR=DSQRT(1.D0/P**2+1.D0/R**2)
+                     SQQS=DSQRT(1.D0/Q**2+1.D0/S**2)
+                        EPR=DEXP(X1*SQPR)
+                        EQS=DEXP(X2*SQQS)
+C
+                  DO 4 N=1,2  ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT
+C                                AND N=2 IS FOR THE SECOND ONE
+
+                    DO 5 NN=1,2 !   NN = 1,2 FURTHER SPLITS THE COEFFICIENTS INTO 2 PARTS,
+C                                         TO TAKE INTO ACCOUNT THE SCALE FACTOR DEPENDENCE
+
+                    IF (M.EQ.1) THEN
+                         FX=-SQPR*EPR*CYPI*SZRK
+                         FY=EPR*SYPI*SZRK/P
+                         FZ=-EPR*CYPI*CZRK/R
+                       IF (N.EQ.1) THEN
+                         IF (NN.EQ.1) THEN
+                          HX=FX
+                          HY=FY
+                          HZ=FZ
+                         ELSE
+                          HX=FX*X_SC
+                          HY=FY*X_SC
+                          HZ=FZ*X_SC
+                         ENDIF
+                       ELSE
+                         IF (NN.EQ.1) THEN
+                          HX=FX*CPS
+                          HY=FY*CPS
+                          HZ=FZ*CPS
+                         ELSE
+                          HX=FX*CPS*X_SC
+                          HY=FY*CPS*X_SC
+                          HZ=FZ*CPS*X_SC
+                         ENDIF
+                       ENDIF
+
+                     ELSE                            !   M.EQ.2
+                         FX=-SPS*SQQS*EQS*CYQI*CZSK
+                         FY=SPS/Q*EQS*SYQI*CZSK
+                         FZ=SPS/S*EQS*CYQI*SZSK
+                       IF (N.EQ.1) THEN
+                        IF (NN.EQ.1) THEN
+                          HX=FX
+                          HY=FY
+                          HZ=FZ
+                        ELSE
+                          HX=FX*X_SC
+                          HY=FY*X_SC
+                          HZ=FZ*X_SC
+                        ENDIF
+                       ELSE
+                        IF (NN.EQ.1) THEN
+                         HX=FX*S3PS
+                         HY=FY*S3PS
+                         HZ=FZ*S3PS
+                        ELSE
+                         HX=FX*S3PS*X_SC
+                         HY=FY*S3PS*X_SC
+                         HZ=FZ*S3PS*X_SC
+                        ENDIF
+                       ENDIF
+                  ENDIF
+       L=L+1
+
+       IF (M.EQ.1) THEN
+       HXR=HX*CT1+HZ*ST1
+       HZR=-HX*ST1+HZ*CT1
+       ELSE
+       HXR=HX*CT2+HZ*ST2
+       HZR=-HX*ST2+HZ*CT2
+       ENDIF
+
+       GX=GX+HXR*A(L)
+       GY=GY+HY *A(L)
+  5    GZ=GZ+HZR*A(L)
+
+  4   CONTINUE
+  3   CONTINUE
+  2   CONTINUE
+  1   CONTINUE
+
+      BX=GX
+      BY=GY
+      BZ=GZ
+
+      RETURN
+      END
+
+C
+C************************************************************************************
+C
+      SUBROUTINE FULL_RC (IOPR,PS,X,Y,Z,BXSRC,BYSRC,BZSRC,BXPRC,BYPRC,
+     *  BZPRC)
+C
+C   CALCULATES GSM FIELD COMPONENTS OF THE SYMMETRIC (SRC) AND PARTIAL (PRC) COMPONENTS OF THE RING CURRENT
+C   SRC  PROVIDES A DEPRESSION OF -28 nT AT EARTH
+C   PRC  CORRESPONDS TO THE PRESSURE DIFFERENCE OF 2 nPa BETWEEN MIDNIGHT AND NOON RING CURRENT
+C             PARTICLE PRESSURE AND YIELDS A DEPRESSION OF -17 nT AT X=-6Re
+C
+C   SC_SY AND SC_PR ARE SCALING FACTORS FOR THE SYMMETRIC AND PARTIAL COMPONENTS:
+C          VALUES LARGER THAN 1 RESULT IN SPATIALLY LARGER CURRENTS
+C
+C   PHI IS THE ROTATION ANGLE IN RADIANS OF THE PARTIAL RING CURRENT (MEASURED FROM MIDNIGHT TOWARD DUSK)
+C
+C     IOPR -  A RING CURRENT CALCULATION FLAG (FOR LEAST-SQUARES FITTING ONLY):
+C             IOPR=0 - BOTH SRC AND PRC FIELDS ARE CALCULATED
+C             IOPR=1 - SRC ONLY
+C             IOPR=2 - PRC ONLY
+C
+        IMPLICIT REAL*8 (A-H,O-Z)
+        DIMENSION C_SY(86),C_PR(86)
+        COMMON /RCPAR/ SC_SY,SC_PR,PHI
+C
+        DATA C_SY/1675.694858,1780.006388,-961.6082149,-1668.914259,
+     *-27.40437029,-107.4169670,27.76189943,92.89740503,-43.92949274,
+     *-403.6444072,6.167161865,298.2779761,-1680.779044,-1780.933039,
+     *964.1861088,1670.988659,27.48864650,107.7809519,-27.84600972,
+     *-93.20691865,44.28496784,404.4537249,-6.281958730,-298.6050952,
+     *-7.971914848,2.017383761,-1.492230168,-1.957411655,-.08525523181,
+     *-.3811813235,.08446716725,.3215044399,-.7141912767,-.9086294596,
+     *.2966677742,-.04736679933,-11.38731325,.1719795189,1.356233066,
+     *.8613438429,-.09143823092,-.2593979098,.04244838338,.06318383319,
+     *-.5861372726,-.03368780733,-.07104470269,-.06909052953,
+     *-60.18659631,-32.87563877,11.76450433,5.891673644,2.562360333,
+     *6.215377232,-1.273945165,-1.864704763,-5.394837143,-8.799382627,
+     *3.743066561,-.7649164511,57.09210569,32.61236511,-11.28688017,
+     *-5.849523392,-2.470635922,-5.961417272,1.230031099,1.793192595,
+     *5.383736074,8.369895153,-3.611544412,.7898988697,7.970609948,
+     *7.981216562,35.16822497,12.45651654,1.689755359,3.678712366,
+     *23.66117284,6.987136092,6.886678677,20.91245928,1.650064156,
+     *3.474068566,.3474715765,.6564043111/
+
+        DATA C_PR/-64820.58481,-63965.62048,66267.93413,135049.7504,
+     *-36.56316878,124.6614669,56.75637955,-87.56841077,5848.631425,
+     *4981.097722,-6233.712207,-10986.40188,68716.52057,65682.69473,
+     *-69673.32198,-138829.3568,43.45817708,-117.9565488,-62.14836263,
+     *79.83651604,-6211.451069,-5151.633113,6544.481271,11353.03491,
+     *23.72352603,-256.4846331,25.77629189,145.2377187,-4.472639098,
+     *-3.554312754,2.936973114,2.682302576,2.728979958,26.43396781,
+     *-9.312348296,-29.65427726,-247.5855336,-206.9111326,74.25277664,
+     *106.4069993,15.45391072,16.35943569,-5.965177750,-6.079451700,
+     *115.6748385,-35.27377307,-32.28763497,-32.53122151,93.74409310,
+     *84.25677504,-29.23010465,-43.79485175,-6.434679514,-6.620247951,
+     *2.443524317,2.266538956,-43.82903825,6.904117876,12.24289401,
+     *17.62014361,152.3078796,124.5505289,-44.58690290,-63.02382410,
+     *-8.999368955,-9.693774119,3.510930306,3.770949738,-77.96705716,
+     *22.07730961,20.46491655,18.67728847,9.451290614,9.313661792,
+     *644.7620970,418.2515954,7.183754387,35.62128817,19.43180682,
+     *39.57218411,15.69384715,7.123215241,2.300635346,21.90881131,
+     *-.01775839370,.3996346710/
+
+        CALL SRC_PRC (IOPR,SC_SY,SC_PR,PHI,PS,X,Y,Z,HXSRC,HYSRC,HZSRC,
+     *      HXPRC,HYPRC,HZPRC)
+
+        X_SC=SC_SY-1.D0
+        IF (IOPR.EQ.0.OR.IOPR.EQ.1) THEN
+          CALL RC_SHIELD (C_SY,PS,X_SC,X,Y,Z,FSX,FSY,FSZ)
+        ELSE
+           FSX=0.D0
+           FSY=0.D0
+           FSZ=0.D0
+        ENDIF
+
+        X_SC=SC_PR-1.D0
+        IF (IOPR.EQ.0.OR.IOPR.EQ.2) THEN
+          CALL RC_SHIELD (C_PR,PS,X_SC,X,Y,Z,FPX,FPY,FPZ)
+        ELSE
+           FPX=0.D0
+           FPY=0.D0
+           FPZ=0.D0
+        ENDIF
+
+        BXSRC=HXSRC+FSX
+        BYSRC=HYSRC+FSY
+        BZSRC=HZSRC+FSZ
+
+        BXPRC=HXPRC+FPX
+        BYPRC=HYPRC+FPY
+        BZPRC=HZPRC+FPZ
+
+        RETURN
+        END
+C---------------------------------------------------------------------------------------
+C
+       SUBROUTINE SRC_PRC (IOPR,SC_SY,SC_PR,PHI,PS,X,Y,Z,BXSRC,BYSRC,
+     *    BZSRC,BXPRC,BYPRC,BZPRC)
+C
+C   RETURNS FIELD COMPONENTS FROM A MODEL RING CURRENT, INCLUDING ITS SYMMETRIC PART
+C     AND A PARTIAL RING CURRENT, CLOSED VIA BIRKELAND CURRENTS. BASED ON RESULTS, DESCRIBED
+C     IN A PAPER "MODELING THE INNER MAGNETOSPHERE: ASYMMETRIC RING CURRENT AND REGION 2
+C     BIRKELAND CURRENTS REVISITED" (JGR, DEC.2000).
+C
+C     IOPR -  A RING CURRENT CALCULATION FLAG (FOR LEAST-SQUARES FITTING ONLY):
+C             IOPR=0 - BOTH SRC AND PRC FIELDS ARE CALCULATED
+C             IOPR=1 - SRC ONLY
+C             IOPR=2 - PRC ONLY
+C
+C     SC_SY &  SC_PR ARE SCALE FACTORS FOR THE ABOVE COMPONENTS;  TAKING SC<1 OR SC>1 MAKES THE CURRENTS
+C                      SHRINK OR EXPAND, RESPECTIVELY.
+C
+C   PHI IS THE ROTATION ANGLE (RADIANS) OF THE PARTIAL RING CURRENT (MEASURED FROM MIDNIGHT TOWARD DUSK)
+C
+        IMPLICIT REAL*8 (A-H,O-Z)
+c
+c   1.  TRANSFORM TO TILTED COORDINATES (i.e., SM coordinates):
+C
+        CPS=DCOS(PS)
+        SPS=DSIN(PS)
+
+        XT=X*CPS-Z*SPS
+        ZT=Z*CPS+X*SPS
+C
+C   2.  SCALE THE COORDINATES FOR THE SYMMETRIC AND PARTIAL RC COMPONENTS:
+C
+        XTS=XT/SC_SY    !  SYMMETRIC
+        YTS=Y /SC_SY
+        ZTS=ZT/SC_SY
+
+        XTA=XT/SC_PR    !  PARTIAL
+        YTA=Y /SC_PR
+        ZTA=ZT/SC_PR
+C
+C   3.  CALCULATE COMPONENTS OF THE TOTAL FIELD IN THE TILTED (SOLAR-MAGNETIC) COORDINATE SYSTEM:
+C
+C
+C    3a. SYMMETRIC FIELD:
+C
+        IF (IOPR.LE.1) CALL RC_SYMM(XTS,YTS,ZTS,BXS,BYS,BZS)
+        IF (IOPR.EQ.0.OR.IOPR.EQ.2)
+     *                 CALL PRC_SYMM(XTA,YTA,ZTA,BXA_S,BYA_S,BZA_S)
+
+C    3b. ROTATE THE SCALED SM COORDINATES BY PHI AROUND ZSM AXIS AND CALCULATE QUADRUPOLE PRC FIELD
+C         IN THOSE COORDS:
+
+        CP=DCOS(PHI)
+        SP=DSIN(PHI)
+        XR=XTA*CP-YTA*SP
+        YR=XTA*SP+YTA*CP
+
+        IF (IOPR.EQ.0.OR.IOPR.EQ.2)
+     *                 CALL PRC_QUAD(XR,YR,ZTA,BXA_QR,BYA_QR,BZA_Q)
+
+C    3c. TRANSFORM THE QUADRUPOLE FIELD COMPONENTS BACK TO THE SM COORDS:
+C
+        BXA_Q= BXA_QR*CP+BYA_QR*SP
+        BYA_Q=-BXA_QR*SP+BYA_QR*CP
+
+C    3d. FIND THE TOTAL FIELD OF PRC (SYMM.+QUADR.) IN THE SM COORDS:
+C
+        BXP=BXA_S+BXA_Q
+        BYP=BYA_S+BYA_Q
+        BZP=BZA_S+BZA_Q
+C
+C   4.  TRANSFORM THE FIELDS OF BOTH PARTS OF THE RING CURRENT BACK TO THE GSM SYSTEM:
+C
+        BXSRC=BXS*CPS+BZS*SPS   !    SYMMETRIC RC
+        BYSRC=BYS
+        BZSRC=BZS*CPS-BXS*SPS
+C
+        BXPRC=BXP*CPS+BZP*SPS   !    PARTIAL RC
+        BYPRC=BYP
+        BZPRC=BZP*CPS-BXP*SPS
+C
+        RETURN
+        END
+C
+C&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
+C
+      SUBROUTINE RC_SYMM (X,Y,Z,BX,BY,BZ)
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+      DATA DS,DC/1.D-2,0.99994999875D0/, D/1.D-4/,DRD/5.D3/  ! DS=SIN(THETA) AT THE BOUNDARY OF THE LINEARITY
+                                                                        REGION; DC=SQRT(1-DS**2);  DRD=1/(2*D)
+      RHO2=X**2+Y**2
+      R2=RHO2+Z**2
+      R=DSQRT(R2)
+      RP=R+D
+      RM=R-D
+      SINT=DSQRT(RHO2)/R
+      COST=Z/R
+
+      IF (SINT.LT.DS) THEN  !  TOO CLOSE TO THE Z-AXIS; USING A LINEAR APPROXIMATION A_PHI~SINT,
+C                                    TO AVOID THE SINGULARITY PROBLEM
+        A=AP(R,DS,DC)/DS
+        DARDR=(RP*AP(RP,DS,DC)-RM*AP(RM,DS,DC))*DRD
+        FXY=Z*(2.D0*A-DARDR)/(R*R2)
+        BX=FXY*X
+        BY=FXY*Y
+        BZ=(2.D0*A*COST**2+DARDR*SINT**2)/R
+
+       ELSE
+
+        THETA=DATAN2(SINT,COST)
+        TP=THETA+D
+        TM=THETA-D
+        SINTP=DSIN(TP)
+        SINTM=DSIN(TM)
+        COSTP=DCOS(TP)
+        COSTM=DCOS(TM)
+        BR=(SINTP*AP(R,SINTP,COSTP)-SINTM*AP(R,SINTM,COSTM))
+     *       /(R*SINT)*DRD
+        BT=(RM*AP(RM,SINT,COST)-RP*AP(RP,SINT,COST))/R*DRD
+        FXY=(BR+BT*COST/SINT)/R
+        BX=FXY*X
+        BY=FXY*Y
+        BZ=BR*COST-BT*SINT
+
+      ENDIF
+
+      RETURN
+      END
+c
+c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
+C
+      DOUBLE PRECISION FUNCTION AP(R,SINT,COST)
+C
+C      Calculates azimuthal component of the vector potential of the symmetric
+c  part of the model ring current.
+C
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+      LOGICAL PROX   !  INDICATES WHETHER WE ARE TOO CLOSE TO THE AXIS OF SYMMETRY, WHERE THE INVERSION
+C                                                             OF DIPOLAR COORDINATES BECOMES INACCURATE
+      DATA A1,A2,RRC1,DD1,RRC2,DD2,P1,R1,DR1,DLA1,P2,R2,DR2,DLA2,P3,
+     *R3,DR3/-563.3722359,425.0891691,4.150588549,2.266150226,
+     * 3.334503403,3.079071195,.02602428295,8.937790598,3.327934895,
+     *.4487061833,.09125832351,6.243029867,1.750145910,.4181957162,
+     *.06106691992,2.079908581,.6828548533/
+
+      PROX=.FALSE.
+      SINT1=SINT
+      COST1=COST
+      IF (SINT1.LT.1.D-2) THEN  !  TOO CLOSE TO Z-AXIS;  USE LINEAR INTERPOLATION BETWEEN SINT=0 & SINT=0.01
+        SINT1=1.D-2
+        COST1=.99994999875
+        PROX=.TRUE.
+      ENDIF
+
+         ALPHA=SINT1**2/R         !  R,THETA -> ALPHA,GAMMA
+         GAMMA=COST1/R**2
+
+         ARG1=-((R-R1)/DR1)**2-(COST1/DLA1)**2
+         ARG2=-((R-R2)/DR2)**2-(COST1/DLA2)**2
+         ARG3=-((R-R3)/DR3)**2
+
+         IF (ARG1.LT.-500.D0) THEN        !   TO PREVENT "FLOATING UNDERFLOW" CRASHES
+           DEXP1=0.D0
+         ELSE
+           DEXP1=DEXP(ARG1)
+         ENDIF
+
+         IF (ARG2.LT.-500.D0) THEN
+           DEXP2=0.D0
+         ELSE
+           DEXP2=DEXP(ARG2)
+         ENDIF
+
+         IF (ARG3.LT.-500.D0) THEN
+           DEXP3=0.D0
+         ELSE
+           DEXP3=DEXP(ARG3)
+         ENDIF
+
+
+         ALPHA_S=ALPHA*(1.D0+P1*DEXP1+P2*DEXP2+P3*DEXP3)     !  ALPHA -> ALPHA_S  (DEFORMED)
+
+         GAMMA_S=GAMMA
+         GAMMAS2=GAMMA_S**2
+
+
+         ALSQH=ALPHA_S**2/2.D0            !  ALPHA_S,GAMMA_S -> RS,SINTS,COSTS
+         F=64.D0/27.D0*GAMMAS2+ALSQH**2
+         Q=(DSQRT(F)+ALSQH)**(1.D0/3.D0)
+         C=Q-4.D0*GAMMAS2**(1.D0/3.D0)/(3.D0*Q)
+         IF (C.LT.0.D0) C=0.D0
+         G=DSQRT(C**2+4.D0*GAMMAS2**(1.D0/3.D0))
+         RS=4.D0/((DSQRT(2.D0*G-C)+DSQRT(C))*(G+C))
+         COSTS=GAMMA_S*RS**2
+         SINTS=DSQRT(1.D0-COSTS**2)
+         RHOS=RS*SINTS
+         RHOS2=RHOS**2
+         ZS=RS*COSTS
+C
+c  1st loop:
+
+         P=(RRC1+RHOS)**2+ZS**2+DD1**2
+         XK2=4.D0*RRC1*RHOS/P
+         XK=SQRT(XK2)
+         XKRHO12=XK*SQRT(RHOS)
+C
+      XK2S=1.D0-XK2
+      DL=DLOG(1.D0/XK2S)
+      ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+
+     *     XK2S*(0.03742563713+XK2S*0.01451196212))) +DL*
+     *     (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+
+     *     XK2S*(0.03328355346D0+XK2S*0.00441787012D0))))
+      ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S*
+     *      (0.04757383546D0+XK2S*0.01736506451D0))) +DL*
+     *     XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S*
+     *       (0.04069697526D0+XK2S*0.00526449639D0)))
+C
+      APHI1=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12
+c
+c  2nd loop:
+
+         P=(RRC2+RHOS)**2+ZS**2+DD2**2
+         XK2=4.D0*RRC2*RHOS/P
+         XK=SQRT(XK2)
+         XKRHO12=XK*SQRT(RHOS)
+C
+      XK2S=1.D0-XK2
+      DL=DLOG(1.D0/XK2S)
+      ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+
+     *     XK2S*(0.03742563713+XK2S*0.01451196212))) +DL*
+     *     (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+
+     *     XK2S*(0.03328355346D0+XK2S*0.00441787012D0))))
+      ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S*
+     *      (0.04757383546D0+XK2S*0.01736506451D0))) +DL*
+     *     XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S*
+     *       (0.04069697526D0+XK2S*0.00526449639D0)))
+C
+       APHI2=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12
+
+       AP=A1*APHI1+A2*APHI2
+       IF (PROX) AP=AP*SINT/SINT1   !   LINEAR INTERPOLATION, IF TOO CLOSE TO THE Z-AXIS
+C
+       RETURN
+       END
+c
+c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+C
+      SUBROUTINE PRC_SYMM (X,Y,Z,BX,BY,BZ)
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+      DATA DS,DC/1.D-2,0.99994999875D0/, D/1.D-4/,DRD/5.D3/  ! DS=SIN(THETA) AT THE BOUNDARY OF THE LINEARITY
+                                                                        REGION; DC=SQRT(1-DS**2);  DRD=1/(2*D)
+      RHO2=X**2+Y**2
+      R2=RHO2+Z**2
+      R=DSQRT(R2)
+      RP=R+D
+      RM=R-D
+      SINT=DSQRT(RHO2)/R
+      COST=Z/R
+
+      IF (SINT.LT.DS) THEN  !  TOO CLOSE TO THE Z-AXIS; USING A LINEAR APPROXIMATION A_PHI~SINT,
+C                                    TO AVOID THE SINGULARITY PROBLEM
+        A=APPRC(R,DS,DC)/DS
+        DARDR=(RP*APPRC(RP,DS,DC)-RM*APPRC(RM,DS,DC))*DRD
+        FXY=Z*(2.D0*A-DARDR)/(R*R2)
+        BX=FXY*X
+        BY=FXY*Y
+        BZ=(2.D0*A*COST**2+DARDR*SINT**2)/R
+
+       ELSE
+
+        THETA=DATAN2(SINT,COST)
+        TP=THETA+D
+        TM=THETA-D
+        SINTP=DSIN(TP)
+        SINTM=DSIN(TM)
+        COSTP=DCOS(TP)
+        COSTM=DCOS(TM)
+        BR=(SINTP*APPRC(R,SINTP,COSTP)-SINTM*APPRC(R,SINTM,COSTM))
+     *       /(R*SINT)*DRD
+        BT=(RM*APPRC(RM,SINT,COST)-RP*APPRC(RP,SINT,COST))/R*DRD
+        FXY=(BR+BT*COST/SINT)/R
+        BX=FXY*X
+        BY=FXY*Y
+        BZ=BR*COST-BT*SINT
+
+      ENDIF
+
+      RETURN
+      END
+c
+c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
+C
+C
+      DOUBLE PRECISION FUNCTION APPRC(R,SINT,COST)
+C
+C      Calculates azimuthal component of the vector potential of the symmetric
+c  part of the model PARTIAL ring current.
+C
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+      LOGICAL PROX
+      DATA A1,A2,RRC1,DD1,RRC2,DD2,P1,ALPHA1,DAL1,BETA1,DG1,P2,ALPHA2,
+     * DAL2,BETA2,DG2,BETA3,P3,ALPHA3,DAL3,BETA4,DG3,BETA5,Q0,Q1,ALPHA4,
+     * DAL4,DG4,Q2,ALPHA5,DAL5,DG5,BETA6,BETA7
+     * /-80.11202281,12.58246758,6.560486035,1.930711037,3.827208119,
+     *.7789990504,.3058309043,.1817139853,.1257532909,3.422509402,
+     *.04742939676,-4.800458958,-.02845643596,.2188114228,2.545944574,
+     *.00813272793,.35868244,103.1601001,-.00764731187,.1046487459,
+     *2.958863546,.01172314188,.4382872938,.01134908150,14.51339943,
+     *.2647095287,.07091230197,.01512963586,6.861329631,.1677400816,
+     *.04433648846,.05553741389,.7665599464,.7277854652/
+
+      PROX=.FALSE.
+      SINT1=SINT
+      COST1=COST
+      IF (SINT1.LT.1.D-2) THEN  !  TOO CLOSE TO Z-AXIS;  USE LINEAR INTERPOLATION BETWEEN SINT=0 & SINT=0.01
+        SINT1=1.D-2
+        COST1=.99994999875
+        PROX=.TRUE.
+      ENDIF
+
+         ALPHA=SINT1**2/R         !  R,THETA -> ALPHA,GAMMA
+         GAMMA=COST1/R**2
+
+         ARG1=-(GAMMA/DG1)**2
+         ARG2=-((ALPHA-ALPHA4)/DAL4)**2-(GAMMA/DG4)**2
+
+         IF (ARG1.LT.-500.D0) THEN        !   TO PREVENT "FLOATING UNDERFLOW" CRASHES
+           DEXP1=0.D0
+         ELSE
+           DEXP1=DEXP(ARG1)
+         ENDIF
+
+         IF (ARG2.LT.-500.D0) THEN        !   TO PREVENT "FLOATING UNDERFLOW" CRASHES
+           DEXP2=0.D0
+         ELSE
+           DEXP2=DEXP(ARG2)
+         ENDIF
+
+         ALPHA_S=ALPHA*(1.D0+P1/(1.D0+((ALPHA-ALPHA1)/DAL1)**2)**BETA1
+     * *DEXP1+P2*(ALPHA-ALPHA2)/(1.D0+((ALPHA-ALPHA2)/DAL2)**2)**BETA2
+     */(1.D0+(GAMMA/DG2)**2)**BETA3
+     *+P3*(ALPHA-ALPHA3)**2/(1.D0+((ALPHA-ALPHA3)/DAL3)**2)**BETA4
+     */(1.D0+(GAMMA/DG3)**2)**BETA5)     !  ALPHA -> ALPHA_S  (DEFORMED)
+
+         GAMMA_S=GAMMA*(1.D0+Q0+Q1*(ALPHA-ALPHA4)*DEXP2              !  GAMMA -> GAMMA_  (DEFORMED)
+     * +Q2*(ALPHA-ALPHA5)/(1.D0+((ALPHA-ALPHA5)/DAL5)**2)**BETA6
+     * /(1.D0+(GAMMA/DG5)**2)**BETA7)
+
+         GAMMAS2=GAMMA_S**2
+
+         ALSQH=ALPHA_S**2/2.D0                            !  ALPHA_S,GAMMA_S -> RS,SINTS,COSTS
+         F=64.D0/27.D0*GAMMAS2+ALSQH**2
+         Q=(DSQRT(F)+ALSQH)**(1.D0/3.D0)
+         C=Q-4.D0*GAMMAS2**(1.D0/3.D0)/(3.D0*Q)
+         IF (C.LT.0.D0) C=0.D0
+         G=DSQRT(C**2+4.D0*GAMMAS2**(1.D0/3.D0))
+         RS=4.D0/((DSQRT(2.D0*G-C)+DSQRT(C))*(G+C))
+         COSTS=GAMMA_S*RS**2
+         SINTS=DSQRT(1.D0-COSTS**2)
+         RHOS=RS*SINTS
+         RHOS2=RHOS**2
+         ZS=RS*COSTS
+C
+c  1st loop:
+
+         P=(RRC1+RHOS)**2+ZS**2+DD1**2
+         XK2=4.D0*RRC1*RHOS/P
+         XK=SQRT(XK2)
+         XKRHO12=XK*SQRT(RHOS)
+C
+      XK2S=1.D0-XK2
+      DL=DLOG(1.D0/XK2S)
+      ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+
+     *     XK2S*(0.03742563713+XK2S*0.01451196212))) +DL*
+     *     (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+
+     *     XK2S*(0.03328355346D0+XK2S*0.00441787012D0))))
+      ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S*
+     *      (0.04757383546D0+XK2S*0.01736506451D0))) +DL*
+     *     XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S*
+     *       (0.04069697526D0+XK2S*0.00526449639D0)))
+C
+      APHI1=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12
+c
+c  2nd loop:
+
+         P=(RRC2+RHOS)**2+ZS**2+DD2**2
+         XK2=4.D0*RRC2*RHOS/P
+         XK=SQRT(XK2)
+         XKRHO12=XK*SQRT(RHOS)
+C
+      XK2S=1.D0-XK2
+      DL=DLOG(1.D0/XK2S)
+      ELK=1.38629436112d0+XK2S*(0.09666344259D0+XK2S*(0.03590092383+
+     *     XK2S*(0.03742563713+XK2S*0.01451196212))) +DL*
+     *     (0.5D0+XK2S*(0.12498593597D0+XK2S*(0.06880248576D0+
+     *     XK2S*(0.03328355346D0+XK2S*0.00441787012D0))))
+      ELE=1.D0+XK2S*(0.44325141463D0+XK2S*(0.0626060122D0+XK2S*
+     *      (0.04757383546D0+XK2S*0.01736506451D0))) +DL*
+     *     XK2S*(0.2499836831D0+XK2S*(0.09200180037D0+XK2S*
+     *       (0.04069697526D0+XK2S*0.00526449639D0)))
+C
+      APHI2=((1.D0-XK2*0.5D0)*ELK-ELE)/XKRHO12
+
+      APPRC=A1*APHI1+A2*APHI2
+      IF (PROX) APPRC=APPRC*SINT/SINT1   !   LINEAR INTERPOLATION, IF TOO CLOSE TO THE Z-AXIS
+C
+      RETURN
+      END
+C
+C@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+C
+C
+         SUBROUTINE PRC_QUAD (X,Y,Z,BX,BY,BZ)
+C
+         IMPLICIT  REAL * 8  (A - H, O - Z)
+
+         DATA D,DD/1.D-4,2.D-4/, DS/1.D-2/,DC/0.99994999875D0/
+
+         RHO2=X**2+Y**2
+         R=DSQRT(RHO2+Z**2)
+         RHO=DSQRT(RHO2)
+         SINT=RHO/R
+         COST=Z/R
+         RP=R+D
+         RM=R-D
+
+         IF (SINT.GT.DS) THEN
+           CPHI=X/RHO
+           SPHI=Y/RHO
+           BR=BR_PRC_Q(R,SINT,COST)
+           BT=BT_PRC_Q(R,SINT,COST)
+           DBRR=(BR_PRC_Q(RP,SINT,COST)-BR_PRC_Q(RM,SINT,COST))/DD
+           THETA=DATAN2(SINT,COST)
+           TP=THETA+D
+           TM=THETA-D
+           SINTP=DSIN(TP)
+           COSTP=DCOS(TP)
+           SINTM=DSIN(TM)
+           COSTM=DCOS(TM)
+           DBTT=(BT_PRC_Q(R,SINTP,COSTP)-BT_PRC_Q(R,SINTM,COSTM))/DD
+           BX=SINT*(BR+(BR+R*DBRR+DBTT)*SPHI**2)+COST*BT
+           BY=-SINT*SPHI*CPHI*(BR+R*DBRR+DBTT)
+           BZ=(BR*COST-BT*SINT)*CPHI
+         ELSE
+           ST=DS
+           CT=DC
+           IF (Z.LT.0.D0) CT=-DC
+           THETA=DATAN2(ST,CT)
+           TP=THETA+D
+           TM=THETA-D
+           SINTP=DSIN(TP)
+           COSTP=DCOS(TP)
+           SINTM=DSIN(TM)
+           COSTM=DCOS(TM)
+           BR=BR_PRC_Q(R,ST,CT)
+           BT=BT_PRC_Q(R,ST,CT)
+           DBRR=(BR_PRC_Q(RP,ST,CT)-BR_PRC_Q(RM,ST,CT))/DD
+           DBTT=(BT_PRC_Q(R,SINTP,COSTP)-BT_PRC_Q(R,SINTM,COSTM))/DD
+           FCXY=R*DBRR+DBTT
+           BX=(BR*(X**2+2.D0*Y**2)+FCXY*Y**2)/(R*ST)**2+BT*COST
+           BY=-(BR+FCXY)*X*Y/(R*ST)**2
+           BZ=(BR*COST/ST-BT)*X/R
+         ENDIF
+
+         RETURN
+         END
+c
+c&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
+C
+      DOUBLE PRECISION FUNCTION BR_PRC_Q (R,SINT,COST)
+C
+Calculates the radial component of the "quadrupole" part of the model partial ring current.
+C
+      IMPLICIT  REAL * 8  (A - H, O - Z)
+
+      DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,   ! ALL LINEAR PARAMETERS HERE
+     * A18,XK1,AL1,DAL1,B1,BE1,XK2,AL2,DAL2,B2,BE2,XK3,XK4,AL3,DAL3,B3,  ! WERE MULTIPLIED BY 0.1,
+     * BE3,AL4,DAL4,DG1,AL5,DAL5,DG2,C1,C2,C3,AL6,DAL6,DRM/-21.2666329,  ! SO THAT THEY CORRESPOND TO P_0=1 nPa,
+     *32.24527521,-6.062894078,7.515660734,233.7341288,-227.1195714,     ! RATHER THAN THE ORIGINAL VALUE OF 10 nPa
+     *8.483233889,16.80642754,-24.63534184,9.067120578,-1.052686913,     ! ASSUMED IN THE BIOT-SAVART INTEGRAL
+     *-12.08384538,18.61969572,-12.71686069,47017.35679,-50646.71204,
+     *7746.058231,1.531069371,2.318824273,.1417519429,.6388013110E-02,
+     *5.303934488,4.213397467,.7955534018,.1401142771,.2306094179E-01,
+     *3.462235072,2.568743010,3.477425908,1.922155110,.1485233485,
+     *.2319676273E-01,7.830223587,8.492933868,.1295221828,.01753008801,
+     *.01125504083,.1811846095,.04841237481,.01981805097,6.557801891,
+     *6.348576071,5.744436687,.2265212965,.1301957209,.5654023158/
+
+        SINT2=SINT**2
+        COST2=COST**2
+        SC=SINT*COST
+        ALPHA=SINT2/R
+        GAMMA=COST/R**2
+
+        CALL FFS(ALPHA,AL1,DAL1,F,FA,FS)
+        D1=SC*F**XK1/((R/B1)**BE1+1.D0)
+        D2=D1*COST2
+
+        CALL FFS(ALPHA,AL2,DAL2,F,FA,FS)
+        D3=SC*FS**XK2/((R/B2)**BE2+1.D0)
+        D4=D3*COST2
+
+        CALL FFS(ALPHA,AL3,DAL3,F,FA,FS)
+        D5=SC*(ALPHA**XK3)*(FS**XK4)/((R/B3)**BE3+1.D0)
+        D6=D5*COST2
+
+        ARGA=((ALPHA-AL4)/DAL4)**2+1.D0
+        ARGG=1.D0+(GAMMA/DG1)**2
+
+        D7=SC/ARGA/ARGG
+        D8=D7/ARGA
+        D9=D8/ARGA
+        D10=D9/ARGA
+
+        ARGA=((ALPHA-AL5)/DAL5)**2+1.D0
+        ARGG=1.D0+(GAMMA/DG2)**2
+
+        D11=SC/ARGA/ARGG
+        D12=D11/ARGA
+        D13=D12/ARGA
+        D14=D13/ARGA
+
+
+        D15=SC/(R**4+C1**4)
+        D16=SC/(R**4+C2**4)*COST2
+        D17=SC/(R**4+C3**4)*COST2**2
+
+        CALL FFS(ALPHA,AL6,DAL6,F,FA,FS)
+        D18=SC*FS/(1.D0+((R-1.2D0)/DRM)**2)
+
+        BR_PRC_Q=A1*D1+A2*D2+A3*D3+A4*D4+A5*D5+A6*D6+A7*D7+A8*D8+A9*D9+
+     *  A10*D10+A11*D11+A12*D12+A13*D13+A14*D14+A15*D15+A16*D16+A17*D17+
+     *   A18*D18
+C
+        RETURN
+        END
+c
+C%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+C
+        DOUBLE PRECISION FUNCTION BT_PRC_Q (R,SINT,COST)
+C
+Calculates the Theta component of the "quadrupole" part of the model partial ring current.
+C
+        IMPLICIT  REAL * 8  (A - H, O - Z)
+
+      DATA A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,  ! ALL LINEAR PARAMETERS HERE
+     *XK1,AL1,DAL1,B1,BE1,XK2,AL2,DAL2,BE2,XK3,XK4,AL3,DAL3,B3,BE3,AL4, ! WERE MULTIPLIED BY 0.1,
+     *DAL4,DG1,AL5,DAL5,DG2,C1,C2,C3/12.74640393,-7.516393516,          ! SO THAT THEY CORRESPOND TO P_0=1 nPa,
+     *-5.476233865,3.212704645,-59.10926169,46.62198189,-.01644280062,  ! RATHER THAN THE ORIGINAL VALUE OF 10 nPa
+     *.1234229112,-.08579198697,.01321366966,.8970494003,9.136186247,   ! ASSUMED IN THE BIOT-SAVART INTEGRAL
+     *-38.19301215,21.73775846,-410.0783424,-69.90832690,-848.8543440,
+     *1.243288286,.2071721360,.05030555417,7.471332374,3.180533613,
+     *1.376743507,.1568504222,.02092910682,1.985148197,.3157139940,
+     *1.056309517,.1701395257,.1019870070,6.293740981,5.671824276,
+     *.1280772299,.02189060799,.01040696080,.1648265607,.04701592613,
+     *.01526400086,12.88384229,3.361775101,23.44173897/
+
+        SINT2=SINT**2
+        COST2=COST**2
+        SC=SINT*COST
+        ALPHA=SINT2/R
+        GAMMA=COST/R**2
+
+        CALL FFS(ALPHA,AL1,DAL1,F,FA,FS)
+        D1=F**XK1/((R/B1)**BE1+1.D0)
+        D2=D1*COST2
+
+        CALL FFS(ALPHA,AL2,DAL2,F,FA,FS)
+        D3=FA**XK2/R**BE2
+        D4=D3*COST2
+
+        CALL FFS(ALPHA,AL3,DAL3,F,FA,FS)
+        D5=FS**XK3*ALPHA**XK4/((R/B3)**BE3+1.D0)
+        D6=D5*COST2
+
+        CALL FFS(GAMMA,0.D0,DG1,F,FA,FS)
+        FCC=(1.D0+((ALPHA-AL4)/DAL4)**2)
+        D7 =1.D0/FCC*FS
+        D8 =D7/FCC
+        D9 =D8/FCC
+        D10=D9/FCC
+
+        ARG=1.D0+((ALPHA-AL5)/DAL5)**2
+        D11=1.D0/ARG/(1.D0+(GAMMA/DG2)**2)
+        D12=D11/ARG
+        D13=D12/ARG
+        D14=D13/ARG
+
+        D15=1.D0/(R**4+C1**2)
+        D16=COST2/(R**4+C2**2)
+        D17=COST2**2/(R**4+C3**2)
+C
+        BT_PRC_Q=A1*D1+A2*D2+A3*D3+A4*D4+A5*D5+A6*D6+A7*D7+A8*D8+A9*D9+
+     *   A10*D10+A11*D11+A12*D12+A13*D13+A14*D14+A15*D15+A16*D16+A17*D17
+C
+       RETURN
+       END
+c
+c@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
+
+       SUBROUTINE FFS(A,A0,DA,F,FA,FS)
+       IMPLICIT  REAL * 8  (A - H, O - Z)
+       SQ1=DSQRT((A+A0)**2+DA**2)
+       SQ2=DSQRT((A-A0)**2+DA**2)
+       FA=2.D0/(SQ1+SQ2)
+       F=FA*A
+       FS=0.5D0*(SQ1+SQ2)/(SQ1*SQ2)*(1.D0-F*F)
+       RETURN
+       END
+C
+C||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
+C
+C-------------------------------------------------------------------------
+C
+C
+         SUBROUTINE RC_SHIELD (A,PS,X_SC,X,Y,Z,BX,BY,BZ)
+C
+       IMPLICIT  REAL * 8  (A - H, O - Z)
+         DIMENSION A(86)
+C
+         FAC_SC=(X_SC+1.D0)**3
+C
+         CPS=DCOS(PS)
+         SPS=DSIN(PS)
+
+         S3PS=2.D0*CPS
+C
+         PST1=PS*A(85)
+         PST2=PS*A(86)
+
+         ST1=DSIN(PST1)
+         CT1=DCOS(PST1)
+         ST2=DSIN(PST2)
+         CT2=DCOS(PST2)
+
+         X1=X*CT1-Z*ST1
+         Z1=X*ST1+Z*CT1
+         X2=X*CT2-Z*ST2
+         Z2=X*ST2+Z*CT2
+C
+         L=0
+         GX=0.D0
+         GY=0.D0
+         GZ=0.D0
+C
+         DO 1 M=1,2     !    M=1 IS FOR THE 1ST SUM ("PERP." SYMMETRY)
+C                          AND M=2 IS FOR THE SECOND SUM ("PARALL." SYMMETRY)
+             DO 2 I=1,3
+                  P=A(72+I)
+                  Q=A(78+I)
+                  CYPI=DCOS(Y/P)
+                  CYQI=DCOS(Y/Q)
+                  SYPI=DSIN(Y/P)
+                  SYQI=DSIN(Y/Q)
+C
+                DO 3 K=1,3
+                   R=A(75+K)
+                   S=A(81+K)
+                   SZRK=DSIN(Z1/R)
+                   CZSK=DCOS(Z2/S)
+                   CZRK=DCOS(Z1/R)
+                   SZSK=DSIN(Z2/S)
+                     SQPR=DSQRT(1.D0/P**2+1.D0/R**2)
+                     SQQS=DSQRT(1.D0/Q**2+1.D0/S**2)
+                        EPR=DEXP(X1*SQPR)
+                        EQS=DEXP(X2*SQQS)
+C
+                  DO 4 N=1,2  ! N=1 IS FOR THE FIRST PART OF EACH COEFFICIENT
+C                                AND N=2 IS FOR THE SECOND ONE
+
+                    DO 5 NN=1,2 !   NN = 1,2 FURTHER SPLITS THE COEFFICIENTS INTO 2 PARTS,
+C                                         TO TAKE INTO ACCOUNT THE SCALE FACTOR DEPENDENCE
+
+                    IF (M.EQ.1) THEN
+                         FX=-SQPR*EPR*CYPI*SZRK  *FAC_SC
+                         FY=EPR*SYPI*SZRK/P   *FAC_SC
+                         FZ=-EPR*CYPI*CZRK/R  *FAC_SC
+                       IF (N.EQ.1) THEN
+                         IF (NN.EQ.1) THEN
+                          HX=FX
+                          HY=FY
+                          HZ=FZ
+                         ELSE
+                          HX=FX*X_SC
+                          HY=FY*X_SC
+                          HZ=FZ*X_SC
+                         ENDIF
+                       ELSE
+                         IF (NN.EQ.1) THEN
+                          HX=FX*CPS
+                          HY=FY*CPS
+                          HZ=FZ*CPS
+                         ELSE
+                          HX=FX*CPS*X_SC
+                          HY=FY*CPS*X_SC
+                          HZ=FZ*CPS*X_SC
+                         ENDIF
+                       ENDIF
+
+                     ELSE                            !   M.EQ.2
+                         FX=-SPS*SQQS*EQS*CYQI*CZSK  *FAC_SC
+                         FY=SPS/Q*EQS*SYQI*CZSK   *FAC_SC
+                         FZ=SPS/S*EQS*CYQI*SZSK   *FAC_SC
+                       IF (N.EQ.1) THEN
+                        IF (NN.EQ.1) THEN
+                          HX=FX
+                          HY=FY
+                          HZ=FZ
+                        ELSE
+                          HX=FX*X_SC
+                          HY=FY*X_SC
+                          HZ=FZ*X_SC
+                        ENDIF
+                       ELSE
+                        IF (NN.EQ.1) THEN
+                         HX=FX*S3PS
+                         HY=FY*S3PS
+                         HZ=FZ*S3PS
+                        ELSE
+                         HX=FX*S3PS*X_SC
+                         HY=FY*S3PS*X_SC
+                         HZ=FZ*S3PS*X_SC
+                        ENDIF
+                       ENDIF
+                  ENDIF
+       L=L+1
+
+       IF (M.EQ.1) THEN
+       HXR=HX*CT1+HZ*ST1
+       HZR=-HX*ST1+HZ*CT1
+       ELSE
+       HXR=HX*CT2+HZ*ST2
+       HZR=-HX*ST2+HZ*CT2
+       ENDIF
+
+       GX=GX+HXR*A(L)
+       GY=GY+HY *A(L)
+  5    GZ=GZ+HZR*A(L)
+
+  4   CONTINUE
+  3   CONTINUE
+  2   CONTINUE
+  1   CONTINUE
+
+      BX=GX
+      BY=GY
+      BZ=GZ
+
+      RETURN
+      END
+C
+c===========================================================================
+c
+       SUBROUTINE DIPOLE (PS,X,Y,Z,BX,BY,BZ)
+C
+C      A DOUBLE PRECISION ROUTINE
+C
+C  CALCULATES GSM COMPONENTS OF A GEODIPOLE FIELD WITH THE DIPOLE MOMENT
+C  CORRESPONDING TO THE EPOCH OF 2000.
+C
+C----INPUT PARAMETERS:
+C     PS - GEODIPOLE TILT ANGLE IN RADIANS,
+C     X,Y,Z - GSM COORDINATES IN RE (1 RE = 6371.2 km)
+C
+C----OUTPUT PARAMETERS:
+C     BX,BY,BZ - FIELD COMPONENTS IN GSM SYSTEM, IN NANOTESLA.
+C
+      IMPLICIT REAL*8 (A-H,O-Z)
+      SPS=DSIN(PS)
+      CPS=DCOS(PS)
+      P=X**2
+      U=Z**2
+      V=3.D0*Z*X
+      T=Y**2
+      Q=30115.D0/DSQRT(P+T+U)**5
+      BX=Q*((T+U-2.D0*P)*SPS-V*CPS)
+      BY=-3.D0*Y*Q*(X*SPS+Z*CPS)
+      BZ=Q*((P+T-2.D0*U)*CPS-V*SPS)
+      RETURN
+      END
+
+
+
+C
+C(((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((
diff --git a/Tsyganenko-Models/aareadme.txt b/Tsyganenko-Models/aareadme.txt
new file mode 100644
index 0000000..7d8ae56
--- /dev/null
+++ b/Tsyganenko-Models/aareadme.txt
@@ -0,0 +1,23 @@
+=========================================================================
+National Space Science Data Center      Data set  MG-25C      23 Apr 2003
+=========================================================================
+
+NAME            Tsyganenko  Models (T89, T96, T_01) and Related Software
+                (this Software and description are also available
+                from the Web site:
+
+                http://nssdc.gsfc.nasa.gov/space/model/magnetos/data-based/modeling.html
+
+
+SCIENTIFIC CONTACT:   Dr. N. A. Tsyganenko,
+
+                      E-address:         Nikolai.Tsyganenko@gsfc.nasa.gov
+
+                      Mail address:      Code 695,  NASA GSFC
+                                         Greenbelt, MD 20771,
+                                         U.S.A.
+
+                             Phone:      (301)-286-7925
+                             Fax:        (301)-286-1683
+
+ --------------------------------------------------------------------------
diff --git a/photoelectron_code/pesimp.for b/photoelectron_code/pesimp.for
new file mode 100755
index 0000000..831dd19
--- /dev/null
+++ b/photoelectron_code/pesimp.for
@@ -0,0 +1,496 @@
+C...............................................3 APR 92
+C...... This test driver demonstrates how to call the model and 
+C...... how to calculate electron heating rate and 3371 excitation rate.
+C------ References and a sample output file are appended to this file
+C
+       DIMENSION EUV(9),XN(3),PEFLUX(100),UVFAC(59)
+C
+C------ ALT = altitude (km)  { 120 -> 500 }
+C------ SZADEG = solar zenith angle {0 -> 90 degrees}
+C------ TE, TN = electron, neutral temperatures (K)
+C------ EUV = multiplication factors for bins 1-9 Torr et al. solar EUV
+C------ F107 = Solar 10.7 cm flux
+C------ XN, XNE = O, O2, N2, and electron densities  (cm-3)
+C------ XN2D, XOP2D = N(2D) and O+(2D) densities for electron quenching
+C------ (cm-3). You may put these to ZERO if not available.
+C
+C------ The following data are for orbit 458(D) of AE-E at 296 km
+      DATA  ALT , SZADEG ,   TE ,   TN ,  EUV,  F107
+     >   /  296.,   78.  , 2000., 850., 9*1.0 ,  71. /
+      DATA              XN,           XNE  ,  XN2D  , XOP2D
+     >   / 4.0E8 , 2.3E6 , 6.1E7 ,   3.0E5 ,  2.0E5 , 1.0E3/
+C
+C------ The following data are for orbit 458(D) of AE-E at 148 km
+      DATA  ALT , SZADEG ,  TE , TN  ,  EUV,  F107
+     >   /  148 ,   53.  , 577., 577., 9*1.0 ,  71. /
+      DATA              XN,           XNE  ,  XN2D , XOP2D
+     >   / 1.6E10 , 2.3E9 , 3.1E10 , 2.0E5 ,  2.6E3, 4.0E-2/
+C
+C----- To read data from a file, uncomment the following line.
+C....      READ(1,*)  ALT,SZADEG,TE,TN,F107,XN,XNE,XN2D,XOP2D
+C
+      WRITE(6,85)
+C
+ 85   FORMAT(/5X,'****************************************************'
+     > ,//5X,'The 1992 simple photoelectron model by Phil Richards.'
+     > ,//5X,'Before publishing papers using results from this model,'
+     > ,//5X,'please consult Phil Richards about an appropriate level'
+     > ,//5X,'of acknowlegement for his contribution'
+     > ,//5X,'****************************************************'
+     > ,//5x,' OUTPUT is on unit 2')
+C
+C********************************************************************
+C----- A crude scaling of solar EUV with F10.7 that works pretty well
+      IF(F107.GT.60.0) THEN
+         CALL FACEUV(F107,UVFAC)
+         DO 10 I=1,9
+           EUV(I)=UVFAC(I)
+ 10      CONTINUE
+      ENDIF
+C
+C********************************************************************
+C....... Go and get the photoelectron fluxes
+       CALL FLXCAL(ALT,SZADEG,TE,TN,EUV,XN,XNE,XN2D,XOP2D,PEFLUX,AFAC)
+C
+C------ PEFLUX = photoelectron flux to be returned (eV cm2 sec)-1
+C------ AFAC = the solar EUV attenuation warning flag
+C
+C********************************************************************
+C----- Check altitude not dominated by transport
+       IF(ALT.GT.350) WRITE(6,96)
+ 96    FORMAT(/2X,' **** Altitude above 350km - beware transport'/)
+C
+C----- Check the attenuation. 1.0E-22 to avoid divide by 0
+      IF(AFAC.LT.0.14) WRITE(6,97) 1.0/(AFAC+1.0E-22)
+  97  FORMAT(/2X,' **** EUV attenuation =',1P,E9.2,' is too large'/)
+C
+C********************************************************************
+C-------- Write headers and diagnostics into output file 
+C
+      WRITE(2,89)
+ 89   FORMAT(/9X,'Output from Richards simple photoelectron model'
+     > ,//4X,'ALT',5X,'SZA',5X,'TE',5X,'TN',6X,'[O]',7X,'[O2]',7X,
+     >  '[N2]',5X,'[e]',4X,'AFAC')
+      WRITE(2,90) ALT,SZADEG,TE,TN,XN,XNE,AFAC
+C
+      WRITE(2,94) (EUV(I),I=1,9)
+ 94   FORMAT(/5X,'EUV flux factors (1-9)',9F5.1/)
+C
+      WRITE(2,88)
+ 88   FORMAT(//3X,'E',3X,'FLX/4PI',3X,'PEFLUX',5X,'SIGOX',5X,'SIGN2'
+     > ,5X,'EHEAT',5X,'EM3371')
+C
+C********************************************************************
+C........ sample calculation of production rates. EHEAT=electron heating
+      EHEAT=0.0
+      EM3371=0.0
+      DO 20 I=1,100
+      E=I-0.5
+      CALL SIGEXS(E,TE,XNE,SIGOX,SIGN2,SIGEE)
+      EHEAT=EHEAT+PEFLUX(I)*SIGEE*XNE
+C........  approximate 3371 A  emission rate x-section
+      IF(E.GE.14.5) S3371=7.6E-17*EXP(-0.133*E)
+      IF(E.LT.14.5) S3371=1.1199E-24*EXP(1.14*E)
+      IF(E.LE.11.0) S3371=0.0
+      EM3371=EM3371+PEFLUX(I)*S3371*XN(3)
+C
+      PEFLX=PEFLUX(I)/12.57
+      WRITE(2,91) E,PEFLX,PEFLUX(I),SIGOX,SIGN2,EHEAT,EM3371
+ 20   CONTINUE
+      STOP
+ 90   FORMAT(4F8.2,1P,9E9.1)
+ 91   FORMAT(F6.1,1P,22E10.2)
+      END
+C::::::::::::::::::::::::::::: END TEST DRIVER ::::::::::::::::::::::::::
+C
+C:::::::::::::::::::::::::: PHOTOELECTRON MODEL  ::::::::::::::::::::::::
+      SUBROUTINE FLXCAL(ALT,SZADEG,TE,TN,EUV,XN,XNE,XN2D,XOP2D
+     >   ,PEFLUX,AFAC)
+C....... This subroutine evaluates the photoelectron flux using the concept
+C.......  production frequencies developed by Phil Richards at Utah 
+C....... State University March 1984. It supercedes the model described in
+C....... JGR, p2155, 1983. Contact EAST::CSPARA::RICHARDS on SPAN network
+C------- Some minor updates in April 1992 indicated by C----
+C....... I would appreciate any feedback on bugs or clarity and if it 
+C....... contributes substantially to a paper, I would appreciate the 
+C....... appropriate acknowledgement.
+C......       **************** WARNING ****************
+C...... This program is constructed to produce reasonable agreement with
+C...... the Atmosphere Explorer-E PES fluxes of John Doering (Lee et al.
+C...... PSS 1980, page 947). It will NOT give good fluxes if the EUV 
+C...... attenuation is greater than about a factor of 7 (AFAC < 0.14).
+C...... The model accurately reproduces the measured fluxes very closely
+C...... for the case in the test driver at 148 km SZA=53 when AFAC=0.19.
+C...... You should compare the output against the Lee et al. 1980 fluxes
+C...... periodically as a check. It is doubtful below 140km during the
+C...... day and below 200km near sunset. Between 200km & 350km, it should
+C...... be good for solar zenith angles < 90 degrees. Above 350 km there
+C...... is considerable uncertainty due to neglect of transport but most
+C...... models have similar uncertainties at high altitudes due to the 
+C...... uncertainty in the conjugate photoelectron flux, and the pitch 
+C...... angle distribution.
+C
+C------ ALT = altitude (km)  { 120 -> 500 }
+C------ SZADEG = solar zenith angle  {0 -> 90 degrees ? }
+C------ TE, TN = electron, neutral temperatures (K)
+C------ EUV = multiplication factors for bins 1-9 Torr et al. solar EUV
+C------ XN, XNE = O, O2, N2, and electron densities  (cm-3)
+C------ XN2D, XOP2D = N(2D) and O+(2D) densities for electron quenching
+C------ (cm-3). You may put these to ZERO if not available.
+C------ PEFLUX = photoelectron flux to be returned (eV cm2 sec)-1
+C------ AFAC = the solar EUV attenuation warning flag
+C
+      DIMENSION RJOX(100),RJN2(100),XN(3),COLUM(3),EUV(9),PEFLUX(100)
+C
+C------ MIN, MAX = minimum and maximum photoelectron energies {1,100}
+      DATA MIN,MAX/1,100/
+C....... photoelectron production frequencies by 1.0E9. Renormalized below
+C------- Note that the EUV fluxes below 250A are doubled (see refs)
+      DATA RJOX/10*19,15,18,14,10,13,9,13,9,7,11,6,26,6,31,6,5,22,4,4,5
+     > ,3,5.4,3.4,3.4,5,2.9,2.5,3.2,2.3,1.9,1.8,1.8,1.8,1.5,2.6,1.5,2.5
+     > ,2.8,2,2.6,2.1,3.2,1.3,2.5,1.5,1.8,1.3,.3,1,.4,4*.2,.3,.2,.3,.1
+     > ,.2,.2,.1,.1,.1,.2,.2, 25*.1/
+      DATA RJN2/6*40,43,35,35,28,29,21,25,19,19,13,19,16,12,11,7,18,8,46
+     > ,27,5*5,4.3,7.4,5.6,4.3,5.1,4.3,2.8,2.7,2.7,2.1,2.1,1.7,1.6,1.3
+     > ,2.5,2,2.1,2.6,2.4,2,1.3,2.2,1.6,2,1,1.4,1.1,.5,4*.3,6*.2,32*.1/
+C
+C----- convert solar zenith angle to radians
+       SZA = SZADEG/57.29578
+C-----  check upper and lower energy indices in range
+      IF(MAX.GT.100) MAX=100
+      IF(MIN.LT.1) MIN=1
+C
+C----- 2.5eV production from electron quenching of N2D
+      PN2D=XN2D*XNE*6.0E-10*SQRT(TE/300.0)
+C----- 3.3eV production from electron quenching of O+(2D)
+      POP2D=XOP2D*XNE*6.6E-8*SQRT(300./TE)
+C
+C------ Initialize electron flux
+      DO 122 IE=MIN,MAX
+        PEFLUX(IE)=0.0
+ 122  CONTINUE
+      CASEL=0.0
+C....... evaluate column density for attenuation factor AFAC
+      CALL RCOLUM(I,SZA,ALT,TN,XN,COLUM)
+C
+C.......... begin flux calculation loop............................
+      DO 133 IE=1,MAX
+      I=MAX+1-IE
+      IF(I.LT.MIN) GO TO 55
+C
+C....... evaluate energy of photon responsible for electron at energy EE
+      EE=I-0.5
+      EP=EE+17
+      IF(EE.LT.22) EP=45
+      IF(EE.GE.22.AND.EE.LT.28) EP=41
+      IF(EE.GE.28.AND.EE.LT.38) EP=49
+C
+C..... evaluate total photoionization cross sections for photon energy EP
+      CALL PHOSIG(EP,XSOXT,XSO2T,XSN2T)
+C
+C....... evaluate EUV attenuation factor AFAC
+      TAU=COLUM(1)*XSOXT+COLUM(2)*XSO2T+COLUM(3)*XSN2T
+      AFAC=EXP(-TAU)
+C
+C......... low energy cascade production from O(1D) and N2* impact
+      CASOX=0.0
+      IF(EE.LT.10) CASOX=PEFLUX(I+2)*SIGOX*XN(1)
+      CASN2=0.0
+      IF(EE.LT.6) CASN2=PEFLUX(I+1)*SIGN2*XN(3)
+C
+C......... cascade production from thermal electron degradation
+      CASEL=0.0
+      IF(I.LT.MAX) CASEL=PEFLUX(I+1)*SIGEE*XNE
+C
+C....... Production from electron quenching of metastables
+      EPN2D=0.0
+      IF(NINT(EE).EQ.3) EPN2D=PN2D
+      EPOP2D=0.0
+      IF(NINT(EE).EQ.4) EPOP2D=POP2D
+C
+C........ evaluate cross sections (must be after cascade production)
+      CALL SIGEXS(EE,TE,XNE,SIGOX,SIGN2,SIGEE)
+C
+C......... adjust production rate for different period of solar cycle
+      CALL FACFLX(EE,EUV,FFAC)
+C
+C......... Production of pe's at energy EE, taking into account
+C......... attenuation and EUV variation, and renormalize frequencies
+C
+      PRODOX=RJOX(I)*XN(1)*AFAC*FFAC*1.0E-9 
+      PRODN2=RJN2(I)*XN(3)*AFAC*FFAC*1.0E-9 
+C
+C......... Sum all the production rates
+      PROD=PRODOX+PRODN2+CASEL+CASOX+CASN2+EPN2D+EPOP2D
+C
+C....      WRITE(3,90) EE,PRODOX,PRODN2,CASEL,CASOX,CASN2,EPN2D,EPOP2D
+ 90   FORMAT(1X,F6.1,1P,11E8.1)
+C
+C........ total loss through collisions
+      RLOSS=SIGOX*XN(1)+SIGN2*XN(3)+SIGEE*XNE
+C
+C........... evaluate photoelectron flux
+      PEFLUX(I)=PROD/RLOSS
+ 133   CONTINUE
+C
+ 55   RETURN
+      END
+C::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
+      SUBROUTINE PHOSIG(EP,XSOXT,XSO2T,XSN2T)
+C....... Total photoionization cross sections (good for 0-400A).
+C....... These could easily be updated
+C------- XSOXT is Samson and Pareek O cross section
+      XSOXT=3.10E-17*EXP(-0.033*EP)
+      XSO2T=4.44E-17*EXP(-0.027*EP)
+      XSN2T=4.13E-17*EXP(-0.030*EP)
+      RETURN
+      END
+C::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
+      SUBROUTINE FACFLX(EE,EUV,FFAC)
+C....... solar EUV factors. Correspond to the first 9 wavelengths
+C....... TORR et al.[1979] GRL page 771 table 3. EUV(9) is for 304A
+      DIMENSION EUV(9)
+      FFAC=(7*EUV(9)+EUV(8)+0.2*EUV(6))/8.2
+      IF(EE.GT.30.AND.EE.LE.38) FFAC=(2*EUV(7)+.5*EUV(5))/2.5
+      IF(EE.GT.38.AND.EE.LE.45) FFAC=EUV(4)
+      IF(EE.GT.45.AND.EE.LE.66) FFAC=EUV(3)
+      IF(EE.GT.66.AND.EE.LE.108) FFAC=EUV(2)
+      IF(EE.GT.108) FFAC=EUV(1)
+      RETURN
+      END
+C::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
+      SUBROUTINE RCOLUM(J,CHI,ALT,TNJ,XN,COLUM)
+C+++++++ this routine evaluates the neutral column density Smith & Smith
+C+++++++ JGR 1972 p 3592. Not valid for CHI > 1.57 because there is no
+C+++++++ density at grazing altitude.
+      DIMENSION XN(3),VERTCL(3),COLUM(3),SN(5),M(3)
+      DATA RE,GE,EM,M/6.371E8,980,1.662E-24,16,32,28/
+      DATA A,B,C,D,F,G/1.0606963,0.55643831,1.0619896,1.7245609
+     >  ,0.56498823,0.06641874/
+C
+      Z=ALT*1.0E5
+C----is sza>90.0 degrees
+      IF(CHI.LT.1.5708)GO  TO 2938
+C----calculate grazing incidence parameters
+      ALTG=(RE+Z)*SIN(3.1416-CHI)-RE
+C----if grazing height<120km.,production is zero --- make colum
+C---- large to achieve this
+      IF(ALTG.GT.120.E5)GO TO 2938
+      DO 20 I=1,3
+20    COLUM(I)=1.E+22
+      RETURN
+C
+2938      CONTINUE
+      GR=GE*(RE/(RE+Z))**2
+      RP=RE+Z
+      DO 10 I=1,3
+      SH=(1.38E-16*TNJ)/(EM*M(I)*GR)
+      XP=RP/SH
+      Y=SQRT(0.5*XP)*ABS(COS(CHI))
+      IF(Y.GT.8) ERFY2=F/(G+Y)
+      IF(Y.LT.8) ERFY2=(A+B*Y)/(C+D*Y+Y*Y)
+    4 IF(CHI.GT.1.5708)GO  TO 2
+      CHAPFN=SQRT(0.5*3.1416*XP)*ERFY2
+      COLUM(I)=XN(I)*SH*CHAPFN
+        GO TO 10
+C........ column density for large solar zenith angle CHI
+    2 RG=RP*SIN(3.1416-CHI)
+      HG=1.38E-16*TNJ/(EM*M(I)*GE*(RE/(RE+ALTG))**2)
+      XG=RG/HG
+      SN(I)=XN(I)*EXP((Z-ALTG)/HG)
+      COLUM(I)=SQRT(0.5*3.1416*XG)*HG*(2.0*SN(I)-XN(I)*ERFY2)
+10       CONTINUE
+      RETURN
+      END
+C::::::::::::::::::::::::::::::::::::::::::::::::::::::::
+      SUBROUTINE SIGEXS(E,TE,XNE,SIGOX,SIGN2,SIGEE)
+C..... Program for evaluating the total inelastic cross sections
+C
+C........ loss to thermal electrons ....
+      ET=8.618E-5*TE
+      SIGEE=(3.37E-12/E**0.94/XNE**0.03)*((E-ET)/
+     >   (E-(0.53*ET)))**2.36
+C
+C...... cross section for o(1d)
+      SIGO1D=0.0
+      IF(E.GT.1.96) SIGO1D=4E-16*(1-1.96/E)**2/E
+C...... total excitation cross section for O excluding O(1D)
+      IF(E.LT.25) SIGO=(0.4*E-5)*1.4E-17
+      IF(E.GE.25) SIGO=7.0E-17
+      IF(SIGO.LT.0.0) SIGO=0.0
+C
+C...... total excitation cross section for N2......
+      IF(E.LT.12) SIGN2=(15.5*E-104.8)*1.7E-18
+      IF(E.LT.4.0) SIGN2=5.0E-9*(1-1.4/E)**9 * (1.4/E)**16
+      IF(E.GT.11.5) SIGN2=1.4E-16
+      IF(SIGN2.LT.0.0) SIGN2=0.0
+C
+C........ total ionization cross sections from Keiffer and Dunn ....
+      SIGION=0.0
+      AL=ALOG10(E)
+      IF(AL.LT.2.7.AND.AL.GE.1.2) SIGION=-3.6E-16*(AL-1.2)*(AL-3)
+      IF(AL.GT.2.7) SIGION=1.2E-14*EXP(-AL*1.6)
+      IF(E.LT.50) SIGION=1.0E-16*(0.068*E-1.06)
+      IF(SIGION.LE.0.0) SIGION=0.0
+C
+      SIGOX=SIGO1D+SIGO+0.5*SIGION
+      SIGN2=SIGN2+SIGION
+      RETURN
+      END
+C::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
+      SUBROUTINE FACEUV(F107,UVFAC)
+C........ The EUV flux is scaled linearly with F107 flux. The 37 intervals
+C........ of Torr et al. GRL, 1979 p771 are used. The flux factors are 1 for
+C........ day 74113 when F107=71. Ratios from day 78348 (F107=206) are used to
+C........ complete the scaling.
+      DIMENSION UVFAC(59),EUV206(37)
+      DATA EUV206/2.6,2.4,1.8,3,1.9,15.7,4.4,3,1.8,4.5,2,4.8,2.9,2.1
+     > ,4.3,2.7,1.8,2.7,2.4,3.2,2.0,2.8,2.0,1.8,2.4,2.1,3.0,1.9,2.5
+     > ,2.4,2.8,2.8,2.0,2.2,2.7,2.1,1.9/
+C............ EUV scaling
+         DO 50 I=1,37
+         A=(EUV206(I)-1)/135.0
+         B=1-A*71
+         UVFAC(I)=A*F107+B
+         IF(UVFAC(I).LT.0.0) UVFAC(I)=0.0
+ 50      CONTINUE
+         RETURN
+         END
+C:::::::::::::::::::::::::::: REFERENCES :::::::::::::::::::::::::::
+C--  
+C-- Ratios of photoelectron to EUV ionization rates for aeronomic studies, 
+C-- P. G. Richards and D. G. Torr,    J. Geophys. Res., 93, 4060,  1988.
+C--  
+C-- Thermal electron quenching of N(2D): consequences for the
+C-- ionospheric photoelectron flux and the thermal electron
+C-- temperature,  P. G. Richards,    Planet. Space Sci., 34, 689, 1986.
+C--  
+C-- The altitude variation of the ionospheric photoelectron
+C-- flux: a comparison of theory and measurement,  P. G. Richards,
+C-- and D. G. Torr,   J. Geophys. Res., 90, 2877,  1985
+C-- 
+C-- An investigation of the consistency of the ionospheric
+C-- measurements of the photoelectron flux and solar EUV flux,  P. G.
+C-- Richards and D. G. Torr,   J. Geophys. Res., 89, 5625, 1984.
+C-- 
+C-- A simple theoretical model for calculating and
+C-- parameterizing the ionospheric photoelectron flux,  P. G.
+C-- Richards and D. G. Torr,   J. Geophys. Res., 88, 2155, 1983.
+C-- 
+C-- Determination of photoionization branching ratios and total
+C-- photoionization cross sections at 304A from experimental
+C-- ionospheric photoelectron fluxes,  P. G. Richards, D. G. Torr,
+C-- and P. J. Espy,   J. Geophys. Res.,   87, 3599, 1982.
+C
+C:::::::::::::::::::::::: OUTPUT FILE :::::::::::::::::::::::::::
+C
+C         Output from Richards simple photoelectron model
+C
+C    ALT     SZA     TE     TN      [O]       [O2]       [N2]     [e]    AFAC
+C  148.00   53.00  577.00  577.00  1.6E+10  2.3E+09  3.1E+10  2.0E+05  1.9E-01
+C
+C     EUV flux factors (1-9)  1.0  1.0  1.0  1.0  1.0  1.0  1.0  1.0  1.0
+C
+C
+C
+C   E   FLX/4PI   PEFLUX     SIGOX     SIGN2     EHEAT     EM3371
+C   0.5  1.94E+08  2.44E+09  0.00E+00  0.00E+00  1.94E+03  0.00E+00
+C   1.5  4.26E+08  5.36E+09  0.00E+00  4.31E-20  3.59E+03  0.00E+00
+C   2.5  1.11E+07  1.40E+08  7.46E-18  2.89E-16  3.62E+03  0.00E+00
+C   3.5  5.51E+07  6.92E+08  2.21E-17  2.16E-17  3.72E+03  0.00E+00
+C   4.5  9.99E+07  1.26E+09  2.83E-17  0.00E+00  3.86E+03  0.00E+00
+C   5.5  6.61E+07  8.31E+08  3.01E-17  0.00E+00  3.94E+03  0.00E+00
+C   6.5  5.65E+07  7.10E+08  3.00E-17  0.00E+00  3.99E+03  0.00E+00
+C   7.5  2.17E+07  2.72E+08  2.91E-17  1.95E-17  4.01E+03  0.00E+00
+C   8.5  1.21E+07  1.52E+08  2.79E-17  4.58E-17  4.02E+03  0.00E+00
+C   9.5  7.03E+06  8.84E+07  2.65E-17  7.22E-17  4.03E+03  0.00E+00
+C  10.5  4.90E+06  6.16E+07  2.52E-17  9.85E-17  4.03E+03  0.00E+00
+C  11.5  3.30E+06  4.15E+07  2.39E-17  1.25E-16  4.03E+03  7.11E-01
+C  12.5  3.17E+06  3.98E+07  2.28E-17  1.40E-16  4.03E+03  2.85E+00
+C  13.5  2.35E+06  2.95E+07  2.73E-17  1.40E-16  4.03E+03  7.79E+00
+C  14.5  2.45E+06  3.08E+07  3.18E-17  1.40E-16  4.03E+03  1.83E+01
+C  15.5  1.67E+06  2.09E+07  3.65E-17  1.40E-16  4.04E+03  2.46E+01
+C  16.5  2.27E+06  2.85E+07  4.43E-17  1.46E-16  4.04E+03  3.21E+01
+C  17.5  1.71E+06  2.15E+07  5.25E-17  1.53E-16  4.04E+03  3.71E+01
+C  18.5  1.22E+06  1.54E+07  6.08E-17  1.60E-16  4.04E+03  4.02E+01
+C  19.5  1.23E+06  1.55E+07  6.91E-17  1.67E-16  4.04E+03  4.29E+01
+C  20.5  7.13E+05  8.97E+06  7.75E-17  1.73E-16  4.04E+03  4.43E+01
+C  21.5  2.09E+06  2.62E+07  8.59E-17  1.80E-16  4.04E+03  4.78E+01
+C  22.5  5.73E+05  7.21E+06  9.43E-17  1.87E-16  4.04E+03  4.87E+01
+C  23.5  3.01E+06  3.78E+07  1.03E-16  1.94E-16  4.04E+03  5.26E+01
+C  24.5  1.40E+06  1.76E+07  1.11E-16  2.01E-16  4.04E+03  5.42E+01
+C  25.5  3.41E+05  4.28E+06  1.17E-16  2.07E-16  4.04E+03  5.45E+01
+C  26.5  7.10E+05  8.93E+06  1.20E-16  2.14E-16  4.04E+03  5.51E+01
+C  27.5  2.98E+05  3.75E+06  1.23E-16  2.21E-16  4.04E+03  5.54E+01
+C  28.5  4.38E+05  5.51E+06  1.26E-16  2.28E-16  4.04E+03  5.56E+01
+C  29.5  4.57E+05  5.75E+06  1.29E-16  2.35E-16  4.04E+03  5.59E+01
+C  30.5  3.44E+05  4.32E+06  1.32E-16  2.41E-16  4.04E+03  5.61E+01
+C  31.5  5.82E+05  7.31E+06  1.35E-16  2.48E-16  4.04E+03  5.63E+01
+C  32.5  4.09E+05  5.14E+06  1.38E-16  2.55E-16  4.04E+03  5.65E+01
+C  33.5  3.29E+05  4.13E+06  1.41E-16  2.62E-16  4.04E+03  5.66E+01
+C  34.5  4.06E+05  5.11E+06  1.45E-16  2.69E-16  4.04E+03  5.67E+01
+C  35.5  2.99E+05  3.76E+06  1.48E-16  2.75E-16  4.04E+03  5.68E+01
+C  36.5  2.06E+05  2.59E+06  1.51E-16  2.82E-16  4.04E+03  5.69E+01
+C  37.5  2.15E+05  2.70E+06  1.54E-16  2.89E-16  4.04E+03  5.69E+01
+C  38.5  2.45E+05  3.08E+06  1.57E-16  2.96E-16  4.04E+03  5.70E+01
+C  39.5  1.97E+05  2.48E+06  1.60E-16  3.03E-16  4.04E+03  5.70E+01
+C  40.5  1.97E+05  2.47E+06  1.64E-16  3.09E-16  4.04E+03  5.70E+01
+C  41.5  1.73E+05  2.17E+06  1.67E-16  3.16E-16  4.04E+03  5.70E+01
+C  42.5  1.68E+05  2.12E+06  1.70E-16  3.23E-16  4.04E+03  5.71E+01
+C  43.5  1.40E+05  1.76E+06  1.73E-16  3.30E-16  4.04E+03  5.71E+01
+C  44.5  2.62E+05  3.29E+06  1.77E-16  3.37E-16  4.04E+03  5.71E+01
+C  45.5  1.91E+05  2.40E+06  1.80E-16  3.43E-16  4.04E+03  5.71E+01
+C  46.5  2.36E+05  2.97E+06  1.83E-16  3.50E-16  4.04E+03  5.71E+01
+C  47.5  2.84E+05  3.58E+06  1.86E-16  3.57E-16  4.04E+03  5.71E+01
+C  48.5  2.44E+05  3.06E+06  1.89E-16  3.64E-16  4.04E+03  5.71E+01
+C  49.5  2.39E+05  3.01E+06  1.93E-16  3.71E-16  4.04E+03  5.72E+01
+C  50.5  1.73E+05  2.18E+06  1.95E-16  3.75E-16  4.04E+03  5.72E+01
+C  51.5  2.85E+05  3.58E+06  1.96E-16  3.77E-16  4.04E+03  5.72E+01
+C  52.5  1.71E+05  2.15E+06  1.97E-16  3.80E-16  4.04E+03  5.72E+01
+C  53.5  2.53E+05  3.18E+06  1.98E-16  3.82E-16  4.04E+03  5.72E+01
+C  54.5  1.39E+05  1.74E+06  1.99E-16  3.84E-16  4.04E+03  5.72E+01
+C  55.5  1.85E+05  2.33E+06  2.00E-16  3.86E-16  4.04E+03  5.72E+01
+C  56.5  1.43E+05  1.80E+06  2.01E-16  3.88E-16  4.04E+03  5.72E+01
+C  57.5  5.39E+04  6.77E+05  2.01E-16  3.90E-16  4.04E+03  5.72E+01
+C  58.5  6.82E+04  8.57E+05  2.02E-16  3.92E-16  4.04E+03  5.72E+01
+C  59.5  4.30E+04  5.40E+05  2.03E-16  3.93E-16  4.04E+03  5.72E+01
+C  60.5  3.47E+04  4.37E+05  2.04E-16  3.95E-16  4.04E+03  5.72E+01
+C  61.5  3.53E+04  4.43E+05  2.04E-16  3.97E-16  4.04E+03  5.72E+01
+C  62.5  2.69E+04  3.38E+05  2.05E-16  3.98E-16  4.04E+03  5.72E+01
+C  63.5  2.73E+04  3.43E+05  2.06E-16  4.00E-16  4.04E+03  5.72E+01
+C  64.5  3.23E+04  4.07E+05  2.06E-16  4.01E-16  4.04E+03  5.72E+01
+C  65.5  2.80E+04  3.52E+05  2.07E-16  4.03E-16  4.04E+03  5.72E+01
+C  66.5  3.32E+04  4.17E+05  2.08E-16  4.04E-16  4.04E+03  5.72E+01
+C  67.5  2.38E+04  2.99E+05  2.08E-16  4.05E-16  4.04E+03  5.72E+01
+C  68.5  1.95E+04  2.45E+05  2.09E-16  4.06E-16  4.04E+03  5.72E+01
+C  69.5  1.97E+04  2.48E+05  2.09E-16  4.08E-16  4.04E+03  5.72E+01
+C  70.5  1.49E+04  1.87E+05  2.10E-16  4.09E-16  4.04E+03  5.72E+01
+C  71.5  1.50E+04  1.89E+05  2.10E-16  4.10E-16  4.04E+03  5.72E+01
+C  72.5  1.52E+04  1.91E+05  2.11E-16  4.11E-16  4.04E+03  5.72E+01
+C  73.5  2.06E+04  2.59E+05  2.11E-16  4.12E-16  4.04E+03  5.72E+01
+C  74.5  2.08E+04  2.61E+05  2.12E-16  4.13E-16  4.04E+03  5.72E+01
+C  75.5  1.57E+04  1.97E+05  2.12E-16  4.14E-16  4.04E+03  5.72E+01
+C  76.5  1.58E+04  1.99E+05  2.12E-16  4.15E-16  4.04E+03  5.72E+01
+C  77.5  1.60E+04  2.01E+05  2.13E-16  4.16E-16  4.04E+03  5.72E+01
+C  78.5  1.61E+04  2.03E+05  2.13E-16  4.16E-16  4.04E+03  5.72E+01
+C  79.5  1.63E+04  2.04E+05  2.13E-16  4.17E-16  4.04E+03  5.72E+01
+C  80.5  1.64E+04  2.06E+05  2.14E-16  4.18E-16  4.04E+03  5.72E+01
+C  81.5  1.65E+04  2.08E+05  2.14E-16  4.19E-16  4.04E+03  5.72E+01
+C  82.5  1.67E+04  2.10E+05  2.14E-16  4.19E-16  4.04E+03  5.72E+01
+C  83.5  1.68E+04  2.11E+05  2.15E-16  4.20E-16  4.04E+03  5.72E+01
+C  84.5  1.69E+04  2.13E+05  2.15E-16  4.21E-16  4.04E+03  5.72E+01
+C  85.5  1.71E+04  2.14E+05  2.15E-16  4.21E-16  4.04E+03  5.72E+01
+C  86.5  1.72E+04  2.16E+05  2.15E-16  4.22E-16  4.04E+03  5.72E+01
+C  87.5  1.73E+04  2.17E+05  2.16E-16  4.23E-16  4.04E+03  5.72E+01
+C  88.5  1.74E+04  2.19E+05  2.16E-16  4.23E-16  4.04E+03  5.72E+01
+C  89.5  1.75E+04  2.20E+05  2.16E-16  4.24E-16  4.04E+03  5.72E+01
+C  90.5  1.76E+04  2.22E+05  2.16E-16  4.24E-16  4.04E+03  5.72E+01
+C  91.5  1.78E+04  2.23E+05  2.17E-16  4.25E-16  4.04E+03  5.72E+01
+C  92.5  1.79E+04  2.25E+05  2.17E-16  4.25E-16  4.04E+03  5.72E+01
+C  93.5  1.80E+04  2.26E+05  2.17E-16  4.26E-16  4.04E+03  5.72E+01
+C  94.5  1.81E+04  2.27E+05  2.17E-16  4.26E-16  4.04E+03  5.72E+01
+C  95.5  1.82E+04  2.29E+05  2.17E-16  4.26E-16  4.04E+03  5.72E+01
+C  96.5  1.83E+04  2.30E+05  2.17E-16  4.27E-16  4.04E+03  5.72E+01
+C  97.5  1.84E+04  2.31E+05  2.18E-16  4.27E-16  4.04E+03  5.72E+01
+C  98.5  1.85E+04  2.32E+05  2.18E-16  4.28E-16  4.04E+03  5.72E+01
+C  99.5  1.86E+04  2.33E+05  2.18E-16  4.28E-16  4.04E+03  5.72E+01
-- 
GitLab

|C!u^eYckf+~PP4gZw)F3+U7efTIb+-G%wpy$Y|dhT^H@LdcI7Fv zb?&mOd=K(2E&ckkc+KfE*Op4ChF9&A>)bS$j8?eQZ0pt3-L z(7R5bRMtI^>(cyEs(EnkrucUUO4m&j-F)4xegD!)-uW{RtoWa6#=r1FRZ3`W+KbM( zWiD}C%QUvDK40@uLfogxO#bmBlMbDhsj{{~o9eg!RrE4;SIX`*KQvJ%Q&jJt^XEjL z4~Kb#q8nZZPSKbcp0MP(H+RgB3;W(j9kbwk<<-4x@ubND|HY~d^ zx8&C3%94Qiz>CYppS*c(D0U+_n8!r+O5Cg6zxG{}OMPLynJ0VUu`PE)eP(ToTt0K+ zP2JGm5C8c3LB5~tWt6pt~*lyGEFA_ zjKI8CP2s_1Q;I%ME7|MsfA5Fc@4bDS59@Z_Zc#O#d$OVQWNwwS%dwMPpO@VEQ&d^R zdAT=uVaz<1#4}5Fe45`9ndMoq$!mty7njaETj!J<>JbO+@oD?JLyF(g?}Lx{*?AK~ zpRG5ZR_I{!V2a>+r|p3+bU+^rAv_;l^(J_kBq9{_gJ=MV)5t0riSL{ zK1}Mq+2Lt#DatC|wM0VZ@Oo)>)-6Y_mE6iK^jAIjvgkhNjxDA)KwoW&%pXcc;2wioK?O@({V~5mOO*WUTF8%vgL@um)9^aAm zfAxgvo#_^#b^qV;|6!Z4vi@IW-M>j~FKT0+?YU#*_waIQN^)o1om{(9s@JpTInIf> zt9jw=CzC$T9jl_2zw1jA+v~gN-3+1C@3x=x65g@%>yZhQ_>aA9J#_ZUyzP6$BPFZt z&vA%*S)TMbXB;81BVeuT*)G16dskP*Dx_F0EQkx7a8%#My4xM)w!Z3(;#1Jk~jH)Cu_-`%?dK9CcE;BxbsE6ue`Q!_Cn^Rv9mb2en_g$ ztL{Hy{^x#`@AQM(lkPti*r)#Ajc--f&SNW<^%&O|*)%gRGM~qr$@^0BaHNKe*QaPX zwI|zI(iKh?6=|`w$0V0!FN3cHH=Wy8WZ2tR9{(k1o%5w&_nJ4{c$vzft3z~M^HgB>@$z16G zneZ#mnGHlv&+(W0l96u1`+n-(8IQH@%y@iibKC>1J2Rf|I8pV*;;Q>jkLa(?CgOS* z+RnV^F`0W`GGprQAB?lE6h)}K7y1@=yy4o9FGBmK-7(e{E4o-W`8+?D@9PVuZbDM( zexhyPZQVEf*esV^6}woYBgpN1oZzWx4>%&5%-D`8zuJ zT>j~`X|C2+?_K(EX--%AoGZGHHt(l>=(78yd|?sC>e+j4ZE8;TFE_GVx176-^?q7~ z)jO83Datj0%WcoIFgq8rt;;?(r_u4~=>z{lJQppJ-nQn=&!SC>*)+5}+d}#-7tA|8 zm-nslzL{_NTCOYR?cVJj`Cd6KMP`CzJDwdpK2eD+9+aL@psmNO`_%7PM-RH%f(WxsDIi1-uopP zn*^u1`<0igOq*icRQ%=2w8S%V1?%59%#GQYvZ43eiOCBRPiCol&sF=f=yCEZjus=a z&Y&|sOntGvCoiZRKUF97%P#p`ORJf(*T<-76LP%%uMAo;w_V2L+eVGkFL%q#TI+SY zOdw_3nRyPod3{&U%h)*es(jj_OFcPRu_-&Qx*Is}-x1d4Sd#np`Ns8IYhL!SE&up% zO>pVWcHz+7; z8g*|kpDlV|-IdAJf~Ve`yLa|CPsXC9{YhJAF5UWvBh@0q+P{!vvQ3+xU1tSL#ZBY- z*2`~SNj{jq`QRf?tMHqLNlco?F*wFd5H37cbH{(|^K`3_+34H+EzfUa@P6oSD1yu~4eE z&NazpIZ-Fyew@Br>DR2}nQZ5*3-7wt=HK1ddU?v4%M*Ilth}cb)kLi{KelXDJJZ)= zE7GNV&TROpv4Vfu?b_~{cXw`CD6?BrXG7nY*XGCWh!%yOU}}8$>d?c7ow?uM`OTQD zs(p-2WBIF_TOR(%7303a*(ThUaDnsjZIP{<#~&x%EtEO2ud8W6k@;Nx1-l~?OG6w? zKIS)iM>{r@CFn4wZLX-86U&(!?V#OPEcg6$>-PmBzWca3oz6OL_$`*IEp_08(H+&fX*Tlad<@d+Z`yMCOS=QZ6b`;XDA?f166&C{GJw`B3^ z<3Bw6q?cz)Kl^ej!*1698*%jscfU^Uc9JQ(ufO`@!63sKDQA_>PKYma7yH7e`Xct4 z@gezn*DuM>Q?Hp_eEi+2y7nB~6Sk{u9r$b5FUa1X$GKp~`YFo)|8BQmC9>z=&-9-^ zy(j0Y9$#fxcb+9~nbZ8gidGW-#`pCjf_5?0#9!aB?cR^flqruog!4I{XrAxluGAM^ zxTj@GckSk#oWFM@pN`EtTUoW9{deD&19oA1o;CliKcTl-`F5d1+p!J8NTZ!hzoOa5IKzUeR9k?U`M``Z7gdN%#T!YNw+ z1WOEjFYJq9<};C>?S5!g+QXpQtzVY!RAFTD{u7X+$8~q}((Jqn`CV)InzHtrl!>fm zVBGVOkx}_qrK7>E!pZt;HvM>KRo0LYS*89#mgRKJzHjf^?ylB+9DHo%$~RBe#QlHr zVfH;|&jO3T;(QB#6!)36$j5m6ezg2yQf6D5zx1bu?vKpe>#Pz5Gxrr9ez^HwV8Msm z(km0idpEu~{qUiNK*suaR$LNx>vkKTU3aKJe5t>*<}z#DXSdcDZZ0_PJ)L8>9P375 zzWXv=_MD4<9r|f?;jj)#Qr|O&YEruX8a>@pOulaE`qC z<5B9TV7u~%v6pRD&fT&4eF}Gt^gOd$POljkE}PwZa{Wh6qcuW2?X&BDq%&<-Nig2q zpP>5uMBHnGeJkfIJtbVeMq_!Z`tt{AX3~3qwzfXLcWL?g6Bqq=d~fJmYn#y|=~1uH z%(t0Gb1zF!%Ks^CkIr;oYOn~ZlNA25qeoIZnB8TkNaWk4CoHVr^Xs^N;khq$z%!~- zz-wY{(bwi$*|Io|Ql9M=do}eGUEGW%=IZ8kPy4mK{r+vyy!{RGQNM1eYXq5UuKE9~ ztUu2y&F4sg^!w!3KV%{w{_Tkg_;GKUNUF@dZELm_>~m%B+Lz=NAI-kXf_>qZS%+9e zUrw@_aO$0A@aN^f4BH|?eovUTf@yc=yT_k@gv(~0e7&`$qS7F(U@O7Ut{NF$Me1k3U*AUD~~- zlCAedjl<@zuj4N4&~%=8*q@gTW*rSuSUl}xf~ux`*sC1-h`{KbAqP#~ zPTebbyqm3Xv4y|p^tpw5cNX+jZYUP03t0BO`>kA1+4-=z&g8`$8?%mGPF-1)b5;87 zjQu8G1R}KNc`3WSVmO^v-C9(;;X>64kH6EU+2PIZHeo4WcE(wdA9rYu~?1fV6LSR zS?_H!-DVf<+TX{s*!Qp9LE{(xny+R(%E?`IulQus?%!1>nid7@<6A5OGuKTN-IVObyZjV-^LjV|DJW{`SW# z(R%gAn&-33yxVM4+>`Qp$(bAehK?rIUmdwtEs#I@EVMN~`Fe*--@RO0u8muRH5RJ( zC0*Zgt6oD`rE60Wci)SXJHB@H#Y_p~ekN7x$jy?Ld0s^<< zUc=>pnBVQ?%E#;io2DFG;?*y7^ZdE-m|WmAT?**5{YT9zjM$A6LXIpX|vJH8)Ux*@L5BEG^#TTF#d8JM9iPT8 zyU*Tlr=3s?;pT0)8gwLKe7EVl?9rV4t!THVsD4cNinp3E|0FaX zS8rG|uXc)laMiY3=kDCFw>C>PE8g@@=J?N`=ltrAopN$TEvyf>URpbaSHHKf$|6!z zP+&<^(!4&`J#GKuZ9{Zyr>wldu+(p%M#32t^~-ORUzXc=T-yA3p_fYU3D*7Z9|tyE zy7wt|#+TSvhwq=h^mA_iwkoc__az@$e}C#V-|d{8Gv_q7>AQ9I#^(JAvz*z_^g3$$ zKMAktu5&h6=cLK|TOUp~ea7}7W7gaZ1vUQ#A-!L@BV085&89wmP}1yo>JsmX@gbBaet%CgWP=AffRYC9iLCu0%MONSG3>Z}H)7Hv zhpaY_wd?E>mbUjC+07mAcfRgH_Tfh#WXpV)^mRI0g=p6C?(3**ynf?%arN@p%RRjE z^^Z@=OjgtV`^(&`=J2K(hV0D;4opsF5sQ_S_}-^>V&C!B8+HvhuI2eG3!k;A`{Op< z!Wm|N*S)o9Uchri&E)d}ji!KQe>QEYT=PI>R_%%7PXhEBZ&$5S7s-kHbFblNcW zUBMp5?Ft&-3&LYAS7_`0dL*f(bC~DM*0RTM@15p6qvP?kV}~mDV=F#K!@7f8#SNX8 zx-{OoRrx+PZpn|7*Ks$5b|>}y6_C^mVz#dOke8zH=vB=LyV5T~m2YeGqYpg2aqRYq z%835Mn*MX&TFlLUW~FVza5y3VuTz*eXzGnL$A=<;E9WoT-?#FP(EB^TPu}A@I_LB1pt+_eWp^Cg&fj|R z+Z2CQo1GGetWHl5pXYxu&%u9N;ya(OVHMlfM!aE--Q{y%{}|7%FYoTp)4H}tBva|8 z=}j|s$G)kH_A2k=&5gD&x0Cvi?d$RI$s7aAznn6Ho_P-%R%cw_-N`&Z`1WLrWs__p z+4zorlz5-X#GXD=eC}nNDLj`linjj!(tEkc_5i2uDg5q`teRvvW-f;`kEIZr=u<%nJW2YbIuH<6EeC}j5afw-%pYh zR@fS_NbgK$(c$B5uf8cxonfgs^-R{!MekP>Z3_1i?vg&QAXmvf{i(`%)op&OU;5N! zcyp!YzrQlo&gIidzKhp%w)=Fmvb>$BzWsn!y7$9bKkWWJY?&_jZ-d9Do+$xb&mVPP zif2mP^k$ywGBy*587@qkTV|?8MXflHPR8yuQlq@ncwNz=D0EMkjd`Zv74`b@U-fw zy??vlpVxMCxo1yW_wE0>`c&n!ADrgy%#z!JADPVgJ305*rku@dBovp4R9&Agy3!*$ zGkt~5?LF@va!;?+5Atb(!Ejs+b%Lq-o(2szOwJ5 zk+<8nnOmPPlD<~(lH>Bq7#@L=GY0Edc{Y|^`M@N zrR#2Yr~b+uKGu~6x*L63Ia$>*w0@k-6}=WJ+Tvv#IeyG1x6ce{yJ31(gE=)n zILEE^=Wk!1IrhOen-pq%x&u;s-FG&=jOc7N^3qWH-5KyPLEv1HX8oQw>LDKmBps%) zhH7NbQd(^rAG&4Nte~fif@06>51p2MIqgo{!JXlS;RZ{^RkLLIV$aPv_b-^47eXk4Ub^qw0{ntgd!W-Hj-Q=B|i z$wZ@1mm{f&H(gC`*@Z8>lTXfi6|Sz~ZlKD0<&-yH%8SD;>+2pJl#Gg6W%5?nNyc!q zsrsD1CcK%Z2`k?`j(D)**guX?<=Ma9whCyynk0V8hf(YT{~oRm(ehc_w>wE@1bI%L zzJ}%IzZq+;JIH!}m0F><-Ys-i;Eew0S$7md?!216zTT>jEAGk@)!UDImF`>&Of9Ou zJIQw4>bGT~|9x}~=cg1dOKGM5!uU5b_v-NWocZ6^4e|gC4dhJcisHOt3e$FNRH(WO^ z-uBq8C;DvW`_GR{HrRNJo++7Z{VF+S>5)~ADck0pt7x0_Xs+n}>nlEl+n!;Y_Fkk+ z@buQhH5EM%9v6RD6e^d<>;L@lvOVXT?9@M9%VDhCy6Dq~v|i7U-Bur4Pi@%2FS8<0 zJ@90|(`51QpI12qe)}Gt6LW9p^U80vI~N}h_3w*4YsjhTdi1mVk3AV@EwoxbW^b~z zUfx@gVZSbocjqk4sV$C~+v;L?KYl7T-S_SIwKo@9)~~fxd$!f|_@+JE(s+JvH1&VF z(NsJ1_g2%=_tpObBQMwGoRx6imNswgvR4fL>PsAFPE#3Kzkf9l*s=BdTS1K`?{&vEUvm1I>Hg}+4ypdsNjsv}7~Gow zQe>Hi%)Fi{F}|Fd4!>DvJ3HogB=z|AT6O!ce9B$jv1g*mIv7-$Py1u5Nn zILCy=CqP+?MO6RbwA0K^KiODWr>^bU=+?m^_j!8Fx1@qcsvgF_{7${=Yif08?UehK zGg(jk&y)A&&lVV^#vYKDO34!!Q))eWe22*VN5y+Wk98c{yuZNtpp^6UGl`rEH+}f3 z{HJ#Fct}5==k?;=`mMD^k4kw>!t~Bf&M~cdebh>(*}wMi?9$&m7F2Oen7iX;bNvkE zlSbVfQwxO;ZJ7D2fX&sZ_tb-HkLFCtjCd(|?}@>qSzFBC?(ApJ>pS)-()Nq6U;g~> znI`W9@?VthE1KW6EqU9LS3O=qjq-7tD^xm9YjkgQkMw7ulLWYtwYA6~JkA1^Fhy7CM2+ILPNqB(khmb~1n_4wcn z!(;m{FfDraPch`Ju^qL5B$Sn0myDCi1P7csLy2&%iafRKrcK3{fTcY+jxKY)$W^ zrmF7mZEdfft=@Fx;l0DtT#x#n;5>Y+@xD5T>A8QQ zH$R?PQDVq_Ioj^KBNzAa-*(*>b6=e+Ue_YFFLbJ~z4!Ir<931NfeH7zLJQyi)iGFo znRA~x+vcY1_pc?MdR#c+ZL>&In`aqQ$a<#Jr@WZDWCDAZZd|JFsM@UiEq98b%)~Rv zQ@vz-{EycCH2F7a#qkrz?*}t;-CWE&Kj5X7kWzA03Da@KsCAO;){2V0jM`03-KXZI zALQO!%GS2unZ?QVBbQl_x>vZK)hY(jbwXdKu40&5xN%|kv{u`l8ZHwzt@JM2Rq-4pDA?sH@q*9#P3R-1lRP_Y>mM7&mTmq%&1=u!&vRTZe9miJ@FQc7gT-<6 zod&#Vc~S?NpDnw`7k?uwC{x{6>N~s7rX}&c^@@|XU6G!8b)AEB>j_PVs%NsZ&Q3Vb zvc5Ybfn+IG0^z?eP4E z)Z>HuX7oFWuI<;|q1QNhn}!af$a5=S|4lt+Qf=lTiI+I@A7wswxp>q@{>!0GBQqht z#D#W(SwWB1ag;I%Hy_~iQT)~u@GkOZEbslN2Zhx?3opDSwBee~b(wEd{wJQ7Ug-B! zb=u4o*UEpd+;e2pQ~8v{qRW+gPe>VFc9fh&KHM&|GT^Dd>_x;Y7CnNpUDvPcq-;3@( zo0z)Yd2N>bN4E>Nz9!$3-h17>U2w~x=NHc%KQY28ooVHjvg9V0sIP}urtj67s1vFGs69|D`}T8B=ef&j&(9Ioa}pJqc7tbUSHW({ z+l%IZxqDEj|Gaq2p~Z`hCNpXa2x%PLz@=(Zyyl0^yv@g?3g^B`JQ=iL<+NJ?KAEXD zg6Z3}_X((;c4b`mQq@vlT;++*jw7??A5RO+|LmT*E%0Q8gUapY4U*lt7TInW=PbT! zzRbV)ze2{b_v<;tq_^uQ+1-3{vi{27XG-T@XeSCXxUWAwCFSvHXS=v(Q!H-Gww%y= zm)UA>McAy`8HexHEj&EM-2Q^2b|qiHgSl_G?gTD=Z8v{{R^0saJqs%qaUK+56Dqm! z)n)m?$45TA%dKDcrsY%ym#szCwnH<5S!ar^?se|_{qjrOOS`S}g_qg({r+LgQc;mD zFKl#k;>>eLo90Z2uq^UP;ZLzCXj0iGI5*?7^c0;%H>SJ3x_@?2pnr*#&Z=*x7hUC- z=j%3Un%JWhIq!0HM2lD3Q|E4Srt~_bHEGNd)`_mu)utiLF9vr+Q9Db)G zR@g>t%ECsm@>L4Kw>tguR_)kh>R^(5ocEETkhO9_LAJ6?p%3jnVm$5%gcTcV5r>m0!CyN?w12JTW#*s$^c1Wu?L4{c$zs%a-0| zTCgF_T5sW(9loAxd`|Sb9-ZX+!u8{Hn|^1;N}ajSNK{qx@_ZK>s%xYsB7O0N8}gkDjHWiDGT zc53H(IR8Igwp00L(G!C!*R`rxyZ#s#%O-0*>9zd5on7I?sx{Nrh@UNgJzb@c!65C# zhtqNZgqrW^1V_yaW)1CKa-Hmtds-d+gumz4B4X zL6;7_z1kC5t~XB46S~k*@$&zRSzj;Jc!?L5`CdO^@H3(=ZHm}NhnS<^uN2wo95jA= zT4>MxZ!`6bZy5dERuMOWW%*%I=hU|XI`7rEmd_C|o&7mD(Rqt@nVUzV<>y_zW``DC zP|kMfogsB%%>n*@>os_Lzx==Y>v!+f*o8Z)t6o(HJ8Dj2nNbt}Cwhvuhfr{^S1*&a zyG`co2Y3E`VPM|8=teWs)1O_oJf1c_0;{k8@nu_RbbNWxCz(&H%sCfsT79MXx=L*E z*`rLo(tZ7Z>o3OS{cv^59J#!F3m^ z$~Vr~$PsSgSucB|Q~1hkJq`;lPpL=O9_AV(TUzH> zk+nW_O6<77{t&;SGbu?LVShOLoSw6vO%^e2$lB?|SgL<-hgkfc!UghMRqwS~8(A9b z-dQqvxhVgPQvP{*kB#J5*7m!%spfrJA$2rJxM1#YSDOf?Jl2q`ACG$c`S%%=&kEgH z)^l=E@{Ktc1iQ+a#y(B2~bxEfo5C*Rj~@0Xks zmsTA6dY{Ap3t7brg%$1g`h@B}beX$fNn-JI?n6bAp{WM_OhswhS~iJ7XW#ArIIU5( z#N21sldh?*Kl$JPx0%tnx;FFL9M4}W=PrNxc;@`K0Jf>`Y!BM~`p3W>yX=gC&(@Y( zUn;%|D1O$OmfRy4pq+E~Oy;+=Ti?7=TyDKOw7lHBKWRo?^U@2APVs$dK6qYhxnrzGS+H)g^sJ9QUyV|&yLs3emo`jH46@A$SbF*(=d7zY zHkq<+RJ1&*woCNbsre7smQ2&HNVV(<5u3P+bO@#jqmCa2; z;#;nHWKlYo;^K7T?_Hknr_^jKsfcNY6nJtaU>L%t^#k-S3uM1XmSaEJVJn@Li ztle+S52U6zHE3JB7I&X`f8B|eKW!;bKV(k)^`Ye%>*d#tnaR58{_|(v&x$th-5@?k z`cj5QffGZ4UEgA*`K=4@zkPOD>HbmmpWbXc?w#=e;%C#iZ0h0L35-*tyH83w&F6^U znBDWWJN7fn?r%M3qhpuMddspqOmyWcCRMw1U)}{@Q?9=%<5zIp=d$_kt@E&LU*cW=N^SSs0 zTdt#zUuYb^TxgS=qj57gH}`^^{4Cp?rx(|ixw{H!m3^M$-;>l4c~Y zx6SkG%6a}I~Cy8X6B>qXW9)Ad!scfV9F zR*_RR@bB{~b(~p~x?(-Urv*Z%Q#wzbJbJh#eM!rrcYlwG%VjQo&M4a_!`HWxC$QkU z@LJ8(nk4CCDl@icAKSm}$ezUq9dADq`W$7$U9PfP;@ZASfeC@%6^j49Fn_zGTC1<9 zV(zuYoBkfFSUc5tmz}-k)t&FBmZTniRvYhAr9FRpqsX>p_vcJ|eeo~zA=W?+%Utm- ziE<@;w%1rcJzCzbxB7nKp~|Z0hYhpJ4pq)LdQLp5qT_O&ZAqe5XkVJ5top9oUR-{U z-Sspg8*GhJdRp91Y(DZhV8Pq$gO*aJA78(Sikai`TH>?#1mXSqVEmLnPeDB=Ug5v+ z{uw*sf5>M4d8E&K|8azE*gO6D#MhbcUrhXM9=^!bw82K-P_geWyZ6K&%LCUKPL8