Mathematica-notebooks/interferencePatterns.nb at main · maurolacy/Mathematica-notebooks · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='WolframDesktop 11.3' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       161,          7]
NotebookDataLength[     64951,       1292]
NotebookOptionsPosition[     64102,       1269]
NotebookOutlinePosition[     64455,       1285]
CellTagsIndexPosition[     64412,       1282]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{
  RowBox[{
   SubscriptBox["f", "\[ScriptCapitalN]_"], "[", "x_", "]"}], ":=", " ",
  SuperscriptBox[
   RowBox[{"(",
    FractionBox[
     RowBox[{"Sin", "[",
      RowBox[{"\[ScriptCapitalN]", " ",
       FractionBox["x", "2"]}], "]"}],
     RowBox[{"Sin", "[",
      FractionBox["x", "2"], "]"}]], ")"}], "2"]}]], "Input",
 CellChangeTimes->{{3.764338979835034*^9, 3.7643390300883293`*^9},
   3.764340978857231*^9},
 CellLabel->"In[37]:=",ExpressionUUID->"76b91d50-29d1-4742-8e1e-e2ddfe0efb8a"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Plot", "[",
  RowBox[{
   RowBox[{
    RowBox[{"Table", "[",
     RowBox[{
      RowBox[{
       SubscriptBox["f", "\[ScriptCapitalN]"], "[", "x", "]"}], ",", " ",
      RowBox[{"{",
       RowBox[{"\[ScriptCapitalN]", ",", "1", ",", "4"}], "}"}]}], "]"}], "//",
     "Evaluate"}], ",", " ",
   RowBox[{"{",
    RowBox[{"x", ",", " ",
     RowBox[{"-", "\[Pi]"}], ",", " ", "\[Pi]"}], "}"}], ",", " ",
   RowBox[{"{",
    RowBox[{
     RowBox[{"ImageSize", "\[Rule]", " ", "Large"}], ",", " ",
     RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "}"}]}], "]"}]], "Input",\

 CellChangeTimes->{{3.7643390326235857`*^9, 3.7643390769897738`*^9}, {
  3.764380664121935*^9, 3.764380682655555*^9}},
 CellLabel->"In[41]:=",ExpressionUUID->"e5ca65ba-f90c-499f-ad73-6453219bf422"],

Cell[BoxData[
 GraphicsBox[{{{{}, {},
     TagBox[
      {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6],
       Opacity[1.], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwBWIQ7eXJ5/xbkfMAAxh8sE8/fvvDhsUccH6L68p5aaoI
fuGVX0KThdnh/FOxUi+eCLPB+X/3rdpgJckK5z/e9HFiICcLnG+2kO1KLzcz
nG+jdEmv+wcjnC9TzVfb84oBzr8wxzAi7e7//TD++YzNz013/4Xzl2letAjY
+xvON5h1oaDo5E84X9HA9pbY6u9w/qtdrqxsG7/C+dLZuxPLez7D+f9OCS39
UPgRzi+25wnJ/P4Ozt9hfPbA162v4Pz1gsc2iO99hlBvNZPZLv8RnG/VGu/x
IusOnP8+409/fccVOL/5yGwr+x/H4fxru22OrGLeAOdD6IYdMH68jtvfkInr
7GH8hx4RoXnzTsD5X9bbr5ewvgLn31oql/fxwh04vzpvt0fo/EdwfsQC/fA5
vc/g/LT2k0z3L7yC8w+3aGv3nH4H58cJPj0kEvkRzv9sddzuYdlnOH99Pu/P
pIKvcD5L/bPGpCnf4fzGmcqe4lN+wvneLPWaRzp/w/nrPHNvvFv5F863mLX/
6Lml/xHySZccxJ4xOMDdqxCi7fiFEc7f9Jh9q9sHJjjfS4RVrZuRBc4v8zIx
W8XACuefXPEp6OgvBD+j5FeYPBc7nD/b1eRXMDsHnF/kvnDe8ikIPjT/wPkA
qIMSUQ==
        "]]},
      Annotation[#, "Charting`Private`Tag$674695#1"]& ],
     TagBox[
      {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6],
       Opacity[1.], LineBox[CompressedData["
1:eJwV1Wk4lWsXB3Dj3g+2/RTiJBSiMmWK7HDfiQYalAaHjiEZopJ5LpUhU9uU
FBmikFMHZQi571CUzBJCO4lSGTJv4d3vh3Wt63etT/+1PizZM+7HHHm4uLjq
OfX/bnqAvmdJVgC7kjtT9a6LGOwqDZ4kZARwadbAkSdbWg1VZH/cE5cUwEM3
E+M3b5kwlI7722yzuAAW3F989Hs4N6AvNixoiAhgQ5HNZK8iCVbP6jwEdAE8
K/803PTkX2CyLdfikKAA/v6iBL4OlwUsfVFua4oA/punfuJ27xbQnn/1iQuP
ADbo+/AqVXE7qBWbtPZdIXDAOsHLDmVaoCTURiCMTeAHp0L2rTm5E+T8fFeW
MEfgkDLtzKOeBiDZctfZzN8Evt/pJJ8UvhuE1xesfTxO4DOqby/tjTcGvup/
ocoxAt8WMGLv7t0HLInZ9d1DBM5LSL9CVzwCDng7NHwZJLDjuGXfePJRwGC1
e0/1ERgVbnq3UGoBpCqetNI6CZx7HqZ5nLAEwpulQyRbCZyzIdnyU6cVWGHG
KG1tIrDnFSnVCx7/AJazS/ieOgJv99M1ng6zB+2d3ZpHEYFliw/97cLjAGqB
CcumisBFPXbS55lnQa6E3K7ApwTuXtZTkelxBs4NHyeLcghsnMQa3rTZHVhq
mWbUZBJ41dqYwsW8BPZnVpi9SyNweJEMozTJAyj53Xo4mkTg602619yfeYFx
xSOnZcIIbN5+TEXKwh98SnwhoBJK4Jofvxw1bgaAthXlcr1gAuu5CpKC7YGg
pJsQOeFNYHfvdC++iyHAN6K2IeYsgUc7UndFX7sKnH+r+9yxI/Bfccx1MuAa
sLTJlMs7TeA/RsxjiavXAEMnOKT2OIGxqa3ehtgwsPx1h9aiMYHdKs/ZFnRG
gjCTggwnBQJ/ZVXLREkxAY4JNN8oy5lvy96tIB4P/rSb8fRIEfjKhUfyZlnx
wMtm3PGAGIFHiq17HKsSwBk/LVUVXgJ3FY7f6KAlA1DwomqKRcXZjV1CDlJ3
QODEzQuP+ql49Ej8m2uNd0DZDruNDj1UHDUjODXsexeo1fJc72ql4hZrsVL3
vjQg9XGfaXkNFZdGqHjfqc4AbFpHT3A6FcuflnKI9L0PdCxyonekUnH4zyil
jMH7wPOOt/54EhXvSJHy6NqXA74rSGTZxlCxpPAqT6Z0LugxPO1sFMiZ72D1
5Xc/AGWXRmapllQ8f0HslNflAuDRxRZJEqViNbXag4vtRSDl2BGrZJKKT2i/
ddARLQbVbTnZt4So+NaumZHx48WA0nxQPZWXipUp3JPtvcUg/VXGoXvTFFzY
GMGw+V4CGsuMbuR1UnDT/PuK0I2lQOZO9HJVEgWbsLWPuo8+B8YSn4xfMClY
8WBj77xuJTh3Syu2JoaCRTTqIhZvVIJnCf2SL69TsO0d3mVnlSpwIFpt52sv
Ck7LypKe8K8G3kEdnm0WHB9YM5y0FYG3/0h+GxalYI0Goeutl2rBkUx9wCYp
2ComayYrsxZ0sWxSSBoFr33wxKywpRYMOOQYM/goOOsWGeKqWgcmz6lkM2f4
8RL54XHCrzog4WtoxXjPj3e0hcoF+L8CZ2+eecdM4ce6ET9cLSsawXLNoyLG
en4sMkGoxQ20gnd922lLYvy4p2Dd4ydkG0ife+ZctYYf5z92OVGm3gb01ZCM
PsGPI0YidTd7tYHAe52xBvN8mKshhxGw2Abmgv64wPd82F6GNroq1AEmdx6W
3ZvAh88/NLLftb8LfCmZSjgqwIcDuzBS2tALdLIpXXFCvPjegttnSt5noC/X
oRazwI1NBBKHg9ijQCqIHhI7xoVvp/lXCQ2Pg7Z0DUungVVkUkbbs/DrN2h1
eTq6o2oZOcTUNHX8mgMPt7XvNH+xhFSMSup2tbKB+t22S55vFlHpyayCbcUr
QFbdoE+8cB5Vm+RE2fhyw7FKE35K8Sza3d98S82VF25wq7L3i51Gz1vyFgv9
+eHKW5EHkx5TqOQpY3a7IxV6Adrxc/Pj6L9Cj0U9UQFYodWMZ0vHkL7M6zK+
GkH439rXRRIvRpCLp01V8SYaPGaz1pRVOIKETxo4HlKkwblHp7/k3x1BE8qt
0V+VaVDfeHodw38ExYQlGgnp0mCj76ag01ojyHQxVFflEA2yPgaaZBd8RXXB
ue21/jS49uH2PqWUYXSNbOzQbaZBL8YdXkP3IbTgIPL5p6swTE7e0H/SZgj5
rJFIDXcXhs/G7z1zPzSEKJXuTElvYTh3/75jtvIQmljgYuiFCEN/oX8b+L59
Rhvj11sfYArDy/01MU12n1GBuNmzpyXC8MblYdG/j7GQ/ecCrfw5YZjf4/TT
YzcLqdxOZL5mC8M3mt/ro9VZaPXlDN/nFWEoOPrLp5rOQoXbE3UFqXQomTn+
H0j5hMSYzumqEnSosFtsZ3PkIOoTfnWuXIcOGeG2+7+59qPQPxf8Wj3p8M1C
yAMbs37kvD/otbovHVqeT+d5r9yPvH5HJd4MoEMfi97qlz8/otqtzhkglA6L
ZC000i5+RI1uXhf94uhwS81eycOefUjYdoeBQR4dis2r/nwa0IOkDPJVpXro
MMf14AElqx60992aVKGPdKg56Powi9GDhjSXneYH6ND8VZ5d3NIHpEqL3V7/
hQ5jkmTfO4V8QIPl/ac0J+iQR31dzfqr3ejsFI+bHT8JJ1z+MK/c6EIHJ2Lm
V9RI2PVEY81hpy7U3Xx87IkGCStnnOKljLtQRWFHhJU2CcNC2+Ofr3aizPVD
z3P1SCiZ+jBh2rcT9YjvneYzJqFxg3mSs2MHmpn8Rp85RcJtwhGiOns60D02
NLaxIiHdoiqJT7YD+a0WSdSfJmHvoEJydn87kreTTrlmT8KLc+zkjxbt6IbT
wcG3riRMVXiQcsSoDXUM7Re4EUzCELc+cZlNbajB+EVb4WUSvjqzUa13qRX5
dv1UbgoloVXgjJqoVyv6x1ok7U8YCcMLMtQj7VtQwFCrmVIcCfuo01ruhu+Q
pyivb1E6Ca/XpzHAQgPaYue05WwFCb+16CU5VjQgmHL81uBzEh7u/fAjxr8B
VX25sv5EFSfvuOi9noXX6AJ7vYNODQmLJGJXPRZfoe0yLlNv6kg44Bpcn8uu
Q8sjq4+1W0ho5CMp3VRZh76Xa5681ErC/CsVPlOBdehcrjGZ30ZC7+QZRcOl
WtQb0VYi1ElCwZrzUR+WXqIFU9PynA+cfchVpouxEXJQpPmJs0iopzt3yD4Q
oci7i4Kin0nId1Bz9TG7BonWnykUGiJhms8j+31LL9D+6uI1U19I2Nh4VzHw
TxXKWaxyih0lYdJA94fXwVWoeWLx1LlvJLT5LRIlulyJ1BgsC6PvJJzdEPPj
3+Xn6N/WFtdvYySUcw8q+rRSjtj7okn+cRL+ul5ur3KlHJWaWJnXclyROi0S
sFqG3gPDu0ETJDxS6+YjwlWGWp9H7x+aJGHwutMME+5n6MSSi2DoNAn3KaX+
SLj6FN1W5mdKz5BQBHSlD3I/RWNydhvKOS5wObjqx1OCtjArTQdnSdhdpV//
iLcIpTev5VqeJ6FUwJnB37T/0PSKhbn/AgljA82040WeoLDB1pYJjt1CpFlv
pf9FnUa8JzsXOfe+TNFxkS9Ekf+E2XAeETQNnYjh3/YI2R/rSM7jWOn6S12o
nY8yeD2jzy+R8G7Yo7gBvTzk9SD5wBuOBSOSvgSCh8jlp4KO3B8Sjt1wZJaa
5qJ6I3i7kWOr6MNfj5nnoK7IbCHxZRK+jdHdNXniPro0IPvYluOCmwKjSvZZ
KFab4TfKseamrwHxzRmIWV2cqbDCyS9frtDUk462nKHO2nL8WyGqnX/4LhrV
UPVL4bh9q3UInEhFWXLiim84LlJW3RbETkHW68q4FziOV1vtKuW/heB7bkH5
VRJe0mgPnVyThMolJgxNOTbXzlFRlkpArsHeWRc4tr04VtR0+CbSiItSi+NY
xvsmsdsxGm2oUfyez/FggKZdWVAEirxg0oY5vnelu1w58RqiDn/60sVxheCs
jNHREBRwfEr+K8e64gYtKpd90I+PPvFTHLvtEVxSO+mGGq+6bmNznKjr9qzx
nB3S8dT5uszx/wCt6v0X
        "]], LineBox[CompressedData["
1:eJwV0nk01ev3B3Bxho/kfI4pUSlDUiqSyJC949uA1O0kkWS4hkqKlGtMZIxc
IRmSMVPGjElCCHFJJ1OJyBCVucHU7/z+eNazXmuv9ey93vuRtLrCsuHm4uKq
4Zz/vyNU7YsbL1iAylWV4eU/JL5JE1x78pobhN6Pr57gOOuozZ7i1Jvg2rrF
uo/j8UM177Xu+EHXnIzya463H9jo1+QSBAp2CYolHNtruO0wtAgFOB9lEs9x
Z9zFi5My4cCUZeZ7cfzjfkxVsVgE9JWL7j7L8dp7DYLujCjYLl3Ur8KxasSc
LfBEQ+mJiQp+jo3/lXpG+XUfrq5vrh1YIdE19C+y+WsshBw48zOf4/KAnDLD
zgQIUa8a0ea4+1Yvn/jrRHgtlZNM49gTKQWT/UnAG+Ed3LBMYsJ+JUoJOwV4
UGRAneNdmrp5om2p8Nfwr2OTSyRWqVsYuzelQfVHykQixx9Vw3KgKh1OZA9m
zy+SeFnlkVFKeQbU7+n7L47jFeVKLmpRJix7n9isybGE0rhhc0Y2JPdxH3Ve
INF8x6Flw7t5cOGwZlPRLxI1Y9LDfiTlw0AE9ZMCx2t8eZhHjQvAjJRxz/hJ
4pdvfyd/syuEK46LisE/SEypl6lTDCyCx+7RJWvnSAxfZIeuIovBQPzWh8uz
JN7Y7X+qI7oYNrqsD6idIdE0YXjEOb0EFHIErc5Okyh8PZ23rL4Mrr8r1z7z
nUTux0YdgQbl0IwxfmHfSJwaoMUbvyuH6x3NelVfSWw9ardj4fNTGBcTsWFO
kBggI3d8P6USuIt+dN0YJXHpi2GzpWQ1yCSzp/z6SZyl5O7Ss6kGFyPJaKeP
nP+xiRqplFUNebLcdSZ9nH2cKjHl2V0DLlaVFRvek1hSI/ItDWtBP//PBodO
Tp6xneSYeR3cYulw7Wsh0aZ417X21DqAbx5Gfc0knm0L6C4frQNJ69fqN5pI
1KeqJgdfqYcKJ438Jw0kyjndV5L3bgBavxdrpJrET0eMT11+2AiSMZH9rsUk
ag17Wrb2NUKztdiJ2SckxvkkO+zY2ATOqoFfLhSSyKoY9x+Pb4Ka6IRw/TwS
a+W9Sm1jmyEn3rN2IIOTPyNF1DyqBXLPnWKcjCNRaXz+69aD7fCy44j2GU8S
LfYRzl3W7XDaudfsjDuJYQHivwP82uG73548I1dOHlJAHXnZDqW3VCZ1rnHe
Mw3amKb9BloK7nBN25Mo1Cp+bDN2QGX377f3zpA4lw/56zTYkKK9bjVjL4kt
8hqCjmZseGLaE2+hRGJqhsr1V95sSHZ3b81T4MyfuFPDpY4Ntl6uQlrbSSwM
W//qrcE7MJmyR7lNnHwdfn4Ms+iEmrK7HfIEiaPb8xnUgG6QYnhUzncysCo9
2+lsZjf8Vjg+9PwtA6Ol0tlFzd0g8EK73qedgYfEE+KsyB4g1+tULTUxMI03
RLY6pgcC1VcnvqhkoMWYrZbH41447VIz45bMwN5HEpen2z/A6l2737+yY2Ap
LYeVOfMBngkOscWtGRhpp6ZqLtwH4SJq7RcsGHh0myFX6+k+SAibaFs05syT
ExyR+bEPtL6dY07pMjC5aK7U/OtH2G9Se1NcnoHFFsN/Rm4NAFNSuOjGOD96
XH525FTiIAxQ5QLqzPhRG+atGfmDYHT0fZGjCT+uZir4vKoahOcPb2WKneLH
mMKUp2ofByFPbHjc8ig/ls4Fb5fYOASCz69Ov1bnxxl34zWjcUMgG+85RxPl
x4uB822u0Z+hoj3TcXPrGjROUjj94M4I+N6zy92suAZtA5u4+9vHQfid5jqi
eDW+9JOXD339Hf45HOxzYAsvnhMYrhU2mYaOFDOWkgcdZ9VfaX1ymYWUgpH5
yVAq5l/h/23lOA/Fbuwe1SwepHiP+FhF/YToNnv+36Gr0CdWWlc06je4BHSk
ta3/A/oU7211wYtw7Nn2FObeRcjTdej+nrUMzQOfWYuMn7Av7kX9f4/+wGHJ
LXO1J2chz6oD145wYQzXh6kH3JNgu9lQ/sDcKuy3UDA7IjIGT4boJYemuHEl
sUI9XGsQ9ISpsiGrKNgzG2R7xqYHpN8cTAmkUjBrbkXvIPTA0p0ACT9eCkrc
iHiiK9YDuXRC1EuAgqmNdYqJrd3AXFxNXJGk4M4W9qSXaje8+8QcZx2g4Lrb
6fcFmV1gkb8hT9yHgk6WqNzNZoOLnrJKNhcVzzGdTSrz2mFSJyMlgkJFo4I5
4a//tsP5/eKkB0HFA3w9dipO7WCqyDWmz6Si7iWhaXHldsC1LbHfNlFRVKX3
6RGXNuAb/HtZEai4d5tDndeDVkhyi6wr86KisaOcTKBAM4g503Yn+VAxzVv+
U0ZvE0RccksI8qeii6Jg8J/UJvA3N3cxuUNFnebM1pOqTXDxoLzc4gMq5s5O
Rt61aARlgZchWpVUrLh2Rs3heQM0Zc6w6heo2DO6w3Ax6SX8esX9jPsPFbun
/zLndngJsqOC0shDQ/l/Qvr01V6C75Y9sxV8NDwkpe+Q3lELminOkQUbaKim
w7zkQdRCQfzc23gtGsqs4VUvvFkNMWE/DK/60jD3YFz2qcPPoCGX9jw/gIYh
k2d/7p2qgPmWtVu+3aZhWuek78PYCmDxqc7bRXLq/VllxPensCbon3tmaTT0
taaq/i+hHG76/Hp3pIGG13p511wSKYXz1xaMNq2mI3fjoQ3rHQoh1zRwmzCD
jtOj1lLd8oUwoy28RAjSsT9ieidjogA8BHYlz4jRsag2Lmr4YgGE5VlO1G+j
Y2DLxqyAgTwoGWv0vqRLx0vb/q75V/oxLLSdYlka0DGJP469ryAbtMoGZYxO
0JHO9+XNu/3Z0Oi/1AQmdKR1uy9MmGbBBylFYaELdBRoYVBCUzOA2+x+5tMg
Oia6tqs9sUiDw/+T8cgLpaORzeeg9KVUCJUvNEgNp+MXxiOb8NhUEFlongmN
oePqkX65g50pIHd/RdMik47HhZYd9pomw7E3Nm9ojXQUMervDJZNgMjymdTF
13TcJhr+Xs3rAXQnertMtdExNyWruetdPFhejl3f20VH7zkzvo+hcXCNr9Um
d5SOeu56zusEYyD+oPLCSTqBWC2rbOsWCdm5p+9X8REoSd3sT/ZHQLmIh/I2
JoG9/qkgfTgCOodrLq+sI3BQpCbrtsRdYAYcH8rcTuBK79Pzlew7sOn71ZtC
CgTycT12etEQCruMojfe2EMgf4EWb9zzENCX7Tt9UpNAf3FStutpMAQ0XGxZ
NiBwtHfyX7ev/nBvV9iF8ywCe6Y+3z1A9Ye06ELaWyMCLwXFeg9J+UGN7S/M
NCdw7O0zxdJLvrBECyhhORHosI+tqHn9BvBdyWI9v07g5NxVK7c5TxDvapnc
6k7g1j2h5y97eYBqhtD2ZV8Cdb/al/vkuMLVw8kPM6IItE9/tMPE2xl88us0
BGMJ9HGM+WBx9CqEi451eyYQuLDqepK0tBPkju4SYqUTqAYPo8veO0DlcVZB
ZTaBrzXlnqe+tIfmsusGW/MJFNqRWkm8uABjgZWBS2UEHk/RKYUpG/g52S9j
V0lgn8mNHkFZa6AZ89S+qSbQmmBvtbxiBdJyekvpTQTePmmSO+h6DpTCHWIF
/iNQ9cNty/M3TQF/hat4dnD6ceuyxvKM4Vxjl+OJ9wTunF1n0HvzJDgoLvJX
9hNYLXVswkDmBHjGSDyW/UygklfOB68+A7jNpX3k7hiBem83UM9W60LseZvh
xa8E8mweCledPgiZ7UG+ttMEdjgpZgk4akPpvpxNb+YJ1Df/VNXppgX1SW2V
GgsE+gVGnQnJ3wdsYtYkfYXANZkaX7R99sCQ49qfTB5e3DkmurLctxNmutWi
POi8eFvs7Crf6S3AdcBs9wgfLxoZ/giVc5cAMuvmf38xeXGDjnShg48QSAik
2T8T5sWEJt+w3Gkq7HB7RciK8aJcpENarM+slsan8UfhG3kxwFNFZtTnrZae
LkNnUZIXL5L7YtRuCe7/P5ZPcuo=
        "]]},
      Annotation[#, "Charting`Private`Tag$674695#2"]& ],
     TagBox[
      {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6],
       Opacity[1.], LineBox[CompressedData["
1:eJwV1Xc81d8fB/DPvdY1UknLyqfom5GMyMr5WJUQUZIKKauUCpERSiUa6iJK
VCRkJiPrHCQzeyW7UMa9ZF/c+7u/8895PB/nn/frdc7jcXAHdwtHMoZhNiQM
+/9+1EhQfwXnRT1MFnvRgVae/zRFghc5lsq6TbMtj0+83iLCiwaVO3LK2RZ/
fNpYagsvWlk+1uLBtuBy9ZKSEC8SKROr52abdVEtGQjyonHNpQRfJh1MNydZ
mvLxojCtZvOmNToY1N5EOsPNi27H1vRzst2SEpzpQuZFVC1NY9FVOqgQnj5z
k0lBhsK5L4RW6OBTkC1vCIOClCUXqsaX6SBxsiH/2QIFKV1c6UpcooNIa62L
Cf8oiH+C3nRwkQ7ufU3dmEGjoPOVqtmF83RwU3EbLBqnoMnVC37Cc3RgTZnf
3jlMQebV/X1Xp+nAyPNC9a9+CpK94OB3hUYHmoMtnjM9FOTlrr3BdJIOxAoz
mwTaKEjoQopC1hgdrJMSDxBpoiD4cxtSGqED5tNw2T317POBOOuoYXY+Z5d7
+pUUVOI8nM3qZedr61Q+DtnzBcj4cvew8wHDQdtiCipTfnqO1kkHSVt3avnm
UhDfXe7Q88104Fz9czo7kYLcv9oKdJaz51U5Gl+WQEF39/wyHC2lgyMJhcYN
ryjIfjqotusLHch6RyWPUSno+GVanW0OHdB2m52VCKGg5P9O3VuLp4OB56W8
8kEUpGK/2rvtJR00M+UKNPwpqNjxZ/HmKHa/nRShk54U1NBYpPQ5jN3X/Yrq
8IsUJHU/lhHiyZ7nn6JXrD0777T6g4yr7HlsE3Z+OEtBvGWHRwpc2H2p+QdU
nKCgacd0nRtn6WBtRFVl2YCCrKJLIm7r0UGIYWq8kzQFjc9rZbAodIDCfc13
4BQkso9fIxGjg9UWY3K3GLsfo6MyUks04GFLczQSpqAb7375lY3SgIO3yl55
Dgpqzg3psaqgAZBaWjwzyIOc53Qmd3vQgC/9yZW0Xh7091+0faoLDeSr2u+4
0M2D1s/au/HZ0oBCBfluexMPkiRFvnE5QgNiPw8fLSjjQTkyT0dfiNIAQ6C1
2z+OB0mnz+3sLJ4CapaJYaoxPChS48QXk6wpcCPWU5tG5UG3Fm3tEt9Ngb/S
W9/YhfOgyj1NujOhU6Bb56yzni8P2iqroSd0YgrkXxud57HmQWnuHOLBvyfB
9XaGEHUTD4pDO7cP0CZAtIWZTeR6HrTB5rR20sAEKGlOfBvFz4NczUwrzZsn
APd3E8UYDh6kfZF2yT5nAsRVxZu+nuVGLm0MxXM3JkBNvl7ohzZuxB/1LmeE
Pg4kYsPWiqncSH4iu46z5y+oOyfy5/cmbiRn35idcH0MmCVoA8Z6brT38eNX
L8+NgfZB2+j1AtwoVza85Z7RGOi7kGigycmNZm4LZu/Fx8C0q/zbp3NcKKDl
zv7qplGw9aaOjWYHF5Jn+hToyo6Ci08cGp5Gc6EYd3lP247fYK0sLVtzOxci
G22xnxIYBr8+zTw7zsuJkk76XaW/6wJx3Iw7Nlyc6PvB9vJtXl3AyobseYHE
iRaizHXND3eBGtImK69lDpSnvtV6YqITZJrvF4n9y4EGvvnN9Kp2Ah/azXeD
tRzI6ptHAPf3diAgu/rJPYwD6QQc59LmbwVVAZxJPvc50Iry5U/0gRZwu0Ug
KvgOB7ILzzEq+9wCZnzEvam+HOhY14bWDNsW0Fmto1VwiQM5+y2EDeU2g7eO
wZXMoxxIk073mKhuBGpvudsf83MgT4e564bFtUCz6XqtLg8HWngy+e2yUy3Q
WestmydzIGXDzjT6xlpw6HRu6jkGGS2R5NWFL9WAUxvtA/f+JSP7LwkbpySq
gU/wF9nv38hofkS1uOLVV+CfJSUZXEFGNro/8rVNv4KgvqebVcvIqDbFN1aK
VQlCNZyw13lkNCF3V1rvYiWImRHqdEsiozLG9YZmlQrw5bxbsMAdMhpy+lCp
0wpB2dOumyiAjCQuHxb6pQ9BRamem+ctMgrZKBp5N78M1G3ffqr3GhmdNtDX
Lo8vBT0tVfLpdmQ0qfbVzNmvGDB0d3QbHySjG5KVpyWcCwDTPew7S52McqRM
hG/+zQfk+PmK3P1ktLujcvqvWz7gY9RniMqTUcbmroW93nlA9JPP3QkRMjrg
4uBkG5sLtHe2KoQvkdBMEA/vti3Z4M0m/v2WcyRUfLDCQ8wmC3BwGWiITpMQ
c/1Yu0tYJqgby9P/OEZCA132Kor/0oF1Rqx1fScJXXjWc3agPxWUxLeeo7aS
EKa4EylJpoIdEfwXzjSSUPKAuxrpYgoYvRFwZaKKhOrmX1dLzyYDT/Xzd/jz
SKgi+L/14/uSQLfMywdt2SREFm1NeXgvEWiJtj16lU5Co2r+WGXfO0BmGryQ
SyKhP1Q5iY3Rb0FE5Z50YyoJUWy3H1g1iQfpx6Y7wq+TkM/3jGs21CiwgZD5
aXmFhPbF+0+LR0UCDyWHQVFXEhrKDukOiaMCTeH28Y/2JDQXIH7cuuQZqPlR
wKo3I6GsiIZ1acGPgHz9NGekMQnNOoStHx0MA09LZPjOHiYhU75TlR3GD4FV
wivhSR0Syk2WEuA2vA9+XwyUEVAgoaglar7ktyBwxKpQoV2GhJaw8f3DlEDw
8fCMSpw0CW1nhefC1/7ghuwFHXlxErrpnSX+coMP6BSN05/bRkJcnbEB9TQv
oLGu40iJMAkdd6L5vxvxANj0IUsTARKKDf50JVX8Grg4FGgtTCGhBM+/7iJl
bqC6tfBcLwcJle9hvV+94Qpkv844JLEw5PqHPCtv4wSe5Mm6uK1gyCSON6nf
4wL4l3zhyv5FDKnQY/sMkD04GRN3Y/Ufhh4oNqhJB54FhQ87vL/SMKQWx28/
/+sUEPMTDHg0jqH/qu0f2mVZAtekuq2vRzEkdMBy38oOc5D//f6njGEMVUpf
mRLoMAKci3qmZf0Y0lyhZLyXMADHJVljjT0YKk8b2fxNUwfEGxXfGejEkLpa
w+j3RFUwecNbfLoVQ1W/vfWMZ+WBRpxKIdbEnv+MyR4JPxzcr6JbbKxn26xR
XL5yI2ijfZzCqzGU1LElhWq0rCO5zSVUuRJDgrtGzZTEqnSu6Ert0ocYekWx
rBH2qNUpujRYalmMIREYgP6tMXR4IuOsLxZgKKM4e9DvoRA4UWo965mLoZUj
ytuIrTvBu1HhJ/eyMBRbWplS8GMvoK9v2RP9EUNt45FpRw+rAW2Nx5XJHzDk
O4fadokBEOZgZFuQiKFregHwWL4B6ArnWq5OwNDd0zPnF+KOAqm8cmr3Kwwt
Zxi7HH9rDq73Byj8fYGhoD0NZQuWJ0AZj2btMhVD/ZoxyQVO1oBfaeECXwSG
QvV9jw7+OAusbT4xRR5hSPV31aH+Tnvw/u7VWLlQDFHN3LhMrrPvM112v3YI
hm7IBPPZaTuBx6x3ruf8MdT7QqSLz9EN9Oyx47zqg6GbwjGatAp3sMdCNOG2
J4Yc+dcJcqdeBxVJ1PYENwzZV4oGGN7xAusbzdyzXTA0cXnls0ikNzi7yM9X
fhFDo6Nt8Z1lt8CiUQgYPoshjV0a8sZ2t4GBB9HzzxpDp3kElqmXgsDzuFVP
jpPs8zSVru2fgoE83TNNyhRDgUPDpeudQ8CtbUqGqkYY+mv4OOxZ+z3wTXdq
wNAQQ4R1gk3jsQfAPtJxs/NBDO15X4rHuYaBKA2roNS9GIo5VTtfGhcBhh2E
RItk2H0rlf78ff8ZUHzUmFcnjaEBC2Z/uPdzUNd/aGJCHEN9B0vlLrtFAubd
A1YKghgyXtI2+J0UA4wzZqd1+DA0bcYRH1wZC2I6s8LNuDGkV6Hhhv68BE4W
5neGVlmwJXAsU/nwa9Acp2Tt1MeC17/st9gr+xZgSe7Rfe0sqKvWrlk0/BYo
fsxoP9HAgt7WKZJEwjsQ8UXmuH4xC/acHukkpJKAeSd+VDKWBb/790Ab2w/s
/8Qu9EUEC75KMb49p5YCsn+//iYYyoKan1JKX25KBRtmt+uv3WTB/czb6lt+
pIHm9ULaPSdYsPUOI5ovKhNgW819j5uw4EEqk270JAsoSjwprNFnwT6vfLl2
w2wQIc+nWqDMghtsGpMdjXKAuRFZIXIDCy7NGtI8XHNB851/O441MOH2o2Ga
+wQLARamaFtVyYSjAuoLRumFQPHZ1TjtYiYUiuA8fM/kC4hIGN8ml8aE0YVh
ieepRcC8ZHgjJZQJ7bVKchs0S0HzfCtHhT4TBv49Y/LGpxxgaxv0NLSY0PnQ
g8GJ7nKgyGkWlK3MhCoZplpmmhUgQqh+NR5nQkEfxpotVgnM91XO+7HWYIjX
w/DM2K+gySV3TLV4DUKJwUoXUg1oHVg018ldg2eCnsV8u1wDOq20iw59XIO3
Bjc0iXfVgF6DqkenXq1BLeGeJ1+ya8G4ZJfSLb81+DCm2CnTvR5w/mD4lWit
wU2KBZz1Yk1A00hvg37JKkztgDzVL9uADrp/y/jzKhxS861sGGgDugfqhy3T
V6HmuQBBS+l2cET6RN7FuFV45r1A9lBOOzhJcrK5778KbZHTC96WDnDty8Ok
Wu1VKMzIlIr+rxsky7Som5euQP6maCCq1gdc/sspD8pbgT71deTUh31AVvrZ
0ZyMFQidzhp97usDmZLHzwrFr0CaXmCQ/oN+ULC1JbD99gp0j3c4Zzg4AGq4
Wr5ZEyvwKel57dSJITAx1HzifCUDqh/uOJ5t+htkDmT3PStmwMVxvlmLwN/g
Wl+EU0UuA5ari7vuz/kN5rrNfXYlMaA7Q6s6d/MIWG1qfjUSwoBH+PxHE4dG
gGBZ87DrIQZM7WXWG94bA4ovm6/dqF2GCjvEdjuujINQk5vkZbQMmVWveUo1
JsAgUzQysHAZrg+cHj3nMwGeXnAuePRhGa66pLv6LkwAmjxzLfneMpymGi+J
LUyCdCgX/lN3Ge6xSl1kkOlgz8j99wZFS/DJDz+6WeoMwBUP9mz5uAhtPrUc
tHZYACYWf6MVEhdhunLM8ocHC8DHM8ry0KtF+IavZFE4YwE0Fk41eIUvwluc
PPcOLS0AX9142H55Ee7LSnDgjlgE7RaspOfyi/AqHaHJr0vgvle5u2DmAjwV
drpsXH8FjBcZcnHnzMNc5QfuwUYYIXq5+Lz3o1l4eHkTbpzFTTDrhN5PX5+B
Q2kfcz3erCM8gMAJ10UaPMIfafJPXYgoVPmO5vPGYR9lv/GZuc1E1sZv2VtL
R+Hk0PpdrOPbCQ/NWA4d92G48aaMnc9HMSIyUrTXynYY2uiqkWoKxIjPtNef
3U2HYZhKi8aGr2LEwrt3jm/lhiEK0zgc1itG+PCnV3P+GYLP27PgrnXixO3e
svB6+yGosPo84ZebOBF6+/em0xaDkLujiHxitwSR0u00eV13EOrEPICJShJE
rfLfr2GKgzDXo2RoXFuC4Bub8ioRHITqMrVKdpYShEgCLQtED8AFH0QaCJQg
pHWF1b8/6IduthLBKl0ShOY9uyN/LvXCK35Wdv9u7yBqlwLe2xr3QkGLLiX3
0B2EtVscuUOuF97ZZxP569kOwsvyR0n55E8oty2Q9ilpB5GNWyq9uvoTvo9R
0Z6o3UH8V3ZI5NiNHki9/l3LlleSEF7cO5l7qxteuntEq+eYJJF4ycRI1qYb
ynxqOMVvKUko919KfqPZDb2vWnYeOCVJmFd9sH+80gUdx72m7thJEuFUvMMp
oAsexXcoDblLEmTFzWXbgzuh875twcVPJQm6y+rTwNB2GHWmObStXpJoz1Ta
cMypHaYk60cWNkkSRXNOEWIG7VBSjKv2RZskERLUEvGF1QY79p15a/BTkhCJ
SX42e7MNll+Fn06NSxIG1eZUZ8dW6GheRbXnwQmZdfc3qem3Qgsej7xRPpwQ
tCymcuKtkDA+0ugkiBM/+qUj3/a2wALlxz9ObMaJqwuMyJ+WLXBbWiTnn504
ESP9PtpMrxn+4P219482TgRc7tkiIdkMI13zXQQInKhy2KHwY6UJRn1/fEVW
HydsfOcUNnk0we01uXWWRjhxLzVe8cH5Rniwg/bwzEmc6OGZVXHXaYB14tMj
2m44cffrK02wVA1Xvry9pRaFE38aNaiOhdUwx/PEc+cXOHHsR9dEuE81jNsr
hVFjcUKEtul199I3KBWX1t79Gieytz5iXV+ugqLqCqqSyTjRd8n/axKjEq61
5QfF5eGEnpeIeH1RJez2bFS+UYATKYGFXjO+lZC3Vm6n3hec8Iyc262zUgET
d1vlNpfgBF+Z28OulXLofTrLN6WS3cfOojhhBoRZo7n3dJtxQuPAgul5Xwg1
bsV5FLXgBKeJMiuDUQYtBA+E723DiVdeaecPr5TCqjP7VcidOFFT83K372ox
XPDEjRx/4gS1r7Prm38x3FJs6pzVixO2/4QeblorgvWA9GG2DyfmRcMn0te+
QMJV68GlQZzY6e6XPcAsgEal8TkbR3Bi6m7BefnAArjxX2iF/ChOFMbMCt1i
5UOD8dEp3TGcMKu47CWE5cMjGdURNn9xwn/zWU1D0mdIOhU1YzCFE4dlYyae
BedCjXpvpEjDCSHQHtdPyoXeV9oSt9BxItXFhOVN/gQ5k0zeN0/jRGex9tc0
jmwYPPsyeG0WJ8RuOfT/E8iCGftEdPLncOKRr/H+CKFMaBZy0tB1HicuB4gP
1omnQ04GWblsgX3ft7nVXHZ9hH9eBG2xX8SJo0H0cC6ZNFh0pEV/lW3Zu+UH
iP0pMHF8n/euZZx4GZL2uE/jAyyTuOSfyTbffeovX5AMn0w21agwcGI81PFp
3tEkGLycqLp3hf3ewo6NWJgnQh9Tu5Nv2a4LP6A1ffIdvOo4WLR+lZ3nCe+Y
7Pk3cE1t5eRPtpUlR25FfI+HAkPkcPU1dv5dBdL13XHQXzGdM4Ltf9IPW7h+
v4SqFwsrhthu2XMmgKDHwJauya97mez3JrdXxo8RDes4NvF7sh2hwGrP44qC
KQFLkZ/ZvqbUEjS9gQqVl6460Nk2358oLyf2DMbqm3hIsXDC7up4dv2xJ/Cx
6aVqS7YlPJ9QdB3D4E38g20A2/23lO3z/e7DoD+/1d+y/Tqws0Du+R1Y8pfX
CrJdyDcvoXc8AKqGYfldbB/YcrBR/rYXxEwLrMfZvqzPt6JgdRmeaZPUWWT7
+YHLn2tc7WFpY0vXKtv/A5646Eg=
        "]], LineBox[CompressedData["
1:eJwV13k8lN/3APBnLDPTXiglxfQRiYT8iOQcaVEUyVap6JOtopJ8iGxlTRKy
74Rk38tSsstuCmWJsiRMYayD7/zuP8/r/cd57uucc+/z3Eu7fkfHlIMgCC0S
Qfz/M1DhVn6dpTGUNbd1slZp2JbEs+2CrQNsODQbN8D2a03TQ/mJrmC45+q2
RrbHTlZ8U3n2BHp9/Zuz2d6vuutJvZ03SK9G1D9n+9YRB0ldYz8YOBhJsWT7
S8TNmwyRAHD5neatzPZsaFh5/o5AuLF7THMt29te1vA83BgMKe1Ouu0rNFQI
nDEDzhAgpJ/GBrNt+HxPCdd8KIQ6qkqdZ9veT3tTw3g4/OZvJahsF3umF+l+
iQajq5o2N5Zp2PX46zqBT7HgfDVry1q2nZArm9EfB8uXPjNfs2gYfVSWq4Ce
AA+k3J91LdFQSvl0Jn9LIoirxKqas12uZGz4sD4JREveHPmzSMM+Bf90KE+G
H1HjHH8XaGgt/0o/oTgF2vm6Wi3YXpErJbjzUoEuRBv+Ok/D3bJjug0paWAh
bz6aMUfDa5Inl3VfZILK0IjBJiYNlcOS/WfjsqDIqf/t6Rkarnfn3KxpmA23
R6xuPJqm4a+Jf+MnzHNAvogc0vqXhgnVIlXSXnnQmWTpIjpJw4Aluh9pUz4M
+ssoSUzQ0FnGQ689JB9M9ALVxMdpeDl6aPh+cgH0Vvue2DJGQ74HyWuKqotA
oM5b6MUQDTne6Ld7nS0G7RSahfFPGv75To40/FwMJINysvgPGjZpmksu/nwL
T0z+OZP8nYaeIvu0jnKVgp1pEeX8Nxqyfuk2mNA+wA4PeROLFhpOc2VInTH9
AKPiZi+amtjrQ4g7SPb1B9A4nrBfspHdD72Cy5wyFbDzaVX05zoaFlRsnUjC
j2D1wCuzu4Jdz/Avm0avVcEQraYhJZeGpvlStq2JVcDPzFZOyqahUYtnV/FI
Ffw3dlg6IpOGGtwK8T53quFcPmeiTRoN990LlZVwqYH88PHRz/E0HFA31LOO
qYNNi6uB5s9pqDLkZNLUWwd9HfnOos9oGOEWbyW5qx5KdIp7+n1pqPNuzGMs
sh7G0y7OqnrS8KPEo0Kz8AZoK3nTUunErv/GBP5rwY0ghj1J7y1oKDvGHBc7
0Qpl83VLSco0ND5Mvd95oxUcumaKCxRp6O8psOD5pBXcr9zZWyHPrsce4B6u
bAUcmOGrk2a/77L3rqRjbUC1CXkaIkJD3iaBc8LYDvepR5sV1tFwJguyth+h
A8t+7d4oujA2ShzhuXuFDrv28h581yqMiSnyD2pd6NDsFaLb3iiMOrEHjthV
0WFtqcXqnyphzPHfWdtx9jPIRjXIjuYLo7XVXJ+/8Re4UPWFryJIGEf2Z23k
9uyC8kOqA/93Vhi/vtpt/be1BxjvMyrIxkJYSE7XSZ3qge/eHDtK9YQwyFxR
4RpfL3Tc2ck01xBCTXFdosmgF4yXZa4kygthebpPYGpfL7ReTO9+vV4I4/Nm
Cq+N94Hv3UJiuXA35hsPrQ4//g5DB2cvLHDtRkfrEnW92EH47ShldtpbEA3j
DhpEPRsGEP7yYNB+B5p51XP0t46Bn3bm+FLPVqx8IiHh92kSjDhPTbtd48Gr
W4Y+8l38C2U3XQdMmRtwWqlWZcBuGvTGftWXT5Mx686Ghet3mbDbV/WP7iqB
4x3Sc1P2TDhnvf72phEC9x/WZbq7MUHp/fUTXc0EJhGRfxMCmfB7EU6+jCEw
4sW+scF8JhzNipkuUyHwSZ7at+sLTLizoy4zjXMVLs05lF13n4WxlF8uw6Is
4HIZdrsePAdUi0Se+qZZsL7PqWcSNQfiQwJvO1NmoctceJ9x0hzEX1s8ysWO
S9e+1Hwlfw50c3wFiuRnQXdPs8BF+hy8yDKM9ohnQmJ1QZ4W3zyI1tTotznN
wLH1HkPKwfNw0fhPiMOZKUgnEoqPRM3DjKHQG6N9U7CNWf5UKWkePF8O7L5G
noKx3nmZw/nzsDzDdfbjx78QmHXb+RB9HvK9t9M5jv6FQR1d/v18C2C5KyHF
VuEPuIX/c5o/eAG2PykxfOM9DpKUV6yJyAU4sEWeL/zsOHTZimZXJS6AvVnj
pmqecZDSFue3yVsAeZrtTGf0b/hKPjjU2L4AGROdCWOFYyBnq+TmvmUR7meo
azTOjMLwufNvJ/wXoVbunuW72CF4Udp+uypkERYNPr9xuz0Eyvt1hSNjFkGI
RRXzVhyCQG4DL/XMRdgV+bRTh/4ToNRIL7FpEU4l/XTrX/8TwsQt/hquX4If
cVS1Lp9B0OByEa/yWYLg6AXbSLN+MC5Toh8PXAK77Uf9Mqn9YGc361wdsQQN
XIE++m/6IGHUil7zZgmkHi7xmk71wnyjkUt90xJIbB+/4OjVA0kvlT43b2HB
hoKPX92auuHduVkXLQEWVEpSOfrsu6GFkru/dQ8LbKoJlWaRblh0EHdtO8SC
J5KYdtO5C7Svbpeg67Hgv9fXD7w43Aks0VnX7nAWQKd5hlsdHXi+50hcSmBB
RIeg4tZHdBALt/ryNY0FM8eP3j4iSweddUMSPSUsuM1rYwgxHZDK6PjS18uC
Wy1nt+551A56xTmSP2nLkPHteIiCfitknrbqmny9DNmP9jlr/aqDP4F7DPty
lsE58nG/knMdyPZ0dja9XYbv5YqFu/jqoND6WGd6/TLsUTR9WXesFt4H8X+5
+WsZKj6IpKS9qYbW3oqO4X0rsJjs/u7im4/AI/bfhS/SK3BJS/tkqNZH0L0r
2VF9eAU4K5mStTMV0M0R2p6kvgKtOyRTWKoVMCh2u+26xQok7qtvtWh5D9P3
trX0pawAd7yh69oP70C+5NO55qwVEOaVxIei78Cey625rGgFNDpf9X70fwus
kN9NUbUrELnx6+NvN4qBq/RD46WRFZid+DPEK1YIJ7ntNM8wVkB/OZUsF1UA
3uckGhXnVmD8zH43Ud4C2DDw8tN2yirs0VcVcSHnwzbyrYYvoqtgK3FFdoQj
Fwy1hM/USK1Cw9qPR9w9cyAi7HN9gfwqeOR2F4+uy4HdElgffHIVDnvfceYT
zAYx7a11Omar0Exb+R2ZmA6HI95XN79ahbIwjTvT/yTDT6ksZYvMVXB+tDOo
5cIreFEZk0cqWoXa/ZNh772SYGz8Ubxc3SpMyS+faVtKgChQfhQxtgpXHIbu
2fLFgTpdYubQ9CqkDPygn6+PAabFzltNS6sgbmf38e29aBA7/UjSlUxgx+7h
6HtfI8DVxkggj59AgaEW1vjaEPiiTP+8upPAsc3DGW/Hgtn7V/OFpjCBlh6h
mZfag6A78gh1eB+B7i21JZxvX4C0WV6l7AECf1L8q4jiAPCUlnBxkSGwgr5L
wv7Rc5CtFpjdrkSgmGWFTWbNU/B+Hphjyv4ODt4rizbg8IX+i2utco8RyGRy
3dA+6w1+kws/NDQI7D0mI8O5xQMGi+/FhmkRGEkx0Ez2eQyHH/+6NHSBwGbr
2xK3trjDEH93m7MRgc8a3voYRDmD8qD2s0/GBK49z31amOwEgel16ttNCexU
itvb8swBVFSL3+dYERgk0BDrOmsLweukHVfuEXi2RT/zQqcN/P6cIq9hR+DD
aNvSjM93IexmaMZPZwKXk1xED+jdhEm5TZYyjwk8V2LF+EUyh+OrniLOXgQq
tsuKTY/+CxH1K/0NTwmUnn0+zL/WBP4G2UXyBxD4+/Q7kXMNRqB+dVL/RjCB
DNOEor5pA4jZZ8aTE0Ygd2WQm3PABZiZ6m1ajiJwqkJbOhi04EyZns+ZeAIL
wzr0S46pQ5xX0/HQVwSSZarXp4kfg9nzJ4ifrwmk81eoSI0ogqZgWYl0Jrtf
Wvr77oEMJA7L/fcol8D5HsvUjQUisJidLttQSOD03bbPZt/4QNtRZHJbCYEx
ybduLkkuqySfiHr973sCtZ2u8MWY16iwNvGZZlcSWPKqNkq8pVVF5+tT4eVa
AonD1olfEglITeLsOd3I7qf/ltB0x22wYu0YGtJK4BpLh8WvFXtBT3Fa5wed
QEmTjWrfu2QgnfPWRuluAsUNlM2FPZSAo3mw3qmXwKaBuRwum2NgGHbJo36A
3T/1sdhFB3XIvN6O24YJnM05oh5zUQteWTqNnxsjsE9r4+8dDy5A1F3RMK9J
dn00L8s+TTKAoP9a1T5MsdebyUJTmZIR+Do/ZMzPsvORERdKjjQGNw+RSJkl
9vyvLAxHNf8Fe7/mkzfZ/3VueQXXKWkzMI3YE/ONQkJB14UnLwJug1F842m+
9SQ8zhtX3M99F3RS7Ziam0k475dUcL/nHmBhg2b5dhJGtXvM7ac/AIUy2/lZ
QRKKr6aJCDD/A6mq3UkHaSTkMfYRj5F6CILtNktx4iS0zOQoWBpzBt5uwZTu
AySsqnE63lroCmu/1+jwyJJwIZ9ufpjLHeYnBNIeK5Hw2Y91H/gqn0DHmkpD
Mw0S7hjcOevV4gsNm624YrVIqDXdks5z1w8+8PNnd14gYeOD3QunBP0hc+8t
ymkjtm9Ory3/FAC+qryFElYkzHZzt6h5Ggxu6mUmN+6R0Gn74L05n5dgr2W+
IfoBCVWlvHbUPgsBsyslNzY6k9B9t020aHIYqDr8y/vXn4QDlcZrRHZEw2HX
De/Fg0hoXPw6z0stBqS8im5eDyVhrq3LKZ37sSD4ct3HjlgSGm724XT9Gwfz
2Xl3C7NJWK3PpLJcE4FRdEWQkU/CF7eGU8wkkmC4nFIn9paErhOPzSy6koDe
eFkovIKEAmc7mHuUkiFrlLPZsZ2Epa9FBjYJvgYzYV0J1RkS4p4bAbH6WXCf
8VBVZp6EVt2vrM9uyAbX8ngDGouE9i07nHXuZkOkEeMxiYsDlTIKv99WzIHW
MN+eCl4OPK9woqO4MxcUt1Q8O3aIA98qmrwxUiuE9RxSf9RsOPB7KvegXGMZ
7GjTJcvZcaDugY3WsprlIBrnKCjykANHFSrLyE3loKpSr87lzoGaa2j2B9re
g93DG/FVLziQyT+3mPj3A/RPReicyOHArQHqrmnbKiH3B6Xg5B8OfG0sbv8n
uRZsuz7VPJ1hx9fjXrWFWlBoet7VOs+BRLlJ+KxGHZQW8rMukTjRoTu33XGq
Dqp9xNTu8HDiZlEZyx9qDdB18FRbqBwnVtpfmjkx1wgrjp4To/ac2PGDfzBZ
sw3O8HGLPiVx4RaLHl2B051gd0ZOPo3gxufreE4OPBoAhlpKQiAXN1aUPKzM
Dh4Ai6MCmxyp3Ficq6br+GYALksToxqbuVFtUYBE6h4A3NYYPiHEjdHaItX1
hwZh3eC/y9LAjSeNG2UkRgchziGoqugRN7ox5Sq4NH5CfeqUTvUiN9r2FEeI
/RmG+VqOEo5VbjxHm5A9QB4B0RGef5CTjPzSOwVpgiPgvvfQ9Lt1ZBz8r1qs
49QIKCfcD8oWJKOwiO/OyzEjkB050xGpQsYec7uW9lOjEOY/q2vjTkY78Ywg
qae/oCaDXJblSUZuctiG1JhfwGzctnfCl4xX7Gxurc39xT4fKTDNg8ioI7b9
kE/XL1jv/d/LK0nseCfh2JsiY+DqNv9ZvYaMG3KjqJFFY2Bhu6gvtJaCiuHi
pZkNvyHjspc430YKfj2kpjLU/RumjvGxqDwUHPWISuH89Rsct0jFT+2gYJ2h
T/UceRz8M01+V4tTMJxefO6d6jgUjNa53D5NweXJSZnA3HFYbNHTMTlLQakP
CuuPfBgHlaJBEf3zFDxXnn+4oWkc6jxY9XCRgm//2opHjo5Dzx5pPl5LCpbX
x/Vw7ZoAjiuhqW+9Kbjx3vuSH64TcOq4iGOmHwVPnrdYHfabAD+JnLOJARTM
t8w72BI2AVsXG6b8wiioHXqH81z2BOwLXVE2TqUgPFhW4eybgHNtpm3kOgp2
dMT/VJKbhKDiqcSlTxQM2ieQ/FhlErpiXez+tFAwwyVOKFt9Ekysw3d+7aTg
n3mPmTyjSbBd12SaMUJBYweP46aPJyHyhNziBQoVsyMPCxiz72FpGQah5euo
aO1Zqd5Jn4TirY5y4pupyGizZ4r3TcKXoQrrle1UzIl0dzD5MwmbPbV+pO6n
4vFLdhv5eRkgNGnjynuQinJ3fTZa7GSAlH7ILudDVFS7JcEM+ocBGqK9BheU
qfg86KS00yEGeNbcbFw+S8Xrj3I8/c4z4KWUv6WFDhVd4voHcg0ZkBSSQ+7Q
p2JlrXhc3jUGVJjNY+o1Ki69ubr2uBUDWGTPAp17VMwSkueO9WTAujuvdcoe
UHGua3Y4xI8BAp2NDLGHVBTOKSi1CGSAQgrv/mV3KlIfZPNERDPA5lR8TEow
FVOkhYVlcxngllV1hCecit/zBAzmCxkQwD/a5RTNzm/yjlhYCQMyRqR4dZKp
+Ig2c/tGFQNKtXSyS9OoGLBVvyWgjgENRQ/OimVRsbjV/lVIIwNGvUq9WEVU
FKJP+UrRGTDH6BcxL6XiYv8W3w+dDCAbcn5s+0DFX1puPRLfGPDPvjOs5Hoq
evHcueo/wADZAKvwLc1UvKGl4erxkwE4HyDv1E7FXZ2HvuqNMOBqXefd89+o
uHLrwW73cQZYSS9tKO2nonF25XLvJAOcwna/Ef3JzreMusrzlwG+xDH1F6NU
lMzz30WbZkC4henQ0jgVxT5O6VKZDEht9XY3+0tFiwN74+tmGVB4OF2ojUnF
L+ctV0zmGVAd11J6ZJGKs2l6lvQFBtCp0xeTV6jo0NnRJ7TEgB93t81t5lyD
JtHCRsdZDJjqUgx2pKzBpolPfarLDCBUr8gMr1uDsqPFN7avMGDTa9dm7c1r
ULl313gt27u3JN0q4VuDiuef3NdeZYCkQy1VdMca5F+pW8hh+8jA2KuAXWuw
n77TeZztM6c3qi3R1uDXlVX2YMD/AL4Y9/0=
        "]]},
      Annotation[#, "Charting`Private`Tag$674695#3"]& ],
     TagBox[
      {RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[1.6],
       Opacity[1.], LineBox[CompressedData["
1:eJwVlnk01N8bx82MZZQiSUWyRNkHFYU8nzZFsheJIlmiUqIs+UaWshQlWwlF
ylayZCv3UonIniQkicgyM7YZ629+f93zOuc+9zzv9/u591zpMx7mTmQuLq5y
EhfX/1dDg9X756X5sYjgrsTdwRp7dIqv06mb+fGyTVJ55rYJPWXpf49Fxfix
hFasLu82QZC4c+KIrCg/5lH4M1EdKg2r2Z9Y6sL82Me4vur0Vhosn9XMhNX8
2C2m+cqbY7uA3pxhcXQFP84ZGnirHLoX+nTXkk7y8uMzg5Ph/p2HoOVF0EtX
Mj/O129+XChrAtUi9JNXl6g4t7yR3ltkAQWBp/hD5qi47uCDddjCGtJHG97c
m6Hi05JJKeMX7eCBtc7ZVCYVNzjR1VWCHSD0Q9aavHEqPtAs2cWKOgtX1Tag
8hEqHneqyW5udwFr6vTGjn7O+bUW/n6bPcDAy/HT714qrlBsKBaLuQzafS1e
jC4qdrV/oTH06gpsKn3ZJNDGqc/YNK1u5AOrZCUCxJqoWH29c/qTWj9Yio5U
lK+n4p03p7f9dgyAPhfX0P3vqfiswxUFO/8gaGnr0DBDVLzD7Lai5OxNqIaD
facqqJhb+4nnrpshkLFeRsevkIprkiI32dXcApdPP+j56VTcGdMh3sUTDdbb
DVMqU6l4Vlz92q+AGDicWnqk4REV+5dRLNwD74HitbjMoVgqHpM1v6GRHAvj
W01sN4dQcVcVoUlTTYSf99/xKwdS8asP5q6XnJKgeUmpZPd1KhYlOXUqZjyE
gg6q8DEvKv4pYBU7r/UYroZVf4o8S8USMSGiRrZPwIWp5p1kT8XNL7Z+S1j3
FKxPpco8t6Xi+4dfy0a3PgVtzesB1ZZUTAo/t3TVKgMW/+zczj5AxWdumRwe
inoOIQezUpzlqLiN8nk7KeMl4Eg/U0lpKp6gmJmey3kFCy1HyJ2bqFiJq/3m
tZP5cOXUuJOBCBVjVlmt9IXXcObadhVlChULZQaub35RCJD1roLRx4cDJTPa
3twoBb+Juxeyu/lw+Zefk7ZbyuDNTntJx04+fGlwWWKitgxUq8nB7U18+Ji/
yo8vGytg049DhiWVfLj7hvcVWus7mBNo7byezIcz+/jqUr9UgaZFesTORD78
doeEsrZqNXgmeemOx/Lhl4Oi0cXR1TAstz7tdCQftv4X8tDg2Hvo1LN12efH
h1vAYfrdyAd4c2lwms+aD3+623E5bE8tXG6fE45dy4dThXQ1Xa41Qby5ic0D
QT5sZ7YvjTrcBG+b05/EreTDq18H30tTaQbeL0ZqiRQ+zHfS/1NpWjMkf0w5
+niSF/sk3FS0iGiB2jf7bj9v48Xjni0joW5tsDkpYrEilhd3wNM+xxPf4LOd
2N+BtbxY4woDHKp/wmJldr72Rh4s3K+QK33hLzR00QTmRXhwZvb2Jql7fyF5
psilQogHrzT/rLOy+C/oqqLNulQevI/MLE1d+At+j9ui9sxy4964lOqSiGGY
8V9wJb5y44wLvl3yT0eAvstYWv8eN877XfvgQPkoYMu267x3uHG4Ev1mStco
RF+y7qy5zWFvoZutc6Og+uJM9KFAbixjxPusRnsMLqy/tnjYgxsvphrtaCkd
g5Hp1O9HjnLjrr5bNUu54/C7gHHPjJ8bk3yNNinspkMy79xNGx5ufM5ksCDp
IB2O25C9HEnceFtMtOCkGR1qSWuPe7MpOLL255nTbnR4abpDLGmYgk9I/r26
8SEdfMavPu2ro2DX5e1nR6fooL7vRuzwRwpujFy0bF+mw0jcrRBmFQWbByLD
pysYYLcn0Zm7nIKJ/KGUCUkG7IsqU5TPpuBQmcaLRwwYIKC4UOARQcF8oW2d
A/EM+BjAneETRsEMvARiaQz4r0UgLugmBSeHrdPansUAho/EtVg/Cq6PF9gv
WMGAjk96OiVuFPxfr9aQew8DYsQPKWNnCj4pFtpX9ocBBh4mEnVnKPj3g6fG
I2MMeCtqv9xlQ8Fef8zIzEUGPHEKer9kSMH3HnoqJm1igk1ZeBHfIQq++F+1
4uwWJoisuv9MaD8F+7ylPdJUYkJY0dNbMjoUHD89bHpiNxPOUz4c0Vei4D1C
ph8ULZkgZ9Wga7KNgsMNL83G2DChN7tdxXoLBedNn8/7Zs8EM/M/gm7iFKxs
c1uD9wITNJ/wtt9ZScGU6JLsgWAmaDddrtvLR8HV60YtK8OZoLfYXTlNpuAB
d0M+z2gm6J8ozLKbI+Ph+F5el4dMMLy1OXXNDBm3/Xwi+iKVCcbF4Q8+Msi4
dUdOYXUGE6zW2N9QGSZj675PUiEvmWAL9V6/Bsi4ZktviWIhE+wvaLrF9XH2
x+11yy5hgmudwLHFb2QsAbTiHZgJPkFlil9qyFjd5vwazyYmXH8lKxVUTcYT
EpW5va1MCOyJXrezkoyFfjY+3NLBhNu7nbkeF5Nx6BBjnWY3E6JcWqZNX5Px
TOXPa5SfTIiJ0/3HnUfGd74d6HjxiwmJDOGO8xlkbLCzaJf/IBOSJf+rl0oj
4+1r7URf/GVC2tFh3P6IjM/4VaTnjjAhw9/yze0EMnZbKdV0e5QJL7JQjm4s
GccEXL2lO86E3G+KT+h3yfikrP7bTxNMyOeJj8+IIGOPKwV2igwmFG0nRVmH
kXF3oL/tWSYTyhzOBwncJOPk0KUs70kmVEZ/u4oDyPiareauU1NMqH6377yX
LxnrLFewJaaZUPMvz0Hem4y1yJ9+FXH488aNVt2XyJhvteqAzAwTGg+FGMWc
J+NsK5dpFw63ek/sPeDKyUs0fEUIhzvSbbRYjmS8OGew8RqHu1o+KueeJuOr
j0kb9nK4d1lNxv4kGftPvlj8xTm/XyV5vYgVx493XVUnODx4km9VrTkZB0y2
2b7g9DcS7km+bkzGk9u9Pn3h9D9e0jNLMyTjVUp683Ucfcw/h8d+HyTjxAUr
ZjJH/8zaov6EvWTskh35XJ/OhLm9kp1H9pCxnO8h0U8c/5Y8Ir4s7yLjCIsU
7c1jTCCnTFcX7uDUKx1eY/SPCbwN9qUuamSsYPM0wXSYCSvm6vPElcm4YOFV
vdIQE1bLa6U3bSNjaTOx3J4BJggff5oYvIWjV1B9l3M/E8QLfIL/iZGxpuwf
i3nOfEj1/fZJFSXjvQ5Of/i6mCC72uSihTAZx96w3vqPM0/KbnInKvjJWMbl
QdXOZiaoJcYYe/CQ8UNx0pbHDUzYUTO/fwuJjCOlFPb9qGWCrkyraiSLhHMD
tJp+cOY3be3KHRZTJFyrM3ql4C0TKDwHdovTSXjr73F3h1JOfkPF+3OGSFjF
Stfr8CsmWOclWdd3kHB5rX6PziMmvE1ptYttJWEHtrNgRxwTJGNWOp5sJGGZ
8pJfh2M4eXgGXPj3kYSXHbYnlYYwwWuXw82VxSRs/j2lo8qdCZ0KD2+15ZNw
txP9towTE3TE26Ie5ZJwaJGJqe0pjr9LBxKUMkg44FX82ZOmnPvxXj73SCwJ
z+qrFoZrcObZmP418jIJZ3Q4+pVNMECIUPhhcYGEnZaOrSweZMAV9TN94udI
eJpnk0gk5/3TFmkfybEnYWfbpfmazwyo/V6yXG9Cwuo6iaZB6QwYOHtDQUCV
hG0/XAkQN2bA4eOlqu0KJByvo/W9YR8Dcg4xtifLkbCEd8VrGy0GeCo66ilL
kLB3l/MlASkGcNH1LYwESNhXCdwbJuiwyX91QNQIF1Y5vDa1/zYdzmV8Xv94
kAt79sgYW12nw5svYQV5/VzYT9PjzCsPOphJLQ81dnHh4KSxYyuO0yHs44T5
mnou3DEnVuUhTYcJwRb5+BwuXJ5Q+m+38wRUZ8S2p57nwuIqVKVrYWMg2Gji
ke/KhYdP81f9ch4D29mVK6rOcuEn7YaJmw+NwaxBCPTbcmEXCbU3QnxjoDzh
lS17lAu39R2/3x8yCnG7jwdmqXDh+hXbq1J8/kFzsrq1c88y6kgoyS/ePwxc
GR7xPe3LSPdtTP32TcOglpPXbtmwjDRlWxruTP2FmDIFs/0Vy0hmqF2lM+Mv
mHZIG0olLaOFzULHv1P+QrOgsG6X5TKSc1y7Vf7tIDTfZEoaNyyhQJcVwTzi
A9DkWji0s2IRlf5ueZbr1wOtP2dN9QoXUcKfY7ICSj3QcVy3XD9nEV3IEzEI
+dEN3Qc+Rlk9WkSNK1QtPuh2w4jUN3Vf/0V0vy9wfy7XD+D+Puf/VmcRzVYU
33WK7gRtg31C+98uoIRD5IiF1jbQw2G+R4oW0ETA/g3m4W2wV6u+3yJ3AVlF
Kl+mQxsclrMsPpu8gEYL68pXvWyFYyRnm7DrC6h+BRyfudMCl8rCM+p0F9CD
xoM57yoaIVOhZZfpu3mkM3A2D+7XgOu211WBxfOIcpyZn7axBhTl7hm+zptH
Eh7ts+NPPsJLKTNb4ZR5JGCw1/108QcoWd9yo/2/eVT8VeHdwFA11PK01FgT
82hoJHql2UIlRFBem4TvmkfDvE1isUqVYES611mmNo8YWeofhezeQcuC6YiY
9Dz6g+K1vtVUQNdk86oe0jza/Yg7TftNKfz71Wzp8H4OFfnF9WXzF8LLn/k9
9yrmUJJO+dJ/pwvgUk+Mc3XhHApUjcMTJa9hqtPUZ0vGHNpG5J9El/Jhoan5
0Z+QOUR/kdR9gycXKr/ky4oGzKHeFG+7A93ZEFgfk6fvPYeMz0enPS3NAp5P
pui50xzKqB4KsL35HFZXNvef059D6fxc7utOpkNzRb77Q705VKMm8Gf29FO4
XxYz9VlzDtlUC8+0uT0B0WJTXuVtc2gouFvETC4VOgvUom0l5xD5x+yby6cf
w8N8oQ131s8hzZH/3g08ewSSuc0K43xzKCt47w8p60Toz8ov2Mw1h95lKplu
/BAPGc9jdExYbHTioedAtW4cyKebHs3/y0Y950vrblneh5E0tY6+PjY6Gvxr
e+tkDOSmCJ1e852NSPdSe62IaFB72HzJs46N+pfjjDqICLhtdJXMxmy006i6
YU/JLehbEn9wo5SN5A+NSOgfDYVdr6vkePPZqKz22wdFSjBEO7qURD1nI7tW
bYVt3wNhcN0qg7WpbGRQt1pxLCUA9GoLupLi2aijPtPlRYMvjCsvLWaGshH5
1h5tozFP0P+ZHq0SwEY383lDiWoPSLlnIF3kxUZUkRSFJpobzOyfKNA+z0bs
WqNIVVknODrz4ECVIxtlivgbHk6zh4wX2h2HTrJRb1Qza4XhCViw6XNpNGcj
WHXE7LGzOViuCmNbGnL8eXZAjKZmALlIKfLHXo4e1wcd0kEA3J4tm87sZqOw
XUWZMxR1sJW99vKvGhuJjUaF78biUNSxifCQZyNX+waz03VTeivDq1umJdko
su3etgIbrHdGx9Xx+no2etub0BWQvBLKx1ZNkwXZSMW7eTw0cSsIpxWGhfOy
UfCr0smh11rgZn5ig9ASC8GhfMW6Ywegmns5K36ahQJDK3XkpUxArCRDR2KM
hWpMmr9+ljgOnucMv6QPsJD7We60uq92UCdOP6XYzUInyqeWhmwdQaoxjp7f
xkK3DurzNDq5gk+gzk2tehbyGmrV9ua9CM0av9ZWVrNQd0JWao+kJ8j/CXt2
oJyFyklMf71wbwhMUNaqf81C1SWH9OvBFzoNWmvNslhIXudfAWN/AKgtXLPp
TGOhVay7EYL1gXDrpcToqUQWeswzpWovHgy99u8D/kSzkORNj1XSsaGgufac
4PlbLCR05Kr2bY3bMHitSMP3KguptD1tlRq+A3qKNh+WL7CQLO1DwanAGIjv
Xj4W5sRCWwbTDN2l7sPBvUd8Yy1ZaHfc4Lmsx3GQPElfIWbEQrnLr14J+ifA
1LP45LT9LHRjjh9LXEiCjBX9KE+DhU5984lKin4MC29vme1QZKGy/z5v08Gp
YOmh8rtcmoV4X9TIzZCfAKXdh7dWiIXWeN7ouOyaDjZhmxONqSxk8efRJdWc
DCjY9UHh6/IskjWhfXzGegZnHgse7R+fRUMeTeMzhS+g3KS413VwFuGOlTXD
0tkgTD55aaJnFk0+aDtZ9zAHqp0zYxcaZtE5GT/xwLyXIK22p0s0ZxYJHfg6
IpRbAEbmw/Gq6bOo4JwQgzuwEHy84iz0H82iSwJaJwesi6CxdKzBO3IWtSRf
feCz8Q347U1B7e6zKIMvAPl3lMEzR8Pro46zaH5eS9O0tRyaQ2d2cdvOon4G
s3NnWwVs+2xcsN1oFh0W9uE7NPAO2s2XM+4rz6J3a3fLcclUwbJXjkO2LKe/
GmrdxaIqUEyw2ly9aRb5RT9d5WNQDYE/XiUwBGbRmj4nHUf/96By1j7CdGwG
fXvwK7dz6SOEeVd5rH45g7K+X/+2PqweXidcUN6aOYOaR8UzaPsboLts4/Ce
lBmkG73GjUL5AhpLl89cuDuDbqe6vB6MaISfYTLHGi7OINrG7IW/Pc2wKzFY
O4I2g3z+bdQcN2sHx3La7JNtM4iVN9D1uaYd7nb/KCyTnEHtfkKqInu+woDU
DpVhwRl04fD5fXSVDriXNSB5mD6NUqpy7P5IdcJI+UEe3tfTaBfj2rS3UTfk
3Cv5fOXFNPr8pPu12UA3nHdViPmVOo0ysrZW/A3ogbF1q8Tf3Z1G7x/IGxm9
6QX6pXY1r/PTaLRsaJQrpQ9mtjra9m+bRkJzMmji6G8oWWyXNpWcRvZ36iJG
nv8Gn3b9oXei0yiW8eJiHXkA2EGKnkk802iSZ+WvHRUDsNDNuGX6ewo11KhV
1msOAjk2sLAyZQp5DCxt0DsxDO/PMX2U46dQwNgpk7SqYQghzuo9vDOFVqd5
2P5THAGe8UN13tenkPf4uVFdrn9ANRD8qWwzhU6Vq4i3F4/C6uXHKx6tm0JT
xno6N7bSQdy9wuFa1CSS2HZnjZToFDysrdVfFTKJuqH37herKRDb2qGU7j+J
RLR11MeSOPyLPt3oNokGfxkP3pSchg1WWyO2Gkyin67TQ3xqMyCy/17BV55J
pHsgjuzlzAIBcRfKjhtMJPBXOOSm/CJE+Xj9rbvKREhgRviszyKs7Aj6cvoi
E0092yzypnYRVtxLToi0YyI1Z2V2ttsSUPlalX7rMNEhh6Sx9sJl4JnUtbzP
YiDHJtU3oSokYumz8DP6ZQaqb49IoC9SCLPErcXr3RhoMPrkhocK3ESGk/ZH
vTMM9GtD3TbPY9yEIdeZP1HmDOR3Sj02L4+biN/5Wk5hOwP5ykaOGdvzECpp
JpkOU3QUYZ0gItfIS9h6Rz1vvUpHwyq5i1b1/MQVELA8NzuOhE+0DOrJCBEH
9qNQx8FxFLfKwKCM8/sWPeRZYvd1HA3lmM8Y2AkRpcadYuaF40hDZrwiL1GI
WLDL+KXtMY506ysr/IXWECHXdT0EhsbQsq7oyvXcwkR82fmIVx2jyHxjQKb7
3FqidPsXPF08giRCkxX/im8gXq2pyV//bhCp5lmqCClIEVe0kyh6Hv2IW3+Z
l5YvS2iHnj78160bUdomNjq0yxN1rIBnp450ozrRsIvv++UJ6/PJ5K9K3aj9
lpzoJoY84W3x/W3V6A+UYGMqnL9KgciXtlB/dPEHqvhtkGOvr0Bsq9QXM/bs
Qh9uPhppK1YgRGZVRgt9O9G6hnSzoChFIt3NyEDRphOdgyfM8CRFQqPXLTNN
uxN9zRB4FJapSJh+fG5/Z/4bOv1B5O1JrEhExkp/dQ74hsov2VtdmVQkyGrr
KjcGdSDT7qbBw1ZKxITrQvSN2+2oMURFY8M6ZaL9pbqQsXM7eu1qvuuqtDJR
PuUcs+lAO3Jyayx7r6JMhAS2xJQttyEl7vKfyvrKhFhi5r3Jq21Iim0eu/Oq
MnHgk2msi1Mrkl9v1yDYpkworApbq7m/FRk+3+xj26tMrLaoiOWWbkWxgr4X
E4aVie+9cg+edLegjhJ75rdlZeLizNyDHxYtKHBDk32QkgqRKPcs3mRfM+Kz
+hfkfEOFCHDvEt0s1YyEosrvRoerEB/PSKp+n29CJPWzzc9iVQgbvynVtVea
0JthnJ/0XIUIzUpRu+XQiA7KXJR+3KhCdPFNbvfQa0BiO89SeDaqEsEfHmkD
6xNSuT2wmZGiSvxt3B3rVPoJCW9i75bOVCWMv3/7F+nzCW0x77KDPFVCbHzt
405WDUp1ck44WKFK5K+PWr7M/ogGbP+W+3SoEj1u1z9kzL1H1aaXHC7z04h9
3mIS9eXv0TDtrX+AII14caPUm+H3Hn1OYfNdW0cjvB5MbdWbr0bHvktYakjT
iBWV58O/zVehkE9pLbVaNOKiTHmyyBxCllxWFy460IjdWjNHHfwQEg261X3U
mUZwG2ks581Voh9svr1i7jTikXe2w6H5d8hiV0CjrxeNqK19uNVvoQK9e99A
WITRiNiejm811ytQhq5FalIEjTjFFA5fu1iO3s3OVjbcpRHT4pH/chfLkMb2
KAV2PI2Q8fDP/7lUgvhlffndMmnEWHCJg/KNErTm4+cv67JpRGnipLDv8hvU
5zIs9zKPRphUu3sLc71Bu05PXc8oohHX19lqHyQVocp6Rd3nVTTikGLiv3tB
hehu9EqRkg80Qhjak3tJhcjU1e5E4ScakeVqtHyNXIB+0nTEL3+hER0Vuh+y
KfmIVWG9gtRJIzb5nullCrxCQXe73rp00YgovyM7YoRfIuGc5KCKbhrhHiDR
91kiF83Hr9up+ItGdP3Hq+m6JQcxvz6XOPibRhgGTkTyKGQjaQN1gaN/aIRi
cJUWseMFunOORN8yTCMehmTf6dn9HKGU6Z/MEU4eYbG//SATeUnr1r8cpREj
t52iiw0zkHSBbsTYBI2wiTD+Y26ajvRmr564xKARnyO1dOjHniItLm7xPiZH
z13+IUWHNHR87e4LYdM0QkPqj2/MlxR0PXjH3NsZjv4tJXL1ncloOVzBs2+W
RjDlwlt4Bh4iy8ngNjqLRrTInwwgJhJRLenzpnE2jchXUlHwn4tH0peSjTrn
aESM6nJ7MU8cGrvyxuHVPI24pN4SSBeKRf1ozObKAo0w3ZGurLTpHmKGamjJ
LtKI0xdH8uuN7yJ+3+jpKg5v9rpL3esUgX43KsQZLdGIXl8N+zf+Ychv7951
Hzj8+EZHidL9m8hNSM1bfpmT94rpzfvMApAo2b3Il8Naonsalf/zRqFng1pL
OOy+f8W86nF3ZLtaoqmfw/e13Itqz9mj68fX+E1z+H+grCIm
        "]],
       LineBox[CompressedData["
1:eJwVl3c81f8Xx697ca+UrEgpJcm+klKk80ZKykgyyogyGsjItxAZWZVkZGdm
zyhkZEdGVkiUvcq4H+te83d/f30ez8f78Xif8zrn9Xm8zzlsbqdjgcfhcB8Y
cLj/f0Pk7hc13r0FbnocLsvbZNSRwslzzekJODg+rI2mc8YVixNFyc9gyHFq
WYfOMxeqf5175QP1SfZE6hYZiSkd8Gly9of6Q4HUADrfV3gioXvrJXwJ/9ZE
onNP9L1780LB0EWecHXaJKOViMjKIr4QICRl7m7dICOe8AZOF7YwmBTE+XLS
WS5kyRIIb4Fwf/rP+XUyMngtWMZIjQDqB++Dd9bI6PFL7d3f/kVBSAGzykMa
GZX4Zhfr9sSBP6+YitYqGfV597Pua46Hf5qVhwVXyMgNMebP/0mAxl7Bf8NL
ZBSnKMP4sTsJXB2sLotgZCR19lIu7/dk8PnDNpa7QEaV8rcMXJpSIF1jz0PB
eTL6LReUDZWp8O/Swr32v2Rke+q9XlJJGkhdM/29Y4aMtmTLcUyF6VB02VxT
ZoqMDsrM6H5Ly4S4EhcptTEyMpW4sKn7JhfMX3MrBv8io7ORqUErCXnAu7z6
fquPjHZ6EdivGOSDnJfkN70eMpqevZ04a1UAtctMenXtZJRUL1Qn7VcI5J7w
zbA6Mgpe737JsLsIjnCeqrlaTUbux59f73xbBMEPqq2pFWR0M258wjH1I+xA
IfaEYjLifpTKUlxfDLlOVVwc6WSEz9Lr9NMogbfDZv4HUshoYYg5xuBHCYTK
ebFxJ5BR6xUribWxUlhry737JYKMfIVEtBQZy6Gf4MXP7ktGG9O638wOV4Hr
F9JcvAkZLTLmSKlbVIFvQe6AtiHdHwJMoTIZVfC4x1vv3zV6P65/vEk4Xg2/
Rf+xjaqR0cfqPbMpqAbqkoOC24/T6xnVs3vKtA6eDeNOFW1LIYsiKaf25Dpg
AIFznDQpZPTdt69ksg7aryfb3MSk0GUmucQAu3pQlXhumzcmhUTsI2TEPRpA
3s1f2rRRCg2rGVy3fdcI917QJidfSKFz425mrYONIMwuVfvcRwpFeybaSBxo
Avv38vs5n0ohnc8zz2dimmCeZ/T+io0UqhF/+sky6hsExP/+PKcphZLYknhN
w1rgTDi967ukkMzM8r9jqu1gENKj+MpdEt06TXLsvdMOwjkzTeyPJFGQ7z6a
r087EF5c1PK5L4lmBIFporYdHrwBVwUDSZR0k1525Q6IdfDv/Cstibha92ke
Qp2gVLT77a0/EmgpD/L2KnRDCFOB3ra0BGoRV+B8aNwNmwvKr9KFJFBy2qlH
Xz26YZZZY4/SXgmkEy+p4FzXDT1k03toWxwVBO3/2qXxA3C3V81cWsSRrc3q
76BbPSBmzZQ0e1scTYrlsTH59kGOOI5m6SeG+t8ftKW0D0DGravMb9+LoE/M
2Trp2ABM8/uc3/FWBIVanZEz5R6En34Xphx9RdAVUV1cq/4gQFxn5TErEVSZ
HRCS/nsQjHtJwC0ighILlz6Z/vsNeXumrfekH0NFt8a3J7yHYL6VaGyWKIxc
bcvUrsePwK6YwUOe7kLIIIGsH/tqAvL5FG+gm4eQpV8T/k/7DFj8UxI4M8GL
an3ExV82z4FKpF2MmS07kt8OTxD+NQePCmatFa6xow9PcDzVM3MgvHt76Nhp
dpRk+wO3wjIPTRmtomfw7MjLwKPHVG0esjQpRA+p3UhZosvzRP08VDBq7xgI
2IWG7io+sDFdgKczfIaVJjsQfxqWKm+1AJ1abXUPJHcgg7G0YaLdAhgW45+o
brCgdhNO/ST3BcjtdlFxjmZBVdcmlXrjFqBOZ4blZx8JxSu+4VUaWICCmvxX
X4yJyIRjvIbbkAL8r16qDPkzIsbo7qUXZhQg5lxyumnIiDIF64QJ9yhwJlDn
404xRrR6IjmQ4kIBigzXH44WAgrWM9Npi6WA5mXZlQxOAqqNGRz2G6KATadB
k0gmAxIR7sGtW2Gwx6NIiYV5C9py62UcHmJwcndxzVjRJjyS+3hn+jEGmRKk
7eN3NqFGLayxNwADZa1FfsG6Dbh5Xye4KAsDItfJoZsB6xCU3yZgO4+BW6UB
7ZIoDRblv54bdl6EstKVl15flqDhWr7qV/dFiFd0W5H2XILIB1FXcnwXwduC
sqiisgTn3t2/8eTtIux4eDItonERAhnYnTk+LcLwIDF/uRcDwUaDHKXlRSBP
O+7yZ6HA8pBS0bHNRRAv8fjztGMBGmliZbuYloDrdPhkb9QC2IpvNv7kXgJV
8f/ulYgvwOegxDF72SU4cJE99Fr6HFy9PrM/yXEJjLobbj6z+wtCtl2C/q5L
8G7u0O8x1r+w4lsuauu9BH48ip92Z8xAbEmQnHzoEpRenSssHp+Gqf0nrnV+
WALXsvGCy9ZT8GzENRCPLYHHjq9j10PGIc9uF8384TJ086ucUH48BP+6pFex
x8sg/dwus1h4CMRO6y57eS6DbGWaG1/2H0jBxVCSQpYhwyybN932N0S/EZkZ
KVoGJqaaQ29JA+BTqPLLnLYM5qkeclNBvVDDa/UTY1iBkQ3fhhvEXth2Dez1
2rECRjetYp569oDL+Y6upP0rMLxmOfvd5QfY/TBpGVFcAVsJr7sBnl1wY/VJ
hbnXCmh52MTnlX+HiJtxZVjgCjgdCQuMGGmD7i9VpV6hKyA4n7+rnLUNtPyJ
n5JSVmA6X4a3wKoFzvOF5440rIDqi50pTBeawOtpSbbD9xVQjswbefm8Eb4M
/8rE962AG7930tnGryCfKZgmOL0CH2/GyrLqNwBZIT/enHUVqL3tlvuia+FB
fFccxrUKhxSsI2OwGsgkrMZ48a9ChIvDCFmzBoRaFCOTJFfhNm4705etGvYZ
NwePaK1CH0b+ftaqAvSr54IcDFbBx/JmYZdaOYQd5XyFN1uFo1NBzrely2D3
nEGAoMMq1Pj+ldfjKAVGjwlP87BVCLxgzzfK9xFsHQnXzWJXwUaMz/mCfBH0
WR0SuZWyCnvYdHI+mhZCtvaNNuOiVZCe+PA5ubQAdAXb9hl2r8LJQ8dDzHVy
oJLn76z+wCpsX9FSaR3JAhFWUrXe2Cp0pz96s+WWCRuLSla6S6vQnMX9/EVb
GiTXfyzU4qbC0Anet6LjSbDzc6evJj8VYh4O66bUJIJz7ryhhhAV3vWmOLzJ
SAD1CFHcZVkqEH50vyEfi4OiFxe6Lp2lgurBwYZTkjFw8NntVLXzVLjgeVW5
RTUKMOu4Kxd0qaBWQY1Wzw0HI+PPAqpGVBh83O1H3AqFhqu9mModKvjNDvWv
mYZAtDxHlJITFUz79Br0i4KAkSz1ALlRYTKvafnJ2AuwPXIZwIcej9HRTe90
ACjvfD5+NowKxavtGoHqPpCNSypRiKWC690oDj+SF/AsV76QT6HCeRMd4Ozy
gGfTv0zOZFPhwcW5hPp+V5gZpB4/XUSFoGOBmS3HHoNu5x4muXIqvGURs28u
dYLKBpm+k3X0+/UVKyyC7UGkTCtLtoUKdZe5ed31bCAk74H7iW4qxOYc51/m
soaN5ICrMgNUsD2Bbjgb3AbLyFSh42NUOLRWJxB0wQTaX9aukv9RgfoktFd/
Ug/kPYe+SS1RYfymwIHON9qQ8mgzTnKDCpYp52VIAReA7d4+ewlGGjRVqbt/
X1WAxyZy58V30mCU0ht9YlwSRnR0ecW4afBQSzxxg8ILVy7az4jw00C7h2mu
kLpw7pNCUMUxIRrsn1Xt6R6pOXdIOitYWIIG1rXH6183sUCgUOPto7I0iDU0
8Yn3E4KlveOnhM7SYKfQzg/RcBJMduF3HDlPA31N6SuqXMrQyCAwePgKDdYl
9MsvPbkMMisK+Yd0aZDIf8ryrtU1iJ0x8BYwooGzw44790k3gPnPI72Dd2hw
r785kPP7LXjYFSJ64AH9XEtvxo/LAvq/5m3sd6IBS63xrs72u3C+vOX7Pjca
cPpp1Ugw20Fu/nQSnw8N/EcjPt41dADPqCOXeMNocDmIRHxc/BgkiO83ZmNo
QLqk3CQm4QZ9TsL5dck0OGLwNL2kzwOktEV5HQppED4SGr/61xt+VmR+Uyuj
Qbzy7JE5bl/wEZdwF6ilQYLshD+PoT/0M5PHWzppoNCtdQPJvILnTvmRyf00
KP4pcWG04TVIjxy/4jJCgysbUgGb8m/Ar0K28BhGg6PCkyUWHGEg6yTv6cWx
Bvu+xB0ZNIiGP8NlsoZ8a7Ca+XLQakcsBGopTpEPr8HS+gdl28Y4GBJDWoPS
a/DuVhHT16IEeDWseuC09hrcmMT/K3uXAqe1vrazGazB72ijEwLp72GsXM1n
3HQNcgJnZ02LU0E+8vLfELs1WHnofPnSZDpMaF4tnQ2ixzdM/Wv1IgfelHc+
qHu7Bqy6y8K3a3LhrJjuoZh3a+BrLp7Zv5VHn9P0/dRy1yCby3GY+XwBQLnR
9eTWNSgU3jzOO1sIkaLWFIOd65CQVO6sU1oKKhHTKWTudeA0vDPa/fQzzDHe
N2DmXwfDl3/9C8+XgeqQzZdC8XVInCpeePCzHLC3jq/YLq9Dd8LkEc7dVXCZ
0UO0jv5OJ/of/5HkVwu3KuS7z4esw4tPG42STHXg7LziXh+9DjEan/lHvOsg
acqmuyFrHZgwDlTsUw/UFiOPptZ12M3JxJ0a+hVSwuV/tHFsgHO1UKPEaDNs
CK88+xm1AekfSwhDbzsh95JN31zGJrT8vMh5sG0AFkIEDX4XbILvqYUe7QOD
IDPQ29taugl2Zwy1Yh8Mwidb5d7spk3g63ma8h/rb/gSyttzb3oTDnxS59ur
/gfaB6u7JkS2YE+1ZdnI2BAs2vN8/522BeFHUydi7ozCqbJmzba8LRAf046z
fjkKjxk92yqKt8C5tHpcvGgUNt7+bY39ugW/7j6JDSWMAWN5VcuNyS1g65/s
/5E4BjzM97/1CG/DaV/W/Khf43A6+kt92/ttSFzQh3GYgjGpvLPWudvAUlL7
3In+3r+pfVfIULwNmi2dZ0aCp2Dm39NE2cZtkB40F9QbnoJYOPs0emYbiDYt
JS+fTcMzB6N9hbw4JH+sq/Nd8QyM8/7scDfCIa4vgf0jhFk4O6L9qvkWDonu
Z/fbEJ6FkOxGtb0WOJT0evDt0KVZOKdU8qXABocSbznlM72ehch7ETlj7jg0
cse4tohnDtQrrgeoJ+LQqCxOT2b/POSadyKeCRzaIPJcSXNZgPd33f5pzuCQ
hRk6LuC/ALEPhSP95nCI1dkQ7xy+AIHuLvPUFRzCOkNyv+QtgEW04LtfRAZ0
VL9ZsXJkAfg7HdYTRBnQ3aqD5crKFOD6yZ/2U5IBvT6aORmmQYEdQw06nDIM
KCOdcqvWgALU2X2Z3vIMSH0HyiqypUAXS62B5WUGtAmijWORFAhU4vokbsOA
mh+Oe5lMUMBTrcLsjj0D8pDrbrOYp8BjLatdcY8YUMABrQcXqRSwNC67w+bO
gLSz9p2IYsFA6cltLkoQAwLWlZNOYhicfrbri2gofa798EXrsgwGUn7F98wj
GFC70Tpt/QwG/OGsNV3xDKhq+lLWtBoG1PzCh5/yGdAWs8r1pTsYzBcb888X
0fUSxGvC72MwUUlsPFZK1/tyXZjdAYPulpsCUdUMSJGNM/K1OwZ5U4Q2104G
ZEp68qQ4HIPU+ZwnRT0MqODMO7xADAaxK/pHZ/sZkJLlUy7TBAwCGbPdTEYZ
UMfU2QTrTAwsD+mKKy0xoDgL12sJ5Rg4zrsoHacyoNFT1nE+VRg8q0zUP7zB
gCTkLLQv1GEQYzTvzcCIR1nb7wbNmjFIF+eJphDxiNLJllfWhsGntbP5w6x4
5BG81It1YNAeGThQzYVH/i4ZR2j0+XnQqgAr4MWjRh5LpcZ+DGZO9ZGS9uOR
EJ9jttMgBqtM2wdDBPBods7u9tYfDBh/HD3pdQSPhvUcLCxGMOBIuXLZ4Rge
uYszf8gYw+Cgo6OZuTgeKUpIXmqewOAMR/Ur5RN41NvnZ5g6g8GFoclkGTk8
in+244fpPwx089g+Cyrg0fXeiviVWQzM3E+2cwIeoc+zZffoe4OthtEEXgWP
Hr+8IVG+gIErv/cGdgGPkqmnl2YoGPj/zeAcVcejpILjvKsYBuGf20W6NPFI
UsYsamgRg6SA1XO1Onhk5KrvkbZE74/BweuFengk28nbdnkZg/JjqveTb+DR
bre9L1rp/G3lvmeoCR6xuiiXS6xg0FsfEuFtjkf2KhSru3QeCyvNcbTEI5wH
FuZNZ+z2UO3te3h0suy5uiudt2WI/dds6fkdNQrWpvNOvNSCigMe8ShF2hLo
zNehyyzrjEcD0a2zofR4wgmu/EIueLTkjuPF01nWLkmG252eX9b7RQ16vkrn
mtQYvfDoIUPSq//oejR3LZgsPcejnNPq8+50vUYDPI/GAvDo7CvzI3fo9bib
pfii+xUeDdodPHmMXi9nlzuJdW/waPrEIenGOQy8L70oLgrHI4fyx4cu0usd
vPdDa0oUHtmKpHGm/MUgbrJvNCwOj/48jeT6M03f8z5t03wS8QivmyZNncSg
+Lkw+6P3eOTtFvPf/DgGdboawhYZeFSUlbFSN4rBHyxaR7UAj1QuMvXtoPvl
X3W19cmPeLRt8dPAdQCDteAp96OleNR1plvz208MuMmnspiq8ahdYuoXoRuD
w1tG1ct1dB4ZCptrp/+vrd6944149L6ikrmkFQO1+x2EhnY8+vHukfFkAwbX
5al8n7rp/ldytdKoxcCcRUA6tQ+PhtwqnUK+YPA07YGR7xDdb2mdk6XFGHwY
JX68sIBH33NjbZ+lYuDU19zwYomuD71+4ZqIgVzr6752Kh5ZSXSmacfS/fGJ
d+MGAwEJ1ty8FvAGg/qAYyp29L25K+pEo5wL3X/uf3WLeAgooCpQktkJA3XH
PEvaPgJqf3YpMM8GgzYjuUDvIwTEE783P/QWBn3kix0RsgQ07FHj9P48BtFC
rKMDpwnIZ/6+oZYiBsZ835cOKxJQPTuf1o+TGIzg9fdmqxJQb+giwVkYg78/
LE2r9AhooiOzhY0Zgy1X39mpxwQ0w2SvUF1JgaqH6tuSTwmIocTxx7mPFPoe
zcbh6ElAklvRnDFZFCBpvZXdDCAglQ0N8YUICnAIprpyxBCQuLzQCIcdBYQa
61nkKwhIquqnrDEvBdS5mYRfMDCiR1bJv/+7ugBHOlST/JgY0XMd+4Sdqguw
8cr3oA8LI/pMTJ4JOL0AOUQS71MORiT0Zr37nMACsK/vINkdZkQF6xyOUr3z
8GOYfUZHiREF5qpkGuLm4VYef+4+T0bUvqjoEyk7C87qsqcycUzIJum6Ft/Z
aWhKx3Tq15jQI9ltDkrZEFC/4svw20zI62+M1d+3QyA8yXkEEZjRqlPL4rz9
EHgdPbH4mZUZnaVKjvCJDMHZJMfQfH5mdPOfaBdO7A/kxyx1xZxjRnX/VMuO
jA5AZNCKroMXM+r5xmdJcuyDhhzmijxfZkQ2//kpQbIPllt4js4GMiP3ou/2
dlO9oMMqt2wVyowGee+eKDLphZ3+/4Ubp9DPTeZ3rmr0wDNP6g+1BmbUIjkq
gU53g7XTmp7ADiLarbBCjVJuh5ybfqLcbERU6NaeOc/SDpgy9waJk4i0I/8z
OZj8HVw5pBIxPiLqbRbfbVzbBkG5Zn/rRYmo7HaoOiNrK3ycavR4cImI2GNe
WkiVNMHa9+s6ZhpEdPVBkttn7SY4VzwipHeViA57OLAsTDdC4/ONJjAkIjK1
KsfoYCMMCEpzc90looN2jxpMXzcA3jgivdSfiF6cUpkSDK2Fi+eFXHNfEtFA
fuDzgVO18FK8QCM5mIgspw6dvParBvasfcNeRhJRbnupqZtwDYhEbJ29lU5E
Aqt91oP1VaDZYdHB3EhEKc/ZEmKvlUNoCZa83kxEt3G82Z8Ly6Av3sN54TsR
Uev3Kj7aUwZmtlH7+3uJaJBW3fl1sBScWFstciaJqAlYJ/Z6FUOMquzaNSIJ
Ea80zLDsL4TMHP2ISlYSElxqvfPQ9wOU7HGVFWUnISErG5fNxQLoGa+23dpL
QgvLIYFhP/KB3VdrNF2MhAa8F7MmLXJAYM7hGReZhMZb2BmiTbNBSu/tAfcT
JHTpp8fucuMsuCw8qH/tLAk1T+ipm1plgG/DvZZNDRJqddKdfZX/HsKlgu5a
65CQaNTtc2JtKZDytoC5S4+E/vyKvaG7kAzVllSUbkpCHfaSqabKSbDB7PtR
x56EVmpXm40U3gGrXYZOxSMSOjnD1CtWFQv7elvmj7mQ0FC3oO9FzRiQS+MS
2/QioQcORdHevpHgcDHxXVoYCfXLItw7q1DwzKtT4IwiId2JmjdP5EIgmHeq
zy2OhArmO960sr+BnEkpLp1UErp/H1sa/vIKyrV08sszScik9LZwSNYL+Fb8
SONYHgmFtR1fvp4ZAFN+5X4bxSRE6uiZkRt+Dqvzf4SsyknosetvLgs+H2A2
INR0VJGQtrzd79o7XnBERH0jtYmEIsjvpMzvuYNMsE0URxsJ8V7ruxLp5AqI
GnzKrZOEVGj443fePwaTxt6HV3+REHctTWHaxRFspNd3lf+h62NmGvgkYA9u
kQezhMdIqJzTxtq3xwYCccpqb6ZIKFK0GS9VdheirC3G1/+R0Jl4g1anWQtI
b/f3sqSQ0JPR8P67Nubw6XS2QMcyCZVqynKecjaB+oTv5QprJOT1rI5ZLMcA
ukmLhqlbJPRf+kWPBo9rMPqQZ5WdwIIyWUO3YEADsL4zYa5EFvTX4KbymwVV
wCkZH59gZUG5nyv00ZNzsDvjWZs2OwuyOJURyuZ5Ag5ypNwv42ZB0wP6xvaU
oyDx5CtJmI8FTYgEDXh6coHC8Mz74AMsaJnIJjPsuXhO/RKbyvphFsS9+3Tk
GW8Zxf8BEU8GGQ==
        "]]},
      Annotation[#,
       "Charting`Private`Tag$674695#4"]& ], {}}, {{}, {}, {}, {}, {}, {}}}, \
{}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic,
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic,
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->Large,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" ->
    AbsolutePointSize[6], "ScalingFunctions" -> None,
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]],
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]],
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02],
     Scaled[0.02]}, {
     Scaled[0.05],
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.764380683283163*^9},
 CellLabel->"Out[41]=",ExpressionUUID->"d32e4b7b-5cf7-4f3f-9251-57f5bfff5521"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"$Assumptions", "=",
   RowBox[{"{",
    RowBox[{
     RowBox[{"{",
      RowBox[{"\[ScriptCapitalN]", ",", "a", ",", "b"}], "}"}], "\[Element]",

     TemplateBox[{},
      "Integers"]}], "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.764339090037324*^9, 3.764339144471499*^9}, {
  3.7643391954109707`*^9, 3.764339208480061*^9}, {3.764339246812056*^9,
  3.7643392792158527`*^9}, {3.764339515650516*^9, 3.76433951719595*^9}, {
  3.764340869188347*^9, 3.764340890955076*^9}, {3.764380746186664*^9,
  3.76438078518775*^9}},
 CellLabel->"In[46]:=",ExpressionUUID->"422093e9-8a02-478a-9dfd-28a868092b16"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Integrate", "[",
  RowBox[{
   RowBox[{
    SubscriptBox["f", "\[ScriptCapitalN]"], "[", "\[Tau]", "]"}], ",", " ",
   RowBox[{"{",
    RowBox[{"\[Tau]", ",", " ", "a", ",", " ", "b"}], "}"}]}], "]"}]], "Input",\

 CellChangeTimes->{{3.764339090037324*^9, 3.764339144471499*^9}, {
  3.7643391954109707`*^9, 3.764339208480061*^9}, {3.764339246812056*^9,
  3.7643392792158527`*^9}, {3.764339515650516*^9, 3.76433951719595*^9}, {
  3.764340869188347*^9, 3.764340890955076*^9}, {3.764380746186664*^9,
  3.764380795998177*^9}},
 CellLabel->"In[47]:=",ExpressionUUID->"8b07c27b-8b66-435b-bfe4-0504cf8a5c2c"],

Cell[BoxData[
 RowBox[{"ConditionalExpression", "[",
  RowBox[{
   RowBox[{
    FractionBox["1",
     RowBox[{"2", " ",
      RowBox[{"(",
       RowBox[{
        RowBox[{"-", "1"}], "+",
        SuperscriptBox["\[ScriptCapitalN]", "2"]}], ")"}]}]],
    RowBox[{
     SuperscriptBox["\[ExponentialE]",
      RowBox[{
       RowBox[{
        RowBox[{"-", "\[ImaginaryI]"}], " ", "a", " ", "\[ScriptCapitalN]"}],
       "-",
       RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]], " ",

     RowBox[{"(",
      RowBox[{
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]], " ",

        RowBox[{"Cot", "[",
         FractionBox["a", "2"], "]"}]}], "-",
       RowBox[{"2", " ",
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}], "+",

          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        RowBox[{"Cot", "[",
         FractionBox["a", "2"], "]"}]}], "+",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{
          "2", " ", "\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}],
          "+",
          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        RowBox[{"Cot", "[",
         FractionBox["a", "2"], "]"}]}], "-",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]], " ",

        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Cot", "[",
         FractionBox["a", "2"], "]"}]}], "+",
       RowBox[{"2", " ",
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}], "+",

          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Cot", "[",
         FractionBox["a", "2"], "]"}]}], "-",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{
          "2", " ", "\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}],
          "+",
          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Cot", "[",
         FractionBox["a", "2"], "]"}]}], "-",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}]], " ",

        RowBox[{"Cot", "[",
         FractionBox["b", "2"], "]"}]}], "+",
       RowBox[{"2", " ",
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}], "+",

          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        RowBox[{"Cot", "[",
         FractionBox["b", "2"], "]"}]}], "-",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}], "+",

          RowBox[{
          "2", " ", "\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        RowBox[{"Cot", "[",
         FractionBox["b", "2"], "]"}]}], "+",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}]], " ",

        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Cot", "[",
         FractionBox["b", "2"], "]"}]}], "-",
       RowBox[{"2", " ",
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}], "+",

          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Cot", "[",
         FractionBox["b", "2"], "]"}]}], "+",
       RowBox[{
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a", " ", "\[ScriptCapitalN]"}], "+",

          RowBox[{
          "2", " ", "\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Cot", "[",
         FractionBox["b", "2"], "]"}]}], "-",
       RowBox[{"\[ImaginaryI]", " ",
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a"}], "+",
          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ", "\[ScriptCapitalN]", " ",
        RowBox[{"Hypergeometric2F1", "[",
         RowBox[{"1", ",",
          RowBox[{"1", "-", "\[ScriptCapitalN]"}], ",",
          RowBox[{"2", "-", "\[ScriptCapitalN]"}], ",",
          SuperscriptBox["\[ExponentialE]",
           RowBox[{"\[ImaginaryI]", " ", "a"}]]}], "]"}]}], "-",
       RowBox[{"\[ImaginaryI]", " ",
        SuperscriptBox["\[ExponentialE]",
         RowBox[{
          RowBox[{"\[ImaginaryI]", " ", "a"}], "+",
          RowBox[{"\[ImaginaryI]", " ", "b", " ", "\[ScriptCapitalN]"}]}]],
        " ",
        SuperscriptBox["\[ScriptCapitalN]", "2"], " ",
        RowBox[{"Hypergeometric2F1", "[",
         RowBox[{"1", ",",
          RowBox[{"1", "-", "\[ScriptCapitalN]"}], ",",
          RowBox[{"2", "-", "\[ScriptCapitalN]"}], ",",
          SuperscriptBox["\[ExponentialE]",
           RowBox[{"\[ImaginaryI]", " ", "a"}]]}], "]"}]}], "+",
       RowBox[{"\[ImaginaryI]", " ",
        SuperscriptBox["\[ExponentialE]",