-
Notifications
You must be signed in to change notification settings - Fork 0
/
ch3-三种滤波器比较.nb
3032 lines (3020 loc) · 153 KB
/
ch3-三种滤波器比较.nb
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='Mathematica 11.2' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 156709, 3024]
NotebookOptionsPosition[ 156059, 3005]
NotebookOutlinePosition[ 156418, 3021]
CellTagsIndexPosition[ 156375, 3018]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ", "butterworth", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"pbut", "[",
RowBox[{"m_", ",", "k_"}], "]"}], ":=",
RowBox[{"Exp", "[",
RowBox[{"\[ImaginaryI]",
RowBox[{"(",
RowBox[{
RowBox[{
FractionBox["\[Pi]", "2"],
RowBox[{"(",
RowBox[{"1", "+",
FractionBox["1", "m"]}], ")"}]}], "+",
RowBox[{"k",
FractionBox["\[Pi]", "m"]}]}], ")"}]}], "]"}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Hbut", "[",
RowBox[{"s_", ",", "m_"}], "]"}], ":=",
FractionBox["1",
RowBox[{
UnderoverscriptBox["\[Product]",
RowBox[{"k", "=", "0"}],
RowBox[{"m", "-", "1"}]],
RowBox[{"(",
RowBox[{"s", "-",
RowBox[{"pbut", "[",
RowBox[{"m", ",", "k"}], "]"}]}], ")"}]}]]}], ";"}],
"\[IndentingNewLine]",
RowBox[{"(*", " ", "bessel", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"rbsl", "[",
RowBox[{"x_", ",", "m_"}], "]"}], ":=",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"2", "m"}], "-", "x"}], ")"}], "!"}],
RowBox[{
SuperscriptBox["2",
RowBox[{"m", "-", "x"}]],
RowBox[{"x", "!"}],
RowBox[{
RowBox[{"(",
RowBox[{"m", "-", "x"}], ")"}], "!"}]}]]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Hbslp", "[",
RowBox[{"s_", ",", "m_"}], "]"}], ":=",
FractionBox[
RowBox[{"rbsl", "[",
RowBox[{"0", ",", "m"}], "]"}],
RowBox[{
UnderoverscriptBox["\[Sum]",
RowBox[{"k", "=", "0"}], "m"],
RowBox[{"(",
RowBox[{
RowBox[{"rbsl", "[",
RowBox[{"k", ",", "m"}], "]"}],
SuperscriptBox["s", "k"]}], ")"}]}]]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Lambda]bsl", "=",
RowBox[{"Function", "[",
RowBox[{"m", ",",
RowBox[{"\[Lambda]", "/.",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"Hbslp", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Lambda]"}], ",", "m"}], "]"}],
"]"}], "\[Equal]",
FractionBox[
SqrtBox["2"], "2"]}], ",",
RowBox[{"{",
RowBox[{"\[Lambda]", ",", "1"}], "}"}]}], "]"}]}]}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"\[Lambda]bsl2", "=",
RowBox[{"\[Lambda]bsl", "[", "2", "]"}]}], "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Hbsl", "[",
RowBox[{"s_", ",", "m_"}], "]"}], ":=",
RowBox[{"Hbslp", "[",
RowBox[{
RowBox[{
RowBox[{"\[Lambda]bsl", "[", "m", "]"}], " ", "s"}], ",", "m"}],
"]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"(*", " ", "chebyshev", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"pchb", "[",
RowBox[{"m_", ",", "k_", ",", "\[Epsilon]_"}], "]"}], ":=",
RowBox[{
RowBox[{
RowBox[{"-",
RowBox[{"Sinh", "[",
RowBox[{
FractionBox["1", "m"],
RowBox[{"ArcSinh", "[",
FractionBox["1", "\[Epsilon]"], "]"}]}], "]"}]}],
RowBox[{"Sin", "[",
RowBox[{
FractionBox["\[Pi]", "2"], "*",
FractionBox[
RowBox[{
RowBox[{"2", "k"}], "+", "1"}], "m"]}], "]"}]}], "+",
RowBox[{"\[ImaginaryI]", " ",
RowBox[{"Cosh", "[",
RowBox[{
FractionBox["1", "m"],
RowBox[{"ArcSinh", "[",
FractionBox["1", "\[Epsilon]"], "]"}]}], "]"}],
RowBox[{"Cos", "[",
RowBox[{
FractionBox["\[Pi]", "2"], "*",
FractionBox[
RowBox[{
RowBox[{"2", "k"}], "+", "1"}], "m"]}], "]"}]}]}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Epsilon]chb", "[", "dB_", "]"}], ":=",
SqrtBox[
RowBox[{
SuperscriptBox["10",
RowBox[{"0.1", "*", "dB"}]], "-", "1"}]]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Hchb", "[",
RowBox[{"s_", ",", "m_", ",", "dB_"}], "]"}], ":=",
FractionBox[
RowBox[{
UnderoverscriptBox["\[Product]",
RowBox[{"k", "=", "0"}],
RowBox[{"m", "-", "1"}]],
RowBox[{"(",
RowBox[{"-",
RowBox[{"pchb", "[",
RowBox[{"m", ",", "k", ",",
RowBox[{"\[Epsilon]chb", "[", "dB", "]"}]}], "]"}]}], ")"}]}],
RowBox[{
UnderoverscriptBox["\[Product]",
RowBox[{"k", "=", "0"}],
RowBox[{"m", "-", "1"}]],
RowBox[{"(",
RowBox[{"s", "-",
RowBox[{"pchb", "[",
RowBox[{"m", ",", "k", ",",
RowBox[{"\[Epsilon]chb", "[", "dB", "]"}]}], "]"}]}], ")"}]}]]}],
";"}], "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{"===", "==="}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"dB", "[", "a_", "]"}], ":=",
RowBox[{"20", "*",
RowBox[{"Log10", "[",
RowBox[{"Abs", "[", "a", "]"}], "]"}]}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"ph", "[", "a_", "]"}], ":=",
RowBox[{
RowBox[{"180", "/", "\[Pi]"}], "*",
RowBox[{"Arg", "[", "a", "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"LogLinearPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"dB", "[",
RowBox[{"Hbut", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Omega]"}], ",", "4"}], "]"}],
"]"}], ",",
RowBox[{"dB", "[",
RowBox[{"Hbsl", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Omega]"}], ",", "4"}], "]"}],
"]"}], ",",
RowBox[{"dB", "[",
RowBox[{"Hchb", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Omega]"}], ",", "4", ",", "1"}],
"]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"\[Omega]", ",", "0.1", ",", "10"}], "}"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Monochrome\>\""}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<\:5df4\:7279\:6c83\:65af\>\"", ",", "\"\<\:8d1d\:585e\:5c14\>\"",
",", "\"\<\:5207\:6bd4\:96ea\:592bI\:578b\>\""}], "}"}]}], ",",
RowBox[{"AxesLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\[Omega]\>\"", ",", "\"\<|A|(dB)\>\""}], "}"}]}]}], "]"}],
"\[IndentingNewLine]",
RowBox[{"LogLinearPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ph", "[",
RowBox[{"Hbut", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Omega]"}], ",", "4"}], "]"}],
"]"}], ",",
RowBox[{"ph", "[",
RowBox[{"Hbsl", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Omega]"}], ",", "4"}], "]"}],
"]"}], ",",
RowBox[{"ph", "[",
RowBox[{"Hchb", "[",
RowBox[{
RowBox[{"\[ImaginaryI]", " ", "\[Omega]"}], ",", "4", ",", "1"}],
"]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"\[Omega]", ",", "0.1", ",", "10"}], "}"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Monochrome\>\""}], ",",
RowBox[{"Exclusions", "\[Rule]", "None"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<\:5df4\:7279\:6c83\:65af\>\"", ",", "\"\<\:8d1d\:585e\:5c14\>\"",
",", "\"\<\:5207\:6bd4\:96ea\:592bI\:578b\>\""}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"-", "180"}], ",", "180"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"-", "180"}], "+",
RowBox[{"k", "*", "45"}]}], ",",
RowBox[{"{",
RowBox[{"k", ",", "0", ",", "8"}], "}"}]}], "]"}]}], "}"}]}], ",",
RowBox[{"AxesLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\[Omega]\>\"", ",", "\"\<\[Angle]A(\[Degree])\>\""}],
"}"}]}]}], "]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"TRbut", "=",
RowBox[{"InverseLaplaceTransform", "[",
RowBox[{
RowBox[{
RowBox[{"Hbut", "[",
RowBox[{"s", ",", "4"}], "]"}], "/", "s"}], ",", "s", ",", "t"}],
"]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"TRbsl", "=",
RowBox[{"InverseLaplaceTransform", "[",
RowBox[{
RowBox[{
RowBox[{"Hbsl", "[",
RowBox[{"s", ",", "4"}], "]"}], "/", "s"}], ",", "s", ",", "t"}],
"]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"TRchb", "=",
RowBox[{"InverseLaplaceTransform", "[",
RowBox[{
RowBox[{
RowBox[{"Hchb", "[",
RowBox[{"s", ",", "4", ",", "1"}], "]"}], "/", "s"}], ",", "s", ",",
"t"}], "]"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"{",
RowBox[{"TRbut", ",", "TRbsl", ",", "TRchb"}], "}"}], ",",
RowBox[{"{",
RowBox[{"t", ",", "0", ",", "20"}], "}"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Monochrome\>\""}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "1.3"}], "}"}]}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<\:5df4\:7279\:6c83\:65af\>\"", ",", "\"\<\:8d1d\:585e\:5c14\>\"",
",", "\"\<\:5207\:6bd4\:96ea\:592bI\:578b\>\""}], "}"}]}], ",",
RowBox[{"AxesLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<t/s\>\"", ",", "\"\<u(t)\>\""}], "}"}]}]}],
"]"}]}]}]], "Input",
CellChangeTimes->{{3.750344487826859*^9, 3.75034462376096*^9}, {
3.750390024005478*^9, 3.750390134664358*^9}, {3.7503902465820312`*^9,
3.750390319324705*^9}, {3.750390524236794*^9, 3.750390540395871*^9}, {
3.750390575522283*^9, 3.750390687552985*^9}, {3.7503907922626047`*^9,
3.7503908275236053`*^9}, {3.750390877736104*^9, 3.750390880743526*^9},
3.750390952760689*^9, 3.7503910924468822`*^9, {3.7503911697141533`*^9,
3.750391238200781*^9}, 3.7503913099496603`*^9, {3.750391416794776*^9,
3.750391440540389*^9}, {3.75039155313338*^9, 3.750392083114653*^9}, {
3.7503921166474323`*^9, 3.7503921265303297`*^9}, {3.750392171696525*^9,
3.7503921785167933`*^9}, {3.750392299102256*^9, 3.750392372688342*^9}, {
3.750392447410782*^9, 3.750392451984907*^9}, {3.750392557691111*^9,
3.750392606142218*^9}, {3.750392670571156*^9, 3.7503926806180696`*^9}, {
3.750393101962685*^9,
3.7503931145296288`*^9}},ExpressionUUID->"dd99261e-1cf8-44c2-8fa0-\
55c9a1a8439b"],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{{{}, {},
TagBox[{
Directive[
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{}]],
LineBox[CompressedData["
1:eJwVl3c81f8Xx++1ImVlliJKVpJKCpVklFC2ihQyQ5JNRmQnyczIiK9NRor3
+RhRdmaJsse1772udfHr99f55/U6j+fjdf55naMPHXUsaXA4nAseh/v/1OTj
LS61o8E2OpM3p25ZIYcQkGq3psEqGxo9P8daoei1R0UzljTYOXu8rO4vK9Tb
V1EoYEaDMeuupg9bWKM7MboFkXr/9GISgXFBNugR86v/bBRpMGe6ffvKluxQ
iKesWNBFGoxbP1GNcsUe/Tc7nJt+ngYr+Hl4TeSNPZpvlswdOE2D/TRYPGB0
8TFyftHyQUWEBtvtrXijFuuAfLfps46y0mBC8t5PHWucULp9obDiPhqM09+x
/8iCE6r7rZdpxESDSZsRe+4eeYLoPmdmvKKlwa69LhYJCniCwlyV3m+v4bFN
s+caDbedUdySd+qvETx2y0smx3G/C/pkeuzI6jAeY71s3dio5oJ+tbemsP3G
Y6XHqwMaAlwQf8HBFLU+PHbVLWbl66YLyrD+lFzxHY8pix1S4iI9Q8WjpITX
ZXjsZ3BvRgGDO4qOPtbpUIzHxh52cHnpuCPny/r0Nwvw2HVqNiaX5o5kUyqf
MHzAYyK2cg6R8h6oxsjjhlciHpNC7CdWnnuils6dLQs/PMb3bO+W9UUfVOB7
SuaqDx5bvKR3632cD4o8aWYt4InHhi65JVNJPuhWeF3vr6d4LDrwaKB4mS8a
UH1RqGX1zz8789DyiB+aqGW6L6eFxzRNslYvNfujJvuLb7k08Ni9kZ5lg11/
lHPIrpWohscs9b9PC8gFIFuPtvOFSniMu34rtD0/AK2cfcUmdO4fH7+ad39y
INrJ56xn5sdjS301xIL0IDRyR2V9hhePOYoXHidMBKF6JlepJi48hpOqz9gR
C0ZBVgNJfqx4LKTPUe5TZTDaJ5z0dJXmH//Lgu3qwZeIL0ng+N9ZHFbBW3Pc
XTsMtSWbRK1M4bCzoSGmpHdhyC8leY12AoeV3PtapzMXhmbSeVpE/+CwkSrz
5G9h4agyh9XRuRuHBVjvW/7dG4F0KnY/0X/BYe3Pr+F4El4hhipFId5POKxB
ezrk6OorVP3JK1y8AodRFrSY0sSikWDNmol2MQ4TtLw5eS80Gi3WL9EkZuKw
GZ/TJ8K1X6Owrr83JSNw2LqaBpfkegy61H248lIoDmMW6KQwSr9BKz13BW4H
/9P7uT4Is36DjAYGVp754bB+fKBWwO83SORPZxy44DDC7BiLz/dYVD8HIzom
OGzxpqeoRXMccl3Yvm55B4f59KJV973xSGxJ/qObIQ5b4QnW1tWKR9HEqqB3
t3GY+fqZlgc/45HpRrH4lAoOu5x+gPUEJQFtMaS7eEjhsOjbp9Rd7iQjzzzO
mCSJf/kIHVy3/S8ZbWqGFn8RxWFmdbgklY1ktB7rTNgWwmFCu8mMpcnvEEVI
xSyAB4d1e5qa582lIOIlgkY4Doel87+JVjNJR+ONtd1GW7uAnVmTCIpIR2PM
OfuTV3fBSb5fVKMmHY0kegQKEHYh612arevh92io4oijaM8uqEtHKLtOvUe9
C9aqF7N34a/RwmB4bCbqOavj7522C7FHC9k52jNRt5d8DUrcBTxifibPkIW6
mFhklKN2QbyeS+S5ZxZqO/7x8E23XfhQl0nZsc1GjSbbZJPru/Bdhf9J4uMc
1JA1dSpdeRcMNBW05Utz/uXbaTumuAsp8sk26as5CPPIGHkkswuFBtKnav1y
Uc1btTbHQ7sg9EBOzC/9P/Sx/XWm/8IOFByfDJdnLEAysZEaatM7oHDT7hmL
WQEquxNK2je6A7HdGS/InwpQybSfckLvDggL/4rf41CICvBO40VfdiCiXson
b7IIfTinJTwUugOM5nE+e/aUouPU663vA3fguoGatJlCKcqqV3lq5bMDE8kr
9GbOpShTW7GB6LQDdV39GiYjpSjdRtKcyWgHhkLuC4Q2lqGklL2ZsiI7oBPx
mBpTXI74LBg0qAI74GrZ/evBcjlKEKch1fHtgHUIU/3W6QoUX7VxVXP/DjA5
FeclVVWg2B8zY+bkbYjLCDdra6tEkfTNQq/rt0HrTLGxwdFqtK+tvsWgZhs8
Y1+0sDtVo4gY5MxfuQ0/glsmG6AahQlU1uf8tw0vmSvO8z78jIIvZD9E0dug
xjwm/rPsC/J7HJgxZ7oNRjdkdiNeIpT5K7HkkPE2VCVO+jWPINSkUoI0dLdB
ZPluO4M8oH1Hhgfz1bbBes6jPI0IKKFD9oC99L/9+0OF1aswVHyKEDiP34bL
5iTdQ1r1qDsZF8NPpcLknxCb5MB6RN7Dk36TQoUCKf2hqup6dHFEuaaAQAVB
F1a69hMNqCk6hWzfQ4UeXdrMZOZG9GflluVCFhVq4mYNXUlfEd7U6unhNCpc
/1ZkmHqmCR1r8fHXTKTCjUydQX+XJmSbkZdSGEmFWV+D7cD1JkTRoet/7EoF
8StJ58uYviGW8irVRTUqxJ8+u+eTTgs6Ldihd+QqFdDDa2o5aS1IL2LioZYC
FZ6rWDx0W2hBSRbsz4ukqfDuLNG1MbwViXDZVTnwUaFc2Xrgbk8bUnQ9IrpE
2IIpR7vL09GdaOSBWmbGxBb8zbUYWCR3oheaTkcM/mzBTEx4Bd/JLtRyrJ6z
9scWaJV+zVCK7UIGPZb48E9boDx+/Z6h7Q/kJF04KBK8BS14rfSn53vQAf5+
/cHnW3DwF9u4kUsPqtyz2xXpsQUl9MlHdkt70PafW81k+y1wy/jNlXCqF4VF
kj/W627BC9PCb1fO9qFMgnyk6dEtGGfjjSq0HECq/RaMHIe2QJ1YqNRdPIAI
dZGBXzm3IOLg6szo5gCSTvzrIcm4BcSbY6j9zU9Uoxb4aHNxE8bi4pUkfvxC
/Vktl+NqNqHo0Jj2F+8h5BFN+ny9chMIytlX8QNDiN+bX3a7eBP+sjOoWsoM
I3NdB0mLzE3ovhpZ8XZ+GC3jOfhkwjbhh2jLiR2Hv4jpvjGx3XATEllP9L83
HEXXopb6Um9vgnTOfdfYyFHkVxtU7aixCScPnJuRahxFlENlfuyXNyGWxdXB
/MwYGvu5l1VfZBNeB/KW0x8cR591aiSGyBvgoc/lcnDvJFr112EtXNyAcEN0
O1JjEkmXzhB9ZjZA63BVc2vkJPrAyvVZYGgD3r4LsangnEJv2h6rmzdswKs/
2x8DJKeRvaqAJeH1BsiP5zsbB8+inGcV6l/CN+Ds9dgLWN8sGsvSkIwI2oBc
LRrcERECMqJ1J5302IBYd7+4lu8EpIJ1+T8x24B9vQMqlw7PoyMXA1LXpTYg
6ze5/eHaIjK24Q34LroB1Np9G5WGSyg2ocgySWgD1BVnW2Wrl9DetUFJBe4N
OJkjQTNxeRlRPp758nx7HdzdRBva9q+gzpOTAwxt6xByOpL54zciKqKJO3q1
aR3ECJ/KpXaJKGJA1c4HWwcTxv2W6rIkdMM/d4dUvg4X+ueZTD6QUFOv3fHR
lHVYEOP4cSmKjGq8iM5fHNeB7aVV/GtfCkq+lVlDsVkHf8E2oy6gIM/jegwy
FuuwueFv1IZfQ3KdFYm5RuvwSiK5gC5kDX0U8sDeKq3DpGyIQnnKOsr7vrvf
6cA6TCg3MLIvb6LQ1BLD/P3rIPKKyHvm0hayfvrg/dSedQgwZft+PnILiRxu
OGtCXYOHnCn6pJNU9N4p+O6NyTUwE9n84+25jRJ49v93rGoNXJ5cyBY8igO3
+Vri/dI1IPzNPDWrjQODOgeF5Pw14HKdsrvwHAcH7Lo62dPXYOJtwzG3vziI
Qm8oOyFrwJ1ZBW8+4CHI8uC1X3fWACdVJlN/ixYmqoc34/XW4O557qbQSFq4
xvK+1EBrDcwVbySxtdICTdUJgV6lf3wLRU8t1enAl/HcZofoGmQYKsU63qQH
13ztkkYKBdy4/KwVvPdA3y6HVeAyBXbymDaFmvbAWb3+w1cJFJCdnOcisjEC
kXovHIYp4BfkZaH/HyM4atk++txIgTUYfh8wyQTWKy/4S2IoQJN276do1D5o
VlHvcYiggBFhMYR2Zh+IJDGHnQymgOYi3dr61f0wcTVmLc+DAlnl2ttK1P1g
FpvWnW1GAaWQruoSb1YwPv85JFmKAi+uL3oK32OHT+E+l++IUuDnuH9VQww7
8I5cofAKUeBmY9AAaws79Ic0m8dxUeD5tVX58oscoDPYe+k1dRVuhGxa2h47
ADd8lsjBLasQ0Pb0Y+ghLtB0a2cvaVwFXoTFvjDmgltP8qV+oVWYlp91OZfA
BQaWVtYSH1eBbzXodR0PNzzQ/Pu7M3kVVnl4z4EAD7gf7qznfbwKRddNmFT0
+cCLp/CvktUqZMQUKeem8YEvezjV9sEqWGNhc5MEPgikV5Ot1V+FJC0UvRl4
EKIW0H8PLq1CZfsziR/YIciuLYrOY10F17CC7xFWRyC3KqKwh2kV9BwWzvVi
RyCv1LaFSvvP//ju96OHBKAkW4ROe50MHTzxz353C0BNZKobaYQMiyyima9y
BKHbJMpUoYwMYxPlQsOXhKDP0N7LsoAMo99b/Z1chODn7RsJUR/IcHtv0un3
eULwR4WheySJDM1dKtgorzDMnvRVCQokA4U7xenAtjDgdh5LduiRIWPwOxth
8jgky1eXcmqTQSXRynLlmAjIetCdv3udDNYxC0JFFiJgR05SmlEkw4zb/j23
pkSgn9BsQHOCDDW9anROxBNQMHDUX3aDBOSpi6FM0uKgxvWYwYdEAvpX4d42
XuIwpvMpvGGBBHIHVB5kNIsDT4dW3K0xEuSKv2jOfSgBAY1e+batJLhxVI5N
K1MSjEr7+lJTSCASfAqnfPsUkBYF707Gk2BNXzT7Uf4piJK0H5GIIYFgRteQ
Kq00NOTQzH0KJsH4Vwbi+n1pkEo9hetxJMHSg7zdMoHTQBceKr7nKglOkvn4
hqplIO1bb7GmAgle9Qgv1C3JwEUGwXOxsiRwqBcdvSpyBhz9Ky8flSDBXurs
icNvz8Cg27iePCcJ6rjnlS09z0KJheJzxykikCyOx01ayELr0eQnF0aIYHGC
Vn44Txam/qyb0w4SoffJAffiFVngNy5Xj28nQk1NicOi/3kI0ZTggHIidM9c
YRculAMzWb5slkAi0DoIsRCk5cGL5Br/05sI0bGD6n+C5CGupDc0w5UI5a24
hd+/5aFNPNpB1pYIpoESTrhwBZAT2CNnepv4r5+avtWgKAIb42pLoQAR4lr3
PN3yvwISX3Vq3fiIYKn0uiyq4gqoBpQUKx0gQmh8IkfD7BXwptrF9jEQoYkn
modHTwlmlsdMthdWYPckx/cs6auA/epavlmzAs6mAmnSzNfgd5zUOHflCuiM
5HR2Xr8GFN2IvpHiFXgxrJAhE3oNJDvUPrtkrgDbU826m3tVIKEeBb4LW4FL
wyPxPNyq4JhfwD1vtALTHLtzqgbqIMVy3FFQdwW+fF1pPp2iDvNOKc16mitw
sZBJdW5CHWxlo9xrlVYgxOxefI/rdbCocxyMEl+BY3LmfLVZN+DOgEzqaeoy
7EgKB56Q0AS+i/kUS8oyGCfEXxDx04Sf74S1k5aXwUkxJZa/XxP0H3LiaCeX
gUP5YPDWCy24tbD6oLd9GW6Rvqn1LGqDKm31cbe0ZTjh60jf7Hkb6B+d9s1P
XAZNsamZisLb0Pjtv/6/b5ZhrE/g9IXR26AUlfRSPWQZxPSqKmhv6IACn/cs
35Nl0Pk9zPJLSBdkTl0urLm6DO+8Dk3zkfRg5XUV/YrCMiyf5Bw6Jq0PJeRT
psfPLwNhfTRn9LE+nPwsyBolsQxdwsWj7nP6IKpC8+Q+5zIwmHtsGS4ZgEJl
mA1d2xLYaJeu1R4yhs+e6eSnsAR7o9LKOe2MQe5y5fPxsiWotyPzPvpiDGe/
jb6tT1wCysDaZfr7d0ByUK7ez2oJwKmSKarsLhzamTq4TbMEC5GNBh8jTf/d
i5ptT1mEOKO+HsVFU+B+yXF6aHYRdrNmb2xo3wcOtktqX7oW4XaEn0Aosxns
FXr71CN1EeynfZT5B81gU0W5bfXCIrzNOzq/HPcQ3PcaG1qeXATf8XmZwh8P
gdLhMNYruAgjzOZ44f3mQDRMWv+4ZxG0WR6bXws2B4LNyjHnvgUIu9DHk+5v
AYORaT6LTgsQH8vLOp76CIx0KhhNLRZg4LVTx52pR9DP3fqm3XAB3i0nqJZL
WUF3GuW/gksLwJZKCOept4KWUs1+230LkKzdEbREsobqvi2p6Zx5eJHtd/9F
sB08Ojof9jp5HlzPPeUe+W0HnI+HpuRfzcPcc9FH12TswYmuNjXadR7KfNZy
zozZg+gZX5aLKvPwOoOxk1HbAeKicYsRY3OgJPJF51uxE1wbWr5+vn8OKvXY
NYPHnYB4YjR79PscCP2YyZrgeQKaUGciWzoHUb4q58ICngDdYkD73+dzUDsR
k11y3xmcNegLZQ7PQTzp8m9FeRcQjF9lHGabA/3Q+xzrHi7QMTZp8ZJuDq68
nc91qXYBMc8m/qE5AtBdXXmALj6DkdyXEUGfCSCRq586oOoKWgx77X8aEiDn
tIeg4Ut3oN7ebA7QIMASs3HXgx53yEshCJ+8TABZ6XccRoIeQH+u9be/CAHK
DrB/5qj1gBrzCA2J1VkY/lPrzkHjBeJ1LBK+MbNgq3NcaLbGBwSMzupuB8+C
f/TjOwMcvsC5ZOzl7TULH35o5dXa+MIuf3arp8UsvPJl/upz8Dn0usvbu8nO
Ajl7dx/LNT/wlbYudBqcAdectQvnW/3haXNk31LHDGCn2RvSdvzB2vTjtkPD
DEBfdP47mQDQjdjRfFwwAwbBCzfvvAsA0ZnYRRvfGTjYZQOcboHQk1Z3ylxo
BvYLTWpwawTBN9lpwzHuGUj482wjPiQIUPs+vwfMMxDtbsbX2hQEuVuGXffJ
05CtnFeiqRIMvoaLTveapsF4UDdw+8ZLEGU9VKZvOw29V3ojJz1D4fCHK4O9
ptNgyokqPRtDgUPxEY2e7jTwVy+xTLCEwbZtqY6OwjTwMZ8ZUvgQBt1NaiQt
lmno8Dqgr/E3HLx9Xc6ql01BRJjQc26fKHDmBNmO7ClIuZjGljQUBdZ5TBf0
EqfgoOyonrriK9DtT1U085sCwXzuJj58NIhLfVd115qC/C+GuQbt0fBz+LBx
LmES/hwuJ7S9iIGOp9Z3pf5MAk6YXrEVxUAj00eT8h+TEFbC+t13IwaKz6k/
xD5NwpmWDAuWJ28gONLZ7mfwJBRbkBlYbWLhrGKzD6PwJPy1uqyd6xsH4j3s
flHckxBRVIvn+BoHgjb3Ajj3TsIHaYYww33xwPx2JVhwZQL+JEt1+qXEw9j8
oWg5mAARVDeW0JIA0e+cMqzvTkCEdtHxBzrJECzzJWtRawKwYDQymJMM3t/o
c1yuTkCM3K7k/Z1ksCIn5fuJTUC3soBdbNE7uHTza3nC2jhcizfTYOFPhfkt
vuZvb8Yh1vMt3bH4dBAbTnwrHDIOu1oBb0Oa0+ER4rPw9R6HoBtiXz3W02HU
jw9/1nIcZDD8XcZ776Gfnk8+TXYc+pu6BmjFMwBj5S1+9msMPnVyyi+NZcL2
crxPV/sYcLtkUyb5s+BiN89Nifqxf/9m0d8XhllQEcszO5I3BmJnrrXXd2RB
Hh+P8E3vMbDqLrz+7Gs2xApzxwsJjMGxDeds974c6ORV2RrnG4OJUWOaDHIO
/A8WgNbC
"]],
LineBox[CompressedData["
1:eJwllfk71YkChyVJCBHXNlkyKsuJGEbJNypLKFRGlorRQdFCikZSFN1CC0nT
GNm5xLGvfb4Osmc79uM4B4Xs2+hk1J373B/e533ev+BVcrtid4GXh4cn5B/+
Zzl/qSLGhhF0WzmsJd7PwMMMyY7IeQ4OdI7U9M1lIFhTUohbzYHhzvUGvX9l
wVN/+502dw5qbFRnTkRnI1U6xlrtDAd7poyi3UeyMcKVkL9vzYHtoMsxL70c
uFRKlO3X4+BjQVadNScHdsYSS6mbOVAmuQ/bTHJhaCnuEZTFRvjrwKpXcjTc
Ui8RZf3BhtFabUSQLQ2lQs6lxFM27kxX5vNH0KDTkrplYwAbZSuPCPlVGtSs
DbIfHmVjpuij44OhfGglkCOa1cMoNNytadhaiOyzgroL6cOYcLLamyJShF0K
p+4XRg2ja1VzpNemCDsSx3cdcP6nlQ/KZPcWQThJxMd8lYUgevNL67lijKc6
r7ppsqA7W5hcYV4GN2qauep2Fr6ZnnESf1kGlup8/OTXIfwmrKpybqIMjPRQ
w6sNQ3hr/yn206Ny0DOz7t7+dQi/V5s85hmuQELOF6GX8UwcoUtzZUrfQfay
iYtTCBPHV9pmjaWBWMrjtzs8mGBq6yc/CwQe5yrYpuoyceh6vBxLgcQtmumL
/LZB8MmusyxmSNgXxSi2bhqEyz2tuMY0OrTDnkvwzwyA+Wfc9tlhOoRPPuMn
GANoOl+X+k6mBvT56Om8pAEckf6j71J0DfZqPCqNIQZQ6xAeRAmthUDyXRvn
wH5Iydf7qUa9x+i1kMOx5/tBudF7mrfrPd4duqP3wawf6qVLMtnS9bjOCpI/
JNWPywtxob5p9eDIBEzsLOiDN5nYItzSgPInl0OmpnshEPJg8ZVxM2LP+fip
MHrxVCwq/kZMM65SvKkuFb14ue7HMptohmqLl1Xbw16sx/4s3vOsBc83X5Au
UO1Fw02N47NLrfAOdsq7db4HSrxbhM2ut8PM2jG5wKwHTzoW5YXS2qEsf+bF
NKUHnqpFFNe+dvSV2QedXe8G/48WCY1GHTiyYmtu8qobug4mIaXinfjB25y9
hcEAxW/56N2+LkR00C5NVzLwXeref3aKMbCoJ7f6IZWBFs18T2dzBt5vmN0a
c5MBEauophflDFyOe35ghxwD1wMIrkNaN0Bnvdjn1oXxpCcXL73uhdpuc2VJ
yy7s9SI/7WH1IiaSlrOq0wU7QXZCnGIfPB3Cais3deFY5lHP8PQ+uM47J/X8
3QlD5zt2dvQ+iM3uWTTN7ITRWFTMeFU/XGX8rZ3mO0A9FmNJEWGiJZjVd7C/
A3MLwx5vnZjQGzNzV6R34IaIOp2byYRgruxvH5934MTWgD+55kPIP0JmXNHv
gIJQakHnExY2XhXiCwtuhwNtQaY1hQ2LyMP+Z2Q+4Cony7OteBSKp7KWDcZb
4fz5EoM2P4q/ZLddly1qRZ1/HmWf+hiSMli+gzatmBkyOCueNIavNYFXXSJa
MD8cNhAQ9xFZX3Mvua42IVu6/NaPSeMIqZaaMq5rwrC2+teYT+Owj7h9Ufl5
E8jBlqky9QnwSll6jVKasJ8yZ6hWOgEn7U/UC9RG+LueDWvrn4Swp7ybV3c9
4t5YCEcYT2OEEsqxSK7HtZP7uZufTaN0ZfK82rV66J1wNbIfnYZ7aMm5KeF6
UEplNNwjZlCVYOfic+Q9opI7dXyZs7jcHeFwraAWaufuFLJ65tFusnI88Gk1
/DN9w1V4llGrp/09260aJ0csMrR1llGq5pPL1qlGU6b557fUZSSKfxQ17yHB
+qbj+PeHZVwbYbRLyZHYfdv+wXLKClT4vFI9Larw9NdfWGPUVQhPsze1T1Vi
bWt+o9GbVSx3OVD1oyohrGWQLc5cRV2y+S7+rgr8ZL8nT+3kF1AP785Mdi6H
+JDijLoZFxn3xrNZV0rwyv2F74LpGp5cPLfVVLwE4wEPxPc+XEOAXa9PTmEx
TptZR801r8FCuZ4SxC1Co4eF6prd3/hcnZYnE1qIJYsc9jGPdWhsoBaeekHD
xsaAPP3M73D73nAzNjAdiW0cSvIxXlLLxNV0Gz0NkWd3LTz24yW/hXG3Rwqm
QddOd6LiNS8ZL6iWH/Z7CjxGD69PzvGS7ZKPpv2q3uBKg4Hpv+M3kkEOr+gp
vC/xtV5zbYnLRx7aqe44qWQLr4RVjS9zm0lF4X2Wfvv1CcPIr0+LlQRImz21
35XhTITsLXatPClABgx59whl+BLNUVWGCaUCJNs4f4NFSxhBFc0KKb+/hdy+
fCrOgxVL/GSVe/u4phBJsVYdueGRRqRZP9D0o4mQDrJG1yIp6US4wM/LvAsi
ZOj4aZ6UlXTi7ikHyTEtUbLv7v0dHaGZhJTthZx4migZWjzmqJ6YTVyemLtI
dRIjp6M7Jq9404h+XcfhbZ7bSBNutJtKagmRfM+txjtBgvzrAn+WqRCdeO+7
ZJ1yQ5pU1liVLzOgE9mvjY2aXkuTJxbHo9U96YSIZIS4UI00mRHc6C9WRycs
+abqmKIypFPcY+OB4BpCkaMyXZElQ5IN4v0+i7WEREpz6tGPsuQjdQWB2P56
wrZsRcDL+wdScUGfOpreSrQKPLsi5qJEThws+ta5o5tIrWLppYXvIn+ZEhyy
tBokSgw3P346pUmG3nKxyQ1nEx3Pdiho8e0jZf//e0KJwiTs4nXI/wJeNWHH
"]],
LineBox[CompressedData["
1:eJwBoQJe/SFib1JlAgAAACkAAAACAAAAzhhF++MZ4j+yqTAZKbMzwBUyO/Qh
kuY/FD1F0HWFOMD52N6IDW7pP6QU3EAgnjvAv79ClEKI7D9Yxy4DY/s+wKXU
U5JEbe8/GhcJBrwPQcC2lJIDSEjxPyYjd1qzw0LAaLYJ5HQG8j/s3LiqJ5JD
wCrWUTdUv/I/KOPfONpaRMCjMcBPBi/0P9ZMlHsM6kXADa2OI9299T9a5p4H
EptHwIe/s3AaMvc/FzISBTgvScDy8Th5fMX4P3gua/ou5UrAYz5tZoRR+j9I
X47bKpNMwOQh+Mzywvs/CgU/kUUkTsBVJePuhVP9P8gvJKEw10/A1r8kin/J
/j9w6RExnbZQwC66CoUPHABAN6ZaV6R9UcBpJLOi8eIAQLAo4qKTVVLALNoG
/YacAUCmIU5CEh9TwCgfz6fDnwFAzHIO+ZUiU8AlZJdSAKMBQC7Izq8ZJlPA
Hu4nqHmpAUBuf08dIS1TwBACSVNstgFAcR5R+C87U8D0KYupUdABQG4TVa5N
V1PAvXkPVhwEAkDHiF8aiY9TwLq+1wBZBwJADEog0QyTU8C2A6CrlQoCQCMO
4YeQllPAsI0wAQ8RAkConmL1l51TwKKhUawBHgJADuBl0KarU8CGyZMC5zcC
QO7cbIbEx1PAgg5crSM7AkBfxy09SMtTwH9TJFhgPgJAH7Tu88vOU8B43bSt
2UQCQG6UcGHT1VPAavHVWMxRAkB6b3Q84uNTwGY2ngMJVQJAlms182XnU8Bj
e2auRVgCQMhp9qnp6lPAXAX3A79eAkBSbHgX8fFTwFhKv677YQJAnnA5znT1
U8BVj4dZOGUCQOV2+oT4+FPAUtRPBHVoAkAhf7s7fPxTwE4ZGK+xawJATIl8
8v//U8C/WC38
"]]}, Annotation[#, "Charting`Private`Tag$47493#1"]& ],
TagBox[{
Directive[
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{6, 2}]],
LineBox[CompressedData["
1:eJwVk3lczIkDhmcmXaRsJdIlRyIqJNq0aalsyaYSWSytkk0XKSrtYNkOHSqh
SyfpNh06vd8OUjrQdGK6p5qma5ox0zV+fn+8n+fz/P+86o4eNk4UEokU92P/
p5Xi2vyXrhRi+nxotJdLAtyDoN3sQiGKKhY9xG8mIJLvnDfqRCEcpZINch4k
gN5enKt2jkL4zX3FhooEnIqyzQmzoxAro+Ib6qQT4bwi4sUlIwrx0/1rvszS
RAQuiaary1CIsyVyslNrnyK/f/bxAxqZ6LbJemcrmoLIyE2t7vlkoq9wRUGh
bAquGB8XPZJDJkx5XCXV9SnQTyzxEntGJvS9g1JlDVNQefKGhf8TMlH05yE7
f68UNLYKFy5QycQv1qdybPpSMFQl+ee+o2Ti8xGj9ONvU6EYp7a5d4xEdPBW
XX5enI6m+DPhM0wS0bX8/v3uunRQE+P5IkMkYrJsU4cCPR2jyWsaNRkkQvNZ
uGghJx0lz2U8rnwiEbqVryqv6GbApvh7qWgFiRgKUfmikJeBkA+9R7bfJxHl
8j4ZO2jPsCCW7H1Dm0R8sV3sCerNhF+WfFScFom49nH7dveZTMxbBedXaJII
a7bl+XMiLyCIucJa2kAitp6JTXDd8gLfNpieu72GRKjviTuj6vkCnF9YlqEk
EiEjV3psSSQL9AkXs58zvkOiZg9taE82CpsfpN2aEKJuv+aN8Lpc7IoJszQf
EUJDUk226XMuaKeCZ6X6hShUDuhQms1FwQj14GO6EO893ddx1POQQ/YczKsQ
4mepD+v9qXl4tufoxi/BQryYrOpeYZKPuMTlafoaQiQX+/PNXQpAdbuTOn52
CemM0yOHFGhI635SoOSwBAkxiyNXN9Lw1rTgtaXtEkbl/a2zdWmQUv3ak22+
hDDJXpt9ljQ8btGXu6y7hBJJK7F6Kg35Oqw7bPIS9hkvuFVN0MCYsXaaSF9E
Z2xFqElrIYx8VDWnWAvQzUl4aEsrRt9587TUoQWc4mw9fL22GP9aearaMxYQ
cMwpLItejMZNNfJVHxcwtnztwl5+MezbnMihpQvQXJEfzd9fAk/d3B6Newvw
3nL1pNz7EqSxDMPOqi9g6G+9xRWcV5D804HTfGIeqdz0qFi3chwKn2pPOjaP
Ff85khVvl4NadbfMw3IeelWNF7Jjy/FNiUb9yXgeF3NCDX9UgIGu5TLHNeax
2josyFWuAuU2lVpfuHMQNByAbVUFLpupObEezCH59b3sNypVaN0x3CnWJEB8
Uan16uUE8iix6r++FaC6YS+HtprA/U4z15uEAL84lIs4qBOwuJUpnC0SIFHt
RsTrfQTe0l039ycKIDDI5E9dJFDpz7lS4SGAeaBV0Ew9gayG7ys95QT4tKoz
LCG8Gned1h3qPsXHrw8ULCT31WKo7Ov8Izs+GDrC1xvNa3FIOuWl/VE+6g/c
VLGwrwXl1RY1ugkft700qsq9axEosWe+RZOPMV25qO20Wvhk/15Q9+0bjiRr
i/yhUweXmX+VC6K+oVmSt0Vz9xtY3Jzi3mvkYZUnJbPesR5Wvs0/FdTxsKn8
WTfnaj2svbK1u1/zMCL/X9G2u/Wwd7roolXIw+ilolDieT3OW/V+bo3nYXb8
TMPdiXpcV2mtWevGg2Z2JDPQ/x0yqvIis2R4eMuROOaZ0gCS0G17ix0Xsm1l
x8PXNCHesOyl/O9c3E6+W9So1QT9G8v2/vEbF7+Vna5YfaAJrtw4k1EjLoT1
m9mdLk3oYNXbU7Zw8cm4REK6ogk5neq39OdmkW6ypcrCsRknX7a3JyXOwl1m
3692lS0ouGD0jweTg8pnwrq4Dx/wXj3ey6CPA3Etbd3arx/AZAj+EunhoHU9
BDzWByg7FB1+1MzBYWvNWj/Rjwiy0pJFEQeJF0M0KIYfcU5fMUP6Dgd2bW+C
ZTI/YpUErzFXjQPrOy2m50M+wSM7R4F9cgbnXzi1ffGiQ1t6s8d62xlUHlcP
aKXSwfZMrLezmoGZed3W5gg6/tYPv15lMgPZNfSisVw6LlR79IRvm4Hi6Kqr
mSw6TnXuStq5OI2i38UnDjq3w0ykbLPv02mstB5X0nHuwP6SkEvLmqbQFh19
sDWkC+V+ydyrmELDqIePZVLXj9+W/DNImwJzqP23zpdd0HvX/7DmyRRSZANF
Vbu7sL1nXw314hQEn84bXNLshpKQuW6JMoWW0JVkSmM35k0PNvEMJnEy7cCn
OMXPKGtf0B55zoariGFW4MRXOKuzQx7EsxGQpP5f7zIG5N2+MA0j2BDPrR6w
UWbAc1lVUqQPGyUeJ2y8LBnQ3B0o/bMpG/H9reXhWQzERpIm7w+Mw1vnhZLD
5V5csRTN3aUyjsm0m4pW//RhW7W0VmDUGNYWdpiV6A5A7aSe7dK9MQxcG+//
bjQA+SkH/wD/MZzmxzjYWg7gu3LGe78LY7Bxml1c4zwA+nXDy776YxiaPDG2
NmEAgbouuZ49o9hrbalIWj6ItqfVOn9tGMUB26gd8RODCAj01jtMY2Llm6F1
7e3DuCIP/ZYMJkiHnzbojgzDJUvSwO4JE8g1DY0TDMO2I8noHJUJfi7f57ES
E9u0G8yuH2WCNlNtbOzIRNdXFYdM1jAKzs0ZHOQwoWdUf1Ni4zCyI3wPBKiM
gr2gWP8uehA2XlnBD9NY2Pr1ycONQYMIepVa7PGKBefXihcCA344t1XK4T0L
/VRFsp7TIOg38twcZlnoEFU0fKo/CA/WBhvZQ+MgZNbmX+seADX47wiP0XHE
bFR4tEFtAMtefvbbaTSB/ZayFwOy+uCkPJU4KDUNP61XMozEPjBVKeHjitMo
XXG61PhBH9ozdV2EGtPY3ZQhKXK9DyqGTLKpyTS2WRnkBJv2wfI7mWHvMw3d
JGJgR3UvGMrruA8HpjGScZrvuIOBLeLOIQ21M7AvjlnfLPoZVpqH71/KnsXO
f6PlxCZ6oNd08rhexSykbKPEjOk9uLzG5ajU+1nUTEewC1J7MNi8lTTEmoXO
9tDSGOMeSMxdp+3W4kIi7Zb16RvdGPVeWDybx0V5pDt1nN0JcdVUFSPwoHL5
cJ8knY64jOJ7ItICBH186cqupKPg3sCanesF4Ogr8Vsy6PB5pbDabZcAb8mT
K2N86bA8Vnh31QkB3B9FG6oq0bGNeihFLEUA1DBidzm2YZmCOL987xxWx4SO
Dsu3wd3/qG+X7xz+Bw91ZdY=
"]],
LineBox[CompressedData["
1:eJwBwQM+/CFib1JlAgAAADsAAAACAAAAr0wuXMfk0r8U+yqDGKD5v0mNQ3VZ
Gc6/uTyL+mwT/b8gVKr0OefNvwv3Mdx/K/2/9hoRdBq1zb+YbAHdp0P9v6Ko
3nLbUM2/BNPYjTd0/b/6w3lwXYjMv+gqaO1X1v2/qvqva2H3yr/KXMT0rp7+
vwxoHGJp1ce/7SViqSYgAMDQQvVOeZHBv5FZI2Ep5gHAxDYx/6xiwb+ZbBj3
LvQBwLgqba/gM8G/xH1/S0ACAsCgEuUPSNbAv5/b21qGHgLAceLU0BYbwL+u
T5lEoVcCwCQEaaVoSb2/bSyn7BvMAsCogues3m+3v+rY9/xzvgPAYv/Id5V5
p78MO/UHTssFwDBCYUYRwqa/LDU8z0fcBcD+hPkUjQqmvwApH8lP7QXAmQoq
soSbpL8GB72Hig8GwNAVi+xzvaG/NmK+l6xUBsB8WJrCpAKYvwR0VGCu4QbA
QCMrWukhUb8cjpejBQcIwC5NJuJ2Z6Y/lhDURg2CCsBYGj5xjS6nPytmE2TG
mArAg+dVAKT1pz+49KRXlK8KwNiBhR7Rg6k/bFDDD2/dCsCDtuRaK6CsP6d2
zeghOgvA7I/R6W9ssT88z4+NjvcLwEL5j2Ikpbc/RCFgiBCDDcD2ZQaqRgvC
PzcRlWKgcBDAIiz3HLk5wj8q1shs830QwE/y548raMI/mzFvzFGLEMCofsl1
EMXCP3Yydq8wphDAW5eMQdp+wz+zoHD8d9wQwMDIEtlt8sQ/tL4wdjRLEcCL
Kx8IldnHPzt9CzCjMRLAIPE3ZuOnzT87jvbYSCQUwEu7lHA62s0/PurXPRg2
FMB2hfF6kQzOPxIGzor3RxTAyxmrjz9xzj/yxWcI5msUwHZCHrmbOs8/gfjw
wIO0FMDmSQIGqmbQPwiRNYXLSBXAPJvoWGL50T/t/kSd1X0WwOg9tf7SHtU/
Ersf6/sbGcCelC7iiDfVP16LvLGtMRnAVOunxT5Q1T+qFNoecUcZwL+Ymoyq
gdU/Tck/Ci1zGcCW838aguTVP4nEnvF5yxnARKlKNjGq1j+Lh9kobn8awKAU
4G2PNdg/k5BQp+30G8BX6wrdS0zbP6LlzWVyFx/Ag3pdUK+H4D+7V3g/Pd0i
wDy/9SiCp+M/9gJwnPQIJ8AVMjv0IZLmP5rW3QNXbCvA+djeiA1u6T8GjrLx
AhAwwL+/QpRCiOw/pDbl3//LMsCl1FOSRG3vPwg7KhTWezXAtpSSA0hI8T+6
OvXccYI4wHsNfhJxAPI/o7946prtOcAKYN5L
"]],
LineBox[CompressedData["
1:eJwBMQLO/SFib1JlAgAAACIAAAACAAAAVV+VtXgM8j/MEG5/egU6wKMxwE8G
L/Q/Fe9sS31SPsANrY4j3b31P9L+qvoOw0DAh7+zcBoy9z+/GraeDkZCwPLx
OHl8xfg/HaltOjftQ8BjPm1mhFH6P1z8Qbihj0XA5CH4zPLC+z8gOiFeBRhH
wFUl4+6FU/0/bhPmS0fDSMDWvySKf8n+PzZ2e+eBU0rALroKhQ8cAEDEKb9j
4dxLwGkks6Lx4gBAUVAKGJaITcAs2gb9hpwBQAseNd9jGE/AKB/Pp8OfAUCg
M1loXh9PwCVkl1IAowFAj/9j/FgmT8Ae7ieoeakBQFlUB0VONE/AEAJJU2y2
AUAyInpXOVBPwPQpi6lR0AFAgSvXeBGIT8C9eQ9WHAQCQK+Wb23J90/Aur7X
AFkHAkDWv3dBxf5PwLYDoKuVCgJAVgmij+ACUMCwjTABDxECQOaJA3zcCVDA
oqFRrAEeAkC2qqSO1BdQwIbJkwLnNwJAkJG3l8UzUMCCDlytIzsCQA4h5c1D
N1DAf1MkWGA+AkAgSLIIwjpQwHjdtK3ZRAJAv0MbjL5BUMBq8dVYzFECQNUQ
uMm3T1DAZjaeAwlVAkB2YnIkNlNQwGN7Zq5FWAJAmXmsg7RWUMBcBfcDv14C
QBhVkE+xXVDAWEq/rvthAkDVUDK8L2FQwFWPh1k4ZQJA04BELa5kUMBS1E8E
dWgCQL0Jw6IsaFDAThkYr7FrAkDOE6ocq2tQwOPG7s8=
"]]},
Annotation[#, "Charting`Private`Tag$47493#2"]& ],
TagBox[{
Directive[
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{2, 2}]],
LineBox[CompressedData["
1:eJwlmXk0Vf33x7mhSajkiTwyV0hSkUr7kjIlIWNEyZiEUqaKSDwVGSIqVGTI
PESSfdAohMwhs4t777nGivC9v/X766z3Omedvfd7fz6fs1/rSJy7ZOxA4eDg
eMrJwfF/VwPhzXkFFyiE61HT+g+vqsA9DBXrnSlEaOaHWNGyKnjwyzGX5kAh
OuiPk/3fV0FLa0nOVjsKkTBxOca4pwqsok2y75+iEPYXxQLP81eD49rITBd1
CuHCRbSJelfDjUXuVAl+CiHwSHzPCu0ayOuffhRVyEm4/jE7/JX7AwgnbpX5
OcZBfDEYlbpv+gUWeFKu+CpyEFP5XKPimxugqD7qRRBjCbU6p7uKPzRB4MXg
5xNnFnFIN9Jdan8rqF8V206OL6DFjMvTCFYHrLa1nKo3n0cP9TH1lfd74NvO
4Xaeut+4WFTS+OBUP9x2ENHqtPqFVjau/yhPDYLedXImtHYWS406uzJnR4Bj
6aJCw6kZtLijoKXQMAaPD74pEDScwb7Rs6ulOsdAxZdL9bTuDOpXUgX+GRqD
CzOJGjT1Gfxax50692cM2sY/mVG2zWBGhL9MtMw4ZLdLBKn8mUbRkDP6CgHj
YFHQ2pr0dBoFxp6XeMtOwDRT/PRw/DSu/l5xYkZpAiIU3Prko6eRz6+Zw/3g
BNSkUybKQqdR68icvfHJCVBM2sXx/dI00v+c4e3xnQCuu+FyKzWnceZZUyXt
6wTkn1e/eWlkClXjaV16F+jwVeKxp1rfFKroXZfr9KbDSO9v+xVdUyi7nJl5
JpAOopbFOvH1U/hk3673Jx7SIcxAfgMWTyHnS20gKulgpyKcxhc8hePevv4N
/AwQWDVbm7N1CkOMWIVVmQyQ/2D87prwFKZq179YKGTAsVv5eRob2e8bURjd
XsGAgL8XYlt5prDCRbDPuoEBNNaAzSJjEs+3cjFkpxhAdDayjldMIiuoOFpG
lQmXXmUL0S0mMaJ083RbCRMU+WQuiZtM4hKtTbq8ggl0j6efThlMYobY8JWI
Gia4qkT4vNOYxOO2InOrm5hwvupSV4TcJApM7pTSnWCCVbty0u6/LDRW/7mx
XpQE4QOv5hzmWGhZXPy6SJKEjidShoksFipH/wgN306C6TlBjhXDLLyaKqVE
2UvCScbs2ZZ6FpbcadwhrUfCsRVvZK4ls7ByXUsi32USuB1333iVwMJH69zX
dV4j4f3nzLafMSx8UERkPgggQSMi8Y5OGPt5kZjuj7dJOCQcMCbsycKL+Ttj
9ONJWPCf0ThxgYVLsUoV/o9JKO91S7zlwMLaTTkrHyWToJpqoz9hyULW7KOg
2HQSlHdBToUmCy22VdomvCZhMqqUe/IQCwMibRZky0nIn9l1RkaVhWbJEXnJ
70jYWS7OHyHPQq8BwW6j9yTQRROcqmVYKDb4YP3dTyRk3VxPzG1l4cxaRmdu
LQnbj1I8bQVZ+Py0ydOSRhJG0/2+xPCxMG+dhemj7yS8XDMt8XkVC8NYyiIO
bWw/Uj6lnZ0nkdK3V6viB7u+1/+5cNWROEExv2gzzK7HL2XmMpJ4bnd/ffko
Cfvh9c3BQhKj2gRkFsdI2Pu5/2F1AolBYuq8SkwSCu/9Ele+T+IRm+xj4iwS
lIzWZT8LJPHTWHrdzCQJCl37qwOdSAx7bSCgN8vOP+mEAcuKRH7ncJ/aOXb+
9uc7bE+QKPTXO0jxNzvfbX723zRItL3nxnH1DwnS9Ejm4X0k/jVsqE2ZJ+F5
fppv7nYS+/y5X+cukCDu/ZZLTJSd7/bQ+OS/JCSpNUXe5ycxQuWb1uVFErYs
jYgsUkj0OnAhZscSCY+q/6a5zTGxx2HSopqthe5s2N09xsTxqzwX1JdJiNXf
XqHfw0ThDJvkRLbeIHBY+20jE4+lvvnaydYPWkya5d4z0duP8WGerfkSXGwS
S5mYGN9jv8jW92xu0la/YuIXDPTvZ+s1kg8v+yYxMWJt/8BLtg4byVqiRTGx
fVTUw4CteV4R4Ra3mfhRyPlPCzufkEttgp992PFLeE3V2Zqyl56s6sZENaqb
ZSi7nsDfnPLptkw0SOHoyWPXu1Txz2shEybG7rF5/YbtR0DQTo3QY0wM7N5V
8YLt1/zRI3WzakzU3Kj54SLbT581luYOO5l44Ldvxj9sv+ca3AdaxJl4yPXH
oWfsflyJCbmoJcjEe2LhlmvY/ZoyT/xdtJKJp95+aDWeJsFDND9YaoGB52Zn
wvzY/WX2feCLYTKwNveJXhBJwrjLpLRXKwOHu8Us5CdIcFZcmd//mYFhauUm
DTQSRqZEDxpVMHB8n/E7wxESBvx1jJReMLCcJ/Mgo48EO+qZ7uQ4BgqccuZc
3UtCL9cVJ/7/GDgUty2ewl6vXfeTrzM9GGhv/19cRAsJFsYlq86cZ2CWUmyh
eBMJbUJfY+rNGag36bbiQT0JzclzmdmHGSi73zOL+yP7fDjPu09UmYGFqg+K
11aT0LBdkrgrw0DJl06nmez9V1tg0ObKy66n5NqYTgkJOlftz3Yt03H0iWUo
kU/CxwO+dN1pOvaJ6MoLZpNQXZNK2dFFR8fAnQsnnpPwpnVBcTSdjoV7P1bx
3SfBUYL+X9RjOtbtro+4focEwYvdIwcj6TgcW530OYjtJ9e7pAdX6RhEX8E9
7c3eD3tu8B04SscEnRTnh9bsem64uw7tZ8ebE/oyYMpeH7VnPkYo0PHRYIb7
WkMSfp6FG4Mb6XhAMI2fSSUh7gEH897ABPasoDnNss9LrW6WrmrbBOaXCuUK
b2H3c1t/Wv+XCVyhHndi80YSDLDKRqVgAmuHbXalUkjgYt6q/3lzAl+2hPlO
/2SClz53jvK/E3jmB3+BZQwTxONnV/UITKDCkoTZP+FMaBgYPn+Hix2vfbIm
5wYTdvh9FO2eGMdP+z1enHdhQl/GnXu3y8dRbYuA4u9DTDjBs8atw3wch5Nl
WtK6GfDXaP7TLf1xbB4VaB/5xoCsp+NSO2EcK0PHbixXM4B739cfQbLjOE8v
vF2awYAK+3v68rNjKKlbvlLDiwFyVXzyN6LH8MFwvHv+Ih22Wuw1WQwdQx2r
HW6XSDoIkpb+Af5jOLCL9nFNPx2WRdO++p0fw2evTELaaujQ4nPQ7ZrKGJ7r
0qurukOHG0rOOR5dNJzVHo4bWUWH78lVu+wlaUjdp2sRwBqHzyqj5gNCbP2i
iP65Zxwq63kDz66lITFzy3qqdhwyFswbbWdGMVUuekV36jjcMGd6WH8cRREX
Fx5e83HYzr+l0NR1FN0VuJ8ziscg4MaVvTqFIzjfc1/f0JwGXoKo0pA2go13
IdX1MA2cs1arnUoYwZEHHuvtZGhg0pakbhc4grUpc12dU6Mgp/jlmM+JEfRL
XQV890aho+dfy4zxYbQN5zZ5WToCe9U/XV8lNYz0bYda5GeHgL4g/OlzzCCW
HNa5uyjcD4f0NzgFZPXh4Eza39TCZvCTL+XvfdqHFjKTyn4ezVC21roMovqQ
w9TGzluxGfbUpa1e4dOHTteQfyirCeQM1LLDj/bhwktR98a0RlBKIgZ2Vv3E
3f7BZmV69TCaZv3r3M5e/LdZtVIy7wOcc3ypIyvYi26oLDR74AP0yrISxuZ7
cPINl/ftT++hJT34kMfnHux+XraeNVAD1ZlZQdfte1ArinxoLVUNSTm/1z5K
6MYKgVQbnSfvQMRd0+Z0YDdWThUb+H6rgIeK93LFnLrRPYKzM5OrAu7lbTVK
29uNKqo/9yh4l4NfwbG4wm8/cOZlXWTmpVIwK4kVr+f+gcX1m9u1mwtgd0jM
Rh5GFwrxqDknKxQAr0k0D7R0YYOJW/zF8HyoZkXS85934Yr9ibMSD3Nhl8Ld
sljowuWnX5U62jNhzUL4q3rZLuSa49jdX5IBI1/Cknj4uvDOEWlux4R0eOIU
GuLT3Yn/0Dta5D3TYNWLoJPWvp3o5+SXluHwDAY9A488tOtEs4FJ8weeKVBJ
vanSoN2Jt144/lm3Mhmu9AaIUoU6MX8oqKv98mMwzPHn913sQLcnZtHLFQkg
F+BHKRzqQKGULe4/NjyCfmEfmlRRBx5+PiujPRwLFbSrP6wTO/ABzV9I6lwM
PCr1bngY1IFXw8ON9elRcML0cvHKkx04IZ8outc4AnZIe6VTVTtQi2hcsaXs
LnBNeyT6inXgjFHGiQa1cCh/4B44QW/HqnBHvsaoEHhoe/GydEs75rm/+fPG
+RZ4KLo52rxtx6QWHuV060DQX3S1jHvejr/+YvXXHwEgW+dy/Ft4OwqlPSoJ
U/MFzsfOsMqzHYniBCXJ797Q7eKkrGHRjpunHnnuy/SCsv2OMn7Qji9npn6h
zyWIWemwuUi2HRkVfttviriCe5v9Wvq6dlzK6Lw6tN8B9NLOLUnPtmHZUNop
hVY7kLlydtKmuw2ravYpb+u3BI4jdkNxNW3o0PGGkbvZBH6st23/ltWGB+t8
PrS+1IPXfTa1q6Lb2PP3Te2cbRoQlWf9TsO3DfukAvrKPPeA243T+X52bej0
PVbK47oEaBtYvSjSbsPDi+QRMwoFJEUt4+iKbZhiN/2SImR5eHHcPFxGqA23
X1z+WK3NAR1vzALOLLbi9z3Xrs18EoeiMNNL8UOtaNss3Wm9ZQ9EmJ861/i1
FfNLvJbCRDXARdbEdHUR+/5y4VzIoB5ozRrpaCa24g+Pwrd1l01g6/uTB/2D
WlGRx0GpN84K5qMNFYudW7GpIzG4zP0stJ49IcEwbEXO01e0lqUdIV/JQFBW
tRX5c4v8bl66AHeX9VfairXiFq9M8/J0D3Bs0JuP525FB4vIPt7By6D5VJfR
SG/BZzZuzqdcr8G/bjp9q1taMNv5VNzOw/4Q1lRwgV7RgpXqlrSuTTdhSmXL
r4a0FpSUt1qX8CgIPnIy18Vea8EROZNhV5FQUHIyT7hq14IDm5qu80WGQWId
IW2p24JCGTsLgmTvgnt8zEGxLS1onBFu62T7ADr+/v3IwdWCSfN6g+v7okDz
nKPxIP07Hsq7Y53sFQNCO9VcMiq/Y83NtODu+jjA6t445XPfUVu+cEnGLgnk
tutIbtL/jkLZB1rj1VIg9n5Bzq8931GAGlUTcvwZOFuEvK/g/o7ULir5LeIF
CDB3TB3LbMZ7kWsuFIZmgJ9JzPUd0c04HyrTsNydCUNlf1fx+jfjntRuHSn1
V1AW/G1r0/Fm1HsupyC+JRfOCnsbnGY1YefDwbL0bYVQd6O3Q72zCenvok62
zReCypD2efHqJjxf1FEu/r0I1uSJ+A/HNGHjxMH1W2NKoFCLyLik2oR1E2rD
JkZvQDRrx15j8SZMOrwkNGNQDqH8Mbh3dRNydZxV6zB8C1ZdDm1/uhpRhHp/
x3X7d7DCYy1XyI1GLHA8bGI8TIB765VIR6dGnFIK0KT5VEHHgV4R3ZONyJQ8
aqHIXw3Z3AW7+SQbcVnLgvbtSA1kqORUKt39hu+N+X8G138A3ftHvC2FG9Ds
Jy2Mz/4riJ/KmlEbrcffDtgjoVwHcyLrr4iU1KPXBZEvdlz18Dyj1+vHyXqM
sWLNWxY2wHyNr4dNWB36qJjqzQs3QdZ83oWzv2qR59L+ocPDLRBYJTSh8aEW
62xSA60dWsEs7LqrZEwtbqfp+9BHWoEipO8yqFiLDrzecibMNji9e8TRwfEL
nt7rllm+rhN4nUXPubR+wnC94+9mwntgQDG4X/fFJ1z2sdxdKtYLZbNjdnKe
n3AgRGZ1WHEvnA8utZ3g/YQqJgHhuwZ/wrskY5uLWh/RMe2DWIVMP9uvMAvP
ove42D868DZpEBo1Z0/4RlWh9cpzrzgf0+C9yu7l7HNV6DYls0ptkAZlchfz
+vZUIe3oT4IhNwYpG4b5ddoIVBgUSEwqGwPPgZZGoS0EZt7O+VzydRxqsyUo
DzsQhRda9nrxTUBhbMK5v36I+j5/fDROTkDw+XCpr1iJqVusTLsbJ0CayyXN
WfcdBj45FKzzng689D7uxokKfP+80mOQPf/MfLdwVI2owFnvt9V8Kgz48EJn
G8/3t/huK39//TMG5N4l7lz0fov1n3VPHWplQNzl/bSWf95iivATXxYPExyP
bM98YV2OUpMRNV3n2fOafMrqtctv8MoG7TO0B0xQ2bjZ1evZG3wor/9ovJwJ
YguRtZ1H3qD55WalugEmrBxcKa8xUoaty73B11aRwKq9eTcjrAxDvtjdbZNn
83vhrwl++TJc7XG3r/k4CUTipePX6ksx4qfdO9MLJGTcGs3uvVSKylNeS9rs
efmBq+26YxtKUUS8Vzo6hc0vxu0Xc4pfo7fmTQvRUjYvHDBsEDR/jTx2jq4N
bB7WlfykGPCnBM2dwtoj2bygvAYiBx+XYMKLgq/abH4VmXpN6h0uwZyUcuke
Ns9QuhRPFvYVo9tGzqsqbH4ar3qZLxxcjDWHZHkPsPmsOVNsfZBMMX4VFJys
Z+vyqDhP2qcidHDQY7Wz+eu5L1+zoWsRTn658lidzU93z4Yql/IW4ZClnuEQ
m3+u6C5Fi+UV4vd7pfsLekiw3n11+rZRIb7KMrYK/8qez4WZJozpAvz2QyTa
iM0bCpyOxafiCtAiKyiZmcjmhbEewYr9BbjGr3LH0QAS/jaaekv9yEee/Rc+
qlmS7POnvvW/6/nIIefCUbCbhPqUoypTW/OR4cdrG8lNwoX1/juLQvLQ5MO9
i29amHCo35UZ9CUXfe6UVW9MZgJvgVXeSb5cVFo3tiqY3e+eQD2PrSY5aMyx
l4cuzYTckwd2M+Oz8a97e+qePgbcEJebquh+hVGl3QuH4xhgyBIuuivxCp86
MM2njzFAnFh9xcoxC5m51loqU3RgRf7Zu+NVJvZ26scy4ulQZTs2+4vMwBO+
K92WVelwbvnztYe+6bhZI2VDveMEKGmePba++iWe0/DVSvk1DkshfwTvr3mJ
OZs4Kem3xiFhjVxhyONU9FHW2D0XOgaOBtWBHEMvsE2T78pGjjHY+8DKMEDh
Bdq/2D637jINGjfdpV9+9wyvn0p6q3dsFJIspN6S3M/wjrZesuPLEXB7/Db8
wokUVOC5tXEjxwjwaXYYfKx8ipXj/ERH8hAEWCRWp1IeIfFDdtoush8299ba
PomJw53XFnYfK++DIvuFvzHSD3F966hAZMVPGHe3Vg0+Fo0p8Sl245LdkL9G
3aJGMBy7hnieSGu3wOimpOhClVB8NCdx9JtCM4hJLNc9swjGygqzXipXI2y+
dCuYQ80fN3i0/mkQ+ARUKXmrMQkjbHG6+fL36SQQ51XWv3xAFSISfqhzNoTg
yR3vlyXRGmqczcokebLQp8etbW2GF9y+tbzZGKqwT6OQU7cuBDy1fpvFsL+b
gjOn4p16H4Jh3dPmf16NoI+79Pwlg3jgLCxNdrKhYQ9t2tqn4hHsPMTw/rNp
HF/2REuGJz6Gxs3/7IhJYOATe5qZ6asUGBaYd5a9MoWKBrIDV51ewm/NJs1O
7Xm0EDnseV8xHUwdn4DS+QUMHjXlSJ1Nh1DNVh+L4L/YEXRbrCk4E5ZiQ/27
vixh8OshK/mUbJgRS0wZK+ck6JFNY5fcCiAg9Fve/ac8hOafyHPSaaVwJ18n
UjdYgJhz4Mk6trYa9Ck3Il6HbCHEJ1UdB9ProWj5P8GR/m0ETb1kqVmsFTo9
hT5nLCoR5hNrevSP/4BtSlxm9Hv7iGA/m5N5d/og8UaNhu1/asQhnN1+K30Q
rLyy9yVmqBOblA/OSESPwBHp569ycqjEn47esHXuY7BHdOOMj4cmgagZqxlG
Bxnm2A35E1pEWotJtNZFEno/1r2+vOIY8To2eoWOziTMxq200m7TJuTajFRP
4RRclsCk2hBd4sVuwpBn1wwY3pA8XS+rT6zLiZDqeTcL9xQea/1HO07cwSIP
EeVfENMYJuUXfoKYmtzvG/DhN4zrlAc5y5wk7A9fdAwxmoe6+8sb5ziMiCGJ
33VT1QvwgeX8jbveiDCVGWTeNlmETS46vMmZxkQbSv9388sSJJ1ausV3zYRQ
LF9zm1+Ug2rTdBz4qKcIF+mi55MDHFTxADpWC5sSCl08i6FPOKnlyLUxeciU
2L71W3pNMie1Y9Vls+00U0LmfLwxxwtOam6X1cOCCVNCjLktwzeTk3pnPo37
/ZQpIUDRNXF7zUnd9ioqn8ZhRszsuJtp1MhJ9SxnKe/+14x458tvJspFoWZ/
rKSgqRlRXtnOYbmSQmXJWVVoW5oRr1ekvHq4hkIVcOnzbLQ2I/LvK3Hyr6dQ
d3WVN/bbmxHPnxllc4pRqO8/cp3h8jIjQr/EUEZVKdRKz/o3OhFmxC0+6xyp
gxTqmpbne5qizIibJtIWdocp1L6L8ZmWD80In57inE4tCrWXYyLc9YkZ4TrZ
alFnRKHK/xsrei/LjHBUSVqx2pRC9fz09ppgrhlh7++Ye9SCQlVr2/LtSYEZ
Yc39awWeoVAVQ6O8csrMCAs9zF04S6FameRU7qswI0wj71jud6BQeXvWraxE
M8K4xZDL25lC7VJ+rX+sxow48f//b6h1ZzPvNXw0I/4HWhTSgg==
"]]},
Annotation[#,
"Charting`Private`Tag$47493#3"]& ], {}}, {{}, {}, {}, {}, {}}}, {}, \
{}}, {Ticks -> {
Charting`ScaledTicks[{Log, Exp}], Automatic},
GridLines -> {None, None}, FrameTicks -> {{Automatic, Automatic}, {
Charting`ScaledTicks[{Log, Exp}],
Charting`ScaledFrameTicks[{Log, Exp}]}}, DisplayFunction -> Identity,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" ->
AbsolutePointSize[6], "ScalingFunctions" -> None}, DisplayFunction ->
Identity, DisplayFunction -> Identity, Ticks -> {Quiet[
Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic},
AxesOrigin -> {-2.3025850929940455`, 0}, FrameTicks -> {{Automatic,
Charting`ScaledFrameTicks[{Identity, Identity}]}, {Quiet[
Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& ,
Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {None, None},
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All,
DisplayFunction -> Identity,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" ->
AbsolutePointSize[6], "ScalingFunctions" -> None,
"ClippingRange" -> {{{-2.3025849990109806`,
2.302584999010981}, {-91.10635677853787,
0.9999987555026906}}, {{-2.3025849990109806`,
2.302584999010981}, {-91.10635677853787, 0.9999987555026906}}}},
DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True},
AxesLabel -> {
FormBox["\"\[Omega]\"", TraditionalForm],
FormBox["\"|A|(dB)\"", TraditionalForm]}, AxesOrigin -> {0, 0},
AxesStyle -> GrayLevel[0], BaseStyle -> GrayLevel[0],
CoordinatesToolOptions -> {"DisplayFunction" -> ({
Exp[
Part[#, 1]],
Part[#, 2]}& ), "CopiedValueFunction" -> ({
Exp[
Part[#, 1]],
Part[#, 2]}& )}, DisplayFunction :> Identity,
Frame -> {{False, False}, {False, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> GrayLevel[0],
FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}},
FrameTicksStyle -> GrayLevel[0], GridLines -> {None, None},
GridLinesStyle -> Directive[
GrayLevel[0],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], LabelStyle -> {FontFamily -> "Helvetica",
GrayLevel[0]},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" ->
AbsolutePointSize[6], "ScalingFunctions" -> None}, PlotRange ->
NCache[{{-2.3025850929940455`,
Log[10]}, {-91.10635677853787,
0.9999987555026906}}, {{-2.3025850929940455`,
2.302585092994046}, {-91.10635677853787, 0.9999987555026906}}],
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.02]}}, Ticks -> {Automatic, Automatic}, TicksStyle ->
GrayLevel[0]}],FormBox[
FormBox[
TemplateBox[{
"\"\:5df4\:7279\:6c83\:65af\"", "\"\:8d1d\:585e\:5c14\"",
"\"\:5207\:6bd4\:96ea\:592bI\:578b\""}, "LineLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.5],
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{}]], {
LineBox[{{0, 10}, {40, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.5],
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{}]], {}}}, AspectRatio -> Full,
ImageSize -> {40, 10}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.5],
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{6, 2}]], {
LineBox[{{0, 10}, {40, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.5],
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{6, 2}]], {}}}, AspectRatio -> Full,
ImageSize -> {40, 10}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.5],
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{2, 2}]], {
LineBox[{{0, 10}, {40, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.5],
Opacity[1.],
GrayLevel[0],
CapForm["Butt"],
AbsoluteThickness[1.6],
AbsoluteDashing[{2, 2}]], {}}}, AspectRatio -> Full,
ImageSize -> {40, 10}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Helvetica",
GrayLevel[0], FontFamily -> "Arial"}, Background -> Automatic,
StripOnInput -> False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"LineLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"Opacity", "[", "1.`", "]"}], ",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
GrayLevel[0],
RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle ->
"ColorSwatchGraphics", AspectRatio -> 1, Frame -> True,
FrameStyle -> GrayLevel[0.], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]], "GrayLevel[0]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],