-
Notifications
You must be signed in to change notification settings - Fork 0
/
roof.nb
1436 lines (1428 loc) · 74.7 KB
/
roof.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='Wolfram 14.1' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 154, 7]
NotebookDataLength[ 76341, 1428]
NotebookOptionsPosition[ 75850, 1411]
NotebookOutlinePosition[ 76248, 1427]
CellTagsIndexPosition[ 76205, 1424]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{"Parameters", " ", "for", " ", "the", " ", "first", " ", "cone"}],
" ", "*)"}], "\n",
RowBox[{
RowBox[{
RowBox[{"h1", " ", "=", " ", "0.75"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"Height", " ", "of", " ", "the", " ", "first", " ", "cone"}], " ",
"*)"}], "\n",
RowBox[{
RowBox[{"r1", " ", "=", " ", "2"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"Radius", " ", "of", " ", "the", " ", "first", " ", "cone", " ", "base"}],
" ", "*)"}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Parametric", " ", "equations", " ", "for", " ", "the", " ", "first", " ",
"cone", " ", "with", " ", "drainage", " ", "hole", " ", "at", " ",
"the", " ", "apex"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"cone1", "[",
RowBox[{"u_", ",", " ", "v_"}], "]"}], " ", ":=", " ",
RowBox[{"If", "[",
RowBox[{
RowBox[{"v", " ", "==", " ", "1"}], ",", " ",
RowBox[{"{",
RowBox[{"0", ",", " ", "0", ",", " ", "h1"}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{
RowBox[{"v", " ", "r1", " ",
RowBox[{"Cos", "[", "u", "]"}]}], ",", " ",
RowBox[{"v", " ", "r1", " ",
RowBox[{"Sin", "[", "u", "]"}]}], ",", " ",
RowBox[{"h1", " ",
RowBox[{"(",
RowBox[{"1", " ", "-", " ", "v"}], ")"}]}]}], "}"}]}], "]"}]}],
"\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Generate", " ", "the", " ", "3", "D", " ", "surface", " ", "of", " ",
"the", " ", "first", " ", "cone", " ", "with", " ", "drainage", " ",
"hole"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"conePlot1", " ", "=", " ",
RowBox[{"ParametricPlot3D", "[", "\n", " ",
RowBox[{
RowBox[{"cone1", "[",
RowBox[{"u", ",", " ", "v"}], "]"}], ",", "\n", " ",
RowBox[{"{",
RowBox[{"u", ",", " ", "0", ",", " ",
RowBox[{"2", " ", "Pi"}]}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"v", ",", " ", "0", ",", " ", "1"}], "}"}], ",", "\n", " ",
RowBox[{"Mesh", " ", "->", " ", "None"}], ",", "\n", " ",
RowBox[{"Boxed", " ", "->", " ", "False"}], ",", "\n", " ",
RowBox[{"Axes", " ", "->", " ", "True"}], ",", "\n", " ",
RowBox[{"AxesLabel", " ", "->", " ",
RowBox[{"{",
RowBox[{
"\"\<x-axis\>\"", ",", " ", "\"\<y-axis (vertical)\>\"", ",", " ",
"\"\<z-axis\>\""}], "}"}]}], ",", "\n", " ",
RowBox[{"AxesStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Black", ",", " ", "Bold"}], "]"}]}], ",", "\n", " ",
RowBox[{"TicksStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Black", ",", " ", "Bold"}], "]"}]}], ",", "\n", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Gray", ",", " ",
RowBox[{"Specularity", "[",
RowBox[{"White", ",", " ", "10"}], "]"}]}], "]"}]}], ",", "\n",
" ",
RowBox[{"Lighting", " ", "->", " ", "\"\<Neutral\>\""}], ",", "\n",
" ",
RowBox[{"ImageSize", " ", "->", " ", "Medium"}], ",", "\n", " ",
RowBox[{"ViewPoint", " ", "->", " ",
RowBox[{"{",
RowBox[{"2", ",", " ", "2", ",", " ", "2"}], "}"}]}]}], "\n",
"]"}]}], ";"}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Parameters", " ", "for", " ", "the", " ", "second", " ", "cone"}], " ",
"*)"}], "\n",
RowBox[{
RowBox[{"h2", " ", "=", " ", "1.5"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"Height", " ", "of", " ", "the", " ", "second", " ", "cone"}],
" ", "*)"}], "\n",
RowBox[{
RowBox[{"r2", " ", "=", " ", "4"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"Radius", " ", "of", " ", "the", " ", "second", " ", "cone", " ",
"base"}], " ", "*)"}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Parametric", " ", "equations", " ", "for", " ", "the", " ", "second",
" ", "cone"}], ",", " ",
RowBox[{
"shifted", " ", "to", " ", "sit", " ", "under", " ", "the", " ", "first",
" ", "cone"}]}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"cone2", "[",
RowBox[{"u_", ",", " ", "v_"}], "]"}], " ", ":=", " ",
RowBox[{"If", "[",
RowBox[{
RowBox[{"v", " ", "==", " ", "1"}], ",", " ",
RowBox[{"{",
RowBox[{"0", ",", " ", "0", ",", " ",
RowBox[{"h2", " ", "-", " ", "h1"}]}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{
RowBox[{"v", " ", "r2", " ",
RowBox[{"Cos", "[", "u", "]"}]}], ",", " ",
RowBox[{"v", " ", "r2", " ",
RowBox[{"Sin", "[", "u", "]"}]}], ",", " ",
RowBox[{
RowBox[{"h2", " ",
RowBox[{"(",
RowBox[{"1", " ", "-", " ", "v"}], ")"}]}], " ", "-", " ",
"h1"}]}], "}"}]}], "]"}]}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Generate", " ", "the", " ", "3", "D", " ", "surface", " ", "of", " ",
"the", " ", "second", " ", "cone"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"conePlot2", " ", "=", " ",
RowBox[{"ParametricPlot3D", "[", "\n", " ",
RowBox[{
RowBox[{"cone2", "[",
RowBox[{"u", ",", " ", "v"}], "]"}], ",", "\n", " ",
RowBox[{"{",
RowBox[{"u", ",", " ", "0", ",", " ",
RowBox[{"2", " ", "Pi"}]}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"v", ",", " ", "0", ",", " ", "1"}], "}"}], ",", "\n", " ",
RowBox[{"Mesh", " ", "->", " ", "None"}], ",", "\n", " ",
RowBox[{"Boxed", " ", "->", " ", "False"}], ",", "\n", " ",
RowBox[{"Axes", " ", "->", " ", "True"}], ",", "\n", " ",
RowBox[{"AxesLabel", " ", "->", " ",
RowBox[{"{",
RowBox[{
"\"\<x-axis\>\"", ",", " ", "\"\<y-axis (vertical)\>\"", ",", " ",
"\"\<z-axis\>\""}], "}"}]}], ",", "\n", " ",
RowBox[{"AxesStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Black", ",", " ", "Bold"}], "]"}]}], ",", "\n", " ",
RowBox[{"TicksStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Black", ",", " ", "Bold"}], "]"}]}], ",", "\n", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Black", ",", " ",
RowBox[{"Specularity", "[",
RowBox[{"White", ",", " ", "10"}], "]"}]}], "]"}]}], ",", "\n",
" ",
RowBox[{"Lighting", " ", "->", " ", "\"\<Neutral\>\""}], ",", "\n",
" ",
RowBox[{"ImageSize", " ", "->", " ", "Medium"}], ",", "\n", " ",
RowBox[{"ViewPoint", " ", "->", " ",
RowBox[{"{",
RowBox[{"2", ",", " ", "2", ",", " ", "2"}], "}"}]}]}], "\n",
"]"}]}], ";"}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Parameters", " ", "for", " ", "the", " ", "truncated", " ", "cone", " ",
RowBox[{"(", "frustum", ")"}]}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"r1", " ", "=", " ", "2"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"Radius", " ", "at", " ", "the", " ", "bottom", " ", "of", " ", "the",
" ", "cone"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"r2", " ", "=", " ", "1"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"Radius", " ", "at", " ", "the", " ", "top", " ", "of", " ", "the", " ",
"cone"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"h", " ", "=", " ", "0.5"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"Height", " ", "of", " ", "the", " ", "cone"}], " ", "*)"}], "\n",
"\n",
RowBox[{"(*", " ",
RowBox[{
"Parametric", " ", "equations", " ", "for", " ", "the", " ", "truncated",
" ", "cone", " ",
RowBox[{"(", "frustum", ")"}], " ", "with", " ", "drainage", " ", "hole",
" ", "at", " ", "the", " ", "top"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"frustum", "[",
RowBox[{"u_", ",", " ", "v_"}], "]"}], " ", ":=", " ",
RowBox[{"If", "[",
RowBox[{
RowBox[{"v", " ", "==", " ", "h"}], ",", " ",
RowBox[{"{",
RowBox[{"0", ",", " ", "0", ",", " ",
RowBox[{"h1", " ", "+", " ", "h2"}]}], "}"}], ",", " ",
RowBox[{"{", "\n", " ",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"r1", " ", "-", " ",
RowBox[{
RowBox[{"(",
RowBox[{"r1", " ", "-", " ", "r2"}], ")"}], " ", "*", " ",
RowBox[{"v", " ", "/", " ", "h"}]}]}], ")"}], " ", "*", " ",
RowBox[{"Cos", "[", "u", "]"}]}], ",", " ",
RowBox[{"(*", " ",
RowBox[{"x", "-", "coordinate"}], " ", "*)"}], "\n", " ",
RowBox[{
RowBox[{"(",
RowBox[{"r1", " ", "-", " ",
RowBox[{
RowBox[{"(",
RowBox[{"r1", " ", "-", " ", "r2"}], ")"}], " ", "*", " ",
RowBox[{"v", " ", "/", " ", "h"}]}]}], ")"}], " ", "*", " ",
RowBox[{"Sin", "[", "u", "]"}]}], ",", " ",
RowBox[{"(*", " ",
RowBox[{"y", "-", "coordinate"}], " ", "*)"}], "\n", " ",
RowBox[{"v", " ", "-", " ", "h1", " ", "-", " ", "h2"}]}],
" ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"z", "-", "coordinate"}], ",", " ",
RowBox[{
"adjusted", " ", "to", " ", "sit", " ", "under", " ", "the", " ",
"second", " ", "cone"}]}], " ", "*)"}], "\n", "}"}]}], "]"}]}],
"\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Generate", " ", "the", " ", "3", "D", " ", "surface", " ", "of", " ",
"the", " ", "truncated", " ", "cone", " ",
RowBox[{"(", "frustum", ")"}], " ", "with", " ", "drainage", " ",
"hole"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"frustumPlot", " ", "=", " ",
RowBox[{"ParametricPlot3D", "[", "\n", " ",
RowBox[{
RowBox[{"frustum", "[",
RowBox[{"u", ",", " ", "v"}], "]"}], ",", "\n", " ",
RowBox[{"{",
RowBox[{"u", ",", " ", "0", ",", " ",
RowBox[{"2", " ", "Pi"}]}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"v", ",", " ", "0", ",", " ", "h"}], "}"}], ",", "\n", " ",
RowBox[{"Mesh", " ", "->", " ", "None"}], ",", "\n", " ",
RowBox[{"Boxed", " ", "->", " ", "False"}], ",", "\n", " ",
RowBox[{"Axes", " ", "->", " ", "True"}], ",", "\n", " ",
RowBox[{"AxesLabel", " ", "->", " ",
RowBox[{"{",
RowBox[{
"\"\<X-Axis\>\"", ",", " ", "\"\<Y-Axis\>\"", ",", " ",
"\"\<Z-Axis\>\""}], "}"}]}], ",", "\n", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Blue", ",", " ",
RowBox[{"Specularity", "[",
RowBox[{"White", ",", " ", "10"}], "]"}]}], "]"}]}], ",", "\n",
" ",
RowBox[{"Lighting", " ", "->", " ", "\"\<Neutral\>\""}], ",", "\n",
" ",
RowBox[{"ImageSize", " ", "->", " ", "Medium"}]}], "\n", "]"}]}],
";"}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Parameters", " ", "for", " ", "the", " ", "drainage", " ", "pipe"}], " ",
"*)"}], "\n",
RowBox[{
RowBox[{"pipeRadius", " ", "=", " ", "0.1"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"Radius", " ", "of", " ", "the", " ", "pipe"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"pipeHeight", " ", "=", " ", "2"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"Height", " ", "of", " ", "the", " ", "pipe"}], " ", "*)"}], "\n",
"\n",
RowBox[{"(*", " ",
RowBox[{
"Parametric", " ", "equations", " ", "for", " ", "the", " ", "drainage",
" ", "pipe"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"pipe", "[",
RowBox[{"u_", ",", " ", "v_"}], "]"}], " ", ":=", " ",
RowBox[{"{",
RowBox[{
RowBox[{"pipeRadius", " ",
RowBox[{"Cos", "[", "u", "]"}]}], ",", " ",
RowBox[{"pipeRadius", " ",
RowBox[{"Sin", "[", "u", "]"}]}], ",", " ",
RowBox[{
"h1", " ", "+", " ", "h2", " ", "-", " ", "pipeHeight", " ", "+", " ",
"v"}]}], "}"}]}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
"Generate", " ", "the", " ", "3", "D", " ", "surface", " ", "of", " ",
"the", " ", "drainage", " ", "pipe"}], " ", "*)"}], "\n",
RowBox[{
RowBox[{"pipePlot", " ", "=", " ",
RowBox[{"ParametricPlot3D", "[", "\n", " ",
RowBox[{
RowBox[{"pipe", "[",
RowBox[{"u", ",", " ", "v"}], "]"}], ",", "\n", " ",
RowBox[{"{",
RowBox[{"u", ",", " ", "0", ",", " ",
RowBox[{"2", " ", "Pi"}]}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"v", ",", " ", "0", ",", " ", "pipeHeight"}], "}"}], ",",
"\n", " ",
RowBox[{"Mesh", " ", "->", " ", "None"}], ",", "\n", " ",
RowBox[{"Boxed", " ", "->", " ", "False"}], ",", "\n", " ",
RowBox[{"Axes", " ", "->", " ", "True"}], ",", "\n", " ",
RowBox[{"AxesLabel", " ", "->", " ",
RowBox[{"{",
RowBox[{
"\"\<X-Axis\>\"", ",", " ", "\"\<Y-Axis\>\"", ",", " ",
"\"\<Z-Axis\>\""}], "}"}]}], ",", "\n", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"Directive", "[",
RowBox[{"Brown", ",", " ",
RowBox[{"Specularity", "[",
RowBox[{"White", ",", " ", "10"}], "]"}]}], "]"}]}], ",", "\n",
" ",
RowBox[{"Lighting", " ", "->", " ", "\"\<Neutral\>\""}], ",", "\n",
" ",
RowBox[{"ImageSize", " ", "->", " ", "Medium"}]}], "\n", "]"}]}],
";"}], "\n", "\n",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Combine", " ", "the", " ", "plots", " ", "of", " ", "the", " ",
"cones"}], ",", " ", "frustum", ",", " ",
RowBox[{"and", " ", "drainage", " ", "pipe"}]}], " ", "*)"}], "\n",
RowBox[{"Show", "[",
RowBox[{
"conePlot1", ",", " ", "conePlot2", ",", " ", "frustumPlot", ",", " ",
"pipePlot"}], "]"}], "\n"}]}]], "Code",
CellChangeTimes->{
3.9448097490758667`*^9, {3.944809885979639*^9, 3.944809890418415*^9}},
CellLabel->
"In[749]:=",ExpressionUUID->"2f8f4408-a399-8344-ba8f-9b5a52fb01bf"],
Cell[BoxData[
Graphics3DBox[{{GraphicsComplex3DBox[CompressedData["
1:eJxdmHlczdn/x8uYjH2LKZlQTUnFFGXougdTl1uWrFOWlkH006JQmhERfpYZ
KsydFtOCUIrUVFruaZO0p5UaVKSVVBRF38/tnPOeD/3To+fj3ev1er/63HNv
Z8YvLmt3DJGTk9OWl5P7ivt+dGNU4kldH+GqqtbRzSMNFrUbLGoYGHiJ8MPv
vV1ER4SZO97+eODyHiHjel2K9ZVNHsIA/fSD5n1ewJ2V2rbIjbcTDlsy/0+P
2KPAT1x5dW7IeDup94hv3fm8p6Q8q6rJQ2qQnJRrxtMR1T6Qcr5S94nF8zx4
vmGWgzmlldH+ik6ahsZfzu8j81LGe6n+HKIP/MLneYBvpPmHk/zAp9F9r5B9
gSfTfipJP8BZn1f9fh7D9ZnG+HZdYcD34kwU53Pq3nNDV2GETrinhrgRhV5K
neLnmY6i32e+WpF6CzHuEBdYYVaYgNRaYp+nSlKBryuPiggShSLj0Zs77pdl
ALf5PQBfEoXiIWWJpXxet/XFTfPCBBzuKr+ArzPjgedGzhdrRvh+MuP5/t/s
wZz4cYz8kUCdfQLG1ei8GpnHjNdT/VCiD9yR5pEneYALaH4ByQ98C91Xj+wL
PJj2U0b6Ac76/HVxh6xPKeMRjY8GNMQP0U/GswyfGx4R2moMGyf2f45CZpzy
9fUsQVPdzzw3T8WIccv+dZPNCnOQ8dmq7hRJAfDdpeqqQaLb6JRF8ab7ZaXA
n3qMn39JdBuv+VZXwOeZIX+3czp4s4qWmK8zy1xUwPniagOrbjHP92bTYE5s
KCqqCtA5JmBch86Xk3nMeBbVtyL6wNtoHguSB/h6mv80yQ/cnO4rIvsCD6T9
LCX9AGd9Duv1lfUpZVwlUXFuolMNio4/N6yy5JRQ+TvHCKeaeuTcHXfeMqEa
3Ul8fP3HwvuI8UOr2217lEtR/MSolALXCuAxSW92NTkkof1TXNMi0x4DP6e9
8WyrQxKeYXrwHJ+bLd8xpFe5FHdLGxfyde7Frm7nfLHF8H/mzef5aiQP5sQf
41Vc7JecFTCeQ+dXkHnMuDnV7yT6wC/TPNNJHuBnaH4Pkh/4PrpvCtkX+E7a
TxHpBzjrs7RY+xuuTynjuVlacRriejRK8qGtwdBPWDapVOCvUYdCtrmY+3o+
QxvjXWzMU4sR4yWhtxPEhZVIbNtyMEVSC7y3+OmjQFE60ncbPu5+WR3wEKfC
zmBROvZcYP8mh8fjFvf9YVZYiRd0LChN5un88Lvu/3O+eK7nIhcxz7fo3mBO
3OA3zydA54Lgy/k5ZB4zHk/15xN94NE0zwGSB3gdzW9A8gPPovuuJ/sCD6T9
HCT9AGd9Fq2za+f6lDI+RPdegVNNI8pYp1e5xeeiUGmw/ydIoXDoym7Jc+Rl
OWTkrYoyxLha595Rwd61aE+l4rSKJ3XAA7JEh5dYZiOtnzdlJC1vBH4gx0XV
xDIb21mMCeLzqQv8lC951+J035y4cp6OF4qVcL74THd9eTTP9/TswZx4mbim
6LBRgIDxQ3T+JJnHjKtSfSnRB37q8zzAvWj+mSQ/8Al0X3eyL3B52s8F0g9w
1mccjpb1KWV80YVfGhOcWpH7OFtcURIg/H2MUVkC99w7GwWuskxoQsWVK+x/
LKxCjCeHqej3KNehlIPxhwtcXwA3TozWaHLIRd8Jotwi01qAW0ybYNbqkIvN
diaY8HnWX+cfcjp4m3bHp3yeTl6n4XXOF3vpanUa8XxFksGc+Kbc0Sn2S/4W
MJ5P538l85jxbKpvR/SBb6d5xCQPcCWafxrJDzyW7ptJ9gW+k/bTSvoBzvoM
0Pkg61PKuEf/APf1GukU+l9fpfq38JPsx4EqVBkyxyK1vA3N2CDJyMiuQYxv
M/u4ObSrASmor3+WNbQZeG2kYt7Z3wrQxBn96sEGr4HPPBC/3/+3AmxwyPpV
EI/3XLBWCutqwAqZymZ8HaWI5CTOF7ts3z02nefLfQzlvjrwN1sU52pGhAkY
V6bzu8k8ZryX6g8l+sAX0zz6JA/weJp/EskP3JLuO5bsC7yI9rOU9AOc9XlI
IrrB9Sll3OpO0e8a4k7UkV2f22AYJnR780BX7F+OQo7Vz/T17EB7y+qmmqc+
RYyP6npyQlzYiNY86FqcImkDjorTEgNFJehrn4iWnLI3wL13RZUEi0rwH2Zf
FfC5rp+2tVlhI76x6aeLyTyduJsh2zlfbBt8S1fM87WJH8yJkxNfWgboXBF8
Ob+FzGPG9ah+BNEHfvbzPMBn0vwKJD9wObrvZrIv8EDaz1+kH+CszztHxA+4
PqWMu9tfUhb7dyNz9YOLQrdcFj6vP2/lr1GK1i2I1s482YnqZ04WtDyqQ4z/
E5Qe2xnRzL3PPrCwmtQBfKzYdYTz6ofI++2qLDSmG3jbhYP2e1Y/xPIbq0L5
3PaP7stdEc04wtOow5KnY6VQ78j5Yu2W9xrNPN+0XYM5sePElEOjYiMEjG+i
81pkHjP+C9W/QvSB932eB/jb5ST/EZIf+DW6bznZF/hK2k8v6Qc46/NK4mtZ
n1LGz0+RndPv0NUjk+5s8bkqvHU9ZVSiUz5SeOUxq1vSjUbuSmmOqWhAjFub
hNcGebehrtPK8hVP3gB/lqmxdYllOerb2cO9v7wDbpmxsv8ny3K83y5qP59f
PIWbg73bcI9p/sVyno6crcZ+zherKQTHRfN8VQbfT97haS5nrxw2uiFgXJ7O
TyPzmPE/qf47og/c4fM8wLNo/n6SH/hquu8Hsi9wedqPOukHOOtT0n5R1qeU
8dtFC+f6a7xHcs9iNJUjrwkvnlltL/bPRsnhS3U0r71D867ZSvaWvkCMf9Pu
M8x002ukbO0Qa3G9C/htQfUtRbtK5P44ZJ++Ty/w7HZV/2/tKnGL42EzPs87
fnqOaNNrLJ5ga8zXuXbX3ovzxSpqwqVuPF/P0sGcuDTPLq8zJUrw5bwSmceM
51P9ZUQfeBXN00zyAPej+T1IfuDv2si+08m+wONpP6tIP8BZn6fVBVpcn1LG
i44OT09w6kObhMuDKkpuCN/V5hxOdEpBzj+P1rVM6EVbG782/bHwJWK8Os9A
uUf5DRLq37UrcH0L/EjCmSFNDtXozYrlKyPTPgD/YUqHVqtDNbY+sG4anw+k
RyZzOjjwSfezfJ7Oyok3jnO+WFH4rMSI51t1fDAn9tE07NixJEbA+Co6P47M
Y8blMoj+X0QfuCnNs5XkAW5D83eS/MCL6b4isi/wnbQfT9IPcNbnQat6WZ9S
xluNqlfUJHxE/wTXjfXviRIeM/13R5JTFFIbVa17+t4HdOL7qM7+3GbEuF7I
5Zj8E51o+9DhE5Yb9wBf+wPakOL2GDniju/Ve/uBB4sy0qRuj/FDH61uNR5X
Rr5bC0504rbIUyeW8XS6HVv/4Hzx6E1Hbfp4voYLB3NilSVDzzhuuy1g/C2d
H07mMeNTqH4L0Qd+h+YpJXmA69L8ziQ/cHW6ryPZF7gK7ecq6Qc469Pl3Mlx
XJ9SxhVaIx5xHzzQ6L5fj61SjRHKyS2eWJjpKCxPD9dLLe9H0dstQjOyWxHj
3nsVTUK7utDJKsvMrKHvgU+P7Lx29rda9EI/4FOQwQBwhb3+6/x/q8Um5/py
+dwgbb9cWFcXFnio6vJ1AnL0/uR88VB3jVeY5+v3ajAn7nrV/p1mRKyA8UA6
L0fmMeNzqf5Cog9cleb5ieQB3nuD5H9J8gPfT/f1I/sCL6D9FJF+gLM+be/N
Ps71KWU8P9KrPbcsFl0Nm/5viMgXmd1yme2v8RI9TVQo0BTfQf6KyxtfGNoJ
GW979G9mmuQmOjZPSbKyMALmv7VonLIiNQTt2IxP+nveBr57ljb3+2uk2+4S
PcYj7yuNXJUaggv1hqzkz1fannWWSm5iz0OFeAVPX655+qgHZbFYP9cg+xIv
J+O6hGPGH1EdD6IDPOZzX+A3RRte8nIC/7Sa7OVA9gJeR3s4T3oA/oD2mU76
xF/2aVsaI+tTyrhXcaKJzaRPaPPaOytnedSgpMkjDJKdglCvLzrvVPMJ1ZnP
NusYES1kPCz0xbivp/eit+6Vw+cv6oJ5k/mHKmpzWtB3+vuy1Qv7gN+f/kHc
MeKS9OR5osf4GsnMA09yWvALuas2/Hk978wwTh+Lj81Zb8TTf71k9wEuJ87e
EZalycvJeArhmPE5VGcZ0QG+gfo+J77A5/l2m/Ny/qdD91InewGX0B7kPQZ7
AP4r7fMk6RO4VYpujOx1brHhF+0L3OuMPf+32hXsZff1s5pdbnw13g7u4Qf6
4p1l9/XP0uLnVTd5AH/VlHLH/fIeYeBTlSeye3HGUxzzRzePVEtTJvf3wCcu
qk+Q3dd/rPII4c8nuqeqye7ZpfXda6t4+mJNrROye/kOayd3eV4exlsJ/+9+
nuqkEh3gk6lvP/EFXj1VYSwvJ/A6utclshfwLtrDa9ID8Gjam4j0BnwL7XkG
6RnOSXlT+bpM7jzdbhthzZ1/wG0OjpkkO08nL9ubJzu3GF9TZ3JM9v9nTDs5
t+A8d154P507146aNNnx58dfN/aQnYPNSqbhoTx9N7u8Btm5aXUu08uXl4dx
C8LheZhIdV4SHeAa1PcI8QXuPWHtCV5O4GK611SyF/AeE9KDK+nhv3Oevt53
RtbIXu9S9ty2NOZ/vKsTjq4lzT4ub7cHqbhWfiP2f4maKa8nHDNuoOwWPs14
ALlNHWcdp1mApt/dlpfmdAbpU15JOGa8vEiiry0OR6uN7mk1Ga4RMp292wd8
okb7CKsarqhG6a6Bv6/dDNMVXgUD6L3xs2UpNwqgz4FFexMSnAZQw/yvd4Vc
iJYy/f1UJ5DowPPMfGd16czkfKXMl+l4XF6/k9MRMh0b6msjGPSF3v4He2zF
ug==
"], {
{GrayLevel[0.5], AbsoluteThickness[2], EdgeForm[None], Specularity[
GrayLevel[1], 10],
StyleBox[GraphicsGroup3DBox[
TagBox[Polygon3DBox[CompressedData["
1:eJxFmHm8lVUVhr8tIimz4oBykXsZLkYgIOJQGiApziiKOKGAOBCDKIaGAwKh
iZKBWijmgCh2UTQ1EgGHDATnAZmHNA0t08zUcqj13P18v/PH+9vf/tZea71r
73XOfs+pHj7u5LE7FEXxSSqKBjG+E2DeMvBeYMfAboG/FNm+a+D9QMNAq8D+
gX0D7QIfBL4T2DPwt8AugdaBjwPNAlWBjwJNAvsEtgcaBfYI/D3QOLB34MPA
zoG9Av8INA20Cfw1sFNgd3IG33/C29wt5Fxrfnw7O8Khk3mwdZA7cdpbH/OT
An0D/QL76QefGutmXbV5mHe1praBLtYEz+85YvuuMbB1NCc8usubeEcGegcO
CvSSH2sPkB/zA31HHT30g9fB1gnfQ80Hlx96NuT5gZy6mqNWn++7FtshxsD/
8EA3/XubE58+xuvhPjH2DAyQBzGOdoTLUebD9iNrIF5/6zxQ/xrrPEY/eB1h
/b08j57OT7Q2uBwfOEy+JzhiO9YY1D07MDUwLTBQP7jPCkzRdqr8OIdT5Md8
sO+oY3xgWGB44HTrhO9ZgePkcq456KOhcoLvEPcIn7Ndi+0MY8D3HNfif5o5
B5iTeCebm3FQ4CJ5EOPHgTPlcqH5sJ1vDcQbaZ2D9T/COkfrB6/zrJ91I1zH
/GJrg8tYa4PvOEdsY4wxVI79zHGJvIn388AVgZ8GfiK/CwKXyY/5RN9Rx6X6
wWuSdcL3KvPB5VrPhjzXyOlic4zS52rXYrvSGPhPdi3+l5uTfZ1iPPJPdZwQ
mCEPYtzoCJcbzIftOmsg3nTrnKj/edZ5k37w+pn1s26a65j/0trg8gtrg+/N
jthmGuMa94xz5uxvMRax+b7l+4fv1l8HrvccbpMffOf4jjoeC8wL3BeYa53w
/Y354HJvkT8/fLbulhN873CP8LnLtdjuNAb+97gW/9vNOcOcs+V+n+OtgYXy
IMZDjnCpMx+2B62BeAusk/njxpofeFg/eD0Q+JXr5puH/fidtcHlEWuD76OO
2BYZA9tvzQmP3wfuN/ZLgaWBZYE/yAmOS/Sp077Qmp7Ujm2FsRbr/5DcnzY3
vJ5xhNdTxiPWc9bAGf7RkT1Ybgz8/xR4whwrzQPHdnGfdg78K55Xy5XYL2iH
4ypHbC/Lj9gvunap8R6w5le0w/0za1sTeEOucHzNep4NvO6I7VX9sH0q77c8
K/qa3v23Nbwd+EJ+6wL/9Qw2Bv4jvw2Br+S9qcj3MPcpd+u38tgaqIo9KFLm
iM7hzkcDoX+499FG38hvS+DdImsm9Mf/rGFbkbUTGgHN9LV7sbnIGgatgX7a
Lg80DRoJzYDWQdOgHdBM6B+0A5oJjYQmQVehr9A26KQvPbP18mhXZE2GjkLv
oMnQZuiORuan7vZy5P6tttb2zlv6jlifF7kP1hqjk3uHbuCO5a7lOwbtUOom
xs5y76INLrX6ww990c08aInuxkUX9JILd35P96OrOWt810N+3Y3VQb8DiooO
62K+3sYl/0HO8UEvHG6MPs67+e4w/amv1FaMhxQVfVlbVPRQH+vGXuqyg81H
bjRFf/lxN/aTb3/nPX3XV35H6oP/Uc6JN8A5XNAPR8sVXXGcNaAlTpD7sa7j
fuCeOF+uA11HTu7sk+QxyHmpq46XB7rgFHkMdt5Xv4FyOk0bHIc4h9/pzsmH
Zhiqz7nO4Y0OOdOc2EutdLa2/uYfZM5h+g+2ppHauWdHFBXNNEyfEc7ZizPk
dKp++KBNuAe5I7nPb3AOJ3TEKHmMdg5HdMUYeaAlxsl3jOvIgaa4UB7jXQcX
dMUl5p7gvNRVY60JXXCZ5zbR+XD9xhv3cm2j5H2F/CY5J9/kIusEfK51Dkd0
yJXmxF5qpau1DTHHBeacoj/50A7T5cd38rSiopmmWNM056PNM8kapuszUv8J
2ma479wf3DuL5YF+uFGO6IqZ8kBL3Czfma7jTuYufVAes1wHF3TFbHPf6nyy
MYjL2aML0Aec/RznU/WbJb/btcH3Dufwm+ucfGiGu/W51zkc0SF3mhN7qZXu
0sbe3CY/cs7Tf441LZAf9+z9RUUzzdNnvvObzDPXGhbow13Nnbi6qGjZGUVF
Yy2Ux8PO4YjeWCQPNMaj8l3kurn61cnjMdfBD63xhLkXOy911SPW9KTnzbkt
cU4NjxurTt5LzLPUOfyWOScf2uHZoqKBnpMjWmK5ObE/U1S01NOeWZ354Yre
eN587NMq+XEPrrSGFa5b7LsV7sVyOZWaCZ/yt/EAub7kGbAWbfCyXNAhpfZ5
VVupjbDtlLKGQD+gqd6SA3f02/JA/2wwPtpgnTzaqe/QU+iltXJDR62RP3pp
vTWzd2+YG+20Ud7omU1yromYbVPWQQ1S1kloJHQIuggdgZ7aZhw00lZrWS2/
Va7DFz2CHtti/Witze4D+gRN1sp17/muYcrv0Wk7pvwe3QWvHVLmgQ/7ht5q
kfIesHfoGbRRvU5K+RmNtHPK+gnt1ChlrYZO495He7UWaLLy/x20WhvnH/lu
l5TXo9OapPye32KNU/ZFyzVN2beJPD40T7OUdWH5/xfPVZ7TZ557y5Sf13iu
nO/z2j71GT3Jf2VtrX+7da/07FcY9xPXNE/5uZln84V9Aj7Xb7eUn+mhXVOO
Q/+1Snk9Pbd7yudLPy2zX+ifPVLuM3p0z5T7ld7aK+U+2+Q63r/ovrJHTe2D
r41V9gfv9k75eYu2r4yxT8r9RM+V/UfvtU45Dr3VJuX324rc7/Qra6tjTP4e
eN8+a2gf8TmkH+r/L0255+v/L02V3wsN/E+VfN/Kd7v91MgeoSea2FP0Cv1Q
/z9qyr1X/19oyv1TyGebfUcPNXaP2M/V9gh9w9l1SPkz38Lz4Zzok/Yp/3/a
3N6hh/gsfOmZrfOcOePytxXnutY8nN9695K92+o5cAab3XvOcqNnxV5v8jw5
7w3uB2fDefH9xvcy398dU973Kr9T2vr5rfI9e7Cfz3+2V/e1X1tYL33f2ec3
47mT31HJeDU+41eb8meDeB2NyXv2qHmRY3QwTm25b8bp5PdLtZw4m/8D/WS2
Fg==
"]],
Annotation[#, "Charting`Private`Tag$22786#1"]& ]],
Lighting->"Neutral"]}, {}, {}, {}, {}},
VertexNormals->CompressedData["
1:eJxtmHk4ldsXx08TDUhdJEKGBg0ynwydUylFboZDmnSl4pYoKjKlSEVFSpdb
SakkFA3i3ooMZciUkmQoN0KDDIe6Gvys9e4379vv/uV5vs9+9l77835919pH
2WmbzaahHA5HfQiHM2zg7z8FZ3eW7X6WfXq5/9WYayFZVhv2nP6990N2YKK+
4UT+02zjTjtDub152bQeI3VF4fyIkmwNzzrhX5GPf+hRX0sNfDi3sqM7t205
3lr1Q696MeKDH+cW//Pb7wuZ+uv4UG78iBL+0w3e+2Gf5UR3mtN9aOBc/h4J
+27ZgXNp3b8Y6+RrF5UmTmtdwLMkupvDhH2wPs6o75eJe/P4tK70ji8P+zd9
yIoY2P+HPtX310tQj/CEzJKBen7ot+6X+0H9G7OSnZl6zLgThnDftxy7NtiH
rkcm4OlC4NM1+qiMHOPcg4UUTwXLyGHF7UE/6rzzgNLHpK5wPLMvJCuT6Hb1
G41gn7WZqbrAOV/9AOr5SpzJcC5n/uNu4JMaFoT67No6PajTruEycq5Lo/ZZ
qhPTCvf6+/EsE9DdK/ehftOqWR843CusRs4363woDqK2yFlspEYPcO5QOMDi
zL8kuPL04UIe/b0+n43aC+sdAuJlgPPL0t2oe+ZslYP9JaPGHwM+H7yp9YXF
5VegnhK3e6bAs+4iVX/QaEXkLGd4Czm/IPVX98oZwX03/6OOnP/N80c9Ydks
E+BjH5woDZxv1lDnrnxI8UzRaKmpfxnEy/iJs6xUtlQsg3Pk9nj0818J5XOB
s0CC2v+p2FT085Y1QiGT8zs/szlQp8V7UVcm5xmJwe/hXiL1psh5Zown6gGj
IpBz++mJIbCPz4JdlL4m/yBwi7oZ9Ak4dxLOfoRzK/+ZadUAZ9pXp5L8kLP8
81xp4EyvT3xxGTm/qTVAzt5k/3NDFC5DPdkJOujnUfN2UpwDQ5Gzq+w15FxL
6p99RcQY7uu+vLsV9jH95kX557sichbmvGRxXkU4B5Qa7W4Y4EzzvEY4j91u
flDs9iDn8R2lyDmYI4+cbQjn2vkT5OFcI650L/Chz7U5E45+Xm6Xgn6m61wc
f64Z7lVYOxw5p4lFoh6rpDUXOEi1eKKfdxMOhz2vop9tfUYJgbOgLYjlZ9fJ
9n5VDD+vyt+DnF3UXZBzhE0o6kONJ2JuuCWIIWd6f/1DfQlQT+OQGPQzXY/S
/Wzk/L4/icV5s5825oa4oyT6eYJsOOrpD0SRc/GGTuRM87EnnCO8P4zhtv6/
nyWWdbuDn/8ierJchQHsU6ZhYMzkXLliuBKcO6n6DeaGLDk3R1RvJtRpEGLi
yuTscV8XcyOw1B850/5JFA1FP6ds3IOczdceQf1L1gXkPClTpRc4u99wZ/lZ
PjL6JHCmc89QTQI5S3SZIeedobGoj9txGP18YE8B5rPjtYOoGwvykHPD4W+L
gad93VXURxhSnKNEk1mcV0nxMDekzUyQ82Liq2UVYsjZQdIX81nq0i6Wnx9N
di5g+rmScP5e8TTDSHWQ8yWfHOScXLaSC5yjll+n9lEYpgjnqg1/J2T6+U85
OU2os2H4V5afj4h+boN7SYzehZyturdT30VJFvvgnQWbkLMT4SB8loK5IcYR
xXy+3nWB5edFjpmc9QcG+6CxFQf7IDejFjm7ke9SLOOEnM2v2rH8LJsxAzmP
8l2AuTGSfHeX2ABfqD9s/T0WZ6GFK3KWXKDF4hx9YRRylr/Qhn62Jj60I5xj
Tg2zbGof9HMq4fxbQ38eMzecU0KxD6rajtVj+rn4tw45OLcxQ42VG8H+DjpQ
Z++qElYfFGkY/Q7udX2dADnT9wo03YS58Yf8OlZuzPbPQc7mC68LmZxpP48f
+jyV6eflO3TQz55nLJCz/uRoym9ZXcjZu18eOdP5bzSTi/PGld8sWZxLIl+j
n28IE1mcT0jGY27ELTbFfG7VvkR9X6dOnDcerVsuw8yNFYSzbdqj+czcSPxe
swv0KUWCQjXXkCwJMxPUHRP6MZ9TD1twmZzDxx3BPij0k+sBPvT3naN5A/P5
9K9JyLme1HnTLRg5nwywYOVGktQ0aq77Uref2Qf9/hIPBW61ZZfQzz0v17M4
D+0QTOpoHPSzdSwP/VyvLYXzRjdZ769bjZz9+qay/HwkrgD9/DVkLouzhEQN
+vmJeiZypn3S0uSAfj76pz7Lz07zJNHPAoMy9LMV4WPcT/E8nHb0xf3OIJ4Y
4Unnc6SL+BnmvHHsyEXMjWBzdR5wrjbaRs05ZwInwbn9B0JYnB02G6pDnTZb
PDGf1Vz8qH7q1I19UCd4J87PcceTUE+LOYd+tthpyvKzc8hk5PwiZJKQmc90
bqQYfr7L7IMTPn9GPwdz+1i50fVtL/ZB3SWvI5icF0lzcN4oCgpaCjw5tlzU
m961BUD93g6xyFmF1M/V8ELOfm9nsTiLGCkg56eLY1h9kJ7rtiz70g75fJvU
WUA415s0bdb4dZCzwaUm9PMGn336wLns1SHUzSqu4bzhV/gcOS8h54YL32tD
nWpF99HPUX3UnPyEp4J+/lgyncV5nkQa9sHcpRY41yU2u6Ku8fA19sHMMln0
s9tPnMXEtIdkpc3/wdmxyw39rFIThn72FbdD/e8d5yfC/gqLXJCznDeVP7N6
1qOfV0S4IGePlnmoK/K/op+VZ15EznT9llnKONd17GttZXIeFmKNnDVX9CHn
58SHdD6P6FF5bN892AcfE84j1y6rhT5I6+vDWjGfoxXNtYFzCeEcEvoM5w3T
C5qsPrio/aAG1LlYqIZ+ViV+2L/ErQXuJda9jsU5wXmrHnDQMLVBP9Mc8qPO
I+fC9Jm9/+Vn18VKitAHf7w3FUYiZyXLOyw/W90Zin5O9aL6IP0dTfIfYT4v
Ut7O4iwzqhPzea3OHyzOt21S0c/HlGVYfr61MQQ5K7aoIOfqnzjXryhwZ/bB
LMJ5q1JVgdWOwXnDJPwqcu6T5usA51LC2Sl9PfpZ7uCnHibnWcN7MZ9neUah
n0+SOss5X/DdPTbNehHonuRecbrvDIDD3ZpvyPnZmCXUPGPWgZyrq5uE/zXX
hX4+tnGW3mAfnNgwJBDWK6xpw3d3t3YNxflFMPo5aNwOlp+XbPFOhHpkZN2Q
c7+Ayo0Kv48+yNm3mpUb0g3fsQ+GBaxlcW4LacU+uLqLi5xpH9oQznWLxjjt
+jboZ3re6Du5+h+YN2jO/7jPRs6ScwR6TM7WB73x3f3Mo6ObmRtj/+7Ugjq/
KJazOPfsrHwL9+qrDGRxnjjsiy5wOOQfyPKzsXTmIWreKOv5L852O2SLmfPG
F/3x6OfadZEsPx9O8cI+qMYfz+KcYnMV/bxjkxK+U+j/LxGfp5gbGzcXszhP
V8lFP/ucl2Bxnll+HjlnxTnIMDnT88aMUsM1zHkjg3B+vumGfcZRRh8ckYP5
nOIqzWXmhpNMtyz6ufhjL5PzDNcbXKizZGzcFmZuTPtbHN/dVRs+LQB93FRq
Dl8grol+zvNZivlcTfx8etZO7IP2R7nImc5bOjeOj3ulKGU3mBvhXWOo3HBO
ZnHO7q/C3Hh16ivmRhXZ/+Hcqcj5qvIw5EzXo/XVFnPjlVwcKzc6dnsg5/GP
NNqY727ObjvMjf0f21i5IaA5F76WkegZ5JxDOAs0K1/BXEf7uafwMnKuMtzD
ZfpZvrMG3yl2a04KmZwlRr7XhTqPxV1g+XnKc1t8p5yZpoT5LEnuNVb/K851
EwzyWJxrpxWin2WCDv9nH1w/LFcL5jqas90JEeQckJ6DnGn/13aVIufzFf3I
mc4luZgxOG8c3daC70G6HtvmeuTcYR6NnE+Q+qs2/oqcn82ex/KzjlEe+lmr
spKVG7aEc2cutwPmOpqz2cxRmnB/FenPBgEwP8b4s+a9zSMPfDrFeI97+W4Q
AJdJnftvDNwju7MlkJrfah//DlyWSlgnwfnfqwJQL40b693bsotnWkTmHbJP
9ELnS8CloFpsHazP9KP2mc5tyoH7KJSvjIX76e3bS80/7Q9WYp767Xf3Hagz
N4nSE8cNtwN9+nyHtAGdn0f0mPWjM2CfNr3WzIF9+MZW1P+Xb1jpfjg37Ii4
M3yftCfU7z+7xR2uhn334AVSdfI3kzpbNYpD8L1kYX8B1n8j92oUTFsHHNqb
U6LhewpOUbr9mA5d4Lkhw6HRf6CeuyXBVN8h/NUlebF1jPe4rcu/WrCew985
D/h7R8miTr/Tt+rczziuOJgzXnvkbeHcNXeiMoH/aYPR1FwX9Rb5p1kkIH9R
d8pvipXn5nyb78WbT/jT94r/vf4icPA8EYH8R3+i1mtZht0Hbr8l2Z3CvmT2
CvVYEU174HxTJn4r8K9oLkf9rpijAPQifc9U4F9OdIuS8HTYp/L2q3TgH0r2
aXtUHQznxl0W2wg8I7ypfrpwRZ5w3gcP3t6f+F9QaEH+eQeTkb8IuZfDQzUH
4NDIffwH8N+3Mg31CNVi5K+eLHwF/H95chj1SS/zUX/TZ9XI1PMFDej/ptxb
M4A//f8rZyFEnytn6lwHztb07/DtDc5Qj9b7B8j5R666RDpoOXnxCghnWv9w
flsC3Dfd7YkDc32FNi8X+ExdffoMcKb7YKZqJ/rc495m5EzrD4ObbUEP51re
BM7076jhyh9vwz4jhJ/Q5/T6pqHOIXBu2duCTcCNPvf0PfGMaa0evDEkt+j1
2SdEkHOMcjBypvX2lV+Q8y/54jHAmT53X4W4HnBLeLIaedLrr0RPQZ6qUjba
wFOGcDapcEffdj3Iy2D6NjdlDfJMfFSbDHykimypnDeuGrl1tReP/5Nvi5KW
YW50iOxC344kvl04Vxd5Cs+uQJ6LG6j/O6WLbquA20PRA9uB55zLa1Gf9/ZP
zI03L6ORpybRlfw/IM/xgrPIk97ngeAF8uzQFcXcoM99N/wbv6PRgxf0c25M
mYs8o73cLsL68eRek3KnOwKH66prTgFPmgPdB2V92+rgnULn85Po18bxts+y
bawqNr2ZfDFbfSX5vW7JXD7oNTzn+82TL/Lfm1O6efpoXK9gbb0W1i9ToX5X
/H7n3nzQvcSD78F6w2RqLr1LcmaEWfOUGEbO56bo4P4dLYdyYD3tn+NbS4xA
V52i7Ar7VxZdY/WXRoewm4e6ButvKS/BehK1x22F9fQ+q8n6ZMv3qi8YeUi/
F3q0HMvgvUDrvnnGPNgn/esnrP8xOfd/r66GVQ==
"]], {}}, {GraphicsComplex3DBox[CompressedData["
1:eJxdmHk81Pkfx2ckpUuHdpNWhSWhlqIt03ymlsmg0rkqOTYdfjlWB2kppdqO
rZDdWdKiQ0WUYynDfL4oKfcS2myhkrMVimLX7zvzOfZb8w+P5+Pt9Xq9XzPz
GfOZ+Z3v6q0qPB7PiM/jDWN/Hl6flHXc5JxwRW372NbRSxf/uXV/4dDQKwD/
+DLEVxwuzN/69ut9l0KEhJv2aDbVtPwojDJjguwHTlPuM6XDmTfBTzhiyYJf
AlIjKD92+fVZlQl+8pBRn/tzeV9FdUFty49y8+zbRXYcHXH9AznrK/efVD4/
gOMb76TMKa9JjtD0NrCx+nR+D5qXE96P9ecifcojP85D+XqcXx3lp3w63vcy
2pfybNxPDeqHctLnlfBvx7F95hLuYSKM+lLyB0gPPXHvhcUhocO31j22ES9A
3IWcqeGBFSD5ff5rhxwICPdMj35kV1oIdNtSX+RISyhfU52UcF58C1iN3dR1
v6qSctefouAF8S2oUpVVyeWNm1/esC8thBf9+Au5OjMfBK5nfaFBQti/dhzf
/81R5oR/pvAPRRsfERCui+d10TwkvAnrxyF9yr1wHj7KQ7kA5xeg/JQ7431N
0b6Ux+B+qlA/lJM+94u6FH3KCU9ofjykL2kC31jNtnhhES5kbMfNiNBvBLEz
T4SFBTaAaf6nXtjnlAPCnQbXfGZXWgOsztT2yqT1lO+s1NM5L2bACcfyjfer
Gil/FjBhwQUxA1d9biLg8vzY3zpZHbhJ21DC1ZltLy5hfWGd+YZeCcf3Rosy
J7QQl9VGGUcKCDfG89VoHhJegPU3IH3KO3AeR5SH8rU4/0mUn3J7vK8Y7Ut5
NO5nKeqHctLniP4wRZ9ywrWzNOdlebeD5IyzI2oqooQee25FZXo/AT696eec
MltAWtaf174urQWEH1jZ6dan1QgyJiXJSvxeUp5y+82OFs8isHeqX25ibhvl
Z43Wn2n3LIIzbYLOcrmd7VaVfq1G2CtvXsTVuZe6spP1hY7qv89fwPHVz1bm
hP9kaPtuW/KbgPBCPO+A5iHh9li/G+lTfgnnmYHyUH4K5w9A+Snfg/eVoX0p
3477KUP9UE76rCw3Gsn2KSe8qMAwXV/SDcZIP3Q8t4jH50Y1iN3iax8W2AXW
Z/i62uc8A4RXxN3KlJQ2A4lbW5BM2kF5f/mzx9HiCmC2S338/ao3lMd6l3bH
iCtg4MJtbwo5PF00cNqutBku7FpYmc3R+eonkx9ZXzgvcLGvhONbdk+ZEz4P
nx8aZXxZ8On8XDQPCc/A+guQPuXJOM8+lIfyRpzfHOWnvADvuxbtS3k07icI
9UM56bNsjXsn26eccBWTeyXeT96BvDWmNc6hV4Ruyv6LgVqp6vJeaS8IdlIZ
ffPRc0C4bvfuMTEhHeD7Gs3pj56+oTyqQHxwiVM1MPx2Y95t23eU7yv01bF2
qobujuPOc/m0heFaF0I6IBNWmF7N0QkGqVLWF57qbapO5vienKPMCZdJnpQd
tLwuIPwAnj+O5iHhOlhfjvQpP/FxHsqDcf5ZKD/lE/G+/mhfyvm4n0jUD+Wk
z3SYrOhTTvjiyO+aM70HgP94N/io4jruWQZ8LKNXOGX2g/Iah21fl74ChGfH
a5v1ab0BsqCMgyV+bym3ykrWb/GsA18IknYl5n6g3HH6RLt2zzpotz3TmssL
fj33B6sDtxh1/VvM0XnYbXGN9YXBJobdlhxfsVSZE97gHZ66bUmKgPBiPL8f
zUPC72J9d6RPuQfOI0F5KJ+C809H+SlPxfvmo30p3477aUf9UE76jDL+oOhT
TnjA4JDiAYxLI66t0EkR8pSPWzk1sXMdc6oHwcx10ry8u+2A8C12/2yK6+kB
anprGwpU31Nen6j58MwP9WDSzEG9GPMhymfty9gb8UM9ND/g8vo8h/dFukyJ
7+mBavladlydKQnZt1lf6OuxU4Ph+PLRL8xIZ815BgmpAsK18PxONA8J78f6
qkifchHOY4byUJ6B809G+Sl3wvtqoH0pL8P9LEX9UE76PCAVX2f7lBO+Ia3s
J32JiqjrblPRc4tU4feofxh7pGlWWCBPtLuqcZp9zt+A8DE9T49JSt+BVQ96
RDLpIOWgPDcrWtwAhocmtBVW8UWEh+xIqogRN8DTdsNKuNwk3MjFrvQdvL7x
m5+zOTrpN2I9WF/GLeamiYTj65qhzMlkZ71yijLOEHw674zmIeGmWD8B6VN+
5uM8DOGzcH41lJ9yHt53E9qX6kTjfn5F/VBO+kw7JHnA9ikn3H/bBS1JhKrI
Xi9ocZxzOu65GK5ZmGyUf1xF1DTrM0Hb4zeA8N/PM6ndCe/Zz9kHjhsm80SE
a0j8RvmsbAIhb1cUgHGqlHdEBm37fmUT5K+vjeNyt9O9l3oS3sOEQMsuJ47O
BrUmL9aXMWp7r9/K8c3doczJeE2SHRiTmikgfCOeN0TzkPDvsP5lpM8QPvBx
Hsrf2qL8h1B+yq/ifavRvpQvx/30o36oL+nzctbfij7lhJ+b6pXg/URNdOXQ
5DTn0N+Fq9DnI1R7HTC7V6oqGr1D1pryqAcQ7mJ9sf58yCDoOanFf/SULyK8
IV9/8xKnF2Bgex/7+aJGuVPe8sFvnF7Ave5Je7n85xOwNSZkEPbZFP9czdHh
uenvZX0ZXbWY9GSOr/YXypzMdN8zlw9a3hEQzsfz09E8JPwXrP8O6TOEe36c
h/ICnH8Q5ad8Jd73A9qXcj7uRw/1Q31Jn9LOnxV9ygm/VbZoXoS+uojXkGKg
lZgl3In+34PZF5caG1xVE82/6ibdXfkWED6yM3SEzcYhoOXimep4bZiI8FuC
upua7s3A/8/YPWahIym/26kT8bl7M2zzOmjH5Q+Pnpwr3jgEJRPdrLg6V+9s
C2Z9GW1d4dJdHN/ASmVOpvKh+8NumUzw6fwUNA8JL8b6y5A+Q3gtztOK8lAe
jvMHoPyUv+tA+85A+1KegftZgfqhvqTPk3oCQ7ZPOeFlh9WZTO/Roo1C2/OP
Ku4I89H3F+jz7VgTp8yRos3Nw22+Lu0DhNc9NNfq0+KLhGZ33Ev8hosIP5R5
SqXFswW8cbBdnpg7ivKvpnYZtnu2QJd9a6Zz+RCTmM3qMNFPexuKOTrLJ10/
yvoymsKGCkuOb+1RZU4m1MCia+sSuYDwFXh+PJqHhPPykP6vSJ8h3Abn2Yzy
UO6K83ej/JSX433FaF/Kt+N+AlE/1Jf0GbShSdGnnPB2yzqHJ5ljRb/HNGpE
9MmEjuj7ONQdU2dy8t4o0bEvk7oHi94Dwk1jL6UUH1MReaiqT7S1GiEifPVX
YJ1sVxvwgl1f6vWPoTxGnJcr39UG/wg17NXlcC0QtrnkmArTkXji2DKOTq9X
+2nWlxm78bDrAMfXYpEyJ6O9RPWU1xZGQPhbPK+O5iHhU7F+G9JnCE/DeSpR
HspNcH4flJ9yPbyvF9qXcm3czxXUD/UlffqePT6e7VNOuFp7wuOhIQ3R2IH9
R1boyMn9GKxmLprmVI8RJXs4xuXdHQCEh+zWtI7rGSY6XuuUX6CqLiJ8RmL3
1TM/dICXZlH/njfXoFxtd8SaiB86oPXZgSIuN8/dy4vvGcYIAnRMuDpRhaa/
sL6Mqr/+a8jxDX+tzMn0vO78wiAhT0B4NJ7noXlI+DysvwjpM4Tr4DzfoDyU
919H+V+h/JTvxfuGo30pL8H9lKF+qC/p0+3enKNsn+QeDxYnBncWVeWBK/Ez
/ooVx4FIl2fO+pJm8CxLrcRAkg8iNG2bX1r4CQnvePxXfq40BxyZP0W6vDST
zn/u2DzVIecm2LoJHo8IZCjfOduI/Xt3+ZY7SI/wxPtTRq/IuQlLTVWWc+dr
3M74yKU5MPBAKXTg6PNaZ4x5UJUHzYrM717g5CTcBHFI+GOsE4B0KE/52Jfy
G+J1rzg5Kf93JdrLE+1FeSPu4RzqgfIHuE8G9Qk/7dOtMkXRp5zw4PIsa9fJ
40SbVqctnx3QTvaC/WHgnPeTcaJG+zl2XaNySf8wPu7l+OEzRore+teoL1g8
TES49YIDj+oLP4AvzPbc1SsdTfn9GR8kXaOS5cfPIT3CV0ln7Xta+AG+5F1x
5c6bhuTHs/qM5MjctZYc/b+X7NzH5mTubo0vMODkJFyGONkXzsU6y5AOQ/g6
7PsC+VI+P6zXnpOT8rl4Lz20F+VS3AM/QNkD5ftxn8dRnzTPBplJiuJ97rju
O6NI9n1GXv83O9W2Ke7rZ7f6Xh82wY/eww8NZPgo7usbcjPm17X8SPnrFlma
/6UQYfQz7aeKe3HCZV7FY1tHm+dqoft7yictbspU3Nf/UxsQy53P8s/RVdyz
y5t6V9dy9CUGhscU9/JdLt7+fE4ewtsR/+9+HuvkIB3KP8O+g8iX8rppahqc
nJQ34r0uoL0o78E9/I16oDwZ9yZGvVHujHueiXqm5yTfht+Yz56nHm4JLuz5
R89V16BxkxXn6WfLdj9UnFuEr2q0PqL4/pnSic4tep77LLrPsOfaYesWd+78
hGtWAYpzsHWKzcU4jv4u94fPFefmhrP5wWGcPIQ7Ik5fD5OwziukQ89Vfex7
CPlSHjJx9TFOTsoleK9paC/K+6xRD36oh//Oefx+3574RPF+J+cDbGsu/ueO
cRq4envOUb57CLBsujEhQv8VaMW8CXFIuLnWrovTrTREu6aNd0k3qAcLEIdm
mNcgDgmvLpOaGUnSwErLe4YtFu5CorPbYyg0aew5Ye3zyzpJJu70+XWfaeMQ
XKIhem/VsEx2vZ72ObR4d2amt4bo+YLhO2Ijc+VEfy/WiUY69PVMfGf3GM9i
feXEl+gEXFq7ndUREh1X7OsqUPrS5+v/BJO4zQ==
"], {
{GrayLevel[0], AbsoluteThickness[2], EdgeForm[None], Specularity[
GrayLevel[1], 10],
StyleBox[GraphicsGroup3DBox[
TagBox[Polygon3DBox[CompressedData["
1:eJxFmHm8lVUVhr8tIimz4oBykXsZLkYgIOJQGiApziiKOKGAOBCDKIaGAwKh
iZKBWijmgCh2UTQ1EgGHDATnAZmHNA0t08zUcqj13P18v/PH+9vf/tZea71r
73XOfs+pHj7u5LE7FEXxSSqKBjG+E2DeMvBeYMfAboG/FNm+a+D9QMNAq8D+
gX0D7QIfBL4T2DPwt8AugdaBjwPNAlWBjwJNAvsEtgcaBfYI/D3QOLB34MPA
zoG9Av8INA20Cfw1sFNgd3IG33/C29wt5Fxrfnw7O8Khk3mwdZA7cdpbH/OT
An0D/QL76QefGutmXbV5mHe1praBLtYEz+85YvuuMbB1NCc8usubeEcGegcO
CvSSH2sPkB/zA31HHT30g9fB1gnfQ80Hlx96NuT5gZy6mqNWn++7FtshxsD/
8EA3/XubE58+xuvhPjH2DAyQBzGOdoTLUebD9iNrIF5/6zxQ/xrrPEY/eB1h
/b08j57OT7Q2uBwfOEy+JzhiO9YY1D07MDUwLTBQP7jPCkzRdqr8OIdT5Md8
sO+oY3xgWGB44HTrhO9ZgePkcq456KOhcoLvEPcIn7Ndi+0MY8D3HNfif5o5
B5iTeCebm3FQ4CJ5EOPHgTPlcqH5sJ1vDcQbaZ2D9T/COkfrB6/zrJ91I1zH
/GJrg8tYa4PvOEdsY4wxVI79zHGJvIn388AVgZ8GfiK/CwKXyY/5RN9Rx6X6
wWuSdcL3KvPB5VrPhjzXyOlic4zS52rXYrvSGPhPdi3+l5uTfZ1iPPJPdZwQ
mCEPYtzoCJcbzIftOmsg3nTrnKj/edZ5k37w+pn1s26a65j/0trg8gtrg+/N
jthmGuMa94xz5uxvMRax+b7l+4fv1l8HrvccbpMffOf4jjoeC8wL3BeYa53w
/Y354HJvkT8/fLbulhN873CP8LnLtdjuNAb+97gW/9vNOcOcs+V+n+OtgYXy
IMZDjnCpMx+2B62BeAusk/njxpofeFg/eD0Q+JXr5puH/fidtcHlEWuD76OO
2BYZA9tvzQmP3wfuN/ZLgaWBZYE/yAmOS/Sp077Qmp7Ujm2FsRbr/5DcnzY3
vJ5xhNdTxiPWc9bAGf7RkT1Ybgz8/xR4whwrzQPHdnGfdg78K55Xy5XYL2iH
4ypHbC/Lj9gvunap8R6w5le0w/0za1sTeEOucHzNep4NvO6I7VX9sH0q77c8
K/qa3v23Nbwd+EJ+6wL/9Qw2Bv4jvw2Br+S9qcj3MPcpd+u38tgaqIo9KFLm
iM7hzkcDoX+499FG38hvS+DdImsm9Mf/rGFbkbUTGgHN9LV7sbnIGgatgX7a
Lg80DRoJzYDWQdOgHdBM6B+0A5oJjYQmQVehr9A26KQvPbP18mhXZE2GjkLv
oMnQZuiORuan7vZy5P6tttb2zlv6jlifF7kP1hqjk3uHbuCO5a7lOwbtUOom
xs5y76INLrX6ww990c08aInuxkUX9JILd35P96OrOWt810N+3Y3VQb8DiooO
62K+3sYl/0HO8UEvHG6MPs67+e4w/amv1FaMhxQVfVlbVPRQH+vGXuqyg81H
bjRFf/lxN/aTb3/nPX3XV35H6oP/Uc6JN8A5XNAPR8sVXXGcNaAlTpD7sa7j
fuCeOF+uA11HTu7sk+QxyHmpq46XB7rgFHkMdt5Xv4FyOk0bHIc4h9/pzsmH
Zhiqz7nO4Y0OOdOc2EutdLa2/uYfZM5h+g+2ppHauWdHFBXNNEyfEc7ZizPk
dKp++KBNuAe5I7nPb3AOJ3TEKHmMdg5HdMUYeaAlxsl3jOvIgaa4UB7jXQcX
dMUl5p7gvNRVY60JXXCZ5zbR+XD9xhv3cm2j5H2F/CY5J9/kIusEfK51Dkd0
yJXmxF5qpau1DTHHBeacoj/50A7T5cd38rSiopmmWNM056PNM8kapuszUv8J
2ma479wf3DuL5YF+uFGO6IqZ8kBL3Czfma7jTuYufVAes1wHF3TFbHPf6nyy
MYjL2aML0Aec/RznU/WbJb/btcH3Dufwm+ucfGiGu/W51zkc0SF3mhN7qZXu
0sbe3CY/cs7Tf441LZAf9+z9RUUzzdNnvvObzDPXGhbow13Nnbi6qGjZGUVF
Yy2Ux8PO4YjeWCQPNMaj8l3kurn61cnjMdfBD63xhLkXOy911SPW9KTnzbkt
cU4NjxurTt5LzLPUOfyWOScf2uHZoqKBnpMjWmK5ObE/U1S01NOeWZ354Yre
eN587NMq+XEPrrSGFa5b7LsV7sVyOZWaCZ/yt/EAub7kGbAWbfCyXNAhpfZ5
VVupjbDtlLKGQD+gqd6SA3f02/JA/2wwPtpgnTzaqe/QU+iltXJDR62RP3pp
vTWzd2+YG+20Ud7omU1yromYbVPWQQ1S1kloJHQIuggdgZ7aZhw00lZrWS2/
Va7DFz2CHtti/Witze4D+gRN1sp17/muYcrv0Wk7pvwe3QWvHVLmgQ/7ht5q
kfIesHfoGbRRvU5K+RmNtHPK+gnt1ChlrYZO495He7UWaLLy/x20WhvnH/lu
l5TXo9OapPye32KNU/ZFyzVN2beJPD40T7OUdWH5/xfPVZ7TZ557y5Sf13iu
nO/z2j71GT3Jf2VtrX+7da/07FcY9xPXNE/5uZln84V9Aj7Xb7eUn+mhXVOO
Q/+1Snk9Pbd7yudLPy2zX+ifPVLuM3p0z5T7ld7aK+U+2+Q63r/ovrJHTe2D
r41V9gfv9k75eYu2r4yxT8r9RM+V/UfvtU45Dr3VJuX324rc7/Qra6tjTP4e
eN8+a2gf8TmkH+r/L0255+v/L02V3wsN/E+VfN/Kd7v91MgeoSea2FP0Cv1Q
/z9qyr1X/19oyv1TyGebfUcPNXaP2M/V9gh9w9l1SPkz38Lz4Zzok/Yp/3/a
3N6hh/gsfOmZrfOcOePytxXnutY8nN9695K92+o5cAab3XvOcqNnxV5v8jw5
7w3uB2fDefH9xvcy398dU973Kr9T2vr5rfI9e7Cfz3+2V/e1X1tYL33f2ec3
47mT31HJeDU+41eb8meDeB2NyXv2qHmRY3QwTm25b8bp5PdLtZw4m/8D/WS2
Fg==
"]],
Annotation[#, "Charting`Private`Tag$22813#1"]& ]],
Lighting->"Neutral"]}, {}, {}, {}, {}},
VertexNormals->CompressedData["
1:eJxtmHk4ldsXx08TDUhdJEKGBg0ynwydUylFboZDmnSl4pYoKjKlSEVFSpdb
SakkFA3i3ooMZciUkmQoN0KDDIe6Gvys9e4379vv/uV5vs9+9l77835919pH
2WmbzaahHA5HfQiHM2zg7z8FZ3eW7X6WfXq5/9WYayFZVhv2nP6990N2YKK+
4UT+02zjTjtDub152bQeI3VF4fyIkmwNzzrhX5GPf+hRX0sNfDi3sqM7t205
3lr1Q696MeKDH+cW//Pb7wuZ+uv4UG78iBL+0w3e+2Gf5UR3mtN9aOBc/h4J
+27ZgXNp3b8Y6+RrF5UmTmtdwLMkupvDhH2wPs6o75eJe/P4tK70ji8P+zd9
yIoY2P+HPtX310tQj/CEzJKBen7ot+6X+0H9G7OSnZl6zLgThnDftxy7NtiH
rkcm4OlC4NM1+qiMHOPcg4UUTwXLyGHF7UE/6rzzgNLHpK5wPLMvJCuT6Hb1
G41gn7WZqbrAOV/9AOr5SpzJcC5n/uNu4JMaFoT67No6PajTruEycq5Lo/ZZ
qhPTCvf6+/EsE9DdK/ehftOqWR843CusRs4363woDqK2yFlspEYPcO5QOMDi
zL8kuPL04UIe/b0+n43aC+sdAuJlgPPL0t2oe+ZslYP9JaPGHwM+H7yp9YXF
5VegnhK3e6bAs+4iVX/QaEXkLGd4Czm/IPVX98oZwX03/6OOnP/N80c9Ydks
E+BjH5woDZxv1lDnrnxI8UzRaKmpfxnEy/iJs6xUtlQsg3Pk9nj0818J5XOB
s0CC2v+p2FT085Y1QiGT8zs/szlQp8V7UVcm5xmJwe/hXiL1psh5Zown6gGj
IpBz++mJIbCPz4JdlL4m/yBwi7oZ9Ak4dxLOfoRzK/+ZadUAZ9pXp5L8kLP8
81xp4EyvT3xxGTm/qTVAzt5k/3NDFC5DPdkJOujnUfN2UpwDQ5Gzq+w15FxL
6p99RcQY7uu+vLsV9jH95kX557sichbmvGRxXkU4B5Qa7W4Y4EzzvEY4j91u
flDs9iDn8R2lyDmYI4+cbQjn2vkT5OFcI650L/Chz7U5E45+Xm6Xgn6m61wc
f64Z7lVYOxw5p4lFoh6rpDUXOEi1eKKfdxMOhz2vop9tfUYJgbOgLYjlZ9fJ
9n5VDD+vyt+DnF3UXZBzhE0o6kONJ2JuuCWIIWd6f/1DfQlQT+OQGPQzXY/S
/Wzk/L4/icV5s5825oa4oyT6eYJsOOrpD0SRc/GGTuRM87EnnCO8P4zhtv6/
nyWWdbuDn/8ierJchQHsU6ZhYMzkXLliuBKcO6n6DeaGLDk3R1RvJtRpEGLi
yuTscV8XcyOw1B850/5JFA1FP6ds3IOczdceQf1L1gXkPClTpRc4u99wZ/lZ
PjL6JHCmc89QTQI5S3SZIeedobGoj9txGP18YE8B5rPjtYOoGwvykHPD4W+L
gad93VXURxhSnKNEk1mcV0nxMDekzUyQ82Liq2UVYsjZQdIX81nq0i6Wnx9N
di5g+rmScP5e8TTDSHWQ8yWfHOScXLaSC5yjll+n9lEYpgjnqg1/J2T6+U85
OU2os2H4V5afj4h+boN7SYzehZyturdT30VJFvvgnQWbkLMT4SB8loK5IcYR
xXy+3nWB5edFjpmc9QcG+6CxFQf7IDejFjm7ke9SLOOEnM2v2rH8LJsxAzmP
8l2AuTGSfHeX2ABfqD9s/T0WZ6GFK3KWXKDF4hx9YRRylr/Qhn62Jj60I5xj
Tg2zbGof9HMq4fxbQ38eMzecU0KxD6rajtVj+rn4tw45OLcxQ42VG8H+DjpQ
Z++qElYfFGkY/Q7udX2dADnT9wo03YS58Yf8OlZuzPbPQc7mC68LmZxpP48f
+jyV6eflO3TQz55nLJCz/uRoym9ZXcjZu18eOdP5bzSTi/PGld8sWZxLIl+j
n28IE1mcT0jGY27ELTbFfG7VvkR9X6dOnDcerVsuw8yNFYSzbdqj+czcSPxe
swv0KUWCQjXXkCwJMxPUHRP6MZ9TD1twmZzDxx3BPij0k+sBPvT3naN5A/P5
9K9JyLme1HnTLRg5nwywYOVGktQ0aq77Uref2Qf9/hIPBW61ZZfQzz0v17M4
D+0QTOpoHPSzdSwP/VyvLYXzRjdZ769bjZz9+qay/HwkrgD9/DVkLouzhEQN
+vmJeiZypn3S0uSAfj76pz7Lz07zJNHPAoMy9LMV4WPcT/E8nHb0xf3OIJ4Y
4Unnc6SL+BnmvHHsyEXMjWBzdR5wrjbaRs05ZwInwbn9B0JYnB02G6pDnTZb
PDGf1Vz8qH7q1I19UCd4J87PcceTUE+LOYd+tthpyvKzc8hk5PwiZJKQmc90
bqQYfr7L7IMTPn9GPwdz+1i50fVtL/ZB3SWvI5icF0lzcN4oCgpaCjw5tlzU
m961BUD93g6xyFmF1M/V8ELOfm9nsTiLGCkg56eLY1h9kJ7rtiz70g75fJvU
WUA415s0bdb4dZCzwaUm9PMGn336wLns1SHUzSqu4bzhV/gcOS8h54YL32tD
nWpF99HPUX3UnPyEp4J+/lgyncV5nkQa9sHcpRY41yU2u6Ku8fA19sHMMln0
s9tPnMXEtIdkpc3/wdmxyw39rFIThn72FbdD/e8d5yfC/gqLXJCznDeVP7N6
1qOfV0S4IGePlnmoK/K/op+VZ15EznT9llnKONd17GttZXIeFmKNnDVX9CHn
58SHdD6P6FF5bN892AcfE84j1y6rhT5I6+vDWjGfoxXNtYFzCeEcEvoM5w3T
C5qsPrio/aAG1LlYqIZ+ViV+2L/ErQXuJda9jsU5wXmrHnDQMLVBP9Mc8qPO
I+fC9Jm9/+Vn18VKitAHf7w3FUYiZyXLOyw/W90Zin5O9aL6IP0dTfIfYT4v
Ut7O4iwzqhPzea3OHyzOt21S0c/HlGVYfr61MQQ5K7aoIOfqnzjXryhwZ/bB
LMJ5q1JVgdWOwXnDJPwqcu6T5usA51LC2Sl9PfpZ7uCnHibnWcN7MZ9neUah
n0+SOss5X/DdPTbNehHonuRecbrvDIDD3ZpvyPnZmCXUPGPWgZyrq5uE/zXX
hX4+tnGW3mAfnNgwJBDWK6xpw3d3t3YNxflFMPo5aNwOlp+XbPFOhHpkZN2Q
c7+Ayo0Kv48+yNm3mpUb0g3fsQ+GBaxlcW4LacU+uLqLi5xpH9oQznWLxjjt
+jboZ3re6Du5+h+YN2jO/7jPRs6ScwR6TM7WB73x3f3Mo6ObmRtj/+7Ugjq/
KJazOPfsrHwL9+qrDGRxnjjsiy5wOOQfyPKzsXTmIWreKOv5L852O2SLmfPG
F/3x6OfadZEsPx9O8cI+qMYfz+KcYnMV/bxjkxK+U+j/LxGfp5gbGzcXszhP
V8lFP/ucl2Bxnll+HjlnxTnIMDnT88aMUsM1zHkjg3B+vumGfcZRRh8ckYP5
nOIqzWXmhpNMtyz6ufhjL5PzDNcbXKizZGzcFmZuTPtbHN/dVRs+LQB93FRq
Dl8grol+zvNZivlcTfx8etZO7IP2R7nImc5bOjeOj3ulKGU3mBvhXWOo3HBO
ZnHO7q/C3Hh16ivmRhXZ/+Hcqcj5qvIw5EzXo/XVFnPjlVwcKzc6dnsg5/GP
NNqY727ObjvMjf0f21i5IaA5F76WkegZ5JxDOAs0K1/BXEf7uafwMnKuMtzD
ZfpZvrMG3yl2a04KmZwlRr7XhTqPxV1g+XnKc1t8p5yZpoT5LEnuNVb/K851
EwzyWJxrpxWin2WCDv9nH1w/LFcL5jqas90JEeQckJ6DnGn/13aVIufzFf3I
mc4luZgxOG8c3daC70G6HtvmeuTcYR6NnE+Q+qs2/oqcn82ex/KzjlEe+lmr
spKVG7aEc2cutwPmOpqz2cxRmnB/FenPBgEwP8b4s+a9zSMPfDrFeI97+W4Q
AJdJnftvDNwju7MlkJrfah//DlyWSlgnwfnfqwJQL40b693bsotnWkTmHbJP
9ELnS8CloFpsHazP9KP2mc5tyoH7KJSvjIX76e3bS80/7Q9WYp767Xf3Hagz
N4nSE8cNtwN9+nyHtAGdn0f0mPWjM2CfNr3WzIF9+MZW1P+Xb1jpfjg37Ii4
M3yftCfU7z+7xR2uhn334AVSdfI3kzpbNYpD8L1kYX8B1n8j92oUTFsHHNqb
U6LhewpOUbr9mA5d4Lkhw6HRf6CeuyXBVN8h/NUlebF1jPe4rcu/WrCew985
D/h7R8miTr/Tt+rczziuOJgzXnvkbeHcNXeiMoH/aYPR1FwX9Rb5p1kkIH9R
d8pvipXn5nyb78WbT/jT94r/vf4icPA8EYH8R3+i1mtZht0Hbr8l2Z3CvmT2
CvVYEU174HxTJn4r8K9oLkf9rpijAPQifc9U4F9OdIuS8HTYp/L2q3TgH0r2
aXtUHQznxl0W2wg8I7ypfrpwRZ5w3gcP3t6f+F9QaEH+eQeTkb8IuZfDQzUH
4NDIffwH8N+3Mg31CNVi5K+eLHwF/H95chj1SS/zUX/TZ9XI1PMFDej/ptxb
M4A//f8rZyFEnytn6lwHztb07/DtDc5Qj9b7B8j5R666RDpoOXnxCghnWv9w
flsC3Dfd7YkDc32FNi8X+ExdffoMcKb7YKZqJ/rc495m5EzrD4ObbUEP51re
BM7076jhyh9vwz4jhJ/Q5/T6pqHOIXBu2duCTcCNPvf0PfGMaa0evDEkt+j1
2SdEkHOMcjBypvX2lV+Q8y/54jHAmT53X4W4HnBLeLIaedLrr0RPQZ6qUjba
wFOGcDapcEffdj3Iy2D6NjdlDfJMfFSbDHykimypnDeuGrl1tReP/5Nvi5KW
YW50iOxC344kvl04Vxd5Cs+uQJ6LG6j/O6WLbquA20PRA9uB55zLa1Gf9/ZP
zI03L6ORpybRlfw/IM/xgrPIk97ngeAF8uzQFcXcoM99N/wbv6PRgxf0c25M
mYs8o73cLsL68eRek3KnOwKH66prTgFPmgPdB2V92+rgnULn85Po18bxts+y
bawqNr2ZfDFbfSX5vW7JXD7oNTzn+82TL/Lfm1O6efpoXK9gbb0W1i9ToX5X
/H7n3nzQvcSD78F6w2RqLr1LcmaEWfOUGEbO56bo4P4dLYdyYD3tn+NbS4xA
V52i7Ar7VxZdY/WXRoewm4e6ButvKS/BehK1x22F9fQ+q8n6ZMv3qi8YeUi/
F3q0HMvgvUDrvnnGPNgn/esnrP8xOfd/r66GVQ==
"]], {}}, {GraphicsComplex3DBox[CompressedData["
1:eJxdmnlczdn/x28yZRszlqxZGllmmCQmldxja7kYS5KYyr4UJYVmhEGLVJKy
k0qUoqQx96vtnqsoSxttuCkm0qL1tmj/fe4957x/nxn/9Hg8H+9e79f7dc75
dHweH60tey229xEIBL4qAoEq9zPVNf9Lb28vGvvR+8KK8XHCV+/mdPb2qkgt
dauEKQVdqKJEHv/ocQ1ivLG036owuRyZHLF6md63HfiRGNXEAPcSdCh66ZBr
er3ALxyI2BbkXoKT1GJlV3l8+I8Og8LlchyqqTmPr7NOf38U1xcb1Gb2YF5f
czelT3xk8vFpUyLvGzNuTevnkHrMuAbVDyH6wOOon0TiB/ha6v8w8Q+8gs67
gswLfDnNR/2dMh/gLE/HOKOLXJ4S6Dt6T6SjrAfVzjGyaRgQKzRVv2ovE6tI
Owo9hJOyO9Hq+VobyjKqEeMZ+1d9oz9fjv4K1mn/ZuJX4Odqo7+b7CZD851b
b27U6AG+qSzp8jQ3GRaoLN7H5+oObUmcDnYTr97F1/HsvyaC64vnlR383zte
39HjlD5x4IpBG5/1vW/MuBetNyD1mPF+VP8A0QfuRv30CpR+gDtR/4j4B55C
500m8wJvovnsI/kAZ3nuD/6syFPCeBjuu0km7kZSr1qtoLY7wiRdlddiR467
jxf6PulAqSErVLufViHGrw24lPTCuwlNjFHTMp/XBvyu7qodyS5vUa/+DYNJ
X7uA/yR6lSNxeYtNOl+r8XlHjKd9lncTXrHq5Hkznk58yaxQri9GLyc7d/L6
VqcpfeIIt4vn92yNN2b8Pq2fR+ox451UfznRB76A+llC/AA/Sf2rzFX6Bx5E
551G5gV+ieYjI/kAZ3m6/37uBy5PCehsDxktCupC54rCPs/+GCOcuWGnaZC2
itRMK3F+Y2o7+rHH/e6YF5WIcdewsr2b8xpRgLTU3NeqFfgT19aU1U5vUHr3
r1kVbzuBtyRUqa51eoP9W5yu8XltzZBRW/Ia8ZTqlLRTPJ3Se99f5frixekF
00bz+qbsUvrEexeaXJrgec+Y8TJav4DUY8brqL420Qc+4C/ix4/4AR5O/T8h
/oHb03kvkHmBL6D5mJF8gLM8T9gurOTylDDuMVA/X+zYiXZMtYwtzIsWRnhk
P3CUCaRfMtbMtxZ/RefsotcaZH9GjJvrT53cNroRdRSJnbP2tQAvEV8bVmn/
Gnk+bt8Yk9oBXKKpYlhj/xq/rO+rx+dlM0IzOB3c5dFU/4KnM8Cj/gLXF5v+
7fFBn9fXf7DSJz4f/Ns3OxbGGf+3fjGpx4y/p/qdRB/4K+onj/gBnkj9exP/
wIV03j7FynmBf6L5xJN8gLM8fRbVKfKUMH7gfo6/tqgDGf6u7uqWels4Knb2
JFGQQBq8p84Yx7UhAS7qWZtbgRgfn+X01n9rA9pVG3Bp8Olm4M3tixyObi9G
5n635I5h7cBPeY9yOr69GI+qvpLJ5/mOMw6c3tqAC8ZNG8fXmWuVE8T1xcui
9K5Y8vraPVD6xKmf9rnc7blrzLgBrTcj9ZjxAqqfT/SBX6N+RhI/wPOpfxHx
D1yDzutM5gXuT/MZS/IBzvIMnHpVkaeE8e3rFPu6HQ18lmQwOiZK6F90+ay2
iPM/9JTxlKhWtHtC39uuLz8hxivS90ww2VCPClV3SlfdlgMfOL9KOnxzEepv
sfrkLI+vwC0aZkaM3FyEbT/q2vK5r62rmemGenznf7ZL+Tpbf4wN4PriXy9/
sHDh9dVRnr92/M9cn7Km5DvGjG+j9UtJPWbcn+pHE33g26gfG+IHeI0x8T+Q
+AdeSOctIfMC16P5eJF8gLM8zw8yN+TylDBu3c3dQnrbUNlop56kC5FCAfkn
LfvfJOPToS2o+M9Zq8/mf0SMB9d3nnKurUWLx6DKoPQm4NrHzoy8Y1OIskd1
j2nZ3gZcc4PZ61ibQnyzNKOpmcf3lZ2+ua+2FnusDnbj6wR2+flyfbGFX+DA
QF5f8uMrHuB7fbnhHzHGjJ+l9StJPWbcheqfIPrAdaifCOIHuBr1n0P8Az9B
511K5gX+hubTQPIBzvIMaWxW5Clh3DziUqKjrBXdd9B6bONxS1hpkVUiduzF
nraSec0Xm9Gi93YdcYXliPH5Y/2arx77gu7pjvy+sLQRuFH6L04LrQtQQNnt
uIfmrcAr0u2+XWJdgKte2/jw+drNt1VCjn3B62ue3izg6aTkOnhzfbHlEfQ4
ltc375bSJ9YteZD4p360MeOptN6C1GPG11F9a6IPvI36qSR+gI+n/gOJf+A6
dF4xmRf4UZrPepIPcJZnRFG4Ik8J4/NEs1xl4hbkmVxwqmfvTeFL5Tw9eLrq
+nm/BcpR3AL/iKzifxDj1aZjNmYOq0HjzernjuxoAL5GreRx8Zp8ZBFpuejw
9Bbg8T8fXPR2TT7WzW8ax+fG5Wl2T4fVYD2vnpcjeDrVN0QnuL54/d66wy94
fW8sU/rE1jovpmTIo4wZr6H1VqQeMy6k+rpEH/gj6mcm8QPcgPpfQ/wDl9F5
tcm8wKfQfJ6QfICzPGOSV/hyeUogz/pnM0RBzchqkM/KMJsIYeLXbRe0RT04
77bcKM2nCY0OT1xe/eYDYvycS/Szpsgq5GubuXG9RgNwB9GJsU4rX6FhjoIi
NLgZ+KGLp92cV77CB7J9/uJzre3vkuWRVbjfhDm91jydEQenHeX6YpvNIb9U
8fq6NCp94qPHPgQPuh9p/N/69aQeM/4D1Vcn+sBPUT/7iR/gq6j/4cQ/cG86
byCZF/gLmo8OyQc4yzM+rFORp4Txcee3VIgd5egn23kai0Q3hGTfdGO3FQFG
Px5vRF4qn1vUS94jxhdeN5gz3qgSNXwWfjd3cx3wE/7TXPoue4mKZ9+1V21s
Ar5E5dZdtWUvcUrmeBGf9/vcNmqCUSWW7su31ufpLBapH+L64k1rltep8fou
uaj0iSNftQnWON0yBk7r7Ug9Zrw/1ZcQfeBrqJ9k4ge4A/X/mvgHPpvO20nm
Be5C87lM8gHO8nzodVuRp4TxwfM6Q7VFTagztu5t+S/hQt/r3SuDtLuxZvM0
o8A/GtD79GnCZSlliPGaZ5nXRdkV6Nnwervki1+AX87NeXrFNA9d6ljXnZHf
CPzb3SkfrpnmYZW0B6V8/mXX0INLsyuw4y3hX0k8nb2aFQe4vviJb+uvIl7f
4fOVPnGW9mCny9NvGjPuTOsfkXrMeC3V3030gY+lfgTED/AT1P9l4h94GZ03
n8wLfBTNR+2xMh/gLM9Uh7UyLk8J44IPweuDtBtRbk94mNcPYUJX5fnswidn
n3StK69DiZ4egd7Sd4jxSy1W/Q9s+oRuLQyNQznVwLdOrhZu8cxBNo9Uz/qK
G4Dfj476eYdnDjZPWbqfz/OrZ+RzOnjcm+hv+TqGZafKub44x8kSe/L6Vvyj
9ImbD2rLyipvGDNuROufk3rMeAHVH0v0gT+nfsyIH+AG1L8t8Q/cn857j8wL
/CjNp4TkA5zl+WRln3AuTwnjTd4zhgkEDcgkNCZrxfjrQpslF/oLBF248GiK
S0rBF3TWpPSfR49liPElWhWuYfJydNxpZU963yrg5+7ofwlwz0LC7zeKrunV
Azc9UnQxyD0Lj3N8NIzPk/aY6YbLy3H2II1d/9LxMpNxfXGxRYKulNf3oY/S
J9Z8ZmQ+JTLcmPHztD6f1GPGk6n+C6IP3I760SR+gO+h/hcQ/8AN6by+ZF7g
2TSfBJIPcJbnZXu7bC5PCeOvUib5d0f0oJ3rri7f2C5D/k07ExxlKlJxRugz
7j6CvPw3/RF6LlbIuPqoRvVtQV9RRrHegj2X5FDvmVf1TY5JDWqbnmTdsKoL
+GiH6dzvh0gsnhE9xp06LONzTWrwmqHfNtXz6uMTD1/l9PGiJJ2Tu3n6+qIs
KecTf9OVdv83nk/GuzqVHDOeQHUWEB3gLrSvBekL3N5opjvPJ3AnOlc3mQt4
z0iSQz7JAXguzfM8yRP/N8/GiUMOcXlKoG/a7FlfpjYg/x1Wop4/s9HnMbpX
tUVd+OvsTfqiIO7/oSva1GJnhQoZn390WO2xqio0r8OsfGDMR6hffG3GxfC0
EuSt6a9hVVILfIgp5n7/jMT6F6LH+NNJb60j0krwNVOT6LW8eoMdd3yOV1Vh
HZsZE/n63vfalnM+caZk6uEOnk/GJYRjxo2ozgyiAzyL9r1K+gJXNyzrx/MJ
fAady5/MBVyP5mBOcgC+i+aZSvIE3nSp6etV7py3bo10PMedM7b/0/RKpYr3
9c+tXY3OuZfAe/i51T31aX3b0ZGsKw7hcjnwIfL7kxXv65vFiTLFe3HG7Z6v
uqA4V9sPkvfijBd9elcsfVyDtR7ouPLrw3819Fa8Zw/yNIwL4+l/fe3eqnhf
nxuYHxDI88N4BuHwHj6C6gQSHeBvad+JpC/wM522l3g+gXc2kbk6yFzAf6Y5
+JIcgGOaWzvJDXgLzTmT5AzPydI3bZqK52n2978HcM8/4D+tu7YOc8/TM2qn
v0vlnluM+3jt5577ARJT8nwF3rn8aX/Fc01FtU9UCq/eSqj3l+I5eCZzxKsw
nr4fCtRRPDdnn1dLC+T5YfwnwmE/WFOd00QHeC/tKyB9gaeKj+fwfAIfTuc6
T+YCXkBzeEtyAM7Oe6DnfXXuvEvYvs0xt/fN8ehFlsXa2+buykIzd+UUiWtV
pI15cT888u5GYZY1zi3Nb5FAM2eiKEhFGuVaODcytg2tq9tSo/JPE3B7v/UZ
NWbVqFsj2WKdqBN4QPR74cLj1yTT9xp4cPd14KGTFm+uNavGf+c8q7fi1Wed
Vc3g9HH45NGGfP2EHx3Xcn6w06vwtkaeH8Z3EI4Zz6E6oUQHeATt+4D0Ba75
8OUCnk/glnQu1RHKuYCH0By2khyAZ9E8E0memOVZR/PMInlC/dK421emmTSi
sXvEglc+uagnc6vEUdaFNxjUbVfcz9baq03exd2D2L2lJ2Pp6a6EGjQm+7P/
+xEVUH/9h5mpQu7edqd8pMFB7n7E6v+Y8uuIHZJS5G7uq+VTUw/1Gz+kFHlw
97njen5j67l7E6sP3hqTOuduoOTPM5mHZeJGqF+h6sXdRwMle8i9D+p3vuxu
3Skpxa+zX8Se5Olf7qiJ8uLuYfN8fe7U8fQF4pDZ3Qk12NlrXUoZz/+4AG07
xX0ur2Gh0wGe/wG5Vg+5fLB8iENDNi8fcxR1QnEvtKs019/Gy4fVV5N6/N96
S1IP98M+1I8T8QP1E6ifHOIH6vfQeYvIvFAfQuc1JPNCfd74bAkvT6iPsb0e
zssT6jfT9TpO1gvqzeh6+ZD1gno53Q/TyH6A+mC6HxLJfoB6c7rfVpL9BvXW
dL+dJPvt//3vnhpeq9OAOtS3HkyfkYpuzNxqEaTdhXMp39JPyTHjRiGGv8nE
vWjVQ7m625tYIdv/va4dS5dJG9AAM9Wl+XoS9LNad7nYkfv7+0bLVXE/mPQp
3vAm93eYPZfEeiYeXq/qUbr0SoCuSRHU34ndt6rZ7wsq6L/f8lP9B+COftcl
A7j7xFBrtyLuXgA6fYYLLtcXfUY3hy6MbOB+svqVo/oP/cj9/l6rfmNbOD3G
D+0KPP+Vu3+k3HyzQfF3nulMiM7AP3M+zlT1U/HmfLH62QaVBzO5eV6ELtuk
mA90huEtXdz9wCFRA/F1Hi3usM7Vk2AvDw0Lfv34pJ7rM02K8EjNWbFePP2M
6UnHFfePZpcyI/5ckd91VnL+cZFxe3Azz78GPracmxPrO0ib6nnzbk/YVaa4
D73cpPr7DV7Ou58fK+Z+Hx8efuLIR16ef6uOK+Z8YIOELfd0ePnn0PuTeti9
IR5mN4whnyDd9dw8+KmwcecL3voyLiYcM76D+skmfuAeJaZ955C+UL+H+jxE
fALPpPk0kXxAZwTN4ReSA9RH0dwKSW7Ag+l62ZP1Ap2pdF00yLpAfcu/1xH4
arp/Usn+AZ3Suf/aJ1A/kO6rYLKvgG+m+3ks2c+gs4ju24Nk30J92zCyz+PJ
PgeuTc+XKTlfoHODnqNyco6gPoGeuzfk3AHvoef3ADm/wMuzLDYeyepFRz4P
Wp8cnQX3NJdc90tHsurR/sog/+ToFLgXHbDNuKktakAabSeru6OuS9hz4xPV
GUl04F76wdR+neI7DFWrdLuf3GTwfUWxSfkExXcYg8ufa8ydLwfeGqtVUZJR
jdrDkgoV3zswnt9fzaZhQIhEqEm+d2Bc7bssn9KMauzhXOPMr0+dLI1XfD/R
WD9pkz5Pf3+ipp/iewvDnQkFU3h+GNclHL6vwFSngegAH0D7niB9gS/6Q2DH
8wn8A52rl8wFPJvmMJbkAJw9h+M/3+rHPYcl7DlcSvPUJXlCPVsXWWteFbcu
QrYuznQd35J1hPvk/wGTxEO1
"], {
{RGBColor[0, 0, 1], AbsoluteThickness[2], EdgeForm[None], Specularity[
GrayLevel[1], 10],
StyleBox[GraphicsGroup3DBox[
TagBox[Polygon3DBox[CompressedData["
1:eJxNmXecVsUVhu9YYuwFe0fEggZFkCLIAosUFZa2AsJSliYILEVQkaI0xZpY
YosRYkksUWM0gkYjGsVeE4waoyYGu4mJBghKcp6d5/4+/zg77cw578w9M+ed
b5vWNwyYukVRFPfHny2j/GsI7V1D/h6yVUiTkA+KPL5bSMeQo0KODvk0ZLuQ
fUI+DPleyB4hH4VsE7JnyLqQrUN2D/ksZPuQfUO+CNkxZP+QZinPOxS7Uf8y
yn+G/CNkp5ADQj4P2SFkv5CDUsZ4MJIyrqYhH4d8P2SvkENS9tmMsZTXcUjI
JyHbhuyNv5QxNkdSnndYSCvtod8iZYys+YiUsR+JpIylBWMpY2RPjnMefn8Q
/QdShhwrXux2Upf+1uqy9g7axuZhKWM8POR4MYKtjbq0D095748Iaes4+ieU
uELaO47ddo7TPoZ9FFPnkJb2jQjpG1IT0kXc7EdP52Ovq32stZsl6+guPvCe
ZAmuascZG6Qe4720x7pPFjfxdYol+9Tb8RPEBdYq8VWJsZ8luHroE6wDxIf/
/o7THmgfOGrFwrzjYj9XRrkmZIj48D/Y9dMeqW98DnUc7Kdbgv007TGnLqSP
2IeHnGq7yv1mf0dpD4wTtYu9se4XGMeIm/ZodVnfOMfxOd4SvPWOM+cM14Pd
CY4PEceJ7umZIcPEOEXcxMI08eGzwfXTvj5kWcjFIbP1je0Z+gbvTEvWMV0b
jJ2tLrjmhEzS/wXqYWNuyGSxnOc47XOcxz7Nc3xqyHxLMJ6lT/bmfNeA3QWO
057lOLgX6hO8iyyxcbl2F7jWc8W71DWzjgstz3Ev5oj3Cufh/xL7WNNl4i7x
jnBPf6gue/BjfWB7sVjAe6VYwfgjdWkvcRxMVznOvOtCLhL7Neph92rHl7in
fHO+9w2uAbwPh9wZclfIT90L1nSTa6B9o7qXhtyqXfwsdz1gXGEJ9pu1wdht
6rLWX4iVmLpXveX6v0E/dzhO++ch1zrnLsd/EnK3JRh/pk/24x7XgN1fOk77
FsfBfZ8+wfsrS2z8VrvMe0jf4H3ANbOO34Tc7thKx8H7qPPwv8o+1vSIuEu8
l7qnj6nLHrRM2e5TIfeLBbyPixWMv1OX9q8dB9Nqx5l3bMq4nw55Uj2wP+E4
7ZNDZ1nIv6PeJmWsz4S0TxnrcyGdUl7PCyEnpLwvzxc5z5LvyK+9UvbxWkiX
lPG9FNItZdwvh3ROeZ0vhtREvW/Iv6JeG+WgkK+jPinKiSHfRH1YlKeHrI/6
kCgHh/wn6gOi7B/yVdRHRFkXsiHqo6McFbIx6t1T3otXQiZEfXzIpqiPjXJM
yH+j3iPlvXg1ZErUJ4d8G/VpUTaEbC4yZ4AbwC3gRfAN+NDfisyZdikyR4KT
wJ/WuR/wJzgSeRzOAUeCk8CH4CpwD3gS/KdZUeFI5HR4FdzmYO3OjPqMkP8V
mTvBPeBD8CI4CbxqFjwkpEiZO8Fb4Fjwn6bihjsdJGY4FrwFjgVng4PB4eBF
h9ouczm5Ek5ymHuBDfIXvAEecrjrhCMd4RrgTi3ECkc6SkxwpyPFTR+5nvzO
Wo/VLjEFr4BnsDetbTe1D73m4oNXgKutbbC0sw0HO9p14hMuUXKi9uq10D9j
6HYSU9uU78Fn9delqORtys766OEegaureiU36uoeoXuiWNnLkhNVqwf/bG5M
gKmndplPru9XVLhRyZUoe7uOXs7BB3n9VH32td1B3V5FhTOVHKpGPXAM0B+4
BtoG7yDbYIJj1DqH/FWn78GO4WOI7ZIbDRUTuWaYWIaqRz4+v8j5EiwjtQsO
OMMocdTb7mffSHGR68eIaZztkg+Nc/11+sYf/KHkQRPUA8tEx8AH35jknMm2
R4m1QXzk7yniaLANvunqgYPcPVMcs2yX3KjkSjOcM9CxejHNdk6DezNfTHCM
c8UK7zjb9U35Dtbz1KM91/YEdWcXFc5Ucqh56p3kPg4S0wV+m5IbLRQT3KHk
JosdYz657BJ9LFWv5ElLXetC7YIPvlFyK8qLxHqJY+C6TLvMhy9c43x4Rcmb
KK9wTZc7Bz9Xqge+q2wvUPdy8WGv5ERXq3ep65knJrjGtWKCg1zvfHjETeqT
y2/U90228XOzevgmj6/Qxy22S5603HUsd84y/Vwnrludg214xd2OwTdKTkR5
u/t343ew3qEe7Ttts+7btFvyp5JP3aUeuO/RH5jutQ3G+2yDCR5R8hRK+McY
8+3b2uIuXSU+uM2D4n3INjge0Bb+H3EOvuEecA540e+di284RsmbHlPvbnUf
EePj6oFptW32YqW+8QdvKTnRE+rdIV704FFPiZN34tPOhT+8oj4c6Xl9w52e
FT986TnxwH9eECd86VX9wZdedA3wlpfF2US+80aReRocDb5UJ8d5s8icbY04
+8uh/lhkbgU/+kORc9kzrmeQNtcWmSvBg94qMs+CQ/2pyDxrvX7hby+5h+Pl
ZX8O2UmeAceYIe94r8i8CZ7ybpF5HHzqnZCtUuZPcKc5KXMnuM2pUT8wZT5F
uYVjc9WHS81LmVfBkbZNmZPBx+anzKsauYt1+NXW6sPBtkmZ38BtFlgnz26Z
Mm+Ds52fMidr5HnW4WbnqQN3ukC/8JztUuZ28LqdU+ZS8KjFKXMyOM+ilPkc
PGcH++FpO6bM4eBvFzmX34mW2A9HWurewlsmy0P/UmTdL9UfGP2t/d4LxQPv
2kVOzXfvE/VjbG8vnu3sJ5Y4S7tpg3jY1ZghfvpFvZXt06I83rgZGmU746NG
+5yN4VF2MIb29uwTJ3vYR6yOjHpHY7c+yhONv70suSv2dJyY3GibuWdE2dX4
OzPKamNrX0v2Zx/Hibf93DficHrUexqX+1sSq+OiXiXWU6JMxvFZIb2tF/aj
3/gbacox84ExRDx/ZJwRM+uMP+LwQ+OS2PvY2CJuP/N7EA+fGx/Ew6fGFt/o
E2OdGJsa5Umu5wtjiHO3wf3lzJ6d8h3B95+d8m+pO3uGOHucha/8xsTG1357
vnXjb60pxzDfdfeUzz7fmztorX2M4av8Znyjb9x3vvVm951vUX4bvgXvBd4e
BxeVb8B3OSflfT/Ab0DcEAPlXcB+n+v9wKfg3sAO7xfOJm8k7hDeK7xb4NDc
FbxLuTeaFvn9w3sC3+jTRxsd3hbcIbzBuFu4c9DnvHNXYJO7BT108MO9Tz4g
F3BvwN25T7gfeCNxh3D2eQvt49nkjVT+nkud90ejpPwu4ezzXip/U6bO26j8
rZk+7hbq3Cflb9a8e7greF9xb7T0PHKudzYGuDMuLOOhyHPACRbuH95I5e/X