-
Notifications
You must be signed in to change notification settings - Fork 0
/
bitcoin-energy-estimates.nb
3601 lines (3469 loc) · 190 KB
/
bitcoin-energy-estimates.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 13.2' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 194708, 3593]
NotebookOptionsPosition[ 184306, 3403]
NotebookOutlinePosition[ 185369, 3435]
CellTagsIndexPosition[ 185326, 3432]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["Bitcoin Energy Estimates", "Title",
CellChangeTimes->{{3.867944977772716*^9, 3.867945004236833*^9}, {
3.872352089324554*^9, 3.8723520976389637`*^9}, {3.905776470535832*^9,
3.905776473153373*^9}, {3.905777909963029*^9, 3.9057779379474487`*^9}, {
3.906845118558321*^9,
3.9068451207219877`*^9}},ExpressionUUID->"0b0033a7-0084-44b0-9f80-\
7401799657bf"],
Cell["\<\
Estimating the energy use of the Bitcoin network using various approaches.\
\>", "Subtitle",
CellChangeTimes->{
3.905777353414194*^9, {3.905777390614696*^9, 3.905777391188642*^9}, {
3.90577758710706*^9, 3.905777590294531*^9}, {3.906845144632416*^9,
3.90684517286344*^9}},ExpressionUUID->"87823935-58c7-4827-93dd-\
f264aec73844"],
Cell["\<\
by Steven Black
Project home: https://github.com/StevenBlack/bitcoin-energy-estimates
Updated: October 21 2023\
\>", "Author",
CellChangeTimes->{{3.905777574354085*^9, 3.9057776095003443`*^9}, {
3.906845135777499*^9, 3.906845135974537*^9}, {3.9068453900171347`*^9,
3.9068454087241898`*^9}, {3.906845467835717*^9, 3.906845489125195*^9}, {
3.9068457431583557`*^9, 3.906845766241835*^9}, {3.906845802699437*^9,
3.906845804542233*^9}, {3.9068458567547827`*^9, 3.906845888778882*^9}, {
3.906845970587805*^9, 3.906846027203187*^9}, {3.9068942272836647`*^9,
3.906894227388843*^9}},ExpressionUUID->"77d38b73-4d8c-447e-aba6-\
1272cf044ad4"],
Cell[CellGroupData[{
Cell["Introduction", "Section",
CellChangeTimes->{{3.90577755516473*^9,
3.905777559179048*^9}},ExpressionUUID->"36c2f196-7eaa-49d4-b4e0-\
b34337b9fdc0"],
Cell[TextData[{
"Bitcoin mining uses a Proof-of-Work consensus mechanism. This is \
controversial for some because that supposedly requires a lot of electrical \
energy. We see claims the bitcoin network \[OpenCurlyDoubleQuote]",
StyleBox["uses as much electricity as a small country",
FontSlant->"Italic"],
"\[CloseCurlyDoubleQuote], or ",
StyleBox["\[OpenCurlyDoubleQuote]requires as much electricity as Belgium, or \
Chile.",
FontSlant->"Italic"],
"\[CloseCurlyDoubleQuote]"
}], "Text",
CellChangeTimes->{{3.8722002115791817`*^9, 3.872200278351385*^9}, {
3.872204177238058*^9, 3.872204177455768*^9}, {3.872352186422783*^9,
3.872352406721033*^9}, {3.8723526854046373`*^9, 3.872352741452697*^9},
3.872352874779821*^9, {3.872353036993587*^9, 3.872353039352726*^9}, {
3.906846038666533*^9, 3.906846073456032*^9}, {3.906846739982213*^9,
3.906846744340022*^9}},ExpressionUUID->"40c4bc11-8483-4836-8bc8-\
cc2a0c2eea49"],
Cell["\<\
This study assessed those notions using the following approaches: \
\>", "Text",
CellChangeTimes->{{3.8722002115791817`*^9, 3.872200278351385*^9}, {
3.872204177238058*^9, 3.872204177455768*^9}, {3.872352186422783*^9,
3.872352406721033*^9}, {3.8723526854046373`*^9, 3.872352741452697*^9}, {
3.872352891430498*^9, 3.872352893754945*^9}, {3.906846104554734*^9,
3.906846124816537*^9}, {3.9068465115572844`*^9, 3.9068465168875713`*^9}, {
3.90684675585684*^9,
3.906846760220496*^9}},ExpressionUUID->"39a3def9-d178-4cd0-a58e-\
4734b8915ccc"],
Cell[TextData[StyleBox["Presuming Bitcoin mining is marginally profitable, \
how much energy can be used compared to actual mining rewards over time?\
\[AliasDelimiter]",
FontWeight->"Bold",
FontSlant->"Italic"]], "ItemNumbered",
CellChangeTimes->{{3.906846214342043*^9, 3.906846227210102*^9}, {
3.9068462751866407`*^9, 3.906846320441081*^9},
3.906846432666252*^9},ExpressionUUID->"74022fd2-98aa-426e-a521-\
b5e08b79c240"],
Cell[TextData[StyleBox["Given the reported hashrate, how much energy would be \
required to achieve that.",
FontWeight->"Bold",
FontSlant->"Italic"]], "ItemNumbered",
CellChangeTimes->{{3.906846214342043*^9,
3.906846271895849*^9}},ExpressionUUID->"a2037b4c-12c5-4470-a75d-\
b937b32bb34c"],
Cell[TextData[{
"This paper uses ",
StyleBox["Canadian dollars",
FontWeight->"Bold"],
", partly because that\[CloseCurlyQuote]s my fiat currency, and because \
Canada publishes particularly good statistics about electricity generation \
and costs."
}], "Text",
CellChangeTimes->{
3.9068465485513477`*^9},ExpressionUUID->"97dd62d2-5082-4d17-a9c7-\
ac2fc98941d5"],
Cell[CellGroupData[{
Cell["Bitcoin price, block rewards, and fees", "Subsection",
CellChangeTimes->{{3.872200295050864*^9, 3.872200321521886*^9}, {
3.9068945151570997`*^9,
3.906894517092558*^9}},ExpressionUUID->"157f8dba-b966-4b61-bcda-\
4eacef53f959"],
Cell[CellGroupData[{
Cell["Bitcoin Price", "Subsubsection",
CellChangeTimes->{{3.872200332718585*^9, 3.872200355987261*^9}, {
3.872353183964841*^9,
3.872353212586706*^9}},ExpressionUUID->"75e313ab-070c-4c6d-9a03-\
5bc80c2cd973"],
Cell["\<\
For the purpose of discussion, what is the current price of Bitcoin in \
Canadian dollars?\
\>", "Text",
CellChangeTimes->{{3.872200907449275*^9, 3.872200924991829*^9}, {
3.872353219043429*^9,
3.872353227684737*^9}},ExpressionUUID->"5c4c34a2-1024-475a-b211-\
0eb89aaabb9a"],
Cell[CellGroupData[{
Cell[BoxData["Now"], "Input",
CellChangeTimes->{{3.872353322670504*^9, 3.872353347848229*^9}},
CellLabel->
"In[717]:=",ExpressionUUID->"32e8528b-1e38-4f7d-a2c8-e7ef31134baf"],
Cell[BoxData[
TemplateBox[{
RowBox[{"\"Sat 21 Oct 2023 15:42:33\"",
StyleBox[
RowBox[{"\"GMT\"", "\[InvisibleSpace]",
StyleBox[
RowBox[{"-", "4"}], NumberMarks -> False, StripOnInput -> False]}],
FontColor -> GrayLevel[0.5]]}],
RowBox[{"DateObject", "[",
RowBox[{
RowBox[{"{",
RowBox[{
"2023", ",", "10", ",", "21", ",", "15", ",", "42", ",",
"33.087592`8.272240142025346"}], "}"}], ",", "\"Instant\"", ",",
"\"Gregorian\"", ",",
RowBox[{"-", "4.`"}]}], "]"}]},
"DateObject",
Editable->False]], "Output",
CellChangeTimes->{{3.872353336699769*^9, 3.872353349593096*^9},
3.872353549529344*^9, 3.872353666151462*^9, 3.8723537429239063`*^9,
3.872353841392771*^9, 3.872354003415637*^9, 3.872364125196741*^9, {
3.872365569669506*^9, 3.872365586633322*^9}, {3.872366642031451*^9,
3.872366665477861*^9}, 3.87236678515415*^9, 3.872367746631295*^9, {
3.872368062425282*^9, 3.872368108580113*^9}, 3.8724203600596447`*^9,
3.87242071263096*^9, 3.8724216629999933`*^9, 3.872421712817121*^9,
3.9057763975710087`*^9, {3.905776722025419*^9, 3.9057767509730787`*^9},
3.905776795983164*^9, 3.905777654600387*^9, 3.905777833119231*^9,
3.906846606420701*^9, 3.906846658061812*^9, 3.906889047638817*^9,
3.9068910810753736`*^9, 3.9068911303378553`*^9, 3.90689410943181*^9,
3.906894239017219*^9, 3.9068943960609426`*^9, 3.906902542388558*^9,
3.90690323784181*^9, 3.9069050788809843`*^9, 3.9069051451217012`*^9,
3.9069060060154133`*^9, 3.9069061531218348`*^9},
CellLabel->
"Out[717]=",ExpressionUUID->"cdb40a5e-1ce6-403f-ba8d-60a19705f730"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"BTCPrice", " ", "=",
RowBox[{"CurrencyConvert", "[",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<Bitcoin\>\""}], "]"}], ",",
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<CanadianDollars\>\""}], "]"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.867945010977051*^9, 3.867945066732808*^9},
3.867945529643566*^9, {3.8679455681139803`*^9, 3.867945571087926*^9}, {
3.872175702094274*^9, 3.872175721171505*^9}, {3.8721776432763977`*^9,
3.872177662515436*^9}, {3.872177696459244*^9, 3.8721777075401297`*^9}, {
3.872177770069901*^9, 3.872177815911392*^9}, {3.872177927374888*^9,
3.872177929877388*^9}, 3.87217898489017*^9, {3.872179427324573*^9,
3.872179562219779*^9}, {3.872179898365912*^9, 3.872179899373905*^9}, {
3.9068496418099213`*^9, 3.9068496607003603`*^9}, {3.9068498349996862`*^9,
3.906849885054541*^9}, {3.906889094474126*^9, 3.90688914453406*^9}, {
3.9068892251304903`*^9, 3.906889252338866*^9}, {3.906889458245554*^9,
3.9068894751828012`*^9}},
CellLabel->
"In[718]:=",ExpressionUUID->"3fb3a0ac-a1ae-47c2-8be3-a3f977ba7b29"],
Cell[BoxData[
TemplateBox[{
InterpretationBox[
TagBox[
InterpretationBox[
StyleBox["\"40\[ThinSpace]885.41\"", ShowStringCharacters -> False],
40885.410562450685`, AutoDelete -> True],
NumberForm[#, {Infinity, 2}, DigitBlock -> 3, NumberSeparator ->
"\[ThinSpace]"]& ], 40885.410562450685`, Selectable -> False],
RowBox[{
FormBox["\"C$\"", TraditionalForm], "\[VeryThinSpace]"}],
"Canadian dollars", "\"CanadianDollars\""},
"QuantityPrefix"]], "Output",
CellChangeTimes->{{3.872179547147986*^9, 3.8721795631489353`*^9}, {
3.872179881057475*^9, 3.872179900894781*^9}, 3.872180059002411*^9,
3.872180174613902*^9, 3.87218034655786*^9, 3.872180399743845*^9, {
3.872180489837356*^9, 3.872180518227664*^9}, {3.872180574517989*^9,
3.872180599860121*^9}, 3.872181566610065*^9, 3.8722014282912188`*^9,
3.872201529572702*^9, 3.872202247803402*^9, 3.8722028565837507`*^9,
3.872203029605014*^9, 3.872203291443532*^9, 3.872203435697515*^9,
3.8722036410487347`*^9, 3.872348649930505*^9, 3.87234934762372*^9,
3.8723497298921967`*^9, 3.8723535501421413`*^9, 3.872353666612692*^9,
3.872353743489957*^9, 3.87235384199044*^9, 3.872354004034265*^9,
3.872364125667639*^9, {3.872365570107633*^9, 3.872365587071704*^9}, {
3.872366642520145*^9, 3.872366665959112*^9}, 3.872366785607078*^9,
3.8723677471164227`*^9, {3.872368062888616*^9, 3.8723681090310707`*^9},
3.872420360692403*^9, 3.872420713091917*^9, 3.8724216634805603`*^9,
3.872421713235683*^9, 3.905776398394411*^9, {3.905776722576435*^9,
3.9057767513845863`*^9}, 3.9057767964215603`*^9, 3.905777655140902*^9,
3.905777833611272*^9, 3.906846607353636*^9, 3.9068466584534883`*^9, {
3.906849650178525*^9, 3.90684966165621*^9}, 3.906849854741045*^9,
3.906849888188058*^9, 3.9068890480275*^9, 3.90688910047323*^9,
3.9068891347225437`*^9, 3.906889253395599*^9, {3.9068894614099007`*^9,
3.9068894761384583`*^9}, 3.906891081483329*^9, 3.906891130730262*^9,
3.906894110247445*^9, 3.9068942396061773`*^9, 3.9068943966489162`*^9,
3.906902542897366*^9, 3.906903238243601*^9, 3.90690507942281*^9,
3.906905145660955*^9, 3.9069060064556723`*^9, 3.9069061535176086`*^9},
CellLabel->
"Out[718]=",ExpressionUUID->"4658f2ef-010d-499e-b99d-55b6f46db807"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Bitcoin Block Rewards", "Subsubsection",
CellChangeTimes->{{3.8722004733702793`*^9, 3.872200482811454*^9}, {
3.872200526327029*^9, 3.872200526744816*^9}, {3.8723533728560047`*^9,
3.872353374624206*^9},
3.87235356780971*^9},ExpressionUUID->"ab2515d9-56a4-4cad-b524-\
cfcb7c973883"],
Cell["\<\
Bitcoin miners are compensated with the block reward for blocks they \
successfully mine, plus all the transaction fees in that block. In the \
current epoch (2020 - 2024) the block reward is 6 1/4 BTC.\
\>", "Text",
CellChangeTimes->{{3.872200953524349*^9, 3.872200980916397*^9}, {
3.872353383949301*^9,
3.872353447243699*^9}},ExpressionUUID->"be653ded-db7f-4291-8f0b-\
66e123ca9b99"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"blockreward", " ", "=", " ",
RowBox[{"Quantity", "[",
RowBox[{"6.25", ",", "\"\<BTC\>\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.867945010977051*^9, 3.867945066732808*^9},
3.867945529643566*^9, {3.8679455681139803`*^9, 3.867945571087926*^9}, {
3.872175702094274*^9, 3.872175721171505*^9}, {3.8721776432763977`*^9,
3.872177662515436*^9}, {3.872177696459244*^9, 3.8721777075401297`*^9}, {
3.872177770069901*^9, 3.872177815911392*^9}, 3.872177927374888*^9, {
3.8721779792077703`*^9, 3.872178009265314*^9}, {3.8721804819052963`*^9,
3.87218051382423*^9}, {3.8723679819070473`*^9, 3.8723680120941896`*^9}},
CellLabel->
"In[719]:=",ExpressionUUID->"a8b28038-de56-4efe-8a0f-46409725fb5d"],
Cell[BoxData[
TemplateBox[{"6.25`",
RowBox[{
FormBox["\"\:0e3f\"", TraditionalForm], "\[VeryThinSpace]"}], "bitcoins",
"\"Bitcoins\""},
"QuantityPrefix"]], "Output",
CellChangeTimes->{{3.87217828149207*^9, 3.872178285286975*^9},
3.8721783974204683`*^9, {3.872178429976409*^9, 3.872178450130685*^9},
3.8721798811348*^9, 3.872180059092657*^9, 3.872180174703171*^9,
3.8721803466408978`*^9, 3.872180399831746*^9, {3.872180489915594*^9,
3.8721805183024883`*^9}, {3.872180574605329*^9, 3.872180599937229*^9},
3.872181566695648*^9, 3.872201428352737*^9, 3.872201529637038*^9,
3.8722022478651857`*^9, 3.8722028566441317`*^9, 3.872203029660158*^9,
3.87220329151482*^9, 3.872203435769744*^9, 3.872203641114949*^9,
3.872348650429689*^9, 3.8723493477136087`*^9, 3.8723497299676237`*^9,
3.872353550201269*^9, 3.8723536666743727`*^9, 3.872353743557172*^9,
3.872353842063965*^9, 3.872354004105845*^9, 3.872364125739851*^9, {
3.872365570182575*^9, 3.872365587140711*^9}, {3.87236664259474*^9,
3.872366666026868*^9}, 3.872366785684207*^9, 3.872367747193468*^9, {
3.872367986114223*^9, 3.872368013067444*^9}, {3.872368062958517*^9,
3.8723681091000767`*^9}, 3.8724203610051928`*^9, 3.872420713139542*^9,
3.872421663524879*^9, 3.872421713276129*^9, 3.9057763987157173`*^9, {
3.905776722589282*^9, 3.905776751394207*^9}, 3.905776796432247*^9,
3.905777655154037*^9, 3.905777833624021*^9, 3.9068466077053633`*^9,
3.906846658464624*^9, 3.906889048042273*^9, 3.906891081492799*^9,
3.906891130743449*^9, 3.906894110262542*^9, 3.9068942396153917`*^9,
3.9068943966697206`*^9, 3.9069025429133*^9, 3.906903238260221*^9,
3.906905079439068*^9, 3.9069051456783123`*^9, 3.906906006469949*^9,
3.906906153533709*^9},
CellLabel->
"Out[719]=",ExpressionUUID->"4aa39e86-4ae5-40cf-b620-7a8c4ea4bb8f"]
}, Open ]],
Cell[TextData[{
StyleBox["ASSUMPTION",
FontWeight->"Bold"],
": the average of transaction fees per block is 0.08 BTC."
}], "Text",
CellChangeTimes->{{3.872200991626459*^9, 3.872201027133548*^9}, {
3.8723535765994577`*^9,
3.872353594333736*^9}},ExpressionUUID->"05c2a238-804a-421e-a68e-\
e84e4a447741"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"blockfees", "=",
RowBox[{"Quantity", "[",
RowBox[{"0.08", ",", "\"\<BTC\>\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.872178260213952*^9, 3.872178275229604*^9},
3.8721784469174643`*^9, {3.872179588534163*^9, 3.8721796080232763`*^9}},
CellLabel->
"In[720]:=",ExpressionUUID->"eda0fec8-ce22-4e54-b9da-d5ac1ff7b032"],
Cell[BoxData[
TemplateBox[{"0.08`",
RowBox[{
FormBox["\"\:0e3f\"", TraditionalForm], "\[VeryThinSpace]"}], "bitcoins",
"\"Bitcoins\""},
"QuantityPrefix"]], "Output",
CellChangeTimes->{
3.872178397435998*^9, {3.872178429992456*^9, 3.872178450144425*^9}, {
3.872179592737873*^9, 3.8721796092769012`*^9}, 3.872179881158087*^9,
3.872180059116317*^9, 3.872180174726984*^9, 3.872180346657473*^9,
3.872180399848503*^9, {3.872180489931572*^9, 3.8721805183197517`*^9}, {
3.872180574621543*^9, 3.872180599953766*^9}, 3.872181566711892*^9,
3.872201428363155*^9, 3.872201529647064*^9, 3.872202247874875*^9,
3.87220285665339*^9, 3.872203029670273*^9, 3.872203291525198*^9,
3.87220343578193*^9, 3.872203641129435*^9, 3.872348650457868*^9,
3.8723493477550993`*^9, 3.872349730012184*^9, 3.87235355026127*^9,
3.8723536667423553`*^9, 3.872353743632414*^9, 3.872353842138545*^9,
3.872354004180387*^9, 3.872364125814623*^9, {3.872365570255507*^9,
3.8723655872149763`*^9}, {3.872366642671123*^9, 3.872366666099927*^9},
3.872366785759717*^9, 3.87236774725255*^9, {3.87236806303804*^9,
3.872368109178144*^9}, 3.8724203610313377`*^9, 3.87242071318997*^9,
3.872421663574844*^9, 3.872421713324851*^9, 3.905776398776402*^9, {
3.905776722637024*^9, 3.905776751440628*^9}, 3.905776796460948*^9,
3.905777655204002*^9, 3.905777833657009*^9, 3.906846607760539*^9,
3.906846658488966*^9, 3.906889048074745*^9, 3.9068910815111523`*^9,
3.906891130790235*^9, 3.906894110299111*^9, 3.906894239643269*^9,
3.906894396706078*^9, 3.906902542961178*^9, 3.906903238306703*^9,
3.9069050794918127`*^9, 3.9069051457192307`*^9, 3.906906006504524*^9,
3.906906153573371*^9},
CellLabel->
"Out[720]=",ExpressionUUID->"b2171ae9-82f2-4a06-9b4c-4432cdd57576"]
}, Open ]],
Cell["\<\
Therefore, the total Bitcoin paid to miners for an average block, denominated \
in Bitcoin.\
\>", "Text",
CellChangeTimes->{{3.872201032938301*^9, 3.872201073690216*^9}, {
3.872201167481083*^9, 3.872201171101075*^9}, {3.872353606467643*^9,
3.872353607639847*^9}, 3.8723678866445427`*^9, {3.906906135774954*^9,
3.906906147214425*^9}},ExpressionUUID->"e9adbc14-bdca-4df6-ade5-\
dbe6339dea06"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"blockRewardPlusFees", "=",
RowBox[{"(",
RowBox[{"blockreward", "+", "blockfees"}], ")"}]}]], "Input",
CellChangeTimes->{{3.872178392871471*^9, 3.8721783928789167`*^9}, {
3.872178425791071*^9, 3.872178443351439*^9}, {3.872178495349441*^9,
3.872178517223116*^9}, {3.8721785574329767`*^9, 3.872178558910213*^9}, {
3.872178601624052*^9, 3.872178606768312*^9}, {3.872179621378064*^9,
3.8721796262872458`*^9}, {3.8721798455882597`*^9, 3.872179846291733*^9},
3.872353542281605*^9},
CellLabel->
"In[721]:=",ExpressionUUID->"9cf3dac3-8d6e-4659-bc94-dacf7a473f3c"],
Cell[BoxData[
TemplateBox[{"6.33`",
RowBox[{
FormBox["\"\:0e3f\"", TraditionalForm], "\[VeryThinSpace]"}], "bitcoins",
"\"Bitcoins\""},
"QuantityPrefix"]], "Output",
CellChangeTimes->{
3.8721803466978416`*^9, 3.872180399888392*^9, {3.87218048996815*^9,
3.872180518357629*^9}, {3.872180574658882*^9, 3.872180599991707*^9},
3.872181566752799*^9, 3.872201428389583*^9, 3.872201529675655*^9,
3.872202247900877*^9, 3.8722028566764297`*^9, 3.872203029695318*^9,
3.872203291560905*^9, 3.872203435817305*^9, 3.87220364115761*^9,
3.8723486505059233`*^9, 3.872349347781478*^9, 3.8723497300441017`*^9,
3.87235355030762*^9, 3.872353666785081*^9, 3.872353743682699*^9,
3.87235384219248*^9, 3.8723540042336807`*^9, 3.87236412586875*^9, {
3.872365570313559*^9, 3.872365587273037*^9}, {3.872366642727928*^9,
3.872366666156143*^9}, 3.872366785817533*^9, 3.872367747321196*^9, {
3.872368063091481*^9, 3.872368109234735*^9}, 3.872420361073073*^9,
3.8724207132184353`*^9, 3.872421663598871*^9, 3.872421713350992*^9,
3.9057763987827787`*^9, {3.905776722643269*^9, 3.905776751450407*^9},
3.90577679647138*^9, 3.905777655218943*^9, 3.9057778336659927`*^9,
3.906846607782597*^9, 3.906846658500464*^9, 3.90688904808762*^9,
3.90689108151995*^9, 3.906891130796732*^9, 3.90689411031651*^9,
3.906894239653936*^9, 3.906894396716879*^9, 3.90690254297361*^9,
3.906903238313126*^9, 3.906905079512137*^9, 3.906905145736071*^9,
3.9069060065105333`*^9, 3.9069061535883417`*^9},
CellLabel->
"Out[721]=",ExpressionUUID->"bc6215f2-ff0f-47e9-9110-23fed9fcbf21"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["The Actual Block Rate", "Subsubsection",
CellChangeTimes->{{3.872200514264943*^9, 3.872200523894084*^9}, {
3.906897070141964*^9,
3.906897072883257*^9}},ExpressionUUID->"b8eca7dc-8b74-4985-93bb-\
1f9440a6ae0b"],
Cell["\<\
Historically Bitcoin blocks land at a rate faster then the block time target \
(6 per hour, or 144 blocks per day). Let's recon an average block rate over \
a sample interval to present day:\
\>", "Text",
CellChangeTimes->{{3.872201082846367*^9, 3.872201112605691*^9}, {
3.906894315392508*^9, 3.906894386637433*^9}, {3.9068965198395844`*^9,
3.906896553625736*^9}, {3.906897083412449*^9,
3.906897116690922*^9}},ExpressionUUID->"44935744-0213-4bba-9cec-\
0b072ea4e5c0"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"blocksample", " ", "=", " ", "100000"}],
";"}], "\[IndentingNewLine]",
RowBox[{"blocktime", "=",
RowBox[{"UnitConvert", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"Now", " ", "-", " ",
RowBox[{
RowBox[{"BlockchainBlockData", "[",
RowBox[{"-", "blocksample"}], "]"}], "[", "\"\<Timestamp\>\"",
"]"}]}], ")"}], "/", "blocksample"}], ",",
RowBox[{"MixedUnit", "[",
RowBox[{"{",
RowBox[{"\"\<Minutes\>\"", ",", "\"\<Seconds\>\""}], "}"}], "]"}]}],
"]"}]}]}], "Input",
CellChangeTimes->{{3.872180249828475*^9, 3.872180262746179*^9},
3.8723535422856407`*^9, 3.872353649305735*^9, {3.9057780057098083`*^9,
3.905778018981441*^9}, {3.906894390737319*^9, 3.906894392357061*^9}, {
3.906896575197307*^9, 3.906896635602413*^9}, {3.906896686862764*^9,
3.906896750404435*^9}, {3.9068968245731907`*^9, 3.906896885633853*^9}, {
3.906896917463107*^9, 3.906896955191743*^9}, 3.906896996677156*^9, {
3.906901531709758*^9, 3.906901592048264*^9}, 3.906904156789529*^9, {
3.9069041923538437`*^9, 3.9069042654434977`*^9}, {3.9069043553677597`*^9,
3.906904373351575*^9}, {3.906904415379672*^9, 3.906904429818742*^9}, {
3.9069044767900457`*^9, 3.90690448356255*^9}, {3.906904556208816*^9,
3.906904557647191*^9}, {3.906904690640547*^9, 3.906904704370226*^9}, {
3.906904777676428*^9, 3.9069047929187393`*^9}, {3.906904841210931*^9,
3.906904905931245*^9}, {3.906905959029748*^9, 3.906905959398993*^9}, {
3.9069059992572002`*^9, 3.906906001870306*^9}, {3.9069060342443647`*^9,
3.906906097057961*^9}},
CellLabel->
"In[722]:=",ExpressionUUID->"c5229fb4-64e9-44ce-b7c5-a91c55c90910"],
Cell[BoxData[
TemplateBox[{"9", "49.45248590690998`",
RowBox[{"\[ThinSpace]", "\"min\""}],
RowBox[{"\[ThinSpace]", "\"s\""}], "minutes,seconds",
RowBox[{"{",
RowBox[{"\"Minutes\"", ",", "\"Seconds\""}], "}"}]},
"QuantityMixedUnit2"]], "Output",
CellChangeTimes->{
3.906906007003455*^9, {3.906906066256673*^9, 3.906906097948662*^9},
3.906906153900679*^9},
CellLabel->
"Out[723]=",ExpressionUUID->"c5ca633c-9af5-41e6-b73b-54d5e6adcf34"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"blockrate", " ", "=", " ",
RowBox[{"Quantity", "[",
RowBox[{
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<Hours\>\""}], "]"}], "/", "blocktime"}], ",",
"\"\<per Hour\>\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.872180249828475*^9, 3.872180262746179*^9},
3.8723535422856407`*^9, 3.872353649305735*^9, {3.9057780057098083`*^9,
3.905778018981441*^9}, {3.906894390737319*^9, 3.906894392357061*^9}, {
3.906896575197307*^9, 3.906896635602413*^9}, {3.906896686862764*^9,
3.906896750404435*^9}, {3.9068968245731907`*^9, 3.906896885633853*^9}, {
3.906896917463107*^9, 3.906896955191743*^9}, 3.906896996677156*^9, {
3.906901531709758*^9, 3.906901592048264*^9}, 3.906904156789529*^9, {
3.9069041923538437`*^9, 3.9069042654434977`*^9}, {3.9069043553677597`*^9,
3.906904373351575*^9}, {3.906904415379672*^9, 3.906904429818742*^9}, {
3.9069044767900457`*^9, 3.90690448356255*^9}, {3.906904556208816*^9,
3.906904557647191*^9}, {3.906904690640547*^9, 3.906904704370226*^9}, {
3.906904777676428*^9, 3.9069047929187393`*^9}, {3.906904841210931*^9,
3.906904905931245*^9}, {3.906905959029748*^9, 3.906905959398993*^9},
3.9069059992572002`*^9},
CellLabel->
"In[724]:=",ExpressionUUID->"6fce16ab-c424-41c5-b546-2f1457bceeb3"],
Cell[BoxData[
TemplateBox[{"6.107362486496553`",
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"hour\""}], "reciprocal hours",
FractionBox["1", "\"Hours\""]},
"Quantity"]], "Output",
CellChangeTimes->{{3.9069042111765757`*^9, 3.906904239138002*^9},
3.906904289802802*^9, 3.906904375354817*^9, 3.906904431487591*^9,
3.9069044852408037`*^9, 3.906904559399817*^9, 3.906904694769307*^9,
3.906904800596558*^9, {3.906904856919861*^9, 3.906904908547484*^9},
3.906905080028132*^9, 3.906905146262919*^9, 3.9069060070188723`*^9,
3.906906153915419*^9},
CellLabel->
"Out[724]=",ExpressionUUID->"24160d00-cf04-4c65-a7f6-4cdd374fcdeb"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"blockRewardPlusFeesPerHour", "=",
RowBox[{"blockRewardPlusFees", "*", "blockrate"}]}]], "Input",
CellChangeTimes->{{3.872180249828475*^9, 3.872180262746179*^9},
3.8723535422856407`*^9, 3.872353649305735*^9, {3.9057780057098083`*^9,
3.905778018981441*^9}, {3.906894390737319*^9, 3.906894392357061*^9}, {
3.906896575197307*^9, 3.906896635602413*^9}, {3.906896686862764*^9,
3.906896750404435*^9}, {3.9068968245731907`*^9, 3.906896885633853*^9}, {
3.906896917463107*^9, 3.906896955191743*^9}, 3.906896996677156*^9, {
3.906904929326541*^9, 3.906904932789186*^9}},
CellLabel->
"In[725]:=",ExpressionUUID->"cd13bf5b-e941-4595-85d1-f44d4699b8a3"],
Cell[BoxData[
TemplateBox[{"38.65960453952318`",
RowBox[{
FormBox["\"\:0e3f\"", TraditionalForm], "\[VeryThinSpace]"}],
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"hour\""}], "bitcoins per hour",
FractionBox["\"Bitcoins\"", "\"Hours\""]},
"QuantityPrefixUnit"]], "Output",
CellChangeTimes->{
3.9068895663679523`*^9, 3.906891081537303*^9, 3.906891130834887*^9,
3.906894110345587*^9, 3.906894239677218*^9, 3.906894396738802*^9, {
3.9068967274479628`*^9, 3.906896751625032*^9}, {3.906896833320167*^9,
3.906896887272623*^9}, 3.9068969739858418`*^9, 3.9069016054649067`*^9,
3.906902543370263*^9, 3.906903238658532*^9, 3.906905080092469*^9,
3.906905146314571*^9, 3.906906007081594*^9, 3.90690615394258*^9},
CellLabel->
"Out[725]=",ExpressionUUID->"ae09403a-da49-45ca-862b-2f0d4f3cf52a"]
}, Open ]]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Hourly Economics", "Section",
CellChangeTimes->{{3.8722005568767357`*^9,
3.872200571227304*^9}},ExpressionUUID->"d07eac53-759b-4ca9-be89-\
9fa9e7d0336b"],
Cell[CellGroupData[{
Cell["Global Revenue Per Hour", "Subsection",
CellChangeTimes->{{3.87220133620325*^9,
3.87220136686802*^9}},ExpressionUUID->"50c4d724-fc00-444f-a21b-\
011006305022"],
Cell["\<\
The value, in Canadian Dollars, of all Bitcoin mined globally, per hour.\
\>", "Text",
CellChangeTimes->{{3.872201231882163*^9,
3.872201256300865*^9}},ExpressionUUID->"10ecc2d9-1ea2-41e6-8ae1-\
ab12197baaa0"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"blockCADperHour", "=",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{
RowBox[{"QuantityMagnitude", "[", "blockRewardPlusFeesPerHour", "]"}],
",", " ", "\"\<per Hour\>\""}], "]"}], "*", " ", "BTCPrice"}]}]], "Input",\
CellChangeTimes->{{3.8721796462114697`*^9, 3.8721796607601233`*^9}, {
3.8721796928563337`*^9, 3.872179713559113*^9}, {3.872179757996842*^9,
3.872179773168274*^9}, {3.8721798532480307`*^9, 3.87217987029673*^9}, {
3.8721802798560038`*^9, 3.8721802855040083`*^9}, {3.872181062474884*^9,
3.8721810660742598`*^9}, 3.872353649309898*^9, 3.872368053907263*^9, {
3.906849435496039*^9, 3.9068494447002287`*^9}, 3.90684951205443*^9, {
3.906849547693762*^9, 3.906849601544531*^9}, {3.906849690584056*^9,
3.906849753693413*^9}, {3.9068909656912203`*^9, 3.906890978363743*^9}, {
3.906891010832939*^9, 3.906891017818061*^9}, {3.9068910515725727`*^9,
3.9068910566676598`*^9}, {3.906891121824107*^9, 3.9068911251679897`*^9}, {
3.90690496987317*^9, 3.906904976264125*^9}, {3.906905029803342*^9,
3.906905044832551*^9}},
CellLabel->
"In[726]:=",ExpressionUUID->"8cd47bf8-a6b1-475d-9365-2cc5e40dc984"],
Cell[BoxData[
TemplateBox[{"1.5806138037803874`*^6",
RowBox[{
FormBox["\"C$\"", TraditionalForm], "\[VeryThinSpace]"}],
RowBox[{"\"per \"", "\[InvisibleSpace]", "\"hour\""}],
"Canadian dollars per hour",
FractionBox["\"CanadianDollars\"", "\"Hours\""]},
"QuantityPrefixUnit"]], "Output",
CellChangeTimes->{
3.872179662416402*^9, 3.8721797158296223`*^9, 3.872179774718293*^9,
3.8721798814869843`*^9, 3.8721800595773573`*^9, 3.8721801750917883`*^9,
3.872180286799436*^9, 3.872180347105384*^9, 3.872180400239544*^9, {
3.872180490315412*^9, 3.872180518763997*^9}, {3.8721805750091352`*^9,
3.872180600954446*^9}, 3.872181066963928*^9, 3.872181567087338*^9,
3.8722014286993217`*^9, 3.8722015300891523`*^9, 3.872202248235794*^9,
3.872202857035842*^9, 3.872203030008546*^9, 3.8722032919017677`*^9,
3.872203436165387*^9, 3.872203641699153*^9, 3.872348650847466*^9,
3.8723493481400642`*^9, 3.872349730476038*^9, 3.8723535507071333`*^9,
3.8723536672149343`*^9, 3.872353744115498*^9, 3.872353842611685*^9,
3.872354004700843*^9, 3.872364126314172*^9, {3.8723655707619534`*^9,
3.872365587714954*^9}, {3.872366643173319*^9, 3.872366666573906*^9},
3.872366786261421*^9, 3.872367747746125*^9, {3.872368055424232*^9,
3.8723681096721277`*^9}, 3.872420361453705*^9, 3.872420713609627*^9,
3.872421663964552*^9, 3.872421713727229*^9, 3.90577639921737*^9, {
3.905776723035758*^9, 3.905776751843197*^9}, 3.905776796819713*^9,
3.905777655612453*^9, 3.9057778340277348`*^9, 3.906846608133419*^9,
3.906846658535479*^9, 3.906846806535042*^9, 3.9068494472809687`*^9,
3.906849513000121*^9, {3.9068495786022*^9, 3.9068496021380053`*^9},
3.906849700593152*^9, 3.90684975014187*^9, 3.9068890484484043`*^9,
3.9068910191527023`*^9, {3.9068910572151737`*^9, 3.906891081562932*^9},
3.9068911308810177`*^9, 3.9068941103532133`*^9, 3.906894239683551*^9,
3.906894396745995*^9, 3.9069025434094267`*^9, 3.9069032386995983`*^9,
3.906905047182693*^9, 3.906905080099869*^9, 3.906905146322908*^9,
3.9069060070936604`*^9, 3.906906153950259*^9},
CellLabel->
"Out[726]=",ExpressionUUID->"1368956f-a42f-4a02-a7fb-f33ac541daaf"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Electricity Cost, per kWh", "Subsection",
CellChangeTimes->{{3.872201383781336*^9, 3.87220140967561*^9}, {
3.906894458163863*^9,
3.9068944708249483`*^9}},ExpressionUUID->"e7597e73-351e-43e6-8bf5-\
764726508350"],
Cell["\<\
See: https://www.hydroquebec.com/business/customer-space/rates/comparison-\
electricity-prices.html\
\>", "Text",
CellChangeTimes->{{3.872202827966346*^9,
3.872202829725727*^9}},ExpressionUUID->"e6e2b544-563c-4a07-9e28-\
d11bb7c4883d"],
Cell[TextData[Cell[BoxData[
GraphicsBox[
TagBox[RasterBox[CompressedData["
1:eJzs3fn3FUWe//k+M3POzI/zL8x/MWd+6uq229ZS26W1PG6FKFqUFoV7qYVA
ASIgdikIKCKCAiKICoooi9rua6G4AooiCm5YVgEFhZLj69Y3P8aNT0RkZGbk
zfvh83yck7XwyZtrZERkvDMi/p+Rvz31ov/tn/7pn674v378j1PPv+Znl19+
/rWn/d8//p/Tx1wx+uIxoy48bsyVoy4edfn/O/J///Ef3//xP/6///Of/un/
+PF/ZwCAAXu++DKbevMfs1PO/GV28hnnRS3XT5iUbX5zS9uHjpadetb5zvSh
tPTG5jfbPjwAAAAAAAAAAAAMAwcO/K0Tu1y24sHsppm3ZuMnT82m3XJbduuc
O7IlD6zMNmx6Ktvy9jvZvn372z5U9InX//RmNnf+3dmEKTdlM/44u5NOPti6
Lfvhhx/aPjQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABgkEMHD2b79+/rLIcP
H277cGo5sH9/9ubmP2UrVyzPFi28O3v6qU3Zzp2fZD/88EPbh4aSdC/zdNkv
90/HkR+Tjg/l9eN9BYCm7N27N3vxheez+xbfky1dcm/28ksvZl9/9VVrx6N6
Xp4Hq/4HADg69Vv5k9KuT3dmmzZuyBYuuCtb9eCKzvv/vr/+te3DAnAUGo7t
F7wvAEeP4ZiHYXg75YTjsv/413/uLON+d1Xbh1OZ3nF+/u//MnAu5vKfxx/b
9uGhhD27d3fdv9UPr2r7kDoeXPlA13EdLW0FvdKv9xUAUjt06FA2bepkZ51E
yxWX/baV47r6yssGjuGUE49v5RgAAM3p1/Inha++/DL79aiR3nNbvmxJ24cI
4CgyXNsveF8Ajg7DNQ9D/7tr3txsxrSpSZabp0/Nvvvuu4FtKwaYp/nrrrq8
xbOsbtnS+7zvO1pOOPaYznqrVq4YuA4Pr1rZ8lHD5/PPPuu6f4ph94MVy+/v
Oq4vvtjT9iENKf16X4GjzdYP3h8o62bOmJYdPPi3tg9p2Ll8zKXBesnYS0e3
clxXXz72p3aLE45r5Rj6ib5vVb04f162bf2gkf3wTALp8DyF9Wv5U9fhw3/v
ardwLeq7CqBZvao79YPh2n7Rb+8LC+9eMJDe1Jcf6ax/Yt3AtV10z8K2D6c2
xfHy87nl5uml6og6/6MtXxuueRj6n6+fYtXFfGaHepzzwIEDnThmfg66Vgvm
35mtW/tYZ+xaveudf85ZnXVHnH3GwHojzzu75SOHT7/mxcQ56+nX+wocbcir
2vXO21u6rv+Zp52cLb9/afbYmtXZHbfPzi4aOSKbMmliK8fWb+0WbetVucQz
CaTD8+TXz+VPXXq/t+O1jzz0YOfb5ek33Zid84tTs8cfe7TtwwSOesPpnX44
naup394XhnqbdT8zv43qh3td16gR53U9s5Mn3BD9W3Osy6PlWR+ueRj6H3FO
v+eefabr3DZtWO9dlzjn0NCveTHtKvX0630FjjbkVe1Se6t5/f/852/bPqQB
/dZu0TbinMDQw/Pk18/lT13nnnl6V/wWQDuG0zv9cDpXU7+9Lwz1Nut+drTH
ObVsfuP1qN8S5wR6R7G7NY885F1OO+nnXWk3tK4Ws+/2UC8zlt63uOvcQ/3S
f3Xh+dlxx/yss1xy0QU9PEqU0a95Me0q9fTrfQWONo+ufmSgrNPyzTdft31I
w4r5vthvbbH91m5RZO6sW7MJv78uGzN6VPbE42uTb19zvZnPSlN9gWKfyabP
FzgaUMb59XP5U9dJx/3bwLnd+IcJbR8OcFQpU//oVd2pHwzX9ot+e18445ST
BtLbxPHj2j6co8q4a68euLa/OHXo1xtccU7FSzT2fZGhEucsk18P1zwMQ5/5
LCt/KmOoxzmn3zSl67nF0NeveTFxznr69b4CQEoaOy/P5y4ccW7bh9Ol39ot
iphlxuw/3tL24TRuuJ0vgLT6ufyp4/vvv+/KH+fOuq3tQwKOKtQ/3IZr+8VQ
e18Acq44pxbNKVxkqMQ5y+TXwzUPw9A3nOOc+p6z6rmjP/VrXkycs55+va8A
kJL60OT53MUXjGj7cLoMtXaL4dbuNtzOF0Ba/Vz+1HHo4MGu/HH+3DltHxJw
VKH+4TZc2y+G2vsCkPPFObW8/+67wd8S5wT6RxNxTsVw1B9a499o+xof4LE1
q6O3e+TIkey1V1/JFsy/s7MNvWvNmDa106/6wIEDpY7RZd3axzrPqL5VtZ/b
mOXll14s3Me+ffuypzZtzG6dOSP79aiRnfL+vsX3ZNu3be38/aMPtw9sT2Mo
uSgvzddZ/8S64P5efOH5gXVffeVl5zpb3tw8sM7TT20a+Pe3fvz3SRPHd45T
11rjibgc2L+/87vbbrm5M47v2EtGZ3fcPjt74fnnCq9H7rvvvssW3r0gmzju
+s42NAaw+s3Pmz0re+ShBzt/r8OXF+tb3tUPr8puuO6a7KKRI7IrLvtttnDB
XZ1rEqtOuqwS5/z6q686913lj661rpW+JdKztGvXp87fKN2ZaTU0t46ZHnTt
Q8z0VSdGW/X+h8rYd97ekk2d8ofO2AtKw+qnrfsUS/dV4+4vXXJv57iUZ11/
zZXZooV3d571Q4cOOX/38Y4dA9ekKH9TXpCv++z/PBNcV/mB1nt41crshx9+
iD4Pm55rteUo/7304guzC847p5Pu77lrfrZ79+eVtxui+6T8dc5t/8j/9azp
Wqo80PkUPW96jpSf6Bm7+srLOr/X/O8PLF/Wuc9FNKaI9pNf6z27dw/8TdvV
tVC60/XQPFQ6XtuuT3dmM2dM66QnlRFKE2sfXVNpv3XzHW1XaUd5gMaFUZ6j
9Dnh+ms716Qo39F9Np/xw4cPD/z7rTOnd/IVbU9zVRf9xmfHRx92+kZcf/UV
nW1pm/qGaOGP9/DJdY9HnWeT971u/lCGroWu2bSpkzvpTM+A8jbdw1BevH//
T/m2Obbef518Yld+Hns9Q+qU42XbLVLUGURpUPWaJfctziaNv6GTPjrpbPLE
bPGihdmmjRuyb7/d+7/W/SktmGWGyhrzWtp1Kl8a0jmoLNC5Kz9QGi36Tchf
/vJd9szTT3W2o7xRz4zyBeU5y+9f2rk29thIoWey7PluXP/kwL/pf8fQ85L/
5o3XX4v6jYvKdx2r6jG6njp3PSPKi806qe/ctcS8A6gOm6+v+TZc6tTnqqQV
87d18nRTivcMU6rnNcT3HrLzk4+zW26enl32m0s6z/e0KZM6YxkWvRP0ooyT
unUbpUnVE1U2Km2onFt0z8Js6wfvF+47l6KsdUlR/tQtw0X5eL6vt7e81fk3
Pae67npWtM2y31Tn9XTlrWb+qGtnnlsoX6vyLmZK/S5fJc1XVTfd1712Tdbt
lF5V7l45dsxAOaxt3PtjncKXHvROpjp9fjx6X/BRncRMY/v++tdS5zcU3llS
17dC+jkthVSJEagMX7b0vmzc767qvLsrHTy48gFv+4vZxhBbR1NbRP4bXznU
q/cFpTvlZarTjxl90T/ymR/LOdVtlHerflCXq3yx+eonKt/URqTyR3mF/lt1
vRRt0qH9Kg9RO46ew3y/qtOqXDQpX1IdT9dM6WXspaM79yzmuZK67UVveY7f
p2q7m6mJ+kIuFOfUt2Chtrmycc6m8jXX+0jV/LrJNligSSnjnMpf9J7qyxuU
b6qNJ0R5utbzbUPjq8c89yE6T9/2Y5aR550d3L7ybvNd0V50jVT+mP/mova8
/O8///d/Ce7z3DNPH1hX99TFrnPo3UjlmH18epe2vffuO133217UNhGa31RU
Vy669mr/q8OVF+sdM3TsKmNVxwqpmy7Lxjn1nlV0rdQmZ7fP6BjMdVSH8DHH
p9Lia4tQea70l6/ne/cuUuf+u+6r3hlVNvu2NWXSxMJj+mzXrmzE2WcEj0lj
8ruujdpvzPV89XDVNcz1dC3tOmpO7xpmfhxT17PpXTiU/+TbDqWNsnSc9jjg
rkXPoY/qtqHnVIvqUKG5tFzpRM+amT/ai+rEOdUtfespX/Xdj9T5jtqvVd8t
el50n0PvtK58R/VeeztqGw/9xkX1ZZX7Rfe8KG9t6r6nyB9iqexTnKLomfPF
XPSOVnQd87yjjrrleJl2ixR1Bnlz85867e1F10bpVuy0EHstXWlIZZ1Z9mlR
+0HoNyGrVq4YtD3XYrdlhp7Jsudrl/tF7SB6fk849piB9avMa6fyU/XmomNU
WWw/58ofzHVU7hbRO7eZR9rlbd36XJW0kipPz6V6z8ilel6L2HmI7o05to7r
eoRiKU2WcZKibqO4Qei+3zVvbvCapSprfeqWPynKcLHbFBQb1lxf5naUF5Wh
ttuYc1NdwaXqu5gp9bt8lTRfVop0n+LaNVG3U95e9N539hmnOX+rbwLM9XTd
fZ5/7tmudZVnx5zfUHpnSVnfCunXtBSjzLmqvUWxvtB1VLqynX/OWVHPZE5t
seZ2Xe0BvXpf0PcYZmzItei7p7pixiB0HbO+ffPV27VOUf++GK796rtO3/VQ
/pVf+w+3b8tOOfF453p6ZkLf1qRqLzLn9S56N6zT7mZqor6QM2Mjere3779i
/T5l4pxN5Wu+95GU+XUv21iAqlLGOfUOX/Ts6Bsxn/ffe7cwv82fvzrf9jQZ
51y+bEmlbbo0Hec0yyVzseOcapuNOQd94+J7z1a9PGYbqeOc+sYx5n7rnvpi
TynSZWy7imJi+gYpNt2oTLe/tVL9IP+7vq9xUXuDva15c9zltr4vztdRncF3
nULq3n/7vqpPqK9eZy6hfpaqu5bJC/Rdm0nfYNnH5KI+Cfa23vK025nfiSg/
raKovclcVD+uK1THthff+1foXd31nClNutjpRO2HMc+uvvnX939F6/nG9kid
78TWRbUoL/e1Zdj5jt3unS9V2oDN8iS0hNpem7rvKfKHWGXSvxaVu/Y16UWc
M0U5HttukWJfove72OuaOs5pxsrMpUqcU+0Roe+D7aXJOKddR1U/nRC77FZe
WZZ9/KFF397ZzDJN7SMhdlxW/QFMKepzKdJKaAnl6ZLyPUNSPa8x7DwkJn6n
xVc3bLKMS1G30Vg5Mb9X38eYaxZa2ohzpirDxXzOVU662r57FedM8S6WazrO
GZPmy6ib7lNeu9R1O/W/Mt+RfUtbcc6h9s7SdJyzn9NSrNhzVezRjFeGFrUr
mOw8oWjcOX13nq+r+67rbOrV+4K+7Y5Jd23FOV3fj9iLvsOsM/aWa7+z/ntm
4X51Dsqri66fnj1fH6NU7UWxcc667W6+Y09VX8iZ72saI0F9qe1tu/oESUyc
s8l8LfQ+kiq/7mUbC1BHqjinK//VmDyK59t/c33TqXqTOS+IjkXlttbVO6jG
5bG3X1U+bq39PbfZZ9tezHzLF+e0+9Jp0XfK+hZZ57HhySeya65wv6+6NBnn
NBdda32npz7tetc2x9fTtTfLJOVrqrurrq883m6jUH8FFzM/1LloPA7V07Ud
tTvpfUzfhpUZw8kllIcrvWpcBNUfXOWLa1yvVOkytl3F/n5W6a4zdsGnOzvf
Km3asH5QfwyNMWHSPTSP11UHtcdw0qLnwUXjyubrhL5TCKl7/0P3VdvLxy+0
v7VQ/dNF98+ua+l501gL+kZJ35FpvEl7X/b3Zea3Y0pTLq4+0762ZbPfUtX6
QZ4va+wXjV2ka6pnWunbzvP0PNRlp8dOvvfj/VA+oViwxs5T3VbpUnmQTWPn
2PmR3sGULjRmnd7X7HxG7QCu8WJC6UTtFkp3GvfNLrvMdgXtX+9U6jdk5xO+
fDh1vpNvr5M3jx/XGQdm585POn2v9N5l1y99406H4gt6L1Cbis7VbH+Jyau+
2LOnax3lkUpreq727t3b6Y+k50dp0Pf+16v7XiV/KMP+7l7jw6hNXteiM2be
j2WiGXfRovM0meONh8YN1HNURapyPKbdItW+dA3te6nrofdNvW8rDSrdqgxW
GZiPo6W+T/n1Mn9rj8tjj8EYSkOKrWmcPj3D2r/vN753Wle/GB2P7qe2ofJd
10jv06q/5WPw5kLPZNnz1ft11/0p+PbaLDPUBldFfvzKC5Uv6NlW2aCySd/2
2GWxPXeCPU5MqK+lHZc1+6umqs/VSSt18/TU7xmpntdYoZid3q0Us1Gd084z
FZtwfRPUVBkndes2uhfmbzXun/p+qAxTP3XVSYrSdYqytkjV8idlGS6+NgXl
UfrmRTFL5ZFlDIxba30bYI9ba4+zluJdLNd0nDMmzZdRN92nvHap63bKV831
9N6p/mTK75QXq96ha6dzcGk6zmkuQ+GdJVV9K7bu1E9pKVbsudrfxKivneoI
apNQWWKWiSqnzfLQrte5nkuT2dZgtwP08n1B+za3pTSn78D1baC+M1O8VfH8
mPE/i5SNc9qLnoUFd8zr9OWz+8oVjRNdJNQ+q/qdzl/9Fuy/m2nil2ed3skv
9M2CXX/y5VOp2oti4pyp2t3sY7eXOvWFnB3ntP9Ni8pqV500Js7Zq3zNfh9p
4v246TYWoI7UcU61+6tPusn+1tA1rrvKSXMd17hN5vdHWmLHHfcxx0oqOnez
j70vzmn3j9SYAy76DsvO6116EedUm2xoLGGzPqNjcM0vobw3X0dtETZ73E7V
3Zriy4td4wUusNq0lB/bZVaqdBnTrqL6rLmO2jNcc7qpnFKdxFzXHMdE72zm
3155+aVB29AYUq7rZPch0PUw36eqzNOU4v777qtiiHabif09pGu8B81hYK7j
q6er/mWup3qkSedi5iH29bPH/M0XV3ux3h/MdarO+6C6km+OXbWf23WgOux4
ua5BmT7ZisGb31br974xYOw2aNVjbb50stCaJ82+1vmifNT+DsdOT678MnW+
o3c8zaHgGxNIbUzmNhQHcHG1h6nczudvi/mNK6+y68hl84Ve3feq+UMs3SNz
W8pXXG3NuoZmHEPnqzZqFzMOo7n7UkhRjktMu0WKfamMs7/N1Tt+2TzR/L2v
X0POl4ZCseWY9iu1CdvbDI155BIbl4k9X7udylVHELUzFeVnMRRrUFzPNxaE
4n7mfuw+X3bdKNR2Yb7T2N8eparPVUkrqfL01O8ZqfKGWK73EOXJdl1X193u
d+X6JqipMi5F3cbM8/WuZVN90WyPdH1HWLesLSu2/EldhourTUHr1u0rI4cO
HuzartpAfVK9i+V6EecsSvOx6qb71Ncudd3OzO90bq78LqRXcc6h9s4i5jpl
61uuulO/p6VYVc5VsW2b8tdQeWh+U93po+mpL+sbG3M79rjwvXxfMOv5SstN
qhrndI1DoDqzuY7GNajDtV/Nn2CP7aI+ea40bM/nYM/3oL4sLqnai2LinKna
3XJN1hdccU71p7Tr1K78vyjO2at8rei76Dr5da/yTqCulHFOfXtmj30g+hbD
XE/fm4S25esXpWfJzGNC9csYKeOcdluW8q0Qe0wCl6bjnCo7QvmPnRffOed2
53p2ebpt6wddf1fc2/x7lfmdYtl5sdoQQt+0mu/0rvpeqnQZ065i9/sLvVva
52mOsaOy0TyeaVMnd/1W7/u+cSPsMlTtgGYarFJ/SHH/XWWsr96m7+3M9ZSO
TXa61jdTIfb3huYc63Z9zL5n9rNhLnZ7p765yv/mmysoBbW35ftRDLsOe3wl
fYtXhj3HqZ1WTXqvtvu82O/vrnSituWYY1fdTM+OTX1vzfXUV8GWOt8povZR
8xm+cuwY53p2vqNnuOj7oCpxTn17WEYv7nvV/KEMs3zQ/VAfFh+7H4HGlnFJ
HedMVY5LUbtFqn0ttealUbp11S2LmNuo8h5n5vUxv3G909pxKV/9LCR1nNMs
17Wo/5+LOR6L7oErf0xBeaV5POp7ZVN9Nf+7b4xQ+37Y3ySnqs9VSStFYvL0
1O8ZKfOGWPZ7iOpXvnHvNq5/smtd1z1rqoxLXbfxlfFqQzOP3Va3rC0rtvxJ
XYaL3aYQ2mZZZeKcqd7Fck3HOWPSfKy66T71tUtdt7O/8bHHTijSizjnUH1n
Mf+eIs7Z72kpVtlz1fOs/MrFbIu05yXSNzDmflauWO7chvkMqG+KqZfvC2LG
hIrqM3VViXPqXqje5WLW11TPr8Per+6L8hqb2s/tNPzUpo2D1lPbrnl8VduU
YtuLiuKcKdvdck3WF1xxTtF8muY+dY3tvl1Fcc5e5Gsx7yN18ute5Z1AXani
nCoLNL6Oi74VMdO8PWeE+jWYf9eYKz7mWAt157hNGee02zB99Yuc8hRzfZcm
45w639DYX6Jvxcxj9I0doLZdc71NGzd0/V3vuHZcTf3gfPW4Ouy8uOg+aGxl
c33z+7iU6TKmXcXchtoEipjf02kxv6/U+Fi+eqzZdqQxBsyxs+w5EMxnpOpY
0Snuv31f9Tz62sbsPlb2GPr2fJm+d8qcxvHw1Qfs/pr2HEvm9dP7QqhuY75H
phijxccch7jq3AWi78/M89F18PVViTmWznPhKUNydl8be6wxO52E5vSw6+++
fu12PxtXn4WU+U4sM78w54Ez2flOzFjIVcat1b0vM55h0/e9Tv4Qyy739K1q
iI7HzCt840KkjnOmKselqN0i1b4mXH9t199DbdIhvnzbxU5DMWO0x7Rfmc+p
Fs2FV1bqOKfYfbHsOLLaT830Wre+HWKnB9e8cva4k675p8zxbVW2mXlAyvpc
lbQSoyhPT/2ekTJviGXmIb54dU71K7O/o6vfSBNlXIq6jdKE+Xz52PVRu15c
t6wtK7b8SV2Gi9mmoL4sKfsBlIlzpnwXk6bjnKnmwEqR7lNfu9R1O/u7AaWz
MuP7Nh3nHMrvLGXqH2XrTv2YlmLFnKtZH1P7jY+Z7551enfbjs7XzENd40Yp
/XZ9x/XjfTX18n1B7O8OFLstKkuqqhLnDMWgzG93fO/gsez2WV8fS/ubwFA5
prwtX69qnDO2vagozpmy3S3XZH3BF+cUMx6gxR6royjO2XS+Fvs+Uie/7lXe
CdSVKs4ZioEUtWG8+srLXX9XHqH3K9dirqcYTR0p45y3zpzRdWxF80y2Hecs
mpNJ7G/Btd2Y+6LvXWzmtc4X1dPVhy3UB6as2HkQcvY3aeZ4cinTZUw7pfl3
3zjsJo3Bb/7GjFsvtr450pwqOXPsCJVHGm8j///293TmM15m7CJb3ftf5r7a
9Sm7jDX7TcY8q2prM9fXt1gmczx6ux3OrAer7m72STH7tdpzbmm+pBRUH1Ja
07e3mt9j6ZJ7u8b8rxPntPuy2t+WxjDnfyjK48T+XlVjbJnKpBOz7HN9I5dT
nyBzmzFtBnXyHRfFHJRGdM2VvpXHmjGI2DinLz5S5Tf23GJ5/qH2kqJ+X23e
96L8IZbdJ86ec9Mlpk9a6jhnynK8qA6Ral+qY5XJo33MbaRodyv7G+W/5t9j
0rpLE3FOtY+Enin7XVVjz6aimKqeO40Fptid8j9zX644p90+Z/dBVTlt9nex
51dLWZ+rklZsVfL01O8ZKfOGWGXfQ8x3L9d7WhNlXIq6jZ2H+a6r2RapxdV3
pE5ZW1Zs+ZO6DJfYNoUqysQ5zfXqvotJ03HOmDQfI0W6T33tUtftXHPEaVEc
IGZM6KbjnEP5naVM/SNm//2elmKVrScqffrKC7OO43p/17id5rbsvmb2WCn2
mLS9fF8Q9UW0n0Wdv7519PWjrKpsnLOofhLzrXGs2P3acc5Qu5z6OJj5W5E6
7UVFcc7U7W7SZH0hFOfUu5CdZlUm54rinG3ma77jSPl+nDLvBOrqhzin/Z12
7FJ3LPeUcU57bLKiOMVQiHNq3Kwq98U1/6Latez3fvPaqxypOh+hqWx+b895
YX4HkzJdFr2X2sftGw/AtMSqr5r1HXus2LwMVj3G/D5edVy7/S+PO6rfiXmP
6nwrVff+pyxj7e/1QvPT5sxrZr9f2vc2n0/hw+3bBv4tjx+b7xBq38qZbc6+
8fTKUD1I7zv2OEf2UifOaT8fVfr7mGVIzHzldv3S/vZ5qLQZhPIdk95pVLb6
xpnOlzbinGovstto80XpTnPe++bja/O+p6qD29dp3drHCn9z2W8u6fqNPZ+v
pI5zpizHi+oQqfZl51tl+5TkzG20Eefc9enOrr/b39/HaiLOqefXXN+eA8eM
ybv6BZSlb3/Vz0TlW1F6cMU5xaxn2/NPqT+BuQ1de1PK+lydOGedPD31e0bK
vCFW2fcQez4qe5zJJsq4FHWborqXb3nu2WcGbatOWVtWbPmTugy3t9lWnDP1
u5gMlThn3XTfxLVrom6nPNiX/6qMdvU1zg3XOGfMO4v597r1raGSlmKUrSeW
Wew+VXY+q2+jTErf+d9csaNevi/kVN/zbVfvTPYclVUR53RL0V5UFOdM3e4m
bcU5RePBmOdj9sENxTnbztdMKfNrE3FO9JN+iHPac5zHLlXbjHIp45zmOKGu
uodtKMQ5fz1qZKX7cuNk97uR4mS33XKz9/1CdQa7baqssvm9Xb803+tSpsui
91J7DtuYdiR7DDN7HAhzHJS8DmbWkfJ0rLRq3pO1j67p/LvGus//zVUfLqvO
/U9ZxtrPakz7kNkv0x5nQn1lXfmb5rXJ/03xTXlz85+61lX7lZjfzNnzyZdl
f4+ZL6ozqt5r9hmpE+e0nw99r1eWmRZivluxr7U9VuhQaTMI5Tui9ntf/qty
13xXNZ9vW5NxTtE4Z3bbu7noHFzfL7R531PVwe33HFf7tM2ec8Q1NlHqOGfK
cryoDpFqX3YZUZW5jTbinO+9+07X39UHqoom4pxij4eU99nUXEvmv6955KFK
x53b+cnHg+bn06L7rH8322O0+OKcz/7PM13rKb6TUztO/u+uOnrK+lyVtJIi
T0/9npG6jh+j7veW9jcPTZRxqes2ZRbXXFtStawtK7b8SV2GSz/EOZt4Fxsq
cc666b6Ja9dU3U5ls/neZS+a49JluMY5i95ZxPx73frWUEpLRcrWE8ssrv78
Zro2y1ilA/O3rnh+L98XTGp3sudbzBeVNXXnPxfinIOlai8qinOmbneTNuOc
6m9q19nzvpmhOGfb+ZopZX5tIs6JftIPcU77O+w642OWkTLOqW8yzHPYvfvz
4PaGQpxT9VjzGFO8Q4u+x9b5u74dUr1B5UdVZfN7u86w2Bh7I2W6LHov1bdN
5t9jymx7rmeNo2iaNHF8V/pRvUJjueX/Zo6zaNZt1RYvZh1DY1ikUuX+pyxj
7Wc1po3AbNNxtVWb9UldSzHfNfIxOnQPzHqj6i/av3k8dcZxttsp9JzrWzBz
PvtU83Nu2rC+a1/jfndV6W2YfRRi8iS7jmi3wwyVNoNQviP2u6b6U+kZNJ+N
KvNzpo5z5tR3Wd93u9p2Nf6Qrc37nqoOrv6bZe652O96LqnjnCnL8aI6RKp9
mddAS/49SFnmNtqIc+r8u/LjiLlYXJqKc9p1nHysV7OMVHlVZ2xMjeVgl/Wq
35jzlMbMzykqP81t5f1M9b2A+XvXfHUp63NV0kqKPD31e0ZTdfyQsu8h5px0
rvpKE2VcirqN2QYWql+UVbasLSu2/Eldhks/xDkbeRcbInHOuum+iWvXdN1O
sUi7XpYv+Te/puEa5yx6Z5Ey9Y+i/Q/FtORTtp4YmqM1hj027Ssvv9T5d3Pe
e9dc19LL9wWbvoXXd972d2/5Yo/BWxZxzm4p24uK4pxNtLu1GecUew7RvMwI
xTnbztdMKfNrE3FO9JN+iHPaY2zWGROpjJRxTru8KGpDmTrlD13ru5R5NzLL
s1RxTtU3zGOM6a9Shsbss+cS0KKxzaoqm9/bbdWhsV/rpMuY91Iz/hUzdqk9
56UdH9P9Mv+u+pFZLzPHAtFc9GbaMMvvf4xZm3YOIClz/1OWsXovNf/+1pub
g8ep/gPm+qr32ZQ2zOtlxi7tZ23M6IsG/nb1lZdlC+9eEKzLxVI7jlkvVDuU
PcabpIpz2t/3Ko8sS/P/lCl/Nq5/smufutemodJmEMp37DmSlG+7Yv/9FOfM
aV3znuaL+qKY2rzvqergdp+3eXPCc6yK2YbsG+svdZwzZTleVIdItS+7D5fm
cazC3EYbcU6xY3xVytKm4pz2nJb634pLmuVIlTE7TeoXYx6Xxka0xcY5xRxn
QovugTn3zz/isoPH2E9ZnyubVlLl6anfM5qu47uUfQ8x42mucrqJMi5F3UZj
oJjbUP0spdiytqzY8id1GS79EOeU1O9iqd/lm4pzpkj3qa9dr+p2eg+0x4Y2
5xbJlYlz2u8OQznOGXpnyZWpf8Tsf6imJVvMfs28r+6cXJqPqKu+ceVlg9oH
VJdw6eX7Qoj6rJn3X8vE8eMqH4sQ5/xJ6vaiojhnE+1ubcc5RWPUmcepNGum
237L10yp8+sccU70k36Ic4qZ3+o7ozpzAcZKGee03+H0Duhj1yO0uJjvRr51
xC4/UsU57TE2U5cjueX3L+3ajz2fQBll83t9F22ur/HVTKnSZcx7qdn/z557
ysWsY7nendWeah6/ef9V/zHpvO16cf6/NT9Ck2Luf8oy1h77rmhsJnt7Zj/Y
nN2Oec0VP13ryRNu6FpXc7vnf1MeauYt+pauKnM+VS2rH17lXC9VnFN9a+x8
TN/sl2H2L9Zif6cWOnYt9lz2Q6XNIJTvmHO1atF4by79GOfM2W28L7/0Ytff
27zvqergyl/N7RR9o2D3OcvHuLGljnOmLMeL6hCp9mXGrbSE5pYJMbcxc8a0
4LpNxTmVLrrKD0/7UkiVOGfR+ebMb3S02GNj5mPZVqU0PJBmPP1Zy8Q5P/pw
e9e6amcwv59Wvd4nVX2ubFpJlaenfs/oVR3fVOY9xB7rQmnT1kQZl6Juc8ft
s0vnJ1UUlbVlxZY/qctw6Zc4Z+p3sdTv8k3FOVOk+9TXrpd1O40DbpYlWuzv
Uew4p+/9Uf127G0N5ThnUVuJlKl/xOx/KKelsvs1723n+u78pPL+xJzXWtfO
nuPP9z1ML98XitjtUnXniSfO+ZPU7UVFcc4m2t36Ic6pdwgzHdhLv+VrptT5
dY44J/pJv8Q57TpUlflQykoZ51ReZ48tb8+zp/csV/81LS72uq62EfsbOy2p
4pyq89v5t2s8/7rUf8DcR53+A3ZenM+L6KLvhYrmmEmVLmPeS+fOuq1rnXsd
48Lk7L6arvYf8Y3H4yq3fXMjuL67Tinm/qcsY/ft29f1PZX6sITmuTLHkdKi
ccNsehe2vz3MF7vdyT4Xc6k6PqPrvF3jConZLqb0HzNPgo/9fChvLDPutNrG
zN+PvcT/rqB2A/N5VXq126n7pc2gTr5jtweqXd+me2Y+rynbw1K0odnXTGNG
mtq87ynr4OaYilq2b9vqXdeOJ+l7B5fUcc6U5XhRHSLVvuy+d1qq9Ok0003R
HNNNxTk1hqq5jsoJ13fTIbHPZJnzzak9zVce1W1XEjM9qJ3EVT5o/FVzv4oR
hSi/9h1z6HlOVZ8rm1ZS5emp3zN6Vcc3mXlI0bNgj7urcSBtTZVxdes2dt84
pf06cxL4FJW1ZcWWP6nLcOmXOGfqd7HU7/JNxTmlbrpPfe16XbezY9Iad8ik
dGv+PZ/nxaR3TLPNKF/6Oc5Zt61EUte3hnpaKrPfR1c/0rWO3i3q0HyWrjqA
ltC36718X4hhxupcc6WXQZzzJ6nbi4rinE20u/VDnFO2vLnZ+6z1W75maur9
mDgn+km/xDn1HqT3QHM9vYf46tdqB9N3R3WkjHOK3S9Ni36na6Pf+PJBLS4P
rnygax2NQZXTN4U3T3e3ZaSKc4rdT033KPQerW8/7e/8NL6f6gC+8S+Ux5v7
0JyFVbliSCoXlL5MeudVuW+u5zq+VOky5r1U71PmM6U6wQvPPzdoPV1jc6w5
pd09u3c7j8e+tvmiee9tmovFXk/b1jtOHSnuf+oy1p6/QvV+e1wx3WNzjlMt
mmPAR+089vXTPXSlFXPuUzOvqMOe/0h1cLNdbe/evYO+/ffVH2Ppm1A7vqu8
Tvuyqd3vrnlzB7Vv2f2HNBeBTW2hanM311O7kK1f2gzq5Du6RubflW+b1+z9
994d1M7v+86yqTbgVStXdMYQ0rPtYj8LX+wZvI227nvKOrg9dq3G/nHNIaMx
mMz19P7pe19MHeeUFOW4xNQhUu1L/frtskjX0aZnQ8+ovhe2mePQ6fehmEpT
cU6x07DKeVc/GeUX+u7evh6xz3GZ8w0dX76o7a0u+1srO76vcertsX1DMRNZ
7KnX/PKs8HhvqepzZdNKyjw99XtGquc1lpmH5PtTP1WbnueYtvWmyrgUdZt5
s2d1/V732Fff0m9V3zfnxpIUZW0ZZcqflGW49EucM/W7WOp3+SbjnHXTfepr
l7pud+PkiZ3n0vVNqcb7NPtg+sYfMNfR+ZnzJCs/9fXv6ec4p5Y6bSWSur7V
72kpVux+7T6dGhfK922M7lNoTFnVaey6Tr64rqGpl+8LSlvKH13jutttGq5v
CsogzvmT1O1FRXFOSd3u1i9xTrHniOjXfM3U1PsxcU70k36Jc4r6zdt5hPJe
zZ2tPuuqTyu/y8sW3ztArNRxTuXPdj3FtSjfMvNx375d39krX9I3Teb7v/63
mRemjHPKuGuvHnQcugbqd6cYleZfUn0sPwa9Q5jUn83cr+oqupf6nc7F3K7y
+zpxNV9fOW1X5bDSkeZ3st9DQu1jKdJl7Hup65te1QV0TdXHwVXvCH2H6eoX
o+c2dt+hcdFipbj/qctYxRjsuVg0jp3yBI0rqDqLWUfMj81+BzTZ91iL7xsp
e052LZqnsw57nGIzP1A7k+tvWvTdqNoUq87Batdd8zxJ4zXq22hdA/M+2+14
aiOwj035i+qWajfTc2a3g/vy4H5qM6ia79jvMfl29J5itkHai671FmvOi6ba
gHVv8r9rDBbtW3P86vmx+xv5yqO27nvqOrj9LOte6ZsRtaMqbzbH7cyXV15+
ybu9JuKcUrccl9g6RIp96f3XHvdNi54h5Sm67r8eNXKgTVZp0Gb3TVHa1H1R
GtdiajLOac53bS7Kd3SMSi9mjEp5jin2OS5zviYdtyvPSTF/hD1+pxaVtcrP
XN/75OWHjtv1zYDY7xQD139l8T1LUZ8rm1ZS5ump3zMkxfMay45z5ovimOrz
rvqXPT+vFl/bbJNjFtSt2/jGNNMc7SrndG01XpjGMM/LQjsWkqKsLaNM+ZOy
DJd+iXNKynex1O/yTcY5pW66T3ntUtftzLYcpW+Nv6znUMdkp2XfuALmvC75
tdGzqXLNvsfm/+/3OKeWOm0lTdS3+jktxYrdryuf0P1Q2TtvzuxOG4Hi9Hka
Lmq31Lr29mLb/nr1vmA+Q0p3undKe5q30N6/6/kpgzjnT1K3F8XEOVO3u/VT
nLPzvup4n+m3fM3U1PsxcU70k36Kc4qefd/4j678uI7UcU5RPu4bM0qL6sL6
3tZcxzXetusYXYt+qziS2cc/dZxTYwvYcy2HllCcs2ipO2aWnRf7+imYi+5n
KH4lddNlmffSlSuWe+sY9qL7Ehr7Qex3L9+3Ufbc9Vp8Y/aXkeL+N1HGar48
e+4036K6mfpchOj7YPt3vu/W7Xm2itJELPWFDZ2H0pXaMOz4spaieeFDlL5j
06zdJiLqM+OKabgW9V/wfXfWL20G9jNXNt/RtwCh36rs1XHZ19wux3oR5wwt
uqehsZjbuO+p6+B63ysqp/NFZYgvT8g1FeesW45LbB0ixb5E4/sV9VHLF1ec
U2nPly/pGTU1GecUpXXf2PD2UjXOWeZ8TXpHt3+nNrIU9O1yaP4aLaqnLVt6
36B/V1uXj2JFdt7n6hPgUrc+VyWtpMrTJfV7RqrnNYYd54wpK9c+usa7vabH
Zq9bt1H/ONdYH74lFOcMLUVlbayy5U+qMlz6Kc4pKd/FUr7LNx3nzPdRJ92n
unZNxjlDi+ICvjE39O5YdG5q91cMIvRslz2/fn5nkabqW/2almKV2a++ibNj
Qb6lqN3SHm9GS2zZ3av3hdjtu8YKKIs4Z7eU7UUxcU5J2e7WT3FO0ffL9jn0
W75maiq/Js6JfmL2NSgb5zTfbfTtj48dP1F7RoiePb0PhZ5/vQv45reKNW3K
pIHthdoAxGxri4mv6jt0zcuk71M05pC+fXr1lZcH/m6WCSorffQ9sL73dV0D
lVu7dn3aWc/+RtFF5YAvD4uheavtMdPtMlH7tucj1De/+v4x1ManOkKdsbBy
dl6sMlXzFLj2rXuuttGiOGGuTrq0+0sUtUfoWoTad/WOo/sRw36/ds1xlDPn
x9bien8tK8X913u8uf6aRx7yrmu/4+kbyZAF8+8c9M15vmi8FvUxiO3XYvfN
8M0vbs9Jquueivq0uNpwlZ4+3rGjs476Rtjp2DV2XBmam1Df+vruse6/+mn4
+o3qmlx/9RXe50vlTdGY1mXSiVn2+cbEk00b1ndt0zV+nKsOWCffUWzAns8x
z2OVj2uuC7HnedCi8jZXNt+J/Y3yeJU/vnulf9d38uax+PT6vpfNH2LpG1df
PEfnprhMzPU3x690vZvWVbUcl7J1iDr7yqmtUd+x+vJoLcp3fPFjjf1jfyPs
Ov4yaajqb9RGqLqfL60rb9A4r3YeU+Y5jj1fm91HJS8rUtB1Up81V/mqeEPe
nmz3fVZ56mPny6Ex5V3q1OeqpJVUebop1XtGLsXzWsRuz1P+7+q/qUXpuOj7
q6bKOFPduo2oDPP1X9ai/E33yx53NmVZG6NK+ZOiDJfYNoUq9PyZx6T+IzFS
vYulfJevkuarqJvuU1y71HW75cuWBGOdeg61TtGcpCpnXfU9/T6f687+xtd1
rkfLO4t5XZqob/VjWopV9lyVV6iuEKrzKu1NnjD42z6b3SZRNq9o+n1B/UND
cV3F2F584flSx+wTU76Ueccx07lr3sQyYver+2Fen1B7nnnvfWOzpWovio1z
5lK0uzVZXzDzWs0TH2vC76/r63zN1kR+3VQbC3A00nu8nhnFRpWv6nm354Uf
iszvY9SuVURjpWssfrW5qA7rm4+xF1T/V71Z76365lPfE+l9yPfto0nvcioz
VafW3E/qvxc7h1QMHYPSSL6YVL/b8OQTnXK97vclvUqX+bXW9zFqz9K3frFx
2X7U9P2vQ9/d69g0B5z+2zUfzVCh+Oobr7+WPbB8WSffcMVb9W/qJ6FnIuW5
qm6q50F9gZVH6B3FnL8mht7B1z+xrlOX0veLvnhxvwh961Yn38nzfbW7qL3X
1faibzmUD+s9s9fXSfmt8qSnNm3s3Gs906o3Vz2OoXbfXTTuto5d6V/3PW+/
7Dd1yvG29qX+nbqmyqPzcjdmvG3tX/tTOao0qrwxVVygKrUhKDarfEHXQ/Pe
pLr2Vc7X/MYpNGZJHZrPTfUmzcfki6MqP1G5pXykqK05lV6+Z/QyTy/7npFr
Mm/w9VtQvVbXXfOPqu0uxTd2qaWo2+Tlg84z34bKvSKpy9qmHA1luEuqd7F+
epePVTfd9+N7rJ5DjQmufF9lsOoVH324vdRxaV2di66JtqH32bbPK1ZT7yzS
ZH2rH9NSk9Q+ovJQ+YXOWWlMbRW91vT7gs5T56b0ovq9zjmmXER9KdqLVL/M
85LQ94m2o6ndrY4287V+fD8GMHTZc3zPnXVr24cEAKio6rghANA2vdea+Zfe
dTG09et7RtX5MwAAafDOAiAVs8+vxm4BABx99L1jaP4C1S3NMRo0FkA+XhUA
YOihzQDAUKUxrfK8S2NYxY7TjnYM5fcM4pwA0C7eWQCU5eq/q76eZl4yaeL4
3h8YAKBRanfI83nNt7Fo4d2dMbA09pT6+2u8cXuM81tnzmj7sAEANdBmAGAo
0rjKZt514+SJbR8SAob6ewZxTgBoF+8sAMq64bprOvM53jnn9s745Rq/+MIR
53blJRpPHwBwdNFcO765hF3LiLPPYAxsABjiaDMAMBRNGn9DV96185OP2z4k
BAz19wzinADQLt5ZAJR13VWXB+ubjFkLAEcnzRt8yonHF7Y7aFwwzfcMABj6
aDMAMNQcPPi3rr5/I887u+1DQoGh/p5BnBMA2sU7C4CybrvlZm+dUzHQA/v3
t32IAIAGff3VV9m6tY9li+5Z2BkvSmOVq4//k+sez7Zv25odPvz3tg8RAJCI
5qx4/913Bxbq+gCGgvff+ynfUt0VQ8NQfc/46ssvB9IbfYcBoPd4ZwFQhb6P
1DwJd9w+O5t+05Rs1coVne/vAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA